reapack-index 1.0beta2

data/test/test_metadata.rb

@@ -0,0 +1,403 @@
+require File.expand_path '../helper', __FILE__
+
+class TestMetadata < MiniTest::Test
+  include XMLHelper
+
+  def test_website_link
+    before = make_node '<index/>'
+    after = <<-XML
+<index>
+  <metadata>
+    <link rel="website">http://cfillion.tk</link>
+  </metadata>
+</index>
+    XML
+
+    md = ReaPack::Index::Metadata.new before
+    assert_empty md.links(:website)
+
+    link = md.push_link :website, 'http://cfillion.tk'
+    assert_equal true, link.is_new?
+    assert_equal true, link.modified?
+
+    links = md.links :website
+    assert_equal 1, links.size
+    assert_equal links.first.url, links.first.name
+    assert_equal 'http://cfillion.tk', links.first.url
+
+    assert_equal false, links.first.is_new?
+    assert_equal false, links.first.modified?
+
+    assert_empty md.links(:donation)
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_donation_link
+    before = make_node '<index/>'
+    after = <<-XML
+<index>
+  <metadata>
+    <link rel="donation">http://cfillion.tk</link>
+  </metadata>
+</index>
+    XML
+
+    md = ReaPack::Index::Metadata.new before
+    assert_empty md.links(:donation)
+
+    md.push_link :donation, 'http://cfillion.tk'
+
+    links = md.links :donation
+    assert_equal 1, links.size
+    assert_equal links.first.url, links.first.name
+    assert_equal 'http://cfillion.tk', links.first.url
+
+    assert_empty md.links(:website)
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_invalid_type
+    md = ReaPack::Index::Metadata.new make_node('<index/>')
+
+    assert_raises ArgumentError do
+      md.links :hello
+    end
+
+    assert_raises ArgumentError do
+      md.push_link :hello, 'world'
+    end
+
+    assert_raises ArgumentError do
+      md.remove_link :hello, 'world'
+    end
+  end
+
+  def test_link_label
+    before = make_node '<index/>'
+    after = <<-XML
+<index>
+  <metadata>
+    <link rel="website" href="http://cfillion.tk/">Hello World</link>
+  </metadata>
+</index>
+    XML
+
+    md = ReaPack::Index::Metadata.new before
+    md.push_link :website, 'Hello World', 'http://cfillion.tk/'
+
+    links = md.links :website
+    assert_equal 1, links.size
+    assert_equal 'Hello World', links.first.name
+    assert_equal 'http://cfillion.tk/', links.first.url
+
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_read_links
+    node = make_node <<-XML
+<index version="1">
+  <metadata>
+    <link rel="website" href="http://cfillion.tk/" />
+    <link rel="website" href="https://github.com/cfillion"></link>
+    <link rel="website">http://twitter.com/cfi30</link>
+    <link>http://google.com</link>
+    <link />
+    <link rel="donation" href="http://paypal.com">Donate</link>
+    <link rel="website" href="/"></link>
+  </metadata>
+</index>
+    XML
+
+    md = ReaPack::Index::Metadata.new node
+
+    links = md.links :website
+    assert_equal 4, links.size
+    assert_equal 'http://cfillion.tk/', links[0].name
+    assert_equal links[0].name, links[0].url
+    assert_equal 'https://github.com/cfillion', links[1].name
+    assert_equal links[1].name, links[1].url
+    assert_equal 'http://twitter.com/cfi30', links[2].name
+    assert_equal links[2].name, links[2].url
+    assert_equal 'http://google.com', links[3].name
+    assert_equal links[3].name, links[3].url
+  end
+
+  def test_invalid_link
+    after = '<index/>'
+    before = make_node after
+
+    md = ReaPack::Index::Metadata.new before
+
+    error = assert_raises ReaPack::Index::Error do
+      md.push_link :website, 'hello'
+    end
+
+    assert_equal 'invalid URL: hello', error.message
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_remove_link
+    before = make_node <<-XML
+<index>
+  <metadata>
+    <link rel="website" href="http://cfillion.tk" />
+    <link rel="website" href="http://google.com">Search</link>
+    <link rel="donation" href="http://paypal.com">Donate</link>
+  </metadata>
+</index>
+    XML
+
+    after = '<index/>'
+
+    md = ReaPack::Index::Metadata.new before
+    assert_equal 2, md.links(:website).size
+
+    md.remove_link :website, 'http://cfillion.tk'
+    assert_equal 1, md.links(:website).size
+
+    md.remove_link :website, 'Search'
+    assert_equal 0, md.links(:website).size
+
+    assert_equal 1, md.links(:donation).size
+    md.remove_link :donation, 'Donate'
+    assert_equal 0, md.links(:donation).size
+
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_remove_link_inexistant
+    md = ReaPack::Index::Metadata.new make_node('<index/>')
+
+    error = assert_raises ReaPack::Index::Error do
+      md.remove_link :website, 'hello'
+    end
+
+    assert_equal 'no such website link: hello', error.message
+  end
+
+  def test_replace_link_url
+    before = make_node <<-XML
+<index>
+  <metadata>
+    <link rel="website" href="http://cfillion.tk"/>
+    <link rel="website" href="http://cfillion.no-ip.org">Test</link>
+  </metadata>
+</index>
+    XML
+
+    after = <<-XML
+<index>
+  <metadata>
+    <link rel="website">http://cfillion.tk</link>
+    <link rel="website" href="http://cfillion.tk">Test</link>
+  </metadata>
+</index>
+    XML
+
+    md = ReaPack::Index::Metadata.new before
+
+    link1 = md.push_link :website, 'http://cfillion.tk'
+    assert_equal false, link1.is_new?
+    assert_equal false, link1.modified?
+
+    link2 = md.push_link :website, 'Test', 'http://cfillion.tk'
+    assert_equal false, link2.is_new?
+    assert_equal true, link2.modified?
+
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_replace_link_name
+    before = make_node <<-XML
+<index>
+  <metadata>
+    <link rel="website" href="http://cfillion.tk">A</link>
+    <link rel="website">http://google.com</link>
+  </metadata>
+</index>
+    XML
+
+    after = <<-XML
+<index>
+  <metadata>
+    <link rel="website">http://cfillion.tk</link>
+    <link rel="website" href="http://google.com">B</link>
+  </metadata>
+</index>
+    XML
+
+    md = ReaPack::Index::Metadata.new before
+
+    # remove name
+    link1 = md.push_link :website, 'http://cfillion.tk'
+    assert_equal false, link1.is_new?
+    assert_equal true, link1.modified?
+
+    # insert name
+    link2 = md.push_link :website, 'B', 'http://google.com'
+    assert_equal false, link2.is_new?
+    assert_equal true, link2.modified?
+
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_read_description
+    md = ReaPack::Index::Metadata.new make_node <<-XML
+<index>
+  <metadata>
+    <description><![CDATA[Hello World]]></description>
+  </metadata>
+</index>
+    XML
+
+    assert_equal 'Hello World', md.description
+  end
+
+  def test_read_description_empty
+    md = ReaPack::Index::Metadata.new make_node <<-XML
+<index>
+  <metadata/>
+</index>
+    XML
+
+    assert_empty md.description
+  end
+
+  def test_write_description
+    rtf = <<-RTF
+{\\rtf1\\ansi\\deff0{\\fonttbl{\\f0 \\fswiss Helvetica;}{\\f1 Courier;}}
+{\\colortbl;\\red255\\green0\\blue0;\\red0\\green0\\blue255;}
+\\widowctrl\\hyphauto
+
+{\\pard \\ql \\f0 \\sa180 \\li0 \\fi0 Hello World\\par}
+}
+    RTF
+
+    before = make_node '<index/>'
+    after = <<-XML
+<index>
+  <metadata>
+    <description><![CDATA[#{rtf}]]></description>
+  </metadata>
+</index>
+    XML
+
+    md = ReaPack::Index::Metadata.new before
+    assert_empty md.description
+
+    md.description = 'Hello World'
+    assert_equal rtf, md.description
+
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_write_description_rtf
+    rtf = <<-RTF
+{\\rtf1\\ansi\\deff0{\\fonttbl{\\f0 \\fswiss Helvetica;}{\\f1 Courier;}}
+{\\colortbl;\\red255\\green0\\blue0;\\red0\\green0\\blue255;}
+\\widowctrl\\hyphauto
+
+{\\pard \\ql \\f0 \\sa180 \\li0 \\fi0 Hello World\\par}
+}
+    RTF
+
+    before = make_node '<index/>'
+    after = <<-XML
+<index>
+  <metadata>
+    <description><![CDATA[#{rtf}]]></description>
+  </metadata>
+</index>
+    XML
+
+    md = ReaPack::Index::Metadata.new before
+    assert_empty md.description
+
+    md.description = rtf
+    assert_equal rtf, md.description
+
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_replace_description
+    rtf = <<-RTF
+    RTF
+
+    before = make_node <<-XML
+<index>
+  <metadata>
+    <description><![CDATA[{\\rtf1\\ansi\\deff0{\\fonttbl{\\f0 \\fswiss Helvetica;}{\\f1 Courier;}}
+{\\colortbl;\\red255\\green0\\blue0;\\red0\\green0\\blue255;}
+\\widowctrl\\hyphauto
+
+{\\pard \\ql \\f0 \\sa180 \\li0 \\fi0 Hello World\\par}
+}
+]]></description>
+  </metadata>
+</index>
+    XML
+
+    after = <<-XML
+<index>
+  <metadata>
+    <description><![CDATA[{\\rtf1\\ansi\\deff0{\\fonttbl{\\f0 \\fswiss Helvetica;}{\\f1 Courier;}}
+{\\colortbl;\\red255\\green0\\blue0;\\red0\\green0\\blue255;}
+\\widowctrl\\hyphauto
+
+{\\pard \\ql \\f0 \\sa180 \\li0 \\fi0 Chunky Bacon\\par}
+}
+]]></description>
+  </metadata>
+</index>
+    XML
+
+    md = ReaPack::Index::Metadata.new before
+    md.description = 'Chunky Bacon'
+
+    assert_equal after.chomp, before.to_s
+  end
+
+  def test_remove_description
+    rtf = <<-RTF
+{\\rtf1\\ansi\\deff0{\\fonttbl{\\f0 \\fswiss Helvetica;}{\\f1 Courier;}}
+{\\colortbl;\\red255\\green0\\blue0;\\red0\\green0\\blue255;}
+\\widowctrl\\hyphauto
+
+{\\pard \\ql \\f0 \\sa180 \\li0 \\fi0 Hello World\\par}
+}
+    RTF
+
+    before = make_node <<-XML
+<index>
+  <metadata>
+    <description><![CDATA[#{rtf}]]></description>
+  </metadata>
+</index>
+    XML
+
+    after = '<index/>'
+
+    md = ReaPack::Index::Metadata.new before
+    refute_empty md.description
+
+    md.description = String.new
+    assert_empty md.description
+
+    assert_equal after, before.to_s
+  end
+
+  def test_pandoc_not_found
+    old_path = ENV['PATH']
+    ENV['PATH'] = String.new
+
+    md = ReaPack::Index::Metadata.new make_node('<index/>')
+
+    error = assert_raises ReaPack::Index::Error do
+      md.description = 'test'
+    end
+
+    assert_match /pandoc executable cannot be found in your PATH/i, error.message
+  ensure
+    ENV['PATH'] = old_path
+  end
+end

data/test/test_named_node.rb

@@ -0,0 +1,100 @@
+require File.expand_path '../helper', __FILE__
+
+class TestNamedNode < MiniTest::Test
+  include XMLHelper
+
+  def test_no_tag_set
+    mock = Class.new ReaPack::Index::NamedNode
+    assert_raises { mock.tag }
+  end
+
+  def test_find_in
+    node = make_node '<root><node name="hello"/><node name="world"/></root>'
+    mock = Class.new(ReaPack::Index::NamedNode) { @tag = 'node' }
+
+    instance = mock.find_in node, 'hello'
+    assert_nil mock.find_in node, 'bacon'
+
+    assert_kind_of mock, instance
+    assert_equal 'hello', instance.name
+    refute instance.is_new?, 'instance is new'
+    refute instance.modified?, 'instance is modified'
+  end
+
+  def test_find_all
+    node = make_node '<root><node name="hello"/><node name="world"/></root>'
+    mock = Class.new(ReaPack::Index::NamedNode) { @tag = 'node' }
+
+    instances = mock.find_all node
+    assert_equal 2, instances.size
+
+    assert_kind_of mock, instances.first
+    assert_equal 'hello', instances.first.name
+    refute instances.first.is_new?, 'instance is new'
+
+    assert_equal 'world', instances.last.name
+  end
+
+  def test_get_readonly
+    node = make_node '<root><node name="hello"/></root>'
+    mock = Class.new(ReaPack::Index::NamedNode) { @tag = 'node' }
+
+    instance = mock.get 'hello', node, false
+    assert_kind_of mock, instance
+
+    assert_nil mock.get 'world', node, false
+  end
+
+  def test_get_create
+    node = make_node '<root></root>'
+    mock = Class.new(ReaPack::Index::NamedNode) { @tag = 'node' }
+
+    instance = mock.get 'hello', node, true
+
+    assert_kind_of mock, instance
+    assert instance.is_new?, 'instance is not new'
+    assert instance.modified?, 'instance is not modified'
+  end
+
+  def test_get_null_parent
+    mock = Class.new(ReaPack::Index::NamedNode) { @tag = 'node' }
+
+    assert_nil mock.get 'hello', nil, false
+  end
+
+  def test_empty
+    node = make_node <<-XML
+    <root>
+      <node name="first"/>
+      <node name="second"><something/></node>
+    </root>
+    XML
+
+    mock = Class.new(ReaPack::Index::NamedNode) { @tag = 'node' }
+
+    first = mock.find_in node, 'first'
+    assert first.empty?, 'first is not empty'
+
+    second = mock.find_in node, 'second'
+    refute second.empty?, 'second is empty'
+  end
+
+  def test_remove
+    node = make_node '<root><node name="test"/></root>'
+    mock = Class.new(ReaPack::Index::NamedNode) { @tag = 'node' }
+
+    instance = mock.find_in node, 'test'
+
+    assert_equal 1, node.children.size
+    instance.remove
+    assert_equal 0, node.children.size
+  end
+
+  def test_children
+    node = make_node '<root><node name="test"><a/><b/></root>'
+    mock = Class.new(ReaPack::Index::NamedNode) { @tag = 'node' }
+
+    instance = mock.find_in node, 'test'
+    assert_equal node.css('a').inspect, instance.children('a').inspect
+  end
+end