rwddemo 0.8 → 0.90

data/Readme.txt

@@ -119,6 +119,27 @@ There are two ways to add applets to the directories.
 
 To exit, press the x inside the browser window.
 
+== To add context sensitive help
+
+ You need to add a hash file that just needs to contain
+ Helptext.update( :myapplet_generalhelp => "    This is the general help 
+      You can add help text hear")
+      
+      And you need to add a help run script that will call runhelpwindow
+      This should have a method that includes:
+       setting $help_topic, and adds to $helptopicsarray, saves the calling window and calls runhelpwindow which will render the help message.
+  
+  if @rwd_tab == "gemservescan"
+      $help_topic = "gemdocs_help"
+    end
+   $helptopicsarray =  $helptopicsarray | ["rubyslippers_generalhelp", "Install_Gem","GemCommands_help", "gemfilesinstalled","gemdocs_help"]
+ if @rwd_window != "rwdtinkerhelpwindow"
+       $previouswindow = @rwd_window
+      $previoustab = @rwd_tab
+  end
+  runhelpwindow
+ end
+
 == Languages
 
 
@@ -212,6 +233,31 @@ http://www.erikveen.dds.nl/rubywebdialogs/index.html
 Thanks, Steven Gibson
 
 == Changelog
+version 1.50
+ changed unzip applet to be internal code - no exec to unzip program
+ changed order of tabs on back window - list applets now first
+ added rwdwcalc applet in to zips directory
+ changed width of text fields with help from RubyWebDialogs author
+
+version 1.49
+ added demon function for remote queries
+ startup application on first available port
+ 
+version 1.48
+ fix in context sensitive help so that applets can use it better
+
+version 1.47
+ change to context sensitive help
+
+version 1.46
+ more work on context help
+ window calls point to tab as well as windows
+ help added help buttons on Document, Selection, View Applet, tabs
+
+version 1.45
+ first steps toward context sensitive help
+ added help button on main window/tab
+  
 version 1.44
  updated directory structure - refactored gui files
  Changed gui directory names - more like  Java package titles

data/code/{ag1core/aa0begin.rb → 01rwdcore/01rwdcore.rb}

@@ -10,6 +10,8 @@ class RwdTinker  < RWDialog
   @rwd_window = "main"
     @result = "idle"
     @display= "idle"
+
+    
   end
   
   def inspect

data/code/01rwdcore/02helptexthashbegin.rb

@@ -0,0 +1,4 @@
+  
+
+ Helptext = Hash.new { |hh, kk| hh[kk] = "ERROR: Identificador de mensaje desconocido: #{kk.inspect}."; hh[kk] }
+    helpmessage = {

data/code/01rwdcore/03helptexthash.rb

@@ -0,0 +1,31 @@
+ # Help files for RwdTinker core
+
+   
+      :general_help          => "You can work with Applets:  go to 'Selection tab', 
+                                  On that back screen you will find:
+                                  List Applets:  you can see and delete installed applets
+                                  List Zips: you can see lists of applets that you can install
+                                  Edit Configuration: You can view the rwdtinker configuration and change it
+                                  Diagnostic Tab: You can view the environments variables that rwdtinker is running with
+      ",
+      :network_help  => "Using over a Network: To serve the application over your local LAN,change the last line in the
+init.rb file to something like:\n
+RwdTinker.file(RWDFile).serve(8080, '-r' ? '.rwduids' : nil)\n
+Then you should be able to login at: http://yourhostname:8080",
+
+          
+  :documents_rwdtinker => "Documents:
+  
+  
+  when you click on a document name, the document should pop up in a 
+  browser window, or in another browser tab.",
+  :remote_control => "Remote control gives you a way to determine what applications are running on which ports
+  
+  The name of the application is set in the config file
+  You need to click the show remote command choices first - this will show the port and query choices
+   Then you can click in 'Run Command' to see if other applications are running.
+   
+   The remote ports daemon will not be running unless you start it.
+   
+  "
+      

data/code/01rwdcore/04helptextend.rb

@@ -0,0 +1,6 @@
+
+    }
+    helpmessage.each { |kk, vv| Helptext[kk] = vv }
+  
+
+

data/code/01rwdcore/openhelpwindow.rb

@@ -0,0 +1,31 @@
+# this code is to call the help window
+def runhelpwindow
+  $helptopicsarray = $helptopicsarray | ["applet_installation","applet_viewing","applet_tinkerbackeditconfiguration","remote_control"]
+  
+ if @rwd_window == "main"
+   if @rwd_tab == "documentsrwdtinkerone"
+     $help_topic = "documents_rwdtinker"
+   end
+ 
+end
+ 
+   if @rwd_window == "rwdtinkerhelpwindow"
+   puts "in help window processing"
+  else
+   $previouswindow = @rwd_window
+   $previoustab = @rwd_tab
+   end
+    
+   
+  @rwdhelptopic = $help_topic
+  @rwdhelpdataoutput      = "#{Helptext[:"#{$help_topic}"]}"
+  @rwdhelpsubchoicesoutput = $helptopicsarray.rwd_method("choosenewhelptopic")
+  @rwd_window = "rwdtinkerhelpwindow"
+end
+ 
+ def choosenewhelptopic(inffile)
+  $help_topic                 = inffile
+  runhelpwindow
+  end
+
+

data/code/01rwdcore/returntomain.rb

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

data/code/01rwdcore/rwdwindowreturn.rb

@@ -0,0 +1,11 @@
+# this code is to return to the window back from the help window
+def rwdwindowreturn
+ 
+
+   @rwd_window = "#{$previouswindow}"
+   @rwd_tab = "#{$previoustab}"
+   end
+ 
+
+
+

data/code/rwdcalc/clearscriptscreendisplay.rb

@@ -0,0 +1,9 @@
+   # this method clears the on screen variables
+   def clearcalcscreendisplay
+ 
+        @a_tmpscriptfilename = ""
+      @a_calcscriptrecord = ""
+      
+
+
+  end

data/code/rwdcalc/deletescriptrecord.rb

@@ -0,0 +1,20 @@
+   # this method views an existing address record
+  def deletecalcscriptrecord
+ 
+    require 'fileutils'
+  
+      if @a_calcscriptfilename
+      $currentscriptname =  @a_calcscriptfilename
+      end
+              
+              
+    begin # exception trapped block
+      fileName = $calcscript_directory + "/" + $currentscriptname + ".math"
+      File.delete(fileName)
+      @calcscriptfilechangeresult = "File Deleted!"
+      $currentscriptname = ""
+     rescue 
+         @calcscriptfilechangeresult = "File Deletion error"
+    end # exception rescue
+
+  end

data/code/rwdcalc/helptexthashrwdcalc.rb

@@ -0,0 +1,14 @@
+  
+
+ Helptext.update( :rwdcalc_generalhelp => "     Calc tabs
+      corrected selectiontab
+ added sample math demos
+ added script running tab
+ added script editing
+ added script rename, delete
+ updated for rwdtinker 1.51
+      
+       "
+       
+
+)

data/code/rwdcalc/listscripts.rb

@@ -0,0 +1,13 @@
+# this code is to list the scripts 
+def  listcalcscripts
+  fileList      = Dir.new($calcscript_directory).entries.sort.delete_if { |x| ! (x =~ /math$/) }
+  @listcalcscriptresult = fileList.rwd_method("fillcalcscriptname")
+end
+ 
+def fillcalcscriptname(inffile)
+  applet                = inffile.gsub(/\.math$/, "")
+  @a_calcscriptfilename  = applet
+  $currentcalcscriptname = applet
+  @a_calcscriptcmd = applet
+end
+

data/code/rwdcalc/loadscriptrecord.rb

@@ -0,0 +1,20 @@
+   # this method views an existing address record
+  def loadcalcscriptrecord
+ 
+         require 'fileutils'
+         $currentscriptname = @a_calcscriptfilename 
+	      
+        begin # exception trapped block
+       
+       
+	      fileName = $calcscript_directory + "/" + $currentscriptname + ".math"
+        
+	      fd = File.open(fileName,"r")
+	      @a_calcscriptrecord  =        fd.read
+	      
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

data/code/rwdcalc/mathcommands.rb

@@ -0,0 +1,53 @@
+
+  def runmathcommand
+   
+    commandtext =  @a_mathcommandinput.to_s 
+    
+  
+    begin # exception trapped block
+         
+         
+         
+     @mathcommandresult = "no result"
+                  
+if commandtext == "sin" 
+
+ @mathcommandresult = Math.sin(  @a_mathtoola.to_f )
+ end
+if commandtext == "cos" 
+
+ @mathcommandresult = Math.cos(  @a_mathtoola.to_f )
+ end
+ if commandtext == "atan2"
+ @mathcommandresult = Math.atan2(  @a_mathtoola.to_f ,@a_mathtoolsb.to_f)
+ end
+if commandtext == "exp" 
+
+ @mathcommandresult = Math.exp(  @a_mathtoola.to_f )
+ end
+ if commandtext == "log" 
+
+ @mathcommandresult = Math.log(  @a_mathtoola.to_f )
+ end
+ if commandtext == "log10" 
+
+ @mathcommandresult = Math.log10(  @a_mathtoola.to_f )
+ end
+ if commandtext == "sqrt" 
+
+ @mathcommandresult = Math.sqrt(  @a_mathtoola.to_f )
+ end
+ if commandtext == "tan" 
+
+ @mathcommandresult = Math.tan(  @a_mathtoola.to_f )
+ end
+    rescue SystemCallError, StandardError
+     @mathcommandresult = "system call error: " + $!
+    end # exception rescue
+
+  end
+
+
+def showmathcommandoptions
+ @mathcommandoptions = ["sin","atan2","cos","exp","log","log10","sqrt","tan"].rwd_options
+ end

data/code/rwdcalc/openhelpwindowrwdcalc.rb

@@ -0,0 +1,21 @@
+# this code is to call the help window
+def runhelpwindowrwdcalc
+
+     $help_topic = "rwdcalc_generalhelp"
+
+    
+  if @rwd_tab  == "scriptutilitiesrwdshell"
+    $help_topic = "rwdcalc_generalhelp"
+    end
+   $helptopicsarray =  $helptopicsarray | ["rwdcalc_generalhelp"]
+  
+   
+  
+ if @rwd_window != "rwdtinkerhelpwindow"
+       $previouswindow = @rwd_window
+      $previoustab = @rwd_tab
+  end
+  runhelpwindow
+end
+
+

data/code/rwdcalc/playscript.rb

@@ -0,0 +1,22 @@
+  def playcalcscript
+  
+    
+    nametext = "%s" % [@a_calcscriptcmd]
+	 
+      begin # exception trapped block
+         fileName = "scripts/" + nametext + ".math"
+        
+	    
+	       calcfile_contents = File.read( fileName)
+     temp  = eval( calcfile_contents)
+	      
+      
+	      
+	      
+        
+
+        
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+  end

data/code/rwdcalc/renamecalcrecord.rb

@@ -0,0 +1,14 @@
+ # this code is to change the file name
+ def changecalcscriptname
+  oldName =  $calcscript_directory + "/" + @a_calcscriptfilename +  ".math"
+  newName =  $calcscript_directory + "/" + @a_changecalcscriptname + ".math"
+ begin 
+ File.rename(oldName, newName)
+  @calcscriptfilechangeresult = "File Renamed!" 
+  rescue
+  @calcscriptfilechangeresult = "rename error"
+  end
+  
+   end
+
+

data/code/rwdcalc/runrwdcalcwindow.rb

@@ -5,5 +5,6 @@
   # call the window  
   def runrwdcalcwindow
    @rwd_window = "rwdcalcwindow"
+  @rwd_tab = "rwdfcalc"
    end   
    

data/code/rwdcalc/savechangedscript.rb

@@ -0,0 +1,19 @@
+ 
+def savecalcrecord # this method adds a new script file
+  require 'fileutils'
+  if @a_calcscriptfilename   
+   newdata =@a_calcscriptrecord.to_s     
+	 fullnewname = @a_calcscriptfilename.to_s + ".math"
+        begin # exception trapped block
+         fileName = File.join( $calcscript_directory, fullnewname )
+        	fd = File.open(fileName,"w")
+	        fd.print(newdata) # save the record info to the file
+	        fd.close
+          @newdisplay=newdata # show the record info in the browser
+   $currentscriptname = "%s" %   [@a_calcscriptfilename] # grab the new filename to create
+
+       rescue 
+            @newdisplay = "\n" + "system error in createnew method"
+        end  # exception rescue
+   end
+  end # end of createnew

data/code/rwdcalc/viewscript.rb

@@ -0,0 +1,18 @@
+  def viewcalcscript 
+   require 'fileutils'
+    $currentscriptname = "%s" % [@a_calcscriptfilename]
+	 
+        begin # exception trapped block
+   	 fileName = $calcscript_directory+  "/" + $currentscriptname + ".math"
+        
+	fd = File.open(fileName,"r")
+	 @displayscripttext = " "
+	while ! fd.eof?
+	 @displayscripttext = fd.read
+	 end
+	 fd.close
+        rescue
+            @displayscripttext = "\n" + "error"
+        end # exception rescue
+
+  end

data/code/superant.com.rwdcalendar/gh9calendar.rb

@@ -1,16 +1,40 @@
- require 'fileutils'
- 
- def showmonth
-      
-    begin      # begin rescue monitored block	
-
-     command_file_path = File.join( $extras_directory, 'cal.rb' )   
-     
-     @showmonthresult = `ruby  #{command_file_path} -c #{$lang} #{@a_month.to_i} #{@a_year.to_i} ` 
-        
-   rescue # process exeption
-     @showmonthresult = "\n" + "error in eval"
-   end # end of rescue process  # of rescure monitored block        
-
-  end
-  
+ require 'fileutils'
+ 
+ def showmonth
+      require 'date'
+    begin      # begin rescue monitored block	
+    cal_path = File.join( $extras_directory, 'cal' )   
+     require cal_path
+      to = Date.today
+       tempyear ||= to.year
+       tempmonth ||= to.mon
+    if @a_year.to_i > 0 and @a_month.to_i > 1
+       tempyear = @a_year.to_i
+      tempmonth = @a_month.to_i
+          
+       end
+ tempweekdaystring = " "
+     
+     cal = Cal.new
+     calendardata = cal.print(tempyear,tempmonth)
+     @showcalendartitle = calendardata[0]
+     @showcalendarweektitles = calendardata[1]
+     tempweekdaystring = calendardata[2].tr(' ', '.')
+     @showmonthresult1 = tempweekdaystring
+          
+        tempweekdaystring = calendardata[3].tr(' ', '.')
+      @showmonthresult2 = tempweekdaystring
+       tempweekdaystring = calendardata[4].tr(' ', '.')
+      @showmonthresult3 =  tempweekdaystring 
+       tempweekdaystring = calendardata[5].tr(' ', '.')
+      @showmonthresult4 =  tempweekdaystring 
+     tempweekdaystring = calendardata[6].tr(' ', '.')
+      @showmonthresult5 =  tempweekdaystring 
+         tempweekdaystring = calendardata[7].tr(' ', '.')
+      @showmonthresult6 =  tempweekdaystring 
+   rescue # process exeption
+     @showmonthresult = "\n" + "error in eval"
+   end # end of rescue process  # of rescue monitored block        
+
+  end
+  

data/code/superant.com.rwdshell/changescriptname.rb

@@ -0,0 +1,16 @@
+ # this code is to change the contact name
+ def changescriptname
+ begin
+  oldName =  $shellscript_directory + "/" + @a_scriptfilename +  ".sh"
+  newName =  $shellscript_directory + "/" + @a_changescriptname + ".sh"
+ 
+ File.rename(oldName, newName)
+  @scriptfilechangeresult = "File Renamed!"
+  $currentscriptname = @a_changescriptname 
+  rescue
+  @scriptfilechangeresult = "rename error"
+  end
+  
+   end
+
+

data/code/superant.com.rwdshell/helptexthashrubyslippers.rb

@@ -0,0 +1,81 @@
+  
+
+ Helptext.update( :rubyslippers_generalhelp => "    You can view the list of gems you have installed
+      by clicking on the list files button
+
+      You can view the contents of the gemspec file by typing or pasting a name in.
+
+      When you are finished press the open button (leave off the .gemspec ending) ",
+    :Install_Gem  => "You can list the Gems available in the repository
+      Click on the button. 
+      It will take several seconds then should show the list.
+            
+      To install a gem, enter the name into to textbox and
+      click on the install Gem button
+      You should see the result of the command on the screen
+      
+      You can check in the first tab if it is installed.",
+      :GemCommands_help => "You can view the setup that Gem has on your system.
+      
+       Click on Show Environment
+       This will show your setup
+       
+       You can run a Gem command or a shell command
+       
+       Click on the 'Show Gem Command Choices' this will bringup the command that will be added to 'gem'
+       you can choose the blank choice or: 
+       help,--version,list --local,check -a,check --test,search,search --remote,specification,uninstall
+       
+       Enter the command in the box and press the
+       Run Command button
+       
+       It displays the result of the command on the screen.
+       
+      Click 'List Installed Gem Files' to bring up a list at the bottom of    the page. 
+      You can click on one to fill in the second command box. You will probably need to remove the version on the end
+      of the file name for the gem command to properly work.
+      the commands that can take a file name are:    list --local,check --test,search,search --remote,specification,uninstall  
+       
+       ",
+       :gemfiles_help  => "You can view the files that are installed for applications
+      
+       Click on Show Gem Dirs
+       This will show your list of Gems installed
+       
+       
+       Click on Show Application Files
+       This will show your list of files installed",
+       :gemdocs_help => "You can scan for the Gem doc server. 
+
+If the gem doc server is running you can click and view the docs
+The docs for installed Gems should be visible ",
+:gemfilesinstalled => "You can see a list of gems that are installed on your system",
+:gemconfiguration_help =>  "You can view the configuration file for Rubyslippers and edit it
+ 'Fill Record'   will load the configuration file rubyslippers.cnf into the screen input boxes
+ 'Save Changes' will save the changes you have made - BE CERTAIN YOUR CHANGES ARE CORRECT
+ 'Reload Variables' will load the changes you have made - otherwise your changes will be load next reboot 
+ 
+",
+:gemspecdata_help => "You can view gemspecs
+
+The directory searched in is in the rubyslippers.cnf
+",
+:editgemspec_help => "You can edit gemspec
+ You need to open a gemspec in the 'View Gemspec' tab first
+ 
+ The directory searched in is in the rubyslippers.cnf
+",
+:buildgem_help => "gem utilities are available as well as the gem build command
+
+You can rename a gemspec, copy a gemspec or delete a gemspec
+
+You can select a gemspec by clicking on 'list gemspecs'
+
+You need to select a directory for the gem to be built in by clicking on 'list Gem Directories'
+
+The directory searched in is in the rubyslippers.cnf",
+:viewgemdir_help => "you can view the files in the gem directory before you build it
+You can select a directory for the gem to be built in by clicking on 'list Gem Directories'
+"
+
+)

data/code/superant.com.rwdshell/listrubyscripts.rb

@@ -0,0 +1,13 @@
+# this code is to list the scripts 
+def  listrubyscripts
+  fileList      = Dir.new($shellscript_directory).entries.sort.delete_if { |x| ! (x =~ /rb$/) }
+  @listrubyscriptresult = fileList.rwd_method("fillrubyscriptname")
+end
+ 
+def fillrubyscriptname(inffile)
+  applet                = inffile.gsub(/\.rb$/, "")
+  @a_rubyscriptfilename  = applet
+  $currentrubyscriptname = applet
+  @a_rubyscriptcmd = applet
+end
+

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

@@ -0,0 +1,33 @@
+   # this method puts the configuration rexord on the screen
+  def loadrwdshellconfiguration
+ 
+         require 'fileutils'
+          
+               @a_rshellconfigurationfilename = "playscripts.cnf" 
+        
+	      
+        begin # exception trapped block
+       
+       Dir.chdir($progdir)
+	      fileName = File.join(ConfigurationDir, "playscripts.cnf")
+        
+        
+	      fd = File.open(fileName,"r")
+	      @a_rshellconfigline1=        fd.readline.chomp
+	      @a_rshellconfigline2 =  fd.readline.chomp
+        @a_rshellconfigline3 = fd.readline.chomp
+          @a_rshellconfigline4 = fd.readline.chomp
+        @a_rshellconfigline5 = fd.readline.chomp
+         @a_rshellconfigline6 = fd.readline.chomp 
+          @a_rshellconfigline7 =fd.readline.chomp
+          @a_rshellconfigline8 = fd.readline.chomp
+           @a_rshellconfigline9 = fd.readline.chomp
+	 
+
+
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

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

@@ -0,0 +1,13 @@
+   # this method loads the on screen variables into the running class
+   def loadrubyslippersconfigurationvariables
+   
+   configfiletoload = File.join(ConfigurationDir,"rubyslippers.cnf")
+   begin
+    load configfiletoload
+    @extrarsconfigdatadisplay = ""
+@newrsconfigurationresult = "Config Variables loaded"
+rescue
+ @extrarsconfigdatadisplay = ""
+ @newrsconfigurationresult = "loading error"
+ end
+  end