From 8a6eec04798d4000b00537e6c6f7f7f1596fccb8 Mon Sep 17 00:00:00 2001 From: Jeremy Harris Date: Tue, 13 May 2014 17:47:04 +0100 Subject: [PATCH] certextract tidying --- doc/doc-docbook/spec.xfpt | 10 ++++- src/src/tlscert-gnu.c | 94 ++++++++++++++++++--------------------- 2 files changed, 51 insertions(+), 53 deletions(-) diff --git a/doc/doc-docbook/spec.xfpt b/doc/doc-docbook/spec.xfpt index 03ec8980c..17c69a7a5 100644 --- a/doc/doc-docbook/spec.xfpt +++ b/doc/doc-docbook/spec.xfpt @@ -8897,8 +8897,8 @@ the certificate. Supported fields are: .display &`version `& &`serial_number `& -&`subject `& -&`issuer `& +&`subject `& RFC4514 DN +&`issuer `& RFC4514 DN &`notbefore `& &`notafter `& &`sig_algorithm `& @@ -8931,6 +8931,12 @@ Elements of only one type may be selected by a modifier which is one of "dns", "uri" or "mail"; if so the elenment tags are omitted. +The field selectors marked as "RFC4514" above +output a Distinguished Name string which is +not quite +parseable by Exim as a comma-separated tagged list +(the exceptions being elements containin commas). + Field values are generally presented in human-readable form. .wen diff --git a/src/src/tlscert-gnu.c b/src/src/tlscert-gnu.c index 5a4c231bb..3d255ee96 100644 --- a/src/src/tlscert-gnu.c +++ b/src/src/tlscert-gnu.c @@ -74,6 +74,15 @@ gnutls_global_deinit(); /***************************************************** * Certificate field extraction routines *****************************************************/ +static uschar * +g_err(const char * tag, const char * from, int gnutls_err) +{ +expand_string_message = string_sprintf(stderr, + "%s: %s fail: %s\n", from, tag, gnutls_strerror(gnutls_err)); +return NULL; +} + + static uschar * time_copy(time_t t) { @@ -167,10 +176,27 @@ return algo < 0 ? NULL : string_copy(gnutls_sign_get_name(algo)); uschar * tls_cert_subject(void * cert, uschar * mod) { -static uschar txt[256]; -size_t sz = sizeof(txt); -return ( gnutls_x509_crt_get_dn(cert, CS txt, &sz) == 0 ) - ? string_copy(txt) : NULL; +uschar * cp = NULL; +int ret; +size_t siz = 0; + +ret = gnutls_x509_crt_get_dn(cert, cp, &siz); +if (ret != GNUTLS_E_SHORT_MEMORY_BUFFER) + { + fprintf(stderr, "%s: gs0 fail: %s\n", __FUNCTION__, gnutls_strerror(ret)); + return NULL; + } + +cp = store_get(siz); + +ret = gnutls_x509_crt_get_dn(cert, cp, &siz); +if (ret < 0) + { + fprintf(stderr, "%s: gs1 fail: %s\n", __FUNCTION__, gnutls_strerror(ret)); + return NULL; + } + +return cp; } uschar * @@ -192,20 +218,14 @@ int ret; ret = gnutls_x509_crt_get_extension_by_oid ((gnutls_x509_crt_t)cert, oid, idx, cp1, &siz, &crit); if (ret != GNUTLS_E_SHORT_MEMORY_BUFFER) - { - fprintf(stderr, "%s: ge0 fail: %s\n", __FUNCTION__, gnutls_strerror(ret)); - return NULL; - } + return g_err("ge0", __FUNCTION__, ret); cp1 = store_get(siz*4 + 1); ret = gnutls_x509_crt_get_extension_by_oid ((gnutls_x509_crt_t)cert, oid, idx, cp1, &siz, &crit); if (ret < 0) - { - fprintf(stderr, "%s: ge1 fail: %s\n", __FUNCTION__, gnutls_strerror(ret)); - return NULL; - } + return g_err("ge1", __FUNCTION__, ret); /* binary data, DER encoded */ @@ -254,21 +274,13 @@ for(index = 0;; index++) break; default: - expand_string_message = - string_sprintf("%s: gs0 fail: %d %s\n", __FUNCTION__, - ret, gnutls_strerror(ret)); - return NULL; + return g_err("gs0", __FUNCTION__, ret); } ele = store_get(siz+1); if ((ret = gnutls_x509_crt_get_subject_alt_name( (gnutls_x509_crt_t)cert, index, ele, &siz, NULL)) < 0) - { - expand_string_message = - string_sprintf("%s: gs1 fail: %d %s\n", __FUNCTION__, - ret, gnutls_strerror(ret)); - return NULL; - } + return g_err("gs1", __FUNCTION__, ret); ele[siz] = '\0'; if (match != -1 && match != ret) @@ -307,12 +319,7 @@ for(index = 0;; index++) if (ret == GNUTLS_E_REQUESTED_DATA_NOT_AVAILABLE) return list; if (ret < 0) - { - expand_string_message = - string_sprintf("%s: gai fail: %d %s\n", __FUNCTION__, - ret, gnutls_strerror(ret)); - return NULL; - } + return g_err("gai", __FUNCTION__, ret); list = string_append_listele(list, sep, string_copyn(uri.data, uri.size)); @@ -353,21 +360,14 @@ for(index = 0;; index++) case GNUTLS_E_SHORT_MEMORY_BUFFER: break; default: - expand_string_message = - string_sprintf("%s: gc0 fail: %d %s\n", __FUNCTION__, - ret, gnutls_strerror(ret)); - return NULL; + return g_err("gc0", __FUNCTION__, ret); } ele = store_get(siz+1); if ((ret = gnutls_x509_crt_get_crl_dist_points( - (gnutls_x509_crt_t)cert, index, ele, &siz, NULL, NULL)) < 0) - { - expand_string_message = - string_sprintf("%s: gc1 fail: %d %s\n", __FUNCTION__, - ret, gnutls_strerror(ret)); - return NULL; - } + (gnutls_x509_crt_t)cert, index, ele, &siz, NULL, NULL)) < 0) + return g_err("gc1", __FUNCTION__, ret); + ele[siz] = '\0'; list = string_append_listele(list, sep, ele); } @@ -389,20 +389,12 @@ uschar * cp3; if ((ret = gnutls_x509_crt_get_fingerprint(cert, algo, NULL, &siz)) != GNUTLS_E_SHORT_MEMORY_BUFFER) - { - expand_string_message = - string_sprintf("%s: gf0 fail: %d %s\n", __FUNCTION__, - ret, gnutls_strerror(ret)); - return NULL; - } + return g_err("gf0", __FUNCTION__, ret); + cp = store_get(siz*3+1); if ((ret = gnutls_x509_crt_get_fingerprint(cert, algo, cp, &siz)) < 0) - { - expand_string_message = - string_sprintf("%s: gf1 fail: %d %s\n", __FUNCTION__, - ret, gnutls_strerror(ret)); - return NULL; - } + return g_err("gf1", __FUNCTION__, ret); + for (cp3 = cp2 = cp+siz; cp < cp2; cp++, cp3+=2) sprintf(cp3, "%02X",*cp); return cp2; -- 2.30.2