nokogiri-maglev- 1.5.0.1

data/tasks/cross_compile.rb

@@ -0,0 +1,152 @@
+require 'rake/extensioncompiler'
+HOST = Rake::ExtensionCompiler.mingw_host
+
+require 'mini_portile'
+$recipes = {}
+$recipes[:zlib]     = MiniPortile.new "zlib", "1.2.5"
+$recipes[:libiconv] = MiniPortile.new "libiconv", "1.13.1"
+$recipes[:libxml2]  = MiniPortile.new "libxml2", "2.7.7"
+$recipes[:libxslt]  = MiniPortile.new "libxslt", "1.1.26"
+$recipes.each { |_, recipe| recipe.host = HOST }
+
+file "lib/nokogiri/nokogiri.rb" do
+  File.open("lib/nokogiri/nokogiri.rb", 'wb') do |f|
+    f.write %Q{require "nokogiri/\#{RUBY_VERSION.sub(/\\.\\d+$/, '')}/nokogiri"\n}
+  end
+end
+
+namespace :cross do
+  task :zlib do
+    recipe = $recipes[:zlib]
+    recipe.files = ["http://zlib.net/#{recipe.name}-#{recipe.version}.tar.gz"]
+    class << recipe
+      def configure
+        Dir.chdir work_path do
+          mk = File.read 'win32/Makefile.gcc'
+          File.open 'win32/Makefile.gcc', 'wb' do |f|
+            f.puts "BINARY_PATH = #{CROSS_DIR}/bin"
+            f.puts "LIBRARY_PATH = #{CROSS_DIR}/lib"
+            f.puts "INCLUDE_PATH = #{CROSS_DIR}/include"
+            f.puts mk.sub(/^PREFIX\s*=\s*$/, "PREFIX = #{HOST}-")
+          end
+        end
+      end
+
+      def configured?
+        Dir.chdir work_path do
+          !! (File.read('win32/Makefile.gcc') =~ /^BINARY_PATH/)
+        end
+      end
+
+      def compile
+        execute "compile", "make -f win32/Makefile.gcc"
+      end
+
+      def install
+        execute "install", "make -f win32/Makefile.gcc install"
+      end
+    end
+
+    checkpoint = "#{CROSS_DIR}/#{recipe.name}-#{recipe.version}.installed"
+    unless File.exist?(checkpoint)
+      recipe.cook
+      touch checkpoint
+    end
+    recipe.activate
+  end
+
+  task :libiconv do
+    recipe = $recipes[:libiconv]
+    recipe.files = ["http://ftp.gnu.org/pub/gnu/libiconv/#{recipe.name}-#{recipe.version}.tar.gz"]
+    recipe.configure_options = [
+      "--host=#{HOST}",
+      "--enable-static",
+      "--disable-shared",
+      "CPPFLAGS='-mno-cygwin -Wall'",
+      "CFLAGS='-mno-cygwin -O2 -g'",
+      "CXXFLAGS='-mno-cygwin -O2 -g'",
+      "LDFLAGS=-mno-cygwin"
+    ]
+
+    checkpoint = "#{CROSS_DIR}/#{recipe.name}-#{recipe.version}.installed"
+    unless File.exist?(checkpoint)
+      recipe.cook
+      touch checkpoint
+    end
+    recipe.activate
+  end
+
+  task :libxml2 => ["cross:zlib", "cross:libiconv"] do
+    recipe = $recipes[:libxml2]
+    recipe.files = ["ftp://ftp.xmlsoft.org/libxml2/#{recipe.name}-#{recipe.version}.tar.gz"]
+    recipe.configure_options = [
+      "--host=#{HOST}",
+      "--enable-static",
+      "--disable-shared",
+      "--with-zlib=#{CROSS_DIR}",
+      "--with-iconv=#{$recipes[:libiconv].path}",
+      "--without-python",
+      "--without-readline",
+      "CFLAGS='-DIN_LIBXML'"
+    ]
+    class << recipe
+      def download
+        Dir.chdir archives_path do
+          @files.each do |url|
+            sh "wget #{url} || curl -O #{url}"
+          end
+        end
+      end
+    end
+
+    checkpoint = "#{CROSS_DIR}/#{recipe.name}-#{recipe.version}.installed"
+    unless File.exist?(checkpoint)
+      recipe.cook
+      touch checkpoint
+    end
+    recipe.activate
+  end
+
+  task :libxslt => ['cross:libxml2'] do
+    recipe = $recipes[:libxslt]
+    recipe.files = ["ftp://ftp.xmlsoft.org/libxml2/#{recipe.name}-#{recipe.version}.tar.gz"]
+    recipe.configure_options = [
+      "--host=#{HOST}",
+      "--enable-static",
+      "--disable-shared",
+      "--with-libxml-prefix=#{$recipes[:libxml2].path}",
+      "--without-python",
+      "--without-crypto",
+      "CFLAGS='-DIN_LIBXML'"
+    ]
+    class << recipe
+      def download
+        Dir.chdir archives_path do
+          @files.each do |url|
+            sh "wget #{url} || curl -O #{url}"
+          end
+        end
+      end
+    end
+
+    checkpoint = "#{CROSS_DIR}/#{recipe.name}-#{recipe.version}.installed"
+    unless File.exist?(checkpoint)
+      recipe.cook
+      touch checkpoint
+    end
+    recipe.activate
+  end
+
+  task :file_list do
+    HOE.spec.files += Dir["lib/nokogiri/nokogiri.rb"]
+    HOE.spec.files += Dir["lib/nokogiri/1.{8,9}/nokogiri.so"]
+  end
+end
+
+HOE.clean_globs += [
+  "#{CROSS_DIR}/*.installed",
+  "#{CROSS_DIR}/#{HOST}",
+  "tmp/#{HOST}",
+]
+
+task :cross => ["cross:libxslt", "lib/nokogiri/nokogiri.rb", "cross:file_list"]

data/tasks/nokogiri.org.rb

@@ -0,0 +1,18 @@
+namespace :docs do
+  desc "generate HTML docs for nokogiri.org"
+  task :website do
+    title = "#{HOE.name}-#{HOE.version} Documentation"
+
+    options = []
+    options << "--main=#{HOE.readme_file}"
+    options << '--format=activerecord'
+    options << '--threads=1'
+    options << "--title=#{title.inspect}"
+
+    options += HOE.spec.require_paths
+    options += HOE.spec.extra_rdoc_files
+    require 'rdoc/rdoc'
+    ENV['RAILS_ROOT'] ||= File.expand_path(File.join('..', 'nokogiri_ws'))
+    RDoc::RDoc.new.document options
+  end
+end

data/tasks/test.rb

@@ -0,0 +1,94 @@
+namespace :test do
+  desc "run test suite with aggressive GC"
+  task :gc => :build do
+    ENV['NOKOGIRI_GC'] = "true"
+    Rake::Task["test"].invoke
+  end
+
+  desc "find call-seq in the rdoc"
+  task :rdoc_call_seq => 'docs' do
+    Dir['doc/**/*.html'].each { |docfile|
+      next if docfile =~ /\.src/
+      puts "FAIL: #{docfile}" if File.read(docfile) =~ /call-seq/
+    }
+  end
+
+  desc "find all undocumented things"
+  task :rdoc => 'docs' do
+    base = File.expand_path(File.join(File.dirname(__FILE__), '..', 'doc'))
+    require 'test/unit'
+    test = Class.new(Test::Unit::TestCase)
+    Dir["#{base}/**/*.html"].each { |docfile|
+      test.class_eval(<<-eotest)
+        def test_#{docfile.sub("#{base}/", '').gsub(/[\/\.-]/, '_')}
+          assert_no_match(
+            /Not documented/,
+            File.read('#{docfile}'),
+            '#{docfile} has undocumented things'
+          )
+        end
+      eotest
+    }
+  end
+
+  desc "Test against multiple versions of libxml2 (MULTIXML2_DIR=directory)"
+  task :multixml2 do
+    MULTI_XML = File.join(ENV['HOME'], '.multixml2')
+    unless File.exists?(MULTI_XML)
+      %w{ versions install build }.each { |x|
+        FileUtils.mkdir_p(File.join(MULTI_XML, x))
+      }
+      Dir.chdir File.join(MULTI_XML, 'versions') do
+        require 'net/ftp'
+        ftp = Net::FTP.new('xmlsoft.org')
+        ftp.login('anonymous', 'anonymous')
+        ftp.chdir('libxml2')
+        ftp.list('libxml2-2.*.tar.gz').each do |x|
+          file = x[/[^\s]*$/]
+          puts "Downloading #{file}"
+          ftp.getbinaryfile(file)
+        end
+      end
+    end
+
+    # Build any libxml2 versions in $HOME/.multixml2/versions that
+    # haven't been built yet
+    Dir[File.join(MULTI_XML, 'versions','*.tar.gz')].each do |f|
+      filename = File.basename(f, '.tar.gz')
+
+      install_dir = File.join(MULTI_XML, 'install', filename)
+      next if File.exists?(install_dir)
+
+      Dir.chdir File.join(MULTI_XML, 'versions') do
+        system "tar zxvf #{f} -C #{File.join(MULTI_XML, 'build')}"
+      end
+
+      Dir.chdir File.join(MULTI_XML, 'build', filename) do
+        system "./configure --without-http --prefix=#{install_dir}"
+        system "make && make install"
+      end
+    end
+
+    test_results = {}
+    libxslt = Dir[File.join(MULTI_XML, 'install', 'libxslt*')].first
+
+    directories = ENV['MULTIXML2_DIR'] ? [ENV['MULTIXML2_DIR']] : Dir[File.join(MULTI_XML, 'install', '*')]
+    directories.sort.reverse_each do |xml2_version|
+      next unless xml2_version =~ /libxml2/
+      extopts = "--with-xml2-include=#{xml2_version}/include/libxml2 --with-xml2-lib=#{xml2_version}/lib --with-xslt-dir=#{libxslt} --with-iconv-dir=/usr"
+      cmd = "#{$0} clean test EXTOPTS='#{extopts}' LD_LIBRARY_PATH='#{xml2_version}/lib'"
+
+      version = File.basename(xml2_version)
+      result = system(cmd)
+      test_results[version] = {
+        :result => result,
+        :cmd    => cmd
+      }
+    end
+    test_results.sort_by { |k,v| k }.each do |k,v|
+      passed = v[:result]
+      puts "#{k}: #{passed ? 'PASS' : 'FAIL'}"
+      puts "repro: #{v[:cmd]}" unless passed
+    end
+  end
+end

data/test/css/test_nthiness.rb

@@ -0,0 +1,159 @@
+require "helper"
+
+module Nokogiri
+  module CSS
+    class TestNthiness < Nokogiri::TestCase
+      def setup
+        super
+        doc = <<EOF
+<html>
+<table>
+  <tr><td>row1 </td></tr>
+  <tr><td>row2 </td></tr>
+  <tr><td>row3 </td></tr>
+  <tr><td>row4 </td></tr>
+  <tr><td>row5 </td></tr>
+  <tr><td>row6 </td></tr>
+  <tr><td>row7 </td></tr>
+  <tr><td>row8 </td></tr>
+  <tr><td>row9 </td></tr>
+  <tr><td>row10 </td></tr>
+  <tr><td>row11 </td></tr>
+  <tr><td>row12 </td></tr>
+  <tr><td>row13 </td></tr>
+  <tr><td>row14 </td></tr>
+</table>
+<div>
+  <b>bold1 </b>
+  <i>italic1 </i>
+  <b>bold2 </b>
+  <i>italic2 </i>
+  <p>para1 </p>
+  <b>bold3 </b>
+</div>
+<div>
+  <p>para2 </p>
+  <p>para3 </p>
+</div>
+<div>
+  <p>para4 </p>
+</div>
+<p class='empty'></p>
+<p class='not-empty'><b></b></p>
+</html>
+EOF
+        @parser = Nokogiri.HTML doc
+      end
+
+
+      def test_even
+        assert_result_rows [2,4,6,8,10,12,14], @parser.search("table/tr:nth(even)")
+      end
+
+      def test_odd
+        assert_result_rows [1,3,5,7,9,11,13], @parser.search("table/tr:nth(odd)")
+      end
+
+      def test_2n
+        assert_equal @parser.search("table/tr:nth(even)").inner_text, @parser.search("table/tr:nth(2n)").inner_text
+      end
+
+      def test_2np1
+        assert_equal @parser.search("table/tr:nth(odd)").inner_text, @parser.search("table/tr:nth(2n+1)").inner_text
+      end
+
+      def test_4np3
+        assert_result_rows [3,7,11], @parser.search("table/tr:nth(4n+3)")
+      end
+
+      def test_3np4
+        assert_result_rows [4,7,10,13], @parser.search("table/tr:nth(3n+4)")
+      end
+
+      def test_mnp3
+        assert_result_rows [1,2,3], @parser.search("table/tr:nth(-n+3)")
+      end
+
+      def test_np3
+        assert_result_rows [3,4,5,6,7,8,9,10,11,12,13,14], @parser.search("table/tr:nth(n+3)")
+      end
+
+      def test_first
+        assert_result_rows [1], @parser.search("table/tr:first")
+        assert_result_rows [1], @parser.search("table/tr:first()")
+      end
+
+      def test_last
+        assert_result_rows [14], @parser.search("table/tr:last")
+        assert_result_rows [14], @parser.search("table/tr:last()")
+      end
+
+      def test_first_child
+        assert_result_rows [1], @parser.search("div/b:first-child"), "bold"
+        assert_result_rows [1], @parser.search("table/tr:first-child")
+      end
+
+      def test_last_child
+        assert_result_rows [3], @parser.search("div/b:last-child"), "bold"
+        assert_result_rows [14], @parser.search("table/tr:last-child")
+      end
+
+      def test_first_of_type
+        assert_result_rows [1], @parser.search("table/tr:first-of-type")
+        assert_result_rows [1], @parser.search("div/b:first-of-type"), "bold"
+      end
+
+      def test_last_of_type
+        assert_result_rows [14], @parser.search("table/tr:last-of-type")
+        assert_result_rows [3], @parser.search("div/b:last-of-type"), "bold"
+      end
+
+      def test_only_of_type
+        assert_result_rows [1,4], @parser.search("div/p:only-of-type"), "para"
+      end
+
+      def test_only_child
+        assert_result_rows [4], @parser.search("div/p:only-child"), "para"
+      end
+
+      def test_empty
+        result = @parser.search("p:empty")
+        assert_equal 1, result.size, "unexpected number of rows returned: '#{result.inner_text}'"
+        assert_equal 'empty', result.first['class']
+      end
+
+      def test_parent
+        result = @parser.search("p:parent")
+        assert_equal 5, result.size
+        0.upto(3) do |j|
+          assert_equal "para#{j+1} ", result[j].inner_text
+        end
+        assert_equal "not-empty", result[4]['class']
+      end
+
+      def test_siblings
+        doc = <<-EOF
+<html><body><div>
+<p id="1">p1 </p>
+<p id="2">p2 </p>
+<p id="3">p3 </p>
+<p id="4">p4 </p>
+<p id="5">p5 </p>
+EOF
+        parser = Nokogiri.HTML doc
+        assert_equal 2, parser.search("#3 ~ p").size
+        assert_equal "p4 p5 ", parser.search("#3 ~ p").inner_text
+        assert_equal 0, parser.search("#5 ~ p").size
+
+        assert_equal 1, parser.search("#3 + p").size
+        assert_equal "p4 ", parser.search("#3 + p").inner_text
+        assert_equal 0, parser.search("#5 + p").size
+      end
+
+      def assert_result_rows intarray, result, word="row"
+        assert_equal intarray.size, result.size, "unexpected number of rows returned: '#{result.inner_text}'"
+        assert_equal intarray.map{|j| "#{word}#{j}"}.join(' '), result.inner_text.strip, result.inner_text
+      end
+    end
+  end
+end

data/test/css/test_parser.rb

@@ -0,0 +1,303 @@
+require "helper"
+
+module Nokogiri
+  module CSS
+    class TestParser < Nokogiri::TestCase
+      def setup
+        super
+        @parser = Nokogiri::CSS::Parser.new
+      end
+
+      def test_extra_single_quote
+        assert_raises(CSS::SyntaxError) { @parser.parse("'") }
+      end
+
+      def test_syntax_error_raised
+        assert_raises(CSS::SyntaxError) { @parser.parse("a[x=]") }
+      end
+
+      def test_function_and_pseudo
+        assert_xpath '//child::text()[position() = 99]', @parser.parse('text():nth-of-type(99)')
+      end
+
+      def test_find_by_type
+        ast = @parser.parse("a:nth-child(2)").first
+        matches = ast.find_by_type(
+          [:CONDITIONAL_SELECTOR,
+            [:ELEMENT_NAME],
+            [:PSEUDO_CLASS,
+              [:FUNCTION]
+            ]
+          ]
+        )
+        assert_equal(1, matches.length)
+        assert_equal(ast, matches.first)
+      end
+
+      def test_to_type
+        ast = @parser.parse("a:nth-child(2)").first
+        assert_equal(
+          [:CONDITIONAL_SELECTOR,
+            [:ELEMENT_NAME],
+            [:PSEUDO_CLASS,
+              [:FUNCTION]
+            ]
+          ], ast.to_type
+        )
+      end
+
+      def test_to_a
+        asts = @parser.parse("a:nth-child(2)")
+        assert_equal(
+          [:CONDITIONAL_SELECTOR,
+            [:ELEMENT_NAME, ["a"]],
+            [:PSEUDO_CLASS,
+              [:FUNCTION, ["nth-child("], ["2"]]
+            ]
+          ], asts.first.to_a
+        )
+      end
+
+      def test_has
+        assert_xpath  "//a[b]", @parser.parse("a:has(b)")
+        assert_xpath  "//a[b/c]", @parser.parse("a:has(b > c)")
+      end
+
+      def test_dashmatch
+        assert_xpath  "//a[@class = 'bar' or starts-with(@class, concat('bar', '-'))]",
+                      @parser.parse("a[@class|='bar']")
+        assert_xpath  "//a[@class = 'bar' or starts-with(@class, concat('bar', '-'))]",
+                      @parser.parse("a[@class |= 'bar']")
+      end
+
+      def test_includes
+        assert_xpath  "//a[contains(concat(\" \", @class, \" \"),concat(\" \", 'bar', \" \"))]",
+                      @parser.parse("a[@class~='bar']")
+        assert_xpath  "//a[contains(concat(\" \", @class, \" \"),concat(\" \", 'bar', \" \"))]",
+                      @parser.parse("a[@class ~= 'bar']")
+      end
+
+      def test_function_with_arguments
+        assert_xpath  "//*[position() = 2 and self::a]",
+                      @parser.parse("a[2]")
+        assert_xpath  "//*[position() = 2 and self::a]",
+                      @parser.parse("a:nth-child(2)")
+      end
+
+      def test_carrot
+        assert_xpath  "//a[starts-with(@id, 'Boing')]",
+                      @parser.parse("a[id^='Boing']")
+        assert_xpath  "//a[starts-with(@id, 'Boing')]",
+                      @parser.parse("a[id ^= 'Boing']")
+      end
+
+      def test_suffix_match
+        assert_xpath "//a[substring(@id, string-length(@id) - string-length('Boing') + 1, string-length('Boing')) = 'Boing']",
+                      @parser.parse("a[id$='Boing']")
+        assert_xpath "//a[substring(@id, string-length(@id) - string-length('Boing') + 1, string-length('Boing')) = 'Boing']",
+                      @parser.parse("a[id $= 'Boing']")
+      end
+
+      def test_attributes_with_at
+        ## This is non standard CSS
+        assert_xpath  "//a[@id = 'Boing']",
+                      @parser.parse("a[@id='Boing']")
+        assert_xpath  "//a[@id = 'Boing']",
+                      @parser.parse("a[@id = 'Boing']")
+      end
+
+      def test_attributes_with_at_and_stuff
+        ## This is non standard CSS
+        assert_xpath  "//a[@id = 'Boing']//div",
+                      @parser.parse("a[@id='Boing'] div")
+      end
+
+      def test_not_equal
+        ## This is non standard CSS
+        assert_xpath  "//a[child::text() != 'Boing']",
+                      @parser.parse("a[text()!='Boing']")
+        assert_xpath  "//a[child::text() != 'Boing']",
+                      @parser.parse("a[text() != 'Boing']")
+      end
+
+      def test_function
+        ## This is non standard CSS
+        assert_xpath  "//a[child::text()]",
+                      @parser.parse("a[text()]")
+
+        ## This is non standard CSS
+        assert_xpath  "//child::text()",
+                      @parser.parse("text()")
+
+        ## This is non standard CSS
+        assert_xpath  "//a[contains(child::text(), 'Boing')]",
+                      @parser.parse("a[text()*='Boing']")
+        assert_xpath  "//a[contains(child::text(), 'Boing')]",
+                      @parser.parse("a[text() *= 'Boing']")
+
+        ## This is non standard CSS
+        assert_xpath  "//script//comment()",
+                      @parser.parse("script comment()")
+      end
+
+      def test_nonstandard_nth_selectors
+        ## These are non standard CSS
+        assert_xpath '//a[position() = 1]',             @parser.parse('a:first()')
+        assert_xpath '//a[position() = 1]',             @parser.parse('a:first') # no parens
+        assert_xpath '//a[position() = 99]',            @parser.parse('a:eq(99)')
+        assert_xpath '//a[position() = 99]',            @parser.parse('a:nth(99)')
+        assert_xpath '//a[position() = last()]',        @parser.parse('a:last()')
+        assert_xpath '//a[position() = last()]',        @parser.parse('a:last') # no parens
+        assert_xpath '//a[node()]',                     @parser.parse('a:parent')
+      end
+
+      def test_standard_nth_selectors
+        assert_xpath '//a[position() = 1]',             @parser.parse('a:first-of-type()')
+        assert_xpath '//a[position() = 1]',             @parser.parse('a:first-of-type') # no parens
+        assert_xpath '//a[position() = 99]',            @parser.parse('a:nth-of-type(99)')
+        assert_xpath '//a[position() = last()]',        @parser.parse('a:last-of-type()')
+        assert_xpath '//a[position() = last()]',        @parser.parse('a:last-of-type') # no parens
+        assert_xpath '//a[position() = last()]',        @parser.parse('a:nth-last-of-type(1)')
+        assert_xpath '//a[position() = last() - 98]',   @parser.parse('a:nth-last-of-type(99)')
+      end
+
+      def test_nth_child_selectors
+        assert_xpath '//*[position() = 1 and self::a]',           @parser.parse('a:first-child')
+        assert_xpath '//*[position() = 99 and self::a]',          @parser.parse('a:nth-child(99)')
+        assert_xpath '//*[position() = last() and self::a]',      @parser.parse('a:last-child')
+        assert_xpath '//*[position() = last() and self::a]',      @parser.parse('a:nth-last-child(1)')
+        assert_xpath '//*[position() = last() - 98 and self::a]', @parser.parse('a:nth-last-child(99)')
+      end
+
+      def test_miscellaneous_selectors
+        assert_xpath '//*[last() = 1 and self::a]',
+          @parser.parse('a:only-child')
+        assert_xpath '//a[last() = 1]', @parser.parse('a:only-of-type')
+        assert_xpath '//a[not(node())]', @parser.parse('a:empty')
+      end
+
+      def test_nth_a_n_plus_b
+        assert_xpath '//a[(position() mod 2) = 0]', @parser.parse('a:nth-of-type(2n)')
+        assert_xpath '//a[(position() >= 1) and (((position()-1) mod 2) = 0)]', @parser.parse('a:nth-of-type(2n+1)')
+        assert_xpath '//a[(position() mod 2) = 0]', @parser.parse('a:nth-of-type(even)')
+        assert_xpath '//a[(position() >= 1) and (((position()-1) mod 2) = 0)]', @parser.parse('a:nth-of-type(odd)')
+        assert_xpath '//a[(position() >= 3) and (((position()-3) mod 4) = 0)]', @parser.parse('a:nth-of-type(4n+3)')
+        assert_xpath '//a[(position() <= 3) and (((position()-3) mod 1) = 0)]', @parser.parse('a:nth-of-type(-1n+3)')
+        assert_xpath '//a[(position() <= 3) and (((position()-3) mod 1) = 0)]', @parser.parse('a:nth-of-type(-n+3)')
+        assert_xpath '//a[(position() >= 3) and (((position()-3) mod 1) = 0)]', @parser.parse('a:nth-of-type(1n+3)')
+        assert_xpath '//a[(position() >= 3) and (((position()-3) mod 1) = 0)]', @parser.parse('a:nth-of-type(n+3)')
+
+        assert_xpath '//a[((last()-position()+1) mod 2) = 0]', @parser.parse('a:nth-last-of-type(2n)')
+        assert_xpath '//a[((last()-position()+1) >= 1) and ((((last()-position()+1)-1) mod 2) = 0)]', @parser.parse('a:nth-last-of-type(2n+1)')
+        assert_xpath '//a[((last()-position()+1) mod 2) = 0]', @parser.parse('a:nth-last-of-type(even)')
+        assert_xpath '//a[((last()-position()+1) >= 1) and ((((last()-position()+1)-1) mod 2) = 0)]', @parser.parse('a:nth-last-of-type(odd)')
+        assert_xpath '//a[((last()-position()+1) >= 3) and ((((last()-position()+1)-3) mod 4) = 0)]', @parser.parse('a:nth-last-of-type(4n+3)')
+        assert_xpath '//a[((last()-position()+1) <= 3) and ((((last()-position()+1)-3) mod 1) = 0)]', @parser.parse('a:nth-last-of-type(-1n+3)')
+        assert_xpath '//a[((last()-position()+1) <= 3) and ((((last()-position()+1)-3) mod 1) = 0)]', @parser.parse('a:nth-last-of-type(-n+3)')
+        assert_xpath '//a[((last()-position()+1) >= 3) and ((((last()-position()+1)-3) mod 1) = 0)]', @parser.parse('a:nth-last-of-type(1n+3)')
+        assert_xpath '//a[((last()-position()+1) >= 3) and ((((last()-position()+1)-3) mod 1) = 0)]', @parser.parse('a:nth-last-of-type(n+3)')
+      end
+
+      def test_preceding_selector
+        assert_xpath  "//E/following-sibling::F",
+                      @parser.parse("E ~ F")
+
+        assert_xpath  "//E/following-sibling::F//G",
+                      @parser.parse("E ~ F G")
+      end
+
+      def test_direct_preceding_selector
+        assert_xpath  "//E/following-sibling::*[1]/self::F",
+                      @parser.parse("E + F")
+
+        assert_xpath  "//E/following-sibling::*[1]/self::F//G",
+                      @parser.parse("E + F G")
+      end
+
+      def test_attribute
+        assert_xpath  "//h1[@a = 'Tender Lovemaking']",
+                      @parser.parse("h1[a='Tender Lovemaking']")
+      end
+
+      def test_id
+        assert_xpath "//*[@id = 'foo']", @parser.parse('#foo')
+      end
+
+      def test_pseudo_class_no_ident
+        assert_xpath "//*[link(.)]", @parser.parse(':link')
+      end
+
+      def test_pseudo_class
+        assert_xpath "//a[link(.)]", @parser.parse('a:link')
+        assert_xpath "//a[visited(.)]", @parser.parse('a:visited')
+        assert_xpath "//a[hover(.)]", @parser.parse('a:hover')
+        assert_xpath "//a[active(.)]", @parser.parse('a:active')
+        assert_xpath  "//a[active(.) and contains(concat(' ', @class, ' '), ' foo ')]",
+                      @parser.parse('a:active.foo')
+      end
+
+      def test_star
+        assert_xpath "//*", @parser.parse('*')
+        assert_xpath "//*[contains(concat(' ', @class, ' '), ' pastoral ')]",
+                      @parser.parse('*.pastoral')
+      end
+
+      def test_class
+        assert_xpath  "//*[contains(concat(' ', @class, ' '), ' a ') and contains(concat(' ', @class, ' '), ' b ')]",
+                      @parser.parse('.a.b')
+        assert_xpath  "//*[contains(concat(' ', @class, ' '), ' awesome ')]",
+                      @parser.parse('.awesome')
+        assert_xpath  "//foo[contains(concat(' ', @class, ' '), ' awesome ')]",
+                      @parser.parse('foo.awesome')
+        assert_xpath  "//foo//*[contains(concat(' ', @class, ' '), ' awesome ')]",
+                      @parser.parse('foo .awesome')
+      end
+
+      def test_not_so_simple_not
+        assert_xpath "//*[@id = 'p' and not(contains(concat(' ', @class, ' '), ' a '))]",
+                     @parser.parse('#p:not(.a)')
+        assert_xpath "//p[contains(concat(' ', @class, ' '), ' a ') and not(contains(concat(' ', @class, ' '), ' b '))]",
+                     @parser.parse('p.a:not(.b)')
+        assert_xpath "//p[@a = 'foo' and not(contains(concat(' ', @class, ' '), ' b '))]",
+                     @parser.parse("p[a='foo']:not(.b)")
+      end
+
+      def test_ident
+        assert_xpath '//x', @parser.parse('x')
+      end
+
+      def test_parse_space
+        assert_xpath '//x//y', @parser.parse('x y')
+      end
+
+      def test_parse_descendant
+        assert_xpath '//x/y', @parser.parse('x > y')
+      end
+
+      def test_parse_slash
+        ## This is non standard CSS
+        assert_xpath '//x/y', @parser.parse('x/y')
+      end
+
+      def test_parse_doubleslash
+        ## This is non standard CSS
+        assert_xpath '//x//y', @parser.parse('x//y')
+      end
+
+      def test_multi_path
+        assert_xpath ['//x/y', '//y/z'], @parser.parse('x > y, y > z')
+        assert_xpath ['//x/y', '//y/z'], @parser.parse('x > y,y > z')
+        ###
+        # TODO: should we make this work?
+        # assert_xpath ['//x/y', '//y/z'], @parser.parse('x > y | y > z')
+      end
+
+      def assert_xpath expecteds, asts
+        expecteds = [expecteds].flatten
+        expecteds.zip(asts).each do |expected, actual|
+          assert_equal expected, actual.to_xpath
+        end
+      end
+    end
+  end
+end