lib/ldb-samba/ldif_handlers.c

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