apispree_core 0.0.0

data/app/models/payment.rb

@@ -0,0 +1,119 @@
+class Payment < ActiveRecord::Base
+  belongs_to :order
+  belongs_to :source, :polymorphic => true
+  belongs_to :payment_method
+
+  has_many :offsets, :class_name => 'Payment', :foreign_key => 'source_id', :conditions => "source_type = 'Payment' AND amount < 0 AND state = 'completed'"
+  has_many :log_entries, :as => :source
+
+  after_save :create_payment_profile, :if => :profiles_supported?
+
+  # update the order totals, etc.
+  after_save :update_order
+
+  accepts_nested_attributes_for :source
+
+  scope :from_creditcard, where(:source_type => 'Creditcard')
+  scope :with_state, lambda {|s| where(:state => s)}
+  scope :completed, with_state('completed')
+  scope :pending, with_state('pending')
+  scope :failed, with_state('failed')
+
+  # order state machine (see http://github.com/pluginaweek/state_machine/tree/master for details)
+  state_machine :initial => 'checkout' do
+    # With card payments, happens before purchase or authorization happens
+    event :started_processing do
+      transition :from => ['checkout', 'pending', 'completed'], :to => 'processing'
+    end
+    # When processing during checkout fails
+    event :fail do
+      transition :from => 'processing', :to => 'failed'
+    end
+    # With card payments this represents authorizing the payment
+    event :pend do
+      transition :from => 'processing', :to => 'pending'
+    end
+    # With card payments this represents completing a purchase or capture transaction
+    event :complete do
+      transition :from => ['processing', 'pending'], :to => 'completed'
+    end
+    event :void do
+      transition :from => ['pending', 'completed'], :to => 'void'
+    end
+  end
+
+
+  def offsets_total
+    offsets.map(&:amount).sum
+  end
+
+  def credit_allowed
+    amount - offsets_total
+  end
+
+  def can_credit?
+    credit_allowed > 0
+  end
+
+  def credit(amount)
+    return if amount > credit_allowed
+    started_processing!
+    source.credit(self, amount)
+  end
+
+  # With nested attributes, Rails calls build_[association_name] for the nested model which won't work for a polymorphic association
+  def build_source(params)
+    if payment_method and payment_method.payment_source_class
+      self.source = payment_method.payment_source_class.new(params)
+    end
+  end
+
+  def process!
+    if payment_method && payment_method.source_required?
+      if source
+        if !processing? && source.respond_to?(:process!)
+          started_processing!
+          source.process!(self) # source is responsible for updating the payment state when it's done processing
+        end
+      else
+        raise Spree::GatewayError.new(I18n.t(:payment_processing_failed))
+      end
+    end
+  end
+
+  def actions
+    return [] unless payment_source and payment_source.respond_to? :actions
+    payment_source.actions.select { |action| !payment_source.respond_to?("can_#{action}?") or payment_source.send("can_#{action}?", self) }
+  end
+
+  def payment_source
+    res = source.is_a?(Payment) ? source.source : source
+    res || payment_method
+  end
+
+  private
+
+    def amount_is_valid_for_outstanding_balance_or_credit
+      return unless order
+      if amount != order.outstanding_balance
+        errors.add(:amount, "does not match outstanding balance (#{order.outstanding_balance})")
+      end
+    end
+
+    def profiles_supported?
+      payment_method.respond_to?(:payment_profiles_supported?) && payment_method.payment_profiles_supported?
+    end
+
+    def create_payment_profile
+      return unless source.is_a?(Creditcard) && source.number && !source.has_payment_profile?
+      payment_method.create_profile(self)
+    rescue ActiveMerchant::ConnectionError => e
+      gateway_error I18n.t(:unable_to_connect_to_gateway)
+    end
+
+    def update_order
+      order.payments.reload
+      order.update!
+    end
+
+end

data/app/models/payment_method.rb

@@ -0,0 +1,56 @@
+class PaymentMethod < ActiveRecord::Base
+  DISPLAY =  [:both, :front_end, :back_end]
+  default_scope where(:deleted_at => nil)
+
+  @provider = nil
+  @@providers = Set.new
+  def self.register
+    @@providers.add(self)
+  end
+
+  def self.providers
+    @@providers.to_a
+  end
+
+  def provider_class
+    raise "You must implement provider_class method for this gateway."
+  end
+
+  # The class that will process payments for this payment type, used for @payment.source
+  # e.g. Creditcard in the case of a the Gateway payment type
+  # nil means the payment method doesn't require a source e.g. check
+  def payment_source_class
+    raise "You must implement payment_source_class method for this gateway."
+  end
+
+  def self.available(display_on='both')
+    PaymentMethod.all.select { |p| p.active && (p.display_on == display_on.to_s || p.display_on.blank?) &&  (p.environment == Rails.env || p.environment.blank?) }
+  end
+
+  def self.active?
+    self.count(:conditions => {:type => self.to_s, :environment => Rails.env, :active => true}) > 0
+  end
+
+  def self.current
+    PaymentMethod.find(:first, :conditions => {:active => true, :environment => Rails.env})
+  end
+
+  def method_type
+    type.demodulize.downcase
+  end
+
+  def destroy
+    self.update_attribute(:deleted_at, Time.now.utc)
+  end
+
+  def self.find_with_destroyed *args
+    self.with_exclusive_scope { find(*args) }
+  end
+
+  def payment_profiles_supported?
+    false
+  end
+  def source_required?
+   true
+  end
+end

data/app/models/payment_method/check.rb

@@ -0,0 +1,27 @@
+class PaymentMethod::Check < PaymentMethod
+  def actions
+    %w{capture void}
+  end
+  
+  # Indicates whether its possible to capture the payment
+  def can_capture?(payment)
+    ['checkout', 'pending'].include?(payment.state)
+  end
+  
+  # Indicates whether its possible to void the payment.
+  def can_void?(payment)
+    payment.state != 'void'
+  end
+  
+  def capture(payment)
+    payment.update_attribute(:state, 'pending') if payment.state == 'checkout'
+    payment.complete
+    true
+  end
+  
+  def void(payment)
+    payment.update_attribute(:state, 'pending') if payment.state == 'checkout'
+    payment.void
+    true
+  end
+end

data/app/models/preference.rb

@@ -0,0 +1,51 @@
+# Represents a preferred value for a particular preference on a model.
+#
+# == Targeted preferences
+#
+# In addition to simple named preferences, preferences can also be targeted for
+# a particular record.  For example, a User may have a preferred color for a
+# particular Car.  In this case, the +owner+ is the User, the +preference+ is
+# the color, and the +target+ is the Car.  This allows preferences to have a sort
+# of context around them.
+class Preference < ActiveRecord::Base
+  belongs_to  :owner, :polymorphic => true
+  belongs_to  :group, :polymorphic => true
+
+  validates :name, :owner_id, :owner_type, :presence => true
+  validates :group_type, :presence => true, :if => :group_id?
+
+  class << self
+    # Splits the given group into its corresponding id and type
+    def split_group(group = nil)
+      if group.is_a?(ActiveRecord::Base)
+        group_id, group_type = group.id, group.class.base_class.name.to_s
+      else
+        group_id, group_type = nil, group
+      end
+      return group_id, group_type
+    end
+  end
+
+  # The definition for the attribute
+  def definition
+    owner.preference_definitions[name] unless owner_type.blank?
+  end
+
+  # Typecasts the value depending on the preference definition's declared type
+  def value
+    value = read_attribute(:value)
+    value = definition.type_cast(value) if definition
+    value
+  end
+
+  # Only searches for the group record if the group id is specified
+  def group_with_optional_lookup
+    group_id ? group_without_optional_lookup : group_type
+  end
+  alias_method_chain :group, :optional_lookup
+end
+
+
+# Most of this code is taken from the preferences plugin available
+# at http://github.com/pluginaweek/preferences/tree/master
+

data/app/models/product.rb

@@ -0,0 +1,258 @@
+# PRODUCTS
+# Products represent an entity for sale in a store.
+# Products can have variations, called variants
+# Products properties include description, permalink, availability,
+#   shipping category, etc. that do not change by variant.
+#
+# MASTER VARIANT
+# Every product has one master variant, which stores master price and sku, size and weight, etc.
+# The master variant does not have option values associated with it.
+# Price, SKU, size, weight, etc. are all delegated to the master variant.
+# Contains on_hand inventory levels only when there are no variants for the product.
+#
+# VARIANTS
+# All variants can access the product properties directly (via reverse delegation).
+# Inventory units are tied to Variant.
+# The master variant can have inventory units, but not option values.
+# All other variants have option values and may have inventory units.
+# Sum of on_hand each variant's inventory level determine "on_hand" level for the product.
+#
+class Product < ActiveRecord::Base
+  has_many :product_option_types, :dependent => :destroy
+  has_many :option_types, :through => :product_option_types
+  has_many :product_properties, :dependent => :destroy
+  has_many :properties, :through => :product_properties
+  has_many :images, :as => :viewable, :order => :position, :dependent => :destroy
+  has_and_belongs_to_many :product_groups
+  belongs_to :tax_category
+  has_and_belongs_to_many :taxons
+  belongs_to :shipping_category
+
+  has_one :master,
+    :class_name => 'Variant',
+    :conditions => ["variants.is_master = ? AND variants.deleted_at IS NULL", true]
+
+  delegate_belongs_to :master, :sku, :price, :weight, :height, :width, :depth, :is_master
+  delegate_belongs_to :master, :cost_price if Variant.table_exists? && Variant.column_names.include?("cost_price")
+
+  after_create :set_master_variant_defaults
+  after_create :add_properties_and_option_types_from_prototype
+  before_save :recalculate_count_on_hand
+  before_update :sanitize_permalink
+  after_save :update_memberships if ProductGroup.table_exists?
+  after_save :set_master_on_hand_to_zero_when_product_has_variants
+  after_save :save_master
+
+  has_many :variants,
+    :conditions => ["variants.is_master = ? AND variants.deleted_at IS NULL", false],
+    :order => 'variants.position ASC'
+
+
+  has_many :variants_including_master,
+    :class_name => 'Variant',
+    :conditions => ["variants.deleted_at IS NULL"],
+    :dependent => :destroy
+
+  has_many :variants_with_only_master,
+    :class_name => 'Variant',
+    :conditions => ["variants.deleted_at IS NULL AND variants.is_master = ?", true],
+    :dependent => :destroy
+
+
+  validates :name, :price, :permalink,:available_on, :presence => true
+  
+  accepts_nested_attributes_for :product_properties, :allow_destroy => true, :reject_if => lambda { |pp| pp[:property_name].blank? }
+
+  make_permalink
+
+  alias :options :product_option_types
+
+  include ::Scopes::Product
+
+  #RAILS3 TODO -  scopes are duplicated here and in scopres/product.rb - can we DRY it up?
+  # default product scope only lists available and non-deleted products
+  scope :not_deleted,     where("products.deleted_at is NULL")
+
+  scope :available,       lambda { |*on| where("products.available_on <= ?", on.first || Time.zone.now ) }
+
+  #RAILS 3 TODO - this scope doesn't match the original 2.3.x version, needs attention (but it works)
+  scope :active,          lambda{ not_deleted.available }
+
+  scope :on_hand,         where("products.count_on_hand > 0")
+
+  if (ActiveRecord::Base.connection.adapter_name == 'PostgreSQL')
+    if ActiveRecord::Base.connection.tables.include?("products")
+      scope :group_by_products_id, { :group => "products." + Product.column_names.join(", products.") }
+    end
+  else
+    scope :group_by_products_id, { :group => "products.id" }
+  end
+  search_methods :group_by_products_id
+
+  scope :id_equals, lambda { |input_id| where("products.id = ?", input_id) }
+
+  scope :taxons_name_eq, lambda { |name| joins(:taxons).where("taxons.name = ?", name) }
+
+  # ----------------------------------------------------------------------------------------------------------
+  #
+  # The following methods are deprecated and will be removed in a future version of Spree
+  #
+  # ----------------------------------------------------------------------------------------------------------
+
+  def master_price
+    warn "[DEPRECATION] `Product.master_price` is deprecated.  Please use `Product.price` instead. (called from #{caller[0]})"
+    self.price
+  end
+
+  def master_price=(value)
+    warn "[DEPRECATION] `Product.master_price=` is deprecated.  Please use `Product.price=` instead. (called from #{caller[0]})"
+    self.price = value
+  end
+
+  def variants?
+    warn "[DEPRECATION] `Product.variants?` is deprecated.  Please use `Product.has_variants?` instead. (called from #{caller[0]})"
+    self.has_variants?
+  end
+
+  def variant
+    warn "[DEPRECATION] `Product.variant` is deprecated.  Please use `Product.master` instead. (called from #{caller[0]})"
+    self.master
+  end
+
+  # ----------------------------------------------------------------------------------------------------------
+  # end deprecation region
+  # ----------------------------------------------------------------------------------------------------------
+
+  def to_param
+    return permalink if permalink.present?
+    name.to_url
+  end
+
+  # returns true if the product has any variants (the master variant is not a member of the variants array)
+  def has_variants?
+    !variants.empty?
+  end
+
+  # returns the number of inventory units "on_hand" for this product
+  def on_hand
+    has_variants? ? variants.inject(0){|sum, v| sum + v.on_hand} : master.on_hand
+  end
+
+  # adjusts the "on_hand" inventory level for the product up or down to match the given new_level
+  def on_hand=(new_level)
+    raise "cannot set on_hand of product with variants" if has_variants? && Spree::Config[:track_inventory_levels]
+    master.on_hand = new_level
+  end
+
+  # Returns true if there are inventory units (any variant) with "on_hand" state for this product
+  def has_stock?
+    master.in_stock? || !!variants.detect{|v| v.in_stock?}
+  end
+
+  def tax_category
+    if self[:tax_category_id].nil?
+      TaxCategory.first(:conditions => {:is_default => true})
+    else
+      TaxCategory.find(self[:tax_category_id])
+    end
+  end
+
+  # Adding properties and option types on creation based on a chosen prototype
+  attr_reader :prototype_id
+  def prototype_id=(value)
+    @prototype_id = value.to_i
+  end
+
+  def add_properties_and_option_types_from_prototype
+    if prototype_id && prototype = Prototype.find_by_id(prototype_id)
+      prototype.properties.each do |property|
+        product_properties.create(:property => property)
+      end
+      self.option_types = prototype.option_types
+    end
+  end
+
+  # for adding products which are closely related to existing ones
+  # define "duplicate_extra" for site-specific actions, eg for additional fields
+  def duplicate
+    p = self.clone
+    p.name = 'COPY OF ' + self.name
+    p.deleted_at = nil
+    p.created_at = p.updated_at = nil
+    p.taxons = self.taxons
+
+    p.product_properties = self.product_properties.map {|q| r = q.clone; r.created_at = r.updated_at = nil; r}
+
+    image_clone = lambda {|i| j = i.clone; j.attachment = i.attachment.clone; j}
+    p.images = self.images.map {|i| image_clone.call i}
+
+    variant = self.master.clone
+    variant.sku = 'COPY OF ' + self.master.sku
+    variant.deleted_at = nil
+    variant.images = self.master.images.map {|i| image_clone.call i}
+    p.master = variant
+
+    if self.has_variants?
+      # don't clone the actual variants, just the characterising types
+      p.option_types = self.option_types
+    else
+    end
+    # allow site to do some customization
+    p.send(:duplicate_extra) if p.respond_to?(:duplicate_extra)
+    p.save!
+    p
+  end
+
+  # use deleted? rather than checking the attribute directly. this
+  # allows extensions to override deleted? if they want to provide
+  # their own definition.
+  def deleted?
+    !!deleted_at
+  end
+
+  # split variants list into hash which shows mapping of opt value onto matching variants
+  # eg categorise_variants_from_option(color) => {"red" -> [...], "blue" -> [...]}
+  def categorise_variants_from_option(opt_type)
+    return {} unless option_types.include?(opt_type)
+    variants.active.group_by {|v| v.option_values.detect {|o| o.option_type == opt_type} }
+  end
+
+  def self.like_any(fields, values)
+    where_str = fields.map{|field| Array.new(values.size, "products.#{field} #{LIKE} ?").join(' OR ') }.join(' OR ')
+    self.where([where_str, values.map{|value| "%#{value}%"} * fields.size].flatten)
+  end
+
+  private
+  
+  def sanitize_permalink
+    self.permalink = self.permalink.to_url
+  end
+
+  def recalculate_count_on_hand
+    product_count_on_hand = has_variants? ?
+        variants.inject(0) {|acc, v| acc + v.count_on_hand} :
+        (master ? master.count_on_hand : 0)
+    self.count_on_hand = product_count_on_hand
+  end
+
+  # the master on_hand is meaningless once a product has variants as the inventory
+  # units are now "contained" within the product variants
+  def set_master_on_hand_to_zero_when_product_has_variants
+    master.on_hand = 0 if has_variants? && Spree::Config[:track_inventory_levels]
+  end
+
+  # ensures the master variant is flagged as such
+  def set_master_variant_defaults
+    master.is_master = true
+  end
+
+  # there's a weird quirk with the delegate stuff that does not automatically save the delegate object
+  # when saving so we force a save using a hook.
+  def save_master
+    master.save if master && (master.changed? || master.new_record?)
+  end
+
+  def update_memberships
+    self.product_groups = ProductGroup.all.select{|pg| pg.include?(self)}
+  end
+end