?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
s4-dsdb: use the reveal control to hide/show extended DN components
[Samba/eduardoll.git] / source4 / dsdb / samdb / ldb_modules / extended_dn_out.c
blob987a3b3cfb4d83fa1fabd9c021fce33f1e52dc29
1 /*
2 ldb database library
3
4 Copyright (C) Simo Sorce 2005-2008
5 Copyright (C) Andrew Bartlett <abartlet@samba.org> 2007-2009
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>.
19 */
20
21 /*
22 * Name: ldb
23 *
24 * Component: ldb extended dn control module
25 *
26 * Description: this module builds a special dn for returned search
27 * results, and fixes some other aspects of the result (returned case issues)
28 * values.
29 *
30 * Authors: Simo Sorce
31 * Andrew Bartlett
32 */
33
34 #include "includes.h"
35 #include "ldb/include/ldb.h"
36 #include "ldb/include/ldb_errors.h"
37 #include "ldb/include/ldb_module.h"
38 #include "libcli/security/dom_sid.h"
39 #include "librpc/gen_ndr/ndr_misc.h"
40 #include "librpc/gen_ndr/ndr_security.h"
41 #include "librpc/ndr/libndr.h"
42 #include "dsdb/samdb/samdb.h"
43
44 struct extended_dn_out_private {
45 bool dereference;
46 bool normalise;
47 struct dsdb_openldap_dereference_control *dereference_control;
48 };
49
50 static bool is_attr_in_list(const char * const * attrs, const char *attr)
51 {
52 int i;
53
54 for (i = 0; attrs[i]; i++) {
55 if (ldb_attr_cmp(attrs[i], attr) == 0)
56 return true;
57 }
58
59 return false;
60 }
61
62 static char **copy_attrs(void *mem_ctx, const char * const * attrs)
63 {
64 char **nattrs;
65 int i, num;
66
67 for (num = 0; attrs[num]; num++);
68
69 nattrs = talloc_array(mem_ctx, char *, num + 1);
70 if (!nattrs) return NULL;
71
72 for(i = 0; i < num; i++) {
73 nattrs[i] = talloc_strdup(nattrs, attrs[i]);
74 if (!nattrs[i]) {
75 talloc_free(nattrs);
76 return NULL;
77 }
78 }
79 nattrs[i] = NULL;
80
81 return nattrs;
82 }
83
84 static bool add_attrs(void *mem_ctx, char ***attrs, const char *attr)
85 {
86 char **nattrs;
87 int num;
88
89 for (num = 0; (*attrs)[num]; num++);
90
91 nattrs = talloc_realloc(mem_ctx, *attrs, char *, num + 2);
92 if (!nattrs) return false;
93
94 *attrs = nattrs;
95
96 nattrs[num] = talloc_strdup(nattrs, attr);
97 if (!nattrs[num]) return false;
98
99 nattrs[num + 1] = NULL;
100
101 return true;
102 }
103
104 /* Fix the DN so that the relative attribute names are in upper case so that the DN:
105 cn=Adminstrator,cn=users,dc=samba,dc=example,dc=com becomes
106 CN=Adminstrator,CN=users,DC=samba,DC=example,DC=com
107 */
108
109
110 static int fix_dn(struct ldb_dn *dn)
111 {
112 int i, ret;
113 char *upper_rdn_attr;
114
115 for (i=0; i < ldb_dn_get_comp_num(dn); i++) {
116 /* We need the attribute name in upper case */
117 upper_rdn_attr = strupper_talloc(dn,
118 ldb_dn_get_component_name(dn, i));
119 if (!upper_rdn_attr) {
120 return LDB_ERR_OPERATIONS_ERROR;
121 }
122
123 /* And replace it with CN=foo (we need the attribute in upper case */
124 ret = ldb_dn_set_component(dn, i, upper_rdn_attr,
125 *ldb_dn_get_component_val(dn, i));
126 talloc_free(upper_rdn_attr);
127 if (ret != LDB_SUCCESS) {
128 return ret;
129 }
130 }
131 return LDB_SUCCESS;
132 }
133
134 /* Inject the extended DN components, so the DN cn=Adminstrator,cn=users,dc=samba,dc=example,dc=com becomes
135 <GUID=541203ae-f7d6-47ef-8390-bfcf019f9583>;<SID=S-1-5-21-4177067393-1453636373-93818737-500>;cn=Adminstrator,cn=users,dc=samba,dc=example,dc=com */
136
137 static int inject_extended_dn_out(struct ldb_reply *ares,
138 struct ldb_context *ldb,
139 int type,
140 bool remove_guid,
141 bool remove_sid)
142 {
143 int ret;
144 const DATA_BLOB *guid_blob;
145 const DATA_BLOB *sid_blob;
146
147 guid_blob = ldb_msg_find_ldb_val(ares->message, "objectGUID");
148 sid_blob = ldb_msg_find_ldb_val(ares->message, "objectSID");
149
150 if (!guid_blob) {
151 ldb_set_errstring(ldb, "Did not find objectGUID to inject into extended DN");
152 return LDB_ERR_OPERATIONS_ERROR;
153 }
154
155 ret = ldb_dn_set_extended_component(ares->message->dn, "GUID", guid_blob);
156 if (ret != LDB_SUCCESS) {
157 return ret;
158 }
159 if (sid_blob) {
160 ret = ldb_dn_set_extended_component(ares->message->dn, "SID", sid_blob);
161 if (ret != LDB_SUCCESS) {
162 return ret;
163 }
164 }
165
166 if (remove_guid) {
167 ldb_msg_remove_attr(ares->message, "objectGUID");
168 }
169
170 if (sid_blob && remove_sid) {
171 ldb_msg_remove_attr(ares->message, "objectSID");
172 }
173
174 return LDB_SUCCESS;
175 }
176
177 static int handle_dereference_openldap(struct ldb_dn *dn,
178 struct dsdb_openldap_dereference_result **dereference_attrs,
179 const char *attr, const DATA_BLOB *val)
180 {
181 const struct ldb_val *entryUUIDblob, *sid_blob;
182 struct ldb_message fake_msg; /* easier to use routines that expect an ldb_message */
183 int j;
184
185 fake_msg.num_elements = 0;
186
187 /* Look for this attribute in the returned control */
188 for (j = 0; dereference_attrs && dereference_attrs[j]; j++) {
189 struct ldb_val source_dn = data_blob_string_const(dereference_attrs[j]->dereferenced_dn);
190 if (ldb_attr_cmp(dereference_attrs[j]->source_attribute, attr) == 0
191 && data_blob_cmp(&source_dn, val) == 0) {
192 fake_msg.num_elements = dereference_attrs[j]->num_attributes;
193 fake_msg.elements = dereference_attrs[j]->attributes;
194 break;
195 }
196 }
197 if (!fake_msg.num_elements) {
198 return LDB_SUCCESS;
199 }
200 /* Look for an OpenLDAP entryUUID */
201
202 entryUUIDblob = ldb_msg_find_ldb_val(&fake_msg, "entryUUID");
203 if (entryUUIDblob) {
204 NTSTATUS status;
205 struct ldb_val guid_blob;
206 struct GUID guid;
207
208 status = GUID_from_data_blob(entryUUIDblob, &guid);
209
210 if (!NT_STATUS_IS_OK(status)) {
211 return LDB_ERR_INVALID_DN_SYNTAX;
212 }
213 status = GUID_to_ndr_blob(&guid, dn, &guid_blob);
214 if (!NT_STATUS_IS_OK(status)) {
215 return LDB_ERR_INVALID_DN_SYNTAX;
216 }
217
218 ldb_dn_set_extended_component(dn, "GUID", &guid_blob);
219 }
220
221 sid_blob = ldb_msg_find_ldb_val(&fake_msg, "objectSID");
222
223 /* Look for the objectSID */
224 if (sid_blob) {
225 ldb_dn_set_extended_component(dn, "SID", sid_blob);
226 }
227 return LDB_SUCCESS;
228 }
229
230 static int handle_dereference_fds(struct ldb_dn *dn,
231 struct dsdb_openldap_dereference_result **dereference_attrs,
232 const char *attr, const DATA_BLOB *val)
233 {
234 const struct ldb_val *nsUniqueIdBlob, *sidBlob;
235 struct ldb_message fake_msg; /* easier to use routines that expect an ldb_message */
236 int j;
237
238 fake_msg.num_elements = 0;
239
240 /* Look for this attribute in the returned control */
241 for (j = 0; dereference_attrs && dereference_attrs[j]; j++) {
242 struct ldb_val source_dn = data_blob_string_const(dereference_attrs[j]->dereferenced_dn);
243 if (ldb_attr_cmp(dereference_attrs[j]->source_attribute, attr) == 0
244 && data_blob_cmp(&source_dn, val) == 0) {
245 fake_msg.num_elements = dereference_attrs[j]->num_attributes;
246 fake_msg.elements = dereference_attrs[j]->attributes;
247 break;
248 }
249 }
250 if (!fake_msg.num_elements) {
251 return LDB_SUCCESS;
252 }
253
254 /* Look for the nsUniqueId */
255
256 nsUniqueIdBlob = ldb_msg_find_ldb_val(&fake_msg, "nsUniqueId");
257 if (nsUniqueIdBlob) {
258 NTSTATUS status;
259 struct ldb_val guid_blob;
260 struct GUID guid;
261
262 status = NS_GUID_from_string((char *)nsUniqueIdBlob->data, &guid);
263
264 if (!NT_STATUS_IS_OK(status)) {
265 return LDB_ERR_INVALID_DN_SYNTAX;
266 }
267 status = GUID_to_ndr_blob(&guid, dn, &guid_blob);
268 if (!NT_STATUS_IS_OK(status)) {
269 return LDB_ERR_INVALID_DN_SYNTAX;
270 }
271
272 ldb_dn_set_extended_component(dn, "GUID", &guid_blob);
273 }
274
275 /* Look for the objectSID */
276
277 sidBlob = ldb_msg_find_ldb_val(&fake_msg, "sambaSID");
278 if (sidBlob) {
279 enum ndr_err_code ndr_err;
280
281 struct ldb_val sid_blob;
282 struct dom_sid *sid;
283
284 sid = dom_sid_parse_length(NULL, sidBlob);
285
286 if (sid == NULL) {
287 return LDB_ERR_INVALID_DN_SYNTAX;
288 }
289
290 ndr_err = ndr_push_struct_blob(&sid_blob, NULL, NULL, sid,
291 (ndr_push_flags_fn_t)ndr_push_dom_sid);
292 talloc_free(sid);
293 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
294 return LDB_ERR_INVALID_DN_SYNTAX;
295 }
296
297 ldb_dn_set_extended_component(dn, "SID", &sid_blob);
298 }
299 return LDB_SUCCESS;
300 }
301
302 /* search */
303 struct extended_search_context {
304 struct ldb_module *module;
305 const struct dsdb_schema *schema;
306 struct ldb_request *req;
307 bool inject;
308 bool remove_guid;
309 bool remove_sid;
310 int extended_type;
311 };
312
313 static int extended_callback(struct ldb_request *req, struct ldb_reply *ares,
314 int (*handle_dereference)(struct ldb_dn *dn,
315 struct dsdb_openldap_dereference_result **dereference_attrs,
316 const char *attr, const DATA_BLOB *val))
317 {
318 struct extended_search_context *ac;
319 struct ldb_control *control;
320 struct dsdb_openldap_dereference_result_control *dereference_control = NULL;
321 int ret, i, j;
322 struct ldb_message *msg = ares->message;
323 struct extended_dn_out_private *p;
324 struct ldb_context *ldb;
325 bool have_reveal_control, checked_reveal_control=false;
326
327 ac = talloc_get_type(req->context, struct extended_search_context);
328 p = talloc_get_type(ldb_module_get_private(ac->module), struct extended_dn_out_private);
329 ldb = ldb_module_get_ctx(ac->module);
330 if (!ares) {
331 return ldb_module_done(ac->req, NULL, NULL,
332 LDB_ERR_OPERATIONS_ERROR);
333 }
334 if (ares->error != LDB_SUCCESS) {
335 return ldb_module_done(ac->req, ares->controls,
336 ares->response, ares->error);
337 }
338
339 switch (ares->type) {
340 case LDB_REPLY_REFERRAL:
341 return ldb_module_send_referral(ac->req, ares->referral);
342
343 case LDB_REPLY_DONE:
344 return ldb_module_done(ac->req, ares->controls,
345 ares->response, LDB_SUCCESS);
346 case LDB_REPLY_ENTRY:
347 break;
348 }
349
350 if (p && p->normalise) {
351 ret = fix_dn(ares->message->dn);
352 if (ret != LDB_SUCCESS) {
353 return ldb_module_done(ac->req, NULL, NULL, ret);
354 }
355 }
356
357 if (ac->inject) {
358 /* for each record returned post-process to add any derived
359 attributes that have been asked for */
360 ret = inject_extended_dn_out(ares, ldb,
361 ac->extended_type, ac->remove_guid,
362 ac->remove_sid);
363 if (ret != LDB_SUCCESS) {
364 return ldb_module_done(ac->req, NULL, NULL, ret);
365 }
366 }
367
368 if ((p && p->normalise) || ac->inject) {
369 const struct ldb_val *val = ldb_msg_find_ldb_val(ares->message, "distinguishedName");
370 if (val) {
371 ldb_msg_remove_attr(ares->message, "distinguishedName");
372 if (ac->inject) {
373 ret = ldb_msg_add_steal_string(ares->message, "distinguishedName",
374 ldb_dn_get_extended_linearized(ares->message, ares->message->dn, ac->extended_type));
375 } else {
376 ret = ldb_msg_add_linearized_dn(ares->message,
377 "distinguishedName",
378 ares->message->dn);
379 }
380 if (ret != LDB_SUCCESS) {
381 ldb_oom(ldb);
382 return LDB_ERR_OPERATIONS_ERROR;
383 }
384 }
385 }
386
387 if (p && p->dereference) {
388 control = ldb_reply_get_control(ares, DSDB_OPENLDAP_DEREFERENCE_CONTROL);
389
390 if (control && control->data) {
391 dereference_control = talloc_get_type(control->data, struct dsdb_openldap_dereference_result_control);
392 }
393 }
394
395 /* Walk the retruned elements (but only if we have a schema to interpret the list with) */
396 for (i = 0; ac->schema && i < msg->num_elements; i++) {
397 bool make_extended_dn;
398 const struct dsdb_attribute *attribute;
399 attribute = dsdb_attribute_by_lDAPDisplayName(ac->schema, msg->elements[i].name);
400 if (!attribute) {
401 continue;
402 }
403
404 if (p->normalise) {
405 /* If we are also in 'normalise' mode, then
406 * fix the attribute names to be in the
407 * correct case */
408 msg->elements[i].name = talloc_strdup(msg->elements, attribute->lDAPDisplayName);
409 if (!msg->elements[i].name) {
410 ldb_oom(ldb);
411 return ldb_module_done(ac->req, NULL, NULL, LDB_ERR_OPERATIONS_ERROR);
412 }
413 }
414
415 /* distinguishedName has been dealt with above */
416 if (ldb_attr_cmp(msg->elements[i].name, "distinguishedName") == 0) {
417 continue;
418 }
419
420 /* Look to see if this attributeSyntax is a DN */
421 if (dsdb_dn_oid_to_format(attribute->syntax->ldap_oid) == DSDB_INVALID_DN) {
422 continue;
423 }
424
425 make_extended_dn = ac->inject;
426
427 /* Always show plain DN in case of Object(OR-Name) syntax */
428 if (make_extended_dn) {
429 make_extended_dn = (strcmp(attribute->syntax->ldap_oid, DSDB_SYNTAX_OR_NAME) != 0);
430 }
431
432 for (j = 0; j < msg->elements[i].num_values; j++) {
433 const char *dn_str;
434 struct ldb_dn *dn;
435 struct dsdb_dn *dsdb_dn = NULL;
436 struct ldb_val *plain_dn = &msg->elements[i].values[j];
437 dsdb_dn = dsdb_dn_parse(msg, ldb, plain_dn, attribute->syntax->ldap_oid);
438
439 if (!dsdb_dn || !ldb_dn_validate(dsdb_dn->dn)) {
440 ldb_asprintf_errstring(ldb,
441 "could not parse %.*s in %s on %s as a %s DN",
442 (int)plain_dn->length, plain_dn->data,
443 msg->elements[i].name, ldb_dn_get_linearized(msg->dn),
444 attribute->syntax->ldap_oid);
445 talloc_free(dsdb_dn);
446 return ldb_module_done(ac->req, NULL, NULL, LDB_ERR_INVALID_DN_SYNTAX);
447 }
448 dn = dsdb_dn->dn;
449
450 if (!checked_reveal_control) {
451 have_reveal_control =
452 ldb_request_get_control(req, LDB_CONTROL_REVEAL_INTERNALS) != NULL;
453 checked_reveal_control = true;
454 }
455
456 /* this is a fast method for detecting deleted
457 linked attributes. It relies on the
458 linearization of extended DNs sorting by name,
459 and "DELETED" being the first name */
460 if (plain_dn->length >= 12 &&
461 strncmp((const char *)plain_dn->data, "<DELETED=1>;", 12) == 0) {
462 if (!have_reveal_control) {
463 /* it's a deleted linked
464 * attribute, and we don't
465 * have the reveal control */
466 memmove(&msg->elements[i].values[j],
467 &msg->elements[i].values[j+1],
468 (msg->elements[i].num_values-(j+1))*sizeof(struct ldb_val));
469 msg->elements[i].num_values--;
470 j--;
471 continue;
472 }
473 }
474
475 /* don't let users see the internal extended
476 GUID components */
477 if (!have_reveal_control) {
478 const char *accept[] = { "GUID", "SID", "WKGUID", NULL };
479 ldb_dn_extended_filter(dn, accept);
480 }
481
482 if (p->normalise) {
483 ret = fix_dn(dn);
484 if (ret != LDB_SUCCESS) {
485 talloc_free(dsdb_dn);
486 return ldb_module_done(ac->req, NULL, NULL, ret);
487 }
488 }
489
490 /* If we are running in dereference mode (such
491 * as against OpenLDAP) then the DN in the msg
492 * above does not contain the extended values,
493 * and we need to look in the dereference
494 * result */
495
496 /* Look for this value in the attribute */
497
498 if (dereference_control) {
499 ret = handle_dereference(dn,
500 dereference_control->attributes,
501 msg->elements[i].name,
502 &msg->elements[i].values[j]);
503 if (ret != LDB_SUCCESS) {
504 talloc_free(dsdb_dn);
505 return ldb_module_done(ac->req, NULL, NULL, ret);
506 }
507 }
508
509 if (make_extended_dn) {
510 dn_str = dsdb_dn_get_extended_linearized(msg->elements[i].values,
511 dsdb_dn, ac->extended_type);
512 } else {
513 dn_str = dsdb_dn_get_linearized(msg->elements[i].values,
514 dsdb_dn);
515 }
516
517 if (!dn_str) {
518 ldb_oom(ldb);
519 talloc_free(dsdb_dn);
520 return ldb_module_done(ac->req, NULL, NULL, LDB_ERR_OPERATIONS_ERROR);
521 }
522 msg->elements[i].values[j] = data_blob_string_const(dn_str);
523 talloc_free(dsdb_dn);
524 }
525 if (msg->elements[i].num_values == 0) {
526 /* we've deleted all of the values from this
527 * element - remove the element */
528 memmove(&msg->elements[i],
529 &msg->elements[i+1],
530 (msg->num_elements-(i+1))*sizeof(struct ldb_message_element));
531 msg->num_elements--;
532 i--;
533 }
534 }
535 return ldb_module_send_entry(ac->req, msg, ares->controls);
536 }
537
538 static int extended_callback_ldb(struct ldb_request *req, struct ldb_reply *ares)
539 {
540 return extended_callback(req, ares, NULL);
541 }
542
543 static int extended_callback_openldap(struct ldb_request *req, struct ldb_reply *ares)
544 {
545 return extended_callback(req, ares, handle_dereference_openldap);
546 }
547
548 static int extended_callback_fds(struct ldb_request *req, struct ldb_reply *ares)
549 {
550 return extended_callback(req, ares, handle_dereference_fds);
551 }
552
553 static int extended_dn_out_search(struct ldb_module *module, struct ldb_request *req,
554 int (*callback)(struct ldb_request *req, struct ldb_reply *ares))
555 {
556 struct ldb_control *control;
557 struct ldb_control *storage_format_control;
558 struct ldb_extended_dn_control *extended_ctrl = NULL;
559 struct ldb_control **saved_controls;
560 struct extended_search_context *ac;
561 struct ldb_request *down_req;
562 char **new_attrs;
563 const char * const *const_attrs;
564 struct ldb_context *ldb = ldb_module_get_ctx(module);
565 int ret;
566
567 struct extended_dn_out_private *p = talloc_get_type(ldb_module_get_private(module), struct extended_dn_out_private);
568
569 /* check if there's an extended dn control */
570 control = ldb_request_get_control(req, LDB_CONTROL_EXTENDED_DN_OID);
571 if (control && control->data) {
572 extended_ctrl = talloc_get_type(control->data, struct ldb_extended_dn_control);
573 if (!extended_ctrl) {
574 return LDB_ERR_PROTOCOL_ERROR;
575 }
576 }
577
578 /* Look to see if, as we are in 'store DN+GUID+SID' mode, the
579 * client is after the storage format (to fill in linked
580 * attributes) */
581 storage_format_control = ldb_request_get_control(req, DSDB_CONTROL_DN_STORAGE_FORMAT_OID);
582 if (!control && storage_format_control && storage_format_control->data) {
583 extended_ctrl = talloc_get_type(storage_format_control->data, struct ldb_extended_dn_control);
584 if (!extended_ctrl) {
585 ldb_set_errstring(ldb, "extended_dn_out: extended_ctrl was of the wrong data type");
586 return LDB_ERR_PROTOCOL_ERROR;
587 }
588 }
589
590 ac = talloc_zero(req, struct extended_search_context);
591 if (ac == NULL) {
592 ldb_oom(ldb);
593 return LDB_ERR_OPERATIONS_ERROR;
594 }
595
596 ac->module = module;
597 ac->schema = dsdb_get_schema(ldb);
598 ac->req = req;
599 ac->inject = false;
600 ac->remove_guid = false;
601 ac->remove_sid = false;
602
603 const_attrs = req->op.search.attrs;
604
605 /* We only need to do special processing if we were asked for
606 * the extended DN, or we are 'store DN+GUID+SID'
607 * (!dereference) mode. (This is the normal mode for LDB on
608 * tdb). */
609 if (control || (storage_format_control && p && !p->dereference)) {
610 ac->inject = true;
611 if (extended_ctrl) {
612 ac->extended_type = extended_ctrl->type;
613 } else {
614 ac->extended_type = 0;
615 }
616
617 /* check if attrs only is specified, in that case check wether we need to modify them */
618 if (req->op.search.attrs && !is_attr_in_list(req->op.search.attrs, "*")) {
619 if (! is_attr_in_list(req->op.search.attrs, "objectGUID")) {
620 ac->remove_guid = true;
621 }
622 if (! is_attr_in_list(req->op.search.attrs, "objectSID")) {
623 ac->remove_sid = true;
624 }
625 if (ac->remove_guid || ac->remove_sid) {
626 new_attrs = copy_attrs(ac, req->op.search.attrs);
627 if (new_attrs == NULL) {
628 ldb_oom(ldb);
629 return LDB_ERR_OPERATIONS_ERROR;
630 }
631
632 if (ac->remove_guid) {
633 if (!add_attrs(ac, &new_attrs, "objectGUID"))
634 return LDB_ERR_OPERATIONS_ERROR;
635 }
636 if (ac->remove_sid) {
637 if (!add_attrs(ac, &new_attrs, "objectSID"))
638 return LDB_ERR_OPERATIONS_ERROR;
639 }
640 const_attrs = (const char * const *)new_attrs;
641 }
642 }
643 }
644
645 ret = ldb_build_search_req_ex(&down_req,
646 ldb, ac,
647 req->op.search.base,
648 req->op.search.scope,
649 req->op.search.tree,
650 const_attrs,
651 req->controls,
652 ac, callback,
653 req);
654 if (ret != LDB_SUCCESS) {
655 return ret;
656 }
657
658 /* Remove extended DN and storage format controls */
659
660 if (control) {
661 /* save it locally and remove it from the list */
662 /* we do not need to replace them later as we
663 * are keeping the original req intact */
664 if (!save_controls(control, down_req, &saved_controls)) {
665 return LDB_ERR_OPERATIONS_ERROR;
666 }
667 }
668
669 if (storage_format_control) {
670 /* save it locally and remove it from the list */
671 /* we do not need to replace them later as we
672 * are keeping the original req intact */
673 if (!save_controls(storage_format_control, down_req, &saved_controls)) {
674 return LDB_ERR_OPERATIONS_ERROR;
675 }
676 }
677
678 /* Add in dereference control, if we were asked to, we are
679 * using the 'dereference' mode (such as with an OpenLDAP
680 * backend) and have the control prepared */
681 if (control && p && p->dereference && p->dereference_control) {
682 ret = ldb_request_add_control(down_req,
683 DSDB_OPENLDAP_DEREFERENCE_CONTROL,
684 false, p->dereference_control);
685 if (ret != LDB_SUCCESS) {
686 return ret;
687 }
688 }
689
690 /* perform the search */
691 return ldb_next_request(module, down_req);
692 }
693
694 static int extended_dn_out_ldb_search(struct ldb_module *module, struct ldb_request *req)
695 {
696 return extended_dn_out_search(module, req, extended_callback_ldb);
697 }
698
699 static int extended_dn_out_openldap_search(struct ldb_module *module, struct ldb_request *req)
700 {
701 return extended_dn_out_search(module, req, extended_callback_openldap);
702 }
703
704 static int extended_dn_out_fds_search(struct ldb_module *module, struct ldb_request *req)
705 {
706 return extended_dn_out_search(module, req, extended_callback_fds);
707 }
708
709 static int extended_dn_out_ldb_init(struct ldb_module *module)
710 {
711 int ret;
712
713 struct extended_dn_out_private *p = talloc(module, struct extended_dn_out_private);
714 struct dsdb_extended_dn_store_format *dn_format;
715
716 ldb_module_set_private(module, p);
717
718 if (!p) {
719 ldb_oom(ldb_module_get_ctx(module));
720 return LDB_ERR_OPERATIONS_ERROR;
721 }
722
723 dn_format = talloc(p, struct dsdb_extended_dn_store_format);
724 if (!dn_format) {
725 talloc_free(p);
726 ldb_oom(ldb_module_get_ctx(module));
727 return LDB_ERR_OPERATIONS_ERROR;
728 }
729
730 dn_format->store_extended_dn_in_ldb = true;
731 ret = ldb_set_opaque(ldb_module_get_ctx(module), DSDB_EXTENDED_DN_STORE_FORMAT_OPAQUE_NAME, dn_format);
732 if (ret != LDB_SUCCESS) {
733 talloc_free(p);
734 return ret;
735 }
736
737 p->dereference = false;
738 p->normalise = false;
739
740 ret = ldb_mod_register_control(module, LDB_CONTROL_EXTENDED_DN_OID);
741 if (ret != LDB_SUCCESS) {
742 ldb_debug(ldb_module_get_ctx(module), LDB_DEBUG_ERROR,
743 "extended_dn_out: Unable to register control with rootdse!\n");
744 return LDB_ERR_OPERATIONS_ERROR;
745 }
746
747 return ldb_next_init(module);
748 }
749
750 static int extended_dn_out_dereference_init(struct ldb_module *module, const char *attrs[])
751 {
752 int ret, i = 0;
753 struct extended_dn_out_private *p = talloc_zero(module, struct extended_dn_out_private);
754 struct dsdb_extended_dn_store_format *dn_format;
755 struct dsdb_openldap_dereference_control *dereference_control;
756 struct dsdb_attribute *cur;
757 struct ldb_context *ldb = ldb_module_get_ctx(module);
758 struct dsdb_schema *schema;
759
760 ldb_module_set_private(module, p);
761
762 if (!p) {
763 ldb_oom(ldb);
764 return LDB_ERR_OPERATIONS_ERROR;
765 }
766
767 dn_format = talloc(p, struct dsdb_extended_dn_store_format);
768 if (!dn_format) {
769 talloc_free(p);
770 ldb_oom(ldb_module_get_ctx(module));
771 return LDB_ERR_OPERATIONS_ERROR;
772 }
773
774 dn_format->store_extended_dn_in_ldb = false;
775
776 ret = ldb_set_opaque(ldb_module_get_ctx(module), DSDB_EXTENDED_DN_STORE_FORMAT_OPAQUE_NAME, dn_format);
777 if (ret != LDB_SUCCESS) {
778 talloc_free(p);
779 return ret;
780 }
781
782 p->dereference = true;
783
784 /* At the moment, servers that need dereference also need the
785 * DN and attribute names to be normalised */
786 p->normalise = true;
787
788 ret = ldb_mod_register_control(module, LDB_CONTROL_EXTENDED_DN_OID);
789 if (ret != LDB_SUCCESS) {
790 ldb_debug(ldb, LDB_DEBUG_ERROR,
791 "extended_dn_out: Unable to register control with rootdse!\n");
792 return LDB_ERR_OPERATIONS_ERROR;
793 }
794
795 ret = ldb_next_init(module);
796
797 if (ret != LDB_SUCCESS) {
798 return ret;
799 }
800
801 schema = dsdb_get_schema(ldb);
802 if (!schema) {
803 /* No schema on this DB (yet) */
804 return LDB_SUCCESS;
805 }
806
807 p->dereference_control = dereference_control
808 = talloc_zero(p, struct dsdb_openldap_dereference_control);
809
810 if (!p->dereference_control) {
811 ldb_oom(ldb);
812 return LDB_ERR_OPERATIONS_ERROR;
813 }
814
815 for (cur = schema->attributes; cur; cur = cur->next) {
816 if (dsdb_dn_oid_to_format(cur->syntax->ldap_oid) == DSDB_INVALID_DN) {
817 continue;
818 }
819 dereference_control->dereference
820 = talloc_realloc(p, dereference_control->dereference,
821 struct dsdb_openldap_dereference *, i + 2);
822 if (!dereference_control) {
823 ldb_oom(ldb);
824 return LDB_ERR_OPERATIONS_ERROR;
825 }
826 dereference_control->dereference[i] = talloc(dereference_control->dereference,
827 struct dsdb_openldap_dereference);
828 if (!dereference_control->dereference[i]) {
829 ldb_oom(ldb);
830 return LDB_ERR_OPERATIONS_ERROR;
831 }
832 dereference_control->dereference[i]->source_attribute = cur->lDAPDisplayName;
833 dereference_control->dereference[i]->dereference_attribute = attrs;
834 i++;
835 dereference_control->dereference[i] = NULL;
836 }
837 return LDB_SUCCESS;
838 }
839
840 static int extended_dn_out_openldap_init(struct ldb_module *module)
841 {
842 static const char *attrs[] = {
843 "entryUUID",
844 "objectSID",
845 NULL
846 };
847
848 return extended_dn_out_dereference_init(module, attrs);
849 }
850
851 static int extended_dn_out_fds_init(struct ldb_module *module)
852 {
853 static const char *attrs[] = {
854 "nsUniqueId",
855 "objectSID",
856 NULL
857 };
858
859 return extended_dn_out_dereference_init(module, attrs);
860 }
861
862 _PUBLIC_ const struct ldb_module_ops ldb_extended_dn_out_ldb_module_ops = {
863 .name = "extended_dn_out_ldb",
864 .search = extended_dn_out_ldb_search,
865 .init_context = extended_dn_out_ldb_init,
866 };
867
868 _PUBLIC_ const struct ldb_module_ops ldb_extended_dn_out_openldap_module_ops = {
869 .name = "extended_dn_out_openldap",
870 .search = extended_dn_out_openldap_search,
871 .init_context = extended_dn_out_openldap_init,
872 };
873
874 _PUBLIC_ const struct ldb_module_ops ldb_extended_dn_out_fds_module_ops = {
875 .name = "extended_dn_out_fds",
876 .search = extended_dn_out_fds_search,
877 .init_context = extended_dn_out_fds_init,
878 };
Eduardo's samba4 branches