move to AR

test/test_helper.rb

@@ -10,17 +10,97 @@ require 'active_record/fixtures'
 require 'action_controller/test_process'
 require 'action_web_service/test_invoke'
 require 'breakpoint'
+require 'wiki_content'
 
+# Uncomment these and hang on, because the tests will be FAST
+#Test::Unit::TestCase.pre_loaded_fixtures = false
+#Test::Unit::TestCase.use_transactional_fixtures = true
+
+Test::Unit::TestCase.use_instantiated_fixtures = false
 Test::Unit::TestCase.fixture_path = File.dirname(__FILE__) + "/fixtures/"
 
 class Test::Unit::TestCase
-  # Turn these on to use transactional fixtures with table_name(:fixture_name) instantiation of fixtures
-  # self.use_transactional_fixtures = true
-  # self.use_instantiated_fixtures  = false
-
   def create_fixtures(*table_names)
     Fixtures.create_fixtures(File.dirname(__FILE__) + "/fixtures", table_names)
   end
 
   # Add more helper methods to be used by all tests here...
-end
+  def set_web_property(property, value)
+    @web.update_attribute(property, value)
+    @page = Page.find(@page.id)
+    @wiki.webs[@web.name] = @web
+  end
+  
+  def setup_wiki_with_30_pages
+    ActiveRecord::Base.silence do
+      (1..30).each do |i|
+        @wiki.write_page('wiki1', "page#{i}", "Test page #{i}\ncategory: test", 
+                         Time.local(1976, 10, i, 12, 00, 00), Author.new('Dema', '127.0.0.2'))
+      end
+    end
+    @web = Web.find(@web.id)
+  end
+
+  def use_blank_wiki
+    Revision.destroy_all
+    Page.destroy_all
+    Web.destroy_all
+  end
+end
+
+# This module is to be included in unit tests that involve matching chunks.
+# It provides a easy way to test whether a chunk matches a particular string
+# and any the values of any fields that should be set after a match.
+class ContentStub < String
+  include ChunkManager
+  def initialize(str)
+    super
+    init_chunk_manager
+  end
+  def page_link(*); end
+end
+
+module ChunkMatch
+
+  # Asserts a number of tests for the given type and text.
+  def match(chunk_type, test_text, expected_chunk_state)
+    if chunk_type.respond_to? :pattern
+      assert_match(chunk_type.pattern, test_text)
+    end
+
+    content = ContentStub.new(test_text)
+      chunk_type.apply_to(content)
+
+    # Test if requested parts are correct.
+    expected_chunk_state.each_pair do |a_method, expected_value|
+      assert content.chunks.last.kind_of?(chunk_type)
+      assert_respond_to(content.chunks.last, a_method)
+      assert_equal(expected_value, content.chunks.last.send(a_method.to_sym),
+        "Wrong #{a_method} value")
+    end
+  end
+
+  # Asserts that test_text doesn't match the chunk_type
+  def no_match(chunk_type, test_text)
+    if chunk_type.respond_to? :pattern
+      assert_no_match(chunk_type.pattern, test_text)
+    end
+  end
+end
+
+if defined? $validate_xml_in_assert_success and $validate_xml_in_assert_success == true
+  module Test
+    module Unit
+      module Assertions
+        unless method_defined? :__assert_success_before_override_by_instiki
+          alias :__assert_success_before_override_by_instiki :assert_success 
+        end
+        def assert_success
+          __assert_success_before_override_by_instiki
+          if @response.body.kind_of?(Proc) then # it's a file download, not an HTML content
+          else assert_nothing_raised(@response.body) { REXML::Document.new(@response.body) } end
+        end
+      end
+    end
+  end
+end