rubyslippers 1.02 → 1.03

data/Readme.txt

@@ -157,6 +157,11 @@ http://www.erikveen.dds.nl/rubywebdialogs/index.html
 Thanks, Steven Gibson
 
 =Changelog 
+Version 1.03
+ wrapped directory lists with if clauses
+ updated for rwdtinker 1.64
+ added some unit tests
+
 Version 1.02
  changed selection screen to use new hash method
  updated diagnostic tab

data/code/01rwdcore/01rwdcore.rb

@@ -17,6 +17,6 @@ class RwdTinker  < RWDialog
 	end
 
 	def inspect
-		"Rwdtinker Application " 
+		"#{$rwdapplicationidentity}" 
 	end
 

data/code/01rwdcore/jumplinkcommand.rb

@@ -3,28 +3,24 @@ JumpLink = Hash.new { |hh, kk| hh[kk] = "ERROR: link not found: #{kk.inspect}.";
     locationlink = {
     :helpscreen=> "runhelpwindow",
     :tinkerbackwindow=>"runrwdtinkerbackwindow",
-    :returntomain=>"returntomain"
+    :returntomain=>"returntomain",
+    :opendocuments=>"runtinkerdocuments",
+    :editconfiguration=>"runeditconfiguration"
     }
     locationlink.each { |kk, vv| JumpLink[kk] = vv }
     
 def runjumplinkcommand
-
+if  @a_jumplinkinput
 runjumplocation = "#{JumpLink[:"#{@a_jumplinkinput}"]}"
 
 self.send(runjumplocation)
- 
- 
- 
-	
-  end
+ end
+   end
 
-	
 
 # list the remote control options on the screen
 def showjumplinkoptions
   
-  
-
 	@jumplinkoptions = $rwdjumplink.rwd_options
 	
 end

data/code/01rwdcore/rundocuments.rb

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

data/code/01rwdcore/runeditconfiguration.rb

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

data/code/01rwdcore/runhelpabout.rb

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

data/code/01rwdcore/selectiontab.rb

@@ -0,0 +1,9 @@
+# this code is to return to the window back from the help window
+def runselectiontab
+
+	
+	@rwd_tab = "selectiontab"
+end
+
+
+

data/code/01rwdcore/test_cases.rb

@@ -1,112 +1,106 @@
 # test harness
+
+	
+require 'test/unit/testcase'
+require 'test/unit/assertions'
+include Test::Unit::Assertions
+include Test::Unit  
 def rwdtinker_all_tests 
 	print "in rwdtinker all tests\n"
+  $testrwdtinkertestcase = TestSuite.new
 	test_runrwdtinkerbackwindow
 end
 
 def test_runrwdtinkerbackwindow
 
-	require 'test/unit' 
-	begin
 
+	begin
+  testasserts = 0
+  print "Starting rwdtinker tests!\n"
 		runrwdtinkerbackwindow
-
-		raise NotImplementedError, 'Need to write test_runrwdtinkerbackwindow'
-
-	rescue  NotImplementedError
+    
+    assert_equal("tinkerbackwindow",@rwd_window) ; testasserts += 1 
+     runselectiontab
+     assert_equal("selectiontab",@rwd_tab) ; testasserts += 1
+    showjumplinkoptions
+    @a_jumplinkinput = "returntomain"
+   runjumplinkcommand
+    assert_equal("main",@rwd_window) ; testasserts += 1 
+		@a_jumplinkinput = "helpscreen"
+    runjumplinkcommand 
+    
+     assert_equal("rwdtinkerhelpwindow",@rwd_window)  ; testasserts += 1
+     returntomain
+     assert_equal("main",@rwd_window)  ; testasserts += 1
+     runtinkerdocuments
+     assert_equal("documentsrwdtinkerone",@rwd_tab)  ; testasserts += 1
+     	runrwdtinkerbackwindow
+    
+    assert_equal("tinkerbackwindow",@rwd_window) ; testasserts += 1 
+    @a_installapplet="/usr/src/rwdapplets/rwdtinker/zips/rwdahelloworld-0.5"
+    viewgemappletcontents
+    assert_not_nil(@appletcontentstext)  ; testasserts += 1
+    runrwdtinkerwin2version
+      assert_equal("applicationversion",@rwd_window) ; testasserts += 1 
+        returntomain
+     assert_equal("main",@rwd_window)  ; testasserts += 1
+      	runrwdtinkerbackwindow
+    
+    assert_equal("tinkerbackwindow",@rwd_window) ; testasserts += 1 
+    runremotezipsinstall
+     assert_equal("superantcomremotezipsinstall",@rwd_tab) ; testasserts += 1
+    runeditconfiguration   
+    assert_equal("editconfigurationfile",@rwd_tab) ; testasserts += 1    
+    
+     
+ $stderr.print "tests completed succesfully!\n"
+ $stderr.print testasserts, " asserts performed\n"
+
+	rescue  NotImplementedError, Exception
 		$stderr.print $!
 
 	end
+  
 end
 
 
 
-def test_choosenewhelptopic
+def teststobedown
+ runtinkerhelpabout
+          assert_equal("rwdtinkerhelpwindow",@rwd_tab)  ; testasserts += 1
 	raise NotImplementedError, 'Need to write test_choosenewhelptopic'
-end
-
-
-def test_listinstalledfiles
 	raise NotImplementedError, 'Need to write test_listinstalledfiles'
-end
-
-
-def test_listzipfilestoinstall
 	raise NotImplementedError, 'Need to write test_listzipfilestoinstall'
-end
-
-def test_loadconfigurationrecord
 	raise NotImplementedError, 'Need to write test_loadconfigurationrecord'
-end
-
-def test_loadconfigurationvariables
 	raise NotImplementedError, 'Need to write test_loadconfigurationvariables'
-end
-
 
-
-def test_main
 	raise NotImplementedError, 'Need to write test_main'
-end
 
-def test_network_demon
 	raise NotImplementedError, 'Need to write test_network_demon'
-end
 
-def test_network_start
 	raise NotImplementedError, 'Need to write test_network_start'
-end
 
-def test_openappletname
 	raise NotImplementedError, 'Need to write test_openappletname'
-end
 
-def test_removeapplet
 	raise NotImplementedError, 'Need to write test_removeapplet'
-end
 
-def test_returntomain
 	raise NotImplementedError, 'Need to write test_returntomain'
-end
 
-def test_runcontrolcommand
 	raise NotImplementedError, 'Need to write test_runcontrolcommand'
-end
-
 
-def test_runhelpwindow
 	raise NotImplementedError, 'Need to write test_runhelpwindow'
-end
-
-
 
-
-def test_runrwdtinkerversion
 	raise NotImplementedError, 'Need to write test_runrwdtinkerversion'
-end
 
-def test_runrwdtinkerwin2version
 	raise NotImplementedError, 'Need to write test_runrwdtinkerwin2version'
-end
 
-def test_runviewplatform
 	raise NotImplementedError, 'Need to write test_runviewplatform'
-end
 
-def test_rwdtinkerversiondiagnostic
 	raise NotImplementedError, 'Need to write test_rwdtinkerversiondiagnostic'
-end
 
-def test_rwdwindowreturn
 	raise NotImplementedError, 'Need to write test_rwdwindowreturn'
-end
-
-def test_saveconfigurationrecord
 	raise NotImplementedError, 'Need to write test_saveconfigurationrecord'
-end
-
 
-def test_viewappletcontents
 	raise NotImplementedError, 'Need to write test_viewappletcontents'
 end
 

data/code/01rwdcore/test_harness.rb

@@ -2,6 +2,7 @@
 def rwdtest_harness
 
 	print "in test harness\n"
+  
 	$testharnessarray.each { |x| 
 		print "calling #{x}\n"
 		eval("#{x}")

data/code/superant.com.rubyslippers/listgemdirs.rb

@@ -1,9 +1,11 @@
 # this code is to list the gem directories that are installed
-def showgemfiledirs
+def showgemfiledirs
+  if  FileTest.directory?($gemdirectory)
  gemdirectory_withgemfiles = File.join( $gemdirectory,"gems")
   fileList      = Dir.new(gemdirectory_withgemfiles).entries.sort.reverse
   @showgemfiledirsresult  = fileList.rwd_method("fillshowgemfiledirsname")
-end
+ end
+end
  
 def fillshowgemfiledirsname(inffile)
   applet                = inffile

data/code/superant.com.rubyslippers/listgemrecord.rb

@@ -1,8 +1,12 @@
 # this code is to list the gemspecs
-def listgemrecordfiles
+def listgemrecordfiles
+  begin
   fileList      = Dir.new($gemspecificationsdirectory).entries.sort.delete_if { |x| ! (x =~ /gemspec$/) }
 
   @listgemrecordfilesresult = fileList.rwd_method("fillgemrecordname")
+ rescue
+  @listgemrecordfilesresult = "file error"
+ end
 end
  
 def fillgemrecordname(inffile)

data/code/superant.com.rubyslippers/listgemzips.rb

@@ -23,6 +23,7 @@ end
   end
   
 def listgemzips
+ begin
  startlangdir = $geminstalled_directory
  #get a list of the files and subdirectories on the starting directory only
         alanghash = Array.new(Dir[startlangdir].entries.sort)
@@ -51,4 +52,7 @@ def listgemzips
                 end
         end
          @zipslistresult = $zipsarray.rwd_method("fillhypernotename")
+rescue 
+ @zipslistresult = "file error"
+end
       end  

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

@@ -27,6 +27,8 @@
            @a_rsconfigline12 = fd.readline.chomp
            @a_rsconfigline13 = fd.readline.chomp
 	  @a_rsconfigline14 = fd.readline.chomp
+           @a_rsconfigline15 = fd.readline.chomp
+	  @a_rsconfigline16 = fd.readline.chomp
 	      while ! fd.eof?
 	        @extrarsconfigdatadisplay = fd.readline
 	      end

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

@@ -3,7 +3,7 @@
    require 'fileutils'
    
    newname = "rubyslippers.cnf" # grab the filename to create
-   newdata =@a_rsconfigline1.to_s + "\n" + @a_rsconfigline2.to_s + "\n" + @a_rsconfigline3.to_s + "\n" + @a_rsconfigline4.to_s + "\n" + @a_rsconfigline5.to_s + "\n" + @a_rsconfigline6.to_s + "\n" + @a_rsconfigline7.to_s + "\n" + @a_rsconfigline8.to_s + "\n" + @a_rsconfigline9.to_s + "\n"+ @a_rsconfigline10.to_s + "\n"+ @a_rsconfigline11.to_s + "\n"+ @a_rsconfigline12.to_s + "\n"+ @a_rsconfigline13.to_s + "\n"+ @a_rsconfigline14.to_s + "\n"
+   newdata =@a_rsconfigline1.to_s + "\n" + @a_rsconfigline2.to_s + "\n" + @a_rsconfigline3.to_s + "\n" + @a_rsconfigline4.to_s + "\n" + @a_rsconfigline5.to_s + "\n" + @a_rsconfigline6.to_s + "\n" + @a_rsconfigline7.to_s + "\n" + @a_rsconfigline8.to_s + "\n" + @a_rsconfigline9.to_s + "\n"+ @a_rsconfigline10.to_s + "\n"+ @a_rsconfigline11.to_s + "\n"+ @a_rsconfigline12.to_s + "\n"+ @a_rsconfigline13.to_s + "\n"+ @a_rsconfigline14.to_s + "\n"+ @a_rsconfigline15.to_s + "\n"+ @a_rsconfigline16.to_s + "\n"
 	 
         begin # exception trapped block
           fileName = File.join( ConfigurationDir, newname )

data/code/superant.com.rubyslippers/test_cases.rb

@@ -0,0 +1,50 @@
+# test harness
+
+	
+require 'test/unit/testcase'
+require 'test/unit/assertions'
+include Test::Unit::Assertions
+include Test::Unit  
+def rubyslippers_all_tests 
+	print "in rubyslippers all tests\n"
+  $testrubyslipperstestcase = TestSuite.new
+	test_runrubyslippers
+end
+
+def test_runrubyslippers
+
+
+	begin
+  testasserts = 0
+  print "Starting rubyslippers tests!\n"
+     runselectiontab
+     assert_equal("selectiontab",@rwd_tab) ; testasserts += 1
+    runrubyslippersmenu1
+     listgemrecordfiles
+    assert_equal("gemcommands",@rwd_tab) ; testasserts += 1    
+        loadrubyslippersconfiguration
+    assert_equal("rubyslippers.cnf",@a_rsconfigurationfilename) ; testasserts += 1    
+    
+     showgemfiledirs
+     creategem
+     listgemdirectories
+ $stderr.print "tests completed succesfully!\n"
+ $stderr.print testasserts, " asserts performed\n"
+
+	rescue  NotImplementedError, Exception
+		$stderr.print $!
+
+	end
+  
+end
+
+
+
+def teststobedown
+ runtinkerhelpabout
+          assert_equal("rwdtinkerhelpwindow",@rwd_tab)  ; testasserts += 1
+end
+
+
+
+

data/code/superant.com.rubyslippersbackwindow/creategem.rb

@@ -1,6 +1,6 @@
   def creategem
    require 'fileutils'
-   
+   if FileTest.directory?($gemspec_directory)
    if @a_viewgemspecdata
     nametext = $gemspec_directory +"/" + @a_viewgemspecdata.to_s  + ".gemspec" 
 	 end
@@ -21,6 +21,7 @@
        rescue
             @installgemresult = "error during gem install!"
         end # exception rescue
-end 
-end
+    end 
+   end
   end
+end

data/code/superant.com.rubyslippersbackwindow/listgemdirectories.rb

@@ -1,12 +1,14 @@
 # this code is to list the gem directories that are 
-def listgemdirectories
+def listgemdirectories
+if  FileTest.directory?($gembuild_directory)
  gemdirectory_gemfiles =  $gembuild_directory
   fileList      = Dir.new(gemdirectory_gemfiles).entries.sort
   Dir.chdir(gemdirectory_gemfiles)
   fileList.delete_if {|x| !test(?d,x)}
   @listgemspecrecordfilesresult = ""
   @listgemdirectoriesresult  = fileList.rwd_method("fillshowgemdirsname")
-  Dir.chdir($progdir)
+  Dir.chdir($progdir)
+  end
 end
  
 def fillshowgemdirsname(inffile)

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/configuration/rubyslippers.dist

@@ -1,15 +1,17 @@
-##VERSION:1.02
+##VERSION:1.03
 ##NAME:$gemdirectory:0
 #$gemdirectory = "c:\\ruby\\lib\\ruby\\gems\\1.8"  # XP machine
 $gemdirectory = "/usr/lib/ruby/gems/1.8" # Linux machine
 ##NAME:$gemspecificationsdirectory:0
 #$gemspecificationsdirectory = "c:\\ruby\\lib\\ruby\\gems\\1.8\\specifications" # XP
- $gemspecificationsdirectory = "/usr/lib/ruby/gems/1.8/specifications"
+$gemspecificationsdirectory = "/usr/lib/ruby/gems/1.8/specifications"
 ##NAME:$xpcommand:0
 #$xpcommand = "cmd /C "  # XP machines with cmd shell
- $xpcommand = " "     # Linux machines
+$xpcommand = " "     # Linux machines
 ##NAME:$gemspec_directory:0
 $gemspec_directory = "/usr/src/rubygems"
 ##NAME:$gembuild_directory:0
 $gembuild_directory = "/usr/src/rubygems"
-RubySlippersVersion = "1.02"
+##NAME:$testharnessarray:0
+$testharnessarray += ["rubyslippers_all_tests"]
+RubySlippersVersion = "1.03"

data/configuration/rwdapplicationidentity.dist

@@ -1,3 +1,3 @@
-##VERSION:1.62
-$rwdapplicationidentity = "rwdtinker main application"
+##VERSION:1.63
+$rwdapplicationidentity = "rubyslippers gem frontend"
 

data/configuration/rwdtinker.dist

@@ -1,4 +1,4 @@
-##VERSION:1.62
+##VERSION:1.64
 ConfigurationDir = "configuration" # for use in program - init.rb has this value without using this constant
 CodeName = "rwdtinker"
 CodeNameFile = CodeName + ".rb"
@@ -11,5 +11,5 @@ LangDir = "lang"
   $prevouswindow ="main" 
    $rwdcontrolports =["13713","13714","13715","13716","13717","13718"]
  $port = 7705
-$rwdjumplink = ["helpscreen","tinkerbackwindow","returntomain"]
-RwdTinkerVersion = "1.62"
+$rwdjumplink = ["helpscreen","tinkerbackwindow","returntomain","opendocuments","editconfiguration"]
+RwdTinkerVersion = "1.64"

data/configuration/tinkerwin2variables.dist

@@ -1,4 +1,4 @@
-##VERSION:1.62
+##VERSION:1.63
 TinkerWin2ConfigurationFileName = "tinkerwin2variables.cnf" # this file name - do not change
 ##NAME:$zipslocation:0
 $zipslocation = "zips" # location of applets to add

data/gui/00coreguibegin/applicationguitop.rwd

@@ -1,4 +1,4 @@
 $rwdguivar=
 "<application>
-  <window name=\"main\" title=\"Tinker - RubyWebDialogs\">
+  <window name=\"main\" title=\"RubySlippers for RubyGem\">
 <tabs>"

data/gui/tinkerbackwindows/superant.com.rubyslippersbackwindow/92viewconfiguration.rwd

@@ -31,6 +31,8 @@ $rwdguivar=
       <row> <p align=\"right\">12:</p>  <text size=70 name=\"a_rsconfigline12\"/> </row>
       <row> <p align=\"right\">13:</p>  <text size=70 name=\"a_rsconfigline13\"/> </row>
       <row> <p align=\"right\">14:</p>  <text size=70 name=\"a_rsconfigline14\"/> </row>
+   <row> <p align=\"right\">15:</p>  <text size=70 name=\"a_rsconfigline15\"/> </row>
+      <row> <p align=\"right\">16:</p>  <text size=70 name=\"a_rsconfigline16\"/> </row>
 
     </table>
     <p>%extrarsconfigdatadisplay%</p>

data/rwd_files/HowTo_RubySlippers.txt

@@ -157,6 +157,11 @@ http://www.erikveen.dds.nl/rubywebdialogs/index.html
 Thanks, Steven Gibson
 
 =Changelog 
+Version 1.03
+ wrapped directory lists with if clauses
+ updated for rwdtinker 1.64
+ added some unit tests
+
 Version 1.02
  changed selection screen to use new hash method
  updated diagnostic tab

data/rwd_files/HowTo_Tinker.txt

@@ -227,6 +227,14 @@ http://www.erikveen.dds.nl/rubywebdialogs/index.html
 Thanks, Steven Gibson
 
 == Changelog
+Version 1.64
+ fixed jump with no location
+
+Version 1.63
+ changed handling of application name returned
+ added jump seletion options
+ added some unit tests
+
 version 1.62
  improve distro release script
  code cleanup

data/rwd_files/remotegemlist.txt

@@ -44,10 +44,10 @@ aversa (0.3, 0.2, 0.1)
     Aversa is a little utility for creating and viewing BitTorrent
     metainfo files.
 
-bangkok (0.1.2, 0.1.1, 0.1.0)
+Bangkok (0.1.0)
     Chess game file reader and player; can turn games into MIDI files
 
-Bangkok (0.1.0)
+bangkok (0.1.2, 0.1.1, 0.1.0)
     Chess game file reader and player; can turn games into MIDI files
 
 Bloglines4R (0.1.0)
@@ -62,6 +62,9 @@ BlueCloth (1.0.0, 0.0.4, 0.0.3, 0.0.2)
 builder (1.2.3, 1.2.2, 1.2.1, 1.2.0, 1.1.0, 1.0.0, 0.1.1, 0.1.0)
     Builders for MarkUp.
 
+cacheAR (0.9.1, 0.9.0)
+    cacheAR is a tiny Rails add-on to enable ActiveRecord caching.
+
 captcha (0.1.2)
     Ruby/CAPTCHA is an implementation of the 'Completely Automated
     Public Turing Test to Tell Computers and Humans Apart'.
@@ -160,6 +163,9 @@ dbdbd (0.2.2)
 dbus (0.1.10, 0.1.9, 0.1.8, 0.1.7, 0.1.5)
     Ruby bindings for D-BUS.
 
+dctl (1.0.1, 1.0.0)
+    dctl - a daemon controller written in Ruby
+
 dev-utils (1.0.1, 1.0)
     Debugging utilities: breakpoints, debugging, and tracing.
 
@@ -242,7 +248,7 @@ getopt-declare (1.09.7)
     Comprehensive and easy to use command-line parser library using
     regular expressions (port of Perl's module).
 
-glue (0.14.0, 0.13.0)
+glue (0.15.0, 0.14.0, 0.13.0)
     Glue utilities
 
 gnuplot (2.1, 2.0, 1.0)
@@ -264,7 +270,7 @@ ikko (0.1)
 Imlib2-Ruby (0.4.3)
     Imlib2 bindings for Ruby.
 
-instiki (0.9.2)
+instiki (0.10.0, 0.9.2)
     Easy to install WikiClone running on WEBrick and Madeleine
 
 IO-Reactor (0.0.6)
@@ -275,6 +281,9 @@ io-reactor (0.05)
     An implementation of the Reactor design pattern for multiplexed
     asynchronous single-thread IO.
 
+iotaz (0.1.0)
+    Object-relational mapping library.
+
 iterator (0.8, 0.6, 0.5)
     bidirectional external iterators
 
@@ -342,7 +351,7 @@ madeleine (0.7.1, 0.6.1, 0.6)
 MB-Ruby (0.1.0)
     MusicBrainz bindings for Ruby.
 
-mechanize (0.1.3, 0.1.2, 0.1.1, 0.1.0)
+mechanize (0.2.1, 0.2.0, 0.1.3, 0.1.2, 0.1.1, 0.1.0)
     Automated web-browsing.
 
 merge3 (0.8)
@@ -411,14 +420,14 @@ net-tftp (0.1.0)
     Net::TFTP is a pure Ruby implementation of the Trivial File Transfer
     Protocol (RFC 1350)
 
-nitro (0.14.0, 0.13.0, 0.12.0, 0.11.0, 0.10.0, 0.9.5, 0.9.3, 0.8.0, 0.7.0, 0.6.0, 0.5.0, 0.4.1, 0.3.0, 0.2.0, 0.1.2)
+nitro (0.15.0, 0.14.0, 0.13.0, 0.12.0, 0.11.0, 0.10.0, 0.9.5, 0.9.3, 0.8.0, 0.7.0, 0.6.0, 0.5.0, 0.4.1, 0.3.0, 0.2.0, 0.1.2)
     Nitro Web Engine
 
 ObjectGraph (1.0.1, 1.0)
     A simple script that generates a graph of the ruby class
     hierarchies. Uses GraphViz (separate install).
 
-og (0.14.0, 0.13.0, 0.12.0, 0.11.0, 0.10.0, 0.9.5, 0.9.3, 0.8.0, 0.7.0, 0.6.0, 0.5.0)
+og (0.15.0, 0.14.0, 0.13.0, 0.12.0, 0.11.0, 0.10.0, 0.9.5, 0.9.3, 0.8.0, 0.7.0, 0.6.0, 0.5.0)
     Og (ObjectGraph)
 
 Ook (1.0.2)
@@ -459,7 +468,7 @@ posixlock (0.0.1)
 postgres (0.7.1)
     The extension library to access a PostgreSQL database from Ruby.
 
-postgres-pr (0.3.6, 0.3.5, 0.3.4, 0.3.3, 0.3.2, 0.3.1, 0.3.0, 0.2.2, 0.2.1, 0.2.0, 0.1.1, 0.1.0, 0.0.1)
+postgres-pr (0.4.0, 0.3.6, 0.3.5, 0.3.4, 0.3.3, 0.3.2, 0.3.1, 0.3.0, 0.2.2, 0.2.1, 0.2.0, 0.1.1, 0.1.0, 0.0.1)
     A pure Ruby interface to the PostgreSQL (>= 7.4) database
 
 pqa (0.7, 0.6, 0.5)
@@ -484,10 +493,10 @@ rails (0.11.1, 0.11.0, 0.10.1, 0.10.0, 0.9.5, 0.9.4.1, 0.9.4, 0.9.3, 0.9.2, 0.9.
     Web-application framework with template engine, control-flow layer,
     and ORM.
 
-rake (0.5.0, 0.4.15, 0.4.14, 0.4.13, 0.4.12, 0.4.11, 0.4.10, 0.4.9, 0.4.8, 0.4.7, 0.4.6, 0.4.4, 0.4.3, 0.4.2, 0.4.0, 0.3.2)
+rake (0.5.3, 0.5.0, 0.4.15, 0.4.14, 0.4.13, 0.4.12, 0.4.11, 0.4.10, 0.4.9, 0.4.8, 0.4.7, 0.4.6, 0.4.4, 0.4.3, 0.4.2, 0.4.0, 0.3.2)
     Ruby based make-like utility.
 
-rant (0.3.0)
+rant (0.3.2, 0.3.0)
     Rant is a Ruby based build tool.
 
 rdf (0.3)
@@ -520,7 +529,7 @@ rhizmail (0.1.0)
 rlirc (0.3.1, 0.3, 0.2, 0.1)
     a replacement for irexec and irxevent from lirc
 
-rmagick (1.7.3, 1.7.2, 1.7.1)
+rmagick (1.7.4, 1.7.3, 1.7.2, 1.7.1)
     RMagick is an interface between the Ruby programming language and
     the ImageMagick and GraphicsMagick image processing libraries.
 
@@ -600,7 +609,7 @@ rubypants (0.2.0)
 rubyscript2exe (0.3.3)
     A Ruby Compiler
 
-rubyslippers (1.01, 1.00, 0.99, 0.98, 0.97, 0.96, 0.95, 0.94, 0.93, 0.92)
+rubyslippers (1.02, 1.01, 1.00, 0.99, 0.98, 0.97, 0.96, 0.95, 0.94, 0.93, 0.92)
     RubySlippers is a GUI wrapper for RubyGems using RubyWebDialogs.
 
 rubyzip (0.5.8, 0.5.7, 0.5.5)
@@ -622,31 +631,31 @@ rwdaddresses (1.02, 1.01, 0.99, 0.98, 0.97, 0.95, 0.94, 0.93, 0.92, 0.91, 0.9, 0
     rwdaddresses is contact book application using rwdtinker and
     RubyWebDialogs.
 
-rwddemo (0.91, 0.90, 0.8, 0.7, 0.6)
+rwddemo (0.92, 0.91, 0.90, 0.8, 0.7, 0.6)
     rwddemo application shows rwdtinker and RubyWebDialogs features.
 
-rwdgutenberg (0.03)
+rwdgutenberg (0.04, 0.03)
     rwdgutenberg application is a text file reader for RubyWebDialogs.
 
-rwdhypernote (0.06, 0.05, 0.04, 0.03)
+rwdhypernote (0.07, 0.06, 0.05, 0.04, 0.03)
     rwdhypernote application is a hierarchical note taker for
     RubyWebDialogs.
 
 rwdmovies (0.94, 0.93, 0.92, 0.91, 0.90, 0.7, 0.6)
     rwdmovies application is a movie database using RubyWebDialogs.
 
-rwdschedule (0.98, 0.97, 0.96, 0.95, 0.94, 0.93, 0.92, 0.91, 0.9, 0.8, 0.6, 0.5)
+rwdschedule (0.99, 0.98, 0.97, 0.96, 0.95, 0.94, 0.93, 0.92, 0.91, 0.9, 0.8, 0.6, 0.5)
     rwdschedule is an calendar application using rwdtinker and
     RubyWebDialogs.
 
-rwdshell (0.98, 0.97, 0.96, 0.95, 0.94, 0.93, 0.92, 0.9)
+rwdshell (0.99, 0.98, 0.97, 0.96, 0.95, 0.94, 0.93, 0.92, 0.9)
     rwdshell is a GUI front end for operating system commands with
     rwdtinker and RubyWebDialogs features.
 
-rwdtinker (1.62, 1.61, 1.60, 1.59, 1.58, 1.57, 1.56, 1.55, 1.54, 1.53, 1.52, 1.51, 1.48, 1.47, 1.46, 1.45, 1.44, 1.43, 1.42, 1.41, 1.24, 1.23, 1.4, 1.3, 1.2)
+rwdtinker (1.64, 1.63, 1.62, 1.61, 1.60, 1.59, 1.58, 1.57, 1.56, 1.55, 1.54, 1.53, 1.52, 1.51, 1.48, 1.47, 1.46, 1.45, 1.44, 1.43, 1.42, 1.41, 1.24, 1.23, 1.4, 1.3, 1.2)
     rwdtinker application is a framework to program for RubyWebDialogs.
 
-rwdtorrent (0.02, 0.01)
+rwdtorrent (0.03, 0.02, 0.01)
     rwdtorrent is a GUI front end for BitTorrent with rwdtinker and
     RubyWebDialogs features.
 
@@ -730,7 +739,7 @@ sqlite-ruby (2.2.3, 2.2.2, 2.2.1, 2.2.0, 2.1.0, 2.0.3, 2.0.2)
 
 sqlite3-ruby (1.1.0, 1.0.1, 1.0.0, 0.9.0, 0.6.0, 0.5.0)
     SQLite3/Ruby is a module to allow Ruby scripts to interface with a
-    SQLite database.
+    SQLite3 database.
 
 sstruct (1.0.1)
     SuperStruct class: Best of Struct, OpenStruct, Array, Hash, etc.
@@ -793,6 +802,10 @@ tidy (1.1.2, 1.1.1, 1.1.0, 1.0.1, 1.0.0)
 transaction-simple (1.2.0)
     Simple object transaction support for Ruby.
 
+tsql_shparser (0.0.1)
+    tsql_shparser is a Shallow Parser for t-SQL (which is the procedural
+    language for  MS SQL Server 2000).
+
 vcs (0.1)
     A wrapper over any version control system
 
@@ -809,7 +822,7 @@ vruby (2004.08.07)
 webgen (0.3.2, 0.3.1, 0.3.0, 0.2.0, 0.1.0)
     Webgen is a templated based static website generator.
 
-wee (0.7.0, 0.6.0, 0.5.0, 0.4.0, 0.3.1, 0.1.0)
+wee (0.8.0, 0.7.0, 0.6.0, 0.5.0, 0.4.0, 0.3.1, 0.1.0)
     Wee is a framework for building highly dynamic web applications.
 
 wxrubylayouts (0.0.3, 0.0.2, 0.0.1)

data/rwdconfig.dist

@@ -1,4 +1,4 @@
-##VERSION:1.62
+##VERSION:1.63
 # rwdtinker core configuration file
 ##NAME: ConfigLocation:0
 ConfigLocation=""
@@ -7,4 +7,6 @@ ConfigLocation=""
 ##NAME:$testharnessarray:0
 $testharnessarray = ["rwdtinker_all_tests"]
 ##NAME:TestNow:0
-TestNow=false
+TestNow=false  # turning this on will run the unit tests
+##NAME:$testharness:0
+$testharness=true

data/tests/RubyGauge.rb

@@ -0,0 +1,179 @@
+#--------------------------------------------------------------------#
+#                                                                    #
+#  RubyGauge version 1                                               #
+#  Copyright (c) 2005,  Harrison Ainsworth.                          #
+#                                                                    #
+#  http://hxa7241.org/                                               #
+#                                                                    #
+#--------------------------------------------------------------------#
+
+
+
+
+require 'find'
+
+
+
+
+# Counts lines of code in ruby source files.
+#
+# just a simple example ruby program, produced as an exercise.
+#
+# * directories are looked in recursively for source files
+# * source files with the following name extensions are recognized:
+#   .rb .rbw
+# * a line is counted as code if it is not empty and not solely comment
+#
+# == requirements
+# ruby 1.8
+#
+# == usage
+# RubyGauge.rb [-f...] (file|directory)pathname ...
+# RubyGauge.rb -help|-?
+#
+# switches:
+#    -f<[l|s][1|2]>  set output format to long/short, linecount only /
+#                    linecount and filecount (defaults to -fl2)
+#    -help|-?        prints this message
+#
+# ==acknowledgements
+# * ruby: http://ruby-lang.org/
+# * the pragmaticprogrammers pickaxe book:
+#   http://phrogz.net/ProgrammingRuby/
+# * rubygarden: http://rubygarden.org/ruby?CodingInRuby
+#
+# == license
+# this software is too short and insignificant to have a license.
+
+module RubyGauge
+
+	# Entry point if run from the command line.
+	#
+	# Reads command line args, writes output to stdout.
+	#
+	def RubyGauge.main
+
+		# check if help message needed
+		if $*.empty? || !(RubyGauge.getSwitchs( $*, '(help|\?)' ).empty?)
+
+			puts "\n#{@@BANNER}\n#{@@HELP}"
+
+		else
+
+			# count
+			pathnames = RubyGauge.getTokens( $*, '^[^-\/]', ' ' )
+
+			fileCount = []
+			lineCount = RubyGauge.countLinesInFileTree( pathnames, fileCount )
+
+			# output counts
+			format = RubyGauge.getSwitchs( $*, 'f', '-fl2' ).last[2,2]
+
+			(@@LINES_FORMAT = { 's' => "#{lineCount}" }).default = "\n   #{lineCount} line#{lineCount == 1 ? '' : 's'} of code\n"
+			(@@FILES_FORMAT = { 's' => " #{fileCount}" }).default = "   #{fileCount[0]} file#{fileCount[0] == 1 ? '' : 's'}\n"
+			print @@LINES_FORMAT[format[0,1]]
+			print @@FILES_FORMAT[format[0,1]] unless format[1,1] == '1'
+
+		end
+
+	end
+
+
+	def RubyGauge.getSwitchs( commandline, pattern, default=nil )
+
+		RubyGauge.getTokens( commandline, '^(-|\/)' + pattern, default )
+
+	end
+
+
+	def RubyGauge.getTokens( commandline, pattern, default=nil )
+
+		tokens = []
+
+		commandline.each do |token|
+			if token =~ /#{pattern}/
+				tokens.push token
+			end
+		end
+
+		if tokens.empty? && default
+			tokens.push default
+		end
+
+		tokens
+
+	end
+
+
+	# Counts lines of ruby code in filetree recursively.
+	#
+	# A line is counted as code if it is not empty and not solely comment.
+	#
+	# == parameters
+	# * pathnames: Array of String of file or directory pathname
+	#   (relative or absolute)
+	# * fileCount: Array of Numeric, length 1. Just an example of a
+	#   'reference' parameter
+	# * return: Fixnum of the line count
+	#
+	def RubyGauge.countLinesInFileTree( pathnames, fileCount=[] )
+
+		fileCount[0] = 0
+		lineCount    = 0
+
+		# scan directory tree
+		Find.find( *pathnames ) do |fileOrDirName|
+
+			# filter file types (to ruby)
+			if FileTest.file?( fileOrDirName ) &&
+			   FileTest.readable?( fileOrDirName ) &&
+			   fileOrDirName =~ /\.(rb|rbw)\Z/
+
+			   fileCount[0] += 1
+
+				filePathname = File.expand_path( fileOrDirName )
+
+				# read file
+				File.open( filePathname, 'r' ) do |file|
+
+					# scan file lines
+					file.each_line do |line|
+						# select non blank, non comment-only line
+						unless line =~ /^\s*(#|\Z)/
+							lineCount += 1
+						end
+					end
+
+				end
+
+			end
+		end
+
+		lineCount
+
+	end
+
+
+	@@BANNER = "-------------------------------------------------------------\n" +
+	           "RubyGauge 2005 (v1)\n" +
+	           "Copyright (c) 2005,  Harrison Ainsworth.\n\n" +
+	           "http://hxa7241.org/\n" +
+	           "-------------------------------------------------------------\n"
+
+	@@HELP   = "RubyGauge counts lines of code in ruby source files.\n\n" +
+	           "* directories are looked in recursively for source files\n" +
+	           "* source files with the following name extensions are recognized: .rb .rbw\n" +
+	           "* a line is counted as code if it is not empty and not solely comment\n" +
+	           "\nusage:\n" +
+	           "   RubyGauge.rb [-f...] (file|directory)pathname ...\n" +
+	           "   RubyGauge.rb -help|-?\n" +
+	           "\nswitches:\n" +
+	           "   -f<[l|s][1|2]>  set output format to long/short, linecount only / linecount and filecount (defaults to -fl2)\n" +
+	           "   -help|-?        prints this message\n"
+
+end
+
+
+
+
+RubyGauge.main

data/tests/makedist.rb

@@ -6,6 +6,7 @@
 #***********************************************************************/
 $progdir =""
 require 'fileutils'
+load 'rwdconfig.dist'
 DistroName = "rubyslippers"
 load "configuration/#{DistroName}.dist"
 DistroVersion=RubySlippersVersion

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.8.8
 specification_version: 1
 name: rubyslippers
 version: !ruby/object:Gem::Version 
-  version: "1.02"
-date: 2005-04-01
+  version: "1.03"
+date: 2005-04-09
 summary: RubySlippers is a GUI wrapper for RubyGems using RubyWebDialogs.
 require_paths: 
   - "."
@@ -39,6 +39,10 @@ files:
   - code/01rwdcore/test_cases.rb
   - code/01rwdcore/test_harness.rb
   - code/01rwdcore/jumplinkcommand.rb
+  - code/01rwdcore/selectiontab.rb
+  - code/01rwdcore/rundocuments.rb
+  - code/01rwdcore/runhelpabout.rb
+  - code/01rwdcore/runeditconfiguration.rb
   - code/superant.com.rwdtinkerbackwindow/controlclient.rb
   - code/superant.com.rwdtinkerbackwindow/diagnostictab.rb
   - code/superant.com.rwdtinkerbackwindow/helptexthashtinkerwin2.rb
@@ -61,6 +65,7 @@ files:
   - code/superant.com.rwdtinkerbackwindow/remotegemlist.rb
   - code/superant.com.rwdtinkerbackwindow/installremotegem.rb
   - code/superant.com.rwdtinkerbackwindow/listgemzips.rb
+  - code/superant.com.rwdtinkerbackwindow/runremoteinstall.rb
   - code/zz0applicationend/zz0end.rb
   - code/superant.com.rubyslippers/gemserve.rb
   - code/superant.com.rubyslippers/listgemrecord.rb
@@ -86,6 +91,7 @@ files:
   - code/superant.com.rubyslippers/saveconfigurationrecord.rb
   - code/superant.com.rubyslippers/gemwhich.rb
   - code/superant.com.rubyslippers/jumplinkupdate.rb
+  - code/superant.com.rubyslippers/test_cases.rb
   - code/superant.com.rubyslippersbackwindow/copygemspecdata.rb
   - code/superant.com.rubyslippersbackwindow/changegemspecdata.rb
   - code/superant.com.rubyslippersbackwindow/listgemdirectories.rb
@@ -207,17 +213,15 @@ files:
   - rwd_files/HowTo_RubySlippers.txt
   - rwd_files/remotegemlist.txt
   - zips/rwdahelloworld-0.5.zip
-  - tests/rwdtinkertestEN.rb
-  - tests/test.result
+  - tests/RubyGauge.rb
   - tests/totranslate.lang
   - tests/cleancnf.sh
   - tests/rdep.rb
   - tests/checkdepends.sh
   - tests/makedist.rb
-  - tests/rubyslippers-1.01.gemspec
-  - Readme.txt
   - init.rb
   - rwdconfig.dist
+  - Readme.txt
 test_files: []
 rdoc_options: 
   - "--main"

data/tests/rubyslippers-1.01.gemspec

@@ -1,16 +0,0 @@
-Gem::Specification.new do |s|
-  s.name = %q{rubyslippers}
-  s.version = "1.01"
-  s.date = %q{2005-3-22}
-  s.summary = %q{RubySlippers is a GUI wrapper for RubyGems using RubyWebDialogs.}
-  s.email = %q{steven@superant.com}
-  s.homepage = %q{http://rubyforge.org/projects/rwdapplications/}
-  s.rubyforge_project = %q{rwdapplications}
-  s.description = %q{RubySlippers is a GUI wrapper for RubyGems using RubyWebDialogs.}
-  s.has_rdoc = true
-  s.require_paths = ["."]
-  s.files = Dir['bin/*.*'] + Dir['lib/*.*']  + Dir['code/**/*.rb'] + Dir['configuration/*.*'] + Dir['extras/**/*.*'] + Dir['ev/*.*'] + Dir['lang/**/*.*'] +  Dir['gui/**/*.*'] + Dir['installed/*.*'] + Dir['rwd_files/*.*'] + Dir['zips/*.*']  +Dir['tests/*.*'] + Dir['*.*']
-  s.extra_rdoc_files = ["rwd_files/HowTo_RubySlippers.txt", "Readme.txt", "rwd_files/HowTo_Tinker.txt", "rwd_files/HowTo_TinkerWin2.txt" ]
-  s.rdoc_options = ["--main", "rwd_files/HowTo_RubySlippers.txt"]
-  s.executables = ["rubyslippers"]
-end

data/tests/rwdtinkertestEN.rb

@@ -1,163 +0,0 @@
-#-------------------------------------------------------------------------------------------------------------#
-# test with the WATIR controller                                                              
-#                                                                                                                  
-#  Simple  test based on Google/watir demo                                               
-# 
-#------------------------------------------------------------------------------------------------------------ #
-
-#includes
-require '../watir'   # the controller
-
-#test::unit includes
-require 'test/unit' 
-require 'test/unit/ui/console/testrunner'
-require '../unittests/testUnitAddons'
-
-#code to set your current path in Windows
-$myDir = File.dirname(__FILE__)
-$LOAD_PATH << $myDir
-
-class TC_rwdtinker_suite < Test::Unit::TestCase
-
-
-
- def test_a_Open1
-  #--------------------------------------------------------
-  # test case that shows basic WATIR functionality:
-  #   * enter text in a field
-  #   * click a button
-  #
-
-   #variables
-   testSite = 'http://localhost:7705'
-
-   #open the IE browser
-   $ie = IE.new
-
-   puts '## Beginning of test: rwdtinker'
-   puts '  '
-  
-
-      $ie.goto(testSite)
-   puts '  Action: entered ' + testSite + 'in the address bar.'
-   sleep 1
-     
-   $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_help";document.bodyform.submit();').click
-
-   $ie.button(:caption, 'Click for Version').click
-  
-   $ie.button(:caption, 'Cancel').click
-  
-
-
-   sleep 1
-   $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_tab_selectiontab";document.bodyform.submit();').click
-   
-
-  
-  $ie.button(:caption, 'RwdTinker Help Window').click
-    puts '  Action: clicked the Help Window  link'
-
-end   
-
- def test_b_Buttons1
-
-
- sleep 1
-   $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_tab_nexttab";document.bodyform.submit();').click
-   puts '  Action: clicked the nexttab link'
-
-  
-   $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_tab_main";document.bodyform.submit();').click
-   puts '  Action: clicked the main tab link'
-
-
-  $ie.button(:caption, "Cancel").click
-    puts '  Action: clicked the cancel button'
-
-
-
-end
-
-def test_c_tabs
-
- $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_tab_one";document.bodyform.submit();').click
-  puts '  Action:  clicked tab one'
-
-  
-end
-
-def test_d_tabs
-
-   $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_tab_selectiontab";document.bodyform.submit();').click
-   puts '  Action: clicked the selectiontab'
-
-
-  $ie.button(:caption, 'RwdTinker Back Window').click
-    puts '  Action: clicked the Help Window  link'
-
- $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_tab_backone";document.bodyform.submit();').click
-   puts '  Action: clicked the backone tab'
-  
-    
-   assert($ie.pageContainsText("previous window") )
- 
- $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_tab_diagnostictab";document.bodyform.submit();').click
-   puts '  Action: clicked the diagnostictab top link'
-
-
-   $ie.button(:caption, "View Ruby Version").click
-   puts '  Action: clicked  Ruby Version button.'
-
-   assert($ie.pageContainsText("Version") )
-
-$ie.button(:caption, "view platform").click
-   puts '  Action: clicked platform button.'
-
-assert($ie.pageContainsText("Platform is") )
-
-   $ie.button(:caption, "View rwdtinker Version").click
-   puts '  Action: clicked  rwdtinker version button.'
-
-   assert($ie.pageContainsText("rwdtinker version") )
-    
-end  # end of test_d
-
-def test_e_tabs
- 
-
- $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_tab_filelister";document.bodyform.submit();').click
-   
- 
-   assert($ie.pageContainsText("View the list") )
- 
-   $ie.button(:caption, "List Files").click
-   puts '  Action: clicked the list files button.'
-
-  $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="fillappletname/rwdviewlogo-0.4.inf";document.bodyform.submit();').click
-
- 
-   $ie.button(:caption, "View Install Text").click
-   puts '  Action: clicked the View Install Text button.'
-
-assert($ie.pageContainsText("rwdviewlogo") )
- 
- 
- end
-
-def test_f_tabs
-
-	$ie.link(:url, 'javascript:document.bodyform.rwd_action.value="rwd_tab_zipslister";document.bodyform.submit();').click
-
-	 assert($ie.pageContainsText("File Name") )
- 
-	assert($ie.pageContainsText("view the list of zip files") )
-
- $ie.button(:caption, "List applets available for installing").click
-   puts '  Action: clicked the List applets available for installing button.'
-
-  $ie.link(:url, 'javascript:document.bodyform.rwd_action.value="fillziptoinstallname/rwdhelloworld-0.3.zip";document.bodyform.submit();').click
-
- end
-
-end  #end of class TC_google_suite

data/tests/test.result

@@ -1,32 +0,0 @@
-Loaded suite C:/ruby/sample/watir/examples/rwdtinkertestEN
-Started
-## Beginning of test: rwdtinker
-
-  Action: entered http://localhost:7705in the address bar.
-  Action: clicked the Help Window  link
-  Action: clicked the nexttab link
-  Action: clicked the main tab link
-  Action: clicked the cancel button
-  Action:  clicked tab one
-  Action: clicked the selectiontab
-  Action: clicked the Help Window  link
-  Action: clicked the backone tab
-pageContainsText: Looking for: previous window (string) - found it ok
-  Action: clicked the diagnostictab top link
-  Action: clicked  Ruby Version button.
-pageContainsText: Looking for: Version (string) - found it ok
-  Action: clicked platform button.
-pageContainsText: Looking for: Platform is (string) - found it ok
-  Action: clicked  rwdtinker version button.
-pageContainsText: Looking for: rwdtinker version (string) - found it ok
-pageContainsText: Looking for: View the list (string) - found it ok
-  Action: clicked the list files button.
-  Action: clicked the View Install Text button.
-pageContainsText: Looking for: rwdviewlogo (string) - found it ok
-pageContainsText: Looking for: File Name (string) - found it ok
-pageContainsText: Looking for: view the list of zip files (string) - found it ok
- Action: clicked the List applets available for installing button.
-
-Finished in 32.716 seconds.
-
-6 tests, 8 assertions, 0 failures, 0 errors