rwdruby 1.05

data/code/dd0viewphoto/dd0viewphoto.rb

@@ -0,0 +1,3 @@
+def viewphoto
+	@rwd_window = "photo"
+end

data/code/superant.com.rwdshell/0runrefreshacpi.rb

@@ -0,0 +1,7 @@
+def runrefreshacpiwindow()
+  
+   @rwd_window = "rwdrefreshacpiwindow"
+   @rwd_tab = "rwdrefresh"
+  
+   end   
+   

data/code/superant.com.rwdshell/0uninstallapplet.rb

@@ -0,0 +1,16 @@
+# uninstall
+
+def rwdwruby_1_05()
+
+$tinkerdocumentsarray.delete_if {|x| x == "HowTo_Ruby.txt"} 
+$tinkerhelpaboutarray.delete_if {|x| x == "RwdRuby"} 
+Helptext.delete_if {|key, value| key == :rwdruby_help  } 
+Helptext.delete_if {|key, value| key == :ShellEnvironment_help } 
+Helptext.delete_if {|key, value| key == :shelledit_help }  
+$rwdjumplink.delete_if {|x| x == "RwdRubyBackWindow"} 
+$rwdjumplink.delete_if {|x| x == "RunRuby" } 
+$rwdjumplink.delete_if {|x| x == "RefreshAcpi" } 
+
+@rwd_window = "main"
+ 
+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/clearrubyscreendisplay.rb

@@ -0,0 +1,7 @@
+   # this method clears the on screen variables
+   def clearrubyscreendisplay
+ 
+        @a_rubyscriptfilename = ""
+      @a_rubyscriptrecord= ""
+
+  end

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

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

data/code/superant.com.rwdshell/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/superant.com.rwdshell/helptexthashshell.rb

@@ -0,0 +1,31 @@
+  
+
+ Helptext.update( :rwdshell_help => "   You can get a list of all scripts by clicking the listfiles button
+     
+      To see the text of a script
+       Type in the name of the script you want.
+      
+       type it without the sh ending
+       myscript
+       
+       Then click the 'ViewScript' button
+       
+       If it finds the script it will open it. 
+       It displays the text the search box.",
+      :ShellEnvironment_help => "You can view the setup that 
+       is on your system.
+      
+       Click on Fill 
+       This will show your setup
+       
+       You can edit the commands or comment
+       
+    
+     '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 lost next reboot", 
+
+    :shelledit_help =>  "You can edit scripts here
+ 'Fill Record'   will load the file selected on the script run tab
+  'Save Changes' will save the changes you have made - 
+ 'Clear' will clear the screen " 
+)

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/listscripts.rb

@@ -0,0 +1,13 @@
+# this code is to list the scripts 
+def  listscripts
+  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_scriptfilename  = applet
+  $currentscriptname = applet
+  @a_scriptcmd = applet
+end
+

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

@@ -0,0 +1,26 @@
+   # this method puts the configuration rexord on the screen
+  def loadrwdshellconfiguration
+ 
+         require 'fileutils'
+          
+               rwdrubyname = "rwdwruby-" + RwdRubyVersion + ".cnf"
+               @a_rshellconfigurationfilename = rwdrubyname 
+               
+	      
+        begin # exception trapped block
+       
+       Dir.chdir($progdir)
+	      fileName = File.join(ConfigurationDir, rwdrubyname)
+        
+        
+	      fd = File.open(fileName,"r")
+	      @a_rshellconfiguration=        fd.read
+	     
+
+
+        fd.close
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+
+  end

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

@@ -0,0 +1,14 @@
+   # this method loads the on screen variables into the running class
+   def loadrwdshellconfigurationvariables
+    rwdrubyname = "rwdwruby-" + RwdrubyVersion + ".cnf"
+   
+   configfiletoload = File.join(ConfigurationDir, rwdrubyname )
+   begin
+    load configfiletoload
+    @extrarshellconfigdatadisplay = ""
+@newrshellconfigurationresult = "Config Variables loaded"
+rescue
+ @extrarsconfigdatadisplay = ""
+ @newrshellconfigurationresult = "loading error"
+ end
+  end

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

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

data/code/superant.com.rwdshell/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/superant.com.rwdshell/openhelpwindowshell.rb

@@ -0,0 +1,33 @@
+# this code is to call the help window
+def runhelpwindowrwdshell
+
+     $help_topic = "rwdshell_help"
+   if @rwd_tab == "scriptlister"
+     $help_topic = "rwdshell_help"
+   end
+   
+    if @rwd_tab == "viewrwdshellconfiguration"
+       $help_topic = "ShellEnvironment_help"
+       end
+    if @rwd_tab == "EditScriptsrwdshell"
+       $help_topic = "shelledit_help"
+       end
+    if @rwd_tab == "editrubyrecordfile"
+       $help_topic = "shelledit_help"
+       end
+       
+     
+    
+   $helptopicsarray =  $helptopicsarray | ["rwdshell_help", "ShellEnvironment_help"]
+   $previouswindow = @rwd_window
+   $previoustab = @rwd_tab
+   
+  
+ if @rwd_window != "rwdtinkerhelpwindow"
+       $previouswindow = @rwd_window
+      $previoustab = @rwd_tab
+  end
+  runhelpwindow
+end
+
+

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

@@ -0,0 +1,23 @@
+  def playrubyscript
+  
+    
+    nametext = "%s" % [@a_rubyscriptcmd]
+	 
+      begin # exception trapped block
+      
+         fileName = $shellscript_directory + "/" + nametext + ".rb"
+        
+	    
+	       rubyfile_contents = File.read( fileName)
+     temp  = eval( rubyfile_contents)
+	      
+      
+	      
+	      
+        
+
+        
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+  end

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

@@ -0,0 +1,23 @@
+  def playscript
+  
+    
+    nametext = "%s" % [@a_scriptcmd]
+	 
+      begin # exception trapped block
+      
+         fileName = $shellscript_directory + "/" + nametext + ".sh"
+        
+	      fd = File.open(fileName,"r")
+	      
+	      
+	        commandtext = fd.read
+        fd.close
+	      
+	      
+        @playscript_display = `#{commandtext}`
+
+        
+        rescue SystemCallError, StandardError
+            $stderr.print "system call error: " + $!
+        end # exception rescue
+  end

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

@@ -0,0 +1,19 @@
+  def refreshrun
+    
+    refreshwindowtwo
+  end
+
+  $tempnumber  = 0
+ 
+  def refreshwindowtwo
+    @rwd_window	= "refreshwindowtwo"
+
+t = Time.now
+
+
+    $tempnumber += 1 
+    @refreshnumber = $tempnumber
+    @refreshresult1 = t.strftime("date:  %m/%d/%Y")
+    @refreshresult2 = t.strftime("time:  %I:%M%p")
+
+  end

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

@@ -0,0 +1,16 @@
+  def refreshrunacpi
+    
+    refreshwindowthree
+  end
+
+  $tempnumber  = 0
+ 
+  def refreshwindowthree
+    @rwd_window	= "refreshwindowthree"
+
+
+    $tempnumber += 1 
+    @refreshnumber = $tempnumber
+    @refreshresult = `#{DateCommand}`
+    @acpitracking = `#{AcpiCommand}`
+  end

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

@@ -0,0 +1,28 @@
+  $buffer = ''
+    def $buffer.write(str) # create a variable to use in rubyeval 
+      self << str
+    end
+   def rubyeval
+     
+     require 'English'
+#     $tmpout = $stdout # save the original STDOUT
+#     $stdout = $buffer
+    begin      # begin rescue monitored block	
+
+    commandtextruby = "%s " % [@a_rubyeval]
+
+# @rubydisplay = "hello"
+ 
+ @rubydisplay  = eval( commandtextruby ).to_s
+
+    
+
+        
+ rescue # process exeption
+	# $stdout = $tmpout # restore STDOUT to normal
+ @rubydisplay = "\n" + "error in eval"
+ end # end of rescue process  # of rescure monitored block        
+	
+
+  end
+  

data/code/superant.com.rwdshell/runrwdshellbackwindow.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 runrwdrubybackwindow
+   @rwd_window = "rwdrubybackwindow"
+   @rwd_tab = "viewrwdrubyconfiguration"
+   end   
+    

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

@@ -0,0 +1,12 @@
+# Application Rwdtinker 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 runrwdrubywindow
+
+   @rwd_window = "rwdrubywindow"
+   @rwd_tab="rwdshellruby"
+   
+   end   
+   

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

@@ -0,0 +1,10 @@
+# Application RwdTinker orginally (c) 2004 Steven Gibson under GPL. 
+# This application is a framework for writing programs from RubyWebDialogs
+# For  information see http://www.rubyforge.net/projects/rwdapplications
+
+# return the version constant defined in the config file
+def rwdrubyhelpaboutsetup
+return ["RwdRuby","(c) 2004-2008 Steven Gibson ","Version #{RwdRubyVersion}"]
+end
+
+  

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

@@ -0,0 +1,19 @@
+ 
+def savescriptrecord # this method adds a new script file
+  require 'fileutils'
+  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