watir-classic 3.0.0

data/unittests/textfields_xpath_test.rb

@@ -0,0 +1,110 @@
+# feature tests for Text Fields
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_Fields_XPath < Test::Unit::TestCase
+  include Watir::Exception
+  
+  def setup
+    goto_page "textfields1.html"
+  end
+  
+  def test_text_field_exists
+    assert(browser.text_field(:xpath , "//input[@name='text1']/").exists?)   
+    assert_false(browser.text_field(:xpath , "//input[@name='missing']/").exists?)   
+    
+    assert(browser.text_field(:xpath , "//input[@id='text2']/").exists?)   
+    assert_false(browser.text_field(:xpath , "//input[@id='alsomissing']/").exists?)   
+    
+    #assert(browser.text_field(:xpath , "//input[@beforeText='This Text After']/").exists? )
+    #assert(browser.text_field(:xpath , "//input[@afterText='This Text Before']/").exists? )
+  end
+  
+  def test_text_field_dragContentsTo
+    browser.text_field(:xpath , "//input[@name='text1']/").dragContentsTo(:xpath , "//input[@id='text2']/")
+    assert_equal(browser.text_field(:xpath , "//input[@name='text1']/").value, "" ) 
+    assert_equal(browser.text_field(:xpath , "//input[@id='text2']/").value, "goodbye allHello World" ) 
+  end
+  
+  def test_text_field_VerifyContents
+    assert(browser.text_field(:xpath , "//input[@name='text1']/").verify_contains("Hello World") )  
+    assert(browser.text_field(:xpath , "//input[@name='text1']/").verify_contains(/Hello\sW/ ) )  
+    assert_false(browser.text_field(:xpath , "//input[@name='text1']/").verify_contains("Ruby") )  
+    assert_false(browser.text_field(:xpath , "//input[@name='text1']/").verify_contains(/R/) )  
+    assert_raises(UnknownObjectException) {   browser.text_field(:xpath , "//input[@name='NoName']/").verify_contains("No field to get a value of") }  
+    
+    assert(browser.text_field(:xpath , "//input[@id='text2']/").verify_contains("goodbye all") )  
+    assert_raises(UnknownObjectException) {   browser.text_field(:xpath , "//input[@id='noID']/").verify_contains("No field to get a value of") }  
+  end
+  
+  def test_text_field_enabled
+    assert_false(browser.text_field(:xpath , "//input[@name='disabled']/").enabled? )  
+    assert(browser.text_field(:xpath , "//input[@name='text1']/").enabled? )  
+    assert(browser.text_field(:xpath , "//input[@id='text2']/").enabled? )  
+  end
+  
+  def test_text_field_readOnly
+    assert_false(browser.text_field(:xpath , "//input[@name='disabled']/").readonly? )  
+    assert(browser.text_field(:xpath , "//input[@name='readOnly']/").readonly? )  
+    assert(browser.text_field(:xpath , "//input[@id='readOnly2']/").readonly? )  
+  end
+  
+  def test_text_field_value
+    assert_raises(UnknownObjectException  , "ObjectReadOnlyException   was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@name='missing_field']/").append("Some Text") }  
+    assert_equal(  "Hello World" , browser.text_field(:xpath , "//input[@name='text1']/").value )  
+  end
+  
+  def build_to_s_regex(lhs, rhs)
+    Regexp.new("^#{lhs}: +#{rhs}$")
+  end
+  
+  def test_text_field_Append
+    assert_raises(ObjectReadOnlyException  , "ObjectReadOnlyException   was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@id='readOnly2']/").append("Some Text") }  
+    assert_raises(ObjectDisabledException   , "ObjectDisabledException   was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@name='disabled']/").append("Some Text") }  
+    assert_raises(UnknownObjectException  , "UnknownObjectException  was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@name='missing_field']/").append("Some Text") }  
+    
+    browser.text_field(:xpath , "//input[@name='text1']/").append(" Some Text")
+    assert_equal(  "Hello World Some Text" , browser.text_field(:xpath , "//input[@name='text1']/").value )  
+  end
+  
+  
+  def test_text_field_Clear
+    assert_raises(ObjectReadOnlyException  , "ObjectReadOnlyException   was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@id='readOnly2']/").append("Some Text") }  
+    assert_raises(ObjectDisabledException   , "ObjectReadOnlyException   was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@name='disabled']/").append("Some Text") }  
+    assert_raises(UnknownObjectException  , "ObjectReadOnlyException   was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@name='missing_field']/").append("Some Text") }  
+    
+    browser.text_field(:xpath , "//input[@name='text1']/").clear
+    assert_equal(  "" , browser.text_field(:xpath , "//input[@name='text1']/").value )  
+  end
+  
+  def test_text_field_Set
+    assert_raises(ObjectReadOnlyException  , "ObjectReadOnlyException   was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@id='readOnly2']/").append("Some Text") }  
+    assert_raises(ObjectDisabledException   , "ObjectReadOnlyException   was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@name='disabled']/").append("Some Text") }  
+    assert_raises(UnknownObjectException  , "ObjectReadOnlyException   was supposed to be thrown" ) {   browser.text_field(:xpath , "//input[@name='missing_field']/").append("Some Text") }  
+    
+    browser.text_field(:xpath , "//input[@name='text1']/").set("watir IE Controller")
+    assert_equal(  "watir IE Controller" , browser.text_field(:xpath , "//input[@name='text1']/").value )  
+  end
+  
+  def test_JS_Events
+    browser.text_field(:xpath , "//input[@name='events_tester']/").set('p')
+    
+    # the following line has an extra keypress at the begining, as we mimic the delete key being pressed
+    assert_equal( "keypresskeydownkeypresskeyup" , browser.text_field(:xpath , "//textarea[@name='events_text']/").value.gsub(/(\n|\r)/ , "")  )
+    browser.button(:value , "Clear Events Box").click
+    browser.text_field(:xpath , "//input[@name='events_tester']/").set('ab')
+    
+    # the following line has an extra keypress at the begining, as we mimic the delete key being pressed
+    assert_equal( "keypresskeydownkeypresskeyupkeydownkeypresskeyup" , browser.text_field(:xpath , "//textarea[@name='events_text']/").value.gsub(/(\n|\r)/, "") )
+  end
+  
+  def test_password
+    browser.text_field(:xpath , "//input[@name='password1']/").set("secret")
+    assert( 'secret' , browser.text_field(:xpath , "//input[@name='password1']/").value )
+    
+    browser.text_field(:xpath , "//input[@id='password1']/").set("top_secret")
+    assert( 'top_secret' , browser.text_field(:xpath , "//input[@id='password1']/").value )
+  end
+  
+end

data/unittests/version_test.rb

@@ -0,0 +1,15 @@
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_Version < Test::Unit::TestCase
+
+  def test_full_version
+    assert !Watir::IE.version.nil?
+  end
+
+  def test_version_part
+    assert Watir::IE.version_parts[0] =~ /^\d+$/
+  end
+
+end

data/unittests/win32ole_so_test.rb

@@ -0,0 +1,35 @@
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..')
+require 'Win32API'
+require 'unittests/setup'
+
+# This test makes sure that the win32ole changes will return
+# the dom using GetUnknown, which is added via the win32ole patch
+class TC_Win32OLE < Test::Unit::TestCase
+
+  def setup
+    # this will find the IEDialog.dll file in its build location
+    @iedialog_file = (File.expand_path(File.dirname(__FILE__)) + "/../lib/watir-classic/IEDialog/Release/IEDialog.dll").gsub('/', '\\')
+
+    @ie = Watir::IE.new
+    @ie.goto 'www.google.com'
+  end
+
+  def teardown
+    @ie.close
+  end
+
+  def test_win32ole_modifications
+    fnGetUnknown = Win32API.new(@iedialog_file, 'GetUnknown', ['p', 'p'], 'v')
+    intPointer = " " * 4 # will contain the int value of the IUnknown*
+    fnGetUnknown.call(@ie.hwnd, intPointer)
+    assert_true intPointer
+    intArray = intPointer.unpack('L')
+    intUnknown = intArray.first
+    htmlDoc = WIN32OLE.connect_unknown(intUnknown);
+    scriptEngine = htmlDoc.Script
+
+    # now we get the HTML DOM object!
+    body =  scriptEngine.document.body
+    assert(body.innerHTML =~ /html/)
+  end
+end

data/unittests/window_tests.rb

@@ -0,0 +1,10 @@
+TOPDIR = File.join(File.dirname(__FILE__), '..')
+$LOAD_PATH.unshift TOPDIR
+
+ENV['watir_visible'] = 'true'
+
+require 'unittests/setup.rb'
+
+Dir.chdir TOPDIR
+$window_tests.each {|x| require x}
+

data/unittests/windows/attach_to_existing_window_test.rb

@@ -0,0 +1,52 @@
+# feature tests for attaching to existing IE windows
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_ExistingWindow < Test::Unit::TestCase
+  include Watir
+
+  def setup
+    goto_page 'buttons1.html'
+    @original_timeout = IE.attach_timeout
+  end
+  def teardown
+    IE.attach_timeout = @original_timeout
+  end
+
+  def test_find_window
+    ie = IE.find(:title, 'Test page for buttons')
+    assert_equal("Test page for buttons", ie.title)
+  end
+  
+  def test_find_window_misses
+    ie = IE.find(:title, 'no such window')
+    assert_nil ie
+  end
+
+  def test_missing_window
+    IE.attach_timeout = 0.1
+    assert_raises(NoMatchingWindowFoundException) { IE.attach(:title, "missing") }
+    assert_raises(NoMatchingWindowFoundException) { IE.attach(:title, /missing/) }
+    assert_raises(NoMatchingWindowFoundException) { IE.attach(:url, "missing") }
+    assert_raises(NoMatchingWindowFoundException) { IE.attach(:url, /missing/) }
+  end    
+  
+  def test_existing_window
+    ie3 = nil
+    ie3 = IE.attach(:title , /buttons/i)
+    assert_equal("Test page for buttons", ie3.title)
+    ie3 = nil
+    
+    ie3 = IE.attach(:title , "Test page for buttons")
+    assert_equal("Test page for buttons", ie3.title)
+    ie3 = nil
+    
+    ie3 = IE.attach(:url, /buttons1.html/)
+    assert_equal("Test page for buttons", ie3.title)
+    ie3 = nil
+    
+    #hard to test :url with explicit text
+  end
+end
+

data/unittests/windows/attach_to_new_window_test.rb

@@ -0,0 +1,74 @@
+# feature tests for attaching to new IE windows
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', '..') unless $SETUP_LOADED
+require 'unittests/setup'
+require 'watir-classic/testcase'
+
+class TC_NewWindow< Watir::TestCase
+  include Watir
+  
+  def setup
+    @original_timeout = IE.attach_timeout
+    goto_page "new_browser.html"
+  end
+  def teardown
+    IE.attach_timeout = @original_timeout
+  end
+  
+  def test_simply_attach_to_new_window
+    IE.attach_timeout = 0.2
+    browser.link(:text, 'New Window').click
+    ie_new = IE.attach(:title, 'Pass Page')
+    assert(ie_new.text.include?('PASS'))
+    ie_new.close
+  end
+  
+  def test_attach_to_new_window_using_click_no_wait
+    # this test is sometimes failing with a "Canvas does not allow drawing" error
+    # this is with IE7. I think the problem could be with the highlighting of the
+    # button from the separate process.
+    browser.link(:text, 'New Window').click_no_wait
+    IE.attach_timeout = 6.0
+    ie_new = IE.attach(:title, 'Pass Page')
+    assert(ie_new.text.include?('PASS'))
+    ie_new.close
+  end
+  
+  def test_click_no_wait_works_in_a_container
+    browser.p(:index, 0).link(:text, 'New Window').click_no_wait
+    IE.attach_timeout = 6.0
+    ie_new = IE.attach(:title, 'Pass Page')
+    assert(ie_new.text.include?('PASS'))
+    ie_new.close
+  end
+  
+  def test_attach_to_slow_window_works_with_delay
+    browser.span(:text, 'New Window Slowly').click
+    IE.attach_timeout = 4.0
+    sleep 1.0
+    ie_new = IE.attach(:title, 'Test page for buttons')
+    assert(ie_new.text.include?('Blank page to fill in the frames'))
+    ie_new.close
+  end    
+  
+  def test_attach_to_slow_window_works_without_waiting
+    browser.span(:text, 'New Window Slowly').click
+    IE.attach_timeout = 3.0
+    ie_new = IE.attach(:title, 'Test page for buttons')
+    assert(ie_new.text.include?('Blank page to fill in the frames'))
+    ie_new.close
+  end    
+  
+  def test_attach_timesout_when_window_takes_too_long
+    IE.attach_timeout = 0.2
+    browser.text_field(:name, 'delay').set('2')
+    browser.span(:text, 'New Window Slowly').click
+    assert_raise(Watir::Exception::NoMatchingWindowFoundException) do
+      IE.attach(:title, 'Test page for buttons')
+    end
+    sleep 2.0 # clean up
+    IE.attach_timeout = 6.0
+    IE.attach(:title, 'Test page for buttons').close
+  end        
+  
+end

data/unittests/windows/close_window_test.rb

@@ -0,0 +1,20 @@
+# feature tests for closed windows
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_CloseWindow < Watir::TestCase
+  execute :sequentially
+  
+  def setup
+    goto_page "new_browser.html"
+  end
+  
+  # reproduces defect http://jira.openqa.org/browse/WTR-16
+  def test_close_window_with_button
+    browser.link(:text, 'New Window').click
+    ie_new = Watir::IE.attach(:title, 'Pass Page')
+    assert(ie_new.text.include?('PASS'))
+    assert_nothing_raised {ie_new.close}
+  end
+end

data/unittests/windows/frame_links_test.rb

@@ -0,0 +1,23 @@
+# tests of click_no_wait for links in frames
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', '..') unless $SETUP_LOADED
+require 'unittests/setup'
+
+class TC_Frame_Links < Test::Unit::TestCase
+  
+  def setup
+    goto_page "frame_links.html"
+  end
+  
+  def test_click_in_a_frame
+    browser.frame(:name, 'linkFrame').link(:text, 'test1').click
+    assert(browser.frame(:name, 'linkFrame').text.include?('Links2-Pass'))
+  end
+  
+  def test_click_no_wait_in_a_frame
+    browser.frame(:name, 'linkFrame').link(:text, 'test1').click_no_wait
+    Watir::Wait.until(10){browser.frame(:name, 'linkFrame').text.include?('Links2-Pass')}
+    assert(browser.frame(:name, 'linkFrame').text.include?('Links2-Pass'))
+  end  
+  
+end

data/unittests/windows/ie-each_test.rb

@@ -0,0 +1,46 @@
+# Not intended to be run as part of a larger suite.
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', '..') unless $SETUP_LOADED
+require 'test/unit'
+require 'watir-classic'
+require 'watir-classic/process'
+
+class TC_IE_Each < Test::Unit::TestCase  
+  def setup
+    assert_equal 0, Watir::IE.process_count
+    @hits = 0
+    @ie = []
+  end
+  
+  def hit_me
+    @hits += 1
+  end
+
+  def test_zero_windows
+    Watir::IE.each {hit_me}    
+    assert_equal 0, @hits
+  end
+  
+  def test_one_window
+    @ie << Watir::IE.new_process
+    Watir::IE.each {hit_me}    
+    assert_equal 1, @hits
+  end
+  
+  def test_two_windows
+    @ie << Watir::IE.new_process
+    @ie << Watir::IE.new_process
+    Watir::IE.each {hit_me}    
+    assert_equal 2, @hits
+  end
+  
+  def test_return_type
+    @ie << Watir::IE.new_process
+    Watir::IE.each {|ie| assert_equal(Watir::IE, ie.class)}    
+  end
+  
+  def teardown
+    @ie.each {|ie| ie.close }
+    Watir::Wait.until {Watir::IE.process_count == 0}
+  end
+end

data/unittests/windows/modal_dialog_test.rb

@@ -0,0 +1,95 @@
+# feature tests for modal web dialog support
+
+$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..', '..') unless $SETUP_LOADED
+require 'unittests/setup'
+require 'watir-classic/close_all'
+
+class TC_ModalDialog < Watir::TestCase
+  include Watir
+  
+  def setup
+    @original_timeout = IE.attach_timeout
+    goto_page 'modal_dialog_launcher.html'
+    IE.attach_timeout = 10.0
+  end
+
+  def teardown
+    if browser
+      while browser.modal_dialog.exists?(0) do
+        browser.modal_dialog.close
+        sleep 0.5
+      end
+    end
+  end
+
+
+  def test_modal_simple_use_case
+    browser.button(:value, 'Launch Dialog').click_no_wait
+    modal = browser.modal_dialog
+
+    assert(modal.text.include?('Enter some text:'))
+    modal.text_field(:name, 'modal_text').set('hello')
+    modal.button(:value, 'Close').click
+    assert_equal('hello', browser.text_field(:name, 'modaloutput').value)
+  end
+
+  def test_wait_should_not_block
+    browser.button(:value, 'Launch Dialog').click_no_wait
+    modal = browser.modal_dialog
+
+    modal.text_field(:name, 'modal_text').set('hello')
+    modal.wait
+
+    modal.button(:value, 'Close').click
+  end
+
+  def test_modal_dialog_use_case_default
+    browser.button(:value, 'Launch Dialog').click_no_wait
+
+    modal = browser.modal_dialog
+    assert_not_nil modal
+
+    # Make sure that we have attached to modal and that the hwnd method
+    # is working properly to show the HWND of our parent.
+    assert_not_equal(browser.hwnd, modal.hwnd)
+
+    # Once attached just treat the modal_dialog like any IE or Frame
+    # object.
+    assert(modal.text.include?('Enter some text:'))
+    modal.text_field(:name, 'modal_text').set('hello')
+    modal.button(:value, 'Close').click
+
+    assert !browser.modal_dialog.exists?
+    assert_equal('hello', browser.text_field(:name, 'modaloutput').value)
+  end
+
+  def test_double_modal
+    browser.button(:value, 'Launch Dialog').click_no_wait
+    browser.modal_dialog.button(:text, 'Another Modal').click_no_wait
+    assert_nothing_raised {
+      Watir::Wait.until {browser.modal_dialog.title == 'Pass Page'}
+    }
+    browser.modal_dialog.close
+    browser.modal_dialog.close
+  end
+
+  def xtest_modal_with_frames
+    browser.button(:value, 'Launch Dialog').click_no_wait
+    modal1 = browser.modal_dialog
+    modal1.button(:value, 'Modal with Frames').click_no_wait
+    modal2 = browser.modal_dialog
+    modal2.frame('buttonFrame').button(:value, 'Click Me').click
+    assert(modal2.frame('buttonFrame').text.include?('PASS'))
+    modal2.frame('buttonFrame').button(:value, 'Close Window').click
+    modal1.close
+  end
+
+  def test_modal_exists
+    browser.button(:value, 'Launch Dialog').click_no_wait
+    modal = browser.modal_dialog
+    assert(modal.exists?)
+    modal.button(:value, 'Close').click
+    assert_false(modal.exists?)
+  end
+
+end