diamond-mechanize 2.1

data/test/test_mechanize_form_check_box.rb

@@ -0,0 +1,38 @@
+require 'mechanize/test_case'
+
+class TestMechanizeFormCheckBox < Mechanize::TestCase
+
+  def setup
+    super
+
+    @page = @mech.get('http://localhost/tc_checkboxes.html')
+  end
+
+  def test_check
+    form = @page.forms.first
+
+    form.checkbox_with(:name => 'green').check
+
+    assert(form.checkbox_with(:name => 'green').checked)
+
+    %w{ red blue yellow brown }.each do |color|
+      assert_equal(false, form.checkbox_with(:name => color).checked)
+    end
+  end
+
+  def test_uncheck
+    form = @page.forms.first
+
+    checkbox = form.checkbox_with(:name => 'green')
+
+    checkbox.check
+
+    assert form.checkbox_with(:name => 'green').checked
+
+    checkbox.uncheck
+
+    assert !form.checkbox_with(:name => 'green').checked
+  end
+
+end
+

data/test/test_mechanize_form_encoding.rb

@@ -0,0 +1,114 @@
+# coding: utf-8
+require 'mechanize/test_case'
+
+class TestMechanizeFormEncoding < Mechanize::TestCase
+
+  # See also: tests of Util.from_native_charset
+  # Encoding test should do with non-utf-8 characters
+
+  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
+  encoded_value.force_encoding(::Encoding::SHIFT_JIS) if encoded_value.respond_to?(:force_encoding)
+  EXPECTED_QUERY = "first_name=#{CGI.escape(encoded_value)}&first_name=&gender=&green%5Beggs%5D="
+
+  if Mechanize::Util::NEW_RUBY_ENCODING
+    ENCODING_ERRORS = [EncodingError, Encoding::ConverterNotFoundError] # and so on
+  else
+    ENCODING_ERRORS = [Iconv::InvalidEncoding, Iconv::IllegalSequence]
+  end
+
+  ENCODING_LOG_MESSAGE = /INFO -- : form encoding: Shift_JIS/
+  INVALID_ENCODING = 'UTF-eight'
+
+  def set_form_with_encoding(enc)
+    page = @mech.get("http://localhost/form_set_fields.html")
+    form = page.forms.first
+    form.encoding = enc
+    form['first_name'] = INPUTTED_VALUE
+    form
+  end
+
+  def test_form_encoding_returns_accept_charset
+    page = @mech.get("http://localhost/rails_3_encoding_hack_form_test.html")
+    form = page.forms.first
+    accept_charset = form.form_node['accept-charset']
+
+    assert accept_charset
+    assert_equal accept_charset, form.encoding
+    refute_equal page.encoding, form.encoding
+  end
+
+  def test_form_encoding_returns_page_encoding_when_no_accept_charset
+    page = @mech.get("http://localhost/form_set_fields.html")
+    form = page.forms.first
+    accept_charset = form.form_node['accept-charset']
+
+    assert_nil accept_charset
+    refute_equal accept_charset, form.encoding
+    assert_equal page.encoding, form.encoding
+  end
+
+  def test_form_encoding_equals_sets_new_encoding
+    page = @mech.get("http://localhost/form_set_fields.html")
+    form = page.forms.first
+
+    refute_equal CONTENT_ENCODING, form.encoding
+
+    form.encoding = CONTENT_ENCODING
+
+    assert_equal CONTENT_ENCODING, form.encoding
+  end
+
+  def test_form_encoding_returns_nil_when_no_page_in_initialize
+    # this sequence is seen at Mechanize#post(url, query_hash)
+
+    node = {}
+    # Create a fake form
+    class << node
+      def search(*args); []; end
+    end
+    node['method'] = 'POST'
+    node['enctype'] = 'application/x-www-form-urlencoded'
+    form = Mechanize::Form.new(node)
+
+    assert_equal nil, form.encoding
+  end
+
+  def test_post_form_with_form_encoding
+    form = set_form_with_encoding CONTENT_ENCODING
+    form.submit
+
+    # we can not use "links.find{|l| l.text == 'key:val'}" assertion here
+    # because the link text encoding is always UTF-8 regaredless of html encoding
+    assert EXPECTED_QUERY, @mech.page.at('div#query').inner_text
+  end
+
+  def test_post_form_with_problematic_encoding
+    form = set_form_with_encoding INVALID_ENCODING
+
+    assert_raises(*ENCODING_ERRORS){ form.submit }
+  end
+
+  def test_form_ignore_encoding_error_is_true
+    form = set_form_with_encoding INVALID_ENCODING
+    form.ignore_encoding_error = true
+
+    form.submit
+
+    # HACK no assertions
+  end
+
+  def test_post_form_logs_form_encoding
+    sio = StringIO.new
+    @mech.log = Logger.new(sio)
+    @mech.log.level = Logger::INFO
+
+    form = set_form_with_encoding CONTENT_ENCODING
+    form.submit
+
+    assert_match ENCODING_LOG_MESSAGE, sio.string
+
+    @mech.log = nil
+  end
+end

data/test/test_mechanize_form_field.rb

@@ -0,0 +1,63 @@
+require 'mechanize/test_case'
+
+class TestMechanizeFormField < Mechanize::TestCase
+
+  def test_name
+    field = node 'input', 'name' => 'a&b'
+    field = Mechanize::Form::Field.new field
+
+    assert_equal 'a&b', field.name
+  end
+
+  def test_name_entity
+    field = node 'input', 'name' => 'a&amp;b'
+    field = Mechanize::Form::Field.new field
+
+    assert_equal 'a&b', field.name
+  end
+
+  def test_name_entity_numeric
+    field = node 'input', 'name' => 'a&#38;b'
+    field = Mechanize::Form::Field.new field
+
+    assert_equal 'a&b', field.name
+  end
+
+  def test_spaceship
+    doc = Nokogiri::HTML::Document.new
+    node = doc.create_element('input')
+    node['name'] = 'foo'
+    node['value'] = 'bar'
+
+    a = Mechanize::Form::Field.new(node)
+    b = Mechanize::Form::Field.new({'name' => 'foo'}, 'bar')
+    c = Mechanize::Form::Field.new({'name' => 'foo'}, 'bar')
+
+    assert_equal [a, b], [a, b].sort
+    assert_equal [a, b], [b, a].sort
+    assert_equal [b, c].sort, [b, c].sort
+  end
+
+  def test_value
+    field = node 'input'
+    field = Mechanize::Form::Field.new field, 'a&b'
+
+    assert_equal 'a&b', field.value
+  end
+
+  def test_value_entity
+    field = node 'input'
+    field = Mechanize::Form::Field.new field, 'a&amp;b'
+
+    assert_equal 'a&b', field.value
+  end
+
+  def test_value_entity_numeric
+    field = node 'input'
+    field = Mechanize::Form::Field.new field, 'a&#38;b'
+
+    assert_equal 'a&b', field.value
+  end
+
+end
+

data/test/test_mechanize_form_file_upload.rb

@@ -0,0 +1,20 @@
+require 'mechanize/test_case'
+
+class TestMechanizeFormFileUpload < Mechanize::TestCase
+
+  def test_file_name
+    field = node 'input'
+    field = Mechanize::Form::FileUpload.new field, 'a&b'
+
+    assert_equal 'a&b', field.file_name
+  end
+
+  def test_file_name_entity
+    field = node 'input'
+    field = Mechanize::Form::FileUpload.new field, 'a&amp;b'
+
+    assert_equal 'a&b', field.file_name
+  end
+
+end
+

data/test/test_mechanize_form_image_button.rb

@@ -0,0 +1,12 @@
+require 'mechanize/test_case'
+
+class TestMechanizeFormImageButton < Mechanize::TestCase
+
+  def test_query_value
+    button = Mechanize::Form::ImageButton.new 'name' => 'image_button'
+
+    assert_equal [%w[image_button.x 0], %w[image_button.y 0]],
+                 button.query_value
+  end
+end
+

data/test/test_mechanize_form_keygen.rb

@@ -0,0 +1,32 @@
+require 'mechanize/test_case'
+
+class TestMechanizeFormKeygen < Mechanize::TestCase
+
+  def setup
+    super
+
+    keygen = node('keygen',
+                  'name' => 'userkey',
+                  'challenge' => 'f4832e1d200df3df8c5c859edcabe52f')
+
+    @keygen = Mechanize::Form::Keygen.new keygen
+  end
+
+  def test_challenge
+    assert_equal "f4832e1d200df3df8c5c859edcabe52f", @keygen.challenge
+  end
+
+  def test_key
+    assert @keygen.key.kind_of?(OpenSSL::PKey::PKey), "Not an OpenSSL key"
+    assert @keygen.key.private?, "Not a private key"
+  end
+
+  def test_spki_signature
+    spki = OpenSSL::Netscape::SPKI.new @keygen.value
+    assert_equal @keygen.challenge, spki.challenge
+    assert_equal @keygen.key.public_key.to_pem, spki.public_key.to_pem
+    assert spki.verify(@keygen.key.public_key)
+  end
+
+end
+

data/test/test_mechanize_form_multi_select_list.rb

@@ -0,0 +1,84 @@
+require 'mechanize/test_case'
+
+class TestMechanizeFormMultiSelectList < Mechanize::TestCase
+
+  def setup
+    super
+
+    page = html_page <<-BODY
+<form name="form1" method="post" action="/form_post">
+  <select name="select" multiple>
+    <option value="1">Option 1</option>
+    <option value="2" selected>Option 2</option>
+    <option value="3">Option 3</option>
+    <option value="4">Option 4</option>
+    <option value="5">Option 5</option>
+    <option value="6">Option 6</option>
+  </select>
+</form>
+    BODY
+
+    form = page.forms.first
+    @select = form.fields.first
+  end
+
+  def test_option_with
+    option = @select.option_with :value => '1'
+
+    assert_equal '1', option.value
+  end
+
+  def test_options_with
+    options = @select.options_with :value => /[12]/
+
+    assert_equal 2, options.length
+  end
+
+  def test_query_value
+    assert_equal [%w[select 2]], @select.query_value
+
+    @select.options.last.click
+
+    assert_equal [%w[select 2], %w[select 6]], @select.query_value
+  end
+
+  def test_query_value_empty
+    @select.options.last.click
+    @select.options.last.instance_variable_set :@value, ''
+
+    assert_equal [%w[select 2], ['select', '']], @select.query_value
+  end
+
+  def test_select_all
+    @select.select_all
+
+    assert_equal %w[1 2 3 4 5 6], @select.value
+  end
+
+  def test_select_none
+    @select.select_none
+
+    assert_empty @select.value
+  end
+
+  def test_selected_options
+    assert_equal [@select.options[1]], @select.selected_options
+
+    @select.options.last.click
+
+    assert_equal [@select.options[1], @select.options.last],
+      @select.selected_options
+  end
+
+  def test_value
+    assert_equal %w[2], @select.value
+  end
+
+  def test_value_equals
+    @select.value = %w[a 1 2]
+
+    assert_equal %w[a 1 2], @select.value
+  end
+
+end
+

data/test/test_mechanize_form_option.rb

@@ -0,0 +1,55 @@
+require 'mechanize/test_case'
+
+class TestMechanizeFormOption < Mechanize::TestCase
+
+  def setup
+    super
+
+    page = html_page <<-BODY
+<form name="form1" method="post" action="/form_post">
+  <select name="select">
+    <option value="1">Option 1</option>
+    <option value="2" selected>Option 2</option>
+  </select>
+</form>
+    BODY
+
+    form = page.forms.first
+    @select = form.fields.first
+    @option1 = @select.options.first
+    @option2 = @select.options.last
+  end
+
+  def test_value_missing_value
+    option = node 'option'
+    option.inner_html = 'blah'
+    option = Mechanize::Form::Option.new option, nil
+
+    assert_equal 'blah', option.value
+  end
+
+  def test_click
+    @option1.click
+
+    assert @option1.selected?
+  end
+
+  def test_select
+    @option1.select
+
+    assert @option1.selected?
+  end
+
+  def test_unselect
+    @option2.unselect
+
+    refute @option2.selected?
+  end
+
+  def test_selected_eh
+    refute @option1.selected?
+    assert @option2.selected?
+  end
+
+end
+

data/test/test_mechanize_form_radio_button.rb

@@ -0,0 +1,78 @@
+require 'mechanize/test_case'
+
+class TestMechanizeFormRadioButton < Mechanize::TestCase
+
+  def setup
+    super
+
+    @page = html_page <<-BODY
+<form name="form1" method="post" action="/form_post">
+  <label for="blue">Blue</label>
+  <input type="radio" name="color" value="blue" id="blue">
+  <input type="radio" name="color" value="brown">
+  <input type="radio" name="color" value="green">
+  <input type="radio" name="color" value="red">
+  <input type="radio" name="color" value="yellow">
+
+  <input type="submit" value="Submit">
+</form>
+    BODY
+
+    @form = @page.forms.first
+
+    @blue   = @form.radiobutton_with :value => 'blue'
+    @brown  = @form.radiobutton_with :value => 'brown'
+    @green  = @form.radiobutton_with :value => 'green'
+    @red    = @form.radiobutton_with :value => 'red'
+    @yellow = @form.radiobutton_with :value => 'yellow'
+  end
+  
+  def test_check
+    @blue.check
+
+    assert @blue.checked?
+    refute @brown.checked?
+    refute @green.checked?
+    refute @red.checked?
+    refute @yellow.checked?
+  end
+
+  def test_check_multiple
+    @blue.check
+    @brown.check
+
+    refute @blue.checked?
+    assert @brown.checked?
+    refute @green.checked?
+    refute @red.checked?
+    refute @yellow.checked?
+  end
+
+  def test_click
+    @blue.click
+
+    assert @blue.checked?
+
+    @blue.click
+
+    refute @blue.checked?
+  end
+
+  def test_label
+    assert_equal 'Blue', @blue.label.text
+  end
+
+  def test_uncheck
+    @blue.check
+
+    @blue.uncheck
+
+    refute @blue.checked?
+    refute @brown.checked?
+    refute @green.checked?
+    refute @red.checked?
+    refute @yellow.checked?
+  end
+
+end
+