acvwilson-acvwilson-currency 0.5.0 → 0.6.0

data/spec/ar_column_spec.rb

@@ -1,69 +1,56 @@
-# Copyright (C) 2006-2007 Kurt Stephens <ruby-currency(at)umleta.com>
-# See LICENSE.txt for details.
+require File.dirname(__FILE__) + '/ar_spec_helper'
 
-require 'test/ar_test_core'
-require 'currency'
+##################################################
+# Basic CurrenyTest AR::B class
+#
 
-require 'rubygems'
-require 'active_record'
-require 'active_record/migration'
-require 'currency/active_record'
+# TODO: Move elsewhere, combine with other AR tests
 
-module Currency
+TABLE_NAME = 'currency_column_test'
 
-class ArFieldTest < ArTestCore
-
-  ##################################################
-  # Basic CurrenyTest AR::B class
-  #
-
-  TABLE_NAME = 'currency_column_test'
-
-  class CurrencyColumnTestMigration < AR_M
-    def self.up
-      create_table TABLE_NAME.intern do |t|
-        t.column :name,     :string
-        t.column :amount,   :integer # Money
-        t.column :amount_currency,   :string, :size => 3 # Money.currency.code
-      end
+class CurrencyColumnTestMigration < AR_M
+  def self.up
+    create_table TABLE_NAME.intern do |t|
+      t.column :name,     :string
+      t.column :amount,   :integer # Money
+      t.column :amount_currency,   :string, :size => 3 # Money.currency.code
     end
+  end
 
-    def self.down
-      drop_table TABLE_NAME.intern
-    end
+  def self.down
+    drop_table TABLE_NAME.intern
   end
+end
 
-  class CurrencyColumnTest < AR_B
-    set_table_name TABLE_NAME
-    attr_money :amount, :currency_column => true
-  end 
+class CurrencyColumnTest < AR_B
+  set_table_name TABLE_NAME
+  attr_money :amount, :currency_column => true
+end 
 
-  ##################################################
+##################################################
 
-  before do
+describe "ActiveRecord macros" do
+  before(:all) do
+    AR_B.establish_connection(database_spec)
     @currency_test_migration ||= CurrencyColumnTestMigration 
     @currency_test ||= CurrencyColumnTest
-    super
+    schema_down
+    schema_up
   end
-
-  def teardown
-    super
+  
+  after(:all) do
+    schema_down
   end
 
-  ##################################################
-
-
-  it "field" do
+  it "can store and retrieve money values from a DB and automagically transfomr them to Money" do
     insert_records
 
-    usd = @currency_test.find(@usd.id).should.not == nil
-    assert_equal_currency usd, @usd
+    usd = @currency_test.find(@usd.id)
+    usd.should == @usd
+    usd.object_id.should_not == @usd.object_id # not same object
 
-    cad = @currency_test.find(@cad.id).should.not == nil
-    assert_equal_currency cad, @cad
+    cad = @currency_test.find(@cad.id)
+    cad.should == @cad
+    cad.object_id.should_not == @cad.object_id # not same object
   end
-
 end
-
-end # module
-

data/spec/ar_simple_spec.rb

@@ -1,31 +1,23 @@
 # Copyright (C) 2006-2007 Kurt Stephens <ruby-currency(at)umleta.com>
+# Copyright (C) 2008 Asa Wilson <acvwilson(at)gmail.com>
 # See LICENSE.txt for details.
 
-require 'test/ar_test_core'
-require 'currency'
-
-require 'rubygems'
-require 'active_record'
-require 'active_record/migration'
-require 'currency/active_record'
-
-module Currency
-
-class ArSimpleTest < ArTestCore
+require File.dirname(__FILE__) + '/ar_spec_helper'
 
+describe Currency::ActiveRecord do
   it "simple" do
+    # TODO: move insert_records into a before block?
     insert_records
 
-    usd = @currency_test.find(@usd.id).should.not == nil
+    usd = @currency_test.find(@usd.id)
+    usd.should_not be_nil
     assert_equal_currency usd, @usd
 
-    cad = @currency_test.find(@cad.id).should.not == nil
+    cad = @currency_test.find(@cad.id)
+    cad.should_not == nil
     assert_equal_money cad, @cad
 
-    :USD.should == cad.amount.currency.code
+    cad.amount.currency.code.should == :USD
   end
-
 end
 
-end # module
-

data/spec/ar_spec_helper.rb

@@ -0,0 +1,127 @@
+# Copyright (C) 2006-2007 Kurt Stephens <ruby-currency(at)umleta.com>
+# Copyright (C) 2008 Asa Wilson <acvwilson(at)gmail.com>
+# See LICENSE.txt for details.
+
+require File.dirname(__FILE__) + '/spec_helper'
+
+require 'active_record'
+require 'active_record/migration'
+require File.dirname(__FILE__) + '/../lib/currency/active_record'
+
+AR_M = ActiveRecord::Migration
+AR_B = ActiveRecord::Base
+
+def ar_setup
+  AR_B.establish_connection(database_spec)
+
+  # Subclasses can override this.
+  @currency_test_migration ||= nil
+  @currency_test ||= nil
+
+  # schema_down
+
+  schema_up
+  
+end
+
+# DB Connection info
+def database_spec
+  # TODO: Get from ../config/database.yml:test
+  # Create test database on:
+
+  # MYSQL:
+  #
+  # sudo mysqladmin create test;
+  # sudo mysql
+  # grant all on test.* to test@localhost identified by 'test';
+  # flush privileges;
+
+  # POSTGRES:
+  #
+  # CREATE USER test PASSWORD 'test';
+  # CREATE DATABASE test WITH OWNER = test;
+  #
+
+  # @database_spec = {
+  #   :adapter  => ENV['TEST_DB_ADAPTER'] || 'mysql',
+  #   :host     => ENV['TEST_DB_HOST']    || 'localhost',
+  #   :username => ENV['TEST_DB_USER']    || 'test',
+  #   :password => ENV['TEST_DB_PASS']    || 'test',
+  #   :database => ENV['TEST_DB_TEST']    || 'test'
+  # }
+  
+  @database_spec = {
+    :adapter  => ENV['TEST_DB_ADAPTER'] || 'mysql',
+    :host     => ENV['TEST_DB_HOST']    || 'localhost',
+    :username => ENV['TEST_DB_USER']    || 'root',
+    :password => ENV['TEST_DB_PASS']    || '',
+    :database => ENV['TEST_DB_TEST']    || 'currency_gem_test'
+  }
+  
+end
+
+# Run AR migrations UP
+def schema_up
+  return unless @currency_test_migration
+  begin
+    @currency_test_migration.migrate(:up)
+  rescue Object =>e
+    $stderr.puts "Warning: #{e}"
+  end
+end
+
+
+# Run AR migrations DOWN
+def schema_down
+  return unless @currency_test_migration
+  begin
+    @currency_test_migration.migrate(:down)
+  rescue Object => e
+    $stderr.puts "Warning: #{e}"
+  end
+end
+
+# Scaffold: insert stuff into DB so we can test AR integration
+def insert_records
+  delete_records
+
+  @currency_test.reset_column_information
+
+  @usd = @currency_test.new(:name => '#1: USD', :amount => Currency::Money.new("12.34", :USD))
+  @usd.save
+
+  @cad = @currency_test.new(:name => '#2: CAD', :amount => Currency::Money.new("56.78", :CAD))
+  @cad.save
+end
+
+def delete_records
+  @currency_test.destroy_all
+end
+
+##################################################
+
+# TODO: need this?
+def assert_equal_money(a,b)
+  a.should_not be_nil
+  b.should_not be_nil
+  # Make sure a and b are not the same object.
+  b.object_id.should_not == a.object_id
+  b.id.should == a.id
+  a.amount.should_not == nil
+  a.amount.should be_kind_of(Currency::Money) 
+  b.amount.should_not == nil
+  b.amount.should be_kind_of(Currency::Money) 
+  # Make sure that what gets stored in the database comes back out
+  # when converted back to the original currency.
+  b.amount.rep.should == a.amount.convert(b.amount.currency).rep
+end
+
+# TODO: need this?
+def assert_equal_currency(a,b)
+  assert_equal_money a, b
+
+  b.amount.rep.should == a.amount.rep
+  b.amount.currency.should == a.amount.currency
+  b.amount.currency.code.should == a.amount.currency.code
+
+end

data/spec/config_spec.rb

@@ -22,8 +22,49 @@ describe Currency::Config do
     end
 
   end
+  
+  describe "the scale expression is configurable" do
+    before(:all) do
+      @config = Currency::Config.new
+    end
+    
+    before(:each) do
+      Currency::Config.current = nil
+      Currency::Config.send(:class_variable_set, "@@default", nil)
+    end
+    
+    it "should have a scale_exp setter" do
+      Currency::Config.current.should respond_to(:scale_exp=)
+    end
+    
+    it "has a 'scale' reader" do
+      Currency::Config.current.should respond_to(:scale)
+    end
+    
+    it "uses the scale reader from the config when creating new Money object" do
+      Currency::Config.should_receive(:current).and_return(@config)
+      @config.should_receive(:scale).and_return(100)
+      10.money
+    end
+    
+    it "can be configured using a block" do
+      Currency::Config.configure do |config|
+        config.scale_exp = 6
+      end
 
-end # class
-
-
+      10.money.currency.scale_exp.should == 6
+      
+      Currency::Config.configure do |config|
+        config.scale_exp = 4
+      end
+      10.money.currency.scale_exp.should == 4
+    end
+    
+    it "can be configured using straight setters" do
+      10.money(:USD).currency.scale_exp.should == 2
+      Currency::Config.current.scale_exp = 6
+      10.money(:USD).currency.scale_exp.should == 6
+    end
+  end
 
+end

data/spec/federal_reserve_spec.rb

@@ -1,75 +1,71 @@
 # Copyright (C) 2006-2007 Kurt Stephens <ruby-currency(at)umleta.com>
 # See LICENSE.txt for details.
 
-require 'test/test_base'
+require File.dirname(__FILE__) + '/spec_helper'
+require File.dirname(__FILE__) + '/../lib/currency/exchange/rate/source/federal_reserve'
 
-require 'currency' # For :type => :money
-require 'currency/exchange/rate/source/federal_reserve'
+# Uncomment to avoid hitting the FED for every testrun
+Currency::Exchange::Rate::Source::FederalReserve.class_eval do
+  def get_page_content
+    %Q{
 
-module Currency
+      SPOT EXCHANGE RATE - DISNEYLAND
 
-class FederalReserveTest < TestBase
-  before do
-    super
+      ------------------------------
+      14-Nov-08                          1.1
+    }
   end
+end
 
-
-  @@available = nil
-
-  # New York Fed rates are not available on Saturday and Sunday.
+include Currency
+describe "FederalReserve" do
   def available?
-    if @@available == nil
-      @@available = @source.available?
-      STDERR.puts "Warning: FederalReserve unavailable on Saturday and Sunday, skipping tests." unless @@available
+    unless @available
+      @available = @source.available?
+      STDERR.puts "Warning: FederalReserve unavailable on Saturday and Sunday, skipping tests." unless @available
     end
-    @@available
+    @available
   end
-
-
-  def get_rate_source
-    # Force FederalReserve Exchange.
-    verbose = false
-    source = @source = Exchange::Rate::Source::FederalReserve.new(:verbose => verbose)
-    deriver = Exchange::Rate::Deriver.new(:source => source, :verbose => source.verbose)
+  
+  # Called by the before(:all) in spec_helper
+  # Overriding here to force FederalReserve Exchange.
+  # TODO: when refactoring the whole spec to test only specific FedralReserve Stuff, make sure this one goes away
+  def get_rate_source(source = nil)
+    @source   ||= Exchange::Rate::Source::FederalReserve.new(:verbose => false)
+    @deriver  ||= Exchange::Rate::Deriver.new(:source => @source, :verbose => @source.verbose)
   end
-
-
-
-  it "usd cad" do
-    return unless available?
-
-    # yesterday = Time.now.to_date - 1
-
-    rates = Exchange::Rate::Source.default.source.raw_rates.should.not == nil
-    #assert_not_nil rates[:USD]
-    #assert_not_nil usd_cad = rates[:USD][:CAD]
-
-    usd = Money.new(123.45, :USD).should.not == nil
-    cad = usd.convert(:CAD).should.not == nil
-
-    # assert_kind_of Numeric, m = (cad.to_f / usd.to_f)
-    # $stderr.puts "m = #{m}"
-    # assert_equal_float usd_cad, m, 0.001
+  
+  def get_rates
+    @rates ||= @source.raw_rates
   end
-
-
-  it "cad eur" do
-    return unless available?
-
-    rates = Exchange::Rate::Source.default.source.raw_rates.should.not == nil
-    #assert_not_nil rates[:USD]
-    #assert_not_nil usd_cad = rates[:USD][:CAD]
-    #assert_not_nil usd_eur = rates[:USD][:EUR]
-
-    cad = Money.new(123.45, :CAD).should.not == nil
-    eur = cad.convert(:EUR).should.not == nil
-
-    #assert_kind_of Numeric, m = (eur.to_f / cad.to_f)
-    # $stderr.puts "m = #{m}"
-    #assert_equal_float (1.0 / usd_cad) * usd_eur, m, 0.001
+  
+  before(:all) do
+    get_rate_source
+    get_rates
+  end
+  
+  before(:each) do
+    get_rate_source
+  end
+  
+  it "can retrieve rates from the FED" do
+    @rates.should_not be_nil
   end
 
-end
-
-end # module
+  it "can convert from USD to CAD" do
+    usd = Money.new(123.45, :USD)
 
+    cad = usd.convert(:CAD)
+    cad.should_not be_nil
+    cad.to_f.should be_kind_of(Numeric)
+  end
+  
+  it "can do conversions from AUD to USD to JPY" do
+    aud = Money.new(123.45, :AUD)
+    usd = aud.convert(:USD)
+    jpy = usd.convert(:JPY)
+    jpy.should_not be_nil
+    jpy.to_f.should be_kind_of(Numeric)
+  end
+  
+end