ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Convert-BER-XS/t/02_simple.t
(Generate patch)

Comparing Convert-BER-XS/t/02_simple.t (file contents):
Revision 1.6 by root, Sat Apr 20 16:29:32 2019 UTC vs.
Revision 1.7 by root, Sat Apr 20 16:34:34 2019 UTC

1BEGIN { $| = 1; print "1..110\n"; } 1BEGIN { $| = 1; print "1..114\n"; }
2 2
3use common::sense; 3use common::sense;
4use Convert::BER::XS ':all'; 4use Convert::BER::XS ':all';
5 5
6our $test; 6our $test;
… …
74 74
75roundtrip "06053305818219", [ASN_UNIVERSAL, ASN_OBJECT_IDENTIFIER, 0, "1.11.5.16665"]; 75roundtrip "06053305818219", [ASN_UNIVERSAL, ASN_OBJECT_IDENTIFIER, 0, "1.11.5.16665"];
76fail "06053305818299", "unexpected end of message buffer"; 76fail "06053305818299", "unexpected end of message buffer";
77roundtrip "0d053305818219", [ASN_UNIVERSAL, ASN_RELATIVE_OID, 0, "51.5.16665"]; 77roundtrip "0d053305818219", [ASN_UNIVERSAL, ASN_RELATIVE_OID, 0, "51.5.16665"];
78fail "0600", "OBJECT IDENTIFIER length equal to zero", "OBJECT IDENTIFIER length equal to zero"; 78fail "0600", "OBJECT IDENTIFIER length equal to zero", "OBJECT IDENTIFIER length equal to zero";
79roundtrip "0603818055", [ASN_UNIVERSAL, ASN_OID, 0, "2.16389"];
80fail "06028001", "illegal BER padding";
79# first component 81# first component
80roundtrip "06022777", [ASN_UNIVERSAL, ASN_OID, 0, "0.39.119"]; 82roundtrip "06022777", [ASN_UNIVERSAL, ASN_OID, 0, "0.39.119"];
81roundtrip "06022877", [ASN_UNIVERSAL, ASN_OID, 0, "1.0.119"]; 83roundtrip "06022877", [ASN_UNIVERSAL, ASN_OID, 0, "1.0.119"];
82roundtrip "06024f77", [ASN_UNIVERSAL, ASN_OID, 0, "1.39.119"]; 84roundtrip "06024f77", [ASN_UNIVERSAL, ASN_OID, 0, "1.39.119"];
83roundtrip "06025077", [ASN_UNIVERSAL, ASN_OID, 0, "2.0.119"]; 85roundtrip "06025077", [ASN_UNIVERSAL, ASN_OID, 0, "2.0.119"];

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines