rwdschedule 0.99 → 1.00

data/extras/icalendar/component.rb

@@ -0,0 +1,91 @@
+module Icalendar
+  # The body of the iCalendar object consists of a sequence of calendar
+  # properties and one or more calendar components. The calendar
+  # properties are attributes that apply to the calendar as a whole. The
+  # calendar components are collections of properties that express a
+  # particular calendar semantic. For example, the calendar component can
+  # specify an event, a to-do, a journal entry, time zone information, or
+  # free/busy time information, or an alarm.
+  class Component < Icalendar::Base
+    
+    attr_reader :name
+    attr_accessor :properties, :property_params
+
+    def initialize(name)
+      @name = name
+      @properties = {}
+      @property_params = {}
+
+      @@logger.info("New #{@name[1,@name.size].capitalize}...")
+    end
+    
+    def print_string
+      s = ""
+      
+      # Begin a new component
+      s << "BEGIN:#{@name.upcase}\r\n"
+
+      # Then print the properties, possible parameters and potentially
+      # multiple parameter values for each parameter.
+      @properties.each do |key,value| 
+        # Property name
+        s << "#{key.upcase}"
+        
+        # Possible parameters
+        if @property_params.has_key?(key) 
+          params = @property_params[key]
+          params.each do |key,val|
+            s << ";#{key}"
+            unless val.respond_to?(:to_ary)
+              val = [ val ]
+            end
+            
+            # Possible parameter values
+            unless val.empty?
+              s << "="
+              sep = "" # First entry comes after = sign, but then we need commas
+              val.each do |pval| 
+                s << sep << pval
+                sep = ","
+              end
+            end
+          end
+        end
+
+        # Property value
+        s << ":#{value}\r\n" 
+      end
+
+      # Any custom body of the derived component
+      yield(s)
+      
+      # End of this component
+      s << "END:#{@name.upcase}\r\n"
+    end
+    
+    # Dynamically execute getters and setters for properties and
+    # property parameters.  This lets us handle all the general text properties
+    # as well as custom app related properties in a natural way, but we don't
+    # have to write a million getters and setters for every possible thing we
+    # want to support.
+    def method_missing(method_id, *args)
+      method_name = method_id.id2name.upcase
+
+      if method_name =~ /\w+_PARAMS/ # Its a parameter request
+        hash = @property_params
+        val = args
+      else # Or its a property request
+        hash = @properties
+        val = args.first unless args.empty?
+      end
+
+      if method_name =~ /(.*)(=)/ # Its a setter
+        hash[$1] = val
+        @@logger.debug("Setting #{$1} => #{val}") 
+      else # Or its a getter
+        @@logger.debug("Getting #{method_name} => #{hash[method_name]}")
+        return hash[method_name]
+      end
+    end
+  end
+end

data/extras/icalendar/component/alarm.rb

@@ -0,0 +1,16 @@
+module Icalendar 
+  # An Alarm calendar component is a grouping of component
+  # properties that is a reminder or alarm for an event or a
+  # to-do. For example, it may be used to define a reminder for a
+  # pending Event or an overdue Todo.  
+  class Alarm < Component
+    def initialize()
+      super("VALARM")
+      
+    end
+
+    def to_s
+      print_string {}
+    end
+  end
+end

data/extras/icalendar/component/event.rb

@@ -0,0 +1,25 @@
+module Icalendar
+  # A Event calendar component is a grouping of component
+  # properties, and possibly including Alarm calendar components, that
+  # represents a scheduled amount of time on a calendar. For example, it
+  # can be an activity; such as a one-hour long, department meeting from
+  # 8:00 AM to 9:00 AM, tomorrow. Generally, an event will take up time
+  # on an individual calendar.
+  class Event < Component
+    include Dtstart
+
+    attr_accessor :alarms
+
+    def initialize()
+      super("VEVENT")
+      
+      @alarms = []
+    end
+
+    def to_s
+      print_string do |s| 
+        @alarms.each { |alarm| s << alarm.to_s } 
+      end
+    end
+  end
+end

data/extras/icalendar/component/freebusy.rb

@@ -0,0 +1,12 @@
+module Icalendar
+    # A Freebusy calendar component is a grouping of
+    # component properties that represents either a request for, a reply to
+    # a request for free or busy time information or a published set of
+    # busy time information.
+    class Freebusy < Component
+
+      def initialize()
+        super("VFREEBUSY")
+      end
+    end
+  end

data/extras/icalendar/component/journal.rb

@@ -0,0 +1,25 @@
+module Icalendar
+  # A Journal calendar component is a grouping of
+  # component properties that represent one or more descriptive text
+  # notes associated with a particular calendar date. The "DTSTART"
+  # property is used to specify the calendar date that the journal entry
+  # is associated with. Generally, it will have a DATE value data type,
+  # but it can also be used to specify a DATE-TIME value data type.
+  # Examples of a journal entry include a daily record of a legislative
+  # body or a journal entry of individual telephone contacts for the day
+  # or an ordered list of accomplishments for the day. The Journal
+  # calendar component can also be used to associate a document with a
+  # calendar date.
+  class Journal < Component
+
+    def initialize()
+      super("VJOURNAL")
+    end
+
+    def to_s
+      print_string { }
+    end
+
+  end
+end
+

data/extras/icalendar/component/timezone.rb

@@ -0,0 +1,26 @@
+module Icalendar
+  # A Timezone is unambiguously defined by the set of time
+  # measurement rules determined by the governing body for a given
+  # geographic area. These rules describe at a minimum the base offset
+  # from UTC for the time zone, often referred to as the Standard Time
+  # offset. Many locations adjust their Standard Time forward or backward
+  # by one hour, in order to accommodate seasonal changes in number of
+  # daylight hours, often referred to as Daylight  Saving Time. Some
+  # locations adjust their time by a fraction of an hour. Standard Time
+  # is also known as Winter Time. Daylight Saving Time is also known as
+  # Advanced Time, Summer Time, or Legal Time in certain countries. The
+  # following table shows the changes in time zone rules in effect for
+  # New York City starting from 1967. Each line represents a description
+  # or rule for a particular observance.
+  class Timezone < Component
+
+    def initialize()
+      super("VTIMEZONE")
+      @components = components
+    end
+
+    def to_s
+      super.to_s { |s| s << @components.each { |component| component.to_s } }
+    end
+  end
+end

data/extras/icalendar/component/todo.rb

@@ -0,0 +1,21 @@
+module Icalendar
+  # A Todo calendar component is a grouping of component
+  # properties and possibly Alarm calendar components that represent
+  # an action-item or assignment. For example, it can be used to
+  # represent an item of work assigned to an individual; such as "turn in
+  # travel expense today".
+  class Todo < Component
+
+    attr_reader :alarms
+
+    def initialize()
+      super("VTODO")
+      
+      @alarms = alarms
+    end
+
+    def to_s
+      print_string { |s| @alarms.each { |alarm| alarm.to_s } }
+    end      
+  end
+end

data/extras/icalendar/helpers.rb

@@ -0,0 +1,103 @@
+module Icalendar
+  # date = date-fullyear date-month date-mday
+  # date-fullyear = 4 DIGIT
+  # date-month = 2 DIGIT
+  # date-mday = 2 DIGIT
+  DATE = '(\d\d\d\d)(\d\d)(\d\d)'
+
+  # time = time-hour [":"] time-minute [":"] time-second [time-secfrac] [time-zone]
+  # time-hour = 2 DIGIT
+  # time-minute = 2 DIGIT
+  # time-second = 2 DIGIT
+  # time-secfrac = "," 1*DIGIT
+  # time-zone = "Z" / time-numzone
+  # time-numzome = sign time-hour [":"] time-minute
+  TIME = '(\d\d)(\d\d)(\d\d)(Z)?'
+
+
+  # Maps to dtstart property
+  # TODO: Look into having the DateTime library do more of the work...
+  module Dtstart
+
+    # Set the starting DateTime of an Event, Todo,
+    # Freebusy or Timezone component.  If utc is set to true
+    # then this time represents absolute time without regard for
+    # timezone information.
+    def setStart(start, utc = false)
+      if start.respond_to?(:year) # Date format
+        s = ""
+
+        # 4 digit year
+        s << start.year.to_s
+        
+        # Double digit month
+        s << "0" unless start.month > 9 
+        s << start.month.to_s
+
+        # Double digit day
+        s << "0" unless start.day > 9 
+        s << start.day.to_s
+      else
+        raise InvalidPropertyValue, "Cannot access year on start argument object!"
+      end
+      
+      if start.respond_to?(:hour) # include Time format if possible
+        s << "T"
+        
+        # Double digit hour
+        s << "0" unless start.hour > 9 
+        s << start.hour.to_s
+
+        # Double digit minute
+        s << "0" unless start.min > 9 
+        s << start.min.to_s
+
+        # Double digit second
+        s << "0" unless start.sec > 9 
+        s << start.sec.to_s
+      end
+
+      # UTC time gets a Z suffix
+      if utc
+        s << "Z"
+      end
+
+      @properties["DTSTART"] = s
+    end
+
+    # Returns the starting DateTime of an Event, Todo, Freebusy or
+    # Timezone component.
+    def getStart
+      # If we don't have a start time then return nil.
+      unless @properties.has_key?("DTSTART")
+        return nil
+      end
+      s = @properties["DTSTART"]
+      
+      # If we can't parse the start time figure its bad and return nil.
+      unless s =~ %r{#{DATE}}i
+        return nil
+      end
+
+      # We can at least create a Date object
+      year = $1
+      month = $2
+      day = $3
+
+      puts "s: #{s}"
+      puts "#{DATE}T#{TIME}"
+      # We might be able to get the time too
+      if s =~ %r{"#{DATE}T#{TIME}"}i
+        hour = $5
+        min = $6
+        sec = $7
+
+        puts "Hour: #{hour.to_s}"
+        
+        return DateTime.new(year, month, day, hour, min, sec)
+      else
+        return Date.new(year.to_i, month.to_i, day.to_i)
+      end    
+    end
+  end
+end

data/extras/icalendar/parameter.rb

@@ -0,0 +1,25 @@
+module Icalendar
+
+  # A property can have attributes associated with it. These "property
+  # parameters" contain meta-information about the property or the
+  # property value. Property parameters are provided to specify such
+  # information as the location of an alternate text representation for a
+  # property value, the language of a text property value, the data type
+  # of the property value and other attributes.
+  class Parameter < Icalendar::Content
+
+    def to_s
+      s = ""
+      
+      s << "#{@name}="
+      if is_escapable?
+        s << escape(print_value())
+      else
+        s << print_value
+      end
+
+      s
+    end
+
+  end
+end

data/extras/zip/ioextras.rb

@@ -0,0 +1,114 @@
+module IOExtras
+  module FakeIO
+    def kind_of?(object)
+      object == IO || super
+    end
+  end
+
+  # Implements many of the convenience methods of IO
+  # such as gets, getc, readline and readlines 
+  # depends on: input_finished?, produce_input and read
+  module AbstractInputStream  
+    include Enumerable
+    include FakeIO
+
+    def initialize
+      super
+      @lineno = 0
+      @outputBuffer = ""
+    end
+
+    attr_accessor :lineno
+
+    def readlines(aSepString = $/)
+      retVal = []
+      each_line(aSepString) { |line| retVal << line }
+      return retVal
+    end
+    
+    def gets(aSepString=$/)
+      @lineno = @lineno.next
+      return read if aSepString == nil
+      aSepString="#{$/}#{$/}" if aSepString == ""
+      
+      bufferIndex=0
+      while ((matchIndex = @outputBuffer.index(aSepString, bufferIndex)) == nil)
+	bufferIndex=@outputBuffer.length
+	if input_finished?
+	  return @outputBuffer.empty? ? nil : flush 
+	end
+	@outputBuffer << produce_input
+      end
+      sepIndex=matchIndex + aSepString.length
+      return @outputBuffer.slice!(0...sepIndex)
+    end
+    
+    def flush
+      retVal=@outputBuffer
+      @outputBuffer=""
+      return retVal
+    end
+    
+    def readline(aSepString = $/)
+      retVal = gets(aSepString)
+      raise EOFError if retVal == nil
+      return retVal
+    end
+    
+    def each_line(aSepString = $/)
+      while true
+	yield readline(aSepString)
+      end
+    rescue EOFError
+    end
+    
+    alias_method :each, :each_line
+  end
+
+
+  #relies on <<
+  module AbstractOutputStream 
+    include FakeIO
+
+    def write(data)
+      self << data
+      data.to_s.length
+    end
+
+
+    def print(*params)
+      self << params.to_s << $\.to_s
+    end
+
+    def printf(aFormatString, *params)
+      self << sprintf(aFormatString, *params)
+    end
+
+    def putc(anObject)
+      self << case anObject
+	      when Fixnum then anObject.chr
+	      when String then anObject
+	      else raise TypeError, "putc: Only Fixnum and String supported"
+	      end
+      anObject
+    end
+    
+    def puts(*params)
+      params << "\n" if params.empty?
+      params.flatten.each {
+	|element|
+	val = element.to_s
+	self << val
+	self << "\n" unless val[-1,1] == "\n"
+      }
+    end
+
+  end
+
+end # IOExtras namespace module
+
+
+
+# Copyright (C) 2002-2004 Thomas Sondergaard
+# rubyzip is free software; you can redistribute it and/or
+# modify it under the terms of the ruby license.