stripe_local 0.0.2

data/app/models/stripe_local/customer.rb

@@ -0,0 +1,98 @@
+module StripeLocal
+  class Customer < ActiveRecord::Base
+    include ObjectAdapter
+
+    self.primary_key = :id
+
+    has_one    :model, inverse_of: :customer, class_name: "::#{StripeLocal::model_class}"
+
+    has_many   :cards, inverse_of: :customer
+
+    has_many   :invoices, inverse_of: :customer
+
+    has_many   :charges, inverse_of: :customer
+
+    has_one    :subscription, inverse_of: :customer
+
+    has_one    :plan, through: :subscription, source: :plan
+
+    class<<self
+      #=!=#>>>
+      #
+      # this is the primary interface for subscribing.
+      #
+      # [params]
+      #     * +card+  (required)           ->    the token returned by stripe.js
+      #     * +plan+  (required)           ->    the id of the plan being subscribed to
+      #     * +email+  (optional)          ->    the client's email address
+      #     * +description+  (optional)    ->    a description to attach to the stripe object for future reference
+      #     * +coupon+  (optional)         ->    the id of a coupon if the subscription should be discounted
+      #     * +lines+   (optional)         ->    an array of (amount,description) tuples
+      # ```
+      #    :card => "tok_abc123",
+      #    :plan => "MySaaS",
+      #    :email => subscriber.email,
+      #    :description => "a one year subscription to our flagship service at $99.00 per month"
+      #    :lines => [
+      #       [ 20000, "a one time setup fee of $200.00 for new members" ]
+      #    ]
+      # ```
+      # *returns:* _Stripe_::_Customer_._id_ which should be assign to the +:stripe_customer_id+
+      # field generated when bootstrapping Engine integration.
+      #
+      #=¡=#>>>
+      def signup params
+        plan = params.delete( :plan )
+        lines = params.delete( :lines ) || []
+
+        customer = Stripe::Customer.create( params )
+
+        lines.each do |item|
+          customer.add_invoice_item( {currency: 'usd'}.merge item )
+        end
+
+        customer.update_subscription({ plan: plan })
+        create( customer ).id
+      end
+
+      def create params
+        super normalize params
+      end
+
+      def normalize params
+        params.each_with_object({}) do |(k,v),h|
+          key = case k.to_sym
+          when :cards        then create_each_card( v.data ) and next
+          when :subscription then create_subscript( v )      and next
+          when ->(x){attribute_method? x} then k.to_sym
+          else next
+          end
+          h[key] = v
+        end
+      end
+
+      def create_each_card cards
+        cards.each do |card|
+          StripeLocal::Card.create card.to_hash
+        end
+      end
+
+      def create_subscript o
+        StripeLocal::Subscription.create( o.to_hash ) unless o.nil?
+      end
+    end
+
+#=!=>>>
+#       ~<Schema>~
+#   t.string   :id
+#   t.integer  :account_balance
+#   t.string   :default_card
+#   t.boolean  :delinquent
+#   t.string   :description
+#   t.string   :email
+#   t.text     :metadata
+#   t.timestamps
+
+#=¡=>>>
+  end
+end

data/app/models/stripe_local/discount.rb

@@ -0,0 +1,36 @@
+module StripeLocal
+  class Discount < ActiveRecord::Base
+    include ObjectAdapter
+
+    time_writer :start, :end
+
+    class<<self
+      def create object
+        super normalize object
+      end
+
+      def normalize attrs
+        attrs.each_with_object({}) do |(k,v),h|
+          key = case k.to_sym
+          when :customer then :customer_id
+          when :coupon   then h[:coupon_id] = v.id and next
+          when ->(x){ attribute_method? x } then k.to_sym
+          else next
+          end
+          if v.is_a?(Numeric) && v > 1000000000
+            h[key] = Time.at( v )
+          else
+            h[key] = v
+          end
+        end
+      end
+    end
+
+  #=!=#>>>
+  # string   :coupon_id
+  # string   :customer_id
+  # datetime :start
+  # datetime :end
+  #=¡=#>>>
+  end
+end

data/app/models/stripe_local/invoice.rb

@@ -0,0 +1,68 @@
+module StripeLocal
+  class Invoice < ActiveRecord::Base
+    include ObjectAdapter
+
+    has_many :lines,  inverse_of: :invoice, class_name: "LineItem"
+    belongs_to :charge, inverse_of: :invoice
+    belongs_to :customer, inverse_of: :invoices
+
+    self.primary_key = :id
+
+    time_writer :date, :period_start, :period_end, :next_payment_attempt
+
+    class<<self
+      def create object
+        super normalize( object )
+      end
+
+      def normalize attrs
+        attrs.each_with_object({}) do |(k,v),h|
+          key = case k.to_sym
+          when :customer then :customer_id
+          when :charge   then :charge_id
+          when :lines    then v.data.each do |item|
+              StripeLocal::LineItem.create item.to_hash.merge({invoice_id: attrs.id})
+            end and next
+          when ->(x){attribute_method? x} then k.to_sym
+          else next
+          end
+          if v.is_a?(Numeric) && v > 1000000000
+            h[key] = Time.at( v )
+          else
+            h[key] = v
+          end
+        end
+      end
+
+      def succeed inv
+        #TODO: implement this
+      end
+
+      def fail inv
+        #TODO: implement this
+      end
+    end
+
+
+  #=!=#>>>
+  # string   :id
+  # string   :customer_id
+  # integer  :amount_due
+  # integer  :subtotal
+  # integer  :total
+  # boolean  :attempted
+  # integer  :attempt_count
+  # boolean  :paid
+  # boolean  :closed
+  # datetime :date
+  # datetime :period_start
+  # datetime :period_end
+  # string   :currency
+  # integer  :starting_balance
+  # integer  :ending_balance
+  # string   :charge_id
+  # integer  :discount
+  # datetime :next_payment_attempt
+  #=¡=#>>>
+  end
+end

data/app/models/stripe_local/line_item.rb

@@ -0,0 +1,56 @@
+module StripeLocal
+  class LineItem < ActiveRecord::Base
+    include ObjectAdapter
+
+    self.primary_key = :id
+
+    belongs_to  :invoice, inverse_of: :lines
+
+    belongs_to  :plan, inverse_of: :line_items
+
+    time_writer :period_start, :period_end
+
+    def metadata= hash
+      MultiJson.dump hash
+    end
+
+    def metadata
+      MultiJson.load read_attribute( :metadata ), symbolize_keys: true
+    end
+
+    class<<self
+      def create attr_hash
+        super normalize( attr_hash )
+      end
+
+      def normalize attrs
+        attrs.each_with_object({}) do |(k,v),h|
+          key = case k.to_sym
+          when :invoice  then :invoice_id
+          when :plan     then h[:plan_id] = v.id and next
+          when :type     then h[:subscription] = (v == "subscription" ? true : false) and next
+          when :period   then h[:period_start] = Time.at(v.start) and h[:period_end] = Time.at(v.end) and next
+          when ->(x){attribute_method? x} then k.to_sym
+          else next
+          end
+          h[key] = v
+        end
+      end
+    end
+
+  #=!=#>>>
+  # string   :id
+  # string   :invoice_id
+  # boolean  :subscription
+  # integer  :amount
+  # string   :currency
+  # boolean  :proration
+  # datetime :period_start
+  # datetime :period_end
+  # integer  :quantity
+  # string   :plan_id
+  # string   :description
+  # text     :metadata
+  #=¡=#>>>
+  end
+end

data/app/models/stripe_local/plan.rb

@@ -0,0 +1,41 @@
+module StripeLocal
+  class Plan < ActiveRecord::Base
+    include SyncPlans
+
+    self.primary_key = :id
+
+    has_many :subscriptions, inverse_of: :plan
+
+    class<<self
+      def create object
+        if found = find_by( id: object[:id] )
+          found.update_attributes synced: true
+        else
+          super normalize object
+        end
+      end
+
+      def normalize attrs
+        attrs.each_with_object({}) do |(k,v),h|
+          key = case k.to_sym
+          when :livemode then h[:synced] = true and next
+          when ->(x){ attribute_method? x } then k.to_sym
+          else next
+          end
+          h[key] = v
+        end
+      end
+    end
+
+  #=!=#>>>
+  # string   :id
+  # string   :name
+  # integer  :amount
+  # string   :interval
+  # integer  :interval_count
+  # integer  :trial_period_days
+  # string   :currency
+  # boolean  :synced
+  #=¡=#>>>
+  end
+end

data/app/models/stripe_local/subscription.rb

@@ -0,0 +1,50 @@
+module StripeLocal
+  class Subscription < ActiveRecord::Base
+    include ObjectAdapter
+
+    belongs_to :customer, inverse_of:  :subscription
+
+    belongs_to :plan,     inverse_of:  :subscription
+
+    time_writer :start, :canceled_at, :current_period_start,
+                :current_period_end, :trial_start, :trial_end, :ended_at
+
+
+    class<<self
+      def create object
+        super normalize( object )
+      end
+
+      def normalize attrs
+        attrs.each_with_object({}) do |(k,v),h|
+          key = case k.to_sym
+          when :id       then next
+          when :customer then :customer_id
+          when :plan     then h[:plan_id] = v.id and next
+          when ->(x){attribute_method? x} then k.to_sym
+          else next
+          end
+          if v.is_a?(Numeric) && v > 1000000000
+            h[key] = Time.at( v )
+          else
+            h[key] = v
+          end
+        end
+      end
+    end
+
+
+  #=!=#>>>
+  # string   :customer_id
+  # string   :plan_id
+  # string   :status
+  # datetime :start
+  # datetime :canceled_at
+  # datetime :ended_at
+  # datetime :current_period_start
+  # datetime :current_period_end
+  # datetime :trial_start
+  # datetime :trial_end
+  #=¡=#>>>
+  end
+end

data/app/models/stripe_local/transaction.rb

@@ -0,0 +1,45 @@
+module StripeLocal
+  class Transaction < ActiveRecord::Base
+    include ObjectAdapter
+
+    self.primary_key = :id
+
+    time_writer :created, :available_on
+
+    class<<self
+      def create object
+        super normalize( object )
+      end
+
+      def normalize attrs
+        attrs.each_with_object({}) do |(k,v),h|
+          key = case k.to_sym
+          when :source then :source_id
+          when :type   then :source_type
+          when ->(x){attribute_method? x} then k.to_sym
+          else next
+          end
+          if v.is_a?(Numeric) && v > 1000000000
+            h[key] = Time.at( v )
+          else
+            h[key] = v
+          end
+        end
+      end
+    end
+
+
+  #=!=#>>>
+  # string   :id
+  # integer  :amount
+  # datetime :available_on
+  # datetime :created
+  # integer  :fee
+  # integer  :net
+  # string   :source_id
+  # string   :source_type
+  # string   :status
+  # string   :description
+  #=¡=#>>>
+  end
+end

data/app/models/stripe_local/transfer.rb

@@ -0,0 +1,48 @@
+module StripeLocal
+  class Transfer < ActiveRecord::Base
+    include ObjectAdapter
+
+    has_one :transaction, as: :source
+
+    self.primary_key = :id
+
+    time_writer :date
+
+    def metadata= hash
+      MultiJson.dump hash
+    end
+
+    def metadata
+      MultiJson.load read_attribute( :metadata ), symbolize_keys: true
+    end
+
+    class<<self
+      def create object
+        super normalize( object )
+      end
+
+      def normalize attrs
+        attrs.each_with_object({}) do |(k,v),h|
+          key = case k.to_sym
+          when :balance_transaction then :transaction_id
+          when :date then h[:date] = Time.at(v) and next
+          when ->(x){attribute_method? x} then k.to_sym
+          else next
+          end
+          h[key] = v
+        end
+      end
+    end
+
+
+  #=!=#>>>
+  # string   :id
+  # integer  :amount
+  # datetime :date
+  # string   :status
+  # string   :transaction_id
+  # string   :description
+  # text     :metadata
+  #=¡=#>>>
+  end
+end

data/app/validators/email_pattern_validator.rb

@@ -0,0 +1,7 @@
+class EmailPatternValidator < ActiveModel::EachValidator  
+  def validate_each(record, attribute, value)  
+		unless value.match(/^([\w\!\#$\%\&\'\*\+\-\/\=\?\^\`{\|\}\~]+\.)*[\w\!\#$\%\&\'\*\+\-\/\=\?\^\`{\|\}\~]+@((((([a-z0-9]{1}[a-z0-9\-]{0,62}[a-z0-9]{1})|[a-z])\.)+[a-z]{2,6})|(\d{1,3}\.){3}\d{1,3}(\:\d{1,5})?)$/i)  
+      record.errors[attribute] << "Not a valid email address"  
+    end unless value.blank?    
+  end  
+end

data/app/validators/full_name_pattern_validator.rb

@@ -0,0 +1,7 @@
+class FullNamePatternValidator < ActiveModel::EachValidator
+  def validate_each(record, attribute, value)
+    if value.nil? || !value.squeeze(" ").strip.match(/\A\S+?\s\S+?\Z/i)
+      record.errors[attribute] << "First & Last names separated by a space"
+		end
+  end
+end

data/app/validators/legal_name_pattern_validator.rb

@@ -0,0 +1,7 @@
+class LegalNamePatternValidator < ActiveModel::EachValidator
+  def validate_each(record, attribute, value)
+    if value.nil? || !value.match(/\A\S+?\s\S+?(?:\s\S+?)?\Z/i)
+      record.errors[attribute] << "must be in the form \"First Last\", \"First Middle Last\", or \"First M Last\" (no prefixes or suffixes)"
+		end
+  end
+end

data/app/validators/phone_pattern_validator.rb

@@ -0,0 +1,17 @@
+class PhonePatternValidator < ActiveModel::EachValidator
+  def validate_each(record, attribute, value)
+		if !value.blank?
+			first_normalize value
+	    unless value.match(/^((\d){10})$/i)
+	      record.errors[attribute] << "10 digit phone number, area-code first, no country code please."
+	    end
+		end
+  end
+
+private
+
+	def first_normalize number
+		number.to_phone
+	end
+
+end

data/app/validators/plan_id_pattern_validator.rb

@@ -0,0 +1,7 @@
+class PlanIdPatternValidator < ActiveModel::EachValidator  
+  def validate_each record, attribute, value
+    if value.nil? || !value.match(/^(([\w\-]{0,62})?)$/i)
+      record.errors[attribute] << "accepts alphanumeric characters, '-', and '_' only. no spaces"  
+    end  
+  end  
+end

data/app/validators/slug_pattern_validator.rb

@@ -0,0 +1,38 @@
+class SlugPatternValidator < ActiveModel::EachValidator
+  def validate_each record, attribute, value
+		if value.blank?
+			record.errors[attribute] << "cannot be blank"
+		else
+			return string_replaced value
+		end
+  end
+
+	def string_replaced value
+		email_removal_for_morons value
+		intelligently_de_dot value
+		finish_normalizing value
+		value
+	end
+
+private
+
+	def finish_normalizing str
+		str.gsub!(/\W/,'-')
+		str.gsub!(/(\W\-|\-\W|\-)+/,'-')
+		str.gsub!(/(\A\-|\-\Z)/,'')
+		str
+	end
+
+	def intelligently_de_dot str
+		str.gsub!(/([A-Z])\.([a-z])/,'\1-\2')
+		str.gsub!(/([A-Z])\./,'\1')
+		str
+	end
+
+	def email_removal_for_morons str
+		str.gsub(/^(.*)?@([^@]*)?\.([^@\.]*)$/, '\1' )
+		pattern = ("" == $1) ? '\2-\3' : '\1'
+		str.gsub!(/^(.*)?@([^@]*)?\.([^@\.]*)$/, pattern )
+		str
+	end
+end

data/app/validators/state_abbreviation_validator.rb

@@ -0,0 +1,13 @@
+class StateAbbreviationValidator < ActiveModel::EachValidator
+  def validate_each record, attribute, value
+		unless value.blank?
+			if value.size > 2
+				value = STATES_HASH.fetch( value.downcase, 'invalid' )
+				record[attribute] = value
+			end
+	    unless value.in? STATES_HASH.values
+	      record.errors[attribute] << "not a state of this great nation"
+	    end
+		end
+  end
+end

data/app/validators/stripe_type_validator.rb

@@ -0,0 +1,7 @@
+class StripeTypeValidator < ActiveModel::EachValidator
+  def validate_each(record, attribute, value)
+    if value.nil? || !value.in?( %w(individual corporation) )
+      record.errors[attribute] << "must specify either individual or corporate"
+		end
+  end
+end

data/app/validators/zip_type_validator.rb

@@ -0,0 +1,8 @@
+class ZipTypeValidator < ActiveModel::EachValidator
+  def validate_each(record, attribute, value)
+		unless value.blank?
+			record[attribute] = value.to_i
+			return value = value.to_i + 0
+		end
+  end
+end

data/app/views/layouts/stripe_local/application.html.erb

@@ -0,0 +1,14 @@
+<!DOCTYPE html>
+<html>
+<head>
+  <title>StripeLocal</title>
+  <%= stylesheet_link_tag    "stripe_local/application", media: "all" %>
+  <%= javascript_include_tag "stripe_local/application" %>
+  <%= csrf_meta_tags %>
+</head>
+<body>
+
+<%= yield %>
+
+</body>
+</html>

data/config/routes.rb

@@ -0,0 +1,22 @@
+StripeLocal::Engine.routes.draw do
+  resources :charges
+
+  resources :line_items
+
+  resources :invoices
+
+  resources :subscriptions
+
+  resources :discounts
+
+  resources :coupons
+
+  resources :plans
+
+  resources :cards
+
+  resources :customers
+
+	post 'webhook/events', to: 'webhooks#events'
+
+end