radiant-event_calendar-extension 1.0.0

data/db/migrate/002_calendar_add_ical_url.rb

@@ -0,0 +1,9 @@
+class CalendarAddIcalUrl < ActiveRecord::Migration
+  def self.up
+    add_column :calendars, :ical_url, :string
+  end
+
+  def self.down
+    remove_column :calendars, :ical_url
+  end
+end

data/db/migrate/003_add_calendar_category.rb

@@ -0,0 +1,9 @@
+class AddCalendarCategory < ActiveRecord::Migration
+  def self.up
+    add_column :calendars, :category, :string
+  end
+
+  def self.down
+    remove_column :calendars, :category
+  end
+end

data/db/migrate/004_add_slug.rb

@@ -0,0 +1,9 @@
+class AddSlug < ActiveRecord::Migration
+  def self.up
+    add_column :calendars, :slug, :string
+  end
+
+  def self.down
+    remove_column :calendars, :slug
+  end
+end

data/db/migrate/005_add_subscription_refresh_history.rb

@@ -0,0 +1,11 @@
+class AddSubscriptionRefreshHistory < ActiveRecord::Migration
+  def self.up
+    add_column :calendars, :last_refresh_count, :integer
+    add_column :calendars, :last_refresh_date, :datetime
+  end
+
+  def self.down
+    remove_column :calendars, :last_refresh_count
+    remove_column :calendars, :last_refresh_date
+  end
+end

data/db/migrate/006_create_icals.rb

@@ -0,0 +1,13 @@
+class CreateIcals < ActiveRecord::Migration
+  def self.up
+    create_table :icals do |t|
+      t.column :calendar_id, :integer
+      t.column :ical_url, :string
+      t.column :last_refresh_count, :integer
+      t.column :last_refresh_date, :datetime
+    end
+  end
+  def self.down
+    drop_table :icals
+  end
+end

data/db/migrate/007_move_subscriptions_to_ical.rb

@@ -0,0 +1,15 @@
+class MoveSubscriptionsToIcal < ActiveRecord::Migration
+
+  def self.up
+    Calendar.find(:all).each do |c|
+      Ical.create(:ical_url=>c.ical_url, :last_refresh_date=>c.last_refresh_date, :last_refresh_count=>c.last_refresh_count, :calendar_id=>c.id)
+    end
+  end
+
+  def self.down
+    Ical.find(:all).each do |c|
+      Calendar.create(:ical_url=>c.ical_url, :last_refresh_date=>c.last_refresh_date, :last_refresh_count=>c.last_refresh_count, :calendar_id=>c.id)
+    end
+  end
+
+end

data/db/migrate/008_clean_out_calendar.rb

@@ -0,0 +1,12 @@
+class CleanOutCalendar < ActiveRecord::Migration
+  def self.up
+    remove_column :calendars, :ical_url
+    remove_column :calendars, :last_refresh_date
+    remove_column :calendars, :last_refresh_count
+  end
+  def self.down
+    add_colum :calendars, :ical_url, :string
+    add_column :calendars, :last_refresh_date, :datetime
+    add_column :calendars, :last_refresh_count, :integer
+  end
+end

data/db/migrate/009_basic_authentication.rb

@@ -0,0 +1,12 @@
+class BasicAuthentication < ActiveRecord::Migration
+  def self.up
+    add_column :icals, :ical_username, :string
+    add_column :icals, :ical_password, :string
+    add_column :icals, :ical_use_https, :boolean
+  end
+  def self.down
+    remove_column :icals, :ical_username
+    remove_column :icals, :ical_password
+    remove_column :icals, :ical_use_https
+  end
+end

data/db/migrate/010_refresh_interval.rb

@@ -0,0 +1,9 @@
+class RefreshInterval < ActiveRecord::Migration
+  def self.up
+    add_column :icals, :ical_refresh_interval, :integer
+    Radiant::Config['event_calendar.default_refresh_interval'] = 3600
+  end
+  def self.down
+    remove_column :icals, :ical_refresh_interval
+  end
+end

data/db/migrate/011_more_properties.rb

@@ -0,0 +1,8 @@
+class MoreProperties < ActiveRecord::Migration
+  def self.up
+    add_column :events, :url, :string
+  end
+  def self.down
+    remove_column :events, :url
+  end
+end

data/db/migrate/20090818133511_simpler_ical_columns.rb

@@ -0,0 +1,17 @@
+class SimplerIcalColumns < ActiveRecord::Migration
+  def self.up
+    rename_column :icals, :ical_url, :url
+    rename_column :icals, :ical_username, :username
+    rename_column :icals, :ical_password, :password
+    rename_column :icals, :ical_use_https, :use_https
+    rename_column :icals, :ical_refresh_interval, :refresh_interval
+  end
+
+  def self.down
+    rename_column :icals, :url, :ical_url
+    rename_column :icals, :username, :ical_username
+    rename_column :icals, :password, :ical_password
+    rename_column :icals, :use_https, :ical_use_https
+    rename_column :icals, :refresh_interval, :ical_refresh_interval
+  end
+end

data/db/migrate/20090819130919_ownership.rb

@@ -0,0 +1,17 @@
+class Ownership < ActiveRecord::Migration
+  def self.up
+    add_column :calendars, :created_by, :integer
+    add_column :calendars, :updated_by, :integer
+    add_column :calendars, :created_at, :datetime
+    add_column :calendars, :updated_at, :datetime
+    add_column :calendars, :lock_version, :integer
+  end
+
+  def self.down
+    remove_column :calendars, :created_by
+    remove_column :calendars, :updated_by
+    remove_column :calendars, :created_at
+    remove_column :calendars, :updated_at
+    remove_column :calendars, :lock_version
+  end                                      
+end                                        

data/db/migrate/20090820073805_site_scope.rb

@@ -0,0 +1,13 @@
+class SiteScope < ActiveRecord::Migration
+  def self.up
+    add_column :calendars, :site_id, :integer
+    add_column :events, :site_id, :integer
+    add_column :icals, :site_id, :integer
+  end
+
+  def self.down
+    remove_column :calendars, :site_id
+    remove_column :events, :site_id
+    remove_column :icals, :site_id
+  end
+end

data/db/migrate/20091118100725_event_status.rb

@@ -0,0 +1,9 @@
+class EventStatus < ActiveRecord::Migration
+  def self.up
+    add_column :events, :status_id, :integer, :default => 1, :null => false
+  end
+
+  def self.down
+    remove_column :events, :status_id
+  end
+end

data/db/migrate/20100216080944_more_event_data.rb

@@ -0,0 +1,31 @@
+class MoreEventData < ActiveRecord::Migration
+  def self.up
+    add_column :events, :uuid, :string
+    add_column :events, :recurrence_rule, :string
+    add_column :events, :all_day, :boolean
+    add_column :events, :priority, :string
+    add_column :events, :keywords, :string
+    add_column :events, :contact, :string
+    add_column :events, :postcode, :string
+    add_column :events, :lock_version, :integer
+    add_column :events, :created_by_id, :integer
+    add_column :events, :created_at, :datetime
+    add_column :events, :updated_by_id, :integer
+    add_column :events, :updated_at, :datetime
+  end
+
+  def self.down
+    remove_column :events, :uuid
+    remove_column :events, :recurrence_rule
+    remove_column :events, :all_day
+    remove_column :events, :priority
+    remove_column :events, :keywords
+    remove_column :events, :contact
+    remove_column :events, :postcode
+    remove_column :events, :lock_version
+    remove_column :events, :created_by_id
+    remove_column :events, :created_at
+    remove_column :events, :updated_by_id
+    remove_column :events, :updated_at
+  end
+end

data/db/migrate/20100218131410_recurrence_parts.rb

@@ -0,0 +1,19 @@
+class RecurrenceParts < ActiveRecord::Migration
+  def self.up
+    remove_column :events, :recurrence_rule
+    add_column :events, :recurrence_period, :string
+    add_column :events, :recurrence_basis, :string
+    add_column :events, :recurrence_limit, :datetime
+    add_column :events, :recurrence_count, :integer
+    add_column :events, :recurrence_interval, :integer
+  end
+
+  def self.down
+    remove_column :events, :recurrence_period
+    remove_column :events, :recurrence_basis
+    remove_column :events, :recurrence_limit
+    remove_column :events, :recurrence_count
+    remove_column :events, :recurrence_interval
+    add_column :events, :recurrence_rule, :string
+  end
+end

data/db/migrate/20100219102227_venues_and_categories.rb

@@ -0,0 +1,23 @@
+class VenuesAndCategories < ActiveRecord::Migration
+  def self.up
+    create_table :event_venues do |t|
+      t.column :title, :string
+      t.column :address, :string
+      t.column :url, :string
+      t.column :description, :text
+      t.column :postcode, :string
+      t.column :created_by, :integer
+      t.column :updated_by, :integer
+      t.column :created_at, :datetime
+      t.column :updated_at, :datetime
+      t.column :lock_version, :integer
+      t.column :site_id, :integer
+    end
+    add_column :events, :event_venue_id, :integer
+    add_index :events, :event_venue_id
+  end
+
+  def self.down
+    drop_table :event_venues
+  end
+end

data/db/migrate/20100221180539_recurrence_rules.rb

@@ -0,0 +1,34 @@
+class RecurrenceRules < ActiveRecord::Migration
+  def self.up
+    create_table :event_recurrence_rules do |t|
+      t.column :event_id, :integer
+      t.column :active, :boolean, :default => false
+      t.column :period, :string
+      t.column :basis, :string
+      t.column :interval, :integer, :default => 1
+      t.column :limiting_date, :datetime
+      t.column :limiting_count, :integer 
+      t.column :created_by, :integer
+      t.column :updated_by, :integer
+      t.column :created_at, :datetime
+      t.column :updated_at, :datetime
+      t.column :lock_version, :integer
+      t.column :site_id, :integer
+    end
+    add_index :event_recurrence_rules, :event_id
+    remove_column :events, :recurrence_period
+    remove_column :events, :recurrence_basis
+    remove_column :events, :recurrence_limit
+    remove_column :events, :recurrence_count
+    remove_column :events, :recurrence_interval
+  end
+
+  def self.down
+    drop_table :event_recurrence_rules
+    add_column :events, :recurrence_period, :string
+    add_column :events, :recurrence_basis, :string
+    add_column :events, :recurrence_limit, :datetime
+    add_column :events, :recurrence_count, :integer
+    add_column :events, :recurrence_interval, :integer
+  end
+end

data/db/migrate/20100222182112_occurrences.rb

@@ -0,0 +1,13 @@
+class Occurrences < ActiveRecord::Migration
+  def self.up
+    add_column :events, :master_id, :integer
+    Event.reset_column_information
+    Event.find(:all).each do |event|
+      event.send :update_occurrences
+    end
+  end
+
+  def self.down
+    remove_column :events, :master_id
+  end
+end

data/event_calendar_extension.rb

@@ -0,0 +1,32 @@
+class EventCalendarExtension < Radiant::Extension
+  version "1.0.0"
+  description "An event calendar extension that administers events locally or draws them from any ical or CalDAV publishers (Google Calendar, .Mac, Darwin Calendar Server, etc.)"
+  url "http://radiant.spanner.org/event_calendar"
+
+  def activate
+    Page.send :include, EventCalendarTags                                   # defines a wide range of events: tags for use on normal and calendar pages
+    Status.send :include, EventStatuses                                     # adds support for draft and submitted events
+    UserActionObserver.instance.send :add_observer!, Calendar               # adds ownership and update hooks to the calendar data
+    UserActionObserver.instance.send :add_observer!, Event                  # adds ownership and update hooks to the event data
+    
+    if Radiant::Config.table_exists? && !Radiant::Config["event_calendar.icals_path"]
+      Radiant::Config["event_calendar.icals_path"] = "icals"
+    end
+
+    unless defined? admin.calendar
+      Radiant::AdminUI.send :include, EventCalendarAdminUI
+      admin.calendar = Radiant::AdminUI.load_default_calendar_regions
+      admin.event = Radiant::AdminUI.load_default_event_regions
+      admin.event_venue = Radiant::AdminUI.load_default_event_venue_regions
+    end
+    
+    if respond_to?(:tab)
+      tab("Content") do
+        add_item("Calendar", '/admin/event_calendar')
+      end
+    else
+      admin.tabs.add "Calendar", '/admin/event_calendar', :after => "Snippets", :visibility => [:all]
+    end
+
+  end
+end

data/lib/calendar_period.rb

@@ -0,0 +1,151 @@
+class CalendarPeriod
+  include ActionView::Helpers::DateHelper
+  
+  attr_writer :start, :finish
+    
+  def self.between(from=nil,to=nil)
+    raise StandardError, "CalendarPeriod.between requires either start or finish datetime" unless from || to
+    period = self.new
+    period.start = from
+    period.finish = to
+    period
+  end
+  
+  def self.from(from, duration=nil)
+    to = from + duration if duration
+    between(from, to)
+  end
+  
+  def self.to(to, duration=nil)
+    from = to - duration if duration
+    between(from, to)
+  end
+  
+  def self.default
+    between(Time.now, nil)
+  end
+  
+  def default?
+    finish.nil? && (Time.now - start).to_i.abs < 1.minute
+  end
+  
+  def start
+    @start.to_datetime if @start
+  end
+
+  def finish
+    @finish.to_datetime if @finish
+  end
+  
+  def duration
+    if bounded?
+      finish - start
+    else
+      'indefinite'
+    end
+  end
+    
+  def duration=(s)
+    if start
+      finish = start + s
+    elsif finish
+      start = finish - s
+    end
+  end
+  
+  def bounded?
+    start && finish
+  end
+  
+  def unbounded?
+    !bounded?
+  end
+  
+  # descriptions
+  
+  def to_s
+    "#{distance_of_time_in_words(start, finish)} from #{start}"
+  end
+  
+  def inspect
+    detailed = "%-1I:%M%p %d/%m/%Y"
+    %{#{describe_start(detailed)} to #{describe_finish(detailed)}}
+  end
+  
+  [:day, :week, :month, :year].each do |period|
+    define_method "is_#{period}?".intern do
+      bounded? && start == start.send("beginning_of_#{period}".intern) && finish == start.send("end_of_#{period}".intern)
+    end
+  end
+    
+  def describe_start(date_format=nil)
+    if start
+      unless date_format
+        date_format = "%d %B"
+        date_format += " %Y" unless start.year == Time.now.year
+      end
+      start.to_datetime.strftime(date_format)
+    end
+  end
+
+  def describe_finish(date_format=nil)
+    if finish
+      unless date_format
+        date_format = "%d %B"
+        date_format += " %Y" unless finish.year == Time.now.year
+      end
+      finish.to_datetime.strftime(date_format)
+    end
+  end
+  
+  def description
+    return "on #{start.mday} #{monthname} #{start.year}" if is_day?
+    return "in week #{start.cweek} of #{start.year}" if is_week?
+    return "in #{monthname} #{start.year}" if is_month?
+    return "in #{start.year}" if is_year?
+    return "from #{describe_start} onwards" unless finish
+    return "until #{describe_finish}" unless start
+    "between #{describe_start} and #{describe_finish}"
+  end
+  
+  def monthname
+    i = start ? start.month : finish.month
+    Date::MONTHNAMES[i]
+  end
+    
+  # to expand the period to full calendar months
+  # @period.pad!
+  
+  def pad!
+    start = start.beginning_of_month if start
+    finish = finish.end_of_month if finish
+  end
+
+  # to shift the period forward one month
+  # @period += 1.month
+
+  def +(s)
+    start = start + s if start
+    finish = finish + s if finish
+  end
+  
+  # to shift the period back one month
+  # @period -= 1.month
+  
+  def -(s)
+    start = start - s if start
+    finish = finish - s if finish
+  end
+  
+  # to extend the period by one month
+  # @period << 1.month
+  
+  def <<(s)
+    if bounded?
+      finish += s
+    else
+      duration = s
+    end
+  end
+  
+end