mumboe-currency 0.5

data/lib/currency/currency/factory.rb

@@ -0,0 +1,228 @@
+# Copyright (C) 2006-2007 Kurt Stephens <ruby-currency(at)umleta.com>
+# See LICENSE.txt for details.
+
+
+# Responsible for creating Currency::Currency objects on-demand.
+class Currency::Currency::Factory
+    @@default = nil
+
+    # Returns the default Currency::Factory.
+    def self.default
+      @@default ||= self.new
+    end
+    # Sets the default Currency::Factory.
+    def self.default=(x)
+      @@default = x
+    end
+
+
+    def initialize(*opts)
+      @currency_by_code = { }
+      @currency_by_symbol = { }
+      @currency = nil
+    end
+
+
+    # Lookup Currency by code.
+    def get_by_code(x)
+      x = ::Currency::Currency.cast_code(x)
+      # $stderr.puts "get_by_code(#{x})"
+      @currency_by_code[x] ||= install(load(::Currency::Currency.new(x)))
+    end
+
+
+    # Lookup Currency by symbol.
+    def get_by_symbol(symbol)
+      @currency_by_symbol[symbol] ||= install(load(::Currency::Currency.new(nil, symbol)))
+    end
+
+
+    # This method initializes a Currency object as
+    # requested from #get_by_code or #get_by_symbol.
+    #
+    # This method must initialize:
+    #
+    #    currency.code
+    #    currency.scale
+    # 
+    # Optionally:
+    #
+    #    currency.symbol
+    #    currency.symbol_html
+    #
+    # Subclasses that provide Currency metadata should override this method.
+    # For example, loading Currency metadata from a database or YAML file.
+    def load(currency)
+      currency.symbol       = CURRENCY_SYMBOLS[currency.code] ? CURRENCY_SYMBOLS[currency.code][:symbol] : nil
+      currency.symbol_html  = CURRENCY_SYMBOLS[currency.code] ? CURRENCY_SYMBOLS[currency.code][:symbol_html] : nil
+      currency.scale = 100
+      currency
+    end
+
+    def self.get_currency_from_symbol(symbol)
+      return Currency::Currency.get(:USD) if symbol == "$"
+      return Currency::Currency.get(:GBP) if symbol == "£"
+      return Currency::Currency.get(:EUR) if symbol == "€"
+      CURRENCY_SYMBOLS.sort {|a,b| a.to_s <=> b.to_s}.each do |code, hash|
+        return Currency::Currency.get(code) if symbol == hash[:symbol]
+      end
+      Currency::Currency.default
+    end
+
+    CURRENCY_SYMBOLS = {
+      :AFN => {:symbol => '؋',    :symbol_html => '&#1547;'},
+      :ALL => {:symbol => 'Lek',  :symbol_html => '&#76;&#101;&#107;'},
+      :ANG => {:symbol => 'ƒ',    :symbol_html => '&#402;'},
+      :ARS => {:symbol => '$',    :symbol_html => '&#36;'},
+      :AUD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :AWG => {:symbol => 'ƒ',    :symbol_html => '&#402;'},
+      :AZN => {:symbol => 'ман',  :symbol_html => '&#1084;&#1072;&#1085;'},
+      :BAM => {:symbol => 'KM',   :symbol_html => '&#75;&#77;'},
+      :BBD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :BGN => {:symbol => 'лв',   :symbol_html => '&#1083;&#1074;'},
+      :BMD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :BND => {:symbol => '$',    :symbol_html => '&#36;'},
+      :BOB => {:symbol => '$b',   :symbol_html => '&#36;&#98;'},
+      :BRL => {:symbol => 'R$',   :symbol_html => '&#82;&#36;'},
+      :BSD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :BWP => {:symbol => 'P',    :symbol_html => '&#80;'},
+      :BYR => {:symbol => 'p.',   :symbol_html => '&#112;&#46;'},
+      :BZD => {:symbol => 'BZ$',  :symbol_html => '&#66;&#90;&#36;'},
+      :CAD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :CHF => {:symbol => 'CHF',  :symbol_html => '&#67;&#72;&#70;'},
+      :CLP => {:symbol => '$',    :symbol_html => '&#36;'},
+      :CNY => {:symbol => '¥',    :symbol_html => '&#165;'},
+      :COP => {:symbol => '$',    :symbol_html => '&#36;'},
+      :CRC => {:symbol => '₡',    :symbol_html => '&#8353;'},
+      :CUP => {:symbol => '₱',    :symbol_html => '&#8369;'},
+      :CZK => {:symbol => 'Kč',   :symbol_html => '&#75;&#269;'},
+      :DKK => {:symbol => 'kr',   :symbol_html => '&#107;&#114;'},
+      :DOP => {:symbol => 'RD$',  :symbol_html => '&#82;&#68;&#36;'},
+      :EEK => {:symbol => 'kr',   :symbol_html => '&#107;&#114;'},
+      :EGP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :EUR => {:symbol => '€',    :symbol_html => '&#8364;'},
+      :FJD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :FKP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :GBP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :GGP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :GHC => {:symbol => '¢',    :symbol_html => '&#162;'},
+      :GIP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :GTQ => {:symbol => 'Q',    :symbol_html => '&#81;'},
+      :GYD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :HKD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :HNL => {:symbol => 'L',    :symbol_html => '&#76;'},
+      :HRK => {:symbol => 'kn',   :symbol_html => '&#107;&#110;'},
+      :HUF => {:symbol => 'Ft',   :symbol_html => '&#70;&#116;'},
+      :IDR => {:symbol => 'Rp',   :symbol_html => '&#82;&#112;'},
+      :ILS => {:symbol => '₪',    :symbol_html => '&#8362;'},
+      :IMP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :INR => {:symbol => '₨',    :symbol_html => '&#8360;'},
+      :IRR => {:symbol => '﷼',    :symbol_html => '&#65020;'},
+      :ISK => {:symbol => 'kr',   :symbol_html => '&#107;&#114;'},
+      :JEP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :JMD => {:symbol => 'J$',   :symbol_html => '&#74;&#36;'},
+      :JPY => {:symbol => '¥',    :symbol_html => '&#165;'},
+      :KGS => {:symbol => 'лв',   :symbol_html => '&#1083;&#1074;'},
+      :KHR => {:symbol => '៛',    :symbol_html => '&#6107;'},
+      :KPW => {:symbol => '₩',    :symbol_html => '&#8361;'},
+      :KRW => {:symbol => '₩',    :symbol_html => '&#8361;'},
+      :KYD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :KZT => {:symbol => 'лв',   :symbol_html => '&#1083;&#1074;'},
+      :LAK => {:symbol => '₭',    :symbol_html => '&#8365;'},
+      :LBP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :LKR => {:symbol => '₨',    :symbol_html => '&#8360;'},
+      :LRD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :LTL => {:symbol => 'Lt',   :symbol_html => '&#76;&#116;'},
+      :LVL => {:symbol => 'Ls',   :symbol_html => '&#76;&#115;'},
+      :MKD => {:symbol => 'ден',  :symbol_html => '&#1076;&#1077;&#1085;'},
+      :MNT => {:symbol => '₮',    :symbol_html => '&#8366;'},
+      :MUR => {:symbol => '₨',    :symbol_html => '&#8360;'},
+      :MXN => {:symbol => '$',    :symbol_html => '&#36;'},
+      :MYR => {:symbol => 'RM',   :symbol_html => '&#82;&#77;'},
+      :MZN => {:symbol => 'MT',   :symbol_html => '&#77;&#84;'},
+      :NAD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :NGN => {:symbol => '₦',    :symbol_html => '&#8358;'},
+      :NIO => {:symbol => 'C$',   :symbol_html => '&#67;&#36;'},
+      :NOK => {:symbol => 'kr',   :symbol_html => '&#107;&#114;'},
+      :NPR => {:symbol => '₨',    :symbol_html => '&#8360;'},
+      :NZD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :OMR => {:symbol => '﷼',    :symbol_html => '&#65020;'},
+      :PAB => {:symbol => 'B/.',  :symbol_html => '&#66;&#47;&#46;'},
+      :PEN => {:symbol => 'S/.',  :symbol_html => '&#83;&#47;&#46;'},
+      :PHP => {:symbol => 'Php',  :symbol_html => '&#80;&#104;&#112;'},
+      :PKR => {:symbol => '₨',    :symbol_html => '&#8360;'},
+      :PLN => {:symbol => 'zł',   :symbol_html => '&#122;&#322;'},
+      :PYG => {:symbol => 'Gs',   :symbol_html => '&#71;&#115;'},
+      :QAR => {:symbol => '﷼',    :symbol_html => '&#65020;'},
+      :RON => {:symbol => 'lei',  :symbol_html => '&#108;&#101;&#105;'},
+      :RSD => {:symbol => 'Дин.', :symbol_html => '&#1044;&#1080;&#1085;&#46;'},
+      :RUB => {:symbol => 'руб',  :symbol_html => '&#1088;&#1091;&#1073;'},
+      :SAR => {:symbol => '﷼',    :symbol_html => '&#65020;'},
+      :SBD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :SCR => {:symbol => '₨',    :symbol_html => '&#8360;'},
+      :SEK => {:symbol => 'kr',   :symbol_html => '&#107;&#114;'},
+      :SGD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :SHP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :SOS => {:symbol => 'S',    :symbol_html => '&#83;'},
+      :SRD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :SVC => {:symbol => '$',    :symbol_html => '&#36;'},
+      :SYP => {:symbol => '£',    :symbol_html => '&#163;'},
+      :THB => {:symbol => '฿',    :symbol_html => '&#3647;'},
+      :TRL => {:symbol => '₤',    :symbol_html => '&#8356;'},
+      :TRY => {:symbol => 'TL',   :symbol_html => '&#84;&#76;'},
+      :TTD => {:symbol => 'TT$',  :symbol_html => '&#84;&#84;&#36;'},
+      :TVD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :TWD => {:symbol => 'NT$',  :symbol_html => '&#78;&#84;&#36;'},
+      :UAH => {:symbol => '₴',    :symbol_html => '&#8372;'},
+      :USD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :UYU => {:symbol => '$U',   :symbol_html => '&#36;&#85;'},
+      :UZS => {:symbol => 'лв',   :symbol_html => '&#1083;&#1074;'},
+      :VEF => {:symbol => 'Bs',   :symbol_html => '&#66;&#115;'},
+      :VND => {:symbol => '₫',    :symbol_html => '&#8363;'},
+      :XCD => {:symbol => '$',    :symbol_html => '&#36;'},
+      :YER => {:symbol => '﷼',    :symbol_html => '&#65020;'},
+      :ZAR => {:symbol => 'R',    :symbol_html => '&#82;'},
+      :ZWD => {:symbol => 'Z$',   :symbol_html => '&#90;&#36;'},
+    }
+
+    UNIQUE_SYMBOLS = CURRENCY_SYMBOLS.collect {|code, symbol| symbol[:symbol]}.uniq
+    CODES = CURRENCY_SYMBOLS.collect {|code, symbol| code}
+
+    # Installs a new Currency for #get_by_symbol and #get_by_code.
+    def install(currency)
+      raise ::Currency::Exception::UnknownCurrency unless currency
+      @currency_by_symbol[currency.symbol] ||= currency unless currency.symbol.nil?
+      @currency_by_code[currency.code] = currency
+    end
+
+
+    # Returns the default Currency.
+    # Defaults to self.get_by_code(:USD).
+    def currency
+      @currency ||= self.get_by_code(:USD)
+    end
+
+
+    # Sets the default Currency.
+    def currency=(x)
+      @currency = x
+    end
+
+
+    # If selector is [A-Z][A-Z][A-Z], load the currency.
+    #
+    #   factory.USD
+    #   => #<Currency::Currency:0xb7d0917c @formatter=nil, @scale_exp=2, @scale=100, @symbol="$", @format_left=-3, @code=:USD, @parser=nil, @format_right=-2>
+    #
+    def method_missing(sel, *args, &blk)
+      if args.size == 0 && (! block_given?) && /^[A-Z][A-Z][A-Z]$/.match(sel.to_s)
+        self.get_by_code(sel)
+      else
+        super
+      end
+    end
+
+end # class
+
+
+

data/lib/currency/currency.rb

@@ -0,0 +1,175 @@
+# Copyright (C) 2006-2007 Kurt Stephens <ruby-currency(at)umleta.com>
+# See LICENSE.txt for details.
+
+
+# Represents a currency.
+#
+# Currency objects are created on-demand by Currency::Currency::Factory.
+#
+# See Currency.get method.
+#
+class Currency::Currency
+    # Returns the ISO three-letter currency code as a symbol.
+    # e.g. :USD, :CAD, etc.
+    attr_reader :code
+
+    # The Currency's scale factor.  
+    # e.g: the :USD scale factor is 100.
+    attr_reader :scale
+
+    # The Currency's scale factor.  
+    # e.g: the :USD scale factor is 2, where 10 ^ 2 == 100.
+    attr_reader :scale_exp
+
+    # Used by Formatter.
+    attr_reader :format_right
+
+    # Used by Formatter.
+    attr_reader :format_left
+
+    # The Currency's symbol. 
+    # e.g: USD symbol is '$'
+    attr_accessor :symbol
+
+    # The Currency's symbol as HTML.
+    # e.g: EUR symbol is '&#8364;' (:html &#8364; :) or '&euro;' (:html &euro; :)
+    attr_accessor :symbol_html
+
+    # The default Formatter.
+    attr_accessor :formatter
+
+    # The default parser.
+    attr_accessor :parser
+
+
+    # Create a new currency.
+    # This should only be called from Currency::Currency::Factory.
+    def initialize(code, symbol = nil, scale = 100)
+      self.code = code
+      self.symbol = symbol
+      self.scale = scale
+
+      @formatter =
+        @parser = 
+        nil
+    end
+
+
+    # Returns the Currency object from the default Currency::Currency::Factory
+    # by its three-letter uppercase Symbol, such as :USD, or :CAD.
+    def self.get(code)
+      # $stderr.puts "#{self}.get(#{code.inspect})"
+      return nil unless code
+      return code if code.kind_of?(::Currency::Currency)
+      Factory.default.get_by_code(code)
+    end
+
+
+    # Internal method for converting currency codes to internal
+    # Symbol format.
+    def self.cast_code(x)
+      x = x.upcase.intern if x.kind_of?(String)
+      raise ::Currency::Exception::InvalidCurrencyCode, x unless x.kind_of?(Symbol)
+      raise ::Currency::Exception::InvalidCurrencyCode, x unless x.to_s.length == 3
+      x
+    end
+
+
+    # Returns the hash of the Currency's code.
+    def hash
+      @code.hash
+    end
+
+
+    # Returns true if the Currency's are equal.
+    def eql?(x)
+      self.class == x.class && @code == x.code
+    end
+
+
+    # Returns true if the Currency's are equal.
+    def ==(x)
+      self.class == x.class && @code == x.code
+    end
+
+
+    # Clients should never call this directly.
+    def code=(x)
+      x = self.class.cast_code(x) unless x.nil?
+      @code = x
+      #$stderr.puts "#{self}.code = #{@code}"; x
+    end
+
+
+    # Clients should never call this directly.
+    def scale=(x)
+      @scale = x
+      return x if x.nil?
+      @scale_exp = Integer(Math.log10(@scale));
+      @format_right = - @scale_exp
+      @format_left = @format_right - 1
+      x
+    end
+
+
+    # Parse a Money string in this Currency.
+    #
+    # See Currency::Parser#parse.
+    #
+    def parse(str, *opt)
+      parser_or_default.parse(str, *opt)
+    end
+
+
+    def parser_or_default
+      (@parser || ::Currency::Parser.default)
+    end
+
+
+    # Formats the Money value as a string using the current Formatter.
+    # See Currency::Formatter#format.
+    def format(m, *opt)
+       formatter_or_default.format(m, *opt)
+    end
+
+
+    def formatter_or_default
+      (@formatter || ::Currency::Formatter.default)
+    end
+
+
+    # Returns the Currency code as a String.
+    def to_s
+      @code.to_s
+    end
+
+
+    # Returns the default Factory's currency.
+    def self.default
+      Factory.default.currency
+    end
+
+
+    # Sets the default Factory's currency.
+    def self.default=(x)
+      x = self.get(x) unless x.kind_of?(self)
+      Factory.default.currency = x
+    end
+
+
+    # If selector is [A-Z][A-Z][A-Z], load the currency via Factory.default.
+    #
+    #   Currency::Currency.USD
+    #   => #<Currency::Currency:0xb7d0917c @formatter=nil, @scale_exp=2, @scale=100, @symbol="$", @format_left=-3, @code=:USD, @parser=nil, @format_right=-2>
+    #
+    def self.method_missing(sel, *args, &blk)
+      if args.size == 0 && (! block_given?) && /^[A-Z][A-Z][A-Z]$/.match(sel.to_s)
+        Factory.default.get_by_code(sel)
+      else
+        super
+      end
+    end
+
+end # class
+  
+

data/lib/currency/currency_version.rb

@@ -0,0 +1,6 @@
+module Currency
+  CurrencyVersion = '0.5'
+end
+# DO NOT EDIT
+# This file is auto-generated by build scripts.
+# See:  rake update_version

data/lib/currency/exception.rb

@@ -0,0 +1,119 @@
+# Copyright (C) 2006-2007 Kurt Stephens <ruby-currency(at)umleta.com>
+# See LICENSE.txt for details.
+
+module Currency::Exception
+    # Base class for all Currency::Exception objects.
+    #
+    #   raise Currency::Exception [ "msg", :opt1, 1, :opt2, 2 ]
+    #
+    class Base < ::Exception
+      EMPTY_HASH = { }.freeze
+
+      def initialize(arg1, *args)
+        case arg1
+        # [ description, ... ]
+        when Array
+          @opts = arg1
+          arg1 = arg1.shift
+        else
+          @opts = nil
+        end
+
+        case @opts
+        when Array
+          if @opts.size == 1 && @opts.first.kind_of?(Hash)
+            # [ description, { ... } ]
+            @opts = @opts.first
+          else
+            # [ description, :key, value, ... ]
+            @opts = Hash[*@opts]
+          end
+        end
+
+        case @opts
+        when Hash
+          @opts = @opts.dup.freeze
+        else
+          @opts = { :info => @opts }.freeze
+        end
+
+        @opts ||= EMPTY_HASH
+
+        super(arg1, *args)
+      end
+
+
+      def method_missing(sel, *args, &blk)
+        sel = sel.to_sym
+        if args.empty? && ! block_given? && @opts.key?(sel) 
+          return @opts[sel]
+        end
+        super
+      end
+
+      def to_s
+        super + ": #{@opts.inspect}"
+      end
+
+    end
+
+    # Generic Error.
+    class Generic < Base
+    end
+
+    # Error during parsing of Money values from String.
+    class InvalidMoneyString < Base
+    end
+
+    # Error during coercion of external Money values.
+    class InvalidMoneyValue < Base
+    end
+  
+    # Error in Currency code formeat.
+    class InvalidCurrencyCode < Base
+    end
+    
+    # Error during conversion between currencies.
+    class IncompatibleCurrency < Base
+    end
+
+    # Error during locating currencies.
+    class MissingCurrency < Base
+    end
+
+    # Error if an Exchange is not defined.
+    class UndefinedExchange < Base
+    end
+
+    # Error if a Currency is unknown.
+    class UnknownCurrency < Base
+    end
+
+    # Error if an Exchange Rate Source cannot provide an Exchange::Rate.
+    class UnknownRate < Base
+    end
+
+    # Error if an Exchange Rate Source.
+    class RateSourceError < Base
+    end
+
+    # Error if an Exchange Rate Source cannot supply any rates.
+    class UnavailableRates < Base
+    end
+
+    # Error if an Exchange::Rate is not valid.
+    class InvalidRate < Base
+    end
+    
+    # Error if a subclass is responsible for implementing a method.
+    class SubclassResponsibility < Base
+    end
+
+    # Error if some functionality is unimplemented
+    class Unimplemented < Base
+    end
+  
+    # Error if reentrantancy is d
+    class InvalidReentrancy < Base
+    end
+end # module

data/lib/currency/exchange/rate/deriver.rb

@@ -0,0 +1,157 @@
+# Copyright (C) 2006-2007 Kurt Stephens <ruby-currency(at)umleta.com>
+# See LICENSE.txt for details.
+
+require 'currency/exchange/rate'
+require 'currency/exchange/rate/source/base'
+
+# The Currency::Exchange::Rate::Deriver class calculates derived rates
+# from base Rates from a rate Source by pivoting against a pivot currency or by
+# generating reciprocals.
+#
+class Currency::Exchange::Rate::Deriver < Currency::Exchange::Rate::Source::Base
+
+  # The source for base rates.
+  attr_accessor :source
+  
+
+  def name
+    source.name
+  end
+
+
+  def initialize(opt = { })
+    @source = nil
+    @pivot_currency = nil
+    @derived_rates = { }
+    @all_rates = { }
+    super
+  end 
+
+
+  def pivot_currency
+    @pivot_currency || @source.pivot_currency || :USD
+  end
+
+
+  # Return all currencies.
+  def currencies
+    @source.currencies
+  end
+
+
+  # Flush all cached Rates.
+  def clear_rates
+    @derived_rates.clear
+    @all_rates.clear
+    @source.clear_rates
+    super
+  end
+ 
+
+  # Returns all combinations of rates except identity rates.
+  def rates(time = nil)
+    time = time && normalize_time(time)
+    all_rates(time)
+  end
+
+
+  # Computes all rates.
+  # time is assumed to be normalized.
+  def all_rates(time = nil)
+    if x = @all_rates["#{time}"]
+      return x 
+    end
+
+    x = @all_rates["#{time}"] = [ ]
+    
+    currencies = self.currencies
+
+    currencies.each do | c1 |
+      currencies.each do | c2 |
+        next if c1 == c2 
+        c1 = ::Currency::Currency.get(c1)
+        c2 = ::Currency::Currency.get(c2)
+        rate = rate(c1, c2, time)
+        x << rate
+      end
+    end
+
+    x
+  end
+
+
+  # Determines and creates the Rate between Currency c1 and c2.
+  #
+  # May attempt to use a pivot currency to bridge between
+  # rates.
+  #
+  def get_rate(c1, c2, time)
+    rate = get_rate_reciprocal(c1, c2, time)
+    
+    # Attempt to use pivot_currency to bridge
+    # between Rates.
+    unless rate
+      pc = ::Currency::Currency.get(pivot_currency)
+      
+      if pc &&
+          (rate_1 = get_rate_reciprocal(c1, pc, time)) && 
+          (rate_2 = get_rate_reciprocal(pc, c2, time))
+        c1_to_c2_rate = rate_1.rate * rate_2.rate
+        rate = new_rate(c1, c2, 
+                        c1_to_c2_rate, 
+                        rate_1.date || rate_2.date || time, 
+                        "pivot(#{pc.code},#{rate_1.derived || "#{rate_1.c1.code}#{rate_1.c2.code}"},#{rate_2.derived || "#{rate_2.c1}#{rate_2.c2}"})")
+      end
+    end
+    
+    rate
+  end
+
+
+  # Get a matching base rate or its reciprocal.
+  def get_rate_reciprocal(c1, c2, time)
+    rate = get_rate_base_cached(c1, c2, time)
+    unless rate
+      if rate = get_rate_base_cached(c2, c1, time)
+        rate = (@rate["#{c1}:#{c2}:#{time}"] ||= rate.reciprocal)
+      end
+    end
+    
+    rate
+  end
+
+
+  # Returns a cached base Rate.
+  #
+  def get_rate_base_cached(c1, c2, time)
+    rate = (@rate["#{c1}:#{c2}:#{time}"] ||= get_rate_base(c1, c2, time))
+    rate
+  end
+
+
+  # Returns a base Rate from the Source.
+  def get_rate_base(c1, c2, time)
+    if c1 == c2
+      # Identity rates are timeless.
+      new_rate(c1, c2, 1.0, nil, "identity")
+    else
+      source.rate(c1, c2, time)
+    end
+  end
+
+
+  def load_rates(time = nil)
+    all_rates(time)
+  end
+
+
+  # Returns true if the underlying rate provider is available.
+  def available?(time = nil)
+    source.available?(time)
+  end
+
+
+end # class
+
+  
+