?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
s3:libsmb: remove unused 'inbuf' variable
[Samba/gebeck_regimport.git] / lib / ldb-samba / ldif_handlers.c
blobaf66623efaf4c098f0a4819169382d9d94010a4b
1 /*
2 ldb database library - ldif handlers for Samba
3
4 Copyright (C) Andrew Tridgell 2005
5 Copyright (C) Andrew Bartlett 2006-2009
6 Copyright (C) Matthias Dieter Wallnöfer 2009
7 ** NOTE! The following LGPL license applies to the ldb
8 ** library. This does NOT imply that all of Samba is released
9 ** under the LGPL
10
11 This library is free software; you can redistribute it and/or
12 modify it under the terms of the GNU Lesser General Public
13 License as published by the Free Software Foundation; either
14 version 3 of the License, or (at your option) any later version.
15
16 This library is distributed in the hope that it will be useful,
17 but WITHOUT ANY WARRANTY; without even the implied warranty of
18 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 Lesser General Public License for more details.
20
21 You should have received a copy of the GNU Lesser General Public
22 License along with this library; if not, see <http://www.gnu.org/licenses/>.
23 */
24
25 #include "includes.h"
26 #include <ldb.h>
27 #include <ldb_module.h>
28 #include "ldb_handlers.h"
29 #include "dsdb/samdb/samdb.h"
30 #include "librpc/gen_ndr/ndr_security.h"
31 #include "librpc/gen_ndr/ndr_misc.h"
32 #include "librpc/gen_ndr/ndr_drsblobs.h"
33 #include "librpc/gen_ndr/ndr_dnsp.h"
34 #include "librpc/ndr/libndr.h"
35 #include "libcli/security/security.h"
36 #include "param/param.h"
37 #include "../lib/util/asn1.h"
38
39 /*
40 use ndr_print_* to convert a NDR formatted blob to a ldif formatted blob
41
42 If mask_errors is true, then function succeeds but out data
43 is set to "<Unable to decode binary data>" message
44
45 \return 0 on success; -1 on error
46 */
47 static int ldif_write_NDR(struct ldb_context *ldb, void *mem_ctx,
48 const struct ldb_val *in, struct ldb_val *out,
49 size_t struct_size,
50 ndr_pull_flags_fn_t pull_fn,
51 ndr_print_fn_t print_fn,
52 bool mask_errors)
53 {
54 uint8_t *p;
55 enum ndr_err_code err;
56 if (!(ldb_get_flags(ldb) & LDB_FLG_SHOW_BINARY)) {
57 return ldb_handler_copy(ldb, mem_ctx, in, out);
58 }
59 p = talloc_size(mem_ctx, struct_size);
60 err = ndr_pull_struct_blob(in, mem_ctx,
61 p, pull_fn);
62 if (err != NDR_ERR_SUCCESS) {
63 /* fail in not in mask_error mode */
64 if (!mask_errors) {
65 return -1;
66 }
67 talloc_free(p);
68 out->data = (uint8_t *)talloc_strdup(mem_ctx, "<Unable to decode binary data>");
69 out->length = strlen((const char *)out->data);
70 return 0;
71 }
72 out->data = (uint8_t *)ndr_print_struct_string(mem_ctx, print_fn, "NDR", p);
73 talloc_free(p);
74 if (out->data == NULL) {
75 return ldb_handler_copy(ldb, mem_ctx, in, out);
76 }
77 out->length = strlen((char *)out->data);
78 return 0;
79 }
80
81 /*
82 convert a ldif formatted objectSid to a NDR formatted blob
83 */
84 static int ldif_read_objectSid(struct ldb_context *ldb, void *mem_ctx,
85 const struct ldb_val *in, struct ldb_val *out)
86 {
87 enum ndr_err_code ndr_err;
88 struct dom_sid *sid;
89 sid = dom_sid_parse_length(mem_ctx, in);
90 if (sid == NULL) {
91 return -1;
92 }
93 ndr_err = ndr_push_struct_blob(out, mem_ctx, sid,
94 (ndr_push_flags_fn_t)ndr_push_dom_sid);
95 talloc_free(sid);
96 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
97 return -1;
98 }
99 return 0;
100 }
101
102 /*
103 convert a NDR formatted blob to a ldif formatted objectSid
104 */
105 int ldif_write_objectSid(struct ldb_context *ldb, void *mem_ctx,
106 const struct ldb_val *in, struct ldb_val *out)
107 {
108 struct dom_sid *sid;
109 enum ndr_err_code ndr_err;
110
111 sid = talloc(mem_ctx, struct dom_sid);
112 if (sid == NULL) {
113 return -1;
114 }
115 ndr_err = ndr_pull_struct_blob_all(in, sid, sid,
116 (ndr_pull_flags_fn_t)ndr_pull_dom_sid);
117 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
118 talloc_free(sid);
119 return -1;
120 }
121 *out = data_blob_string_const(dom_sid_string(mem_ctx, sid));
122 talloc_free(sid);
123 if (out->data == NULL) {
124 return -1;
125 }
126 return 0;
127 }
128
129 bool ldif_comparision_objectSid_isString(const struct ldb_val *v)
130 {
131 if (v->length < 3) {
132 return false;
133 }
134
135 if (strncmp("S-", (const char *)v->data, 2) != 0) return false;
136
137 return true;
138 }
139
140 /*
141 compare two objectSids
142 */
143 static int ldif_comparison_objectSid(struct ldb_context *ldb, void *mem_ctx,
144 const struct ldb_val *v1, const struct ldb_val *v2)
145 {
146 if (ldif_comparision_objectSid_isString(v1) && ldif_comparision_objectSid_isString(v2)) {
147 return ldb_comparison_binary(ldb, mem_ctx, v1, v2);
148 } else if (ldif_comparision_objectSid_isString(v1)
149 && !ldif_comparision_objectSid_isString(v2)) {
150 struct ldb_val v;
151 int ret;
152 if (ldif_read_objectSid(ldb, mem_ctx, v1, &v) != 0) {
153 /* Perhaps not a string after all */
154 return ldb_comparison_binary(ldb, mem_ctx, v1, v2);
155 }
156 ret = ldb_comparison_binary(ldb, mem_ctx, &v, v2);
157 talloc_free(v.data);
158 return ret;
159 } else if (!ldif_comparision_objectSid_isString(v1)
160 && ldif_comparision_objectSid_isString(v2)) {
161 struct ldb_val v;
162 int ret;
163 if (ldif_read_objectSid(ldb, mem_ctx, v2, &v) != 0) {
164 /* Perhaps not a string after all */
165 return ldb_comparison_binary(ldb, mem_ctx, v1, v2);
166 }
167 ret = ldb_comparison_binary(ldb, mem_ctx, v1, &v);
168 talloc_free(v.data);
169 return ret;
170 }
171 return ldb_comparison_binary(ldb, mem_ctx, v1, v2);
172 }
173
174 /*
175 canonicalise a objectSid
176 */
177 static int ldif_canonicalise_objectSid(struct ldb_context *ldb, void *mem_ctx,
178 const struct ldb_val *in, struct ldb_val *out)
179 {
180 if (ldif_comparision_objectSid_isString(in)) {
181 if (ldif_read_objectSid(ldb, mem_ctx, in, out) != 0) {
182 /* Perhaps not a string after all */
183 return ldb_handler_copy(ldb, mem_ctx, in, out);
184 }
185 return 0;
186 }
187 return ldb_handler_copy(ldb, mem_ctx, in, out);
188 }
189
190 static int extended_dn_read_SID(struct ldb_context *ldb, void *mem_ctx,
191 const struct ldb_val *in, struct ldb_val *out)
192 {
193 struct dom_sid sid;
194 enum ndr_err_code ndr_err;
195 if (ldif_comparision_objectSid_isString(in)) {
196 if (ldif_read_objectSid(ldb, mem_ctx, in, out) == 0) {
197 return 0;
198 }
199 }
200
201 /* Perhaps not a string after all */
202 *out = data_blob_talloc(mem_ctx, NULL, in->length/2+1);
203
204 if (!out->data) {
205 return -1;
206 }
207
208 (*out).length = strhex_to_str((char *)out->data, out->length,
209 (const char *)in->data, in->length);
210
211 /* Check it looks like a SID */
212 ndr_err = ndr_pull_struct_blob_all(out, mem_ctx, &sid,
213 (ndr_pull_flags_fn_t)ndr_pull_dom_sid);
214 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
215 return -1;
216 }
217 return 0;
218 }
219
220 /*
221 convert a ldif formatted objectGUID to a NDR formatted blob
222 */
223 static int ldif_read_objectGUID(struct ldb_context *ldb, void *mem_ctx,
224 const struct ldb_val *in, struct ldb_val *out)
225 {
226 struct GUID guid;
227 NTSTATUS status;
228
229 status = GUID_from_data_blob(in, &guid);
230 if (!NT_STATUS_IS_OK(status)) {
231 return -1;
232 }
233
234 status = GUID_to_ndr_blob(&guid, mem_ctx, out);
235 if (!NT_STATUS_IS_OK(status)) {
236 return -1;
237 }
238 return 0;
239 }
240
241 /*
242 convert a NDR formatted blob to a ldif formatted objectGUID
243 */
244 static int ldif_write_objectGUID(struct ldb_context *ldb, void *mem_ctx,
245 const struct ldb_val *in, struct ldb_val *out)
246 {
247 struct GUID guid;
248 NTSTATUS status;
249
250 status = GUID_from_ndr_blob(in, &guid);
251 if (!NT_STATUS_IS_OK(status)) {
252 return -1;
253 }
254 out->data = (uint8_t *)GUID_string(mem_ctx, &guid);
255 if (out->data == NULL) {
256 return -1;
257 }
258 out->length = strlen((const char *)out->data);
259 return 0;
260 }
261
262 static bool ldif_comparision_objectGUID_isString(const struct ldb_val *v)
263 {
264 if (v->length != 36 && v->length != 38) return false;
265
266 /* Might be a GUID string, can't be a binary GUID (fixed 16 bytes) */
267 return true;
268 }
269
270 static int extended_dn_read_GUID(struct ldb_context *ldb, void *mem_ctx,
271 const struct ldb_val *in, struct ldb_val *out)
272 {
273 struct GUID guid;
274 NTSTATUS status;
275
276 if (in->length == 36 && ldif_read_objectGUID(ldb, mem_ctx, in, out) == 0) {
277 return 0;
278 }
279
280 /* Try as 'hex' form */
281 if (in->length != 32) {
282 return -1;
283 }
284
285 *out = data_blob_talloc(mem_ctx, NULL, in->length/2+1);
286
287 if (!out->data) {
288 return -1;
289 }
290
291 (*out).length = strhex_to_str((char *)out->data, out->length,
292 (const char *)in->data, in->length);
293
294 /* Check it looks like a GUID */
295 status = GUID_from_ndr_blob(out, &guid);
296 if (!NT_STATUS_IS_OK(status)) {
297 data_blob_free(out);
298 return -1;
299 }
300 return 0;
301 }
302
303 /*
304 compare two objectGUIDs
305 */
306 static int ldif_comparison_objectGUID(struct ldb_context *ldb, void *mem_ctx,
307 const struct ldb_val *v1, const struct ldb_val *v2)
308 {
309 if (ldif_comparision_objectGUID_isString(v1) && ldif_comparision_objectGUID_isString(v2)) {
310 return ldb_comparison_binary(ldb, mem_ctx, v1, v2);
311 } else if (ldif_comparision_objectGUID_isString(v1)
312 && !ldif_comparision_objectGUID_isString(v2)) {
313 struct ldb_val v;
314 int ret;
315 if (ldif_read_objectGUID(ldb, mem_ctx, v1, &v) != 0) {
316 /* Perhaps it wasn't a valid string after all */
317 return ldb_comparison_binary(ldb, mem_ctx, v1, v2);
318 }
319 ret = ldb_comparison_binary(ldb, mem_ctx, &v, v2);
320 talloc_free(v.data);
321 return ret;
322 } else if (!ldif_comparision_objectGUID_isString(v1)
323 && ldif_comparision_objectGUID_isString(v2)) {
324 struct ldb_val v;
325 int ret;
326 if (ldif_read_objectGUID(ldb, mem_ctx, v2, &v) != 0) {
327 /* Perhaps it wasn't a valid string after all */
328 return ldb_comparison_binary(ldb, mem_ctx, v1, v2);
329 }
330 ret = ldb_comparison_binary(ldb, mem_ctx, v1, &v);
331 talloc_free(v.data);
332 return ret;
333 }
334 return ldb_comparison_binary(ldb, mem_ctx, v1, v2);
335 }
336
337 /*
338 canonicalise a objectGUID
339 */
340 static int ldif_canonicalise_objectGUID(struct ldb_context *ldb, void *mem_ctx,
341 const struct ldb_val *in, struct ldb_val *out)
342 {
343 if (ldif_comparision_objectGUID_isString(in)) {
344 if (ldif_read_objectGUID(ldb, mem_ctx, in, out) != 0) {
345 /* Perhaps it wasn't a valid string after all */
346 return ldb_handler_copy(ldb, mem_ctx, in, out);
347 }
348 return 0;
349 }
350 return ldb_handler_copy(ldb, mem_ctx, in, out);
351 }
352
353
354 /*
355 convert a ldif (SDDL) formatted ntSecurityDescriptor to a NDR formatted blob
356 */
357 static int ldif_read_ntSecurityDescriptor(struct ldb_context *ldb, void *mem_ctx,
358 const struct ldb_val *in, struct ldb_val *out)
359 {
360 struct security_descriptor *sd;
361 enum ndr_err_code ndr_err;
362
363 sd = talloc(mem_ctx, struct security_descriptor);
364 if (sd == NULL) {
365 return -1;
366 }
367
368 ndr_err = ndr_pull_struct_blob(in, sd, sd,
369 (ndr_pull_flags_fn_t)ndr_pull_security_descriptor);
370 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
371 /* If this does not parse, then it is probably SDDL, and we should try it that way */
372
373 const struct dom_sid *sid = samdb_domain_sid(ldb);
374 talloc_free(sd);
375 sd = sddl_decode(mem_ctx, (const char *)in->data, sid);
376 if (sd == NULL) {
377 return -1;
378 }
379 }
380
381 ndr_err = ndr_push_struct_blob(out, mem_ctx, sd,
382 (ndr_push_flags_fn_t)ndr_push_security_descriptor);
383 talloc_free(sd);
384 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
385 return -1;
386 }
387
388 return 0;
389 }
390
391 /*
392 convert a NDR formatted blob to a ldif formatted ntSecurityDescriptor (SDDL format)
393 */
394 static int ldif_write_ntSecurityDescriptor(struct ldb_context *ldb, void *mem_ctx,
395 const struct ldb_val *in, struct ldb_val *out)
396 {
397 struct security_descriptor *sd;
398 enum ndr_err_code ndr_err;
399
400 if (ldb_get_flags(ldb) & LDB_FLG_SHOW_BINARY) {
401 return ldif_write_NDR(ldb, mem_ctx, in, out,
402 sizeof(struct security_descriptor),
403 (ndr_pull_flags_fn_t)ndr_pull_security_descriptor,
404 (ndr_print_fn_t)ndr_print_security_descriptor,
405 true);
406
407 }
408
409 sd = talloc(mem_ctx, struct security_descriptor);
410 if (sd == NULL) {
411 return -1;
412 }
413 /* We can't use ndr_pull_struct_blob_all because this contains relative pointers */
414 ndr_err = ndr_pull_struct_blob(in, sd, sd,
415 (ndr_pull_flags_fn_t)ndr_pull_security_descriptor);
416 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
417 talloc_free(sd);
418 return -1;
419 }
420 out->data = (uint8_t *)sddl_encode(mem_ctx, sd, samdb_domain_sid_cache_only(ldb));
421 talloc_free(sd);
422 if (out->data == NULL) {
423 return -1;
424 }
425 out->length = strlen((const char *)out->data);
426 return 0;
427 }
428
429 /*
430 convert a string formatted SDDL to a ldif formatted ntSecurityDescriptor (SDDL format)
431 */
432 static int ldif_write_sddlSecurityDescriptor(struct ldb_context *ldb, void *mem_ctx,
433 const struct ldb_val *in, struct ldb_val *out)
434 {
435 if (ldb_get_flags(ldb) & LDB_FLG_SHOW_BINARY) {
436 struct security_descriptor *sd;
437 const struct dom_sid *sid = samdb_domain_sid(ldb);
438
439 sd = sddl_decode(mem_ctx, (const char *)in->data, sid);
440 out->data = (uint8_t *)ndr_print_struct_string(mem_ctx,
441 (ndr_print_fn_t)ndr_print_security_descriptor,
442 "SDDL", sd);
443 out->length = strlen((const char *)out->data);
444 talloc_free(sd);
445 return 0;
446 }
447
448 return ldb_handler_copy(ldb, mem_ctx, in, out);
449 }
450
451 /*
452 canonicalise an objectCategory. We use the long form as the canonical form:
453 'person' becomes cn=Person,cn=Schema,cn=Configuration,<basedn>
454
455 Also any short name of an objectClass that points to a different
456 class (such as user) has the canonical form of the class it's
457 defaultObjectCategory points to (eg
458 cn=Person,cn=Schema,cn=Configuration,<basedn>)
459 */
460
461 static int ldif_canonicalise_objectCategory(struct ldb_context *ldb, void *mem_ctx,
462 const struct ldb_val *in, struct ldb_val *out)
463 {
464 struct ldb_dn *dn1 = NULL;
465 const struct dsdb_schema *schema = dsdb_get_schema(ldb, NULL);
466 const struct dsdb_class *sclass;
467 TALLOC_CTX *tmp_ctx = talloc_new(mem_ctx);
468 if (!tmp_ctx) {
469 return LDB_ERR_OPERATIONS_ERROR;
470 }
471
472 if (!schema) {
473 talloc_free(tmp_ctx);
474 *out = data_blob_talloc(mem_ctx, in->data, in->length);
475 if (in->data && !out->data) {
476 return LDB_ERR_OPERATIONS_ERROR;
477 }
478 return LDB_SUCCESS;
479 }
480 dn1 = ldb_dn_from_ldb_val(tmp_ctx, ldb, in);
481 if ( ! ldb_dn_validate(dn1)) {
482 const char *lDAPDisplayName = talloc_strndup(tmp_ctx, (char *)in->data, in->length);
483 sclass = dsdb_class_by_lDAPDisplayName(schema, lDAPDisplayName);
484 if (sclass) {
485 struct ldb_dn *dn = ldb_dn_new(mem_ctx, ldb,
486 sclass->defaultObjectCategory);
487 *out = data_blob_string_const(ldb_dn_alloc_casefold(mem_ctx, dn));
488 talloc_free(tmp_ctx);
489
490 if (!out->data) {
491 return LDB_ERR_OPERATIONS_ERROR;
492 }
493 return LDB_SUCCESS;
494 } else {
495 *out = data_blob_talloc(mem_ctx, in->data, in->length);
496 talloc_free(tmp_ctx);
497
498 if (in->data && !out->data) {
499 return LDB_ERR_OPERATIONS_ERROR;
500 }
501 return LDB_SUCCESS;
502 }
503 }
504 *out = data_blob_string_const(ldb_dn_alloc_casefold(mem_ctx, dn1));
505 talloc_free(tmp_ctx);
506
507 if (!out->data) {
508 return LDB_ERR_OPERATIONS_ERROR;
509 }
510 return LDB_SUCCESS;
511 }
512
513 static int ldif_comparison_objectCategory(struct ldb_context *ldb, void *mem_ctx,
514 const struct ldb_val *v1,
515 const struct ldb_val *v2)
516 {
517 return ldb_any_comparison(ldb, mem_ctx, ldif_canonicalise_objectCategory,
518 v1, v2);
519 }
520
521 /*
522 convert a NDR formatted blob to a ldif formatted schemaInfo
523 */
524 static int ldif_write_schemaInfo(struct ldb_context *ldb, void *mem_ctx,
525 const struct ldb_val *in, struct ldb_val *out)
526 {
527 return ldif_write_NDR(ldb, mem_ctx, in, out,
528 sizeof(struct repsFromToBlob),
529 (ndr_pull_flags_fn_t)ndr_pull_schemaInfoBlob,
530 (ndr_print_fn_t)ndr_print_schemaInfoBlob,
531 true);
532 }
533
534 /*
535 convert a ldif formatted prefixMap to a NDR formatted blob
536 */
537 static int ldif_read_prefixMap(struct ldb_context *ldb, void *mem_ctx,
538 const struct ldb_val *in, struct ldb_val *out)
539 {
540 struct prefixMapBlob *blob;
541 enum ndr_err_code ndr_err;
542 char *string, *line, *p, *oid;
543 DATA_BLOB oid_blob;
544
545 TALLOC_CTX *tmp_ctx = talloc_new(mem_ctx);
546
547 if (tmp_ctx == NULL) {
548 return -1;
549 }
550
551 blob = talloc_zero(tmp_ctx, struct prefixMapBlob);
552 if (blob == NULL) {
553 talloc_free(tmp_ctx);
554 return -1;
555 }
556
557 /* use the switch value to detect if this is in the binary
558 * format
559 */
560 if (in->length >= 4 && IVAL(in->data, 0) == PREFIX_MAP_VERSION_DSDB) {
561 ndr_err = ndr_pull_struct_blob(in, tmp_ctx, blob,
562 (ndr_pull_flags_fn_t)ndr_pull_prefixMapBlob);
563 if (NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
564 ndr_err = ndr_push_struct_blob(out, mem_ctx,
565 blob,
566 (ndr_push_flags_fn_t)ndr_push_prefixMapBlob);
567 talloc_free(tmp_ctx);
568 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
569 return -1;
570 }
571 return 0;
572 }
573 }
574
575 /* If this does not parse, then it is probably the text version, and we should try it that way */
576 blob->version = PREFIX_MAP_VERSION_DSDB;
577
578 string = talloc_strndup(mem_ctx, (const char *)in->data, in->length);
579 if (string == NULL) {
580 talloc_free(blob);
581 return -1;
582 }
583
584 line = string;
585 while (line && line[0]) {
586 p=strchr(line, ';');
587 if (p) {
588 p[0] = '\0';
589 } else {
590 p=strchr(line, '\n');
591 if (p) {
592 p[0] = '\0';
593 }
594 }
595 /* allow a trailing separator */
596 if (line == p) {
597 break;
598 }
599
600 blob->ctr.dsdb.mappings = talloc_realloc(blob,
601 blob->ctr.dsdb.mappings,
602 struct drsuapi_DsReplicaOIDMapping,
603 blob->ctr.dsdb.num_mappings+1);
604 if (!blob->ctr.dsdb.mappings) {
605 talloc_free(tmp_ctx);
606 return -1;
607 }
608
609 blob->ctr.dsdb.mappings[blob->ctr.dsdb.num_mappings].id_prefix = strtoul(line, &oid, 10);
610
611 if (oid[0] != ':') {
612 talloc_free(tmp_ctx);
613 return -1;
614 }
615
616 /* we know there must be at least ":" */
617 oid++;
618
619 if (!ber_write_partial_OID_String(blob->ctr.dsdb.mappings, &oid_blob, oid)) {
620 talloc_free(tmp_ctx);
621 return -1;
622 }
623 blob->ctr.dsdb.mappings[blob->ctr.dsdb.num_mappings].oid.length = oid_blob.length;
624 blob->ctr.dsdb.mappings[blob->ctr.dsdb.num_mappings].oid.binary_oid = oid_blob.data;
625
626 blob->ctr.dsdb.num_mappings++;
627
628 /* Now look past the terminator we added above */
629 if (p) {
630 line = p + 1;
631 } else {
632 line = NULL;
633 }
634 }
635
636 ndr_err = ndr_push_struct_blob(out, mem_ctx,
637 blob,
638 (ndr_push_flags_fn_t)ndr_push_prefixMapBlob);
639 talloc_free(tmp_ctx);
640 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
641 return -1;
642 }
643 return 0;
644 }
645
646 /*
647 convert a NDR formatted blob to a ldif formatted prefixMap
648 */
649 static int ldif_write_prefixMap(struct ldb_context *ldb, void *mem_ctx,
650 const struct ldb_val *in, struct ldb_val *out)
651 {
652 struct prefixMapBlob *blob;
653 enum ndr_err_code ndr_err;
654 char *string;
655 uint32_t i;
656
657 if (ldb_get_flags(ldb) & LDB_FLG_SHOW_BINARY) {
658 int err;
659 /* try to decode the blob as S4 prefixMap */
660 err = ldif_write_NDR(ldb, mem_ctx, in, out,
661 sizeof(struct prefixMapBlob),
662 (ndr_pull_flags_fn_t)ndr_pull_prefixMapBlob,
663 (ndr_print_fn_t)ndr_print_prefixMapBlob,
664 false);
665 if (0 == err) {
666 return err;
667 }
668 /* try parsing it as Windows PrefixMap value */
669 return ldif_write_NDR(ldb, mem_ctx, in, out,
670 sizeof(struct drsuapi_MSPrefixMap_Ctr),
671 (ndr_pull_flags_fn_t)ndr_pull_drsuapi_MSPrefixMap_Ctr,
672 (ndr_print_fn_t)ndr_print_drsuapi_MSPrefixMap_Ctr,
673 true);
674 }
675
676 blob = talloc(mem_ctx, struct prefixMapBlob);
677 if (blob == NULL) {
678 return -1;
679 }
680 ndr_err = ndr_pull_struct_blob_all(in, blob,
681 blob,
682 (ndr_pull_flags_fn_t)ndr_pull_prefixMapBlob);
683 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
684 goto failed;
685 }
686 if (blob->version != PREFIX_MAP_VERSION_DSDB) {
687 goto failed;
688 }
689 string = talloc_strdup(mem_ctx, "");
690 if (string == NULL) {
691 goto failed;
692 }
693
694 for (i=0; i < blob->ctr.dsdb.num_mappings; i++) {
695 DATA_BLOB oid_blob;
696 char *partial_oid = NULL;
697
698 if (i > 0) {
699 string = talloc_asprintf_append(string, ";");
700 }
701
702 oid_blob = data_blob_const(blob->ctr.dsdb.mappings[i].oid.binary_oid,
703 blob->ctr.dsdb.mappings[i].oid.length);
704 if (!ber_read_partial_OID_String(blob, oid_blob, &partial_oid)) {
705 DEBUG(0, ("ber_read_partial_OID failed on prefixMap item with id: 0x%X",
706 blob->ctr.dsdb.mappings[i].id_prefix));
707 goto failed;
708 }
709 string = talloc_asprintf_append(string, "%u:%s",
710 blob->ctr.dsdb.mappings[i].id_prefix,
711 partial_oid);
712 talloc_free(discard_const(partial_oid));
713 if (string == NULL) {
714 goto failed;
715 }
716 }
717
718 talloc_free(blob);
719 *out = data_blob_string_const(string);
720 return 0;
721
722 failed:
723 talloc_free(blob);
724 return -1;
725 }
726
727 static bool ldif_comparision_prefixMap_isString(const struct ldb_val *v)
728 {
729 if (v->length < 4) {
730 return true;
731 }
732
733 if (IVAL(v->data, 0) == PREFIX_MAP_VERSION_DSDB) {
734 return false;
735 }
736
737 return true;
738 }
739
740 /*
741 canonicalise a prefixMap
742 */
743 static int ldif_canonicalise_prefixMap(struct ldb_context *ldb, void *mem_ctx,
744 const struct ldb_val *in, struct ldb_val *out)
745 {
746 if (ldif_comparision_prefixMap_isString(in)) {
747 return ldif_read_prefixMap(ldb, mem_ctx, in, out);
748 }
749 return ldb_handler_copy(ldb, mem_ctx, in, out);
750 }
751
752 static int ldif_comparison_prefixMap(struct ldb_context *ldb, void *mem_ctx,
753 const struct ldb_val *v1,
754 const struct ldb_val *v2)
755 {
756 return ldb_any_comparison(ldb, mem_ctx, ldif_canonicalise_prefixMap,
757 v1, v2);
758 }
759
760 /* length limited conversion of a ldb_val to a int32_t */
761 static int val_to_int32(const struct ldb_val *in, int32_t *v)
762 {
763 char *end;
764 char buf[64];
765
766 /* make sure we don't read past the end of the data */
767 if (in->length > sizeof(buf)-1) {
768 return LDB_ERR_INVALID_ATTRIBUTE_SYNTAX;
769 }
770 strncpy(buf, (char *)in->data, in->length);
771 buf[in->length] = 0;
772
773 /* We've to use "strtoll" here to have the intended overflows.
774 * Otherwise we may get "LONG_MAX" and the conversion is wrong. */
775 *v = (int32_t) strtoll(buf, &end, 0);
776 if (*end != 0) {
777 return LDB_ERR_INVALID_ATTRIBUTE_SYNTAX;
778 }
779 return LDB_SUCCESS;
780 }
781
782 /* length limited conversion of a ldb_val to a int64_t */
783 static int val_to_int64(const struct ldb_val *in, int64_t *v)
784 {
785 char *end;
786 char buf[64];
787
788 /* make sure we don't read past the end of the data */
789 if (in->length > sizeof(buf)-1) {
790 return LDB_ERR_INVALID_ATTRIBUTE_SYNTAX;
791 }
792 strncpy(buf, (char *)in->data, in->length);
793 buf[in->length] = 0;
794
795 *v = (int64_t) strtoll(buf, &end, 0);
796 if (*end != 0) {
797 return LDB_ERR_INVALID_ATTRIBUTE_SYNTAX;
798 }
799 return LDB_SUCCESS;
800 }
801
802 /* Canonicalisation of two 32-bit integers */
803 static int ldif_canonicalise_int32(struct ldb_context *ldb, void *mem_ctx,
804 const struct ldb_val *in, struct ldb_val *out)
805 {
806 int32_t i;
807 int ret;
808
809 ret = val_to_int32(in, &i);
810 if (ret != LDB_SUCCESS) {
811 return ret;
812 }
813 out->data = (uint8_t *) talloc_asprintf(mem_ctx, "%d", i);
814 if (out->data == NULL) {
815 ldb_oom(ldb);
816 return LDB_ERR_OPERATIONS_ERROR;
817 }
818 out->length = strlen((char *)out->data);
819 return 0;
820 }
821
822 /* Comparison of two 32-bit integers */
823 static int ldif_comparison_int32(struct ldb_context *ldb, void *mem_ctx,
824 const struct ldb_val *v1, const struct ldb_val *v2)
825 {
826 int32_t i1=0, i2=0;
827 val_to_int32(v1, &i1);
828 val_to_int32(v2, &i2);
829 if (i1 == i2) return 0;
830 return i1 > i2? 1 : -1;
831 }
832
833 /* Canonicalisation of two 64-bit integers */
834 static int ldif_canonicalise_int64(struct ldb_context *ldb, void *mem_ctx,
835 const struct ldb_val *in, struct ldb_val *out)
836 {
837 int64_t i;
838 int ret;
839
840 ret = val_to_int64(in, &i);
841 if (ret != LDB_SUCCESS) {
842 return ret;
843 }
844 out->data = (uint8_t *) talloc_asprintf(mem_ctx, "%lld", (long long)i);
845 if (out->data == NULL) {
846 ldb_oom(ldb);
847 return LDB_ERR_OPERATIONS_ERROR;
848 }
849 out->length = strlen((char *)out->data);
850 return 0;
851 }
852
853 /* Comparison of two 64-bit integers */
854 static int ldif_comparison_int64(struct ldb_context *ldb, void *mem_ctx,
855 const struct ldb_val *v1, const struct ldb_val *v2)
856 {
857 int64_t i1=0, i2=0;
858 val_to_int64(v1, &i1);
859 val_to_int64(v2, &i2);
860 if (i1 == i2) return 0;
861 return i1 > i2? 1 : -1;
862 }
863
864 /*
865 convert a NDR formatted blob to a ldif formatted repsFromTo
866 */
867 static int ldif_write_repsFromTo(struct ldb_context *ldb, void *mem_ctx,
868 const struct ldb_val *in, struct ldb_val *out)
869 {
870 return ldif_write_NDR(ldb, mem_ctx, in, out,
871 sizeof(struct repsFromToBlob),
872 (ndr_pull_flags_fn_t)ndr_pull_repsFromToBlob,
873 (ndr_print_fn_t)ndr_print_repsFromToBlob,
874 true);
875 }
876
877 /*
878 convert a NDR formatted blob to a ldif formatted replPropertyMetaData
879 */
880 static int ldif_write_replPropertyMetaData(struct ldb_context *ldb, void *mem_ctx,
881 const struct ldb_val *in, struct ldb_val *out)
882 {
883 return ldif_write_NDR(ldb, mem_ctx, in, out,
884 sizeof(struct replPropertyMetaDataBlob),
885 (ndr_pull_flags_fn_t)ndr_pull_replPropertyMetaDataBlob,
886 (ndr_print_fn_t)ndr_print_replPropertyMetaDataBlob,
887 true);
888 }
889
890 /*
891 convert a NDR formatted blob to a ldif formatted replUpToDateVector
892 */
893 static int ldif_write_replUpToDateVector(struct ldb_context *ldb, void *mem_ctx,
894 const struct ldb_val *in, struct ldb_val *out)
895 {
896 return ldif_write_NDR(ldb, mem_ctx, in, out,
897 sizeof(struct replUpToDateVectorBlob),
898 (ndr_pull_flags_fn_t)ndr_pull_replUpToDateVectorBlob,
899 (ndr_print_fn_t)ndr_print_replUpToDateVectorBlob,
900 true);
901 }
902
903
904 /*
905 convert a NDR formatted blob to a ldif formatted dnsRecord
906 */
907 static int ldif_write_dnsRecord(struct ldb_context *ldb, void *mem_ctx,
908 const struct ldb_val *in, struct ldb_val *out)
909 {
910 return ldif_write_NDR(ldb, mem_ctx, in, out,
911 sizeof(struct dnsp_DnssrvRpcRecord),
912 (ndr_pull_flags_fn_t)ndr_pull_dnsp_DnssrvRpcRecord,
913 (ndr_print_fn_t)ndr_print_dnsp_DnssrvRpcRecord,
914 true);
915 }
916
917 /*
918 convert a NDR formatted blob to a ldif formatted dnsProperty
919 */
920 static int ldif_write_dnsProperty(struct ldb_context *ldb, void *mem_ctx,
921 const struct ldb_val *in, struct ldb_val *out)
922 {
923 return ldif_write_NDR(ldb, mem_ctx, in, out,
924 sizeof(struct dnsp_DnsProperty),
925 (ndr_pull_flags_fn_t)ndr_pull_dnsp_DnsProperty,
926 (ndr_print_fn_t)ndr_print_dnsp_DnsProperty,
927 true);
928 }
929
930 /*
931 convert a NDR formatted blob of a supplementalCredentials into text
932 */
933 static int ldif_write_supplementalCredentialsBlob(struct ldb_context *ldb, void *mem_ctx,
934 const struct ldb_val *in, struct ldb_val *out)
935 {
936 return ldif_write_NDR(ldb, mem_ctx, in, out,
937 sizeof(struct supplementalCredentialsBlob),
938 (ndr_pull_flags_fn_t)ndr_pull_supplementalCredentialsBlob,
939 (ndr_print_fn_t)ndr_print_supplementalCredentialsBlob,
940 true);
941 }
942
943 /*
944 convert a NDR formatted blob to a ldif formatted trustAuthInOutBlob
945 */
946 static int ldif_write_trustAuthInOutBlob(struct ldb_context *ldb, void *mem_ctx,
947 const struct ldb_val *in, struct ldb_val *out)
948 {
949 return ldif_write_NDR(ldb, mem_ctx, in, out,
950 sizeof(struct trustAuthInOutBlob),
951 (ndr_pull_flags_fn_t)ndr_pull_trustAuthInOutBlob,
952 (ndr_print_fn_t)ndr_print_trustAuthInOutBlob,
953 true);
954 }
955
956 /*
957 convert a NDR formatted blob of a partialAttributeSet into text
958 */
959 static int ldif_write_partialAttributeSet(struct ldb_context *ldb, void *mem_ctx,
960 const struct ldb_val *in, struct ldb_val *out)
961 {
962 return ldif_write_NDR(ldb, mem_ctx, in, out,
963 sizeof(struct partialAttributeSetBlob),
964 (ndr_pull_flags_fn_t)ndr_pull_partialAttributeSetBlob,
965 (ndr_print_fn_t)ndr_print_partialAttributeSetBlob,
966 true);
967 }
968
969
970 static int extended_dn_write_hex(struct ldb_context *ldb, void *mem_ctx,
971 const struct ldb_val *in, struct ldb_val *out)
972 {
973 *out = data_blob_string_const(data_blob_hex_string_lower(mem_ctx, in));
974 if (!out->data) {
975 return -1;
976 }
977 return 0;
978 }
979
980 /*
981 compare two dns
982 */
983 static int samba_ldb_dn_link_comparison(struct ldb_context *ldb, void *mem_ctx,
984 const struct ldb_val *v1, const struct ldb_val *v2)
985 {
986 struct ldb_dn *dn1 = NULL, *dn2 = NULL;
987 int ret;
988
989 if (dsdb_dn_is_deleted_val(v1)) {
990 /* If the DN is deleted, then we can't search for it */
991 return -1;
992 }
993
994 if (dsdb_dn_is_deleted_val(v2)) {
995 /* If the DN is deleted, then we can't search for it */
996 return -1;
997 }
998
999 dn1 = ldb_dn_from_ldb_val(mem_ctx, ldb, v1);
1000 if ( ! ldb_dn_validate(dn1)) return -1;
1001
1002 dn2 = ldb_dn_from_ldb_val(mem_ctx, ldb, v2);
1003 if ( ! ldb_dn_validate(dn2)) {
1004 talloc_free(dn1);
1005 return -1;
1006 }
1007
1008 ret = ldb_dn_compare(dn1, dn2);
1009
1010 talloc_free(dn1);
1011 talloc_free(dn2);
1012 return ret;
1013 }
1014
1015 static int samba_ldb_dn_link_canonicalise(struct ldb_context *ldb, void *mem_ctx,
1016 const struct ldb_val *in, struct ldb_val *out)
1017 {
1018 struct ldb_dn *dn;
1019 int ret = -1;
1020
1021 out->length = 0;
1022 out->data = NULL;
1023
1024 dn = ldb_dn_from_ldb_val(mem_ctx, ldb, in);
1025 if ( ! ldb_dn_validate(dn)) {
1026 return LDB_ERR_INVALID_DN_SYNTAX;
1027 }
1028
1029 /* By including the RMD_FLAGS of a deleted DN, we ensure it
1030 * does not casually match a not deleted DN */
1031 if (dsdb_dn_is_deleted_val(in)) {
1032 out->data = (uint8_t *)talloc_asprintf(mem_ctx,
1033 "<RMD_FLAGS=%u>%s",
1034 dsdb_dn_val_rmd_flags(in),
1035 ldb_dn_get_casefold(dn));
1036 } else {
1037 out->data = (uint8_t *)ldb_dn_alloc_casefold(mem_ctx, dn);
1038 }
1039
1040 if (out->data == NULL) {
1041 goto done;
1042 }
1043 out->length = strlen((char *)out->data);
1044
1045 ret = 0;
1046
1047 done:
1048 talloc_free(dn);
1049
1050 return ret;
1051 }
1052
1053
1054 /*
1055 write a 64 bit 2-part range
1056 */
1057 static int ldif_write_range64(struct ldb_context *ldb, void *mem_ctx,
1058 const struct ldb_val *in, struct ldb_val *out)
1059 {
1060 int64_t v;
1061 int ret;
1062 ret = val_to_int64(in, &v);
1063 if (ret != LDB_SUCCESS) {
1064 return ret;
1065 }
1066 out->data = (uint8_t *)talloc_asprintf(mem_ctx, "%lu-%lu",
1067 (unsigned long)(v&0xFFFFFFFF),
1068 (unsigned long)(v>>32));
1069 if (out->data == NULL) {
1070 ldb_oom(ldb);
1071 return LDB_ERR_OPERATIONS_ERROR;
1072 }
1073 out->length = strlen((char *)out->data);
1074 return LDB_SUCCESS;
1075 }
1076
1077 /*
1078 read a 64 bit 2-part range
1079 */
1080 static int ldif_read_range64(struct ldb_context *ldb, void *mem_ctx,
1081 const struct ldb_val *in, struct ldb_val *out)
1082 {
1083 unsigned long high, low;
1084 char buf[64];
1085
1086 if (memchr(in->data, '-', in->length) == NULL) {
1087 return ldb_handler_copy(ldb, mem_ctx, in, out);
1088 }
1089
1090 if (in->length > sizeof(buf)-1) {
1091 return LDB_ERR_INVALID_ATTRIBUTE_SYNTAX;
1092 }
1093 strncpy(buf, (const char *)in->data, in->length);
1094 buf[in->length] = 0;
1095
1096 if (sscanf(buf, "%lu-%lu", &low, &high) != 2) {
1097 return LDB_ERR_INVALID_ATTRIBUTE_SYNTAX;
1098 }
1099
1100 out->data = (uint8_t *)talloc_asprintf(mem_ctx, "%llu",
1101 (unsigned long long)(((uint64_t)high)<<32) | (low));
1102
1103 if (out->data == NULL) {
1104 ldb_oom(ldb);
1105 return LDB_ERR_OPERATIONS_ERROR;
1106 }
1107 out->length = strlen((char *)out->data);
1108 return LDB_SUCCESS;
1109 }
1110
1111 /*
1112 when this operator_fn is set for a syntax, the backend calls is in
1113 preference to the comparison function. We are told the exact
1114 comparison operation that is needed, and we can return errors
1115 */
1116 static int samba_syntax_operator_fn(struct ldb_context *ldb, enum ldb_parse_op operation,
1117 const struct ldb_schema_attribute *a,
1118 const struct ldb_val *v1, const struct ldb_val *v2, bool *matched)
1119 {
1120 switch (operation) {
1121 case LDB_OP_AND:
1122 case LDB_OP_OR:
1123 case LDB_OP_NOT:
1124 case LDB_OP_SUBSTRING:
1125 case LDB_OP_APPROX:
1126 case LDB_OP_EXTENDED:
1127 /* handled in the backends */
1128 return LDB_ERR_INAPPROPRIATE_MATCHING;
1129
1130 case LDB_OP_GREATER:
1131 case LDB_OP_LESS:
1132 case LDB_OP_EQUALITY:
1133 {
1134 TALLOC_CTX *tmp_ctx = talloc_new(ldb);
1135 int ret;
1136 if (tmp_ctx == NULL) {
1137 return ldb_oom(ldb);
1138 }
1139 ret = a->syntax->comparison_fn(ldb, tmp_ctx, v1, v2);
1140 talloc_free(tmp_ctx);
1141 if (operation == LDB_OP_GREATER) {
1142 *matched = (ret > 0);
1143 } else if (operation == LDB_OP_LESS) {
1144 *matched = (ret < 0);
1145 } else {
1146 *matched = (ret == 0);
1147 }
1148 return LDB_SUCCESS;
1149 }
1150
1151 case LDB_OP_PRESENT:
1152 *matched = true;
1153 return LDB_SUCCESS;
1154 }
1155
1156 /* we shouldn't get here */
1157 return LDB_ERR_INAPPROPRIATE_MATCHING;
1158 }
1159
1160 /*
1161 see if two DNs match, comparing first by GUID, then by SID, and
1162 finally by string components
1163 */
1164 static int samba_dn_extended_match(struct ldb_context *ldb,
1165 const struct ldb_val *v1,
1166 const struct ldb_val *v2,
1167 bool *matched)
1168 {
1169 TALLOC_CTX *tmp_ctx;
1170 struct ldb_dn *dn1, *dn2;
1171 const struct ldb_val *guid1, *guid2, *sid1, *sid2;
1172 uint32_t rmd_flags1, rmd_flags2;
1173
1174 tmp_ctx = talloc_new(ldb);
1175
1176 dn1 = ldb_dn_from_ldb_val(tmp_ctx, ldb, v1);
1177 dn2 = ldb_dn_from_ldb_val(tmp_ctx, ldb, v2);
1178 if (!dn1 || !dn2) {
1179 /* couldn't parse as DN's */
1180 talloc_free(tmp_ctx);
1181 (*matched) = false;
1182 return LDB_SUCCESS;
1183 }
1184
1185 rmd_flags1 = dsdb_dn_rmd_flags(dn1);
1186 rmd_flags2 = dsdb_dn_rmd_flags(dn2);
1187
1188 if ((rmd_flags1 & DSDB_RMD_FLAG_DELETED) !=
1189 (rmd_flags2 & DSDB_RMD_FLAG_DELETED)) {
1190 /* only match if they have the same deletion status */
1191 talloc_free(tmp_ctx);
1192 (*matched) = false;
1193 return LDB_SUCCESS;
1194 }
1195
1196
1197 guid1 = ldb_dn_get_extended_component(dn1, "GUID");
1198 guid2 = ldb_dn_get_extended_component(dn2, "GUID");
1199 if (guid1 && guid2) {
1200 (*matched) = (data_blob_cmp(guid1, guid2) == 0);
1201 talloc_free(tmp_ctx);
1202 return LDB_SUCCESS;
1203 }
1204
1205 sid1 = ldb_dn_get_extended_component(dn1, "SID");
1206 sid2 = ldb_dn_get_extended_component(dn2, "SID");
1207 if (sid1 && sid2) {
1208 (*matched) = (data_blob_cmp(sid1, sid2) == 0);
1209 talloc_free(tmp_ctx);
1210 return LDB_SUCCESS;
1211 }
1212
1213 (*matched) = (ldb_dn_compare(dn1, dn2) == 0);
1214
1215 talloc_free(tmp_ctx);
1216 return LDB_SUCCESS;
1217 }
1218
1219 /*
1220 special operation for DNs, to take account of the RMD_FLAGS deleted bit
1221 */
1222 static int samba_syntax_operator_dn(struct ldb_context *ldb, enum ldb_parse_op operation,
1223 const struct ldb_schema_attribute *a,
1224 const struct ldb_val *v1, const struct ldb_val *v2, bool *matched)
1225 {
1226 if (operation == LDB_OP_PRESENT && dsdb_dn_is_deleted_val(v1)) {
1227 /* If the DN is deleted, then we can't search for it */
1228
1229 /* should this be for equality too? */
1230 *matched = false;
1231 return LDB_SUCCESS;
1232 }
1233
1234 if (operation == LDB_OP_EQUALITY &&
1235 samba_dn_extended_match(ldb, v1, v2, matched) == LDB_SUCCESS) {
1236 return LDB_SUCCESS;
1237 }
1238
1239 return samba_syntax_operator_fn(ldb, operation, a, v1, v2, matched);
1240 }
1241
1242
1243 static const struct ldb_schema_syntax samba_syntaxes[] = {
1244 {
1245 .name = LDB_SYNTAX_SAMBA_SID,
1246 .ldif_read_fn = ldif_read_objectSid,
1247 .ldif_write_fn = ldif_write_objectSid,
1248 .canonicalise_fn = ldif_canonicalise_objectSid,
1249 .comparison_fn = ldif_comparison_objectSid,
1250 .operator_fn = samba_syntax_operator_fn
1251 },{
1252 .name = LDB_SYNTAX_SAMBA_SECURITY_DESCRIPTOR,
1253 .ldif_read_fn = ldif_read_ntSecurityDescriptor,
1254 .ldif_write_fn = ldif_write_ntSecurityDescriptor,
1255 .canonicalise_fn = ldb_handler_copy,
1256 .comparison_fn = ldb_comparison_binary,
1257 .operator_fn = samba_syntax_operator_fn
1258 },{
1259 .name = LDB_SYNTAX_SAMBA_SDDL_SECURITY_DESCRIPTOR,
1260 .ldif_read_fn = ldb_handler_copy,
1261 .ldif_write_fn = ldif_write_sddlSecurityDescriptor,
1262 .canonicalise_fn = ldb_handler_fold,
1263 .comparison_fn = ldb_comparison_fold,
1264 .operator_fn = samba_syntax_operator_fn
1265 },{
1266 .name = LDB_SYNTAX_SAMBA_GUID,
1267 .ldif_read_fn = ldif_read_objectGUID,
1268 .ldif_write_fn = ldif_write_objectGUID,
1269 .canonicalise_fn = ldif_canonicalise_objectGUID,
1270 .comparison_fn = ldif_comparison_objectGUID,
1271 .operator_fn = samba_syntax_operator_fn
1272 },{
1273 .name = LDB_SYNTAX_SAMBA_OBJECT_CATEGORY,
1274 .ldif_read_fn = ldb_handler_copy,
1275 .ldif_write_fn = ldb_handler_copy,
1276 .canonicalise_fn = ldif_canonicalise_objectCategory,
1277 .comparison_fn = ldif_comparison_objectCategory,
1278 .operator_fn = samba_syntax_operator_fn
1279 },{
1280 .name = LDB_SYNTAX_SAMBA_SCHEMAINFO,
1281 .ldif_read_fn = ldb_handler_copy,
1282 .ldif_write_fn = ldif_write_schemaInfo,
1283 .canonicalise_fn = ldb_handler_copy,
1284 .comparison_fn = ldb_comparison_binary,
1285 .operator_fn = samba_syntax_operator_fn
1286 },{
1287 .name = LDB_SYNTAX_SAMBA_PREFIX_MAP,
1288 .ldif_read_fn = ldif_read_prefixMap,
1289 .ldif_write_fn = ldif_write_prefixMap,
1290 .canonicalise_fn = ldif_canonicalise_prefixMap,
1291 .comparison_fn = ldif_comparison_prefixMap,
1292 .operator_fn = samba_syntax_operator_fn
1293 },{
1294 .name = LDB_SYNTAX_SAMBA_INT32,
1295 .ldif_read_fn = ldb_handler_copy,
1296 .ldif_write_fn = ldb_handler_copy,
1297 .canonicalise_fn = ldif_canonicalise_int32,
1298 .comparison_fn = ldif_comparison_int32,
1299 .operator_fn = samba_syntax_operator_fn
1300 },{
1301 .name = LDB_SYNTAX_SAMBA_REPSFROMTO,
1302 .ldif_read_fn = ldb_handler_copy,
1303 .ldif_write_fn = ldif_write_repsFromTo,
1304 .canonicalise_fn = ldb_handler_copy,
1305 .comparison_fn = ldb_comparison_binary,
1306 .operator_fn = samba_syntax_operator_fn
1307 },{
1308 .name = LDB_SYNTAX_SAMBA_REPLPROPERTYMETADATA,
1309 .ldif_read_fn = ldb_handler_copy,
1310 .ldif_write_fn = ldif_write_replPropertyMetaData,
1311 .canonicalise_fn = ldb_handler_copy,
1312 .comparison_fn = ldb_comparison_binary,
1313 .operator_fn = samba_syntax_operator_fn
1314 },{
1315 .name = LDB_SYNTAX_SAMBA_REPLUPTODATEVECTOR,
1316 .ldif_read_fn = ldb_handler_copy,
1317 .ldif_write_fn = ldif_write_replUpToDateVector,
1318 .canonicalise_fn = ldb_handler_copy,
1319 .comparison_fn = ldb_comparison_binary,
1320 .operator_fn = samba_syntax_operator_fn
1321 },{
1322 .name = LDB_SYNTAX_SAMBA_TRUSTAUTHINOUTBLOB,
1323 .ldif_read_fn = ldb_handler_copy,
1324 .ldif_write_fn = ldif_write_trustAuthInOutBlob,
1325 .canonicalise_fn = ldb_handler_copy,
1326 .comparison_fn = ldb_comparison_binary,
1327 .operator_fn = samba_syntax_operator_fn
1328 },{
1329 .name = DSDB_SYNTAX_BINARY_DN,
1330 .ldif_read_fn = ldb_handler_copy,
1331 .ldif_write_fn = ldb_handler_copy,
1332 .canonicalise_fn = dsdb_dn_binary_canonicalise,
1333 .comparison_fn = dsdb_dn_binary_comparison,
1334 .operator_fn = samba_syntax_operator_fn
1335 },{
1336 .name = DSDB_SYNTAX_STRING_DN,
1337 .ldif_read_fn = ldb_handler_copy,
1338 .ldif_write_fn = ldb_handler_copy,
1339 .canonicalise_fn = dsdb_dn_string_canonicalise,
1340 .comparison_fn = dsdb_dn_string_comparison,
1341 .operator_fn = samba_syntax_operator_fn
1342 },{
1343 .name = LDB_SYNTAX_DN,
1344 .ldif_read_fn = ldb_handler_copy,
1345 .ldif_write_fn = ldb_handler_copy,
1346 .canonicalise_fn = samba_ldb_dn_link_canonicalise,
1347 .comparison_fn = samba_ldb_dn_link_comparison,
1348 .operator_fn = samba_syntax_operator_dn
1349 },{
1350 .name = LDB_SYNTAX_SAMBA_RANGE64,
1351 .ldif_read_fn = ldif_read_range64,
1352 .ldif_write_fn = ldif_write_range64,
1353 .canonicalise_fn = ldif_canonicalise_int64,
1354 .comparison_fn = ldif_comparison_int64,
1355 .operator_fn = samba_syntax_operator_fn
1356 },{
1357 .name = LDB_SYNTAX_SAMBA_DNSRECORD,
1358 .ldif_read_fn = ldb_handler_copy,
1359 .ldif_write_fn = ldif_write_dnsRecord,
1360 .canonicalise_fn = ldb_handler_copy,
1361 .comparison_fn = ldb_comparison_binary,
1362 .operator_fn = samba_syntax_operator_fn
1363 },{
1364 .name = LDB_SYNTAX_SAMBA_DNSPROPERTY,
1365 .ldif_read_fn = ldb_handler_copy,
1366 .ldif_write_fn = ldif_write_dnsProperty,
1367 .canonicalise_fn = ldb_handler_copy,
1368 .comparison_fn = ldb_comparison_binary,
1369 .operator_fn = samba_syntax_operator_fn
1370 },{
1371 .name = LDB_SYNTAX_SAMBA_SUPPLEMENTALCREDENTIALS,
1372 .ldif_read_fn = ldb_handler_copy,
1373 .ldif_write_fn = ldif_write_supplementalCredentialsBlob,
1374 .canonicalise_fn = ldb_handler_copy,
1375 .comparison_fn = ldb_comparison_binary,
1376 .operator_fn = samba_syntax_operator_fn
1377 },{
1378 .name = LDB_SYNTAX_SAMBA_PARTIALATTRIBUTESET,
1379 .ldif_read_fn = ldb_handler_copy,
1380 .ldif_write_fn = ldif_write_partialAttributeSet,
1381 .canonicalise_fn = ldb_handler_copy,
1382 .comparison_fn = ldb_comparison_binary,
1383 .operator_fn = samba_syntax_operator_fn
1384 }
1385 };
1386
1387 static const struct ldb_dn_extended_syntax samba_dn_syntax[] = {
1388 {
1389 .name = "SID",
1390 .read_fn = extended_dn_read_SID,
1391 .write_clear_fn = ldif_write_objectSid,
1392 .write_hex_fn = extended_dn_write_hex
1393 },{
1394 .name = "GUID",
1395 .read_fn = extended_dn_read_GUID,
1396 .write_clear_fn = ldif_write_objectGUID,
1397 .write_hex_fn = extended_dn_write_hex
1398 },{
1399 .name = "WKGUID",
1400 .read_fn = ldb_handler_copy,
1401 .write_clear_fn = ldb_handler_copy,
1402 .write_hex_fn = ldb_handler_copy
1403 },{
1404 .name = "RMD_INVOCID",
1405 .read_fn = extended_dn_read_GUID,
1406 .write_clear_fn = ldif_write_objectGUID,
1407 .write_hex_fn = extended_dn_write_hex
1408 },{
1409 .name = "RMD_FLAGS",
1410 .read_fn = ldb_handler_copy,
1411 .write_clear_fn = ldb_handler_copy,
1412 .write_hex_fn = ldb_handler_copy
1413 },{
1414 .name = "RMD_ADDTIME",
1415 .read_fn = ldb_handler_copy,
1416 .write_clear_fn = ldb_handler_copy,
1417 .write_hex_fn = ldb_handler_copy
1418 },{
1419 .name = "RMD_CHANGETIME",
1420 .read_fn = ldb_handler_copy,
1421 .write_clear_fn = ldb_handler_copy,
1422 .write_hex_fn = ldb_handler_copy
1423 },{
1424 .name = "RMD_LOCAL_USN",
1425 .read_fn = ldb_handler_copy,
1426 .write_clear_fn = ldb_handler_copy,
1427 .write_hex_fn = ldb_handler_copy
1428 },{
1429 .name = "RMD_ORIGINATING_USN",
1430 .read_fn = ldb_handler_copy,
1431 .write_clear_fn = ldb_handler_copy,
1432 .write_hex_fn = ldb_handler_copy
1433 },{
1434 .name = "RMD_VERSION",
1435 .read_fn = ldb_handler_copy,
1436 .write_clear_fn = ldb_handler_copy,
1437 .write_hex_fn = ldb_handler_copy
1438 }
1439 };
1440
1441 /* TODO: Should be dynamic at some point */
1442 static const struct {
1443 const char *name;
1444 const char *syntax;
1445 } samba_attributes[] = {
1446 { "objectSid", LDB_SYNTAX_SAMBA_SID },
1447 { "securityIdentifier", LDB_SYNTAX_SAMBA_SID },
1448 { "tokenGroups", LDB_SYNTAX_SAMBA_SID },
1449 { "ntSecurityDescriptor", LDB_SYNTAX_SAMBA_SECURITY_DESCRIPTOR },
1450 { "oMSyntax", LDB_SYNTAX_SAMBA_INT32 },
1451 { "objectCategory", LDB_SYNTAX_SAMBA_OBJECT_CATEGORY },
1452 { "schemaInfo", LDB_SYNTAX_SAMBA_SCHEMAINFO },
1453 { "prefixMap", LDB_SYNTAX_SAMBA_PREFIX_MAP },
1454 { "repsFrom", LDB_SYNTAX_SAMBA_REPSFROMTO },
1455 { "repsTo", LDB_SYNTAX_SAMBA_REPSFROMTO },
1456 { "replPropertyMetaData", LDB_SYNTAX_SAMBA_REPLPROPERTYMETADATA },
1457 { "replUpToDateVector", LDB_SYNTAX_SAMBA_REPLUPTODATEVECTOR },
1458 { "trustAuthIncoming", LDB_SYNTAX_SAMBA_TRUSTAUTHINOUTBLOB },
1459 { "trustAuthOutgoing", LDB_SYNTAX_SAMBA_TRUSTAUTHINOUTBLOB },
1460 { "rIDAllocationPool", LDB_SYNTAX_SAMBA_RANGE64 },
1461 { "rIDPreviousAllocationPool", LDB_SYNTAX_SAMBA_RANGE64 },
1462 { "rIDAvailablePool", LDB_SYNTAX_SAMBA_RANGE64 },
1463 { "defaultSecurityDescriptor", LDB_SYNTAX_SAMBA_SDDL_SECURITY_DESCRIPTOR },
1464
1465 /*
1466 * these are extracted by searching
1467 * (&(attributeSyntax=2.5.5.10)(rangeLower=16)(rangeUpper=16)(omSyntax=4))
1468 */
1469 { "attributeSecurityGUID", LDB_SYNTAX_SAMBA_GUID },
1470 { "categoryId", LDB_SYNTAX_SAMBA_GUID },
1471 { "controlAccessRights", LDB_SYNTAX_SAMBA_GUID },
1472 { "currMachineId", LDB_SYNTAX_SAMBA_GUID },
1473 { "fRSReplicaSetGUID", LDB_SYNTAX_SAMBA_GUID },
1474 { "fRSVersionGUID", LDB_SYNTAX_SAMBA_GUID },
1475 { "implementedCategories", LDB_SYNTAX_SAMBA_GUID },
1476 { "msDS-AzObjectGuid", LDB_SYNTAX_SAMBA_GUID },
1477 { "msDFSR-ContentSetGuid", LDB_SYNTAX_SAMBA_GUID },
1478 { "msDFSR-ReplicationGroupGuid", LDB_SYNTAX_SAMBA_GUID },
1479 { "mSMQDigests", LDB_SYNTAX_SAMBA_GUID },
1480 { "mSMQOwnerID", LDB_SYNTAX_SAMBA_GUID },
1481 { "mSMQQMID", LDB_SYNTAX_SAMBA_GUID },
1482 { "mSMQQueueType", LDB_SYNTAX_SAMBA_GUID },
1483 { "mSMQSites", LDB_SYNTAX_SAMBA_GUID },
1484 { "netbootGUID", LDB_SYNTAX_SAMBA_GUID },
1485 { "objectGUID", LDB_SYNTAX_SAMBA_GUID },
1486 { "pKTGuid", LDB_SYNTAX_SAMBA_GUID },
1487 { "requiredCategories", LDB_SYNTAX_SAMBA_GUID },
1488 { "schemaIDGUID", LDB_SYNTAX_SAMBA_GUID },
1489 { "siteGUID", LDB_SYNTAX_SAMBA_GUID },
1490 { "msDFS-GenerationGUIDv2", LDB_SYNTAX_SAMBA_GUID },
1491 { "msDFS-LinkIdentityGUIDv2", LDB_SYNTAX_SAMBA_GUID },
1492 { "msDFS-NamespaceIdentityGUIDv2", LDB_SYNTAX_SAMBA_GUID },
1493
1494 /*
1495 * these are known to be GUIDs
1496 */
1497 { "invocationId", LDB_SYNTAX_SAMBA_GUID },
1498 { "parentGUID", LDB_SYNTAX_SAMBA_GUID },
1499 { "msDS-OptionalFeatureGUID", LDB_SYNTAX_SAMBA_GUID },
1500
1501 /* These NDR encoded things we want to be able to read with --show-binary */
1502 { "dnsRecord", LDB_SYNTAX_SAMBA_DNSRECORD },
1503 { "dNSProperty", LDB_SYNTAX_SAMBA_DNSPROPERTY },
1504 { "supplementalCredentials", LDB_SYNTAX_SAMBA_SUPPLEMENTALCREDENTIALS},
1505 { "partialAttributeSet", LDB_SYNTAX_SAMBA_PARTIALATTRIBUTESET}
1506 };
1507
1508 const struct ldb_schema_syntax *ldb_samba_syntax_by_name(struct ldb_context *ldb, const char *name)
1509 {
1510 unsigned int j;
1511 const struct ldb_schema_syntax *s = NULL;
1512
1513 for (j=0; j < ARRAY_SIZE(samba_syntaxes); j++) {
1514 if (strcmp(name, samba_syntaxes[j].name) == 0) {
1515 s = &samba_syntaxes[j];
1516 break;
1517 }
1518 }
1519 return s;
1520 }
1521
1522 const struct ldb_schema_syntax *ldb_samba_syntax_by_lDAPDisplayName(struct ldb_context *ldb, const char *name)
1523 {
1524 unsigned int j;
1525 const struct ldb_schema_syntax *s = NULL;
1526
1527 for (j=0; j < ARRAY_SIZE(samba_attributes); j++) {
1528 if (strcmp(samba_attributes[j].name, name) == 0) {
1529 s = ldb_samba_syntax_by_name(ldb, samba_attributes[j].syntax);
1530 break;
1531 }
1532 }
1533
1534 return s;
1535 }
1536
1537 /*
1538 register the samba ldif handlers
1539 */
1540 int ldb_register_samba_handlers(struct ldb_context *ldb)
1541 {
1542 unsigned int i;
1543 int ret;
1544
1545 if (ldb_get_opaque(ldb, "SAMBA_HANDLERS_REGISTERED") != NULL) {
1546 return LDB_SUCCESS;
1547 }
1548
1549 for (i=0; i < ARRAY_SIZE(samba_attributes); i++) {
1550 const struct ldb_schema_syntax *s = NULL;
1551
1552 s = ldb_samba_syntax_by_name(ldb, samba_attributes[i].syntax);
1553
1554 if (!s) {
1555 s = ldb_standard_syntax_by_name(ldb, samba_attributes[i].syntax);
1556 }
1557
1558 if (!s) {
1559 return LDB_ERR_OPERATIONS_ERROR;
1560 }
1561
1562 ret = ldb_schema_attribute_add_with_syntax(ldb, samba_attributes[i].name, LDB_ATTR_FLAG_FIXED, s);
1563 if (ret != LDB_SUCCESS) {
1564 return ret;
1565 }
1566 }
1567
1568 for (i=0; i < ARRAY_SIZE(samba_dn_syntax); i++) {
1569 ret = ldb_dn_extended_add_syntax(ldb, LDB_ATTR_FLAG_FIXED, &samba_dn_syntax[i]);
1570 if (ret != LDB_SUCCESS) {
1571 return ret;
1572 }
1573
1574 }
1575
1576 ret = ldb_set_opaque(ldb, "SAMBA_HANDLERS_REGISTERED", (void*)1);
1577 if (ret != LDB_SUCCESS) {
1578 return ret;
1579 }
1580
1581 return LDB_SUCCESS;
1582 }
reg import