# feature tests for Frames

$LOAD_PATH.unshift File.join(File.dirname(__FILE__), '..') unless $SETUP_LOADED
require 'unittests/setup'

class TC_Frames < Test::Unit::TestCase
  
  def setup
    goto_page("frame_buttons.html")
  end

  tag_method :test_doesnt_exist, :fails_on_firefox, :fails_on_ie # bug WTR-268
  def test_doesnt_exist
    assert_false browser.frame("missingFrame").exists?
  end

  tag_method :test_exists, :fails_on_ie # related to bug WTR-268
  def test_exists
    assert browser.frame('buttonFrame2').exists?
  end
   
  def test_frame_no_what
    assert_raises(UnknownFrameException) { browser.frame("missingFrame").button(:id, "b2").enabled?  }  
    assert_raises(UnknownObjectException) { browser.frame("buttonFrame2").button(:id, "b2").enabled?  }  
    assert(browser.frame("buttonFrame").button(:id, "b2").enabled?)   
    assert_false(browser.frame("buttonFrame").button(:caption, "Disabled Button").enabled?)
  end
  
  def test_frame_using_name
    assert_raises(UnknownFrameException) { browser.frame(:name , "missingFrame").button(:id, "b2").enabled?  }  
    assert_raises(UnknownObjectException) { browser.frame(:name, "buttonFrame2").button(:id, "b2").enabled?  }  
    assert(browser.frame(:name, "buttonFrame").button(:id, "b2").enabled?)   
    assert_false(browser.frame(:name , "buttonFrame").button(:caption, "Disabled Button").enabled?)
  end
  
  def test_frame_using_name_and_regexp
    assert_raises(UnknownFrameException) { browser.frame(:name , /missingFrame/).button(:id, "b2").enabled?  }  
    assert(browser.frame(:name, /button/).button(:id, "b2").enabled?)   
  end
  
  def test_frame_using_index
    assert_raises(UnknownFrameException) { browser.frame(:index, 8).button(:id, "b2").enabled?  }  
    assert_raises(UnknownObjectException) { browser.frame(:index, 2).button(:id, "b2").enabled?  }  
    assert(browser.frame(:index, 1 ).button(:id, "b2").enabled?)   
    assert_false(browser.frame(:index, 1).button(:caption, "Disabled Button").enabled?)
  end
  
#  def test_frame_with_invalid_attribute
#    assert_raises(ArgumentError) { browser.frame(:blah, 'no_such_thing').button(:id, "b2").enabled?  }  
#  end
  
  def test_preset_frame
    # with ruby's instance_eval, we are able to use the same frame for several actions
    results = browser.frame("buttonFrame").instance_eval do [
     button(:id, "b2").enabled?, 
     button(:caption, "Disabled Button").enabled?
     ]
  end
    assert_equal([true, false], results)
  end
  
end

class TC_Frames2 < Test::Unit::TestCase
  
 
  def setup
    goto_page("frame_multi.html")
  end
  
  def test_frame_with_no_name
    assert_raises(UnknownFrameException) { browser.frame(:name , "missingFrame").button(:id, "b2").enabled?  }  
  end            
  
  def test_frame_by_id
    assert_raises(UnknownFrameException) { browser.frame(:id , "missingFrame").button(:id, "b2").enabled?  }  
    assert(browser.frame(:id, 'first_frame').button(:id, "b2").enabled?)
    assert(/.*Test page for buttons.*/ =~ browser.frame(:id, 'first_frame').html)
  end
end

class TC_NestedFrames < Test::Unit::TestCase
  
  
  def setup
    goto_page("nestedFrames.html")
  end
  
  def test_frame
    assert_raises(UnknownFrameException) { browser.frame("missingFrame").button(:id, "b2").enabled?  }  
    assert_raises(UnknownFrameException) { browser.frame("nestedFrame").frame("subFrame").button(:id, "b2").enabled?  }  
    assert(browser.frame("nestedFrame").frame("senderFrame").button(:name, "sendIt").enabled?)   
    browser.frame("nestedFrame").frame("senderFrame").text_field(:index, "1").set("Hello")
    browser.frame("nestedFrame").frame("senderFrame").button(:name, "sendIt").click
    assert(browser.frame("nestedFrame").frame("receiverFrame").text_field(:name, "receiverText").verify_contains("Hello"))   
  end
  
end

class TC_IFrames < Test::Unit::TestCase
  
  
  def setup
    goto_page("iframeTest.html")
  end
  
  def test_Iframe
    f = browser.frame("senderFrame")
    f.text_field(:name, "textToSend").set("Hello World")
    browser.frame("senderFrame").text_field(:name , "textToSend").set( "Hello World")
    browser.frame("senderFrame").button(:index, 1).click
    assert( browser.frame("receiverFrame").text_field(:name , "receiverText").verify_contains("Hello World") )
  end
  
end   

class TC_show_frames < Test::Unit::TestCase
  include CaptureIOHelper
  tags :fails_on_ie
 
  def capture_and_compare(page, expected)
    goto_page(page)
    actual = capture_stdout { browser.showFrames }
    assert_equal(expected, actual)
  end
 
  def test_show_nested_frames
    capture_and_compare("nestedFrames.html", <<END_OF_MESSAGE)
There are 2 frames
frame: name: nestedFrame
      index: 1
frame: name: nestedFrame2
      index: 2
END_OF_MESSAGE
  end
  
  def test_button_frames
    capture_and_compare("frame_buttons.html", <<END_OF_MESSAGE)
There are 2 frames
frame: name: buttonFrame
      index: 1
frame: name: buttonFrame2
      index: 2
END_OF_MESSAGE
  end
 
  def test_iframes
    capture_and_compare("iframeTest.html", <<END_OF_MESSAGE)
There are 2 frames
frame: name: senderFrame
      index: 1
frame: name: receiverFrame
      index: 2
END_OF_MESSAGE
  end
  
end