RubyGems - neocoin-mechanize - Versions diffs - 2.0.2 - Mend

neocoin-mechanize 2.0.2

Files changed (174) hide show

data/.autotest +6 -0
data/.gemtest +0 -0
data/CHANGELOG.rdoc +638 -0
data/EXAMPLES.rdoc +187 -0
data/FAQ.rdoc +11 -0
data/GUIDE.rdoc +163 -0
data/LICENSE.rdoc +20 -0
data/Manifest.txt +172 -0
data/README.rdoc +63 -0
data/Rakefile +36 -0
data/examples/flickr_upload.rb +22 -0
data/examples/mech-dump.rb +5 -0
data/examples/proxy_req.rb +7 -0
data/examples/rubyforge.rb +20 -0
data/examples/spider.rb +21 -0
data/lib/mechanize.rb +662 -0
data/lib/mechanize/content_type_error.rb +14 -0
data/lib/mechanize/cookie.rb +85 -0
data/lib/mechanize/cookie_jar.rb +241 -0
data/lib/mechanize/element_matcher.rb +35 -0
data/lib/mechanize/file.rb +80 -0
data/lib/mechanize/file_connection.rb +17 -0
data/lib/mechanize/file_request.rb +26 -0
data/lib/mechanize/file_response.rb +74 -0
data/lib/mechanize/file_saver.rb +37 -0
data/lib/mechanize/form.rb +478 -0
data/lib/mechanize/form/button.rb +9 -0
data/lib/mechanize/form/check_box.rb +11 -0
data/lib/mechanize/form/field.rb +44 -0
data/lib/mechanize/form/file_upload.rb +23 -0
data/lib/mechanize/form/image_button.rb +20 -0
data/lib/mechanize/form/multi_select_list.rb +83 -0
data/lib/mechanize/form/option.rb +49 -0
data/lib/mechanize/form/radio_button.rb +48 -0
data/lib/mechanize/form/select_list.rb +40 -0
data/lib/mechanize/headers.rb +25 -0
data/lib/mechanize/history.rb +83 -0
data/lib/mechanize/http.rb +3 -0
data/lib/mechanize/http/agent.rb +738 -0
data/lib/mechanize/inspect.rb +88 -0
data/lib/mechanize/monkey_patch.rb +37 -0
data/lib/mechanize/page.rb +408 -0
data/lib/mechanize/page/base.rb +8 -0
data/lib/mechanize/page/frame.rb +27 -0
data/lib/mechanize/page/image.rb +30 -0
data/lib/mechanize/page/label.rb +20 -0
data/lib/mechanize/page/link.rb +82 -0
data/lib/mechanize/page/meta_refresh.rb +56 -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 +19 -0
data/lib/mechanize/response_code_error.rb +22 -0
data/lib/mechanize/response_read_error.rb +27 -0
data/lib/mechanize/robots_disallowed_error.rb +29 -0
data/lib/mechanize/unsupported_scheme_error.rb +8 -0
data/lib/mechanize/util.rb +113 -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 +175 -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/canonical_uri.html +9 -0
data/test/htdocs/dir with spaces/foo.html +1 -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_referer_test.html +10 -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/nofollow.html +9 -0
data/test/htdocs/noindex.html +9 -0
data/test/htdocs/norobots.html +8 -0
data/test/htdocs/rails_3_encoding_hack_form_test.html +27 -0
data/test/htdocs/rel_nofollow.html +8 -0
data/test/htdocs/relative/tc_relative_links.html +21 -0
data/test/htdocs/robots.html +8 -0
data/test/htdocs/robots.txt +2 -0
data/test/htdocs/tc_bad_charset.html +9 -0
data/test/htdocs/tc_bad_links.html +5 -0
data/test/htdocs/tc_base_images.html +10 -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_field_precedence.html +11 -0
data/test/htdocs/tc_follow_meta.html +8 -0
data/test/htdocs/tc_form_action.html +48 -0
data/test/htdocs/tc_images.html +8 -0
data/test/htdocs/tc_links.html +18 -0
data/test/htdocs/tc_meta_in_body.html +9 -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 +16 -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/test_click.html +11 -0
data/test/htdocs/unusual______.html +5 -0
data/test/servlets.rb +402 -0
data/test/ssl_server.rb +48 -0
data/test/test_cookies.rb +129 -0
data/test/test_form_action.rb +52 -0
data/test/test_form_as_hash.rb +59 -0
data/test/test_form_button.rb +46 -0
data/test/test_frames.rb +34 -0
data/test/test_headers.rb +33 -0
data/test/test_history.rb +118 -0
data/test/test_history_added.rb +16 -0
data/test/test_html_unscape_forms.rb +46 -0
data/test/test_if_modified_since.rb +20 -0
data/test/test_images.rb +19 -0
data/test/test_mechanize.rb +842 -0
data/test/test_mechanize_cookie.rb +345 -0
data/test/test_mechanize_cookie_jar.rb +401 -0
data/test/test_mechanize_file.rb +53 -0
data/test/test_mechanize_file_request.rb +19 -0
data/test/test_mechanize_file_response.rb +21 -0
data/test/test_mechanize_form.rb +576 -0
data/test/test_mechanize_form_check_box.rb +37 -0
data/test/test_mechanize_form_encoding.rb +120 -0
data/test/test_mechanize_form_field.rb +21 -0
data/test/test_mechanize_form_image_button.rb +12 -0
data/test/test_mechanize_form_textarea.rb +51 -0
data/test/test_mechanize_http_agent.rb +697 -0
data/test/test_mechanize_link.rb +84 -0
data/test/test_mechanize_page_encoding.rb +147 -0
data/test/test_mechanize_page_link.rb +382 -0
data/test/test_mechanize_page_meta_refresh.rb +115 -0
data/test/test_mechanize_redirect_not_get_or_head_error.rb +18 -0
data/test/test_mechanize_subclass.rb +22 -0
data/test/test_mechanize_util.rb +92 -0
data/test/test_multi_select.rb +118 -0
data/test/test_no_attributes.rb +13 -0
data/test/test_option.rb +18 -0
data/test/test_pluggable_parser.rb +136 -0
data/test/test_post_form.rb +37 -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_referer.rb +81 -0
data/test/test_relative_links.rb +40 -0
data/test/test_request.rb +13 -0
data/test/test_response_code.rb +53 -0
data/test/test_robots.rb +72 -0
data/test/test_save_file.rb +48 -0
data/test/test_scheme.rb +48 -0
data/test/test_select.rb +119 -0
data/test/test_select_all.rb +15 -0
data/test/test_select_none.rb +15 -0
data/test/test_select_noopts.rb +18 -0
data/test/test_set_fields.rb +44 -0
data/test/test_ssl_server.rb +20 -0
metadata +354 -0

data/test/test_mechanize_page_meta_refresh.rb ADDED Viewed

@@ -0,0 +1,115 @@
+require 'helper'
+class TestMechanizePageMetaRefresh < MiniTest::Unit::TestCase
+  def setup
+    @MR = Mechanize::Page::MetaRefresh
+    @agent = Mechanize.new
+    @uri = URI 'http://example/here/'
+  end
+  def util_page delay, uri
+    body = <<-BODY
+<head><meta http-equiv="refresh" content="#{delay};url=#{uri}"></head>
+    BODY
+    Mechanize::Page.new(@uri, { 'content-type' => 'text/html' }, body, 200,
+                        @agent)
+  end
+  def util_meta_refresh page
+    node = page.search('meta').first
+    @MR.from_node node, page, @uri
+  end
+  def test_class_parse
+    delay, uri = @MR.parse "0; url=http://localhost:8080/path", @uri
+    assert_equal "0", delay
+    assert_equal "http://localhost:8080/path", uri.to_s
+    delay, uri = @MR.parse "100.001; url=http://localhost:8080/path", @uri
+    assert_equal "100.001", delay
+    assert_equal "http://localhost:8080/path", uri.to_s
+    delay, uri = @MR.parse "0; url='http://localhost:8080/path'", @uri
+    assert_equal "0", delay
+    assert_equal "http://localhost:8080/path", uri.to_s
+    delay, uri = @MR.parse "0; url=\"http://localhost:8080/path\"", @uri
+    assert_equal "0", delay
+    assert_equal "http://localhost:8080/path", uri.to_s
+    delay, uri = @MR.parse "0; url=", @uri
+    assert_equal "0", delay
+    assert_equal "http://example/here/", uri.to_s
+    delay, uri = @MR.parse "0", @uri
+    assert_equal "0", delay
+    assert_equal "http://example/here/", uri.to_s
+    delay, uri = @MR.parse "   0;   ", @uri
+    assert_equal "0", delay
+    assert_equal "http://example/here/", uri.to_s
+    delay, uri = @MR.parse "0; UrL=http://localhost:8080/path", @uri
+    assert_equal "0", delay
+    assert_equal "http://localhost:8080/path", uri.to_s
+  end
+  def test_class_from_node
+    page = util_page 5, 'http://b.example'
+    link = util_meta_refresh page
+    assert_equal 5, link.delay
+    assert_equal 'http://b.example', link.href
+    page = util_page 5, 'http://example/a'
+    link = util_meta_refresh page
+    assert_equal 5, link.delay
+    assert_equal 'http://example/a', link.href
+    page = util_page 5, 'test'
+    link = util_meta_refresh page
+    assert_equal 5, link.delay
+    assert_equal 'http://example/here/test', link.href
+    page = util_page 5, '/test'
+    link = util_meta_refresh page
+    assert_equal 5, link.delay
+    assert_equal 'http://example/test', link.href
+    page = util_page 5, nil
+    link = util_meta_refresh page
+    assert_equal 5, link.delay
+    assert_equal 'http://example/here/', link.href
+    page = util_page 5, @uri
+    link = util_meta_refresh page
+    assert_equal 5, link.delay
+    assert_equal 'http://example/here/', link.href
+  end
+  def test_class_from_node_no_content
+    body = <<-BODY
+<head><meta http-equiv="refresh"></head>
+    BODY
+    page = Mechanize::Page.new(@uri, { 'content-type' => 'text/html' }, body,
+                               200, @agent)
+    assert_nil util_meta_refresh page
+  end
+  def test_class_from_node_not_refresh
+    body = <<-BODY
+<head><meta http-equiv="other-thing" content="0;"></head>
+    BODY
+    page = Mechanize::Page.new(@uri, { 'content-type' => 'text/html' }, body,
+                               200, @agent)
+    assert_nil util_meta_refresh page
+  end
+end

data/test/test_mechanize_redirect_not_get_or_head_error.rb ADDED Viewed

@@ -0,0 +1,18 @@
+require 'helper'
+class TestMechanizeRedirectNotGetOrHead < MiniTest::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
+end

data/test/test_mechanize_subclass.rb ADDED Viewed

@@ -0,0 +1,22 @@
+require "helper"
+class TestMechanizeSubclass < MiniTest::Unit::TestCase
+  class Parent < Mechanize
+    @html_parser = :parser
+    @log = :log
+  end
+  class Child < Parent
+  end
+  def test_subclass_inherits_html_parser
+    assert_equal :parser, Child.html_parser
+  end
+  def test_subclass_inherits_log
+    assert_equal :log, Child.log
+  end
+end

data/test/test_mechanize_util.rb ADDED Viewed

@@ -0,0 +1,92 @@
+# coding: utf-8
+require 'helper'
+class TestMechanizeUtil < MiniTest::Unit::TestCase
+  INPUTTED_VALUE = "テスト" # "test" in Japanese UTF-8 encoding
+  CONTENT_ENCODING = 'Shift_JIS' # one of Japanese encoding
+  ENCODED_VALUE = "\x83\x65\x83\x58\x83\x67" # "test" in Japanese Shift_JIS encoding
+  if Mechanize::Util::NEW_RUBY_ENCODING
+    ENCODING_ERRORS = [EncodingError, Encoding::ConverterNotFoundError] # and so on
+    ERROR_LOG_MESSAGE = /from_native_charset: Encoding::ConverterNotFoundError: form encoding: "UTF-eight"/
+    ENCODED_VALUE.force_encoding(::Encoding::SHIFT_JIS)
+  else
+    ENCODING_ERRORS = [Iconv::InvalidEncoding, Iconv::IllegalSequence]
+    ERROR_LOG_MESSAGE = /from_native_charset: Iconv::InvalidEncoding: form encoding: "UTF-eight"/
+  end
+  INVALID_ENCODING = 'UTF-eight'
+  def setup
+    @result = "not set"
+  end
+  def test_from_native_charset
+    @result = Mechanize::Util.from_native_charset(INPUTTED_VALUE, CONTENT_ENCODING)
+    assert_equal ENCODED_VALUE, @result
+  end
+  def test_from_native_charset_returns_nil_when_no_string
+    @result = Mechanize::Util.from_native_charset(nil, CONTENT_ENCODING)
+    assert_equal nil, @result
+  end
+  def test_from_native_charset_doesnot_convert_when_no_encoding
+    @result = Mechanize::Util.from_native_charset(INPUTTED_VALUE, nil)
+    refute_equal ENCODED_VALUE, @result
+    assert_equal INPUTTED_VALUE, @result
+  end
+  def test_from_native_charset_doesnot_convert_when_not_nokogiri
+    parser = Mechanize.html_parser
+    Mechanize.html_parser = 'Another HTML Parser'
+    @result = Mechanize::Util.from_native_charset(INPUTTED_VALUE, CONTENT_ENCODING)
+    refute_equal ENCODED_VALUE, @result
+    assert_equal INPUTTED_VALUE, @result
+  ensure
+    Mechanize.html_parser = parser
+  end
+  def test_from_native_charset_raises_error_with_bad_encoding
+    assert_raises(*ENCODING_ERRORS) do
+      Mechanize::Util.from_native_charset(INPUTTED_VALUE, INVALID_ENCODING)
+    end
+  end
+  def test_from_native_charset_suppress_encoding_error_when_3rd_arg_is_true
+    Mechanize::Util.from_native_charset(INPUTTED_VALUE, INVALID_ENCODING, true)
+    # HACK no assertion
+  end
+  def test_from_native_charset_doesnot_convert_when_encoding_error_raised_and_ignored
+    @result = Mechanize::Util.from_native_charset(INPUTTED_VALUE, INVALID_ENCODING, true)
+    refute_equal ENCODED_VALUE, @result
+    assert_equal INPUTTED_VALUE, @result
+  end
+  def test_from_native_charset_logs_form_when_encoding_error_raised
+    sio = StringIO.new
+    log = Logger.new(sio)
+    log.level = Logger::DEBUG
+    assert_raises(*ENCODING_ERRORS) do
+      Mechanize::Util.from_native_charset(INPUTTED_VALUE, INVALID_ENCODING, nil, log)
+    end
+    assert_match ERROR_LOG_MESSAGE, sio.string
+  end
+  def test_from_native_charset_logs_form_when_encoding_error_is_ignored
+    sio = StringIO.new
+    log = Logger.new(sio)
+    log.level = Logger::DEBUG
+    Mechanize::Util.from_native_charset(INPUTTED_VALUE, INVALID_ENCODING, true, log)
+    assert_match ERROR_LOG_MESSAGE, sio.string
+  end
+end

data/test/test_multi_select.rb ADDED Viewed

@@ -0,0 +1,118 @@
+require "helper"
+class MultiSelectTest < MiniTest::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+    @page = @agent.get("http://localhost/form_multi_select.html")
+    @form = @page.forms.first
+  end
+  def test_option_with
+    o = @form.field_with(:name => 'list').option_with(:value => '1')
+    assert_equal '1', o.value
+  end
+  def test_options_with
+    os = @form.field_with(:name => 'list').options_with(:value => /1|2/)
+    assert_equal ['1', '2'].sort, os.map { |x| x.value }.sort
+  end
+  def test_select_none
+    page = @agent.get("http://localhost/form_multi_select.html")
+    form = page.forms.first
+    form.field_with(:name => 'list').select_none
+    page = @agent.submit(form)
+    assert_equal(0, page.links.length)
+  end
+  def test_select_all
+    page = @agent.get("http://localhost/form_multi_select.html")
+    form = page.forms.first
+    form.field_with(:name => 'list').select_all
+    page = @agent.submit(form)
+    assert_equal(6, page.links.length)
+    assert_equal(1, page.links_with(:text => 'list:1').length)
+    assert_equal(1, page.links_with(:text => 'list:2').length)
+    assert_equal(1, page.links_with(:text => 'list:3').length)
+    assert_equal(1, page.links_with(:text => 'list:4').length)
+    assert_equal(1, page.links_with(:text => 'list:5').length)
+    assert_equal(1, page.links_with(:text => 'list:6').length)
+  end
+  def test_click_all
+    page = @agent.get("http://localhost/form_multi_select.html")
+    form = page.forms.first
+    form.field_with(:name => 'list').options.each { |o| o.click }
+    page = @agent.submit(form)
+    assert_equal(5, page.links.length)
+    assert_equal(1, page.links_with(:text => 'list:1').length)
+    assert_equal(1, page.links_with(:text => 'list:3').length)
+    assert_equal(1, page.links_with(:text => 'list:4').length)
+    assert_equal(1, page.links_with(:text => 'list:5').length)
+    assert_equal(1, page.links_with(:text => 'list:6').length)
+  end
+  def test_select_default
+    page = @agent.get("http://localhost/form_multi_select.html")
+    form = page.forms.first
+    page = @agent.submit(form)
+    assert_equal(1, page.links.length)
+    assert_equal(1, page.links_with(:text => 'list:2').length)
+  end
+  def test_select_one
+    page = @agent.get("http://localhost/form_multi_select.html")
+    form = page.forms.first
+    form.list = 'Aaron'
+    assert_equal(['Aaron'], form.list)
+    page = @agent.submit(form)
+    assert_equal(1, page.links.length)
+    assert_equal('list:Aaron', page.links.first.text)
+  end
+  def test_select_two
+    page = @agent.get("http://localhost/form_multi_select.html")
+    form = page.forms.first
+    form.list = ['1', 'Aaron']
+    page = @agent.submit(form)
+    assert_equal(2, page.links.length)
+    assert_equal(1, page.links_with(:text => 'list:1').length)
+    assert_equal(1, page.links_with(:text => 'list:Aaron').length)
+  end
+  def test_select_three
+    page = @agent.get("http://localhost/form_multi_select.html")
+    form = page.forms.first
+    form.list = ['1', '2', '3']
+    page = @agent.submit(form)
+    assert_equal(3, page.links.length)
+    assert_equal(1, page.links_with(:text => 'list:1').length)
+    assert_equal(1, page.links_with(:text => 'list:2').length)
+    assert_equal(1, page.links_with(:text => 'list:3').length)
+  end
+  def test_select_three_twice
+    page = @agent.get("http://localhost/form_multi_select.html")
+    form = page.forms.first
+    form.list = ['1', '2', '3']
+    form.list = ['1', '2', '3']
+    page = @agent.submit(form)
+    assert_equal(3, page.links.length)
+    assert_equal(1, page.links_with(:text => 'list:1').length)
+    assert_equal(1, page.links_with(:text => 'list:2').length)
+    assert_equal(1, page.links_with(:text => 'list:3').length)
+  end
+  def test_select_with_click
+    page = @agent.get("http://localhost/form_multi_select.html")
+    form = page.forms.first
+    form.list = ['1', 'Aaron']
+    form.field_with(:name => 'list').options[3].tick
+    assert_equal(['1', 'Aaron', '4'].sort, form.list.sort)
+    page = @agent.submit(form)
+    assert_equal(3, page.links.length)
+    assert_equal(1, page.links_with(:text => 'list:1').length)
+    assert_equal(1, page.links_with(:text => 'list:Aaron').length)
+    assert_equal(1, page.links_with(:text => 'list:4').length)
+  end
+end

data/test/test_no_attributes.rb ADDED Viewed

@@ -0,0 +1,13 @@
+require "helper"
+class TestNoAttributes < MiniTest::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+  end
+  def test_parse_no_attributes
+    @agent.get('http://localhost/tc_no_attributes.html')
+    # HACK no assertions
+  end
+end

data/test/test_option.rb ADDED Viewed

@@ -0,0 +1,18 @@
+require "helper"
+class OptionTest < MiniTest::Unit::TestCase
+  class FakeAttribute < Hash
+    attr_reader :inner_text
+    def initialize(inner_text)
+      @inner_text = inner_text
+    end
+    alias :has_attribute? :has_key?
+    alias :attributes :keys
+  end
+  def test_option_missing_value
+    attribute = FakeAttribute.new('blah')
+    option = Mechanize::Form::Option.new(attribute, nil)
+    assert_equal('blah', option.value)
+  end
+end

data/test/test_pluggable_parser.rb ADDED Viewed

@@ -0,0 +1,136 @@
+require "helper"
+class PluggableParserTest < MiniTest::Unit::TestCase
+  def setup
+    @agent = Mechanize.new
+  end
+  def test_content_type_error
+    page = @agent.get("http://localhost/bad_content_type")
+    e = assert_raises Mechanize::ContentTypeError do
+      page = Mechanize::Page.new(page.uri,
+                                 page.response,
+                                 page.body,
+                                 page.code)
+    end
+    assert_equal('text/xml', e.content_type)
+  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_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_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