rdp-rautomation 0.6.3.1

data/spec/adapter/win_ffi/checkbox_spec.rb

@@ -0,0 +1,48 @@
+require 'spec_helper'
+
+describe "WinFfi::Checkbox", :if => SpecHelper.adapter == :win_ffi do
+  it "#checkbox" do
+    RAutomation::Window.new(:title => "MainFormWindow").checkbox(:value => "checkBox").should exist
+
+    RAutomation::Window.wait_timeout = 0.1
+    expect {RAutomation::Window.new(:title => "non-existing-window").checkbox(:value => "Something")}.
+      to raise_exception(RAutomation::UnknownWindowException)
+  end
+
+  it "check for checkbox class" do
+    RAutomation::Window.new(:title => "MainFormWindow").checkbox(:id => "textField").should_not exist
+  end
+
+
+  it "#set? & #set" do
+    checkbox = RAutomation::Window.new(:title => "MainFormWindow").checkbox(:value => "checkBox")
+    checkbox.should_not be_set
+
+    checkbox.set
+    checkbox.should be_set
+  end
+
+  it "#clear" do
+    checkbox = RAutomation::Window.new(:title => "MainFormWindow").checkbox(:value => "checkBox")
+    checkbox.set
+    checkbox.should be_set
+
+    checkbox.clear
+    checkbox.should_not be_set
+  end
+
+  it "enabled/disabled" do
+    RAutomation::Window.new(:title => "MainFormWindow").checkbox(:id => "checkBox").should be_enabled
+    RAutomation::Window.new(:title => "MainFormWindow").checkbox(:id => "checkBox").should_not be_disabled
+
+    RAutomation::Window.new(:title => "MainFormWindow").checkbox(:id => "checkBoxDisabled").should_not be_enabled
+    RAutomation::Window.new(:title => "MainFormWindow").checkbox(:id => "checkBoxDisabled").should be_disabled
+  end
+
+  it "cannot check a disabled checkbox" do
+    lambda {
+      RAutomation::Window.new(:title => "MainFormWindow").checkbox(:id => "checkBoxDisabled").set
+    }.should raise_error
+  end
+
+end

data/spec/adapter/win_ffi/keystroke_converter_spec.rb

@@ -0,0 +1,47 @@
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+require 'rautomation'
+require 'rspec'
+
+describe "KeystrokeConverter" do
+
+  it "converts plain ASCII" do
+    codes = RAutomation::Adapter::WinFfi::KeystrokeConverter.convert("abc")
+    converted_keys = convert_keys "abc"
+    codes.should == converted_keys
+  end
+
+  it "uses caps lock for entering downcase keys" do
+    codes = RAutomation::Adapter::WinFfi::KeystrokeConverter.convert("aBc")
+    converted_keys = convert_keys "abc"
+    converted_keys = converted_keys.insert(1, RAutomation::Adapter::WinFfi::Constants::VK_LSHIFT)
+    codes.should == converted_keys
+  end
+
+  it "converts special keys" do
+    codes = RAutomation::Adapter::WinFfi::KeystrokeConverter.convert("{tab}a{backspace}b{enter}c {left}d{right}ee{down}f{up}g{unsupported}")
+    expected_codes = [
+      RAutomation::Adapter::WinFfi::Constants::VK_TAB,
+      convert_keys("a"),
+      RAutomation::Adapter::WinFfi::Constants::VK_BACK,
+      convert_keys("b"),
+      RAutomation::Adapter::WinFfi::Constants::VK_RETURN,
+      convert_keys("c"),
+      RAutomation::Adapter::WinFfi::Constants::VK_SPACE,
+      RAutomation::Adapter::WinFfi::Constants::VK_LEFT,
+      convert_keys("d"),
+      RAutomation::Adapter::WinFfi::Constants::VK_RIGHT,
+      convert_keys("ee"),
+      RAutomation::Adapter::WinFfi::Constants::VK_DOWN,
+      convert_keys("f"),
+      RAutomation::Adapter::WinFfi::Constants::VK_UP,
+      convert_keys("g"),
+      convert_keys("unsupported")
+    ].flatten
+    codes.should == expected_codes
+  end
+
+  def convert_keys keys
+    keys.split("").map {|k| k.upcase.unpack("c")[0]}
+  end
+
+end

data/spec/adapter/win_ffi/label_spec.rb

@@ -0,0 +1,21 @@
+require 'spec_helper'
+
+describe "WinFfi::Label", :if => SpecHelper.adapter == :win_ffi do
+  it "#exist?" do
+    window = RAutomation::Window.new(:title => "MainFormWindow")
+
+    window.label(:value => "This is a sample text").should exist
+    window.label(:value => "This label should not exist").should_not exist
+  end
+
+  it "check for label class" do
+    RAutomation::Window.new(:title => "MainFormWindow").label(:id => "textField").should_not exist
+  end
+
+
+  it "#label" do
+    window = RAutomation::Window.new(:title => "MainFormWindow")
+
+    window.label(:value => "This is a sample text").value.should == "This is a sample text"
+  end
+end

data/spec/adapter/win_ffi/listbox_spec.rb

@@ -0,0 +1,52 @@
+require 'spec_helper'
+
+describe "WinFfi::ListBox", :if => SpecHelper.adapter == :win_ffi do
+
+  it "#exists" do
+    RAutomation::Window.new(:title => "MainFormWindow").list_box(:id => "FruitListBox").should exist
+  end
+
+  it "check for listbox class" do
+    RAutomation::Window.new(:title => "MainFormWindow").list_box(:id => "textField").should_not exist
+  end
+
+  it "counts items" do
+    list_box = RAutomation::Window.new(:title => "MainFormWindow").list_box(:id => "FruitListBox")
+    list_box.count.should == 3
+  end
+
+  it "lists items" do
+    list_box = RAutomation::Window.new(:title => "MainFormWindow").list_box(:id => "FruitListBox")
+    list_box.items[0].should == "Apple"
+    list_box.items[1].should == "Orange"
+    list_box.items[2].should == "Mango"
+  end
+
+
+  it "#selected?" do
+    list_box = RAutomation::Window.new(:title => "MainFormWindow").list_box(:id => "FruitListBox")
+
+    list_box.selected?(2).should == false
+    list_box.select(2)
+    list_box.selected?(2).should == true
+  end
+
+  it "#select" do
+    list_box = RAutomation::Window.new(:title => "MainFormWindow").list_box(:id => "FruitListBox")
+
+    list_box.select(1)
+    list_box.selected?(1).should == true
+
+    list_box.select(0)
+    list_box.selected?(0).should == true
+
+    list_box.select(2)
+    list_box.selected?(2).should == true
+  end
+
+  it "#strings" do
+    list_box = RAutomation::Window.new(:title => "MainFormWindow").list_box(:id => "FruitListBox")
+
+    list_box.strings.should == ["Apple", "Orange", "Mango"]
+  end
+end

data/spec/adapter/win_ffi/radio_spec.rb

@@ -0,0 +1,37 @@
+require 'spec_helper'
+
+describe "WinFfi::RadioButton", :if => SpecHelper.adapter == :win_ffi do
+  it "#exist?" do
+    RAutomation::Window.new(:title => "MainFormWindow").radio(:value => "Option 1").should exist
+
+    RAutomation::Window.wait_timeout = 0.1
+    expect {RAutomation::Window.new(:title => "non-existent-window").
+            radio(:value => "Option 1")}.
+            to raise_exception(RAutomation::UnknownWindowException)
+  end
+
+  it "check for radio class" do
+    RAutomation::Window.new(:title => "MainFormWindow").radio(:id => "textField").should_not exist
+  end
+
+
+  it "#set? & #set" do
+    radio = RAutomation::Window.new(:title => "MainFormWindow").radio(:value => "Option 1")
+    radio.should_not be_set
+
+    radio.set
+    radio.should be_set
+  end
+
+  it "enabled/disabled" do
+    RAutomation::Window.new(:title => "MainFormWindow").radio(:value => "Option 1").should be_enabled
+    RAutomation::Window.new(:title => "MainFormWindow").radio(:value => "Option 1").should_not be_disabled
+
+    RAutomation::Window.new(:title => "MainFormWindow").radio(:value => "Option Disabled").should_not be_enabled
+    RAutomation::Window.new(:title => "MainFormWindow").radio(:value => "Option Disabled").should be_disabled
+  end
+
+  it "cannot set a disabled radio button" do
+    lambda { RAutomation::Window.new(:title => "MainFormWindow").radio(:value => "Option Disabled").set }.should raise_error
+  end
+end

data/spec/adapter/win_ffi/select_list_spec.rb

@@ -0,0 +1,66 @@
+require 'spec_helper'
+
+describe "WinFfi::SelectList", :if => SpecHelper.adapter == :win_ffi do
+  it "#select_list" do
+    RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "FruitsComboBox").should exist
+
+    RAutomation::Window.wait_timeout = 0.1
+    expect {RAutomation::Window.new(:title => "non-existent-window").
+            select_list(:class => /COMBOBOX/i)}.
+            to raise_exception(RAutomation::UnknownWindowException)
+  end
+
+  it "check for select list class" do
+    RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "textField").should_not exist
+  end
+
+  it "#options" do
+    select_list = RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "FruitsComboBox")
+    select_list.options.size.should == 5
+
+    expected_options = ["Apple", "Caimito", "Coconut", "Orange", "Passion Fruit"]
+    select_list.options.map {|option| option.text}.should == expected_options
+  end
+
+  it "#selected? & #select" do
+    select_list = RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "FruitsComboBox")
+    select_list.options(:text => "Apple")[0].should_not be_selected
+    select_list.options(:text => "Apple")[0].select.should be_true
+    select_list.options(:text => "Apple")[0].should be_selected
+  end
+
+  it "#value" do
+    select_list = RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "FruitsComboBox")
+
+    #default empty state
+    select_list.value.should == ""
+
+    select_list.options(:text => "Apple")[0].select
+    select_list.value.should == "Apple"
+
+    select_list.options(:text => "Caimito")[0].select
+    select_list.value.should == "Caimito"
+  end
+
+  it "enabled/disabled" do
+    RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "FruitsComboBox").should be_enabled
+    RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "FruitsComboBox").should_not be_disabled
+
+    RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "comboBoxDisabled").should_not be_enabled
+    RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "comboBoxDisabled").should be_disabled
+  end
+
+  it "#option" do
+    select_list = RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "FruitsComboBox")
+
+    select_list.option(:text => "Apple").should_not be_selected
+    select_list.option(:text => "Apple").set
+    select_list.option(:text => "Apple").should be_selected
+  end
+
+  it "cannot select anything on a disabled select list" do
+    select_list = RAutomation::Window.new(:title => "MainFormWindow").select_list(:id => "comboBoxDisabled")
+
+    lambda { select_list.option(:text => "Apple").set }.should raise_error
+  end
+end

data/spec/adapter/win_ffi/table_spec.rb

@@ -0,0 +1,39 @@
+require 'spec_helper'
+
+describe "WinFfi::Table", :if => SpecHelper.adapter == :win_ffi do
+  before :each do
+    window = RAutomation::Window.new(:title => "MainFormWindow")
+    window.button(:value => "Data Entry Form").click { RAutomation::Window.new(:title => "DataEntryForm").exists? }
+  end
+
+  it "#table" do
+    table = RAutomation::Window.new(:title => "DataEntryForm").table(:id => "personListView")
+    table.should exist
+    
+    RAutomation::Window.wait_timeout = 0.1
+    expect {RAutomation::Window.new(:title => "non-existent-window").
+            table(:class => /SysListView32/i)}.
+            to raise_exception(RAutomation::UnknownWindowException)
+  end
+
+  it "#strings" do
+    table = RAutomation::Window.new(:title => "DataEntryForm").table(:id => "personListView")
+
+    table.strings.should == [
+        ["Name", "Date of birth", "State"],
+        ["John Doe", "12/15/1967", "FL"],
+        ["Anna Doe", "3/4/1975", ""]
+    ]
+  end
+
+  it "#select" do
+    table = RAutomation::Window.new(:title => "DataEntryForm").table(:id => "personListView")
+
+    table.selected?(2).should == false
+
+    table.select(2)
+    table.selected?(2).should == true
+  end
+
+end
+

data/spec/adapter/win_ffi/text_field_spec.rb

@@ -0,0 +1,23 @@
+require 'spec_helper'
+
+describe "WinFfi::TextField", :if => SpecHelper.adapter == :win_ffi do
+
+  it "check for text field class" do
+    RAutomation::Window.new(:title => "MainFormWindow").text_field(:id => "checkBox").should_not exist
+  end
+
+  it "enabled/disabled" do
+    RAutomation::Window.new(:title => "MainFormWindow").text_field(:id => "textField").should be_enabled
+    RAutomation::Window.new(:title => "MainFormWindow").text_field(:id => "textField").should_not be_disabled
+
+    RAutomation::Window.new(:title => "MainFormWindow").text_field(:id => "textBoxDisabled").should_not be_enabled
+    RAutomation::Window.new(:title => "MainFormWindow").text_field(:id => "textBoxDisabled").should be_disabled
+  end
+
+  it "cannot set a value to a disabled text field" do
+    lambda { RAutomation::Window.new(:title => "MainFormWindow").text_field(:id => "textBoxDisabled").set "abc" }.should raise_error
+
+    lambda { RAutomation::Window.new(:title => "MainFormWindow").text_field(:id => "textBoxDisabled").clear }.should raise_error
+  end
+
+end

data/spec/adapter/win_ffi/window_spec.rb

@@ -0,0 +1,43 @@
+require "spec_helper"
+
+describe "WinFfi::Window", :if => SpecHelper.adapter == :win_ffi do
+  it "#child" do
+    window = RAutomation::Window.new(:title => /MainFormWindow/i)
+    window.should exist
+
+    # buttons are windows too. so let's find the button for now
+    child = window.child(:title => /About/i)
+    child.should exist
+    child.title.should == "&About"
+    #    child.text.should include "About"
+  end
+
+  it "send tab keystrokes to move focus between elements" do
+    window = RAutomation::Window.new(:title => /MainFormWindow/i)
+    window.button(:value => "&About").set_focus
+    window.button(:value => "&About").should have_focus
+
+    window.send_keys("{tab}{tab}{tab}")
+    button = window.button(:value => "Close")
+    button.should exist
+    button.should have_focus
+  end
+
+   it "send keystrokes to a text field" do
+    window = RAutomation::Window.new(:title => /MainFormWindow/i)
+    text_field = RAutomation::Window.new(:title => "MainFormWindow").text_field(:id => "textField")
+    text_field.set_focus
+    window.send_keys("abc123ABChiHI")
+    text_field.value.should == "abc123ABChiHI"
+   end
+
+  it "#control" do
+    window = RAutomation::Window.new(:title => /MainFormWindow/i)
+    window.control(:id => "aboutButton").should exist
+  end
+
+  it "has controls" do
+    window = RAutomation::Window.new(:title => /MainFormWindow/i)
+    window.controls(:class => /BUTTON/i).size.should == 12
+  end
+end

data/spec/button_spec.rb

@@ -0,0 +1,68 @@
+require 'spec_helper'
+
+describe RAutomation::Button do
+  it "#button" do
+    RAutomation::Window.new(:title => SpecHelper::DATA[:window1_title]).
+      button(:value => "Close").should exist
+
+    RAutomation::Window.wait_timeout = 0.1
+    expect {RAutomation::Window.new(:title => "non-existing-window").button(:value => "Something")}.
+      to raise_exception(RAutomation::UnknownWindowException)
+  end
+
+  it "#value" do
+    RAutomation::Window.new(:title => SpecHelper::DATA[:window1_title]).
+      button(:value => "Close").value.should == "Close"
+
+    RAutomation::Window.wait_timeout = 0.1
+    expect {RAutomation::Window.new(:title => SpecHelper::DATA[:window1_title]).button(:value => "non-existent-button").value}.
+      to raise_exception(RAutomation::UnknownButtonException)
+  end
+
+  it "#exists?" do
+    window = RAutomation::Window.new(:title => SpecHelper::DATA[:window1_title])
+    window.button(:value => "Close").should exist
+    window.button(:value => "non-existent-button").should_not exist
+  end
+
+  it "clicking non-existing button raises exception" do
+    window = RAutomation::Window.new(:title => SpecHelper::DATA[:window1_title])
+    RAutomation::Window.wait_timeout = 0.1
+    expect {window.button(:value => "non-existent-button").click}.
+      to raise_exception(RAutomation::UnknownButtonException)
+  end
+
+  it "#click" do
+    window = RAutomation::Window.new(:title => SpecHelper::DATA[:window1_title])
+
+    button = window.button(:value => "Close")
+    button.should exist
+    button.click
+
+    button.should_not exist
+    window.should_not exist
+  end
+
+  it "#click with a block for defining successful click returning false raises a TimeoutError" do
+    window = RAutomation::Window.new(:title => SpecHelper::DATA[:window1_title])
+    RAutomation::Window.wait_timeout = 5
+    button = window.button(:value => "Close")
+    expect {button.click {false}}.
+      to raise_exception(RAutomation::WaitHelper::TimeoutError)
+
+    button.should_not exist
+    window.should_not exist
+  end
+
+  it "#click with a block for defining successful click returning true" do
+    RAutomation::Window.wait_timeout = 10
+    window = RAutomation::Window.new(:title => SpecHelper::DATA[:window1_title])
+    button = window.button(:value => "Close")
+    button.should exist
+    button.click {|button| !button.exists? && !window.exists?}
+
+    button.should_not exist
+    window.should_not exist
+  end
+
+end