meplato-money 0.1.3

data/lib/money/meplato_bank.rb

@@ -0,0 +1,52 @@
+# encoding: utf-8
+
+require 'singleton'
+require 'thread'
+require 'open-uri'
+require 'rubygems' if RUBY_VERSION <= '1.9'
+if defined?(Yajl)
+  require 'yajl/json_gem'
+else 
+  require 'json'
+end
+
+module Money
+  class MeplatoBank
+    include Singleton
+    
+    def initialize
+      @rates = {}
+      @mutex = Mutex.new
+      load_rates
+    end
+        
+    def add_rate(source, target, rate)
+      @mutex.synchronize do
+        add_rate_synchronized(source, target, rate)
+      end
+    end
+    
+    def get_rate(source, target)
+      @mutex.synchronize do
+        @rates["#{source}_#{target}".upcase]
+      end
+    end
+    
+  private
+  
+    def add_rate_synchronized(source, target, rate)
+      @rates["#{source}_#{target}".upcase] = rate
+    end
+  
+    def load_rates
+      latest = JSON.parse(open("http://services.meplato.com/rates/latest?format=json").read)
+      @mutex.synchronize do
+        latest.each do |r|
+          add_rate_synchronized(r['source'], r['target'], r['rate'])
+          add_rate_synchronized(r['target'], r['source'], 1.0 / r['rate'])
+        end
+      end
+    end
+
+  end
+end

data/lib/money/money.rb

@@ -0,0 +1,138 @@
+# encoding: utf-8
+
+require 'money/currencies'
+require 'money/formats'
+
+module Money
+
+  class UnknownCurrency < StandardError; end
+  class UnknownRate < StandardError; end
+
+  # Money::Money is the central place for working with
+  # monetary values. You can create a new +Money+ instance
+  # by one of these methods:
+  #
+  # Initializing with amount and currency:
+  #
+  #   m = Money::Money.new(1.99, "EUR")
+  #
+  # Initializing with amount only.
+  # The +default_currency+ will then be used:
+  #
+  #   m = Money::Money.new(1.99)
+  #
+  class Money
+    include Comparable
+
+    attr_reader :amount, :currency, :bank
+
+    class << self
+      attr_accessor :default_bank
+      attr_accessor :default_currency
+      attr_accessor :default_locale
+
+      def same_currency?(source, target)
+        source.upcase == target.upcase
+      end
+    end
+
+    self.default_bank = MeplatoBank.instance
+    self.default_currency = "USD"
+    self.default_locale = "en"
+
+    def initialize(amount, currency = Money.default_currency, bank = Money.default_bank)
+      @amount, @currency, @bank = amount, currency || Money.default_currency, bank || Money.default_bank
+      raise UnknownCurrency unless CURRENCIES[@currency]
+    end
+
+    def positive?
+      @amount && @amount > 0
+    end
+
+    def negative?
+      @amount && @amount < 0
+    end
+
+    def zero?
+      @amount && @amount == 0
+    end
+
+    def nan?
+      @amount.nil?
+    end
+
+    def ==(other)
+      self.amount == other.amount && Money.same_currency?(self.currency, other.currency)
+    end
+
+    def <=>(other)
+      if Money.same_currency?(@currency, other.currency)
+        @amount <=> other.amount
+      else
+        @amount <=> other.exchange_to(@currency).amount
+      end
+    end
+
+    def +(other)
+      if Money.same_currency?(@currency, other.currency)
+        Money.new(@amount + other.amount, @currency)
+      else
+        Money.new(@amount + other.exchange_to(@currency).amount, @currency)
+      end
+    end
+
+    def -(other)
+      if Money.same_currency?(@currency, other.currency)
+        Money.new(@amount - other.amount, @currency)
+      else
+        Money.new(@amount - other.exchange_to(@currency).amount, @currency)
+      end
+    end
+
+    def exchange_to(target)
+      unless Money.same_currency?(@currency, target)
+        rate = self.bank.get_rate(@currency, target)
+        if !rate
+          raise UnknownRate, "No conversion from #{@currency} to #{target}"
+        end
+        Money.new(@amount * rate, target)
+      else
+        self
+      end
+    end
+
+    def as_euro
+      self.exchange_to("EUR")
+    end
+
+    def format(options = {})
+      defaults = {
+        :locale => self.class.default_locale,
+        :bank => @bank,
+        :currency => @currency
+      }
+      MoneyFormatter.new(self, defaults.merge(options)).to_s
+    end
+
+    def to_s(options = {})
+      self.format(options)
+    end
+
+    def self.parse(value, currency, options = {})
+      return Money.new(0, currency, options) if value.nil?
+      opts = {
+        :locale => default_locale,
+        :bank => default_bank,
+        :currency => currency || default_currency
+      }.merge(options)
+      format = FORMATS[opts[:locale]]
+      # TODO there's a special case e.g. "($12,345,678.90)" that has to be converted to -12345678.90
+      s = value.gsub(/[^0-9\-#{format[:decimal_sep]}]/, '')
+      s.gsub!(format[:decimal_sep], '.')
+      Money.new(s.to_f, opts[:currency], opts)
+    end
+
+  private
+
+  end
+end

data/lib/money/money_formatter.rb

@@ -0,0 +1,67 @@
+# encoding: utf-8
+
+require 'money/currencies'
+require 'money/formats'
+
+module Money
+  # Money::MoneyFormatter persues locale-specific
+  # formatting of a +Money+ instance.
+  #
+  #   m = Money::Money.new(100, "EUR")
+  #   puts MoneyFormatter.new(m, :locale => "de-DE")
+  #
+  # or as a shortcut:
+  #
+  #   m = Money::Money.new(100, "EUR")
+  #   puts m.format(:locale => "de-DE")
+  #
+  class MoneyFormatter
+
+    attr_reader :money, :locale, :bank
+    
+    def initialize(money, options = {})
+      @money = money
+      @locale = options[:locale] || Money.default_locale
+      @locale.gsub!(/_/, '-')
+      @bank = options[:bank] || Money.default_bank
+      @format = FORMATS[@locale]
+      @currency_symbol = CURRENCIES[@money.currency][:symbol]
+    end
+    
+    def to_s
+      unless @money.nan?
+        pattern = @money.positive? || @money.zero? ? @format[:pos_pattern] : @format[:neg_pattern]
+        precision = CURRENCIES[@money.currency][:decimal_digits] # @format[:decimal_digits]
+        # divisor = 10 ** precision
+        #if @money.amount.round(2) == 1.77
+        #  puts ""
+        #  puts "Money = #{@money.amount} #{@money.currency}"
+        #  puts "  Prec: #{precision}"
+        #  puts "  Divi: #{divisor}"
+        #end
+        number = number_with_precision(
+          @money.amount.to_f.abs, # / divisor, 
+          precision, 
+          @format[:decimal_sep], 
+          @format[:group_sep])
+        pattern.gsub("n", number).gsub("$", @currency_symbol)
+      end
+    end
+    
+  private
+  
+    # Shamelessly stolen from actionpack
+    def number_with_precision(number, precision, separator, delimiter)
+      begin
+        rounded_number = (Float(number) * (10 ** precision)).round.to_f / 10 ** precision
+        number = "%01.#{precision}f" % rounded_number
+        parts = number.to_s.split('.')
+        parts[0].gsub!(/(\d)(?=(\d\d\d)+(?!\d))/, "\\1#{delimiter}")
+        parts.join(separator)
+      rescue
+        number
+      end
+    end
+    
+  end
+end

metadata

@@ -0,0 +1,95 @@
+--- !ruby/object:Gem::Specification
+name: meplato-money
+version: !ruby/object:Gem::Version
+  version: 0.1.3
+  prerelease: 
+platform: ruby
+authors:
+- Oliver Eilhard
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2011-10-12 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: &70300784862420 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.0'
+  type: :development
+  prerelease: false
+  version_requirements: *70300784862420
+- !ruby/object:Gem::Dependency
+  name: rdoc
+  requirement: &70300784861960 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '2.5'
+  type: :development
+  prerelease: false
+  version_requirements: *70300784861960
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: &70300784861500 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0.8'
+  type: :development
+  prerelease: false
+  version_requirements: *70300784861500
+description: Working with monetary values as well as performing currency exchange.
+email:
+- oliver.eilhard@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files:
+- CHANGELOG.md
+- LICENSE
+- README.md
+files:
+- lib/money.rb
+- lib/money/core_ext.rb
+- lib/money/core_ext/string_ext.rb
+- lib/money/core_ext/try.rb
+- lib/money/currencies.rb
+- lib/money/fixed_bank.rb
+- lib/money/formats.rb
+- lib/money/meplato_bank.rb
+- lib/money/money.rb
+- lib/money/money_formatter.rb
+- CHANGELOG.md
+- LICENSE
+- README.md
+homepage: http://github.com/meplato/money
+licenses: []
+post_install_message: 
+rdoc_options:
+- --charset=UTF-8
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: 1.3.6
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.10
+signing_key: 
+specification_version: 3
+summary: Working with monetary values as well as performing currency exchange.
+test_files: []