radiant-event_calendar-extension 1.0.0

data/app/views/admin/events/_form.html.haml

@@ -0,0 +1,116 @@
+- include_stylesheet "admin/event_calendar"
+- include_javascript "admin/event_calendar"
+
+- if defined? TinyMceFilter
+  - include_javascript "tiny_mce/tiny_mce"
+  - include_javascript "tiny_mce/tiny_mce_settings"
+  - include_javascript "tiny_mce/application"
+
+- @venues = EventVenue.find(:all)
+- @event.event_venue ||= EventVenue.new
+- @event.recurrence_rules.build unless @event.recurrence_rules.any?
+
+- form_for [:admin, @event] do |f|
+  = f.hidden_field :lock_version
+  = render_region :form_top
+
+  #event_form.form-area.container_12
+    - render_region :form do |form|
+
+      - form.edit_event do
+        .title
+          %p.event_title
+            = f.label :title, "Title"
+            = f.text_field :title, :class => 'textbox'
+          %p.keywords
+            = f.label :keywords, "Tags"
+            = f.text_field :keywords, :class => 'textbox'
+
+        .url
+          %p.url
+            = f.label :url, "Link to"
+            = f.text_field :url, :class => 'textbox'
+
+        .description
+          %p.description
+            - if defined? TinyMceFilter
+              = link_to image('mce', :alt=> 'toolbar icon'), '#', :class => 'toggleMCE', :rel => 'toggle[event_description]'
+            = f.label :description, "Description"
+            = f.text_area :description, :class => 'textarea', :style => "width: 100%; height: 8em;"
+          %p.calendar
+            = f.label :calendar_id, "Calendar"
+            = f.select :calendar_id, Calendar.all.map {|c| [c.name, c.id]}, {:include_blank => true}, :class => 'textbox'
+            %span.note
+              This is optional but can be used to file your events or to mix local events into a subscribed calendar.
+              
+      - form.edit_date do
+        .date
+          %p.start_date
+            = f.label :start_date, "Start date and time"
+            = f.text_field :start_date, :class => 'textbox date time'
+            = f.check_box :all_day
+            = f.label :all_day, 'All-day event?', :class => 'minor'
+            %span.note
+              (times will be ignored)
+          %p.end_date
+            = f.label :end_date, "end date and time"
+            = f.text_field :end_date, :class => 'textbox date time'
+          %p#event_note.note
+            If you specify an end date and later change the start date, the end will shift to preserve the event's duration.
+
+        .recurrence
+          - f.fields_for :recurrence_rules do |rf|
+            
+            %p.recurrence
+              = rf.check_box 'active', :class => 'toggle', :rel => "toggle[recurrence_detail]", :style => 'margin-left: 15px;'
+              = rf.label :active, 'Repeats', :class => 'minor'
+              %span.note
+                (this is for separate similar events. For events that span several days you only need to set the start and end.)
+              
+              %span#recurrence_detail
+                %span#recurrence_interval
+                  = rf.label :interval, "Every"
+                  = rf.text_field :interval, :class => 'textbox short'
+                %span#recurrence_period
+                  = rf.label :period, " "
+                  = rf.select :period, [['day', 'daily'], ['week', 'weekly'], ['month', 'monthly'], ['year', 'yearly']], {}, :class => 'textbox'
+                %span#recurrence_basis
+                  = rf.label :basis, " "
+                  = rf.select :basis, [['forever', 'unbounded'],['until', 'limit'], ['for', 'count']], {}, :class => 'textbox basis'
+                %span#recurrence_unbounded
+                %span#recurrence_limit
+                  = rf.label :limiting_date, " "
+                  = rf.text_field :limiting_date, :class => 'textbox date'
+                %span#recurrence_count
+                  = rf.label :limiting_count, "this many times:", :class => 'inline'
+                  = rf.text_field :limiting_count, :class => 'textbox short'
+
+      - form.edit_venue do
+        - prefer_new = @venues.empty? || @event.event_venue.new_record?
+        - toggle_precedence = prefer_new ? "new_venue,venue" : "venue,new_venue"
+        
+        - if @venues.any?
+          #venue
+            %p#existing_venue
+              = f.label :event_venue_id, "Choose a place"
+              = f.select :event_venue_id, @venues.map {|v| [v.title, v.id]}, {:include_blank => true}, :class => 'textbox'
+              = link_to "add a new place", new_admin_event_venue_url, :class => 'swapper', :rel => "toggle[#{toggle_precedence}]"
+            %p.note
+              You can 
+              = link_to "edit the venue list", admin_event_venues_url
+              to update addresses and directions for all relevant events.
+
+        #new_venue
+          - event_venue = @event.event_venue.new_record? ? @event.event_venue : EventVenue.new
+          - f.fields_for :event_venue, event_venue do |ef|
+            = render :partial => 'admin/event_venues/form', :locals => {:event_venue => event_venue, :f => ef, :or_choose => @venues.any?, :compact => true}
+
+  - render_region :form_bottom do |form_bottom|
+    - form_bottom.edit_timestamp do
+      = updated_stamp @event
+    - form_bottom.edit_buttons do
+      %p.buttons
+        = save_model_button(@event)
+        = save_model_and_continue_editing_button(@event)
+        or
+        = link_to 'Cancel', admin_events_url

data/app/views/admin/events/_list_head.html.haml

@@ -0,0 +1,18 @@
+%thead
+  %tr
+    - render_region :thead do |thead|
+      - thead.date_header do
+        %th.date
+      - thead.title_header do
+        %th.event 
+          %strong Event
+      - thead.calendar_header do
+        %th.calendar Calendar
+      - thead.time_header do
+        %th.date Time
+      - thead.location_header do
+        %th.location Location
+      - thead.keywords_header do
+        %th.keywords Keywords
+      - thead.modify_header do
+        %th.modify Modify

data/app/views/admin/events/edit.html.haml

@@ -0,0 +1,6 @@
+- render_region :main do |main|
+  - main.edit_header do
+    %h1 
+      Edit Event
+  - main.edit_form do
+    = render :partial => 'form'

data/app/views/admin/events/index.html.haml

@@ -0,0 +1,23 @@
+- include_stylesheet "admin/event_calendar"
+
+#events_table.outset      
+  %table#events.index{:cellspacing=>"0", :border=>"0", :cellpadding=>"0"}
+    = render :partial => 'list_head'
+  
+    %tbody
+      - if @events.any?
+        - @events.each do |event|
+          = render :partial => 'event', :object => event
+      - else
+        %tr
+          %td.note{:colspan => admin.event.index.tbody.length} 
+            No events coming up
+
+  - render_region :bottom do |bottom|
+    - bottom.buttons do
+      #actions
+        = pagination_for @events
+        %ul
+          %li= link_to image('plus') + " " + "new event", new_admin_event_url
+          %li= link_to "calendar list", admin_calendars_url
+          %li= link_to "venue list", admin_event_venues_url

data/app/views/admin/events/new.html.haml

@@ -0,0 +1,6 @@
+- render_region :main do |main|
+  - main.edit_header do
+    %h1 
+      Add an event to the calendar
+  - main.edit_form do
+    = render :partial => 'form'

data/app/views/admin/events/remove.html.haml

@@ -0,0 +1,17 @@
+%h1 Remove event
+
+%p 
+  Are you sure you want to 
+  %strong.warning 
+    remove permanently
+  the following event?
+
+%table.index#events
+  %tbody
+    = render :partial => 'event', :object => @event
+
+- form_for [:admin, @event], :html => {:method => :delete} do
+  %p.buttons
+    %input.button{:type=>"submit", :value=>"Delete event"}/
+    or
+    = link_to 'Cancel', admin_events_url

data/app/views/admin/icals/refresh.html.haml

@@ -0,0 +1,11 @@
+%h1
+  Refresh Subscriptions
+  - @calendars.each do |calendar|
+    %div{:style => "border-bottom: dotted 1px rgb(100,100,100); padding: 10px;"}
+	 	  %strong
+	 	    = calendar.category.to_s.capitalize
+	 	    > 
+	 	    = calendar.name.to_s.capitalize
+		  %br
+		  = calendar.events.count
+		  events parsed and brought into database.

data/app/views/events/_defacet.html.haml

@@ -0,0 +1,2 @@
+- if period
+  = link_to period.description, url_without_period, :class => 'defilter'

data/app/views/events/_event.html.haml

@@ -0,0 +1,29 @@
+- no_date ||= false
+
+- if event
+  - event_master_id = event.master_id || event.id
+  - repeating = true if @seen_events[event_master_id]
+  - @seen_events[event_master_id] = true;
+  - cssclass = event.calendar ? "event #{event.calendar.slug}" : "event"
+
+  %div{:class => cssclass}
+    - unless no_date
+      .datemark
+        .mon= event.short_month
+        .dom= event.mday
+    .summary
+      %h2
+        - if event.url
+          = link_to event.title, event.url, :class => 'title'
+        - else
+          = event.title
+      %p.practicalities
+        = event.summarize_start
+        - if event.event_venue
+          %br
+          = link_to event.event_venue.title, event.event_venue.url
+          = event.event_venue.address
+
+      - unless repeating
+        = event.description_paragraph
+    

data/app/views/events/_faceting.html.haml

@@ -0,0 +1,27 @@
+#faceting
+  - if events.any? || continuing_events.any?
+
+    %p.list_summary
+      Showing
+      - if events.any?
+        - paginated = true if events.respond_to? :total_entries
+        - more_pages = true if paginated && events.total_pages >= 2
+        - if paginated
+          - if more_pages
+            = events.offset + 1
+            to
+            = events.offset + events.length
+            of
+          = events.total_entries
+          = pluralize(events.total_entries, "event") 
+        - else
+          = events.count
+          = pluralize(events.count, "event") 
+        
+      - elsif continuing_events.any?
+        = continuing_events.count
+        continuing
+        = pluralize(continuing_events.count, "event") 
+        
+      = render :partial => 'events/defacet'
+      = render :partial => 'events/views'

data/app/views/events/_minicalendar.html.haml

@@ -0,0 +1,49 @@
+- date ||= Date.today
+- month = date.month
+- month_events = Event.coincident_with(date.beginning_of_month, date.end_of_month)
+
+- first_shown = date.beginning_of_month.beginning_of_week
+- last_shown = date.end_of_month.end_of_week
+- before = date.beginning_of_month - 1.day
+- after = date.end_of_month + 1.day
+
+%table.minimonth
+  %thead
+    %tr
+      %td.m
+        = link_to '<', url_for_month(before), :title => "#{month_name(before.month)} #{before.year}", :class => 'previous'
+      %td{:colspan => 5}
+        %h3
+          = link_to_unless_current month_name(month), url_for_month(date)
+      %td.m
+        = link_to '>', url_for_month(after), :title => "#{month_name(after.month)} #{after.year}", :class => 'next'
+    %tr
+      - day_names.each do |d|
+        %th.day_name{:scope => 'col'}
+          = d.first
+  %tbody
+    - weeks = {}
+    - first_shown.upto(last_shown) do |day|
+      - new_events_today = month_events.select{ |e| e.start_date <= day + 1.day && e.start_date > day }
+      - continuing_events = month_events.select{ |e| e.start_date <= day && e.end_date && e.end_date >= day }
+      
+      - cell_class = "d"
+      - cell_class += " o" if day.month != date.month
+      - cell_class += " t" if day == ::Date.current
+      - if new_events_today.any?
+        - cell_class += " e"
+        - date_label = %{<a href="#{url_for_date(day)}">#{day.mday}</a>}
+      - elsif continuing_events.any?
+        - cell_class += " c"
+        - date_label = %{<a href="#{url_for_date(day)}">#{day.mday}</a>}
+      - else
+        - cell_class += " u"
+        - date_label = day.mday
+      - weeks[day.cweek] ||= []
+      - weeks[day.cweek].push({:class => cell_class, :label => date_label})
+
+    - weeks.sort.each do |week, weekdays|
+      %tr
+        - weekdays.each do |d|
+          %td{:class => d[:class]}
+            = d[:label]

data/app/views/events/_views.html.haml

@@ -0,0 +1,6 @@
+%span.calendar_views
+  %br
+  Stay up to date with
+  = link_to("RSS", calendar_url(calendar_parameters.merge(:format => :rss)))
+  or
+  = link_to("calendar feed", calendar_url(calendar_parameters.merge(:format => :ics, :protocol => 'webcal://', :only_path => false)))

data/app/views/events/index.html.haml

@@ -0,0 +1,56 @@
+- content_for :title do
+  Events
+  = list_description
+
+- content_for :events do
+  = render :partial => 'event', :collection => events
+
+  - if events.length < 5 && continuing_events.any?
+    - if events.any?
+      %h2.listheader
+        Continuing events
+    = render :partial => 'event', :collection => continuing_events
+
+  - if events.empty? && continuing_events.empty?
+    - if period
+      %h2
+        Sorry: there are no events
+        = render :partial => 'events/defacet'
+    - else
+      %h2
+        Sorry: there are no events coming up
+        
+- content_for :continuing_events do
+  - if continuing_events.any? && events.length >= 5
+    #continuing
+      %h3
+        Continuing events
+      %ul
+        - continuing_events.each do |event|
+          %li
+            - if event.url
+              = link_to event.title, event.url, :class => 'title'
+            - else
+              = event.title
+            %span.detail
+              runs until 
+              = event.last_day
+              - if event.event_venue
+                at
+                = link_to event.event_venue.title, event.event_venue.url
+              - elsif event.location
+                at
+                = event.location
+
+- content_for :calendar do
+  #calendar
+    = render :partial => "events/minicalendar", :locals => {:date => period ? period.start : Date.today}
+
+- content_for :pagination do
+  - if events.next_page || events.previous_page
+    = will_paginate(events, :param_name => :p)
+
+- content_for :faceting do
+  = render :partial => 'faceting'
+
+= render :partial => 'events/other_page_parts'

data/app/views/events/index.ics.erb

@@ -0,0 +1,7 @@
+<%-
+ical = RiCal.Calendar do |cal|
+  events.each do |event|
+    cal.add_subcomponent(event.to_ri_cal) if event.master?
+  end
+end
+%><%= ical.to_s %>

data/app/views/events/index.rss.builder

@@ -0,0 +1,20 @@
+xml = Builder::XmlMarkup.new
+xml.instruct! :xml, :version => "1.0"
+xml.rss :version => "2.0" do
+  xml.channel do
+    xml.title Radiant::Config['event_calendar.feed_title'] || "#{Radiant::Config['admin.title']} Events"
+    xml.description list_description
+    xml.link calendar_url(calendar_parameters.merge(:format => :html))
+
+    events.each do |event|
+      xml.item do
+        xml.title event.title
+        xml.link event.url
+        xml.description event.description_paragraph
+        xml.pubDate event.created_at.to_s(:rfc822)
+        xml.guid event.uuid, :isPermaLink => false
+      end
+
+    end
+  end
+end

data/config/routes.rb

@@ -0,0 +1,13 @@
+ActionController::Routing::Routes.draw do |map|
+  map.namespace :admin, :path_prefix => '/admin/event_calendar' do |cal|
+    cal.resources :calendars
+    cal.resources :icals, :collection => {:refresh_all => :any}, :member => {:refresh => :put}
+    cal.resources :events, :member => {:remove => :get}
+    cal.resources :event_venues, :member => {:remove => :get}
+    cal.calendars_home '/', :controller => 'events', :action => 'index'
+  end
+  map.calendar "/calendar.:format", :controller => 'events', :action => 'index'
+  map.calendar_year "/calendar/:year", :controller => 'events', :action => 'index'
+  map.calendar_month "/calendar/:year/:month", :controller => 'events', :action => 'index'
+  map.calendar_day "/calendar/:year/:month/:mday", :controller => 'events', :action => 'index'
+end

data/db/migrate/001_create_calendar_and_events.rb

@@ -0,0 +1,21 @@
+class CreateCalendarAndEvents < ActiveRecord::Migration
+  def self.up
+    create_table :calendars do |t|
+      t.column :name, :string
+      t.column :description, :text
+    end
+    create_table :events do |t|
+      t.column :start_date, :datetime
+      t.column :end_date, :datetime
+      t.column :title, :string
+      t.column :description, :text
+      t.column :location, :string
+      t.column :calendar_id, :integer
+    end
+  end
+
+  def self.down
+    drop_table :calendars
+    drop_table :events
+  end
+end