RubyGems - kitamomonga-mechanize - Versions diffs - 0.9.3.20090724215219 - Mend

kitamomonga-mechanize 0.9.3.20090724215219

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.

Files changed (177) hide show

data/CHANGELOG.rdoc +504 -0
data/EXAMPLES.rdoc +171 -0
data/FAQ.rdoc +11 -0
data/GUIDE.rdoc +122 -0
data/LICENSE.rdoc +340 -0
data/Manifest.txt +176 -0
data/README.rdoc +60 -0
data/Rakefile +33 -0
data/examples/flickr_upload.rb +23 -0
data/examples/mech-dump.rb +7 -0
data/examples/proxy_req.rb +9 -0
data/examples/rubyforge.rb +21 -0
data/examples/spider.rb +11 -0
data/lib/mechanize.rb +666 -0
data/lib/mechanize/chain.rb +34 -0
data/lib/mechanize/chain/auth_headers.rb +78 -0
data/lib/mechanize/chain/body_decoding_handler.rb +46 -0
data/lib/mechanize/chain/connection_resolver.rb +76 -0
data/lib/mechanize/chain/custom_headers.rb +21 -0
data/lib/mechanize/chain/handler.rb +9 -0
data/lib/mechanize/chain/header_resolver.rb +51 -0
data/lib/mechanize/chain/parameter_resolver.rb +22 -0
data/lib/mechanize/chain/post_connect_hook.rb +0 -0
data/lib/mechanize/chain/post_page_hook.rb +18 -0
data/lib/mechanize/chain/pre_connect_hook.rb +20 -0
data/lib/mechanize/chain/request_resolver.rb +30 -0
data/lib/mechanize/chain/response_body_parser.rb +38 -0
data/lib/mechanize/chain/response_header_handler.rb +48 -0
data/lib/mechanize/chain/response_reader.rb +39 -0
data/lib/mechanize/chain/ssl_resolver.rb +40 -0
data/lib/mechanize/chain/uri_resolver.rb +75 -0
data/lib/mechanize/content_type_error.rb +14 -0
data/lib/mechanize/cookie.rb +70 -0
data/lib/mechanize/cookie_jar.rb +188 -0
data/lib/mechanize/file.rb +71 -0
data/lib/mechanize/file_response.rb +60 -0
data/lib/mechanize/file_saver.rb +37 -0
data/lib/mechanize/form.rb +364 -0
data/lib/mechanize/form/button.rb +7 -0
data/lib/mechanize/form/check_box.rb +11 -0
data/lib/mechanize/form/field.rb +26 -0
data/lib/mechanize/form/file_upload.rb +22 -0
data/lib/mechanize/form/image_button.rb +21 -0
data/lib/mechanize/form/multi_select_list.rb +67 -0
data/lib/mechanize/form/option.rb +49 -0
data/lib/mechanize/form/radio_button.rb +36 -0
data/lib/mechanize/form/select_list.rb +43 -0
data/lib/mechanize/headers.rb +11 -0
data/lib/mechanize/history.rb +65 -0
data/lib/mechanize/inspect.rb +88 -0
data/lib/mechanize/monkey_patch.rb +35 -0
data/lib/mechanize/page.rb +279 -0
data/lib/mechanize/page/base.rb +8 -0
data/lib/mechanize/page/encoding.rb +61 -0
data/lib/mechanize/page/frame.rb +20 -0
data/lib/mechanize/page/link.rb +53 -0
data/lib/mechanize/page/meta.rb +50 -0
data/lib/mechanize/pluggable_parsers.rb +101 -0
data/lib/mechanize/redirect_limit_reached_error.rb +16 -0
data/lib/mechanize/redirect_not_get_or_head_error.rb +18 -0
data/lib/mechanize/response_code_error.rb +22 -0
data/lib/mechanize/unsupported_scheme_error.rb +8 -0
data/lib/mechanize/util.rb +73 -0
data/test/chain/test_argument_validator.rb +14 -0
data/test/chain/test_auth_headers.rb +25 -0
data/test/chain/test_custom_headers.rb +18 -0
data/test/chain/test_header_resolver.rb +28 -0
data/test/chain/test_parameter_resolver.rb +35 -0
data/test/chain/test_request_resolver.rb +29 -0
data/test/chain/test_response_reader.rb +24 -0
data/test/data/htpasswd +1 -0
data/test/data/server.crt +16 -0
data/test/data/server.csr +12 -0
data/test/data/server.key +15 -0
data/test/data/server.pem +15 -0
data/test/helper.rb +129 -0
data/test/htdocs/alt_text.html +10 -0
data/test/htdocs/bad_form_test.html +9 -0
data/test/htdocs/button.jpg +0 -0
data/test/htdocs/empty_form.html +6 -0
data/test/htdocs/file_upload.html +26 -0
data/test/htdocs/find_link.html +41 -0
data/test/htdocs/form_multi_select.html +16 -0
data/test/htdocs/form_multival.html +37 -0
data/test/htdocs/form_no_action.html +18 -0
data/test/htdocs/form_no_input_name.html +16 -0
data/test/htdocs/form_select.html +16 -0
data/test/htdocs/form_select_all.html +16 -0
data/test/htdocs/form_select_none.html +17 -0
data/test/htdocs/form_select_noopts.html +10 -0
data/test/htdocs/form_set_fields.html +14 -0
data/test/htdocs/form_test.html +188 -0
data/test/htdocs/frame_test.html +30 -0
data/test/htdocs/google.html +13 -0
data/test/htdocs/iframe_test.html +16 -0
data/test/htdocs/index.html +6 -0
data/test/htdocs/link with space.html +5 -0
data/test/htdocs/meta_cookie.html +11 -0
data/test/htdocs/no_title_test.html +6 -0
data/test/htdocs/relative/tc_relative_links.html +21 -0
data/test/htdocs/tc_bad_charset.html +9 -0
data/test/htdocs/tc_bad_links.html +5 -0
data/test/htdocs/tc_base_link.html +8 -0
data/test/htdocs/tc_blank_form.html +11 -0
data/test/htdocs/tc_charset.html +6 -0
data/test/htdocs/tc_checkboxes.html +19 -0
data/test/htdocs/tc_encoded_links.html +5 -0
data/test/htdocs/tc_follow_meta.html +8 -0
data/test/htdocs/tc_form_action.html +48 -0
data/test/htdocs/tc_links.html +19 -0
data/test/htdocs/tc_no_attributes.html +16 -0
data/test/htdocs/tc_pretty_print.html +17 -0
data/test/htdocs/tc_radiobuttons.html +17 -0
data/test/htdocs/tc_referer.html +10 -0
data/test/htdocs/tc_relative_links.html +19 -0
data/test/htdocs/tc_textarea.html +23 -0
data/test/htdocs/test_bad_encoding.html +52 -0
data/test/htdocs/unusual______.html +5 -0
data/test/servlets.rb +365 -0
data/test/ssl_server.rb +48 -0
data/test/test_authenticate.rb +71 -0
data/test/test_bad_links.rb +25 -0
data/test/test_blank_form.rb +16 -0
data/test/test_checkboxes.rb +61 -0
data/test/test_content_type.rb +13 -0
data/test/test_cookie_class.rb +338 -0
data/test/test_cookie_jar.rb +362 -0
data/test/test_cookies.rb +123 -0
data/test/test_encoded_links.rb +20 -0
data/test/test_errors.rb +49 -0
data/test/test_follow_meta.rb +108 -0
data/test/test_form_action.rb +52 -0
data/test/test_form_as_hash.rb +61 -0
data/test/test_form_button.rb +38 -0
data/test/test_form_no_inputname.rb +15 -0
data/test/test_forms.rb +577 -0
data/test/test_frames.rb +25 -0
data/test/test_get_headers.rb +73 -0
data/test/test_gzipping.rb +22 -0
data/test/test_hash_api.rb +45 -0
data/test/test_history.rb +142 -0
data/test/test_history_added.rb +16 -0
data/test/test_html_unscape_forms.rb +39 -0
data/test/test_if_modified_since.rb +20 -0
data/test/test_keep_alive.rb +31 -0
data/test/test_links.rb +127 -0
data/test/test_mech.rb +289 -0
data/test/test_mechanize_file.rb +72 -0
data/test/test_meta.rb +65 -0
data/test/test_multi_select.rb +106 -0
data/test/test_no_attributes.rb +13 -0
data/test/test_option.rb +18 -0
data/test/test_page.rb +127 -0
data/test/test_page_encoding.rb +298 -0
data/test/test_pluggable_parser.rb +145 -0
data/test/test_post_form.rb +34 -0
data/test/test_pretty_print.rb +22 -0
data/test/test_radiobutton.rb +75 -0
data/test/test_redirect_limit_reached.rb +39 -0
data/test/test_redirect_verb_handling.rb +43 -0
data/test/test_referer.rb +39 -0
data/test/test_relative_links.rb +40 -0
data/test/test_request.rb +13 -0
data/test/test_response_code.rb +52 -0
data/test/test_save_file.rb +103 -0
data/test/test_scheme.rb +63 -0
data/test/test_select.rb +106 -0
data/test/test_select_all.rb +15 -0
data/test/test_select_none.rb +15 -0
data/test/test_select_noopts.rb +16 -0
data/test/test_set_fields.rb +44 -0
data/test/test_ssl_server.rb +20 -0
data/test/test_subclass.rb +14 -0
data/test/test_textarea.rb +45 -0
data/test/test_upload.rb +109 -0
data/test/test_verbs.rb +25 -0
metadata +320 -0

data/test/test_pluggable_parser.rb ADDED Viewed

@@ -0,0 +1,145 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "helper"))
+class PluggableParserTest < Test::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+  end
+  def test_content_type_error
+    page = @agent.get("http://localhost/bad_content_type")
+    assert_raise(Mechanize::ContentTypeError) {
+      page = Mechanize::Page.new(
+                                      page.uri,
+                                      page.response,
+                                      page.body,
+                                      page.code
+                                     )
+    }
+    begin
+      page = Mechanize::Page.new(
+                                      page.uri,
+                                      page.response,
+                                      page.body,
+                                      page.code
+                                     )
+    rescue Mechanize::ContentTypeError => ex
+      assert_equal('text/xml', ex.content_type)
+    end
+  end
+  def test_content_type
+    page = @agent.get("http://localhost/content_type_test")
+    assert_kind_of(Mechanize::Page, page)
+  end
+  class Filter < Mechanize::Page
+    def initialize(uri=nil, response=nil, body=nil, code=nil)
+      super(  uri,
+            response,
+            body.gsub(/<body>/, '<body><a href="http://daapclient.rubyforge.org">Net::DAAP::Client</a>'),
+            code
+           )
+    end
+  end
+  class FileFilter < Mechanize::File
+    def initialize(uri=nil, response=nil, body=nil, code=nil)
+      super(  uri,
+            response,
+            body.gsub(/<body>/, '<body><a href="http://daapclient.rubyforge.org">Net::DAAP::Client</a>'),
+            code
+           )
+    end
+  end
+  def test_filter
+    @agent.pluggable_parser.html = Filter
+    page = @agent.get("http://localhost/find_link.html")
+    assert_kind_of(Filter, page)
+    assert_equal(19, page.links.length)
+    assert_not_nil(page.link_with(:text => 'Net::DAAP::Client'))
+    assert_equal(1, page.links_with(:text => 'Net::DAAP::Client').length)
+  end
+  def test_filter_hash
+    @agent.pluggable_parser['text/html'] = Filter
+    page = @agent.get("http://localhost/find_link.html")
+    assert_kind_of(Class, @agent.pluggable_parser['text/html'])
+    assert_equal(Filter, @agent.pluggable_parser['text/html'])
+    assert_kind_of(Filter, page)
+    assert_equal(19, page.links.length)
+    assert_not_nil(page.link_with(:text => 'Net::DAAP::Client'))
+    assert_equal(1, page.links_with(:text => 'Net::DAAP::Client').length)
+  end
+  def test_file_saver
+    @agent.pluggable_parser.html = Mechanize::FileSaver
+    page = @agent.get('http://localhost:2000/form_no_action.html')
+    length = page.response['Content-Length']
+    file_length = nil
+    File.open("localhost/form_no_action.html", "r") { |f|
+      file_length = f.read.length
+    }
+    FileUtils.rm_rf("localhost")
+    assert_equal(length.to_i, file_length)
+  end
+  def test_content_type_pdf
+    @agent.pluggable_parser.pdf = FileFilter
+    page = @agent.get("http://localhost/content_type_test?ct=application/pdf")
+    assert_kind_of(Class, @agent.pluggable_parser['application/pdf'])
+    assert_equal(FileFilter, @agent.pluggable_parser['application/pdf'])
+    assert_kind_of(FileFilter, page)
+  end
+  def test_content_type_csv
+    @agent.pluggable_parser.csv = FileFilter
+    page = @agent.get("http://localhost/content_type_test?ct=text/csv")
+    assert_kind_of(Class, @agent.pluggable_parser['text/csv'])
+    assert_equal(FileFilter, @agent.pluggable_parser['text/csv'])
+    assert_kind_of(FileFilter, page)
+  end
+  def test_content_type_xml
+    @agent.pluggable_parser.xml = FileFilter
+    page = @agent.get("http://localhost/content_type_test?ct=text/xml")
+    assert_kind_of(Class, @agent.pluggable_parser['text/xml'])
+    assert_equal(FileFilter, @agent.pluggable_parser['text/xml'])
+    assert_kind_of(FileFilter, page)
+  end
+  def test_file_saver_no_path
+    url = URI::HTTP.new('http', nil, 'example.com', nil, nil, '', nil, nil, nil)
+    fs = Mechanize::FileSaver.new(url, nil, 'hello world', 200)
+    assert_equal('example.com/index.html', fs.filename)
+    FileUtils.rm_rf('example.com')
+  end
+  def test_file_saver_slash
+    url = URI::HTTP.new('http', nil, 'example.com', nil, nil, '/', nil, nil, nil)
+    fs = Mechanize::FileSaver.new(url, nil, 'hello world', 200)
+    assert_equal('example.com/index.html', fs.filename)
+    FileUtils.rm_rf('example.com')
+  end
+  def test_file_saver_slash_file
+    url = URI::HTTP.new('http', nil, 'example.com', nil, nil, '/foo.html', nil, nil, nil)
+    fs = Mechanize::FileSaver.new(url, nil, 'hello world', 200)
+    assert_equal('example.com/foo.html', fs.filename)
+    FileUtils.rm_rf('example.com')
+  end
+  def test_file_saver_long_path_no_file
+    url = URI::HTTP.new('http', nil, 'example.com', nil, nil, '/one/two/', nil, nil, nil)
+    fs = Mechanize::FileSaver.new(url, nil, 'hello world', 200)
+    assert_equal('example.com/one/two/index.html', fs.filename)
+    FileUtils.rm_rf('example.com')
+  end
+  def test_file_saver_long_path
+    url = URI::HTTP.new('http', nil, 'example.com', nil, nil, '/one/two/foo.html', nil, nil, nil)
+    fs = Mechanize::FileSaver.new(url, nil, 'hello world', 200)
+    assert_equal('example.com/one/two/foo.html', fs.filename)
+    FileUtils.rm_rf('example.com')
+  end
+end

data/test/test_post_form.rb ADDED Viewed

@@ -0,0 +1,34 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "helper"))
+class PostForm < Test::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+  end
+  def test_post_form
+    page = @agent.post("http://localhost/form_post",
+                        'gender' => 'female'
+                      )
+    assert_not_nil(
+      page.links.find { |l| l.text == "gender:female" },
+      "gender field missing"
+    )
+  end
+  def test_post_form_multival
+    page = @agent.post("http://localhost/form_post",
+                       [ ['gender', 'female'],
+                         ['gender', 'male']
+                       ]
+                      )
+    assert_not_nil(
+      page.links.find { |l| l.text == "gender:female" },
+      "gender field missing"
+    )
+    assert_not_nil(
+      page.links.find { |l| l.text == "gender:male" },
+      "gender field missing"
+    )
+    assert_equal(2, page.links.length)
+  end
+end

data/test/test_pretty_print.rb ADDED Viewed

@@ -0,0 +1,22 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "helper"))
+class TestPrettyPrint < Test::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+  end
+  def test_pretty_print
+    @agent.get("http://localhost/tc_pretty_print.html")
+    pretty_string = @agent.pretty_print_inspect
+    assert_match("{title \"tc_pretty_print.html\"}", pretty_string)
+    assert_match(/\{frames[^"]*"http:\/\/meme/, pretty_string)
+    assert_match(/\{iframes[^"]*"http:\/\/meme/, pretty_string)
+    assert_match(
+     "{links #<Mechanize::Page::Link \"Google\" \"http://google.com/\">}",
+     pretty_string
+                )
+    assert_match("form1", pretty_string)
+    assert_match("POST", pretty_string)
+    assert_match("{file_uploads}", pretty_string)
+  end
+end

data/test/test_radiobutton.rb ADDED Viewed

@@ -0,0 +1,75 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "helper"))
+class TestRadioButtons < Test::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+    @page  = @agent.get("http://localhost/tc_radiobuttons.html")
+  end
+  def test_select_all
+    form = @page.forms.first
+    form.radiobuttons_with(:name => 'color').each do |b|
+      b.check
+    end
+    form.radiobutton_with(:name => 'color', :value => 'green').check
+    assert_equal(true, form.radiobutton_with( :name => 'color',
+                                              :value => 'green').checked)
+    %w{ red blue yellow brown }.each do |button_value|
+      assert_equal(false, form.radiobutton_with(  :name => 'color',
+                                                  :value => button_value
+                                               ).checked)
+    end
+  end
+  def test_unselect_all
+    form = @page.forms.first
+    form.radiobuttons_with(:name => 'color').each do |b|
+      b.uncheck
+    end
+    %w{ green red blue yellow brown }.each do |button_value|
+      assert_equal(false, form.radiobutton_with(  :name => 'color',
+                                                  :value => button_value
+                                               ).checked)
+    end
+  end
+  def test_click_one
+    form = @page.forms.first
+    form.radiobutton_with(:name => 'color', :value => 'green').click
+    assert form.radiobutton_with(:name => 'color', :value => 'green').checked
+    %w{ red blue yellow brown }.each do |button_value|
+      assert_equal(false, form.radiobutton_with(  :name => 'color',
+                                                  :value => button_value
+                                               ).checked)
+    end
+  end
+  def test_click_twice
+    form = @page.forms.first
+    form.radiobutton_with(:name => 'color', :value => 'green').click
+    assert form.radiobutton_with(:name => 'color', :value => 'green').checked
+    form.radiobutton_with(:name => 'color', :value => 'green').click
+    %w{ green red blue yellow brown }.each do |button_value|
+      assert_equal(false, form.radiobutton_with(  :name => 'color',
+                                                  :value => button_value
+                                               ).checked)
+    end
+  end
+  def test_click_all
+    form = @page.forms.first
+    form.radiobuttons_with(:name => 'color').each do |button|
+      button.click
+    end
+    c = form.radiobuttons_with(:name => 'color').inject(0) do |m,button|
+      m += 1 if button.checked
+      m
+    end
+    assert_equal 1, c, 'Only one radio button should be checked'
+  end
+end

data/test/test_redirect_limit_reached.rb ADDED Viewed

@@ -0,0 +1,39 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "helper"))
+class TestRedirectLimitReached < Test::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+  end
+  def test_to_s
+    page = MechTestHelper.fake_page(@agent)
+    error = Mechanize::RedirectLimitReachedError.new(page, 10)
+    assert_match(/10/, error.to_s)
+  end
+  def test_get_default_redirects
+    assert_raises(Mechanize::RedirectLimitReachedError) {
+      begin
+        @agent.get('http://localhost/infinite_redirect')
+      rescue Mechanize::RedirectLimitReachedError => ex
+        assert_equal(@agent.redirection_limit, ex.redirects)
+        assert_equal("q=#{@agent.redirection_limit}", ex.page.uri.query)
+        raise ex
+      end
+    }
+  end
+  def test_get_2_redirects
+    @agent.redirection_limit = 2
+    assert_raises(Mechanize::RedirectLimitReachedError) {
+      begin
+        @agent.get('http://localhost/infinite_redirect')
+      rescue Mechanize::RedirectLimitReachedError => ex
+        assert_equal(2, ex.redirects)
+        assert_equal(@agent.redirection_limit, ex.redirects)
+        assert_equal("q=#{@agent.redirection_limit}", ex.page.uri.query)
+        raise ex
+      end
+    }
+  end
+end

data/test/test_redirect_verb_handling.rb ADDED Viewed

@@ -0,0 +1,43 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "helper"))
+class TestRedirectNotGetOrHead < Test::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+  end
+  def test_to_s
+    page = MechTestHelper.fake_page(@agent)
+    error = Mechanize::RedirectNotGetOrHeadError.new(page, :put)
+    assert_match(/put/, error.to_s)
+  end
+  def test_head_redirect_results_in_head_request
+    page = @agent.head('http://localhost/redirect')
+    assert_equal(page.uri.to_s, 'http://localhost/verb')
+    assert_equal(page.body, "method: HEAD")
+  end
+  def test_get_redirect_results_in_get_request
+    page = @agent.get('http://localhost/redirect')
+    assert_equal(page.uri.to_s, 'http://localhost/verb')
+    assert_equal(page.body, "method: GET")
+  end
+  def test_post_redirect_results_in_get_request
+    page = @agent.post('http://localhost/redirect')
+    assert_equal(page.uri.to_s, 'http://localhost/verb')
+    assert_equal(page.body, "method: GET")
+  end
+  def test_put_redirect_results_in_get_request
+    page = @agent.put('http://localhost/redirect', 'foo')
+    assert_equal(page.uri.to_s, 'http://localhost/verb')
+    assert_equal(page.body, "method: GET")
+  end
+  def test_delete_redirect_results_in_get_request
+    page = @agent.delete('http://localhost/redirect')
+    assert_equal(page.uri.to_s, 'http://localhost/verb')
+    assert_equal(page.body, "method: GET")
+  end
+end

data/test/test_referer.rb ADDED Viewed

@@ -0,0 +1,39 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "helper"))
+class RefererTest < Test::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+  end
+  def test_no_referer
+    page = @agent.get("http://localhost/referer")
+    assert_equal('', page.body)
+  end
+  def test_send_referer
+    page = @agent.get("http://localhost/tc_referer.html")
+    page = @agent.click page.links.first
+    assert_equal("http://localhost/tc_referer.html", page.body)
+  end
+  def test_fetch_two
+    page1 = @agent.get("http://localhost/tc_referer.html")
+    page2 = @agent.get("http://localhost/tc_pretty_print.html")
+    page = @agent.click page1.links.first
+    assert_equal("http://localhost/tc_referer.html", page.body)
+  end
+  def test_fetch_two_first
+    page1 = @agent.get("http://localhost/tc_referer.html")
+    page2 = @agent.get("http://localhost/tc_pretty_print.html")
+    page = @agent.click page1.links.first
+    assert_equal("http://localhost/tc_referer.html", page.body)
+  end
+  def test_post_form
+    page1 = @agent.get("http://localhost/tc_referer.html")
+    page2 = @agent.get("http://localhost/tc_pretty_print.html")
+    page = @agent.submit page1.forms.first
+    assert_equal("http://localhost/tc_referer.html", page.body)
+  end
+end

data/test/test_relative_links.rb ADDED Viewed

@@ -0,0 +1,40 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "helper"))
+class TestRelativeLinks < Test::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+  end
+  def test_dot_dot_slash
+    @page = @agent.get("http://localhost/relative/tc_relative_links.html")
+    page = @page.links.first.click
+    assert_equal('http://localhost/tc_relative_links.html', @agent.current_page.uri.to_s)
+  end
+  def test_too_many_dots
+    @page = @agent.get("http://localhost/relative/tc_relative_links.html")
+    page = @page.link_with(:text => 'too many dots').click
+    assert_not_nil(page)
+    assert_equal('http://localhost/tc_relative_links.html', page.uri.to_s)
+  end
+  def test_go_forward
+    @page = @agent.get("http://localhost/tc_relative_links.html")
+    @page = @page.links.first.click
+    assert_equal('http://localhost/relative/tc_relative_links.html', @agent.current_page.uri.to_s)
+  end
+  def test_frame_dot_dot_slash
+    @page = @agent.get("http://localhost/relative/tc_relative_links.html")
+    page = @agent.click(@page.frame_with(:text => 'frame1'))
+    assert_equal('http://localhost/tc_relative_links.html', @agent.current_page.uri.to_s)
+  end
+  def test_frame_forward_back_forward
+    @page = @agent.get("http://localhost/tc_relative_links.html")
+    page1 = @agent.click @page.frame_with(:name => 'frame1')
+    assert_equal('http://localhost/relative/tc_relative_links.html', @agent.current_page.uri.to_s)
+    page2 = @agent.click @page.frame_with(:name => 'frame2')
+    assert_equal('http://localhost/relative/tc_relative_links.html', @agent.current_page.uri.to_s)
+  end
+end