awallis-ri_cal 0.8.8

data/lib/ri_cal/property_value/recurrence_rule/time_manipulation.rb

@@ -0,0 +1,42 @@
+module RiCal
+  class PropertyValue
+    class RecurrenceRule < PropertyValue
+      #- ©2009 Rick DeNatale, All rights reserved. Refer to the file README.txt for the license
+      #
+      module TimeManipulation #:nodoc:
+
+        def advance_day(date_time)
+          date_time.advance(:days => 1)
+        end
+
+        def first_hour_of_day(date_time)
+          date_time.change(:hour => 0)
+        end
+
+        def advance_week(date_time)
+          date_time.advance(:days => 7)
+        end
+
+        def first_day_of_week(wkst_day, date_time)
+          date_time.at_start_of_week_with_wkst(wkst_day)
+        end
+
+        def advance_month(date_time)
+          date_time.advance(:months => 1)
+        end
+
+        def first_day_of_month(date_time)
+          date_time.change(:day => 1)
+        end
+
+        def advance_year(date_time)
+          date_time.advance(:years => 1)
+        end
+
+        def first_day_of_year(date_time)
+          date_time.change(:month => 1, :day => 1)
+        end
+      end
+    end
+  end
+end

data/lib/ri_cal/property_value/recurrence_rule/validations.rb

@@ -0,0 +1,125 @@
+module RiCal
+  class PropertyValue
+    class RecurrenceRule < PropertyValue
+      #- ©2009 Rick DeNatale, All rights reserved. Refer to the file README.txt for the license
+      #
+      module Validations #:nodoc:
+        # Validate that the parameters of the reciever conform to RFC 2445
+        # If errors are found they will be added to the receivers errors
+        #
+        # Whenever any of the parameters are set, e.g. with:
+        #    recurrence_rule.count = 2
+        # the errors will be reset
+        def valid?
+          validate if @errors.nil?
+          errors.empty?
+        end
+
+        # Return any errors found during validation
+        # See #valid?
+        def errors
+          @errors ||= []
+        end
+
+        def reset_errors # :nodoc:
+          @errors = nil
+        end
+
+        # Used by #valid? to validate that the parameters of the reciever conform to RFC 2445
+        # If errors are found they will be added to the receivers errors
+        #
+        # Whenever any of the parameters are set, e.g. with:
+        #    recurrence_rule.count = 2
+        # the errors will be reset
+        def validate
+          @errors = []
+          validate_termination
+          validate_freq
+          validate_interval
+          validate_int_by_list(:bysecond, (0..59))
+          validate_int_by_list(:byminute, (0..59))
+          validate_int_by_list(:byhour, (0..23))
+          validate_int_by_list(:bymonth, (1..12))
+          validate_bysetpos
+          validate_byday_list
+          validate_bymonthday_list
+          validate_byyearday_list
+          validate_byweekno_list
+          validate_wkst
+        end
+
+        def validate_termination
+          errors << "COUNT and UNTIL cannot both be specified" if @count && @until
+        end
+
+        def validate_freq
+          if @freq
+            unless %w{
+              SECONDLY MINUTELY HOURLY DAILY
+              WEEKLY MONTHLY YEARLY
+              }.include?(@freq.upcase)
+              errors <<  "Invalid frequency '#{@freq}'"
+            end
+          else
+            errors << "RecurrenceRule must have a value for FREQ"
+          end
+        end
+
+        def validate_interval
+          if @interval
+            errors << "interval must be a positive integer" unless @interval > 0
+          end
+        end
+
+        def validate_wkst
+          errors << "#{wkst.inspect} is invalid for wkst" unless %w{MO TU WE TH FR SA SU}.include?(wkst)
+        end
+
+        def validate_int_by_list(which, test)
+          vals = by_list[which] || []
+          vals.each do |val|
+            errors << "#{val} is invalid for #{which}" unless test === val
+          end
+        end
+
+        def validate_bysetpos
+          vals = by_list[:bysetpos] || []
+          vals.each do |val|
+            errors << "#{val} is invalid for bysetpos" unless (-366..-1) === val  || (1..366) === val
+          end
+          unless vals.empty?
+            errors << "bysetpos cannot be used without another by_xxx rule part" unless by_list.length > 1
+          end
+        end
+
+        def validate_byday_list
+          days = by_list[:byday] || []
+          days.each do |day|
+            errors << "#{day.source.inspect} is not a valid day" unless day.valid?
+          end
+        end
+
+        def validate_bymonthday_list
+          days = by_list[:bymonthday] || []
+          days.each do |day|
+            errors << "#{day.source.inspect} is not a valid month day" unless day.valid?
+          end
+        end
+
+        def validate_byyearday_list
+          days = by_list[:byyearday] || []
+          days.each do |day|
+            errors << "#{day.source.inspect} is not a valid year day" unless day.valid?
+          end
+        end
+
+        def validate_byweekno_list
+          days = by_list[:byweekno] || []
+          days.each do |day|
+            errors << "#{day.source.inspect} is not a valid week number" unless day.valid?
+          end
+        end
+      end
+    end
+  end
+end

data/lib/ri_cal/property_value/text.rb

@@ -0,0 +1,44 @@
+module RiCal
+  class PropertyValue
+    #- ©2009 Rick DeNatale, All rights reserved. Refer to the file README.txt for the license
+    #
+    # RiCal::PropertyValue::Text represents an icalendar Text property value
+    # which is defined in 
+    # rfc 2445 section 4.3.11 pp 45-46
+    class Text < PropertyValue
+      
+      # Return the string value of the receiver
+      def ruby_value
+        if value
+          value.gsub(/\\[;,nN\\]/) {|match|
+            case match[1,1]
+            when /[,;\\]/
+              match[1,1]
+            when 'n', 'N'
+              "\n"
+            else
+              match
+            end
+          }
+        else
+          nil
+        end
+      end
+      
+      def to_ri_cal_text_property
+        self
+      end
+      
+      def self.convert(parent, string) #:nodoc:
+        ical_str = string.gsub(/\n\r?|\r\n?|,|;|\\/) {|match|
+          if ["\n", "\r", "\n\r", "\r\n"].include?(match)
+            '\\n'
+          else
+            "\\#{match}"
+          end
+          }
+        self.new(parent, :value => ical_str)
+      end
+    end
+  end
+end

data/lib/ri_cal/property_value/uri.rb

@@ -0,0 +1,11 @@
+module RiCal
+  class PropertyValue
+    #- ©2009 Rick DeNatale, All rights reserved. Refer to the file README.txt for the license
+    #
+    # RiCal::PropertyValue::Uri represents an icalendar Uri property value
+    # which is defined in 
+    # rfc 2445 section 4.8.4.6 p 110
+    class Uri < PropertyValue
+    end
+  end
+end

data/lib/ri_cal/property_value/utc_offset.rb

@@ -0,0 +1,33 @@
+module RiCal
+  class PropertyValue
+    #- ©2009 Rick DeNatale, All rights reserved. Refer to the file README.txt for the license
+    #
+    class UtcOffset < PropertyValue # :nodoc:
+      attr_accessor :sign, :hours, :minutes, :seconds
+
+      def value=(string)
+        @value = string
+        parse_match = /([+-])(\d\d)(\d\d)(\d\d)?/.match(string)
+        if parse_match
+          @sign = parse_match[1] == "+" ? 1 : -1
+          @hours = parse_match[2].to_i
+          @minutes = parse_match[3].to_i
+          @seconds = parse_match[4].to_i || 0
+        end
+      end
+      
+      def to_seconds
+        @sign * ((((hours*60) + minutes) * 60) + seconds)
+      end
+      
+      def add_to_date_time_value(date_time_value)
+        date_time_value.advance(:hours => sign * hours, :minutes => sign * minutes, :seconds => sign * minutes)
+      end
+      
+      def subtract_from_date_time_value(date_time_value)
+        signum = -1 * sign
+        date_time_value.advance(:hours => signum * hours, :minutes => signum * minutes, :seconds => signum * minutes)
+      end
+    end
+  end
+end

data/lib/ri_cal/property_value/zulu_date_time.rb

@@ -0,0 +1,34 @@
+require 'date'
+module RiCal
+  class PropertyValue
+    #- ©2009 Rick DeNatale, All rights reserved. Refer to the file README.txt for the license
+    #
+    # RiCal::PropertyValue::CalAddress represents an icalendar CalAddress property value
+    # which is defined in RFC 2445 section 4.3.5 pp 35-37
+    class ZuluDateTime < PropertyValue::DateTime
+      
+      def tzid
+        "UTC"
+      end
+
+      def value=(val) # :nodoc:
+        if DateTime === val
+          @date_time_value = val
+        else
+          super(val)
+        end
+        @date_time_value = @date_time_value.utc if @date_time_value
+      end
+      
+      def to_ri_cal_zulu_date_time
+        self
+      end
+      
+      def self.convert(timezone_finder, ruby_object) # :nodoc:
+          result = super
+          result.to_ri_cal_zulu_date_time
+      end
+      
+    end
+  end
+end

data/lib/ri_cal/required_timezones.rb

@@ -0,0 +1,55 @@
+module RiCal
+  #- ©2009 Rick DeNatale, All rights reserved. Refer to the file README.txt for the license
+  #
+  # RequireTimezones collects the timezones used by a given calendar component or set of calendar components
+  # For each timezone we collect it's id, and the earliest and latest times which reference the zone
+  class RequiredTimezones #:nodoc:
+    
+    
+    # A required timezone represents a single timezone and the earliest and latest times which reference it.
+    class RequiredTimezone #:nodoc:
+      
+      attr_reader :first_time, :last_time, :timezone
+      
+      def initialize(tzid)
+        @timezone = RiCal::Component::TZInfoTimezone.new(TZInfo::Timezone.get(tzid))
+      end
+      
+      def tzid
+        @timezone.identifier
+      end
+      
+      def add_datetime(date_time)
+        if @first_time 
+          @first_time = date_time if date_time < @first_time
+        else
+          @first_time = date_time
+        end
+        if @last_time 
+          @last_time = date_time if date_time > @last_time
+        else
+          @last_time = date_time
+        end
+      end
+    end
+    
+    def required_timezones
+      @required_zones ||= {}
+    end
+    
+    def required_zones
+      required_timezones.values
+    end
+    
+    def export_to(export_stream)
+      required_zones.each do |z|
+        tzinfo_timezone =z.timezone
+        tzinfo_timezone.export_local_to(export_stream, z.first_time, z.last_time)
+      end
+    end
+    
+    def add_datetime(date_time, tzid)
+      (required_timezones[tzid] ||= RequiredTimezone.new(tzid)).add_datetime(date_time)
+    end
+  end
+end

data/parked_specs/ri_cal/claudio_a_bug_spec.rb

@@ -0,0 +1,100 @@
+#- ©2009 Rick DeNatale, All rights reserved. Refer to the file README.txt for the license
+
+require 'rubygems'
+require File.join(File.dirname(__FILE__), %w[.. spec_helper])
+
+describe "RiCal TimeZone problem" do
+  it "should keep the original calendar timezone intact" do
+    original_calendar = RiCal.parse_string(original_calendar_contents).first
+    puts "*"*40
+    puts original_calendar
+    puts "*"*40
+    reply_calendar = reply original_calendar
+    #reply_calendar = RiCal.parse_string(reply_calendar_contents).first
+    puts reply_calendar
+    puts "*"*40
+
+    original_event = original_calendar.events.first
+    reply_event = reply_calendar.events.first
+    reply_event.start_time.to_s.should == original_event.start_time.to_s
+  end
+end
+
+private
+
+# This is the calendar contents generated when we send the message >>#reply to the original calendar.
+def reply_calendar_contents
+  "BEGIN:VCALENDAR
+PRODID;X-RICAL-TZSOURCE=TZINFO:-//com.denhaven2/NONSGML ri_cal gem//EN
+CALSCALE:GREGORIAN
+VERSION:2.0
+METHOD:REPLY
+BEGIN:VTIMEZONE
+TZID;X-RICAL-TZSOURCE=TZINFO:America/Argentina/Buenos_Aires
+BEGIN:STANDARD
+DTSTART:20090314T230000
+RDATE:20090314T230000
+TZOFFSETFROM:-0200
+TZOFFSETTO:-0300
+TZNAME:ART
+END:STANDARD
+END:VTIMEZONE
+BEGIN:VEVENT
+CREATED;VALUE=DATE-TIME:20091217T155557Z
+DTEND;TZID=America/Argentina/Buenos_Aires;VALUE=DATE-TIME:20091227T010000
+STATUS:CONFIRMED
+LAST-MODIFIED;TZID=America/Argentina/Buenos_Aires;VALUE=DATE-TIME:2009121
+ 7T173400
+DTSTART;TZID=America/Argentina/Buenos_Aires;VALUE=DATE-TIME:20091227T0000
+ 00
+ATTENDEE;CN=PoketyPoke;PARTSTAT=ACCEPTED;ROLE=REQ-PARTICIPANT:barbarazopp
+ o@gmail.com
+UID:1693CA3B-C528-4E5A-87FB-CDFAEC0EC662
+ORGANIZER:mailto:nasif.lucas@gmail.com
+DESCRIPTION:
+SUMMARY:testing.. Event
+SEQUENCE:3
+LOCATION:
+END:VEVENT
+END:VCALENDAR".strip
+end
+
+def original_calendar_contents
+  "BEGIN:VCALENDAR\nPRODID:-//Apple Inc.//iCal 4.0.1//EN\nCALSCALE:GREGORIAN\nVERSION:2.0\nMETHOD:REQUEST\nBEGIN:VEVENT\nTRANSP:TRANSPARENT\nDTSTAMP;VALUE=DATE-TIME:20091217T155800Z\nCREATED;VALUE=DATE-TIME:20091217T155557Z\nDTEND;TZID=America/Argentina/Buenos_Aires;VALUE=DATE-TIME:20091227T010000\nDTSTART;TZID=America/Argentina/Buenos_Aires;VALUE=DATE-TIME:20091227T0000\n 00\nATTENDEE;CN=Lucas Nasif;CUTYPE=INDIVIDUAL;PARTSTAT=ACCEPTED:mailto:nasif.\n lucas@gmail.com\nATTENDEE;CN=barbarazoppo@gmail.com;CUTYPE=INDIVIDUAL;EMAIL=barbarazoppo@g\n mail.com;PARTSTAT=NEEDS-ACTION;ROLE=REQ-PARTICIPANT;RSVP=TRUE:mailto:bar\n barazoppo@gmail.com\nUID:1693CA3B-C528-4E5A-87FB-CDFAEC0EC662\nORGANIZER;CN=Lucas Nasif:mailto:nasif.lucas@gmail.com\nSUMMARY:testing.. Event\nSEQUENCE:3\nEND:VEVENT\nBEGIN:VTIMEZONE\nTZID:America/Argentina/Buenos_Aires\nBEGIN:STANDARD\nTZOFFSETTO:-0300\nDTSTART;VALUE=DATE-TIME:20080316T000000\nRRULE:FREQ=YEARLY;BYMONTH=3;BYDAY=3SU\nTZOFFSETFROM:-0200\nTZNAME:GMT-03:00\nEND:STANDARD\nBEGIN:DAYLIGHT\nTZOFFSETTO:-0200\nDTSTART;VALUE=DATE-TIME:20081019T000000\nRRULE:FREQ=YEARLY;BYMONTH=10;BYDAY=3SU\nTZOFFSETFROM:-0300\nTZNAME:GMT-02:00\nEND:DAYLIGHT\nEND:VTIMEZONE\nEND:VCALENDAR\n".strip
+end
+
+def reply(original_calendar)
+  icalendar = RiCal.Calendar do | calendar |
+
+    calendar.icalendar_method = "REPLY"
+    calendar.default_tzid = original_calendar.default_tzid
+
+    calendar.event do | event |
+
+      original_event = original_calendar.events.first
+      event.created = original_event.created
+      event.dtstart = original_event.start_time
+      event.dtend = original_event.finish_time
+      event.organizer = original_event.organizer
+      event.location = original_event.location.to_s
+      event.uid_property = original_event.uid_property
+
+      options = {'ROLE' => 'REQ-PARTICIPANT',
+                 'PARTSTAT' => 'ACCEPTED',
+                 'CN' => 'SomeName...'}
+
+      attendee_property = RiCal::PropertyValue::CalAddress.new(nil,
+                                                               :value => @attendant,
+                                                               :params => options)
+
+      event.attendee_property = attendee_property
+      event.description = original_event.description.to_s
+      event.summary = original_event.summary.to_s
+
+      event.sequence_property = original_event.sequence_property
+      event.status = "CONFIRMED"
+      event.last_modified = DateTime.parse(Time.now.to_s)
+    end
+  end
+  icalendar
+end