bigtinker 0.93

data/code/superant.com.hypernote/helptexthashrwdhypernote.rb

@@ -0,0 +1,74 @@
+  
+
+ Helptext.update( :rwdhypernote_generalhelp => "This program is a hierarchical notes editor
+      
+ text notes can be entered and saved in a Notes directory
+ 
+ Notes can be saved in a hierarchical structure in directories
+ Links can be recorded connecting Notes -similar to wikiwiki
+  
+ There are tabs to enter notes and links and edit configurations
+ 
+ 'View/Edit Note' - to create a note or edit and existing note
+ 
+ 'View/Edit Links' - to edit links
+ 
+ 'Note Utilities' - to rename or delete notes
+ 
+ 'Edit Configuration' - to change the configuration of rwdhypernote
+ 
+       .",
+ :hypernoteedit_help => "You can create or edit notes
+   click the bottom button 'list notes' to see a lists 
+   of the notes you already have.
+   'save changes' to save your edits
+   'clear' to clear the screen
+   'Create New Note' to start a new note
+  After creating a new note, you must list below to find it
+  and select it, or it will NOT be SAVED",
+  :hypernoteutility_help => "You can change the file
+   rename
+   delete
+   copy name
+   ",
+  
+ :hypernotelinks_help => " You can edit links for note pages
+       
+  If you have selected a note on the 'View/Edit Note' tab
+  the name should be in the Note Record box
+ 
+  You can open the link file if you have one already
+
+  You can see the list of link files by clicking 'List Local Link Files'
+  You can open one of those file
+  
+  If you do not have a link file, you can create one with 'create link file' button
+  
+       ",
+       
+       :rwdhypernote_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.",
+  :rwdhypernote_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 notes on different machines.
+ There is  a function to help sync the separate systems
+  
+ in 'Selection Panel' click on 'Open HyperNote Sync Window'
+ 
+ First you need your ftp details set in the
+ configuration/rwdhypernote.cnf file
+ 
+ you can upload your notes from your local Notes directory to the ftp site
+ you can download Notes from the ftp site to your local updates directory
+  
+ "
+)

data/code/superant.com.hypernote/hyperlinkcreatelinkfile.rb

@@ -0,0 +1,19 @@
+ # this method adds a new address record or saves changes
+ def hyperlinkcreatelinkfile
+require 'fileutils'
+   if ! @a_viewhypernote.empty?
+   newname = "%s" %   [@a_viewhypernote] # grab the new filename to create
+   
+	 fullnewname = newname + ".lnk"
+   @a_viewlinksnote = fullnewname
+        begin # exception trapped block
+         
+        	fd = File.open(fullnewname,"w")
+	       
+	        fd.close
+          @createnewnamerecorddisplay=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.hypernote/jumplinkupdate.rb

@@ -0,0 +1,7 @@
+#jumplinkupdate 
+
+JumpLink.update(:RwdHypernoteMainWindow=>"runrwdhypernotebackwindow",
+:RwdHypernoteConfigurationTab=>"runrwdhypernoteconfiguration"
+
+)
+$rwdjumplink +=["RwdHypernoteMainWindow","RwdHypernoteConfigurationTab"]

data/code/superant.com.hypernote/listhypernotelinks.rb

@@ -0,0 +1,55 @@
+# this code is to list the links
+
+def fillhypernotelinkname(inffile)
+  
+  @a_viewlinksnote  =  inffile
+end
+
+ def findnotelinkfiles(d)
+         a = Array.new(Dir[d].entries.sort)
+         #loop through and get the files names
+         a.each do |x|
+               #adjust the filters to the files you want to see...
+               if(!test(?d,x))
+               # only lnk files
+                  if x =~ /rb|lnk|lnk/
+                    puts "#{x}"        #opens the file thats in fileName as read only
+                   $noteslinksarray =  $noteslinksarray | ["#{x}"] 
+                  end
+               end
+          end
+  end
+  
+def rwdhypernotelistlinkdirs
+ $noteslinksarray = [""]
+ startlangdir = $rwdhypernote_directory
+ puts startlangdir
+ #get a list of the files and subdirectories on the starting directory only
+        anotelinkarray = Array.new(Dir[startlangdir].entries.sort)
+        p anotelinkarray
+	#loop through the list, ignore the files and add all new directories found
+        anotelinkarray.each do |x|
+          #if a directory...
+          if(test(?d,x))
+            # add to the original list of directories
+            @@tmproot = x + "/**"
+            #adds the new ones to the array
+            bnotelinkarray = Dir[@@tmproot].entries.sort
+            bnotelinkarray.each do |x|
+            p x  
+	    if(test(?d,x))
+                anotelinkarray.push(x)  #appends to the end of the array...
+              end
+            end
+          end
+        end
+        anotelinkarray.each do |x|
+                #if it is a file...
+                if(!test(?d,x))
+                        anotelinkarray.delete(x)
+                  else              #it is a directory...
+                        findnotelinkfiles(x + "/**")
+                end
+        end
+         @notelinksrecordsresult = $noteslinksarray.rwd_method("fillhypernotelinkname")
+      end  

data/code/superant.com.hypernote/listhypernotes.rb

@@ -0,0 +1,63 @@
+# this code is to list the notes
+
+
+
+def fillhypernotename(inffile)
+  applet                = inffile.gsub(/\.txt$/, "")
+  @a_viewhypernote  = applet
+  
+end
+
+ def findnotefiles(d)
+    p d
+         a = Array.new(Dir[d].entries.sort)
+	 p a
+         #loop through and get the files names
+         a.each do |x|
+               #adjust the filters to the files you want to see...
+               if(!test(?d,x))
+               # only txt files
+                  if x =~ /rb|txt|txt/
+                    puts "#{x}"        #opens the file thats in fileName as read only
+                   $notesarray =  $notesarray | ["#{x}"] 
+                  end
+               end
+          end
+  end
+  
+def listnotedirs
+ startlangdir = $rwdhypernote_directory
+ 
+ $notesarray = [""]
+ 
+ #get a list of the files and subdirectories on the starting directory only
+        anotearray = Array.new(Dir[startlangdir].entries.sort)
+       
+        #loop through the list, ignore the files and add all new directories found
+        anotearray.each do |x|
+          #if a directory...
+	
+          if(test(?d,x))
+            # add to the original list of directories
+            @@tmproot = x + "/**"
+            #adds the new ones to the array
+            
+            bnotearray = Dir[@@tmproot].entries.sort
+            bnotearray.each do |x|
+              if(test(?d,x))
+                anotearray.push(x)  #appends to the end of the array...
+              end
+            end
+          end
+        end
+        anotearray.each do |x|
+                #if it is a file...
+		p x
+                if(!test(?d,x))
+                        anotearray.delete(x)
+                  else              #it is a directory...
+                        findnotefiles(x + "/**")
+                end
+        end
+         @noterecordsresult = $notesarray.entries.sort.rwd_method("fillhypernotename")
+      end  

data/code/superant.com.hypernote/listlinknotes.rb

@@ -0,0 +1,33 @@
+# this code is to list the internal links
+
+
+def fillhypernotelinksname(inffile)
+  applet                = inffile.gsub(/\.txt$/, "")
+  @a_viewhypernote  = applet
+  
+end
+
+
+  
+def listlocalnotelinks
+ filenamestoopenarray = [" "]
+        if @a_viewhypernote
+        begin
+        fileName =@a_viewhypernote + ".lnk" 
+         
+        fd = File.open(fileName,"r")
+	                  while ! fd.eof?
+	        templinkline = fd.readline.chomp
+         filenamestoopenarray = filenamestoopenarray | ["#{templinkline}"]
+        end   
+           fd.close
+           @noterecordsresult = " "
+         @localnotelinksrecordsresult =  filenamestoopenarray .rwd_method("fillhypernotelinksname")
+      rescue
+      @localnotelinksrecordsresult = "error opening  #{fileName} file"
+      end # end of error function
+     
+      end
+     end 
+
+  

data/code/superant.com.hypernote/loadconfigurationrecord.rb

@@ -0,0 +1,34 @@
+   # this method puts the configuration rexord on the screen
+  def loadrwdhypernoteconfiguration
+ 
+         require 'fileutils'
+          
+               @a_hypconfigurationfilename = "rwdhypernote.cnf" 
+        
+	      
+        begin # exception trapped block
+       
+       Dir.chdir($progdir)
+	      fileName = File.join(ConfigurationDir, "rwdhypernote.cnf")
+        
+        
+	      fd = File.open(fileName,"r")
+	      @a_hypconfigline1=        fd.readline.chomp
+	      @a_hypconfigline2 =  fd.readline.chomp
+        @a_hypconfigline3 = fd.readline.chomp
+          @a_hypconfigline4 = fd.readline.chomp
+        @a_hypconfigline5 = fd.readline.chomp
+         @a_hypconfigline6 = fd.readline.chomp 
+          @a_hypconfigline7 =fd.readline.chomp
+          @a_hypconfigline8 = fd.readline.chomp
+           @a_hypconfigline9 = fd.readline.chomp
+	 
+	      while ! fd.eof?
+	        @extrahypconfigdatadisplay = fd.readline
+	      end
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

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

@@ -0,0 +1,13 @@
+   # this method loads the on screen variables into the running class
+   def loadrwdhypernoteconfigurationvariables
+   
+   configfiletoload = File.join(ConfigurationDir,"rwdhypernote.cnf")
+   begin
+    load configfiletoload
+    @extrahypconfigdatadisplay = ""
+@newhypconfigurationresult = "Config Variables loaded"
+rescue
+ @extrahypconfigdatadisplay = ""
+ @newhypconfigurationresult = "loading error"
+ end
+  end

data/code/superant.com.hypernote/loadlinksrecord.rb

@@ -0,0 +1,21 @@
+   # this method views an existing  record
+  def rwdhypernotesloadlinksrecord
+ 
+         require 'fileutils'
+        
+	      
+        begin # exception trapped block
+       
+       
+	      fileName =  @a_viewlinksnote 
+        
+	      fd = File.open(fileName,"r")
+	      @a_notelinksdata =        fd.read
+	   	      
+	      
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

data/code/superant.com.hypernote/loadnoterecord.rb

@@ -0,0 +1,24 @@
+   # this method views an existing address record
+  def loadnoterecord
+ 
+         require 'fileutils'
+        @a_eventfilename = $currenteventtext
+	      
+        begin # exception trapped block
+       
+       
+	      fileName =  @a_viewhypernote + ".txt"
+        
+	      fd = File.open(fileName,"r")
+	      @a_notedata =        fd.read
+	      
+        
+	      
+	      
+	      
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

data/code/superant.com.hypernote/openhelpwindowrwdhyernote.rb

@@ -0,0 +1,34 @@
+# this code is to call the help window
+def runhelpwindowrwdhypernote
+
+     $help_topic = "rwdhypernote_generalhelp"
+   
+   if @rwd_tab == "utilitiesrwdhyperedit"
+        $help_topic = "hypernoteutility_help"
+   end
+     
+   if @rwd_tab == "superantcomeditnoterecordfile"
+        $help_topic = "hypernoteedit_help"
+   end
   
+   if @rwd_tab == "rwdhypernoteeditlinksrecordfile" 
+      
+    $help_topic = "hypernotelinks_help"
+   end 
+   
+  
+   
+  if @rwd_tab == "viewrwdhypernoteconfiguration"
+  $help_topic = "rwdhypernote_configuration"
+  end
+   $helptopicsarray =  $helptopicsarray | ["hypernoteedit_help","rwdhypernote_help","hypernotelinks_help","rwdhypernote_configuration"]
+  
+   
+  
+ if @rwd_window != "rwdtinkerhelpwindow"
+       $previouswindow = @rwd_window
+      $previoustab = @rwd_tab
+  end
+  runhelpwindow
+end
+
+

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

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

data/code/superant.com.hypernote/runrwdhypernotconfiguration.rb

@@ -0,0 +1,12 @@
+# Application RwdTinker orginally (c) 2004 Steven Gibson under GPL. 
+# This application is a framework for writing programs from RubyWebDialogs
+# http://www.erikveen.dds.nl/rubywebdialogs/index.html 
+# For more information about RwdTinker see http://www.rubyforge.net/projects/rwdapplications
+  
+  # call the window  
+
+  def runrwdhypernoteconfiguration
+   @rwd_window = "rwdhypernotebackwindow"
+   @rwd_tab = "viewrwdhypernoteconfiguration"
+   end   
+   

data/code/superant.com.hypernote/runrwdhypernotebackwindow.rb

@@ -0,0 +1,12 @@
+# Application RwdTinker orginally (c) 2004 Steven Gibson under GPL. 
+# This application is a framework for writing programs from RubyWebDialogs
+# http://www.erikveen.dds.nl/rubywebdialogs/index.html 
+# For more information about RwdTinker see http://www.rubyforge.net/projects/rwdapplications
+  
+  # call the window  
+
+  def runrwdhypernotebackwindow
+   @rwd_window = "rwdhypernotebackwindow"
+   @rwd_tab = "superantcomeditnoterecordfile"
+   end   
+   

data/code/superant.com.hypernote/rwdhypernotehelpabout.rb

@@ -0,0 +1,14 @@
+# Application RwdTinker orginally (c) 2004 Steven Gibson under GPL. 
+# This application is a framework for writing programs from RubyWebDialogs
+# http://www.erikveen.dds.nl/rubywebdialogs/index.html 
+# For more information about RwdTinker see http://www.rubyforge.net/projects/rwdapplications
+  
+  # return the version constant defined in the config file
+  def runrwdhypernoteversion
+  @rwd_window = "applicationversion"
+  @versionappnamedisplay = "RwdHyperNote"
+  @versioncopyrightdisplay = "(c) 2004 Steven Gibson "
+  @versionnumberdisplay =  "Version " + RwdHyperNoteVersion
+
+   end
+  

data/code/superant.com.hypernote/rwdtinkerversion.rb

@@ -0,0 +1,10 @@
+# Application RwdTinker orginally (c) 2004 Steven Gibson under GPL. 
+# This application is a framework for writing programs from RubyWebDialogs
+# For  information see http://www.rubyforge.net/projects/rwdapplications
+
+# return the version constant defined in the config file
+def rwdhypernotehelpaboutsetup
+return ["Hypernote","(c) 2004,2005 Steven Gibson ","Version #{RwdHyperNoteVersion}"]
+end
+
+

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

@@ -0,0 +1,18 @@
+  # this method adds a new address record
+  def saverwdhypernoteconfiguration
+   require 'fileutils'
+   
+   newname = "rwdhypernote.cnf" # grab the filename to create
+   newdata =@a_hypconfigline1.to_s + "\n" + @a_hypconfigline2.to_s + "\n" + @a_hypconfigline3.to_s + "\n" + @a_hypconfigline4.to_s + "\n" + @a_hypconfigline5.to_s + "\n" + @a_hypconfigline6.to_s + "\n" + @a_hypconfigline7.to_s + "\n" + @a_hypconfigline8.to_s + "\n" + @a_hypconfigline9.to_s + "\n"
+	 
+        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.hypernote/savehypernoterecord.rb

@@ -0,0 +1,20 @@
+  # this method adds a new  record
+  def savehypernoterecord
+   require 'fileutils'
+    if ! @a_notedata.empty?
+   if ! @a_viewhypernote.empty?
+   fileName =   @a_viewhypernote.to_s + ".txt" # grab the new filename to create
+  
+	
+        begin # exception trapped block
+       
+        	fd = File.open(fileName,"w")
+	        fd.print(  @a_notedata) # save the record info to the file
+	        fd.close
+      
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+    end
+    end
+  end

data/code/superant.com.hypernote/savelinkrecord.rb

@@ -0,0 +1,23 @@
+  # this method adds a new  record
+  def hypernotesavelinkrecord
+   require 'fileutils'
+    if ! @a_notelinksdata.empty?
+   if ! @a_viewlinksnote.empty?
+   fileName = "%s" %   [@a_viewlinksnote] # grab the new filename to create
+  
+	
+        begin # exception trapped block
+       
+        	fd = File.open(fileName,"w")
+	        fd.print(  @a_notelinksdata) # save the record info to the file
+	        fd.close
+      
+    p fileName
+   p @a_notelinksdata 
+      
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+    end
+    end
+  end

data/code/superant.com.rwdaddresses/attachtmpcontactphoto.rb

@@ -0,0 +1,24 @@
+# this code is to attach a photo from the tmp directory
+def attachtmpcontactphoto
+	if @a_viewnamedata
+		$currentnametext = @a_viewnamedata
+	end
+	if $currentnametext
+		tmpcontactphotoName =  $tmpphoto_directory + "/" + @a_tmpphotoname
+		begin 
+			if  File.exist?(tmpcontactphotoName)
+				newcontactphotoName =  $tmpphoto_directory + "/" + $currentnametext + ".jpg"
+				if ! (tmpcontactphotoName == newcontactphotoName )
+					File.rename(tmpcontactphotoName, newcontactphotoName)
+				end
+				@listphotosfromtmp = "Photo attached"
+				FileUtils.cp(newcontactphotoName , $addressfiles_directory) 
+			else 
+				@listphotosfromtmp = "attachment failed"
+			end
+		rescue
+			@listphotosfromtmp = "attachment failed"
+		end       
+	end
+end
+

data/code/superant.com.rwdaddresses/clearscreendisplay.rb

@@ -0,0 +1,15 @@
+# this method clears the on screen variables
+def clearnamescreendisplay
+
+	@a_filename = ""
+	@a_name =        ""
+	@a_address = ""
+	@a_citystatezip  = ""
+	@a_phone = ""
+	@a_email = ""        
+	@a_comment1 = "" 
+	@a_comment2 = "" 
+	@a_comment3 = ""
+	@extranamedatadisplay = ""
+end
+

data/code/superant.com.rwdaddresses/createnewnamerecord.rb

@@ -0,0 +1,19 @@
+# this method adds a new address record or saves changes
+def createnewnamerecord 
+	require 'fileutils'
+	if @a_filename 
+		newname = "%s" %   [@a_filename] # grab the new filename to create
+		newdata =@a_name.to_s + "\n" + @a_address.to_s + "\n" + @a_citystatezip.to_s + "\n" + @a_phone.to_s + "\n" + @a_email.to_s + "\n" + @a_comment1.to_s + "\n" + @a_comment2.to_s + "\n" + @a_comment3.to_s + "\n"
+		fullnewname = newname + ".nam"
+		begin # exception trapped block
+			fileName = File.join($addressfiles_directory, fullnewname )
+			fd = File.open(fileName,"w")
+			fd.print(newdata) # save the record info to the file
+			fd.close
+			@createnewnamerecorddisplay=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.rwdaddresses/deletecontactrecord.rb

@@ -0,0 +1,25 @@
+# this method deletes an address record
+def deletecontactrecord
+
+	require 'fileutils'
+
+	if @a_viewnamedata
+		$currentnametext =  @a_viewnamedata
+	end
+
+	fileName = $addressfiles_directory + "/" + $currentnametext + ".nam"
+	$stderr.print fileName
+
+	begin # exception trapped block
+
+		File.delete(fileName)
+		fileNamephoto = $addressfiles_directory + "/" + $currentnametext + ".jpg"
+		if  File.exist?(fileNamephoto)
+			File.delete(fileNamephoto)
+		end
+	rescue SystemCallError, StandardError
+		$stderr.print "system call error: " + $!
+	end # exception rescue
+
+end
+

data/code/superant.com.rwdaddresses/deleterwdaddressesupdatefiles.rb

@@ -0,0 +1,19 @@
+# this code is to delete update files
+def  deleterwdaddressesupdatefiles
+	# exception begin
+	begin 
+		fileListarray      = Dir.new($rwdaddresses_updatedirectory).entries.sort.delete_if { |x| ! (x =~ /nam$/) }
+		#loop through and get the files names
+
+		fileListarray.each do |x|
+			filetodelete = File.join($rwdaddresses_updatedirectory,x)
+			if File.exist?(filetodelete)
+				File.delete(filetodelete)
+			end
+		end
+		@rwdaddressesftpdisplay = "update files deleted"
+	rescue 
+		@rwdaddressesftpdisplay = "error opening schedule update directory"
+	end # end of error function
+end
+

data/code/superant.com.rwdaddresses/downloadrwdaddressfiles.rb

@@ -0,0 +1,36 @@
+# down load address
+def downloadrwdaddressfiles
+	require 'net/ftp'
+	BasicSocket.do_not_reverse_lookup = true 
+	@rwdaddressesftpdisplays = ""
+	begin
+		ftp = Net::FTP::new($rwdaddresses_ftpsite)
+		@rwdaddressesftpdisplay  = "files downloaded" + "\n" 
+		ftp.debug_mode = false
+		ftp.login($rwdaddresses_ftplogin, $rwdaddresses_ftppassword)
+		ftp.chdir($rwdaddresses_ftpdirectory)
+		print "I'm in the directory ", ftp.pwd(), "\n"
+		schfiles = ftp.nlst($rwdaddresses_ftpdirectory) 
+		schfiles.each do |x|
+			#adjust the filters to the files you want to see...
+			
+				if x =~ /nam/
+					 newstring = x
+               localupdatefile = File.join($rwdaddresses_updatedirectory, "#{x}")
+               ftp.getbinaryfile("#{x}" , localupdatefile )
+					
+					@rwdaddressesftpdisplay  =   @rwdaddressesftpdisplay + newstring + "\n"                               
+				end
+			
+
+		end
+		ftp.close
+
+	rescue
+		if ftp
+			ftp.close
+		end
+		@rwdaddressesftpdisplay = "ftp error"
+	end
+end
+