rwdshell 0.96 → 0.97

data/gui/frontwindow0/superant.com.shellscripts/1listplayscripts.rwd

@@ -10,7 +10,7 @@ $rwdguivar=
    
       <horizontal>
       <button caption=\"Execute\" action=\"playscript\"/>
-      <button caption=\"Cancel\" action=\"main\"/>
+      <button caption=\"Help\" action=\"runhelpwindowrwdshell\"/>
       
     </horizontal>
  <p>%playscript_display%</p>"

data/gui/frontwindow0/superant.com.shellscripts/2listscripts.rwd

@@ -7,7 +7,7 @@ $rwdguivar=
     
       <horizontal>
        <button caption=\"ViewScript\" action=\"viewscript\"/>
-      <button caption=\"Cancel\" action=\"main\"/>
+      
       
     </horizontal>
     <p>%displayscripttext%</p>
@@ -15,7 +15,7 @@ $rwdguivar=
     <horizontal>
       
       <button caption=\"ListFiles\" action=\"listscripts\"/>
-      <button caption=\"Cancel\" action=\"main\"/>
+      
       
     </horizontal>
     <p>%%listscriptresult%%</p>

data/gui/frontwindow0/superant.com.shellscripts/6rwdshelleval.rwd

@@ -4,13 +4,12 @@ $rwdguivar=
 
     <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>
 
+    </table>
+    <p>%result%</p>
+
 	</tab>"

data/gui/frontwindowtdocuments/superant.com.shelldocument/vvdocshellxp.rwd

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

data/init.rb

@@ -23,6 +23,7 @@
 
 require "ev/rwd"
 require 'fileutils'
+require 'extras/rconftool'
 	
 $progdir = File::expand_path( File.dirname(__FILE__))
 
@@ -59,8 +60,25 @@ $progdir = File::expand_path( File.dirname(__FILE__))
           end
   end 
         
+# integrate the new configuration files
+MAINconfignew =  "rwdconfig.cnf"
+MAINconfigdist = "rwdconfig.dist"
+Rconftool::install(MAINconfigdist,MAINconfignew)
+
+ Dir.chdir("configuration")    #changes the current working directory
+      
+ fileList = Dir.new(".").entries.sort.reverse.delete_if { |x| ! (x =~ /dist$/) } #creates an Array separated with \n
+ @doc = ""
+ fileList.length.times{               #opening of a block
+    configdist =fileList.pop                #pops the first item out of the Array
+tempconfigfile = configdist.gsub(/\.dist$/, "")
+confignew = tempconfigfile + ".cnf"
+Rconftool::install(configdist,confignew)     #integrates new file with old 
+  }       #closing block
+ # END of configuration integration 
+Dir.chdir($progdir)
+
 # Read in the configuration files
- 
  Dir.chdir("configuration")    #changes the current working directory
       
  fileList = Dir.new(".").entries.sort.reverse.delete_if { |x| ! (x =~ /cnf$/) } #creates an Array separated with \n
@@ -70,7 +88,7 @@ $progdir = File::expand_path( File.dirname(__FILE__))
     load fileName     #loads the the config file thats in fileName 
   }       #closing block
  # END of configuration reading 
-
+ 
  Dir.chdir($progdir) # change back to top program directory
 
  # build the English Language hash file from the parts

data/rwd_files/HowTo_Shell.txt

@@ -193,9 +193,18 @@ http://www.erikveen.dds.nl/rubywebdialogs/index.html
 Thanks, Steven Gibson
 
 == Changelog
+version 0.97
+ correct bug in shell command eval
+ beginning to add context help 
+ updated for rwdtinker version 1.58
+ added rconftool use to update configuration files
+ changed applets removal to not use external rm
+ removed version number from directory name
+ 
 version 0.96
  updated for rwdtinker 1.56
  first debian version
+ correct execute shell script to work with changed scripts directory
  
 version 0.95
  added ruby script running

data/rwd_files/HowTo_Tinker.txt

@@ -227,6 +227,14 @@ http://www.erikveen.dds.nl/rubywebdialogs/index.html
 Thanks, Steven Gibson
 
 == Changelog
+version 1.58
+ check for zlib
+ check for files to delete
+
+version 1.57
+  added rconftool use to update configuration files
+  changed applets remove to not used external rm
+
 version 1.56
  refactored gui files to load without intermediate files
   refactored code files to load without intermediate files

data/rwdconfig.dist

@@ -0,0 +1,6 @@
+##VERSION:1.57
+# rwdtinker core configuration file
+##NAME: ConfigLocation:0
+ConfigLocation=""
+##NAME: ZipsLocation:0
+ ZipsLocation=""

data/tests/checkdepends.sh

@@ -0,0 +1,4 @@
+#!/bin/sh
+ruby rdep.rb ../*.rb
+echo "checking installapplet.rb"
+ruby rdep.rb ../code/superant.com.rwdtinkerbackwindow/installapplet.rb

data/tests/cleancnf.sh

@@ -0,0 +1,5 @@
+#!/bin/sh
+rm *.cnf
+rm *.bak
+rm configuration/*.cnf
+rm configuration/*.bak

data/tests/makedist.rb

@@ -0,0 +1,29 @@
+#!/usr/bin/ruby -w
+#***********************************************************************
+#* Rwd/shell -- A Ruby program for the RudyWebDialog.
+#* Copyright (c) 2004, 2005 by Steven Gibson. All Rights Reserved.
+#* at "steven@superant.com".
+#***********************************************************************/
+
+require 'fileutils'
+load 'configuration/rwdshell.dist'
+	
+$progdir = File::expand_path( File.dirname(__FILE__))
+results = " "
+puts "creating rwdshell distribution files version #{RwdShellVersion}"
+puts "cleaning conf files"
+`tests/cleancnf.sh`
+puts "moving up one directory"
+Dir.chdir("..")
+
+zipcreatecmd = "zip  -r rwdshell-#{RwdShellVersion}.zip rwdshell" 
+puts "#{zipcreatecmd}"
+ `#{zipcreatecmd}`
+ tarcreatecmd = "tar --gzip -cf  rwdshell-#{RwdShellVersion}.tar.gz rwdshell"
+puts "#{tarcreatecmd}"
+`#{tarcreatecmd}`
+ tarcreatecmd2 = "tar --bzip2 -cf  rwdshell-#{RwdShellVersion}.tar.bz2 rwdshell"
+puts "#{tarcreatecmd2}"
+`#{tarcreatecmd2}`
+
+print Dir["rwdshell*.{gz,bz2,deb,gem}"]

data/tests/rdep.rb

@@ -0,0 +1,354 @@
+=begin
+
+rdep - The Ruby Dependency Tool
+Version 1.4
+
+Hal E. Fulton
+2 November 2002
+Ruby's license
+
+Purpose
+
+  Determine the library files on which a specified Ruby file is dependent 
+  (and their location and availability).
+
+Usage notes
+
+  Usage: ruby rdep.rb sourcefile
+
+  The sourcefile may or may not have a .rb extension.
+
+  The directories in the $: array (which includes the RUBYLIB environment 
+  variable) are searched first. File extensions are currently searched for 
+  in this order: no extension, .rb, .o, .so, .dll (this may not be correct).
+
+  If there are no detected dependencies, the program will give the
+  message, "No dependencies found."
+
+  If the program finds [auto]load and require statements that it can 
+  understand, it searches for the specified files. Any recognized Ruby 
+  source files (*.rb) are processed recursively in the same way. No attempt 
+  is made to open the files that appear to be binary.
+
+  The program will print up to four lists (any or all may be omitted):
+    1. A list of files it found by going through RUBYLIB.;
+    2. A list of files found under the searchroot (or under '.');
+    3. A list of directories under searchroot which should perhaps be 
+       added to RUBYLIB; and
+    4. A list of files (without extensions) which could not be found.
+
+  If there were unparseable [auto]load or require statements, a warning 
+  will be issued.
+
+  Between lists 3 and 4, the program will give an opinion about the overall
+  situation. The worst case is that files were not found; the uncertain
+  case is when there were unparseable statements; and the best case is 
+  when all files could be found (lists 1 and 2).
+  
+Exit codes
+
+  0 - Usage or successful execution
+  1 - Nonexistent sourcefile specified
+  2 - Improper sourcefile (pipe, special file, ...)
+  3 - Some kind of problem reading a file
+
+Limitations
+
+  Requires Ruby 1.6.0 or higher
+  No recursion on binaries
+  Can't look at dynamically built names
+  Can't detect "tested" requires (e.g.: flag = require "foo.rb")
+  [auto]load/require can be preceded only by whitespace on the line
+  Only recognizes simple strings ("file" or 'file')
+  Does not recognized named constants (e.g.: require MyFile)
+  Assumes every directory entry is either a file or subdirectory
+  Does not handle the Windows variable RUBYLIB_PREFIX
+  May be SLOW if a directory structure is deep (especially
+    on Windows with 1.6.x)
+
+Known bugs:
+
+  Logic may be incorrect in terms of search order, file extensions, etc.
+  Injected a bug in 1.3: In rare cases will recurse until stack overflow
+
+Revision history
+
+  Version 1.0 - 13 October 2000  - Initial release
+  Version 1.1 - 10 July 2001     - Bug fixes
+  Version 1.2 - 15 August 2002   - Works correctly on Win98
+  Version 1.3 - 21 October 2002  - Removed globals; removed search root;
+                                   added $: instead of RUBYLIB; etc.
+  Version 1.4 -  2 November 2002 - Fixed autoload recursion bug
+
+To-do list
+
+  Possibly change extension search order?
+  Possibly add extensions to list?
+  Are explicit extensions allowed other than .rb?
+  Is a null extension really legal?
+  Additional tests/safeguards? (file permissions, non-empty files,...)
+  Change inconsistent expansion of tilde, dot, etc.?
+  Make it smarter somehow??
+
+=end
+
+#
+# File.doc_skip - iterator to skip embedded docs in Ruby input file
+#
+
+class File
+
+  def doc_skip
+    loop do
+      str = gets
+      break if not str
+      if str =~ /^=begin([ \t]|$)/
+        loop do
+          str = gets
+          break if not str
+          break if str =~ /^=end([ \t]|$)/
+        end
+      else
+        yield str
+      end
+    end
+  end
+
+end
+
+class Dependency
+
+#
+# unquote - Find the value of a string. Called from scan.
+#
+
+def unquote(str)
+  # Still more kludgy code.
+  return nil if str == nil
+  if [?', ?"].include? str[0]       # ' Unconfuse gvim 
+    str = str[1..-2]
+  else
+    ""
+  end
+end
+
+#
+# scan - Scans a line and returns the filename from a load or require
+#        statement. Returns null string if there was a parsing problem.
+#        Returns nil if this is not a load or require.
+#
+
+def scan(line)
+  line.strip!
+  if line =~ /^load/ or line =~ /^auto/ or line =~ /^require/
+    @has_dep = true   # At least one dependency found.
+    # Kludge!!
+    junk = %w[ require load autoload ( ) , ] + [""]
+    temp = line.split(/[ \t\(\),]/) - junk
+    if temp[2] and temp[2][0].chr =~ /[#;]/ # Comments, semi...
+      temp = temp[0..1]
+    end
+    if temp[-1] =~ /\#\{/          # #{} means trouble
+      str = ""
+    else
+      str = unquote(temp[-1])      # May return nil.
+    end
+    str
+  else
+    nil
+  end
+end
+
+#
+# find_files - The heart of the program. Search for files using $:
+#
+
+def find_files(source)
+  # loadable - This file or some variant can be found in one of the
+  #            directories in $:
+  loadable = false
+
+  files = []  # Save a list of load/require files.
+  found = []  # Save a list of files found (.rb only for now)
+  
+  # Open the file, strip embedded docs, and look for load/require statements.
+  
+  begin
+    File.open(source).doc_skip {|line| files << scan(line)}
+  rescue => err
+    puts "Problem processing file #{source}: #{err}"
+    caller.each {|x| puts "  #{x}"}
+    exit 3
+  end
+
+  # If no dependencies, don't bother searching!
+  if ! @has_dep
+    puts "No dependencies found."
+    exit 0
+  end
+
+  files.compact!
+  catch(:skip) do
+    for file in files
+  
+      if file == ""   # Warning
+        @warnfiles << source
+        next
+      end
+  
+      throw :skip if (@inpath.include? file) || (@cantfind.include? file)
+  
+      if file =~ /\.rb$/ then  # Don't add suffix to *.rb
+        suffixes = [""]  # Hmm... .rbw?? Probably not needed.
+      else 
+        suffixes = @suffixes   # Use any suffix (extension)
+      end
+  
+      # Look through search path (@search_path)
+  
+      for dir in @search_path
+  
+        for suf in suffixes
+          filename = dir + file + suf
+          loadable = test ?e, filename
+          break if loadable
+        end
+  
+        if loadable
+          @inpath << filename  # Files we found in RUBYLIB
+          # Add to 'found' if it's a source file (so we can recurse)
+          found << filename if filename =~ /\.rb$/
+          break
+        end
+  
+      end
+    
+      @cantfind << file if !loadable
+    end
+  end
+
+  found.uniq!
+  found.compact!
+  list = found
+  found.each {|x| list += find_files(x)}
+  
+  list
+end
+
+#
+# print_list - Print a header message followed by a list of files 
+#              or directories.
+#
+
+def print_list(header, list)
+  return if list.empty?
+  puts header + "\n\n"  # Extra newlines
+  list.each {|x| puts "  #{x}"}
+  puts "\n"             # Extra newline
+end
+
+SEP = File::Separator
+DIRSEP = if SEP=="/" then ":" else ";" end
+
+def execute
+  @has_dep    = false
+  @warnfiles  = []
+  @newdirs    = []
+  @inpath     = []
+  @cantfind   = []
+  @suffixes   = [""] + %w[ .rb .o .so .dll ]
+  @rdirs = []
+  @global_found = []
+  
+  # No parameters? Usage message
+  
+  if not ARGV[0]
+    puts "Usage: ruby rdep.rb sourcefile [searchroot]"
+    exit 0
+  end
+  
+  # Does sourcefile exist?
+  
+  if ! test ?e, ARGV[0]
+    puts "#{ARGV[0]} does not exist."
+    exit 1
+  end
+  
+  # Is sourcefile a "real" file? 
+  
+  if ! test ?f, ARGV[0]
+    puts "#{ARGV[0]} is not a regular file."
+    exit 2
+  end
+
+  # Be sure to search under the dir where the 
+  # program lives...
+
+  @proghome = File.dirname(File.expand_path(ARGV[0]))
+  if @proghome != File.expand_path(".")
+    $: << @proghome
+  end
+  
+  # Get list of dirs in $:
+  
+  @search_path = $:
+  @search_path.collect! {|x| x[-1] == SEP ? x : x + SEP }
+  
+  # All real work happens here -- big recursive find
+  
+  find_files(ARGV[0])
+  
+  @warnfiles.uniq!
+  @cantfind.uniq!
+  @newdirs.uniq!
+  @inpath.map! {|x| File.expand_path(x)}
+  @inpath.uniq!
+  
+  #
+  # Now, what are all the results? Report to user.
+  #
+  
+  if @inpath[0]
+    print_list("Found in search path:", @inpath)
+    if ! @cantfind.empty? && @warnfiles.empty?
+      puts "This will probably be sufficient.\n"
+    end
+  end
+
+  # Did we use any dirs under the "home"?
+
+  homedirs = @inpath.find_all {|x| x =~ Regexp.new("^"+@proghome)}
+  if homedirs[0]  # not empty
+    homedirs.map! {|x| File.dirname(x) }.uniq!
+    puts "Consider adding these directories to RUBYPATH:\n\n"
+    homedirs.each {|x| puts "  #{x}" }
+    puts
+    if @warnfiles[0] and homedirs == [] # There are unparseable statements.
+      puts "This will probably NOT be sufficient. See below.\n\n"
+    end
+  end
+  
+  # What's our opinion?
+
+  if @cantfind[0]     # There are unknown files.
+    puts "This will probably NOT be sufficient. See below.\n\n"
+  elsif @warnfiles[0] and homedirs == [] # There are unparseable statements.
+    puts "Files may still be missing. See below.\n\n"
+  else                # We think everything is OK.
+    puts "This will probably be sufficient."
+  end
+  
+  # Report unknown files
+  print_list("Not located anywhere:", @cantfind)
+  
+  # Print warning about load/require strings we couldn't understand
+  print_list("Warning: Unparseable usages of 'load' or 'require' in:",
+             @warnfiles)
+end
+
+end
+
+Dependency.new.execute
+ 
+exit 0
+