samoli-money 2.1.4

data/MIT-LICENSE

@@ -0,0 +1,21 @@
+Copyright (c) 2005 Tobias Lutke
+Copyright (c) 2008 Phusion
+
+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.rdoc

@@ -0,0 +1,97 @@
+= Introduction
+
+This library aids one in handling money and different currencies. Features:
+
+- Provides a Money class which encapsulates all information about an certain
+  amount of money, such as its value and its currency.
+- Represents monetary values as integers, in cents. This avoids floating point
+  rounding errors.
+- Provides APIs for exchanging money from one currency to another.
+- Has the ability to parse a money string into a Money object.
+
+Resources:
+
+- Website: http://money.rubyforge.org
+- RDoc API: http://money.rubyforge.org
+- Git repository: http://github.com/FooBarWidget/money/tree/master
+
+== Download
+
+Install stable releases with the following command:
+
+  gem install money
+
+The development version (hosted on Github) can be installed with:
+
+  gem sources -a http://gems.github.com
+  gem install FooBarWidget-money
+
+== Usage
+
+=== Synopsis
+
+  require 'money'
+  
+  # 10.00 USD
+  money = Money.new(1000, "USD")
+  money.cents     # => 1000
+  money.currency  # => "USD"
+  
+  Money.new(1000, "USD") == Money.new(1000, "USD")   # => true
+  Money.new(1000, "USD") == Money.new(100, "USD")    # => false
+  Money.new(1000, "USD") == Money.new(1000, "EUR")   # => false
+
+=== Currency Exchange
+
+Exchanging money is performed through an exchange bank object. The default
+exchange bank object requires one to manually specify the exchange rate. Here's
+an example of how it works:
+
+  Money.add_rate("USD", "CAD", 1.24515)
+  Money.add_rate("CAD", "USD", 0.803115)
+  
+  Money.us_dollar(100).exchange_to("CAD")  # => Money.new(124, "CAD")
+  Money.ca_dollar(100).exchange_to("USD")  # => Money.new(80, "USD")
+
+Comparison and arithmetic operations work as expected:
+
+  Money.new(1000, "USD") <=> Money.new(900, "USD")   # => 1; 9.00 USD is smaller
+  Money.new(1000, "EUR") + Money.new(10, "EUR") == Money.new(1010, "EUR")
+  
+  Money.add_rate("USD", "EUR", 0.5)
+  Money.new(1000, "EUR") + Money.new(1000, "USD") == Money.new(1500, "EUR")
+
+There is nothing stopping you from creating bank objects which scrapes
+www.xe.com for the current rates or just returns <tt>rand(2)</tt>:
+
+  Money.default_bank = ExchangeBankWhichScrapesXeDotCom.new
+
+=== Ruby on Rails
+
+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
+  
+=== Default Currency
+
+By default Money defaults to USD as its currency. This can be overwritten using
+
+  Money.default_currency = "CAD"
+
+If you use Rails, then environment.rb is a very good place to put this. 
+

data/Rakefile

@@ -0,0 +1,18 @@
+desc "Build a gem"
+task :gem do
+	sh "gem build money.gemspec"
+end
+
+task "Generate RDoc documentation"
+task :rdoc do
+	sh "hanna README.rdoc lib -U"
+end
+
+task :upload => :rdoc do
+	sh "scp -r doc/* rubyforge.org:/var/www/gforge-projects/money/"
+end
+
+desc "Run unit tests"
+task :test do
+	ruby "-S spec -f s -c test/*_spec.rb"
+end

data/lib/money.rb

@@ -0,0 +1,26 @@
+# Copyright (c) 2005 Tobias Luetke
+# Copyright (c) 2008 Phusion
+#
+# 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.
+
+$LOAD_PATH << File.expand_path(File.dirname(__FILE__))
+require 'money/money'
+require 'money/symbols'
+require 'money/core_extensions'

data/lib/money/core_extensions.rb

@@ -0,0 +1,138 @@
+class Numeric
+  # Converts this numeric to a Money object in the default currency. It
+  # multiplies the numeric value by 100 and treats that as cents.
+  #
+  #   100.to_money => #<Money @cents=10000>
+  #   100.37.to_money => #<Money @cents=10037>
+  def to_money
+    Money.new(self * 100)
+  end
+end
+
+class String
+  # Parses the current string and converts it to a Money object.
+  # Excess characters will be discarded.
+  #
+  #   '100'.to_money       # => #<Money @cents=10000>
+  #   '100.37'.to_money    # => #<Money @cents=10037>
+  #   '100 USD'.to_money   # => #<Money @cents=10000, @currency="USD">
+  #   'USD 100'.to_money   # => #<Money @cents=10000, @currency="USD">
+  #   '$100 USD'.to_money  # => #<Money @cents=10000, @currency="USD">
+  #   'hello 2000 world'.to_money   # => #<Money @cents=200000 @currency="USD")>
+  def to_money
+    # Get the currency.
+    matches = scan /([A-Z]{2,3})/
+    currency = matches[0] ? matches[0][0] : Money.default_currency
+    cents = calculate_cents(self)
+    Money.new(cents, currency)
+  end
+  
+  private
+  
+  def calculate_cents(number)
+    # remove anything that's not a number, potential delimiter, or minus sign
+    num = number.gsub(/[^\d|\.|,|\'|\s|\-]/, '').strip
+    
+    # set a boolean flag for if the number is negative or not
+    negative = num.split(//).first == "-"
+    
+    # if negative, remove the minus sign from the number
+    num = num.gsub(/^-/, '') if negative
+    
+    # gather all separators within the result number
+    used_separators = num.scan /[^\d]/
+    
+    # determine the number of unique separators within the number
+    #
+    # e.g.
+    # $1,234,567.89 would return 2 (, and .)
+    # $125,00 would return 1
+    # $199 would return 0
+    # $1 234,567.89 would raise an error (separators are space, comma, and period)
+    case used_separators.uniq.length
+    # no separator or delimiter; major (dollars) is the number, and minor (cents) is 0
+    when 0 then major, minor = num, 0
+    
+    # two separators, so we know the last item in this array is the 
+    # major/minor delimiter and the rest are separators
+    when 2
+      separator, delimiter = used_separators.uniq
+      # remove all separators, split on the delimiter
+      major, minor = num.gsub(separator, '').split(delimiter)
+      min = 0 unless min
+    when 1
+      # we can't determine if the comma or period is supposed to be a separator or a delimiter
+      # e.g.
+      # 1,00 - comma is a delimiter
+      # 1.000 - period is a delimiter
+      # 1,000 - comma is a separator
+      # 1,000,000 - comma is a separator
+      # 10000,00 - comma is a delimiter
+      # 1000,000 - comma is a delimiter
+      
+      # assign first separator for reusability
+      separator = used_separators.first
+      
+      # separator is used as a separator when there are multiple instances, always
+      if num.scan(separator).length > 1 # multiple matches; treat as separator
+        major, minor = num.gsub(separator, ''), 0
+      else
+        # ex: 1,000 - 1.0000 - 10001.000
+        # split number into possible major (dollars) and minor (cents) values
+        possible_major, possible_minor = num.split(separator)
+        possible_major ||= "0"
+        possible_minor ||= "00"
+        
+        # if the minor (cents) length isn't 3, assign major/minor from the possibles
+        # e.g.
+        #   1,00 => 1.00
+        #   1.0000 => 1.00
+        #   1.2 => 1.20
+        if possible_minor.length != 3 # delimiter
+          major, minor = possible_major, possible_minor
+        else
+          # minor length is three
+          # let's try to figure out intent of the delimiter
+          
+          # the major length is greater than three, which means 
+          # the comma or period is used as a delimiter
+          # e.g.
+          #   1000,000
+          #   100000,000
+          if possible_major.length > 3
+            major, minor = possible_major, possible_minor
+          else
+            # number is in format ###{sep}### or ##{sep}### or #{sep}###
+            # handle as , is sep, . is delimiter
+            if separator == '.'
+              major, minor = possible_major, possible_minor
+            else
+              major, minor = "#{possible_major}#{possible_minor}", 0
+            end
+          end
+        end
+      end
+    else
+      raise ArgumentError, "Invalid currency amount"
+    end
+    
+    # build the string based on major/minor since separator/delimiters have been removed
+    # avoiding floating point arithmetic here to ensure accuracy
+    cents = (major.to_i * 100)
+    # add the minor number as well. this may have any number of digits,
+    # so we treat minor as a string and truncate or right-fill it with zeroes
+    # until it becomes a two-digit number string, which we add to cents.
+    minor = minor.to_s
+    truncated_minor = minor[0..1]
+    truncated_minor << "0" * (2 - truncated_minor.size) if truncated_minor.size < 2
+    cents += truncated_minor.to_i
+    # respect rounding rules
+    if minor.size >= 3 && minor[2..2].to_i >= 5
+      cents += 1
+    end
+    
+    # if negative, multiply by -1; otherwise, return positive cents
+    negative ? cents * -1 : cents
+  end
+  
+end

data/lib/money/errors.rb

@@ -0,0 +1,4 @@
+class Money
+  class UnknownRate < StandardError
+  end
+end

data/lib/money/money.rb

@@ -0,0 +1,286 @@
+require 'money/variable_exchange_bank'
+
+# Represents an amount of money in a certain currency.
+class Money
+  include Comparable
+
+  attr_reader :cents, :currency, :bank
+  
+  class << self
+    # Each Money object is associated to a bank object, which is responsible
+    # for currency exchange. This property allows one to specify the default
+    # bank object.
+    #
+    #   bank1 = MyBank.new
+    #   bank2 = MyOtherBank.new
+    #   
+    #   Money.default_bank = bank1
+    #   money1 = Money.new(10)
+    #   money1.bank  # => bank1
+    #   
+    #   Money.default_bank = bank2
+    #   money2 = Money.new(10)
+    #   money2.bank  # => bank2
+    #   money1.bank  # => bank1
+    #
+    # The default value for this property is an instance if VariableExchangeBank.
+    # It allows one to specify custom exchange rates:
+    #
+    #   Money.default_bank.add_rate("USD", "CAD", 1.24515)
+    #   Money.default_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)
+    attr_accessor :default_bank
+    
+    # The default currency, which is used when <tt>Money.new</tt> is called
+    # without an explicit currency argument. The default value is "USD".
+    attr_accessor :default_currency
+  end
+  
+  self.default_bank = VariableExchangeBank.instance
+  self.default_currency = "USD"
+  
+  
+  # Create a new money object with value 0.
+  def self.empty(currency = default_currency)
+    Money.new(0, currency)
+  end
+
+  # Creates a new Money object of the given value, using the Canadian dollar currency.
+  def self.ca_dollar(cents)
+    Money.new(cents, "CAD")
+  end
+
+  # Creates a new Money object of the given value, using the American dollar currency.
+  def self.us_dollar(cents)
+    Money.new(cents, "USD")
+  end
+  
+  # Creates a new Money object of the given value, using the Euro currency.
+  def self.euro(cents)
+    Money.new(cents, "EUR")
+  end
+  
+  def self.add_rate(from_currency, to_currency, rate)
+    Money.default_bank.add_rate(from_currency, to_currency, rate)
+  end
+  
+  
+  # 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 = Money.default_currency, bank = Money.default_bank)
+    @cents = cents.round
+    @currency = currency
+    @bank = bank
+  end
+
+  # Do two money objects equal? Only works if both objects are of the same currency
+  def ==(other_money)
+    cents == other_money.cents && bank.same_currency?(currency, other_money.currency)
+  end
+
+  def <=>(other_money)
+    if bank.same_currency?(currency, other_money.currency)
+      cents <=> other_money.cents
+    else
+      cents <=> other_money.exchange_to(currency).cents
+    end
+  end
+
+  def +(other_money)
+    if currency == other_money.currency
+      Money.new(cents + other_money.cents, other_money.currency)
+    else
+      Money.new(cents + other_money.exchange_to(currency).cents,currency)
+    end
+  end
+
+  def -(other_money)
+    if currency == other_money.currency
+      Money.new(cents - other_money.cents, other_money.currency)
+    else
+      Money.new(cents - other_money.exchange_to(currency).cents, currency)
+    end
+  end
+
+  # get the cents value of the object
+  def cents
+    @cents
+  end
+
+  # multiply money by fixnum
+  def *(fixnum)
+    Money.new(cents * fixnum, currency)
+  end
+
+  # divide money by fixnum
+  def /(fixnum)
+    Money.new(cents / fixnum, currency)
+  end
+  
+  # Test if the money amount is zero
+  def zero?
+    cents == 0
+  end
+
+
+  # Creates a formatted price string according to several rules. The following
+  # options are supported: :display_free, :with_currency, :no_cents, :symbol
+  # and :html.
+  #
+  # === +:display_free+
+  #
+  # Whether a zero amount of money should be formatted of "free" or as the
+  # supplied string.
+  #
+  #  Money.us_dollar(0).format(:display_free => true)      => "free"
+  #  Money.us_dollar(0).format(:display_free => "gratis")  => "gratis"
+  #  Money.us_dollar(0).format => "$0.00"
+  #
+  # === +:with_currency+
+  #
+  # Whether the currency name should be appended to the result string.
+  #
+  #  Money.ca_dollar(100).format => "$1.00"
+  #  Money.ca_dollar(100).format(:with_currency => true) => "$1.00 CAD"
+  #  Money.us_dollar(85).format(:with_currency => true)  => "$0.85 USD"
+  #
+  # === +:no_cents+
+  #
+  # Whether cents should be omitted.
+  #
+  #  Money.ca_dollar(100).format(:no_cents => true) => "$1"
+  #  Money.ca_dollar(599).format(:no_cents => true) => "$5"
+  #  
+  #  Money.ca_dollar(570).format(:no_cents => true, :with_currency => true) => "$5 CAD"
+  #  Money.ca_dollar(39000).format(:no_cents => true) => "$390"
+  #
+  # === +:symbol+
+  #
+  # Whether a money symbol should be prepended to the result string. The default is true.
+  # This method attempts to pick a symbol that's suitable for the given currency.
+  #
+  #  Money.new(100, "USD")  => "$1.00"
+  #  Money.new(100, "GBP")  => "£1.00"
+  #  Money.new(100, "EUR")  => "€1.00"
+  #  
+  #  # Same thing.
+  #  Money.new(100, "USD").format(:symbol => true)  => "$1.00"
+  #  Money.new(100, "GBP").format(:symbol => true)  => "£1.00"
+  #  Money.new(100, "EUR").format(:symbol => true)  => "€1.00"
+  #
+  # You can specify a false expression or an empty string to disable prepending
+  # a money symbol:
+  #
+  #  Money.new(100, "USD").format(:symbol => false)  => "1.00"
+  #  Money.new(100, "GBP").format(:symbol => nil)    => "1.00"
+  #  Money.new(100, "EUR").format(:symbol => "")     => "1.00"
+  #
+  #  
+  # If the symbol for the given currency isn't known, then it will default
+  # to "$" as symbol:
+  #
+  #  Money.new(100, "AWG").format(:symbol => true)  => "$1.00"
+  #
+  # You can specify a string as value to enforce using a particular symbol:
+  #
+  #  Money.new(100, "AWG").format(:symbol => "ƒ")   => "ƒ1.00"
+  #
+  # === +:html+
+  #
+  # Whether the currency should be HTML-formatted. Only useful in combination with +:with_currency+.
+  #
+  #  Money.ca_dollar(570).format(:html => true, :with_currency => true)
+  #    =>  "$5.70 <span class=\"currency\">CAD</span>"
+  def format(*rules)
+    # support for old format parameters
+    rules = normalize_formatting_rules(rules)
+    rules[:symbol] = true unless rules.has_key?(:symbol)
+    
+    if cents == 0
+      if rules[:display_free].respond_to?(:to_str)
+        return rules[:display_free]
+      elsif rules[:display_free]
+        return "free"
+      end
+    end
+        
+    if rules[:symbol] === true
+      symbol = SYMBOLS[currency] || "$"
+    elsif rules[:symbol]
+      symbol = rules[:symbol]
+    else
+      symbol = ""
+    end
+    
+    if rules[:no_cents]
+      formatted = sprintf("#{symbol}%d", cents.to_f / 100)
+    else
+      formatted = sprintf("#{symbol}%.2f", cents.to_f / 100)
+    end
+    
+    # Commify ("10000" => "10,000")
+    formatted.gsub!(/(\d)(?=\d{3}+(?:\.|$))(\d{3}\..*)?/,'\1,\2')
+
+    if rules[:with_currency]
+      formatted << " "
+      formatted << '<span class="currency">' if rules[:html]
+      formatted << currency
+      formatted << '</span>' if rules[:html]
+    end
+    formatted
+  end  
+  
+  # Returns the amount of money as a string.
+  #
+  #  Money.ca_dollar(100).to_s => "1.00"
+  def to_s
+    sprintf("%.2f", cents / 100.00)
+  end
+  
+  # Recieve the amount of this money object in another currency.
+  def exchange_to(other_currency)
+    Money.new(@bank.exchange(self.cents, currency, other_currency), other_currency)
+  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_euro
+    exchange_to("EUR")
+  end
+  
+  # Conversation to self
+  def to_money
+    self
+  end
+  
+  private
+  
+  def normalize_formatting_rules(rules)
+    if rules.size == 1
+      rules = rules.pop
+      rules = { rules => true } if rules.is_a?(Symbol)
+    else
+      rules = rules.inject({}) do |h,s|
+        h[s] = true
+        h
+      end
+    end
+    rules
+  end
+end

data/lib/money/symbols.rb

@@ -0,0 +1,18 @@
+# encoding: utf-8
+
+# Add more from http://www.xe.com/symbols.php
+Money::SYMBOLS = {
+  "GBP" => "£",
+  "JPY" => "¥",
+  "EUR" => "€",
+  "ZWD" => "Z$",
+  "CNY" => "¥",
+  "INR" => "₨",
+  "NPR" => "₨",
+  "SCR" => "₨",
+  "LKR" => "₨",
+  "SEK" => "kr",
+  "GHC" => "¢"
+  
+  # Everything else defaults to $
+}

data/lib/money/variable_exchange_bank.rb

@@ -0,0 +1,72 @@
+require 'thread'
+require 'money/errors'
+
+# Class for aiding in exchanging money between different currencies.
+# By default, the Money class uses an object of this class (accessible through
+# Money#bank) for performing currency exchanges.
+#
+# By default, VariableExchangeBank has no knowledge about conversion rates.
+# One must manually specify them with +add_rate+, after which one can perform
+# exchanges with +exchange+. For example:
+#
+#  bank = Money::VariableExchangeBank.new
+#  bank.add_rate("USD", "CAD", 1.24515)
+#  bank.add_rate("CAD", "USD", 0.803115)
+#  
+#  # Exchange 100 CAD to USD:
+#  bank.exchange(100_00, "CAD", "USD")  # => 124
+#  # Exchange 100 USD to CAD:
+#  bank.exchange(100_00, "USD", "CAD")  # => 80
+class Money
+  class VariableExchangeBank
+    # Returns the singleton instance of VariableExchangeBank.
+    #
+    # By default, <tt>Money.default_bank</tt> returns the same object.
+    def self.instance
+      @@singleton
+    end
+    
+    def initialize
+      @rates = {}
+      @mutex = Mutex.new
+    end
+    
+    # Registers a conversion rate. +from+ and +to+ are both currency names.
+    def add_rate(from, to, rate)
+      @mutex.synchronize do
+        @rates["#{from}_TO_#{to}".upcase] = rate
+      end
+    end
+    
+    # Gets the rate for exchanging the currency named +from+ to the currency
+    # named +to+. Returns nil if the rate is unknown.
+    def get_rate(from, to)
+      @mutex.synchronize do
+        @rates["#{from}_TO_#{to}".upcase] 
+      end
+    end
+    
+    # Given two currency names, checks whether they're both the same currency.
+    #
+    #   bank = VariableExchangeBank.new
+    #   bank.same_currency?("usd", "USD")   # => true
+    #   bank.same_currency?("usd", "EUR")   # => false
+    def same_currency?(currency1, currency2)
+      currency1.upcase == currency2.upcase
+    end
+    
+    # Exchange the given amount of cents in +from_currency+ to +to_currency+.
+    # Returns the amount of cents in +to_currency+ as an integer, rounded down.
+    #
+    # If the conversion rate is unknown, then Money::UnknownRate will be raised.
+    def exchange(cents, from_currency, to_currency)
+      rate = get_rate(from_currency, to_currency)
+      if !rate
+        raise Money::UnknownRate, "No conversion rate known for '#{from_currency}' -> '#{to_currency}'"
+      end
+      (cents * rate).floor
+    end
+    
+    @@singleton = VariableExchangeBank.new
+  end
+end

data/money.gemspec

@@ -0,0 +1,24 @@
+Gem::Specification.new do |s|
+  s.name = "samoli-money"
+  s.version = "2.1.4"
+  s.summary = "Money and currency exchange support library"
+  s.email = "hongli@phusion.nl"
+  s.homepage = "http://money.rubyforge.org/"
+  s.description = "Money and currency exchange support library."
+  s.has_rdoc = true
+  s.rubyforge_project = "samoli-money"
+  s.authors = ["Tobias Luetke", "Hongli Lai", "Jeremy McNevin"]
+  
+  s.files = [
+      "README.rdoc", "MIT-LICENSE", "money.gemspec", "Rakefile",
+      "lib/money.rb",
+      "lib/money/core_extensions.rb",
+      "lib/money/errors.rb",
+      "lib/money/money.rb",
+      "lib/money/symbols.rb",
+      "lib/money/variable_exchange_bank.rb",
+      "test/core_extensions_spec.rb",
+      "test/exchange_bank_spec.rb",
+      "test/money_spec.rb"
+  ]
+end

data/test/core_extensions_spec.rb

@@ -0,0 +1,73 @@
+$LOAD_PATH.unshift(File.expand_path(File.dirname(__FILE__) + "/../lib"))
+require 'money/core_extensions'
+
+describe "Money core extensions" do
+  specify "Numberic#to_money works" do
+    money = 1234.to_money
+    money.cents.should == 1234_00
+    money.currency.should == Money.default_currency
+    
+    money = 100.37.to_money
+    money.cents.should == 100_37
+    money.currency.should == Money.default_currency
+  end
+  
+  specify "String#to_money works" do
+    "20.15".to_money.should == Money.new(20_15)
+    "100".to_money.should == Money.new(100_00)
+    "100.37".to_money.should == Money.new(100_37)
+    "100,37".to_money.should == Money.new(100_37)
+    "100 000".to_money.should == Money.new(100_000_00)
+    "100,000.00".to_money.should == Money.new(100_000_00)
+    "1,000".to_money.should == Money.new(1_000_00)
+    "-1,000".to_money.should == Money.new(-1_000_00)
+    "1,000.5".to_money.should == Money.new(1_000_50)
+    "1,000.51".to_money.should == Money.new(1_000_51)
+    "1,000.505".to_money.should == Money.new(1_000_51)
+    "1,000.504".to_money.should == Money.new(1_000_50)
+    "1,000.0000".to_money.should == Money.new(1_000_00)
+    "1,000.5000".to_money.should == Money.new(1_000_50)
+    "1,000.5099".to_money.should == Money.new(1_000_51)
+    "1.550".to_money.should == Money.new(1_55)
+    "25.".to_money.should == Money.new(25_00)
+    ".75".to_money.should == Money.new(75)
+    
+    "100 USD".to_money.should == Money.new(100_00, "USD")
+    "-100 USD".to_money.should == Money.new(-100_00, "USD")
+    "100 EUR".to_money.should == Money.new(100_00, "EUR")
+    "100.37 EUR".to_money.should == Money.new(100_37, "EUR")
+    "100,37 EUR".to_money.should == Money.new(100_37, "EUR")
+    "100,000.00 USD".to_money.should == Money.new(100_000_00, "USD")
+    "100.000,00 EUR".to_money.should == Money.new(100_000_00, "EUR")
+    "1,000 USD".to_money.should == Money.new(1_000_00, "USD")
+    "-1,000 USD".to_money.should == Money.new(-1_000_00, "USD")
+    "1,000.5500 USD".to_money.should == Money.new(1_000_55, "USD")
+    "-1,000.6500 USD".to_money.should == Money.new(-1_000_65, "USD")
+    "1.550 USD".to_money.should == Money.new(1_55, "USD")
+    
+    "USD 100".to_money.should == Money.new(100_00, "USD")
+    "EUR 100".to_money.should == Money.new(100_00, "EUR")
+    "EUR 100.37".to_money.should == Money.new(100_37, "EUR")
+    "CAD -100.37".to_money.should == Money.new(-100_37, "CAD")
+    "EUR 100,37".to_money.should == Money.new(100_37, "EUR")
+    "EUR -100,37".to_money.should == Money.new(-100_37, "EUR")
+    "USD 100,000.00".to_money.should == Money.new(100_000_00, "USD")
+    "EUR 100.000,00".to_money.should == Money.new(100_000_00, "EUR")
+    "USD 1,000".to_money.should == Money.new(1_000_00, "USD")
+    "USD -1,000".to_money.should == Money.new(-1_000_00, "USD")
+    "USD 1,000.9000".to_money.should == Money.new(1_000_90, "USD")
+    "USD -1,000.090".to_money.should == Money.new(-1_000_09, "USD")
+    "USD 1.5500".to_money.should == Money.new(1_55, "USD")
+    
+    "$100 USD".to_money.should == Money.new(100_00, "USD")
+    "$1,194.59 USD".to_money.should == Money.new(1_194_59, "USD")
+    "$-1,955 USD".to_money.should == Money.new(-1_955_00, "USD")
+    "$1,194.5900 USD".to_money.should == Money.new(1_194_59, "USD")
+    "$-1,955.000 USD".to_money.should == Money.new(-1_955_00, "USD")
+    "$1.99000 USD".to_money.should == Money.new(1_99, "USD")
+  end
+  
+  specify "String#to_money ignores unrecognized data" do
+    "hello 2000 world".to_money.should == Money.new(2000_00)
+  end
+end

data/test/exchange_bank_spec.rb

@@ -0,0 +1,45 @@
+$LOAD_PATH.unshift(File.expand_path(File.dirname(__FILE__) + "/../lib"))
+require 'money/variable_exchange_bank'
+
+describe Money::VariableExchangeBank do
+  before :each do
+    @bank = Money::VariableExchangeBank.new
+  end
+  
+  it "returns the previously specified conversion rate" do
+    @bank.add_rate("USD", "EUR", 0.788332676)
+    @bank.add_rate("EUR", "YEN", 122.631477)
+    @bank.get_rate("USD", "EUR").should == 0.788332676
+    @bank.get_rate("EUR", "YEN").should == 122.631477
+  end
+  
+  it "treats currency names case-insensitively" do
+    @bank.add_rate("usd", "eur", 1)
+    @bank.get_rate("USD", "EUR").should == 1
+    @bank.same_currency?("USD", "usd").should be_true
+    @bank.same_currency?("EUR", "usd").should be_false
+  end
+  
+  it "returns nil if the conversion rate is unknown" do
+    @bank.get_rate("American Pesos", "EUR").should be_nil
+  end
+  
+  it "exchanges money from one currency to another according to the specified conversion rates" do
+    @bank.add_rate("USD", "EUR", 0.5)
+    @bank.add_rate("EUR", "YEN", 10)
+    @bank.exchange(10_00, "USD", "EUR").should == 5_00
+    @bank.exchange(500_00, "EUR", "YEN").should == 5000_00
+  end
+  
+  it "rounds the exchanged result down" do
+    @bank.add_rate("USD", "EUR", 0.788332676)
+    @bank.add_rate("EUR", "YEN", 122.631477)
+    @bank.exchange(10_00, "USD", "EUR").should == 788
+    @bank.exchange(500_00, "EUR", "YEN").should == 6131573
+  end
+  
+  it "raises Money::UnknownRate upon conversion if the conversion rate is unknown" do
+    block = lambda { @bank.exchange(10, "USD", "EUR") }
+    block.should raise_error(Money::UnknownRate)
+  end
+end

data/test/money_spec.rb

@@ -0,0 +1,244 @@
+# encoding: utf-8
+$LOAD_PATH.unshift(File.expand_path(File.dirname(__FILE__) + "/../lib"))
+require 'money/money'
+require 'money/symbols'
+
+describe Money do
+  it "is associated to the singleton instance of VariableExchangeBank by default" do
+    Money.new(0).bank.object_id.should == Money::VariableExchangeBank.instance.object_id
+  end
+  
+  specify "#cents returns the amount of cents passed to the constructor" do
+    Money.new(200_00, "USD").cents.should == 200_00
+  end
+  
+  it "rounds the given cents to an integer" do
+    Money.new(1.00, "USD").cents.should == 1
+    Money.new(1.01, "USD").cents.should == 1
+    Money.new(1.50, "USD").cents.should == 2
+  end
+  
+  specify "#currency returns the currency passed to the constructor" do
+    Money.new(200_00, "USD").currency.should == "USD"
+  end
+  
+  specify "#zero? returns whether the amount is 0" do
+    Money.new(0, "USD").should be_zero
+    Money.new(0, "EUR").should be_zero
+    Money.new(1, "USD").should_not be_zero
+    Money.new(10, "YEN").should_not be_zero
+    Money.new(-1, "EUR").should_not be_zero
+  end
+  
+  specify "#exchange_to exchanges the amount via its exchange bank" do
+    money = Money.new(100_00, "USD")
+    money.bank.should_receive(:exchange).with(100_00, "USD", "EUR").and_return(200_00)
+    money.exchange_to("EUR")
+  end
+  
+  specify "#exchange_to exchanges the amount properly" do
+    money = Money.new(100_00, "USD")
+    money.bank.should_receive(:exchange).with(100_00, "USD", "EUR").and_return(200_00)
+    money.exchange_to("EUR").should == Money.new(200_00, "EUR")
+  end
+  
+  specify "#== returns true if and only if their amount and currency are equal" do
+    Money.new(1_00, "USD").should == Money.new(1_00, "USD")
+    Money.new(1_00, "USD").should_not == Money.new(1_00, "EUR")
+    Money.new(1_00, "USD").should_not == Money.new(2_00, "USD")
+    Money.new(1_00, "USD").should_not == Money.new(99_00, "EUR")
+  end
+  
+  specify "#* multiplies the money's amount by the multiplier while retaining the currency" do
+    (Money.new(1_00, "USD") * 10).should == Money.new(10_00, "USD")
+  end
+  
+  specify "#* divides the money's amount by the divisor while retaining the currency" do
+    (Money.new(10_00, "USD") / 10).should == Money.new(1_00, "USD")
+  end
+  
+  specify "Money.empty creates a new Money object of 0 cents" do
+    Money.empty.should == Money.new(0)
+  end
+  
+  specify "Money.ca_dollar creates a new Money object of the given value in CAD" do
+    Money.ca_dollar(50).should == Money.new(50, "CAD")
+  end
+  
+  specify "Money.ca_dollar creates a new Money object of the given value in USD" do
+    Money.us_dollar(50).should == Money.new(50, "USD")
+  end
+  
+  specify "Money.ca_dollar creates a new Money object of the given value in EUR" do
+    Money.euro(50).should == Money.new(50, "EUR")
+  end
+  
+  specify "Money.add_rate works" do
+    Money.add_rate("EUR", "USD", 10)
+    Money.new(10_00, "EUR").exchange_to("USD").should == Money.new(100_00, "USD")
+  end
+  
+  describe "#format" do
+    it "returns the monetary value as a string" do
+      Money.ca_dollar(100).format.should == "$1.00"
+    end
+    
+    describe "if the monetary value is 0" do
+      before :each do
+        @money = Money.us_dollar(0)
+      end
+      
+      it "returns 'free' when :display_free is true" do
+        @money.format(:display_free => true).should == 'free'
+      end
+    
+      it "returns '$0.00' when :display_free is false or not given" do
+        @money.format.should == '$0.00'
+        @money.format(:display_free => false).should == '$0.00'
+        @money.format(:display_free => nil).should == '$0.00'
+      end
+      
+      it "returns the value specified by :display_free if it's a string-like object" do
+        @money.format(:display_free => 'gratis').should == 'gratis'
+      end
+    end
+    
+    specify "#format(:with_currency => true) works as documented" do
+      Money.ca_dollar(100).format(:with_currency => true).should == "$1.00 CAD"
+      Money.us_dollar(85).format(:with_currency => true).should == "$0.85 USD"
+      Money.us_dollar(85).format(:with_currency).should == "$0.85 USD"
+    end
+    
+    specify "#format(:with_currency) works as documented" do
+      Money.ca_dollar(100).format(:with_currency).should == "$1.00 CAD"
+      Money.us_dollar(85).format(:with_currency).should == "$0.85 USD"
+    end
+    
+    specify "#format(:no_cents => true) works as documented" do
+      Money.ca_dollar(100).format(:no_cents => true).should == "$1"
+      Money.ca_dollar(599).format(:no_cents => true).should == "$5"
+      Money.ca_dollar(570).format(:no_cents => true, :with_currency => true).should == "$5 CAD"
+      Money.ca_dollar(39000).format(:no_cents => true).should == "$390"
+    end
+
+    specify "#format(:no_cents) works as documented" do
+      Money.ca_dollar(100).format(:no_cents).should == "$1"
+      Money.ca_dollar(599).format(:no_cents).should == "$5"
+      Money.ca_dollar(570).format(:no_cents, :with_currency).should == "$5 CAD"
+      Money.ca_dollar(39000).format(:no_cents).should == "$390"
+    end
+    
+    specify "#format(:symbol => a symbol string) uses the given value as the money symbol" do
+      Money.new(100, :currency => "GBP").format(:symbol => "£").should == "£1.00"
+    end
+    
+    specify "#format(:symbol => true) returns symbol based on the given currency code" do
+      one = Proc.new {|currency| Money.new(100, currency).format(:symbol => true) }
+
+      # Pounds
+      one["GBP"].should == "£1.00"
+      
+      # Dollars
+      one["USD"].should == "$1.00"
+      one["CAD"].should == "$1.00"
+      one["AUD"].should == "$1.00"
+      one["NZD"].should == "$1.00"
+      one["ZWD"].should == "Z$1.00"
+      
+      # Yen
+      one["JPY"].should == "¥1.00"      
+      one["CNY"].should == "¥1.00"      
+      
+      # Euro
+      one["EUR"].should == "€1.00"
+      
+      # Rupees
+      one["INR"].should == "₨1.00"
+      one["NPR"].should == "₨1.00"
+      one["SCR"].should == "₨1.00"
+      one["LKR"].should == "₨1.00"
+      
+      # Other
+      one["SEK"].should == "kr1.00"
+      one["GHC"].should == "¢1.00"
+    end
+    
+    specify "#format(:symbol => true) returns $ when currency code is not recognized" do
+      Money.new(100, :currency => "XYZ").format(:symbol => true).should == "$1.00"
+    end
+    
+    specify "#format(:symbol => some non-Boolean value that evaluates to true) returs symbol based on the given currency code" do
+      Money.new(100, "GBP").format(:symbol => true).should == "£1.00"
+      Money.new(100, "EUR").format(:symbol => true).should == "€1.00"
+      Money.new(100, "SEK").format(:symbol => true).should == "kr1.00"
+    end
+    
+    specify "#format with :symbol == "", nil or false returns the amount without a symbol" do
+      money = Money.new(100, "GBP")
+      money.format(:symbol => "").should == "1.00"
+      money.format(:symbol => nil).should == "1.00"
+      money.format(:symbol => false).should == "1.00"
+    end
+    
+    specify "#format without :symbol key set works as documented" do
+      money = Money.new(100, "GBP")
+      money.format.should == "£1.00"
+    end
+    
+    specify "#format(:html => true) works as documented" do
+      string = Money.ca_dollar(570).format(:html => true, :with_currency => true)
+      string.should == "$5.70 <span class=\"currency\">CAD</span>"
+    end
+    
+    it "should insert commas into the result if the amount is sufficiently large" do
+      Money.us_dollar(1_000_000_000_12).format.should == "$1,000,000,000.12"
+      Money.us_dollar(1_000_000_000_12).format(:no_cents => true).should == "$1,000,000,000"
+    end
+  end
+end
+
+describe "Actions involving two Money objects" do
+  describe "if the other Money object has the same currency" do
+    specify "#<=> compares the two objects' amounts" do
+      (Money.new(1_00, "USD") <=> Money.new(1_00, "USD")).should == 0
+      (Money.new(1_00, "USD") <=> Money.new(99, "USD")).should > 0
+      (Money.new(1_00, "USD") <=> Money.new(2_00, "USD")).should < 0
+    end
+    
+    specify "#+ adds the other object's amount to the current object's amount while retaining the currency" do
+      (Money.new(10_00, "USD") + Money.new(90, "USD")).should == Money.new(10_90, "USD")
+    end
+    
+    specify "#- substracts the other object's amount from the current object's amount while retaining the currency" do
+      (Money.new(10_00, "USD") - Money.new(90, "USD")).should == Money.new(9_10, "USD")
+    end
+  end
+  
+  describe "if the other Money object has a different currency" do
+    specify "#<=> compares the two objects' amount after converting the other object's amount to its own currency" do
+      target = Money.new(200_00, "EUR")
+      target.should_receive(:exchange_to).with("USD").and_return(Money.new(300_00, "USD"))
+      (Money.new(100_00, "USD") <=> target).should < 0
+      
+      target = Money.new(200_00, "EUR")
+      target.should_receive(:exchange_to).with("USD").and_return(Money.new(100_00, "USD"))
+      (Money.new(100_00, "USD") <=> target).should == 0
+      
+      target = Money.new(200_00, "EUR")
+      target.should_receive(:exchange_to).with("USD").and_return(Money.new(99_00, "USD"))
+      (Money.new(100_00, "USD") <=> target).should > 0
+    end
+    
+    specify "#+ adds the other object's amount, converted to this object's currency, to this object's amount while retaining its currency" do
+      other = Money.new(90, "EUR")
+      other.should_receive(:exchange_to).with("USD").and_return(Money.new(9_00, "USD"))
+      (Money.new(10_00, "USD") + other).should == Money.new(19_00, "USD")
+    end
+    
+    specify "#- substracts the other object's amount, converted to this object's currency, from this object's amount while retaining its currency" do
+      other = Money.new(90, "EUR")
+      other.should_receive(:exchange_to).with("USD").and_return(Money.new(9_00, "USD"))
+      (Money.new(10_00, "USD") - other).should == Money.new(1_00, "USD")
+    end
+  end
+end

metadata

@@ -0,0 +1,69 @@
+--- !ruby/object:Gem::Specification 
+name: samoli-money
+version: !ruby/object:Gem::Version 
+  version: 2.1.4
+platform: ruby
+authors: 
+- Tobias Luetke
+- Hongli Lai
+- Jeremy McNevin
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-11-04 00:00:00 +00:00
+default_executable: 
+dependencies: []
+
+description: Money and currency exchange support library.
+email: hongli@phusion.nl
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- README.rdoc
+- MIT-LICENSE
+- money.gemspec
+- Rakefile
+- lib/money.rb
+- lib/money/core_extensions.rb
+- lib/money/errors.rb
+- lib/money/money.rb
+- lib/money/symbols.rb
+- lib/money/variable_exchange_bank.rb
+- test/core_extensions_spec.rb
+- test/exchange_bank_spec.rb
+- test/money_spec.rb
+has_rdoc: true
+homepage: http://money.rubyforge.org/
+licenses: []
+
+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: samoli-money
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Money and currency exchange support library
+test_files: []
+