bigtinker 0.95 → 0.96

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

@@ -1,97 +0,0 @@
-  # this method exports a new  record
-  def exporteventrecord 
-  Dir.chdir($progdir) 
- require 'fileutils'
-   require 'extras/icalendar'
-   if ! @a_eventfilename.empty?
-   newname = "%s" %   [@a_eventfilename] # grab the new filename to create
-   
-	 fullnewname = newname  + ".ics"
-     cal = Icalendar::Calendar.new
-
-    cal.version = "3.2"
-    cal.prodid = "rwdtinker-prodid"
-    event = Icalendar::Event.new
-    newdataText = ""
-    if ! @a_eventyear.empty?
-  temptimedata =  @a_eventyear.to_s.strip
-  else
-  temptimedata = "0000"
-    end
-    if ! @a_eventmonth.empty?
-    temptimedata= temptimedata    + @a_eventmonth.to_s
-    else
-    temptimedata = temptimedata   + "00"
-   end
-    if ! @a_eventday.empty?
-    temptimedata = temptimedata + @a_eventday.to_s
-else
-    temptimedata = temptimedata  +  "00"
- end
-daydate =temptimedata
-if ! @a_eventbeginhour.empty?
-    temptimedata= temptimedata     + "T" + @a_eventhour.to_s
-    else
-    temptimedata = temptimedata     + "T" + "00"
-   end
-    if ! @a_eventbeginminute.empty?
-    temptimedata = temptimedata + @a_eventbeginminute.to_s
-else
-    temptimedata = temptimedata  +  "00"
-  end
-if ! @a_eventendhour.empty?
-    tempendtimedata= daydate     + "T" + @a_eventendhour.to_s
-    else
-    tempendtimedata = daydate   + "T" + "00"
-   end
-    if ! @a_eventendminute.empty?
-    tempendtimedata = tempendtimedata + @a_eventendminute.to_s
-else
-    tempendtimedata = tempendtimedata  +  "00"
-  end
-  
-   if ! @a_eventsummary.empty?
- summarydataText =  @a_eventsummary.to_s
- else
-  summarydataText = ""
- end
-  if ! @a_eventdescription.empty?
-     descriptiondataText =  @a_eventdescription.to_s
-  else
-     descriptiondataText = ""
-  end
-      if ! @a_eventlocation.empty?
-        locationdataText =  @a_eventlocation.to_s
-     else
-        locationdataText = "" 
-    end
-
-   starttime = temptimedata +  "00"
-     endtime =  tempendtimedata + "00"
-
-    # Create a new event and add it to the calendar
-    
-    event.dtstart = starttime 
-    event.dtend = endtime 
-    event.summary =    summarydataText
-    event.description = descriptiondataText 
-    event.location =   locationdataText
-    cal.add(event)
-        # Now generate the string and then parse it so we can verify 
-    # that everything was set, generated and parsed correctly.
-    calString = cal.to_s
-    p calString
-    #cals = Icalendar::CalendarParser.new(calString).parse
-
-# cal2 = cals.first
-       # begin # exception trapped block
-          fileName = File.join( $rwdschedule_directory, fullnewname )
-       	fd = File.open(fileName,"w")
-	     fd.print( calString ) # save the record info to the file
-	     fd.close
-          @neweventresult= calString # show the record info in the browser
-       # rescue SystemCallError, StandardError
-         #   $stderr.print "system call error: " + $!
-       # end # exception rescue
-    end
-  end

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

@@ -1,82 +0,0 @@
-  
-
- Helptext.update( :rwdschedule_generalhelp => "     Use the 'Edit Event' tab
-      The first field is the most important. It is the filename that
-      will be created. I use the event date starting with yearmonthday
-      2005january11
-
-      The following lines for entry are for you to fill in as you want.
-      When you are finished press the Save Changes button 
-      
-      You use this same screen for editing an already saved event ",
-      :rwdschedulefilelist_generalhelp => "
-       Click on the list events button.
-      
-       Click on the date you want
-       
-       Then click the 'Open' button
-       
-       If it finds the record it will open it. It displays the record 
-       as text  under the 'Open' button.",
-       :eventutilities_help => " On the event utilities tab
-       
-  You can rename event filenames
-  You can delete events
-  
-       ",
-       
-       :rwdschedule_configuration => " click on 'Edit Configuration'
- You can view the configuration file
- 
-  You can edit the configuration
-  
-  Remember to reload the configuration variables if you want your
-  changes used.",
-  :rwdschedule_sync => "Sync for multiple computers
-
- If you are like me, you have more than one system
- I use rwdTinker at home on my Linux laptop
- at work I use it on XP
- on the go I use rwdtinker on my Zaurus PDA
- So I am adding schedule events on different machines.
- There is  a function to help sync the separate systems
-  
- in 'Selection Panel' click on 'Open Schedule Sync Window'
- 
- First you need your ftp details set in the
- configuration/rwdschedule.cnf file
- 
- you can upload your events from your local schedules directory to the ftp site
- you can download events from the ftp site to your local updates directory
- you can perform a sync which finds remote events and adds them to your local
- schedules directory
- 
- There is a button to delete the update directory when finished",
- :calendar_help => "On the 'Show Month' tab
-   You can see the current month or
-   enter a year and month
-   for example:
-    Year: 2005
-    Month: 2
-    Click on 'show month'
-    
-    It will display one month",
-  :icsfile_help =>       "
-      You can create an ics file
-      you can view a raw ics file 
-      Rename ics File
-      Delete ics File
-      
-      format of date
-      year = 2005
-      month = 02
-      day = 01
-      hour = 01
-      minute = 01
-      "
-      
-  
-  
-      
-
-)

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

@@ -1,19 +0,0 @@
-# this code is to list the events that are scheduled
-def  listeventdates
- # exception begin
- begin 
-  fileList      = Dir.new($rwdschedule_directory).entries.sort.delete_if { |x| ! (x =~ /sch$/) }
-  
-  @eventrecordsresult = fileList.rwd_method("filleventdatesname")
-  rescue 
-  @eventrecordsresult = "error opening schedule directory"
-  end # end of error function
-  
-end
-
-
-def filleventdatesname(inffile)
-  applet                = inffile.gsub(/\.sch$/, "")
-  @a_viewevent  = applet
-  
-end

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

@@ -1,19 +0,0 @@
-# this code is to list the events that are scheduled
-def  listicseventdates
- # exception begin
- begin 
-  fileList      = Dir.new($rwdschedule_directory).entries.sort.delete_if { |x| ! (x =~ /ics$/) }
-  
-  @eventicsrecordsresult = fileList.rwd_method("fillicseventdatesname")
-  rescue 
-  @eventicsrecordsresult = "error opening schedule directory"
-  end # end of error function
-  
-end
-
-
-def fillicseventdatesname(inffile)
-  applet                = inffile.gsub(/\.ics$/, "")
-  @a_viewicsevent  = applet
-  
-end

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

@@ -1,14 +0,0 @@
-   # this method loads the on screen variables into the running class
-   def loadrwdscheduleconfigurationvariables
-
-   tmpfilename = RwdScheduleName+"-"+RwdScheduleVersion+".cnf"   
-   configfiletoload = File.join(ConfigurationDir, tmpfilename )
-   begin
-    load configfiletoload
-    @extraschconfigdatadisplay = ""
-@newschconfigurationresult = "Config Variables loaded"
-rescue
- @extraschconfigdatadisplay = ""
- @newschconfigurationresult = "loading error"
- end
-  end

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

@@ -1,38 +0,0 @@
-   # this method views an existing record
-  def loadeventrecord
- 
-         require 'fileutils'
-        @a_eventfilename = $currenteventtext
-	      
-        begin # exception trapped block
-       
-       
-	      fileName = $rwdschedule_directory + "/" + $currenteventtext + ".sch"
-        
-	      fd = File.open(fileName,"r")
-	      eventdatetime =        fd.readline.chomp
-	      
-      @a_eventyear = eventdatetime.slice(0..3)
-       @a_eventmonth  = eventdatetime.slice(4..5)
-        @a_eventday     = eventdatetime.slice(6..7)
-        @a_eventbeginhour =  eventdatetime.slice(9..10)
-        @a_eventbeginminute  =  eventdatetime.slice(11..12)
-      eventdatetime2 =        fd.readline.chomp
-        
-          @a_eventendhour =  eventdatetime2.slice(9..10)
-        @a_eventendminute  =  eventdatetime.slice(11..12)
-            @a_eventsummary =  fd.readline.chomp
-            @a_eventdescription =  fd.readline.chomp
-            @a_eventlocation  =  fd.readline.chomp
-  
-     
-	 
-	      while ! fd.eof?
-	        @extraeventdatadisplay = fd.readline
-	      end
-        fd.close
-        rescue SystemCallError, StandardError
-            $stderr.print "system call error: " + $!
-        end # exception rescue
-
-  end

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

@@ -1,30 +0,0 @@
-   # this method views an existing address record
-  def loadicseventrecord
- 
-         require 'fileutils'
-        @a_eventfilename = $currenteventtext
-	      
-        begin # exception trapped block
-       
-       
-	      fileName = $rwdschedule_directory + "/" + $currenteventtext + ".sch"
-        
-	      fd = File.open(fileName,"r")
-	      @a_eventtime =        fd.readline.chomp
-	      @a_eventwhat =  fd.readline.chomp
-        @a_eventaddress = fd.readline.chomp
-          @a_eventphone = fd.readline.chomp
-        @a_eventemail = fd.readline.chomp
-         @a_eventcomment1 = fd.readline.chomp 
-          @a_eventcomment2 =fd.readline.chomp
-          @a_eventcomment3 = fd.readline.chomp
-	 
-	      while ! fd.eof?
-	        @extraeventdatadisplay = fd.readline
-	      end
-        fd.close
-        rescue SystemCallError, StandardError
-            $stderr.print "system call error: " + $!
-        end # exception rescue
-
-  end

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

@@ -1,43 +0,0 @@
-# this code is to call the help window
-def runhelpwindowrwdschedule
-
-     $help_topic = "rwdschedule_generalhelp"
-   if @rwd_tab == "Vieweventlist"
-     $help_topic = "rwdschedulefilelist_generalhelp"
-   end
-   if @rwd_tab == "editeventrecordfile"
-   $help_topic = "rwdschedule_generalhelp"
-   end
-   if  @rwd_tab == "eventutilitiesrwdschedule"
- $help_topic = "eventutilities_help"
-   end
-    if @rwd_tab == "viewrwdscheduleconfiguration"
-    $help_topic = "rwdschedule_configuration"
-    end
-  if @rwd_tab  == "rwdschedulesynctasks"
-    $help_topic = "rwdschedule_sync"
-    end
-    if @rwd_tab  == "calendar"
-    $help_topic = "calendar_help"
-    end
-    if @rwd_tab == "createicsrecordfile" 
-    $help_topic = "icsfile_help"
-    end
-    if @rwd_tab == "eventicsutilities"
-    $help_topic = "icsfile_help"
-    end
-    if @rwd_tab == "Viewicseventlist"
-  $help_topic = "icsfile_help"
-    end    
-   $helptopicsarray =  $helptopicsarray | ["icsfile_help","eventutilities_help","calendar_help","rwdschedule_generalhelp","rwdschedule_configuration","rwdschedulefilelist_generalhelp","rwdschedule_sync"]
-  
-   
-  
- if @rwd_window != "rwdtinkerhelpwindow"
-       $previouswindow = @rwd_window
-      $previoustab = @rwd_tab
-  end
-  runhelpwindow
-end
-
-

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

@@ -1,14 +0,0 @@
- # this code is to change the contact name
- def changeeventdata
-  oldName =  $rwdschedule_directory + "/" + @a_viewevent +  ".sch"
-  newName =  $rwdschedule_directory + "/" + @a_changeeventdata + ".sch"
- begin 
- File.rename(oldName, newName)
-  @eventfilechangeresult = "File Renamed!" 
-  rescue
-  @eventfilechangeresult = "rename error"
-  end
-  
-   end
-
-

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

@@ -1,17 +0,0 @@
- # this code is to change the file name
- def changeicseventdata
- if ! @a_viewicsevent.empty?
-  oldName =  $rwdschedule_directory + "/" + @a_viewicsevent +  ".ics"
-  if ! @a_changeicseventdata.empty? 
-  newName =  $rwdschedule_directory + "/" + @a_changeicseventdata + ".ics"
- begin 
- File.rename(oldName, newName)
-  @eventicsfilechangeresult = "File Renamed!" 
-  rescue
-  @eventicsfilechangeresult = "rename error"
-  end
-   end
-   end
-   end
-
-

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

@@ -1,10 +0,0 @@
-# Application rwdtinker orginally (c) 2004 Steven Gibson under GPL. 
-# 
-# For more information about  see http://www.rubyforge.net/projects/rwdapplications
-  
-  # call the window  
-  def returntomainrwdschedule
-   @rwd_window = "rwdschedulewindow"
-   @rwd_tab = "rwdscheduleselectiontab"
-   end   
-   

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

@@ -1,10 +0,0 @@
-# Application RwdAddresses orginally (c) 2004 Steven Gibson under GPL. 
-# This application is a contact book
-# For more information about  see http://www.rubyforge.net/projects/rwdapplications
-  
-  # call the window  
-  def runrwdscheduleicsbackwindow
-   @rwd_window = "rwdscheduleicswindow"
-   @rwd_tab = "Viewicseventlist"
-   end   
-   

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

@@ -1,34 +0,0 @@
-# Application RwdAddresses orginally (c) 2004 Steven Gibson under GPL. 
-# 
-# For more information about  see http://www.rubyforge.net/projects/rwdapplications
-  
-  # call the window  
-  def runrwdschedulemenu1
-   @rwd_window = "rwdschedulewindow"
-   @rwd_tab = "Vieweventlist"
-   end   
-  def runrwdschedulemenu2
-   @rwd_window = "rwdschedulewindow"
-   @rwd_tab = "editeventrecordfile"
-   end   
-   
-   
-  def runrwdschedulemenu3
-   @rwd_window = "rwdschedulewindow"
-   @rwd_tab = "eventutilitiesrwdschedule"
-   end  
- def runrwdschedulemenu4
-   @rwd_window = "rwdschedulesyncwindow"
-   @rwd_tab = "rwdschedulesynctasks"
-   end  
-   
-        def runrwdschedulemenu10
-   @rwd_window = "rwdschedulesyncwindow"
-   @rwd_tab = "viewrwdscheduleconfiguration"
-   end 
-   
-       def runrwdschedulemenu11
-   @rwd_window = "main"
-   @rwd_tab = "documentsrwdtinkerone"
-   end 
-  

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

@@ -1,10 +0,0 @@
-# Application RwdAddresses orginally (c) 2004 Steven Gibson under GPL. 
-# This application is a contact book
-# For more information about  see http://www.rubyforge.net/projects/rwdapplications
-  
-  # call the window  
-  def runrwdschedulesyncbackwindow
-   @rwd_window = "rwdschedulesyncwindow"
-   @rwd_tab = "rwdschedulesynctasks"
-   end   
-   

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

@@ -1,19 +0,0 @@
-  # this method adds a new address record
-  def saverwdscheduleconfiguration
-   require 'fileutils'
-   
-   newname = RwdScheduleName+"-"+RwdScheduleVersion+".cnf" # grab the filename to create
-   newdata =@a_schconfigurationfile
-   
-	 
-        begin # exception trapped block
-          fileName = File.join( ConfigurationDir, newname )
-        	fd = File.open(fileName,"w")
-	        fd.print(newdata) # save the record info to the file
-	        fd.close
-          @newconfigurationresult=newdata # show the record info in the browser
-        rescue SystemCallError, StandardError
-            $stderr.print "system call error: " + $!
-        end # exception rescue
-    
-  end

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

@@ -1,25 +0,0 @@
-  # this method adds a new  record
-  def saveeventrecord 
-   require 'fileutils'
-   if @a_eventfilename
-   newname = "%s" %   [@a_eventfilename] # grab the new filename to create
-   newdata = @a_eventyear.to_s + @a_eventmonth.to_s + @a_eventday.to_s  + "T" + @a_eventbeginhour.to_s  + @a_eventbeginminute.to_s + "00"
-   newdata = newdata + "\n" + @a_eventyear.to_s + @a_eventmonth.to_s + @a_eventday.to_s  + "T" + @a_eventendhour.to_s  + @a_eventendminute.to_s  + "00"
-   newdata = newdata +"\n" + @a_eventsummary.to_s  + "\n" + @a_eventdescription.to_s  + "\n" + @a_eventlocation.to_s 
-  
-     
-      
-    
- 	
-  fullnewname = newname + ".sch"
-        begin # exception trapped block
-          fileName = File.join( $rwdschedule_directory, fullnewname )
-        	fd = File.open(fileName,"w")
-	        fd.print(newdata) # save the record info to the file
-	        fd.close
-          @neweventresult=newdata # show the record info in the browser
-        rescue SystemCallError, StandardError
-            $stderr.print "system call error: " + $!
-        end # exception rescue
-    end
-  end

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

@@ -1,98 +0,0 @@
-  # this method adds a new  record
-  def saveicseventrecord 
-  Dir.chdir($progdir) 
- require 'fileutils'
-   require 'extras/icalendar'
-   if ! @a_eventicsfilename.empty?
-   newname = "%s" %   [@a_eventicsfilename] # grab the new filename to create
-   
-	 fullnewname = newname  + ".ics"
-     cal = Icalendar::Calendar.new
-
-    cal.version = "3.2"
-    cal.prodid = "rwdtinker-prodid"
-    event = Icalendar::Event.new
-    newdataText = ""
-    if ! @a_eventicsyear.empty?
-  temptimedata =  @a_eventicsyear.to_s.strip
-  else
-  temptimedata = "0000"
-    end
-    if ! @a_eventicsmonth.empty?
-    temptimedata= temptimedata    + @a_eventicsmonth.to_s
-    else
-    temptimedata = temptimedata   + "00"
-   end
-    if ! @a_eventicsday.empty?
-    temptimedata = temptimedata + @a_eventicsday.to_s
-else
-    temptimedata = temptimedata  +  "00"
- end
- daydate = temptimedata
-     if ! @a_eventicshour.empty?
-    temptimedata= temptimedata     + "T" + @a_eventicshour.to_s
-    else
-    temptimedata = temptimedata     + "T" + "00"
-   end
-    if ! @a_eventicsminute.empty?
-    temptimedata = temptimedata + @a_eventicsminute.to_s
-else
-    temptimedata = temptimedata  +  "00"
- end
-     if ! @a_eventendicshour.empty?
-    tempendtimedata= daydate     + "T" + @a_eventendicshour.to_s
-    else
-    tempendtimedata = daydate     + "T" + "00"
-   end
-    if ! @a_eventendicsminute.empty?
-    tempendtimedata = tempendtimedata + @a_eventendicsminute.to_s
-else
-    tempendtimedata = tempendtimedata  +  "00"
- end
- 
-   if ! @a_eventicssummary.empty?
- summarydataText =  @a_eventicssummary.to_s
- else
-  summarydataText = ""
- end
-  if ! @a_eventicsdescription.empty?
-     descriptiondataText =  @a_eventicsdescription.to_s
-  else
-     descriptiondataText = ""
-  end
-      if ! @a_eventicslocation.empty?
-        locationdataText =  @a_eventicslocation.to_s
-     else
-        locationdataText = "" 
-    end
-
-   starttime = temptimedata +  "00"
-     
-  endtime = tempendtimedata + "00"
-
-    # Create a new event and add it to the calendar
-    
-    event.dtstart = starttime 
-    event.dtend = endtime 
-    event.summary =    summarydataText
-    event.description = descriptiondataText 
-    event.location =   locationdataText
-    cal.add(event)
-        # Now generate the string and then parse it so we can verify 
-    # that everything was set, generated and parsed correctly.
-    calString = cal.to_s
-    p calString
-    #cals = Icalendar::CalendarParser.new(calString).parse
-
-# cal2 = cals.first
-        begin # exception trapped block
-          fileName = File.join( $rwdschedule_directory, fullnewname )
-       	fd = File.open(fileName,"w")
-	     fd.print( calString ) # save the record info to the file
-	     fd.close
-          @newicseventresult= calString # show the record info in the browser
-        rescue SystemCallError, StandardError
-          $stderr.print "system call error: " + $!
-        end # exception rescue
-    end
-  end

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

@@ -1,30 +0,0 @@
-def syncrwdscheduledata
-    require 'fileutils'
-   @rwdschedulesyncresult  = ""
- begin
-    
-@rwdschedulesyncresult  = "updating local files" + "\n" 
-    Dir.chdir($progdir)
-    
-    localfileListarray = Dir.new($rwdschedule_directory).entries.sort.delete_if { |tmpfile| ! (tmpfile =~ /sch$/) }
-      remotefileListarray = Dir.new($rwdschedule_updatedirectory ).entries.sort.delete_if { |tmpfile| ! (tmpfile =~ /sch$/) }
-  
-    tempupdatefilelistarray = remotefileListarray -   localfileListarray 
-    
-   if  tempupdatefilelistarray
-           tempupdatefilelistarray.each do |temp|
-            tmpfilenametosync = File.join($rwdschedule_updatedirectory,temp)
-            tmpfilenamecopied = File.join($rwdschedule_directory,temp)
-             FileUtils.cp( tmpfilenametosync, tmpfilenamecopied)
-            @rwdschedulesyncresult  =   @rwdschedulesyncresult + temp + "\n"   
-      
-      end
-      end
-
-  
-rescue
- 
-
-print "sync error"
-end
-end

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

@@ -1,30 +0,0 @@
-def uploadrwdschedulefiles
-  require 'net/ftp'
-  BasicSocket.do_not_reverse_lookup = true 
-   @rwdscheduleftpdisplays = ""
-  begin
-    ftp = Net::FTP::new($rwdschedule_ftpsite)
-@rwdscheduleftpdisplay  = "files uploaded" + "\n" 
-    
-    fileListarray = Dir.new($rwdschedule_directory).entries.sort.delete_if { |tmpfile| ! (tmpfile =~ /sch$/) }
-    if fileListarray
-      ftp.debug_mode = false
-      ftp.login($rwdschedule_ftplogin, $rwdschedule_ftppassword)
-      ftp.chdir($rwdschedule_ftpdirectory)
-      print "I'm in the directory ", ftp.pwd(), "\n"
-      fileListarray.each do |temp|
-             tmpfilenametoupload = File.join($rwdschedule_directory,temp)
-             ftp.puttextfile(tmpfilenametoupload  , temp)
-             @rwdscheduleftpdisplay  =   @rwdscheduleftpdisplay + temp + "\n"   
-        end
-      end
-   ftp.close
-  
-rescue
- 
- if ftp
- ftp.close
-end
-print "ftp error"
-end
-end

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

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