paid_up 0.1.0

data/db/migrate/20150407105900_create_paid_up_features_plans_table.rb

@@ -0,0 +1,9 @@
+class CreatePaidUpFeaturesPlansTable < ActiveRecord::Migration
+  def change
+    create_table :paid_up_features_plans do |t|
+      t.references :feature, index: true, foreign_key: true
+      t.references :plan, index: true, foreign_key: true
+      t.integer :setting
+    end
+  end
+end

data/db/migrate/20150407110100_create_paid_up_features_table.rb

@@ -0,0 +1,11 @@
+class CreatePaidUpFeaturesTable < ActiveRecord::Migration
+  def change
+    create_table :paid_up_features do |t|
+      t.string :name
+      t.string :title
+      t.string :setting_type
+      t.text :description
+    end
+    add_index :paid_up_features, :name, :unique => true
+  end
+end

data/db/migrate/20150407110101_create_paid_up_plans_table.rb

@@ -0,0 +1,14 @@
+class CreatePaidUpPlansTable < ActiveRecord::Migration
+  def change
+    create_table :paid_up_plans do |t|
+      t.string :stripe_id
+      t.string :name
+      t.text :description
+      t.integer :sort_order
+
+      t.timestamps
+    end
+    add_index :paid_up_plans, :name, :unique => true
+    add_index :paid_up_plans, :stripe_id, :unique => true
+  end
+end

data/lib/generators/paid_up/install/install_generator.rb

@@ -0,0 +1,59 @@
+module PaidUp
+  class InstallGenerator < Rails::Generators::Base
+    argument :user_model_name, :type => :string, :default => "User"
+    source_root File.expand_path("../templates", __FILE__)
+    require File.expand_path('../../utils', __FILE__)
+    include Generators::Utils
+    include Rails::Generators::Migration
+
+    def hello
+      output "PaidUp Installer will now install itself", :magenta
+    end
+
+    # all public methods in here will be run in order
+
+    def install_devise
+      output "To start with, Devise is used to authenticate users. No need to install it separately, I'll do that now.", :magenta
+      generate("devise:install")
+      generate("devise User")
+    end
+
+    def add_initializer
+      output "Next, you'll need an initializer.  This is where you put your configuration options.", :magenta
+      template "initializer.rb.erb", "config/initializers/paid_up.rb"
+    end
+
+    def add_migrations
+      output "Next come migrations.", :magenta
+      rake 'paid_up:install:migrations'
+      unless self.class.migration_exists?('db/migrate', 'add_customer_stripe_id.rb')
+        generate("migration AddStripeIdColumnToUser stripe_id:string:index")
+      end
+    end
+
+    def add_to_model
+      output "Adding PaidUp to your User model", :magenta
+      gsub_file "app/models/user.rb", /^\n  subscriber$/, ''
+      inject_into_file "app/models/user.rb", "\n  subscriber", after: "class User < ActiveRecord::Base"
+    end
+
+    def add_route
+      output "Adding PaidUp to your routes.rb file", :magenta
+      gsub_file "config/routes.rb", /mount PaidUp::Engine => '\/.*', :as => 'paid_up'/, ''
+      route("mount PaidUp::Engine => '/', :as => 'paid_up'")
+    end
+
+    def self.next_migration_number(dirname)
+      if ActiveRecord::Base.timestamped_migrations
+        unless @prev_migration_nr
+          @prev_migration_nr = Time.now.utc.strftime("%Y%m%d%H%M%S").to_i
+        else
+          @prev_migration_nr += 1
+        end
+        @prev_migration_nr.to_s
+      else
+        "%.3d" % (current_migration_number(dirname) + 1)
+      end
+    end
+  end
+end

data/lib/generators/paid_up/install/templates/initializer.rb.erb

@@ -0,0 +1,5 @@
+PaidUp.configure do |config|
+  config.anonymous_customer_stripe_id = 'anonymous-customer'
+  config.anonymous_plan_stripe_id = 'anonymous-plan'
+  config.free_plan_stripe_id = 'free-plan'
+end

data/lib/generators/paid_up/utils.rb

@@ -0,0 +1,16 @@
+module PaidUp
+  module Generators
+    module Utils
+      def output(output, color = :green)
+        say("           -  #{output}", color)
+      end
+
+      def ask_for(wording, default_value = nil, override_if_present_value = nil)
+        override_if_present_value.present? ?
+          display("Using [#{override_if_present_value}] for question '#{wording}'") && override_if_present_value :
+          ask("           ?  #{wording} Press <enter> for [#{default_value}] >", :yellow).presence || default_value
+      end
+    end
+  end
+end
+

data/lib/paid_up/configuration.rb

@@ -0,0 +1,22 @@
+module PaidUp
+  def self.configure(configuration = PaidUp::Configuration.new)
+    if block_given?
+      yield configuration
+    end
+    @@configuration = configuration
+  end
+  
+  def self.configuration
+    @@configuration ||= PaidUp::Configuration.new
+  end
+  
+  class Configuration
+    attr_accessor :anonymous_customer_stripe_id, :anonymous_plan_stripe_id, :free_plan_stripe_id
+    
+    def initialize
+      self.anonymous_customer_stripe_id = "TODO"
+      self.anonymous_plan_stripe_id = "TODO"
+      self.free_plan_stripe_id = "TODO"
+    end
+  end
+end

data/lib/paid_up/engine.rb

@@ -0,0 +1,17 @@
+module PaidUp
+  class Engine < Rails::Engine
+    isolate_namespace PaidUp
+    engine_name "paid_up"
+
+    config.generators do |g|
+      g.test_framework      :rspec,        :fixture => false
+      g.fixture_replacement :factory_girl, :dir => 'spec/factories'
+      g.assets false
+      g.helper false
+    end
+
+    def self.table_name_prefix
+      'paid_up_'
+    end
+  end 
+end

data/lib/paid_up/integer.rb

@@ -0,0 +1,9 @@
+module PaidUp
+  module Integer
+    def to_date
+      Time.at(self).strftime("%m/%d/%Y")
+    end
+  end
+end
+
+Integer.send(:include, PaidUp::Integer)

data/lib/paid_up/localization.rb

@@ -0,0 +1,31 @@
+module StringExtension
+  def localize(*args)
+    if args.first.is_a? Symbol
+      sym = args.shift
+    else
+      sym = underscore.tr(' ', '_').gsub(/[^a-z0-9_]+/i, '').to_sym
+    end
+    args << {:default => self}
+      
+    I18n.t(sym, *args).html_safe
+  end
+  alias :l :localize
+end 
+String.send :include, StringExtension
+ 
+ 
+module SymbolExtensionCustom
+  
+  def localize_with_debugging(*args)
+    localized_sym = I18n.translate(self, *args)
+    localized_sym.is_a?(String) ? localized_sym.html_safe : localized_sym
+  end
+  alias_method :l, :localize_with_debugging
+  
+  def l_with_args(*args)
+    self.l(*args).html_safe
+  end
+  
+end
+ 
+Symbol.send :include, SymbolExtensionCustom

data/lib/paid_up/mixins.rb

@@ -0,0 +1,139 @@
+module PaidUp
+  module Mixins
+    extend ActiveSupport::Concern
+    class_methods do
+      def subscriber
+        attr_reader :stripe_data
+
+        after_initialize :set_default_attributes, :load_stripe_data
+        before_save :remove_anonymous_association
+
+        self.send(:define_method, :reload) { |*args, &blk|
+          super *args, &blk
+          load_stripe_data
+          self
+        }
+        self.send(:define_method, :stripe_data) {
+          if stripe_id.present? || new_record?
+            @customer_stripe_data
+          end
+        }
+        self.send(:define_method, :cards) {
+          if stripe_data.present?
+            stripe_data.sources.all(:object => "card")
+          else
+            nil
+          end
+        }
+        self.send(:define_method, :subscribe_to_plan) { |plan_to_set, stripeToken = nil|
+          if stripe_id.present? && !subscription.nil? # There is an existing subscription
+            if stripeToken.present? # The customer has entered a new card
+              subscription.source = stripeToken
+              subscription.save
+              reload
+            end
+            subscription.plan = plan_to_set.stripe_id
+            result = subscription.save || ( raise(:could_not_update_subscription.l) && false )
+          else # Totally new subscription
+            customer = Stripe::Customer.create(
+                :source => stripeToken,
+                :plan => plan_to_set.stripe_id,
+                :email => email
+            ) || ( raise(:could_not_create_subscription.l) && false )
+
+            if stripe_id != customer.id # There is an update to be made, so we go ahead
+              result = update_attributes(stripe_id: customer.id) || ( raise(:could_not_associate_subscription.l) && false )
+            else
+              result = true
+            end
+          end
+          if result
+            reload
+            return true
+          else
+            return false
+          end
+        }
+        self.send(:define_method, :subscribe_to_free_plan) {
+          subscribe_to_plan PaidUp::Plan.free
+        }
+        self.send(:define_method, :plan) {
+          PaidUp::Plan.find_by_stripe_id(subscription.plan.id)
+        }
+        self.send(:define_method, :table_rows_unlimited?) { |table_name|
+          table_rows_allowed(table_name) == PaidUp::Unlimited.to_i
+        }
+        self.send(:define_method, :table_rows_remaining) { |table_name|
+          table_rows_allowed(table_name) - table_rows(table_name)
+        }
+        self.send(:define_method, :table_rows_allowed) { |table_name|
+          plan.feature_setting_by_name table_name
+        }
+        self.send(:define_method, :table_rows) { |table_name|
+          send(table_name).count
+        }
+        self.send(:define_method, :plan_stripe_id) {
+         if subscription.nil?
+            return nil
+          end
+          subscription.plan.id
+        }
+        self.send(:define_method, :subscription) {
+          if stripe_data.nil?
+            subscribe_to_free_plan
+          end
+          stripe_data.subscriptions.data.first
+        }
+        self.send(:define_method, :is_subscribed_to?) { |plan_to_check|
+          plan.id == plan_to_check.id
+        }
+        self.send(:define_method, :can_upgrade_to?) { |plan_to_check|
+          !is_subscribed_to?(plan_to_check) && (plan_to_check.sort_order.to_i > plan.sort_order.to_i)
+        }
+        self.send(:define_method, :can_downgrade_to?) { |plan_to_check|
+          !is_subscribed_to?(plan_to_check) && (plan_to_check.sort_order.to_i < plan.sort_order.to_i)
+        }
+        self.send(:define_method, :using_free_plan?) {
+          plan.stripe_id == PaidUp.configuration.free_plan_stripe_id || stripe_data.delinquent
+        }
+        self.send(:define_method, :load_stripe_data) {
+          if new_record?
+            working_stripe_id = PaidUp.configuration.anonymous_customer_stripe_id
+          else
+            unless stripe_id.present?
+              subscribe_to_free_plan
+            end
+            working_stripe_id = stripe_id
+          end
+          @customer_stripe_data = Stripe::Customer.retrieve working_stripe_id
+          if @customer_stripe_data.nil?
+            raise :could_not_load_subscription.l
+          end
+        }
+        self.send(:private, :load_stripe_data)
+        self.send(:define_method, :set_default_attributes) {
+          if new_record?
+            self.stripe_id = PaidUp.configuration.anonymous_customer_stripe_id
+          end
+        }
+        self.send(:private, :set_default_attributes)
+        self.send(:define_method, :remove_anonymous_association) {
+          if stripe_id == PaidUp.configuration.anonymous_customer_stripe_id
+            self.stripe_id = nil
+          end
+        }
+        self.send(:private, :remove_anonymous_association)
+
+        PaidUp::Plan.subscribed_to(self)
+      end
+
+      def subscribed_to(model)
+        has_many :subscribers, :through => :subscriptions, :source => :subscriber, :source_type => model.model_name
+      end
+    end
+  end
+end
+
+
+
+ActiveRecord::Base.send(:include, PaidUp::Mixins)

data/lib/paid_up/railtie.rb

@@ -0,0 +1,4 @@
+module PaidUp
+  class Railtie < Rails::Railtie
+  end
+end

data/lib/paid_up/stripe_extensions.rb

@@ -0,0 +1,17 @@
+module PaidUp
+  module StripeExtensions
+    extend ActiveSupport::Concern
+    class_methods do
+      def find_or_create_by_id(id, item)
+        begin
+          self.retrieve(id)
+        rescue
+          self.create(item)
+        end
+      end
+    end
+  end
+end
+
+Stripe::Customer.send(:include, PaidUp::StripeExtensions)
+Stripe::Plan.send(:include, PaidUp::StripeExtensions)

data/lib/paid_up/table_validator.rb

@@ -0,0 +1,9 @@
+module PaidUp
+  class TableValidator < ActiveModel::Validator
+    def validate(record)
+      if record.send(options[:field]) == options[:comparison] && !ActiveRecord::Base.connection.table_exists?(record.send(options[:found_in]))
+        record.errors[options[:found_in]] << :when_using_table_rows_table_must_exist.l
+      end
+    end
+  end
+end

data/lib/paid_up/unlimited.rb

@@ -0,0 +1,17 @@
+module PaidUp
+  module Unlimited
+    def self.initialize
+      999999999
+    end
+    def self.to_i(format = :default)
+      if format == :db
+        -1
+      else
+        999999999
+      end
+    end
+    def self.to_s
+      :unlimited.l
+    end
+  end
+end

data/lib/paid_up/version.rb

@@ -0,0 +1,7 @@
+module PaidUp
+  VERSION = File.read(File.expand_path('../../../VERSION', __FILE__))
+  
+  def self.version_string
+    "PaidUp version #{PaidUp::VERSION}"
+  end
+end

data/lib/paid_up.rb

@@ -0,0 +1,27 @@
+module PaidUp
+  require 'rails/all'
+  require 'rails-i18n'
+  require 'stripe' # Needs to be required before paid_up/stripe_extensions
+  require 'devise' # Needs to be required before paid_up/mixins
+
+  require 'paid_up/configuration'
+  require 'paid_up/railtie'
+  require 'paid_up/engine'
+  require 'paid_up/localization'
+  require 'paid_up/version'
+  require 'paid_up/stripe_extensions'
+  require 'paid_up/unlimited'
+  require 'paid_up/mixins'
+  require 'paid_up/integer'
+  require 'paid_up/table_validator'
+
+  require 'haml-rails'
+  require 'bootstrap_leather'
+  require 'high_voltage'
+  require 'cancan'
+
+  require 'money'
+
+  require 'seedbank'
+  require 'chronic'
+end