rwdgutenberg 0.03 → 0.04

data/rwd_files/HowTo_Gutenberg.txt

@@ -81,6 +81,13 @@ Steven Gibson
 steven@superant.com
 
 == Changelog 
+Version 0.04
+  fixed show text with nil title
+  updated for rwdtinker version 1.64
+  changed handling of application name returned
+  added jump seletion options
+  added some unit tests
+  
 version 0.03
  edit data doc
  delete file, rename file

data/rwd_files/HowTo_Tinker.txt

@@ -227,6 +227,25 @@ 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
+ removed redundent network code
+ change handling of window and tab jumps
+ 
+version 1.61
+ add in test harness
+ rwdtinkerwin2 help about removed
+ load main config file in init.rb
+
 version 1.60
  add rwdapplication info to diagnostic
  turn rescue on in diagnostic upload

data/rwdconfig.dist

@@ -1,6 +1,12 @@
-##VERSION:1.57
+##VERSION:1.63
 # rwdtinker core configuration file
 ##NAME: ConfigLocation:0
 ConfigLocation=""
 ##NAME: ZipsLocation:0
- ZipsLocation=""
+ ZipsLocation=""
+##NAME:$testharnessarray:0
+$testharnessarray = ["rwdtinker_all_tests"]
+##NAME:TestNow:0
+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,24 +6,53 @@
 #***********************************************************************/
 
 require 'fileutils'
-load 'configuration/rwdgutenberg.dist'
+DistroName = "rwdgutenberg"
+load "configuration/#{DistroName}.dist"
+DistroVersion=RwdGutenbergVersion
+
+DistroTitle="#{DistroName}-#{DistroVersion}"
+
+
 	
 $progdir = File::expand_path( File.dirname(__FILE__))
 results = " "
-puts "creating rwdgutenberg distribution files version #{RwdGutenbergVersion}"
+
+puts "creating #{DistroName} distribution files version #{DistroVersion}"
 puts "cleaning conf files"
 `tests/cleancnf.sh`
 puts "moving up one directory"
 Dir.chdir("..")
 
-zipcreatecmd = "zip  -r rwdgutenberg-#{RwdGutenbergVersion}.zip rwdgutenberg" 
+
+
+FileUtils.rm_rf("#{DistroTitle}.zip")
+zipcreatecmd = "zip  -r #{DistroTitle}.zip #{DistroName}" 
 puts "#{zipcreatecmd}"
  `#{zipcreatecmd}`
- tarcreatecmd = "tar --gzip -cf  rwdgutenberg-#{RwdGutenbergVersion}.tar.gz rwdgutenberg"
+ tarcreatecmd = "tar --gzip -cf  #{DistroTitle}.tar.gz #{DistroName}"
 puts "#{tarcreatecmd}"
 `#{tarcreatecmd}`
- tarcreatecmd2 = "tar --bzip2 -cf  rwdgutenberg-#{RwdGutenbergVersion}.tar.bz2 rwdgutenberg"
+ tarcreatecmd2 = "tar --bzip2 -cf  #{DistroTitle}.tar.bz2 #{DistroName}"
 puts "#{tarcreatecmd2}"
 `#{tarcreatecmd2}`
 
-print Dir["rwdgutenberg*.{gz,bz2,deb,gem}"]
+gemspecfilename = "#{DistroTitle}.gemspec"
+tobject = Time.now
+year = tobject.year.to_s
+month = tobject.mon.to_s
+daydate = tobject.day.to_s
+
+fd = File.open(gemspecfilename,"w")
+fd.print("Gem::Specification.new do |s|\n")
+fd.print("  s.name = %q{#{DistroName}}\n")
+fd.print("  s.version = \"#{DistroVersion}\"\n")
+fd.print("  s.date = %q{#{year}-#{month}-#{daydate}}")
+load "#{DistroName}/tests/gemspec"
+fd.print($gemspecvar)
+fd.close
+
+ListingCommand = "ls -1 -s -h #{DistroTitle}*"
+
+puts `#{ListingCommand}`
+
+print "Build finished\n"

metadata

@@ -1,10 +1,10 @@
 --- !ruby/object:Gem::Specification 
-rubygems_version: 0.8.6
+rubygems_version: 0.8.8
 specification_version: 1
 name: rwdgutenberg
 version: !ruby/object:Gem::Version 
-  version: "0.03"
-date: 2005-03-17
+  version: "0.04"
+date: 2005-04-05
 summary: rwdgutenberg application is a text file reader for RubyWebDialogs.
 require_paths: 
   - "."
@@ -36,6 +36,14 @@ files:
   - code/01rwdcore/rwdtinkerversion.rb
   - code/01rwdcore/rwdwindowreturn.rb
   - code/01rwdcore/uploadreturns.rb
+  - 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/dd0viewphoto/dd0viewphoto.rb
   - code/superant.com.rwdtinkerbackwindow/controlclient.rb
   - code/superant.com.rwdtinkerbackwindow/diagnostictab.rb
   - code/superant.com.rwdtinkerbackwindow/helptexthashtinkerwin2.rb
@@ -58,6 +66,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.gutenberg/savegutenbergrecord.rb
   - code/superant.com.gutenberg/gutenbergcreatefile.rb
@@ -114,7 +123,7 @@ files:
   - gui/frontwindow0/superant.com.gutenberg/30booklistutilities.rwd
   - gui/frontwindowselectionbegin/selectiontabbegin/selectiontabbegin.rwd
   - gui/frontwindowselections/superant.com.rwdtinkerwin2selectiontab
-  - gui/frontwindowselections/superant.com.rwdtinkerwin2selectiontab/rwdwin2selectiontab.rwd
+  - gui/frontwindowselections/superant.com.rwdtinkerwin2selectiontab/jumplinkcommands.rwd
   - gui/frontwindowselectionzend/viewselectionzend/viewselectionend.rwd
   - gui/frontwindowtdocumentbegin/superant.com.documentsbegin
   - gui/frontwindowtdocumentbegin/superant.com.documentsbegin/tt0documentbegin.rwd
@@ -129,15 +138,15 @@ files:
   - gui/frontwindowz1end/frontwindowend/xx0rwdfirsttab.rwd
   - gui/helpaboutbegin/superant.com.helpaboutbegin
   - gui/helpaboutbegin/superant.com.helpaboutbegin/ya0helpscreenstart.rwd
-  - gui/helpaboutinstalled/superant.com.rwdwin2helpabout
   - gui/helpaboutinstalled/superant.com.tinkerhelpabout
+  - gui/helpaboutinstalled/superant.com.rwdwin2helpabout
   - gui/helpaboutinstalled/superant.com.rwdgutenberghelpabout
-  - gui/helpaboutinstalled/superant.com.rwdwin2helpabout/1appname.rwd
-  - gui/helpaboutinstalled/superant.com.rwdwin2helpabout/3copyright.rwd
-  - gui/helpaboutinstalled/superant.com.rwdwin2helpabout/5version.rwd
   - gui/helpaboutinstalled/superant.com.tinkerhelpabout/1appname.rwd
   - gui/helpaboutinstalled/superant.com.tinkerhelpabout/3copyright.rwd
   - gui/helpaboutinstalled/superant.com.tinkerhelpabout/5version.rwd
+  - gui/helpaboutinstalled/superant.com.rwdwin2helpabout/1appname.rwd
+  - gui/helpaboutinstalled/superant.com.rwdwin2helpabout/3copyright.rwd
+  - gui/helpaboutinstalled/superant.com.rwdwin2helpabout/5version.rwd
   - gui/helpaboutinstalled/superant.com.rwdgutenberghelpabout/1versionname.rwd
   - gui/helpaboutinstalled/superant.com.rwdgutenberghelpabout/5version.rwd
   - gui/helpaboutzend/superant.com.helpaboutend
@@ -152,9 +161,9 @@ files:
   - gui/tinkerbackwindows/superant.com.tinkerbackwindow/60editconfiguration.rwd
   - gui/tinkerbackwindows/superant.com.tinkerbackwindow/70rwddiagnostics.rwd
   - gui/tinkerbackwindows/superant.com.tinkerbackwindow/75rwdcontrol.rwd
-  - gui/tinkerbackwindows/superant.com.tinkerbackwindow/80tab1.rwd
   - gui/tinkerbackwindows/superant.com.tinkerbackwindow/9backend.rwd
   - gui/tinkerbackwindows/superant.com.tinkerbackwindow/45installremotezip.rwd
+  - gui/tinkerbackwindows/superant.com.tinkerbackwindow/81jumplinkcommands.rwd
   - gui/tinkerbackwindows/superant.com.tinkerhelpwindow/1appname.rwd
   - gui/tinkerbackwindows/superant.com.tinkerhelpwindow/9end.rwd
   - gui/tinkerbackwindows/superant.com.versionwindow/1appname.rwd
@@ -173,17 +182,15 @@ files:
   - zips/rwdahelloworld-0.5.zip
   - Books/8sam810.txt
   - Books/Sam2.gut
-  - tests/rwdtinkertestEN.rb
-  - tests/test.result
+  - tests/RubyGauge.rb
   - tests/totranslate.lang
   - tests/cleancnf.sh
   - tests/rdep.rb
   - tests/checkdepends.sh
   - tests/makedist.rb
   - init.rb
-  - Readme.txt
   - rwdconfig.dist
-  - rwdgutenberg-0.03.gem
+  - Readme.txt
 test_files: []
 rdoc_options: 
   - "--main"

data/gui/frontwindowselections/superant.com.rwdtinkerwin2selectiontab/rwdwin2selectiontab.rwd

@@ -1,12 +0,0 @@
-$rwdguivar=
-"	
-     <row> <p></row>
-
-      <horizontal>
-      
-      <button caption=#{Message[:rwdtinker_back_window]} action=\"runrwdtinkerbackwindow\"/>
-      
-      
-    </horizontal>"
-
-

data/gui/tinkerbackwindows/superant.com.tinkerbackwindow/80tab1.rwd

@@ -1,11 +0,0 @@
-$rwdguivar=
-"
-  <tab name=\"backone\" caption=\"Back Tab\">
-
-<row> You can return to the previous window</row>
-<row><p> </row>
-<row><p> </row>
-<button caption=\"Return to top menu\" action=\"returntomain\"/>
-
-  </tab>"
-

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