2007-01-22 14:43:50 +01:00
require File . expand_path ( File . dirname ( __FILE__ ) + '/../test_helper' )
2009-02-04 21:26:08 +01:00
class PageTest < ActiveSupport :: TestCase
2007-01-22 14:43:50 +01:00
fixtures :webs , :pages , :revisions , :system
def setup
@page = pages ( :first_page )
end
def test_lock
assert ! @page . locked? ( Time . local ( 2004 , 4 , 4 , 16 , 50 ) )
@page . lock ( Time . local ( 2004 , 4 , 4 , 16 , 30 ) , " DavidHeinemeierHansson " )
assert @page . locked? ( Time . local ( 2004 , 4 , 4 , 16 , 50 ) )
assert ! @page . locked? ( Time . local ( 2004 , 4 , 4 , 17 , 1 ) )
@page . unlock
assert ! @page . locked? ( Time . local ( 2004 , 4 , 4 , 16 , 50 ) )
end
def test_lock_duration
@page . lock ( Time . local ( 2004 , 4 , 4 , 16 , 30 ) , " DavidHeinemeierHansson " )
assert_equal 15 , @page . lock_duration ( Time . local ( 2004 , 4 , 4 , 16 , 45 ) )
end
def test_plain_name
assert_equal " First Page " , @page . plain_name
end
def test_revise
2009-06-03 05:17:15 +02:00
@page . revise ( 'HisWay would be MyWay in kinda lame' , @page . name , Time . local ( 2004 , 4 , 4 , 16 , 52 ) ,
2007-01-22 14:43:50 +01:00
'MarianneSyhler' , test_renderer )
@page . reload
assert_equal 2 , @page . revisions . length , 'Should have two revisions'
assert_equal 'MarianneSyhler' , @page . current_revision . author . to_s ,
'Mary should be the author now'
assert_equal 'DavidHeinemeierHansson' , @page . revisions . first . author . to_s ,
'David was the first author'
end
def test_revise_continous_revision
2009-06-03 05:17:15 +02:00
@page . revise ( 'HisWay would be MyWay in kinda lame' , @page . name , Time . local ( 2004 , 4 , 4 , 16 , 55 ) ,
2007-01-22 14:43:50 +01:00
'MarianneSyhler' , test_renderer )
@page . reload
assert_equal 2 , @page . revisions . length
assert_equal 'HisWay would be MyWay in kinda lame' , @page . content
# consecutive revision by the same author within 30 minutes doesn't create a new revision
2009-06-03 05:17:15 +02:00
@page . revise ( 'HisWay would be MyWay in kinda update' , @page . name , Time . local ( 2004 , 4 , 4 , 16 , 57 ) ,
2007-01-22 14:43:50 +01:00
'MarianneSyhler' , test_renderer )
@page . reload
assert_equal 2 , @page . revisions . length
assert_equal 'HisWay would be MyWay in kinda update' , @page . content
assert_equal Time . local ( 2004 , 4 , 4 , 16 , 57 ) , @page . revised_at
# but consecutive revision by another author results in a new revision
2009-06-03 05:17:15 +02:00
@page . revise ( 'HisWay would be MyWay in the house' , @page . name , Time . local ( 2004 , 4 , 4 , 16 , 58 ) ,
2007-01-22 14:43:50 +01:00
'DavidHeinemeierHansson' , test_renderer )
@page . reload
assert_equal 3 , @page . revisions . length
assert_equal 'HisWay would be MyWay in the house' , @page . content
# consecutive update after 30 minutes since the last one also creates a new revision,
# even when it is by the same author
2009-06-03 05:17:15 +02:00
@page . revise ( 'HisWay would be MyWay in my way' , @page . name , Time . local ( 2004 , 4 , 4 , 17 , 30 ) ,
2007-01-22 14:43:50 +01:00
'DavidHeinemeierHansson' , test_renderer )
@page . reload
assert_equal 4 , @page . revisions . length
end
2009-06-03 05:17:15 +02:00
def test_change_name
@page . revise ( 'HisWay would be MyWay in my way' , 'SecondPage' , Time . local ( 2004 , 4 , 5 , 17 , 56 ) ,
'MarianneSyhler' , test_renderer )
@page . reload
assert_equal " Second Page " , @page . plain_name
assert_equal 2 , @page . revisions . length , 'Should have two revisions'
assert_equal 'MarianneSyhler' , @page . current_revision . author . to_s ,
'Marianne should be the author now'
assert_equal 'DavidHeinemeierHansson' , @page . revisions . first . author . to_s ,
'David was the first author'
end
2007-01-22 14:43:50 +01:00
def test_revise_content_unchanged
last_revision_before = @page . current_revision
revisions_number_before = @page . revisions . size
assert_raises ( Instiki :: ValidationError ) {
2009-06-03 05:17:15 +02:00
@page . revise ( @page . current_revision . content , @page . name , Time . now , 'AlexeyVerkhovsky' , test_renderer )
2007-01-22 14:43:50 +01:00
}
assert_equal last_revision_before , @page . current_revision ( true )
assert_equal revisions_number_before , @page . revisions . size
end
def test_revise_changes_references_from_wanted_to_linked_for_new_pages
web = Web . find ( 1 )
new_page = Page . new ( :web = > web , :name = > 'NewPage' )
2009-06-03 05:17:15 +02:00
new_page . revise ( 'Reference to WantedPage, and to WantedPage2' , 'NewPage' , Time . now , 'AlexeyVerkhovsky' ,
2007-01-22 14:43:50 +01:00
test_renderer )
references = new_page . wiki_references ( true )
assert_equal 2 , references . size
assert_equal 'WantedPage' , references [ 0 ] . referenced_name
assert_equal WikiReference :: WANTED_PAGE , references [ 0 ] . link_type
assert_equal 'WantedPage2' , references [ 1 ] . referenced_name
assert_equal WikiReference :: WANTED_PAGE , references [ 1 ] . link_type
wanted_page = Page . new ( :web = > web , :name = > 'WantedPage' )
2009-06-03 05:17:15 +02:00
wanted_page . revise ( 'And here it is!' , 'WantedPage' , Time . now , 'AlexeyVerkhovsky' , test_renderer )
2007-01-22 14:43:50 +01:00
# link type stored for NewPage -> WantedPage reference should change from WANTED to LINKED
# reference NewPage -> WantedPage2 should remain the same
references = new_page . wiki_references ( true )
assert_equal 2 , references . size
assert_equal 'WantedPage' , references [ 0 ] . referenced_name
assert_equal WikiReference :: LINKED_PAGE , references [ 0 ] . link_type
assert_equal 'WantedPage2' , references [ 1 ] . referenced_name
assert_equal WikiReference :: WANTED_PAGE , references [ 1 ] . link_type
end
2009-06-07 06:36:26 +02:00
def test_revise_changes_references_from_wanted_to_linked_for_redirected_pages
web = Web . find ( 1 )
new_page = Page . new ( :web = > web , :name = > 'NewPage' )
2009-06-11 20:16:10 +02:00
new_page . revise ( 'Reference to HappyPage, and to WantedPage2' , 'NewPage' , Time . local ( 2004 , 4 , 5 , 17 , 56 ) , 'AlexeyVerkhovsky' ,
2009-06-07 06:36:26 +02:00
test_renderer )
references = new_page . wiki_references ( true )
assert_equal 2 , references . size
assert_equal 'HappyPage' , references [ 0 ] . referenced_name
assert_equal WikiReference :: WANTED_PAGE , references [ 0 ] . link_type
assert_equal 'WantedPage2' , references [ 1 ] . referenced_name
assert_equal WikiReference :: WANTED_PAGE , references [ 1 ] . link_type
2009-07-13 19:59:42 +02:00
wanted_pages = web . select . wanted_pages
assert_equal [ " HappyPage " , " HisWay " , " OverThere " , " WantedPage2 " ] , wanted_pages
2009-06-07 06:36:26 +02:00
my_page = Page . new ( :web = > web , :name = > 'MyPage' )
my_page . revise ( " [[!redirects HappyPage]] \n And here it is! " , 'MyPage' , Time . now , 'AlexeyVerkhovsky' , test_renderer )
my_references = my_page . wiki_references ( true )
assert_equal 1 , my_references . size
assert_equal 'HappyPage' , my_references [ 0 ] . referenced_name
assert_equal WikiReference :: REDIRECTED_PAGE , my_references [ 0 ] . link_type
2009-07-13 19:59:42 +02:00
wanted_pages = web . select . wanted_pages
assert_equal [ " HisWay " , " OverThere " , " WantedPage2 " ] , wanted_pages
2009-06-07 06:36:26 +02:00
# link type stored for NewPage -> HappyPage reference should change from WANTED to LINKED
# reference NewPage -> WantedPage2 should remain the same
2009-07-13 19:59:42 +02:00
references = new_page . wiki_references #(true)
2009-06-07 06:36:26 +02:00
assert_match ( " Reference to <a class='existingWikiWord' href=' \ . \ ./show/MyPage'>Happy Page</a> " ,
test_renderer ( new_page . revisions . last ) . display_content ( true ) )
assert_equal 2 , references . size
assert_equal 'HappyPage' , references [ 0 ] . referenced_name
# Doesn't work, since picking up the change in wiki_references requires a database query.
# assert_equal WikiReference::LINKED_PAGE, references[0].link_type
assert_equal 'WantedPage2' , references [ 1 ] . referenced_name
assert_equal WikiReference :: WANTED_PAGE , references [ 1 ] . link_type
2009-07-13 19:59:42 +02:00
wanted_pages = web . select . wanted_pages
assert_equal [ " HisWay " , " OverThere " , " WantedPage2 " ] , wanted_pages
2009-06-11 08:55:05 +02:00
2009-06-11 20:16:10 +02:00
new_page . revise ( 'Reference to HappyPage and to WantedPage2.pdf and [[foo.pdf]]' , 'NewPage' , Time . now , 'AlexeyVerkhovsky' ,
2009-06-11 08:55:05 +02:00
test_renderer )
references = new_page . wiki_references ( true )
2009-06-11 20:16:10 +02:00
assert_equal ( " <p>Reference to <a class='existingWikiWord' href=' \ . \ ./show/MyPage'>Happy Page</a> " +
" and to <span class='newWikiWord'>Wanted Page2<a href='../show/WantedPage2'>?</a></span>.pdf " +
2009-06-13 02:47:56 +02:00
" and <span class='wikilink-error'><b>Illegal link (target contains a & # 39;.& # 39;):</b> foo.pdf</span></p> " ,
2009-06-11 08:55:05 +02:00
test_renderer ( new_page . revisions . last ) . display_content ( true ) )
2009-06-11 20:16:10 +02:00
assert_equal 3 , references . size
2009-06-11 08:55:05 +02:00
# now it works.
assert_equal 'HappyPage' , references [ 0 ] . referenced_name
assert_equal WikiReference :: LINKED_PAGE , references [ 0 ] . link_type
2009-06-11 20:16:10 +02:00
assert_equal 'WantedPage2' , references [ 1 ] . referenced_name
assert_equal WikiReference :: WANTED_PAGE , references [ 1 ] . link_type
assert_equal 'foo.pdf' , references [ 2 ] . referenced_name
assert_equal WikiReference :: WANTED_PAGE , references [ 1 ] . link_type
2009-07-13 19:59:42 +02:00
wanted_pages = web . select . wanted_pages
assert_equal [ " HisWay " , " OverThere " , " WantedPage2 " ] , wanted_pages
2009-06-07 06:36:26 +02:00
end
2007-01-22 14:43:50 +01:00
def test_rollback
2009-06-03 05:17:15 +02:00
@page . revise ( " spot two " , @page . name , Time . now , " David " , test_renderer )
@page . revise ( " spot three " , @page . name , Time . now + 2000 , " David " , test_renderer )
2007-01-22 14:43:50 +01:00
assert_equal 3 , @page . revisions ( true ) . length , " Should have three revisions "
@page . current_revision ( true )
@page . rollback ( 0 , Time . now , '127.0.0.1' , test_renderer )
2007-10-28 00:34:29 +02:00
assert_equal " HisWay would be MyWay $ \\ sin(x) \\ begin{svg}<svg/> \\ end{svg} \\ includegraphics[width=3em]{foo}$ in kinda ThatWay in HisWay though MyWay \\ \\ OverThere -- see SmartEngine in that SmartEngineGUI " , @page . current_revision ( true ) . content
2007-01-22 14:43:50 +01:00
end
end