4 Copyright (C) Andrew Bartlett <abartlet@samba.org> 2006
5 Copyright (C) Stefan Metzmacher <metze@samba.org> 2007
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>.
24 * Component: ldb partitions module
26 * Description: Implement LDAP partitions
28 * Author: Andrew Bartlett
29 * Author: Stefan Metzmacher
32 #include "dsdb/samdb/ldb_modules/partition.h"
33 static int partition_sort_compare(const void *v1
, const void *v2
)
35 const struct dsdb_partition
*p1
;
36 const struct dsdb_partition
*p2
;
38 p1
= *((struct dsdb_partition
* const*)v1
);
39 p2
= *((struct dsdb_partition
* const*)v2
);
41 return ldb_dn_compare(p1
->ctrl
->dn
, p2
->ctrl
->dn
);
44 /* Load the list of DNs that we must replicate to all partitions */
45 static int partition_load_replicate_dns(struct ldb_context
*ldb
, struct partition_private_data
*data
, struct ldb_message
*msg
)
47 struct ldb_message_element
*replicate_attributes
= ldb_msg_find_element(msg
, "replicateEntries");
49 talloc_free(data
->replicate
);
50 if (!replicate_attributes
) {
51 data
->replicate
= NULL
;
54 data
->replicate
= talloc_array(data
, struct ldb_dn
*, replicate_attributes
->num_values
+ 1);
55 if (!data
->replicate
) {
56 return LDB_ERR_OPERATIONS_ERROR
;
59 for (i
=0; i
< replicate_attributes
->num_values
; i
++) {
60 data
->replicate
[i
] = ldb_dn_from_ldb_val(data
->replicate
, ldb
, &replicate_attributes
->values
[i
]);
61 if (!ldb_dn_validate(data
->replicate
[i
])) {
62 ldb_asprintf_errstring(ldb
,
64 "invalid DN in partition replicate record: %s",
65 replicate_attributes
->values
[i
].data
);
66 return LDB_ERR_CONSTRAINT_VIOLATION
;
69 data
->replicate
[i
] = NULL
;
74 /* Load the list of modules for the partitions */
75 static int partition_load_modules(struct ldb_context
*ldb
,
76 struct partition_private_data
*data
, struct ldb_message
*msg
)
79 struct ldb_message_element
*modules_attributes
= ldb_msg_find_element(msg
, "modules");
80 talloc_free(data
->modules
);
81 if (!modules_attributes
) {
85 data
->modules
= talloc_array(data
, struct partition_module
*, modules_attributes
->num_values
+ 1);
88 return LDB_ERR_OPERATIONS_ERROR
;
91 for (i
=0; i
< modules_attributes
->num_values
; i
++) {
94 data
->modules
[i
] = talloc(data
->modules
, struct partition_module
);
95 if (!data
->modules
[i
]) {
97 return LDB_ERR_OPERATIONS_ERROR
;
100 dn_blob
= modules_attributes
->values
[i
];
102 p
= strchr((const char *)dn_blob
.data
, ':');
104 ldb_asprintf_errstring(ldb
,
105 "partition_load_modules: "
106 "invalid form for partition module record (missing ':'): %s", (const char *)dn_blob
.data
);
107 return LDB_ERR_CONSTRAINT_VIOLATION
;
109 /* Now trim off the filename */
110 dn_blob
.length
= ((uint8_t *)p
- dn_blob
.data
);
113 data
->modules
[i
]->modules
= ldb_modules_list_from_string(ldb
, data
->modules
[i
],
116 if (dn_blob
.length
== 1 && dn_blob
.data
[0] == '*') {
117 data
->modules
[i
]->dn
= NULL
;
119 data
->modules
[i
]->dn
= ldb_dn_from_ldb_val(data
->modules
[i
], ldb
, &dn_blob
);
120 if (!data
->modules
[i
]->dn
|| !ldb_dn_validate(data
->modules
[i
]->dn
)) {
121 return LDB_ERR_OPERATIONS_ERROR
;
125 data
->modules
[i
] = NULL
;
129 static int partition_reload_metadata(struct ldb_module
*module
, struct partition_private_data
*data
, TALLOC_CTX
*mem_ctx
, struct ldb_message
**_msg
)
132 struct ldb_message
*msg
, *module_msg
;
133 struct ldb_result
*res
;
134 struct ldb_context
*ldb
= ldb_module_get_ctx(module
);
135 const char *attrs
[] = { "partition", "replicateEntries", "modules", "ldapBackend", NULL
};
136 /* perform search for @PARTITION, looking for module, replicateEntries and ldapBackend */
137 ret
= dsdb_module_search_dn(module
, mem_ctx
, &res
,
138 ldb_dn_new(mem_ctx
, ldb
, DSDB_PARTITION_DN
),
140 if (ret
!= LDB_SUCCESS
) {
146 ret
= partition_load_replicate_dns(ldb
, data
, msg
);
147 if (ret
!= LDB_SUCCESS
) {
151 /* When used from Samba4, this message is set by the samba4
152 * module, as a fixed value not read from the DB. This avoids
153 * listing modules in the DB */
154 if (data
->forced_module_msg
) {
155 module_msg
= data
->forced_module_msg
;
160 ret
= partition_load_modules(ldb
, data
, module_msg
);
161 if (ret
!= LDB_SUCCESS
) {
165 data
->ldapBackend
= talloc_steal(data
, ldb_msg_find_attr_as_string(msg
, "ldapBackend", NULL
));
175 static const char **find_modules_for_dn(struct partition_private_data
*data
, struct ldb_dn
*dn
)
178 struct partition_module
*default_mod
= NULL
;
179 for (i
=0; data
->modules
&& data
->modules
[i
]; i
++) {
180 if (!data
->modules
[i
]->dn
) {
181 default_mod
= data
->modules
[i
];
182 } else if (ldb_dn_compare(dn
, data
->modules
[i
]->dn
) == 0) {
183 return data
->modules
[i
]->modules
;
187 return default_mod
->modules
;
193 static int new_partition_from_dn(struct ldb_context
*ldb
, struct partition_private_data
*data
,
195 struct ldb_dn
*dn
, const char *filename
,
196 struct dsdb_partition
**partition
) {
197 const char *backend_url
;
198 struct dsdb_control_current_partition
*ctrl
;
199 struct ldb_module
*backend_module
;
200 struct ldb_module
*module_chain
;
201 const char **modules
;
204 (*partition
) = talloc(mem_ctx
, struct dsdb_partition
);
206 return LDB_ERR_OPERATIONS_ERROR
;
209 (*partition
)->ctrl
= ctrl
= talloc((*partition
), struct dsdb_control_current_partition
);
211 talloc_free(*partition
);
213 return LDB_ERR_OPERATIONS_ERROR
;
216 /* See if an LDAP backend has been specified */
217 if (data
->ldapBackend
) {
218 (*partition
)->backend_url
= data
->ldapBackend
;
220 /* the backend LDB is the DN (base64 encoded if not 'plain') followed by .ldb */
221 backend_url
= samdb_relative_path(ldb
,
225 ldb_asprintf_errstring(ldb
,
226 "partition_init: unable to determine an relative path for partition: %s", filename
);
227 talloc_free(*partition
);
228 return LDB_ERR_OPERATIONS_ERROR
;
230 (*partition
)->backend_url
= talloc_steal((*partition
), backend_url
);
232 if (!(ldb
->flags
& LDB_FLG_RDONLY
)) {
234 char *backend_dir
= talloc_strdup(*partition
, backend_url
);
236 p
= strrchr(backend_dir
, '/');
241 /* Failure is quite reasonable, it might alredy exist */
242 mkdir(backend_dir
, 0700);
243 talloc_free(backend_dir
);
248 ctrl
->version
= DSDB_CONTROL_CURRENT_PARTITION_VERSION
;
249 ctrl
->dn
= talloc_steal(ctrl
, dn
);
251 ret
= ldb_connect_backend(ldb
, (*partition
)->backend_url
, NULL
, &backend_module
);
252 if (ret
!= LDB_SUCCESS
) {
255 talloc_steal((*partition
), backend_module
);
257 modules
= find_modules_for_dn(data
, dn
);
260 DEBUG(0, ("Unable to load partition modules for new DN %s, perhaps you need to reprovision? See partition-upgrade.txt for instructions\n", ldb_dn_get_linearized(dn
)));
261 talloc_free(*partition
);
262 return LDB_ERR_CONSTRAINT_VIOLATION
;
264 ret
= ldb_load_modules_list(ldb
, modules
, backend_module
, &module_chain
);
265 if (ret
!= LDB_SUCCESS
) {
266 ldb_asprintf_errstring(ldb
,
268 "loading backend for %s failed: %s",
269 ldb_dn_get_linearized(dn
), ldb_errstring(ldb
));
270 talloc_free(*partition
);
273 ret
= ldb_init_module_chain(ldb
, module_chain
);
274 if (ret
!= LDB_SUCCESS
) {
275 ldb_asprintf_errstring(ldb
,
277 "initialising backend for %s failed: %s",
278 ldb_dn_get_linearized(dn
), ldb_errstring(ldb
));
279 talloc_free(*partition
);
283 /* This weirdness allows us to use ldb_next_request() in partition.c */
284 (*partition
)->module
= ldb_module_new(*partition
, ldb
, "partition_next", NULL
);
285 if (!(*partition
)->module
) {
287 talloc_free(*partition
);
288 return LDB_ERR_OPERATIONS_ERROR
;
290 (*partition
)->module
->next
= talloc_steal((*partition
)->module
, module_chain
);
292 /* if we were in a transaction then we need to start a
293 transaction on this new partition, otherwise we'll get a
294 transaction mismatch when we end the transaction */
295 if (data
->in_transaction
) {
296 if (ldb
->flags
& LDB_FLG_ENABLE_TRACING
) {
297 ldb_debug(ldb
, LDB_DEBUG_TRACE
, "partition_start_trans() -> %s (new partition)",
298 ldb_dn_get_linearized((*partition
)->ctrl
->dn
));
300 ret
= ldb_next_start_trans((*partition
)->module
);
306 /* Tell the rootDSE about the new partition */
307 static int partition_register(struct ldb_context
*ldb
, struct dsdb_control_current_partition
*ctrl
)
309 struct ldb_request
*req
;
312 req
= talloc_zero(NULL
, struct ldb_request
);
315 return LDB_ERR_OPERATIONS_ERROR
;
318 req
->operation
= LDB_REQ_REGISTER_PARTITION
;
319 req
->op
.reg_partition
.dn
= ctrl
->dn
;
320 req
->callback
= ldb_op_default_callback
;
322 ldb_set_timeout(ldb
, req
, 0);
324 req
->handle
= ldb_handle_new(req
, ldb
);
325 if (req
->handle
== NULL
) {
327 return LDB_ERR_OPERATIONS_ERROR
;
330 ret
= ldb_request(ldb
, req
);
331 if (ret
== LDB_SUCCESS
) {
332 ret
= ldb_wait(req
->handle
, LDB_WAIT_ALL
);
334 if (ret
!= LDB_SUCCESS
) {
335 ldb_debug(ldb
, LDB_DEBUG_ERROR
, "partition: Unable to register partition with rootdse!\n");
337 return LDB_ERR_OTHER
;
344 /* Add a newly found partition to the global data */
345 static int add_partition_to_data(struct ldb_context
*ldb
, struct partition_private_data
*data
,
346 struct dsdb_partition
*partition
)
349 /* Count the partitions */
350 for (i
=0; data
->partitions
&& data
->partitions
[i
]; i
++) { /* noop */};
352 /* Add partition to list of partitions */
353 data
->partitions
= talloc_realloc(data
, data
->partitions
, struct dsdb_partition
*, i
+ 2);
354 if (!data
->partitions
) {
356 return LDB_ERR_OPERATIONS_ERROR
;
358 data
->partitions
[i
] = talloc_steal(data
->partitions
, partition
);
359 data
->partitions
[i
+1] = NULL
;
361 /* Sort again (should use binary insert) */
362 qsort(data
->partitions
, i
+1,
363 sizeof(*data
->partitions
), partition_sort_compare
);
365 ret
= partition_register(ldb
, partition
->ctrl
);
366 if (ret
!= LDB_SUCCESS
) {
372 int partition_reload_if_required(struct ldb_module
*module
,
373 struct partition_private_data
*data
)
377 struct ldb_context
*ldb
= ldb_module_get_ctx(module
);
378 struct ldb_message
*msg
;
379 struct ldb_message_element
*partition_attributes
;
383 /* Not initilised yet */
387 mem_ctx
= talloc_new(data
);
390 return LDB_ERR_OPERATIONS_ERROR
;
393 ret
= partition_primary_sequence_number(module
, mem_ctx
, LDB_SEQ_HIGHEST_SEQ
, &seq
);
394 if (ret
!= LDB_SUCCESS
) {
395 talloc_free(mem_ctx
);
398 if (seq
== data
->metadata_seq
) {
399 talloc_free(mem_ctx
);
403 ret
= partition_reload_metadata(module
, data
, mem_ctx
, &msg
);
404 if (ret
!= LDB_SUCCESS
) {
405 talloc_free(mem_ctx
);
409 data
->metadata_seq
= seq
;
411 partition_attributes
= ldb_msg_find_element(msg
, "partition");
413 for (i
=0; partition_attributes
&& i
< partition_attributes
->num_values
; i
++) {
415 bool new_partition
= true;
416 const char *filename
= NULL
;
419 struct dsdb_partition
*partition
;
420 struct ldb_result
*dn_res
;
421 const char *no_attrs
[] = { NULL
};
423 for (j
=0; data
->partitions
&& data
->partitions
[j
]; j
++) {
424 if (data_blob_cmp(&data
->partitions
[j
]->orig_record
, &partition_attributes
->values
[i
]) == 0) {
425 new_partition
= false;
429 if (new_partition
== false) {
433 dn_blob
= partition_attributes
->values
[i
];
435 if (dn_blob
.length
> 4 &&
436 (strncmp((const char *)&dn_blob
.data
[dn_blob
.length
-4], ".ldb", 4) == 0)) {
438 /* Look for DN:filename.ldb */
439 char *p
= strrchr((const char *)dn_blob
.data
, ':');
441 ldb_asprintf_errstring(ldb
,
442 "partition_init: invalid DN in attempting to parse partition record: %s", (const char *)dn_blob
.data
);
443 talloc_free(mem_ctx
);
444 return LDB_ERR_CONSTRAINT_VIOLATION
;
448 /* Now trim off the filename */
449 dn_blob
.length
= ((uint8_t *)p
- dn_blob
.data
);
452 dn
= ldb_dn_from_ldb_val(mem_ctx
, ldb
, &dn_blob
);
454 ldb_asprintf_errstring(ldb
,
455 "partition_init: invalid DN in partition record: %s", (const char *)dn_blob
.data
);
456 talloc_free(mem_ctx
);
457 return LDB_ERR_CONSTRAINT_VIOLATION
;
460 /* Now do a slow check with the DN compare */
461 for (j
=0; data
->partitions
&& data
->partitions
[j
]; j
++) {
462 if (ldb_dn_compare(dn
, data
->partitions
[j
]->ctrl
->dn
) == 0) {
463 new_partition
= false;
467 if (new_partition
== false) {
472 char *base64_dn
= NULL
;
474 for (p
= ldb_dn_get_linearized(dn
); *p
; p
++) {
475 /* We have such a strict check because I don't want shell metacharacters in the file name, nor ../ */
476 if (!(isalnum(*p
) || *p
== ' ' || *p
== '=' || *p
== ',')) {
481 base64_dn
= ldb_base64_encode(data
, ldb_dn_get_linearized(dn
), strlen(ldb_dn_get_linearized(dn
)));
482 filename
= talloc_asprintf(mem_ctx
, "%s.ldb", base64_dn
);
484 filename
= talloc_asprintf(mem_ctx
, "%s.ldb", ldb_dn_get_linearized(dn
));
488 /* We call ldb_dn_get_linearized() because the DN in
489 * partition_attributes is already casefolded
490 * correctly. We don't want to mess that up as the
491 * schema isn't loaded yet */
492 ret
= new_partition_from_dn(ldb
, data
, data
->partitions
, dn
,
495 if (ret
!= LDB_SUCCESS
) {
496 talloc_free(mem_ctx
);
500 talloc_steal(partition
, partition_attributes
->values
[i
].data
);
501 partition
->orig_record
= partition_attributes
->values
[i
];
503 /* Get the 'correct' case of the partition DNs from the database */
504 ret
= dsdb_module_search_dn(partition
->module
, data
, &dn_res
,
506 if (ret
== LDB_SUCCESS
) {
507 talloc_free(partition
->ctrl
->dn
);
508 partition
->ctrl
->dn
= talloc_steal(partition
->ctrl
, dn_res
->msgs
[0]->dn
);
510 } else if (ret
!= LDB_ERR_NO_SUCH_OBJECT
) {
511 ldb_asprintf_errstring(ldb
,
512 "Failed to search for partition base %s in new partition at %s: %s",
513 ldb_dn_get_linearized(dn
),
514 partition
->backend_url
,
516 talloc_free(mem_ctx
);
520 ret
= add_partition_to_data(ldb
, data
, partition
);
521 if (ret
!= LDB_SUCCESS
) {
522 talloc_free(mem_ctx
);
527 talloc_free(mem_ctx
);
531 /* Copy the metadata (@OPTIONS etc) for the new partition into the partition */
533 static int new_partition_set_replicated_metadata(struct ldb_context
*ldb
,
534 struct ldb_module
*module
, struct ldb_request
*last_req
,
535 struct partition_private_data
*data
,
536 struct dsdb_partition
*partition
)
539 /* for each replicate, copy from main partition. If we get an error, we report it up the chain */
540 for (i
=0; data
->replicate
&& data
->replicate
[i
]; i
++) {
541 struct ldb_result
*replicate_res
;
542 struct ldb_request
*add_req
;
543 ret
= dsdb_module_search_dn(module
, last_req
, &replicate_res
,
546 if (ret
== LDB_ERR_NO_SUCH_OBJECT
) {
549 if (ret
!= LDB_SUCCESS
) {
550 ldb_asprintf_errstring(ldb
,
551 "Failed to search for %s from " DSDB_PARTITION_DN
552 " replicateEntries for new partition at %s on %s: %s",
553 ldb_dn_get_linearized(data
->replicate
[i
]),
554 partition
->backend_url
,
555 ldb_dn_get_linearized(partition
->ctrl
->dn
),
560 /* Build add request */
561 ret
= ldb_build_add_req(&add_req
, ldb
, replicate_res
,
562 replicate_res
->msgs
[0], NULL
, NULL
,
563 ldb_op_default_callback
, last_req
);
565 if (ret
!= LDB_SUCCESS
) {
566 /* return directly, this is a very unlikely error */
570 ret
= ldb_next_request(partition
->module
, add_req
);
572 if (ret
== LDB_SUCCESS
) {
573 ret
= ldb_wait(add_req
->handle
, LDB_WAIT_ALL
);
580 case LDB_ERR_ENTRY_ALREADY_EXISTS
:
581 /* Handle this case specially - if the
582 * metadata already exists, replace it */
584 struct ldb_request
*del_req
;
586 /* Don't leave a confusing string in the ldb_errstring() */
587 ldb_reset_err_string(ldb
);
588 /* Build del request */
589 ret
= ldb_build_del_req(&del_req
, ldb
, replicate_res
, replicate_res
->msgs
[0]->dn
, NULL
, NULL
,
590 ldb_op_default_callback
, last_req
);
592 if (ret
!= LDB_SUCCESS
) {
593 /* return directly, this is a very unlikely error */
597 ret
= ldb_next_request(partition
->module
, del_req
);
600 if (ret
== LDB_SUCCESS
) {
601 ret
= ldb_wait(del_req
->handle
, LDB_WAIT_ALL
);
603 if (ret
!= LDB_SUCCESS
) {
604 ldb_asprintf_errstring(ldb
,
605 "Failed to delete (for re-add) %s from " DSDB_PARTITION_DN
606 " replicateEntries in new partition at %s on %s: %s",
607 ldb_dn_get_linearized(data
->replicate
[i
]),
608 partition
->backend_url
,
609 ldb_dn_get_linearized(partition
->ctrl
->dn
),
614 /* Build add request */
615 ret
= ldb_build_add_req(&add_req
, ldb
, replicate_res
, replicate_res
->msgs
[0], NULL
, NULL
,
616 ldb_op_default_callback
, last_req
);
618 if (ret
!= LDB_SUCCESS
) {
619 /* return directly, this is a very unlikely error */
623 /* do the add again */
624 ret
= ldb_next_request(partition
->module
, add_req
);
627 if (ret
== LDB_SUCCESS
) {
628 ret
= ldb_wait(add_req
->handle
, LDB_WAIT_ALL
);
631 if (ret
!= LDB_SUCCESS
) {
632 ldb_asprintf_errstring(ldb
,
633 "Failed to add (after delete) %s from " DSDB_PARTITION_DN
634 " replicateEntries to new partition at %s on %s: %s",
635 ldb_dn_get_linearized(data
->replicate
[i
]),
636 partition
->backend_url
,
637 ldb_dn_get_linearized(partition
->ctrl
->dn
),
645 ldb_asprintf_errstring(ldb
,
646 "Failed to add %s from " DSDB_PARTITION_DN
647 " replicateEntries to new partition at %s on %s: %s",
648 ldb_dn_get_linearized(data
->replicate
[i
]),
649 partition
->backend_url
,
650 ldb_dn_get_linearized(partition
->ctrl
->dn
),
656 /* And around again, for the next thing we must merge */
661 /* Extended operation to create a new partition, called when
662 * 'new_partition' detects that one is being added based on it's
664 int partition_create(struct ldb_module
*module
, struct ldb_request
*req
)
667 struct ldb_context
*ldb
= ldb_module_get_ctx(module
);
668 struct ldb_request
*mod_req
, *last_req
= req
;
669 struct ldb_message
*mod_msg
;
670 struct partition_private_data
*data
;
671 struct dsdb_partition
*partition
= NULL
;
672 const char *casefold_dn
;
673 bool new_partition
= false;
675 /* Check if this is already a partition */
677 struct dsdb_create_partition_exop
*ex_op
= talloc_get_type(req
->op
.extended
.data
, struct dsdb_create_partition_exop
);
678 struct ldb_dn
*dn
= ex_op
->new_dn
;
680 data
= talloc_get_type(module
->private_data
, struct partition_private_data
);
682 /* We are not going to create a partition before we are even set up */
683 return LDB_ERR_UNWILLING_TO_PERFORM
;
686 for (i
=0; data
->partitions
&& data
->partitions
[i
]; i
++) {
687 if (ldb_dn_compare(data
->partitions
[i
]->ctrl
->dn
, dn
) == 0) {
688 partition
= data
->partitions
[i
];
694 char *partition_record
;
695 new_partition
= true;
696 mod_msg
= ldb_msg_new(req
);
699 return LDB_ERR_OPERATIONS_ERROR
;
702 mod_msg
->dn
= ldb_dn_new(mod_msg
, ldb
, DSDB_PARTITION_DN
);
703 ret
= ldb_msg_add_empty(mod_msg
, DSDB_PARTITION_ATTR
, LDB_FLAG_MOD_ADD
, NULL
);
704 if (ret
!= LDB_SUCCESS
) {
708 casefold_dn
= ldb_dn_get_casefold(dn
);
712 const char *p
, *sam_name
;
713 sam_name
= strrchr((const char *)ldb_get_opaque(ldb
, "ldb_url"), '/');
715 return LDB_ERR_OPERATIONS_ERROR
;
719 for (p
= casefold_dn
; *p
; p
++) {
720 /* We have such a strict check because
721 * I don't want shell metacharacters
722 * in the file name, nor ../, but I do
723 * want it to be easily typed if SAFE
725 if (!(isalnum(*p
) || *p
== ' ' || *p
== '=' || *p
== ',')) {
730 escaped
= rfc1738_escape_part(mod_msg
, casefold_dn
);
733 return LDB_ERR_OPERATIONS_ERROR
;
735 filename
= talloc_asprintf(mod_msg
, "%s.d/%s.ldb", sam_name
, escaped
);
736 talloc_free(escaped
);
738 filename
= talloc_asprintf(mod_msg
, "%s.d/%s.ldb", sam_name
, casefold_dn
);
743 return LDB_ERR_OPERATIONS_ERROR
;
746 partition_record
= talloc_asprintf(mod_msg
, "%s:%s", casefold_dn
, filename
);
748 ret
= ldb_msg_add_steal_string(mod_msg
, DSDB_PARTITION_ATTR
, partition_record
);
749 if (ret
!= LDB_SUCCESS
) {
753 /* Perform modify on @PARTITION record */
754 ret
= ldb_build_mod_req(&mod_req
, ldb
, req
, mod_msg
, NULL
, NULL
,
755 ldb_op_default_callback
, req
);
757 if (ret
!= LDB_SUCCESS
) {
763 ret
= ldb_next_request(module
, mod_req
);
764 if (ret
== LDB_SUCCESS
) {
765 ret
= ldb_wait(mod_req
->handle
, LDB_WAIT_ALL
);
768 if (ret
!= LDB_SUCCESS
) {
772 /* Make a partition structure for this new partition, so we can copy in the template structure */
773 ret
= new_partition_from_dn(ldb
, data
, req
, ldb_dn_copy(req
, dn
), filename
, &partition
);
774 if (ret
!= LDB_SUCCESS
) {
777 talloc_steal(partition
, partition_record
);
778 partition
->orig_record
= data_blob_string_const(partition_record
);
781 ret
= new_partition_set_replicated_metadata(ldb
, module
, last_req
, data
, partition
);
782 if (ret
!= LDB_SUCCESS
) {
787 ret
= add_partition_to_data(ldb
, data
, partition
);
788 if (ret
!= LDB_SUCCESS
) {
793 /* send request done */
794 return ldb_module_done(req
, NULL
, NULL
, LDB_SUCCESS
);
798 int partition_init(struct ldb_module
*module
)
801 TALLOC_CTX
*mem_ctx
= talloc_new(module
);
802 struct ldb_context
*ldb
= ldb_module_get_ctx(module
);
803 struct partition_private_data
*data
;
806 return LDB_ERR_OPERATIONS_ERROR
;
809 data
= talloc_zero(mem_ctx
, struct partition_private_data
);
811 return LDB_ERR_OPERATIONS_ERROR
;
814 /* When used from Samba4, this message is set by the samba4
815 * module, as a fixed value not read from the DB. This avoids
816 * listing modules in the DB */
817 data
->forced_module_msg
= talloc_get_type(
819 DSDB_OPAQUE_PARTITION_MODULE_MSG_OPAQUE_NAME
),
822 /* This loads the partitions */
823 ret
= partition_reload_if_required(module
, data
);
824 if (ret
!= LDB_SUCCESS
) {
828 module
->private_data
= talloc_steal(module
, data
);
829 talloc_free(mem_ctx
);
831 ret
= ldb_mod_register_control(module
, LDB_CONTROL_DOMAIN_SCOPE_OID
);
832 if (ret
!= LDB_SUCCESS
) {
833 ldb_debug(ldb
, LDB_DEBUG_ERROR
,
834 "partition: Unable to register control with rootdse!\n");
835 return LDB_ERR_OPERATIONS_ERROR
;
838 ret
= ldb_mod_register_control(module
, LDB_CONTROL_SEARCH_OPTIONS_OID
);
839 if (ret
!= LDB_SUCCESS
) {
840 ldb_debug(ldb
, LDB_DEBUG_ERROR
,
841 "partition: Unable to register control with rootdse!\n");
842 return LDB_ERR_OPERATIONS_ERROR
;
845 return ldb_next_init(module
);