dm-money 0.1.0

data/.gitignore

@@ -0,0 +1,7 @@
+*.sw?
+.DS_Store
+coverage
+rdoc
+pkg
+gems/*
+bin/*

data/Gemfile

@@ -0,0 +1,12 @@
+# vim: syntax=ruby
+bundle_path 'gems'
+disable_rubygems
+disable_system_gems
+
+gem 'big_money', '~> 1.1.0'
+gem 'dm-core',   '>= 0.10'
+
+only :development do
+  gem 'jeweler'
+  gem 'shoulda'
+end

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2010 Stateless Systems
+
+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,61 @@
+= dm-money
+
+== Description
+
+BigMoney backed DataMapper money properties.
+
+== Todo
+
+* Validations.
+
+== Synopsis
+
+=== Basic
+
+  require 'dm-core'
+  require 'dm-money'
+
+  class Cake
+    include DataMapper::Resource
+    # ... other properties.
+
+    money :gst
+    # public
+    #   gst #=> BigMoney
+    #   gst=(value)
+    #
+    # property :gst_amount,   BigDecimal, accessor: private
+    # property :gst_currency, String,     accessor: private, length: 3
+  end
+
+=== Property Options
+
+  require 'dm-core'
+  require 'dm-money'
+
+  class Cake
+    include DataMapper::Resource
+    # ... other properties.
+
+    money :price, required: true, accessor: protected
+    # protected
+    #   price #=> BigMoney
+    #   price=(value)
+    #
+    # property :price_amount,   BigDecimal, accessor: private, required: true
+    # property :price_currency, String,     accessor: private, required: true, length: 3
+  end
+
+== Install
+
+* Via git:
+
+    git clone git://github.com/shanna/dm-money.git
+
+* Via gem:
+
+    gem install dm-money
+
+== License
+
+See LICENSE.

data/Rakefile

@@ -0,0 +1,45 @@
+# encoding: utf-8
+# vim: syntax=ruby
+require 'rubygems'
+require 'rake'
+require 'rake/testtask'
+require 'rake/rdoctask'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name        = 'dm-money'
+    gem.summary     = %q{BigMoney backed DataMapper money plugin.}
+    gem.email       = ['shane.hanna@gmail.com']
+    gem.homepage    = 'http://github.com/shanna/dm-money'
+    gem.authors     = ['Shane Hanna']
+    gem.executables = [] # Only ever bundled development executables in bin/*
+    gem.add_dependency 'big_money', '~> 1.1.0'
+    gem.add_dependency 'dm-core', '>= 0.10'
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: sudo gem install jeweler"
+end
+
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/test_*.rb'
+  test.verbose = true
+end
+
+Rake::RDocTask.new do |rdoc|
+  if File.exist?('VERSION.yml')
+    config = YAML.load(File.read('VERSION.yml'))
+    version = "#{config[:major]}.#{config[:minor]}.#{config[:patch]}"
+  else
+    version = ""
+  end
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "dm-money #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+
+task :default => :test

data/VERSION

@@ -0,0 +1 @@
+0.1.0

data/lib/dm-money.rb

@@ -0,0 +1,77 @@
+require 'big_money'
+require 'dm-core'
+
+module DataMapper
+  module Money
+    def self.included(model)
+      model.extend ClassMethods
+    end
+
+    module ClassMethods
+
+      # Add a BigMoney property.
+      #
+      # ==== Parameters
+      # name<Symbol>:: Name of the composite money property.
+      # options<Hash(Symbol => String)>:: DataMapper property options.
+      #
+      # ==== Examples
+      # class Bike
+      #   include DataMapper::Resource
+      #   # ... other properties.
+      #
+      #   money :gst
+      #   # public
+      #   #   gst #=> BigMoney
+      #   #   gst=(value)
+      #   #
+      #   # property :gst_amount,   BigDecimal, accessor: private
+      #   # property :gst_currency, String,     accessor: private, length: 3
+      #
+      #   money :price, required: true, accessor: protected
+      #   # protected
+      #   #   price #=> BigMoney
+      #   #   price=(value)
+      #   #
+      #   # property :price_amount,   BigDecimal, accessor: private, required: true
+      #   # property :price_currency, String,     accessor: private, required: true, length: 3
+      # end
+      #--
+      # TODO: Validations.
+      def money(name, options = {})
+        raise ArgumentError.new('You need to pass at least one argument') if name.empty?
+
+        property               = Property.new(self, name, BigDecimal, options)
+        name                   = property.name.to_s
+        instance_variable_name = property.instance_variable_name
+        name_amount            = "#{name}_amount"
+        name_currency          = "#{name}_currency"
+
+        self.property name_amount.to_sym,   BigDecimal, property.options.except(:accessor, :reader, :writer).merge(:accessor => :private)
+        self.property name_currency.to_sym, String,     :accessor => :private, :required => property.required, :length => 3
+
+        # TODO: Access amount, currency via readers or properties?
+        # TODO: Validations or error message attempting to set with something other than BigMoney?
+        class_eval <<-RUBY, __FILE__, __LINE__ + 1
+          #{property.reader_visibility}
+          def #{name}
+            return #{instance_variable_name} if defined?(#{instance_variable_name})
+            return unless #{name_amount} && #{name_currency}
+            #{instance_variable_name} = BigMoney.new(#{name_amount}, #{name_currency})
+          end
+
+          #{property.writer_visibility}
+          def #{name}=(value)
+            raise TypeError.new('Expected BigMoney +value+ but got \#{value.class}') unless value.kind_of?(BigMoney)
+            self.#{name_amount}       = value.amount
+            self.#{name_currency}     = value.currency
+            #{instance_variable_name} = value
+          end
+        RUBY
+      end
+
+    end # ClassMethods
+
+    Model.append_inclusions self
+  end # Money
+end # DataMapper

data/test/helper.rb

@@ -0,0 +1,19 @@
+root = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+require File.join(root, 'gems', 'environment')
+Bundler.require_env(:development)
+require 'test/unit'
+
+begin
+  require 'shoulda'
+rescue LoadError
+  warn 'Shoulda is required for testing. Use gem bundle to install development gems.'
+  exit 1
+end
+
+$:.unshift File.join(root, 'lib'), File.dirname(__FILE__)
+require 'dm-money'
+
+DataMapper.setup(:default, :adapter => 'in_memory', :database => 'dm_money_test')
+class Test::Unit::TestCase
+end

data/test/test_money.rb

@@ -0,0 +1,31 @@
+require File.join(File.dirname(__FILE__), 'helper')
+
+class TestMoney < Test::Unit::TestCase
+  context 'BigMoney' do
+    setup do
+      Object.send(:remove_const, :Cake) if defined?(Cake)
+      class ::Cake
+        include DataMapper::Resource
+        property :id,   Serial
+        property :type, String
+        money    :price
+      end # Cake
+    end
+
+    should 'behave like accessor' do
+      price = BigMoney.new('2.50', :aud)
+      cake  = Cake.create(:type => 'carrot')
+
+      assert cake.price = price
+      assert_equal price, cake.price
+    end
+
+    should 'be accepted by constructor' do
+      price = BigMoney.new('2.80', :aud)
+      assert_nothing_raised do
+        cake = Cake.create(:type => 'sponge', :price => price)
+        assert_equal price, cake.price
+      end
+    end
+  end
+end # TestMoney

metadata

@@ -0,0 +1,85 @@
+--- !ruby/object:Gem::Specification 
+name: dm-money
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Shane Hanna
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-01-25 00:00:00 +11:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: big_money
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        version: 1.1.0
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: dm-core
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0.10"
+    version: 
+description: 
+email: 
+- shane.hanna@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- .gitignore
+- Gemfile
+- LICENSE
+- README.rdoc
+- Rakefile
+- VERSION
+- lib/dm-money.rb
+- test/helper.rb
+- test/test_money.rb
+has_rdoc: true
+homepage: http://github.com/shanna/dm-money
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+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.3.5
+signing_key: 
+specification_version: 3
+summary: BigMoney backed DataMapper money plugin.
+test_files: 
+- test/test_money.rb
+- test/helper.rb