atom-tools 0.9.0

data/test/conformance/order.rb

@@ -0,0 +1,117 @@
+require "test/unit"
+require "atom/feed"
+
+# http://www.intertwingly.net/wiki/pie/OrderConformanceTests
+
+FEED = Atom::Feed.new("http://www.snellspace.com/public/ordertest.xml")
+FEED.update!
+
+class TestOrderConformance < Test::Unit::TestCase
+  def test_0
+    entry = FEED.entries[0]
+    
+    assert_equal "tag:example.org,2006:atom/conformance/element_order/1", entry.id
+    assert_equal "Simple order, nothing fancy", entry.title.to_s
+    assert_equal "Simple ordering, nothing fancy", entry.summary.to_s
+    assert_equal Time.parse("2006-01-26T09:20:01Z"), entry.updated
+    
+    assert_alternate_href(entry, "http://www.snellspace.com/public/alternate")
+  end
+
+  def test_1
+    entry = FEED.entries[1]
+    
+    assert_equal "tag:example.org,2006:atom/conformance/element_order/2", entry.id
+    assert_equal "Same as the first, only mixed up a bit", entry.title.to_s
+    assert_equal "Same as the first, only mixed up a bit", entry.summary.to_s
+    assert_equal Time.parse("2006-01-26T09:20:02Z"), entry.updated
+    
+    assert_alternate_href(entry, "http://www.snellspace.com/public/alternate")
+  end
+
+  # Multiple alt link elements, which does your reader show?
+  def test_2
+    entry = FEED.entries[2]
+
+    # both links should be available, but it's up to you to choose which one to use 
+    assert_link_href(entry, "http://www.snellspace.com/public/alternate") { |l| l["rel"] == "alternate" and l["type"] == nil }
+    
+    assert_link_href(entry, "http://www.snellspace.com/public/alternate2") { |l| l["rel"] == "alternate" and l["type"] == "text/plain" }
+  end
+
+  # Multiple link elements, does your feed reader show the "alternate" correctly? (also checks to see if the reader is paying attention to link rel values)
+  def test_3
+    entry = FEED.entries[3]
+
+    assert_alternate_href(entry, "http://www.snellspace.com/public/alternate")
+
+    assert_link_href(entry, "http://www.snellspace.com/public/related") { |l| l["rel"] == "related" }
+
+    assert_link_href(entry, "http://www.snellspace.com/public/foo") { |l| l["rel"] == "urn:foo" }
+  end
+
+  # Entry with a source first.. does your feed reader show the right title, updated, and alt link?
+  def test_4
+    entry = FEED.entries[4]
+
+    assert_equal "tag:example.org,2006:atom/conformance/element_order/5", entry.id
+    assert_equal "Entry with a source first", entry.title.to_s
+    assert_equal Time.parse("2006-01-26T09:20:05Z"), entry.updated
+
+    assert_alternate_href(entry, "http://www.snellspace.com/public/alternate")
+  end
+
+  # Entry with a source first.. does your feed reader show the right title, updated, and alt link?
+  #  ^-- quoted summary is a typo, source is last
+  def test_5
+    entry = FEED.entries[5]
+    
+    assert_equal "tag:example.org,2006:atom/conformance/element_order/6", entry.id
+    assert_equal "Entry with a source last", entry.title.to_s
+    assert_equal Time.parse("2006-01-26T09:20:06Z"), entry.updated
+
+    assert_alternate_href(entry, "http://www.snellspace.com/public/alternate")
+  end
+
+  # Entry with a source in the middle.. does your feed reader show the right id, title, updated, and alt link?
+  def test_6
+    entry = FEED.entries[6]
+
+    assert_equal "tag:example.org,2006:atom/conformance/element_order/7", entry.id
+    assert_equal "Entry with a source in the middle", entry.title.to_s
+    assert_equal Time.parse("2006-01-26T09:20:07Z"), entry.updated
+
+    assert_alternate_href(entry, "http://www.snellspace.com/public/alternate")
+  end
+
+  # Atom elements in an extension element
+  def test_7
+    entry = FEED.entries[7]
+
+    assert_equal "tag:example.org,2006:atom/conformance/element_order/8", entry.id
+    assert_equal "Atom elements in an extension element", entry.title.to_s
+    assert_equal Time.parse("2006-01-26T09:20:08Z"), entry.updated
+    
+    assert_alternate_href(entry, "http://www.snellspace.com/public/alternate")
+  end
+  
+  # Atom elements in an extension element
+  def test_8
+    entry = FEED.entries[8]
+    
+    assert_equal "tag:example.org,2006:atom/conformance/element_order/9", entry.id
+    assert_equal "Atom elements in an extension element", entry.title.to_s
+    assert_equal Time.parse("2006-01-26T09:20:09Z"), entry.updated
+    
+    assert_alternate_href(entry, "http://www.snellspace.com/public/alternate")
+  end
+
+  def assert_link_href(entry, href, &block)
+    link = entry.links.find(&block)
+    assert_equal href, link["href"]
+  end
+
+  def assert_alternate_href(entry, href)
+    assert_link_href(entry, href) { |l| l["rel"] == "alternate" }
+  end
+end

data/test/conformance/title.rb

@@ -0,0 +1,108 @@
+require "test/unit"
+require "atom/feed"
+
+# wiki page at <http://www.intertwingly.net/wiki/pie/TitleConformanceTests>
+
+# http://atomtests.philringnalda.com/tests/item/title/html-cdata.atom
+# http://atomtests.philringnalda.com/tests/item/title/html-entity.atom
+# http://atomtests.philringnalda.com/tests/item/title/html-ncr.atom
+# http://atomtests.philringnalda.com/tests/item/title/text-cdata.atom
+# http://atomtests.philringnalda.com/tests/item/title/text-entity.atom
+# http://atomtests.philringnalda.com/tests/item/title/text-ncr.atom
+# http://atomtests.philringnalda.com/tests/item/title/xhtml-entity.atom
+# http://atomtests.philringnalda.com/tests/item/title/xhtml-ncr.atom
+
+# I make no attempt to normalize the XML from entry.title.to_s
+# therefore, the direct equalities I do below are unwise.
+# (eg. they *could* return &lt; or &#60; and still be perfectly correct)
+#
+# It shouldn't be a problem unless REXML changes what it encodes.
+class TestTitleConformance < Test::Unit::TestCase
+  def test_html_cdata
+    url = "http://atomtests.philringnalda.com/tests/item/title/html-cdata.atom"
+
+    feed = Atom::Feed.new(url)
+    feed.update!
+
+    entry = feed.entries.first
+    assert_equal "html", entry.title["type"] 
+    assert_equal "&lt;title>", entry.title.html
+  end
+
+  def test_html_entity
+    url = "http://atomtests.philringnalda.com/tests/item/title/html-entity.atom"
+    
+    feed = Atom::Feed.new(url)
+    feed.update!
+
+    entry = feed.entries.first
+    assert_equal "html", entry.title["type"] 
+    assert_equal "&lt;title>", entry.title.html
+  end
+
+  def test_html_ncr
+    url = "http://atomtests.philringnalda.com/tests/item/title/html-ncr.atom"
+
+    feed = Atom::Feed.new(url)
+    feed.update!
+
+    entry = feed.entries.first
+    assert_equal "html", entry.title["type"] 
+    assert_equal "&lt;title>", entry.title.html
+  end
+
+  def test_text_cdata
+    url = "http://atomtests.philringnalda.com/tests/item/title/text-cdata.atom"
+
+    feed = Atom::Feed.new(url)
+    feed.update!
+
+    entry = feed.entries.first
+    assert_equal "text", entry.title["type"]
+    assert_equal "&lt;title&gt;", entry.title.html
+  end
+
+  def test_text_entity
+    url = "http://atomtests.philringnalda.com/tests/item/title/text-entity.atom"
+
+    feed = Atom::Feed.new(url)
+    feed.update!
+
+    entry = feed.entries.first
+    assert_equal "text", entry.title["type"]
+    assert_equal "&lt;title&gt;", entry.title.html
+  end
+
+  def test_text_ncr
+    url = "http://atomtests.philringnalda.com/tests/item/title/text-ncr.atom"
+
+    feed = Atom::Feed.new(url)
+    feed.update!
+    
+    entry = feed.entries.first
+    assert_equal "text", entry.title["type"]
+    assert_equal "&lt;title&gt;", entry.title.html
+  end
+
+  def test_xhtml_entity
+    url = "http://atomtests.philringnalda.com/tests/item/title/xhtml-entity.atom"
+    
+    feed = Atom::Feed.new(url)
+    feed.update!
+    
+    entry = feed.entries.first
+    assert_equal "xhtml", entry.title["type"]
+    assert_equal "&lt;title>", entry.title.html
+  end
+
+  def test_xhtml_ncr
+    url = "http://atomtests.philringnalda.com/tests/item/title/xhtml-ncr.atom"
+    
+    feed = Atom::Feed.new(url)
+    feed.update!
+    
+    entry = feed.entries.first
+    assert_equal "xhtml", entry.title["type"]
+    assert_equal "&#60;title>", entry.title.html
+  end
+end

data/test/conformance/updated.rb

@@ -0,0 +1,33 @@
+require "test/unit"
+require "atom/feed"
+
+# wiki page at <http://www.intertwingly.net/wiki/pie/UpdatedConformanceTests>
+# test feed at <http://intertwingly.net/testcase/updated.atom>
+
+class TestUpdatedConformance < Test::Unit::TestCase
+  def test_it_all
+    feed = Atom::Feed.new "http://intertwingly.net/testcase/updated.atom"
+
+    assert_equal [], feed.entries
+
+    # initial filling
+    feed.update!
+    assert_equal "12 of 13 miner survive mine collapse", feed.entries.first.content.to_s.strip
+  
+    # this is an insignificant change, 
+    # (ie. atom:updated_1 == atom:updated_2),
+    # but that's for you to handle
+    feed.update!
+    assert_equal "12 of 13 miner<b>s</b> survive mine collapse", feed.entries.first.content.to_s.strip
+   
+    # now we've got a significant change 
+    feed.update!
+    assert_equal "12 of 13 miners <del>survive</del> <b>killed</b> in mine collapse", feed.entries.first.content.to_s.strip
+ 
+    # and now the feed is gone totally
+    assert_raises(Atom::FeedGone) do
+      feed.update!
+    end
+  end
+end
+ 

data/test/conformance/xhtmlcontentdiv.rb

@@ -0,0 +1,18 @@
+require "test/unit"
+require "atom/feed"
+
+class TestXHTMLContentDivConformance < Test::Unit::TestCase
+  def test_all
+    feed = Atom::Feed.new("http://www.franklinmint.fm/2006/06/divtest.atom")
+    feed.update!
+
+    assert_equal "<b>test</b> content", feed.entries.first.content.html
+
+    e = feed.entries.first.content.xml
+    assert_equal "http://www.w3.org/1999/xhtml", e.first.namespace
+    assert_equal "b", e.first.name
+    assert_equal "test", e.first.text
+
+    assert_equal " content", e.last.to_s
+  end
+end

data/test/conformance/xmlnamespace.rb

@@ -0,0 +1,54 @@
+require "test/unit"
+require "atom/feed"
+
+class TestXMLNamespaceConformance < Test::Unit::TestCase
+  def test_baseline
+    feed = Atom::Feed.new "http://plasmasturm.org/attic/atom-tests/nondefaultnamespace-baseline.atom"
+    feed.update!
+
+    assert_baseline feed
+  end
+
+  def assert_baseline feed
+    assert_equal Time.parse("2006-01-18T12:26:54+01:00"), feed.updated
+    assert_equal "http://example.org/tests/namespace/result.html", feed.links.first["href"]
+
+    assert_equal "urn:uuid:f8195e66-863f-11da-9fcb-dd680b0526e0", feed.id
+
+    assert_equal "Aristotle Pagaltzis", feed.authors.first.name
+    assert_equal "pagaltzis@gmx.de", feed.authors.first.email
+
+    entry = feed.entries.first
+
+    assert_equal "urn:uuid:1225c695-cfb8-4ebb-aaaa-80da344efa6a", entry.id
+
+    assert_equal Time.parse("2006-01-18T12:26:54+01:00"), entry.updated
+    assert_equal "http://example.org/tests/namespace/result.html", entry.links.first["href"]
+
+    # XXX content.html should strip namespace prefixes
+    e = entry.content.xml
+    
+    assert_equal "http://www.w3.org/1999/xhtml", e[1].namespace
+    assert_equal "p", e[1].name
+    assert_equal "For information, see:", e[1].text
+  end
+
+  def test_1
+    feed = Atom::Feed.new "http://plasmasturm.org/attic/atom-tests/nondefaultnamespace.atom"
+    feed.update!
+
+    assert_baseline feed
+  end
+
+  def test_2
+    feed = Atom::Feed.new "http://plasmasturm.org/attic/atom-tests/nondefaultnamespace-xhtml.atom"
+    feed.update!
+
+    assert_baseline feed
+  end
+
+  def test_3
+    assert(false, "I haven't written the last test")
+    # XXX FINISHME
+  end
+end

data/test/runtests.rb

@@ -0,0 +1,14 @@
+#!/usr/bin/ruby
+
+$LOAD_PATH << File.expand_path(File.dirname(__FILE__) + "/../lib")
+
+require "test/unit"
+
+Dir["test_*.rb"].each do |test|
+  begin
+    require test
+  rescue LoadError
+    puts "skipping #{test} (LoadError)"
+    next
+  end
+end

data/test/test_constructs.rb

@@ -0,0 +1,91 @@
+require "test/unit"
+require "atom/entry"
+
+class ConstructTest < Test::Unit::TestCase
+  def test_text_construct_text
+    entry = Atom::Entry.new
+
+    assert_nil(entry.title)
+    assert_equal("", entry.title.to_s)
+
+    entry.title = "<3"
+
+    assert_equal "text", entry.title["type"]
+    assert_equal "<3", entry.title.to_s
+    assert_equal "&lt;3", entry.title.html
+
+    assert_equal "'<3'#text", entry.title.inspect
+
+    title = entry.to_xml.root.children.first
+    assert_equal "<3", title.text
+  end
+
+  def test_text_construct_html
+    entry = Atom::Entry.new
+
+=begin
+    entry.title = "<3"
+    entry.title["type"] = "html"
+
+    assert_equal "html", entry.title["type"]
+    assert_equal "<3", entry.title.to_s
+    assert_equal "&lt;3", entry.title.html
+    
+    title = entry.to_xml.root.children.first
+    assert_equal "<3", title.text
+=end
+
+    entry.title = "<p>pi &lt; 4?"
+    entry.title["type"] = "html"
+
+    assert_equal "<p>pi &lt; 4?", entry.title.to_s
+    assert_equal "<p>pi &lt; 4?", entry.title.html
+  end
+
+  def test_text_construct_xhtml
+    entry = Atom::Entry.new
+
+    entry.title = "<3"
+    assert_raises(RuntimeError) { entry.title["type"] = "xhtml" }
+   
+    assert_raises(RuntimeError) do
+      entry.title["type"] = "application/xhtml+xml"
+    end
+
+    entry.title = REXML::Document.new("<div xmlns='http://www.w3.org/1999/xhtml'>&lt;3</div>").root
+    entry.title["type"] = "xhtml"
+
+    assert_equal "&lt;3", entry.title.to_s
+    assert_equal "&lt;3", entry.title.html
+
+    entry.title = "&lt;3"
+    entry.title["type"] = "xhtml"
+
+    assert_equal "&lt;3", entry.title.to_s
+    assert_equal "&lt;3", entry.title.html
+
+    entry.title = "<em>goodness</em> gracious"
+    entry.title["type"] = "xhtml"
+
+    assert_equal "<em>goodness</em> gracious", entry.title.to_s
+    assert_equal "<em>goodness</em> gracious", entry.title.html
+  end
+
+  def test_content
+    entry = Atom::Entry.new
+
+    entry.content = ""
+    entry.content["src"] = "http://example.com/example.svg"
+    entry.content["type"] = "image/svg+xml"
+
+    assert_equal("", entry.content.to_s)
+  end
+
+  require "date"
+  def test_date_construct
+    today = Date.today
+    time = Atom::Time.new today
+
+    assert_match(/^#{today}T00:00:00/, time.to_s)
+  end
+end

data/test/test_feed.rb

@@ -0,0 +1,128 @@
+require "test/unit"
+
+require "atom/feed"
+require "webrick"
+
+class AtomFeedTest < Test::Unit::TestCase
+  def setup
+    @http = Atom::HTTP.new
+    @port = rand(1024) + 1024
+    @s = WEBrick::HTTPServer.new :Port => @port, 
+               :Logger => WEBrick::Log.new($stderr, WEBrick::Log::FATAL), 
+               :AccessLog => []
+
+    @test_feed =<<END
+<?xml version="1.0" encoding="utf-8"?>
+<feed xmlns="http://www.w3.org/2005/Atom">
+  <title>Example Feed</title>
+  <link href="http://example.org/"/>
+  <updated>2003-12-13T18:30:02Z</updated>
+  <author>
+    <name>John Doe</name>
+  </author>
+  <id>urn:uuid:60a76c80-d399-11d9-b93C-0003939e0af6</id>
+
+  <entry>
+    <title>Atom-Powered Robots Run Amok</title>
+    <link href="http://example.org/2003/12/13/atom03"/>
+    <id>urn:uuid:1225c695-cfb8-4ebb-aaaa-80da344efa6a</id>
+    <updated>2003-12-13T18:30:02Z</updated>
+    <summary>Some text.</summary>
+  </entry>
+</feed>
+END
+  end
+
+  def test_merge
+    feed1 = Atom::Feed.new
+   
+    feed1.title = "title"
+
+    feed1.subtitle = "<br>"
+    feed1.subtitle["type"] = "html"
+
+    a = feed1.authors.new
+    a.name = "test"
+
+    feed2 = Atom::Feed.new
+
+    feed = feed1.merge(feed2)
+
+    assert_equal "text", feed.title["type"]
+    assert_equal "title", feed.title.to_s 
+
+    assert_equal "html", feed.subtitle["type"]
+    assert_equal "<br>", feed.subtitle.to_s
+
+    assert_equal 1, feed.authors.length
+    assert_equal "test", feed.authors.first.name
+  end
+
+  def test_update
+    @s.mount_proc("/") do |req,res|
+      res.content_type = "application/atom+xml"
+      res.body = @test_feed
+
+      @s.stop
+    end
+
+    feed = Atom::Feed.new "http://localhost:#{@port}/"
+
+    assert_equal nil, feed.title
+    assert_equal nil, feed.id
+    assert_equal [], feed.entries
+    
+    one_shot
+
+    feed.update!
+
+    assert_equal "Example Feed", feed.title.to_s
+    assert_equal "urn:uuid:60a76c80-d399-11d9-b93C-0003939e0af6", feed.id
+    assert_equal 1, feed.entries.length
+  end
+
+  def test_conditional_get
+    @s.mount_proc("/") do |req,res|
+      assert_nil req["If-None-Match"]
+      assert_nil req["If-Modified-Since"]
+
+      res["Etag"] = '"xyzzy"'
+      res["Last-Modified"] = 'Wed, 15 Nov 1995 04:58:08 GMT'
+      res.content_type = "application/atom+xml"
+      res.body = @test_feed
+
+      @s.stop
+    end
+
+    feed = Atom::Feed.new "http://localhost:#{@port}/"
+
+    assert_equal 0, feed.entries.length
+    assert_equal nil, feed.etag
+    assert_equal nil, feed.last_modified
+
+    one_shot
+
+    feed.update!
+
+    assert_equal 1, feed.entries.length
+    assert_equal '"xyzzy"', feed.etag
+    assert_equal 'Wed, 15 Nov 1995 04:58:08 GMT', feed.last_modified
+
+    @s.mount_proc("/") do |req,res|
+      assert_equal '"xyzzy"', req["If-None-Match"]
+      assert_equal 'Wed, 15 Nov 1995 04:58:08 GMT', req["If-Modified-Since"]
+
+      res.status = 304
+      res.body = "this hasn't been modified"
+      
+      @s.stop
+    end
+
+    one_shot
+    feed.update!
+
+    assert_equal 1, feed.entries.length
+  end
+
+  def one_shot; Thread.new { @s.start }; end
+end