rformunit 0.2.0-x86-mswin32-60

data/CHANGELOG

@@ -0,0 +1,30 @@
+CHANGELOG
+=========
+== 0.2.0 (2007-12-18)
+ - add convenient methods in Driver
+ - add a commonly used dialog class: open file dialog, save as file dialog 
+ - add filtered key to support 'Alt+', 'Ctrl+'
+ 
+== 0.1.3 (2007-04-18)
+
+New features:
+  - Support window with various titles depends on invoking conditions
+  
+== 0.1.2 (2007-02-26)
+
+New features:
+  - Add ListView support
+  - Add Label support
+
+Others:
+  - code reformating
+
+== 0.1.1 (2006-11-29)
+
+New features:
+  - replace keyboard.* with RFormUnit::Keyboard.*
+  - replace mouse.* with RFormUnit::Mouse.*
+  - replace process.* with RFormUnit::Process.*
+
+
+== 0.1.0 (2006-11-28) initial release

data/MIT-LICENSE

@@ -0,0 +1,21 @@
+Copyright (c) 2006 Zhimin Zhan, zhimin@zhimin.com
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+

data/README

@@ -0,0 +1,30 @@
+rFormUnit
+=========
+
+rFormUnit is a simple framework for automated testing Windows Form applications.
+It wraps AutoItX COM API to provide an alternative way to write an easy to use,
+readable automated functional tests.
+
+Dependencies
+------------
+* Ruby -   http://rubyinstaller.rubyforge.org/wiki/wiki.pl (Version verified: ruby185-21.exe)
+* AutoIt3 - http://www.autoitscript.com/autoit3/  (Version verified  v3.2.2.0)
+
+Platform: MS Windows (of course)
+
+Install
+-------
+> gem install rformunit
+
+One minute tutorial
+-------------------
+
+
+
+Copyrights
+----------
+Free to use for any purposes. The software provided AS IS without any warranty whatsoever.
+
+Contact
+-------
+Zhimin Zhan, Agileway Pty Ltd.

data/Rakefile

@@ -0,0 +1,65 @@
+require 'rubygems'
+require 'rake/testtask'
+require 'rake/rdoctask'
+
+Gem::manage_gems
+require 'rake/gempackagetask'
+
+$:.unshift(File.dirname(__FILE__) + "/lib")
+require 'rformunit'
+
+desc "Default task"
+task :default => [ :clean, :test , :gem]
+
+desc "Clean generated files"
+task :clean do
+  rm_rf 'pkg'
+  rm_rf 'docs/rdoc'
+end
+
+# run the unit tests
+Rake::TestTask.new("test") { |t|
+  t.test_files = FileList['test/test*.rb']
+  t.verbose= true
+}
+
+# Generate the RDoc documentation
+Rake::RDocTask.new { |rdoc|
+  rdoc.rdoc_dir = 'docs/rdoc'
+  rdoc.title = 'rformunit'
+  rdoc.template = "#{ENV['template']}.rb" if ENV['template']
+  rdoc.rdoc_files.include('README')
+  rdoc.rdoc_files.include('lib/rformunit.rb')
+  rdoc.rdoc_files.include('lib/rformunit/*.rb')
+}
+
+spec = Gem::Specification.new do |s|
+  s.platform= Gem::Platform::CURRENT
+  s.name = "rformunit"
+  s.version = "0.2.0"
+  s.summary = "An wrap of AUTOIT3 for functional testing of Windows form applications"
+  # s.description = ""
+
+  s.author  = "Zhimin Zhan"
+  s.email   = "zhimin@zhimin.com"
+  s.homepage= "http://www.zhimin.com/software/rformunit/"
+  #  s.rubyforge_project = ""
+
+  s.has_rdoc    = true
+  s.requirements << 'none'
+  s.require_path    = "lib"
+  s.autorequire     = "rformunit"
+
+  s.files = [ "Rakefile", "README", "CHANGELOG", "MIT-LICENSE" ]
+  #  s.files = s.files + Dir.glob( "bin/**/*" ).delete_if { |item| item.include?( "\.svn" ) }
+  s.files = s.files + Dir.glob( "ext/**/*" ).delete_if { |item| item.include?( "\.svn" ) }
+  s.files = s.files + Dir.glob( "lib/**/*" ).delete_if { |item| item.include?( "\.svn" ) }
+  s.files = s.files + Dir.glob( "test/**/*" ).delete_if { |item| item.include?( "\.svn" ) }
+  s.files = s.files + Dir.glob( "sample/**/*" ).delete_if { |item| item.include?( "\.svn" ) }
+  s.files = s.files + Dir.glob( "docs/**/*" ).delete_if { |item| item.include?( "\.svn" ) }
+
+end
+
+Rake::GemPackageTask.new(spec) do |pkg|
+  pkg.need_zip = true
+end

data/docs/index.html

@@ -0,0 +1,185 @@
+<html
+    <head>
+        <title>rFormUnit </title>
+        <meta http-equiv="content-type" content="text/html; charset=utf-8" />
+        <link href="../../stylesheets/zhimin.css" media="screen" rel="Stylesheet" type="text/css" /> 
+        <link href="../../stylesheets/local.css" media="screen" rel="Stylesheet" type="text/css" /> 
+
+<style type="text/css" media="screen">
+BODY
+{
+    BACKGROUND-COLOR: #fffff0;
+    COLOR: #000000;
+    FONT-FAMILY: "Times New Roman", Times, serif
+}
+
+.green {
+  background-color: #ECF3E1;
+  border:1px solid #C5DEA1;
+}
+
+.orange{
+  border:1px solid #E8A400;
+  background-color: #FFF4D8;
+
+</style>
+
+</head>
+  <body>
+ 
+	<h3>What is rFormUnit?</h3>
+	<p>rFormUnit is a simple framework for automated testing <b>Windows Form</b> applications. It wraps <a href="http://www.autoitscript.com/autoit3/">AutoItX</a> COM API to provide an alternative way to write an easy to use, readable automated functional tests.
+	</p>
+
+	<p>Current release: 0.1.1<br/>
+	&nbsp; <a href="releases/rformunit-0.1.1-mswin32.gem">rformunit-0.1.1-mswin32.gem</a> or  from <a href="http://rubyforge.org/projects/rformunit/">rubyforge.org</a>,
+	
+  <!-- &nbsp; <a href="releases/changelog.txt">Change logs</a> <br/> -->
+	&nbsp; Documentation: <a href="rdoc/index.html">RDoc</a>, and Quick start guide below.
+	</p> 	
+
+	<h3>Installation</h3>
+  
+  <p><b>Dependecies</b><br/>
+  &nbsp; &nbsp; Install <a href="http://rubyinstaller.rubyforge.org/wiki/wiki.pl">Ruby for windows</a><br/>
+  &nbsp; &nbsp; Install <a href="http://www.autoitscript.com/autoit3/">AutoIt3</a></p>
+  
+	<p>Using RubyGems: 
+		<pre class="green">$ gem install rformunit</pre>
+      or download and install locally:
+     <pre class="green">$ gem install rformunit-0.1.0-mswin32.gem</pre>
+    </p>
+		
+	<h3>Quick start guide through examples</h3>
+	<ul>
+     <li><a href="#script">Run as automation scripts</a></li>
+     <li><a href="#test">Run as xUnit test cases</a></li>
+     <li><a href="#rspec">Run as RSpecs</a></li>
+  </ul>
+  <p>Check sample/*.rb for more examples.</p>	
+	<a name="script"></a><h4>Run as automation scripts</h4>
+	<table width="100%" cellspacing="0" cellpadding="0">
+            <tr bgcolor="#33CC33">
+                <th align="left" width="50%">AutoIt3 Script</th>
+                <th align="left" width="50%">rFormUnit Script</th>
+            </tr>
+            <tr>
+                <td valign="top" nowrap="nowrap" class="orange" width="50%">                    
+                        <pre>
+                        
+                        
+                        
+Run("notepad.exe")
+WinWaitActive("Untitled - Notepad")
+
+Send("Hello from Notepad.{ENTER}1 2 3{ENTER}")
+Sleep(500)
+Send("+{UP 2}")
+Sleep(500)
+
+Send("!f")
+Send("x")
+
+WinWaitActive("Notepad", "No")
+Send("n")
+
+                        </pre>
+                </td>
+
+                <td valign="top" nowrap="nowrap"  class="green">
+<pre>require 'rformunit'
+
+include RFormUnit::Driver
+
+RFormUnit::Process.run("NOTEPAD.EXE")
+notepad_win = RFormUnit::Window.new('Untitled - Notepad')
+RFormUnit::Keyboard.type("Hello from Notepad, {ENTER}1 2 3 4 5 6 7 8 9 10{ENTER}")
+sleep(0.5) 
+RFormUnit::Keyboard.press("+{UP 2}")
+sleep(0.5)
+notepad_win.close
+
+notepad_confirm_dialog = RFormUnit::Window.new('Notepad', 'No')
+notepad_confirm_dialog.click_button('&No')</pre>
+                </td>
+            </tr>
+        </table>
+
+        <a name="test"></a>
+        <div id="rformunit_test">
+        <h4>rFormUnit Testcase</h4>                        
+<pre class="green">require 'rformunit'
+
+class CalcTest &lt; RFormUnit::FormTestCase
+   def setup
+      RFormUnit::Process.run("calc.exe")
+      @calc_win = RFormUnit::Window.new('Calculator')
+   end
+
+   def teardown
+      @calc_win.close
+   end
+
+   def test_multiple
+      @calc_win.click_button('127')  #3
+      @calc_win.click_button('91')   #*
+      @calc_win.click_button('131')  #7
+      @calc_win.click_button('112')  #=
+      assert_equal "21. ", @calc_win.get_control_text('403')
+   end
+
+end</pre>
+        </div>
+        
+        <a name="rspec"></a><div id='rformunit_rspec'>
+           <h4>rFormUnit <a href="http://rspec.rubyforge.org/">RSpec</a></h4>
+          
+            <p><b>rspec_calc</b>: a spec runner to run rformunit based rspecs</p>
+          <pre class="green">
+require File.dirname(__FILE__) + '/calc'
+
+class RSpecCalc
+   include Calc
+    
+   def setup
+      init # initialize 
+      @calc_win = find_existing_calc_win
+      if @calc_win.nil?
+         @calc_win = start_calc
+      end
+   end
+end
+
+module Spec
+   module Runner
+      class Context
+         def before_context_eval
+            inherit RSpecCalc
+         end
+      end
+   end
+end</pre>
+          
+          <p><b>calc_spec</b>: a rspec</p>
+          <pre class="green">
+require File.dirname(__FILE__) + '/rspec_calc'
+
+context "Calculator" do
+
+   setup do    
+   end
+
+  specify "Multiple shall work" do
+      @calc_win.click_button('127')  #3
+      @calc_win.click_button('91')   #*
+      @calc_win.click_button('131')  #7
+      @calc_win.click_button('112')  #=
+      @calc_win.get_control_text('403').should == '21. '
+   end
+
+end</pre>
+          
+         </div>
+         
+    </body>
+</html>

data/lib/ext/rspec_rformunit.rb

@@ -0,0 +1,46 @@
+class RSpecFormUnit
+  include YourModule # change to your module containing common methods used in your specs
+
+  def setup
+    @driver = GUIDriver.new()
+
+    @driver.AutoItSetOption("CaretCoordMode",0);
+    @driver.AutoItSetOption("ColorMode",1);
+    @driver.AutoItSetOption("MouseCoordMode",0);
+    @driver.AutoItSetOption("PixelCoordMode",0);
+    @driver.AutoItSetOption("SendKeyDelay", 20)
+
+    #Add it yourself
+
+  end
+
+  def timeout_check_equal(duration, expected, &block)
+    execute_ok = false
+    duration.times do
+      sleep(1)
+      text = instance_eval(&block)
+      execute_ok = true and break if (text == expected)
+    end
+    execute_ok.should == true
+  end
+
+  def timeout_check_include?(duration, expected, &block)
+    execute_ok = false
+    duration.times do
+      sleep(1)
+      text = instance_eval(&block)
+      execute_ok = true and break if text and text.include?(expected)
+    end
+    execute_ok.should == true
+  end
+end
+
+module Spec
+  module Runner
+    class Context
+      def before_context_eval
+        inherit RSpecFormUnit
+      end
+    end
+  end
+end

data/lib/rformunit.rb

@@ -0,0 +1,15 @@
+#***********************************************************
+#* Copyright (c) 2006, Zhimin Zhan.
+#* Distributed open-source, see full license in MIT-LICENSE
+#***********************************************************
+
+# Extra full path to load libraries
+require File.dirname(__FILE__) + "/rformunit/driver"
+require File.dirname(__FILE__) + "/rformunit/control"
+require File.dirname(__FILE__) + "/rformunit/mouse"
+require File.dirname(__FILE__) + "/rformunit/keyboard"
+require File.dirname(__FILE__) + "/rformunit/window"
+require File.dirname(__FILE__) + "/rformunit/open_file_dialog"
+require File.dirname(__FILE__) + "/rformunit/saveas_file_dialog"
+require File.dirname(__FILE__) + "/rformunit/process"
+require File.dirname(__FILE__) + "/rformunit/form_testcase"

data/lib/rformunit/control.rb

@@ -0,0 +1,152 @@
+require File.dirname(__FILE__) + "/driver"
+
+module RFormUnit
+  class BaseControl
+    include Driver
+
+    attr_accessor :parent_win, :control_id
+
+    def initialize(win, ctrl_id)
+      @parent_win = win
+      @control_id = ctrl_id
+    end
+
+    def set_text(new_text)
+      driver.ControlSetText(@parent_win.title, @parent_win.text, @control_id, new_text)
+    end
+
+    def send_text(text)
+      driver.ControlSend(@parent_win.title, @parent_win.text, @control_id, text)
+    end
+
+    def get_text
+      driver.ControlGetText(@parent_win.title, @parent_win.text, @control_id)
+    end
+
+    def focus
+      driver.ControlFocus(@parent_win.title, @parent_win.text, @control_id)
+    end
+
+    def is_enabled?
+      ret = driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "IsEnabled" ,"")
+      ret == 1 or ret == "1"
+    end
+
+    def is_visible?
+      ret = driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "IsVisible" ,"")
+      ret == 1 or ret == "1"
+    end
+
+    def click
+      driver.ControlClick(@parent_win.title, @parent_win.text, @control_id)
+    end
+
+  end
+
+  class TextBox < BaseControl
+
+  end
+
+  class Label < BaseControl
+  
+  end
+  
+  class CheckBox < BaseControl
+    def check
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "Check" ,"")
+    end
+
+    def uncheck
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "UnCheck" ,"")
+    end
+
+    def is_checked?
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "IsChecked" ,"") == 1
+    end
+
+  end
+
+  class RadioButton < BaseControl
+    def check
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "Check" ,"")
+    end
+
+    def uncheck
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "UnCheck" ,"")
+    end
+
+    def is_checked?
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "IsChecked" ,"") == 1
+    end
+
+  end
+
+  class ComboBox < BaseControl
+
+    def show_dropdown
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "ShowDropDown" ,"")
+    end
+
+    def hide_dropdown
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "HideDropDown" ,"")
+    end
+
+    def select_option(option)
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "SelectString" , option)
+    end
+
+  end
+
+
+  class Button < BaseControl
+  end
+
+  class Tab < BaseControl
+
+    def current
+      driver.ControlCommand(@parent_win.title, @parent_win.text, @control_id, "CurrentTab" , "")
+    end
+
+  end
+
+  class ListView < BaseControl
+    
+    def item_count
+      result = driver.ControlListView(@parent_win.title, @parent_win.text, @control_id, "GetItemCount" , "", "").to_i       
+      result ? result.to_i : 0
+    end  
+    
+    # row and column index starts from 0,
+    def get_item_text(row, col = 0)
+      driver.ControlListView(@parent_win.title, @parent_win.text, @control_id, "GetText" , "#{row}", col)
+    end  
+    
+    # can't use select, as it is Ruby keyword
+    def highlight(row_start, row_end = nil)
+      row_end ||= row_start
+      driver.ControlListView(@parent_win.title, @parent_win.text, @control_id, "Select" , "#{row_start}", "#{row_end}")
+    end  
+
+    def de_highlight(row_start, row_end = nil)
+      row_end ||= row_start
+      driver.ControlListView(@parent_win.title, @parent_win.text, @control_id, "DeSelect" , "#{row_start}", "#{row_end}")
+    end  
+    alias de_select de_highlight
+    
+    def subitem_count
+       result =  driver.ControlListView(@parent_win.title, @parent_win.text, @control_id, "GetSubItemCount" , "", "").to_i
+      result ? result.to_i : 0
+    end
+    
+    def select_all
+      driver.ControlListView(@parent_win.title, @parent_win.text, @control_id, "SelectAll" , "", "")
+    end  
+
+    def is_selected?(row)
+      1 == driver.ControlListView(@parent_win.title, @parent_win.text, @control_id, "IsSelected" , "#{row}", "")
+    end
+    
+  end
+  
+
+end

data/lib/rformunit/driver.rb

@@ -0,0 +1,68 @@
+require 'win32ole'
+
+module RFormUnit
+  module Driver
+
+    def init
+      driver
+    end
+
+    def driver
+      return @a3 if @a3
+
+      @a3 = WIN32OLE.new('AutoItX3.Control')
+
+      @a3.AutoItSetOption("CaretCoordMode", 0);
+      @a3.AutoItSetOption("ColorMode", 1);
+      @a3.AutoItSetOption("MouseCoordMode", 0);
+      @a3.AutoItSetOption("PixelCoordMode", 0);
+      @a3.AutoItSetOption("SendKeyDelay", 15)
+      return @a3
+    end
+
+    def set_autoit_option(key, value)
+      init if @a3.nil?
+      @a3.AutoItSetOption(key, value)
+    end
+
+    def wait_for_window(win, timeout=30)
+      driver.WinWait(win.title, win.text, timeout * 1000)
+      win
+    end
+
+    def wait_and_focus_window(title, text="",  timeout=30)
+      driver.WinWaitActive(title, text, timeout * 1000)
+    end
+
+    def window_exists?(title)
+      driver.WinExists(title)  >  0
+    end
+
+    def focus_window(title)
+      driver.WinActivate(title)
+    end
+
+    def close_window(title)
+      driver.WinClose(title)
+    end
+
+    # wrapper of keyboard operations
+    def key_press(keys)
+      filtered_keys = keys.gsub("Alt+", "!+").gsub("Ctrl+", "^+")
+      RFormUnit::Keyboard.press(filtered_keys)
+    end
+    alias press_key key_press
+
+    # standard open file dialog
+    def open_file_dialog(title, filepath)
+      wait_and_focus_window(title)
+      dialog = RFormUnit::OpenFileDialog.new(title)
+      dialog.enter_filepath(filepath)
+      sleep 1
+      dialog.click_open
+    end
+
+    #TODO: save as file dialog
+    
+  end
+end

data/lib/rformunit/form_testcase.rb

@@ -0,0 +1,40 @@
+#***********************************************************
+#* Copyright (c) 2006, Zhimin Zhan.
+#* Distributed open-source, see full license in MIT-LICENSE
+#***********************************************************
+
+require 'test/unit'
+
+module RFormUnit
+   class FormTestCase < Test::Unit::TestCase
+      include RFormUnit::Driver
+
+      def default_test
+         super unless(self.class == FormTestCase)
+      end
+
+      # assert the block's return value  instance every 1 second until timeout with specifed duration  
+      def timeout_check_equal(duration, expected, &block)
+         execute_ok = false
+         duration.times do
+            sleep(1)
+            text = instance_eval(&block)
+            execute_ok = true and break if (text == expected)
+         end
+         execute_ok.should == true
+      end
+
+      #
+      def timeout_check_include?(duration, expected, &block)
+         execute_ok = false
+         duration.times do
+            sleep(1)
+            text = instance_eval(&block)
+            execute_ok = true and break if text and text.include?(expected)
+         end
+         execute_ok.should == true
+      end
+      alias timeout_check_include timeout_check_include?
+
+   end
+end

data/lib/rformunit/keyboard.rb

@@ -0,0 +1,24 @@
+require File.dirname(__FILE__) + "/driver"
+require 'singleton'
+
+module RFormUnit
+  class Keyboard
+    include Singleton
+    include Driver
+
+    def self.type(keys)
+      instance._type(keys)
+    end
+
+    def self.press(key)
+      instance._type(key)
+    end
+
+    # instance methods
+    def _type(keystrokes)
+      driver.Send(keystrokes)
+    end
+    alias _press _type
+
+  end
+end

data/lib/rformunit/mouse.rb

@@ -0,0 +1,55 @@
+require File.dirname(__FILE__) + "/driver"
+require 'singleton'
+
+module RFormUnit
+
+   class Mouse
+      include Singleton
+      include Driver
+      
+      def self.click(x=nil, y=nil)
+         instance._click(x, y)
+      end
+      
+      def self.right_click(x=nil, y=nil)
+        instance._right_click(x, y)
+      end
+      
+      def self.double_click(x, y)
+        instance._double_click(x,y)
+      end
+      
+      def self.move_to(x, y)
+        instance._move_to(x,y)
+      end
+      
+      
+      # intance methods 
+      
+      def _click(x=nil, y=nil)
+         if (x and y) then
+            driver.MouseClick("left", x, y)
+         else
+            driver.MouseClick("left")
+         end
+      end
+
+      def _right_click(x=nil, y=nil)
+         if (x and y) then
+            driver.MouseClick("right", x, y)
+         else
+            driver.MouseClick("right")
+         end
+      end
+
+      def _double_click(x, y)
+         driver.MouseClick("left", x, y, 2)
+      end
+
+      def _move_to(x, y)
+         driver.MouseMove(x,y)
+      end
+
+   end
+
+end

data/lib/rformunit/open_file_dialog.rb

@@ -0,0 +1,19 @@
+module RFormUnit
+  class OpenFileDialog < RFormUnit::Window
+
+    def initialize(title = "Open File")
+      focus_window(title)
+    end
+
+    def enter_filepath(file_path)
+      get_text # somehow calling it get it loaded
+      set_control_text("Edit1", file_path)
+    end
+
+    def click_open
+      click_button("Button2")
+    end
+
+  end
+
+end

data/lib/rformunit/process.rb

@@ -0,0 +1,27 @@
+require File.dirname(__FILE__) + "/driver"
+require 'singleton'
+
+module RFormUnit
+
+  class Process
+    include Singleton
+    include Driver
+
+    def self.run(prog, work_path = nil)
+      instance._run(prog, work_path)
+    end
+
+    def self.execute(prog, work_path = nil)
+      instance._run(prog, work_path)
+    end
+
+    # --
+    # instance methods
+    def _run(program, work_path = nil)
+      driver.Run(program, work_path)
+    end
+
+
+  end
+
+end

data/lib/rformunit/saveas_file_dialog.rb

@@ -0,0 +1,18 @@
+module RFormUnit
+  class SaveasFileDialog < RFormUnit::Window
+
+    def initialize(title = "Save As")
+      focus_window(title)
+    end
+
+    def enter_filepath(file_path)
+      set_control_text("Edit1", file_path)
+    end
+
+    def click_save
+      click_button("Button2")
+    end
+
+  end
+
+end

data/lib/rformunit/window.rb

@@ -0,0 +1,100 @@
+require File.dirname(__FILE__) + "/driver"
+require File.dirname(__FILE__) + "/control"
+
+module RFormUnit
+  
+
+  class Window  < BaseControl
+    attr_accessor :title, :text
+
+    def initialize(title, text = '', timeout = 10)      
+      # for some windows, the title might change depends when it is invoked
+      if title.class == Array 
+        title.each { |a_title| 
+          @title = a_title
+          @text = text if text        
+          result = driver.WinWaitActive(@title, @text, timeout)
+          return if result != 0
+        }
+        raise "timeout while waiting for window: #{self.to_s}" 
+      end
+      
+      @title = title
+      @text = text if text
+      result = driver.WinWaitActive(@title, @text, timeout)
+      raise "timeout while waiting for window: #{self.to_s}" if result == 0    
+    end
+
+    def focus
+      driver.WinActivate(@title, @text)
+    end
+
+    def close
+      driver.WinClose(@title, @text)
+    end
+
+    def exists?
+      driver.WinExists(@title, @text)
+    end
+
+    def get_text
+      driver.WinGetText(@title, @text)
+    end
+
+    def set_control_text(control_id, new_text)
+      BaseControl.new(self, control_id).set_text(new_text)
+    end
+     
+    def click_button(btn_id)
+      Button.new(self, btn_id).click
+    end
+
+    def show_dropdown(combo_id)
+      combo = ComboBox.new(self, combo_id)
+      combo.show_dropdown
+      combo
+    end
+
+    def hide_dropdown(combo_id)
+      combo = ComboBox.new(self, combo_id)
+      combo.hide_dropdown
+      combo
+    end
+
+    def focus_control(ctrl_id)
+      BaseControl.new(self, ctrl_id).focus
+    end
+
+    def send_control_text(ctrl_id, text)
+      BaseControl.new(self, ctrl_id).send_text(text)
+    end
+
+    def get_control_text(ctrl_id)
+      BaseControl.new(self, ctrl_id).get_text
+    end
+
+    #Not fully verified yet
+    def statusbar_text
+      driver.StatusbarGetText(@title)
+    end
+
+ 	def pixel_color(x,y)
+      driver.PixelGetColor(x,y)
+    end
+    alias pixel_colour pixel_color
+    alias get_pixel_colour pixel_color
+    alias get_pixel_color pixel_color
+    
+        
+    def to_s
+      "Window{title => '#{@title}', text=>'#{@text}'}"
+    end
+
+  # a list 
+     def button(button_id)
+       RFormUnit::Button.new(self, button_id)
+     end
+     
+  end
+
+end

data/sample/calc.rb

@@ -0,0 +1,25 @@
+require 'rformunit'
+
+module Calc
+   include RFormUnit::Driver
+
+   def start_calc
+      RFormUnit::Process.run("calc.exe")
+      RFormUnit::Window.new('Calculator')
+   end
+
+   def find_existing_calc_win
+      if window_exists?("Calculator")
+         focus_window('Calculator')
+         RFormUnit::Window.new('Calculator')
+      else
+         nil
+      end
+   end
+
+   def quit_calc
+      focus_window('QPRIME')
+      RFormUnit::Keyboard.press("!{F4}")
+   end
+
+end

data/sample/calc_spec.rb

@@ -0,0 +1,16 @@
+require File.dirname(__FILE__) + '/rspec_calc'
+
+context "Calculator" do
+
+   setup do    
+   end
+
+  specify "Multiple works" do
+    @calc_win.click_button('127')  #3
+      @calc_win.click_button('91')   #*
+      @calc_win.click_button('131')  #7
+      @calc_win.click_button('112')  #=
+      @calc_win.get_control_text('403').should == '21. '
+   end
+
+end

data/sample/notepad.rb

@@ -0,0 +1,19 @@
+require 'rformunit'
+
+include RFormUnit::Driver
+
+RFormUnit::Process.run("C:\\WINDOWS\\NOTEPAD.EXE")
+notepad_win = RFormUnit::Window.new('Untitled - Notepad')
+RFormUnit::Keyboard.type("Hello, Missing No. 5.{ENTER}1 2 3 4 6 7 8 9 10{ENTER}")
+RFormUnit::Keyboard.press("+{UP 2}")
+
+# move cursor up and insert the missing number
+RFormUnit::Mouse.move_to(70, 65)
+RFormUnit::Mouse.click
+RFormUnit::Keyboard.type("5 ")
+
+notepad_win.close
+
+notepad_confirm_dialog = RFormUnit::Window.new('Notepad', 'The text')
+notepad_confirm_dialog.focus
+RFormUnit::Button.new(notepad_confirm_dialog, "7").click

data/sample/notepad1.rb

@@ -0,0 +1,14 @@
+require 'rformunit'
+
+include RFormUnit::Driver
+
+RFormUnit::Process.run("C:\\WINDOWS\\NOTEPAD.EXE")
+notepad_win = RFormUnit::Window.new('Untitled - Notepad')
+RFormUnit::Keyboard.type("Hello from Notepad, {ENTER}1 2 3 4 5 6 7 8 9 10{ENTER}")
+sleep(0.5) 
+RFormUnit::Keyboard.press("+{UP 2}")
+sleep(0.5)
+notepad_win.close
+
+notepad_confirm_dialog = RFormUnit::Window.new('Notepad', 'No')
+notepad_confirm_dialog.click_button('&No')

data/sample/rspec_calc.rb

@@ -0,0 +1,24 @@
+require File.dirname(__FILE__) + '/calc'
+
+class RSpecCalc
+   include Calc
+    
+   def setup
+      init # initialize 
+      @calc_win = find_existing_calc_win
+      if @calc_win.nil?
+         @calc_win = start_calc
+      end
+   end
+end
+
+module Spec
+   module Runner
+      class Context
+         def before_context_eval
+            #inherit RSpecCalc # inherit not supported after 0.8
+            inherit_context_eval_module_from RSpecCalc
+         end
+      end
+   end
+end

data/sample/test_calc.rb

@@ -0,0 +1,23 @@
+require 'rformunit'
+
+class CalcTest < RFormUnit::FormTestCase
+
+   def setup
+      RFormUnit::Process.run("calc.exe")
+      @calc_win = RFormUnit::Window.new('Calculator')
+   end
+
+   def teardown
+      @calc_win.close
+   end
+
+   def test_multiple
+      @calc_win.click_button('127')  #3
+      @calc_win.click_button('91')   #*
+      @calc_win.click_button('131')  #7
+      @calc_win.click_button('112')  #=
+      assert_equal "21. ", @calc_win.get_control_text('403')
+
+   end
+
+end

metadata

@@ -0,0 +1,76 @@
+--- !ruby/object:Gem::Specification 
+name: rformunit
+version: !ruby/object:Gem::Version 
+  version: 0.2.0
+platform: x86-mswin32-60
+authors: 
+- Zhimin Zhan
+autorequire: rformunit
+bindir: bin
+cert_chain: []
+
+date: 2008-01-06 00:00:00 +00:00
+default_executable: 
+dependencies: []
+
+description: 
+email: zhimin@zhimin.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- Rakefile
+- README
+- CHANGELOG
+- MIT-LICENSE
+- lib/ext
+- lib/rformunit
+- lib/rformunit.rb
+- lib/ext/rspec_rformunit.rb
+- lib/rformunit/control.rb
+- lib/rformunit/driver.rb
+- lib/rformunit/form_testcase.rb
+- lib/rformunit/keyboard.rb
+- lib/rformunit/mouse.rb
+- lib/rformunit/open_file_dialog.rb
+- lib/rformunit/process.rb
+- lib/rformunit/saveas_file_dialog.rb
+- lib/rformunit/window.rb
+- sample/calc.rb
+- sample/calc_spec.rb
+- sample/notepad.rb
+- sample/notepad1.rb
+- sample/rspec_calc.rb
+- sample/test_calc.rb
+- docs/index.html
+has_rdoc: true
+homepage: http://www.zhimin.com/software/rformunit/
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: 
+- none
+rubyforge_project: 
+rubygems_version: 1.0.1
+signing_key: 
+specification_version: 2
+summary: An wrap of AUTOIT3 for functional testing of Windows form applications
+test_files: []
+