2010-12-15 14:50:00 -05:00
|
|
|
require_relative "utils"
|
2004-05-19 14:30:52 -04:00
|
|
|
|
|
|
|
if defined?(OpenSSL)
|
2004-05-17 16:23:28 -04:00
|
|
|
|
|
|
|
class OpenSSL::TestX509Request < Test::Unit::TestCase
|
|
|
|
def setup
|
|
|
|
@rsa1024 = OpenSSL::TestUtils::TEST_KEY_RSA1024
|
|
|
|
@rsa2048 = OpenSSL::TestUtils::TEST_KEY_RSA2048
|
|
|
|
@dsa256 = OpenSSL::TestUtils::TEST_KEY_DSA256
|
|
|
|
@dsa512 = OpenSSL::TestUtils::TEST_KEY_DSA512
|
|
|
|
@dn = OpenSSL::X509::Name.parse("/DC=org/DC=ruby-lang/CN=GOTOU Yuuzou")
|
|
|
|
end
|
|
|
|
|
|
|
|
def issue_csr(ver, dn, key, digest)
|
|
|
|
req = OpenSSL::X509::Request.new
|
|
|
|
req.version = ver
|
|
|
|
req.subject = dn
|
|
|
|
req.public_key = key.public_key
|
|
|
|
req.sign(key, digest)
|
|
|
|
req
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_public_key
|
|
|
|
req = issue_csr(0, @dn, @rsa1024, OpenSSL::Digest::SHA1.new)
|
|
|
|
assert_equal(@rsa1024.public_key.to_der, req.public_key.to_der)
|
|
|
|
req = OpenSSL::X509::Request.new(req.to_der)
|
|
|
|
assert_equal(@rsa1024.public_key.to_der, req.public_key.to_der)
|
|
|
|
|
|
|
|
req = issue_csr(0, @dn, @dsa512, OpenSSL::Digest::DSS1.new)
|
|
|
|
assert_equal(@dsa512.public_key.to_der, req.public_key.to_der)
|
|
|
|
req = OpenSSL::X509::Request.new(req.to_der)
|
|
|
|
assert_equal(@dsa512.public_key.to_der, req.public_key.to_der)
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_version
|
|
|
|
req = issue_csr(0, @dn, @rsa1024, OpenSSL::Digest::SHA1.new)
|
|
|
|
assert_equal(0, req.version)
|
|
|
|
req = OpenSSL::X509::Request.new(req.to_der)
|
|
|
|
assert_equal(0, req.version)
|
|
|
|
|
|
|
|
req = issue_csr(1, @dn, @rsa1024, OpenSSL::Digest::SHA1.new)
|
|
|
|
assert_equal(1, req.version)
|
|
|
|
req = OpenSSL::X509::Request.new(req.to_der)
|
|
|
|
assert_equal(1, req.version)
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_subject
|
|
|
|
req = issue_csr(0, @dn, @rsa1024, OpenSSL::Digest::SHA1.new)
|
|
|
|
assert_equal(@dn.to_der, req.subject.to_der)
|
|
|
|
req = OpenSSL::X509::Request.new(req.to_der)
|
|
|
|
assert_equal(@dn.to_der, req.subject.to_der)
|
|
|
|
end
|
|
|
|
|
|
|
|
def create_ext_req(exts)
|
|
|
|
ef = OpenSSL::X509::ExtensionFactory.new
|
|
|
|
exts = exts.collect{|e| ef.create_extension(*e) }
|
|
|
|
return OpenSSL::ASN1::Set([OpenSSL::ASN1::Sequence(exts)])
|
|
|
|
end
|
|
|
|
|
|
|
|
def get_ext_req(ext_req_value)
|
|
|
|
set = OpenSSL::ASN1.decode(ext_req_value)
|
|
|
|
seq = set.value[0]
|
|
|
|
seq.value.collect{|asn1ext|
|
|
|
|
OpenSSL::X509::Extension.new(asn1ext).to_a
|
|
|
|
}
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_attr
|
|
|
|
exts = [
|
|
|
|
["keyUsage", "Digital Signature, Key Encipherment", true],
|
|
|
|
["subjectAltName", "email:gotoyuzo@ruby-lang.org", false],
|
|
|
|
]
|
|
|
|
attrval = create_ext_req(exts)
|
|
|
|
attrs = [
|
|
|
|
OpenSSL::X509::Attribute.new("extReq", attrval),
|
|
|
|
OpenSSL::X509::Attribute.new("msExtReq", attrval),
|
|
|
|
]
|
|
|
|
|
|
|
|
req0 = issue_csr(0, @dn, @rsa1024, OpenSSL::Digest::SHA1.new)
|
|
|
|
attrs.each{|attr| req0.add_attribute(attr) }
|
|
|
|
req1 = issue_csr(0, @dn, @rsa1024, OpenSSL::Digest::SHA1.new)
|
|
|
|
req1.attributes = attrs
|
|
|
|
assert_equal(req0.to_der, req1.to_der)
|
|
|
|
|
|
|
|
attrs = req0.attributes
|
|
|
|
assert_equal(2, attrs.size)
|
|
|
|
assert_equal("extReq", attrs[0].oid)
|
|
|
|
assert_equal("msExtReq", attrs[1].oid)
|
|
|
|
assert_equal(exts, get_ext_req(attrs[0].value))
|
|
|
|
assert_equal(exts, get_ext_req(attrs[1].value))
|
|
|
|
|
|
|
|
req = OpenSSL::X509::Request.new(req0.to_der)
|
|
|
|
attrs = req.attributes
|
|
|
|
assert_equal(2, attrs.size)
|
|
|
|
assert_equal("extReq", attrs[0].oid)
|
|
|
|
assert_equal("msExtReq", attrs[1].oid)
|
|
|
|
assert_equal(exts, get_ext_req(attrs[0].value))
|
|
|
|
assert_equal(exts, get_ext_req(attrs[1].value))
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_sign_and_verify
|
|
|
|
req = issue_csr(0, @dn, @rsa1024, OpenSSL::Digest::SHA1.new)
|
|
|
|
assert_equal(true, req.verify(@rsa1024))
|
|
|
|
assert_equal(false, req.verify(@rsa2048))
|
2010-02-27 21:47:19 -05:00
|
|
|
assert_equal(false, request_error_returns_false { req.verify(@dsa256) })
|
|
|
|
assert_equal(false, request_error_returns_false { req.verify(@dsa512) })
|
2004-05-17 16:23:28 -04:00
|
|
|
req.version = 1
|
|
|
|
assert_equal(false, req.verify(@rsa1024))
|
|
|
|
|
|
|
|
req = issue_csr(0, @dn, @rsa2048, OpenSSL::Digest::MD5.new)
|
|
|
|
assert_equal(false, req.verify(@rsa1024))
|
|
|
|
assert_equal(true, req.verify(@rsa2048))
|
2010-02-27 21:47:19 -05:00
|
|
|
assert_equal(false, request_error_returns_false { req.verify(@dsa256) })
|
|
|
|
assert_equal(false, request_error_returns_false { req.verify(@dsa512) })
|
2004-05-17 16:23:28 -04:00
|
|
|
req.subject = OpenSSL::X509::Name.parse("/C=JP/CN=FooBar")
|
|
|
|
assert_equal(false, req.verify(@rsa2048))
|
|
|
|
|
|
|
|
req = issue_csr(0, @dn, @dsa512, OpenSSL::Digest::DSS1.new)
|
2010-02-27 21:47:19 -05:00
|
|
|
assert_equal(false, request_error_returns_false { req.verify(@rsa1024) })
|
|
|
|
assert_equal(false, request_error_returns_false { req.verify(@rsa2048) })
|
2004-05-17 16:23:28 -04:00
|
|
|
assert_equal(false, req.verify(@dsa256))
|
|
|
|
assert_equal(true, req.verify(@dsa512))
|
|
|
|
req.public_key = @rsa1024.public_key
|
|
|
|
assert_equal(false, req.verify(@dsa512))
|
|
|
|
|
2010-12-25 04:02:03 -05:00
|
|
|
begin
|
|
|
|
req = issue_csr(0, @dn, @rsa1024, OpenSSL::Digest::DSS1.new)
|
|
|
|
assert_equal(true, req.verify(@rsa1024))
|
|
|
|
assert_equal(false, req.verify(@rsa2048))
|
|
|
|
assert_equal(false, request_error_returns_false { req.verify(@dsa256) })
|
|
|
|
assert_equal(false, request_error_returns_false { req.verify(@dsa512) })
|
|
|
|
req.version = 1
|
|
|
|
assert_equal(false, req.verify(@rsa1024))
|
|
|
|
rescue OpenSSL::X509::RequestError
|
|
|
|
end
|
|
|
|
|
2004-05-17 16:23:28 -04:00
|
|
|
assert_raise(OpenSSL::X509::RequestError){
|
|
|
|
issue_csr(0, @dn, @dsa512, OpenSSL::Digest::MD5.new) }
|
|
|
|
end
|
2011-05-15 07:55:52 -04:00
|
|
|
|
2010-02-27 21:47:19 -05:00
|
|
|
private
|
2011-05-15 07:55:52 -04:00
|
|
|
|
2010-02-27 21:47:19 -05:00
|
|
|
def request_error_returns_false
|
|
|
|
yield
|
|
|
|
rescue OpenSSL::X509::RequestError
|
|
|
|
false
|
|
|
|
end
|
2004-05-17 16:23:28 -04:00
|
|
|
end
|
2004-05-19 14:30:52 -04:00
|
|
|
|
|
|
|
end
|