Home | History | Annotate | Line # | Download | only in test
      1 /*
      2  * Copyright 2016-2025 The OpenSSL Project Authors. All Rights Reserved.
      3  *
      4  * Licensed under the Apache License 2.0 (the "License").  You may not use
      5  * this file except in compliance with the License.  You can obtain a copy
      6  * in the file LICENSE in the source distribution or at
      7  * https://www.openssl.org/source/license.html
      8  */
      9 
     10 #include <stdio.h>
     11 #include <string.h>
     12 #include <openssl/x509.h>
     13 #include <openssl/x509v3.h>
     14 #include <openssl/pem.h>
     15 #include <openssl/err.h>
     16 #include "internal/nelem.h"
     17 
     18 #include "testutil.h"
     19 
     20 static const char *infile;
     21 
     22 static int test_pathlen(void)
     23 {
     24     X509 *x = NULL;
     25     BIO *b = NULL;
     26     long pathlen;
     27     int ret = 0;
     28 
     29     if (!TEST_ptr(b = BIO_new_file(infile, "r"))
     30         || !TEST_ptr(x = PEM_read_bio_X509(b, NULL, NULL, NULL))
     31         || !TEST_int_eq(pathlen = X509_get_pathlen(x), 6))
     32         goto end;
     33 
     34     ret = 1;
     35 
     36 end:
     37     BIO_free(b);
     38     X509_free(x);
     39     return ret;
     40 }
     41 
     42 #ifndef OPENSSL_NO_RFC3779
     43 static int test_asid(void)
     44 {
     45     ASN1_INTEGER *val1 = NULL, *val2 = NULL;
     46     ASIdentifiers *asid1 = ASIdentifiers_new(), *asid2 = ASIdentifiers_new(),
     47                   *asid3 = ASIdentifiers_new(), *asid4 = ASIdentifiers_new();
     48     int testresult = 0;
     49 
     50     if (!TEST_ptr(asid1)
     51         || !TEST_ptr(asid2)
     52         || !TEST_ptr(asid3))
     53         goto err;
     54 
     55     if (!TEST_ptr(val1 = ASN1_INTEGER_new())
     56         || !TEST_true(ASN1_INTEGER_set_int64(val1, 64496)))
     57         goto err;
     58 
     59     if (!TEST_true(X509v3_asid_add_id_or_range(asid1, V3_ASID_ASNUM, val1, NULL)))
     60         goto err;
     61 
     62     val1 = NULL;
     63     if (!TEST_ptr(val2 = ASN1_INTEGER_new())
     64         || !TEST_true(ASN1_INTEGER_set_int64(val2, 64497)))
     65         goto err;
     66 
     67     if (!TEST_true(X509v3_asid_add_id_or_range(asid2, V3_ASID_ASNUM, val2, NULL)))
     68         goto err;
     69 
     70     val2 = NULL;
     71     if (!TEST_ptr(val1 = ASN1_INTEGER_new())
     72         || !TEST_true(ASN1_INTEGER_set_int64(val1, 64496))
     73         || !TEST_ptr(val2 = ASN1_INTEGER_new())
     74         || !TEST_true(ASN1_INTEGER_set_int64(val2, 64497)))
     75         goto err;
     76 
     77     /*
     78      * Just tests V3_ASID_ASNUM for now. Could be extended at some point to also
     79      * test V3_ASID_RDI if we think it is worth it.
     80      */
     81     if (!TEST_true(X509v3_asid_add_id_or_range(asid3, V3_ASID_ASNUM, val1, val2)))
     82         goto err;
     83     val1 = val2 = NULL;
     84 
     85     /* Actual subsets */
     86     if (!TEST_true(X509v3_asid_subset(NULL, NULL))
     87         || !TEST_true(X509v3_asid_subset(NULL, asid1))
     88         || !TEST_true(X509v3_asid_subset(asid1, asid1))
     89         || !TEST_true(X509v3_asid_subset(asid2, asid2))
     90         || !TEST_true(X509v3_asid_subset(asid1, asid3))
     91         || !TEST_true(X509v3_asid_subset(asid2, asid3))
     92         || !TEST_true(X509v3_asid_subset(asid3, asid3))
     93         || !TEST_true(X509v3_asid_subset(asid4, asid1))
     94         || !TEST_true(X509v3_asid_subset(asid4, asid2))
     95         || !TEST_true(X509v3_asid_subset(asid4, asid3)))
     96         goto err;
     97 
     98     /* Not subsets */
     99     if (!TEST_false(X509v3_asid_subset(asid1, NULL))
    100         || !TEST_false(X509v3_asid_subset(asid1, asid2))
    101         || !TEST_false(X509v3_asid_subset(asid2, asid1))
    102         || !TEST_false(X509v3_asid_subset(asid3, asid1))
    103         || !TEST_false(X509v3_asid_subset(asid3, asid2))
    104         || !TEST_false(X509v3_asid_subset(asid1, asid4))
    105         || !TEST_false(X509v3_asid_subset(asid2, asid4))
    106         || !TEST_false(X509v3_asid_subset(asid3, asid4)))
    107         goto err;
    108 
    109     testresult = 1;
    110 err:
    111     ASN1_INTEGER_free(val1);
    112     ASN1_INTEGER_free(val2);
    113     ASIdentifiers_free(asid1);
    114     ASIdentifiers_free(asid2);
    115     ASIdentifiers_free(asid3);
    116     ASIdentifiers_free(asid4);
    117     return testresult;
    118 }
    119 
    120 static struct ip_ranges_st {
    121     const unsigned int afi;
    122     const char *ip1;
    123     const char *ip2;
    124     int rorp;
    125 } ranges[] = {
    126     { IANA_AFI_IPV4, "192.168.0.0", "192.168.0.1", IPAddressOrRange_addressPrefix },
    127     { IANA_AFI_IPV4, "192.168.0.0", "192.168.0.2", IPAddressOrRange_addressRange },
    128     { IANA_AFI_IPV4, "192.168.0.0", "192.168.0.3", IPAddressOrRange_addressPrefix },
    129     { IANA_AFI_IPV4, "192.168.0.0", "192.168.0.254", IPAddressOrRange_addressRange },
    130     { IANA_AFI_IPV4, "192.168.0.0", "192.168.0.255", IPAddressOrRange_addressPrefix },
    131     { IANA_AFI_IPV4, "192.168.0.1", "192.168.0.255", IPAddressOrRange_addressRange },
    132     { IANA_AFI_IPV4, "192.168.0.1", "192.168.0.1", IPAddressOrRange_addressPrefix },
    133     { IANA_AFI_IPV4, "192.168.0.0", "192.168.255.255", IPAddressOrRange_addressPrefix },
    134     { IANA_AFI_IPV4, "192.168.1.0", "192.168.255.255", IPAddressOrRange_addressRange },
    135     { IANA_AFI_IPV6, "2001:0db8::0", "2001:0db8::1", IPAddressOrRange_addressPrefix },
    136     { IANA_AFI_IPV6, "2001:0db8::0", "2001:0db8::2", IPAddressOrRange_addressRange },
    137     { IANA_AFI_IPV6, "2001:0db8::0", "2001:0db8::3", IPAddressOrRange_addressPrefix },
    138     { IANA_AFI_IPV6, "2001:0db8::0", "2001:0db8::fffe", IPAddressOrRange_addressRange },
    139     { IANA_AFI_IPV6, "2001:0db8::0", "2001:0db8::ffff", IPAddressOrRange_addressPrefix },
    140     { IANA_AFI_IPV6, "2001:0db8::1", "2001:0db8::ffff", IPAddressOrRange_addressRange },
    141     { IANA_AFI_IPV6, "2001:0db8::1", "2001:0db8::1", IPAddressOrRange_addressPrefix },
    142     { IANA_AFI_IPV6, "2001:0db8::0:0", "2001:0db8::ffff:ffff", IPAddressOrRange_addressPrefix },
    143     { IANA_AFI_IPV6, "2001:0db8::1:0", "2001:0db8::ffff:ffff", IPAddressOrRange_addressRange }
    144 };
    145 
    146 static int check_addr(IPAddrBlocks *addr, int type)
    147 {
    148     IPAddressFamily *fam;
    149     IPAddressOrRange *aorr;
    150 
    151     if (!TEST_int_eq(sk_IPAddressFamily_num(addr), 1))
    152         return 0;
    153 
    154     fam = sk_IPAddressFamily_value(addr, 0);
    155     if (!TEST_ptr(fam))
    156         return 0;
    157 
    158     if (!TEST_int_eq(fam->ipAddressChoice->type, IPAddressChoice_addressesOrRanges))
    159         return 0;
    160 
    161     if (!TEST_int_eq(sk_IPAddressOrRange_num(fam->ipAddressChoice->u.addressesOrRanges), 1))
    162         return 0;
    163 
    164     aorr = sk_IPAddressOrRange_value(fam->ipAddressChoice->u.addressesOrRanges, 0);
    165     if (!TEST_ptr(aorr))
    166         return 0;
    167 
    168     if (!TEST_int_eq(aorr->type, type))
    169         return 0;
    170 
    171     return 1;
    172 }
    173 
    174 static int test_addr_ranges(void)
    175 {
    176     IPAddrBlocks *addr = NULL;
    177     ASN1_OCTET_STRING *ip1 = NULL, *ip2 = NULL;
    178     size_t i;
    179     int testresult = 0;
    180 
    181     for (i = 0; i < OSSL_NELEM(ranges); i++) {
    182         addr = sk_IPAddressFamily_new_null();
    183         if (!TEST_ptr(addr))
    184             goto end;
    185         /*
    186          * Has the side effect of installing the comparison function onto the
    187          * stack.
    188          */
    189         if (!TEST_true(X509v3_addr_canonize(addr)))
    190             goto end;
    191 
    192         ip1 = a2i_IPADDRESS(ranges[i].ip1);
    193         if (!TEST_ptr(ip1))
    194             goto end;
    195         if (!TEST_true(ip1->length == 4 || ip1->length == 16))
    196             goto end;
    197         ip2 = a2i_IPADDRESS(ranges[i].ip2);
    198         if (!TEST_ptr(ip2))
    199             goto end;
    200         if (!TEST_int_eq(ip2->length, ip1->length))
    201             goto end;
    202         if (!TEST_true(memcmp(ip1->data, ip2->data, ip1->length) <= 0))
    203             goto end;
    204 
    205         if (!TEST_true(X509v3_addr_add_range(addr, ranges[i].afi, NULL, ip1->data, ip2->data)))
    206             goto end;
    207 
    208         if (!TEST_true(X509v3_addr_is_canonical(addr)))
    209             goto end;
    210 
    211         if (!check_addr(addr, ranges[i].rorp))
    212             goto end;
    213 
    214         sk_IPAddressFamily_pop_free(addr, IPAddressFamily_free);
    215         addr = NULL;
    216         ASN1_OCTET_STRING_free(ip1);
    217         ASN1_OCTET_STRING_free(ip2);
    218         ip1 = ip2 = NULL;
    219     }
    220 
    221     testresult = 1;
    222 end:
    223     sk_IPAddressFamily_pop_free(addr, IPAddressFamily_free);
    224     ASN1_OCTET_STRING_free(ip1);
    225     ASN1_OCTET_STRING_free(ip2);
    226     return testresult;
    227 }
    228 
    229 static int test_addr_fam_len(void)
    230 {
    231     int testresult = 0;
    232     IPAddrBlocks *addr = NULL;
    233     IPAddressFamily *f1 = NULL;
    234     ASN1_OCTET_STRING *ip1 = NULL, *ip2 = NULL;
    235     unsigned char key[6];
    236     unsigned int keylen;
    237     unsigned afi = IANA_AFI_IPV4;
    238 
    239     /* Create the IPAddrBlocks with a good IPAddressFamily */
    240     addr = sk_IPAddressFamily_new_null();
    241     if (!TEST_ptr(addr))
    242         goto end;
    243     ip1 = a2i_IPADDRESS(ranges[0].ip1);
    244     if (!TEST_ptr(ip1))
    245         goto end;
    246     ip2 = a2i_IPADDRESS(ranges[0].ip2);
    247     if (!TEST_ptr(ip2))
    248         goto end;
    249     if (!TEST_true(X509v3_addr_add_range(addr, ranges[0].afi, NULL, ip1->data, ip2->data)))
    250         goto end;
    251     if (!TEST_true(X509v3_addr_is_canonical(addr)))
    252         goto end;
    253 
    254     /* Create our malformed IPAddressFamily */
    255     key[0] = (afi >> 8) & 0xFF;
    256     key[1] = afi & 0xFF;
    257     key[2] = 0xD;
    258     key[3] = 0xE;
    259     key[4] = 0xA;
    260     key[5] = 0xD;
    261     keylen = 6;
    262     if ((f1 = IPAddressFamily_new()) == NULL)
    263         goto end;
    264     if (f1->ipAddressChoice == NULL && (f1->ipAddressChoice = IPAddressChoice_new()) == NULL)
    265         goto end;
    266     if (f1->addressFamily == NULL && (f1->addressFamily = ASN1_OCTET_STRING_new()) == NULL)
    267         goto end;
    268     if (!ASN1_OCTET_STRING_set(f1->addressFamily, key, keylen))
    269         goto end;
    270 
    271     /* Push and transfer memory ownership to stack */
    272     if (!sk_IPAddressFamily_push(addr, f1))
    273         goto end;
    274     f1 = NULL;
    275 
    276     /* Shouldn't be able to canonize this as the len is > 3*/
    277     if (!TEST_false(X509v3_addr_canonize(addr)))
    278         goto end;
    279 
    280     /* Pop and free the new stack element */
    281     IPAddressFamily_free(sk_IPAddressFamily_pop(addr));
    282 
    283     /* Create a well-formed IPAddressFamily */
    284     key[0] = (afi >> 8) & 0xFF;
    285     key[1] = afi & 0xFF;
    286     key[2] = 0x1;
    287     keylen = 3;
    288     if ((f1 = IPAddressFamily_new()) == NULL)
    289         goto end;
    290     if (f1->ipAddressChoice == NULL && (f1->ipAddressChoice = IPAddressChoice_new()) == NULL)
    291         goto end;
    292     if (f1->addressFamily == NULL && (f1->addressFamily = ASN1_OCTET_STRING_new()) == NULL)
    293         goto end;
    294     if (!ASN1_OCTET_STRING_set(f1->addressFamily, key, keylen))
    295         goto end;
    296 
    297     /* Mark this as inheritance so we skip some of the is_canonize checks */
    298     f1->ipAddressChoice->type = IPAddressChoice_inherit;
    299 
    300     /* Push and transfer memory ownership to stack */
    301     if (!sk_IPAddressFamily_push(addr, f1))
    302         goto end;
    303     f1 = NULL;
    304 
    305     /* Should be able to canonize now */
    306     if (!TEST_true(X509v3_addr_canonize(addr)))
    307         goto end;
    308 
    309     testresult = 1;
    310 end:
    311     /* Free stack and any memory owned by detached element */
    312     IPAddressFamily_free(f1);
    313     sk_IPAddressFamily_pop_free(addr, IPAddressFamily_free);
    314 
    315     ASN1_OCTET_STRING_free(ip1);
    316     ASN1_OCTET_STRING_free(ip2);
    317     return testresult;
    318 }
    319 
    320 static struct extvalues_st {
    321     const char *value;
    322     int pass;
    323 } extvalues[] = {
    324     /* No prefix is ok */
    325     { "sbgp-ipAddrBlock = IPv4:192.0.0.1\n", 1 },
    326     { "sbgp-ipAddrBlock = IPv4:192.0.0.0/0\n", 1 },
    327     { "sbgp-ipAddrBlock = IPv4:192.0.0.0/1\n", 1 },
    328     { "sbgp-ipAddrBlock = IPv4:192.0.0.0/32\n", 1 },
    329     /* Prefix is too long */
    330     { "sbgp-ipAddrBlock = IPv4:192.0.0.0/33\n", 0 },
    331     /* Unreasonably large prefix */
    332     { "sbgp-ipAddrBlock = IPv4:192.0.0.0/12341234\n", 0 },
    333     /* Invalid IP addresses */
    334     { "sbgp-ipAddrBlock = IPv4:192.0.0\n", 0 },
    335     { "sbgp-ipAddrBlock = IPv4:256.0.0.0\n", 0 },
    336     { "sbgp-ipAddrBlock = IPv4:-1.0.0.0\n", 0 },
    337     { "sbgp-ipAddrBlock = IPv4:192.0.0.0.0\n", 0 },
    338     { "sbgp-ipAddrBlock = IPv3:192.0.0.0\n", 0 },
    339 
    340     /* IPv6 */
    341     /* No prefix is ok */
    342     { "sbgp-ipAddrBlock = IPv6:2001:db8::\n", 1 },
    343     { "sbgp-ipAddrBlock = IPv6:2001::db8\n", 1 },
    344     { "sbgp-ipAddrBlock = IPv6:2001:0db8:0000:0000:0000:0000:0000:0000\n", 1 },
    345     { "sbgp-ipAddrBlock = IPv6:2001:db8::/0\n", 1 },
    346     { "sbgp-ipAddrBlock = IPv6:2001:db8::/1\n", 1 },
    347     { "sbgp-ipAddrBlock = IPv6:2001:db8::/32\n", 1 },
    348     { "sbgp-ipAddrBlock = IPv6:2001:0db8:0000:0000:0000:0000:0000:0000/32\n", 1 },
    349     { "sbgp-ipAddrBlock = IPv6:2001:db8::/128\n", 1 },
    350     /* Prefix is too long */
    351     { "sbgp-ipAddrBlock = IPv6:2001:db8::/129\n", 0 },
    352     /* Unreasonably large prefix */
    353     { "sbgp-ipAddrBlock = IPv6:2001:db8::/12341234\n", 0 },
    354     /* Invalid IP addresses */
    355     /* Not enough blocks of numbers */
    356     { "sbgp-ipAddrBlock = IPv6:2001:0db8:0000:0000:0000:0000:0000\n", 0 },
    357     /* Too many blocks of numbers */
    358     { "sbgp-ipAddrBlock = IPv6:2001:0db8:0000:0000:0000:0000:0000:0000:0000\n", 0 },
    359     /* First value too large */
    360     { "sbgp-ipAddrBlock = IPv6:1ffff:0db8:0000:0000:0000:0000:0000:0000\n", 0 },
    361     /* First value with invalid characters */
    362     { "sbgp-ipAddrBlock = IPv6:fffg:0db8:0000:0000:0000:0000:0000:0000\n", 0 },
    363     /* First value is negative */
    364     { "sbgp-ipAddrBlock = IPv6:-1:0db8:0000:0000:0000:0000:0000:0000\n", 0 }
    365 };
    366 
    367 static int test_ext_syntax(void)
    368 {
    369     size_t i;
    370     int testresult = 1;
    371 
    372     for (i = 0; i < OSSL_NELEM(extvalues); i++) {
    373         X509V3_CTX ctx;
    374         BIO *extbio = BIO_new_mem_buf(extvalues[i].value,
    375             strlen(extvalues[i].value));
    376         CONF *conf;
    377         long eline;
    378 
    379         if (!TEST_ptr(extbio))
    380             return 0;
    381 
    382         conf = NCONF_new_ex(NULL, NULL);
    383         if (!TEST_ptr(conf)) {
    384             BIO_free(extbio);
    385             return 0;
    386         }
    387         if (!TEST_long_gt(NCONF_load_bio(conf, extbio, &eline), 0)) {
    388             testresult = 0;
    389         } else {
    390             X509V3_set_ctx_test(&ctx);
    391             X509V3_set_nconf(&ctx, conf);
    392 
    393             if (extvalues[i].pass) {
    394                 if (!TEST_true(X509V3_EXT_add_nconf(conf, &ctx, "default",
    395                         NULL))) {
    396                     TEST_info("Value: %s", extvalues[i].value);
    397                     testresult = 0;
    398                 }
    399             } else {
    400                 ERR_set_mark();
    401                 if (!TEST_false(X509V3_EXT_add_nconf(conf, &ctx, "default",
    402                         NULL))) {
    403                     testresult = 0;
    404                     TEST_info("Value: %s", extvalues[i].value);
    405                     ERR_clear_last_mark();
    406                 } else {
    407                     ERR_pop_to_mark();
    408                 }
    409             }
    410         }
    411         BIO_free(extbio);
    412         NCONF_free(conf);
    413     }
    414 
    415     return testresult;
    416 }
    417 
    418 static int test_addr_subset(void)
    419 {
    420     int i;
    421     int ret = 0;
    422     IPAddrBlocks *addrEmpty = NULL;
    423     IPAddrBlocks *addr[3] = { NULL, NULL };
    424     ASN1_OCTET_STRING *ip1[3] = { NULL, NULL };
    425     ASN1_OCTET_STRING *ip2[3] = { NULL, NULL };
    426     int sz = OSSL_NELEM(addr);
    427 
    428     for (i = 0; i < sz; ++i) {
    429         /* Create the IPAddrBlocks with a good IPAddressFamily */
    430         if (!TEST_ptr(addr[i] = sk_IPAddressFamily_new_null())
    431             || !TEST_ptr(ip1[i] = a2i_IPADDRESS(ranges[i].ip1))
    432             || !TEST_ptr(ip2[i] = a2i_IPADDRESS(ranges[i].ip2))
    433             || !TEST_true(X509v3_addr_add_range(addr[i], ranges[i].afi, NULL,
    434                 ip1[i]->data, ip2[i]->data)))
    435             goto end;
    436     }
    437 
    438     ret = TEST_ptr(addrEmpty = sk_IPAddressFamily_new_null())
    439         && TEST_true(X509v3_addr_subset(NULL, NULL))
    440         && TEST_true(X509v3_addr_subset(NULL, addr[0]))
    441         && TEST_true(X509v3_addr_subset(addrEmpty, addr[0]))
    442         && TEST_true(X509v3_addr_subset(addr[0], addr[0]))
    443         && TEST_true(X509v3_addr_subset(addr[0], addr[1]))
    444         && TEST_true(X509v3_addr_subset(addr[0], addr[2]))
    445         && TEST_true(X509v3_addr_subset(addr[1], addr[2]))
    446         && TEST_false(X509v3_addr_subset(addr[0], NULL))
    447         && TEST_false(X509v3_addr_subset(addr[1], addr[0]))
    448         && TEST_false(X509v3_addr_subset(addr[2], addr[1]))
    449         && TEST_false(X509v3_addr_subset(addr[0], addrEmpty));
    450 end:
    451     sk_IPAddressFamily_pop_free(addrEmpty, IPAddressFamily_free);
    452     for (i = 0; i < sz; ++i) {
    453         sk_IPAddressFamily_pop_free(addr[i], IPAddressFamily_free);
    454         ASN1_OCTET_STRING_free(ip1[i]);
    455         ASN1_OCTET_STRING_free(ip2[i]);
    456     }
    457     return ret;
    458 }
    459 
    460 #endif /* OPENSSL_NO_RFC3779 */
    461 
    462 OPT_TEST_DECLARE_USAGE("cert.pem\n")
    463 
    464 int setup_tests(void)
    465 {
    466     if (!test_skip_common_options()) {
    467         TEST_error("Error parsing test options\n");
    468         return 0;
    469     }
    470 
    471     if (!TEST_ptr(infile = test_get_argument(0)))
    472         return 0;
    473 
    474     ADD_TEST(test_pathlen);
    475 #ifndef OPENSSL_NO_RFC3779
    476     ADD_TEST(test_asid);
    477     ADD_TEST(test_addr_ranges);
    478     ADD_TEST(test_ext_syntax);
    479     ADD_TEST(test_addr_fam_len);
    480     ADD_TEST(test_addr_subset);
    481 #endif /* OPENSSL_NO_RFC3779 */
    482     return 1;
    483 }
    484