forgeos_commerce 1.9.0

data/app/models/order_detail.rb

@@ -0,0 +1,129 @@
+class OrderDetail < ActiveRecord::Base
+
+  belongs_to :order
+  belongs_to :product
+
+  #validates_presence_of :name, :price, :rate_tax, :order_id, :sku
+  validates :name, :price, :sku, :presence => true
+
+  def rate_tax
+    value = read_attribute(:rate_tax)
+    (not value or value < 1.0) ? 1.0 : value
+  end
+
+  # Returns price's string with currency symbol
+  #
+  # This method is an overload of <i>price</i> attribute.
+  #
+  # ==== Parameters
+  # * <tt>:with_tax</tt> - false by defaults. Returns price with tax if true
+  # * <tt>:with_currency</tt> - true by defaults. The currency of user is considered if true
+  def price(*args)
+    passed_options = args.extract_options!
+    options = {
+      :tax => true,
+      :voucher_discount => true,
+      :special_offer_discount => true,
+      :packaging => false,
+    }.update(passed_options.symbolize_keys)
+
+    price = read_attribute(:price) || 0.0
+    price *= rate_tax if options[:tax]
+    price -= self.special_offer_discount_price || 0.0 if options[:special_offer_discount]
+    price -= self.voucher_discount_price || 0.0 if options[:voucher_discount]
+    price += self.packaging_price.to_f || 0.0 if options[:packaging]
+    price
+  end
+
+  def discount(*args)
+    passed_options = args.extract_options!
+    options = {
+      :voucher_discount => true,
+      :special_offer_discount => true,
+    }.update(passed_options.symbolize_keys)
+
+    discount = 0.0
+    discount += self.special_offer_discount_price.to_f || 0.0 if options[:special_offer_discount]
+    discount += self.voucher_discount_price.to_f || 0.0 if options[:voucher_discount]
+    discount
+  end
+
+  def old_price(with_tax=false, with_currency=true, with_special_offer=false, with_voucher=false)
+    ActiveSupport::Deprecation.warn('use price instead of old_price')
+    price({
+      :tax => with_tax,
+      :special_offer_discount => with_special_offer,
+      :voucher_discount => with_voucher,
+    })
+  end
+
+  # Returns total product's tax
+  #
+  # ==== Parameters
+  # * <tt>:with_currency</tt> - true by defaults. The currency of user is considered if true
+  #
+  # This method use <i>price</i> : <i>price(false, with_currency)</i>
+  def tax(with_currency=true)
+    price(:tax => true, :with_currency => with_currency) / rate_tax
+  end
+
+  # Returns tax * quantity
+  #
+  # ==== Parameters
+  # * <tt>:with_currency</tt> - true by defaults. The currency of user is considered if true
+  def total_tax(with_currency=true)
+    tax(with_currency)
+  end
+
+  # Returns price * quantity
+  #
+  # ==== Parameters
+  # * <tt>:with_tax</tt> - false by defaults. Returns price with tax if true
+  # * <tt>:with_currency</tt> - true by defaults. The currency of user is considered if true
+  def total
+    price.to_f * quantity.to_f
+  end
+
+  def self.from_cart_product(cart_product)
+    object = self.new(
+      :name => cart_product.product.name,
+      :description => cart_product.product.description,
+      :price => cart_product.product.price(
+          :voucher_discount => false,
+          :special_offer_discount => false
+      ),
+      :rate_tax => cart_product.product.rate_tax,
+      :sku => cart_product.product.sku,
+      :product_id => cart_product.product.id,
+      :voucher_discount => cart_product.product.voucher_discount,
+      :voucher_discount_price => cart_product.product.voucher_discount_price,
+      :special_offer_discount => cart_product.product.special_offer_discount,
+      :special_offer_discount_price => cart_product.product.special_offer_discount_price,
+      :quantity => cart_product.quantity
+    )
+    self.after_from_cart_product(object,cart_product) if self.respond_to?(:after_from_cart_product)
+    return object
+  end
+
+  def self.from_free_product(gift)
+    self.new(
+      :name => gift.name,
+      :description => gift.description,
+      :price => 0,
+      :rate_tax => 0,
+      :sku => gift.sku,
+      :product_id => gift.id,
+      :special_offer_discount => I18n.t(:free_product),
+      :special_offer_discount_price => 0
+    )
+  end
+
+
+  def increment_product_sold_counter
+    if product
+      quantity.times do
+        product.sold_counters.new.increment_counter
+      end
+    end
+  end
+end

data/app/models/order_shipping.rb

@@ -0,0 +1,25 @@
+class OrderShipping < ActiveRecord::Base
+  belongs_to :order
+
+  def self.from_cart(cart)
+    options = {}
+
+    unless cart.options[:colissimo].nil?
+      params= cart.options[:colissimo]
+      options[:name] = 'So Colissimo'
+      options[:price] = params['DYFORWARDINGCHARGES']
+      options[:colissimo_type] = params['DELIVERYMODE']
+    else
+      if cart.options[:free_shipping] == true
+        options[:name] = I18n.t(:free_shipping)
+        options[:price] = 0
+      elsif transporter = TransporterRule.find_by_id(cart.options[:transporter_rule_id])
+        options[:name] = transporter.name
+        options[:price] = transporter.variables
+      end
+    end
+
+    self.new(options)
+  end
+
+end

data/app/models/pack.rb

@@ -0,0 +1,9 @@
+class Pack < Product
+  has_and_belongs_to_many :products, :list => true, :order => 'position'
+
+  def clone
+    pack = super
+    pack.product_ids = product_ids
+    pack
+  end
+end

data/app/models/picklist_attribute.rb

@@ -0,0 +1,2 @@
+class PicklistAttribute < Attribute
+end

data/app/models/product.rb

@@ -0,0 +1,294 @@
+class Product < ActiveRecord::Base
+  translates :name, :description, :summary, :url
+  attr_accessor :voucher_discount, :voucher_discount_price,
+    :special_offer_discount, :special_offer_discount_price,
+    :price_variation_id, :price_variation
+
+  acts_as_taggable
+  has_and_belongs_to_many_attachments
+
+  has_and_belongs_to_many :packs
+
+  has_many :sizes, :dependent => :destroy
+  accepts_nested_attributes_for :sizes, :allow_destroy => true
+
+  has_many :cross_sellings_products, :dependent => :destroy
+  has_many :cross_sellings, :through => :cross_sellings_products, :class_name => 'Product'
+  accepts_nested_attributes_for :cross_sellings
+  accepts_nested_attributes_for :cross_sellings_products
+
+  has_many :price_variations, :dependent => :destroy, :class_name => 'ProductPriceVariation'
+  accepts_nested_attributes_for :price_variations
+
+  has_and_belongs_to_many :categories, :readonly => true, :join_table => 'categories_elements', :foreign_key => 'element_id', :association_foreign_key => 'category_id', :class_name => 'ProductCategory'
+  has_and_belongs_to_many :attribute_values, :readonly => true, :uniq => true
+
+  has_many :dynamic_attribute_values, :dependent => :destroy
+  has_many :dynamic_attributes, :through => :dynamic_attribute_values, :class_name => 'DynamicAttribute', :source => 'product'
+  accepts_nested_attributes_for :dynamic_attribute_values
+
+  has_many :viewed_counters, :as => :element, :class_name => 'ProductViewedCounter', :dependent => :destroy
+  has_many :sold_counters, :as => :element, :class_name => 'ProductSoldCounter', :dependent => :destroy
+
+  belongs_to :product_type
+  validates_associated :product_type
+
+  belongs_to :brand
+  belongs_to :redirection_product, :class_name => 'Product'
+
+  has_one :meta_info, :as => :target
+  accepts_nested_attributes_for :meta_info
+
+  validates :sku, :url, :presence => true
+
+  before_save :clean_strings, :force_url_format
+  after_save :synchronize_stock
+
+  scope :actives, where(:active => true, :deleted => false)
+  scope :deleted, where(:deleted => true)
+  scope :hiddens, where(:active => false, :deleted => false)
+  #scope :out_of_stock, where{:stock.lte => 0}
+
+  define_index do
+    indexes sku, :sortable => true
+    indexes stock, :sortable => true
+    indexes price, :sortable => true
+    indexes brand(:name), :as => :brand
+    indexes product_type.translations(:name), :as => :product_type_name
+
+    indexes attachments(:name), :as => :firstnames
+    indexes categories.translations(:name), :as => :category_names
+
+    has active, deleted
+    has categories(:id), :as => :category_ids
+    set_property :min_prefix_len => 1
+    set_property :enable_star => 1
+  end
+
+  define_translated_index :name, :description, :url
+
+  def redirection_product_with_deleted
+    return (redirection_product_without_deleted && redirection_product_without_deleted.deleted? ? redirection_product_without_deleted.redirection_product : redirection_product_without_deleted)
+  end
+  alias_method_chain :redirection_product, :deleted
+
+  # Returns month's offers
+  def self.get_offer_month
+    find_by_active_and_deleted_and_offer_month(true,false,true)
+  end
+
+  # Returns the first page products
+  def self.get_on_first_page
+    find_all_by_active_and_deleted_and_on_first_page(true,false,true)
+  end
+
+  def attribute_of(attribute)
+    attribute_values.find_by_attribute_id(attribute.id)
+  end
+
+  def clone
+    product_cloned = super
+    product_cloned.meta_info = meta_info.clone if meta_info
+    product_cloned.translations = translations.clone unless translations.empty?
+    product_cloned.dynamic_attribute_values = dynamic_attribute_values.collect(&:clone)
+    %w(attachment_ids picture_ids tag_list category_ids attribute_value_ids).each do |assoc|
+      product_cloned.send(assoc+'=', self.send(assoc))
+    end
+    return product_cloned
+  end
+
+  def synchronize_stock
+    if stop_sales? && active? && stock.to_i < 1
+      self.update_attribute('active', false)
+    end
+  end
+
+  def activate
+    self.update_attribute('active', !self.active? )
+  end
+
+  def soft_delete
+    self.update_attribute('deleted', !self.deleted? )
+  end
+
+  def packaging_price
+    #TODO get real variable
+    return 0
+  end
+
+  def price(*args)
+    passed_options = args.extract_options!
+    options = {
+      :tax => true,
+      :voucher_discount => true,
+      :special_offer_discount => true,
+      :variation => false,
+      :packaging => false
+    }.update(passed_options.symbolize_keys)
+
+    price = read_attribute(:price) || 0.0
+    price += tax(false)
+    price -= self.discount if options[:special_offer_discount]
+    price -= self.voucher_discount_price || 0.0 if options[:voucher_discount]
+    price -= (price * price_variation.discount).to_f / 100.0 if options[:variation] && price_variation
+    price += self.packaging_price.to_f || 0.0 if options[:packaging]
+    price = 0.0 if price < 0
+
+    price
+  end
+
+  def old_price
+    price(:voucher_discount => false, :special_offer_discount => false)
+  end
+
+  def has_discount?
+    not discount.zero?
+  end
+
+  # Returns price's string with currency symbol
+  #
+  # This method is an overload of <i>price</i> attribute.
+  #
+  # ==== Parameters
+  # * <tt>:with_tax</tt> - false by defaults. Returns price with tax if true
+  # * <tt>:with_currency</tt> - true by defaults. The currency of user is considered if true
+  def price_to_s(*args)
+    price(args).to_s
+  end
+
+  def discount
+    self.special_offer_discount_price || 0.0
+  end
+
+  # Returns total product's tax
+  #
+  # ==== Parameters
+  # * <tt>:with_currency</tt> - true by defaults. The currency of user is considered if true
+  #
+  # This method use <i>price</i> : <i>price(false, with_currency)</i>
+  def tax(with_currency=true)
+    return 0.0
+    #return ("%01.2f" % (price(false, with_currency) * self.rate_tax/100)).to_f
+  end
+
+  def has_special_offers?
+    if self.old_price != self.price
+      return true
+    else
+      selected_products = []
+      engine :special_offer_engine do |e|
+        begin
+          rule_builder = SpecialOffer.new(e)
+          rule_builder.selected_products = selected_products
+          rule_builder.rules
+        rescue Exception
+        end
+        e.assert self
+        e.match
+      end
+      return !selected_products.blank?
+    end
+  end
+
+  def method_missing(method_id,*args,&block)
+    method_name = method_id.to_s
+    if cat_id = method_name.match(/has_category_(\d+)/)
+      return categories.find_by_id(cat_id[1].to_i, :select => 'id').present?
+    elsif custom_attribute = load_custom_attribute(method_name, ['_value'])
+      read_custom_attribute(custom_attribute, args.first || :value)
+    elsif custom_attribute = load_custom_attribute(method_name, ['='])
+      write_custom_attribute(custom_attribute, args.first)
+    else
+      super
+    end
+  end
+
+  def respond_to?(method, include_priv = false)
+    method_name = method.to_s
+    if load_custom_attribute(method_name)
+      true
+    else
+      super
+    end
+  end
+  private
+
+  def load_custom_attribute(method_name, suffix = ['_value', '='])
+    skipped_method_names = ("#{self.class}::Translation".constantize.column_names + self.class.column_names).map{ |n| "_#{n}" } + %w(to_ary product_type)
+
+    if not skipped_method_names.include?(method_name) and
+      access_method = method_name.match(/^(\w|\d|_|-)*(#{suffix.join('|')})*$/) and
+      product_type
+
+      product_type.product_attributes.find_by_access_method(access_method[0].sub(/(#{suffix.join('|')})/,''))
+    end
+  end
+
+  def read_custom_attribute(attribute, method)
+    method ||= :value
+    if attribute.dynamic?
+      if attribute_value = dynamic_attribute_values.find_by_attribute_id(attribute.id)
+        method != :object ? attribute_value.send(method.to_sym) : attribute_value
+      else
+        nil
+      end
+    else
+      values = attribute_values.find_all_by_attribute_id(attribute.id)
+      value = (method != :object ? values.map(&method.to_sym) : values)
+      return case attribute
+      when RadiobuttonAttribute, PicklistAttribute
+        value.first
+      else
+        value
+      end
+    end
+  end
+
+  def write_custom_attribute(attribute, new_value)
+    if attribute.dynamic?
+      if attribute_value = dynamic_attribute_values.find_by_attribute_id(attribute.id)
+        self.dynamic_attribute_values_attributes= { attribute_value.id => { :id => attribute_value.id, :value => new_value } }
+      else
+        self.dynamic_attribute_values_attributes= { '-1' => { :value => new_value, :attribute_id => attribute.id} }
+      end
+    else
+      other_attributes = self.attribute_values.all(:conditions => {:attribute_id_not => attribute.id})
+      if new_value.nil?
+        new_attributes = []
+      elsif new_value.kind_of?(AttributeValue)
+        new_attributes = [new_value]
+      elsif new_value.kind_of?(Array) && new_value.first.kind_of?(AttributeValue)
+        new_attributes = new_value.flatten
+      else
+        new_attributes = AttributeValue.find_all_by_attribute_id(
+          attribute.id,
+          :include => [:translations],
+          :conditions => { :attribute_value_translations => { :name => [new_value].flatten } }
+        )
+      end
+      self.attribute_values = new_attributes + other_attributes
+    end
+
+  end
+
+  # Call by <i>before_save</i>
+  # convert all blank strings to nil for attribute inheritance save
+  def clean_strings
+    self.class.columns.find_all{ |column| column.type == :string }.each do |field|
+      send("#{field.name}=", nil) if self.attributes[field.name].blank?
+    end
+  end
+
+  def force_url_format
+    if url.present?
+      self.url = url.parameterize
+    elsif name.present?
+      self.url = name.parameterize
+    end
+  end
+
+  def self.modify_import_attributes(attributes)
+    attributes[:category_ids] = attributes.delete(:categories) unless attributes[:categories].blank?
+    attributes
+  end
+end