instiki/vendor/madeleine-0.7.1/test/test_platforms.rb
2005-01-15 20:26:54 +00:00

66 lines
1.2 KiB
Ruby
Executable file

class AddCommand
def initialize(obj)
@obj = obj
end
def execute(system)
system[@obj.myid] = @obj
end
end
class Foo
attr_accessor :myid
end
# Checks for a strange marshalling or IO bug observed in the
# native win32-port of Ruby on WinXP.
#
# Test case provided by Steve Conover.
class WierdWin32CorruptionTest < Test::Unit::TestCase
include TestUtils
def teardown
(1..5).each {|i|
delete_directory("corruption_test#{i}")
}
end
def doCorruptionTest(idstr, storagenumber)
m = SnapshotMadeleine.new("corruption_test" + storagenumber) { Hash.new() }
f = Foo.new()
f.myid = idstr
m.execute_command(AddCommand.new(f))
m.close()
m = SnapshotMadeleine.new("corruption_test" + storagenumber) { Hash.new() }
end
def testErrorOne
doCorruptionTest("123456789012345678901", "1")
end
def testErrorTwo
doCorruptionTest("aaaaaaaaaaaaaaaaaaaaa", "2")
end
def testNoErrorOne
doCorruptionTest("12345678901234567890", "3")
end
def testNoErrorTwo
doCorruptionTest("1234567890123456789012", "4")
end
def testWhiteSpace
doCorruptionTest("\n\r\t \r\n", "5")
end
end
def add_platforms_tests(suite)
suite << WierdWin32CorruptionTest.suite
end