rwddemo 0.6 → 0.7

data/Readme.txt

@@ -10,7 +10,7 @@ changing to the directory and
 ruby init.rb
 
 Then point your web browser to:
-http://localhost:7701/
+http://localhost:7705/
 
 Or to the port that shows on the console or in the config.cnf file
 

data/code/dd0shelleval/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/dd0shelleval/clearscriptscreendisplay.rb

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

data/code/dd0shelleval/deletescriptrecord.rb

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

data/code/{ek0shellscripts/em0listscripts.rb → dd0shelleval/listscripts.rb}

@@ -1,12 +1,13 @@
 # this code is to list the scripts 
 def  listscripts
-  fileList      = Dir.new($shellscript_directory).entries.sort.reverse.delete_if { |x| ! (x =~ /sh$/) }
+  fileList      = Dir.new($shellscript_directory).entries.sort.delete_if { |x| ! (x =~ /sh$/) }
   @listscriptresult = fileList.rwd_method("fillscriptname")
 end
  
 def fillscriptname(inffile)
   applet                = inffile.gsub(/\.sh$/, "")
-  @a_scriptlist  = applet
+  @a_scriptfilename  = applet
+  $currentscriptname = applet
   @a_scriptcmd = applet
 end
 

data/code/dd0shelleval/loadscriptrecord.rb

@@ -0,0 +1,20 @@
+   # this method views an existing address record
+  def loadscriptrecord
+ 
+         require 'fileutils'
+        @a_tmpscriptfilename = $currentscriptname
+	      
+        begin # exception trapped block
+       
+       
+	      fileName = $shellscript_directory + "/" + $currentscriptname + ".sh"
+        
+	      fd = File.open(fileName,"r")
+	      @a_scriptfirstline  =        fd.readline.chomp
+	      @a_scriptcommentline =  fd.readline.chomp
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

data/code/{cb7rubyeval/cb7rubyeval.rb → dd0shelleval/rubyeval.rb}

@@ -3,9 +3,11 @@
       self << str
     end
    def rubyeval
+     require 'Env'
+     require 'English'
     commandtextruby = "%s " % [@a_rubyeval]
-      $tmpout = $stdout # save the original STDOUT
-	 $stdout = $buffer
+     $tmpout = $stdout # save the original STDOUT
+     $stdout = $buffer
     begin      # begin rescue monitored block	
 	eval( commandtextruby )
 

data/code/dd0shelleval/runrwdshellwindow.rb

@@ -0,0 +1,9 @@
+# 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 runrwdshellwindow
+   @rwd_window = "rwdshellwindow"
+   end   
+   

data/code/dd0shelleval/rwddemohelpabout.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 runrwddemoversion
+  @rwd_window = "applicationversion"
+  @versionappnamedisplay = "RwdDemo"
+  @versioncopyrightdisplay = "(c) 2004 Steven Gibson "
+  @versionnumberdisplay =  "Version " + RwdDemoVersion
+
+   end
+  

data/code/dd0shelleval/rwdshellversion.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 runrwdshellversion
+  @rwd_window = "applicationversion"
+  @versionappnamedisplay = "RwdShell"
+  @versioncopyrightdisplay = "(c) 2004 Steven Gibson "
+  @versionnumberdisplay =  "Version " + RwdShellVersion
+
+   end
+  

data/code/{ek0shellscripts/en0createnewscript.rb → dd0shelleval/savechangedscript.rb}

@@ -1,18 +1,19 @@
  
-def createnew # this method adds a new script file
+def savescriptrecord # this method adds a new script file
   require 'fileutils'
-   
-   newname = "%s" %   [@a_filename] # grab the new filename to create
-   newdata =@a_firstline.to_s  + "\n #" + @a_commentline.to_s + "\n"   
-	 fullnewname = newname + ".sh"
+  if @a_tmpscriptfilename   
+   newdata =@a_scriptfirstline.to_s  + "\n #" + @a_scriptcommentline.to_s + "\n"   
+	 fullnewname = @a_tmpscriptfilename.to_s + ".sh"
         begin # exception trapped block
          fileName = File.join( $shellscript_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_tmpscriptfilename] # grab the new filename to create
+
        rescue 
             @newdisplay = "\n" + "system error in createnew method"
         end  # exception rescue
-
+   end
   end # end of createnew

data/code/{ek0shellscripts/em1viewscript.rb → dd0shelleval/viewscript.rb}

@@ -1,9 +1,9 @@
   def viewscript 
    require 'fileutils'
-    nametext = "%s" % [@a_scriptlist]
+    $currentscriptname = "%s" % [@a_scriptfilename]
 	 
         begin # exception trapped block
-   	 fileName = "scripts/" + nametext + ".sh"
+   	 fileName = $shellscript_directory +  "/" + $currentscriptname + ".sh"
         
 	fd = File.open(fileName,"r")
 	 @displayscripttext = " "

data/code/xb1rwdtinkerbackwindow/diagnostictab.rb

@@ -17,4 +17,5 @@
    def rwdtinkerversiondiagnostic
    @rwdtinkerversionreturn = "rwdtinker version " + RwdTinkerVersion
    end
-  
+
+ 

data/configuration/aa0rwdframework.cnf

@@ -1,11 +1,13 @@
-RwdTinkerVersion = "1.23"
+RwdTinkerVersion = "1.3"
 CodeName = "rwdtinker"
 CodeNameFile = CodeName + ".rb"
+LangNameFile = "rwdlanguage.rb"
 RWDFile	= "rwdtinker.rwd"
 $lang = "en"
  @@codedir = "code"
- @@guidir = "gui" + "/" + $lang
+ @@guidir = "gui" 
  @@langdir = "lang"
 
-TempLangHashFile = @@codedir + "/" + "al5languagefiles" + "/" + "templangfile.rb"
+TempLangHashFile = @@langdir + "/" + "templangfile.rb"
+LocalLangHashFile = @@langdir + "/" + "xlocallangfile.rb" 
 $port = 7705

data/configuration/ab1tinkerwin2.cnf

@@ -1,3 +1,4 @@
+
 RwdTinkerWin2Version = "0.5"
 ZipsLocation = "zips" # not yet functional
 

data/configuration/ek0playscripts.cnf

@@ -1,2 +1,4 @@
 
+RwdDemoVersion = "0.7"
 $shellscript_directory = "scripts"
+RwdShellVersion = "0.92"

data/configuration/gh1rwdcalendar.cnf

@@ -1,6 +1,7 @@
 
 $extras_directory = "extras"
 
+
 class LanguageTextrwdcalendar
 
  def locale(languagecode,wordtotranslate)

data/gui/aa2core/aa0rwdtop.rwd

@@ -0,0 +1,4 @@
+$rwdguivar=
+"<application>
+  <window name=\"main\" title=\"RwdDemo  - RwdTinker Applets with RubyWebDialogs\">
+<tabs>"

data/gui/ek0shellscripts/1listplayscripts.rwd

@@ -0,0 +1,17 @@
+$rwdguivar=
+"
+<tab name=\"scriptlister\" caption=\"List\\Run Scripts\">  
+	
+	
+	    <table>
+      <row> <p align=\"right\">Script Name:</p>  <text name=\"a_scriptcmd\"/> </row>
+
+    </table>
+   
+      <horizontal>
+      <button caption=\"Execute\" action=\"playscript\"/>
+      <button caption=\"Cancel\" action=\"main\"/>
+      
+    </horizontal>
+ <p>%playscript_display%</p>"
+	

data/gui/ek0shellscripts/2listscripts.rwd

@@ -0,0 +1,25 @@
+$rwdguivar=
+"
+    <table>
+      <row> <p align=\"right\">ScriptName:</p>  <text name=\"a_scriptfilename\"/> </row>
+
+    </table>
+    
+      <horizontal>
+       <button caption=\"ViewScript\" action=\"viewscript\"/>
+      <button caption=\"Cancel\" action=\"main\"/>
+      
+    </horizontal>
+    <p>%displayscripttext%</p>
+        
+    <horizontal>
+      
+      <button caption=\"ListFiles\" action=\"listscripts\"/>
+      <button caption=\"Cancel\" action=\"main\"/>
+      
+    </horizontal>
+    <p>%%listscriptresult%%</p>
+	</tab>"
+
+
+

data/gui/ek0shellscripts/3editscripts.rwd

@@ -0,0 +1,25 @@
+$rwdguivar=
+"
+	<tab name=\"EditScriptsrwdshell\" caption=\"Edit Scripts\">
+    <table>
+<row> <p> </row>   
+ <row> <p align=\"right\">You can create a new record here or edit one</row>
+   <row> <b>The filename will automatically have a .sh added</b> <row>
+   
+   <row> <p> </row>
+    </table>
+     <horizontal>
+      <button caption=\"Load Script\" action=\"loadscriptrecord\"/>
+      <button caption=\"Save Changes\" action=\"savescriptrecord\"/>
+     <button caption=\"Clear\" action=\"clearscriptscreendisplay\"/>
+      
+    </horizontal>
+    <table>    
+    <row> <p align=\"center\">FileName:</p>  <text name=\"a_tmpscriptfilename\"/> </row>
+            <row> <p align=\"center\">Script Line:</p>  <text name=\"a_scriptfirstline\"/> </row>
+      <row> <p align=\"center\">Comment Line:</p>  <text name=\"a_scriptcommentline\"/> </row>
+    </table>
+    <p>%newdisplay%</p>
+     
+      	</tab>"
+

data/gui/ek0shellscripts/4scriptutilities.rwd

@@ -0,0 +1,24 @@
+$rwdguivar=
+"  
+ <tab name=\"scriptutilitiesrwdshell\" caption=\"Script Utilities\">
+
+    <table>
+      <row> <p align=\"right\">Script Title:</p>  <text name=\"a_scriptfilename\"/> </row>
+      <row> <p align=\"right\">New Name:</p>  <text name=\"a_changescriptname\"/> </row>
+
+    </table>
+   
+      <horizontal>
+      <button caption=\"Rename Script \" action=\"changescriptname\"/>
+      <button caption=\"Delete Script\" action=\"deletescriptrecord\"/>
+          </horizontal>
+
+ <p>%%scriptfilechangeresult%%</p>
+          <horizontal>
+      <button caption=\"List Scripts\" action=\"listscripts\"/>
+         
+
+ </horizontal>
+
+ <p>%%listscriptresult%%</p>
+	</tab>"

data/gui/ek0shellscripts/6rwdshelleval.rwd

@@ -0,0 +1,16 @@
+$rwdguivar=
+	"
+	<tab name=\"shelleval\" caption=\"Shell Eval CMD\">
+
+    <table>
+      <row> <p align=\"right\">Shell Command:</p>  <text name=\"a_shelleval\"/> </row>
+
+    </table>
+    <p>%result%</p>
+      <horizontal>
+      <button caption=\"Execute\" action=\"shelleval\"/>
+      <button caption=\"Cancel\" action=\"main\"/>
+      
+    </horizontal>
+
+	</tab>"

data/gui/ek0shellscripts/cb7rwdrubyeval.rwd

@@ -0,0 +1,13 @@
+$rwdguivar=
+"
+	<tab name=\"three\" caption=\"ruby\">
+    <table>
+      <row> <p align=\"right\">Ruby Command:</p>  <text name=\"a_rubyeval\"/> </row>
+    </table>
+    <p>%rubydisplay%</p>
+      <horizontal>
+      <button caption=\"Execute\" action=\"rubyeval\"/>
+      <button caption=\"Cancel\" action=\"main\"/>
+    </horizontal>
+      	</tab>"
+

data/gui/hl9calendar/hl9calendar.rwd

@@ -0,0 +1,20 @@
+$rwdguivar=
+"
+	<tab name=\"calendar\" caption=\"Show Month\">
+    <table>
+      <row> <p align=\"right\">Year:</p>  <text name=\"a_year\"/> </row>
+<row> <p align=\"right\">Month:</p>  <text name=\"a_month\"/> </row>
+    </table>
+    <p>%showmonthresult%</p>
+      <horizontal>
+      
+      <button caption=\"ShowMonth\" action=\"showmonth\"/>
+
+      <button caption=\"Cancel\" action=\"main\"/>
+
+    
+    </horizontal>
+      
+
+	</tab>"
+

data/gui/hx1rwdcalc/ca0rwdcalc.rwd

@@ -0,0 +1,19 @@
+$rwdguivar=
+"
+	<tab name=\"rwdcalc\" caption=\"calc\">
+
+    <table>
+      <row> <p align=\"right\">First number:</p>  <text name=\"a_calc\"/> </row>
+      <row> <p align=\"right\">Second number:</p> <text name=\"b_calc\"/> </row>
+    </table>
+    <p>%result%</p>
+    <horizontal>
+
+      <button caption=\"Multiply\" action=\"multiply\"/>
+      <button caption=\"Add\" action=\"add\"/>
+    </horizontal>
+
+	</tab>"
+
+
+

data/gui/ll1selectiontabbegin/selectiontabbegin.rwd

@@ -0,0 +1,16 @@
+$rwdguivar=
+"	
+      <tab name=\"selectiontab\" caption=\"Selection Panel\">
+
+      <table>
+      <row> <p align=\"right\">Open a new window with callable applets you have loaded</row>
+
+     </table>
+      <horizontal>
+      
+      <button caption=\"RwdTinker Help Window\" action=\"runrwdtinkerhelpwindow\"/>
+      
+      
+     </horizontal>"
+
+

data/gui/ll5rwdtinkerwin2selectiontab/rwdwin2selectiontab.rwd

@@ -0,0 +1,12 @@
+$rwdguivar=
+"	
+     <row> <p></row>
+
+      <horizontal>
+      
+      <button caption=\"RwdTinker Back Window\" action=\"runrwdtinkerbackwindow\"/>
+      
+      
+    </horizontal>"
+
+

data/gui/lz1selectiontabend/endselectiontab.rwd

@@ -0,0 +1,3 @@
+$rwdguivar=
+"
+	</tab>"

data/gui/tt0documentsbegin/tt0documentbegin.rwd

@@ -0,0 +1,6 @@
+$rwdguivar=
+"
+  <tab name=\"one\" caption=\"Documents\">
+    <horizontal>
+    <table>"
+	

data/gui/{en/ub7rubyeval → ub7rubyeval}/rubyeval.rwd

@@ -1,3 +1,4 @@
-
-      <row> <p align="left"> 
-      <a href=HowTo_RubyEval.html>Howto_RubyEval.html</a></p></row>
+$rwdguivar=
+"
+      <row> <p align=\"left\"> 
+      <a href=HowTo_RubyEval.html>Howto_RubyEval.html</a></p></row>"

data/gui/uk5rwddemodocuments/documents.rwd

@@ -0,0 +1,4 @@
+$rwdguivar=
+"
+      <row> <p align=\"left\"> 
+      <a href=HowTo_RwdDemo.txt>Howto_RwdDemo.txt</a></p></row>"

data/gui/{en/uu5rwddocuments → uu5rwddocuments}/uu5documents.rwd

@@ -1,13 +1,15 @@
-      <row> <p align="left"> 
-      <a href=HowTo_Tinker.html>Howto_Tinker.html</a></p></row>
-      <row> <p align="left"> 
+$rwdguivar=
+"
+      <row> <p align=\"left\"> 
+      <a href=HowTo_Tinker.txt>Howto_Tinker.txt</a></p></row>
+      <row> <p align=\"left\"> 
       <a href=Readme.txt>Readme.txt</a></p></row>
-      <row> <p align="left"> 
+      <row> <p align=\"left\"> 
       <a href=COPYING>GPL License </a></p></row>
-      <row> <p align="left"> 
+      <row> <p align=\"left\"> 
       <a href=rwdapplications.html>more information about rwdapplications </a></p></row>
-      <row> <p align="left"> 
-      <a href=rwdindex.html>Link to online information about RubyWebdialogs </a></p></row>
+      <row> <p align=\"left\"> 
+      <a href=rwdindex.html>Link to online information about RubyWebdialogs </a></p></row>"
       
      
 	

data/gui/{nl/uu6rwdtinkerwin2documents → uu6rwdtinkerwin2documents}/uu5documents.rwd

@@ -1,4 +1,6 @@
-      <row> <p align="left"> 
-      <a href=HowTo_TinkerWin2.txt>Howto_TinkerWin2.txt</a></p></row>
+$rwdguivar=
+"
+      <row> <p align=\"left\"> 
+      <a href=HowTo_TinkerWin2.txt>Howto_TinkerWin2.txt</a></p></row>"
      
 	

data/gui/vv1docshellxp/vvdocshellxp.rwd

@@ -0,0 +1,5 @@
+$rwdguivar=
+"
+      <row> <p align=\"left\"> 
+      <a href=HowTo_Shell.txt>Howto_Shell.txt</a></p></row>"
+      

data/gui/ww0documentsend/ww0documentend.rwd

@@ -0,0 +1,7 @@
+$rwdguivar=
+"     
+ <row> <p align=\"left\"><a href=.>Spawn a clone Dialog window</a></p></row>
+    </table>
+        </horizontal>
+	</tab>"
+	

data/gui/wz6finaltabs/xx0rwdfirsttab.rwd

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

data/gui/{es/xa1versionwindow → xa1versionwindow}/1appname.rwd

@@ -1,4 +1,6 @@
-<window name = "applicationversion" title="Application Version">
+$rwdguivar=
+"
+<window name = \"applicationversion\" title=\"Application Version\">
 
  <row> <p></row>
           <p>%versionappnamedisplay%</p>
@@ -12,6 +14,6 @@
        <cancel/>
     </horizontal>
 
-</window>
+</window>"
 
 

data/gui/xa5rwdtinkercallablewindow/1appname.rwd

@@ -0,0 +1,17 @@
+$rwdguivar=
+"
+<window name = \"rwdtinkerhelpwindow\" title=\"RwdTinker Help\">
+<tabs>
+<tab name=\"main\" caption=\"Help\">
+ <row> <p></row>
+<row> <p>RwdTinker</row>
+<cancel/>
+</tab>
+
+<tab name=\"nexttab\" caption=\"Next\">
+ <row> <p></row>
+<row> <p>RwdTinker Help</row>
+<cancel/>
+</tab>
+
+</tabs>"

data/gui/xa5rwdtinkercallablewindow/9end.rwd

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

data/gui/xb1rwdtinkerbackwindow/1appname.rwd

@@ -0,0 +1,5 @@
+$rwdguivar=
+"
+<window name = \"tinkerbackwindow\" title=\"Tinker Back Window\">
+
+<tabs>"

data/gui/xb1rwdtinkerbackwindow/2tab1.rwd

@@ -0,0 +1,11 @@
+$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=\"main\"/>
+
+  </tab>"
+

data/gui/xb1rwdtinkerbackwindow/3arwddiagnostics.rwd

@@ -0,0 +1,33 @@
+$rwdguivar=
+"
+	<tab name=\"diagnostictab\" caption=\"Diagnostic Tab\">
+      <horizontal>
+       <button caption=\"View Ruby Version\" action=\"runrubyversion\"/>
+    
+      
+    </horizontal>
+    <p>%rubyversion%</p>
+
+
+    <table>
+      <row> <p> </row>
+      
+    </table>
+
+    <horizontal>
+       <button caption=\"view platform\" action=\"runviewplatform\"/>
+           
+    </horizontal>
+
+    <p>%platformdisplay%</p>
+    <horizontal>
+       <button caption=\"View rwdtinker Version\" action=\"rwdtinkerversiondiagnostic\"/>
+           
+    </horizontal>
+
+    <p>%rwdtinkerversionreturn%</p>
+
+	</tab>"
+
+
+