curzonj-icalendar 1.0.2

data/test/conversions_test.rb

@@ -0,0 +1,97 @@
+$:.unshift(File.dirname(__FILE__) + '/../lib')
+
+require 'test/unit'
+require 'icalendar'
+
+require 'date'
+
+class TestConversions < Test::Unit::TestCase
+  include Icalendar
+
+  RESULT = <<EOS
+BEGIN:VCALENDAR
+VERSION:2.0
+CALSCALE:GREGORIAN
+PRODID:iCalendar-Ruby
+BEGIN:VEVENT
+LAST-MODIFIED:19960817T133000
+SEQUENCE:2
+ORGANIZER:mailto:joe@example.com?subject=Ruby
+UID:foobar
+X-TIME-OF-DAY:101736
+CATEGORIES:foo\\,bar\\,baz
+GEO:46.01\\;8.57
+DESCRIPTION:desc
+DTSTART:20060720
+DTSTAMP:20060720T174052
+END:VEVENT
+END:VCALENDAR
+EOS
+
+  def setup
+    @cal = Calendar.new
+  end
+
+  def test_to_ical_conversions
+    @cal.event do 
+      # String
+      description "desc"
+
+      # Fixnum
+      sequence 2
+
+      # Float by way of Geo class
+      geo(Geo.new(46.01, 8.57))
+      
+      # Array
+      categories ["foo", "bar"]
+      add_category "baz"
+
+      # Last Modified 
+      last_modified DateTime.parse("1996-08-17T13:30:00")
+
+      # URI
+      organizer(URI::MailTo.build(['joe@example.com', 'subject=Ruby']))
+      
+      # Date
+      start  Date.parse("2006-07-20")
+
+      # DateTime
+      timestamp DateTime.parse("2006-07-20T17:40:52+0200")
+
+      # Time
+      x_time_of_day Time.at(123456).utc
+
+      uid "foobar"
+    end
+       
+    assert_equal(RESULT.gsub("\n", "\r\n"), @cal.to_ical)
+  end
+
+  def test_to_ical_folding
+    @cal.x_wr_calname = 'Test Long Description'
+    
+    @cal.event do
+      url      'http://test.com/events/644'
+      dtend     DateTime.parse('20061215T180000')
+      dtstart   DateTime.parse('20061215T160000')
+      timestamp DateTime.parse('20061215T114034')
+      seq       1001
+      uid      'foobar'
+      summary  'DigiWorld 2006'
+
+      description "FULL DETAILS:\nhttp://test.com/events/570\n\n" + 
+        "Cary Brothers walks the same musical ground as Pete Yorn, Nick Drake, " + 
+        "Jeff Buckley and others; crafting emotional melodies, with strong vocals " + 
+        "and thoughtful lyrics. Brett Dennen has &quot;that thing.&quot; " + 
+        "Inspired fans describe it: &quot;lush shimmering vocals, an intricately " + 
+        "groovin&#39; guitar style, a lyrical beauty rare in a young songwriter," + 
+        "&quot; and &quot;this soulful blend of everything that feels good.&quot; " + 
+        "Rising up around him is music; transcending genres, genders and generations."
+    end
+    
+    folded = File.read(File.join(File.dirname(__FILE__), 'fixtures/folding.ics')).gsub("\n", "\r\n")
+    assert_equal(folded, @cal.to_ical)
+  end
+  
+end

data/test/fixtures/folding.ics

@@ -0,0 +1,23 @@
+BEGIN:VCALENDAR
+VERSION:2.0
+CALSCALE:GREGORIAN
+PRODID:iCalendar-Ruby
+X-WR-CALNAME:Test Long Description
+BEGIN:VEVENT
+SEQUENCE:1001
+DTEND:20061215T180000
+URL:http://test.com/events/644
+UID:foobar
+DESCRIPTION:FULL DETAILS:\nhttp://test.com/events/570\n\nCary Brothers walk
+ s the same musical ground as Pete Yorn\, Nick Drake\, Jeff Buckley and othe
+ rs\; crafting emotional melodies\, with strong vocals and thoughtful lyrics
+ . Brett Dennen has &quot\;that thing.&quot\; Inspired fans describe it: &qu
+ ot\;lush shimmering vocals\, an intricately groovin&#39\; guitar style\, a 
+ lyrical beauty rare in a young songwriter\,&quot\; and &quot\;this soulful 
+ blend of everything that feels good.&quot\; Rising up around him is music\;
+  transcending genres\, genders and generations.
+SUMMARY:DigiWorld 2006
+DTSTART:20061215T160000
+DTSTAMP:20061215T114034
+END:VEVENT
+END:VCALENDAR

data/test/fixtures/life.ics

@@ -0,0 +1,46 @@
+BEGIN:VCALENDAR
+VERSION:2.0
+X-WR-CALNAME:Life
+PRODID:-//Apple Computer\, Inc//iCal 2.0//EN
+X-WR-RELCALID:69FB0467-7E07-4DE7-901D-B70242B3DB25
+X-WR-TIMEZONE:America/Chicago
+CALSCALE:GREGORIAN
+METHOD:PUBLISH
+BEGIN:VTIMEZONE
+TZID:America/Chicago
+LAST-MODIFIED:20050825T194346Z
+BEGIN:DAYLIGHT
+DTSTART:20050403T080000
+TZOFFSETTO:-0500
+TZOFFSETFROM:+0000
+TZNAME:CDT
+END:DAYLIGHT
+BEGIN:STANDARD
+DTSTART:20051030T020000
+TZOFFSETTO:-0600
+TZOFFSETFROM:-0500
+TZNAME:CST
+END:STANDARD
+END:VTIMEZONE
+BEGIN:VEVENT
+UID:bsuidfortestabc123
+ORGANIZER:mailto:joebob@random.net
+ATTACH:http://bush.sucks.org/impeach/him.rhtml
+ATTACH:http://corporations-dominate.existence.net/why.rhtml
+LAST-MODIFIED:20050825T194346Z
+SUMMARY:This is a really long summary
+  to test the method of unfolding lines
+  so I'm just going to ma
+ ke it
+  a whol
+ e
+  bunch of lines.
+CLASS:PRIVATE
+PRIORITY:2
+GEO:37.386013;-122.0829322
+DTSTART;TZID=US-Mountain:20050120T170000
+DTEND:20050120T184500
+DTSTAMP:20050118T211523Z
+END:VEVENT
+END:VCALENDAR
+

data/test/fixtures/simplecal.ics

@@ -0,0 +1,119 @@
+BEGIN:VCALENDAR
+VERSION
+ :2.0
+PRODID
+ :-//Mozilla.org/NONSGML Mozilla Calendar V1.0//EN
+BEGIN:VEVENT
+UID
+ :a08863de-1dd1-11b2-9445-d6248402dd19
+SUMMARY
+ :Hybrid Embedded Systems.  This is a really long summary
+  to test the method of unfolding lines
+  so I'm just going to ma
+ ke it
+  a whole
+  bunch of lines.
+CATEGORIES
+ :Personal
+STATUS
+ :CONFIRMED
+CLASS
+ :PRIVATE
+RRULE
+ :FREQ=WEEKLY;INTERVAL=1;BYDAY=TH
+DTSTART
+ :20050120T170000
+DTEND
+ :20050120T184500
+DTSTAMP
+ :20050118T211523Z
+END:VEVENT
+BEGIN:VEVENT
+UID
+ :6226e2f6-1dd2-11b2-9ad7-9b8d2d642229
+SUMMARY
+ :Databases
+LOCATION
+ :ECCS 1b12
+CATEGORIES
+ :Personal
+STATUS
+ :CONFIRMED
+CLASS
+ :PRIVATE
+X-MOZILLA-ALARM-DEFAULT-LENGTH
+ :30
+X-MOZILLA-LASTALARMACK
+ :20050118T141054
+RRULE
+ :FREQ=WEEKLY;INTERVAL=1;BYDAY=MO,WE
+DTSTART
+ :20050117T173000
+DTEND
+ :20050117T184500
+DTSTAMP
+ :20050118T210648Z
+LAST-MODIFIED
+ :20050118T211954Z
+BEGIN:VALARM
+TRIGGER
+ ;VALUE=DURATION
+ :-PT30M
+END:VALARM
+END:VEVENT
+BEGIN:VEVENT
+UID
+ :d8f4468a-1dd1-11b2-9e0a-bbe95143dbed
+SUMMARY
+ :Software Radios
+LOCATION
+ :ECCR 1b06
+CATEGORIES
+ :Personal
+STATUS
+ :CONFIRMED
+CLASS
+ :PRIVATE
+X-MOZILLA-ALARM-DEFAULT-LENGTH
+ :30
+X-MOZILLA-LASTALARMACK
+ :20050118T141351
+RRULE
+ :FREQ=WEEKLY;INTERVAL=1;BYDAY=MO,WE
+DTSTART
+ :20050117T100000
+DTEND
+ :20050117T111500
+DTSTAMP
+ :20050118T211304Z
+LAST-MODIFIED
+ :20050118T212016Z
+BEGIN:VALARM
+TRIGGER
+ ;VALUE=DURATION
+ :-PT30M
+END:VALARM
+END:VEVENT
+BEGIN:VEVENT
+UID
+ :9acd4cc8-1dd1-11b2-a65e-b276ad1df3b9
+SUMMARY
+ :Israel & Palestine peace accord talk...
+LOCATION
+ :Chem. 140
+CATEGORIES
+ :Personal
+STATUS
+ :CONFIRMED
+CLASS
+ :PRIVATE
+DTSTART
+ :20050118T193000
+DTEND
+ :20050118T203000
+DTSTAMP
+ :20050118T212943Z
+LAST-MODIFIED
+ :20050118T213355Z
+END:VEVENT
+END:VCALENDAR

data/test/fixtures/single_event.ics

@@ -0,0 +1,23 @@
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:bsprodidfortestabc123
+BEGIN:VEVENT
+UID:bsuidfortestabc123
+ORGANIZER:mailto:joebob@random.net
+ATTACH:http://bush.sucks.org/impeach/him.rhtml
+ATTACH:http://corporations-dominate.existence.net/why.rhtml
+SUMMARY:This is a really long summary
+  to test the method of unfolding lines\,
+  so I'm just going to ma
+ ke it
+  a whol
+ e
+  bunch of lines.
+CLASS:PRIVATE
+PRIORITY:2
+GEO:37.386013;-122.0829322
+DTSTART;TZID=US-Mountain:20050120T170000
+DTEND:20050120T184500
+DTSTAMP:20050118T211523Z
+END:VEVENT
+END:VCALENDAR

data/test/interactive.rb

@@ -0,0 +1,17 @@
+#!/usr/bin/env ruby
+
+# NOTE: you must have installed ruby-breakpoint in order to use this script.
+# Grab it using gem with "gem install ruby-breakpoint --remote" or download
+# from the website (http://ruby-breakpoint.rubyforge.org/) then run setup.rb
+
+$:.unshift(File.dirname(__FILE__) + '/../lib')
+
+require 'rubygems'
+require 'breakpoint'
+
+require 'icalendar'
+
+cal = Icalendar::Parser.new(File.new("life.ics")).parse
+#cal = Icalendar::Calendar.new
+
+breakpoint

data/test/parameter_test.rb

@@ -0,0 +1,29 @@
+# Test out property parameter functionality
+$:.unshift File.join(File.dirname(__FILE__), "..", "lib")
+
+require 'date'
+require 'test/unit'
+require 'icalendar'
+
+class TestComponent < Test::Unit::TestCase
+
+   # Create a calendar with an event for each test.
+   def setup
+      @cal = Icalendar::Calendar.new
+      @event = Icalendar::Event.new
+   end
+
+   def test_property_parameters
+     params = {"ALTREP" =>['"http://my.language.net"'], "LANGUAGE" => ["SPANISH"]}
+      @event.summary("This is a test summary.", params)
+
+      assert_equal params, @event.summary.ical_params
+
+      @cal.add_event @event
+      cal_str = @cal.to_ical
+
+      cals = Icalendar::Parser.new(cal_str).parse
+      event = cals.first.events.first
+      assert_equal params, event.summary.ical_params
+   end
+end

data/test/parser_test.rb

@@ -0,0 +1,84 @@
+$LOAD_PATH.unshift(File.dirname(__FILE__) + '/../lib')
+
+require 'test/unit'
+require 'icalendar'
+
+# This is a test class for the calendar parser.  
+class TestIcalendarParser < Test::Unit::TestCase
+
+  TEST_CAL = File.join(File.dirname(__FILE__), 'fixtures', 'single_event.ics')
+
+  # First make sure that we can run the parser and get back objects.
+  def test_new
+    # Make sure we don't take invalid object types.
+    assert_raise(ArgumentError) { Icalendar::Parser.new(nil) }
+
+    # Make sure we get an object back from parsing a file
+    calFile = File.open(TEST_CAL)
+    cals = Icalendar::Parser.new(calFile).parse
+    assert(cals)
+    calFile.close
+
+    # Make sure we get an object back from parsing a string
+    calString = File.open(TEST_CAL).read
+    cals = Icalendar::Parser.new(calString).parse
+    assert(cals)
+  end
+
+  # Now go through and make sure the object is correct using the
+  # dynamically generated raw interfaces.
+  def test_zzfile_parse
+    calFile = File.open(TEST_CAL)
+    cals = Icalendar.parse(calFile)
+    calFile.close
+    do_asserts(cals)
+
+    Icalendar::Base.quiet
+  end
+  
+  def test_string_parse
+    # Make sure we get an object back from parsing a string
+    calString = File.open(TEST_CAL).read
+    cals = Icalendar::Parser.new(calString).parse
+    do_asserts(cals)
+  end
+
+  # Just a helper method so we don't have to repeat the same tests.
+  def do_asserts(cals)
+    # Should just get one calendar back.
+    assert_equal(1, cals.size)
+    
+    cal = cals.first
+    
+    # Calendar properties
+    assert_equal("2.0", cal.version)
+    assert_equal("bsprodidfortestabc123", cal.prodid)
+    
+    # Now the event
+    assert_equal(1, cal.events.size)
+    
+    event = cal.events.first
+    assert_equal("bsuidfortestabc123", event.uid)
+    
+    summary = "This is a really long summary to test the method of unfolding lines, so I'm just going to make it a whole bunch of lines."
+
+    assert_equal(summary, event.summary)
+
+    start = DateTime.parse("20050120T170000")
+    daend = DateTime.parse("20050120T184500")
+    stamp = DateTime.parse("20050118T211523Z")
+    assert_equal(start, event.dtstart)
+    assert_equal(daend, event.dtend)
+    assert_equal(stamp, event.dtstamp)
+
+    organizer = URI.parse("mailto:joebob@random.net")
+    assert_equal(organizer, event.organizer)
+
+    ats = event.attachments
+    assert_equal(2, ats.size)
+    attachment = URI.parse("http://bush.sucks.org/impeach/him.rhtml")
+    assert_equal(attachment, ats[0])
+    attachment = URI.parse("http://corporations-dominate.existence.net/why.rhtml")
+    assert_equal(attachment, ats[1])
+  end
+end