riess 0.0.8

data/lib/key_codes.rb

@@ -0,0 +1,123 @@
+module RIESS
+  
+  class Key
+    
+    #http://www.cambiaresearch.com/c4/702b8cd1-e5b0-42e6-83ac-25f0306e3e25/Javascript-Char-Codes-Key-Codes.aspx
+    
+    # block 1
+    def self.backspace ; 8 ; end
+    def self.tab ; 9 ; end
+    def self.enter ; 13 ; end
+    def self.shift ; 16 ; end
+    def self.ctrl ; 17 ; end
+    def self.alt ; 18 ; end
+    def self.pause ; 19 ; end
+    def self.caps_lock ; 20 ; end
+    def self.escape ; 27 ; end
+    def self.page_up ; 33 ; end
+    def self.page_down ; 34 ; end
+    def self.end ; 35 ; end
+    def self.home ; 36 ; end
+    def self.left_arrow ; 37 ; end
+    def self.up_arrow ; 38 ; end
+    def self.right_arrow ; 39 ; end
+    def self.down_arrow ; 40 ; end
+    def self.insert ; 45 ; end
+    def self.delete ; 46 ; end
+    
+    # block 2
+    def self._0 ; 48 ; end
+    def self._1 ; 49 ; end
+    def self._2 ; 50 ; end
+    def self._3 ; 51 ; end
+    def self._4 ; 52 ; end
+    def self._5 ; 53 ; end
+    def self._6 ; 54 ; end
+    def self._7 ; 55 ; end
+    def self._8 ; 56 ; end
+    def self._9 ; 57 ; end
+    
+    # block 3
+    def self.a ; 65 ; end
+    def self.b ; 66 ; end
+    def self.c ; 67 ; end
+    def self.d ; 68 ; end
+    def self.e ; 69 ; end
+    def self.f ; 70 ; end
+    def self.g ; 71 ; end
+    def self.h ; 72 ; end
+    def self.i ; 73 ; end
+    def self.j ; 74 ; end
+    def self.k ; 75 ; end
+    def self.l ; 76 ; end
+    def self.m ; 77 ; end
+    def self.n ; 78 ; end
+    def self.o ; 79 ; end
+    def self.p ; 80 ; end
+    def self.q ; 81 ; end
+    def self.r ; 82 ; end
+    def self.s ; 83 ; end
+    def self.t ; 84 ; end
+    def self.u ; 85 ; end
+    def self.v ; 86 ; end
+    def self.w ; 87 ; end
+    def self.x ; 88 ; end
+    def self.y ; 89 ; end
+    def self.z ; 90 ; end
+
+    # block 4
+    def self.left_window_key ; 91 ; end
+    def self.right_window_key ;	92 ; end
+    def self.select_key ; 93 ; end
+    
+    # block 5
+    def self.numpad_0 ; 96 ; end
+    def self.numpad_1 ; 97 ; end
+    def self.numpad_2 ; 98 ; end
+    def self.numpad_3 ; 99 ; end
+    def self.numpad_4 ; 100 ; end
+    def self.numpad_5 ; 101 ; end
+    def self.numpad_6 ; 102 ; end
+    def self.numpad_7 ; 103 ; end
+    def self.numpad_8 ; 104 ; end
+    def self.numpad_9 ; 105 ; end
+    
+    # block 6
+    def self.multiply ; 106 ; end
+    def self.add ; 107 ; end
+    def self.subtract ; 109 ; end
+    def self.decimal_point ; 110 ; end
+    def self.divide  ; 111 ; end
+    
+    # block 7
+    def self.f1 ; 112 ; end
+    def self.f2 ; 113 ; end
+    def self.f3 ; 114 ; end
+    def self.f4 ; 115 ; end
+    def self.f5 ; 116 ; end
+    def self.f6 ; 117 ; end
+    def self.f7 ; 118 ; end
+    def self.f8 ; 119 ; end
+    def self.f9 ; 120 ; end
+    def self.f10 ; 121 ; end 
+    def self.f11 ; 122 ; end
+    def self.f12 ; 123 ; end
+    
+    # block 8
+    def self.num_lock ; 144 ; end
+    def self.scroll_lock ; 145 ; end
+    def self.semi_colon ; 186 ; end
+    def self.equal_sign ; 187 ; end
+    def self.comma ; 188 ; end 
+    def self.dash ; 189 ; end
+    def self.period ; 190 ; end
+    def self.forward_slash ; 191 ; end
+    def self.grave_accent ; 192 ; end
+    def self.open_bracket ; 219 ; end
+    def self.back_slash ; 220 ; end
+    def self.close_bracket ; 221 ; end
+    def self.single_quote ; 222 ; end
+    
+  end
+  
+end

data/lib/popup.rb

@@ -0,0 +1,57 @@
+require 'rubygems'
+require 'yaml'
+require_gem "autogui"
+include Win32::AutoGui
+
+#Pop = Log4r::Logger.new("POP")
+#Pop.add Log4r::Outputter.stderr
+#Pop.level = Log4r::INFO  
+
+def dialog_handler(timeout,title,text)
+  counter = 0
+  loop do
+    counter += 1
+    sleep 1
+    ie_windows = find_window_by_title title,0
+    if not ie_windows 
+#      Pop.info  "no window matching : #{title}"
+      break if counter == timeout
+    else 
+#      Pop.info "Found #{ie_windows.size} potential windows" if ie_windows.kind_of? Array
+      return ie_windows
+      #break
+    end  
+  end
+end
+
+def javascript_alert(timeout,title,text,button)
+  counter = 0
+  loop do
+    counter += 1
+    sleep 1
+    ie_windows = find_window_by_title title,0
+    if not ie_windows 
+#      Pop.info "no window matching : #{title}"
+      exit if counter >= timeout
+    else 
+#        Pop.info "Found #{ie_windows.size} potential windows" if ie_windows.kind_of? Array
+        if not ie_windows.kind_of? Array then ie_windows = [ie_windows] end
+        ie_windows.each_with_index{|win,i|
+           pop_up_text = win.find_children_by_text text,0 
+           if pop_up_text
+             btn = win.find_children_by_text button,0
+             if not btn
+#               Pop.info "no button matching : #{button}"
+             else
+               btn.focus_window
+               btn.click_button
+               exit
+             end
+           else 
+#             Pop.info "Potential window #{i+1} has no text matching: #{text}"
+             exit if counter >= timeout
+           end
+        }
+    end
+  end      
+end

data/lib/riess.rb

@@ -0,0 +1,111 @@
+# interface
+load_path = __FILE__.gsub('riess.rb','')
+require "#{load_path}/actions"
+require "#{load_path}/checks"
+
+# core
+require "#{load_path}/html_action_modules"
+require "#{load_path}/html_check_modules"
+require "#{load_path}/html_objects"
+require "#{load_path}/html_object_factory"
+require "#{load_path}/finders"
+require "#{load_path}/helpers"
+require "#{load_path}/key_codes"
+require "#{load_path}/exceptions"
+require "#{load_path}/test_reporter"
+require 'win32ole'
+require "#{load_path}/ieparser_extension"
+include RIESS
+include ObjectSpace
+
+# vendor code
+vendor_path = __FILE__.sub('lib/riess.rb','vendor')
+require "#{vendor_path}/log4r-1.0.5/src/log4r.rb"
+require "#{vendor_path}/rspec-0.8.2/lib/spec.rb"
+
+module RIESS
+  
+  Log = Log4r::Logger.new("RIESS")
+  Log.add Log4r::Outputter.stderr
+  Log.level = Log4r::WARN
+  
+  class InternetExplorer
+    
+    def default_riess_config  
+      {
+        :reporting => true,
+        :debug => false,
+        :ie_visible => true,
+        :attach => false
+      }
+    end  
+      
+    def initialize(config = {})
+      @reporter = TestReporter.new
+      config = default_riess_config.merge(config)
+      
+      if config[:attach]
+        window_title = config[:title]
+        window = ActiveConsole.new(window_title)
+        if window.windows[0]
+         @ie = window.windows.first.win_object
+        else
+          puts "Could not find a window to attach to using #{window_title}"
+          puts "The following windows were found:"
+          window.list_all_windows
+        end
+      else
+         @ie = WIN32OLE.new('InternetExplorer.Application')
+      end
+      
+      @ie.visible = config[:ie_visible] if @ie
+     
+      if config[:debug]
+        Log.level = Log4r::DEBUG 
+      end
+      
+      if config[:reporting]
+        @reporter.immediate_feedback = true
+        define_finalizer(InternetExplorer, proc {|id| @reporter.execute }) 
+      end
+    end
+    
+  end
+  
+  class ActiveConsole
+  
+    attr_reader :windows, :all_windows
+    IEWindow = Struct.new("IEWindow", :title, :win_object)
+  
+    def initialize(window_title)
+      @window_title = window_title
+      @windows = []
+      @all_windows = []
+      connect
+    end
+  
+    def connect
+      WIN32OLE.new('Shell.Application').Windows.each{|w|
+        begin
+          if w.document.title.match(/#{@window_title}/) 
+            @windows << IEWindow.new(w.Document.Title,w)
+          elsif w.document.title != ""
+            @all_windows << IEWindow.new(w.document.title,w)
+          end
+          
+        rescue
+        end
+      }
+    end
+  
+    def list_windows
+      @windows.each_with_index{|w,i| puts "#{i} : #{w.title}"}
+    end
+  
+    def list_all_windows
+      @all_windows.each_with_index{|w,i| puts "#{i} : #{w.title}"}
+    end
+  
+  end
+
+end

data/lib/test_reporter.rb

@@ -0,0 +1,113 @@
+module RIESS
+  
+  class TestReporter
+  
+    Result = Struct.new('Result', :name, :expected, :actual, :value)
+    attr_writer :immediate_feedback
+  
+    def initialize
+      @results = []
+      @not_found = []
+      @time_started = Time.now
+      @immediate_feedback = false
+    end
+  
+    def record_results(name,expected,actual,value)
+      result = Result.new(name,expected,actual,value)
+      print_immediate_feedback(result) unless !@immediate_feedback
+      @results << result
+    end
+    
+    def locator_not_found(parameter)
+      print_not_found_message(parameter) unless !@immediate_feedback
+      @not_found << false
+    end
+  
+    def execute
+      specifications = 0
+      failures = 0
+      @results.each{|result|
+        if result.value
+          specifications += 1
+        else
+          failures += 1
+          print_failure_message(result)
+        end
+      } unless @results.empty?
+      
+      @not_found.each{|item|
+        if !item
+          failures += 1
+        end
+      } unless @not_found.empty?
+      
+      
+      time_ended = Time.now
+      elapsed_time = time_ended - @time_started
+      print_results(elapsed_time,specifications,failures)
+    end
+    
+    
+    private
+    
+    def print_immediate_feedback(result)
+      if result.value
+        print "."
+      else
+        print "F"
+      end
+    end
+    
+    def create_results_message(elapsed_time,specifications,failures)
+      [
+        "\s",
+        "\s",
+        "Finished in #{elapsed_time} seconds",
+        "\s",
+        "#{specifications} verifications, #{failures} failures"
+      ]
+    end
+    
+    def print_results(elapsed_time,specifications,failures)
+      create_results_message(elapsed_time,specifications,failures).each{|message|
+        puts message
+      }
+    end
+    
+    def create_failure_message(result)
+      [
+        "\s",
+        "\s",
+        "[ FAIL ] -- #{result.name}",
+        "Expected: #{result.expected}",
+        "Actual  : #{result.actual}",
+        "\s"
+      ]
+    end
+    
+    def print_failure_message(result)
+      create_failure_message(result).each{|message|
+        puts message
+      }
+    end
+    
+    def create_not_found_message(parameter)
+      [
+        "\s",
+        "\s",
+        "[ FAIL ] -- Can't find locator",
+        "locator_type   : #{parameter.locator_type}",
+        "locator value  : #{parameter.locator_value}",
+        "\s"
+      ]
+    end
+    
+    def print_not_found_message(parameter)
+      create_not_found_message(parameter).each{|message|
+        puts message
+      }
+    end
+  
+  end
+
+end

data/riess_stable_testing_release_1-0.0.8.gemspec

@@ -0,0 +1,22 @@
+require 'rubygems'
+
+spec = Gem::Specification.new do |s|
+  s.name = 'riess'
+  s.version = "0.0.8"
+  s.platform = Gem::Platform::RUBY
+  s.summary = "Riess is Ruby Internet Explorer Scripting System"
+  s.description = <<-EOF
+    Riess is a library for automating and testing IE with a dsl like interface
+  EOF
+  s.files = Dir.glob('**/**')
+  s.require_path = 'lib'
+  s.has_rdoc = true
+  s.autorequire = 'riess'
+  s.author = "Kingsley Hendrickse"
+  s.email = "kingsley@mindflowslutions.com"
+  s.rubyforge_project = "riess"
+  s.homepage = "http://riess.rubyforge.org"
+end
+if $0==__FILE__
+  Gem::Builder.new(spec).build
+end

data/vendor/log4r-1.0.5/doc/contact.html

@@ -0,0 +1,166 @@
+<html>
+<head>
+  <title>Log4r - Contact</title>
+  <link rel="stylesheet" type="text/css" href="log4r.css">
+</head>
+<body>
+
+<div align="right"><img src="images/log4r-logo.png"/></div>
+<hr noshade>
+
+<table border="0" cellspacing="3" cellpadding="0" width="100%"> 
+<tr>
+
+<!-- Sidebar -->
+<td width="15%" valign="top">
+<table cellspacing="0" cellpadding="0" width=100%" nowrap="true">
+
+<!-- Log4r Box -->
+<tr><td >
+<table width="100%" cellspacing="0" cellpadding="0" align="center" >
+<tr><td width="100%" class="menutitle">Log4r</td></tr>
+<tr><td width="100%" class="menubuff">&nbsp;</td></tr>
+<!-- list -->
+<table class="menu"  cellspacing="3" cellpadding="0" width="100%"
+       align="center">
+<tr><td ><a href="index.html">Home Page</a></tr></td>
+<tr><td><a href="http://sourceforge.net/project/showfiles.php?group_id=43396">
+Download</a></td></tr>
+<tr><td nowrap="true">
+<a href="http://sourceforge.net/projects/log4r/">@ SourceForge</a>
+</td></tr>
+<tr><td>
+<a href="license.html">License</a>
+</td></tr>
+<tr><td>
+<a href="contact.html">Contact</a>
+</td></tr>
+</table>
+</td></tr>
+
+<tr><td height=15>&nbsp;</td></tr>
+
+<!-- Doc Box -->
+<tr><td >
+<table cellspacing="0" cellpadding="0" align="center" width="100%">
+<tr><td width="100%"  class="menutitle">Documents</td></tr>
+<tr><td  width="100%" class="menubuff">&nbsp;</td></tr>
+<!-- list -->
+<table class="menu"  cellspacing="3" cellpadding="0" width="100%"
+       align="center">
+<tr><td>
+    <a href="manual.html">1.0.5 Manual</a>
+</tr></tr>
+<tr><td>
+    <a href="rdoc/index.html">1.0.5 RDoc API</a>
+</td></tr>
+
+</table>
+</td></tr>
+
+<tr><td height=15>&nbsp;</td></tr>
+
+<!-- Development Box -->
+<tr><td >
+<table cellspacing="0" cellpadding="0" align="center" width="100%">
+<tr><td width="100%"  class="menutitle">Development</td></tr>
+<tr><td  width="100%" class="menubuff">&nbsp;</td></tr>
+<!-- list -->
+<table class="menu"  cellspacing="3" cellpadding="0" width="100%"
+       align="center">
+<tr><td>
+<a
+href="http://sourceforge.net/tracker/?atid=436181&group_id=43396&func=browse">
+Bugs</a>
+</tr></tr>
+<tr><td>
+<a
+href="http://sourceforge.net/tracker/?atid=436184&group_id=43396&func=browse">
+Requests</a>
+</td></tr>
+<tr><td>
+<a href="contribute.html">Contribute</a>
+</td></tr>
+
+</table>
+</td></tr>
+
+<tr><td height=15>&nbsp;</td></tr>
+
+
+<!-- Link Box -->
+<tr><td >
+<table cellspacing="0" cellpadding="0" align="center" width="100%">
+<tr><td width="100%"  class="menutitle">Links</td></tr>
+<tr><td  width="100%" class="menubuff">&nbsp;</td></tr>
+<!-- list -->
+<table class="menu"  cellspacing="3" cellpadding="0" width="100%"
+       align="center">
+<tr><td>
+<a href="http://www.ruby-lang.org/en/index.html">Ruby</a>
+</td></tr>
+<tr><td>
+<a href="http://jakarta.apache.org/log4j/docs/index.html">Apache Log4j</a>
+</tr></tr>
+<tr><td>
+<a href="http://www.ruby-lang.org/en/raa-list.rhtml?name=REXML">REXML</a>
+</td></tr>
+<tr><td>
+<a href="http://rm-f.net/~cout/ruby/romp/">ROMP</a>
+</td></tr>
+<tr><td height="5">&nbsp;</td></tr>
+<tr><td align="center">
+<a href="http://sourceforge.net">
+<img
+src="http://sourceforge.net/sflogo.php?group_id=43396" width="88" height="31"
+border="0" alt="SourceForge Logo"></a>
+</td></tr>
+
+</table>
+</td></tr>
+
+</table>
+</td>
+
+<!-- Main column -->
+<td width="85%" align="left" valign="top">
+<center>
+<table cellspacing="0" cellpadding="0" align="center" width="95%">
+
+
+<tr><td width="100%" class="contenttitle">Contact the Developers</td></tr>
+<tr><td width="100%" class="contentbuff">&nbsp;</td></tr>
+<tr><td width="100%" class="content">
+Lead developer:
+<p>
+Leon Torres 
+&lt;leon(at)ugcs dot caltech dot edu</a>&gt;
+<br/>
+Pasadena, CA, USA (UTC-8)
+<p/>
+Contributors:
+<ul>
+  <li>Martain Stannard - for RollingFileOutputter and for caring about maintenance
+  <li>Steve Lumos - for SyslogOutputter
+  <li>Jamis Buck - for making Log4r available as a RubyGems gem
+  <li>Andreas Hund - for YAML configuration with YamlConfigurator
+</ul>
+</td></tr>
+
+
+</table>
+</center>
+</td>
+
+
+</tr>
+</table>
+<hr noshade>
+<div align="right">
+<font color="#888888" size="-1">
+<i>
+ $Id: contact.html,v 1.3 2004/03/17 20:17:59 fando Exp $
+</i></font>
+</div>
+</body>
+</html>