Add ASN.1 INTEGER tests.

Add tests for ASN.1 INTEGER: invalid tag, valid 0, 1, -1 and 0, -1 with
illegal padding.

Also add ASN1_ANY tests for 0, 1 and -1.

Reviewed-by: Emilia Käsper <emilia@openssl.org>
This commit is contained in:
Dr. Stephen Henson 2016-04-26 12:12:40 +01:00 committed by Matt Caswell
parent 1b96ec1002
commit 2c7fe4dc9a
6 changed files with 46 additions and 1 deletions

Binary file not shown.

View File

@ -0,0 +1 @@
<02><>

BIN
test/d2i-tests/int0.der Normal file

Binary file not shown.

1
test/d2i-tests/int1.der Normal file
View File

@ -0,0 +1 @@


View File

@ -0,0 +1 @@
<01>

View File

@ -15,7 +15,7 @@ use OpenSSL::Test qw/:DEFAULT srctop_file/;
setup("test_d2i");
plan tests => 4;
plan tests => 13;
ok(run(test(["d2i_test", "X509", "decode",
srctop_file('test','d2i-tests','bad_cert.der')])),
@ -37,3 +37,45 @@ ok(run(test(["d2i_test", "ASN1_ANY", "BIO",
ok(run(test(["d2i_test", "ASN1_ANY", "OK",
srctop_file('test','d2i-tests','high_tag.der')])),
"Running d2i_test high_tag.der");
# Above test data but interpeted as ASN.1 INTEGER: this will be rejected
# because the tag is invalid.
ok(run(test(["d2i_test", "ASN1_INTEGER", "decode",
srctop_file('test','d2i-tests','high_tag.der')])),
"Running d2i_test high_tag.der INTEGER");
# Parse valid 0, 1 and -1 ASN.1 INTEGER as INTEGER or ANY.
ok(run(test(["d2i_test", "ASN1_INTEGER", "OK",
srctop_file('test','d2i-tests','int0.der')])),
"Running d2i_test int0.der INTEGER");
ok(run(test(["d2i_test", "ASN1_INTEGER", "OK",
srctop_file('test','d2i-tests','int1.der')])),
"Running d2i_test int1.der INTEGER");
ok(run(test(["d2i_test", "ASN1_INTEGER", "OK",
srctop_file('test','d2i-tests','intminus1.der')])),
"Running d2i_test intminus1.der INTEGER");
ok(run(test(["d2i_test", "ASN1_ANY", "OK",
srctop_file('test','d2i-tests','int0.der')])),
"Running d2i_test int0.der ANY");
ok(run(test(["d2i_test", "ASN1_ANY", "OK",
srctop_file('test','d2i-tests','int1.der')])),
"Running d2i_test int1.der ANY");
ok(run(test(["d2i_test", "ASN1_ANY", "OK",
srctop_file('test','d2i-tests','intminus1.der')])),
"Running d2i_test intminus1.der ANY");
# Integers with illegal additional padding.
ok(run(test(["d2i_test", "ASN1_INTEGER", "decode",
srctop_file('test','d2i-tests','bad-int-pad0.der')])),
"Running d2i_test bad-int-pad0.der INTEGER");
ok(run(test(["d2i_test", "ASN1_INTEGER", "decode",
srctop_file('test','d2i-tests','bad-int-padminus1.der')])),
"Running d2i_test bad-int-padminus1.der INTEGER");