2 Unix SMB/CIFS implementation.
6 Copyright (C) Andrew Tridgell 2005
7 Copyright (C) Volker Lendecke 2004
8 Copyright (C) Stefan Metzmacher 2004
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 3 of the License, or
13 (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program. If not, see <http://www.gnu.org/licenses/>.
25 #include "system/network.h"
26 #include "lib/events/events.h"
27 #include "auth/auth.h"
28 #include "auth/credentials/credentials.h"
29 #include "librpc/gen_ndr/ndr_samr.h"
30 #include "../lib/util/dlinklist.h"
31 #include "../lib/util/asn1.h"
32 #include "ldap_server/ldap_server.h"
33 #include "smbd/service_task.h"
34 #include "smbd/service_stream.h"
35 #include "smbd/service.h"
36 #include "smbd/process_model.h"
37 #include "lib/tls/tls.h"
38 #include "lib/messaging/irpc.h"
40 #include <ldb_errors.h>
41 #include "libcli/ldap/ldap_proto.h"
42 #include "system/network.h"
43 #include "lib/socket/netif.h"
44 #include "dsdb/samdb/samdb.h"
45 #include "param/param.h"
46 #include "../lib/tsocket/tsocket.h"
47 #include "../lib/util/tevent_ntstatus.h"
48 #include "../libcli/util/tstream.h"
49 #include "libds/common/roles.h"
51 static void ldapsrv_terminate_connection_done(struct tevent_req *subreq);
54 close the socket and shutdown a server_context
56 static void ldapsrv_terminate_connection(struct ldapsrv_connection *conn,
59 struct tevent_req *subreq;
61 if (conn->limits.reason) {
65 DLIST_REMOVE(conn->service->connections, conn);
67 conn->limits.endtime = timeval_current_ofs(0, 500);
69 tevent_queue_stop(conn->sockets.send_queue);
70 TALLOC_FREE(conn->sockets.read_req);
71 if (conn->active_call) {
72 tevent_req_cancel(conn->active_call);
73 conn->active_call = NULL;
76 conn->limits.reason = talloc_strdup(conn, reason);
77 if (conn->limits.reason == NULL) {
78 TALLOC_FREE(conn->sockets.tls);
79 TALLOC_FREE(conn->sockets.sasl);
80 TALLOC_FREE(conn->sockets.raw);
81 stream_terminate_connection(conn->connection, reason);
85 subreq = tstream_disconnect_send(conn,
86 conn->connection->event.ctx,
87 conn->sockets.active);
89 TALLOC_FREE(conn->sockets.tls);
90 TALLOC_FREE(conn->sockets.sasl);
91 TALLOC_FREE(conn->sockets.raw);
92 stream_terminate_connection(conn->connection, reason);
95 tevent_req_set_endtime(subreq,
96 conn->connection->event.ctx,
97 conn->limits.endtime);
98 tevent_req_set_callback(subreq, ldapsrv_terminate_connection_done, conn);
101 static void ldapsrv_terminate_connection_done(struct tevent_req *subreq)
103 struct ldapsrv_connection *conn =
104 tevent_req_callback_data(subreq,
105 struct ldapsrv_connection);
108 tstream_disconnect_recv(subreq, &sys_errno);
111 if (conn->sockets.active == conn->sockets.raw) {
112 TALLOC_FREE(conn->sockets.tls);
113 TALLOC_FREE(conn->sockets.sasl);
114 TALLOC_FREE(conn->sockets.raw);
115 stream_terminate_connection(conn->connection,
116 conn->limits.reason);
120 TALLOC_FREE(conn->sockets.tls);
121 TALLOC_FREE(conn->sockets.sasl);
122 conn->sockets.active = conn->sockets.raw;
124 subreq = tstream_disconnect_send(conn,
125 conn->connection->event.ctx,
126 conn->sockets.active);
127 if (subreq == NULL) {
128 TALLOC_FREE(conn->sockets.raw);
129 stream_terminate_connection(conn->connection,
130 conn->limits.reason);
133 tevent_req_set_endtime(subreq,
134 conn->connection->event.ctx,
135 conn->limits.endtime);
136 tevent_req_set_callback(subreq, ldapsrv_terminate_connection_done, conn);
140 called when a LDAP socket becomes readable
142 void ldapsrv_recv(struct stream_connection *c, uint16_t flags)
144 smb_panic(__location__);
148 called when a LDAP socket becomes writable
150 static void ldapsrv_send(struct stream_connection *c, uint16_t flags)
152 smb_panic(__location__);
155 static int ldapsrv_load_limits(struct ldapsrv_connection *conn)
158 const char *attrs[] = { "configurationNamingContext", NULL };
159 const char *attrs2[] = { "lDAPAdminLimits", NULL };
160 struct ldb_message_element *el;
161 struct ldb_result *res = NULL;
162 struct ldb_dn *basedn;
163 struct ldb_dn *conf_dn;
164 struct ldb_dn *policy_dn;
168 /* set defaults limits in case of failure */
169 conn->limits.initial_timeout = 120;
170 conn->limits.conn_idle_time = 900;
171 conn->limits.max_page_size = 1000;
172 conn->limits.max_notifications = 5;
173 conn->limits.search_timeout = 120;
176 tmp_ctx = talloc_new(conn);
177 if (tmp_ctx == NULL) {
181 basedn = ldb_dn_new(tmp_ctx, conn->ldb, NULL);
182 if (basedn == NULL) {
186 ret = ldb_search(conn->ldb, tmp_ctx, &res, basedn, LDB_SCOPE_BASE, attrs, NULL);
187 if (ret != LDB_SUCCESS) {
191 if (res->count != 1) {
195 conf_dn = ldb_msg_find_attr_as_dn(conn->ldb, tmp_ctx, res->msgs[0], "configurationNamingContext");
196 if (conf_dn == NULL) {
200 policy_dn = ldb_dn_copy(tmp_ctx, conf_dn);
201 ldb_dn_add_child_fmt(policy_dn, "CN=Default Query Policy,CN=Query-Policies,CN=Directory Service,CN=Windows NT,CN=Services");
202 if (policy_dn == NULL) {
206 ret = ldb_search(conn->ldb, tmp_ctx, &res, policy_dn, LDB_SCOPE_BASE, attrs2, NULL);
207 if (ret != LDB_SUCCESS) {
211 if (res->count != 1) {
215 el = ldb_msg_find_element(res->msgs[0], "lDAPAdminLimits");
220 for (i = 0; i < el->num_values; i++) {
221 char policy_name[256];
224 s = sscanf((const char *)el->values[i].data, "%255[^=]=%d", policy_name, &policy_value);
225 if (s != 2 || policy_value == 0)
227 if (strcasecmp("InitRecvTimeout", policy_name) == 0) {
228 conn->limits.initial_timeout = policy_value;
231 if (strcasecmp("MaxConnIdleTime", policy_name) == 0) {
232 conn->limits.conn_idle_time = policy_value;
235 if (strcasecmp("MaxPageSize", policy_name) == 0) {
236 conn->limits.max_page_size = policy_value;
239 if (strcasecmp("MaxNotificationPerConn", policy_name) == 0) {
240 conn->limits.max_notifications = policy_value;
243 if (strcasecmp("MaxQueryDuration", policy_name) == 0) {
244 conn->limits.search_timeout = policy_value;
252 DEBUG(0, ("Failed to load ldap server query policies\n"));
253 talloc_free(tmp_ctx);
257 static int ldapsrv_call_destructor(struct ldapsrv_call *call)
259 if (call->conn == NULL) {
263 DLIST_REMOVE(call->conn->pending_calls, call);
269 static struct tevent_req *ldapsrv_process_call_send(TALLOC_CTX *mem_ctx,
270 struct tevent_context *ev,
271 struct tevent_queue *call_queue,
272 struct ldapsrv_call *call);
273 static NTSTATUS ldapsrv_process_call_recv(struct tevent_req *req);
275 static bool ldapsrv_call_read_next(struct ldapsrv_connection *conn);
276 static void ldapsrv_accept_tls_done(struct tevent_req *subreq);
279 initialise a server_context from a open socket and register a event handler
280 for reading from that socket
282 static void ldapsrv_accept(struct stream_connection *c,
283 struct auth_session_info *session_info,
286 struct ldapsrv_service *ldapsrv_service =
287 talloc_get_type(c->private_data, struct ldapsrv_service);
288 struct ldapsrv_connection *conn;
289 struct cli_credentials *server_credentials;
290 struct socket_address *socket_address;
294 struct tevent_req *subreq;
295 struct timeval endtime;
296 char *errstring = NULL;
298 conn = talloc_zero(c, struct ldapsrv_connection);
300 stream_terminate_connection(c, "ldapsrv_accept: out of memory");
303 conn->is_privileged = is_privileged;
305 conn->sockets.send_queue = tevent_queue_create(conn, "ldapsev send queue");
306 if (conn->sockets.send_queue == NULL) {
307 stream_terminate_connection(c,
308 "ldapsrv_accept: tevent_queue_create failed");
312 TALLOC_FREE(c->event.fde);
314 ret = tstream_bsd_existing_socket(conn,
315 socket_get_fd(c->socket),
318 stream_terminate_connection(c,
319 "ldapsrv_accept: out of memory");
322 socket_set_flags(c->socket, SOCKET_FLAG_NOCLOSE);
324 conn->connection = c;
325 conn->service = ldapsrv_service;
326 conn->lp_ctx = ldapsrv_service->task->lp_ctx;
328 c->private_data = conn;
330 socket_address = socket_get_my_addr(c->socket, conn);
331 if (!socket_address) {
332 ldapsrv_terminate_connection(conn, "ldapsrv_accept: failed to obtain local socket address!");
335 port = socket_address->port;
336 talloc_free(socket_address);
337 if (port == 3268 || port == 3269) /* Global catalog */ {
338 conn->global_catalog = true;
341 server_credentials = cli_credentials_init(conn);
342 if (!server_credentials) {
343 stream_terminate_connection(c, "Failed to init server credentials\n");
347 cli_credentials_set_conf(server_credentials, conn->lp_ctx);
348 status = cli_credentials_set_machine_account(server_credentials, conn->lp_ctx);
349 if (!NT_STATUS_IS_OK(status)) {
350 stream_terminate_connection(c, talloc_asprintf(conn, "Failed to obtain server credentials, perhaps a standalone server?: %s\n", nt_errstr(status)));
353 conn->server_credentials = server_credentials;
355 conn->session_info = session_info;
357 conn->sockets.active = conn->sockets.raw;
359 if (conn->is_privileged) {
360 conn->require_strong_auth = LDAP_SERVER_REQUIRE_STRONG_AUTH_NO;
362 conn->require_strong_auth = lpcfg_ldap_server_require_strong_auth(conn->lp_ctx);
365 ret = ldapsrv_backend_Init(conn, &errstring);
366 if (ret != LDB_SUCCESS) {
367 char *reason = talloc_asprintf(conn,
368 "LDB backend for LDAP Init "
370 errstring, ldb_strerror(ret));
371 ldapsrv_terminate_connection(conn, reason);
375 /* load limits from the conf partition */
376 ldapsrv_load_limits(conn); /* should we fail on error ? */
378 /* register the server */
379 irpc_add_name(c->msg_ctx, "ldap_server");
381 DLIST_ADD_END(ldapsrv_service->connections, conn);
383 if (port != 636 && port != 3269) {
384 ldapsrv_call_read_next(conn);
388 endtime = timeval_current_ofs(conn->limits.conn_idle_time, 0);
390 subreq = tstream_tls_accept_send(conn,
391 conn->connection->event.ctx,
393 conn->service->tls_params);
394 if (subreq == NULL) {
395 ldapsrv_terminate_connection(conn, "ldapsrv_accept: "
396 "no memory for tstream_tls_accept_send");
399 tevent_req_set_endtime(subreq,
400 conn->connection->event.ctx,
402 tevent_req_set_callback(subreq, ldapsrv_accept_tls_done, conn);
405 static void ldapsrv_accept_tls_done(struct tevent_req *subreq)
407 struct ldapsrv_connection *conn =
408 tevent_req_callback_data(subreq,
409 struct ldapsrv_connection);
413 ret = tstream_tls_accept_recv(subreq, &sys_errno,
414 conn, &conn->sockets.tls);
419 reason = talloc_asprintf(conn, "ldapsrv_accept_tls_loop: "
420 "tstream_tls_accept_recv() - %d:%s",
421 sys_errno, strerror(sys_errno));
423 reason = "ldapsrv_accept_tls_loop: "
424 "tstream_tls_accept_recv() - failed";
427 ldapsrv_terminate_connection(conn, reason);
431 conn->sockets.active = conn->sockets.tls;
432 ldapsrv_call_read_next(conn);
435 static void ldapsrv_call_read_done(struct tevent_req *subreq);
437 static bool ldapsrv_call_read_next(struct ldapsrv_connection *conn)
439 struct tevent_req *subreq;
441 if (conn->pending_calls != NULL) {
442 conn->limits.endtime = timeval_zero();
444 ldapsrv_notification_retry_setup(conn->service, false);
445 } else if (timeval_is_zero(&conn->limits.endtime)) {
446 conn->limits.endtime =
447 timeval_current_ofs(conn->limits.initial_timeout, 0);
449 conn->limits.endtime =
450 timeval_current_ofs(conn->limits.conn_idle_time, 0);
453 if (conn->sockets.read_req != NULL) {
458 * The minimum size of a LDAP pdu is 7 bytes
460 * dumpasn1 -hh ldap-unbind-min.dat
462 * <30 05 02 01 09 42 00>
467 * 5 0: [APPLICATION 2]
468 * : Error: Object has zero length.
471 * dumpasn1 -hh ldap-unbind-windows.dat
473 * <30 84 00 00 00 05 02 01 09 42 00>
478 * 9 0: [APPLICATION 2]
479 * : Error: Object has zero length.
482 * This means using an initial read size
485 subreq = tstream_read_pdu_blob_send(conn,
486 conn->connection->event.ctx,
487 conn->sockets.active,
488 7, /* initial_read_size */
491 if (subreq == NULL) {
492 ldapsrv_terminate_connection(conn, "ldapsrv_call_read_next: "
493 "no memory for tstream_read_pdu_blob_send");
496 if (!timeval_is_zero(&conn->limits.endtime)) {
497 tevent_req_set_endtime(subreq,
498 conn->connection->event.ctx,
499 conn->limits.endtime);
501 tevent_req_set_callback(subreq, ldapsrv_call_read_done, conn);
502 conn->sockets.read_req = subreq;
506 static void ldapsrv_call_process_done(struct tevent_req *subreq);
508 static void ldapsrv_call_read_done(struct tevent_req *subreq)
510 struct ldapsrv_connection *conn =
511 tevent_req_callback_data(subreq,
512 struct ldapsrv_connection);
514 struct ldapsrv_call *call;
515 struct asn1_data *asn1;
518 conn->sockets.read_req = NULL;
520 call = talloc_zero(conn, struct ldapsrv_call);
522 ldapsrv_terminate_connection(conn, "no memory");
525 talloc_set_destructor(call, ldapsrv_call_destructor);
529 status = tstream_read_pdu_blob_recv(subreq,
533 if (!NT_STATUS_IS_OK(status)) {
536 reason = talloc_asprintf(call, "ldapsrv_call_loop: "
537 "tstream_read_pdu_blob_recv() - %s",
540 reason = nt_errstr(status);
543 ldapsrv_terminate_connection(conn, reason);
547 asn1 = asn1_init(call);
549 ldapsrv_terminate_connection(conn, "no memory");
553 call->request = talloc(call, struct ldap_message);
554 if (call->request == NULL) {
555 ldapsrv_terminate_connection(conn, "no memory");
559 if (!asn1_load(asn1, blob)) {
560 ldapsrv_terminate_connection(conn, "asn1_load failed");
564 status = ldap_decode(asn1, samba_ldap_control_handlers(),
566 if (!NT_STATUS_IS_OK(status)) {
567 ldapsrv_terminate_connection(conn, nt_errstr(status));
571 data_blob_free(&blob);
574 /* queue the call in the global queue */
575 subreq = ldapsrv_process_call_send(call,
576 conn->connection->event.ctx,
577 conn->service->call_queue,
579 if (subreq == NULL) {
580 ldapsrv_terminate_connection(conn, "ldapsrv_process_call_send failed");
583 tevent_req_set_callback(subreq, ldapsrv_call_process_done, call);
584 conn->active_call = subreq;
587 static void ldapsrv_call_wait_done(struct tevent_req *subreq);
588 static void ldapsrv_call_writev_start(struct ldapsrv_call *call);
589 static void ldapsrv_call_writev_done(struct tevent_req *subreq);
591 static void ldapsrv_call_process_done(struct tevent_req *subreq)
593 struct ldapsrv_call *call =
594 tevent_req_callback_data(subreq,
595 struct ldapsrv_call);
596 struct ldapsrv_connection *conn = call->conn;
599 conn->active_call = NULL;
601 status = ldapsrv_process_call_recv(subreq);
603 if (!NT_STATUS_IS_OK(status)) {
604 ldapsrv_terminate_connection(conn, nt_errstr(status));
608 if (call->wait_send != NULL) {
609 subreq = call->wait_send(call,
610 conn->connection->event.ctx,
612 if (subreq == NULL) {
613 ldapsrv_terminate_connection(conn,
614 "ldapsrv_call_process_done: "
615 "call->wait_send - no memory");
618 tevent_req_set_callback(subreq,
619 ldapsrv_call_wait_done,
621 conn->active_call = subreq;
625 ldapsrv_call_writev_start(call);
628 static void ldapsrv_call_wait_done(struct tevent_req *subreq)
630 struct ldapsrv_call *call =
631 tevent_req_callback_data(subreq,
632 struct ldapsrv_call);
633 struct ldapsrv_connection *conn = call->conn;
636 conn->active_call = NULL;
638 status = call->wait_recv(subreq);
640 if (!NT_STATUS_IS_OK(status)) {
643 reason = talloc_asprintf(call, "ldapsrv_call_wait_done: "
644 "call->wait_recv() - %s",
646 if (reason == NULL) {
647 reason = nt_errstr(status);
650 ldapsrv_terminate_connection(conn, reason);
654 ldapsrv_call_writev_start(call);
657 static void ldapsrv_call_writev_start(struct ldapsrv_call *call)
659 struct ldapsrv_connection *conn = call->conn;
660 DATA_BLOB blob = data_blob_null;
661 struct tevent_req *subreq = NULL;
663 /* build all the replies into a single blob */
664 while (call->replies) {
668 if (!ldap_encode(call->replies->msg, samba_ldap_control_handlers(), &b, call)) {
669 DEBUG(0,("Failed to encode ldap reply of type %d\n",
670 call->replies->msg->type));
671 ldapsrv_terminate_connection(conn, "ldap_encode failed");
675 ret = data_blob_append(call, &blob, b.data, b.length);
678 talloc_set_name_const(blob.data, "Outgoing, encoded LDAP packet");
681 ldapsrv_terminate_connection(conn, "data_blob_append failed");
685 DLIST_REMOVE(call->replies, call->replies);
688 if (blob.length == 0) {
689 if (!call->notification.busy) {
693 ldapsrv_call_read_next(conn);
697 call->out_iov.iov_base = blob.data;
698 call->out_iov.iov_len = blob.length;
700 subreq = tstream_writev_queue_send(call,
701 conn->connection->event.ctx,
702 conn->sockets.active,
703 conn->sockets.send_queue,
705 if (subreq == NULL) {
706 ldapsrv_terminate_connection(conn, "stream_writev_queue_send failed");
709 tevent_req_set_callback(subreq, ldapsrv_call_writev_done, call);
712 static void ldapsrv_call_postprocess_done(struct tevent_req *subreq);
714 static void ldapsrv_call_writev_done(struct tevent_req *subreq)
716 struct ldapsrv_call *call =
717 tevent_req_callback_data(subreq,
718 struct ldapsrv_call);
719 struct ldapsrv_connection *conn = call->conn;
723 rc = tstream_writev_queue_recv(subreq, &sys_errno);
728 reason = talloc_asprintf(call, "ldapsrv_call_writev_done: "
729 "tstream_writev_queue_recv() - %d:%s",
730 sys_errno, strerror(sys_errno));
731 if (reason == NULL) {
732 reason = "ldapsrv_call_writev_done: "
733 "tstream_writev_queue_recv() failed";
736 ldapsrv_terminate_connection(conn, reason);
740 if (call->postprocess_send) {
741 subreq = call->postprocess_send(call,
742 conn->connection->event.ctx,
743 call->postprocess_private);
744 if (subreq == NULL) {
745 ldapsrv_terminate_connection(conn, "ldapsrv_call_writev_done: "
746 "call->postprocess_send - no memory");
749 tevent_req_set_callback(subreq,
750 ldapsrv_call_postprocess_done,
755 if (!call->notification.busy) {
759 ldapsrv_call_read_next(conn);
762 static void ldapsrv_call_postprocess_done(struct tevent_req *subreq)
764 struct ldapsrv_call *call =
765 tevent_req_callback_data(subreq,
766 struct ldapsrv_call);
767 struct ldapsrv_connection *conn = call->conn;
770 status = call->postprocess_recv(subreq);
772 if (!NT_STATUS_IS_OK(status)) {
775 reason = talloc_asprintf(call, "ldapsrv_call_postprocess_done: "
776 "call->postprocess_recv() - %s",
778 if (reason == NULL) {
779 reason = nt_errstr(status);
782 ldapsrv_terminate_connection(conn, reason);
788 ldapsrv_call_read_next(conn);
791 static void ldapsrv_notification_retry_done(struct tevent_req *subreq);
793 void ldapsrv_notification_retry_setup(struct ldapsrv_service *service, bool force)
795 struct ldapsrv_connection *conn = NULL;
796 struct timeval retry;
797 size_t num_pending = 0;
798 size_t num_active = 0;
801 TALLOC_FREE(service->notification.retry);
802 service->notification.generation += 1;
805 if (service->notification.retry != NULL) {
809 for (conn = service->connections; conn != NULL; conn = conn->next) {
810 if (conn->pending_calls == NULL) {
816 if (conn->pending_calls->notification.generation !=
817 service->notification.generation)
823 if (num_pending == 0) {
827 if (num_active != 0) {
828 retry = timeval_current_ofs(0, 100);
830 retry = timeval_current_ofs(5, 0);
833 service->notification.retry = tevent_wakeup_send(service,
834 service->task->event_ctx,
836 if (service->notification.retry == NULL) {
841 tevent_req_set_callback(service->notification.retry,
842 ldapsrv_notification_retry_done,
846 static void ldapsrv_notification_retry_done(struct tevent_req *subreq)
848 struct ldapsrv_service *service =
849 tevent_req_callback_data(subreq,
850 struct ldapsrv_service);
851 struct ldapsrv_connection *conn = NULL;
852 struct ldapsrv_connection *conn_next = NULL;
855 service->notification.retry = NULL;
857 ok = tevent_wakeup_recv(subreq);
863 for (conn = service->connections; conn != NULL; conn = conn_next) {
864 struct ldapsrv_call *call = conn->pending_calls;
866 conn_next = conn->next;
868 if (conn->pending_calls == NULL) {
872 if (conn->active_call != NULL) {
876 DLIST_DEMOTE(conn->pending_calls, call);
877 call->notification.generation =
878 service->notification.generation;
880 /* queue the call in the global queue */
881 subreq = ldapsrv_process_call_send(call,
882 conn->connection->event.ctx,
883 conn->service->call_queue,
885 if (subreq == NULL) {
886 ldapsrv_terminate_connection(conn,
887 "ldapsrv_process_call_send failed");
890 tevent_req_set_callback(subreq, ldapsrv_call_process_done, call);
891 conn->active_call = subreq;
894 ldapsrv_notification_retry_setup(service, false);
897 struct ldapsrv_process_call_state {
898 struct ldapsrv_call *call;
901 static void ldapsrv_process_call_trigger(struct tevent_req *req,
904 static struct tevent_req *ldapsrv_process_call_send(TALLOC_CTX *mem_ctx,
905 struct tevent_context *ev,
906 struct tevent_queue *call_queue,
907 struct ldapsrv_call *call)
909 struct tevent_req *req;
910 struct ldapsrv_process_call_state *state;
913 req = tevent_req_create(mem_ctx, &state,
914 struct ldapsrv_process_call_state);
921 ok = tevent_queue_add(call_queue, ev, req,
922 ldapsrv_process_call_trigger, NULL);
925 return tevent_req_post(req, ev);
931 static void ldapsrv_process_call_trigger(struct tevent_req *req,
934 struct ldapsrv_process_call_state *state =
936 struct ldapsrv_process_call_state);
940 status = ldapsrv_do_call(state->call);
941 if (!NT_STATUS_IS_OK(status)) {
942 tevent_req_nterror(req, status);
946 tevent_req_done(req);
949 static NTSTATUS ldapsrv_process_call_recv(struct tevent_req *req)
953 if (tevent_req_is_nterror(req, &status)) {
954 tevent_req_received(req);
958 tevent_req_received(req);
962 static void ldapsrv_accept_nonpriv(struct stream_connection *c)
964 struct ldapsrv_service *ldapsrv_service = talloc_get_type_abort(
965 c->private_data, struct ldapsrv_service);
966 struct auth_session_info *session_info;
969 status = auth_anonymous_session_info(
970 c, ldapsrv_service->task->lp_ctx, &session_info);
971 if (!NT_STATUS_IS_OK(status)) {
972 stream_terminate_connection(c, "failed to setup anonymous "
976 ldapsrv_accept(c, session_info, false);
979 static const struct stream_server_ops ldap_stream_nonpriv_ops = {
981 .accept_connection = ldapsrv_accept_nonpriv,
982 .recv_handler = ldapsrv_recv,
983 .send_handler = ldapsrv_send,
986 /* The feature removed behind an #ifdef until we can do it properly
987 * with an EXTERNAL bind. */
989 #define WITH_LDAPI_PRIV_SOCKET
991 #ifdef WITH_LDAPI_PRIV_SOCKET
992 static void ldapsrv_accept_priv(struct stream_connection *c)
994 struct ldapsrv_service *ldapsrv_service = talloc_get_type_abort(
995 c->private_data, struct ldapsrv_service);
996 struct auth_session_info *session_info;
998 session_info = system_session(ldapsrv_service->task->lp_ctx);
1000 stream_terminate_connection(c, "failed to setup system "
1004 ldapsrv_accept(c, session_info, true);
1007 static const struct stream_server_ops ldap_stream_priv_ops = {
1009 .accept_connection = ldapsrv_accept_priv,
1010 .recv_handler = ldapsrv_recv,
1011 .send_handler = ldapsrv_send,
1018 add a socket address to the list of events, one event per port
1020 static NTSTATUS add_socket(struct task_server *task,
1021 struct loadparm_context *lp_ctx,
1022 const struct model_ops *model_ops,
1023 const char *address, struct ldapsrv_service *ldap_service)
1025 uint16_t port = 389;
1027 struct ldb_context *ldb;
1029 status = stream_setup_socket(task, task->event_ctx, lp_ctx,
1030 model_ops, &ldap_stream_nonpriv_ops,
1031 "ip", address, &port,
1032 lpcfg_socket_options(lp_ctx),
1034 if (!NT_STATUS_IS_OK(status)) {
1035 DEBUG(0,("ldapsrv failed to bind to %s:%u - %s\n",
1036 address, port, nt_errstr(status)));
1040 if (tstream_tls_params_enabled(ldap_service->tls_params)) {
1041 /* add ldaps server */
1043 status = stream_setup_socket(task, task->event_ctx, lp_ctx,
1045 &ldap_stream_nonpriv_ops,
1046 "ip", address, &port,
1047 lpcfg_socket_options(lp_ctx),
1049 if (!NT_STATUS_IS_OK(status)) {
1050 DEBUG(0,("ldapsrv failed to bind to %s:%u - %s\n",
1051 address, port, nt_errstr(status)));
1056 /* Load LDAP database, but only to read our settings */
1057 ldb = samdb_connect(ldap_service, ldap_service->task->event_ctx,
1058 lp_ctx, system_session(lp_ctx), 0);
1060 return NT_STATUS_INTERNAL_DB_CORRUPTION;
1063 if (samdb_is_gc(ldb)) {
1065 status = stream_setup_socket(task, task->event_ctx, lp_ctx,
1067 &ldap_stream_nonpriv_ops,
1068 "ip", address, &port,
1069 lpcfg_socket_options(lp_ctx),
1071 if (!NT_STATUS_IS_OK(status)) {
1072 DEBUG(0,("ldapsrv failed to bind to %s:%u - %s\n",
1073 address, port, nt_errstr(status)));
1076 if (tstream_tls_params_enabled(ldap_service->tls_params)) {
1077 /* add ldaps server for the global catalog */
1079 status = stream_setup_socket(task, task->event_ctx, lp_ctx,
1081 &ldap_stream_nonpriv_ops,
1082 "ip", address, &port,
1083 lpcfg_socket_options(lp_ctx),
1085 if (!NT_STATUS_IS_OK(status)) {
1086 DEBUG(0,("ldapsrv failed to bind to %s:%u - %s\n",
1087 address, port, nt_errstr(status)));
1093 /* And once we are bound, free the temporary ldb, it will
1094 * connect again on each incoming LDAP connection */
1095 talloc_unlink(ldap_service, ldb);
1097 return NT_STATUS_OK;
1101 open the ldap server sockets
1103 static void ldapsrv_task_init(struct task_server *task)
1106 #ifdef WITH_LDAPI_PRIV_SOCKET
1109 const char *dns_host_name;
1110 struct ldapsrv_service *ldap_service;
1112 const struct model_ops *model_ops;
1114 switch (lpcfg_server_role(task->lp_ctx)) {
1115 case ROLE_STANDALONE:
1116 task_server_terminate(task, "ldap_server: no LDAP server required in standalone configuration",
1119 case ROLE_DOMAIN_MEMBER:
1120 task_server_terminate(task, "ldap_server: no LDAP server required in member server configuration",
1123 case ROLE_ACTIVE_DIRECTORY_DC:
1124 /* Yes, we want an LDAP server */
1128 task_server_set_title(task, "task[ldapsrv]");
1131 * Here we used to run the ldap server as a single process,
1132 * but we don't want transaction locks for one task in a write
1133 * blocking all other reads, so we go multi-process.
1135 model_ops = task->model_ops;
1137 ldap_service = talloc_zero(task, struct ldapsrv_service);
1138 if (ldap_service == NULL) goto failed;
1140 ldap_service->task = task;
1142 dns_host_name = talloc_asprintf(ldap_service, "%s.%s",
1143 lpcfg_netbios_name(task->lp_ctx),
1144 lpcfg_dnsdomain(task->lp_ctx));
1145 if (dns_host_name == NULL) goto failed;
1147 status = tstream_tls_params_server(ldap_service,
1149 lpcfg_tls_enabled(task->lp_ctx),
1150 lpcfg_tls_keyfile(ldap_service, task->lp_ctx),
1151 lpcfg_tls_certfile(ldap_service, task->lp_ctx),
1152 lpcfg_tls_cafile(ldap_service, task->lp_ctx),
1153 lpcfg_tls_crlfile(ldap_service, task->lp_ctx),
1154 lpcfg_tls_dhpfile(ldap_service, task->lp_ctx),
1155 lpcfg_tls_priority(task->lp_ctx),
1156 &ldap_service->tls_params);
1157 if (!NT_STATUS_IS_OK(status)) {
1158 DEBUG(0,("ldapsrv failed tstream_tls_params_server - %s\n",
1159 nt_errstr(status)));
1163 ldap_service->call_queue = tevent_queue_create(ldap_service, "ldapsrv_call_queue");
1164 if (ldap_service->call_queue == NULL) goto failed;
1166 if (lpcfg_interfaces(task->lp_ctx) && lpcfg_bind_interfaces_only(task->lp_ctx)) {
1167 struct interface *ifaces;
1171 load_interface_list(task, task->lp_ctx, &ifaces);
1172 num_interfaces = iface_list_count(ifaces);
1174 /* We have been given an interfaces line, and been
1175 told to only bind to those interfaces. Create a
1176 socket per interface and bind to only these.
1178 for(i = 0; i < num_interfaces; i++) {
1179 const char *address = iface_list_n_ip(ifaces, i);
1180 status = add_socket(task, task->lp_ctx, model_ops, address, ldap_service);
1181 if (!NT_STATUS_IS_OK(status)) goto failed;
1187 wcard = iface_list_wildcard(task);
1188 if (wcard == NULL) {
1189 DEBUG(0,("No wildcard addresses available\n"));
1192 for (i=0; wcard[i]; i++) {
1193 status = add_socket(task, task->lp_ctx, model_ops, wcard[i], ldap_service);
1194 if (NT_STATUS_IS_OK(status)) {
1199 if (num_binds == 0) {
1204 ldapi_path = lpcfg_private_path(ldap_service, task->lp_ctx, "ldapi");
1209 status = stream_setup_socket(task, task->event_ctx, task->lp_ctx,
1210 model_ops, &ldap_stream_nonpriv_ops,
1211 "unix", ldapi_path, NULL,
1212 lpcfg_socket_options(task->lp_ctx),
1214 talloc_free(ldapi_path);
1215 if (!NT_STATUS_IS_OK(status)) {
1216 DEBUG(0,("ldapsrv failed to bind to %s - %s\n",
1217 ldapi_path, nt_errstr(status)));
1220 #ifdef WITH_LDAPI_PRIV_SOCKET
1221 priv_dir = lpcfg_private_path(ldap_service, task->lp_ctx, "ldap_priv");
1222 if (priv_dir == NULL) {
1226 * Make sure the directory for the privileged ldapi socket exists, and
1227 * is of the correct permissions
1229 if (!directory_create_or_exist(priv_dir, 0750)) {
1230 task_server_terminate(task, "Cannot create ldap "
1231 "privileged ldapi directory", true);
1234 ldapi_path = talloc_asprintf(ldap_service, "%s/ldapi", priv_dir);
1235 talloc_free(priv_dir);
1236 if (ldapi_path == NULL) {
1240 status = stream_setup_socket(task, task->event_ctx, task->lp_ctx,
1241 model_ops, &ldap_stream_priv_ops,
1242 "unix", ldapi_path, NULL,
1243 lpcfg_socket_options(task->lp_ctx),
1245 talloc_free(ldapi_path);
1246 if (!NT_STATUS_IS_OK(status)) {
1247 DEBUG(0,("ldapsrv failed to bind to %s - %s\n",
1248 ldapi_path, nt_errstr(status)));
1253 /* register the server */
1254 irpc_add_name(task->msg_ctx, "ldap_server");
1258 task_server_terminate(task, "Failed to startup ldap server task", true);
1262 NTSTATUS server_service_ldap_init(TALLOC_CTX *ctx)
1264 return register_server_service(ctx, "ldap", ldapsrv_task_init);