[thirdparty/openssl.git] / test / v3nametest.c

/*
 * Copyright 2012-2018 The OpenSSL Project Authors. All Rights Reserved.
 *
 * Licensed under the Apache License 2.0 (the "License").  You may not use
 * this file except in compliance with the License.  You can obtain a copy
 * in the file LICENSE in the source distribution or at
 * https://www.openssl.org/source/license.html
 */

#include <string.h>

#include <openssl/e_os2.h>
#include <openssl/x509.h>
#include <openssl/x509v3.h>
#include "internal/nelem.h"
#include "testutil.h"

#ifdef OPENSSL_SYS_WINDOWS
# define strcasecmp _stricmp
#endif

static const char *const names[] = {
    "a", "b", ".", "*", "@",
    ".a", "a.", ".b", "b.", ".*", "*.", "*@", "@*", "a@", "@a", "b@", "..",
    "-example.com", "example-.com",
    "@@", "**", "*.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",
    "*.xn--rger-koa.example.com", "www.xn--rger-koa.example.com",
    "*.good--example.com", "www.good--example.com",
    "*.xn--bar.com", "xn--foo.xn--bar.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: [*.xn--rger-koa.example.com] matches [www.xn--rger-koa.example.com]",
    "set CN: host: [*.xn--bar.com] matches [xn--foo.xn--bar.com]",
    "set CN: host: [*.good--example.com] matches [www.good--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 dnsName: host: [*.xn--rger-koa.example.com] matches [www.xn--rger-koa.example.com]",
    "set dnsName: host: [*.xn--bar.com] matches [xn--foo.xn--bar.com]",
    "set dnsName: host: [*.good--example.com] matches [www.good--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;
}

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;
 out:
    X509_NAME_free(n);
    va_end(ap);
    return ret;
}

/*-
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);
*/

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 *);

        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;
}

static int set_cn1(X509 *crt, const char *name)
{
    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);
}

static int set_cn2(X509 *crt, const char *name)
{
    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);
}

static int set_email1(X509 *crt, const char *name)
{
    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);
}

static int set_email3(X509 *crt, const char *name)
{
    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);
}

static int set_altname_dns(X509 *crt, const char *name)
{
    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);
}

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},
};

static X509 *make_cert(void)
{
    X509 *crt = NULL;

    if (!TEST_ptr(crt = X509_new()))
        return NULL;
    if (!TEST_true(X509_set_version(crt, 2))) {
        X509_free(crt);
        return NULL;
    }
    return crt;
}

static int 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 1;
    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 1;
    TEST_error("%s", msg);
    return 0;
}

static int run_cert(X509 *crt, const char *nameincert,
                     const struct set_name_fn *fn)
{
    const char *const *pname = names;
    int failed = 0;

    for (; *pname != NULL; ++pname) {
        int samename = strcasecmp(nameincert, *pname) == 0;
        size_t namelen = strlen(*pname);
        char *name = OPENSSL_malloc(namelen);
        int match, ret;

        memcpy(name, *pname, namelen);

        match = -1;
        if (!TEST_int_ge(ret = X509_check_host(crt, name, namelen, 0, NULL),
                         0)) {
            failed = 1;
        } else if (fn->host) {
            if (ret == 1 && !samename)
                match = 1;
            if (ret == 0 && samename)
                match = 0;
        } else if (ret == 1)
            match = 1;
        if (!TEST_true(check_message(fn, "host", nameincert, match, *pname)))
            failed = 1;

        match = -1;
        if (!TEST_int_ge(ret = X509_check_host(crt, name, namelen,
                                               X509_CHECK_FLAG_NO_WILDCARDS,
                                               NULL), 0)) {
            failed = 1;
        } else if (fn->host) {
            if (ret == 1 && !samename)
                match = 1;
            if (ret == 0 && samename)
                match = 0;
        } else if (ret == 1)
            match = 1;
        if (!TEST_true(check_message(fn, "host-no-wildcards",
                                     nameincert, match, *pname)))
            failed = 1;

        match = -1;
        ret = X509_check_email(crt, name, namelen, 0);
        if (fn->email) {
            if (ret && !samename)
                match = 1;
            if (!ret && samename && strchr(nameincert, '@') != NULL)
                match = 0;
        } else if (ret)
            match = 1;
        if (!TEST_true(check_message(fn, "email", nameincert, match, *pname)))
            failed = 1;
        OPENSSL_free(name);
    }

    return failed == 0;
}

static int call_run_cert(int i)
{
    int failed = 0;
    const struct set_name_fn *pfn = &name_fns[i];
    X509 *crt;
    const char *const *pname;

    TEST_info("%s", pfn->name);
    for (pname = names; *pname != NULL; pname++) {
        if (!TEST_ptr(crt = make_cert())
             || !TEST_true(pfn->fn(crt, *pname))
             || !run_cert(crt, *pname, pfn))
            failed = 1;
        X509_free(crt);
    }
    return failed == 0;
}

int setup_tests(void)
{
    ADD_ALL_TESTS(call_run_cert, OSSL_NELEM(name_fns));
    return 1;
}
Commit	Line	Data
440e5d80	1	/*
6738bf14	2	* Copyright 2012-2018 The OpenSSL Project Authors. All Rights Reserved.
440e5d80	3	*
909f1a2e	4	* Licensed under the Apache License 2.0 (the "License"). You may not use
440e5d80 RS	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
f3ab6c16	10	#include <string.h>
2b1aa198 RL	11
2b1aa198 RL	12	#include <openssl/e_os2.h>
d88926f1 DSH	13	#include <openssl/x509.h>
d88926f1 DSH	14	#include <openssl/x509v3.h>
2b1aa198	15	#include "internal/nelem.h"
f3ab6c16	16	#include "testutil.h"
d88926f1	17
2b1aa198 RL	18	#ifdef OPENSSL_SYS_WINDOWS
	19	# define strcasecmp _stricmp
	20	#endif
	21
0f113f3e MC	22	static const char *const names[] = {
	23	"a", "b", ".", "*", "@",
	24	".a", "a.", ".b", "b.", ".", ".", "@", "@", "a@", "@a", "b@", "..",
9f9a3926	25	"-example.com", "example-.com",
0f113f3e MC	26	"@@", "*", ".com", "com", "..com", "com", "com", "example.com",
	27	"@example.com", "test@.example.com", "example.com", "www.example.com",
	28	"test.www.example.com", ".example.com", ".www.example.com",
	29	"test..example.com", "www..com",
	30	".www.example.com", "*www.example.com",
	31	"example.net", "xn--rger-koa.example.com",
9f9a3926 ZL	32	"*.xn--rger-koa.example.com", "www.xn--rger-koa.example.com",
	33	"*.good--example.com", "www.good--example.com",
	34	"*.xn--bar.com", "xn--foo.xn--bar.com",
0f113f3e MC	35	"a.example.com", "b.example.com",
	36	"postmaster@example.com", "Postmaster@example.com",
	37	"postmaster@EXAMPLE.COM",
	38	NULL
	39	};
d88926f1	40
0f113f3e MC	41	static const char *const exceptions[] = {
	42	"set CN: host: [*.example.com] matches [a.example.com]",
	43	"set CN: host: [*.example.com] matches [b.example.com]",
	44	"set CN: host: [*.example.com] matches [www.example.com]",
	45	"set CN: host: [*.example.com] matches [xn--rger-koa.example.com]",
	46	"set CN: host: [*.www.example.com] matches [test.www.example.com]",
	47	"set CN: host: [*.www.example.com] matches [.www.example.com]",
	48	"set CN: host: [*www.example.com] matches [www.example.com]",
	49	"set CN: host: [test.www.example.com] matches [.www.example.com]",
9f9a3926 ZL	50	"set CN: host: [*.xn--rger-koa.example.com] matches [www.xn--rger-koa.example.com]",
	51	"set CN: host: [*.xn--bar.com] matches [xn--foo.xn--bar.com]",
	52	"set CN: host: [*.good--example.com] matches [www.good--example.com]",
0f113f3e MC	53	"set CN: host-no-wildcards: [*.www.example.com] matches [.www.example.com]",
	54	"set CN: host-no-wildcards: [test.www.example.com] matches [.www.example.com]",
	55	"set emailAddress: email: [postmaster@example.com] does not match [Postmaster@example.com]",
	56	"set emailAddress: email: [postmaster@EXAMPLE.COM] does not match [Postmaster@example.com]",
	57	"set emailAddress: email: [Postmaster@example.com] does not match [postmaster@example.com]",
	58	"set emailAddress: email: [Postmaster@example.com] does not match [postmaster@EXAMPLE.COM]",
	59	"set dnsName: host: [*.example.com] matches [www.example.com]",
	60	"set dnsName: host: [*.example.com] matches [a.example.com]",
	61	"set dnsName: host: [*.example.com] matches [b.example.com]",
	62	"set dnsName: host: [*.example.com] matches [xn--rger-koa.example.com]",
	63	"set dnsName: host: [*.www.example.com] matches [test.www.example.com]",
	64	"set dnsName: host-no-wildcards: [*.www.example.com] matches [.www.example.com]",
	65	"set dnsName: host-no-wildcards: [test.www.example.com] matches [.www.example.com]",
	66	"set dnsName: host: [*.www.example.com] matches [.www.example.com]",
	67	"set dnsName: host: [*www.example.com] matches [www.example.com]",
	68	"set dnsName: host: [test.www.example.com] matches [.www.example.com]",
9f9a3926 ZL	69	"set dnsName: host: [*.xn--rger-koa.example.com] matches [www.xn--rger-koa.example.com]",
	70	"set dnsName: host: [*.xn--bar.com] matches [xn--foo.xn--bar.com]",
	71	"set dnsName: host: [*.good--example.com] matches [www.good--example.com]",
0f113f3e MC	72	"set rfc822Name: email: [postmaster@example.com] does not match [Postmaster@example.com]",
	73	"set rfc822Name: email: [Postmaster@example.com] does not match [postmaster@example.com]",
	74	"set rfc822Name: email: [Postmaster@example.com] does not match [postmaster@EXAMPLE.COM]",
	75	"set rfc822Name: email: [postmaster@EXAMPLE.COM] does not match [Postmaster@example.com]",
	76	NULL
	77	};
d88926f1 DSH	78
d88926f1 DSH	79	static int is_exception(const char *msg)
0f113f3e MC	80	{
0f113f3e MC	81	const char const p;
f3ab6c16	82
0f113f3e MC	83	for (p = exceptions; *p; ++p)
	84	if (strcmp(msg, *p) == 0)
	85	return 1;
	86	return 0;
	87	}
d88926f1 DSH	88
d88926f1 DSH	89	static int set_cn(X509 *crt, ...)
0f113f3e MC	90	{
	91	int ret = 0;
	92	X509_NAME *n = NULL;
	93	va_list ap;
f3ab6c16	94
0f113f3e MC	95	va_start(ap, crt);
	96	n = X509_NAME_new();
	97	if (n == NULL)
	98	goto out;
f3ab6c16	99
0f113f3e MC	100	while (1) {
	101	int nid;
	102	const char *name;
f3ab6c16	103
0f113f3e MC	104	nid = va_arg(ap, int);
	105	if (nid == 0)
	106	break;
	107	name = va_arg(ap, const char *);
	108	if (!X509_NAME_add_entry_by_NID(n, nid, MBSTRING_ASC,
	109	(unsigned char *)name, -1, -1, 1))
	110	goto out;
	111	}
	112	if (!X509_set_subject_name(crt, n))
	113	goto out;
	114	ret = 1;
d88926f1	115	out:
0f113f3e MC	116	X509_NAME_free(n);
	117	va_end(ap);
	118	return ret;
	119	}
d88926f1	120
1d97c843	121	/*-
0f113f3e	122	int X509_add_ext(X509 x, X509_EXTENSION ex, int loc);
d88926f1	123	X509_EXTENSION X509_EXTENSION_create_by_NID(X509_EXTENSION *ex,
0f113f3e MC	124	int nid, int crit, ASN1_OCTET_STRING *data);
0f113f3e MC	125	int X509_add_ext(X509 x, X509_EXTENSION ex, int loc);
d88926f1 DSH	126	*/
	127
	128	static int set_altname(X509 *crt, ...)
0f113f3e MC	129	{
	130	int ret = 0;
	131	GENERAL_NAMES *gens = NULL;
	132	GENERAL_NAME *gen = NULL;
	133	ASN1_IA5STRING *ia5 = NULL;
	134	va_list ap;
	135	va_start(ap, crt);
	136	gens = sk_GENERAL_NAME_new_null();
	137	if (gens == NULL)
	138	goto out;
	139	while (1) {
	140	int type;
	141	const char *name;
	142	type = va_arg(ap, int);
	143	if (type == 0)
	144	break;
	145	name = va_arg(ap, const char *);
d88926f1	146
0f113f3e MC	147	gen = GENERAL_NAME_new();
	148	if (gen == NULL)
	149	goto out;
	150	ia5 = ASN1_IA5STRING_new();
	151	if (ia5 == NULL)
	152	goto out;
	153	if (!ASN1_STRING_set(ia5, name, -1))
	154	goto out;
	155	switch (type) {
	156	case GEN_EMAIL:
	157	case GEN_DNS:
	158	GENERAL_NAME_set0_value(gen, type, ia5);
	159	ia5 = NULL;
	160	break;
	161	default:
	162	abort();
	163	}
	164	sk_GENERAL_NAME_push(gens, gen);
	165	gen = NULL;
	166	}
	167	if (!X509_add1_ext_i2d(crt, NID_subject_alt_name, gens, 0, 0))
	168	goto out;
	169	ret = 1;
d88926f1	170	out:
0f113f3e MC	171	ASN1_IA5STRING_free(ia5);
	172	GENERAL_NAME_free(gen);
	173	GENERAL_NAMES_free(gens);
	174	va_end(ap);
	175	return ret;
	176	}
d88926f1 DSH	177
d88926f1 DSH	178	static int set_cn1(X509 crt, const char name)
0f113f3e MC	179	{
	180	return set_cn(crt, NID_commonName, name, 0);
	181	}
d88926f1 DSH	182
d88926f1 DSH	183	static int set_cn_and_email(X509 crt, const char name)
0f113f3e MC	184	{
	185	return set_cn(crt, NID_commonName, name,
	186	NID_pkcs9_emailAddress, "dummy@example.com", 0);
	187	}
d88926f1 DSH	188
d88926f1 DSH	189	static int set_cn2(X509 crt, const char name)
0f113f3e MC	190	{
	191	return set_cn(crt, NID_commonName, "dummy value",
	192	NID_commonName, name, 0);
	193	}
d88926f1 DSH	194
d88926f1 DSH	195	static int set_cn3(X509 crt, const char name)
0f113f3e MC	196	{
	197	return set_cn(crt, NID_commonName, name,
	198	NID_commonName, "dummy value", 0);
	199	}
d88926f1 DSH	200
d88926f1 DSH	201	static int set_email1(X509 crt, const char name)
0f113f3e MC	202	{
	203	return set_cn(crt, NID_pkcs9_emailAddress, name, 0);
	204	}
d88926f1 DSH	205
d88926f1 DSH	206	static int set_email2(X509 crt, const char name)
0f113f3e MC	207	{
	208	return set_cn(crt, NID_pkcs9_emailAddress, "dummy@example.com",
	209	NID_pkcs9_emailAddress, name, 0);
	210	}
d88926f1 DSH	211
d88926f1 DSH	212	static int set_email3(X509 crt, const char name)
0f113f3e MC	213	{
	214	return set_cn(crt, NID_pkcs9_emailAddress, name,
	215	NID_pkcs9_emailAddress, "dummy@example.com", 0);
	216	}
d88926f1 DSH	217
d88926f1 DSH	218	static int set_email_and_cn(X509 crt, const char name)
0f113f3e MC	219	{
	220	return set_cn(crt, NID_pkcs9_emailAddress, name,
	221	NID_commonName, "www.example.org", 0);
	222	}
d88926f1 DSH	223
d88926f1 DSH	224	static int set_altname_dns(X509 crt, const char name)
0f113f3e MC	225	{
	226	return set_altname(crt, GEN_DNS, name, 0);
	227	}
d88926f1 DSH	228
d88926f1 DSH	229	static int set_altname_email(X509 crt, const char name)
0f113f3e MC	230	{
	231	return set_altname(crt, GEN_EMAIL, name, 0);
	232	}
d88926f1	233
0f113f3e MC	234	struct set_name_fn {
	235	int (fn) (X509 , const char *);
	236	const char *name;
	237	int host;
	238	int email;
	239	};
d88926f1	240
0f113f3e MC	241	static const struct set_name_fn name_fns[] = {
	242	{set_cn1, "set CN", 1, 0},
	243	{set_cn2, "set CN", 1, 0},
	244	{set_cn3, "set CN", 1, 0},
	245	{set_cn_and_email, "set CN", 1, 0},
	246	{set_email1, "set emailAddress", 0, 1},
	247	{set_email2, "set emailAddress", 0, 1},
	248	{set_email3, "set emailAddress", 0, 1},
	249	{set_email_and_cn, "set emailAddress", 0, 1},
	250	{set_altname_dns, "set dnsName", 1, 0},
	251	{set_altname_email, "set rfc822Name", 0, 1},
0f113f3e	252	};
d88926f1	253
3cb7c5cf	254	static X509 *make_cert(void)
0f113f3e	255	{
0f113f3e	256	X509 *crt = NULL;
d88926f1	257
f3ab6c16 RS	258	if (!TEST_ptr(crt = X509_new()))
f3ab6c16 RS	259	return NULL;
3bbecb0e	260	if (!TEST_true(X509_set_version(crt, 2))) {
f3ab6c16 RS	261	X509_free(crt);
	262	return NULL;
	263	}
	264	return crt;
	265	}
d88926f1	266
f3ab6c16 RS	267	static int check_message(const struct set_name_fn fn, const char op,
f3ab6c16 RS	268	const char nameincert, int match, const char name)
0f113f3e MC	269	{
0f113f3e MC	270	char msg[1024];
f3ab6c16	271
0f113f3e	272	if (match < 0)
f3ab6c16	273	return 1;
0f113f3e MC	274	BIO_snprintf(msg, sizeof(msg), "%s: %s: [%s] %s [%s]",
	275	fn->name, op, nameincert,
	276	match ? "matches" : "does not match", name);
	277	if (is_exception(msg))
f3ab6c16 RS	278	return 1;
	279	TEST_error("%s", msg);
	280	return 0;
0f113f3e	281	}
d88926f1	282
f3ab6c16	283	static int run_cert(X509 crt, const char nameincert,
0f113f3e MC	284	const struct set_name_fn *fn)
	285	{
	286	const char const pname = names;
f3ab6c16 RS	287	int failed = 0;
	288
	289	for (; *pname != NULL; ++pname) {
0f113f3e MC	290	int samename = strcasecmp(nameincert, *pname) == 0;
0f113f3e MC	291	size_t namelen = strlen(*pname);
f3ab6c16	292	char *name = OPENSSL_malloc(namelen);
0f113f3e	293	int match, ret;
f3ab6c16	294
0f113f3e	295	memcpy(name, *pname, namelen);
d88926f1	296
0f113f3e	297	match = -1;
f3ab6c16 RS	298	if (!TEST_int_ge(ret = X509_check_host(crt, name, namelen, 0, NULL),
	299	0)) {
	300	failed = 1;
0f113f3e MC	301	} else if (fn->host) {
	302	if (ret == 1 && !samename)
	303	match = 1;
	304	if (ret == 0 && samename)
	305	match = 0;
	306	} else if (ret == 1)
	307	match = 1;
f3ab6c16 RS	308	if (!TEST_true(check_message(fn, "host", nameincert, match, *pname)))
f3ab6c16 RS	309	failed = 1;
d88926f1	310
0f113f3e	311	match = -1;
f3ab6c16 RS	312	if (!TEST_int_ge(ret = X509_check_host(crt, name, namelen,
	313	X509_CHECK_FLAG_NO_WILDCARDS,
	314	NULL), 0)) {
	315	failed = 1;
0f113f3e MC	316	} else if (fn->host) {
	317	if (ret == 1 && !samename)
	318	match = 1;
	319	if (ret == 0 && samename)
	320	match = 0;
	321	} else if (ret == 1)
	322	match = 1;
f3ab6c16 RS	323	if (!TEST_true(check_message(fn, "host-no-wildcards",
	324	nameincert, match, *pname)))
	325	failed = 1;
d88926f1	326
0f113f3e	327	match = -1;
f3ab6c16	328	ret = X509_check_email(crt, name, namelen, 0);
0f113f3e MC	329	if (fn->email) {
	330	if (ret && !samename)
	331	match = 1;
	332	if (!ret && samename && strchr(nameincert, '@') != NULL)
	333	match = 0;
	334	} else if (ret)
	335	match = 1;
f3ab6c16 RS	336	if (!TEST_true(check_message(fn, "email", nameincert, match, *pname)))
	337	failed = 1;
	338	OPENSSL_free(name);
0f113f3e	339	}
f3ab6c16 RS	340
f3ab6c16 RS	341	return failed == 0;
0f113f3e	342	}
d88926f1	343
f3ab6c16	344	static int call_run_cert(int i)
0f113f3e	345	{
f3ab6c16 RS	346	int failed = 0;
	347	const struct set_name_fn *pfn = &name_fns[i];
	348	X509 *crt;
	349	const char const pname;
	350
	351	TEST_info("%s", pfn->name);
	352	for (pname = names; *pname != NULL; pname++) {
	353	if (!TEST_ptr(crt = make_cert())
	354	\|\| !TEST_true(pfn->fn(crt, *pname))
	355	\|\| !run_cert(crt, *pname, pfn))
	356	failed = 1;
	357	X509_free(crt);
0f113f3e	358	}
f3ab6c16 RS	359	return failed == 0;
	360	}
	361
ad887416	362	int setup_tests(void)
f3ab6c16	363	{
ad887416 P	364	ADD_ALL_TESTS(call_run_cert, OSSL_NELEM(name_fns));
ad887416 P	365	return 1;
0f113f3e	366	}