saasaparilla 0.1.6

data/app/controllers/saasaparilla/subscription_controller.rb

@@ -0,0 +1,71 @@
+class Saasaparilla::SubscriptionController < ApplicationController
+  unloadable
+  ssl_required :new, :create, :show 
+  include Authentication::InstanceMethods
+  before_filter :get_subscription, :only => [:show, :destroy, :reactivate]
+
+  before_filter :require_no_subscription, :only => [:new]
+  #overide with authorization
+  def new
+    @subscription = current_billable.build_subscription
+    @subscription.build_contact_info
+    @subscription.build_credit_card
+  end
+  
+  def create
+    @subscription = current_billable.build_subscription(params[:subscription])
+    
+    begin
+      if @subscription.save
+        redirect_to subscription_path
+        flash[:notice] = "Your subscription was successfully created."
+      else
+        render :action => "new"
+        flash[:error] = "Your subscription could not be created due to errors. Please review the form and correct them."
+      end
+    rescue Exception => e
+        flash[:error] = e.message
+        render :action => "new"
+        flash.discard
+    end
+  end
+  
+  def show
+
+  end
+  
+  def reactivate
+    if @subscription.reactivate!
+      redirect_to subscription_path
+      flash[:notice] = "Your subscription was successfully reactivated."
+    else
+      redirect_to subscription_path
+      flash[:error] = "There was a problem reactivating your account."
+    end
+  end
+  
+  def destroy
+    if @subscription.cancel
+      flash[:notice] = "Your subscription has been canceled."
+      redirect_to subscription_path
+      
+    end
+  end
+  
+  private
+  def require_no_subscription
+    unless current_billable.subscription.nil?
+      flash[:error] = "You already have a subscription"
+      redirect_to subscription_path
+    end
+  end
+  def get_subscription
+    @subscription = current_billable.subscription
+    if @subscription.nil?
+      flash[:error] = "You do not have a current subscription"
+      redirect_to new_subscription_path
+    end
+  end
+  
+
+end

data/app/helpers/application_helper.rb

@@ -0,0 +1,3 @@
+module ApplicationHelper
+  
+end

data/app/helpers/plans_helper.rb

@@ -0,0 +1,2 @@
+module PlansHelper
+end

data/app/helpers/saasaparilla/billing_history_helper.rb

@@ -0,0 +1,4 @@
+module Saasaparilla::BillingHistoryHelper
+
+
+end

data/app/mailers/saasaparilla/notifier.rb

@@ -0,0 +1,38 @@
+class Saasaparilla::Notifier < ActionMailer::Base
+  default :from => Saasaparilla::CONFIG["from_email"]
+
+  def subscription_created(subscription)
+    @subscription = subscription
+    mail(:to => subscription.contact_info.email, :subject => "Subscription Created")
+  end
+
+  def invoice_created(subscription, invoice)
+    @subscription = subscription
+    @invoice = invoice
+    mail(:to => subscription.contact_info.email, :subject => "Invoice Created")
+  end
+
+  def billing_successful(subscription, amount)
+    @subscription = subscription
+    @amount = amount
+    mail(:to => subscription.contact_info.email, :subject => "Account Billing Successful")
+  end
+
+  def billing_failed(subscription)
+    @subscription = subscription
+    @url = edit_subscription_credit_card_url
+    mail(:to => subscription.contact_info.email, :subject => "Account Billing Failed")
+  end
+
+  def pending_cancellation_notice(subscription)
+    @subscription = subscription
+    @url = edit_subscription_credit_card_url
+    mail(:to => subscription.contact_info.email, :subject => "Your subscription will be canceled soon")
+  end
+
+  def subscription_canceled(subscription)
+    @subscription = subscription
+    mail(:to => subscription.contact_info.email, :subject => "Your subscription has been canceled")
+  end
+ 
+end

data/app/models/billing_activity.rb

@@ -0,0 +1,12 @@
+class BillingActivity < ActiveRecord::Base
+  belongs_to :subscription
+  has_one :invoice
+  has_one :transaction
+  
+  MESSAGES = {:success => "Thank you for your payment."}
+  scope :recent, order("created_at DESC")
+  
+  scope :limit, lambda {|num|
+    limit(num)
+    }
+end

data/app/models/contact_info.rb

@@ -0,0 +1,107 @@
+class ContactInfo < ActiveRecord::Base
+  
+  belongs_to :subscription, :dependent => :destroy
+  validates_presence_of :first_name, :last_name
+  validates_format_of :email, :with => ::Authlogic::Regex.email
+  validates_presence_of :email
+
+  with_options :if => :require_billing_address? do |contact_info|
+    contact_info.validates_presence_of :address
+    contact_info.validates_presence_of :city
+    contact_info.validates_presence_of :state
+    contact_info.validates_presence_of :zip
+    contact_info.validates_presence_of :country
+    contact_info.validates_format_of   :zip, :with => /^\d{5}$/
+  end
+  
+  with_options :if => :require_phone_number? do |contact_info|
+    contact_info.validates_numericality_of :phone_area_code
+    contact_info.validates_numericality_of :phone_prefix
+    contact_info.validates_numericality_of :phone_suffix
+    contact_info.validates_length_of :phone_area_code, :is => 3
+    contact_info.validates_length_of :phone_prefix, :is => 3
+    contact_info.validates_length_of :phone_suffix, :is => 4
+    contact_info.validates_format_of :phone_number, :with => /\d\d\d-\d\d\d-\d\d\d\d/
+    contact_info.before_validation :update_phone_number
+  end
+  
+  attr_accessor :phone_area_code, :phone_prefix, :phone_suffix
+
+  def phone_area_code
+    self.phone_number.split('-')[0] if self.phone_number
+  end
+
+  def phone_prefix
+    self.phone_number.split('-')[1] if self.phone_number
+  end
+
+  def phone_suffix
+    self.phone_number.split('-')[2] if self.phone_number
+  end
+
+  def full_name
+    "#{first_name} #{last_name}"
+  end
+  
+  def to_hash
+    return {:first_name => first_name,
+            :last_name => last_name,
+            :address => address,
+            :company => company,
+            :city => city,
+            :state => state,
+            :zip => zip,
+            :country => "US",
+            :phone_number => phone_number}
+  end
+  
+
+  def require_billing_address?
+    Saasaparilla::CONFIG["require_billing_address"] == true
+  end
+
+  def require_phone_number?
+    Saasaparilla::CONFIG["require_phone_number"] == true
+  end
+  
+  private
+  
+  def update_phone_number
+    if @phone_area_code && @phone_prefix && @phone_suffix
+      self.phone_number = "#{@phone_area_code}-#{@phone_prefix}-#{@phone_suffix}"
+    end
+  end
+  
+
+  
+
+  # def validate_phone_number
+  #   return_value = true
+  #   unless self.phone_area_code.length == 3
+  #     self.errors.add(:base, "Area code must be three digits.")
+  #     return_value = false
+  #   end
+  #   unless (/[0-9]/).match(self.phone_area_code)
+  #     self.errors.add(:base, "Area code must be numbers only.")
+  #     return_value = false
+  #   end
+  #   unless self.phone_prefix.length == 3
+  #     self.errors.add(:base, "Phone prefix must be three digits.")
+  #     return_value = false
+  #   end
+  #   unless (/[0-9]/).match(self.phone_prefix)
+  #     self.errors.add(:base, "Phone prefix must be numbers only.")
+  #     return_value = false
+  #   end
+  #   unless self.phone_suffix.length == 4
+  #     self.errors.add(:base, "Phone suffix must be four digits.")
+  #     return_value = false
+  #   end
+  #   unless (/[0-9]/).match(self.phone_suffix)
+  #     self.errors.add(:base, "Phone suffix must be numbers only.")
+  #     return_value = false
+  #   end
+  #   return_value
+  # end
+  
+end

data/app/models/credit_card.rb

@@ -0,0 +1,109 @@
+class CreditCard < ActiveRecord::Base
+  
+  before_validation :set_first_last_name, :on => :update  
+  validate :validate_card
+  validates_presence_of :card_verification
+  validates_presence_of :first_name
+  validates_presence_of :last_name, :message => "can't be blank"
+  validates_presence_of :card_type, :message => "can't be blank"
+  validates_presence_of :card_number, :message => "can't be blank"
+  validates_presence_of :expiry_month, :message => "can't be blank"
+  validates_presence_of :expiry_year, :message => "can't be blank"
+  validates_numericality_of :expiry_month,  :message => "is not a number"
+  validates_numericality_of :expiry_year,  :message => "is not a number"
+  
+  attr_accessor :card_type, :card_verification, :expiry_month, :expiry_year, :first_name, :last_name
+  CARD_TYPES = [["Visa", "Visa"], ["Mastercard", "Mastercard"], ["American Express", "American Express" ], ["Discover", "Discover"]]
+  
+  MONTHS = (1..12).to_a
+  YEARS = ((Date.today.year)..(Date.today.year + 8)).to_a
+  
+  belongs_to :subscription
+  
+  before_save :mask_card_number
+  before_save :create_expiration_date
+  before_save :update_payment_profile
+  
+
+  def validate_card
+    unless active_merchant_card.valid?
+        active_merchant_card.errors.full_messages.each do |message|
+        case message
+        when "First name connot be empty"
+          errors[:card_name] = "cannot be empty"
+        when "Last name cannot be empty"
+          errors[:card_name] = "cannot be empty"
+        when "Month is not a valid month"
+          errors[:expiry_month] = "Month is not a valid month"
+        when "Year expired"
+          errors[:expiry_year] = "Year expired"
+        when "Number is not a valid credit card number"
+          errors[:card_number] = "is not a valid credit card number"
+        when "Verification value is required"
+          errors[:card_verification] = "value is required"
+        end
+      end
+    end
+  end
+  
+  def active_merchant_card
+    @card_attributes ||= ActiveMerchant::Billing::CreditCard.new(
+      :type               => card_type,
+      :number             => card_number,
+      :verification_value => card_verification,
+      :month              => expiry_month,
+      :year               => expiry_year,
+      :first_name         => first_name,
+      :last_name          => last_name
+    )
+  end
+  
+  def card_attributes=(cstring)
+    @card_attributes = cstring
+  end
+  
+  
+  private
+  
+  
+  def create_expiration_date
+    self.expiration_date = "#{expiry_month}/#{expiry_year}"
+  end
+  
+  
+  def mask_card_number
+    
+    length = card_number.length
+    masked_number = ""
+    (1..(length - 4)).each do
+      masked_number << "X"
+    end
+    masked_number << card_number[length - 4, length]
+    self.card_number = masked_number
+  end
+  
+  def update_payment_profile
+    
+    unless new_record?
+      @profile = {:customer_profile_id => subscription.customer_cim_id,
+                    :payment_profile => {:customer_payment_profile_id => subscription.customer_payment_profile_id, 
+                                         :bill_to => subscription.contact_info.to_hash, 
+                                         :payment =>  {:credit_card => active_merchant_card}
+                    }
+                }
+        response = GATEWAYCIM.update_customer_payment_profile(@profile)
+        if response.success?
+          return true
+        else
+          raise response.message
+          return false
+        end
+      end
+    end
+
+  def set_first_last_name
+    self.first_name = subscription.contact_info.first_name
+    self.last_name = subscription.contact_info.last_name
+  end
+
+end

data/app/models/invoice.rb

@@ -0,0 +1,31 @@
+class Invoice < ActiveRecord::Base
+  belongs_to :billing_activity
+  has_many :invoice_line_items
+
+  after_create :create_invoice_line_item
+  after_create :generate_billing_activity
+  after_create :send_invoice_created_email
+  attr_accessor :subscription, :price, :from, :to
+
+  
+  def amount
+    invoice_line_items.sum(:price)
+  end
+  
+  private
+
+
+    def create_invoice_line_item
+      self.invoice_line_items.create(:price => price, :from => from, :to => to )
+    end
+
+
+    def generate_billing_activity
+      self.create_billing_activity(:message => "<a href='/subscription/invoices/#{self.id}'>Invoice</a>", :subscription => subscription, :amount => amount, :invoice => self)
+    end
+    
+    def send_invoice_created_email
+      Saasaparilla::Notifier.invoice_created(billing_activity.subscription, self).deliver
+    end
+    
+end

data/app/models/invoice_line_item.rb

@@ -0,0 +1,3 @@
+class InvoiceLineItem < ActiveRecord::Base
+  belongs_to :invoice 
+end

data/app/models/payment.rb

@@ -0,0 +1,39 @@
+class Payment < ActiveRecord::Base
+  before_validation :set_status_pending, :on => :create
+  before_update :charge_subscription
+  validate :valid_amount
+  validates_presence_of :subscription_id
+  validates_presence_of :amount, :message => "can't be blank"
+  validates_numericality_of :amount
+  has_statuses "pending", "paid", "failed"
+  belongs_to :subscription
+  
+  
+  
+  
+  def valid_amount
+    if amount < 0
+      errors[:amount] = "cannot be less than 0"
+    end
+    if amount > subscription.balance
+      errors[:amount] = "cannot be more than your balance"
+    end
+    if amount == 0
+      errors[:amount] = "cannot be zero"
+    end
+  end
+  
+  
+  private
+  
+  def charge_subscription
+
+    if subscription.bill!(amount)
+      self.status = "paid"
+    end
+    
+  end
+  def set_status_pending
+    self.status = "pending"
+  end
+end

data/app/models/plan.rb

@@ -0,0 +1,36 @@
+class Plan < ActiveRecord::Base
+  has_dynamic_attributes
+  validates_presence_of :name, :message => "can't be blank"
+  validates_presence_of :billing_period, :message => "can't be blank"
+  validates_numericality_of :price, :message => "is not a number"
+  validates_presence_of :price, :message => "can't be blank"
+  
+  has_many :subscriptions
+
+  BILLING_PERIODS = ["Monthly", "Annually"]
+  
+  def respond_to?(method_sym, include_private = false)
+      @column_names = []
+      unless dynamic_attributes.nil?
+        dynamic_attributes.each do |dm|
+           @column_names << dm[0].gsub("field_", "")
+         end
+        if @column_names.include? method_sym.to_s
+          return  true
+        end
+      end
+
+    super
+  end
+    
+  def method_missing(method, *args)
+    
+    if has_dynamic_attribute?("field_#{method}")
+      return self.send("field_#{method}")
+    end
+    super
+   end
+       
+
+
+end