bigtinker 0.93

data/code/superant.com.rwdtinkerbackwindow/listzips.rb

@@ -0,0 +1,27 @@
+# this code is to list the zipped applets that can be installed
+def fillziptoinstallname(inffile)
+	applet                = inffile.gsub(/\.zip$/, "")
+	@a_installapplet        = applet
+	
+end
+
+def  listzipfilestoinstall
+	startlangdir = File.join($progdir, $zipslocation )
+	#get a list of the files and subdirectories on the starting directory only
+	
+
+	a = Array.new(Dir["#{startlangdir}/*"].entries.sort)
+
+	#loop through and get the files names
+	a.each do |x|
+		# only zip files
+		if x =~ /\.zip/
+			#  puts "#{x}"        #adds the file to the array to display on the screen
+			$zipsarraylocal =  $zipsarraylocal | ["#{x}"] 
+		end
+
+	end
+	
+	@zipslistresult = $zipsarraylocal.rwd_method("fillziptoinstallname")
+end 
+

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

@@ -0,0 +1,39 @@
+# this method puts the configuration rexord on the screen
+def loadconfigurationrecord
+
+	require 'fileutils'
+	if TinkerWin2ConfigurationFileName 
+		@a_configurationfilename = TinkerWin2ConfigurationFileName 
+	end
+
+	begin # exception trapped block
+
+		Dir.chdir($progdir)
+		fileName = File.join(ConfigurationDir, TinkerWin2ConfigurationFileName)
+
+		fd = File.open(fileName,"r")
+		@a_configline1=        fd.readline.chomp
+		@a_configline2 =  fd.readline.chomp
+		@a_configline3 = fd.readline.chomp
+		@a_configline4 = fd.readline.chomp
+		@a_configline5 = fd.readline.chomp
+		@a_configline6 = fd.readline.chomp 
+		@a_configline7 =fd.readline.chomp
+		@a_configline8 = fd.readline.chomp
+    @a_configline9 = fd.readline.chomp
+		@a_configline10 = fd.readline.chomp 
+		@a_configline11 =fd.readline.chomp
+		@a_configline12 = fd.readline.chomp
+    @a_configline13 =fd.readline.chomp
+		@a_configline14 = fd.readline.chomp
+
+		while ! fd.eof?
+			@extraconfigdatadisplay = fd.readline
+		end
+		fd.close
+	rescue SystemCallError, StandardError
+		$stderr.print "system call error: " + $!
+	end # exception rescue
+
+end
+

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

@@ -0,0 +1,14 @@
+# this method loads the on screen variables into the running class
+def loadconfigurationvariables
+
+	configfiletoload = File.join(ConfigurationDir,TinkerWin2ConfigurationFileName)
+	begin
+		load configfiletoload
+		@extraconfigdatadisplay = ""
+		@newconfigurationresult = "Config Variables loaded"
+	rescue
+		@extraconfigdatadisplay = ""
+		@newconfigurationresult = "loading error"
+	end
+end
+

data/code/superant.com.rwdtinkerbackwindow/network.rb

@@ -0,0 +1,87 @@
+#network
+require 'socket'		# Network stuff
+require 'timeout'		# Timeout functions
+
+def network_start
+	if RUBY_PLATFORM != "i386-mswin32"
+		processone = fork { 
+			network_demon }
+			Process.detach(processone)
+
+		else
+			puts "fork not tried winXP?"
+		end
+		@viewremotecommandresult = "starting controller on next available port"
+	end
+
+	def network_demon
+		# Find configuration variables
+		host = "127.0.0.1"
+		port = $rwdcontrolports[0].to_i
+
+		openportfound = false
+		until openportfound
+
+			# Create a socket to listen on and bind it to the host and port 
+			begin
+				@socket = UDPSocket::new()
+				@socket.bind(host, port)
+				# Rescue the "Address in use" error
+				openportfound = true
+
+			rescue Errno::EADDRINUSE
+				puts "controller startup: Port #{port} on host #{host} is already in use."
+				port=port+1
+				# Rescue the "Address not available' error
+			rescue Errno::EADDRNOTAVAIL
+				puts "Network plugin: Address #{host} is not available to bind."
+				port=port+1
+				# Rescue "permission denied errors
+			rescue Errno::EACCES
+				puts "controller startup: Access denied when binding interface addresses. Did you try to bind a port under 1024 as a regular user?"
+				port=port+1
+				# Rescue all other errors
+			rescue
+				puts "Network plugin: An error occured."
+				port = port+1
+				# Rescue all other errors
+			end
+
+		end
+
+
+		# Get all acceptable hosts 
+		hosts = ["localhost","vaio-sag"] 
+		# Do some nice errorchecking
+		if(hosts.type != Array)
+			puts "Network plugin: No hosts found in networkConfig/acceptHosts. Shutting down plugin."
+			return -1 # Return the errorcode for plugin failure
+		end
+
+		# Main loop 
+		while(true)
+			# Get data and client data from the client
+			data, info = @socket.recvfrom(256)
+
+			# Is this an acceptable IP address?
+			if(hosts.include?(info[2]) || hosts.include?(info[3]))
+				command, parameter = data.split(';')
+
+				# Command actions
+				command.downcase!()
+				case command
+
+				when 'stop'
+					@socket.send("hello world",0,info[3],info[1].to_i)
+
+				when 'query'
+					@socket.send("#{$rwdapplicationidentity} on port #{$port}",0,info[3],info[1].to_i)
+
+
+				end # case command
+
+			end # Access control if
+		end # while(true)
+
+	end # Network::start()
+

data/code/superant.com.rwdtinkerbackwindow/openappletname.rb

@@ -0,0 +1,19 @@
+def openappletname 
+	require 'fileutils'
+	nametext = "%s" % [@a_installlist]
+
+	begin # exception trapped block
+		fileName = "installed/" + nametext + ".inf"
+
+		fd = File.open(fileName,"r")
+		@displaytext = " "
+		while ! fd.eof?
+			@displaytext = fd.read
+		end
+		fd.close
+	rescue
+		@displaytext = "\n" + "error"
+	end # exception rescue
+
+end
+

data/code/superant.com.rwdtinkerbackwindow/openhelpwindowtinkerwin2.rb

@@ -0,0 +1,42 @@
+# this code is to call the help window
+def runhelpwindowtinkerwin2
+
+	# $helptopicsarray =  $helptopicsarray | [""]
+
+	$help_topic = "tinkerwin2_help"
+	if @rwd_tab == "rwdzipslister"
+		$help_topic = "tinkerwin2_help"
+	end
+
+	if @rwd_tab == "filelister" 
+		$help_topic = "applet_viewing"
+
+	end
+	if @rwd_tab == "zipslister" 
+		$help_topic = "applet_installation"
+
+	end
+	if @rwd_tab == "editconfigurationfile"
+		$help_topic = "applet_tinkerbackeditconfiguration"
+
+	end
+	if @rwd_tab == "rwdremotecontrol"
+		$help_topic = "remote_control"
+
+	end
+	if @rwd_tab == "superantcomremotezipsinstall"
+		$help_topic = "remotegemapplet_install"
+	end
+
+	
+	if @rwd_window != "rwdtinkerhelpwindow"
+		$previouswindow = @rwd_window
+		$previoustab = @rwd_tab
+	else
+		$previouswindow = @rwd_window
+		$previoustab = @rwd_tab
+	end
+	runhelpwindow
+end
+
+

data/code/superant.com.rwdtinkerbackwindow/remotegemlist.rb

@@ -0,0 +1,24 @@
+# This tinker method is to retrieve the list of rwdzip applets available to install from the remote repository
+def superantcomremotegemlist
+	gemcommandoption = "search --remote "
+	gemfilename = "rwdzip"
+	commandtext = "gem search --remote rwdzip"  
+	commandtemp = $xpcommand  + commandtext
+	begin # exception trapped block
+		
+		tempremotegemappletsresult = `#{commandtemp}  2>&1`
+		@superantcomremotegemappletsfullresult = tempremotegemappletsresult
+		fileList = tempremotegemappletsresult.split(/\n/).delete_if { |x| ! (x =~ /\Arwdzip/) }
+		
+		@superantcomremotegemappletsresult = fileList.rwd_method("superantcomremotegemappletdirsname")
+	rescue SystemCallError, StandardError
+		@superantcomremotegemappletsresult  = "system call error: " + $!
+	end # exception rescue
+end
+
+def superantcomremotegemappletdirsname(inffile)
+	applet                = inffile
+	@superantcominstallremoteappletinput       = applet
+	
+end
+

data/code/superant.com.rwdtinkerbackwindow/removeapplet.rb

@@ -0,0 +1,33 @@
+# method to remove a tinker applet
+def removeapplet
+	require 'fileutils'
+	nametext = "%s" % [@a_removeapplet]
+
+	begin # exception trapped block
+		fileName = "installed/" + nametext + ".inf"
+		count =  0
+		fd = File.open(fileName,"r") 
+
+
+		fd.each { |oneline|   
+			if count == 1
+				if File.exist?(oneline.chop)
+					FileUtils.rm_rf( oneline.chop)
+				end
+
+			end
+			count = 1
+		}
+		fd.close
+
+		FileUtils.rm_rf( fileName)
+
+
+		@removeapplettext = "applet files removed! - restart rwd to finish uninstalling"    
+
+	rescue
+		@removeapplettext = "\n" + "error"
+
+	end # exception rescue
+
+end

data/code/superant.com.rwdtinkerbackwindow/runremoteinstall.rb

@@ -0,0 +1,11 @@
+# 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
+
+# call the rwdtinker helpwindow  
+
+def runremotezipsinstall
+	@rwd_window = "tinkerbackwindow"
+	@rwd_tab = "superantcomremotezipsinstall"
+end   
+

data/code/superant.com.rwdtinkerbackwindow/runrwdtinkerbackwindow.rb

@@ -0,0 +1,11 @@
+# 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
+
+# call the rwdtinker helpwindow  
+
+def runrwdtinkerbackwindow
+	@rwd_window = "tinkerbackwindow"
+	@rwd_tab = "rwdzipslister"
+end   
+

data/code/superant.com.rwdtinkerbackwindow/rwdtinkerwin2version.rb

@@ -0,0 +1,13 @@
+# 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 runrwdtinkerwin2version
+	@rwd_window = "applicationversion"
+	@versionappnamedisplay = "RwdTinkerWin2"
+	@versioncopyrightdisplay = "(c) 2004 Steven Gibson "
+	@versionnumberdisplay =  "Version " + RwdTinkerWin2Version
+
+end
+

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

@@ -0,0 +1,22 @@
+# this method saves the configuration record
+def saveconfigurationrecord 
+	require 'fileutils'
+	if @a_configurationfilename
+		newname = "%s" %   [@a_configurationfilename] # grab the filename to create
+		newdata =@a_configline1.to_s + "\n" + @a_configline2.to_s + "\n" + @a_configline3.to_s + "\n" + @a_configline4.to_s + "\n" + @a_configline5.to_s +
+    "\n" + @a_configline6.to_s + "\n" + @a_configline7.to_s + "\n" + @a_configline8.to_s + "\n" +
+ @a_configline9.to_s + "\n" + @a_configline10.to_s + "\n" + @a_configline11.to_s + "\n" +
+ @a_configline12.to_s + "\n" + @a_configline13.to_s + "\n" + @a_configline14.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
+end
+

data/code/superant.com.rwdtinkerbackwindow/viewappletcontents.rb

@@ -0,0 +1,22 @@
+#view contents of a tinker applet
+def viewappletcontents
+	require 'fileutils'
+	require 'extras/zip/zip'
+	nametext = "%s" % [@a_installapplet]
+
+	begin # exception trapped block
+		fullname =  nametext + ".zip"
+		fileName = File.join($zipslocation,fullname)
+		tempfilecontents = " "
+		zf = Zip::ZipFile.new(fileName)
+		zf.sort.each {
+			|entry|
+			tempfilecontents =  tempfilecontents + entry.to_s  + "\n"
+		}
+		@appletcontentstext = tempfilecontents 
+
+	rescue
+		@installapplettext = "unzip error - error opening applet"
+	end # exception rescue
+
+end

data/code/superant.com.rwdtinkerbackwindow/viewgemappletcontents.rb

@@ -0,0 +1,24 @@
+#view gem info
+def viewgemappletcontents
+	require 'fileutils'
+	require 'extras/zip/zip'
+	nametext = "%s" % [@a_installapplet]
+
+	begin # exception trapped block
+		fullname =  nametext + ".zip"
+
+		tempfilecontents = " "
+		zf = Zip::ZipFile.new(fullname)
+		zf.sort.each {
+			|entry|
+			tempfilecontents =  tempfilecontents + entry.to_s  + "\n"
+		}
+		@appletcontentstext = tempfilecontents 
+
+	rescue
+		@installapplettext = "unzip error - error opening applet"
+	end # exception rescue
+
+end
+
+

data/code/superant.com.words/dictlookup.rb

@@ -0,0 +1,20 @@
+# dictionary
+  def dictlookup
+  require 'extras/dict'
+if ! @a_dictionaryinput.empty?
+
+  dict = DICT.new('dict.org', DICT::DEFAULT_PORT)
+  dict.client('a Ruby/DICT client')
+  definitions = dict.define(DICT::ALL_DATABASES, @a_dictionaryinput)
+  @dictionary_display = ""
+  if definitions
+    definitions.each do |d|
+   @dictionary_display = @dictionary_display +  d.description  + d.database + "\n"
+      d.definition.each { |line| @dictionary_display = @dictionary_display + line }
+    end
+  end
+
+  dict.disconnect
+  @dictionary_display  = @dictionary_display + "\n\n"
+  end
+end

data/code/superant.com.words/jumplinkupdate.rb

@@ -0,0 +1,6 @@
+#jumplinkupdate 
+
+JumpLink.update(:RwdWordsMainWindow=>"runrwdwordsbackwindow"
+)
+
+$rwdjumplink +=["RwdWordsMainWindow"]

data/code/superant.com.words/runfortunewindow.rb

@@ -0,0 +1,14 @@
+# fortune method
+  def runfortunewindow
+    
+     fortunerefreshwindowtwo
+  end
+
+  $tempnumber  = 0
+ 
+  def fortunerefreshwindowtwo
+    @rwd_window	= "fortunerefreshwindowtwo"
+
+
+    @fortunerefreshvariable = `#{FortuneCommand}`
+  end

data/code/superant.com.words/runrwdwordsbackwindow.rb

@@ -0,0 +1,10 @@
+# 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 runrwdwordsbackwindow
+   @rwd_window = "rwdwordsbackwindow"
+   @rwd_tab = "dictlookup"
+   end   
+   

data/code/superant.com.words/runrwdwordsversion.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 runrwdwordsversion
+  @rwd_window = "applicationversion"
+  @versionappnamedisplay = "RwdWords"
+  @versioncopyrightdisplay = "(c) 2005 Steven Gibson "
+  @versionnumberdisplay =  "Version " + RwdWordsVersion
+
+   end
+  

data/code/superant.com.words/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 rwdwordshelpaboutsetup
+return ["RwdWords","(c) 2004,2005 Steven Gibson ","Version #{RwdWordsVersion}"]
+end
+
+

data/code/zz0applicationend/zz0end.rb

@@ -0,0 +1,4 @@
+
+
+end # end of rwdtinker class
+	

data/configuration/bigtinker.dist

@@ -0,0 +1,3 @@
+##VERSION:0.93
+$tinkerhelpaboutarray += ["BigTinker"]
+BigTinkerVersion = "0.93"

data/configuration/language.dist

@@ -0,0 +1,7 @@
+##VERSION:1.62
+#language selection file
+##NAME:$lang:0
+#$lang = "jp"
+$lang= "en"
+#$lang= "nl"
+#$lang= "es"

data/configuration/rwdaddresses.dist

@@ -0,0 +1,21 @@
+##VERSION:1.04
+#rwdaddresses contact book
+$photodelay = 1
+##NAME:$addressfiles_directory:0
+$addressfiles_directory="names"
+##NAME:$tmpphoto_directory:0
+$tmpphoto_directory   = "/tmp"
+##NAME:$rwdaddresses_ftpsite:0
+$rwdaddresses_ftpsite = "ftp.mysite.com"
+##NAME:$rwdaddresses_ftplogin:0
+$rwdaddresses_ftplogin = "mylogin"
+##NAME:$rwdaddresses_ftppassword:0
+$rwdaddresses_ftppassword = "mypassword"
+##NAME:$rwdaddresses_ftpdirectory:0
+$rwdaddresses_ftpdirectory = "/incoming/rwdnames/"
+##NAME:$rwdaddresses_updatedirectory:0
+$rwdaddresses_updatedirectory = "updates"
+$testharnessarray += ["rwdaddresses_all_tests"]
+$tinkerdocumentsarray += ["HowTo_Addresses.txt"]
+$tinkerhelpaboutarray += ["RwdAddresses"]
+RwdAddressesVersion = "1.04"

data/configuration/rwdapplicationidentity.dist

@@ -0,0 +1,3 @@
+##VERSION:1.63
+$rwdapplicationidentity = "rwdtinker main application"
+

data/configuration/rwdcalc.dist

@@ -0,0 +1,8 @@
+##VERSION:0.50
+$frunningtotal = ""
+$runningtotal = ""
+##NAME:$calcscript_directory
+$calcscript_directory = "scripts"
+$rubyscript_directory = "scripts"
+$tinkerdocumentsarray += ["HowTo_RwdCalc.txt"]
+RwdcalcVersion = "0.50"

data/configuration/rwdcalendar.dist

@@ -0,0 +1,10 @@
+##VERSION:0.97
+# rwdcalendar 
+##NAME:$extras_directory:0
+$extras_directory = "extras"
+
+
+
+
+
+

data/configuration/rwdgutenberg.dist

@@ -0,0 +1,14 @@
+##VERSION:0.03
+##NAME:$rwdgutenberg_directory:0
+$rwdgutenberg_directory = "Books"
+##NAME:$gutenbergcommand:0
+$gutenbergcommand = "openbook"
+##NAME:$booklocation:0
+$booklocation = 0
+##NAME:$booksteps:0
+$booksteps = 10
+##NAME:BookViewDisplay:0
+ BookViewDisplay = 15
+$tinkerdocumentsarray += ["HowTo_Gutenberg.txt"]
+$tinkerhelpaboutarray += ["RwdGutenberg"]
+RwdGutenbergVersion = "0.03"

data/configuration/rwdhypernote.dist

@@ -0,0 +1,13 @@
+##VERSION:0.07
+##NAME: $rwdhypernote_directory:0
+$rwdhypernote_directory = "Notes"
+ $notesarray = ["Notes/changes.txt"]
+$noteslinksarray = ["Notes/changes.lnk"]
+$rwdhypernote_ftpsite = "ftp.mysite.com"
+$rwdhypernote_ftplogin = "mylogin"
+$rwdhypernote_ftppassword = "mypassword"
+$rwdhypernote_ftpdirectory = "/incoming/rwdhypernotes/"
+$rwdhypernote_updatedirectory = "updates"
+$tinkerdocumentsarray += ["HowTo_HyperNote.txt"]
+$tinkerhelpaboutarray += ["RwdHyperNote"]
+RwdHyperNoteVersion = "0.07"

data/configuration/rwdshell.dist

@@ -0,0 +1,4 @@
+##VERSION:0.97
+$shellscript_directory = "scripts"
+$tinkerdocumentsarray += ["HowTo_Shell.txt"]
+RwdShellVersion = "0.97"

data/configuration/rwdtinker.dist

@@ -0,0 +1,19 @@
+##VERSION:1.65
+ConfigurationDir = "configuration" # for use in program - init.rb has this value without using this constant
+CodeName = "rwdtinker"
+CodeNameFile = CodeName + ".rb"
+RWDFile	= "rwdtinker.rwd"
+LangDir = "lang"
+ CodeDir = "code" 
+ GuiDir = "gui"  
+  $help_topic = "general_help"
+   $helptopicsarray = [ "general_help","network_help"]
+  $prevouswindow ="main" 
+   $rwdcontrolports =["13713","13714","13715","13716","13717","13718"]
+ $port = 7705
+$rwdjumplink = ["helpscreen","tinkerbackwindow","returntomain","opendocuments","editconfiguration"]
+Browser_Exe = 'mozilla '
+$tinkerdocumentsarray +=["COPYING","HowTo_Tinker.txt","rwdapplications.html","RubyWebDialogs.html"]
+RwdTinkerVersion = "1.65"
+	
+   

data/configuration/rwdwords.dist

@@ -0,0 +1,18 @@
+##VERSION:0.02
+# rwdwords 
+##NAME:$extras_directory:0
+$extras_directory = "extras"
+##NAME:FortuneCommand:0
+FortuneCommand="/usr/games/fortune"
+##NAME:FortuneDelay:0
+FortuneDelay= 15
+$tinkerdocumentsarray += ["HowTo_Words.txt"]
+$tinkerhelpaboutarray += ["RwdWords"]
+RwdWordsVersion="0.02"
+
+
+
+
+
+
+

data/configuration/tinkerwin2variables.dist

@@ -0,0 +1,17 @@
+##VERSION:1.63
+TinkerWin2ConfigurationFileName = "tinkerwin2variables.cnf" # this file name - do not change
+##NAME:$zipslocation:0
+$zipslocation = "zips" # location of applets to add
+ $zipsarray = [""] ; $zipsarraylocal = [""]
+##NAME:$xpcommand:0
+ $xpcommand = " "  # Linux machines
+# $xpcommand =  "cmd /C "  # XP machines with cmd shell
+##NAME:$gemdirectory_withgemfiles:0
+ $gemdirectory_withgemfiles = "/usr/lib/ruby/gems/1.8/gems"
+# $gemdirectory_withgemfiles = "c:\\ruby\\lib\\ruby\\gems\\1.8\\gems"  # XP machine
+##NAME:$geminstalled_directory:0
+# $geminstalled_directory = "/ruby/lib/ruby/gems/1.8/gems" # XP machine
+ $geminstalled_directory = "/usr/lib/ruby/gems/1.8/gems" # Debian Linux
+
+RwdTinkerWin2Version = "0.8"
+