steveluscher-money 1.7.4.1

data/MIT-LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2005 Tobias Lutke
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README

@@ -0,0 +1,84 @@
+== Money
+
+This library makes it easier to deal with Money values, storing them as integers to avoid floating-point math errors.
+
+== Download
+
+Preferred method of installation is gem: 
+
+  gem install --source http://gems.github.com collectiveidea-money 
+
+You can find the source at:
+  
+  http://github.com/collectiveidea/money
+
+== Rails
+
+There is a rails extension that makes it easier to store money values in the database.
+
+  class Product < ActiveRecord::Base
+    money :price
+    validates_numericality_of :price_in_cents, :greater_than => 0
+  end
+
+This assumes that there is a price_in_cents (integer) column in the database, which can
+be changed by passing the :cents option.  You can also specify the :currency option to
+save the currency to a field in the database.
+
+  class Room < ActiveRecord::Base
+    money :rate, :cents => :rate_cents, :currency => :rate_currency
+    money :discount, :cents => :discount_cents
+  end
+
+You can set the attribute to a String, Fixnum, or Float and it will call #to_money to
+convert it to a Money object.  This makes it convenient for using money fields in forms.
+
+  r = Room.new :rate => "100.00"
+  r.rate  # returns <Money:0x249ef9c @currency="USD", @cents=10000>
+
+By default, money values will be stored with a precision of 2 (cents). If you need to store different precisions, such as to the nearest tenth of a cent, you can specify the +:precision+ option:
+
+  class Room < ActiveRecord::Base
+    money :rate, :precision => 3
+  end
+
+  r = Room.new :rate => "100"
+  r.rate.format  # returns $100.000
+  r.rate = "100.995"
+  r.rate.format  # returns $100.995
+
+To use the Rails functionality, install money as a plugin, or require 'money/rails'.
+This version is compatible with Rails 2.2.  For compatibility with previous versions of
+Rails, check out the rails-2.1 branch.
+  
+== Class configuration
+
+Two const class variables are available to tailor Money to your needs. 
+If you don't need currency exchange at all, just ignore those.
+
+=== Default Currency
+
+By default Money defaults to USD as its currency. This can be overwritten using
+
+  Money.default_currency = "CAD"
+  
+If you use rails, the environment.rb is a very good place to put this. 
+
+=== Currency Exchange
+
+The second parameter is a bit more complex. It lets you provide your own implementation of the 
+currency exchange service. By default Money throws an exception when trying to call .exchange_to. 
+
+A second minimalist implementation is provided which lets you supply custom exchange rates:
+
+  Money.bank = VariableExchangeBank.new 
+  Money.bank.add_rate("USD", "CAD", 1.24515)
+  Money.bank.add_rate("CAD", "USD", 0.803115)
+  Money.us_dollar(100).exchange_to("CAD") => Money.ca_dollar(124)
+  Money.ca_dollar(100).exchange_to("USD") => Money.us_dollar(80)
+
+There is nothing stopping you from creating bank objects which scrape www.xe.com for the current rates or just return rand(2)
+  
+== Code
+
+If you have any improvements please email them to tobi [at] leetsoft.com 

data/lib/money/bank/no_exchange_bank.rb

@@ -0,0 +1,9 @@
+class NoExchangeBank# :nodoc:
+
+  def exchange(money, currency)
+    return money if money.currency == currency
+    raise Money::MoneyError.new("Current Money::bank does not support money exchange. Please implement a bank object that does and assign it to the Money class.")
+  end
+  
+  
+end

data/lib/money/bank/variable_exchange_bank.rb

@@ -0,0 +1,30 @@
+# Example useage:
+#
+#  Money.bank = VariableExchangeBank.new
+#  Money.bank.add_rate("USD", "CAD", 1.24515)
+#  Money.bank.add_rate("CAD", "USD", 0.803115)
+#  Money.us_dollar(100).exchange_to("CAD") => Money.ca_dollar(124)
+#  Money.ca_dollar(100).exchange_to("USD") => Money.us_dollar(80)
+class VariableExchangeBank
+   
+  def add_rate(from, to, rate)
+    rates["#{from}_TO_#{to}".upcase] = rate
+  end
+  
+  def get_rate(from, to)
+    rates["#{from}_TO_#{to}".upcase] 
+  end
+  
+  def exchange(money, currency)
+    rate = get_rate(money.currency, currency) or raise Money::MoneyError.new("Can't find required exchange rate")
+    
+    Money.new((money.cents * rate).floor, currency, money.precision)
+  end
+  
+  private
+  
+  def rates
+    @rates ||= {} 
+  end
+  
+end

data/lib/money/core_extensions.rb

@@ -0,0 +1,52 @@
+class Numeric
+  # Convert the number to a +Money+ object.
+  #
+  #   100.to_money      #=> #<Money @cents=10000>
+  #
+  # Takes an optional precision, which defaults to 2
+  def to_money(precision = 2)
+    Money.new(self * 10**precision, Money.default_currency, precision)
+  end
+end
+
+class Float
+  # Convert the float to a +Money+ object.
+  #
+  #   3.75.to_money     #=> #<Money @cents=375>
+  #
+  # It takes an optional precision, which defaults to 2 or the number of digits
+  # after the decimal point if it's more than 2.
+  def to_money(precision = nil)
+    to_s.to_money(precision)
+  end
+end
+
+class String
+  # Convert the String to a +Money+ object.
+  #
+  #   '100'.to_money    #=> #<Money @cents=10000>
+  #   '100.37'.to_money #=> #<Money @cents=10037>
+  #   '.37'.to_money    #=> #<Money @cents=37>
+  #
+  # It takes an optional precision argument which defaults to 2 or the number of
+  # digits after the decimal point if it's more than 2.
+  #
+  #   '3.479'.to_money  # => #<Money @cents=3479 @precision=3>
+  #
+  def to_money(precision = nil)
+    # Get the currency
+    matches = scan /([A-Z]{2,3})/ 
+    currency = matches[0] ? matches[0][0] : Money.default_currency
+    
+    if !precision
+      precision = scan(/\.(\d+)/).to_s.length
+      precision = 2 if precision < 2
+    end
+
+    # Get the cents amount
+    str = self =~ /^\./ ? "0#{self}" : self
+    matches = str.scan /(\-?[\d,]+(\.(\d+))?)/
+    cents = matches[0] ? (matches[0][0].gsub(',', '').to_f * 10**precision) : 0
+    Money.new(cents, currency, precision)
+  end
+end

data/lib/money/rails.rb

@@ -0,0 +1,51 @@
+require 'money'
+
+module ActiveRecord #:nodoc:
+  module Acts #:nodoc:
+    module Money #:nodoc:
+      def self.included(base) #:nodoc:
+        base.extend ClassMethods
+      end
+
+      module ClassMethods
+        
+        def money(name, options = {})
+          options = {:precision => 2, :cents => "#{name}_in_cents".to_sym }.merge(options)
+          mapping = [[options[:cents], 'cents']]
+          mapping << [options[:currency].to_s, 'currency'] if options[:currency]
+          composed_of name, :class_name => 'Money', :mapping => mapping, :allow_nil => true,
+            :constructor => lambda{ |*args| 
+              cents, currency = args
+              ::Money.new(cents, (currency || ::Money.default_currency), options[:precision]) 
+            }
+
+          attr_accessor :"#{name}_before_type_cast"
+          
+          define_method "#{name}_with_cleanup=" do |amount|
+            send "#{name}_before_type_cast=", amount
+            
+            if amount.blank?
+              money = nil
+            elsif amount.is_a?(::Money)
+              # We may have been passed a money object whose currency does not match the
+              # current record's currency, in which case we have to perform currency conversion
+              if options[:currency] and (send(options[:currency]) != amount.currency)
+                raise "Can't convert money object to the #{options[:currency]} of this #{self.class} without a bank." if ::Money.bank.is_a?(NoExchangeBank)
+                money = amount.exchange_to(send(options[:currency]) || ::Money.default_currency)
+              else
+                money = amount
+              end
+            else
+              money = ::Money.new(amount.to_money(options[:precision]).cents, (options[:currency] ? send(options[:currency]) : ::Money.default_currency), options[:precision])
+            end
+              
+            send "#{name}_without_cleanup=", money
+          end
+          alias_method_chain "#{name}=", :cleanup
+        end
+      end
+    end
+  end
+end
+
+ActiveRecord::Base.send :include, ActiveRecord::Acts::Money

data/lib/money.rb

@@ -0,0 +1,213 @@
+require 'support/cattr_accessor'
+require 'money/bank/no_exchange_bank'
+require 'money/bank/variable_exchange_bank'
+require 'money/core_extensions'
+
+# === Usage with ActiveRecord
+# 
+# Use the compose_of helper to let active record deal with embedding the money
+# object in your models. The following example requires a cents and a currency field.
+# 
+#   class ProductUnit < ActiveRecord::Base
+#     belongs_to :product
+#     composed_of :price, :class_name => "Money", :mapping => [ %w(cents cents), %w(currency currency) ]
+# 
+#     private        
+#       validate :cents_not_zero
+#     
+#       def cents_not_zero
+#         errors.add("cents", "cannot be zero or less") unless cents > 0
+#       end
+#     
+#       validates_presence_of :sku, :currency
+#       validates_uniqueness_of :sku        
+#   end
+#   
+class Money
+  include Comparable
+
+  attr_reader :cents, :currency, :precision
+
+  class MoneyError < StandardError# :nodoc:
+  end
+
+  # Bank lets you exchange the object which is responsible for currency
+  # exchange. 
+  # The default implementation just throws an exception. However money
+  # ships with a variable exchange bank implementation which supports
+  # custom excahnge rates:
+  #
+  #  Money.bank = VariableExchangeBank.new
+  #  Money.bank.add_rate("USD", "CAD", 1.24515)
+  #  Money.bank.add_rate("CAD", "USD", 0.803115)
+  #  Money.us_dollar(100).exchange_to("CAD") => Money.ca_dollar(124)
+  #  Money.ca_dollar(100).exchange_to("USD") => Money.us_dollar(80)
+  @@bank = NoExchangeBank.new
+  cattr_accessor :bank
+
+  @@default_currency = "USD"
+  cattr_accessor :default_currency
+  
+  # String to use when formating zero values
+  cattr_accessor :zero
+
+  # Creates a new money object. 
+  #  Money.new(100) 
+  # 
+  # Alternativly you can use the convinience methods like 
+  # Money.ca_dollar and Money.us_dollar 
+  def initialize(cents, currency = default_currency, precision = 2)
+    @cents, @currency, @precision = cents.round, currency, precision
+  end
+
+  # Do two money objects equal? Only works if both objects are of the same currency
+  def eql?(other_money)
+    cents == other_money.cents && currency == other_money.currency
+  end
+
+  def <=>(other_money)
+    if currency == other_money.currency
+      cents <=> other_money.cents
+    else
+      cents <=> other_money.exchange_to(currency).cents
+    end
+  end
+
+  def +(other_money)
+    other_money = other_money.exchange_to(currency) unless other_money.currency == currency
+    
+    new_precision = [precision, other_money.precision].max
+    Money.new(to_precision(new_precision).cents + other_money.to_precision(new_precision).cents, currency, new_precision)
+  end
+
+  def -(other_money)
+    other_money = other_money.exchange_to(currency) unless other_money.currency == currency
+    
+    new_precision = [precision, other_money.precision].max
+    Money.new(to_precision(new_precision).cents - other_money.to_precision(new_precision).cents, currency, new_precision)
+  end
+
+  def -@
+    Money.new(-cents, currency, precision)
+  end
+
+  # multiply money by fixnum
+  def *(fixnum)
+    Money.new(cents * fixnum, currency, precision)
+  end
+
+  # divide money by fixnum
+  def /(fixnum)
+    Money.new(cents / fixnum, currency, precision)
+  end
+  
+  # Test if the money amount is zero
+  def zero?
+    cents == 0 
+  end
+
+
+  # Format the price according to several rules
+  # Currently supported are :with_currency, :no_cents and :html
+  #
+  # with_currency: 
+  #
+  #  Money.ca_dollar(0).format => "free"
+  #  Money.ca_dollar(100).format => "$1.00"
+  #  Money.ca_dollar(100).format(:with_currency) => "$1.00 CAD"
+  #  Money.us_dollar(85).format(:with_currency) => "$0.85 USD"
+  #
+  # no_cents:  
+  #
+  #  Money.ca_dollar(100).format(:no_cents) => "$1"
+  #  Money.ca_dollar(599).format(:no_cents) => "$5"
+  #  
+  #  Money.ca_dollar(570).format(:no_cents, :with_currency) => "$5 CAD"
+  #  Money.ca_dollar(39000).format(:no_cents) => "$390"
+  #
+  # html:
+  #
+  #  Money.ca_dollar(570).format(:html, :with_currency) =>  "$5.70 <span class=\"currency\">CAD</span>"
+  def format(*rules)
+    return self.class.zero if zero? && self.class.zero
+    
+    rules = rules.flatten
+
+    formatted = "$" + to_s(rules.include?(:no_cents) ? 0 : 2)
+
+    if rules.include?(:with_currency)
+      formatted << " "
+      formatted << '<span class="currency">' if rules.include?(:html)
+      formatted << currency
+      formatted << '</span>' if rules.include?(:html)
+    end
+    formatted
+  end
+
+  # Money.ca_dollar(100).to_s => "1.00"
+  def to_s(show_precision = precision)
+    if show_precision > 0
+      sprintf("%.#{show_precision}f", to_f  )
+    else
+      sprintf("%d", cents.to_f / 10 ** (precision - show_precision)  )
+    end
+  end
+  
+  def to_f
+    cents.to_f / 10 ** precision
+  end
+
+  # Recieve the amount of this money object in another currency   
+  def exchange_to(other_currency)
+    self.class.bank.exchange(self, other_currency)
+  end
+  
+  def to_precision(new_precision)
+    difference = new_precision - precision
+    new_cents = difference > 0 ? cents * 10**difference : (cents.to_f / 10**difference.abs).round
+    Money.new(new_cents, currency, new_precision)
+  end
+
+  # Create a new money object with value 0
+  def self.empty(currency = default_currency)
+    Money.new(0, currency)
+  end
+
+  # Create a new money object using the Canadian dollar currency
+  def self.ca_dollar(num)
+    Money.new(num, "CAD")
+  end
+
+  # Create a new money object using the American dollar currency
+  def self.us_dollar(num)
+    Money.new(num, "USD")
+  end
+
+  # Create a new money object using the Euro currency
+  def self.euro(num)
+    Money.new(num, "EUR")
+  end
+
+  # Recieve a money object with the same amount as the current Money object
+  # in american dollar 
+  def as_us_dollar
+    exchange_to("USD")
+  end
+
+  # Recieve a money object with the same amount as the current Money object
+  # in canadian dollar 
+  def as_ca_dollar
+    exchange_to("CAD")
+  end
+
+  # Recieve a money object with the same amount as the current Money object
+  # in euro
+  def as_ca_euro
+    exchange_to("EUR")
+  end  
+
+  # Conversation to self
+  def to_money(precision = nil)
+    precision ? to_precision(precision) : self
+  end  
+end

data/lib/support/cattr_accessor.rb

@@ -0,0 +1,57 @@
+# Extends the class object with class and instance accessors for class attributes, 
+# just like the native attr* accessors for instance attributes.
+class Class # :nodoc:
+  def cattr_reader(*syms)
+    syms.each do |sym|
+      class_eval <<-EOS
+        if ! defined? @@#{sym.id2name}
+          @@#{sym.id2name} = nil
+        end
+        
+        def self.#{sym.id2name}
+          @@#{sym}
+        end
+
+        def #{sym.id2name}
+          @@#{sym}
+        end
+
+        def call_#{sym.id2name}
+          case @@#{sym.id2name}
+            when Symbol then send(@@#{sym})
+            when Proc   then @@#{sym}.call(self)
+            when String then @@#{sym}
+            else nil
+          end
+        end
+      EOS
+    end
+  end unless instance_methods.include?('cattr_reader')
+  
+  def cattr_writer(*syms)
+    syms.each do |sym|
+      class_eval <<-EOS
+        if ! defined? @@#{sym.id2name}
+          @@#{sym.id2name} = nil
+        end
+        
+        def self.#{sym.id2name}=(obj)
+          @@#{sym.id2name} = obj
+        end
+
+        def self.set_#{sym.id2name}(obj)
+          @@#{sym.id2name} = obj
+        end
+
+        def #{sym.id2name}=(obj)
+          @@#{sym} = obj
+        end
+      EOS
+    end
+  end  unless instance_methods.include?('cattr_writer')
+  
+  def cattr_accessor(*syms)
+    cattr_reader(*syms)
+    cattr_writer(*syms)
+  end unless instance_methods.include?('cattr_accessor')
+end

metadata

@@ -0,0 +1,61 @@
+--- !ruby/object:Gem::Specification 
+name: steveluscher-money
+version: !ruby/object:Gem::Version 
+  version: 1.7.4.1
+platform: ruby
+authors: 
+- Brandon Keepers
+- Tobias Luetke
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-03-21 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: Class aiding in the handling of Money and Currencies. It supports easy pluggable bank objects for customized exchange strategies. Can be used as composite in ActiveRecord tables.
+email: brandon@opensoul.org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- README
+- MIT-LICENSE
+- lib/money.rb
+- lib/money/core_extensions.rb
+- lib/money/bank/no_exchange_bank.rb
+- lib/money/bank/variable_exchange_bank.rb
+- lib/money/rails.rb
+- lib/support/cattr_accessor.rb
+has_rdoc: true
+homepage: http://github.com/collectiveidea/money
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Class aiding in the handling of Money.
+test_files: []
+