2 Unix SMB/CIFS implementation.
4 Copyright (C) Stefan Metzmacher 2004
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>.
21 #include "ldap_server/ldap_server.h"
22 #include "lib/util/dlinklist.h"
23 #include "libcli/ldap/ldap.h"
24 #include "auth/credentials/credentials.h"
25 #include "auth/gensec/gensec.h"
26 #include "param/param.h"
27 #include "smbd/service_stream.h"
28 #include "dsdb/samdb/samdb.h"
29 #include "lib/ldb/include/ldb_errors.h"
30 #include "lib/ldb_wrap.h"
32 #define VALID_DN_SYNTAX(dn,i) do {\
34 return NT_STATUS_NO_MEMORY;\
35 } else if ( ! ldb_dn_validate(dn)) {\
36 result = LDAP_INVALID_DN_SYNTAX;\
37 errstr = "Invalid DN format";\
39 } else if (ldb_dn_get_comp_num(dn) < (i)) {\
40 result = LDAP_INVALID_DN_SYNTAX;\
41 errstr = "Invalid DN (" #i " components needed for '" #dn "')";\
46 static int map_ldb_error(struct ldb_context
*ldb
, int err
, const char **errstring
)
48 *errstring
= ldb_errstring(ldb
);
55 connect to the sam database
57 NTSTATUS
ldapsrv_backend_Init(struct ldapsrv_connection
*conn
)
59 conn
->ldb
= ldb_wrap_connect(conn
,
60 conn
->connection
->event
.ctx
,
62 lp_sam_url(conn
->lp_ctx
),
64 samdb_credentials(conn
, conn
->connection
->event
.ctx
, conn
->lp_ctx
),
65 conn
->global_catalog
? LDB_FLG_RDONLY
: 0, NULL
);
66 if (conn
->ldb
== NULL
) {
67 return NT_STATUS_INTERNAL_DB_CORRUPTION
;
70 if (conn
->server_credentials
) {
71 char **sasl_mechs
= NULL
;
72 struct gensec_security_ops
**backends
= gensec_security_all();
73 struct gensec_security_ops
**ops
74 = gensec_use_kerberos_mechs(conn
, backends
, conn
->server_credentials
);
76 for (i
= 0; ops
&& ops
[i
]; i
++) {
77 if (ops
[i
]->sasl_name
&& ops
[i
]->server_start
) {
78 char *sasl_name
= talloc_strdup(conn
, ops
[i
]->sasl_name
);
81 return NT_STATUS_NO_MEMORY
;
83 sasl_mechs
= talloc_realloc(conn
, sasl_mechs
, char *, j
+ 2);
85 return NT_STATUS_NO_MEMORY
;
87 sasl_mechs
[j
] = sasl_name
;
88 talloc_steal(sasl_mechs
, sasl_name
);
89 sasl_mechs
[j
+1] = NULL
;
94 ldb_set_opaque(conn
->ldb
, "supportedSASLMechanims", sasl_mechs
);
100 struct ldapsrv_reply
*ldapsrv_init_reply(struct ldapsrv_call
*call
, uint8_t type
)
102 struct ldapsrv_reply
*reply
;
104 reply
= talloc(call
, struct ldapsrv_reply
);
108 reply
->msg
= talloc(reply
, struct ldap_message
);
109 if (reply
->msg
== NULL
) {
114 reply
->msg
->messageid
= call
->request
->messageid
;
115 reply
->msg
->type
= type
;
116 reply
->msg
->controls
= NULL
;
121 void ldapsrv_queue_reply(struct ldapsrv_call
*call
, struct ldapsrv_reply
*reply
)
123 DLIST_ADD_END(call
->replies
, reply
, struct ldapsrv_reply
*);
126 static NTSTATUS
ldapsrv_unwilling(struct ldapsrv_call
*call
, int error
)
128 struct ldapsrv_reply
*reply
;
129 struct ldap_ExtendedResponse
*r
;
131 DEBUG(10,("Unwilling type[%d] id[%d]\n", call
->request
->type
, call
->request
->messageid
));
133 reply
= ldapsrv_init_reply(call
, LDAP_TAG_ExtendedResponse
);
135 return NT_STATUS_NO_MEMORY
;
138 r
= &reply
->msg
->r
.ExtendedResponse
;
139 r
->response
.resultcode
= error
;
140 r
->response
.dn
= NULL
;
141 r
->response
.errormessage
= NULL
;
142 r
->response
.referral
= NULL
;
146 ldapsrv_queue_reply(call
, reply
);
150 static NTSTATUS
ldapsrv_SearchRequest(struct ldapsrv_call
*call
)
152 struct ldap_SearchRequest
*req
= &call
->request
->r
.SearchRequest
;
153 struct ldap_SearchResEntry
*ent
;
154 struct ldap_Result
*done
;
155 struct ldapsrv_reply
*ent_r
, *done_r
;
157 struct ldb_context
*samdb
= talloc_get_type(call
->conn
->ldb
, struct ldb_context
);
158 struct ldb_dn
*basedn
;
159 struct ldb_result
*res
= NULL
;
160 struct ldb_request
*lreq
;
161 enum ldb_scope scope
= LDB_SCOPE_DEFAULT
;
162 const char **attrs
= NULL
;
163 const char *scope_str
, *errstr
= NULL
;
164 int success_limit
= 1;
169 DEBUG(10, ("SearchRequest"));
170 DEBUGADD(10, (" basedn: %s", req
->basedn
));
171 DEBUGADD(10, (" filter: %s\n", ldb_filter_from_tree(call
, req
->tree
)));
173 local_ctx
= talloc_new(call
);
174 NT_STATUS_HAVE_NO_MEMORY(local_ctx
);
176 basedn
= ldb_dn_new(local_ctx
, samdb
, req
->basedn
);
177 VALID_DN_SYNTAX(basedn
, 0);
179 DEBUG(10, ("SearchRequest: basedn: [%s]\n", req
->basedn
));
180 DEBUG(10, ("SearchRequest: filter: [%s]\n", ldb_filter_from_tree(call
, req
->tree
)));
182 switch (req
->scope
) {
183 case LDAP_SEARCH_SCOPE_BASE
:
185 scope
= LDB_SCOPE_BASE
;
188 case LDAP_SEARCH_SCOPE_SINGLE
:
190 scope
= LDB_SCOPE_ONELEVEL
;
193 case LDAP_SEARCH_SCOPE_SUB
:
195 scope
= LDB_SCOPE_SUBTREE
;
199 result
= LDAP_PROTOCOL_ERROR
;
200 errstr
= "Invalid scope";
203 DEBUG(10,("SearchRequest: scope: [%s]\n", scope_str
));
205 if (req
->num_attributes
>= 1) {
206 attrs
= talloc_array(local_ctx
, const char *, req
->num_attributes
+1);
207 NT_STATUS_HAVE_NO_MEMORY(attrs
);
209 for (i
=0; i
< req
->num_attributes
; i
++) {
210 DEBUG(10,("SearchRequest: attrs: [%s]\n",req
->attributes
[i
]));
211 attrs
[i
] = req
->attributes
[i
];
216 DEBUG(5,("ldb_request %s dn=%s filter=%s\n",
217 scope_str
, req
->basedn
, ldb_filter_from_tree(call
, req
->tree
)));
219 lreq
= talloc(local_ctx
, struct ldb_request
);
220 NT_STATUS_HAVE_NO_MEMORY(lreq
);
222 lreq
->operation
= LDB_SEARCH
;
223 lreq
->op
.search
.base
= basedn
;
224 lreq
->op
.search
.scope
= scope
;
225 lreq
->op
.search
.tree
= req
->tree
;
226 lreq
->op
.search
.attrs
= attrs
;
228 lreq
->controls
= call
->request
->controls
;
230 if (call
->conn
->global_catalog
) {
231 struct ldb_control
*search_control
= ldb_request_get_control(lreq
, LDB_CONTROL_SEARCH_OPTIONS_OID
);
233 struct ldb_search_options_control
*search_options
= NULL
;
234 if (search_control
) {
235 search_options
= talloc_get_type(search_control
->data
, struct ldb_search_options_control
);
236 search_options
->search_options
|= LDB_SEARCH_OPTION_PHANTOM_ROOT
;
238 search_options
= talloc(lreq
, struct ldb_search_options_control
);
239 NT_STATUS_HAVE_NO_MEMORY(search_options
);
240 search_options
->search_options
= LDB_SEARCH_OPTION_PHANTOM_ROOT
;
241 ldb_request_add_control(lreq
, LDB_CONTROL_SEARCH_OPTIONS_OID
, false, search_options
);
245 res
= talloc_zero(lreq
, struct ldb_result
);
246 NT_STATUS_HAVE_NO_MEMORY(res
);
249 lreq
->callback
= ldb_search_default_callback
;
251 /* Copy the timeout from the incoming call */
252 ldb_set_timeout(samdb
, lreq
, req
->timelimit
);
254 ldb_ret
= ldb_request(samdb
, lreq
);
256 if (ldb_ret
!= LDB_SUCCESS
) {
260 ldb_ret
= ldb_wait(lreq
->handle
, LDB_WAIT_ALL
);
262 if (ldb_ret
== LDB_SUCCESS
) {
263 for (i
= 0; i
< res
->count
; i
++) {
264 ent_r
= ldapsrv_init_reply(call
, LDAP_TAG_SearchResultEntry
);
265 NT_STATUS_HAVE_NO_MEMORY(ent_r
);
267 /* Better to have the whole message kept here,
268 * than to find someone further up didn't put
269 * a value in the right spot in the talloc tree */
270 talloc_steal(ent_r
, res
->msgs
[i
]);
272 ent
= &ent_r
->msg
->r
.SearchResultEntry
;
273 ent
->dn
= ldb_dn_alloc_linearized(ent_r
, res
->msgs
[i
]->dn
);
274 ent
->num_attributes
= 0;
275 ent
->attributes
= NULL
;
276 if (res
->msgs
[i
]->num_elements
== 0) {
279 ent
->num_attributes
= res
->msgs
[i
]->num_elements
;
280 ent
->attributes
= talloc_array(ent_r
, struct ldb_message_element
, ent
->num_attributes
);
281 NT_STATUS_HAVE_NO_MEMORY(ent
->attributes
);
282 for (j
=0; j
< ent
->num_attributes
; j
++) {
283 ent
->attributes
[j
].name
= talloc_steal(ent
->attributes
, res
->msgs
[i
]->elements
[j
].name
);
284 ent
->attributes
[j
].num_values
= 0;
285 ent
->attributes
[j
].values
= NULL
;
286 if (req
->attributesonly
&& (res
->msgs
[i
]->elements
[j
].num_values
== 0)) {
289 ent
->attributes
[j
].num_values
= res
->msgs
[i
]->elements
[j
].num_values
;
290 ent
->attributes
[j
].values
= res
->msgs
[i
]->elements
[j
].values
;
291 talloc_steal(ent
->attributes
, res
->msgs
[i
]->elements
[j
].values
);
294 ldapsrv_queue_reply(call
, ent_r
);
299 done_r
= ldapsrv_init_reply(call
, LDAP_TAG_SearchResultDone
);
300 NT_STATUS_HAVE_NO_MEMORY(done_r
);
302 done
= &done_r
->msg
->r
.SearchResultDone
;
304 done
->referral
= NULL
;
307 } else if (ldb_ret
== LDB_SUCCESS
) {
308 if (res
->count
>= success_limit
) {
309 DEBUG(10,("SearchRequest: results: [%d]\n", res
->count
));
310 result
= LDAP_SUCCESS
;
314 done_r
->msg
->controls
= res
->controls
;
315 talloc_steal(done_r
, res
->controls
);
318 DEBUG(10,("SearchRequest: error\n"));
319 result
= map_ldb_error(samdb
, ldb_ret
, &errstr
);
322 done
->resultcode
= result
;
323 done
->errormessage
= (errstr
?talloc_strdup(done_r
, errstr
):NULL
);
325 talloc_free(local_ctx
);
327 ldapsrv_queue_reply(call
, done_r
);
331 static NTSTATUS
ldapsrv_ModifyRequest(struct ldapsrv_call
*call
)
333 struct ldap_ModifyRequest
*req
= &call
->request
->r
.ModifyRequest
;
334 struct ldap_Result
*modify_result
;
335 struct ldapsrv_reply
*modify_reply
;
337 struct ldb_context
*samdb
= call
->conn
->ldb
;
338 struct ldb_message
*msg
= NULL
;
340 const char *errstr
= NULL
;
341 int result
= LDAP_SUCCESS
;
345 DEBUG(10, ("ModifyRequest"));
346 DEBUGADD(10, (" dn: %s", req
->dn
));
348 local_ctx
= talloc_named(call
, 0, "ModifyRequest local memory context");
349 NT_STATUS_HAVE_NO_MEMORY(local_ctx
);
351 dn
= ldb_dn_new(local_ctx
, samdb
, req
->dn
);
352 VALID_DN_SYNTAX(dn
, 0);
354 DEBUG(10, ("ModifyRequest: dn: [%s]\n", req
->dn
));
356 msg
= talloc(local_ctx
, struct ldb_message
);
357 NT_STATUS_HAVE_NO_MEMORY(msg
);
360 msg
->num_elements
= 0;
361 msg
->elements
= NULL
;
363 if (req
->num_mods
> 0) {
364 msg
->num_elements
= req
->num_mods
;
365 msg
->elements
= talloc_array(msg
, struct ldb_message_element
, req
->num_mods
);
366 NT_STATUS_HAVE_NO_MEMORY(msg
->elements
);
368 for (i
=0; i
< msg
->num_elements
; i
++) {
369 msg
->elements
[i
].name
= discard_const_p(char, req
->mods
[i
].attrib
.name
);
370 msg
->elements
[i
].num_values
= 0;
371 msg
->elements
[i
].values
= NULL
;
373 switch (req
->mods
[i
].type
) {
375 result
= LDAP_PROTOCOL_ERROR
;
376 errstr
= "Invalid LDAP_MODIFY_* type";
378 case LDAP_MODIFY_ADD
:
379 msg
->elements
[i
].flags
= LDB_FLAG_MOD_ADD
;
381 case LDAP_MODIFY_DELETE
:
382 msg
->elements
[i
].flags
= LDB_FLAG_MOD_DELETE
;
384 case LDAP_MODIFY_REPLACE
:
385 msg
->elements
[i
].flags
= LDB_FLAG_MOD_REPLACE
;
389 msg
->elements
[i
].num_values
= req
->mods
[i
].attrib
.num_values
;
390 if (msg
->elements
[i
].num_values
> 0) {
391 msg
->elements
[i
].values
= talloc_array(msg
->elements
, struct ldb_val
,
392 msg
->elements
[i
].num_values
);
393 NT_STATUS_HAVE_NO_MEMORY(msg
->elements
[i
].values
);
395 for (j
=0; j
< msg
->elements
[i
].num_values
; j
++) {
396 if (!(req
->mods
[i
].attrib
.values
[j
].length
> 0)) {
398 errstr
= "Empty attribute values are not allowed";
401 msg
->elements
[i
].values
[j
].length
= req
->mods
[i
].attrib
.values
[j
].length
;
402 msg
->elements
[i
].values
[j
].data
= req
->mods
[i
].attrib
.values
[j
].data
;
408 errstr
= "No mods are not allowed";
413 modify_reply
= ldapsrv_init_reply(call
, LDAP_TAG_ModifyResponse
);
414 NT_STATUS_HAVE_NO_MEMORY(modify_reply
);
416 if (result
== LDAP_SUCCESS
) {
417 ldb_ret
= ldb_modify(samdb
, msg
);
418 result
= map_ldb_error(samdb
, ldb_ret
, &errstr
);
421 modify_result
= &modify_reply
->msg
->r
.AddResponse
;
422 modify_result
->dn
= NULL
;
423 modify_result
->resultcode
= result
;
424 modify_result
->errormessage
= (errstr
?talloc_strdup(modify_reply
, errstr
):NULL
);
425 modify_result
->referral
= NULL
;
427 talloc_free(local_ctx
);
429 ldapsrv_queue_reply(call
, modify_reply
);
434 static NTSTATUS
ldapsrv_AddRequest(struct ldapsrv_call
*call
)
436 struct ldap_AddRequest
*req
= &call
->request
->r
.AddRequest
;
437 struct ldap_Result
*add_result
;
438 struct ldapsrv_reply
*add_reply
;
440 struct ldb_context
*samdb
= call
->conn
->ldb
;
441 struct ldb_message
*msg
= NULL
;
443 const char *errstr
= NULL
;
444 int result
= LDAP_SUCCESS
;
448 DEBUG(10, ("AddRequest"));
449 DEBUGADD(10, (" dn: %s", req
->dn
));
451 local_ctx
= talloc_named(call
, 0, "AddRequest local memory context");
452 NT_STATUS_HAVE_NO_MEMORY(local_ctx
);
454 dn
= ldb_dn_new(local_ctx
, samdb
, req
->dn
);
455 VALID_DN_SYNTAX(dn
,1);
457 DEBUG(10, ("AddRequest: dn: [%s]\n", req
->dn
));
459 msg
= talloc(local_ctx
, struct ldb_message
);
460 NT_STATUS_HAVE_NO_MEMORY(msg
);
463 msg
->num_elements
= 0;
464 msg
->elements
= NULL
;
466 if (req
->num_attributes
> 0) {
467 msg
->num_elements
= req
->num_attributes
;
468 msg
->elements
= talloc_array(msg
, struct ldb_message_element
, msg
->num_elements
);
469 NT_STATUS_HAVE_NO_MEMORY(msg
->elements
);
471 for (i
=0; i
< msg
->num_elements
; i
++) {
472 msg
->elements
[i
].name
= discard_const_p(char, req
->attributes
[i
].name
);
473 msg
->elements
[i
].flags
= 0;
474 msg
->elements
[i
].num_values
= 0;
475 msg
->elements
[i
].values
= NULL
;
477 if (req
->attributes
[i
].num_values
> 0) {
478 msg
->elements
[i
].num_values
= req
->attributes
[i
].num_values
;
479 msg
->elements
[i
].values
= talloc_array(msg
->elements
, struct ldb_val
,
480 msg
->elements
[i
].num_values
);
481 NT_STATUS_HAVE_NO_MEMORY(msg
->elements
[i
].values
);
483 for (j
=0; j
< msg
->elements
[i
].num_values
; j
++) {
484 if (!(req
->attributes
[i
].values
[j
].length
> 0)) {
486 errstr
= "Empty attribute values are not allowed";
489 msg
->elements
[i
].values
[j
].length
= req
->attributes
[i
].values
[j
].length
;
490 msg
->elements
[i
].values
[j
].data
= req
->attributes
[i
].values
[j
].data
;
494 errstr
= "No attribute values are not allowed";
500 errstr
= "No attributes are not allowed";
505 add_reply
= ldapsrv_init_reply(call
, LDAP_TAG_AddResponse
);
506 NT_STATUS_HAVE_NO_MEMORY(add_reply
);
508 if (result
== LDAP_SUCCESS
) {
509 ldb_ret
= ldb_add(samdb
, msg
);
510 result
= map_ldb_error(samdb
, ldb_ret
, &errstr
);
513 add_result
= &add_reply
->msg
->r
.AddResponse
;
514 add_result
->dn
= NULL
;
515 add_result
->resultcode
= result
;
516 add_result
->errormessage
= (errstr
?talloc_strdup(add_reply
,errstr
):NULL
);
517 add_result
->referral
= NULL
;
519 talloc_free(local_ctx
);
521 ldapsrv_queue_reply(call
, add_reply
);
526 static NTSTATUS
ldapsrv_DelRequest(struct ldapsrv_call
*call
)
528 struct ldap_DelRequest
*req
= &call
->request
->r
.DelRequest
;
529 struct ldap_Result
*del_result
;
530 struct ldapsrv_reply
*del_reply
;
532 struct ldb_context
*samdb
= call
->conn
->ldb
;
534 const char *errstr
= NULL
;
535 int result
= LDAP_SUCCESS
;
538 DEBUG(10, ("DelRequest"));
539 DEBUGADD(10, (" dn: %s", req
->dn
));
541 local_ctx
= talloc_named(call
, 0, "DelRequest local memory context");
542 NT_STATUS_HAVE_NO_MEMORY(local_ctx
);
544 dn
= ldb_dn_new(local_ctx
, samdb
, req
->dn
);
545 VALID_DN_SYNTAX(dn
,1);
547 DEBUG(10, ("DelRequest: dn: [%s]\n", req
->dn
));
550 del_reply
= ldapsrv_init_reply(call
, LDAP_TAG_DelResponse
);
551 NT_STATUS_HAVE_NO_MEMORY(del_reply
);
553 if (result
== LDAP_SUCCESS
) {
554 ldb_ret
= ldb_delete(samdb
, dn
);
555 result
= map_ldb_error(samdb
, ldb_ret
, &errstr
);
558 del_result
= &del_reply
->msg
->r
.DelResponse
;
559 del_result
->dn
= NULL
;
560 del_result
->resultcode
= result
;
561 del_result
->errormessage
= (errstr
?talloc_strdup(del_reply
,errstr
):NULL
);
562 del_result
->referral
= NULL
;
564 talloc_free(local_ctx
);
566 ldapsrv_queue_reply(call
, del_reply
);
570 static NTSTATUS
ldapsrv_ModifyDNRequest(struct ldapsrv_call
*call
)
572 struct ldap_ModifyDNRequest
*req
= &call
->request
->r
.ModifyDNRequest
;
573 struct ldap_Result
*modifydn
;
574 struct ldapsrv_reply
*modifydn_r
;
576 struct ldb_context
*samdb
= call
->conn
->ldb
;
577 struct ldb_dn
*olddn
, *newdn
=NULL
, *newrdn
;
578 struct ldb_dn
*parentdn
= NULL
;
579 const char *errstr
= NULL
;
580 int result
= LDAP_SUCCESS
;
583 DEBUG(10, ("ModifyDNRequrest"));
584 DEBUGADD(10, (" dn: %s", req
->dn
));
585 DEBUGADD(10, (" newrdn: %s", req
->newrdn
));
587 local_ctx
= talloc_named(call
, 0, "ModifyDNRequest local memory context");
588 NT_STATUS_HAVE_NO_MEMORY(local_ctx
);
590 olddn
= ldb_dn_new(local_ctx
, samdb
, req
->dn
);
591 VALID_DN_SYNTAX(olddn
, 2);
593 newrdn
= ldb_dn_new(local_ctx
, samdb
, req
->newrdn
);
594 VALID_DN_SYNTAX(newrdn
, 1);
596 DEBUG(10, ("ModifyDNRequest: olddn: [%s]\n", req
->dn
));
597 DEBUG(10, ("ModifyDNRequest: newrdn: [%s]\n", req
->newrdn
));
599 /* we can't handle the rename if we should not remove the old dn */
600 if (!req
->deleteolddn
) {
601 result
= LDAP_UNWILLING_TO_PERFORM
;
602 errstr
= "Old RDN must be deleted";
606 if (req
->newsuperior
) {
607 parentdn
= ldb_dn_new(local_ctx
, samdb
, req
->newsuperior
);
608 VALID_DN_SYNTAX(parentdn
, 0);
609 DEBUG(10, ("ModifyDNRequest: newsuperior: [%s]\n", req
->newsuperior
));
611 if (ldb_dn_get_comp_num(parentdn
) < 1) {
612 result
= LDAP_AFFECTS_MULTIPLE_DSAS
;
613 errstr
= "Error new Superior DN invalid";
619 parentdn
= ldb_dn_get_parent(local_ctx
, olddn
);
620 NT_STATUS_HAVE_NO_MEMORY(parentdn
);
623 if ( ! ldb_dn_add_child_fmt(parentdn
,
625 ldb_dn_get_rdn_name(newrdn
),
626 (char *)ldb_dn_get_rdn_val(newrdn
)->data
)) {
633 modifydn_r
= ldapsrv_init_reply(call
, LDAP_TAG_ModifyDNResponse
);
634 NT_STATUS_HAVE_NO_MEMORY(modifydn_r
);
636 if (result
== LDAP_SUCCESS
) {
637 ldb_ret
= ldb_rename(samdb
, olddn
, newdn
);
638 result
= map_ldb_error(samdb
, ldb_ret
, &errstr
);
641 modifydn
= &modifydn_r
->msg
->r
.ModifyDNResponse
;
643 modifydn
->resultcode
= result
;
644 modifydn
->errormessage
= (errstr
?talloc_strdup(modifydn_r
,errstr
):NULL
);
645 modifydn
->referral
= NULL
;
647 talloc_free(local_ctx
);
649 ldapsrv_queue_reply(call
, modifydn_r
);
653 static NTSTATUS
ldapsrv_CompareRequest(struct ldapsrv_call
*call
)
655 struct ldap_CompareRequest
*req
= &call
->request
->r
.CompareRequest
;
656 struct ldap_Result
*compare
;
657 struct ldapsrv_reply
*compare_r
;
659 struct ldb_context
*samdb
= call
->conn
->ldb
;
660 struct ldb_result
*res
= NULL
;
662 const char *attrs
[1];
663 const char *errstr
= NULL
;
664 const char *filter
= NULL
;
665 int result
= LDAP_SUCCESS
;
668 DEBUG(10, ("CompareRequest"));
669 DEBUGADD(10, (" dn: %s", req
->dn
));
671 local_ctx
= talloc_named(call
, 0, "CompareRequest local_memory_context");
672 NT_STATUS_HAVE_NO_MEMORY(local_ctx
);
674 dn
= ldb_dn_new(local_ctx
, samdb
, req
->dn
);
675 VALID_DN_SYNTAX(dn
, 1);
677 DEBUG(10, ("CompareRequest: dn: [%s]\n", req
->dn
));
678 filter
= talloc_asprintf(local_ctx
, "(%s=%*s)", req
->attribute
,
679 (int)req
->value
.length
, req
->value
.data
);
680 NT_STATUS_HAVE_NO_MEMORY(filter
);
682 DEBUGADD(10, ("CompareRequest: attribute: [%s]\n", filter
));
687 compare_r
= ldapsrv_init_reply(call
, LDAP_TAG_CompareResponse
);
688 NT_STATUS_HAVE_NO_MEMORY(compare_r
);
690 if (result
== LDAP_SUCCESS
) {
691 ldb_ret
= ldb_search(samdb
, local_ctx
, &res
,
692 dn
, LDB_SCOPE_BASE
, attrs
, "%s", filter
);
693 if (ldb_ret
!= LDB_SUCCESS
) {
694 result
= map_ldb_error(samdb
, ldb_ret
, &errstr
);
695 DEBUG(10,("CompareRequest: error: %s\n", errstr
));
696 } else if (res
->count
== 0) {
697 DEBUG(10,("CompareRequest: doesn't matched\n"));
698 result
= LDAP_COMPARE_FALSE
;
700 } else if (res
->count
== 1) {
701 DEBUG(10,("CompareRequest: matched\n"));
702 result
= LDAP_COMPARE_TRUE
;
704 } else if (res
->count
> 1) {
706 errstr
= "too many objects match";
707 DEBUG(10,("CompareRequest: %d results: %s\n", res
->count
, errstr
));
711 compare
= &compare_r
->msg
->r
.CompareResponse
;
713 compare
->resultcode
= result
;
714 compare
->errormessage
= (errstr
?talloc_strdup(compare_r
,errstr
):NULL
);
715 compare
->referral
= NULL
;
717 talloc_free(local_ctx
);
719 ldapsrv_queue_reply(call
, compare_r
);
723 static NTSTATUS
ldapsrv_AbandonRequest(struct ldapsrv_call
*call
)
725 /* struct ldap_AbandonRequest *req = &call->request.r.AbandonRequest;*/
726 DEBUG(10, ("AbandonRequest\n"));
730 NTSTATUS
ldapsrv_do_call(struct ldapsrv_call
*call
)
733 struct ldap_message
*msg
= call
->request
;
734 /* Check for undecoded critical extensions */
735 for (i
=0; msg
->controls
&& msg
->controls
[i
]; i
++) {
736 if (!msg
->controls_decoded
[i
] &&
737 msg
->controls
[i
]->critical
) {
738 DEBUG(3, ("ldapsrv_do_call: Critical extension %s is not known to this server\n",
739 msg
->controls
[i
]->oid
));
740 return ldapsrv_unwilling(call
, LDAP_UNAVAILABLE_CRITICAL_EXTENSION
);
744 switch(call
->request
->type
) {
745 case LDAP_TAG_BindRequest
:
746 return ldapsrv_BindRequest(call
);
747 case LDAP_TAG_UnbindRequest
:
748 return ldapsrv_UnbindRequest(call
);
749 case LDAP_TAG_SearchRequest
:
750 return ldapsrv_SearchRequest(call
);
751 case LDAP_TAG_ModifyRequest
:
752 return ldapsrv_ModifyRequest(call
);
753 case LDAP_TAG_AddRequest
:
754 return ldapsrv_AddRequest(call
);
755 case LDAP_TAG_DelRequest
:
756 return ldapsrv_DelRequest(call
);
757 case LDAP_TAG_ModifyDNRequest
:
758 return ldapsrv_ModifyDNRequest(call
);
759 case LDAP_TAG_CompareRequest
:
760 return ldapsrv_CompareRequest(call
);
761 case LDAP_TAG_AbandonRequest
:
762 return ldapsrv_AbandonRequest(call
);
763 case LDAP_TAG_ExtendedRequest
:
764 return ldapsrv_ExtendedRequest(call
);
766 return ldapsrv_unwilling(call
, 2);