Fixing bin

If we know the birth year, recur from there. Otherwise, recur from the
current year.

Gemfile.lock

@@ -3,6 +3,7 @@ PATH
   specs:
     birthdaze (0.0.1)
       carddav
+      icalendar
       thor
 
 GEM
@@ -13,6 +14,9 @@ GEM
       nokogiri
       vcardigan
     curb (1.0.5)
+    icalendar (2.10.1)
+      ice_cube (~> 0.16)
+    ice_cube (0.16.4)
     nokogiri (1.16.2-x86_64-linux)
       racc (~> 1.4)
     racc (1.7.3)

birthdaze.gemspec

@@ -5,10 +5,12 @@ Gem::Specification.new do |s|
   s.authors     = ["T S Vallender"]
   s.email       = "t@tsvallender.co.uk"
   s.homepage    = "https://git.tsvallender.co.uk/tsv/birthdaze"
-  s.files       = Dir["lib/**/*", "MIT-LICENSE", "README.md"]
+  s.files       = Dir["bin/*", "lib/**/*", "MIT-LICENSE", "README.md"]
   s.license     = "MIT"
+  s.bindir      = "bin"
   s.executables << "birthdaze"
-  s.add_dependency "thor"
   s.add_dependency "carddav"
+  s.add_dependency "icalendar"
+  s.add_dependency "thor"
 end
 

lib/birthdaze.rb

@@ -1,12 +1,21 @@
 require "carddav"
+require "icalendar"
 require "thor"
 require "yaml"
 
 class Birthdaze < Thor
   desc "generate", "Generate calendars"
   def generate
-    puts "Generate calendars"
-    birthdays
+    puts "Writing ical file to #{config['ical_output']}"
+    File.open(config["ical_output"], 'w') { |file| file.write(calendar.to_ical) }
+  end
+
+  desc "list", "List birthdays"
+  def list
+    bdays = birthdays.sort do |a, b|
+      a[:month] == b[:month] ? a[:day] <=> b[:day] : a[:month] <=> b[:month]
+    end
+    bdays.each { |d| puts "🎂 #{d[:day]}/#{d[:month]} - #{d[:name]}" }
   end
 
   private
@@ -25,14 +34,63 @@ class Birthdaze < Thor
   end
 
   def birthdays
-    birthdays = []
+    return @birthdays if defined? @birthdays
+
+    @birthdays = []
     client.cards.each do |card|
       card = card.parsed.to_s
       birthday = birthday_regex.match(card)[1] if birthday_regex.match?(card)
       name = name_regex.match(card)[1] if name_regex.match?(card)
-      birthdays << [ name, birthday ] if name && birthday
+      if name && birthday
+        @birthdays << {
+          name: name,
+          month: month_of(birthday),
+          day: day_of(birthday),
+          birth_year: birth_year_of(birthday)
+        }
+      end
     end
-    birthdays
+    @birthdays
+  end
+
+  def calendar
+    return @calendar if defined? @calendar
+
+    @calendar = Icalendar::Calendar.new
+    birthdays.each do |birthday|
+      @calendar.event do |event|
+        event.dtstart = Icalendar::Values::Date.new(start_date(birthday))
+        event.dtend = Icalendar::Values::Date.new(end_date(birthday))
+        event.summary = summary(birthday)
+        event.description = description(birthday)
+        event.rrule = "FREQ=YEARLY;"
+      end
+    end
+    @calendar.publish
+  end
+
+  # Takes a birthday string, with or without a year, and returns a start date
+  def start_date(birthday)
+    year = birthday[:birth_year] || Date.today.year
+    "#{year}#{birthday[:month]}#{birthday[:day]}"
+  end
+
+  def end_date(birthday)
+    date = Date.parse(start_date(birthday)).next_day
+    date.strftime("%Y%m%d")
+  end
+
+  def summary(birthday)
+    "🎂 #{birthday[:name]}’s birthday"
+  end
+
+  def description(birthday)
+    return "" unless birthday[:birth_year]
+
+    "#{birthday[:name]} was born in #{birthday[:birth_year]}"
+  end
+
+  def set_reminders
   end
 
   def birthday_regex
@@ -43,4 +101,20 @@ class Birthdaze < Thor
   def name_regex
     /FN.*:(.*)/
   end
+
+  def month_of(date)
+    date.tr("-", "")[-4..-3]
+  end
+
+  def day_of(date)
+    date.tr("-", "")[-2..-1]
+  end
+
+  def birth_year_of(date)
+    return nil if date.length < 8
+
+    birth_year = date[0..3]
+    return nil if birth_year == "1604" # This is set (for some reason) by DAVx⁵
+    birth_year
+  end
 end