calendarium-romanum 0.1.0 → 0.2.0

data/data/universal-la.txt

@@ -0,0 +1,236 @@
+# General Roman Calendar in Latin
+# source: http://www.binetti.ru/collectio/liturgia/missale_files/crg.htm
+
+= 1
+2 m : Ss. Basilii et Gregorii Nazianzeni, episcoporum et Ecclesiae doctorum
+3 : Ss.mi Nominis Iesu
+7 : S. Raimundi de Penyafort, presbyteri
+13 : S. Hilarii, episcopi et Ecclesiae doctoris
+17 m :  S. Antonii, abbatis
+20 R : S. Fabiani, papae et martyris
+20 R : S. Sebastiani, martyris
+21 m R :  S. Agnetis, virginis et martyris
+22 R : S. Vincentii, diaconi et martyris
+24 m :  S. Francisci de Sales, episcopi et Ecclesiae doctoris
+25 f :  In conversione S. Pauli, apostoli
+26 m :  Ss. Timothei et Titi, episcoporum
+27 : S. Angelae Merici, virginis
+28 m :  S. Thomae de Aquino, presbyteri et Ecclesiae doctoris
+31 m :  S. Ioannis Bosco, presbyteri
+
+= 2
+2 f2.5 :  IN PRAESENTATIONE DOMINI
+3 R : S. Blasii, episcopi et martyris
+3 : S. Ansgarii, episcopi
+5 m R :  S. Agathae, virginis et martyris
+6 m R :  Ss. Pauli Miki et sociorum, martyrum
+8 : S. Hieronymi Emiliani
+8 : S. Iosephinae Bakhita, virginis
+10 m :  S. Scholasticae, virginis
+11 : B. Mariae Virginis de Lourdes
+14 m :  Ss. Cyrilli, monachi, et Methodii, episcopi
+17 : Ss. septem Fundatorum Ordinis Servorum B. M. V.
+21 : S. Petri Damiani, episcopi et Ecclesiae doctoris
+22 f :  Cathedrae S. Petri, apostoli
+23 m R :  S. Polycarpi, episcopi et martyris
+
+= 3
+4 : S. Casimiri
+7 m R :  Ss. Perpetuae et Felicitatis, martyrum
+8 : S. Ioannis a Deo, religiosi
+9 : S. Franciscae Romanae, religiosae
+17 : S. Patricii, episcopi
+18 : S. Cyrilli Hierosolymitani, episcopi et Ecclesiae doctoris
+19 s :  S. IOSEPH, SPONSI B. M. V.
+23 : S. Turibii de Mongrovejo, episcopi
+25 s :  IN ANNUNTIATIONE DOMINI
+
+= 4
+2 : S. Francisci de Paola, eremitae
+4 : S. Isidori, episcopi et Ecclesiae doctoris
+5 : S. Vincentii Ferrer, presbyteri
+7 m :  S. Ioannis Baptistae de la Salle, presbyteri
+11 m R :  S. Stanislai, episcopi et martyris
+13 R : S. Martini I, papae et martyris
+21 : S. Anselmi, episcopi et Ecclesiae doctoris
+23 R : S. Georgii, martyris
+23 R : S. Adalberti, episcopi et martyris
+24 R : S. Fidelis a Sigmaringen, presbyteri et martyris
+25 f R :  S. Marci, evangelistae
+28 R : S. Petri Chanel, presbyteri et martyris
+28 : S. Ludovici Mariae Grignion de Montfort, presbyteri
+29 m :  S. Catharinae Senensis, virginis et Ecclesiae doctoris
+30 : S. Pii V, papae
+
+= 5
+1 : S. Ioseph Opificis
+2 m :  S. Athanasii, episcopi et Ecclesiae doctoris
+3 f R :  Ss. Philippi et Iacobi, apostolorum
+12 R : Ss. Nerei et Achillei, martyrum
+12 R : S. Pancratii, martyris
+13 : B. Mariae Virginis de Fatima
+14 f R :  S. Matthiae, apostoli
+18 R : S. Ioannis I, papae et martyris
+20 : S. Bernardini Senensis, presbyteri
+21 R : S. Christophori Magallanes, presbyteri, et sociorum, martyrum
+22 : S. Ritae de Cascia, religiosae
+25 : S. Bedae Venerabilis, presbyteri et Ecclesiae doctoris
+25 : S. Gregorii VII, papae
+25 : S. Mariae Magdalenae de' Pazzi, virginis
+26 m :  S. Philippi Neri, presbyteri
+27 : S. Augustini Cantuarensis, episcopi
+31 f :  In Visitatione B. Mariae Virginis
+
+= 6
+1 m R :  S. Iustini, martyris
+2 R : Ss. Marcellini et Petri, martyrum
+3 m R :  Ss. Caroli Lwanga et sociorum, martyrum
+5 m R :  S. Bonifatii, episcopi et martyris
+6 : S. Norberti, episcopi
+9 : S. Ephraem, diaconi et Ecclesiae doctoris
+11 m R :  S. Barnabae, apostoli
+13 m :  S. Antonii de Padova, presbyteri et Ecclesiae doctoris
+19 : S. Romualdi, abbatis
+21 m :  S Aloisii Gonzaga, religiosi
+22 : S. Paulini Nolani
+22 R : Ss. Ioannis Fisher, episcopi, et Thomae More, martyrum
+24 s :  IN NATIVITATE S. IOANNIS BAPTISTAE
+27 : S. Cyrilli Alexandrini, episcopi et Ecclesiae doctoris
+28 m R :  S. Irenaei, episcopi et martyris
+29 s R :  Ss. PETRI ET PAULI, APOSTOLORUM
+30 R : Ss. Protomartyrum S. Romanae Ecclesiae
+
+= 7
+3 f R :  S. Thomae, apostoli
+4 : S. Elisabeth Lusitaniae
+5 : S. Antonii Mariae Zaccaria, presbyteri
+6 R : S. Mariae Goretti, virginis et martyris
+9 R : Ss. Augustini Zhao Rong, presbyteri
+11 m :  S. Benedicti, abbatis
+13 : S. Henrici
+14 : S. Camilli de Lellis, presbyteri
+15 m :  S. Bonaventurae, episcopi et Ecclesiae doctoris
+16 : B. Mariae Virginis de Monte Carmelo
+20 R : S. Apollinaris, episcopi et martyris
+21 : S. Laurentii de Brindisi, presbyteri et Ecclesiae doctoris
+22 f :  S. Mariae Magdalenae
+23 : S. Birgittae, religiosae
+24 : S. Sarbelii Makhlūf, presbyteri
+25 f R :  S. Iacobi, apostoli
+26 m :  Ss. Ioachim et Annae, parentum B. Mariae Virginis
+29 m R :  S. Marthae
+30 : S. Petri Chrysologi, episcopi et Ecclesiae doctoris
+31 m :  S. Ignatii de Loyola, presbyteri
+
+= 8
+1 m :  S. Alfonsi Mariae de' Liguori, episcopi et Ecclesiae doctoris
+2 : S. Eusebii Vercellensis, episcopi
+2 : S. Petri Iuliani Eymard, presbyteri
+4 m :  S. Ioannis Mariae Vianney, presbyteri
+5 : In Dedicatione basilicae S. Mariae
+6 f2.5 :  IN TRANSFIGURATIONE DOMINI
+7 R : Ss. Xysti, papae, et sociorum, martyrum
+7 : S. Caietani, presbyteri
+8 m :  S. Dominici, presbyteri
+9 R : S. Teresiae Benedictae a Cruce, virginis et martyris
+10 f R :  S. Laurentii, diaconi et martyris
+11 m :  S. Clarae, virginis
+12 : S. Ioannae Franciscae de Chantal, religiosae
+13 R : Ss. Pontiani, papae, et Hippolyti, presbyteri, martyrum
+14 m R :  S. Maximiliani Mariae Kolbe, presbyteri et martyris
+15 s :  IN ASSUMPTIONE B. MARIAE VIRGINIS
+16 : S. Stephani Hungariae
+19 : S. Ioannis Eudes, presbyteri
+20 m :  S. Bernardi, abbatis et Ecclesiae doctoris
+21 m :  S. Pii X, papae
+22 m :  B. Mariae Virginis Reginae
+23 : S. Rosae de Lima, virginis
+24 f R :  S. Bartholomaei, apostoli
+25 : S. Ludovici
+25 : S. Ioseph de Calasanz, presbyteri
+27 m :  S. Monicae
+28 m :  S. Augustini, episcopi et Ecclesiae doctoris
+29 m R :  In Passione S. Ioannis Baptistae, martyris
+
+= 9
+3 m :  S. Gregorii Magni, papae et Ecclesiae doctoris
+8 f :  In Nativitate B. Mariae Virginis
+9 : S. Petri Claver, presbyteri
+12 : Ss.mi Nominis Mariae
+13 m :  S. Ioannis Chrysostomi, episcopi et Ecclesiae doctoris
+14 f2.5 R :  IN EXALTATIONE SANCTAE CRUCIS
+15 m :  B. Mariae Virginis Perdolentis
+16 m R :  Ss. Cornelii, papae, et Cypriani, episcopi, martyrum
+17 : S. Roberti Bellarmino, episcopi et Ecclesiae doctoris
+19 R : S. Ianuarii, episcopi et martyris
+20 m R :  Ss. Andreae Kim Tae-gŏn et Pauli Chŏng Ha-sang et sociorum, martyrum
+21 f R :  S. Matthaei, apostoli et evangelistae
+# what does the asterisk here mean?
+23 m :  S. Pii de Pietrelcina, presbyteri [*]
+26 R : Ss. Cosmae et Damiani, martyrum
+27 m :  S. Vincentii de Paul, presbyteri
+28 R : S. Venceslai, martyris
+28 R : S. Laurentii Ruiz et sociorum, martyrum
+29 f :  Ss. Michaelis, Gabrielis et Raphaelis, archangelorum
+30 m :  S. Hieronymi, presbyteri et Ecclesiae doctoris
+
+= 10
+1 m :  S. Teresiae a Iesu Infante, virginis et Ecclesiae doctoris
+2 m :  Ss. Angelorum Custodum
+4 m :  S. Francisci Assisiensis
+6 : S. Brunonis, presbyteri
+7 m :  B. Mariae Virginis a Rosario
+9 R : Ss. Dionysii, episcopi, et sociorum, martyrum
+9 : S. Ioannis Leonardi, presbyteri
+14 R : S. Callisti I, papae et martyris
+15 m :  S. Teresiae a Iesu, virginis et Ecclesiae doctoris
+16 : S. Hedvigis, religiosae
+16 : S. Margaritae Mariae Alacoque, virginis
+17 m R :  S. Ignatii Antiocheni, episcopi et martyris
+18 f R :  S. Lucae, evangelistae
+19 R : Ss. Ioannis de Brébeuf et Isaac Jogues, presbyterorum, et sociorum, martyrum
+19 : S. Pauli a Cruce, presbyteri
+23 : S. Ioannis de Capestrano, presbyteri
+24 : S. Antonii Mariae Claret, episcopi
+28 f R :  Ss. Simonis et Iudae, apostolorum
+
+= 11
+1 s :  OMNIUM SANCTORUM
+2 : IN COMMEMORATIONE OMNIUM FIDELIUM DEFUNCTORUM
+3 R : S. Martini de Porres, religiosi
+4 m :  S. Caroli Borromeo, episcopi
+9 f :  IN DEDICATIONE BASILICAE LATERANENSIS
+10 m :  S. Leonis Magni, papae et Ecclesiae doctoris
+11 m R :  S. Martini Turonensis, episcopi
+12 m R :  S. Iosaphat, episcopi et martyris
+15 : S. Alberti Magni, episcopi et Ecclesiae doctoris
+16 : S. Margaritae Scotiae
+16 : S. Gertrudis, virginis
+17 m :  S. Elisabeth Hungariae, religiosae
+18 : In Dedicatione basilicarum Ss. Petri et Pauli, apostolorum
+21 m :  In Praesentatione B. Mariae Virginis
+22 m R :  S. Caeciliae, virginis et martyris
+23 R : S. Clementis I, papae et martyris
+23 : S. Columbani, abbatis
+24 m R :  Ss. Andreae Dũng Lac, presbyteri, et sociorum, martyrum
+25 R : S. Catharinae Alexandrinae, virginis et martyris
+30 f R :  S. Andreae, apostoli
+
+= 12
+3 m :  S. Francisci Xavier, presbyteri
+4 : S. Ioannis Damasceni, presbyteri et Ecclesiae doctoris
+6 : S. Nicolai, episcopi
+7 m :  S. Ambrosii, episcopi et Ecclesiae doctoris
+8 s :  IN CONCEPTIONE IMMACULATA BEATAE MARIAE VIRGINIS
+9 : S. Ioannis Didaci Cuahtlatoatzin [*]
+11 : S. Damasi I, papae
+12 : Beatae Mariae Virginis de Guadalupe [*]
+13 m R :  S. Luciae, virginis et martyris
+14 m :  S. Ioannis a Cruce, presbyteri et Ecclesiae doctoris
+21 : S. Petri Canisii, presbyteri et Ecclesiae doctoris
+23 : S. Ioannis de Kęty, presbyteri
+26 f R :  S. Stephani, protomartyris
+27 f :  S. Ioannis, apostoli et evangelistae
+28 f R :  Ss. Innocentium, martyrum
+29 R : S. Thomae Becket, episcopi et martyris
+31 : S. Silvestri I, papae

data/lib/calendarium-romanum.rb

@@ -2,7 +2,9 @@
 version
 i18n_setup
 rank
+enum
 enums
+data
 calendar
 temporale
 sanctorale

data/lib/calendarium-romanum/calendar.rb

@@ -33,7 +33,7 @@ module CalendariumRomanum
 
         elsif args.size == 1 then
           a = args.first
-          unless a.is_a? Date or a.is_a? DateTime
+          unless a.is_a? Date
             raise ex
           end
           return a
@@ -75,6 +75,9 @@ module CalendariumRomanum
       return year == obj.year
     end
 
+    # accepts date information represented as
+    # Date, DateTime, or two to three integers
+    # (month - day or year - month - day);
     # returns filled Day for the specified day
     def day(*args)
       if args.size == 2

data/lib/calendarium-romanum/cli.rb

@@ -0,0 +1,100 @@
+require 'thor'
+
+module CalendariumRomanum
+
+  class CLI < Thor
+    include CalendariumRomanum::Util
+
+    desc 'query 2007-06-05', 'show calendar information for a specified date'
+    option :calendar, default: 'universal-en', aliases: :c
+    option :locale, default: 'en', aliases: :l
+    def query(date_str=nil)
+      I18n.locale = options[:locale]
+
+      data_file = Data[options[:calendar]]
+      if data_file.nil?
+        STDERR.puts 'Invalid calendar. See subcommand `calendars` for valid options.'
+        exit 1
+      end
+      sanctorale = data_file.load
+
+      date =
+        if date_str
+          begin
+            Date.parse(date_str)
+          rescue ArgumentError
+            STDERR.puts 'Invalid date.'
+            exit 1
+          end
+        else
+          Date.today
+        end
+      calendar = Calendar.for_day(date, sanctorale)
+      day = calendar.day date
+
+      puts date
+      puts "season: #{day.season}"
+      puts
+
+      rank_length = day.celebrations.collect {|c| c.rank.short_desc.size }.max
+      day.celebrations.each do |c|
+        print c.rank.short_desc.rjust(rank_length)
+        print ' : '
+        puts c.title
+      end
+    end
+
+    desc 'calendars', 'lists calendars available for querying'
+    def calendars
+      Data.each {|c| puts c.siglum }
+    end
+
+    desc 'errors FILE1, ...', 'finds errors in sanctorale data files'
+    def errors(*files)
+      loader = SanctoraleLoader.new
+      files.each do |path|
+        s = Sanctorale.new
+        loader.load_from_file path, s
+      end
+    end
+
+    desc 'cmp FILE1, FILE2', 'detect differences in rank and colour of corresponding celebrations'
+    def cmp(a, b)
+      loader = SanctoraleLoader.new
+      sanctorales = []
+
+      [a, b].each do |source|
+        s = Sanctorale.new
+        loader.load_from_file source, s
+        sanctorales << s
+      end
+
+      # a leap year must be chosen in order to iterate over
+      # all possible days of a Sanctorale
+      Year.new(1990).each_day do |d|
+        celebs = sanctorales.collect {|s| s.get d.month, d.day }
+        if celebs.find {|cc| cc.nil? }
+          next
+        end
+
+        celebs[0].each_index do |i|
+          if i >= celebs[1].size
+            break
+          end
+
+          ca = celebs[0][i]
+          cb = celebs[1][i]
+
+          _print_cel = Proc.new {|c| puts "#{c.rank.priority} #{c.colour} | #{c.title}" }
+
+          if ca.rank != cb.rank || ca.colour != cb.colour
+            puts "#{d.month}/#{d.day}"
+            _print_cel.call ca
+            _print_cel.call cb
+            puts
+          end
+        end
+      end
+    end
+  end
+end

data/lib/calendarium-romanum/data.rb

@@ -0,0 +1,41 @@
+module CalendariumRomanum
+  # allows easy access to the bundled data files
+  class Data < Enum
+
+    class SanctoraleFile
+      def initialize(base_name)
+        @siglum = base_name.sub(/\.txt$/, '')
+        @path = File.expand_path('../../data/' + base_name, File.dirname(__FILE__))
+      end
+
+      attr_reader :siglum, :path
+
+      def load
+        SanctoraleLoader.new.load_from_file(@path)
+      end
+    end
+
+    values(index_by: :siglum) do
+      # only calendars of broader interest have constants defined
+      [
+        GENERAL_ROMAN_LATIN = SanctoraleFile.new('universal-la.txt'),
+        GENERAL_ROMAN_ENGLISH = SanctoraleFile.new('universal-en.txt'),
+        GENERAL_ROMAN_ITALIAN = SanctoraleFile.new('universal-it.txt'),
+        CZECH = SanctoraleFile.new('czech-cs.txt')
+      ] \
+      +
+      %w(
+      czech-brno-cs.txt
+      czech-budejovice-cs.txt
+      czech-cechy-cs.txt
+      czech-hradec-cs.txt
+      czech-litomerice-cs.txt
+      czech-morava-cs.txt
+      czech-olomouc-cs.txt
+      czech-ostrava-cs.txt
+      czech-plzen-cs.txt
+      czech-praha-cs.txt
+      ).collect {|basename| SanctoraleFile.new(basename) }
+    end
+  end
+end

data/lib/calendarium-romanum/day.rb

@@ -51,7 +51,13 @@ module CalendariumRomanum
     attr_reader :rank
     def_delegators :@rank, :solemnity?, :feast?, :memorial?
 
-    attr_reader :title
+    def title
+      if @title.respond_to? :call
+        @title.call
+      else
+        @title
+      end
+    end
 
     attr_reader :colour
     alias_method :color, :colour

data/lib/calendarium-romanum/enum.rb

@@ -0,0 +1,33 @@
+require 'forwardable'
+
+module CalendariumRomanum
+  # Utility class for definition of enumerated "types"
+  class Enum
+    class << self
+      extend Forwardable
+
+      def values(index_by: nil, &blk)
+        defined?(@indexed) && raise(RuntimeError.new('initialized repeatedly'))
+
+        @indexed = {}
+        @all = yield.freeze
+
+        @all.each_with_index do |val, i|
+          val.freeze
+
+          key = index_by ? val.public_send(index_by) : i
+          @indexed[key] = val
+        end
+
+        @indexed.freeze
+      end
+
+      def all
+        @all
+      end
+
+      def_delegators :@all, :each
+      def_delegators :@indexed, :[]
+    end
+  end
+end