1999-12-10 06:41:45 +08:00
|
|
|
/* $OpenLDAP$ */
|
|
|
|
/*
|
2002-01-05 05:17:25 +08:00
|
|
|
* Copyright 1999-2002 The OpenLDAP Foundation.
|
1999-12-10 06:41:45 +08:00
|
|
|
* All rights reserved.
|
|
|
|
*
|
|
|
|
* Redistribution and use in source and binary forms are permitted only
|
|
|
|
* as authorized by the OpenLDAP Public License. A copy of this
|
|
|
|
* license is available at http://www.OpenLDAP.org/license.html or
|
|
|
|
* in file LICENSE in the top-level directory of the distribution.
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "portable.h"
|
|
|
|
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <ac/socket.h>
|
|
|
|
|
2001-11-18 00:18:07 +08:00
|
|
|
#include <ldap_pvt.h>
|
|
|
|
|
1999-12-10 06:41:45 +08:00
|
|
|
#include "slap.h"
|
|
|
|
|
|
|
|
#ifdef HAVE_TLS
|
|
|
|
|
|
|
|
int
|
|
|
|
starttls_extop (
|
|
|
|
Connection *conn,
|
|
|
|
Operation *op,
|
2000-05-22 11:46:57 +08:00
|
|
|
const char * reqoid,
|
1999-12-10 06:41:45 +08:00
|
|
|
struct berval * reqdata,
|
1999-12-16 07:22:47 +08:00
|
|
|
char ** rspoid,
|
1999-12-10 06:41:45 +08:00
|
|
|
struct berval ** rspdata,
|
1999-12-10 12:52:32 +08:00
|
|
|
LDAPControl ***rspctrls,
|
2000-05-22 11:46:57 +08:00
|
|
|
const char ** text,
|
2002-01-14 09:43:17 +08:00
|
|
|
BerVarray * refs )
|
1999-12-10 06:41:45 +08:00
|
|
|
{
|
1999-12-11 03:18:33 +08:00
|
|
|
void *ctx;
|
2000-03-03 04:36:53 +08:00
|
|
|
int rc;
|
1999-12-11 03:18:33 +08:00
|
|
|
|
1999-12-10 07:21:48 +08:00
|
|
|
if ( reqdata != NULL ) {
|
|
|
|
/* no request data should be provided */
|
2000-03-03 04:36:53 +08:00
|
|
|
*text = "no request data expected";
|
1999-12-10 07:21:48 +08:00
|
|
|
return LDAP_PROTOCOL_ERROR;
|
|
|
|
}
|
|
|
|
|
2000-03-03 04:36:53 +08:00
|
|
|
/* acquire connection lock */
|
|
|
|
ldap_pvt_thread_mutex_lock( &conn->c_mutex );
|
|
|
|
|
1999-12-10 06:41:45 +08:00
|
|
|
/* can't start TLS if it is already started */
|
2000-03-03 04:36:53 +08:00
|
|
|
if (conn->c_is_tls != 0) {
|
|
|
|
*text = "TLS already started";
|
|
|
|
rc = LDAP_OPERATIONS_ERROR;
|
|
|
|
goto done;
|
|
|
|
}
|
1999-12-10 06:41:45 +08:00
|
|
|
|
2000-08-31 06:24:21 +08:00
|
|
|
/* can't start TLS if there are other op's around */
|
2002-01-03 08:12:46 +08:00
|
|
|
if (( !LDAP_STAILQ_EMPTY(&conn->c_ops) &&
|
|
|
|
(LDAP_STAILQ_FIRST(&conn->c_ops) != op ||
|
|
|
|
LDAP_STAILQ_NEXT(op, o_next) != NULL)) ||
|
|
|
|
( !LDAP_STAILQ_EMPTY(&conn->c_pending_ops) ))
|
2000-08-31 06:24:21 +08:00
|
|
|
{
|
2001-12-31 12:08:29 +08:00
|
|
|
*text = "cannot start TLS when operations are outstanding";
|
2000-08-31 06:24:21 +08:00
|
|
|
rc = LDAP_OPERATIONS_ERROR;
|
|
|
|
goto done;
|
|
|
|
}
|
|
|
|
|
2001-12-21 12:44:34 +08:00
|
|
|
if ( !( global_disallows & SLAP_DISALLOW_TLS_2_ANON ) &&
|
2001-12-24 23:11:01 +08:00
|
|
|
( conn->c_dn.bv_len != 0 ) )
|
2000-09-09 06:59:01 +08:00
|
|
|
{
|
2002-11-12 02:55:45 +08:00
|
|
|
Statslog( LDAP_DEBUG_STATS,
|
|
|
|
"conn=%lu op=%lu AUTHZ anonymous mech=starttls ssf=0",
|
|
|
|
op->o_connid, op->o_opid, 0, 0, 0 );
|
|
|
|
|
2001-12-21 12:44:34 +08:00
|
|
|
/* force to anonymous */
|
|
|
|
connection2anonymous( conn );
|
2000-09-09 06:59:01 +08:00
|
|
|
}
|
|
|
|
|
2001-12-21 12:44:34 +08:00
|
|
|
if ( ( global_disallows & SLAP_DISALLOW_TLS_AUTHC ) &&
|
2001-12-24 23:11:01 +08:00
|
|
|
( conn->c_dn.bv_len != 0 ) )
|
2000-09-09 06:59:01 +08:00
|
|
|
{
|
2001-12-21 12:44:34 +08:00
|
|
|
*text = "cannot start TLS after authentication";
|
|
|
|
rc = LDAP_OPERATIONS_ERROR;
|
|
|
|
goto done;
|
2000-09-09 06:59:01 +08:00
|
|
|
}
|
|
|
|
|
1999-12-11 03:18:33 +08:00
|
|
|
/* fail if TLS could not be initialized */
|
2001-06-25 15:33:42 +08:00
|
|
|
if (ldap_pvt_tls_get_option( NULL, LDAP_OPT_X_TLS_CTX, &ctx ) != 0
|
1999-12-11 03:18:33 +08:00
|
|
|
|| ctx == NULL)
|
|
|
|
{
|
|
|
|
if (default_referral != NULL) {
|
2000-04-25 21:02:42 +08:00
|
|
|
/* caller will put the referral in the result */
|
2000-03-03 04:36:53 +08:00
|
|
|
rc = LDAP_REFERRAL;
|
|
|
|
goto done;
|
1999-12-11 03:18:33 +08:00
|
|
|
}
|
2000-03-03 04:36:53 +08:00
|
|
|
|
|
|
|
*text = "Could not initialize TLS";
|
|
|
|
rc = LDAP_UNAVAILABLE;
|
|
|
|
goto done;
|
1999-12-11 03:18:33 +08:00
|
|
|
}
|
|
|
|
|
1999-12-10 06:41:45 +08:00
|
|
|
conn->c_is_tls = 1;
|
|
|
|
conn->c_needs_tls_accept = 1;
|
1999-12-10 12:52:32 +08:00
|
|
|
|
2000-03-03 04:36:53 +08:00
|
|
|
rc = LDAP_SUCCESS;
|
|
|
|
|
|
|
|
done:
|
|
|
|
/* give up connection lock */
|
2000-04-12 09:40:06 +08:00
|
|
|
ldap_pvt_thread_mutex_unlock( &conn->c_mutex );
|
2000-03-03 04:36:53 +08:00
|
|
|
|
|
|
|
/*
|
|
|
|
* RACE CONDITION: we give up lock before sending result
|
|
|
|
* Should be resolved by reworking connection state, not
|
|
|
|
* by moving send here (so as to ensure proper TLS sequencing)
|
|
|
|
*/
|
|
|
|
|
|
|
|
return rc;
|
1999-12-10 06:41:45 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
#endif /* HAVE_TLS */
|