1 files changed, 91 insertions, 0 deletions
diff --git a/test/th_mauve.rb b/test/th_mauve.rb
new file mode 100644
index 0000000..a113ad0
--- /dev/null
+++ b/test/th_mauve.rb
@@ -0,0 +1,91 @@
+require 'test/unit'
+require 'mauve/datamapper'
+require 'timecop'
+require 'log4r'
+require 'pp'
+
+module Mauve
+  class TestOutputter < Log4r::Outputter
+    def initialize( _name, hash={})
+      @buffer = []
+      super
+    end
+
+    def pop     ; @buffer.pop     ; end
+    def shift ; @buffer.shift ; end
+
+    def write(data)
+      @buffer << data
+    end
+
+    def flush
+      print "\n" if @buffer.length > 0
+      while d = @buffer.shift
+        print d
+      end
+    end
+
+  end
+end
+
+
+module Mauve
+  class UnitTest < Test::Unit::TestCase
+
+    def setup
+      setup_logger
+      setup_time
+    end
+
+    def teardown
+      teardown_logger
+      teardown_time
+    end
+
+    def setup_logger
+      @logger      = Log4r::Logger.new 'Mauve'
+      @outputter   = Mauve::TestOutputter.new("test")
+      @outputter.formatter = Log4r::PatternFormatter.new( :pattern => "%d %l %m" )
+      @outputter.level     = Log4r::DEBUG
+      @logger.outputters   << @outputter
+      return @logger
+    end
+
+    def logger_pop
+      @outputter.pop
+    end
+    
+    def teardown_logger
+      logger = Log4r::Logger['Mauve']
+      return if logger.nil?
+
+      o = logger.outputters.find{|o| o.name == "test"}
+      o.flush if o.respond_to?("flush")
+      # Delete the logger.
+      Log4r::Logger::Repository.instance.loggers.delete('Mauve')
+    end
+
+    def setup_database
+      DataMapper::Model.raise_on_save_failure = true
+    end
+
+    def teardown_database
+      DataObjects::Pooling.pools.each{|pool| pool.dispose}
+    end
+
+    def setup_time
+      Timecop.freeze(Time.local(2011,8,1,0,0,0,0))
+    end
+
+    def teardown_time
+      Timecop.return
+    end
+
+    def default_test
+      #
+      #
+      flunk("No tests specified") unless self.class == Mauve::UnitTest
+    end
+
+  end
+end