romans 0.1.0

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,21 @@
+## MAC OS
+.DS_Store
+
+## TEXTMATE
+*.tmproj
+tmtags
+
+## EMACS
+*~
+\#*
+.\#*
+
+## VIM
+*.swp
+
+## PROJECT::GENERAL
+coverage
+rdoc
+pkg
+
+## PROJECT::SPECIFIC

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Kristian Mandrup
+
+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,19 @@
+# Romans
+
+Roman literals
+
+## Note on Patches/Pull Requests
+ 
+* Fork the project.
+* Make your feature addition or bug fix.
+* Add tests for it. This is important so I don't break it in a
+  future version unintentionally.
+* Commit, do not mess with rakefile, version, or history.
+  (if you want to have your own version, that is fine but bump version in a commit by itself I can ignore when I pull)
+* Send me a pull request. Bonus points for topic branches.
+
+## License
+
+Author: +Dave Burt <dave at burt.id.au>+
+
++Fine print: Provided as is. Use at your own risk. Credit's appreciated if you use my code.+

data/Rakefile

@@ -0,0 +1,42 @@
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "romans"
+    gem.summary = %Q{Roman numerals}
+    gem.description = %Q{Roman numerals library}
+    gem.email = "kmandrup@gmail.com"
+    gem.homepage = "http://github.com/kristianmandrup/romans"
+    gem.authors = ["Kristian Mandrup"]
+    gem.add_development_dependency "rspec", ">= 1.2.9"
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: gem install jeweler"
+end
+
+# require 'spec/rake/spectask'
+# Spec::Rake::SpecTask.new(:spec) do |spec|
+#   spec.libs << 'lib' << 'spec'
+#   spec.spec_files = FileList['spec/**/*_spec.rb']
+# end
+# 
+# Spec::Rake::SpecTask.new(:rcov) do |spec|
+#   spec.libs << 'lib' << 'spec'
+#   spec.pattern = 'spec/**/*_spec.rb'
+#   spec.rcov = true
+# end
+# 
+# task :spec => :check_dependencies
+# 
+# task :default => :spec
+# 
+# require 'rake/rdoctask'
+# Rake::RDocTask.new do |rdoc|
+#   version = File.exist?('VERSION') ? File.read('VERSION') : ""
+# 
+#   rdoc.rdoc_dir = 'rdoc'
+#   rdoc.title = "romans #{version}"
+#   rdoc.rdoc_files.include('README*')
+#   rdoc.rdoc_files.include('lib/**/*.rb')
+# end

data/VERSION

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

data/lib/romans.rb

@@ -0,0 +1,184 @@
+#
+# Roman numerals
+#
+# Generates roman numerals from integers and vice-versa
+#
+# Author: Dave Burt <dave at burt.id.au>
+#
+# Fine print: Provided as is. Use at your own risk. Credit's appreciated if you use my code. 
+#
+
+
+# http://media.pragprog.com/titles/fr_quiz/code/roman_numerals/roman_numerals.rb
+
+# Contains methods to convert integers to Roman numeral strings, and vice versa.
+module RomanNumerals
+  
+  # Maps Roman numeral digits to their integer values
+  DIGITS = {
+    'I' => 1,
+    'V' => 5,
+    'X' => 10,
+    'L' => 50,
+    'C' => 100,
+    'D' => 500,
+    'M' => 1000
+  }
+  
+  # The largest integer representable as a Roman numerable by this module
+  MAX = 3999
+  
+  # Maps some integers to their Roman numeral values
+  @@digits_lookup = DIGITS.inject({
+    4 => 'IV',
+    9 => 'IX',
+    40 => 'XL',
+    90 => 'XC',
+    400 => 'CD',
+    900 => 'CM'}) do |memo, pair|
+    memo.update({pair.last => pair.first})
+  end
+  
+  # Based on Regular Expression Grabbag in the O'Reilly Perl Cookbook, #6.23
+  REGEXP = /^M*(D?C{0,3}|C[DM])(L?X{0,3}|X[LC])(V?I{0,3}|I[VX])$/i
+  
+  # Converts +int+ to a Roman numeral
+  def self.from_integer(int)
+    return nil if int < 0 || int > MAX
+    remainder = int
+    result = ''
+    @@digits_lookup.keys.sort.reverse.each do |digit_value|
+      while remainder >= digit_value
+        remainder -= digit_value
+        result += @@digits_lookup[digit_value]
+      end
+      break if remainder <= 0
+    end
+    result
+  end
+  
+  # Converts +roman_string+, a Roman numeral, to an integer
+  def self.to_integer(roman_string)
+    return nil unless roman_string.is_roman_numeral?
+    last = nil
+    roman_string.to_s.upcase.split(//).reverse.inject(0) do |memo, digit|
+      if digit_value = DIGITS[digit]
+        if last && last > digit_value
+          memo -= digit_value
+        else
+          memo += digit_value
+        end
+        last = digit_value
+      end
+      memo
+    end
+  end
+  
+  # Returns true if +string+ is a Roman numeral.
+  def self.is_roman_numeral?(string)
+    REGEXP =~ string
+  end
+end
+
+
+
+class String
+  # Considers string a Roman numeral,
+  # and converts it to the corresponding integer.
+  def to_i_roman
+    RomanNumerals.to_integer(self)
+  end
+  # Returns true if the subject is a Roman numeral.
+  def is_roman_numeral?
+    RomanNumerals.is_roman_numeral?(self)
+  end
+end
+class Integer
+  # Converts this integer to a Roman numeral.
+  def to_s_roman
+    RomanNumerals.from_integer(self) || ''
+  end
+end
+
+
+
+# Integers that look like Roman numerals
+class RomanNumeral
+  attr_reader :to_s, :to_i
+
+  @@all_roman_numerals = []
+
+  # May be initialized with either a string or an integer
+  def initialize(value)
+    case value
+    when Integer
+      @to_s = value.to_s_roman
+      @to_i = value
+    else
+      @to_s = value.to_s
+      @to_i = value.to_s.to_i_roman
+    end
+    @@all_roman_numerals[to_i] = self
+  end
+
+  # Factory method: returns an equivalent existing object if such exists,
+  # or a new one
+  def self.get(value)
+    if value.is_a?(Integer)
+      to_i = value
+    else
+      to_i = value.to_s.to_i_roman
+    end
+    @@all_roman_numerals[to_i] || RomanNumeral.new(to_i)
+  end
+
+  def inspect
+    to_s
+  end
+
+  # Delegates missing methods to Integer, converting arguments to Integer,
+  # and converting results back to RomanNumeral
+  def method_missing(sym, *args)
+    unless to_i.respond_to?(sym)
+      raise NoMethodError.new(
+        "undefined method '#{sym}' for #{self}:#{self.class}")
+    end
+    result = to_i.send(sym,
+      *args.map {|arg| arg.is_a?(RomanNumeral) ? arg.to_i : arg })
+    case result
+    when Integer
+      RomanNumeral.get(result)
+    when Enumerable
+      result.map do |element|
+        element.is_a?(Integer) ? RomanNumeral.get(element) : element
+      end
+    else
+      result
+    end
+  end
+end
+
+
+
+# Enables uppercase Roman numerals to be used interchangeably with integers.
+# They are autovivified RomanNumeral constants
+# Synopsis:
+#   4 + IV           #=> VIII
+#   VIII + 7         #=> XV
+#   III ** III       #=> XXVII
+#   VIII.divmod(III) #=> [II, II]
+# def Object.const_missing sym
+#   unless RomanNumerals::REGEXP === sym.to_s
+#     raise NameError.new("uninitialized constant: #{sym}")
+#   end
+#   const_set(sym, RomanNumeral.get(sym))
+# end
+
+
+def Object.const_missing sym
+  if RomanNumerals::REGEXP === sym.to_s
+    const_set(sym, RomanNumeral.get(sym))
+    return
+  end
+  super  
+end

data/spec/romans_spec.rb

@@ -0,0 +1,9 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe "Roman numerals" do              
+  it "should add roman numerals correctly" do
+    IV = RomanNumeral.get(4)
+    res = IV + 5
+    res.to_s.should == 'IX'    
+  end   
+end

data/spec/spec.opts

@@ -0,0 +1 @@
+--color

data/spec/spec_helper.rb

@@ -0,0 +1,6 @@
+require 'rspec'
+require 'rspec/autorun'
+require 'romans'
+
+# RSpec.configure do |config|  
+# end

metadata

@@ -0,0 +1,89 @@
+--- !ruby/object:Gem::Specification 
+name: romans
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 1
+  - 0
+  version: 0.1.0
+platform: ruby
+authors: 
+- Kristian Mandrup
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-06-25 00:00:00 +02:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rspec
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 1
+        - 2
+        - 9
+        version: 1.2.9
+  type: :development
+  version_requirements: *id001
+description: Roman numerals library
+email: kmandrup@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- .document
+- .gitignore
+- LICENSE
+- README.rdoc
+- Rakefile
+- VERSION
+- lib/romans.rb
+- spec/romans_spec.rb
+- spec/spec.opts
+- spec/spec_helper.rb
+has_rdoc: true
+homepage: http://github.com/kristianmandrup/romans
+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 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: Roman numerals
+test_files: 
+- spec/romans_spec.rb
+- spec/spec_helper.rb