247 lines
10 KiB
Ruby
Executable file
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—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’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—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’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
|