tenderlove-nokogiri 0.0.0-x86-mswin32-60

data/test/hpricot/files/why.xml

@@ -0,0 +1,19 @@
+<?xml version='1.0'?><rss xmlns:admin='http://webns.net/mvcb/' version='2.0' xmlns:sy='http://purl.org/rss/1.0/modules/syndication/' xmlns:dc='http://purl.org/dc/elements/1.1/' xmlns:rdf='http://www.w3.org/1999/02/22-rdf-syntax-ns#'>
+    <channel>
+    <title>why the lucky stiff</title>
+    <link>http://whytheluckystiff.net</link>
+    <description>hex-editing reality to give us infinite grenades!!</description>
+    <dc:language>en-us</dc:language>
+    <dc:creator/>
+    <dc:date>2007-01-16T22:39:04+00:00</dc:date>
+    <admin:generatorAgent rdf:resource='http://hobix.com/?v=0.4'/>
+    <sy:updatePeriod>hourly</sy:updatePeriod>
+    <sy:updateFrequency>1</sy:updateFrequency>
+    <sy:updateBase>2000-01-01T12:00+00:00</sy:updateBase>
+    <item><title>1.3</title><link>http://whytheluckystiff.net/quatrains/1.3.html</link><guid isPermaLink='false'>quatrains/1.3@http://whytheluckystiff.net</guid><dc:subject>quatrains</dc:subject><dc:subject>quatrains</dc:subject><dc:creator>why the lucky stiff</dc:creator><dc:date>2007-01-14T08:47:05+00:00</dc:date><description>&lt;blockquote&gt;
+	&lt;p&gt;That cadillac of yours and that driver of yours!&lt;br /&gt;You and your teacups rattling away in the back seat!&lt;br /&gt;You always took the mike, oh, and all those cowboys you shot!&lt;br /&gt;I held your hand! And I&amp;#8217;ll shoot a cowboy one day!&lt;/p&gt;
+	&lt;/blockquote&gt;
+	&lt;blockquote&gt;
+	&lt;p&gt;You said, &amp;#8220;Let&amp;#8217;s run into the woods like kids!&amp;#8221; &lt;br /&gt;You said, &amp;#8220;Let&amp;#8217;s rub our hands together super-hot!&amp;#8221; &lt;br /&gt;And we scalded the trees and left octagons, I think that was you and&lt;br /&gt;You threw parties on the roof!&lt;/p&gt;
+	&lt;/blockquote&gt;</description></item></channel>
+</rss>

data/test/hpricot/load_files.rb

@@ -0,0 +1,7 @@
+module TestFiles
+    Dir.chdir(File.dirname(__FILE__)) do
+        Dir['files/*.{html,xhtml,xml}'].each do |fname|
+            const_set fname[%r!/(\w+)\.\w+$!, 1].upcase, IO.read(fname)
+        end
+    end
+end

data/test/hpricot/test_alter.rb

@@ -0,0 +1,67 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', "helper"))
+require File.join(File.dirname(__FILE__),"load_files")
+
+class TestAlter < Nokogiri::TestCase
+  include Nokogiri
+
+  def setup
+    @basic = Hpricot.parse(TestFiles::BASIC)
+  end
+  
+  def test_before
+    test0 = "<link rel='stylesheet' href='test0.css' />"
+    @basic.at("link").before(test0)
+    assert_equal 'test0.css', @basic.at("link").attributes['href']
+  end
+
+  def test_after
+    test_inf = "<link rel='stylesheet' href='test_inf.css' />"
+    @basic.search("link")[-1].after(test_inf)
+    assert_equal 'test_inf.css', @basic.search("link")[-1].attributes['href']
+  end
+
+  def test_wrap
+    ohmy = (@basic/"p.ohmy").wrap("<div id='wrapper'></div>")
+    assert_equal 'wrapper', ohmy[0].parent['id']
+    assert_equal 'ohmy', Nokogiri.Hpricot(@basic.to_html).at("#wrapper").children[0]['class']
+  end
+  
+  def test_add_class
+    first_p = (@basic/"p:first").add_class("testing123")
+    assert first_p[0].get_attribute("class").split(" ").include?("testing123")
+    assert((Nokogiri.Hpricot(@basic.to_html)/"p:first")[0].attributes["class"].split(" ").include?("testing123"))
+    ####
+    # Modified.  We do not support OB1 bug.
+    assert !(Nokogiri.Hpricot(@basic.to_html)/"p:gt(1)")[0].attributes["class"].split(" ").include?("testing123")
+  end
+  
+  def test_change_attributes
+    all_ps = (@basic/"p").attr("title", "Some Title")
+    all_as = (@basic/"a").attr("href", "http://my_new_href.com")
+    all_lb = (@basic/"link").attr("href") { |e| e.name }
+    GC.start # try to shake out GC bugs with xpath and node sets.
+    assert_changed(@basic, "p", all_ps) {|p| p.attributes["title"] == "Some Title"}
+    assert_changed(@basic, "a", all_as) {|a| a.attributes["href"] == "http://my_new_href.com"}
+    assert_changed(@basic, "link", all_lb) {|a| a.attributes["href"] == "link" }
+  end
+  
+  def test_remove_attr
+    all_rl = (@basic/"link").remove_attr("href")
+    assert_changed(@basic, "link", all_rl) { |link| link['href'].nil? }
+  end
+
+  def test_remove_class
+    all_c1 = (@basic/"p[@class*='last']").remove_class("last")
+    assert_changed(@basic, "p[@class*='last']", all_c1) { |p| p['class'] == 'final' }
+  end
+
+  def test_remove_all_classes
+    all_c2 = (@basic/"p[@class]").remove_class
+    assert_changed(@basic, "p[@class]", all_c2) { |p| p['class'].nil? }
+  end
+
+  def assert_changed original, selector, set, &block
+    assert set.all?(&block)
+    assert Nokogiri.Hpricot(original.to_html).search(selector).all?(&block)
+  end
+end

data/test/hpricot/test_builder.rb

@@ -0,0 +1,27 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', "helper"))
+
+class TestBuilder < Nokogiri::TestCase
+  ####
+  # Modified
+  def test_escaping_text
+    doc = Nokogiri.Hpricot() { b "<a\"b>" }
+    assert_equal "<b>&lt;a\"b&gt;</b>", doc.to_html.chomp
+    assert_equal %{&lt;a\"b&gt;}, doc.at("text()").to_s
+  end
+
+  ####
+  # Modified
+  def test_no_escaping_text
+    doc = Nokogiri.Hpricot() { div.test.me! { text "<a\"b>" } }
+    assert_equal %{<div class="test" id="me">&lt;a"b&gt;</div>},
+      doc.to_html.chomp
+    assert_equal %{&lt;a\"b&gt;}, doc.at("text()").to_s
+  end
+
+  ####
+  # Modified
+  def test_latin1_entities
+    doc = Nokogiri.Hpricot() { b "\200\225" }
+    assert_equal "<b>&#21;</b>", doc.to_html.chomp
+  end
+end

data/test/hpricot/test_parser.rb

@@ -0,0 +1,423 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', "helper"))
+require File.join(File.dirname(__FILE__),"load_files")
+
+class TestParser < Nokogiri::TestCase
+  include Nokogiri
+
+  def test_set_attr
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    @basic.search('//p').set('class', 'para')
+    assert_equal 4, @basic.search('//p').length
+    assert_equal 4, @basic.search('//p').find_all { |x| x['class'] == 'para' }.length
+  end
+
+  # Test creating a new element 
+  def test_new_element 
+    elem = Hpricot::Elem.new(Hpricot::STag.new('form')) 
+    assert_not_nil(elem) 
+    assert_not_nil(elem.attributes) 
+  end 
+
+  def test_scan_text
+    assert_equal 'FOO', Hpricot.make("FOO").first.content
+  end
+
+  def test_filter_by_attr
+    @boingboing = Hpricot.parse(TestFiles::BOINGBOING)
+
+    # this link is escaped in the doc
+    link = 'http://www.youtube.com/watch?v=TvSNXyNw26g&search=chris%20ware'
+    assert_equal link, @boingboing.at("a[@href='#{link}']")['href']
+  end
+  
+  def test_filter_contains
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    assert_equal '<title>Sample XHTML</title>', @basic.search("title:contains('Sample')").to_s
+  end
+
+  def test_get_element_by_id
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    assert_equal 'link1', @basic.get_element_by_id('link1')['id']
+    assert_equal 'link1', @basic.get_element_by_id('body1').get_element_by_id('link1').get_attribute('id')
+  end
+
+  def test_get_element_by_tag_name
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    assert_equal 'link1', @basic.get_elements_by_tag_name('a')[0].get_attribute('id')
+    assert_equal 'link1', @basic.get_elements_by_tag_name('body')[0].get_element_by_id('link1').get_attribute('id')
+  end
+
+  def test_output_basic
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    @basic2 = Hpricot.parse(@basic.inner_html)
+    scan_basic @basic2
+  end
+
+  def test_scan_basic
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    scan_basic @basic
+  end
+
+  def scan_basic doc
+    ####
+    # Modified: asserting kind is not duck typey
+    #assert_kind_of Hpricot::XMLDecl, doc.children.first
+    assert_not_equal doc.children.first.to_s, doc.children[1].to_s 
+    assert_equal 'link1', doc.at('#link1')['id']
+    assert_equal 'link1', doc.at("p a")['id']
+    assert_equal 'link1', (doc/:p/:a).first['id']
+    assert_equal 'link1', doc.search('p').at('a').get_attribute('id')
+
+    ### Modified: We're not supporting the filter() function
+    #assert_equal 'link2', (doc/'p').filter('.ohmy').search('a').first.get_attribute('id')
+    #assert_equal (doc/'p')[2], (doc/'p').filter(':nth(2)')[0]
+    #assert_equal (doc/'p')[2], (doc/'p').filter(':nth(2)')[0]
+    #assert_equal (doc/'p')[2], (doc/'p').filter('[3]')[0]
+    #assert_equal 4, (doc/'p').filter('*').length
+    #assert_equal 4, (doc/'p').filter('* *').length
+    #eles = (doc/'p').filter('.ohmy')
+    #assert_equal 1, eles.length
+    #assert_equal 'ohmy', eles.first.get_attribute('class')
+    assert_equal 3, (doc/'p:not(.ohmy)').length
+
+    ### Modified: We're not supporting the not() function
+    #assert_equal 3, (doc/'p').not('.ohmy').length
+    #assert_equal 3, (doc/'p').not(eles.first).length
+    #assert_equal 2, (doc/'p').filter('[@class]').length
+    assert_equal 'last final', (doc/'p[@class~="final"]').first.get_attribute('class')
+    #assert_equal 1, (doc/'p').filter('[@class~="final"]').length
+    assert_equal 2, (doc/'p > a').length
+    assert_equal 1, (doc/'p.ohmy > a').length
+    assert_equal 2, (doc/'p / a').length
+    assert_equal 2, (doc/'link ~ link').length
+    assert_equal 3, (doc/'title ~ link').length
+    assert_equal 5, (doc/"//p/text()").length
+    assert_equal 6, (doc/"//p[a]//text()").length
+    assert_equal 2, (doc/"//p/a/text()").length
+  end
+
+  def test_positional
+    h = Nokogiri.Hpricot( "<div><br/><p>one</p><p>two</p></div>" )
+    assert_equal "<p>one</p>", h.search("div/p:eq(1)").to_s # MODIFIED: eq(0) -> eq(1), and removed initial '//'
+    assert_equal "<p>one</p>", h.search("div/p:first").to_s # MODIFIED: removed initial '//'
+    assert_equal "<p>one</p>", h.search("div/p:first()").to_s # MODIFIED: removed initial '//'
+  end
+
+  def test_pace
+    doc = Nokogiri.Hpricot(TestFiles::PACE_APPLICATION)
+    assert_equal 'get', doc.at('form[@name=frmSect11]')['method']
+    # assert_equal '2', doc.at('#hdnSpouse')['value']
+  end
+
+  def test_scan_boingboing
+    @boingboing = Hpricot.parse(TestFiles::BOINGBOING)
+    assert_equal 60, (@boingboing/'p.posted').length
+    assert_equal 1, @boingboing.search("//a[@name='027906']").length
+    ###  MODIFIED: libxml wraps the contents of <script> in a CDATA tag, so we won't be able to parse comments.
+#    assert_equal 10, @boingboing.search("script comment()").length
+    assert_equal 3, @boingboing.search("a[text()*='Boing']").length
+    assert_equal 1, @boingboing.search("h3[text()='College kids reportedly taking more smart drugs']").length
+    assert_equal 0, @boingboing.search("h3[text()='College']").length
+    assert_equal 60, @boingboing.search("h3").length
+    assert_equal 59, @boingboing.search("h3[text()!='College kids reportedly taking more smart drugs']").length
+    assert_equal 17, @boingboing.search("h3[text()$='s']").length
+    ### Modified.  Hpricot is wrong
+    #assert_equal 129, @boingboing.search("p[text()]").length
+    if Nokogiri::LIBXML_VERSION == '2.6.16'
+      assert_equal 111, @boingboing.search("p[text()]").length
+    else
+      assert_equal 110, @boingboing.search("p[text()]").length
+    end
+    assert_equal 211, @boingboing.search("p").length
+  end
+
+  def test_reparent
+    doc = Nokogiri.Hpricot(%{<div id="blurb_1"></div>})
+    div1 = doc.search('#blurb_1')
+    div1.before('<div id="blurb_0"></div>')
+
+    div0 = doc.search('#blurb_0')
+    div0.before('<div id="blurb_a"></div>')
+
+    assert_equal 'div', doc.at('#blurb_1').name
+  end
+
+  def test_siblings
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    t = @basic.at(:title)
+    e = t.next_sibling
+    assert_equal 'test1.css', e['href']
+    assert_equal 'title', e.previous_sibling.name
+  end
+
+  def test_css_negation
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    assert_equal 3, (@basic/'p:not(.final)').length
+  end
+
+  def test_remove_attribute
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    (@basic/:p).each { |ele| ele.remove_attribute('class') }
+    assert_equal 0, (@basic/'p[@class]').length
+  end
+
+  ##
+  #  Modified: hpricot is giving incorrect counts. Libxml gets it right.
+  def test_abs_xpath
+    @boingboing = Hpricot.parse(TestFiles::BOINGBOING)
+    assert_equal 60, @boingboing.search("/html/body//p[@class='posted']").length
+    assert_equal 60, @boingboing.search("/*/body//p[@class='posted']").length
+    assert_equal 18, @boingboing.search("//script").length
+    divs = @boingboing.search("//script/../div")
+    assert_equal 2,  divs.length # hpricot says this is 1, but that's wrong.
+    imgs = @boingboing.search('//div/p/a/img')
+    assert_equal 12, imgs.length # hpricot says this is 15, but that's wrong.
+    assert_equal 16, @boingboing.search('//div').search('p/a/img').length
+    assert imgs.all? { |x| x.name == 'img' }
+  end
+
+  def test_predicates
+    @boingboing = Hpricot.parse(TestFiles::BOINGBOING)
+    assert_equal 2, @boingboing.search('//link[@rel="alternate"]').length
+    p_imgs = @boingboing.search('//div/p[/a/img]')
+    #assert_equal 15, p_imgs.length
+    assert p_imgs.all? { |x| x.name == 'p' }
+    p_imgs = @boingboing.search('//div/p[a/img]')
+    assert_equal 12, p_imgs.length
+    assert p_imgs.all? { |x| x.name == 'p' }
+    assert_equal 1, @boingboing.search('//input[@checked]').length
+  end
+
+  def test_tag_case 
+    @tenderlove = Hpricot.parse(TestFiles::TENDERLOVE) 
+    assert_equal 2, @tenderlove.search('//a').length 
+    assert_equal 3, @tenderlove.search('//area').length 
+    assert_equal 2, @tenderlove.search('//meta').length 
+  end 
+
+  def test_alt_predicates
+    @boingboing = Hpricot.parse(TestFiles::BOINGBOING)
+    assert_equal 2, @boingboing.search('table/tr:last').length # MODIFIED to not have '//' prefix
+
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    ##
+    #  MODIFIED:
+    #  hpricot has an off-by-one bug eith eq-and-friends.
+    assert_equal "<p>The third paragraph</p>",
+        @basic.search('p:eq(3)').to_html # under Hpricot this was eq(2)
+    ##
+    #  MODIFIED: to be blank-agnostic, because Nokogiri's to_html is slightly different compared to Hpricot.
+    assert_equal '<p class="last final"> <b>THE FINAL PARAGRAPH</b> </p>',
+        @basic.search('p:last').to_html.gsub(/\s+/,' ')
+    assert_equal 'last final', @basic.search('p:last-of-type').first.get_attribute('class') # MODIFIED to not have '//' prefix
+  end
+
+  def test_insert_after # ticket #63
+    doc = Nokogiri.Hpricot('<html><body><div id="a-div"></div></body></html>')
+    (doc/'div').each do |element|
+      element.after('<p>Paragraph 1</p><p>Paragraph 2</p>')
+    end
+    assert_match '<div id="a-div"></div><p>Paragraph 1</p><p>Paragraph 2</p>',
+      doc.to_html.gsub(/\n/, '')
+  end
+
+  def test_insert_before # ticket #61
+    doc = Nokogiri.Hpricot('<html><body><div id="a-div"></div></body></html>')
+    (doc/'div').each do |element|
+      element.before('<p>Paragraph 1</p><p>Paragraph 2</p>')
+    end
+    assert_match '<p>Paragraph 1</p><p>Paragraph 2</p><div id="a-div"></div>',
+      doc.to_html.gsub(/\n/, '')
+  end
+
+  def test_many_paths
+    @boingboing = Hpricot.parse(TestFiles::BOINGBOING)
+    assert_equal 62, @boingboing.search('p.posted, link[@rel="alternate"]').length
+    ###
+    # Modified.  I don't want to support this syntax.  Just use a comma.
+    #assert_equal 20, @boingboing.search('//div/p[a/img]|//link[@rel="alternate"]').length
+  end
+
+  ####
+  # Modified.  Epic Fail.  We're on the duck type train folks.
+  #def test_stacked_search
+  #  @boingboing = Hpricot.parse(TestFiles::BOINGBOING)
+  #  assert_kind_of Hpricot::Elements, @boingboing.search('//div/p').search('a img')
+  #end
+
+  def test_class_search
+    # test case sent by Chih-Chao Lam
+    # Modified.  libxml corrects this differently than hpricot
+    doc = Nokogiri.Hpricot("<div class=xyz '>abc</div>")
+    assert_equal 1, doc.search(".xyz").length
+
+    doc = Nokogiri.Hpricot("<div class=xyz>abc</div><div class=abc>xyz</div>")
+    assert_equal 1, doc.search(".xyz").length
+    assert_equal 4, doc.search("*").length
+  end
+
+  def test_kleene_star
+    # bug noticed by raja bhatia
+    doc = Nokogiri.Hpricot("<span class='small'>1</span><div class='large'>2</div><div class='small'>3</div><span class='blue large'>4</span>")
+    assert_equal 2, doc.search("*[@class*='small']").length
+    assert_equal 2, doc.search("*.small").length
+    assert_equal 2, doc.search(".small").length
+    assert_equal 2, doc.search(".large").length
+  end
+
+  def test_empty_comment
+    doc = Nokogiri.Hpricot("<p><!----></p>")
+    doc = doc.search('//body').first
+    assert doc.children[0].children[0].comment?
+
+    doc = Nokogiri.Hpricot("<p><!-- --></p>")
+    doc = doc.search('//body').first
+    assert doc.children[0].children[0].comment?
+  end
+
+  def test_body_newlines
+    @immob = Hpricot.parse(TestFiles::IMMOB)
+    body = @immob.at(:body)
+    {'background' => '', 'bgcolor' => '#ffffff', 'text' => '#000000', 'marginheight' => '10',
+     'marginwidth' => '10', 'leftmargin' => '10', 'topmargin' => '10', 'link' => '#000066',
+     'alink' => '#ff6600', 'hlink' => "#ff6600", 'vlink' => "#000000"}.each do |k, v|
+        assert_equal v, body[k]
+    end
+  end
+
+  def test_nested_twins
+    @doc = Nokogiri.Hpricot("<div>Hi<div>there</div></div>")
+    assert_equal 1, (@doc/"div div").length
+  end
+
+  def test_wildcard
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    assert_equal 3, (@basic/"*[@id]").length
+    assert_equal 3, (@basic/"//*[@id]").length
+  end
+
+  def test_javascripts
+    @immob = Hpricot.parse(TestFiles::IMMOB)
+    assert_equal 3, (@immob/:script)[0].inner_html.scan(/<LINK/).length
+  end
+
+  ####
+  # Modified.  This test passes with later versions of libxml
+  def test_nested_scripts
+    @week9 = Hpricot.parse(TestFiles::WEEK9)
+    unless Nokogiri::LIBXML_VERSION == '2.6.16'
+      assert_equal 14, (@week9/"a").find_all { |x| x.inner_html.include? "GameCenter" }.length
+    end
+  end
+
+  def test_uswebgen
+    @uswebgen = Hpricot.parse(TestFiles::USWEBGEN)
+    # sent by brent beardsley, nokogiri 0.3 had problems with all the links.
+    assert_equal 67, (@uswebgen/:a).length
+  end
+
+  def test_mangled_tags
+    [%{<html><form name='loginForm' method='post' action='/units/a/login/1,13088,779-1,00.html'?URL=></form></html>},
+     %{<html><form name='loginForm' ?URL= method='post' action='/units/a/login/1,13088,779-1,00.html'></form></html>},
+     %{<html><form name='loginForm'?URL= ?URL= method='post' action='/units/a/login/1,13088,779-1,00.html'?URL=></form></html>},
+     %{<html><form name='loginForm' method='post' action='/units/a/login/1,13088,779-1,00.html' ?URL=></form></html>}].
+    each do |str|
+      doc = Nokogiri.Hpricot(str)
+      assert_equal 1, (doc/:form).length
+      assert_equal '/units/a/login/1,13088,779-1,00.html', doc.at("form")['action']
+    end
+  end
+
+  ####
+  # Modified.  Added question.  Don't care.
+  def test_procins
+    doc = Nokogiri.Hpricot("<?php print('hello') ?>\n<?xml blah='blah'?>")
+    assert_equal "php", doc.children[1].target
+    assert_equal "blah='blah'?", doc.children[2].content
+  end
+
+  ####
+  # Altered...  libxml does not get a buffer error
+  def test_buffer_error
+    assert_nothing_raised {
+      Nokogiri.Hpricot(%{<p>\n\n<input type="hidden" name="__VIEWSTATE"  value="#{(("X" * 2000) + "\n") * 22}" />\n\n</p>})
+    }
+  end
+
+  def test_youtube_attr
+    str = <<-edoc
+    <html><body>
+    Lorem ipsum. Jolly roger, ding-dong sing-a-long 
+    <object width="425" height="350">
+      <param name="movie" value="http://www.youtube.com/v/NbDQ4M_cuwA"></param>
+      <param name="wmode" value="transparent"></param>
+        <embed src="http://www.youtube.com/v/NbDQ4M_cuwA" 
+          type="application/x-shockwave-flash" wmode="transparent" width="425" height="350">
+        </embed>
+    </object>
+    Check out my posting, I have bright mice in large clown cars.
+    <object width="425" height="350">
+      <param name="movie" value="http://www.youtube.com/v/foobar"></param>
+      <param name="wmode" value="transparent"></param>
+        <embed src="http://www.youtube.com/v/foobar" 
+          type="application/x-shockwave-flash" wmode="transparent" width="425" height="350">
+        </embed>
+    </object>
+    </body></html?
+    edoc
+    doc = Nokogiri.Hpricot(str)
+    assert_equal "http://www.youtube.com/v/NbDQ4M_cuwA",
+      doc.at("//object/param[@value='http://www.youtube.com/v/NbDQ4M_cuwA']")['value']
+  end
+  
+  # ticket #84 by jamezilla
+  def test_screwed_xmlns
+    doc = Nokogiri.Hpricot(<<-edoc)
+      <?xml:namespace prefix = cwi />
+      <html><body>HAI</body></html>
+    edoc
+    assert_equal "HAI", doc.at("body").inner_text
+  end
+
+  # Reported by Jonathan Nichols on the Hpricot list (24 May 2007)
+  # MODIFIED:  This is an issue with libxml which we cannot deal with....
+  #def test_self_closed_form
+  #  doc = Nokogiri.Hpricot(<<-edoc)
+  #    <body>
+  #    <form action="/loginRegForm" name="regForm" method="POST" />
+  #    <input type="button">
+  #    </form>
+  #    </body>
+  #  edoc
+  #  assert_equal "button", doc.at("//form/input")['type']
+  #end
+
+  def test_filters
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    ##
+    #  MODIFIED:
+    #  Hpricot considers nodes with text-only (but no child tags) to be empty.
+    #  Nokogiri considers that any content makes a parent.
+    assert_equal 1, (@basic/"title:parent").size # so this was 0 under Hpricot
+    assert_equal 4, (@basic/"p:parent").size
+    assert_equal 0, (@basic/"title:empty").size
+    assert_equal 3, (@basic/"link:empty").size
+  end
+
+  def test_keep_cdata
+    str = %{<script> /*<![CDATA[*/
+    /*]]>*/ </script>}
+    assert_match str, Nokogiri.Hpricot(str).to_html
+  end
+
+  def test_namespace
+    chunk = <<-END
+    <a xmlns:t="http://www.nexopia.com/dev/template">
+      <t:sam>hi </t:sam>
+    </a>
+    END
+    doc = Hpricot::XML(chunk)
+    assert((doc/"//t:sam").size > 0) # at least this should probably work
+    # assert (doc/"//sam").size > 0  # this would be nice 
+  end
+end

data/test/hpricot/test_paths.rb

@@ -0,0 +1,15 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', "helper"))
+require File.join(File.dirname(__FILE__),"load_files")
+
+class TestParser < Nokogiri::TestCase
+  include Nokogiri
+
+  def test_roundtrip
+    @basic = Hpricot.parse(TestFiles::BASIC)
+    %w[link link[2] body #link1 a p.ohmy].each do |css_sel|
+      ele = @basic.at(css_sel)
+      assert_equal ele, @basic.at(ele.css_path), ele.css_path
+      assert_equal ele, @basic.at(ele.xpath), ele.xpath
+    end
+  end
+end

data/test/hpricot/test_preserved.rb

@@ -0,0 +1,78 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', "helper"))
+require File.join(File.dirname(__FILE__),"load_files")
+
+class TestPreserved < Nokogiri::TestCase
+  def assert_roundtrip str
+    doc = Nokogiri.Hpricot(str)
+    yield doc if block_given?
+    str2 = doc.to_original_html
+    [*str].zip([*str2]).each do |s1, s2|
+      assert_equal s1, s2
+    end
+  end
+
+  def assert_html str1, str2
+    doc = Nokogiri.Hpricot(str2)
+    yield doc if block_given?
+    assert_equal str1, doc.to_original_html
+  end
+
+  ####
+  # Not supporting to_original_html
+  #def test_simple
+  #  str = "<p>Hpricot is a <b>you know <i>uh</b> fine thing.</p>"
+  #  assert_html str, str
+  #  assert_html "<p class=\"new\">Hpricot is a <b>you know <i>uh</b> fine thing.</p>", str do |doc|
+  #    (doc/:p).set('class', 'new')
+  #  end
+  #end
+
+  ####
+  # Not supporting to_original_html
+  #def test_parent
+  #  str = "<html><base href='/'><head><title>Test</title></head><body><div id='wrap'><p>Paragraph one.</p><p>Paragraph two.</p></div></body></html>"
+  #  assert_html str, str
+  #  assert_html "<html><base href='/'><body><div id=\"all\"><div><p>Paragraph one.</p></div><div><p>Paragraph two.</p></div></div></body></html>", str do |doc|
+  #    (doc/:head).remove
+  #    (doc/:div).set('id', 'all')
+  #    (doc/:p).wrap('<div></div>')
+  #  end
+  #end
+
+  # Not really a valid test.  If libxml can figure out the encoding of the file,
+  # it will use that encoding, otherwise it uses the &#xwhatever so that no data
+  # is lost.
+  #
+  # libxml on OSX can't figure out the encoding, so this tests passes.  linux
+  # can figure out the encoding, so it fails.
+  #def test_escaping_of_contents
+  #  doc = Nokogiri.Hpricot(TestFiles::BOINGBOING)
+  #  assert_equal "Fukuda&#x2019;s Automatic Door opens around your body as you pass through it. The idea is to save energy and keep the room clean.", doc.at("img[@alt='200606131240']").next.to_s.strip
+  #end
+
+  ####
+  # Modified.  No.
+  #def test_files
+  #  assert_roundtrip TestFiles::BASIC
+  #  assert_roundtrip TestFiles::BOINGBOING
+  #  assert_roundtrip TestFiles::CY0
+  #end
+
+  ####
+  # Modified..  When calling "to_html" on the document, proper html/doc tags
+  # are produced too.
+  def test_escaping_of_attrs
+    # ampersands in URLs
+    str = %{<a href="http://google.com/search?q=nokogiri&amp;l=en">Google</a>}
+    link = (doc = Nokogiri.Hpricot(str)).at(:a)
+    assert_equal "http://google.com/search?q=nokogiri&l=en", link['href']
+    assert_equal "http://google.com/search?q=nokogiri&l=en", link.attributes['href']
+    assert_equal "http://google.com/search?q=nokogiri&l=en", link.get_attribute('href')
+    assert_equal "http://google.com/search?q=nokogiri&l=en", link.raw_attributes['href']
+    assert_equal str, link.to_html
+
+    # alter the url
+    link['href'] = "javascript:alert(\"AGGA-KA-BOO!\")"
+    assert_equal %{<a href="javascript:alert(&quot;AGGA-KA-BOO!&quot;)">Google</a>}, link.to_html.gsub(/%22/, '&quot;')
+  end
+end

data/test/hpricot/test_xml.rb

@@ -0,0 +1,30 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', "helper"))
+require File.join(File.dirname(__FILE__),"load_files")
+
+class TestParser < Nokogiri::TestCase
+  include Nokogiri
+  # normally, the link tags are empty HTML tags.
+  # contributed by laudney.
+  def test_normally_empty
+    doc = Hpricot::XML("<rss><channel><title>this is title</title><link>http://fake.com</link></channel></rss>")
+    assert_equal "this is title", (doc/:rss/:channel/:title).text
+    assert_equal "http://fake.com", (doc/:rss/:channel/:link).text
+  end
+
+  # make sure XML doesn't get downcased
+  def test_casing
+    doc = Hpricot::XML(TestFiles::WHY)
+
+    ### Modified.
+    # I don't want to differentiate pseudo classes from namespaces.  If
+    # you're parsing xml, use XPath.  That's what its for.  :-P
+    assert_equal "hourly", (doc.at "//sy:updatePeriod").content
+    assert_equal 1, (doc/"guid[@isPermaLink]").length
+  end
+
+  # be sure tags named "text" are ok
+  def test_text_tags
+    doc = Hpricot::XML("<feed><title>City Poisoned</title><text>Rita Lee has poisoned Brazil.</text></feed>")
+    assert_equal "City Poisoned", (doc/"title").text
+  end
+end