watir-classic 3.0.0

data/unittests/selectbox_xpath_test.rb

@@ -0,0 +1,102 @@
+# feature tests for Select Boxes
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_Selectbox_XPath < Test::Unit::TestCase
+  include Watir::Exception
+  
+  def setup
+    goto_page "selectboxes1.html"
+  end
+  
+  def test_textBox_Exists
+    assert(browser.select_list(:xpath, "//select[@name='sel1']/").exists?)   
+    assert_false(browser.select_list(:xpath, "//select[@name='missing']/").exists?)   
+    assert_false(browser.select_list(:xpath, "//select[@id='missing']/").exists?)   
+  end
+  
+  def test_select_list_enabled
+    assert(browser.select_list(:xpath, "//select[@name='sel1']/").enabled?)   
+    assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']/").enabled? }  
+  end
+  
+  def test_select_list_getAllContents
+    assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']/").getAllContents }  
+    assert_equal( ["Option 1" ,"Option 2" , "Option 3" , "Option 4"] , 
+    browser.select_list(:xpath, "//select[@name='sel1']/").options.map(&:text))
+  end
+  
+  def test_select_list_getSelectedItems
+    assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']/").getSelectedItems }  
+    assert_equal( ["Option 3" ] , 
+    browser.select_list(:xpath, "//select[@name='sel1']/").selected_options.map(&:text))
+    assert_equal( ["Option 3" , "Option 6" ] , 
+    browser.select_list(:xpath, "//select[@name='sel2']/").selected_options.map(&:text))
+  end
+  
+  def test_clearSelection
+    browser.select_list(:xpath, "//select[@name='sel2']/").clearSelection
+    assert_equal( [ ] , browser.select_list(:xpath, "//select[@name='sel2']/").selected_options.map(&:text))
+  end
+  
+  def test_select_list_select
+    assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']/").selected_options.map(&:text) }
+    assert_raises(NoValueFoundException) { browser.select_list(:xpath, "//select[@name='sel1']/").select("missing item") }  
+    assert_raises(NoValueFoundException) { browser.select_list(:xpath, "//select[@name='sel1']/").select(/missing/) }  
+    
+    # the select method keeps any currently selected items - use the clear selectcion method first
+    browser.select_list(:xpath, "//select[@name='sel1']/").select("Option 1")
+    assert_equal( ["Option 1" ] , browser.select_list(:xpath, "//select[@name='sel1']/").selected_options.map(&:text))
+    
+    browser.select_list(:xpath, "//select[@name='sel1']/").select(/2/)
+    assert_equal( ["Option 2" ] , browser.select_list(:xpath, "//select[@name='sel1']/").selected_options.map(&:text))
+    
+    browser.select_list(:xpath, "//select[@name='sel2']/").clearSelection
+    browser.select_list(:xpath, "//select[@name='sel2']/").select( /2/ )
+    browser.select_list(:xpath, "//select[@name='sel2']/").select( /4/ )
+    assert_equal( ["Option 2" , "Option 4" ] , 
+    browser.select_list(:xpath, "//select[@name='sel2']/").selected_options.map(&:text))
+    
+    # these are to test the onchange event
+    # the event shouldnt get fired, as this is the selected item
+    browser.select_list(:xpath, "//select[@name='sel3']/").select( /3/ )
+    assert_false(browser.text.include?("Pass") )
+  end
+  
+  def test_select_list_select2
+    # the event should get fired
+    browser.select_list(:xpath, "//select[@name='sel3']/").select( /2/ )
+    assert(browser.text.include?("PASS") )
+  end
+  
+  def test_select_list_select_using_value
+    assert_raises(UnknownObjectException) { browser.select_list(:xpath, "//select[@name='NoName']/").getSelectedItems }  
+    assert_raises(NoValueFoundException) { browser.select_list(:xpath, "//select[@name='sel1']/").select_value("missing item") }  
+    assert_raises(NoValueFoundException) { browser.select_list(:xpath, "//select[@name='sel1']/").select_value(/missing/) }  
+    
+    # the select method keeps any currently selected items - use the clear selectcion method first
+    browser.select_list(:xpath, "//select[@name='sel1']/").select_value("o1")
+    assert_equal( ["Option 1" ] , browser.select_list(:xpath, "//select[@name='sel1']/").selected_options.map(&:text))
+    
+    browser.select_list(:xpath, "//select[@name='sel1']/").select_value(/2/)
+    assert_equal( ["Option 2" ] , browser.select_list(:xpath, "//select[@name='sel1']/").selected_options.map(&:text))
+    
+    browser.select_list(:xpath, "//select[@name='sel2']/").clearSelection
+    browser.select_list(:xpath, "//select[@name='sel2']/").select( /2/ )
+    browser.select_list(:xpath, "//select[@name='sel2']/").select( /4/ )
+    assert_equal( ["Option 2" , "Option 4" ] , browser.select_list(:xpath, "//select[@name='sel2']/").selected_options.map(&:text))
+    
+    # these are to test the onchange event
+    # the event shouldnt get fired, as this is the selected item
+    browser.select_list(:xpath, "//select[@name='sel3']/").select_value( /3/ )
+    assert_false(browser.text.include?("Pass") )
+  end
+  
+  def test_select_list_select_using_value2
+    # the event should get fired
+    browser.select_list(:xpath, "//select[@name='sel3']/").select_value( /2/ )
+    assert(browser.text.include?("PASS") )
+  end
+  
+end

data/unittests/setup.rb

@@ -0,0 +1,69 @@
+# watir/unittests/setup.rb
+$SETUP_LOADED = true
+$myDir = File.expand_path(File.dirname(__FILE__))
+
+def append_to_load_path path
+  $LOAD_PATH.unshift File.expand_path(path)
+end
+
+# use local development versions of watir
+topdir = File.join(File.dirname(__FILE__), '..')
+$watir_dev_lib = File.join(topdir, 'lib')
+commonwatir_dir = "commonwatir#{File.exist?('VERSION') ? "-#{File.read('VERSION').strip}" : ""}"
+commonwatir_absolute_dir = File.join(topdir, '..', commonwatir_dir)
+libs = []
+libs << File.join(commonwatir_absolute_dir, 'lib')
+libs << commonwatir_absolute_dir # for the unit tests
+libs.each { |lib| append_to_load_path(lib) }
+
+require 'watir-classic/browser'
+Watir::Browser.default = 'ie'
+require 'unittests/setup/lib'
+require 'watir-classic/testcase'
+
+# Standard Tags
+# :must_be_visible
+# :creates_windows
+# :unreliable (test fails intermittently)
+
+=begin
+Test Suites
+* all_tests -- all the tests in the unittests directory (omits "other")
+* window_tests -- window intensive tests
+=end
+
+$all_tests = []
+$all_tests += Dir["unittests/*_test.rb"]
+Dir.chdir commonwatir_absolute_dir do
+  $all_tests += Dir["unittests/*_test.rb"]
+end
+
+# These tests won't load unless Watir is in the path
+$watir_only_tests = [
+        "images_xpath_test.rb",
+        "images_test.rb",
+        "dialog_test.rb",
+        "ie_test.rb"
+].map {|file| "unittests/#{file}"}
+
+if Watir::UnitTest.options[:browser] != 'ie'
+  $all_tests -= $watir_only_tests
+end
+
+
+=begin
+     'attach_to_existing_window', # could actually run robustly as part of the core suite!
+     'attach_to_new_window', # creates new window
+     'close_window', # creates new window
+     'frame_links', # visible
+     'iedialog', # visible
+     #ie-each
+     'js_events', # is always visible
+     'jscript',
+     'modal_dialog', # modal is visible
+     #new 
+     'open_close',
+     'send_keys', # visible
+=end
+
+$window_tests = Dir["unittests/windows/*_test.rb"] - ["unittests/windows/ie-each_test.rb"]

data/unittests/speed_settings_test.rb

@@ -0,0 +1,67 @@
+# tests for ability to set defaults for Watir
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_instance_options < Test::Unit::TestCase
+  tags :fails_on_firefox
+  
+  def setup
+    @ie4 = Watir::IE.new    
+  end
+  
+  def test_using_default
+    @ie4.speed = :fast
+    assert_equal(:fast, @ie4.speed)
+    @ie4.speed = :slow
+    assert_equal(:slow, @ie4.speed)
+    @ie4.speed = :zippy
+    assert_equal(:zippy, @ie4.speed)
+   
+    assert_raise(ArgumentError){@ie4.speed = :fubar}
+  end
+
+  def teardown
+    @ie4.close if @ie4.exists?
+  end
+end
+
+class TC_class_options < Test::Unit::TestCase
+  tags :fails_on_firefox
+	include Watir
+	@@hide_ie = $HIDE_IE
+	def setup
+		@previous = IE.options
+	end
+	def test_class_defaults
+		assert_equal({:speed => IE.speed, :visible => IE.visible, :attach_timeout => IE.attach_timeout, :zero_based_indexing => IE.zero_based_indexing}, IE.options)
+	end
+	def test_change_defaults
+		IE.set_options(:speed => :fast)
+		assert_equal(:fast, IE.speed)
+		IE.set_options(:visible => false)
+		assert_equal(false, IE.visible)
+		IE.set_options(:speed => :slow)
+		assert_equal(:slow, IE.speed)
+		IE.set_options(:visible => true)
+		assert_equal(true, IE.visible)
+    IE.set_options(:attach_timeout => 22.0)
+    assert_equal(22.0, IE.attach_timeout)
+	end
+	def test_defaults_affect_on_instance
+		IE.set_options(:speed => :fast)
+		@ie1 = IE.new
+		assert_equal(:fast, @ie1.speed)
+		IE.set_options(:speed => :slow)
+		@ie2 = IE.new
+		assert_equal(:slow, @ie2.speed)
+    IE.set_options(:speed => :zippy)
+    @ie3 = IE.new
+    assert_equal(:zippy, @ie3.speed)
+	end
+	def teardown
+		IE.set_options @previous
+		@ie1.close if @ie1
+		@ie2.close if @ie2
+    @ie3.close if @ie3
+	end
+end

data/unittests/table_cell_using_xpath_test.rb

@@ -0,0 +1,34 @@
+# feature tests for xpath table cells
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_TableCell_XPath < Test::Unit::TestCase
+  
+  def setup
+    goto_page "tableCell_using_xpath.html"
+  end
+  
+  def testCellExists
+    # There is no <image> with @src='rectangle.jpg'. So image will not be there.
+    assert_false( browser.cell(:xpath , "//img[@src='images\/rectangle.jpg']/../").exists?  )
+    # Select the parent element of image with src='square.jpg' which is a tablecell.
+    assert(       browser.cell(:xpath , "//img[@src='images\/square.jpg']/../").exists?  )
+    assert(       browser.cell(:xpath , "//img[@src='images\/triangle.jpg']/../").exists?  )
+    puts "Selected table cell with text 'Table Cell with image of triangle.'"
+    puts browser.cell(:xpath , "//img[@src='images\/triangle.jpg']/../").to_s
+  end
+  
+  def testCell_properties
+    assert_equal(1 , browser.cell(:xpath , "//img[@src='images\/square.jpg']/../").colspan) 
+    assert_equal(2 , browser.cell(:xpath , "//img[@src='images\/triangle.jpg']/../").colspan) 
+    assert_equal(3 , browser.cell(:xpath , "//img[@src='images\/circle.jpg']/../").colspan) 
+    assert_equal(4 , browser.cell(:xpath , "//img[@src='images\/button.jpg']/../").colspan) 
+    
+    # to string tests -- output should be verified!
+    puts browser.cell(:xpath , "//img[@src='images\/square.jpg']/../").to_s
+    puts browser.cell(:xpath , "//img[@src='images\/triangle.jpg']/../").to_s
+  end
+  
+end
+

data/unittests/table_test.rb

@@ -0,0 +1,296 @@
+# feature tests for Tables
+# Why do so many of these tests call "strip"? A distinct smell...
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_Tables < Test::Unit::TestCase
+  include Watir::Exception
+  
+  def setup
+    uses_page "table1.html"
+  end
+  def teardown
+    browser.refresh if @reload_page
+  end
+  
+  def test_exists
+    assert browser.table(:id, 't1').exists?
+    assert browser.table(:id, /t/).exists?
+    
+    assert !browser.table(:id, 'missingTable').exists?
+    assert !browser.table(:id, /missing_table/).exists?
+    
+    assert browser.table(:index, 0).exists?
+    assert !browser.table(:index, 33).exists?
+  end
+  
+  tag_method :test_row_count_exceptions, :fails_on_firefox
+  def test_row_count_exceptions
+    assert_raises UnknownObjectException do
+      browser.table(:id, 'missingTable').row_count
+    end
+    assert_raises UnknownObjectException do
+      browser.table(:index, 66).row_count
+    end
+    assert_raises MissingWayOfFindingObjectException do
+      browser.table(:bad_attribute, 99).row_count
+    end
+  end
+  def test_rows
+    assert_equal(2, browser.table(:index, 0).row_count)
+    assert_equal(2, browser.table(:index, 0).rows.length)
+    
+    assert_equal(5, browser.table(:id, 't1').row_count)  # 4 rows and a header 
+    assert_equal(5, browser.table(:index, 1).row_count)  # same table as above, just accessed by index 
+    assert_equal(5, browser.table(:id, 't1').rows.length)   
+    
+    # test the each iterator on rows - ie, go through each cell
+    row = browser.table(:index, 1)[1]
+    result = []
+    row.each do |cell|
+      result << cell.to_s.strip
+    end
+    assert_equal(['Row 1 Col1', 'Row 1 Col2'], result)
+    assert_equal(2, row.column_count)        
+  end
+
+  tag_method :test_row_counts, :fails_on_firefox
+  def test_row_counts
+    table = browser.table(:id => 't2')
+    assert_equal(2, table.row_count)
+  end
+
+  tag_method :test_dynamic_tables, :fails_on_firefox
+  def test_dynamic_tables
+    @reload_page = true
+    t = browser.table(:id, 't1')
+    assert_equal(5, t.row_count)
+    browser.button(:value, 'add row').click
+    assert_equal(6, t.row_count)
+  end
+  
+  def test_columns
+    assert_raises UnknownObjectException do
+      browser.table(:id, 'missingTable').column_count
+    end
+    assert_raises UnknownObjectException do
+      browser.table(:index, 77).column_count
+    end
+    assert_equal(2, browser.table(:index, 0).column_count)
+    assert_equal(1, browser.table(:id, 't1').column_count)   # row one has 1 cell with a colspan of 2
+  end
+  
+  def test_links_and_images_in_table
+    table = browser.table(:id, 'pic_table')
+    image = table[0][1].image(:index,0)
+    assert_equal(106, image.width)
+    
+    link = table[0][3].link(:index,0)
+    assert_equal("Google", link.text)
+  end
+  
+  def test_cell_directly
+    assert browser.td(:id, 'cell1').exists?
+    assert ! browser.td(:id, 'no_exist').exists?
+    assert_equal("Row 1 Col1", browser.td(:id, 'cell1').to_s.strip)
+  end
+  
+  def test_cell_another_way
+    assert_equal( "Row 1 Col1", browser.table(:index,0)[0][0].to_s.strip)
+  end
+  
+  def test_row_directly
+    assert browser.tr(:id, 'row1').exists?
+    assert ! browser.tr(:id, 'no_exist').exists?
+  end
+  def test_row_another_way
+    assert_equal('Row 2 Col1',  browser.tr(:id, 'row1')[0].to_s.strip)
+  end
+
+  tag_method :test_row_in_table, :fails_on_firefox
+  def test_row_in_table
+    assert_equal 'Row 2 Col1 Row 2 Col2', 
+      browser.table(:id, 't1').row(:id, 'row1').text.gsub(/(\r|\n)/,'')
+  end
+  
+  def test_row_collection
+    t = browser.table(:index,0)
+    t.rows.each_with_index do |row, i|
+      assert("Row #{i + 1} Col1", row[0].text)
+      assert("Row #{i + 1} Col2", row[1].text)
+    end
+  end 
+  
+  tag_method :test_cell_collection, :fails_on_firefox
+  def test_cell_collection
+    t = browser.table(:index,0)
+    contents = t.cells.collect {|c| c.text}
+    assert_equal(["Row 1 Col1","Row 1 Col2","Row 2 Col1","Row 2 Col2"], contents)
+  end    
+   
+  tag_method :test_table_body, :fails_on_firefox
+  def test_table_body
+    assert_equal(1, browser.table(:index, 0).tbodys.length)
+    assert_equal(3, browser.table(:id, 'body_test').tbodys.length)
+    
+    count = 1
+    browser.table(:id, 'body_test').tbodys.each do |n|
+      # do something better here!
+      case count 
+      when 1 
+        compare_text = "This text is in the FRST TBODY."
+      when 2 
+        compare_text = "This text is in the SECOND TBODY."
+      when 3 
+        compare_text = "This text is in the THIRD TBODY."
+      end
+      assert_equal(compare_text, n[0][0].to_s.strip )   # this is the 1st cell of the first row of this particular body
+      count += 1
+    end
+    assert_equal( count - 1, browser.table(:id, 'body_test').tbodys.length )
+    assert_equal( "This text is in the THIRD TBODY." ,browser.table(:id, 'body_test' ).tbody(:index,2)[0][0].to_s.strip ) 
+  end
+  
+  def test_table_container
+    assert_nothing_raised { browser.table(:id, 't1').html }
+  end
+  
+  def test_multiple_selector
+    assert_equal('Second table with css class', 
+      browser.table(:class => 'sample', :index => 1)[0][0].text)
+  end
+end    
+
+class TC_Tables_Simple < Test::Unit::TestCase
+  include Watir
+  
+  def setup
+    goto_page "simple_table.html"
+  end
+  
+  def test_simple_table_access
+    table = browser.table(:index,0)
+    assert_equal("Row 3 Col1", table[2][0].text.strip)
+    assert_equal("Row 1 Col1", table[0][0].text.strip)
+    assert_equal("Row 3 Col2", table[2][1].text.strip)
+    assert_equal(2, table.column_count)
+  end
+end
+class TC_Tables_Buttons < Test::Unit::TestCase
+  include Watir
+  
+  def setup
+    uses_page "simple_table_buttons.html"
+  end
+  
+  def test_simple_table_buttons
+    table = browser.table(:index, 0)
+    
+    table[0][0].button(:index, 0).click
+    assert(browser.text_field(:name,"confirmtext").verify_contains(/CLICK1/i))
+    table[1][0].button(:index, 0).click
+    assert(browser.text_field(:name,"confirmtext").verify_contains(/CLICK2/i))
+    
+    table[0][0].button(:id, 'b1').click
+    assert(browser.text_field(:name,"confirmtext").verify_contains(/CLICK1/i))
+    
+    assert_raises(UnknownObjectException   ) { table[0][0].button(:id,'b_missing').click }
+    
+    table[2][0].button(:index, 1).click
+    assert(browser.text_field(:name,"confirmtext").verify_contains(/TOO/i))
+    
+    table[2][0].button(:value, "Click too").click
+    assert(browser.text_field(:name,"confirmtext").verify_contains(/TOO/i))
+    
+    browser.table(:index, 0)[3][0].text_field(:index,0).set("123")
+    assert(browser.text_field(:index,1).verify_contains("123"))
+    
+    # check when a cell contains 2 objects
+    
+    # if there were 2 different html objects in the same cell, some weird things happened ( button caption could change for example)
+    assert_equal( 'Click ->' , browser.table(:index,0)[4][0].text_field(:index,0).value )
+    browser.table(:index,0)[4][0].text_field(:index,0).click
+    assert_equal( 'Click ->' , browser.table(:index,0)[4][0].text_field(:index,0).value )
+    
+    browser.table(:index,0)[4][0].button(:index,0).click
+    assert_equal( '' , browser.table(:index,0)[4][0].text_field(:index,0).value )
+  end
+  
+  def test_simple_table_gif
+    table = browser.table(:index,1)
+    assert_match(/1\.gif/, table[0][0].image(:index, 0).src)
+    assert_match(/2\.gif/, table[0][1].image(:index, 0).src)
+    assert_match(/3\.gif/, table[0][2].image(:index, 0).src)
+    
+    assert_match(/1\.gif/, table[2][0].image(:index, 0).src)
+    assert_match(/2\.gif/, table[2][1].image(:index, 0).src)
+    assert_match(/3\.gif/, table[2][2].image(:index, 0).src)
+    
+    table = browser.table(:index,2)
+    assert_match(/1\.gif/, table[0][0].image(:index, 0).src)
+    assert_match(/2\.gif/, table[0][0].image(:index, 1).src)
+    assert_match(/3\.gif/, table[0][0].image(:index, 2).src)
+    
+    assert_match(/1\.gif/, table[2][0].image(:index, 0).src)
+    assert_match(/2\.gif/, table[2][0].image(:index, 1).src)
+    assert_match(/3\.gif/, table[2][0].image(:index, 2).src)
+  end
+  
+end
+
+class TC_Table_Columns < Test::Unit::TestCase
+  include Watir::Exception
+  def setup
+    uses_page "simple_table_columns.html"
+  end
+  
+  def test_get_columnvalues_single_column
+    assert_equal(["R1C1", "R2C1", "R3C1"], browser.table(:index, 0).column_values(0))
+  end
+  
+  def test_colspan
+    assert_equal(2, browser.table(:index, 2)[1][0].colspan)
+    assert_equal(1, browser.table(:index, 2)[0][0].colspan)
+    assert_equal(3, browser.table(:index, 2)[3][0].colspan)
+  end
+  
+  def test_get_columnvalues_multiple_column
+    assert_equal(["R1C1", "R2C1", "R3C1"], browser.table(:index, 1).column_values(0))
+    assert_equal(["R1C3", "R2C3", "R3C3"], browser.table(:index, 1).column_values(2))
+  end
+  
+  tag_method :test_get_columnvalues_with_colspan, :fails_on_firefox
+  def test_get_columnvalues_with_colspan
+    assert_equal(["R1C1", "R2C1", "R3C1", "R4C1", "R5C1", "R6C2"], browser.table(:index, 2).column_values(0))
+     (1..3).each{|x|assert_raises(UnknownCellException){browser.table(:index, 2).column_values(x)}}
+  end
+  
+  def test_get_rowvalues_full_row
+    assert_equal(["R1C1", "R1C2", "R1C3"], browser.table(:index, 2).row_values(0))
+  end
+  
+  def test_get_rowvalues_with_colspan
+    assert_equal(["R2C1", "R2C2"], browser.table(:index, 2).row_values(1))
+  end
+  
+  def test_getrowvalues_with_rowspan
+    assert_equal(["R5C1", "R5C2", "R5C3"], browser.table(:index, 2).row_values(4))
+    assert_equal(["R6C2", "R6C3"], browser.table(:index, 2).row_values(5))
+  end
+end
+
+class TC_Tables_Complex < Test::Unit::TestCase
+  def setup
+    uses_page "complex_table.html"
+  end
+  
+  def test_complex_table_access
+    table = browser.table(:index,0)
+    assert_equal("subtable1 Row 1 Col1",table[0][0].table(:index,0)[0][0].text.strip)
+    assert_equal("subtable1 Row 1 Col2",table[0][0].table(:index,0)[0][1].text.strip)
+    assert_equal("subtable2 Row 1 Col2",table[1][0].table(:index,0)[0][1].text.strip)
+    assert_equal("subtable2 Row 1 Col1",table[1][0].table(:index,0)[0][0].text.strip)
+  end
+  
+end