rwdeliza 0.03

data/gui/tinkerbackwindows/superant.com.tinkerhelpwindow/9end.rwd

@@ -0,0 +1,4 @@
+$rwdguivar=
+"</window>"
+
+

data/gui/tinkerbackwindows/superant.com.versionwindow/1appname.rwd

@@ -0,0 +1,19 @@
+$rwdguivar=
+"
+<window name = \"applicationversion\" title=#{Message[:application_version]}>
+
+ <row> <p></row>
+          <p>%versionappnamedisplay%</p>
+ <row> <p></row>
+<p>%versioncopyrightdisplay%</p>
+
+ <row> <p></row>
+<p>%versionnumberdisplay%</p>
+
+      <horizontal>
+<button caption=#{Message[:return]} action=returntomain/>
+    </horizontal>
+
+</window>"
+
+

data/gui/tinkerbackwindows/superant.com.versionwindow/helpaboutwindow.rwd

@@ -0,0 +1,17 @@
+$rwdguivar=
+"
+<window name=tinkerhelpabout title=#{Message[:help_about]}>
+<horizontal>
+<button caption=#{Message[:showhelpabout_links]} action=\"setuphelpaboutoptions\"/>
+
+</horizontal>
+ <table>
+      <select name=\"a_helpaboutinput\">  %%helpaboutoptions%% </select>
+
+   </table>
+
+      <horizontal>
+      <button caption=#{Message[:openselectedhelp_about]} action=\"runrwdtinkerversion\"/>
+    </horizontal>
+    </window>
+"

data/gui/tinkerbackwindows/superant.com.words/1appname.rwd

@@ -0,0 +1,4 @@
+$rwdguivar=
+"
+<window name = \"rwdwordsbackwindow\" title=\"rwdwords - \">
+<tabs>"

data/gui/tinkerbackwindows/superant.com.words/1dictionary.rwd

@@ -0,0 +1,19 @@
+$rwdguivar=
+"
+<tab name=\"dictlookup\" caption=\"Dictionary Lookup\">  
+	
+	
+	    <table>
+      <row> <p align=\"right\">Word:</p>  <text name=\"a_dictionaryinput\"/> </row>
+
+    </table>
+   
+      <horizontal>
+      <button caption=\"Lookup\" action=\"dictlookup\"/>
+      <button caption=\"Cancel\" action=\"main\"/>
+      
+    </horizontal>
+ <p>%dictionary_display%</p>
+ </tab>
+ "
+	

data/gui/tinkerbackwindows/superant.com.words/3rwdfortune.rwd

@@ -0,0 +1,14 @@
+$rwdguivar=
+"
+  <tab name=\"unixfortunes\" caption=\"Famous Quotes\">
+<table>
+<row> This applet will open a replacement window in this same browser screen</row>
+<row><p> You should see that new window refresh every 15 seconds with </row>
+<row><p> Famous Quotes, if using the include program.</row> 
+<row><p> You can return to this screen by clicking on back arrows or the cancel button</row>
+<row><p> The variable to change the refresh speed in .cnf file</row>
+
+</table>
+    <button caption=\'Start Fortune Refresh\' action=\'runfortunewindow\'/>
+  </tab>"
+

data/gui/tinkerbackwindows/superant.com.words/77jumplinkcommands.rwd

@@ -0,0 +1,17 @@
+$rwdguivar=
+"
+<tab name=RwdwordsMenu caption=Menu>
+<horizontal>
+<button caption=\"Show Jump Links\" action=\"showjumplinkoptions\"/>
+
+</horizontal>
+ <table>
+      <select name=\"a_jumplinkinput\">  %%jumplinkoptions%% </select>
+
+   </table>
+
+      <horizontal>
+      <button caption=\"Jump to Application Location\" action=\"runjumplinkcommand\"/>
+    </horizontal>
+    </tab>
+"

data/gui/tinkerbackwindows/superant.com.words/z9end.rwd

@@ -0,0 +1,6 @@
+$rwdguivar=
+"
+</tabs>
+</window>"
+
+

data/gui/zzcoreguiend/yy9rwdend.rwd

@@ -0,0 +1,4 @@
+$rwdguivar=
+"
+</application>"
+

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 "smalllinux@gmail.com".
+#***********************************************************************/
+
+require "lib/rwd/rwd"
+require 'fileutils'
+require 'lib/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 = ""
+  $rwd_gui_tinker = $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(  $rwd_gui_tinker ).serve(port) # start the main class and program

data/installed/rwdweliza-0.03.inf

@@ -0,0 +1,24 @@
+# rwdweliza - small applet to display one picture
+gui/tinkerbackwindows/superant.com.words
+gui/tinkerbackwindows/superant.com.rwdeliza
+gui/tinkerbackwindows/superant.com.refreshwindow
+code/superant.com.words
+code/superant.com.rwdeliza
+tests/gemspec-rwdweliza
+tests/makedist-rwdweliza.rb
+rwd_files/HowTo_Eliza.txt
+configuration/rwdweliza-0.03.dist
+configuration/rwdweliza-0.03.cnf
+lib/linkparser
+lib/dict.rb
+lib/README
+lib/linguistics
+lib/linkparser.rb
+lib/linguistics.rb
+lib/hashslice.rb
+ElizaData/database
+lib/druida.rb
+ElizaData/words
+ElizaData/tiny.dict
+ElizaData/responses
+

data/installed/temp.rb

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

data/lang/en/rwdcore/languagefile.rb

@@ -0,0 +1,58 @@
+# English Language files for RwdTinker core
+ 
+ :applet_installed  => '"applet installed!"',
+ :application_version => '"Application Version"',
+ :clear => "Clear",
+  :cancel => "Cancel",
+ :clickfor_version => "Click for Version" ,
+ :clickbelowtoviewlistof_zip => '"click below to view lists of zips"',
+ :documents    => '"Documents"',
+ :edit             =>   "edit" , 
+ :file_name => '"File Name:"',
+ :fill_record => '"Fill Record"',
+   :help       => '"Help"',
+ :help_about => '"Help About"',
+ :install_applet => '"install (rwdtinker) applet"',  
+ :jumptoapplication_location => '"Jump to Application Location"', 
+ :list_applets   => '"Remove Applets"',
+ :listappletsinthegem_directory => '"List applets in the Gem Directory"',
+ :listappletsavailablefor_installation => "List applets available for installation",   
+  :list_files => '"List Files"',          
+  :list_installed_gems     => '"List installed Gems"' ,  
+ :list_photos => '"List Photos"',
+ :list_zips => '"List Zips"',
+ :listzipdirappletsavailable => '"List (zip directory) applets available for installation"',
+ :menu_panel  => '"Menu Panel"',
+ :module_unknown         => '"Unknown Module"',
+ :next                   => '"Next"',
+ :open => "Open",
+ :open_document => '"Open Document"',
+ :openselectedhelp_about => '"Open selected help about"',
+ :reload_variables => '"Reload Variables"' ,
+ :remove_applet =>  '"remove applet"',
+ :return => "Return", 
+ :rwdtinker_window_2    => "RwdTinker Window 2",
+ :rwdtinker        => "RwdTinker",
+ :rwdtinker_back_window   => '"RwdTinker Back Window"',
+ :rwdtinker_help => '"RwdTinker Help"',
+ :rwdtinker_help_window => '"RwdTinker Help Window"',
+ :showjump_links => '"Show Jump Links"',
+ :showdocument_list => '"Show Document List"',
+   :showhelpabout_links => '"Show Help About Links"',
+  
+ :save     => "Save" ,   
+ :save_changes   => '"Save Changes"',
+ :selection_panel => '"Menu Panel"',
+ :selection_tab => '"Menu Tab"',
+ :tinker_logo         => "Tinker Logo",
+ :tinkerback_window => '"Tinker Back Window"',
+ :viewapplet_contents => '"View Applet Contents"',
+ :viewalreadyinstalled_applications => '"View already installed GEM applications"',
+ :viewinstalled_text => '"View Install Text"', 
+ :view_platform => '"view platform"', 
+ :viewplatform_information => '"View Platform Information"',  
+ :view_event => '"View event"',       
+ :viewinstall_text => '"View Install Text"' ,  
+ :viewlistinstall_files => '"View List of Installed Files"', 
+ :view_photo => '"View Photo"',  
+ :window     => "Window" ,