instiki/test/unit/revision_test.rb
2005-01-16 22:16:24 +00:00

247 lines
10 KiB
Ruby
Executable file

require "web"
require "test/unit"
require "revision"
class WebStub < Web;
attr_accessor :markup
def pages() PagesStub.new end
def safe_mode() false end
end
class PagesStub
def [](wiki_word) %w( MyWay ThatWay SmartEngine ).include?(wiki_word) end
end
class PageStub
attr_accessor :web, :revisions
def name() 'page' end
end
class RevisionTest < Test::Unit::TestCase
def setup
@page = PageStub.new
@web = WebStub.new
@page.web = @web
@web.markup = :textile
@revision = Revision.new(@page, 1,
'HisWay would be MyWay in kinda ThatWay in HisWay though MyWay \\OverThere -- ' +
'see SmartEngine in that SmartEngineGUI',
Time.local(2004, 4, 4, 16, 50), 'DavidHeinemeierHansson')
@revision_with_auto_links = Revision.new(@page, 1,
"http://www.loudthinking.com/ points to ThatWay from david@loudthinking.com",
Time.local(2004, 4, 4, 16, 50), 'DavidHeinemeierHansson')
@revision_with_aliased_links = Revision.new(@page, 1,
'Would a [[SmartEngine|clever motor]] go by any other name?',
Time.local(2004, 4, 4, 16, 50), 'MarkReid')
@revision_with_wiki_word_in_em = Revision.new(@page, 1, '_should we go ThatWay or ThisWay _',
Time.local(2004, 4, 4, 16, 50), 'MarkReid')
@revision_with_pre_blocks = Revision.new(@page, 1,
'A <code>class SmartEngine end</code> would not mark up <pre>CodeBlocks</pre>',
Time.local(2004, 4, 4, 16, 50), 'MarkReid')
@revision_with_wikiword_in_tag = Revision.new(@page, 1,
'That is some <em style=\"WikiWord\">Stylish Emphasis</em>',
Time.local(2004, 4, 4, 16, 50), 'MarkReid')
@revision_with_autolink_in_parentheses = Revision.new(
@page, 1, 'The W3C body (http://www.w3c.org) sets web standards',
Time.local(2004, 4, 4, 16, 50), 'MarkReid')
@revision_with_link_in_parentheses = Revision.new(
@page, 1,
'Instiki is a "Wiki Clone":http://www.c2.com/cgi/wiki?WikiWikiClones ' +
'("What is a wiki?":http://wiki.org/wiki.cgi?WhatIsWiki) that\'s so easy to setup',
Time.local(2004, 4, 4, 16, 50), 'MarkReid'
)
@revision_with_image_link = Revision.new(@page, 1,
'This !http://hobix.com/sample.jpg! is a Textile image link.',
Time.local(2004, 4, 4, 16, 50), 'MarkReid')
@revision_with_nowiki_text = Revision.new(@page, 1,
'Do not mark up <nowiki>[[this text]]</nowiki> or <nowiki>http://www.thislink.com</nowiki>.',
Time.local(2004, 4, 4, 16, 50), 'MarkReid')
@revision_with_bracketted_wiki_word = Revision.new(@page, 1,
'This is a WikiWord and a tricky name [[Sperberg-McQueen]].',
Time.local(2004, 4, 4, 16, 50), 'MarkReid')
end
def test_wiki_words
assert_equal %w( HisWay MyWay SmartEngine SmartEngineGUI ThatWay ), @revision.wiki_words.sort
end
def test_existing_pages
assert_equal %w( MyWay SmartEngine ThatWay ), @revision.existing_pages.sort
end
def test_unexisting_pages
assert_equal %w( HisWay SmartEngineGUI ), @revision.unexisting_pages.sort
end
def test_content_with_wiki_links
assert_equal '<p><span class="newWikiWord">His Way<a href="../show/HisWay">?</a></span> ' +
'would be <a class="existingWikiWord" href="../show/MyWay">My Way</a> in kinda ' +
'<a class="existingWikiWord" href="../show/ThatWay">That Way</a> in ' +
'<span class="newWikiWord">His Way<a href="../show/HisWay">?</a></span> ' +
'though <a class="existingWikiWord" href="../show/MyWay">My Way</a> OverThere&#8212;see ' +
'<a class="existingWikiWord" href="../show/SmartEngine">Smart Engine</a> in that ' +
'<span class="newWikiWord">Smart Engine <span class="caps">GUI</span>' +
'<a href="../show/SmartEngineGUI">?</a></span></p>',
@revision.display_content
end
def test_bluecloth
@web.markup = :markdown
@revision = Revision.new(@page, 1, "My Headline\n===========\n\n that SmartEngineGUI",
Time.local(2004, 4, 4, 16, 50), 'DavidHeinemeierHansson')
@revision_with_code_block = Revision.new(@page, 1,
[ 'This is a code block:',
'',
' def a_method(arg)',
' return ThatWay',
'',
'Nice!'].join("\n"),
Time.local(2004, 4, 4, 16, 50),
'MarkReid'
)
assert_equal %{<h1>My Headline</h1>\n\n<p>that <span class="newWikiWord">} +
%{Smart Engine GUI<a href="../show/SmartEngineGUI">?</a></span></p>},
@revision.display_content
assert_equal %{<p>This is a code block:</p>\n\n<pre><code>def a_method(arg)\n} +
%{return ThatWay\n</code></pre>\n\n<p>Nice!</p>},
@revision_with_code_block.display_content
end
def test_rdoc
@web.markup = :rdoc
@revision = Revision.new(@page, 1, '+hello+ that SmartEngineGUI',
Time.local(2004, 4, 4, 16, 50), 'DavidHeinemeierHansson')
assert_equal "<tt>hello</tt> that <span class=\"newWikiWord\">Smart Engine GUI' +
"<a href=\"../show/SmartEngineGUI\">?</a></span>\n\n", @revision.display_content
end
def test_content_with_auto_links
assert_equal '<p><a href="http://www.loudthinking.com/">http://www.loudthinking.com/</a> ' +
'points to <a class="existingWikiWord" href="../show/ThatWay">That Way</a> from ' +
'<a href="mailto:david@loudthinking.com">david@loudthinking.com</a></p>',
@revision_with_auto_links.display_content
end
def test_content_with_aliased_links
assert_equal '<p>Would a <a class="existingWikiWord" href="../show/SmartEngine">clever motor' +
'</a> go by any other name?</p>', @revision_with_aliased_links.display_content
end
def test_content_with_wikiword_in_em
assert_equal '<p><em>should we go <a class="existingWikiWord" href="../show/ThatWay">' +
'That Way</a> or <span class="newWikiWord">This Way<a href="../show/ThisWay">?</a>' +
'</span> </em></p>', @revision_with_wiki_word_in_em.display_content
end
def test_content_with_wikiword_in_tag
assert_equal '<p>That is some <em style="WikiWord">Stylish Emphasis</em></p>',
@revision_with_wikiword_in_tag.display_content
end
def test_content_with_pre_blocks
assert_equal 'A <code>class SmartEngine end</code> would not mark up <pre>CodeBlocks</pre>',
@revision_with_pre_blocks.display_content
end
def test_content_with_autolink_in_parentheses
assert_equal '<p>The <span class="caps">W3C</span> body (<a href="http://www.w3c.org">' +
'http://www.w3c.org</a>) sets web standards</p>',
@revision_with_autolink_in_parentheses.display_content
end
def test_content_with_link_in_parentheses
assert_equal '<p>Instiki is a <a href="http://www.c2.com/cgi/wiki?WikiWikiClones">Wiki Clone' +
'</a> (<a href="http://wiki.org/wiki.cgi?WhatIsWiki">What is a wiki?</a>) that&#8217;s ' +
'so easy to setup</p>', @revision_with_link_in_parentheses.display_content
end
def test_content_with_image_link
assert_equal '<p>This <img src="http://hobix.com/sample.jpg" alt="" /> is a Textile image ' +
'link.</p>', @revision_with_image_link.display_content
end
def test_content_with_nowiki_text
assert_equal '<p>Do not mark up [[this text]] or http://www.thislink.com.</p>',
@revision_with_nowiki_text.display_content
end
def test_content_with_bracketted_wiki_word
@web.brackets_only = true
assert_equal '<p>This is a WikiWord and a tricky name <span class="newWikiWord">' +
'Sperberg-McQueen<a href="../show/Sperberg-McQueen">?</a></span>.</p>',
@revision_with_bracketted_wiki_word.display_content
end
def test_content_for_export
assert_equal '<p><span class="newWikiWord">His Way</span> would be ' +
'<a class="existingWikiWord" href="MyWay.html">My Way</a> in kinda ' +
'<a class="existingWikiWord" href="ThatWay.html">That Way</a> in ' +
'<span class="newWikiWord">His Way</span> though ' +
'<a class="existingWikiWord" href="MyWay.html">My Way</a> OverThere&#8212;see ' +
'<a class="existingWikiWord" href="SmartEngine.html">Smart Engine</a> in that ' +
'<span class="newWikiWord">Smart Engine <span class="caps">GUI</span></span></p>',
@revision.display_content_for_export
end
def test_double_replacing
@revision.content = "VersionHistory\r\n\r\ncry VersionHistory"
assert_equal '<p><span class="newWikiWord">Version History' +
"<a href=\"../show/VersionHistory\">?</a></span></p>\n\n\t<p>cry " +
'<span class="newWikiWord">Version History<a href="../show/VersionHistory">?</a>' +
'</span></p>',
@revision.display_content
@revision.clear_display_cache
@revision.content = "f\r\nVersionHistory\r\n\r\ncry VersionHistory"
assert_equal "<p>f<br />\n<span class=\"newWikiWord\">Version History" +
"<a href=\"../show/VersionHistory\">?</a></span></p>\n\n\t<p>cry " +
"<span class=\"newWikiWord\">Version History<a href=\"../show/VersionHistory\">?</a>" +
"</span></p>",
@revision.display_content
end
def test_difficult_wiki_words
@revision.content = "[[It's just awesome GUI!]]"
assert_equal "<p><span class=\"newWikiWord\">It&#8217;s just awesome <span class=\"caps\">GUI" +
"</span>!<a href=\"../show/It%27s+just+awesome+GUI%21\">?</a></span></p>",
@revision.display_content
end
def test_revisions_diff
page = PageStub.new
web = WebStub.new
web.markup = :textile
page.web = web
page.revisions = [ 0 ]
page.revisions << Revision.new(page, 1, 'What a blue and lovely morning',
Time.local(2004, 4, 4, 16, 50), 'DavidHeinemeierHansson')
page.revisions << Revision.new(page, 2, 'What a red and lovely morning today',
Time.local(2004, 4, 4, 16, 50), 'DavidHeinemeierHansson')
assert_equal "<p>What a <del class=\"diffmod\">blue </del><ins class=\"diffmod\">red " +
"</ins>and lovely <del class=\"diffmod\">morning</del><ins class=\"diffmod\">morning " +
"today</ins></p>", page.revisions.last.display_diff
end
end