chinese_lunar 0.0.1

data/.gitignore

@@ -0,0 +1,17 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp

data/.rspec

@@ -0,0 +1,2 @@
+-f nested --color
+--order rand

data/Gemfile

@@ -0,0 +1,4 @@
+source 'http://ruby.taobao.org/' 
+
+# Specify your gem's dependencies in chinese_lunar.gemspec
+gemspec

data/LICENSE

@@ -0,0 +1,22 @@
+Copyright (c) 2012 Lanvige Jiang
+
+MIT License
+
+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.md

@@ -0,0 +1,29 @@
+# ChineseLunar
+
+TODO: Write a gem description
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'chinese_lunar'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install chinese_lunar
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Contributing
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Added some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

@@ -0,0 +1,8 @@
+# encoding: utf-8
+
+require "bundler"
+Bundler::GemHelper.install_tasks
+
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new :spec
+task :default => :spec

data/chinese_lunar.gemspec

@@ -0,0 +1,24 @@
+# encoding: utf-8
+
+require File.expand_path('../lib/chinese_lunar/version', __FILE__)
+
+Gem::Specification.new do |s|
+  s.name          = "chinese_lunar"
+  s.version       = ChineseLunar::VERSION
+
+  s.authors       = ["Lanvige Jiang"]
+  s.email         = ["lanvige@gmail.com"]
+  s.description   = %q{Generate the Lunar date}
+  s.summary       = %q{Generate the Lunar date}
+  s.homepage      = ""
+
+  s.files        = `git ls-files`.split("\n")
+  s.test_files    = s.files.grep(%r{^(test|spec|features)/})
+  s.executables  = `git ls-files`.split("\n").map{|f| f =~ /^bin\/(.*)/ ? $1 : nil}.compact
+  s.require_path = "lib"  
+
+  s.required_rubygems_version = ">= 1.3.6"
+
+  s.add_development_dependency "bundler", ">= 1.1.0"
+  s.add_development_dependency "rspec",   "~> 2.9.0"
+end

data/lib/chinese_lunar/convert.rb

@@ -0,0 +1,231 @@
+# encoding: utf-8
+# Modify from http://my.oschina.net/tomsu/blog/700
+
+module ChineseLunar
+  class Lunar
+
+    @@lunar_info = [0x04bd8, 0x04ae0, 0x0a570,
+                    0x054d5, 0x0d260, 0x0d950, 0x16554, 0x056a0, 0x09ad0, 0x055d2,
+                    0x04ae0, 0x0a5b6, 0x0a4d0, 0x0d250, 0x1d255, 0x0b540, 0x0d6a0,
+                    0x0ada2, 0x095b0, 0x14977, 0x04970, 0x0a4b0, 0x0b4b5, 0x06a50,
+                    0x06d40, 0x1ab54, 0x02b60, 0x09570, 0x052f2, 0x04970, 0x06566,
+                    0x0d4a0, 0x0ea50, 0x06e95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0,
+                    0x1c8d7, 0x0c950, 0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4,
+                    0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557, 0x06ca0, 0x0b550,
+                    0x15355, 0x04da0, 0x0a5d0, 0x14573, 0x052d0, 0x0a9a8, 0x0e950,
+                    0x06aa0, 0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260,
+                    0x0f263, 0x0d950, 0x05b57, 0x056a0, 0x096d0, 0x04dd5, 0x04ad0,
+                    0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b5a0, 0x195a6,
+                    0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40,
+                    0x0af46, 0x0ab60, 0x09570, 0x04af5, 0x04970, 0x064b0, 0x074a3,
+                    0x0ea50, 0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0, 0x0c960,
+                    0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0,
+                    0x092d0, 0x0cab5, 0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9,
+                    0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930, 0x07954, 0x06aa0,
+                    0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65,
+                    0x0d530, 0x05aa0, 0x076a3, 0x096d0, 0x04bd7, 0x04ad0, 0x0a4d0,
+                    0x1d0b6, 0x0d250, 0x0d520, 0x0dd45, 0x0b5a0, 0x056d0, 0x055b2,
+                    0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0]
+
+    @@nstr = ["", "正", "二", "三", "四", "五", "六", "七", "八", "九", "十", "十一", "十二"]
+    @@gan = ["甲", "乙", "丙", "丁", "戊", "己", "庚", "辛", "壬", "癸"]
+    @@zhi = ["子", "丑", "寅", "卯", "辰", "巳", "午", "未", "申", "酉", "戌", "亥"]
+    @@nnimals = ["鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪"]
+
+    attr_reader :Date
+
+    def initialize(date = Date.today)
+      @date = date
+    end
+
+    # Get Lundar date in Chinese text
+    def lunar_date_in_chinese() 
+      l = convert(@date.year, @date.month, @date.day)
+      cyclical_year(l[0]) + "年 " + @@nstr[l[1]] + "月 " + get_day_in_chinese(l[2])
+    end
+
+    def lunar_date_year_in_chinese()
+      l = convert(@date.year, @date.month, @date.day)
+      cyclical_year(l[0])
+    end
+
+    # Get the Lundar date in 'xxxx-xx-xx' fromat
+    def lunar_date() 
+      l = convert(@date.year, @date.month, @date.day)
+      l[0].to_s + "-" + l[1].to_s + "-" + (/^\d+/.match(l[2].to_s)).to_s
+    end
+
+  private
+
+    def cyclical_year(y)
+      num = y - 1900 + 36
+      cyclicalm(num)
+    end
+
+    def cyclicalm(num)
+      @@gan[num % 10] + @@zhi[num % 12]
+    end
+
+    # 传出y年m月d日对应的农历.
+    # year0 .month1 .day2 .yearCyl3 .monCyl4 .dayCyl5 .isLeap6
+    def convert(y, m, d)
+      nongDate = []   
+      i = 0
+      temp = 0
+      leap = 0
+      baseDate = Date.new(0 + 1900, 1, 31)
+         
+      objDate = Date.new(y, m, d);
+      offset = objDate - baseDate
+      nongDate[5] = offset + 40;
+      nongDate[4] = 14;
+
+      i = 1900
+      while (i < 2050 && offset > 0)
+        temp = days_in_lunar_date(i)
+        offset -= temp
+        nongDate[4] += 12
+
+        i += 1
+      end
+
+      if (offset < 0)
+        offset += temp
+        i -= 1
+        nongDate[4] -= 12
+      end
+
+      nongDate[0] = i
+      nongDate[3] = i - 1864
+      leap = leap_month(i) #闰哪个月
+      nongDate[6] = 0
+
+      i = 1  
+      while(i<13 && offset > 0)
+        #闰月
+        if (leap > 0 && i == (leap + 1) && nongDate[6] == 0)
+          i -= 1
+          nongDate[6] = 1
+          temp = leap_days( nongDate[0])
+        else  
+          temp = monthDays( nongDate[0], i)
+        end   
+
+        #解除闰月   
+        if (nongDate[6] == 1 && i == (leap + 1))
+          nongDate[6] = 0  
+        end   
+          offset -= temp   
+          if (nongDate[6] == 0)   
+            nongDate[4] += 1  
+        end   
+
+        i += 1  
+      end   
+      
+      if (offset == 0 && leap > 0 && i == leap + 1)
+        if (nongDate[6] == 1)
+          nongDate[6] = 0
+        else  
+          nongDate[6] = 1
+          i -= 1  
+          nongDate[4] -= 1  
+        end
+      end   
+      
+      if (offset < 0)
+        offset += temp
+        i -= 1
+        nongDate[4] -= 1
+      end
+      
+      nongDate[1] = i
+      nongDate[2] = offset + 1
+    
+      nongDate
+    end
+
+    def get_day_in_chinese(day)
+      a = ""  
+        if (day == 10)
+          return "初十"
+        elsif (day == 20)
+          return "二十"
+        elsif (day == 30)
+          return "三十"
+      end
+             
+      two = ((day) / 10).to_i()
+
+      if (two == 0)   
+        a = "初"  
+      elsif (two == 1)   
+        a = "十"
+      elsif (two == 2)   
+        a = "廿"
+      elsif (two == 3)   
+        a = "三"
+      else
+        a = "ERROR"  
+      end   
+      
+      one =  (day % 10)   
+    
+      case one   
+        when 1 then a += "一"
+        when 2 then a += "二"
+        when 3 then a += "三"
+        when 4 then a += "四"
+        when 5 then a += "五"
+        when 6 then a += "六"
+        when 7 then a += "七"
+        when 8 then a += "八"
+        when 9 then a += "九"
+      end
+      
+      return a 
+    end
+
+    # Return the days in lunar of y year.
+    def days_in_lunar_date(y)
+      sum = 348  
+      i = 0x8000  
+      while i > 0x8  
+        if ((@@lunar_info[y - 1900] & i) != 0)   
+          sum += 1  
+        end   
+        i >>= 1  
+      end
+    
+      sum + leap_days(y)
+    end   
+
+    # Return the leap days in y year.
+    def leap_days(y)
+       if (leap_month(y) != 0)    
+         if ((@@lunar_info[y - 1900] & 0x10000) != 0)   
+           return 30  
+         else  
+           return 29  
+         end   
+       else  
+         return 0  
+       end
+    end   
+
+    #传回农历 y年闰哪个月 1-12 , 没闰传回 0  
+    def leap_month(y)
+      @@lunar_info[y - 1900] & 0xf
+    end
+    
+    # Return the days of m month in y year.
+    def  monthDays(y, m)
+      if ((@@lunar_info[y - 1900] & (0x10000 >> m)) == 0)
+        return 29
+      else
+        return 30
+      end
+    end
+
+  end
+end

data/lib/chinese_lunar/version.rb

@@ -0,0 +1,3 @@
+module ChineseLunar
+  VERSION = "0.0.1"
+end

data/lib/chinese_lunar.rb

@@ -0,0 +1,7 @@
+# encoding: utf-8
+
+require "chinese_lunar/version"
+require "chinese_lunar/convert"
+
+module ChineseLunar
+end

data/spec/chinese_lunar/convert_spec.rb

@@ -0,0 +1,45 @@
+# encoding: utf-8
+
+require 'spec_helper'
+
+require "chinese_lunar/convert"
+
+module ChineseLunar
+  describe Lunar do
+
+    it "should convert to chinese lunar success" do
+      luanr = Lunar.new(Date.new(2012, 3, 26))
+      luanr.lunar_date_in_chinese.should eq "壬辰年 三月 初五"
+    end
+
+    it "should convert 2012 year to 壬辰 success" do
+      luanr = Lunar.new(Date.new(2012, 3, 26))
+      luanr.lunar_date_year_in_chinese.should eq "壬辰"
+    end
+
+    it "should convert 2012 year to 壬辰 success" do
+      luanr = Lunar.new(Date.new(2012, 3, 26))
+      luanr.lunar_date_year_in_chinese.should eq "壬辰"
+    end
+
+    it "should convert 1983 success" do
+      luanr = Lunar.new(Date.new(1983, 7, 23))
+      luanr.lunar_date.should eq "1983-6-14"
+    end
+
+    it "should convert 1985 success" do
+      luanr = Lunar.new(Date.new(1985, 2, 2))
+      luanr.lunar_date.should eq "1984-12-13"
+    end
+
+    it "should convert 1993 success" do
+      luanr = Lunar.new(Date.new(1993, 8, 11))
+      luanr.lunar_date.should eq "1993-6-24"
+    end
+
+    it "should convert 2012 success" do
+      luanr = Lunar.new(Date.new(2012, 3, 26))
+      luanr.lunar_date.should eq "2012-3-5"
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,5 @@
+require 'rspec'
+
+RSpec.configure do |config|
+  config.mock_with :rspec
+end

metadata

@@ -0,0 +1,81 @@
+--- !ruby/object:Gem::Specification
+name: chinese_lunar
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Lanvige Jiang
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-03-26 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: &7446000 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 1.1.0
+  type: :development
+  prerelease: false
+  version_requirements: *7446000
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: &7444680 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 2.9.0
+  type: :development
+  prerelease: false
+  version_requirements: *7444680
+description: Generate the Lunar date
+email:
+- lanvige@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- .rspec
+- Gemfile
+- LICENSE
+- README.md
+- Rakefile
+- chinese_lunar.gemspec
+- lib/chinese_lunar.rb
+- lib/chinese_lunar/convert.rb
+- lib/chinese_lunar/version.rb
+- spec/chinese_lunar/convert_spec.rb
+- spec/spec_helper.rb
+homepage: ''
+licenses: []
+post_install_message: 
+rdoc_options: []
+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.16
+signing_key: 
+specification_version: 3
+summary: Generate the Lunar date
+test_files:
+- spec/chinese_lunar/convert_spec.rb
+- spec/spec_helper.rb