2001-07-13 16:06:14 -04:00
|
|
|
#!/usr/bin/env ruby
|
|
|
|
#
|
|
|
|
# $RoughId: test.rb,v 1.4 2001/07/13 15:38:27 knu Exp $
|
|
|
|
# $Id$
|
|
|
|
|
2002-11-27 02:28:45 -05:00
|
|
|
require 'test/unit'
|
2001-07-13 16:06:14 -04:00
|
|
|
|
2005-02-17 06:16:57 -05:00
|
|
|
require 'digest'
|
|
|
|
%w[digest/md5 digest/rmd160 digest/sha1 digest/sha2].each do |lib|
|
|
|
|
begin
|
|
|
|
require lib
|
|
|
|
rescue LoadError
|
|
|
|
end
|
|
|
|
end
|
2001-07-13 16:06:14 -04:00
|
|
|
|
2005-02-17 06:16:57 -05:00
|
|
|
module TestDigest
|
|
|
|
Data1 = "abc"
|
|
|
|
Data2 = "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq"
|
2001-07-13 16:06:14 -04:00
|
|
|
|
|
|
|
def test_s_hexdigest
|
2010-01-17 14:12:10 -05:00
|
|
|
self.class::DATA.each do |str, hexdigest|
|
|
|
|
assert_equal(hexdigest, self.class::ALGO.hexdigest(str))
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_s_base64digest
|
|
|
|
self.class::DATA.each do |str, hexdigest|
|
|
|
|
digest = [hexdigest].pack("H*")
|
|
|
|
assert_equal([digest].pack("m0"), self.class::ALGO.base64digest(str))
|
2001-07-13 16:06:14 -04:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_s_digest
|
2010-01-17 14:12:10 -05:00
|
|
|
self.class::DATA.each do |str, hexdigest|
|
|
|
|
digest = [hexdigest].pack("H*")
|
|
|
|
assert_equal(digest, self.class::ALGO.digest(str))
|
2001-07-13 16:06:14 -04:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_update
|
|
|
|
# This test is also for digest() and hexdigest()
|
|
|
|
|
|
|
|
str = "ABC"
|
|
|
|
|
2005-02-17 06:16:57 -05:00
|
|
|
md = self.class::ALGO.new
|
|
|
|
md.update str
|
|
|
|
assert_equal(self.class::ALGO.hexdigest(str), md.hexdigest)
|
|
|
|
assert_equal(self.class::ALGO.digest(str), md.digest)
|
2001-07-13 16:06:14 -04:00
|
|
|
end
|
|
|
|
|
|
|
|
def test_eq
|
|
|
|
# This test is also for clone()
|
|
|
|
|
2006-10-13 07:58:05 -04:00
|
|
|
md1 = self.class::ALGO.new
|
|
|
|
md1 << "ABC"
|
2001-07-13 16:06:14 -04:00
|
|
|
|
2005-02-17 06:16:57 -05:00
|
|
|
assert_equal(md1, md1.clone, self.class::ALGO)
|
2001-07-13 16:06:14 -04:00
|
|
|
|
2005-02-17 06:16:57 -05:00
|
|
|
md2 = self.class::ALGO.new
|
|
|
|
md2 << "A"
|
2001-07-13 16:06:14 -04:00
|
|
|
|
2010-05-02 01:56:35 -04:00
|
|
|
assert_not_equal(md1, md2, self.class::ALGO)
|
2001-07-13 16:06:14 -04:00
|
|
|
|
2005-02-17 06:16:57 -05:00
|
|
|
md2 << "BC"
|
2001-07-13 16:06:14 -04:00
|
|
|
|
2005-02-17 06:16:57 -05:00
|
|
|
assert_equal(md1, md2, self.class::ALGO)
|
2001-07-13 16:06:14 -04:00
|
|
|
end
|
2004-09-07 01:32:26 -04:00
|
|
|
|
2004-09-17 05:24:13 -04:00
|
|
|
def test_instance_eval
|
2004-09-07 01:32:26 -04:00
|
|
|
assert_nothing_raised {
|
2005-02-17 06:16:57 -05:00
|
|
|
self.class::ALGO.new.instance_eval { update "a" }
|
2004-09-07 01:32:26 -04:00
|
|
|
}
|
|
|
|
end
|
2005-02-17 06:16:57 -05:00
|
|
|
|
|
|
|
class TestMD5 < Test::Unit::TestCase
|
|
|
|
include TestDigest
|
2006-02-17 03:40:52 -05:00
|
|
|
ALGO = Digest::MD5
|
2005-02-17 06:16:57 -05:00
|
|
|
DATA = {
|
|
|
|
Data1 => "900150983cd24fb0d6963f7d28e17f72",
|
|
|
|
Data2 => "8215ef0796a20bcaaae116d3876c664a",
|
|
|
|
}
|
2006-02-17 03:40:52 -05:00
|
|
|
end if defined?(Digest::MD5)
|
2005-02-17 06:16:57 -05:00
|
|
|
|
|
|
|
class TestSHA1 < Test::Unit::TestCase
|
|
|
|
include TestDigest
|
2006-02-17 03:40:52 -05:00
|
|
|
ALGO = Digest::SHA1
|
2005-02-17 06:16:57 -05:00
|
|
|
DATA = {
|
|
|
|
Data1 => "a9993e364706816aba3e25717850c26c9cd0d89d",
|
|
|
|
Data2 => "84983e441c3bd26ebaae4aa1f95129e5e54670f1",
|
|
|
|
}
|
2006-02-17 03:40:52 -05:00
|
|
|
end if defined?(Digest::SHA1)
|
2005-02-17 06:16:57 -05:00
|
|
|
|
|
|
|
class TestSHA256 < Test::Unit::TestCase
|
|
|
|
include TestDigest
|
2006-02-17 03:40:52 -05:00
|
|
|
ALGO = Digest::SHA256
|
2005-02-17 06:16:57 -05:00
|
|
|
DATA = {
|
|
|
|
Data1 => "ba7816bf8f01cfea414140de5dae2223b00361a396177a9cb410ff61f20015ad",
|
|
|
|
Data2 => "248d6a61d20638b8e5c026930c3e6039a33ce45964ff2167f6ecedd419db06c1",
|
|
|
|
}
|
2006-02-17 03:40:52 -05:00
|
|
|
end if defined?(Digest::SHA256)
|
2005-02-17 06:16:57 -05:00
|
|
|
|
|
|
|
class TestSHA384 < Test::Unit::TestCase
|
|
|
|
include TestDigest
|
2006-02-17 03:40:52 -05:00
|
|
|
ALGO = Digest::SHA384
|
2005-02-17 06:16:57 -05:00
|
|
|
DATA = {
|
|
|
|
Data1 => "cb00753f45a35e8bb5a03d699ac65007272c32ab0eded1631a8b605a43ff5bed8086072ba1e7cc2358baeca134c825a7",
|
|
|
|
Data2 => "3391fdddfc8dc7393707a65b1b4709397cf8b1d162af05abfe8f450de5f36bc6b0455a8520bc4e6f5fe95b1fe3c8452b",
|
|
|
|
}
|
2006-02-17 03:40:52 -05:00
|
|
|
end if defined?(Digest::SHA384)
|
2005-02-17 06:16:57 -05:00
|
|
|
|
|
|
|
class TestSHA512 < Test::Unit::TestCase
|
|
|
|
include TestDigest
|
2006-02-17 03:40:52 -05:00
|
|
|
ALGO = Digest::SHA512
|
2005-02-17 06:16:57 -05:00
|
|
|
DATA = {
|
|
|
|
Data1 => "ddaf35a193617abacc417349ae20413112e6fa4e89a97ea20a9eeee64b55d39a2192992a274fc1a836ba3c23a3feebbd454d4423643ce80e2a9ac94fa54ca49f",
|
|
|
|
Data2 => "204a8fc6dda82f0a0ced7beb8e08a41657c16ef468b228a8279be331a703c33596fd15c13b1b07f9aa1d3bea57789ca031ad85c7a71dd70354ec631238ca3445",
|
|
|
|
}
|
2006-02-17 03:40:52 -05:00
|
|
|
end if defined?(Digest::SHA512)
|
2005-02-17 06:16:57 -05:00
|
|
|
|
|
|
|
class TestRMD160 < Test::Unit::TestCase
|
|
|
|
include TestDigest
|
2006-02-17 03:40:52 -05:00
|
|
|
ALGO = Digest::RMD160
|
2005-02-17 06:16:57 -05:00
|
|
|
DATA = {
|
|
|
|
Data1 => "8eb208f7e05d987a9b044a8e98c6b087f15a0bfc",
|
|
|
|
Data2 => "12a053384a9c0c88e405a06c27dcf49ada62eb2b",
|
|
|
|
}
|
2006-02-17 03:40:52 -05:00
|
|
|
end if defined?(Digest::RMD160)
|
2001-07-13 16:06:14 -04:00
|
|
|
end
|