basebuilder_pel7ppc64lebuilder0
3 years ago
18 changed files with 1045 additions and 539 deletions
Binary file not shown.
@ -0,0 +1,227 @@
@@ -0,0 +1,227 @@
|
||||
ITS#7595 Add Elliptic Curve support for OpenSSL |
||||
|
||||
Cherry-picked upstream e631ce808ed56119e61321463d06db7999ba5a08 |
||||
Author: Howard Chu <hyc@openldap.org> |
||||
Date: Sat Sep 7 09:47:19 2013 -0700 |
||||
|
||||
diff --git a/doc/man/man5/slapd-config.5 b/doc/man/man5/slapd-config.5 |
||||
index 9c72e8296..2311c3096 100644 |
||||
--- a/doc/man/man5/slapd-config.5 |
||||
+++ b/doc/man/man5/slapd-config.5 |
||||
@@ -922,6 +922,13 @@ are not used. |
||||
When using Mozilla NSS these parameters are always generated randomly |
||||
so this directive is ignored. |
||||
.TP |
||||
+.B olcTLSECName: <name> |
||||
+Specify the name of a curve to use for Elliptic curve Diffie-Hellman |
||||
+ephemeral key exchange. This is required to enable ECDHE algorithms in |
||||
+OpenSSL. This option is not used with GnuTLS; the curves may be |
||||
+chosen in the GnuTLS ciphersuite specification. This option is also |
||||
+ignored for Mozilla NSS. |
||||
+.TP |
||||
.B olcTLSProtocolMin: <major>[.<minor>] |
||||
Specifies minimum SSL/TLS protocol version that will be negotiated. |
||||
If the server doesn't support at least that version, |
||||
diff --git a/doc/man/man5/slapd.conf.5 b/doc/man/man5/slapd.conf.5 |
||||
index f504adcf9..ef03e0ad8 100644 |
||||
--- a/doc/man/man5/slapd.conf.5 |
||||
+++ b/doc/man/man5/slapd.conf.5 |
||||
@@ -1153,6 +1153,13 @@ are not used. |
||||
When using Mozilla NSS these parameters are always generated randomly |
||||
so this directive is ignored. |
||||
.TP |
||||
+.B TLSECName <name> |
||||
+Specify the name of a curve to use for Elliptic curve Diffie-Hellman |
||||
+ephemeral key exchange. This is required to enable ECDHE algorithms in |
||||
+OpenSSL. This option is not used with GnuTLS; the curves may be |
||||
+chosen in the GnuTLS ciphersuite specification. This option is also |
||||
+ignored for Mozilla NSS. |
||||
+.TP |
||||
.B TLSProtocolMin <major>[.<minor>] |
||||
Specifies minimum SSL/TLS protocol version that will be negotiated. |
||||
If the server doesn't support at least that version, |
||||
diff --git a/include/ldap.h b/include/ldap.h |
||||
index c245651c2..0964a193e 100644 |
||||
--- a/include/ldap.h |
||||
+++ b/include/ldap.h |
||||
@@ -158,6 +158,7 @@ LDAP_BEGIN_DECL |
||||
#define LDAP_OPT_X_TLS_NEWCTX 0x600f |
||||
#define LDAP_OPT_X_TLS_CRLFILE 0x6010 /* GNUtls only */ |
||||
#define LDAP_OPT_X_TLS_PACKAGE 0x6011 |
||||
+#define LDAP_OPT_X_TLS_ECNAME 0x6012 |
||||
|
||||
#define LDAP_OPT_X_TLS_NEVER 0 |
||||
#define LDAP_OPT_X_TLS_HARD 1 |
||||
diff --git a/libraries/libldap/ldap-int.h b/libraries/libldap/ldap-int.h |
||||
index 66e04ae80..db7193f4f 100644 |
||||
--- a/libraries/libldap/ldap-int.h |
||||
+++ b/libraries/libldap/ldap-int.h |
||||
@@ -165,6 +165,7 @@ struct ldaptls { |
||||
char *lt_ciphersuite; |
||||
char *lt_crlfile; |
||||
char *lt_randfile; /* OpenSSL only */ |
||||
+ char *lt_ecname; /* OpenSSL only */ |
||||
int lt_protocol_min; |
||||
}; |
||||
#endif |
||||
@@ -250,6 +251,7 @@ struct ldapoptions { |
||||
#define ldo_tls_certfile ldo_tls_info.lt_certfile |
||||
#define ldo_tls_keyfile ldo_tls_info.lt_keyfile |
||||
#define ldo_tls_dhfile ldo_tls_info.lt_dhfile |
||||
+#define ldo_tls_ecname ldo_tls_info.lt_ecname |
||||
#define ldo_tls_cacertfile ldo_tls_info.lt_cacertfile |
||||
#define ldo_tls_cacertdir ldo_tls_info.lt_cacertdir |
||||
#define ldo_tls_ciphersuite ldo_tls_info.lt_ciphersuite |
||||
diff --git a/libraries/libldap/tls2.c b/libraries/libldap/tls2.c |
||||
index d25c190ea..0451b01af 100644 |
||||
--- a/libraries/libldap/tls2.c |
||||
+++ b/libraries/libldap/tls2.c |
||||
@@ -118,6 +118,10 @@ ldap_int_tls_destroy( struct ldapoptions *lo ) |
||||
LDAP_FREE( lo->ldo_tls_dhfile ); |
||||
lo->ldo_tls_dhfile = NULL; |
||||
} |
||||
+ if ( lo->ldo_tls_ecname ) { |
||||
+ LDAP_FREE( lo->ldo_tls_ecname ); |
||||
+ lo->ldo_tls_ecname = NULL; |
||||
+ } |
||||
if ( lo->ldo_tls_cacertfile ) { |
||||
LDAP_FREE( lo->ldo_tls_cacertfile ); |
||||
lo->ldo_tls_cacertfile = NULL; |
||||
@@ -232,6 +236,10 @@ ldap_int_tls_init_ctx( struct ldapoptions *lo, int is_server ) |
||||
lts.lt_dhfile = LDAP_STRDUP( lts.lt_dhfile ); |
||||
__atoe( lts.lt_dhfile ); |
||||
} |
||||
+ if ( lts.lt_ecname ) { |
||||
+ lts.lt_ecname = LDAP_STRDUP( lts.lt_ecname ); |
||||
+ __atoe( lts.lt_ecname ); |
||||
+ } |
||||
#endif |
||||
lo->ldo_tls_ctx = ti->ti_ctx_new( lo ); |
||||
if ( lo->ldo_tls_ctx == NULL ) { |
||||
@@ -257,6 +265,7 @@ error_exit: |
||||
LDAP_FREE( lts.lt_crlfile ); |
||||
LDAP_FREE( lts.lt_cacertdir ); |
||||
LDAP_FREE( lts.lt_dhfile ); |
||||
+ LDAP_FREE( lts.lt_ecname ); |
||||
#endif |
||||
return rc; |
||||
} |
||||
@@ -646,6 +655,10 @@ ldap_pvt_tls_get_option( LDAP *ld, int option, void *arg ) |
||||
*(char **)arg = lo->ldo_tls_dhfile ? |
||||
LDAP_STRDUP( lo->ldo_tls_dhfile ) : NULL; |
||||
break; |
||||
+ case LDAP_OPT_X_TLS_ECNAME: |
||||
+ *(char **)arg = lo->ldo_tls_ecname ? |
||||
+ LDAP_STRDUP( lo->ldo_tls_ecname ) : NULL; |
||||
+ break; |
||||
case LDAP_OPT_X_TLS_CRLFILE: /* GnuTLS only */ |
||||
*(char **)arg = lo->ldo_tls_crlfile ? |
||||
LDAP_STRDUP( lo->ldo_tls_crlfile ) : NULL; |
||||
@@ -765,6 +778,10 @@ ldap_pvt_tls_set_option( LDAP *ld, int option, void *arg ) |
||||
if ( lo->ldo_tls_dhfile ) LDAP_FREE( lo->ldo_tls_dhfile ); |
||||
lo->ldo_tls_dhfile = arg ? LDAP_STRDUP( (char *) arg ) : NULL; |
||||
return 0; |
||||
+ case LDAP_OPT_X_TLS_ECNAME: |
||||
+ if ( lo->ldo_tls_ecname ) LDAP_FREE( lo->ldo_tls_ecname ); |
||||
+ lo->ldo_tls_ecname = arg ? LDAP_STRDUP( (char *) arg ) : NULL; |
||||
+ return 0; |
||||
case LDAP_OPT_X_TLS_CRLFILE: /* GnuTLS only */ |
||||
if ( lo->ldo_tls_crlfile ) LDAP_FREE( lo->ldo_tls_crlfile ); |
||||
lo->ldo_tls_crlfile = arg ? LDAP_STRDUP( (char *) arg ) : NULL; |
||||
diff --git a/libraries/libldap/tls_o.c b/libraries/libldap/tls_o.c |
||||
index f24060b7e..1370923af 100644 |
||||
--- a/libraries/libldap/tls_o.c |
||||
+++ b/libraries/libldap/tls_o.c |
||||
@@ -373,10 +373,9 @@ tlso_ctx_init( struct ldapoptions *lo, struct ldaptls *lt, int is_server ) |
||||
return -1; |
||||
} |
||||
|
||||
- if ( lo->ldo_tls_dhfile ) { |
||||
- DH *dh = NULL; |
||||
+ if ( is_server && lo->ldo_tls_dhfile ) { |
||||
+ DH *dh; |
||||
BIO *bio; |
||||
- SSL_CTX_set_options( ctx, SSL_OP_SINGLE_DH_USE ); |
||||
|
||||
if (( bio=BIO_new_file( lt->lt_dhfile,"r" )) == NULL ) { |
||||
Debug( LDAP_DEBUG_ANY, |
||||
@@ -395,7 +394,35 @@ tlso_ctx_init( struct ldapoptions *lo, struct ldaptls *lt, int is_server ) |
||||
} |
||||
BIO_free( bio ); |
||||
SSL_CTX_set_tmp_dh( ctx, dh ); |
||||
+ SSL_CTX_set_options( ctx, SSL_OP_SINGLE_DH_USE ); |
||||
+ DH_free( dh ); |
||||
+ } |
||||
+ |
||||
+#ifdef SSL_OP_SINGLE_ECDH_USE |
||||
+ if ( is_server && lo->ldo_tls_ecname ) { |
||||
+ EC_KEY *ecdh; |
||||
+ |
||||
+ int nid = OBJ_sn2nid( lt->lt_ecname ); |
||||
+ if ( nid == NID_undef ) { |
||||
+ Debug( LDAP_DEBUG_ANY, |
||||
+ "TLS: could not use EC name `%s'.\n", |
||||
+ lo->ldo_tls_ecname,0,0); |
||||
+ tlso_report_error(); |
||||
+ return -1; |
||||
+ } |
||||
+ ecdh = EC_KEY_new_by_curve_name( nid ); |
||||
+ if ( ecdh == NULL ) { |
||||
+ Debug( LDAP_DEBUG_ANY, |
||||
+ "TLS: could not generate key for EC name `%s'.\n", |
||||
+ lo->ldo_tls_ecname,0,0); |
||||
+ tlso_report_error(); |
||||
+ return -1; |
||||
+ } |
||||
+ SSL_CTX_set_tmp_ecdh( ctx, ecdh ); |
||||
+ SSL_CTX_set_options( ctx, SSL_OP_SINGLE_ECDH_USE ); |
||||
+ EC_KEY_free( ecdh ); |
||||
} |
||||
+#endif |
||||
|
||||
if ( tlso_opt_trace ) { |
||||
SSL_CTX_set_info_callback( ctx, tlso_info_cb ); |
||||
diff --git a/servers/slapd/bconfig.c b/servers/slapd/bconfig.c |
||||
index 250f14100..8b1e4e582 100644 |
||||
--- a/servers/slapd/bconfig.c |
||||
+++ b/servers/slapd/bconfig.c |
||||
@@ -194,6 +194,7 @@ enum { |
||||
CFG_ACL_ADD, |
||||
CFG_SYNC_SUBENTRY, |
||||
CFG_LTHREADS, |
||||
+ CFG_TLS_ECNAME, |
||||
|
||||
CFG_LAST |
||||
}; |
||||
@@ -738,6 +739,14 @@ static ConfigTable config_back_cf_table[] = { |
||||
#endif |
||||
"( OLcfgGlAt:77 NAME 'olcTLSDHParamFile' " |
||||
"SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL }, |
||||
+ { "TLSECName", NULL, 2, 2, 0, |
||||
+#ifdef HAVE_TLS |
||||
+ CFG_TLS_ECNAME|ARG_STRING|ARG_MAGIC, &config_tls_option, |
||||
+#else |
||||
+ ARG_IGNORED, NULL, |
||||
+#endif |
||||
+ "( OLcfgGlAt:96 NAME 'olcTLSECName' " |
||||
+ "SYNTAX OMsDirectoryString SINGLE-VALUE )", NULL, NULL }, |
||||
{ "TLSProtocolMin", NULL, 2, 2, 0, |
||||
#ifdef HAVE_TLS |
||||
CFG_TLS_PROTOCOL_MIN|ARG_STRING|ARG_MAGIC, &config_tls_config, |
||||
@@ -819,7 +828,7 @@ static ConfigOCs cf_ocs[] = { |
||||
"olcThreads $ olcTimeLimit $ olcTLSCACertificateFile $ " |
||||
"olcTLSCACertificatePath $ olcTLSCertificateFile $ " |
||||
"olcTLSCertificateKeyFile $ olcTLSCipherSuite $ olcTLSCRLCheck $ " |
||||
- "olcTLSRandFile $ olcTLSVerifyClient $ olcTLSDHParamFile $ " |
||||
+ "olcTLSRandFile $ olcTLSVerifyClient $ olcTLSDHParamFile $ olcTLSECName $ " |
||||
"olcTLSCRLFile $ olcTLSProtocolMin $ olcToolThreads $ olcWriteTimeout $ " |
||||
"olcObjectIdentifier $ olcAttributeTypes $ olcObjectClasses $ " |
||||
"olcDitContentRules $ olcLdapSyntaxes ) )", Cft_Global }, |
||||
@@ -3824,6 +3833,7 @@ config_tls_option(ConfigArgs *c) { |
||||
case CFG_TLS_CA_PATH: flag = LDAP_OPT_X_TLS_CACERTDIR; break; |
||||
case CFG_TLS_CA_FILE: flag = LDAP_OPT_X_TLS_CACERTFILE; break; |
||||
case CFG_TLS_DH_FILE: flag = LDAP_OPT_X_TLS_DHFILE; break; |
||||
+ case CFG_TLS_ECNAME: flag = LDAP_OPT_X_TLS_ECNAME; break; |
||||
#ifdef HAVE_GNUTLS |
||||
case CFG_TLS_CRL_FILE: flag = LDAP_OPT_X_TLS_CRLFILE; break; |
||||
#endif |
||||
@ -0,0 +1,34 @@
@@ -0,0 +1,34 @@
|
||||
ITS#7595 don't try to use EC if OpenSSL lacks it |
||||
|
||||
Cherry-picked upstream 721e46fe6695077d63a3df6ea2e397920a72308d |
||||
Author: Howard Chu <hyc@openldap.org> |
||||
Date: Sun Sep 8 06:32:23 2013 -0700 |
||||
|
||||
diff --git a/libraries/libldap/tls_o.c b/libraries/libldap/tls_o.c |
||||
index 1a81bc625..71c2b055c 100644 |
||||
--- a/libraries/libldap/tls_o.c |
||||
+++ b/libraries/libldap/tls_o.c |
||||
@@ -321,8 +321,12 @@ tlso_ctx_init( struct ldapoptions *lo, struct ldaptls *lt, int is_server ) |
||||
DH_free( dh ); |
||||
} |
||||
|
||||
-#ifdef SSL_OP_SINGLE_ECDH_USE |
||||
if ( is_server && lo->ldo_tls_ecname ) { |
||||
+#ifdef OPENSSL_NO_EC |
||||
+ Debug( LDAP_DEBUG_ANY, |
||||
+ "TLS: Elliptic Curves not supported.\n", 0,0,0 ); |
||||
+ return -1; |
||||
+#else |
||||
EC_KEY *ecdh; |
||||
|
||||
int nid = OBJ_sn2nid( lt->lt_ecname ); |
||||
@@ -344,8 +348,8 @@ tlso_ctx_init( struct ldapoptions *lo, struct ldaptls *lt, int is_server ) |
||||
SSL_CTX_set_tmp_ecdh( ctx, ecdh ); |
||||
SSL_CTX_set_options( ctx, SSL_OP_SINGLE_ECDH_USE ); |
||||
EC_KEY_free( ecdh ); |
||||
- } |
||||
#endif |
||||
+ } |
||||
|
||||
if ( tlso_opt_trace ) { |
||||
SSL_CTX_set_info_callback( ctx, tlso_info_cb ); |
||||
@ -0,0 +1,48 @@
@@ -0,0 +1,48 @@
|
||||
Reference default system-wide CA certificates in manpages |
||||
|
||||
OpenSSL, unless explicitly configured, uses system-wide default set of CA |
||||
certificates. |
||||
|
||||
Author: Matus Honek <mhonek@redhat.com> |
||||
|
||||
diff --git a/doc/man/man5/ldap.conf.5 b/doc/man/man5/ldap.conf.5 |
||||
--- a/doc/man/man5/ldap.conf.5 |
||||
+++ b/doc/man/man5/ldap.conf.5 |
||||
@@ -307,6 +307,9 @@ are more options you can specify. These options are used when an |
||||
.B ldaps:// URI |
||||
is selected (by default or otherwise) or when the application |
||||
negotiates TLS by issuing the LDAP StartTLS operation. |
||||
+.LP |
||||
+When using OpenSSL, if neither \fBTLS_CACERT\fP nor \fBTLS_CACERTDIR\fP |
||||
+is set, the system-wide default set of CA certificates is used. |
||||
.TP |
||||
.B TLS_CACERT <filename> |
||||
Specifies the file that contains certificates for all of the Certificate |
||||
diff --git a/doc/man/man5/slapd-config.5 b/doc/man/man5/slapd-config.5 |
||||
--- a/doc/man/man5/slapd-config.5 |
||||
+++ b/doc/man/man5/slapd-config.5 |
||||
@@ -801,6 +801,10 @@ If |
||||
.B slapd |
||||
is built with support for Transport Layer Security, there are more options |
||||
you can specify. |
||||
+.LP |
||||
+When using OpenSSL, if neither \fBolcTLSCACertificateFile\fP nor |
||||
+\fBolcTLSCACertificatePath\fP is set, the system-wide default set of CA |
||||
+certificates is used. |
||||
.TP |
||||
.B olcTLSCipherSuite: <cipher-suite-spec> |
||||
Permits configuring what ciphers will be accepted and the preference order. |
||||
diff --git a/doc/man/man5/slapd.conf.5 b/doc/man/man5/slapd.conf.5 |
||||
--- a/doc/man/man5/slapd.conf.5 |
||||
+++ b/doc/man/man5/slapd.conf.5 |
||||
@@ -1032,6 +1032,10 @@ If |
||||
.B slapd |
||||
is built with support for Transport Layer Security, there are more options |
||||
you can specify. |
||||
+.LP |
||||
+When using OpenSSL, if neither \fBTLSCACertificateFile\fP nor |
||||
+\fBTLSCACertificatePath\fP is set, the system-wide default set of CA |
||||
+certificates is used. |
||||
.TP |
||||
.B TLSCipherSuite <cipher-suite-spec> |
||||
Permits configuring what ciphers will be accepted and the preference order. |
||||
@ -0,0 +1,224 @@
@@ -0,0 +1,224 @@
|
||||
From f2978fefa13eb92b73922e49d2f6c12b4f92ea85 Mon Sep 17 00:00:00 2001 |
||||
From: Christian Heimes <christian@python.org> |
||||
Date: Fri, 10 Jan 2020 18:35:02 +0100 |
||||
Subject: [PATCH] Use OpenSSL API to verify host |
||||
|
||||
Replace custom hostname and IP address verification with OpenSSL 1.0.2 |
||||
APIs. |
||||
--- |
||||
libraries/libldap/tls_o.c | 184 ++++++-------------------------------- |
||||
1 file changed, 28 insertions(+), 156 deletions(-) |
||||
|
||||
diff --git a/libraries/libldap/tls_o.c b/libraries/libldap/tls_o.c |
||||
index e52c5507c..5adf7b74f 100644 |
||||
--- a/libraries/libldap/tls_o.c |
||||
+++ b/libraries/libldap/tls_o.c |
||||
@@ -660,25 +660,15 @@ tlso_session_peer_dn( tls_session *sess, struct berval *der_dn ) |
||||
return 0; |
||||
} |
||||
|
||||
-/* what kind of hostname were we given? */ |
||||
-#define IS_DNS 0 |
||||
-#define IS_IP4 1 |
||||
-#define IS_IP6 2 |
||||
- |
||||
static int |
||||
tlso_session_chkhost( LDAP *ld, tls_session *sess, const char *name_in ) |
||||
{ |
||||
tlso_session *s = (tlso_session *)sess; |
||||
- int i, ret = LDAP_LOCAL_ERROR; |
||||
+ int ret = LDAP_LOCAL_ERROR; |
||||
X509 *x; |
||||
const char *name; |
||||
- char *ptr; |
||||
- int ntype = IS_DNS, nlen; |
||||
-#ifdef LDAP_PF_INET6 |
||||
- struct in6_addr addr; |
||||
-#else |
||||
- struct in_addr addr; |
||||
-#endif |
||||
+ int flags = X509_CHECK_FLAG_NO_PARTIAL_WILDCARDS; |
||||
+ ASN1_OCTET_STRING *ip; |
||||
|
||||
if( ldap_int_hostname && |
||||
( !name_in || !strcasecmp( name_in, "localhost" ) ) ) |
||||
@@ -687,7 +677,6 @@ tlso_session_chkhost( LDAP *ld, tls_session *sess, const char *name_in ) |
||||
} else { |
||||
name = name_in; |
||||
} |
||||
- nlen = strlen(name); |
||||
|
||||
x = tlso_get_cert(s); |
||||
if (!x) { |
||||
@@ -619,150 +619,32 @@ tlso_session_chkhost( LDAP *ld, tls_session *sess, const char *name_in ) |
||||
return LDAP_SUCCESS; |
||||
} |
||||
|
||||
-#ifdef LDAP_PF_INET6 |
||||
- if (inet_pton(AF_INET6, name, &addr)) { |
||||
- ntype = IS_IP6; |
||||
- } else |
||||
-#endif |
||||
- if ((ptr = strrchr(name, '.')) && isdigit((unsigned char)ptr[1])) { |
||||
- if (inet_aton(name, (struct in_addr *)&addr)) ntype = IS_IP4; |
||||
- } |
||||
- |
||||
- i = X509_get_ext_by_NID(x, NID_subject_alt_name, -1); |
||||
- if (i >= 0) { |
||||
- X509_EXTENSION *ex; |
||||
- STACK_OF(GENERAL_NAME) *alt; |
||||
- |
||||
- ex = X509_get_ext(x, i); |
||||
- alt = X509V3_EXT_d2i(ex); |
||||
- if (alt) { |
||||
- int n, len2 = 0; |
||||
- char *domain = NULL; |
||||
- GENERAL_NAME *gn; |
||||
- |
||||
- if (ntype == IS_DNS) { |
||||
- domain = strchr(name, '.'); |
||||
- if (domain) { |
||||
- len2 = nlen - (domain-name); |
||||
- } |
||||
- } |
||||
- n = sk_GENERAL_NAME_num(alt); |
||||
- for (i=0; i<n; i++) { |
||||
- char *sn; |
||||
- int sl; |
||||
- gn = sk_GENERAL_NAME_value(alt, i); |
||||
- if (gn->type == GEN_DNS) { |
||||
- if (ntype != IS_DNS) continue; |
||||
- |
||||
- sn = (char *) ASN1_STRING_data(gn->d.ia5); |
||||
- sl = ASN1_STRING_length(gn->d.ia5); |
||||
- |
||||
- /* ignore empty */ |
||||
- if (sl == 0) continue; |
||||
- |
||||
- /* Is this an exact match? */ |
||||
- if ((nlen == sl) && !strncasecmp(name, sn, nlen)) { |
||||
- break; |
||||
- } |
||||
- |
||||
- /* Is this a wildcard match? */ |
||||
- if (domain && (sn[0] == '*') && (sn[1] == '.') && |
||||
- (len2 == sl-1) && !strncasecmp(domain, &sn[1], len2)) |
||||
- { |
||||
- break; |
||||
- } |
||||
- |
||||
- } else if (gn->type == GEN_IPADD) { |
||||
- if (ntype == IS_DNS) continue; |
||||
- |
||||
- sn = (char *) ASN1_STRING_data(gn->d.ia5); |
||||
- sl = ASN1_STRING_length(gn->d.ia5); |
||||
- |
||||
-#ifdef LDAP_PF_INET6 |
||||
- if (ntype == IS_IP6 && sl != sizeof(struct in6_addr)) { |
||||
- continue; |
||||
- } else |
||||
-#endif |
||||
- if (ntype == IS_IP4 && sl != sizeof(struct in_addr)) { |
||||
- continue; |
||||
- } |
||||
- if (!memcmp(sn, &addr, sl)) { |
||||
- break; |
||||
- } |
||||
- } |
||||
- } |
||||
- |
||||
- GENERAL_NAMES_free(alt); |
||||
- if (i < n) { /* Found a match */ |
||||
- ret = LDAP_SUCCESS; |
||||
- } |
||||
- } |
||||
- } |
||||
- |
||||
- if (ret != LDAP_SUCCESS) { |
||||
- X509_NAME *xn; |
||||
- X509_NAME_ENTRY *ne; |
||||
- ASN1_OBJECT *obj; |
||||
- ASN1_STRING *cn = NULL; |
||||
- int navas; |
||||
- |
||||
- /* find the last CN */ |
||||
- obj = OBJ_nid2obj( NID_commonName ); |
||||
- if ( !obj ) goto no_cn; /* should never happen */ |
||||
- |
||||
- xn = X509_get_subject_name(x); |
||||
- navas = X509_NAME_entry_count( xn ); |
||||
- for ( i=navas-1; i>=0; i-- ) { |
||||
- ne = X509_NAME_get_entry( xn, i ); |
||||
- if ( !OBJ_cmp( X509_NAME_ENTRY_get_object(ne), obj )) { |
||||
- cn = X509_NAME_ENTRY_get_data( ne ); |
||||
- break; |
||||
- } |
||||
+ /* attempt to encode name as IP address */ |
||||
+ ip = a2i_IPADDRESS(name); |
||||
+ if (ip == NULL) { |
||||
+ ERR_clear_error(); |
||||
+ /* it's a hostname */ |
||||
+ if (X509_check_host(x, name, strlen(name), flags, NULL) == 1) { |
||||
+ ret = LDAP_SUCCESS; |
||||
} |
||||
- |
||||
- if( !cn ) |
||||
- { |
||||
-no_cn: |
||||
- Debug( LDAP_DEBUG_ANY, |
||||
- "TLS: unable to get common name from peer certificate.\n", |
||||
- 0, 0, 0 ); |
||||
- ret = LDAP_CONNECT_ERROR; |
||||
- if ( ld->ld_error ) { |
||||
- LDAP_FREE( ld->ld_error ); |
||||
- } |
||||
- ld->ld_error = LDAP_STRDUP( |
||||
- _("TLS: unable to get CN from peer certificate")); |
||||
- |
||||
- } else if ( cn->length == nlen && |
||||
- strncasecmp( name, (char *) cn->data, nlen ) == 0 ) { |
||||
+ } else { |
||||
+ /* It's an IPv4 or IPv6 address */ |
||||
+ if (X509_check_ip(x, ASN1_STRING_data(ip), |
||||
+ ASN1_STRING_length(ip), 0) == 1) { |
||||
ret = LDAP_SUCCESS; |
||||
- |
||||
- } else if (( cn->data[0] == '*' ) && ( cn->data[1] == '.' )) { |
||||
- char *domain = strchr(name, '.'); |
||||
- if( domain ) { |
||||
- int dlen; |
||||
- |
||||
- dlen = nlen - (domain-name); |
||||
- |
||||
- /* Is this a wildcard match? */ |
||||
- if ((dlen == cn->length-1) && |
||||
- !strncasecmp(domain, (char *) &cn->data[1], dlen)) { |
||||
- ret = LDAP_SUCCESS; |
||||
- } |
||||
- } |
||||
} |
||||
+ ASN1_OCTET_STRING_free(ip); |
||||
+ } |
||||
|
||||
- if( ret == LDAP_LOCAL_ERROR ) { |
||||
- Debug( LDAP_DEBUG_ANY, "TLS: hostname (%s) does not match " |
||||
- "common name in certificate (%.*s).\n", |
||||
- name, cn->length, cn->data ); |
||||
- ret = LDAP_CONNECT_ERROR; |
||||
- if ( ld->ld_error ) { |
||||
- LDAP_FREE( ld->ld_error ); |
||||
- } |
||||
- ld->ld_error = LDAP_STRDUP( |
||||
- _("TLS: hostname does not match CN in peer certificate")); |
||||
+ if( ret == LDAP_LOCAL_ERROR ) { |
||||
+ Debug( LDAP_DEBUG_ANY, "TLS: hostname (%s) does not match " |
||||
+ "peer certificate.\n", name, 0, 0); |
||||
+ ret = LDAP_CONNECT_ERROR; |
||||
+ if ( ld->ld_error ) { |
||||
+ LDAP_FREE( ld->ld_error ); |
||||
} |
||||
+ ld->ld_error = LDAP_STRDUP( |
||||
+ _("TLS: hostname does not match peer certificate")); |
||||
} |
||||
X509_free(x); |
||||
return ret; |
||||
Loading…
Reference in new issue