Oops, add missing v3nametest.c
This commit is contained in:
Dr. Stephen Henson
parent
87054c4f0e
commit
3d9916298a
1 changed files with 358 additions and 0 deletions
358
crypto/x509v3/v3nametest.c
Normal file
358
crypto/x509v3/v3nametest.c
Normal file
|
|
@ -0,0 +1,358 @@
|
|||
#include <openssl/x509.h>
|
||||
#include <openssl/x509v3.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",
|
||||
"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] does not match [*.example.com]",
|
||||
"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: [test.*.example.com] does not match [test.*.example.com]",
|
||||
"set CN: host: [test.*.example.com] matches [test.www.example.com]",
|
||||
"set CN: host: [*.www.example.com] does not match [*.www.example.com]",
|
||||
"set CN: host: [*.www.example.com] matches [test.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] does not match [*.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: [*.www.example.com] does not match [*.www.example.com]",
|
||||
"set dnsName: host: [test.*.example.com] matches [test.www.example.com]",
|
||||
"set dnsName: host: [test.*.example.com] does not match [test.*.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},
|
||||
{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;
|
||||
out:
|
||||
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;
|
||||
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);
|
||||
|
||||
ret = X509_check_host(crt, (const unsigned char *)name,
|
||||
namelen, 0);
|
||||
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, (const unsigned char *)name,
|
||||
namelen, X509_CHECK_FLAG_NO_WILDCARDS);
|
||||
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, (const unsigned char *)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;
|
||||
}
|
||||
Loading…
Reference in a new issue