bigtinker 0.93

data/init.rb

@@ -0,0 +1,277 @@
+
+#***********************************************************************
+#* Rwd/Tinker -- A Ruby program for the RudyWebDialog.
+#* Copyright (c) 2004, 2005 by Steven Gibson. All Rights Reserved.
+#*
+#* This library is free software; you can redistribute it and/or
+#* modify it under the terms of the GNU General Public
+#* License as published by the Free Software Foundation; either
+#* .
+#*
+#* These files are distributed in the hope that they will be useful,
+#* but WITHOUT ANY WARRANTY; without even the implied warranty of
+#* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+#* General Public License for more details.
+#*
+#* You should have received a copy of the GNU General Public
+#* License along with these files; if not, write to the Free Software
+#* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+#*
+#* For further information please contact the author by e-mail
+#* at "steven@superant.com".
+#***********************************************************************/
+
+require "ev/rwd"
+require 'fileutils'
+require 'extras/rconftool'
+
+$progdir = File::expand_path( File.dirname(__FILE__))
+
+$tempdoc = " "
+
+def findfiles(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 rwd files
+			if x =~ /rb|rwd|txt/
+				fileA=File.open("#{x}","r")        #opens the file thats in fileName as read only
+				$tempdoc+=fileA.read    #reads the file into the doc string
+				fileA.close    
+			end
+		end
+	end
+end
+def loadguifile(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 rwd files
+			if x =~ /rb|rwd|txt/
+
+				load x      #opens the file thats in fileName and reads it
+				$tempdoc += $rwdguivar # adds the file into the doc string
+			end
+		end
+	end
+end 
+
+# integrate the new configuration files
+MAINconfignew =  "rwdconfig.cnf"
+MAINconfigdist = "rwdconfig.dist"
+Rconftool::install(MAINconfigdist,MAINconfignew)
+
+#load main config file
+load 'rwdconfig.cnf'
+
+Dir.chdir("configuration")    #changes the current working directory
+
+fileList = Dir.new(".").entries.sort.reverse.delete_if { |x| ! (x =~ /dist$/) } #creates an Array separated with \n
+@doc = ""
+fileList.length.times{               #opening of a block
+configdist =fileList.pop                #pops the first item out of the Array
+tempconfigfile = configdist.gsub(/\.dist$/, "")
+confignew = tempconfigfile + ".cnf"
+Rconftool::install(configdist,confignew)     #integrates new file with old 
+  }       #closing block
+  # END of configuration integration 
+  Dir.chdir($progdir)
+
+  # Read in the configuration files
+  Dir.chdir("configuration")    #changes the current working directory
+
+  fileList = Dir.new(".").entries.sort.reverse.delete_if { |x| ! (x =~ /cnf$/) } #creates an Array separated with \n
+  @doc = ""
+  fileList.length.times{               #opening of a block
+  fileName=fileList.pop                #pops the first item out of the Array
+  load fileName     #loads the the config file thats in fileName 
+  }       #closing block
+  # END of configuration reading 
+
+  Dir.chdir($progdir) # change back to top program directory
+
+  # build the English Language hash file from the parts
+  languagehashvariable = 'Message = Hash.new { |hh, kk| hh[kk] = "ERROR: Message not found: #{kk.inspect}."; hh[kk] }
+  langmessage = {' + "\n"
+  startlangdir = File.join(LangDir,"en")
+  #get a list of the files and subdirectories on the starting directory only
+  alanghash = Array.new(Dir[startlangdir].entries.sort)
+  #loop through the list, ignore the files and add all new directories found
+  alanghash.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
+		  blanghash = Dir[@@tmproot].entries.sort
+		  blanghash.each do |x|
+			  if(test(?d,x))
+				  alanghash.push(x)  #appends to the end of the array...
+			  end
+		  end
+	  end
+  end
+  alanghash.each do |x|
+	  #if it is a file...
+	  if(!test(?d,x))
+		  alanghash.delete(x)
+	  else              #it is a directory...
+		  findfiles(x + "/**")
+	  end
+  end
+
+
+  #writes the contents of doc into the  languagehashvariable 
+  languagehashvariable  =  languagehashvariable + $tempdoc + "}  ; langmessage.each { |kk, vv| Message[kk] = vv }"
+
+  # END of en Lang building
+  $tempdoc = " "
+  Dir.chdir($progdir) # change back to top program directory
+
+  # build the local Language hash file from the parts
+  startlangdir = File.join(LangDir,$lang)
+  #get a list of the files and subdirectories on the starting directory only
+  alanghash = Array.new(Dir[startlangdir].entries.sort)
+  #loop through the list, ignore the files and add all new directories found
+  alanghash.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
+		  blanghash = Dir[@@tmproot].entries.sort
+		  blanghash.each do |x|
+			  if(test(?d,x))
+				  alanghash.push(x)  #appends to the end of the array...
+			  end
+		  end
+	  end
+  end
+  alanghash.each do |x|
+	  #if it is a file...
+	  if(!test(?d,x))
+		  alanghash.delete(x)
+	  else              #it is a directory...
+		  findfiles(x + "/**")
+	  end
+  end
+
+
+  #writes the contents of doc into the variable
+  languagehashvariable =  languagehashvariable  + " ; Message.update(" + $tempdoc + ' :rwdtinker => "Rwdtinker" ) '
+
+
+  $tempdoc = " "
+
+  Dir.chdir($progdir) # change back to top program directory
+
+  temp = eval(   languagehashvariable )
+
+  $tempdoc = " "
+
+  # build the actual program from the code parts
+  #get a list of the files and subdirectories on the starting directory only
+  a = Array.new(Dir[CodeDir].entries.sort)
+  #loop through the list, ignore the files and add all new directories found
+  a.each do |x|
+	  #if a directory...
+	  if(test(?d,x))
+		  # add to the original list of directories
+		  @@root = x + "/**"
+		  #adds the new ones to the array
+		  b = Dir[@@root].entries.sort
+		  b.each do |x|
+			  if(test(?d,x))
+				  a.push(x)  #appends to the end of the array...
+			  end
+		  end
+	  end
+  end
+  a.each do |x|
+	  #if it is a file...
+	  if(!test(?d,x))
+		  a.delete(x)
+	  else              #it is a directory...
+		  findfiles(x + "/**")
+	  end
+  end
+
+
+  # load the program file
+  tempcoderesult = eval( $tempdoc )
+
+  # build the actual GUI from the gui parts
+  $tempdoc = " "
+  #get a list of the files and subdirectories on the starting directory only
+  a = Array.new(Dir[GuiDir].entries.sort)
+  #loop through the list, ignore the files and add all new directories found
+  a.each do |x|
+	  #if a directory...
+	  if(test(?d,x))
+		  #use this new dir find to add to the original list of directories
+		  @@root = x + "/**"
+		  #adds the new ones to the array
+		  b = Dir[@@root].entries.sort
+		  b.each do |x|
+			  if(test(?d,x))
+				  a.push(x)  #appends to the end of the array...
+			  end
+		  end
+	  end
+  end
+  a.each do |x|
+	  #if it is a file...
+	  if(!test(?d,x)) 
+		  a.delete(x)
+
+	  else #it is a directory...
+		  loadguifile(x + "/**")
+	  end
+  end
+
+  # gui variable is done
+  guiRWD = $tempdoc
+
+  require 'socket'		# Network stuff
+  host = "127.0.0.1"
+  port = $port
+
+  # Create a socket to listen on and bind it to the host and port 
+  freeportfound = false
+  until freeportfound
+	  begin
+		  @socket = UDPSocket::new()
+		  @socket.bind(host, port)
+		  freeportfound = true
+		  $port = port
+		  # Rescue the "Address in use" error
+	  rescue Errno::EADDRINUSE
+		  puts "RWD Startup: Port #{port} on host #{host} is already in use."
+		  port=port +1
+		  puts "trying port: #{port}"
+		  # Rescue the "Address not available' error
+	  rescue Errno::EADDRNOTAVAIL
+		  puts "RWD Startup: Address #{host} is not available to bind."
+		  port =port + 1
+		  puts "trying port: #{port}"
+		  # Rescue "permission denied errors
+	  rescue Errno::EACCES
+		  puts "RWD Startup: Access denied when binding interface addresses. ?"
+		  port =port + 1
+		  puts "trying port: #{port}"
+		  # Rescue all other errors
+	  rescue
+		  puts "RWD Startup: An error occured."
+		  port =port + 1
+		  puts "trying port: #{port}"
+		  # Rescue all other errors
+	  end
+
+  end
+
+
+  RwdTinker.new(  guiRWD).serve(port) # start the main class and program

data/installed/gutenbergdata01.inf

@@ -0,0 +1,3 @@
+#rwdgutenberg - sample data #1
+Books/8sam810.txt
+Books/Sam2.gut

data/installed/hypernotedata1.inf

@@ -0,0 +1,12 @@
+#rwdhypernote data
+Notes/changes.lnk
+Notes/changes.txt
+Notes/hypernote
+Notes/hypernote/hypernote01.txt
+Notes/hypernote/hypernote02.txt
+Notes/hypernote/newnote3.txt
+Notes/rwdtinker/newnote.txt
+Notes/rwdtinker/rwdtinker01.txt
+Notes/rwdtinker/RwdtinkerProgrammingQuickStart.lnk
+Notes/rwdtinker/RwdtinkerProgrammingQuickStart.txt
+Notes/rwdtinker/testnote2.txt

data/installed/rwdaddressesdata2.inf

@@ -0,0 +1,8 @@
+# rwdaddresses sample data
+names/Angelina Jolie.nam
+names/Steven Gibson.nam
+names/Angelina Jolie.jpg
+names/Steven Gibson.jpg
+names/nophoto.jpg
+names/elektra.nam
+names/elektra.jpg

data/installed/rwdgutenberg-0.03.inf

@@ -0,0 +1,9 @@
+#rwdgutenberg - text reading frontend
+configuration/rwdgutenberg.dist
+gui/frontwindowselections/superant.com.rwdgutenberg
+gui/frontwindowtdocuments/superant.com,rwdgutenbergdocument
+gui/helpaboutinstalled/superant.com.rwdgutenberghelpabout
+gui/tinkerbackwindows/superant.com.gutenberg
+gui/tinkerbackwindows/superant.com.gutendisplay
+rwd_files/HowTo_Gutenberg.txt
+code/superant.com.gutenberg

data/installed/rwdviewlogo-0.4.inf

@@ -0,0 +1,4 @@
+# rwdviewlogo - small applet to display one picture
+code/dd0viewphoto
+gui/cc0viewphoto
+rwd_files/tinker.png

data/installed/rwdwaddresses-1.04.inf

@@ -0,0 +1,13 @@
+# rwdaddresses
+code/superant.com.rwdaddresses
+gui/frontwindowselections/superant.com.rwdaddressessyncselectiontab
+gui/frontwindowselections/superant.com.rwdaddressesselectiontab
+gui/frontwindowtdocuments/superant.com.addressesdocuments
+gui/helpaboutinstalled/superant.com.rwdaddresseshelpabout
+gui/tinkerbackwindows/superant.com.rwdaddresses
+gui/tinkerbackwindows/superant.com.addressesphotowindow
+gui/tinkerbackwindows/superant.com.rwdaddressessyncbackwindow
+rwd_files/HowTo_Addresses.txt
+rwd_files/contacttmp.jpg
+configuration/rwdaddresses.dist
+tests/makerwdwaddresses-1.04.rb

data/installed/rwdwhypernote-0.07.inf

@@ -0,0 +1,7 @@
+# rwdwhypernote - hierarchical note editor
+code/superant.com.hypernote
+configuration/rwdhypernote.dist
+gui/frontwindowtdocuments/superant.com.rwdhypernotedocument
+gui/helpaboutinstalled/superant.com.rwdhypernotehelpabout
+gui/tinkerbackwindows/superant.com.hypernote
+rwd_files/HowTo_HyperNote.txt

data/installed/rwdwwords-0.02.inf

@@ -0,0 +1,10 @@
+## rwdwords
+configuration/rwdwords.dist
+code/superant.com.words
+extras/dict.rb
+gui/frontwindowtdocuments/superant.com.wordsdocuments
+gui/helpaboutinstalled/superant.com.wordshelpabout
+gui/frontwindowselections/superant.com.words
+gui/tinkerbackwindows/superant.com.refreshwindow
+gui/tinkerbackwindows/superant.com.words
+rwd_files/Howto_Words.txt

data/lang/en/rwdcalendar/calendar-en.rb

@@ -0,0 +1,6 @@
+# Lang file for rwdclandar - en
+
+  :year    => "Year:",
+  :month  => "Month:", 
+   :show_month => '"Show Month"',
+

data/lang/en/rwdcore/languagefile.rb

@@ -0,0 +1,16 @@
+# English Language files for RwdTinker core
+
+   
+      :applet_installed          => "applet installed!.",
+      :clickfor_version         => '"click for version"',
+      :documents              => '"Documents"',
+       :help => '"Help"',
+      :module_unknown              => "Module unknown",     
+      :next                    => '"Next"',    
+      :rwdtinker_window_2      => "RwdTinker Window 2",
+      :rwdtinker               => "RwdTinker",
+      :rwdtinker_help_window => '"RwdTinker Help Window"',
+      :rwdtinker_back_window   => '"RwdTinker Back Window"',
+      :rwdtinker_help => '"RwdTinker Help"',
+        :tinker_logo         => "Tinker Logo",
+      :selection_panel => '"Selection Panel"', 

data/lang/es/rwdcalendar/calendar-nl.rb

@@ -0,0 +1,6 @@
+# Lang file for rwdclandar - nl
+
+  :year    => "Jaar:",
+  :month  => "Maand:", 
+  
+

data/lang/es/rwdcore/languagefile-es.rb

@@ -0,0 +1,14 @@
+      :applet_installed          => "applet instalado! ",
+      :clickfor_version         => '"click para version"',
+      :documents              => '"Documentos"',
+        :help => '"Ayuda"',
+      :module_unknown            => "Module desconocido.",
+      :next                    => '"Siguiente"',
+      :rwdtinker               => "RwdTinker",
+      :rwdtinker_help_window => '"RwdTinker Ventana Ayuda"',
+       :rwdtinker_help => '"RwdTinker Ayuda"',
+      :rwdtinker_window_2     => "RwdTinker Ventana 2",
+      :rwdtinker_back_window   => '"RwdTinker Ventana Trasera"',
+      :tinker_logo         => "Insignia de Tinker",
+      :selection_panel => '"Selecci�n Panel"', 
+

data/lang/jp/rwdcore/languagefile.rb

@@ -0,0 +1,9 @@
+# Japanese Language files for RwdTinker core
+
+      :module_unknown              => "Module unknown",
+      :applet_installed          => "applet installed!.",
+      :clickfor_version         => '"click for version"',
+      :rwdtinker_window_2      => "RwdTinker Window 2",
+      :rwdtinker               => "RwdTinker",
+      :selection_panel    => "せんた&#12367",
+      :documents            => "オンラインマニュア&#12523",

data/lang/nl/rwdcalendar/calendar-nl.rb

@@ -0,0 +1,6 @@
+# Lang file for rwdclandar - nl
+
+  :year    => "Jaar:",
+  :month  => "Maand:" ,
+  :show_month => '"Zie Maand"',
+

data/lang/nl/rwdcore/languagefile.rb

@@ -0,0 +1,19 @@
+# English Language files for RwdTinker core
+
+      :cancel                  =>  '"Annuleren"',
+  :open                    =>  '"Openen"',
+  :save                    =>  '"Opslaan"',
+  :window                  =>  '"Venster"',
+  :applet_installed        =>  '"Applet geinstalleerd"',
+  :clickfor_version        =>  '"Klier hier voor de Versie"',
+  :documents               =>  '"Documenten"',
+  :help                    =>  '"Help"',
+  :module_unknown          =>  '"Module onbekend"',
+  :next                    =>  '"Volgende"',
+  :rwdtinker               =>  '"RWDTinker"',
+  :rwdtinker_help_window   =>  '"RWDTinker Help Venster"',
+  :rwdtinker_help          =>  '"RWDTinker Help"',
+  :rwdtinker_window_2      =>  '"RWDTinker Venster 2"',
+  :rwdtinker_back_window   =>  '"RwdTinker Back Venster"',
+  :tinker_logo             =>  '"RWDTinker Logo"',
+  :selection_panel         =>  '"Selectie  Paneel"',

data/lib/temp.rb

@@ -0,0 +1 @@
+# this file does nothing

data/names/Angelina Jolie.nam

@@ -0,0 +1,8 @@
+Angelina Jolie
+
+U.S.A.
+
+
+Actor 
+Lara Croft - Tomb Raider
+Oscar in 2000 for Girl, Interupted

data/names/Angelina Jolie.vcf

@@ -0,0 +1,8 @@
+BEGIN:VCARD
+VERSION:3.0
+FN:Angelina Jolie
+N:Angelina Jolie;;;;
+ADR;type=home,pref:;;home address;U.S.A.;;;rwdaddress
+TEL;type=home:555
+EMAIL;type=home:a@localhost
+END:VCARD

data/names/Steven Gibson.nam

@@ -0,0 +1,5 @@
+Steven Gibson
+P.O. Box 91418
+Pasadena, CA 91109
+562-900-2834
+steven@superant.com

data/names/elektra.nam

@@ -0,0 +1,7 @@
+Elektra
+
+U.S.A.
+
+
+Movie Charactor
+