brdinheiro 0.0.1

data/lib/brdinheiro/number_portuguese.rb

@@ -0,0 +1,163 @@
+module Extenso 
+  @@unidade = {
+    0 => "zero",  
+    1 => "um",  
+    2 => "dois",  
+    3 => "três",  
+    4 => "quatro",  
+    5 => "cinco",  
+    6 => "seis",  
+    7 => "sete",  
+    8 => "oito",  
+    9 => "nove" 
+  }
+  @@dezena = {
+    10 => "dez",  
+    11 => "onze",  
+    12 => "doze",  
+    13 => "treze",  
+    14 => "quatorze",  
+    15 => "quinze",  
+    16 => "dezesseis",  
+    17 => "dezessete",  
+    18 => "dezoito",  
+    19 => "dezenove",  
+    20 => "vinte",  
+    30 => "trinta",  
+    40 => "quarenta",  
+    50 => "cinquenta",  
+    60 => "sessenta",  
+    70 => "setenta",  
+    80 => "oitenta",  
+    90 => "noventa"  }
+  @@centena = {100 => "cento",  
+    200 => "duzentos",  
+    300 => "trezentos",  
+    400 => "quatrocentos",  
+    500 => "quinhentos",  
+    600 => "seiscentos",  
+    700 => "setecentos",  
+    800 => "oitocentos",  
+    900 => "novecentos"  }
+  
+  # Escreve o numero por extenso.
+  # 
+  # Exemplo:
+  #  1.por_extenso ==> 'um'
+  #  100.por_extenso ==> 'cem'
+  #  158.por_extenso ==> 'cento e cinquenta e oito'
+  def por_extenso
+    Extenso.por_extenso(self)
+  end
+  
+  # Alias para o metodo por_extenso
+  alias_method :to_extenso, :por_extenso
+  
+  # Escreve o numero por extenso.
+  # 
+  # Exemplo:
+  #  Extenso.por_extenso(1) ==> "um"
+  #  Extenso.por_extenso(100) ==> "cem"
+  #  Extenso.por_extenso(158) ==> "cento e cinquenta e oito"  
+  def Extenso.por_extenso(numero)
+    negativo=(numero<0)?"menos ":""
+    n=numero.to_i.abs
+    return case n
+    when 0..9: negativo + @@unidade[n].to_s
+    when 10..19: negativo + @@dezena[n].to_s
+    when 20..99:
+      v=n % 10
+      if  v== 0
+        negativo + @@dezena[n].to_s
+      else
+        "#{negativo}#{@@dezena[n-v]} e #{por_extenso(v)}"
+      end
+    when 100
+      negativo+"cem"
+    when 101..999
+      v=n % 100
+      if  v== 0
+        negativo + @@centena[n].to_s
+      else
+        "#{negativo}#{@@centena[n-v]} e #{por_extenso(v)}"
+      end
+    when 1000..999999
+      m,c=n/1000,n%1000
+      %(#{negativo}#{por_extenso(m)} mil#{c > 0 ? " e #{por_extenso(c)}":''})
+    when 1_000_000..999_999_999
+      mi,m=n/1_000_000,n%1_000_000
+      %(#{negativo}#{por_extenso(mi)} milh#{mi > 1 ? 'ões':'ão'}#{m > 0 ? " e #{por_extenso(m)}" : ''})
+    when 1_000_000_000..999_999_999_999
+      bi,mi=n/1_000_000_000,n%1_000_000_000
+      %(#{negativo}#{por_extenso(bi)} bilh#{bi > 1 ? 'ões':'ão'}#{mi > 0 ? " e #{por_extenso(mi)}" : ''})
+    when 1_000_000_000_000..999_999_999_999_999
+      tri,bi=n/1_000_000_000_000,n%1_000_000_000_000
+      %(#{negativo}#{por_extenso(tri)} trilh#{tri > 1 ? 'ões':'ão'}#{bi > 0 ? " e #{por_extenso(bi)}" : ''})
+    else
+      raise "Valor excede o permitido: #{n}"
+    end
+  end
+end
+
+module ExtensoReal
+  include Extenso
+ 
+  # Escreve por extenso em reais.
+  # 
+  # Exemplo:
+  #  1.por_extenso_em_reais ==> 'um real'
+  #  (100.58).por_extenso_em_reais ==> 'cem reais e cinquenta e oito centavos'
+  def por_extenso_em_reais
+    ExtensoReal.por_extenso_em_reais(self)
+  end
+  
+  # Alias para por_extenso_em_reais
+  alias_method :to_extenso_real, :por_extenso_em_reais
+
+  # Escreve o numero por extenso em reais.
+  # 
+  # Exemplo:
+  #  Extenso.por_extenso_em_reais(1) ==> "um real"
+  #  Extenso.por_extenso_em_reais(100) ==> "cem reais"
+  #  Extenso.por_extenso_em_reais(100.58) ==> "cem reais e cinquenta e oito centavos"  
+  def ExtensoReal.por_extenso_em_reais(valor)
+    negativo=(valor<0)?" negativo":""
+    negativos=(valor<0)?" negativos":""
+    valor = valor.abs
+    return 'grátis' if valor == 0
+    case valor
+    when Integer
+      extenso = Extenso.por_extenso(valor)
+      if extenso =~ /^(.*)(ão$|ões$)/
+        complemento = 'de '
+      else
+        complemento = ''
+      end
+      %(#{extenso} #{valor <= 1 ? "real#{negativo}": "#{complemento}reais#{negativos}"})
+    when Float
+      real,cents=("%.2f" % valor).split(/\./).map{ |m| m.to_i}
+      valor_cents=Extenso.por_extenso(cents%100)
+      valor_cents+= case cents.to_i%100
+      when 0: ""
+      when 1: " centavo"
+      when 2..99: " centavos"
+      end
+
+      if real.to_i > 0
+        "#{ExtensoReal.por_extenso_em_reais(real.to_i)}#{cents > 0 ? ' e ' + valor_cents + negativos : real.to_i > 1 ? negativos : negativo }"
+      else
+        if (cents.to_i%100)==1
+           "#{valor_cents}#{negativo}"
+        else
+           "#{valor_cents}#{negativos}"
+        end
+      end
+    else
+      ExtensoReal.por_extenso_em_reais(valor.to_s.strip.gsub(/[^\d]/,'.').to_f)
+    end
+  end
+end
+
+Numeric.send(:include, DinheiroUtil)
+Numeric.send(:include, ExtensoReal)
+

data/lib/brdinheiro/version.rb

@@ -0,0 +1,9 @@
+module BrDinheiro
+  module VERSION #:nodoc:
+    MAJOR = 0
+    MINOR = 0
+    TINY  = 1
+
+    STRING = [MAJOR, MINOR, TINY].join('.')
+  end
+end

data/lib/brdinheiro.rb

@@ -0,0 +1,20 @@
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+  
+%w(dinheiro
+dinheiro_util
+dinheiro_active_record
+excecoes
+number_portuguese).each {|req| require File.dirname(__FILE__) + "/brdinheiro/#{req}"}
+
+
+require 'bigdecimal'
+require 'rubygems'
+require 'active_record'
+require 'activesupport'
+
+String.send(:include, DinheiroUtil)
+ActiveRecord::Base.send :include, DinheiroActiveRecord
+
+module BrDinheiro  
+end

data/test/br_dinheiro_test.rb

@@ -0,0 +1,11 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+
+class TestBrDinheiro < Test::Unit::TestCase
+
+  def setup
+  end
+  
+  def test_truth
+    assert true
+  end
+end

data/test/dinheiro_active_record_test.rb

@@ -0,0 +1,49 @@
+# require File.dirname(__FILE__) + '/test_helper'
+# 
+# class Carteira < ActiveRecord::Base
+#   
+#   usar_como_dinheiro :saldo
+#   
+# end
+# 
+# class DinheiroActiveRecordTest < Test::Unit::TestCase
+#   
+#   def setup
+#     @carteira = Carteira.new
+#   end
+#   
+#   def teste_se_aceita_dinheiro
+#     @carteira.saldo = 8.reais
+#     assert @carteira.save
+#     assert_equal 8.reais, @carteira.saldo
+#   end
+# 
+#   def teste_se_aceita_numero
+#     @carteira.saldo = 30
+#     assert @carteira.save
+#     assert_equal 30.reais, @carteira.saldo
+#   end
+#   
+#   def teste_se_rejeita_valor_invalido
+#     @carteira.saldo = 30
+#     assert @carteira.save
+#     @carteira.saldo = 'bla'
+#     assert !@carteira.save
+#     assert_equal "O valor deve estar preenchido e no formato correto. Ex.: 100.00 .", @carteira.errors['saldo']    
+#   end
+#   
+#   def teste_se_trata_nulo_corretamente
+#     assert_nil @carteira.saldo
+#     @carteira.saldo = nil
+#     assert_nil @carteira.saldo
+#     @carteira.save
+#     assert_nil @carteira.saldo
+#   end
+# 
+#   def test_se_cria_carteira_corretamente_quando_recebe_parametros
+#     carteira = Carteira.new(:saldo => "1")
+#     assert_equal 1.real, carteira.saldo
+#   end
+# 
+# 
+# end