bigtinker 0.95 → 0.96

data/code/superant.com.schedule/viewicsevent.rb

@@ -1,20 +0,0 @@
-  def viewicsevent 
-   require 'fileutils'
-    $currenticseventtext = "%s" % [@a_viewicsevent]
-	 
-        begin # exception trapped block
-       
-     
-	 fileName = $rwdschedule_directory + "/" + $currenticseventtext + ".ics"
-        
-	fd = File.open(fileName,"r")
-	 @displayicsevent = " "
-	while ! fd.eof?
-	 @displayicsevent = fd.read
-	 end
-	 fd.close
-        rescue SystemCallError, StandardError
-            $stderr.print "system call error: " + $!
-        end # exception rescue
-
-  end

data/code/superant.com.schedule/viewrwdschedulesconfiguration.rb

@@ -1,21 +0,0 @@
-  def viewrwdschedulesconfiguration 
-    require 'fileutils'
-    begin # exception trapped block
-    
-     Dir.chdir($progdir)
-     rwdschedulesconfigurationfile = File.join( "configuration", RwdScheduleName )
-     if  File.exist?(rwdschedulesconfigurationfile)
-       fd = File.open(rwdschedulesconfigurationfile,"r")
-       @rwdschedulesconfigurationtext = " "
-       while ! fd.eof?
-	        @rwdschedulesconfigurationtext = fd.read
-       end
-       fd.close
-     else
-	@rwdschedulesconfigurationtext  = "File error"
-     end
-    rescue SystemCallError, StandardError
-     $stderr.print "system call error: " + $!
-     @rwdschedulesconfigurationtext = "File error"
-    end # exception rescue
-  end

data/configuration/rwdwschedule-1.04.dist

@@ -1,25 +0,0 @@
-##VERSION:1.04
-##NAME: $rwdschedule_directory:0
-$rwdschedule_directory = "schedules"
-##NAME: $rwdschedule_ftpsite:0
-$rwdschedule_ftpsite = "ftp.site.com"
-##NAME: $rwdschedule_ftplogin:0
-$rwdschedule_ftplogin = "login"
-##NAME: $rwdschedule_ftppassword:0
-$rwdschedule_ftppassword = "anonymous"
-##NAME: $rwdschedule_ftpdirectory:0
-$rwdschedule_ftpdirectory = "/incoming/rwdschedules"
-##NAME: $rwdschedule_updatedirectory:0
-$rwdschedule_updatedirectory = "updates"
-$testharnessarray += ["rwdschedule_all_tests"]
-$tinkerhelpaboutarray += ["RwdSchedule"] 
-$tinkerdocumentsarray += ["HowTo_Schedule.txt"]
-$extras_directory = "extras"
-##NAME:JumpLink:0
-JumpLink.update(:RwdScheduleConfiguration=>"runrwdschedulemenu10", :ScheduleEditRecord=>"runrwdschedulemenu1", :ScheduleICSwindow=>"runrwdscheduleicsbackwindow")
-##NAME:rwdjumplink:0 
-$rwdjumplink +=["ScheduleICSwindow","ScheduleEditRecord","RwdScheduleConfiguration"]
-##NAME:RwdScheduleVersion:0
-RwdScheduleVersion = "1.04"
-##NAME:RwdScheduleName:0
-RwdScheduleName = "rwdwschedule"

data/configuration/rwdwshell-1.04.dist

@@ -1,16 +0,0 @@
-##VERSION:1.04
-##NAME:$shellscript_directory:0
-$shellscript_directory = "scripts"
-##NAME:$testharnessarray:0
-$testharnessarray += ["rwdshell_all_tests"]
-##NAME:$tinkerhelpaboutarray:0
-$tinkerhelpaboutarray += ["RwdShell"] 
-##NAME:$tinkerdocumentsarray
-$tinkerdocumentsarray += ["HowTo_Shell.txt"]
-JumpLink.update(:RwdShellBackWindow=>"runrwdshellbackwindow", :RunShell=>"runrwdshellwindow")
-##NAME:$rwdjumplink:0
-$rwdjumplink +=["RwdShellBackWindow", "RunShell"]
-##NAME:RwdShellVersion:0
-RwdShellVersion = "1.04"
-
-

data/extras/cal.rb

@@ -1,158 +0,0 @@
-#! /usr/bin/env ruby
-
-# cal.rb: Written by Tadayoshi Funaba 1998-2004
-# $Id: cal.rb,v 2.8 2004-09-25 12:50:10+09 tadf Exp $
-
-require 'date'
-
-class Cal
-
-  START =
-    {
-    'cn' => true,    # China
-    'de' => 2342032, # Germany (protestant states)
-    'dk' => 2342032, # Denmark
-    'en' => 2361222, # English
-    'es' => 2299161, # Spain
-    'fi' => 2361390, # Finland
-    'fr' => 2299227, # France
-    'gb' => 2361222, # United Kingdom
-    'gr' => 2423868, # Greece
-    'hu' => 2301004, # Hungary
-    'it' => 2299161, # Italy
-    'jp' => true,    # Japan
-    'no' => 2342032, # Norway
-    'nl' => 2361222,
-    'pl' => 2299161, # Poland
-    'pt' => 2299161, # Portugal
-    'ru' => 2421639, # Russia
-    'se' => 2361390, # Sweden
-    'us' => 2361222, # United States
-    'os' => false,   # (old style)
-    'ns' => true     # (new style)
-  }
-
-  DEFAULT_START = 'gb'
-
-  def initialize
-    opt_j; opt_m; opt_t; opt_y; opt_c
-  end
-
-  def opt_j(flag=false) @opt_j = flag end
-  def opt_m(flag=false) @opt_m = flag end
-  def opt_t(flag=false) @opt_t = flag end
-  def opt_y(flag=false) @opt_y = flag end
-
-  def opt_c(arg=DEFAULT_START) @start = START[arg] end
-
-  def set_params
-    @dw = if @opt_j then 3 else 2 end
-    @mw = (@dw + 1) * 7 - 1
-    @mn = if @opt_j then 2 else 3 end
-    @tw = (@mw + 2) * @mn - 2
-    @k  = if @opt_m then 1 else 0 end
-    @da = if @opt_j then :yday else :mday end
-  end
-  
- 
-
-  def nl_pict(y, m)
-    d = (1..31).detect{|d| Date.valid_date?(y, m, d, @start)}
-    fi = Date.new(y, m, d, @start)
-    fi -= (fi.jd - @k + 1) % 7
-
-    ve  = (fi..fi +  6).collect{|cu|
-      %w(zo ma di wo do vr za)[cu.wday]
-    }
-    ve += (fi..fi + 41).collect{|cu|
-      if cu.mon == m then cu.send(@da) end.to_s
-    }
-
-    ve = ve.collect{|e| e.rjust(@dw)}
-
-    gr = group(ve, 7)
-    gr = trans(gr) if @opt_t
-    ta = gr.collect{|xs| xs.join('  ')}
-
-    ca = %w(januari februari  maart  april mei juni juli
-	    augustus september oktober november december)[m - 1]
-    ca = ca + ' ' + y.to_s if not @opt_y
-    ca = ca.center(@mw)
-
-    ta.unshift(ca)
-  end
-
-
-  def en_pict(y, m)
-    d = (1..31).detect{|d| Date.valid_date?(y, m, d, @start)}
-    fi = Date.new(y, m, d, @start)
-    fi -= (fi.jd - @k + 1) % 7
-
-    ve  = (fi..fi +  6).collect{|cu|
-      %w(Su Mo Tu We Th Fr Sa)[cu.wday]
-    }
-    ve += (fi..fi + 41).collect{|cu|
-      if cu.mon == m then cu.send(@da) end.to_s
-    }
-
-    ve = ve.collect{|e| e.rjust(@dw)}
-
-    gr = group(ve, 7)
-    gr = trans(gr) if @opt_t
-    ta = gr.collect{|xs| xs.join('  ')}
-
-    ca = %w(January February March April May June July
-	    August September October November December)[m - 1]
-    ca = ca + ' ' + y.to_s if not @opt_y
-    ca = ca  #.center(@mw)
-
-    ta.unshift(ca)
-  end
-
-  def group(xs, n)
-    (0..xs.size / n - 1).collect{|i| xs[i * n, n]}
-  end
-
-  def trans(xs)
-    (0..xs[0].size - 1).collect{|i| xs.collect{|x| x[i]}}
-  end
-
-  def stack(xs)
-    if xs.empty? then [] else xs[0] + stack(xs[1..-1]) end
-  end
-
-  def block(xs, n)
-    stack(group(xs, n).collect{|ys| trans(ys).collect{|zs| zs.join('  ')}})
-  end
-
-  def unlines(xs)
-    xs.collect{|x| x + "\n"}.join
-  end
-
-  def monthly(y, m)
-   if $lang == "nl"
-    return nl_pict(y,m)
-    end
-    return en_pict(y,m)
-    #unlines(pict(y, m))
-  end
-
-  def addmon(y, m, n)
-    y, m = (y * 12 + (m - 1) + n).divmod(12)
-    return y, m + 1
-  end
-
-  def yearly(y)
-    y.to_s.center(@tw) + "\n\n" +
-      unlines(block((0..11).collect{|n| pict(*addmon(y, 1, n))}, @mn)) + "\n"
-  end
-
-  def print(y, m)
-    set_params
-    if @opt_y then yearly(y) else monthly(y, m) end
-  end
-
-end
-
-
-

data/extras/icalendar/base.rb

@@ -1,17 +0,0 @@
-require 'logger'
-
-module Icalendar #:nodoc:
-  class IcalendarError < StandardError #:nodoc:
-  end
-
-  class InvalidComponentClass < IcalendarError
-  end
-
-  class InvalidPropertyValue < IcalendarError
-  end
-
-  class Base
-    @@logger = Logger.new(STDOUT)
-    @@logger.level = Logger::INFO
-  end
-end

data/extras/icalendar/calendar.rb

@@ -1,44 +0,0 @@
-module Icalendar
-  class Calendar < Component
-
-    attr_accessor :events, :todos, :journals, :freebusys, :timezones
-    
-    def initialize()
-      super("VCALENDAR")
-      @properties = {}
-      @property_params = {}
-      
-      @events = []
-      @todos = []
-      @journals = []
-      @freebusys = []
-      @timezones = []
-    end
-
-    def add(component)
-      if component.is_a? Event
-          @events << component
-        elsif component.is_a? Todo
-          @todos << component
-        elsif component.is_a? Journal
-          @journals << component
-        elsif component.is_a? Freebusy
-          @freebusys << component
-        elsif component.is_a? Timezone
-          @timezones << component
-        else
-          raise InvalidComponentClass
-      end
-    end
-    
-    def to_s
-      print_string do |s|
-        @events.each { |event| s << event.to_s }
-        @todos.each { |todo| s << todo.to_s }
-        @journals.each { |journal| s << journal.to_s }
-        @freebusys.each { |freebusy| s << freebusy.to_s }
-        @timezones.each { |timezone| s << timezone.to_s }
-      end
-    end
-  end
-end

data/extras/icalendar/calendar_parser.rb

@@ -1,237 +0,0 @@
-module Icalendar
-  class CalendarParser < Icalendar::Base
-    # 1*(ALPHA / DIGIT / "=")
-    NAME    = '[-a-z0-9]+'
-    
-    # <"> <Any character except CTLs, DQUOTE> <">
-    QSTR    = '"[^"]*"'
-
-    # *<Any character except CTLs, DQUOTE, ";", ":", ",">
-    PTEXT   = '[^";:,]*'
-
-    # param-value = ptext / quoted-string
-    PVALUE  = "#{PTEXT}|#{QSTR}"
-
-    # Contentline
-    LINE = "(#{NAME})([^:]*)\:(.*)"
-
-    # param = name "=" param-value *("," param-value)
-    # Note: v2.1 allows a type or encoding param-value to appear without the type=
-    # or the encoding=. This is hideous, but we try and support it, if there    # is no "=", then $2 will be "", and we will treat it as a v2.1 param.
-    PARAM = ";(#{NAME})(=?)((?:#{PVALUE})(?:,#{PVALUE})*)"
-
-    # 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)(\.\d+)?(Z|[-+]\d\d:?\d\d)?'
-
-    def initialize(src)
-      @@logger.info("New Calendar Parser")
-      
-      # Define the next line method different depending on whether
-      # this is a string or an IO object so we can be efficient about
-      # parsing large files...
-
-      # Just do the unfolding work in one shot if its a whole string
-      if src.respond_to?(:split)
-        unfolded = []
-
-        # Split into an array of lines, then unfold those into a new array
-        src.split(/\r?\n/).each do |line|
-
-          # If it's a continuation line, add it to the last.
-          # If it's an empty line, drop it from the input.
-          if( line =~ /^[ \t]/ )
-            unfolded << unfolded.pop + line[1, line.size-1]
-          elsif( line =~ /^$/ )
-          else
-            unfolded << line
-          end
-        end
-
-        @lines = unfolded
-        @index = 0
-
-        # Now that we are unfolded we can just iterate through the array.
-        # Dynamically define next line for a string.
-        def next_line
-          if @index == @lines.size
-            return nil
-          else
-            line = @lines[@index]
-            @index += 1
-            return line
-          end
-        end
-
-        # If its a file we need to read and unfold on the go to save from reading
-        # large amounts of data into memory.
-      elsif src.respond_to?(:gets)
-        @file = src
-        @prev_line = src.gets
-        if !@prev_line.nil?
-          @prev_line.chomp!
-        end
-        
-        # Dynamically define next line for an IO object
-        def next_line
-          line = @prev_line
-          
-          if line.nil? 
-            return nil 
-          end
-
-          # Loop through until we get to a non-continuation line...
-          loop do
-            nextLine = @file.gets
-            if !nextLine.nil?
-              nextLine.chomp!
-            end
-            
-            # If it's a continuation line, add it to the last.
-            # If it's an empty line, drop it from the input.
-            if( nextLine =~ /^[ \t]/ )
-              line << nextLine[1, nextLine.size]
-            elsif( nextLine =~ /^$/ )
-            else
-              @prev_line = nextLine
-              break
-            end
-          end
-          line
-        end
-      else
-        raise ArgumentError, "CalendarParser.new cannot be called with a #{src.class} type!"
-      end
-    end
-    
-    # Parse the calendar into an object representation
-    def parse
-      calendars = []
-      
-      # Outer loop for Calendar objects
-      while (line = next_line)
-        fields = parse_line(line)
-        
-        # Just iterate through until we find the beginning of a calendar object
-        if fields[:name] == "BEGIN" and fields[:value] == "VCALENDAR"
-          cal = parse_calendar
-          calendars << cal
-        end
-      end
-      
-      calendars
-    end
-    
-    # Parse a single VCALENDAR object
-    # -- This should consist of the PRODID, VERSION, option METHOD & CALSCALE,
-    # and then one or more calendar components: VEVENT, VTODO, VJOURNAL, 
-    # VFREEBUSY, VTIMEZONE
-    def parse_calendar(component = Calendar.new)
-      while (line = next_line)
-        fields = parse_line(line)
-
-        name = fields[:name]
-        
-        # Although properties are supposed to come before components, we should
-        # be able to handle them in any order...
-        if name == "END"
-          break
-        elsif name == "BEGIN" # New component
-          case(fields[:value])
-          when "VEVENT"
-            component.events << parse_calendar(Event.new)
-          when "VTODO"
-            component.todos << parse_calendar(Todo.new)
-          when "VJOURNAL"
-            component.journals << parse_calendar(Journal.new)
-          when "VFREEBUSY"
-            component.freebusys << parse_calendar(Freebusy.new)
-          when "VTIMEZONE"
-            component.timezones << parse_calendar(Timezone.new)
-          when "VALARM"
-            component.alarms << parse_calendar(Alarm.new)
-          end
-        else # If its not a component then it should be properties...
-          
-          # Just set the properties ourselves so that the parser can still
-          # parse invalid files...
-          @@logger.debug("Setting #{name} => #{fields[:value]}")
-          component.properties[name] = fields[:value]
-          if not fields[:params].empty?
-            component.property_params[name] = fields[:params]
-          end
-
-          # This will generate the correctly formed calls to the dynamic method
-          # handler.
-#          component.send("#{name}=", fields[:value])
-#          component.send("#{name}_params=", fields[:params]) unless fields[:params].empty?
-        end
-      end
-      
-      component
-    end
-    
-    def parse_line(line)
-      unless line =~ %r{#{LINE}}i # Case insensitive match for a valid line
-        raise "Invalid line in calendar string!"
-      end
-
-      name = $1.upcase # The case insensitive part is upcased for easier comparison...
-      paramslist = $2
-      value = $3
-      
-      params = {}
-      
-      # Collect the params, if any.
-      if paramslist.size > 1
-        
-        # v3.0 and v2.1 params
-        paramslist.scan( %r{#{PARAM}}i ) do
-          
-          # param names are case-insensitive, and multi-valued
-          pname = $1
-          pvals = $3
-          
-          # v2.1 pvals have no '=' sign, figure out what kind of param it
-          # is (either its a known encoding, or we treat it as a 'type'
-          # param).
-          if $2 == ""
-            pvals = $1
-            case $1
-            when /quoted-printable/i
-              pname = 'encoding'
-              
-            when /base64/i
-              pname = 'encoding'
-              
-            else
-              pname = 'type'
-            end
-          end
-          
-          unless params.key? pname
-            params[pname] = []
-          end
-          pvals.scan( %r{(#{PVALUE})} ) do
-            if $1.size > 0
-              params[pname] << $1
-            end
-          end
-        end
-      end
-      
-      {:name => name, :params => params, :value => value}
-    end
-  end
-end

data/extras/icalendar/component/alarm.rb

@@ -1,16 +0,0 @@
-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

@@ -1,25 +0,0 @@
-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

@@ -1,12 +0,0 @@
-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

@@ -1,25 +0,0 @@
-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

@@ -1,26 +0,0 @@
-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

@@ -1,21 +0,0 @@
-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