yeshoua_crm 1.0.0

data/lib/yeshoua_crm/acts_as_votable/vote.rb

@@ -0,0 +1,28 @@
+require 'yeshoua_crm/helpers/vote_helper'
+
+module YeshouaCrm
+  module ActsAsVotable
+    class Vote < ActiveRecord::Base
+      include Helpers::Words
+
+      if defined?(ProtectedAttributes) || ::ActiveRecord::VERSION::MAJOR < 4
+        attr_accessible :votable_id, :votable_type,
+          :voter_id, :voter_type,
+          :votable, :voter,
+          :vote_flag, :vote_scope,
+          :vote_ip
+      end
+
+      belongs_to :votable, :polymorphic => true
+      belongs_to :voter, :polymorphic => true
+
+      scope :up, lambda { where(:vote_flag => true) }
+      scope :down, lambda { where(:vote_flag => false) }
+      scope :for_type, lambda { |klass| where(:votable_type => klass.to_s) }
+      scope :by_type,  lambda { |klass| where(:voter_type => klass.to_s) }
+
+      validates_presence_of :votable_id
+      validates_presence_of :voter_id
+    end
+  end
+end

data/lib/yeshoua_crm/acts_as_votable/voter.rb

@@ -0,0 +1,131 @@
+module YeshouaCrm
+  module ActsAsVotable
+    module Voter
+      def self.included(base)
+        # allow user to define these
+        aliases = {
+          :vote_up_for    => [:likes, :upvotes, :up_votes],
+          :vote_down_for  => [:dislikes, :downvotes, :down_votes],
+          :unvote_for     => [:unlike, :undislike],
+          :voted_on?      => [:voted_for?],
+          :voted_up_on?   => [:voted_up_for?, :liked?],
+          :voted_down_on? => [:voted_down_for?, :disliked?],
+          :voted_as_when_voting_on => [:voted_as_when_voted_on, :voted_as_when_voting_for, :voted_as_when_voted_for],
+          :find_up_voted_items   => [:find_liked_items],
+          :find_down_voted_items => [:find_disliked_items]
+        }
+
+        base.class_eval do
+          has_many :votes, :class_name => 'YeshouaCrm::ActsAsVotable::Vote', :as => :voter, :dependent => :destroy do
+            def votables
+              includes(:votable).map(&:votable)
+            end
+          end
+
+          aliases.each do |method, links|
+            links.each do |new_method|
+              alias_method(new_method, method)
+            end
+          end
+        end
+      end
+
+      # voting
+      def vote(args)
+        args[:votable].vote_by args.merge(:voter => self)
+      end
+
+      def vote_up_for(model = nil, args = {})
+        vote :votable => model, :vote_scope => args[:vote_scope], :vote => true
+      end
+
+      def vote_down_for(model = nil, args = {})
+        vote :votable => model, :vote_scope => args[:vote_scope], :vote => false
+      end
+
+      def unvote_for(model, args = {})
+        model.unvote :voter => self, :vote_scope => args[:vote_scope]
+      end
+
+      # results
+      def voted_on?(votable, args = {})
+        votes = find_votes(:votable_id => votable.id, :votable_type => votable.class.base_class.name,
+                           :vote_scope => args[:vote_scope])
+        !votes.empty?
+      end
+
+      def voted_up_on?(votable, args = {})
+        votes = find_votes(:votable_id => votable.id, :votable_type => votable.class.base_class.name,
+                           :vote_scope => args[:vote_scope], :vote_flag => true)
+        !votes.empty?
+      end
+
+      def voted_down_on?(votable, args = {})
+        votes = find_votes(:votable_id => votable.id, :votable_type => votable.class.base_class.name,
+                           :vote_scope => args[:vote_scope], :vote_flag => false)
+        !votes.empty?
+      end
+
+      def voted_as_when_voting_on(votable, args = {})
+        vote = find_votes(:votable_id => votable.id, :votable_type => votable.class.base_class.name,
+                          :vote_scope => args[:vote_scope]).select(:vote_flag).last
+        return nil unless vote
+        vote.vote_flag
+      end
+
+      def find_votes(extra_conditions = {})
+        votes.where(extra_conditions)
+      end
+
+      def find_up_votes(args = {})
+        find_votes :vote_flag => true, :vote_scope => args[:vote_scope]
+      end
+
+      def find_down_votes(args = {})
+        find_votes :vote_flag => false, :vote_scope => args[:vote_scope]
+      end
+
+      def find_votes_for_class(klass, extra_conditions = {})
+        find_votes extra_conditions.merge(:votable_type => klass.name)
+      end
+
+      def find_up_votes_for_class(klass, args = {})
+        find_votes_for_class klass, :vote_flag => true, :vote_scope => args[:vote_scope]
+      end
+
+      def find_down_votes_for_class(klass, args = {})
+        find_votes_for_class klass, :vote_flag => false, :vote_scope => args[:vote_scope]
+      end
+
+      # Including polymporphic relations for eager loading
+      def include_objects
+        YeshouaCrm::ActsAsVotable::Vote.includes(:votable)
+      end
+
+      def find_voted_items(extra_conditions = {})
+        options = extra_conditions.merge :voter_id => id, :voter_type => self.class.base_class.name
+        include_objects.where(options).collect(&:votable)
+      end
+
+      def find_up_voted_items(extra_conditions = {})
+        find_voted_items extra_conditions.merge(:vote_flag => true)
+      end
+
+      def find_down_voted_items(extra_conditions = {})
+        find_voted_items extra_conditions.merge(:vote_flag => false)
+      end
+
+      def get_voted(klass, extra_conditions = {})
+        klass.joins(:votes_for).merge find_votes(extra_conditions)
+      end
+
+      def get_up_voted(klass)
+        klass.joins(:votes_for).merge find_up_votes
+      end
+
+      def get_down_voted(klass)
+        klass.joins(:votes_for).merge find_down_votes
+      end
+    end
+  end
+end

data/lib/yeshoua_crm/assets_manager.rb

@@ -0,0 +1,43 @@
+module YeshouaCrm
+  class AssetsManager
+    def self.install_assets
+      return unless Gem.loaded_specs['yeshoua_crm']
+      source = File.join(Gem.loaded_specs['yeshoua_crm'].full_gem_path, 'vendor', 'assets')
+      destination = File.join(Dir.pwd, 'public', 'plugin_assets', 'yeshoua_crm')
+      return unless File.directory?(source)
+
+      source_files = Dir[source + '/**/*']
+      source_dirs = source_files.select { |d| File.directory?(d) }
+      source_files -= source_dirs
+
+      unless source_files.empty?
+        base_target_dir = File.join(destination, File.dirname(source_files.first).gsub(source, ''))
+        begin
+          FileUtils.mkdir_p(base_target_dir)
+        rescue Exception => e
+          raise "Could not create directory #{base_target_dir}: " + e.message
+        end
+      end
+
+      source_dirs.each do |dir|
+        target_dir = File.join(destination, dir.gsub(source, ''))
+        begin
+          FileUtils.mkdir_p(target_dir)
+        rescue Exception => e
+          raise "Could not create directory #{target_dir}: " + e.message
+        end
+      end
+
+      source_files.each do |file|
+        begin
+          target = File.join(destination, file.gsub(source, ''))
+          unless File.exist?(target) && FileUtils.identical?(file, target)
+            FileUtils.cp(file, target)
+          end
+        rescue Exception => e
+          raise "Could not copy #{file} to #{target}: " + e.message
+        end
+      end
+    end
+  end
+end

data/lib/yeshoua_crm/currency.rb

@@ -0,0 +1,439 @@
+require "json"
+require "yeshoua_crm/currency/loader"
+require "yeshoua_crm/currency/heuristics"
+require "yeshoua_crm/currency/formatting"
+
+module YeshouaCrm
+  # Represents a specific currency unit.
+  #
+  # @see http://en.wikipedia.org/wiki/Currency
+  # @see http://iso4217.net/
+  class Currency
+    include Comparable
+    extend Enumerable
+    extend YeshouaCrm::Currency::Loader
+    extend YeshouaCrm::Currency::Heuristics
+    extend YeshouaCrm::Currency::Formatting
+
+
+    # Thrown when a Currency has been registered without all the attributes
+    # which are required for the current action.
+    class MissingAttributeError < StandardError
+      def initialize(method, currency, attribute)
+        super(
+            "Can't call Currency.#{method} - currency '#{currency}' is missing "\
+          "the attribute '#{attribute}'"
+        )
+      end
+    end
+
+    # Thrown when an unknown currency is requested.
+    class UnknownCurrency < ArgumentError;
+    end
+
+    class << self
+
+      # Lookup a currency with given +id+ an returns a +Currency+ instance on
+      # success, +nil+ otherwise.
+      #
+      # @param [String, Symbol, #to_s] id Used to look into +table+ and
+      # retrieve the applicable attributes.
+      #
+      # @return [Money::Currency]
+      #
+      # @example
+      #   Money::Currency.find(:eur) #=> #<Money::Currency id: eur ...>
+      #   Money::Currency.find(:foo) #=> nil
+      def find(id)
+        return nil if id == ""
+        id = id.to_s.downcase.to_sym
+        new(id)
+      rescue UnknownCurrency
+        nil
+      end
+
+      # Lookup a currency with given +num+ as an ISO 4217 numeric and returns an
+      # +Currency+ instance on success, +nil+ otherwise.
+      #
+      # @param [#to_s] num used to look into +table+ in +iso_numeric+ and find
+      # the right currency id.
+      #
+      # @return [Money::Currency]
+      #
+      # @example
+      #   Money::Currency.find_by_iso_numeric(978) #=> #<Money::Currency id: eur ...>
+      #   Money::Currency.find_by_iso_numeric('001') #=> nil
+      def find_by_iso_numeric(num)
+        num = num.to_s
+        id, _ = self.table.find { |key, currency| currency[:iso_numeric] == num }
+        new(id)
+      rescue UnknownCurrency
+        nil
+      end
+
+      # Wraps the object in a +Currency+ unless it's already a +Currency+
+      # object.
+      #
+      # @param [Object] object The object to attempt and wrap as a +Currency+
+      # object.
+      #
+      # @return [Money::Currency]
+      #
+      # @example
+      #   c1 = Money::Currency.new(:usd)
+      #   Money::Currency.wrap(nil)   #=> nil
+      #   Money::Currency.wrap(c1)    #=> #<Money::Currency id: usd ...>
+      #   Money::Currency.wrap("usd") #=> #<Money::Currency id: usd ...>
+      def wrap(object)
+        if object.nil?
+          nil
+        elsif object.is_a?(Currency)
+          object
+        else
+          Currency.new(object)
+        end
+      end
+
+      # List of known currencies.
+      #
+      # == monetary unit
+      # The standard unit of value of a currency, as the dollar in the United States or the peso in Mexico.
+      # http://www.answers.com/topic/monetary-unit
+      # == fractional monetary unit, subunit
+      # A monetary unit that is valued at a fraction (usually one hundredth) of the basic monetary unit
+      # http://www.answers.com/topic/fractional-monetary-unit-subunit
+      #
+      # See http://en.wikipedia.org/wiki/List_of_circulating_currencies and
+      # http://search.cpan.org/~tnguyen/Locale-Currency-Format-1.28/Format.pm
+      def table
+        @table ||= load_currencies
+      end
+
+      # List the currencies imported and registered
+      # @return [Array]
+      #
+      # @example
+      #   Money::Currency.iso_codes()
+      #   [#<Currency ..USD>, 'CAD', 'EUR']...
+      def all
+        table.keys.map do |curr|
+          c = Currency.new(curr)
+          if c.priority.nil?
+            raise MissingAttributeError.new(:all, c.id, :priority)
+          end
+          c
+        end.sort_by(&:priority)
+      end
+
+      # We need a string-based validator before creating an unbounded number of
+      # symbols.
+      # http://www.randomhacks.net/articles/2007/01/20/13-ways-of-looking-at-a-ruby-symbol#11
+      # https://github.com/RubyMoney/money/issues/132
+      #
+      # @return [Set]
+      def stringified_keys
+        @stringified_keys ||= stringify_keys
+      end
+
+      # Register a new currency
+      #
+      # @param curr [Hash] information about the currency
+      # @option priority [Numeric] a numerical value you can use to sort/group
+      #   the currency list
+      # @option iso_code [String] the international 3-letter code as defined
+      #   by the ISO 4217 standard
+      # @option iso_numeric [Integer] the international 3-digit code as
+      #   defined by the ISO 4217 standard
+      # @option name [String] the currency name
+      # @option symbol [String] the currency symbol (UTF-8 encoded)
+      # @option subunit [String] the name of the fractional monetary unit
+      # @option subunit_to_unit [Numeric] the proportion between the unit and
+      #   the subunit
+      # @option separator [String] character between the whole and fraction
+      #   amounts
+      # @option delimiter [String] character between each thousands place
+      def register(curr)
+        key = curr.fetch(:iso_code).downcase.to_sym
+        table if !@table
+        @table[key] = curr
+        @stringified_keys = stringify_keys
+      end
+
+
+      # Unregister a currency.
+      #
+      # @param [Object] curr A Hash with the key `:iso_code`, or the ISO code
+      #   as a String or Symbol.
+      #
+      # @return [Boolean] true if the currency previously existed, false
+      #   if it didn't.
+      def unregister(curr)
+        if curr.is_a?(Hash)
+          key = curr.fetch(:iso_code).to_s.downcase.to_sym
+        else
+          key = curr.to_s.downcase.to_sym
+        end
+        existed = @table.delete(key)
+        @stringified_keys = stringify_keys
+        existed ? true : false
+      end
+
+
+      def each
+        all.each { |c| yield(c) }
+      end
+
+      private
+
+      def stringify_keys
+        table.keys.each_with_object(Set.new) { |k, set| set.add(k.to_s.downcase) }
+      end
+    end
+
+    # @!attribute [r] id 
+    #   @return [Symbol] The symbol used to identify the currency, usually THE
+    #     lowercase +iso_code+ attribute.
+    # @!attribute [r] priority 
+    #   @return [Integer] A numerical value you can use to sort/group the
+    #     currency list.
+    # @!attribute [r] iso_code 
+    #   @return [String] The international 3-letter code as defined by the ISO
+    #     4217 standard.
+    # @!attribute [r] iso_numeric 
+    #   @return [String] The international 3-numeric code as defined by the ISO
+    #     4217 standard.
+    # @!attribute [r] name 
+    #   @return [String] The currency name.
+    # @!attribute [r] symbol 
+    #   @return [String] The currency symbol (UTF-8 encoded).
+    # @!attribute [r] disambiguate_symbol 
+    #   @return [String] Alternative currency used if symbol is ambiguous
+    # @!attribute [r] html_entity 
+    #   @return [String] The html entity for the currency symbol
+    # @!attribute [r] subunit 
+    #   @return [String] The name of the fractional monetary unit.
+    # @!attribute [r] subunit_to_unit 
+    #   @return [Integer] The proportion between the unit and the subunit
+    # @!attribute [r] decimal_mark 
+    #   @return [String] The decimal mark, or character used to separate the
+    #     whole unit from the subunit.
+    # @!attribute [r] The 
+    #   @return [String] character used to separate thousands grouping of the
+    #     whole unit.
+    # @!attribute [r] symbol_first 
+    #   @return [Boolean] Should the currency symbol precede the amount, or
+    #     should it come after?
+    # @!attribute [r] smallest_denomination 
+    #   @return [Integer] Smallest amount of cash possible (in the subunit of
+    #     this currency)
+
+    attr_reader :id, :priority, :iso_code, :iso_numeric, :name, :symbol,
+                :disambiguate_symbol, :html_entity, :subunit, :subunit_to_unit, :decimal_mark,
+                :thousands_separator, :symbol_first, :smallest_denomination
+
+    alias_method :separator, :decimal_mark
+    alias_method :delimiter, :thousands_separator
+    alias_method :eql?, :==
+
+    # Create a new +Currency+ object.
+    #
+    # @param [String, Symbol, #to_s] id Used to look into +table+ and retrieve
+    #  the applicable attributes.
+    #
+    # @return [Money::Currency]
+    #
+    # @example
+    #   Money::Currency.new(:usd) #=> #<Money::Currency id: usd ...>
+    def initialize(id)
+      id = id.to_s.downcase
+      unless self.class.stringified_keys.include?(id)
+        raise UnknownCurrency, "Unknown currency '#{id}'"
+      end
+      @id = id.to_sym
+      initialize_data!
+    end
+
+    # Compares +self+ with +other_currency+ against the value of +priority+
+    # attribute.
+    #
+    # @param [Money::Currency] other_currency The currency to compare to.
+    #
+    # @return [-1,0,1] -1 if less than, 0 is equal to, 1 if greater than
+    #
+    # @example
+    #   c1 = Money::Currency.new(:usd)
+    #   c2 = Money::Currency.new(:jpy)
+    #   c1 <=> c2 #=> 1
+    #   c2 <=> c1 #=> -1
+    #   c1 <=> c1 #=> 0
+    def <=>(other_currency)
+      # <=> returns nil when one of the values is nil
+      comparison = (self.priority <=> other_currency.priority || 0) rescue 0
+
+      if comparison == 0
+        self.id.to_s <=> other_currency.id.to_s
+      else
+        comparison
+      end
+    end
+
+    # Compares +self+ with +other_currency+ and returns +true+ if the are the
+    # same or if their +id+ attributes match.
+    #
+    # @param [Money::Currency] other_currency The currency to compare to.
+    #
+    # @return [Boolean]
+    #
+    # @example
+    #   c1 = Money::Currency.new(:usd)
+    #   c2 = Money::Currency.new(:jpy)
+    #   c1 == c1 #=> true
+    #   c1 == c2 #=> false
+    def ==(other_currency)
+      self.equal?(other_currency) || compare_ids(other_currency)
+    end
+
+    def compare_ids(other_currency)
+      other_currency_id = if other_currency.is_a?(Currency)
+                            other_currency.id.to_s.downcase
+                          else
+                            other_currency.to_s.downcase
+                          end
+      self.id.to_s.downcase == other_currency_id
+    end
+
+    private :compare_ids
+
+    # Returns a Fixnum hash value based on the +id+ attribute in order to use
+    # functions like & (intersection), group_by, etc.
+    #
+    # @return [Fixnum]
+    #
+    # @example
+    #   Money::Currency.new(:usd).hash #=> 428936
+    def hash
+      id.hash
+    end
+
+    # Returns a human readable representation.
+    #
+    # @return [String]
+    #
+    # @example
+    #   Money::Currency.new(:usd) #=> #<Currency id: usd ...>
+    def inspect
+      "#<#{self.class.name} id: #{id}, priority: #{priority}, symbol_first: #{symbol_first}, thousands_separator: #{thousands_separator}, html_entity: #{html_entity}, decimal_mark: #{decimal_mark}, name: #{name}, symbol: #{symbol}, subunit_to_unit: #{subunit_to_unit}, exponent: #{exponent}, iso_code: #{iso_code}, iso_numeric: #{iso_numeric}, subunit: #{subunit}, smallest_denomination: #{smallest_denomination}>"
+    end
+
+    # Returns a string representation corresponding to the upcase +id+
+    # attribute.
+    #
+    # --
+    # DEV: id.to_s.upcase corresponds to iso_code but don't use ISO_CODE for consistency.
+    #
+    # @return [String]
+    #
+    # @example
+    #   Money::Currency.new(:usd).to_s #=> "USD"
+    #   Money::Currency.new(:eur).to_s #=> "EUR"
+    def to_s
+      id.to_s.upcase
+    end
+
+    # Returns a string representation corresponding to the upcase +id+
+    # attribute. Useful in cases where only implicit conversions are made.
+    #
+    # @return [String]
+    #
+    # @example
+    #   Money::Currency.new(:usd).to_str #=> "USD"
+    #   Money::Currency.new(:eur).to_str #=> "EUR"
+    def to_str
+      id.to_s.upcase
+    end
+
+    # Returns a symbol representation corresponding to the upcase +id+
+    # attribute.
+    #
+    # @return [Symbol]
+    #
+    # @example
+    #   Money::Currency.new(:usd).to_sym #=> :USD
+    #   Money::Currency.new(:eur).to_sym #=> :EUR
+    def to_sym
+      id.to_s.upcase.to_sym
+    end
+
+    # Conversation to +self+.
+    #
+    # @return [self]
+    def to_currency
+      self
+    end
+
+    # Returns currency symbol or iso code for currencies with no symbol.
+    #
+    # @return [String]
+    def code
+      symbol || iso_code
+    end
+
+    def symbol_first?
+      !!@symbol_first
+    end
+
+    # Returns the number of digits after the decimal separator.
+    #
+    # @return [Float]
+    def exponent
+      Math.log10(@subunit_to_unit) if @subunit_to_unit
+    end
+
+    # Cache decimal places for subunit_to_unit values.  Common ones pre-cached.
+    def self.decimal_places_cache
+      @decimal_places_cache ||= {1 => 0, 10 => 1, 100 => 2, 1000 => 3}
+    end
+
+    # The number of decimal places needed.
+    #
+    # @return [Integer]
+    def decimal_places
+      cache[subunit_to_unit] ||= calculate_decimal_places(subunit_to_unit)
+    end
+
+    private
+
+    def cache
+      self.class.decimal_places_cache
+    end
+
+    # If we need to figure out how many decimal places we need we
+    # use repeated integer division.
+    def calculate_decimal_places(num)
+      i = 1
+      while num >= 10
+        num /= 10
+        i += 1 if num >= 10
+      end
+      i
+    end
+
+    def initialize_data!
+      data = self.class.table[@id]
+      @alternate_symbols = data[:alternate_symbols]
+      @decimal_mark = data[:decimal_mark]
+      @disambiguate_symbol = data[:disambiguate_symbol]
+      @html_entity = data[:html_entity]
+      @iso_code = data[:iso_code]
+      @iso_numeric = data[:iso_numeric]
+      @name = data[:name]
+      @priority = data[:priority]
+      @smallest_denomination = data[:smallest_denomination]
+      @subunit = data[:subunit]
+      @subunit_to_unit = data[:subunit_to_unit]
+      @symbol = data[:symbol]
+      @symbol_first = data[:symbol_first]
+      @thousands_separator = data[:thousands_separator]
+    end
+  end
+end