icalPal 1.0.0

data/lib/defaults.rb

@@ -0,0 +1,64 @@
+# Does anybody really know what time it is?
+$now = ICalPal::RDT.now
+$today = ICalPal::RDT.new(*$now.to_a[0..2])
+
+# Defaults
+$defaults = {
+  common: {
+    aep: [],
+    bullet: '•',
+    cf: "#{ENV['HOME']}/.icalPal",
+    color: false,
+    db: "#{ENV['HOME']}/Library/Calendars/Calendar.sqlitedb",
+    debug: Logger::WARN,
+    ec: [],
+    eep: [],
+    es: [],
+    et: [],
+    ic: [],
+    is: [],
+    it: [],
+    li: 0,
+    output: 'default',
+    ps: [ "\n  " ],
+    r: false,
+    sc: false,
+    sd: false,
+    sep: false,
+    sort: nil,
+    sp: false,
+  },
+  tasks: {
+    bullet: '!',
+    iep: [ 'notes', 'due', 'priority' ],
+    sort: 'priority',
+  },
+  stores: {
+    iep: [ 'account', 'type' ],
+    sort: 'account',
+  },
+  calendars: {
+    iep: [ 'calendar', 'type', 'UUID' ],
+    sort: 'calendar',
+  },
+  events: {
+    days: nil,
+    df: '%b %-d, %Y',
+    ea: false,
+    eed: false,
+    eep: [],
+    from: $today,
+    iep: [ 'title', 'location', 'notes', 'url', 'attendees', 'datetime' ],
+    n: false,
+    nnr: "\n       ",
+    nrd: false,
+    ps: [ "\n    " ],
+    sa: false,
+    sed: false,
+    sort: 'sdate',
+    ss: "\n------------------------",
+    tf: '%-I:%M %p',
+    to: nil,
+    uid: false,
+  }
+}

data/lib/event.rb

@@ -0,0 +1,283 @@
+module ICalPal
+  # Class representing items from the <tt>CalendarItem</tt> table
+  class Event
+    include ICalPal
+
+    # Standard accessor with special handling for +age+,
+    # +availability+, +datetime+, +location+, +notes+, +status+,
+    # +title+, and +uid+
+    #
+    # @param k [String] Key/property name
+    def [](k)
+      case k
+      when 'age' then           # pseudo-property
+        @self['sdate'].year - @self['edate'].year
+
+      when 'availability' then  # Integer -> String
+        EventKit::EKEventAvailability.select { |k, v| v == @self['availability'] }.keys
+
+      when 'datetime' then      # date[ at time[ - time]]
+        unless $opts[:sd] || $opts[:days] == 1
+          t = @self['sdate'].to_s
+          t += ' at ' unless @self['all_day'].positive?
+        end
+
+        unless @self['all_day'] && @self['all_day'].positive?
+          t ||= ''
+          t += "#{@self['sdate'].strftime($opts[:tf])}" if @self['sdate']
+          t += " - #{@self['edate'].strftime($opts[:tf])}" unless $opts[:eed] || !@self['edate']
+        end
+        t
+
+      when 'location' then      # location[ address]
+        @self['location']? [ @self['location'], @self['address'] ].join(' ').chop : nil
+
+      when 'notes' then         # \n -> :nnr
+        @self['notes']? @self['notes'].strip.gsub(/\n/, $opts[:nnr]) : nil
+
+      when 'status' then        # Integer -> String
+        EventKit::EKEventStatus.select { |k, v| v == @self['status'] }.keys[0]
+
+      when 'title' then         # title[ (age N)]
+        @self['title'] + ((@self['calendar'] == 'Birthdays')? " (age #{self['age']})" : "")
+
+      when 'uid' then           # for icalBuddy
+        @self['UUID']
+
+      else @self[k]
+      end
+    end
+
+    # @overload initialize(obj)
+    #  @param obj [SQLite3::ResultSet::HashWithTypesAndFields]
+    #
+    # @overload initialize(obj<DateTime>)
+    #  Create a placeholder event for days with no events when using --sed
+    #  @param obj [DateTime]
+    def initialize(obj)
+      # Placeholder for days with no events
+      return @self = {
+        $opts[:sep] => obj,
+        'placeholder' => true,
+        'title' => 'Nothing.',
+      } if DateTime === obj
+
+      @self = {}
+      obj.keys.each { |k| @self[k] = obj[k] }
+
+      # Convert JSON arrays to Arrays
+      @self['attendees'] = JSON.parse(obj['attendees'])
+      @self['xdate'] = JSON.parse(obj['xdate']).map do |k|
+        k = RDT.new(*Time.at(k + ITIME).to_a.reverse[4..]) if k
+      end
+
+      # Convert iCal dates to normal dates
+      obj.keys.select { |i| i.end_with? '_date' }.each do |k|
+        t = Time.at(obj[k] + ITIME) if obj[k]
+        @self["#{k[0]}date"] = RDT.new(*t.to_a.reverse[4..], t.zone) if t
+      end
+
+      obj['type'] = EventKit::EKSourceType.find_index { |i| i[:name] == 'Subscribed' } if obj['subcal_url']
+      type = EventKit::EKSourceType[obj['type']]
+
+      @self['sdate'] = @self['sdate'].new_offset(0) if @self['start_tz'] == '_float'
+      @self['symbolic_color_name'] ||= @self['color']
+      @self['type'] = type[:name]
+    end
+
+    # Check non-recurring events
+    #
+    # @return [Array<Event>]
+    #   If an event spans multiple days, the return value will contain
+    #   a unique {Event} for each day that falls within our window
+    def non_recurring
+      retval = []
+
+      # Repeat for multi-day events
+      ((self['duration'] / 86400).to_i + 1).times do |i|
+        retval.push(Marshal.load(Marshal.dump(self))) if in_window?(self['sdate'])
+        self['sdate'] += 1
+      end
+
+      retval
+    end
+
+    # Check recurring events
+    #
+    # @return [Array<Event>]
+    #   All occurrences of a recurring event that are within our window
+    def recurring
+      retval = []
+
+      # See if event ends before we start
+      stop = [ $opts[:to], (self['rdate'] || $opts[:to]) ].min
+      return(retval) if stop < $opts[:from]
+
+      # Get changes to series
+      changes = $rows.select { |r| r['orig_item_id'] == self['ROWID'] }
+
+      i = 1
+      while self['sdate'] <= stop
+        unless @self['xdate'].any?(@self['sdate']) # Exceptions?
+          o = get_occurrences(changes)
+          o.each { |r| retval.push(r) if in_window?(r['sdate'], r['edate']) }
+
+          i += 1
+          return(retval) if self['count'].positive? && i > self['count']
+        end
+
+        apply_frequency!
+      end
+
+      retval
+    end
+
+    private
+
+    # @!visibility public
+
+    # Get next occurences of a recurring event
+    #
+    # @param changes [Array] Recurrence changes for the event
+    # @return [Array<IcalPal::Event>]
+    def get_occurrences(changes)
+      ndate = self['sdate']
+      odays = []
+      retval = []
+
+      # Deconstruct specifier(s)
+      if self['specifier']
+        self['specifier'].split(';').each do |k|
+          j = k.split('=')
+
+          # M=Day of the month, O=Month of the year, S=Nth
+          case j[0]
+          when 'M' then ndate = RDT.new(ndate.year, ndate.month, j[1].to_i)
+          when 'O' then ndate = RDT.new(ndate.year, j[1].to_i, ndate.day)
+          when 'S' then @self['specifier'].sub!(/D=0/, "D=+#{j[1].to_i}")
+          end
+        end
+
+        # D=Day of the week
+        self['specifier'].split(';').each do |k|
+          j = k.split('=')
+
+          odays = j[1].split(',') if j[0] == 'D'
+        end
+      end
+
+      # Deconstruct occurence day(s)
+      odays.each do |n|
+        dow = DOW[n[-2..-1].to_sym]
+        ndate += 1 until ndate.wday == dow
+        ndate = ICalPal.nth(Integer(n[0..1]), n[-2..-1], ndate) unless (n[0] == '0')
+
+        # Check for changes
+        changes.detect(
+          proc {
+            self['sdate'] = RDT.new(*ndate.to_a[0..2], *self['sdate'].to_a[3..])
+            self['edate'] = RDT.new(*ndate.to_a[0..2], *self['edate'].to_a[3..])
+            retval.push(Marshal.load(Marshal.dump(self)))
+          }) { |i| @self['sdate'].to_i == i['orig_date'] + ITIME }
+      end
+
+      # Check for changes
+      changes.detect(
+        proc {
+          retval.push(Marshal.load(Marshal.dump(self)))
+        }) { |i| @self['sdate'].to_i == i['orig_date'] + ITIME } unless retval.count.positive?
+
+      retval
+    end
+
+    # Apply frequency and interval
+    def apply_frequency!
+      # Leave edate alone for birthdays to compute age
+      dates = [ 'sdate' ]
+      dates << 'edate' unless self['calendar'].include?('Birthday')
+
+      dates.each do |d|
+        case EventKit::EKRecurrenceFrequency[self['frequency'] - 1]
+        when 'daily'   then self[d] +=  self['interval']
+        when 'weekly'  then self[d] +=  self['interval'] * 7
+        when 'monthly' then self[d] >>= self['interval']
+        when 'yearly'  then self[d] >>= self['interval'] * 12
+        end
+      end if self['frequency'] && self['interval']
+    end
+
+    # Check if an event starts or ends between from and to, or if it's
+    # running now (for -n)
+    #
+    # @param s [RDT] Event start
+    # @param e [RDT] Event end
+    # @return [Boolean]
+    def in_window?(s, e = s)
+      $opts[:n]?
+        ($now >= s && $now < e) :
+        ([ s, e ].max >= $opts[:from] && s < $opts[:to])
+    end
+
+    QUERY = <<~SQL
+SELECT DISTINCT
+
+Store.name AS account,
+Store.type,
+
+Calendar.color,
+Calendar.title AS calendar,
+Calendar.subcal_url,
+Calendar.symbolic_color_name,
+
+CAST(CalendarItem.end_date AS INT) AS end_date,
+CAST(CalendarItem.orig_date AS INT) AS orig_date,
+CAST(CalendarItem.start_date AS INT) AS start_date,
+CAST(CalendarItem.end_date - CalendarItem.start_date AS INT) AS duration,
+CalendarItem.all_day,
+CalendarItem.availability,
+CalendarItem.conference_url_detected,
+CalendarItem.description AS notes,
+CalendarItem.has_recurrences,
+CalendarItem.orig_item_id,
+CalendarItem.rowid,
+CalendarItem.start_tz,
+CalendarItem.status,
+CalendarItem.summary AS title,
+CalendarItem.unique_identifier,
+CalendarItem.url,
+CalendarItem.uuid,
+
+json_group_array(DISTINCT CAST(ExceptionDate.date AS INT)) AS xdate,
+
+json_group_array(DISTINCT Identity.display_name) AS attendees,
+
+Location.address AS address,
+Location.title AS location,
+
+Recurrence.count,
+CAST(Recurrence.end_date AS INT) AS rend_date,
+Recurrence.frequency,
+Recurrence.interval,
+Recurrence.specifier
+
+FROM Store
+
+JOIN Calendar ON Calendar.store_id = Store.rowid
+JOIN CalendarItem ON CalendarItem.calendar_id = Calendar.rowid
+
+LEFT OUTER JOIN Location ON Location.rowid = CalendarItem.location_id
+LEFT OUTER JOIN Recurrence ON Recurrence.owner_id = CalendarItem.rowid
+LEFT OUTER JOIN ExceptionDate ON ExceptionDate.owner_id = CalendarItem.rowid
+
+LEFT OUTER JOIN Participant ON Participant.owner_id = CalendarItem.rowid
+LEFT OUTER JOIN Identity ON Identity.rowid = Participant.identity_id
+
+WHERE Store.disabled IS NOT 1
+
+GROUP BY CalendarItem.rowid
+
+ORDER BY CalendarItem.unique_identifier
+SQL
+
+  end
+end

data/lib/icalPal.rb

@@ -0,0 +1,82 @@
+require_relative 'EventKit'
+require_relative 'ToICalPal'
+require_relative 'calendar'
+require_relative 'event'
+require_relative 'rdt'
+require_relative 'store'
+
+# Encapsulate the _Store_ (accounts), _Calendar_ and _CalendarItem_
+# tables of a Calendar database
+
+module ICalPal
+  attr_reader :self
+
+  # Dynamic instantiation of our classes based on the command being
+  # run
+  #
+  # @param klass [String] One of +accounts+, +stores+, +calendars+, or +events+
+  # @return [Class] The subclass of ICalPal
+  def self.call(klass)
+    case klass
+    when 'accounts' then Store
+    when 'stores' then Store
+    when 'calendars' then Calendar
+    when 'events' then Event
+    when 'tasks' then Task
+    else
+      $log.fatal("Unknown class: #{klass}")
+      exit
+    end
+  end
+
+  # @param obj [ICalPal] A +Store+ or +Calendar+
+  def initialize(obj)
+    obj['type'] = EventKit::EKSourceType.find_index { |i| i[:name] == 'Subscribed' } if obj['subcal_url']
+    type = EventKit::EKSourceType[obj['type']]
+
+    obj['store'] = obj['account']
+
+    obj['type'] = type[:name]
+    obj['color'] ||= type[:color]
+    obj['symbolic_color_name'] ||= type[:color]
+
+    @self = obj
+  end
+
+  # Get the +n+'th +dow+ in month +m+
+  #
+  # @param n [Integer] Integer between -4 and +4
+  # @param dow [String] Day of the week abbreviation from ICalPal::DOW
+  # @param m [RDT] The RDT with the year and month we're searching
+  # @return [RDT] The resulting day
+  def self.nth(n, dow, m)
+    # Get the number of days in the month
+    a = [ ICalPal::RDT.new(m.year, m.month, 1) ] # First of this month
+    a[1] = (a[0] >> 1) - 1      # First of next month, minus 1 day
+
+    # Reverse it if going backwards
+    a.reverse! if n.negative?
+    step = a[1] <=> a[0]
+
+    j = 0
+    a[0].step(a[1], step) do |i|
+      j += step if i.wday == DOW[dow.to_sym]
+      return i if j == n
+    end
+  end
+
+  # Epoch + 31 years
+  ITIME = 978307200
+
+  # Days of the week abbreviations used in recurrence rules
+  #
+  # <tt><i>SU, MO, TU, WE, TH, FR, SA</i></tt>
+  DOW = { 'SU': 0, 'MO': 1, 'TU': 2, 'WE': 3, 'TH': 4, 'FR': 5, 'SA': 6 }
+
+  # @!group Accessors
+  def [](k) @self[k] end
+  def []=(k, v) @self[k] = v end
+  def keys() @self.keys end
+  def values() @self.values end
+  # @!endgroup
+end

data/lib/options.rb

@@ -0,0 +1,268 @@
+require 'optparse'
+
+require_relative 'defaults'
+
+module ICalPal
+  # Handle program options from all sources:
+  #
+  # * Defaults
+  # * Environment variables
+  # * Configuration file
+  # * Command-line arguments
+  #
+  # Many options are intentionally copied from
+  # icalBuddy[https://github.com/ali-rantakari/icalBuddy].  Note that
+  # icalPal requires two hyphens for all options, except single-letter
+  # options which require a single hyphen.
+  #
+  # Options can be abbreviated as long as they are unique.
+  class Options
+    # Define the OptionParser
+    def initialize
+      # prologue
+      @op = OptionParser.new
+      @op.summary_width = 23
+      @op.banner += " [-c] COMMAND"
+      @op.version = '1.0'
+
+      @op.accept(ICalPal::RDT) { |s| ICalPal::RDT.conv(s) }
+
+      # head
+      @op.on("\nCOMMAND must be one of the following:\n\n")
+
+      @op.on("%s%s %sPrint events" % pad('events'))
+      @op.on("%s%s %sPrint calendars" % pad('calendars'))
+      @op.on("%s%s %sPrint accounts" % pad('accounts'))
+
+      @op.separator('')
+      @op.on("%s%s %sPrint events occurring today" % pad('eventsToday'))
+      @op.on("%s%s %sPrint events occurring between today and NUM days into the future" % pad('eventsToday+NUM'))
+      @op.on("%s%s %sPrint events occurring at present time" % pad('eventsNow'))
+
+      # global
+      @op.separator("\nGlobal options:\n\n")
+
+      @op.on('-c=COMMAND', '--cmd=COMMAND', COMMANDS, 'Command to run')
+      @op.on('--db=DB', 'Use DB file instead of Calendar')
+      @op.on('--cf=FILE', "Set config file path (default: #{$defaults[:common][:cf]})")
+      @op.on('-o', '--output=FORMAT', OUTFORMATS,
+            "Print as FORMAT (default: #{$defaults[:common][:output]})", "[#{OUTFORMATS.join(', ')}]")
+
+      # include/exclude
+      @op.separator("\nIncluding/excluding calendars:\n\n")
+
+      @op.on('--is=ACCOUNTS', Array, 'List of accounts to include')
+      @op.on('--es=ACCOUNTS', Array, 'List of accounts to exclude')
+
+      @op.separator('')
+      @op.on('--it=TYPES', Array, 'List of calendar types to include')
+      @op.on('--et=TYPES', Array, 'List of calendar types to exclude',
+            "[#{EventKit::EKSourceType.map { |i| i[:name] }.join(', ') }]")
+
+      @op.separator('')
+      @op.on('--ic=CALENDARS', Array, 'List of calendars to include')
+      @op.on('--ec=CALENDARS', Array, 'List of calendars to exclude')
+
+      # dates
+      @op.separator("\nChoosing dates:\n\n")
+
+      @op.on('--from=DATE', ICalPal::RDT, 'List events starting on or after DATE')
+      @op.on('--to=DATE', ICalPal::RDT, 'List events starting on or before DATE',
+            'DATE can be yesterday, today, tomorrow, +N, -N, or anything accepted by DateTime.parse()',
+            'See https://ruby-doc.org/stdlib-2.6.1/libdoc/date/rdoc/DateTime.html#method-c-parse')
+      @op.separator('')
+      @op.on('-n', 'Include only events from now on')
+      @op.on('--days=N',  OptionParser::DecimalInteger,
+            'Show N days of events, including start date')
+      @op.on('--sed', 'Show empty dates with --sd')
+      @op.on('--ia', 'Include only all-day events')
+      @op.on('--ea', 'Exclude all-day events')
+
+      # properties
+      @op.separator("\nChoose properties to include in the output:\n\n")
+
+      @op.on('--iep=PROPERTIES', Array, 'List of properties to include')
+      @op.on('--eep=PROPERTIES', Array, 'List of properties to exclude')
+      @op.on('--aep=PROPERTIES', Array, 'List of properties to include in addition to the default list')
+      @op.separator('')
+      # @op.on('--itp=PROPERTIES', Array, 'List of task properties to include')
+      # @op.on('--etp=PROPERTIES', Array, 'List of task properties to exclude')
+      # @op.on('--atp=PROPERTIES', Array, 'List of task properties to include in addition to the default list')
+      # @op.separator('')
+
+      @op.on('--uid', 'Show event UIDs')
+      @op.on('--eed', 'Exclude end datetimes')
+
+      @op.separator('')
+      @op.on('--nc', 'No calendar names')
+      @op.on('--npn', 'No property names')
+      @op.on('--nrd', 'No relative dates')
+
+      @op.separator('')
+      @op.separator(@op.summary_indent + 'Properties are listed in the order specified')
+      @op.separator('')
+      @op.separator(@op.summary_indent +
+                   "Use 'all' for PROPERTIES to include all available properties (except any listed in --eep)")
+      @op.separator(@op.summary_indent +
+                   "Use 'list' for PROPERTIES to list all available properties and exit")
+
+      # formatting
+      @op.separator("\nFormatting the output:\n\n")
+
+      @op.on('--li=N', OptionParser::DecimalInteger, 'Show at most N items (default: 0 for no limit)')
+
+      @op.separator('')
+      @op.on('--sc', 'Separate by calendar')
+      @op.on('--sd', 'Separate by date')
+      # @op.on('--sp', 'Separate by priority')
+      # @op.on('--sta', 'Sort tasks by due date (ascending)')
+      # @op.on('--std', 'Sort tasks by due date (descending)')
+      # @op.separator('')
+      @op.on('--sep=PROPERTY', 'Separate by PROPERTY')
+      @op.separator('')
+      @op.on('--sort=PROPERTY', 'Sort by PROPERTY')
+      @op.on('-r', '--reverse', 'Sort in reverse')
+
+      @op.separator('')
+      @op.on('--ps=SEPARATORS', Array, 'List of property separators')
+      @op.on('--ss=SEPARATOR', String, 'Set section separator')
+
+      @op.separator('')
+      @op.on('--df=FORMAT', String, 'Set date format')
+      @op.on('--tf=FORMAT', String, 'Set time format',
+            'See https://ruby-doc.org/stdlib-2.6.1/libdoc/date/rdoc/DateTime.html#method-i-strftime for details')
+
+      @op.separator('')
+      @op.on('-b', '--ab=STRING', String, 'Use STRING for bullets')
+      @op.on('--nnr=SEPARATOR', String, 'Set replacement for newlines within notes')
+
+      @op.separator('')
+      @op.on('-f', 'Format output using standard ANSI colors')
+      @op.on('--color', 'Format output using a larger color palette')
+
+      # help
+      @op.separator("\nHelp:\n\n")
+
+      @op.on('-h', '--help', 'Show this message') { @op.abort(@op.help) }
+      @op.on('-V', '-v', '--version', "Show version and exit (#{@op.version})") { @op.abort(@op.version)  }
+      @op.on('-d', '--debug=LEVEL', /#{Regexp.union(Logger::SEV_LABEL[0..-2]).source}/i,
+            "Set the logging level (default: #{Logger::SEV_LABEL[$defaults[:common][:debug]].downcase})",
+            "[#{Logger::SEV_LABEL[0..-2].join(', ').downcase}]")
+
+      # environment variables
+      @op.on_tail("\nEnvironment variables:\n\n")
+
+      @op.on_tail("%s%s %sAdditional arguments" % pad('ICALPAL'))
+      @op.on_tail("%s%s %sAdditional arguments from a file" % pad('ICALPAL_CONFIG'))
+      @op.on_tail("%s%s %s(default: #{$defaults[:common][:cf]})" % pad(''))
+    end
+
+    # Parse options from the CLI and merge them with other sources
+    #
+    # @return [Hash] All options loaded from defaults, environment
+    #  variables, configuration file, and the command line
+    def parse_options
+      begin
+        cli = {}
+        env = {}
+        cf = {}
+
+        # Load from CLI, environment, configuration file
+        @op.parse!(into: cli)
+        @op.parse!(ENV['ICALPAL'].split, into: env) rescue nil
+        cli[:cf] ||= ENV['ICALPAL_CONFIG'] || $defaults[:common][:cf]
+        @op.parse!(IO.read(File.expand_path(cli[:cf])).split, into: cf) rescue nil
+
+        cli[:cmd] ||= @op.default_argv[0]
+        cli[:cmd] = 'stores' if cli[:cmd] == 'accounts'
+
+        # Parse eventsNow and eventsToday commands
+        cli[:cmd].match('events(Now|Today)(\+[0-9]+)?') do |m|
+          cli[:n] = true if m[1] == 'Now'
+          cli[:days] = (m[1] == 'Today')? m[2].to_i + 1 : 1
+
+          cli[:from] = $today
+          cli[:to] = $today + cli[:days]
+          cli[:days] = Integer(cli[:to] - cli[:from])
+
+          cli[:cmd] = 'events'
+        end if cli[:cmd]
+
+        # Must have a valid command
+        raise(OptionParser::MissingArgument, 'COMMAND is required') unless cli[:cmd]
+        raise(OptionParser::InvalidArgument, "Unknown COMMAND #{cli[:cmd]}") unless (COMMANDS.any? cli[:cmd])
+
+        # Merge options
+        opts = $defaults[:common]
+          .merge($defaults[cli[:cmd].to_sym])
+          .merge(cf)
+          .merge(env)
+          .merge(cli)
+
+        # All kids love log!
+        $log.level = opts[:debug]
+
+        # From the Department of Redundancy Department
+        opts[:props] = (opts[:iep] + opts[:aep] - opts[:eep]).uniq
+
+        # From, to, days
+        if opts[:from]
+          opts[:to] += 1 if opts[:to]
+          opts[:to] ||= opts[:from] + 1 if opts[:from]
+          opts[:to] = opts[:from] + opts[:days] if opts[:days]
+          opts[:days] ||= Integer(opts[:to] - opts[:from])
+          opts[:from] = $now if opts[:n]
+        end
+
+        # Colors
+        opts[:palette] = 8 if opts[:f]
+        opts[:palette] = 24 if opts[:color]
+
+        # Sections
+        unless opts[:sep]
+          opts[:sep] = 'calendar' if opts[:sc]
+          opts[:sep] = 'sday' if opts[:sd]
+          opts[:sep] = 'priority' if opts[:sp]
+        end
+        opts[:nc] = true if opts[:sc]
+
+        # Sanity checks
+        raise(OptionParser::InvalidArgument, '--li cannot be negative') if opts[:li].negative?
+        raise(OptionParser::InvalidOption, 'Start date must be before end date') if opts[:from] && opts[:from] > opts[:to]
+        raise(OptionParser::MissingArgument, 'No properties to display') if opts[:props].empty?
+
+        # Open the database here so we can catch errors and print the help message
+        $log.debug("Opening database: #{opts[:db]}")
+        $db = SQLite3::Database.new(opts[:db], { readonly: true, results_as_hash: true })
+        $db.prepare('SELECT 1 FROM Calendar LIMIT 1').close
+
+      rescue SQLite3::SQLException => e
+        @op.abort("#{opts[:db]} is not a Calendar database")
+
+      rescue SQLite3::Exception => e
+        @op.abort("#{opts[:db]}: #{e}")
+
+      rescue StandardError => e
+        @op.abort("#{e}\n\n#{@op.help}\n#{e}")
+      end
+
+      opts.sort.to_h
+    end
+
+    # Commands that can be run
+    COMMANDS = %w{events eventsToday eventsNow calendars accounts stores}
+
+    # Supported output formats
+    OUTFORMATS = %w{ansi csv default hash html json md rdoc toc yaml}
+
+    private
+
+    # Pad non-options to align with options
+    #
+    # @param t [String] Text on the left side
+    # @return [String] Text indented by summary_indent, and padded according to summary_width
+    def pad(t)
+      [ @op.summary_indent, t, " " * (@op.summary_width - t.length) ]
+    end
+  end
+end