watir-classic 3.0.0

data/unittests/no_wait_test.rb

@@ -0,0 +1,28 @@
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_No_Wait_Commands < Test::Unit::TestCase
+  def test_fire_event_no_wait
+    goto_page "javascriptevents.html"
+    browser.text_field(:index, 0).fire_event_no_wait("onkeyup")
+    assert_nothing_raised{
+      Watir::Wait.until {browser.div(:id, 'event_name').text == 'onkeyup'}
+    }
+  end
+
+  def test_set_no_wait_text_field
+    goto_page "textfields1.html"
+    browser.text_field(:name, "text1").set_no_wait("watir IE Controller")
+    assert_nothing_raised{
+      Watir::Wait.until {browser.text_field(:name, "text1").value == "watir IE Controller"}
+    }
+  end
+
+  def test_select_no_wait_text_select_list
+    goto_page "selectboxes1.html"
+    browser.select_list(:name,'sel1').select_no_wait(/Option 1/)
+    assert_nothing_raised{
+      Watir::Wait.until {browser.select_list(:name , 'sel1').selected_options.first.text == 'Option 1'}
+    }
+  end
+end

data/unittests/non_core_tests.rb

@@ -0,0 +1,12 @@
+TOPDIR = File.join(File.dirname(__FILE__), '..')
+$LOAD_PATH.unshift TOPDIR
+
+require 'unittests/setup.rb'
+
+Dir.chdir TOPDIR
+$all_tests.each {|x| require x}
+
+Watir::UnitTest.filter = proc do |test|
+  test.class.to_s !~ /xpath/i &&
+  test.class.tags.include?(:must_be_visible) 
+end

data/unittests/other/all_tests_concurrent.rb

@@ -0,0 +1,57 @@
+# This is an UNFINISHED attempt to run the unit tests currently.
+# The work on the harness is complete. 
+# The problem remaining is that the tests are not thread-safe.
+# It's an open question whether getting this to work would actually save any execution time.
+
+TOPDIR = File.join(File.dirname(__FILE__), '..')
+$LOAD_PATH.unshift TOPDIR
+Dir.chdir TOPDIR
+#(Dir["unittests/*_test.rb"] - ["unittests/popups_test.rb"]).each {|x| require x}
+
+require 'unittests/buttons_test'
+require 'unittests/checkbox_test'
+
+require 'test/unit/testsuite'
+require 'thread'
+class ConcurrentTestSuite < Test::Unit::TestSuite
+  
+  # Runs the tests and/or suites contained in this TestSuite.
+  def run(result, &progress_block)
+    yield(STARTED, name)
+    threads = []
+    @tests.each do |test|
+      threads << Thread.new do
+        test.run(result, &progress_block)
+      end
+    end
+    threads.each {|t| t.join}
+    yield(FINISHED, name)
+  end
+end
+
+# create a suite
+require 'test/unit/collector/objectspace'
+
+require 'test/unit/collector'
+include Test::Unit::Collector
+
+
+@filters = []
+suite = ConcurrentTestSuite.new('super suite')
+sub_suites = []
+::ObjectSpace.each_object(Class) do |klass|
+  if(Test::Unit::TestCase > klass)
+    puts sub_suites, klass.suite
+    add_suite(sub_suites, klass.suite)
+  end
+end
+sort(sub_suites).each{|s| suite << s}
+
+
+
+# select a runner
+require 'test/unit/ui/console/testrunner'
+Test::Unit::UI::Console::TestRunner.run(suite)
+
+
+# then subclass Test::Unit::TestSuite and override the run method to be multithreaded

data/unittests/other/navigate_exception_test.rb

@@ -0,0 +1,24 @@
+# feature tests for navigation errors
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', '..') unless $SETUP_LOADED
+require 'unittests/setup'
+require 'watir-classic/contrib/page_checker'
+#  To add checkers, call the ie.add_checker method
+#
+#  ie.
+
+class TC_NavigateException < Test::Unit::TestCase
+  include Watir
+  
+  def setup
+    browser.add_checker(PageCheckers::NAVIGATION_CHECKER)
+  end
+  def teardown
+    browser.disable_checker(PageCheckers::NAVIGATION_CHECKER)
+  end
+  
+  def test_http_errors
+    assert_raises(NavigationException) { browser.goto('http://localhost:3001') }        # Cannot find server or DNS Error
+    assert_raises(NavigationException) { browser.goto('http://www.fxruby.org/dfdf' ) }  # HTTP 404 - File not found
+  end
+end

data/unittests/other/rexml_unit_test.rb

@@ -0,0 +1,27 @@
+require 'test/unit'
+require 'nokogiri'
+
+class XPathTest < Test::Unit::TestCase
+  def setup
+    file = File.open( "xpath_bug.xml" )
+    @doc = Nokogiri::HTML::Document.read_io(file, nil, nil, 2145)
+  end
+  def fixture xpath
+    matches = []
+    
+    @doc.xpath(xpath).each() do |node|
+    	matches << node
+    	assert_equal('Add', node.text)
+    	assert_equal('ButtonText', node['class'])
+    end
+    
+    assert_equal(1, matches.length)
+  end  
+  def test_text
+    fixture "//div[text()='Add' and @class='ButtonText']"
+  end
+  def test_contains
+    fixture "//div[contains(.,'Add') and @class='ButtonText']"
+  end
+end
+

data/unittests/other/screen_capture_test.rb

@@ -0,0 +1,53 @@
+# feature tests for screen capture
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+require 'watir-classic/screen_capture'
+
+class TC_Capture< Test::Unit::TestCase
+  tags :must_be_visible
+  include Watir
+  include Watir::ScreenCapture
+  
+  def setup
+    delete_captured_files( [ 'jpeg1.jpg' , 'jpeg2.jpg' , 'bmp1.bmp', 'bmp2.bmp' ] )
+    browser.goto($htmlRoot + 'buttons1.html' )
+    @file_list = []       
+  end
+  
+  def teardown
+    delete_captured_files
+  end
+  
+  def delete_captured_files(files=nil )
+    files = @file_list unless files
+    files.each do |f|
+      File.delete( f) if FileTest.exists?( f)
+    end
+  end
+  
+  def test_jpeg
+    file_name= 'jpeg1.jpg'
+    @file_list << file_name
+    screen_capture( file_name  )
+    assert(FileTest.exist?( file_name) )
+    
+    file_name= 'jpeg2.jpg'
+    @file_list << file_name
+    screen_capture( file_name , true  )   # just the active window
+    assert(FileTest.exist?( file_name) )
+  end
+  
+  def test_bmp
+    file_name= 'bmp1.bmp'
+    @file_list << file_name
+    screen_capture( file_name , false, true )
+    assert(FileTest.exist?( file_name ) )
+    
+    file_name= 'bmp2.bmp'
+    @file_list << file_name
+    screen_capture( file_name , true , true )   # just the active window
+    assert(FileTest.exist?( file_name) ) 
+  end
+end
+

data/unittests/other/testcase_method_order_test.rb

@@ -0,0 +1,36 @@
+# the default behavior of Test::Unit::TestCase should be to execute test 
+# methods in alphabetical order.
+# When executed, should print "A.B.C.D.E.F.G.H.I.J.K.L.F"
+# The final F is actually an expected failure:
+#   1) Failure:
+# default_test(TC4_No_Test_Methods)
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', '..') unless $SETUP_LOADED
+
+require 'watir-classic/testcase'
+
+class TC1_Alphabetical_Default < Watir::TestCase
+  execute :alphabetically
+  def test_b; print 'B'; end 
+  def test_a; print 'A'; end
+  def test_d; print 'D'; end
+  def test_c; print 'C'; end
+end
+
+class TC2_Sequential < Watir::TestCase
+  def test_b; print 'E'; end 
+  def test_a; print 'F'; end
+  def test_d; print 'G'; end
+  def test_c; print 'H'; end
+end
+
+class TC3_Alphabetical_Specified < Watir::TestCase
+  execute :alphabetically
+  def test_b; print 'J'; end 
+  def test_a; print 'I'; end
+  def test_d; print 'L'; end
+  def test_c; print 'K'; end
+end
+
+class TC4_No_Test_Methods < Watir::TestCase
+end

data/unittests/other/testcase_verify_test.rb

@@ -0,0 +1,25 @@
+# 3 tests, 10 assertions, 4 failures, 0 errors
+
+require 'watir-classic/testcase'
+
+class VerifyTests < Watir::TestCase
+  
+  def test_verify
+    verify true
+    assert true
+    verify false
+    assert true
+  end
+  
+  def test_verify_equal
+    verify_equal 1, 1
+    verify_equal 1, 2
+    verify_equal 3, 4
+  end
+  
+  def test_verify_match
+    verify_match /\d*/, '123'
+    verify_match 'foo', 'foobar'
+    verify_match '...', 'A'
+  end
+end

data/unittests/other/wait_until_test.rb

@@ -0,0 +1,102 @@
+# feature tests for wait_until
+#
+# Watir::Waiter is DEPRECATED! Use methods from Watir::Wait and Watir::ElementExtensions instead!
+#
+
+require 'watir-classic/testcase'
+require 'watir-classic/waiter'
+require 'watir-classic'
+require 'spec' # gem install rspec
+
+# used for unit testing
+class MockTimeKeeper < Watir::TimeKeeper
+  def sleep seconds
+    @sleep_time += seconds
+  end
+  def now
+    Time.now + @sleep_time
+  end
+end
+
+class WaitUntilInstanceTest < Watir::TestCase
+  
+  def setup
+    @waiter = Watir::Waiter.new
+    @waiter.timeout = 10.0
+    @mock_checkee = Spec::Mocks::Mock.new "mock_checkee"
+
+    # remove this line to test with actual TimeKeeper intead of the Mock
+    # (slower, but more accurate)
+    @waiter.timer = MockTimeKeeper.new
+  end
+
+  def teardown
+    @mock_checkee.__verify if @test_passed
+  end
+  
+  # Instance Method
+  
+  def test_no_time_passes_if_true
+    @waiter.wait_until {true}
+    @waiter.timer.sleep_time.should_equal 0.0
+  end
+  
+  def test_three_tries_before_true
+    @mock_checkee.should_receive(:check).exactly(3).times.and_return [false, false, true]
+    @waiter.wait_until {@mock_checkee.check}
+    @waiter.timer.sleep_time.should_equal 1.0
+  end        
+  
+  def test_timeout
+    @mock_checkee.should_receive(:check).any_number_of_times.and_return false
+    lambda{@waiter.wait_until {@mock_checkee.check}}.should_raise Watir::Exception::TimeOutException
+    @waiter.timer.sleep_time.should_be_close 10.25, 0.26
+    @waiter.timer.sleep_time.should_satisfy {|x| [10.0, 10.5].include? x}
+  end    
+  
+  def test_polling_interval
+    @waiter.polling_interval = 0.1
+    @mock_checkee.should_receive(:check).any_number_of_times.and_return false
+    lambda{@waiter.wait_until {@mock_checkee.check}}.should_raise Watir::Exception::TimeOutException
+    @waiter.timer.sleep_time.should_be_close 10.05, 0.07
+  end
+
+  def test_timeout_duration
+    @mock_checkee.should_receive(:check).any_number_of_times.and_return false
+    begin
+      @waiter.wait_until {@mock_checkee.check} 
+      flunk
+    rescue Watir::Exception::TimeOutException => e
+      e.duration.should_be_close 10.25, 0.26
+      e.timeout.should_equal 10.0
+    end
+  end
+end
+
+class WaitUntilClassTest < Watir::TestCase
+  
+  def setup
+    @mock_checkee = Spec::Mocks::Mock.new "mock_checkee"
+    @mock_checkee.should_receive(:check).exactly(3).times.and_return [false, false, true]
+  end
+
+  def teardown
+    @mock_checkee.__verify if @test_passed
+  end
+  # Class method
+  
+  def test_class_method_with_args
+    Watir::Waiter.wait_until(5, 0.1) {@mock_checkee.check}
+  end
+  
+  def test_class_method_with_defaults
+    Watir::Waiter.wait_until {@mock_checkee.check}
+  end
+  
+  include Watir
+  def test_watir_classic_method
+    wait_until {@mock_checkee.check}
+  end
+
+end    
+    

data/unittests/pagecontainstext_test.rb

@@ -0,0 +1,69 @@
+# feature tests for IE::contains_text
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_contains_text < Test::Unit::TestCase
+  
+  def setup
+    goto_page "textsearch.html"
+  end        
+  
+  def test_text_found
+    assert(browser.contains_text('slings and arrows of outrageous fortune'))
+  end
+  
+  def test_text_not_found
+    assert_false(browser.contains_text('So are they all, all honourable men'))
+  end
+  
+  def test_regexp_found
+    assert(browser.contains_text(/bodkin.*fardels/))
+  end
+  
+  def test_regexp_not_found
+    assert_false(browser.contains_text(/winding.*watch.*wit/))
+  end
+  
+  def test_match_regexp_found
+    $~ = browser.contains_text(/Messages ([0-9]+)/)
+    assert_equal('42', $1)
+  end
+  
+  def test_bad_search_argument
+    assert_raises(ArgumentError) do
+      browser.contains_text
+    end
+    assert_raises(ArgumentError) do
+      browser.contains_text(nil)
+    end
+    assert_raises(ArgumentError) do
+      browser.contains_text(42)
+    end
+  end
+  
+end
+
+class TC_contains_text_in_new_ie < Test::Unit::TestCase
+  tags :fails_on_firefox
+  # Doesn't actually raise an error, but fails to close the window afterwards
+  # http://jira.openqa.org/browse/WTR-265
+  def setup
+    @new_browser = Watir::Browser.new
+  end
+  def test_nothing_raised
+    assert_nothing_raised {@new_browser.text.include? ''}
+  end
+  def teardown
+    @new_browser.close
+  end
+end
+
+class TC_contains_text_in_frame < Test::Unit::TestCase
+  def setup
+    goto_page "frame_links.html"
+  end        
+  def test_in_frame
+    assert browser.frame(:name => 'linkFrame').contains_text('The button is really a link')
+  end
+end

data/unittests/parent_child_test.rb

@@ -0,0 +1,27 @@
+# feature tests for relative navigation/specification
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_Relative < Test::Unit::TestCase
+  
+  def setup
+    goto_page "depot_store.html"
+    @headline = browser.h3(:text, 'Pragmatic Version Control')
+  end
+    
+  tag_method :test_parent, :fails_on_firefox
+  def test_parent
+    catalog_entry = @headline.parent
+    link = catalog_entry.link(:class, 'addtocart')
+    assert_equal 'http://localhost:3000/store/add_to_cart/12', link.href  
+    assert_nothing_raised{link.click}
+  end
+  
+  tag_method :test_parent_page_container, :fails_on_firefox
+  def test_parent_page_container
+    catalog_entry = @headline.parent
+    assert_not_nil catalog_entry.page_container
+  end
+    
+end