Run util/openssl-format-source -v -c .
[openssl.git] / crypto / x509v3 / v3nametest.c
index fbf82d0cee7418c65de01348939d744a424a4982..7b5c1c8e51270f057ede218566f2d5b779332da7 100644 (file)
 #include "../e_os.h"
 #include <string.h>
 
-static const char *const names[] =
-       {
-       "a", "b", ".", "*", "@",
-       ".a", "a.", ".b", "b.", ".*", "*.", "*@", "@*", "a@", "@a", "b@", "..",
-       "@@", "**", "*.com", "*com", "*.*.com", "*com", "com*", "*example.com",
-       "*@example.com", "test@*.example.com", "example.com", "www.example.com",
-       "test.www.example.com", "*.example.com", "*.www.example.com",
-       "test.*.example.com", "www.*.com",
-       ".www.example.com", "*www.example.com",
-       "example.net", "xn--rger-koa.example.com",
-       "a.example.com", "b.example.com",
-       "postmaster@example.com", "Postmaster@example.com",
-       "postmaster@EXAMPLE.COM",
-       NULL
-       };
+static const char *const names[] = {
+    "a", "b", ".", "*", "@",
+    ".a", "a.", ".b", "b.", ".*", "*.", "*@", "@*", "a@", "@a", "b@", "..",
+    "@@", "**", "*.com", "*com", "*.*.com", "*com", "com*", "*example.com",
+    "*@example.com", "test@*.example.com", "example.com", "www.example.com",
+    "test.www.example.com", "*.example.com", "*.www.example.com",
+    "test.*.example.com", "www.*.com",
+    ".www.example.com", "*www.example.com",
+    "example.net", "xn--rger-koa.example.com",
+    "a.example.com", "b.example.com",
+    "postmaster@example.com", "Postmaster@example.com",
+    "postmaster@EXAMPLE.COM",
+    NULL
+};
 
-static const char *const exceptions[] =
-       {
-       "set CN: host: [*.example.com] matches [a.example.com]",
-       "set CN: host: [*.example.com] matches [b.example.com]",
-       "set CN: host: [*.example.com] matches [www.example.com]",
-       "set CN: host: [*.example.com] matches [xn--rger-koa.example.com]",
-       "set CN: host: [*.www.example.com] matches [test.www.example.com]",
-       "set CN: host: [*.www.example.com] matches [.www.example.com]",
-       "set CN: host: [*www.example.com] matches [www.example.com]",
-       "set CN: host: [test.www.example.com] matches [.www.example.com]",
-       "set CN: host-no-wildcards: [*.www.example.com] matches [.www.example.com]",
-       "set CN: host-no-wildcards: [test.www.example.com] matches [.www.example.com]",
-       "set emailAddress: email: [postmaster@example.com] does not match [Postmaster@example.com]",
-       "set emailAddress: email: [postmaster@EXAMPLE.COM] does not match [Postmaster@example.com]",
-       "set emailAddress: email: [Postmaster@example.com] does not match [postmaster@example.com]",
-       "set emailAddress: email: [Postmaster@example.com] does not match [postmaster@EXAMPLE.COM]",
-       "set dnsName: host: [*.example.com] matches [www.example.com]",
-       "set dnsName: host: [*.example.com] matches [a.example.com]",
-       "set dnsName: host: [*.example.com] matches [b.example.com]",
-       "set dnsName: host: [*.example.com] matches [xn--rger-koa.example.com]",
-       "set dnsName: host: [*.www.example.com] matches [test.www.example.com]",
-       "set dnsName: host-no-wildcards: [*.www.example.com] matches [.www.example.com]",
-       "set dnsName: host-no-wildcards: [test.www.example.com] matches [.www.example.com]",
-       "set dnsName: host: [*.www.example.com] matches [.www.example.com]",
-       "set dnsName: host: [*www.example.com] matches [www.example.com]",
-       "set dnsName: host: [test.www.example.com] matches [.www.example.com]",
-       "set rfc822Name: email: [postmaster@example.com] does not match [Postmaster@example.com]",
-       "set rfc822Name: email: [Postmaster@example.com] does not match [postmaster@example.com]",
-       "set rfc822Name: email: [Postmaster@example.com] does not match [postmaster@EXAMPLE.COM]",
-       "set rfc822Name: email: [postmaster@EXAMPLE.COM] does not match [Postmaster@example.com]",
-       NULL
-       };
+static const char *const exceptions[] = {
+    "set CN: host: [*.example.com] matches [a.example.com]",
+    "set CN: host: [*.example.com] matches [b.example.com]",
+    "set CN: host: [*.example.com] matches [www.example.com]",
+    "set CN: host: [*.example.com] matches [xn--rger-koa.example.com]",
+    "set CN: host: [*.www.example.com] matches [test.www.example.com]",
+    "set CN: host: [*.www.example.com] matches [.www.example.com]",
+    "set CN: host: [*www.example.com] matches [www.example.com]",
+    "set CN: host: [test.www.example.com] matches [.www.example.com]",
+    "set CN: host-no-wildcards: [*.www.example.com] matches [.www.example.com]",
+    "set CN: host-no-wildcards: [test.www.example.com] matches [.www.example.com]",
+    "set emailAddress: email: [postmaster@example.com] does not match [Postmaster@example.com]",
+    "set emailAddress: email: [postmaster@EXAMPLE.COM] does not match [Postmaster@example.com]",
+    "set emailAddress: email: [Postmaster@example.com] does not match [postmaster@example.com]",
+    "set emailAddress: email: [Postmaster@example.com] does not match [postmaster@EXAMPLE.COM]",
+    "set dnsName: host: [*.example.com] matches [www.example.com]",
+    "set dnsName: host: [*.example.com] matches [a.example.com]",
+    "set dnsName: host: [*.example.com] matches [b.example.com]",
+    "set dnsName: host: [*.example.com] matches [xn--rger-koa.example.com]",
+    "set dnsName: host: [*.www.example.com] matches [test.www.example.com]",
+    "set dnsName: host-no-wildcards: [*.www.example.com] matches [.www.example.com]",
+    "set dnsName: host-no-wildcards: [test.www.example.com] matches [.www.example.com]",
+    "set dnsName: host: [*.www.example.com] matches [.www.example.com]",
+    "set dnsName: host: [*www.example.com] matches [www.example.com]",
+    "set dnsName: host: [test.www.example.com] matches [.www.example.com]",
+    "set rfc822Name: email: [postmaster@example.com] does not match [Postmaster@example.com]",
+    "set rfc822Name: email: [Postmaster@example.com] does not match [postmaster@example.com]",
+    "set rfc822Name: email: [Postmaster@example.com] does not match [postmaster@EXAMPLE.COM]",
+    "set rfc822Name: email: [postmaster@EXAMPLE.COM] does not match [Postmaster@example.com]",
+    NULL
+};
 
 static int is_exception(const char *msg)
-       {
-       const char *const *p;
-       for (p = exceptions; *p; ++p)
-               if (strcmp(msg, *p) == 0)
-                       return 1;
-       return 0;
-       }
+{
+    const char *const *p;
+    for (p = exceptions; *p; ++p)
+        if (strcmp(msg, *p) == 0)
+            return 1;
+    return 0;
+}
 
 static int set_cn(X509 *crt, ...)
-       {
-       int ret = 0;
-       X509_NAME *n = NULL;
-       va_list ap;
-       va_start(ap, crt);
-       n = X509_NAME_new();
-       if (n == NULL)
-               goto out;
-       while (1) {
-               int nid;
-               const char *name;
-               nid = va_arg(ap, int);
-               if (nid == 0)
-                       break;
-               name = va_arg(ap, const char *);
-               if (!X509_NAME_add_entry_by_NID(n, nid, MBSTRING_ASC,
-                                                       (unsigned char *)name,
-                                               -1, -1, 1))
-                       goto out;
-       }
-       if (!X509_set_subject_name(crt, n))
-               goto out;
-       ret = 1;
+{
+    int ret = 0;
+    X509_NAME *n = NULL;
+    va_list ap;
+    va_start(ap, crt);
+    n = X509_NAME_new();
+    if (n == NULL)
+        goto out;
+    while (1) {
+        int nid;
+        const char *name;
+        nid = va_arg(ap, int);
+        if (nid == 0)
+            break;
+        name = va_arg(ap, const char *);
+        if (!X509_NAME_add_entry_by_NID(n, nid, MBSTRING_ASC,
+                                        (unsigned char *)name, -1, -1, 1))
+            goto out;
+    }
+    if (!X509_set_subject_name(crt, n))
+        goto out;
+    ret = 1;
  out:
-       X509_NAME_free(n);
-       va_end(ap);
-       return ret;
-       }
+    X509_NAME_free(n);
+    va_end(ap);
+    return ret;
+}
 
 /*-
-int            X509_add_ext(X509 *x, X509_EXTENSION *ex, int loc);
+int             X509_add_ext(X509 *x, X509_EXTENSION *ex, int loc);
 X509_EXTENSION *X509_EXTENSION_create_by_NID(X509_EXTENSION **ex,
-                       int nid, int crit, ASN1_OCTET_STRING *data);
-int            X509_add_ext(X509 *x, X509_EXTENSION *ex, int loc);
+                        int nid, int crit, ASN1_OCTET_STRING *data);
+int             X509_add_ext(X509 *x, X509_EXTENSION *ex, int loc);
 */
 
 static int set_altname(X509 *crt, ...)
-       {
-       int ret = 0;
-       GENERAL_NAMES *gens = NULL;
-       GENERAL_NAME *gen = NULL;
-       ASN1_IA5STRING *ia5 = NULL;
-       va_list ap;
-       va_start(ap, crt);
-       gens = sk_GENERAL_NAME_new_null();
-       if (gens == NULL)
-               goto out;
-       while (1) {
-               int type;
-               const char *name;
-               type = va_arg(ap, int);
-               if (type == 0)
-                       break;
-               name = va_arg(ap, const char *);
+{
+    int ret = 0;
+    GENERAL_NAMES *gens = NULL;
+    GENERAL_NAME *gen = NULL;
+    ASN1_IA5STRING *ia5 = NULL;
+    va_list ap;
+    va_start(ap, crt);
+    gens = sk_GENERAL_NAME_new_null();
+    if (gens == NULL)
+        goto out;
+    while (1) {
+        int type;
+        const char *name;
+        type = va_arg(ap, int);
+        if (type == 0)
+            break;
+        name = va_arg(ap, const char *);
 
-               gen = GENERAL_NAME_new();
-               if (gen == NULL)
-                       goto out;
-               ia5 = ASN1_IA5STRING_new();
-               if (ia5 == NULL)
-                       goto out;
-               if (!ASN1_STRING_set(ia5, name, -1))
-                       goto out;
-               switch (type)
-                       {
-                       case GEN_EMAIL:
-                       case GEN_DNS:
-                               GENERAL_NAME_set0_value(gen, type, ia5);
-                               ia5 = NULL;
-                               break;
-                       default:
-                               abort();
-                       }
-               sk_GENERAL_NAME_push(gens, gen);
-               gen = NULL;
-       }
-       if (!X509_add1_ext_i2d(crt, NID_subject_alt_name, gens, 0, 0))
-               goto out;
-       ret = 1;
+        gen = GENERAL_NAME_new();
+        if (gen == NULL)
+            goto out;
+        ia5 = ASN1_IA5STRING_new();
+        if (ia5 == NULL)
+            goto out;
+        if (!ASN1_STRING_set(ia5, name, -1))
+            goto out;
+        switch (type) {
+        case GEN_EMAIL:
+        case GEN_DNS:
+            GENERAL_NAME_set0_value(gen, type, ia5);
+            ia5 = NULL;
+            break;
+        default:
+            abort();
+        }
+        sk_GENERAL_NAME_push(gens, gen);
+        gen = NULL;
+    }
+    if (!X509_add1_ext_i2d(crt, NID_subject_alt_name, gens, 0, 0))
+        goto out;
+    ret = 1;
  out:
-       ASN1_IA5STRING_free(ia5);
-       GENERAL_NAME_free(gen);
-       GENERAL_NAMES_free(gens);
-       va_end(ap);
-       return ret;
-       }
+    ASN1_IA5STRING_free(ia5);
+    GENERAL_NAME_free(gen);
+    GENERAL_NAMES_free(gens);
+    va_end(ap);
+    return ret;
+}
 
 static int set_cn1(X509 *crt, const char *name)
-       {
-       return set_cn(crt, NID_commonName, name, 0);
-       }
-
+{
+    return set_cn(crt, NID_commonName, name, 0);
+}
 
 static int set_cn_and_email(X509 *crt, const char *name)
-       {
-       return set_cn(crt, NID_commonName, name,
-                     NID_pkcs9_emailAddress, "dummy@example.com", 0);
-       }
+{
+    return set_cn(crt, NID_commonName, name,
+                  NID_pkcs9_emailAddress, "dummy@example.com", 0);
+}
 
 static int set_cn2(X509 *crt, const char *name)
-       {
-       return set_cn(crt, NID_commonName, "dummy value",
-                     NID_commonName, name, 0);
-       }
+{
+    return set_cn(crt, NID_commonName, "dummy value",
+                  NID_commonName, name, 0);
+}
 
 static int set_cn3(X509 *crt, const char *name)
-       {
-       return set_cn(crt, NID_commonName, name,
-                     NID_commonName, "dummy value", 0);
-       }
+{
+    return set_cn(crt, NID_commonName, name,
+                  NID_commonName, "dummy value", 0);
+}
 
 static int set_email1(X509 *crt, const char *name)
-       {
-       return set_cn(crt, NID_pkcs9_emailAddress, name, 0);
-       }
+{
+    return set_cn(crt, NID_pkcs9_emailAddress, name, 0);
+}
 
 static int set_email2(X509 *crt, const char *name)
-       {
-       return set_cn(crt, NID_pkcs9_emailAddress, "dummy@example.com",
-                     NID_pkcs9_emailAddress, name, 0);
-       }
+{
+    return set_cn(crt, NID_pkcs9_emailAddress, "dummy@example.com",
+                  NID_pkcs9_emailAddress, name, 0);
+}
 
 static int set_email3(X509 *crt, const char *name)
-       {
-       return set_cn(crt, NID_pkcs9_emailAddress, name,
-                     NID_pkcs9_emailAddress, "dummy@example.com", 0);
-       }
+{
+    return set_cn(crt, NID_pkcs9_emailAddress, name,
+                  NID_pkcs9_emailAddress, "dummy@example.com", 0);
+}
 
 static int set_email_and_cn(X509 *crt, const char *name)
-       {
-       return set_cn(crt, NID_pkcs9_emailAddress, name,
-                     NID_commonName, "www.example.org", 0);
-       }
+{
+    return set_cn(crt, NID_pkcs9_emailAddress, name,
+                  NID_commonName, "www.example.org", 0);
+}
 
 static int set_altname_dns(X509 *crt, const char *name)
-       {
-       return set_altname(crt, GEN_DNS, name, 0);
-       }
+{
+    return set_altname(crt, GEN_DNS, name, 0);
+}
 
 static int set_altname_email(X509 *crt, const char *name)
-       {
-       return set_altname(crt, GEN_EMAIL, name, 0);
-       }
+{
+    return set_altname(crt, GEN_EMAIL, name, 0);
+}
 
-struct set_name_fn
-       {
-       int (*fn)(X509 *, const char *);
-       const char *name;
-       int host;
-       int email;
-       };
+struct set_name_fn {
+    int (*fn) (X509 *, const char *);
+    const char *name;
+    int host;
+    int email;
+};
 
-static const struct set_name_fn name_fns[] =
-       {
-       {set_cn1, "set CN", 1, 0},
-       {set_cn2, "set CN", 1, 0},
-       {set_cn3, "set CN", 1, 0},
-       {set_cn_and_email, "set CN", 1, 0},
-       {set_email1, "set emailAddress", 0, 1},
-       {set_email2, "set emailAddress", 0, 1},
-       {set_email3, "set emailAddress", 0, 1},
-       {set_email_and_cn, "set emailAddress", 0, 1},
-       {set_altname_dns, "set dnsName", 1, 0},
-       {set_altname_email, "set rfc822Name", 0, 1},
-       {NULL, NULL, 0}
-       };
+static const struct set_name_fn name_fns[] = {
+    {set_cn1, "set CN", 1, 0},
+    {set_cn2, "set CN", 1, 0},
+    {set_cn3, "set CN", 1, 0},
+    {set_cn_and_email, "set CN", 1, 0},
+    {set_email1, "set emailAddress", 0, 1},
+    {set_email2, "set emailAddress", 0, 1},
+    {set_email3, "set emailAddress", 0, 1},
+    {set_email_and_cn, "set emailAddress", 0, 1},
+    {set_altname_dns, "set dnsName", 1, 0},
+    {set_altname_email, "set rfc822Name", 0, 1},
+    {NULL, NULL, 0}
+};
 
 static X509 *make_cert()
-       {
-       X509 *ret = NULL;
-       X509 *crt = NULL;
-       X509_NAME *issuer = NULL;
-       crt = X509_new();
-       if (crt == NULL)
-               goto out;
-       if (!X509_set_version(crt, 3))
-               goto out;
-       ret = crt;
-       crt = NULL;
+{
+    X509 *ret = NULL;
+    X509 *crt = NULL;
+    X509_NAME *issuer = NULL;
+    crt = X509_new();
+    if (crt == NULL)
+        goto out;
+    if (!X509_set_version(crt, 3))
+        goto out;
+    ret = crt;
+    crt = NULL;
  out:
-       X509_NAME_free(issuer);
-       return ret;
-       }
+    X509_NAME_free(issuer);
+    return ret;
+}
 
 static int errors;
 
 static void check_message(const struct set_name_fn *fn, const char *op,
-                         const char *nameincert, int match, const char *name)
-       {
-       char msg[1024];
-       if (match < 0)
-               return;
-       BIO_snprintf(msg, sizeof(msg), "%s: %s: [%s] %s [%s]",
-                fn->name, op, nameincert,
-                match ? "matches" : "does not match", name);
-       if (is_exception(msg))
-               return;
-       puts(msg);
-       ++errors;
-       }
+                          const char *nameincert, int match, const char *name)
+{
+    char msg[1024];
+    if (match < 0)
+        return;
+    BIO_snprintf(msg, sizeof(msg), "%s: %s: [%s] %s [%s]",
+                 fn->name, op, nameincert,
+                 match ? "matches" : "does not match", name);
+    if (is_exception(msg))
+        return;
+    puts(msg);
+    ++errors;
+}
 
 static void run_cert(X509 *crt, const char *nameincert,
-                    const struct set_name_fn *fn)
-       {
-       const char *const *pname = names;
-       while (*pname)
-               {
-               int samename = strcasecmp(nameincert, *pname) == 0;
-               size_t namelen = strlen(*pname);
-               char *name = malloc(namelen);
-               int match, ret;
-               memcpy(name, *pname, namelen);
+                     const struct set_name_fn *fn)
+{
+    const char *const *pname = names;
+    while (*pname) {
+        int samename = strcasecmp(nameincert, *pname) == 0;
+        size_t namelen = strlen(*pname);
+        char *name = malloc(namelen);
+        int match, ret;
+        memcpy(name, *pname, namelen);
 
-               ret = X509_check_host(crt, name, namelen, 0, NULL);
-               match = -1;
-               if (ret < 0)
-                       {
-                       fprintf(stderr, "internal error in X509_check_host");
-                       ++errors;
-                       }
-               else if (fn->host)
-                       {
-                       if (ret == 1 && !samename)
-                               match = 1;
-                       if (ret == 0 && samename)
-                               match = 0;
-                       }
-               else if (ret == 1)
-                       match = 1;
-               check_message(fn, "host", nameincert, match, *pname);
+        ret = X509_check_host(crt, name, namelen, 0, NULL);
+        match = -1;
+        if (ret < 0) {
+            fprintf(stderr, "internal error in X509_check_host");
+            ++errors;
+        } else if (fn->host) {
+            if (ret == 1 && !samename)
+                match = 1;
+            if (ret == 0 && samename)
+                match = 0;
+        } else if (ret == 1)
+            match = 1;
+        check_message(fn, "host", nameincert, match, *pname);
 
-               ret = X509_check_host(crt, name, namelen,
-                                     X509_CHECK_FLAG_NO_WILDCARDS, NULL);
-               match = -1;
-               if (ret < 0)
-                       {
-                       fprintf(stderr, "internal error in X509_check_host");
-                       ++errors;
-                       }
-               else if (fn->host)
-                       {
-                       if (ret == 1 && !samename)
-                               match = 1;
-                       if (ret == 0 && samename)
-                               match = 0;
-                       }
-               else if (ret == 1)
-                       match = 1;
-               check_message(fn, "host-no-wildcards",
-                             nameincert, match, *pname);
+        ret = X509_check_host(crt, name, namelen,
+                              X509_CHECK_FLAG_NO_WILDCARDS, NULL);
+        match = -1;
+        if (ret < 0) {
+            fprintf(stderr, "internal error in X509_check_host");
+            ++errors;
+        } else if (fn->host) {
+            if (ret == 1 && !samename)
+                match = 1;
+            if (ret == 0 && samename)
+                match = 0;
+        } else if (ret == 1)
+            match = 1;
+        check_message(fn, "host-no-wildcards", nameincert, match, *pname);
 
-               ret = X509_check_email(crt, name, namelen, 0);
-               match = -1;
-               if (fn->email)
-                       {
-                       if (ret && !samename)
-                               match = 1;
-                       if (!ret && samename && strchr(nameincert, '@') != NULL)
-                               match = 0;
-                       }
-               else if (ret)
-                       match = 1;
-               check_message(fn, "email", nameincert, match, *pname);
-               ++pname;
-               free(name);
-               }
-       }
+        ret = X509_check_email(crt, name, namelen, 0);
+        match = -1;
+        if (fn->email) {
+            if (ret && !samename)
+                match = 1;
+            if (!ret && samename && strchr(nameincert, '@') != NULL)
+                match = 0;
+        } else if (ret)
+            match = 1;
+        check_message(fn, "email", nameincert, match, *pname);
+        ++pname;
+        free(name);
+    }
+}
 
-int
-main(void)
-       {
-       const struct set_name_fn *pfn = name_fns;
-       while (pfn->name) {
-               const char *const *pname = names;
-               while (*pname)
-                       {
-                       X509 *crt = make_cert();
-                       if (crt == NULL)
-                               {
-                               fprintf(stderr, "make_cert failed\n");
-                               return 1;
-                               }
-                       if (!pfn->fn(crt, *pname))
-                               {
-                               fprintf(stderr, "X509 name setting failed\n");
-                               return 1;
-                               }
-                       run_cert(crt, *pname, pfn);
-                       X509_free(crt);
-                       ++pname;
-                       }
-               ++pfn;
-       }
-       return errors > 0 ? 1 : 0;
-       }
+int main(void)
+{
+    const struct set_name_fn *pfn = name_fns;
+    while (pfn->name) {
+        const char *const *pname = names;
+        while (*pname) {
+            X509 *crt = make_cert();
+            if (crt == NULL) {
+                fprintf(stderr, "make_cert failed\n");
+                return 1;
+            }
+            if (!pfn->fn(crt, *pname)) {
+                fprintf(stderr, "X509 name setting failed\n");
+                return 1;
+            }
+            run_cert(crt, *pname, pfn);
+            X509_free(crt);
+            ++pname;
+        }
+        ++pfn;
+    }
+    return errors > 0 ? 1 : 0;
+}