From 91ed484f92040e5c2006a3a00ec77a54d552cf37 Mon Sep 17 00:00:00 2001
From: kou <kou@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 17 Sep 2010 13:14:14 +0000
Subject: * test/rexml/: import REXML tests from  
 http://www.germane-software.com/repos/rexml/trunk/test/.   Many tests are
 failed temporary. I'll fix them quickly. Sorry.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@29282 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 test/rexml/test_xpath_pred.rb | 80 +++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 80 insertions(+)
 create mode 100644 test/rexml/test_xpath_pred.rb

(limited to 'test/rexml/test_xpath_pred.rb')

diff --git a/test/rexml/test_xpath_pred.rb b/test/rexml/test_xpath_pred.rb
new file mode 100644
index 0000000000..64eab3e3f9
--- /dev/null
+++ b/test/rexml/test_xpath_pred.rb
@@ -0,0 +1,80 @@
+require "test/unit/testcase"
+require "rexml/document"
+require "rexml/xpath"
+require "rexml/parsers/xpathparser"
+
+class XPathPredicateTester < Test::Unit::TestCase
+	include REXML
+  SRC=<<-EOL
+  <article>
+     <section role="subdivision" id="1">
+        <para>free flowing text.</para>
+     </section>
+     <section role="division">
+        <section role="subdivision" id="2">
+           <para>free flowing text.</para>
+        </section>
+        <section role="division">
+           <para>free flowing text.</para>
+        </section>
+     </section>
+  </article>
+  EOL
+  
+  def setup
+    @doc = REXML::Document.new( SRC )
+    @parser = REXML::Parsers::XPathParser.new
+
+  end
+
+  def test_predicates_parent
+    path = '//section[../self::section[@role="division"]]'
+    m = do_path( path )
+    assert_equal( 2, m.size )
+    assert_equal( "2", m[0].attributes["id"] )
+    assert_nil( m[1].attributes["id"] )
+  end
+
+  def test_predicates_single
+    path = '//section[@role="subdivision" and not(../self::section[@role="division"])]'
+    m = do_path( path )
+    assert_equal( 1, m.size )
+    assert_equal( "1", m[0].attributes["id"] )
+  end
+
+  def test_predicates_multi
+    path = '//section[@role="subdivision"][not(../self::section[@role="division"])]'
+    m = do_path( path )
+    assert_equal( 1, m.size )
+    assert_equal( "1", m[0].attributes["id"] )
+  end
+  
+  def do_path( path ) 
+    m = REXML::XPath.match( @doc, path )
+    #puts path, @parser.parse( path ).inspect
+    return m
+  end
+
+  def test_get_no_siblings_terminal_nodes
+    source = <<-XML
+<a>
+  <b number='1' str='abc'>TEXT1</b>
+  <c number='1'/>
+  <c number='2' str='def'>
+    <b number='3'/>
+    <d number='1' str='abc'>TEXT2</d>
+    <b number='2'><!--COMMENT--></b>
+  </c>
+</a>
+XML
+    doc = REXML::Document.new(source)
+    predicate = "count(child::node()|" +
+                      "following-sibling::node()|" +
+                      "preceding-sibling::node())=0"
+    m = REXML::XPath.match(doc, "/descendant-or-self::node()[#{predicate}]")
+    assert_equal( [REXML::Text.new("TEXT1"),
+                   REXML::Text.new("TEXT2"),
+                   REXML::Comment.new("COMMENT")],
+                  m )
+  end
+end
-- 
cgit v1.2.3