calendarium-romanum 0.0.1

data/spec/sanctoraleloader_spec.rb

@@ -0,0 +1,142 @@
+require 'spec_helper'
+
+describe SanctoraleLoader do
+
+  before :each do
+    @s = Sanctorale.new
+    @l = SanctoraleLoader.new
+  end
+
+  describe 'data sources' do
+    describe '.load_from_string' do
+      before :each do
+        str = '1/3 : Ss.mi Nominis Iesu'
+        @l.load_from_string @s, str
+      end
+
+      it 'loads one entry' do
+        expect(@s.size).to eq 1
+      end
+
+      it 'loads date correctly' do
+        expect(@s.get(1, 3).size).to eq 1
+      end
+
+      it 'loads title correctly' do
+        expect(@s.get(1, 3)[0].title).to eq 'Ss.mi Nominis Iesu'
+      end
+
+      it 'sets default rank' do
+        expect(@s.get(1, 3)[0].rank).to eq Ranks::MEMORIAL_OPTIONAL
+      end
+
+      it 'sets default colour - white' do
+        expect(@s.get(1, 3)[0].colour).to eq Colours::WHITE
+      end
+
+      it 'loads explicit rank if given' do
+        str = '1/25 f : In conversione S. Pauli, apostoli'
+        @l.load_from_string @s, str
+        expect(@s.get(1, 25)[0].rank).to eq Ranks::FEAST_GENERAL
+      end
+    end
+
+    describe '.load_from_file' do
+      it 'loads something from file' do
+        @l.load_from_file(@s, File.join(%w{data universal-la.txt}))
+        expect(@s.size).to be > 190
+      end
+    end
+  end
+
+  describe 'record/file format' do
+    describe 'month as heading' do
+      it 'loads a month heading and uses the month for subsequent records' do
+        str = ['= 1', '25 f : In conversione S. Pauli, apostoli'].join "\n"
+        @l.load_from_string @s, str
+        expect(@s).not_to be_empty
+        expect(@s.get(1, 25)).not_to be_empty
+      end
+    end
+
+    describe 'colour' do
+      it 'sets colour if specified' do
+        str = '4/25 f R :  S. Marci, evangelistae'
+        @l.load_from_string @s, str
+        expect(@s.get(4, 25).first.colour).to eq Colours::RED
+      end
+    end
+
+    describe 'rank' do
+      it 'sets exact rank if specified' do
+        # say we specify a proper calendar of a church dedicated to St. George
+        str = '4/23 s1.4 R : S. Georgii, martyris'
+        @l.load_from_string @s, str
+        celeb = @s.get(4, 23).first
+        expect(celeb.rank).to eq Ranks::SOLEMNITY_PROPER
+      end
+    end
+  end
+
+  describe 'invalid input' do
+    describe 'syntax errors' do
+      it 'invalid syntax' do
+        str = 'line without standard beginning'
+        expect do
+          @l.load_from_string @s, str
+        end.to raise_exception /Syntax error/
+      end
+    end
+
+    describe 'syntactically correct data making no sense' do
+      it 'invalid month' do
+        str = '100/25 f : In conversione S. Pauli, apostoli'
+        expect do
+          @l.load_from_string @s, str
+        end.to raise_exception /Invalid month/
+      end
+
+      it 'line with day only, without preceding month heading' do
+        str = '25 f : In conversione S. Pauli, apostoli'
+        expect do
+          @l.load_from_string @s, str
+        end.to raise_exception /Invalid month/
+      end
+
+      it 'invalid day' do
+        str = '1/250 f : In conversione S. Pauli, apostoli'
+        expect do
+          @l.load_from_string @s, str
+        end.to raise_exception /Invalid day/
+      end
+
+      it 'invalid month heading' do
+        str = '= 0'
+        expect do
+          @l.load_from_string @s, str
+        end.to raise_exception /Invalid month/
+      end
+
+      it 'invalid rank' do
+        str = '1/25 X : In conversione S. Pauli, apostoli'
+        expect do
+          @l.load_from_string @s, str
+        end.to raise_exception /Syntax error/
+      end
+
+      it 'invalid numeric rank' do
+        str = '4/23 s8.4 R : S. Georgii, martyris'
+        expect do
+          @l.load_from_string @s, str
+        end.to raise_exception /rank/
+      end
+
+      it 'invalid combination of rank latter and number' do
+        str = '4/23 m2.5 R : S. Georgii, martyris'
+        expect do
+          @l.load_from_string @s, str
+        end.to raise_exception /rank/
+      end
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,22 @@
+# This file was generated by the `rspec --init` command. Conventionally, all
+# specs live under a `spec` directory, which RSpec adds to the `$LOAD_PATH`.
+# Require this file using `require "spec_helper"` to ensure that it is only
+# loaded once.
+#
+# See http://rubydoc.info/gems/rspec-core/RSpec/Core/Configuration
+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
+
+require 'calendarium-romanum'
+include CalendariumRomanum
+include Ranks
+include Colours

data/spec/temporale_spec.rb

@@ -0,0 +1,342 @@
+require_relative 'spec_helper'
+
+describe Temporale do
+
+  before :all do
+    @t = @t12 = Temporale.new 2012
+    @t13 = Temporale.new 2013
+  end
+
+  describe '.liturgical_year' do
+    it 'returns liturgical year for the given date' do
+      [
+        [Date.new(2014, 11, 1), 2013],
+        [Date.new(2014, 12, 1), 2014]
+      ].each do |date, year|
+        Temporale.liturgical_year(date).should eq year
+      end
+    end
+  end
+
+  describe '#weekday_before' do
+    it 'works well for all 7 weekdays' do
+      today = Date.new 2014, 3, 16
+      @t.weekday_before(0, today).should eq Date.new(2014, 3, 9)
+      @t.weekday_before(1, today).should eq Date.new(2014, 3, 10)
+      @t.weekday_before(2, today).should eq Date.new(2014, 3, 11)
+      @t.weekday_before(3, today).should eq Date.new(2014, 3, 12)
+      @t.weekday_before(4, today).should eq Date.new(2014, 3, 13)
+      @t.weekday_before(5, today).should eq Date.new(2014, 3, 14)
+      @t.weekday_before(6, today).should eq Date.new(2014, 3, 15)
+    end
+  end
+
+  describe '#weekday_after' do
+    it 'works well for all 7 weekdays' do
+      today = Date.new 2014, 3, 16
+      @t.monday_after(today).should eq Date.new(2014, 3, 17)
+      @t.tuesday_after(today).should eq Date.new(2014, 3, 18)
+      @t.wednesday_after(today).should eq Date.new(2014, 3, 19)
+      @t.thursday_after(today).should eq Date.new(2014, 3, 20)
+      @t.friday_after(today).should eq Date.new(2014, 3, 21)
+      @t.saturday_after(today).should eq Date.new(2014, 3, 22)
+      @t.sunday_after(today).should eq Date.new(2014, 3, 23)
+    end
+  end
+
+  describe '#advent_sunday' do
+    it 'determines first Sunday of Advent' do
+      [
+       [2004, [11, 28]],
+       [2010, [11, 28]],
+       [2011, [11, 27]],
+       [2012, [12, 2]],
+       [2013, [12, 1]]
+      ].each do |d|
+        year, date = d
+        @t.advent_sunday(1, year).should eq Date.new(year, *date)
+      end
+    end
+
+    it 'determines second Sunday of Advent' do
+      @t.advent_sunday(2, 2013).should eq Date.new(2013,12,8)
+    end
+  end
+
+  describe '#second_advent_sunday' do
+    # alias of advent_sunday through method_missing
+
+    it 'determines second Sunday of Advent' do
+      @t.second_advent_sunday(2013).should eq Date.new(2013,12,8)
+    end
+  end
+
+  describe '#easter_sunday' do
+    it 'determines Easter Sunday' do
+      [
+       [2003, [2004, 4, 11]],
+       [2004, [2005, 3, 27]],
+       [2005, [2006, 4, 16]],
+       [2006, [2007, 4, 8]],
+       [2014, [2015, 4, 5]]
+      ].each do |d|
+        year, date = d
+        @t.easter_sunday(year).should eq Date.new(*date)
+      end
+    end
+  end
+
+  describe '#date_range' do
+    it 'includes days of the year' do
+      @t.date_range.should include Date.new(2012, 12, 3)
+      @t.date_range.should include Date.new(2013, 11, 5)
+    end
+  end
+
+  describe '#season' do
+    it 'determines Advent' do
+      @t13.season(Date.new(2013, 12, 15)).should eq :advent
+      @t13.season(Date.new(2013, 12, 1)).should eq :advent
+      @t13.season(Date.new(2013, 12, 24)).should eq :advent
+    end
+
+    it 'determines Christmas' do
+      @t13.season(Date.new(2013, 12, 25)).should eq :christmas
+      @t13.season(Date.new(2014, 1, 12)).should eq :christmas
+      @t13.season(Date.new(2014, 1, 13)).should eq :ordinary
+    end
+
+    it 'determines Lent' do
+      @t13.season(Date.new(2014, 3, 4)).should eq :ordinary
+      @t13.season(Date.new(2014, 3, 5)).should eq :lent
+      @t13.season(Date.new(2014, 4, 19)).should eq :lent
+      @t13.season(Date.new(2014, 4, 20)).should eq :easter
+    end
+
+    it 'determines Easter time' do
+      @t13.season(Date.new(2014, 4, 20)).should eq :easter
+      @t13.season(Date.new(2014, 6, 8)).should eq :easter
+      @t13.season(Date.new(2014, 6, 9)).should eq :ordinary
+    end
+  end
+
+  describe '#get' do
+    it 'returns a Celebration' do
+      expect(@t13.get(8, 12)).to be_a Celebration
+    end
+
+    describe 'for' do
+      describe 'ferial' do
+        it 'in Ordinary Time' do
+          c = @t13.get(8, 12)
+          expect(c.rank).to eq FERIAL
+          expect(c.color).to eq GREEN
+        end
+
+        it 'in Advent' do
+          c = @t13.get(12, 12)
+          expect(c.rank).to eq FERIAL
+          expect(c.color).to eq VIOLET
+        end
+
+        it 'in the last week of Advent' do
+          c = @t13.get(12, 23)
+          expect(c.rank).to eq FERIAL_PRIVILEGED
+          expect(c.color).to eq VIOLET
+        end
+
+        it 'in Christmas time' do
+          c = @t13.get(1, 3)
+          expect(c.rank).to eq FERIAL
+          expect(c.color).to eq WHITE
+        end
+
+        it 'in Lent' do
+          c = @t13.get(3, 18)
+          expect(c.rank).to eq FERIAL_PRIVILEGED
+          expect(c.color).to eq VIOLET
+        end
+
+        it 'in Easter Time' do
+          c = @t13.get(5, 5)
+          expect(c.rank).to eq FERIAL
+          expect(c.color).to eq WHITE
+        end
+      end
+
+      describe 'Sunday' do
+        it 'in Ordinary Time' do
+          c = @t13.get(8, 10)
+          expect(c.rank).to eq SUNDAY_UNPRIVILEGED
+          expect(c.color).to eq GREEN
+        end
+
+        it 'in Advent' do
+          c = @t13.get(12, 15)
+          expect(c.rank).to eq PRIMARY
+          expect(c.color).to eq VIOLET
+        end
+
+        it 'in Christmas time' do
+          c = @t13.get(1, 5)
+          expect(c.rank).to eq SUNDAY_UNPRIVILEGED
+          expect(c.color).to eq WHITE
+        end
+
+        it 'in Lent' do
+          c = @t13.get(3, 23)
+          expect(c.rank).to eq PRIMARY
+          expect(c.color).to eq VIOLET
+        end
+
+        it 'in Easter Time' do
+          c = @t13.get(5, 11)
+          expect(c.rank).to eq PRIMARY
+          expect(c.color).to eq WHITE
+        end
+      end
+
+      describe 'solemnities and their cycles - ' do
+        it 'end of Advent time' do
+          c = @t13.get(12, 17)
+          expect(c.rank).to eq FERIAL_PRIVILEGED
+          expect(c.colour).to eq VIOLET
+        end
+
+        it 'Nativity' do
+          c = @t13.get(12, 25)
+          expect(c.rank).to eq PRIMARY
+          expect(c.title).to eq 'The Nativity of the Lord'
+          expect(c.colour).to eq WHITE
+        end
+
+        it 'day in the octave of Nativity' do
+          c = @t13.get(12, 27)
+          expect(c.rank).to eq FERIAL_PRIVILEGED
+          expect(c.colour).to eq WHITE
+        end
+
+        it 'Holy Family' do
+          c = @t13.get(12, 29)
+          expect(c.rank).to eq PRIMARY
+          expect(c.title).to eq 'The Holy Family of Jesus, Mary and Joseph'
+          expect(c.colour).to eq WHITE
+        end
+
+        it 'Epiphany' do
+          c = @t13.get(1, 6)
+          expect(c.rank).to eq PRIMARY
+          expect(c.title).to eq 'The Epiphany of the Lord'
+          expect(c.colour).to eq WHITE
+        end
+
+        it 'Baptism of the Lord' do
+          c = @t13.get(1, 12)
+          expect(c.rank).to eq FEAST_LORD_GENERAL
+          expect(c.title).to eq 'The Baptism of the Lord'
+          expect(c.colour).to eq WHITE
+        end
+
+        it 'Good Friday' do
+          c = @t13.get(4, 18)
+          expect(c.rank).to eq TRIDUUM
+          expect(c.title).to eq 'Friday of the Passion of the Lord'
+        end
+
+        it 'Holy Saturday' do
+          c = @t13.get(4, 19)
+          expect(c.rank).to eq TRIDUUM
+          expect(c.title).to eq 'Holy Saturday'
+          expect(c.colour).to eq VIOLET
+        end
+
+        it 'Resurrection' do
+          c = @t13.get(4, 20)
+          expect(c.rank).to eq TRIDUUM
+          expect(c.title).to eq 'Easter Sunday of the Resurrection of the Lord'
+        end
+
+        it 'day in the Easter Octave' do
+          c = @t13.get(4, 22)
+          expect(c.rank).to eq PRIMARY
+        end
+
+        it 'Pentecost' do
+          c = @t13.get(6, 8)
+          expect(c.rank).to eq PRIMARY
+          expect(c.title).to eq 'Pentecost Sunday'
+          expect(c.colour).to eq RED
+        end
+
+        it 'Trinity' do
+          c = @t13.get(6, 15)
+          expect(c.rank).to eq SOLEMNITY_GENERAL
+          expect(c.title).to eq 'The Most Holy Trinity'
+          expect(c.colour).to eq WHITE
+        end
+
+        it 'Body of Christ' do
+          c = @t13.get(6, 19)
+          expect(c.rank).to eq SOLEMNITY_GENERAL
+          expect(c.title).to eq 'The Most Holy Body and Blood of Christ'
+          expect(c.colour).to eq WHITE
+        end
+
+        it 'Sacred Heart' do
+          c = @t13.get(6, 27)
+          expect(c.rank).to eq SOLEMNITY_GENERAL
+          expect(c.title).to eq 'The Most Sacred Heart of Jesus'
+          expect(c.colour).to eq WHITE
+        end
+
+        it 'Christ the King' do
+          c = @t13.get(11, 23)
+          expect(c.rank).to eq SOLEMNITY_GENERAL
+          expect(c.title).to eq 'Our Lord Jesus Christ, King of the Universe'
+          expect(c.colour).to eq WHITE
+        end
+      end
+    end
+  end
+
+  describe 'initialized without a year' do
+    before :each do
+      @tny = Temporale.new
+    end
+
+    it 'is possible to initialize a Temporale without a year' do
+      expect { Temporale.new }.not_to raise_exception
+    end
+
+    it 'crashes when a date is requested without year' do
+      expect { @tny.first_advent_sunday }.to raise_exception
+    end
+
+    it 'computes dates as expected if year is given' do
+      days = %i(first_advent_sunday nativity holy_family mother_of_god
+      epiphany baptism_of_lord ash_wednesday easter_sunday good_friday
+      holy_saturday pentecost
+      holy_trinity body_blood sacred_heart christ_king
+
+      date_range)
+      days.each do |msg|
+        @tny.send(msg, 2012).should eq @t12.send(msg)
+      end
+    end
+
+    describe '#get' do
+      it 'always raises an exception' do
+        # for get to work well is imoportant to have precomputed
+        # solemnity dates. That is only possible when a year
+        # is specified on initialization.
+        [
+          Date.new(2015, 1, 1),
+          Date.new(2015, 9, 23),
+          Date.new(2015, 3, 4)
+        ].each do |date|
+          expect { @tny.get(date) }.to raise_exception
+        end
+      end
+    end
+  end
+end