parsi-date 0.1.pre

data/.gitignore

@@ -0,0 +1 @@
+*.gem

data/.rspec

@@ -0,0 +1,2 @@
+--color
+--format progress

data/Gemfile

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

data/Gemfile.lock

@@ -0,0 +1,27 @@
+PATH
+  remote: .
+  specs:
+    parsi-date (0.1.pre)
+
+GEM
+  remote: http://rubygems.org/
+  specs:
+    diff-lcs (1.1.3)
+    rake (0.9.2.2)
+    rspec (2.11.0)
+      rspec-core (~> 2.11.0)
+      rspec-expectations (~> 2.11.0)
+      rspec-mocks (~> 2.11.0)
+    rspec-core (2.11.1)
+    rspec-expectations (2.11.3)
+      diff-lcs (~> 1.1.3)
+    rspec-mocks (2.11.3)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  bundler
+  parsi-date!
+  rake
+  rspec

data/lib/parsi-date.rb

@@ -0,0 +1,285 @@
+# encoding: utf-8
+
+require 'date'
+
+module Parsi
+  MONTHNAMES = [nil] + %w(فروردین اردیبهشت خرداد تیر مرداد شهریور مهر آبان آذر دی بهمن اسفند)
+  ABBR_MONTHNAMES = [nil] + %w(Far Ord Kho Tir Mor Sha Meh Abn Azr Dey Bah Esf)
+  DAYNAMES = %w(شنده یک‌شنده دوشنده سه‌شنده چهارشنده چنج‌شنده جمعه)
+  ABBR_DAYNAMES = %w(ش ۱ش ۲ش ۳ش ۴ش ۵ش ج)
+  [MONTHNAMES, ABBR_MONTHNAMES, DAYNAMES, ABBR_DAYNAMES].each &:freeze
+
+  class Date
+    include Comparable
+
+    attr_reader :year, :month, :day
+
+    DAYS_TO_FIRST_OF_MONTH = [nil, 0, 31, 62, 93, 124, 155, 186, 216, 246, 276, 306, 336]
+    DAYS_IN_MONTH = [nil, 31, 31, 31, 31, 31, 31, 30, 30, 30, 30, 30, 29]
+    JALALI_EPOCH = 1948320.5
+
+    class << self
+
+      def leap? year
+        ((((((year - ((year > 0) ? 474 : 473)) % 2820) + 474) + 38) * 682) % 2816) < 682
+      end
+      alias :exist? :leap?
+
+      def valid? year, month, day
+        return false unless year.is_a?(Fixnum) && month.is_a?(Fixnum) && day.is_a?(Fixnum)
+        return true if leap?(year) && month == 12 && day == 30
+
+        1 <= month && month <= 12 && 1 <= day && day <= DAYS_IN_MONTH[month]
+      end
+
+      def jd jday=0
+        jday = jday.floor
+
+        depoch = (jday - Date.new(475, 1, 1).jd).floor
+        cycle = depoch / 1029983
+        cyear = depoch % 1029983
+
+        if cyear == 1029982
+            ycycle = 2820
+        else
+            aux1 = cyear / 366
+            aux2 = cyear % 366
+            ycycle = (2134 * aux1 + 2816 * aux2 + 2815) / 1028522 + aux1 + 1
+        end
+        year = ycycle + 2820 * cycle + 474
+        year -= 1 if year <= 0
+
+        yday = jday - Date.new(year, 1, 1).jd + 1
+        month = (yday <= 186) ? (yday / 31.0).ceil : ((yday - 6) / 30.0).ceil
+        day = (jday - Date.new(year, month, 1).jd + 1).floor
+        Date.new year, month, day
+      end
+
+      alias :civil :new
+
+      def ordinal year, ydays=1
+        jd = Date.new(year, 1, 1).jd + ydays - 1
+        Date.jd jd
+      end
+
+      def parse string, comp=true
+        # TODO: Add more parse options, for example parse '۴ام فروردین ۱۳۹۱'
+        m   = string.match /(?<year>\d+)(\/|-| )(?<month>\d+)(\/|-| )(?<day>\d+)/
+        m ||= string.match /(?<year>\d+)(?<month>\d{2})(?<day>\d{2})/
+        if m.nil?
+          raise ArgumentError.new 'invalid date'
+        else
+          year, month, day = m[:year].to_i, m[:month].to_i, m[:day].to_i
+          if comp && m[:year].length == 2
+            centry = Date.today.year / 100
+            year = (m[:year].prepend centry.to_s).to_i
+          end
+          if Date.valid? year, month, day
+            Date.new year, month, day
+          else
+            raise ArgumentError.new 'invalid date'
+          end
+        end
+      end
+
+      def today
+        Date.jd ::Date.today.jd
+      end
+
+      def tomorrow ; today + 1 end
+      def yesterday; today - 1 end
+    end
+
+    def initialize year=0, month=1, day=1
+      raise ArgumentError.new 'invalid date' unless Date.valid? year, month, day
+      @year, @month, @day = year, month, day
+    end
+
+    alias :mon :month
+    alias :mday :day
+
+    def to_s sep='/'
+      "%d%s%02d%s%02d" % [year, sep, month, sep, day]
+    end
+
+    def inspect
+      "#<#{self.class}: #{to_s('-')}>"
+    end
+
+    def jd
+      @jd ||= begin
+        epbase = year - ((year >= 0) ? 474 : 473)
+        epyear = 474 + epbase % 2820
+
+        day + DAYS_TO_FIRST_OF_MONTH[month] +
+          (epyear * 682 - 110) / 2816 +
+          (epyear - 1) * 365 +
+          (epbase / 2820 * 1029983) +
+          (JALALI_EPOCH - 1) + 0.5
+      end
+    end
+
+    def mjd  ; (jd - 2400001).floor end
+    def ld   ; (jd - 2299160).floor end
+    def ajd  ; gregorian.ajd        end
+    def amjd ; gregorian.amjd       end
+
+    def wday
+      (gregorian.wday + 1) % 7
+    end
+
+    def cwday
+      wday + 1
+    end
+
+    def yday
+      (jd - first_of_year.jd + 1).to_i
+    end
+
+    def leap?
+      Date.leap? year
+    end
+
+    def to_gregorian
+      ::Date.jd jd
+    end
+    alias :gregorian :to_gregorian
+
+    def strftime format='%Y/%m/%d'
+      format.
+        gsub('%%', 'PERCENT_SUBSTITUTION_MARKER').
+        gsub('%+', '%a %b %e %H:%M:%S %Z %Y').
+        gsub('%c', '%a %-d %B %Y').
+        gsub('%x', '%D').
+        gsub('%D', '%y/%m/%d').
+        gsub('%F', '%Y-%m-%d').
+        gsub('%v', '%e-%b-%Y').
+        gsub('%Y', year.to_s).
+        gsub('%C', (year / 100).to_s).
+        gsub('%y', (year % 100).to_s).
+        gsub('%m',  '%02d' % month).
+        gsub('%_m', '% 2d' % month).
+        gsub('%-m', month.to_s).
+        gsub('%^B', '%B').
+        gsub('%B', Parsi::MONTHNAMES[month]).
+        gsub('%h', '%b').
+        gsub('%b', Parsi::ABBR_MONTHNAMES[month]).
+        gsub('%^b', Parsi::ABBR_MONTHNAMES[month].capitalize).
+        gsub('%d', '%02d' % day).
+        gsub('%e', '% 2d' % day).
+        gsub('%-d', day.to_s).
+        gsub('%j', '%03d' % yday.to_s).
+        gsub('%A', Parsi::DAYNAMES[wday]).
+        gsub('%a', Parsi::ABBR_DAYNAMES[wday]).
+        gsub('%u', cwday.to_s).
+        gsub('%w', wday.to_s).
+        gsub('%n', "\n").
+        gsub('%t', "\t").
+        gsub('PERCENT_SUBSTITUTION_MARKER', '%')
+    end
+
+    def + days
+      raise TypeError.new 'expected numeric' unless days.is_a? Numeric
+      Date.jd jd + days
+    end
+
+    def - days
+      self + -days
+    end
+
+    def >> monthes
+      raise TypeError.new 'expected numeric' unless monthes.is_a? Numeric
+      monthes = year * 12 + month + monthes
+      y = monthes / 12
+      m = monthes % 12
+      y -= 1 and m = 12 if m == 0
+      d = day
+      d -= 1 until Date.valid? y, m, d
+      Date.new y, m, d
+    end
+
+    def << monthes
+      self >> -monthes
+    end
+
+    def <=> other
+      if other.respond_to? :jd
+        jd <=> other.jd
+      elsif other.is_a? Numeric
+        jd <=> other
+      else
+        raise ArgumentError.new "comparison of #{self.class} with #{other.class} failed"
+      end
+    end
+
+    def step limit, by=1
+      date = self
+      comp_op = %w(== <= >=)[by <=> 0]
+      while date.send comp_op, limit
+        yield date
+        date += by
+      end
+      self
+    end
+
+    def upto max, &block
+      step max, 1, &block
+    end
+
+    def downto min, &block
+      step min, -1, &block
+    end
+
+    def next
+      self + 1
+    end
+    alias :succ :next
+
+    def next_day n=1
+      self + n
+    end
+
+    def next_month n=1
+      self >> n
+    end
+
+    def next_year n=1
+      self >> (n * 12)
+    end
+
+    def prev_day n=1
+      self - n
+    end
+
+    def prev_month n=1
+      self << n
+    end
+
+    def prev_year n=1
+      self << (n * 12)
+    end
+
+    def shanbe?       ; wday == 0 end
+    def yekshanbe?    ; wday == 1 end
+    def doshanbe?     ; wday == 2 end
+    def seshanbe?     ; wday == 3 end
+    def chaharshanbe? ; wday == 4 end
+    def panjshanbe?   ; wday == 5 end
+    def jomee?        ; wday == 6 end
+
+  private
+    def first_of_year
+      @first_of_year ||= Date.ordinal year
+    end
+  end
+end
+
+class Date
+  def to_parsi
+    Parsi::Date.jd jd
+  end
+  alias :to_persian :to_parsi
+  alias :to_jalali  :to_parsi
+  alias :parsi      :to_parsi
+  alias :jalali     :to_parsi
+end

data/lib/parsi-datetime.rb

@@ -0,0 +1,101 @@
+module Parsi
+  class DateTime < Date
+    include Comparable
+
+    attr_reader :hour, :minute, :second, :offset
+
+    class << self
+      def valid_time? hour=0, minute=0, second=0, offset=0
+        if 0 <= hour   && hour   <= 23 &&
+           0 <= minute && minute <= 59 &&
+           0 <= second && second <= 59
+          #TODO: Add offset validation
+          true
+        else
+          false
+        end
+      end
+
+      def jd jd=0
+        date = Date.jd jd.to_i
+        h = (jd - jd.to_i) * 24
+        m = (h  -  h.to_i) * 60
+        s = (m  -  m.to_i) * 60
+        DateTime.new date.year, date.month, date.day, h.to_i, m.to_i, s.to_i
+      end
+
+      def now
+        now = ::DateTime.now
+        today = now.to_date.to_parsi
+        DateTime.new today.year, today.month, today.day, now.hour, now.minute, now.second, now.offset
+      end
+    end
+
+    def initialize year=0, month=1, day=1, hour=0, minute=0, second=0, offset=0
+      raise ArgumentError.new 'invalid time' unless
+        DateTime.valid_time? hour, minute, second
+
+      super year, month, day
+      @hour, @minute, @second, @offset = hour, minute, second, offset
+    end
+
+    def zone sep=':'
+      f = offset * 24.0
+      "%s%02d%s%02d" % [(f >= 0 ? '+' : '-'), f.floor, sep, (f % 1) * 60]
+    end
+
+    def to_s sep='/'
+      "%sT%02d:%02d:%02d%s" % [super(sep), hour, minute, second, zone]
+    end
+
+    def inspect
+      "#<#{self.class}: #{to_s('-')}>"
+    end
+
+    def strftime format='%Y/%m/%d %H:%M:%S'
+      gregorian.strftime super format
+    end
+
+    def to_date
+      Date.new year, month, day
+    end
+
+    def to_gregorian
+     @gregorian ||= begin
+       ::DateTime.new super.year, super.month, super.day, hour, minute, second, zone
+     end
+    end
+    alias :gregorian :to_gregorian
+
+    def + days
+      date = super
+      DateTime.new date.year, date.month, date.day, hour, minute, second, offset
+    end
+
+    def >> monthes
+      date = super
+      DateTime.new date.year, date.month, date.day, hour, minute, second, offset
+    end
+
+    def <=> other
+      if other.is_a? Date
+        to_gregorian <=> other.to_gregorian
+      elsif other.is_a? ::Date
+        to_gregorian <=> other
+      else
+        raise ArgumentError.new "comparison of #{self.class} with #{other.class} failed"
+      end
+    end
+  end
+end
+
+class DateTime
+  def to_parsi
+    date = super
+    Parsi::DateTime.new date.year, date.month, date.day, hour, minute, second, offset
+  end
+  alias :to_persian :to_parsi
+  alias :to_jalali  :to_parsi
+  alias :parsi      :to_parsi
+  alias :jalali     :to_parsi
+end

data/lib/version.rb

@@ -0,0 +1,5 @@
+module Parsi
+  class Date
+    VERSION = "0.1.pre"
+  end
+end

data/parsi-date.gemspec

@@ -0,0 +1,28 @@
+$:.push File.expand_path('../lib', __FILE__)
+require 'version'
+
+Gem::Specification.new do |s|
+
+  # Description Meta...
+  s.name        = 'parsi-date'
+  s.version     = Parsi::Date::VERSION
+  s.platform    = Gem::Platform::RUBY
+  s.author      = 'Hassan Zamani'
+  s.email       = 'hsn.zamani@gmail.com'
+  s.homepage    = 'http://github.com/hzamani/parsi-date'
+  s.summary     = 'Parsi (Jalali, Iranian, Persian) date library for Ruby'
+  s.description = "A Parsi date library for Ruby whitch provides much of Ruby's built-in date class"
+
+
+  # Load Paths...
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ['lib']
+
+
+  # Dependencies (installed via 'bundle install')...
+  s.add_development_dependency("bundler")
+  s.add_development_dependency("rake")
+  s.add_development_dependency("rspec")
+end

data/spec/parsi-date/accessor_spec.rb

@@ -0,0 +1,66 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Parsi::Date#ajd" do
+  it "determines the Astronomical Julian day" do
+    Parsi::Date.civil(1391, 8, 6).ajd.should == Rational(4912455, 2)
+  end
+end
+
+describe "Parsi::Date#amjd" do
+  it "determines the Astronomical Modified Julian day" do
+    Parsi::Date.civil(1391, 8, 6).amjd.should == 56227
+  end
+end
+
+describe "Parsi::Date#mjd" do
+  it "determines the Modified Julian day" do
+    Parsi::Date.civil(1391, 8, 6).mjd.should == 56227
+  end
+end
+
+describe "Parsi::Date#ld" do
+  it "determines the Modified Julian day" do
+    Parsi::Date.civil(1391, 8, 6).ld.should == 157068
+  end
+end
+
+describe "Parsi::Date#year" do
+  it "determines the year" do
+    Parsi::Date.civil(1391, 8, 6).year.should == 1391
+  end
+end
+
+describe "Parsi::Date#yday" do
+  it "determines the year" do
+    Parsi::Date.civil(1391, 1, 17).yday.should == 17
+    Parsi::Date.civil(1391, 8, 6).yday.should == 222
+  end
+end
+
+describe "Parsi::Date#mon" do
+  it "determines the month" do
+    Parsi::Date.civil(1391, 1, 17).mon.should == 1
+    Parsi::Date.civil(1391, 8, 6).mon.should == 8
+  end
+end
+
+describe "Parsi::Date#mday" do
+  it "determines the day of the month" do
+    Parsi::Date.civil(1391, 1, 17).mday.should == 17
+    Parsi::Date.civil(1391, 10, 28).mday.should == 28
+  end
+end
+
+describe "Parsi::Date#wday" do
+  it "determines the week day" do
+    Parsi::Date.civil(1391, 1, 17).wday.should == 5
+    Parsi::Date.civil(1391, 8, 6).wday.should == 0
+  end
+end
+
+describe "Parsi::Date#cwday" do
+  it "determines the commercial week day" do
+    Parsi::Date.civil(1391, 1, 17).cwday.should == 6
+    Parsi::Date.civil(1391, 8, 6).cwday.should == 1
+  end
+end

data/spec/parsi-date/add_month_spec.rb

@@ -0,0 +1,29 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Parsi::Date#>>" do
+  it "adds the number of months to a Parsi::Date" do
+    d = Parsi::Date.civil(1391, 2, 27) >> 10
+    d.should == Parsi::Date.civil(1391, 12, 27)
+  end
+
+  it "sets the day to the last day of a month if the day doesn't exist" do
+    d = Parsi::Date.civil(1391, 6, 31) >> 1
+    d.should == Parsi::Date.civil(1391, 7, 30)
+  end
+
+  it "raise a TypeError when passed a Symbol" do
+    lambda { Parsi::Date.civil(1391, 2, 27) >> :hello }.should raise_error(TypeError)
+  end
+
+  it "raise a TypeError when passed a String" do
+    lambda { Parsi::Date.civil(1391, 2, 27) >> "hello" }.should raise_error(TypeError)
+  end
+
+  it "raise a TypeError when passed a Parsi::Date" do
+    lambda { Parsi::Date.civil(1391, 2, 27) >> Parsi::Date.new }.should raise_error(TypeError)
+  end
+
+  it "raise a TypeError when passed an Object" do
+    lambda { Parsi::Date.civil(1391, 2, 27) >> Object.new }.should raise_error(TypeError)
+  end
+end

data/spec/parsi-date/add_spec.rb

@@ -0,0 +1,29 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Parsi::Date#+" do
+  it "adds the number of days to a Parsi::Date" do
+    d = Parsi::Date.civil(1391, 2, 27) + 10
+    d.should == Parsi::Date.civil(1391, 3, 6)
+  end
+
+  it "adds a negative number of days to a Parsi::Date" do
+    d = Parsi::Date.civil(1391, 2, 27) + (-10)
+    d.should == Parsi::Date.civil(1391, 2, 17)
+  end
+
+  it "raises a TypeError when passed a Symbol" do
+    lambda { Parsi::Date.civil(1391, 2, 27) + :hello }.should raise_error(TypeError)
+  end
+
+  it "raises a TypeError when passed a String" do
+    lambda { Parsi::Date.civil(1391, 2, 27) + "hello" }.should raise_error(TypeError)
+  end
+
+  it "raises a TypeError when passed a Parsi::Date" do
+    lambda { Parsi::Date.civil(1391, 2, 27) + Parsi::Date.new }.should raise_error(TypeError)
+  end
+
+  it "raises a TypeError when passed an Object" do
+    lambda { Parsi::Date.civil(1391, 2, 27) + Object.new }.should raise_error(TypeError)
+  end
+end

data/spec/parsi-date/comp_spec.rb

@@ -0,0 +1,31 @@
+require File.expand_path('../../spec_helper', __FILE__)
+require 'date'
+
+describe "Parsi::Date#<=>" do
+  it "returns 0 when two dates are equal" do
+    (Parsi::Date.civil(1391, 4, 6) <=> Parsi::Date.civil(1391, 4, 6)).should == 0
+    (Parsi::Date.civil(1391, 4, 6) <=> Date.civil(2012, 6, 26)).should == 0
+  end
+
+  it "returns -1 when self is less than another date" do
+    (Parsi::Date.civil(1391, 4, 5) <=> Parsi::Date.civil(1391, 4, 6)).should == -1
+    (Parsi::Date.civil(1391, 4, 5) <=> Date.civil(2012, 6, 26)).should == -1
+  end
+
+  it "returns 1 when self is greater than another date" do
+    (Parsi::Date.civil(1392, 4, 7) <=> Parsi::Date.civil(1391, 4, 6)).should == 1
+    (Parsi::Date.civil(1391, 4, 7) <=> Date.civil(2012, 6, 26)).should == 1
+  end
+
+  it "returns 0 when self is equal to a Numeric" do
+    (Parsi::Date.civil(1391, 4, 6) <=> 2456105).should == 0
+  end
+
+  it "returns -1 when self is less than a Numeric" do
+    (Parsi::Date.civil(1391, 4, 6) <=> 2456106).should == -1
+  end
+
+  it "returns 1 when self is greater than a Numeric" do
+    (Parsi::Date.civil(1391, 4, 6) <=> 2456104).should == 1
+  end
+end

data/spec/parsi-date/constants_spec.rb

@@ -0,0 +1,26 @@
+# encoding: utf-8
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Date constants" do
+  it "defines MONTHNAMES" do
+    Parsi::MONTHNAMES.should == [nil] + %w(فروردین اردیبهشت خرداد تیر مرداد شهریور مهر آبان آذر دی بهمن اسفند)
+  end
+
+  it "defines ABBR_MONTHNAMES" do
+    Parsi::ABBR_MONTHNAMES.should == [nil] + %w(Far Ord Kho Tir Mor Sha Meh Abn Azr Dey Bah Esf)
+  end
+
+  it "defines DAYNAMES" do
+    Parsi::DAYNAMES.should == %w(شنده یک‌شنده دوشنده سه‌شنده چهارشنده چنج‌شنده جمعه)
+  end
+
+  it "defines ABBR_DAYNAMES" do
+    Parsi::ABBR_DAYNAMES.should == %w(ش ۱ش ۲ش ۳ش ۴ش ۵ش ج)
+  end
+
+  it "freezes MONTHNAMES, DAYNAMES, ABBR_MONTHNAMES, ABBR_DAYSNAMES" do
+    [Parsi::MONTHNAMES, Parsi::DAYNAMES, Parsi::ABBR_MONTHNAMES, Parsi::ABBR_DAYNAMES].each do |ary|
+      ary.should be_frozen
+    end
+  end
+end

data/spec/parsi-date/construction_spec.rb

@@ -0,0 +1,68 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe Parsi::Date do
+  context "civil" do
+    it "constructs a date with arguments" do
+      expect { Parsi::Date.civil 1391, 8, 6 }.to_not raise_error
+      expect { Parsi::Date.civil 1391, 12, 30 }.to_not raise_error # 1391 is a leap year
+    end
+
+    it "doesn't construct dates for invalid arguments" do
+      expect { Parsi::Date.civil 1391, 15,  1 }.to raise_error(ArgumentError, 'invalid date')
+      expect { Parsi::Date.civil 1391,  0,  1 }.to raise_error(ArgumentError, 'invalid date')
+      expect { Parsi::Date.civil 1391,  1, 32 }.to raise_error(ArgumentError, 'invalid date')
+      expect { Parsi::Date.civil 1391,  2,  0 }.to raise_error(ArgumentError, 'invalid date')
+      expect { Parsi::Date.civil 1391,  8, 31 }.to raise_error(ArgumentError, 'invalid date')
+      expect { Parsi::Date.civil 1390, 12, 30 }.to raise_error(ArgumentError, 'invalid date') # 1390 is not a leap year
+      expect { Parsi::Date.civil 1391,  8, 31 }.to raise_error(ArgumentError, 'invalid date')
+
+      # invalid type
+      expect { Parsi::Date.civil '1390/1/1' }.to   raise_error(ArgumentError, 'invalid date')
+      expect { Parsi::Date.civil 1391, '1', 9 }.to raise_error(ArgumentError, 'invalid date')
+    end
+
+    it "constructs a Date for 0/1/1 by default" do
+      date = Parsi::Date.civil
+      date.year.should  == 0
+      date.month.should == 1
+      date.day.should   == 1
+    end
+  end
+
+  context "ordinal" do
+    it "constructs a Date object from an ordinal date" do
+      Parsi::Date.ordinal(1390).should       == Parsi::Date.civil(1390, 1, 1)
+      Parsi::Date.ordinal(1390,7).should     == Parsi::Date.civil(1390, 1, 7)
+      Parsi::Date.ordinal(1390,100).should   == Parsi::Date.civil(1390, 4, 7)
+    end
+  end
+
+  context "parse" do
+    it "should parse date from strings" do
+      ['1391/8/6', '1391-8-6', '1391 8 6', '1391 8 6', '13910806'].each do |date_string|
+        date = Parsi::Date.parse date_string
+        [date.year, date.month, date.day].should == [1391, 8, 6]
+      end
+    end
+
+    it "completes century when second arg is true" do
+      Date.stub(:today) { Date.new 2012, 10, 26 }
+      date = Parsi::Date.parse '91/8/5', true
+      [date.year, date.month, date.day].should == [1391, 8, 5]
+    end
+
+    it "should raise ArgumentError on invalid date string" do
+      expect { date = Parsi::Date.parse '1390/12/30' }.to      raise_error(ArgumentError)
+      expect { date = Parsi::Date.parse 'bad date string' }.to raise_error(ArgumentError)
+      expect { date = Parsi::Date.parse '12-30-1390' }.to      raise_error(ArgumentError)
+    end
+  end
+
+  context "#today" do
+    it "initialize a date object with today's attributes" do
+      Date.stub(:today) { Date.new 2012, 10, 26 }
+      date = Parsi::Date.today
+      [date.year, date.month, date.day].should == [1391, 8, 5]
+    end
+  end
+end

data/spec/parsi-date/conversion_spec.rb

@@ -0,0 +1,38 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Parsi::Date.jd" do
+  it "constructs a date form given Chronological Julian day number" do
+    Parsi::Date.jd(2456228).should == Parsi::Date.civil(1391, 8, 6)
+    Parsi::Date.jd(2456229).should == Parsi::Date.civil(1391, 8, 7)
+  end
+
+  it "returns a Date object representing Julian day 0 if no arguments passed"do
+    Parsi::Date.jd.should == Parsi::Date.civil(-5335, 9, 1)
+  end
+
+  it "constructs a Date object if passed a negative number" do
+    Parsi::Date.jd(-1).should == Parsi::Date.civil(-5335, 8, 30)
+  end
+end
+
+describe "Parsi::Date#jd" do
+  it "determines the Julian day for a Date object" do
+    Parsi::Date.civil(1391, 8, 7).jd.should == 2456229
+  end
+end
+
+describe "Parsi::Date#to_gregorian" do
+  it "converts date to Gregorian date" do
+    date = Parsi::Date.civil(1391, 8, 7).to_gregorian
+    date.should be_a(Date)
+    date.should == Date.civil(2012, 10, 28)
+  end
+end
+
+describe "Date#to_parsi" do
+  it "converts date to Parsi date" do
+    date = Date.civil(2012, 10, 28).to_parsi
+    date.should be_a(Parsi::Date)
+    date.should == Parsi::Date.civil(1391, 8, 7)
+  end
+end

data/spec/parsi-date/leap_spec.rb

@@ -0,0 +1,15 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Parsi::Date#leap?" do
+  it "returns true if a year is a leap year in the Parsi (Jalali) calendar" do
+    Parsi::Date.leap?(1387).should be_true
+    Parsi::Date.leap?(1391).should be_true
+    Parsi::Date.leap?(1395).should be_true
+  end
+
+  it "returns false if a year is not a leap year in the Parsi (Jalali) calendar" do
+    Parsi::Date.leap?(1390).should be_false
+    Parsi::Date.leap?(1392).should be_false
+    Parsi::Date.leap?(1400).should be_false
+  end
+end

data/spec/parsi-date/step_spec.rb

@@ -0,0 +1,52 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Parsi::Date#step" do
+
+  it "steps forward in time" do
+    ds = Parsi::Date.civil(1391, 10, 11)
+    de = Parsi::Date.civil(1391, 9, 29)
+    count = 0
+    de.step(ds) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 13
+
+    count = 0
+    de.step(ds, 5) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 3
+
+    count = 0
+    ds.step(de) do |d|; count += 1; end
+    count.should == 0
+  end
+
+  it "steps backward in time" do
+    ds = Parsi::Date.civil(1390, 4, 14)
+    de = Parsi::Date.civil(1390, 3, 29)
+    count = 0
+    ds.step(de, -1) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 17
+
+    count = 0
+    ds.step(de, -5) do |d|
+      d.should <= ds
+      d.should >= de
+      count += 1
+    end
+    count.should == 4
+
+    count = 0
+    de.step(ds, -1) do |d|; count += 1; end
+    count.should == 0
+  end
+end

data/spec/parsi-date/strftime_spec.rb

@@ -0,0 +1,104 @@
+# encoding: utf-8
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Parsi::Date#strftime" do
+
+  it "should be able to print the date" do
+    Parsi::Date.civil(1390, 4, 6).strftime.should == "1390/04/06"
+    Parsi::Date.civil(1390, 4, 6).strftime.should == Parsi::Date.civil(1390, 4, 6).to_s
+  end
+
+  it "should be able to print the full day name" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%A").should == "دوشنده"
+  end
+
+  it "should be able to print the short day name" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%a").should == "۲ش"
+  end
+
+  it "should be able to print the full month name" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%B").should == "تیر"
+  end
+
+  it "should be able to print the short month name" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%b").should == "Tir"
+    Parsi::Date.civil(1390, 4, 6).strftime("%h").should == "Tir"
+    Parsi::Date.civil(1390, 4, 6).strftime("%b").should == Parsi::Date.civil(1390, 4, 6).strftime("%h")
+  end
+
+  it "should be able to print the century" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%C").should == "13"
+  end
+
+  it "should be able to print the month day with leading zeroes" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%d").should == "06"
+  end
+
+  it "should be able to print the month day with leading spaces" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%e").should == " 6"
+  end
+
+  it "should be able to print the month with leading zeroes" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%m").should == "04"
+  end
+
+  it "should be able to add a newline" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%n").should == "\n"
+  end
+
+  it "should be able to add a tab" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%t").should == "\t"
+  end
+
+  it "should be able to show the commercial week day" do
+    Parsi::Date.civil(1390, 4, 10).strftime("%u").should == "7"
+    Parsi::Date.civil(1390, 4, 11).strftime("%u").should == "1"
+  end
+
+  it "should be able to show the week day" do
+    Parsi::Date.civil(1390, 4, 10).strftime("%w").should == "6"
+    Parsi::Date.civil(1390, 4, 11).strftime("%w").should == "0"
+  end
+
+  it "should be able to show the year in YYYY format" do
+    Parsi::Date.civil(1390, 4, 9).strftime("%Y").should == "1390"
+  end
+
+  it "should be able to show the year in YY format" do
+    Parsi::Date.civil(1390, 4, 9).strftime("%y").should == "90"
+  end
+
+  it "should be able to escape the % character" do
+    Parsi::Date.civil(1390, 4, 9).strftime("%%").should == "%"
+  end
+
+  ############################
+  # Specs that combine stuff #
+  ############################
+
+  it "should be able to print the date in full" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%c").should == "۲ش 6 تیر 1390"
+    Parsi::Date.civil(1390, 4, 6).strftime("%c").should == Parsi::Date.civil(1390, 4, 6).strftime('%a %-d %B %Y')
+  end
+
+  it "should be able to print the date with slashes" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%D").should == "90/04/06"
+    Parsi::Date.civil(1390, 4, 6).strftime("%D").should == Parsi::Date.civil(1390, 4, 6).strftime('%y/%m/%d')
+  end
+
+  it "should be able to print the date as YYYY-MM-DD" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%F").should == "1390-04-06"
+    Parsi::Date.civil(1390, 4, 6).strftime("%F").should == Parsi::Date.civil(1390, 4, 6).strftime('%Y-%m-%d')
+  end
+
+  it "should be able to show the commercial week" do
+    Parsi::Date.civil(1390, 4, 9).strftime("%v").should == " 9-Tir-1390"
+    Parsi::Date.civil(1390, 4, 9).strftime("%v").should == Parsi::Date.civil(1390, 4, 9).strftime('%e-%b-%Y')
+  end
+
+  it "should be able to show YY/MM/DD" do
+    Parsi::Date.civil(1390, 4, 6).strftime("%x").should == "90/04/06"
+    Parsi::Date.civil(1390, 4, 6).strftime("%x").should == Parsi::Date.civil(1390, 4, 6).strftime('%y/%m/%d')
+  end
+
+end

data/spec/spec_helper.rb

@@ -0,0 +1,13 @@
+require 'parsi-date'
+
+RSpec.configure do |config|
+  config.treat_symbols_as_metadata_keys_with_true_values = true
+  config.run_all_when_everything_filtered = true
+  config.filter_run :focus
+
+  # Run specs in random order to surface order dependencies. If you find an
+  # order dependency and want to debug it, you can fix the order by providing
+  # the seed, which is printed after each run.
+  #     --seed 1234
+  config.order = 'random'
+end

metadata

@@ -0,0 +1,123 @@
+--- !ruby/object:Gem::Specification
+name: parsi-date
+version: !ruby/object:Gem::Version
+  version: 0.1.pre
+  prerelease: 4
+platform: ruby
+authors:
+- Hassan Zamani
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-10-27 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: A Parsi date library for Ruby whitch provides much of Ruby's built-in
+  date class
+email: hsn.zamani@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- .rspec
+- Gemfile
+- Gemfile.lock
+- lib/parsi-date.rb
+- lib/parsi-datetime.rb
+- lib/version.rb
+- parsi-date.gemspec
+- spec/parsi-date/accessor_spec.rb
+- spec/parsi-date/add_month_spec.rb
+- spec/parsi-date/add_spec.rb
+- spec/parsi-date/comp_spec.rb
+- spec/parsi-date/constants_spec.rb
+- spec/parsi-date/construction_spec.rb
+- spec/parsi-date/conversion_spec.rb
+- spec/parsi-date/leap_spec.rb
+- spec/parsi-date/step_spec.rb
+- spec/parsi-date/strftime_spec.rb
+- spec/spec_helper.rb
+homepage: http://github.com/hzamani/parsi-date
+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.1
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.24
+signing_key: 
+specification_version: 3
+summary: Parsi (Jalali, Iranian, Persian) date library for Ruby
+test_files:
+- spec/parsi-date/accessor_spec.rb
+- spec/parsi-date/add_month_spec.rb
+- spec/parsi-date/add_spec.rb
+- spec/parsi-date/comp_spec.rb
+- spec/parsi-date/constants_spec.rb
+- spec/parsi-date/construction_spec.rb
+- spec/parsi-date/conversion_spec.rb
+- spec/parsi-date/leap_spec.rb
+- spec/parsi-date/step_spec.rb
+- spec/parsi-date/strftime_spec.rb
+- spec/spec_helper.rb