mirror of
https://github.com/samba-team/samba.git
synced 2024-12-23 17:34:34 +03:00
c8a23147fe
It is a problem if a samba header is called ldap.h if we also want to use OpenLDAP's ldap.h Andrew Bartlett
313 lines
8.9 KiB
C
313 lines
8.9 KiB
C
/*
|
|
Unix SMB/CIFS implementation.
|
|
LDAP server
|
|
Copyright (C) Stefan Metzmacher 2004
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include "includes.h"
|
|
#include "ldap_server/ldap_server.h"
|
|
#include "auth/auth.h"
|
|
#include "smbd/service.h"
|
|
#include "lib/ldb/include/ldb.h"
|
|
#include "lib/ldb/include/ldb_errors.h"
|
|
#include "dsdb/samdb/samdb.h"
|
|
#include "auth/gensec/gensec.h"
|
|
#include "param/param.h"
|
|
|
|
static NTSTATUS ldapsrv_BindSimple(struct ldapsrv_call *call)
|
|
{
|
|
struct ldap_BindRequest *req = &call->request->r.BindRequest;
|
|
struct ldapsrv_reply *reply;
|
|
struct ldap_BindResponse *resp;
|
|
|
|
int result;
|
|
const char *errstr;
|
|
const char *nt4_domain, *nt4_account;
|
|
|
|
struct auth_session_info *session_info;
|
|
|
|
NTSTATUS status;
|
|
|
|
DEBUG(10, ("BindSimple dn: %s\n",req->dn));
|
|
|
|
status = crack_auto_name_to_nt4_name(call, call->conn->connection->event.ctx, call->conn->lp_ctx, req->dn, &nt4_domain, &nt4_account);
|
|
if (NT_STATUS_IS_OK(status)) {
|
|
status = authenticate_username_pw(call,
|
|
call->conn->connection->event.ctx,
|
|
call->conn->connection->msg_ctx,
|
|
call->conn->lp_ctx,
|
|
nt4_domain, nt4_account,
|
|
req->creds.password,
|
|
&session_info);
|
|
}
|
|
|
|
reply = ldapsrv_init_reply(call, LDAP_TAG_BindResponse);
|
|
if (!reply) {
|
|
return NT_STATUS_NO_MEMORY;
|
|
}
|
|
|
|
if (NT_STATUS_IS_OK(status)) {
|
|
result = LDAP_SUCCESS;
|
|
errstr = NULL;
|
|
|
|
talloc_free(call->conn->session_info);
|
|
call->conn->session_info = session_info;
|
|
talloc_steal(call->conn, session_info);
|
|
|
|
/* don't leak the old LDB */
|
|
talloc_free(call->conn->ldb);
|
|
|
|
status = ldapsrv_backend_Init(call->conn);
|
|
|
|
if (!NT_STATUS_IS_OK(status)) {
|
|
result = LDAP_OPERATIONS_ERROR;
|
|
errstr = talloc_asprintf(reply, "Simple Bind: Failed to advise ldb new credentials: %s", nt_errstr(status));
|
|
}
|
|
} else {
|
|
status = auth_nt_status_squash(status);
|
|
|
|
result = LDAP_INVALID_CREDENTIALS;
|
|
errstr = talloc_asprintf(reply, "Simple Bind Failed: %s", nt_errstr(status));
|
|
}
|
|
|
|
resp = &reply->msg->r.BindResponse;
|
|
resp->response.resultcode = result;
|
|
resp->response.errormessage = errstr;
|
|
resp->response.dn = NULL;
|
|
resp->response.referral = NULL;
|
|
resp->SASL.secblob = NULL;
|
|
|
|
ldapsrv_queue_reply(call, reply);
|
|
return NT_STATUS_OK;
|
|
}
|
|
|
|
struct ldapsrv_sasl_context {
|
|
struct ldapsrv_connection *conn;
|
|
struct socket_context *sasl_socket;
|
|
};
|
|
|
|
static void ldapsrv_set_sasl(void *private_data)
|
|
{
|
|
struct ldapsrv_sasl_context *ctx = talloc_get_type(private_data, struct ldapsrv_sasl_context);
|
|
talloc_steal(ctx->conn->connection, ctx->sasl_socket);
|
|
talloc_unlink(ctx->conn->connection, ctx->conn->connection->socket);
|
|
|
|
ctx->conn->sockets.sasl = ctx->sasl_socket;
|
|
ctx->conn->connection->socket = ctx->sasl_socket;
|
|
packet_set_socket(ctx->conn->packet, ctx->conn->connection->socket);
|
|
}
|
|
|
|
static NTSTATUS ldapsrv_BindSASL(struct ldapsrv_call *call)
|
|
{
|
|
struct ldap_BindRequest *req = &call->request->r.BindRequest;
|
|
struct ldapsrv_reply *reply;
|
|
struct ldap_BindResponse *resp;
|
|
struct ldapsrv_connection *conn;
|
|
int result = 0;
|
|
const char *errstr=NULL;
|
|
NTSTATUS status = NT_STATUS_OK;
|
|
|
|
DEBUG(10, ("BindSASL dn: %s\n",req->dn));
|
|
|
|
reply = ldapsrv_init_reply(call, LDAP_TAG_BindResponse);
|
|
if (!reply) {
|
|
return NT_STATUS_NO_MEMORY;
|
|
}
|
|
resp = &reply->msg->r.BindResponse;
|
|
|
|
conn = call->conn;
|
|
|
|
/*
|
|
* TODO: a SASL bind with a different mechanism
|
|
* should cancel an inprogress SASL bind.
|
|
* (see RFC 4513)
|
|
*/
|
|
|
|
if (!conn->gensec) {
|
|
conn->session_info = NULL;
|
|
|
|
status = samba_server_gensec_start(conn,
|
|
conn->connection->event.ctx,
|
|
conn->connection->msg_ctx,
|
|
conn->lp_ctx,
|
|
conn->server_credentials,
|
|
"ldap",
|
|
&conn->gensec);
|
|
if (!NT_STATUS_IS_OK(status)) {
|
|
DEBUG(1, ("Failed to start GENSEC server code: %s\n", nt_errstr(status)));
|
|
result = LDAP_OPERATIONS_ERROR;
|
|
errstr = talloc_asprintf(reply, "SASL: Failed to start authentication system: %s",
|
|
nt_errstr(status));
|
|
} else {
|
|
|
|
gensec_want_feature(conn->gensec, GENSEC_FEATURE_SIGN);
|
|
gensec_want_feature(conn->gensec, GENSEC_FEATURE_SEAL);
|
|
gensec_want_feature(conn->gensec, GENSEC_FEATURE_ASYNC_REPLIES);
|
|
|
|
status = gensec_start_mech_by_sasl_name(conn->gensec, req->creds.SASL.mechanism);
|
|
|
|
if (!NT_STATUS_IS_OK(status)) {
|
|
DEBUG(1, ("Failed to start GENSEC SASL[%s] server code: %s\n",
|
|
req->creds.SASL.mechanism, nt_errstr(status)));
|
|
result = LDAP_OPERATIONS_ERROR;
|
|
errstr = talloc_asprintf(reply, "SASL:[%s]: Failed to start authentication backend: %s",
|
|
req->creds.SASL.mechanism, nt_errstr(status));
|
|
}
|
|
}
|
|
}
|
|
|
|
if (NT_STATUS_IS_OK(status)) {
|
|
DATA_BLOB input = data_blob(NULL, 0);
|
|
DATA_BLOB output = data_blob(NULL, 0);
|
|
|
|
if (req->creds.SASL.secblob) {
|
|
input = *req->creds.SASL.secblob;
|
|
}
|
|
|
|
status = gensec_update(conn->gensec, reply,
|
|
input, &output);
|
|
|
|
/* Windows 2000 mmc doesn't like secblob == NULL and reports a decoding error */
|
|
resp->SASL.secblob = talloc(reply, DATA_BLOB);
|
|
NT_STATUS_HAVE_NO_MEMORY(resp->SASL.secblob);
|
|
*resp->SASL.secblob = output;
|
|
} else {
|
|
resp->SASL.secblob = NULL;
|
|
}
|
|
|
|
if (NT_STATUS_EQUAL(NT_STATUS_MORE_PROCESSING_REQUIRED, status)) {
|
|
result = LDAP_SASL_BIND_IN_PROGRESS;
|
|
errstr = NULL;
|
|
} else if (NT_STATUS_IS_OK(status)) {
|
|
struct auth_session_info *old_session_info=NULL;
|
|
struct ldapsrv_sasl_context *ctx;
|
|
|
|
result = LDAP_SUCCESS;
|
|
errstr = NULL;
|
|
|
|
ctx = talloc(call, struct ldapsrv_sasl_context);
|
|
|
|
if (!ctx) {
|
|
status = NT_STATUS_NO_MEMORY;
|
|
} else {
|
|
ctx->conn = conn;
|
|
status = gensec_socket_init(conn->gensec,
|
|
conn->connection,
|
|
conn->connection->socket,
|
|
conn->connection->event.ctx,
|
|
stream_io_handler_callback,
|
|
conn->connection,
|
|
&ctx->sasl_socket);
|
|
}
|
|
|
|
if (!ctx || !NT_STATUS_IS_OK(status)) {
|
|
conn->session_info = old_session_info;
|
|
result = LDAP_OPERATIONS_ERROR;
|
|
errstr = talloc_asprintf(reply,
|
|
"SASL:[%s]: Failed to setup SASL socket: %s",
|
|
req->creds.SASL.mechanism, nt_errstr(status));
|
|
} else {
|
|
|
|
call->send_callback = ldapsrv_set_sasl;
|
|
call->send_private = ctx;
|
|
|
|
old_session_info = conn->session_info;
|
|
conn->session_info = NULL;
|
|
status = gensec_session_info(conn->gensec, &conn->session_info);
|
|
if (!NT_STATUS_IS_OK(status)) {
|
|
conn->session_info = old_session_info;
|
|
result = LDAP_OPERATIONS_ERROR;
|
|
errstr = talloc_asprintf(reply,
|
|
"SASL:[%s]: Failed to get session info: %s",
|
|
req->creds.SASL.mechanism, nt_errstr(status));
|
|
} else {
|
|
talloc_free(old_session_info);
|
|
talloc_steal(conn, conn->session_info);
|
|
|
|
/* don't leak the old LDB */
|
|
talloc_free(conn->ldb);
|
|
|
|
status = ldapsrv_backend_Init(conn);
|
|
|
|
if (!NT_STATUS_IS_OK(status)) {
|
|
result = LDAP_OPERATIONS_ERROR;
|
|
errstr = talloc_asprintf(reply,
|
|
"SASL:[%s]: Failed to advise samdb of new credentials: %s",
|
|
req->creds.SASL.mechanism,
|
|
nt_errstr(status));
|
|
}
|
|
}
|
|
}
|
|
} else {
|
|
status = auth_nt_status_squash(status);
|
|
if (result == 0) {
|
|
result = LDAP_INVALID_CREDENTIALS;
|
|
errstr = talloc_asprintf(reply, "SASL:[%s]: %s", req->creds.SASL.mechanism, nt_errstr(status));
|
|
}
|
|
}
|
|
|
|
resp->response.resultcode = result;
|
|
resp->response.dn = NULL;
|
|
resp->response.errormessage = errstr;
|
|
resp->response.referral = NULL;
|
|
|
|
ldapsrv_queue_reply(call, reply);
|
|
return NT_STATUS_OK;
|
|
}
|
|
|
|
NTSTATUS ldapsrv_BindRequest(struct ldapsrv_call *call)
|
|
{
|
|
struct ldap_BindRequest *req = &call->request->r.BindRequest;
|
|
struct ldapsrv_reply *reply;
|
|
struct ldap_BindResponse *resp;
|
|
|
|
/*
|
|
* TODO: we should fail the bind request
|
|
* if there're any pending requests.
|
|
*
|
|
* also a simple bind should cancel an
|
|
* inprogress SASL bind.
|
|
* (see RFC 4513)
|
|
*/
|
|
switch (req->mechanism) {
|
|
case LDAP_AUTH_MECH_SIMPLE:
|
|
return ldapsrv_BindSimple(call);
|
|
case LDAP_AUTH_MECH_SASL:
|
|
return ldapsrv_BindSASL(call);
|
|
}
|
|
|
|
reply = ldapsrv_init_reply(call, LDAP_TAG_BindResponse);
|
|
if (!reply) {
|
|
return NT_STATUS_NO_MEMORY;
|
|
}
|
|
|
|
resp = &reply->msg->r.BindResponse;
|
|
resp->response.resultcode = 7;
|
|
resp->response.dn = NULL;
|
|
resp->response.errormessage = talloc_asprintf(reply, "Bad AuthenticationChoice [%d]", req->mechanism);
|
|
resp->response.referral = NULL;
|
|
resp->SASL.secblob = NULL;
|
|
|
|
ldapsrv_queue_reply(call, reply);
|
|
return NT_STATUS_OK;
|
|
}
|
|
|
|
NTSTATUS ldapsrv_UnbindRequest(struct ldapsrv_call *call)
|
|
{
|
|
DEBUG(10, ("UnbindRequest\n"));
|
|
return NT_STATUS_OK;
|
|
}
|