4 Copyright (C) Andrew Tridgell 2004
6 ** NOTE! The following LGPL license applies to the ldb
7 ** library. This does NOT imply that all of Samba is released
10 This library is free software; you can redistribute it and/or
11 modify it under the terms of the GNU Lesser General Public
12 License as published by the Free Software Foundation; either
13 version 3 of the License, or (at your option) any later version.
15 This library is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 Lesser General Public License for more details.
20 You should have received a copy of the GNU Lesser General Public
21 License along with this library; if not, see <http://www.gnu.org/licenses/>.
29 * Description: utility for ldb database editing
31 * Author: Andrew Tridgell
35 #include "system/filesys.h"
36 #include "system/time.h"
37 #include "system/filesys.h"
39 #include "tools/cmdline.h"
40 #include "tools/ldbutil.h"
42 static struct ldb_cmdline *options;
47 static void ldif_write_msg(struct ldb_context *ldb,
49 enum ldb_changetype changetype,
50 struct ldb_message *msg)
53 ldif.changetype = changetype;
55 ldb_ldif_write_file(ldb, f, &ldif);
59 modify a database record so msg1 becomes msg2
60 returns the number of modified elements
62 static int modify_record(struct ldb_context *ldb,
63 struct ldb_message *msg1,
64 struct ldb_message *msg2,
65 struct ldb_control **req_ctrls)
68 struct ldb_message *mod;
70 if (ldb_msg_difference(ldb, ldb, msg1, msg2, &mod) != LDB_SUCCESS) {
71 fprintf(stderr, "Failed to calculate message differences\n");
75 ret = mod->num_elements;
80 if (options->verbose > 0) {
81 ldif_write_msg(ldb, stdout, LDB_CHANGETYPE_MODIFY, mod);
84 if (ldb_modify_ctrl(ldb, mod, req_ctrls) != LDB_SUCCESS) {
85 fprintf(stderr, "failed to modify %s - %s\n",
86 ldb_dn_get_linearized(msg1->dn), ldb_errstring(ldb));
99 static struct ldb_message *msg_find(struct ldb_context *ldb,
100 struct ldb_message **msgs,
105 for (i=0;i<count;i++) {
106 if (ldb_dn_compare(dn, msgs[i]->dn) == 0) {
114 merge the changes in msgs2 into the messages from msgs1
116 static int merge_edits(struct ldb_context *ldb,
117 struct ldb_message **msgs1, unsigned int count1,
118 struct ldb_message **msgs2, unsigned int count2)
121 struct ldb_message *msg;
123 unsigned int adds=0, modifies=0, deletes=0;
124 struct ldb_control **req_ctrls = ldb_parse_control_strings(ldb, ldb, (const char **)options->controls);
125 if (options->controls != NULL && req_ctrls == NULL) {
126 fprintf(stderr, "parsing controls failed: %s\n", ldb_errstring(ldb));
130 if (ldb_transaction_start(ldb) != LDB_SUCCESS) {
131 fprintf(stderr, "Failed to start transaction: %s\n", ldb_errstring(ldb));
135 /* do the adds and modifies */
136 for (i=0;i<count2;i++) {
137 msg = msg_find(ldb, msgs1, count1, msgs2[i]->dn);
139 if (options->verbose > 0) {
140 ldif_write_msg(ldb, stdout, LDB_CHANGETYPE_ADD, msgs2[i]);
142 if (ldb_add_ctrl(ldb, msgs2[i], req_ctrls) != LDB_SUCCESS) {
143 fprintf(stderr, "failed to add %s - %s\n",
144 ldb_dn_get_linearized(msgs2[i]->dn),
146 ldb_transaction_cancel(ldb);
151 if (modify_record(ldb, msg, msgs2[i], req_ctrls) > 0) {
158 for (i=0;i<count1;i++) {
159 msg = msg_find(ldb, msgs2, count2, msgs1[i]->dn);
161 if (options->verbose > 0) {
162 ldif_write_msg(ldb, stdout, LDB_CHANGETYPE_DELETE, msgs1[i]);
164 if (ldb_delete_ctrl(ldb, msgs1[i]->dn, req_ctrls) != LDB_SUCCESS) {
165 fprintf(stderr, "failed to delete %s - %s\n",
166 ldb_dn_get_linearized(msgs1[i]->dn),
168 ldb_transaction_cancel(ldb);
175 if (ldb_transaction_commit(ldb) != LDB_SUCCESS) {
176 fprintf(stderr, "Failed to commit transaction: %s\n", ldb_errstring(ldb));
180 printf("# %u adds %u modifies %u deletes\n", adds, modifies, deletes);
186 save a set of messages as ldif to a file
188 static int save_ldif(struct ldb_context *ldb,
189 FILE *f, struct ldb_message **msgs, unsigned int count)
193 fprintf(f, "# editing %u records\n", count);
195 for (i=0;i<count;i++) {
196 struct ldb_ldif ldif;
197 fprintf(f, "# record %u\n", i+1);
199 ldif.changetype = LDB_CHANGETYPE_NONE;
202 ldb_ldif_write_file(ldb, f, &ldif);
210 edit the ldb search results in msgs using the user selected editor
212 static int do_edit(struct ldb_context *ldb, struct ldb_message **msgs1,
213 unsigned int count1, const char *editor)
217 char file_template[] = "/tmp/ldbedit.XXXXXX";
219 struct ldb_ldif *ldif;
220 struct ldb_message **msgs2 = NULL;
221 unsigned int count2 = 0;
223 /* write out the original set of messages to a temporary
225 fd = mkstemp(file_template);
228 perror(file_template);
232 f = fdopen(fd, "r+");
237 unlink(file_template);
241 if (save_ldif(ldb, f, msgs1, count1) != 0) {
247 cmd = talloc_asprintf(ldb, "%s %s", editor, file_template);
250 unlink(file_template);
251 fprintf(stderr, "out of memory\n");
260 unlink(file_template);
261 fprintf(stderr, "edit with %s failed\n", editor);
265 /* read the resulting ldif into msgs2 */
266 f = fopen(file_template, "r");
268 perror(file_template);
272 while ((ldif = ldb_ldif_read_file(ldb, f))) {
273 msgs2 = talloc_realloc(ldb, msgs2, struct ldb_message *, count2+1);
275 fprintf(stderr, "out of memory");
278 msgs2[count2++] = ldif->msg;
282 unlink(file_template);
284 return merge_edits(ldb, msgs1, count1, msgs2, count2);
287 static void usage(struct ldb_context *ldb)
289 printf("Usage: ldbedit <options> <expression> <attributes ...>\n");
290 ldb_cmdline_help(ldb, "ldbedit", stdout);
294 int main(int argc, const char **argv)
296 struct ldb_context *ldb;
297 struct ldb_result *result = NULL;
298 struct ldb_dn *basedn = NULL;
300 const char *expression = "(|(objectClass=*)(distinguishedName=*))";
301 const char * const * attrs = NULL;
302 TALLOC_CTX *mem_ctx = talloc_new(NULL);
303 struct ldb_control **req_ctrls;
305 ldb = ldb_init(mem_ctx, NULL);
307 options = ldb_cmdline_process(ldb, argc, argv, usage);
309 /* the check for '=' is for compatibility with ldapsearch */
310 if (options->argc > 0 &&
311 strchr(options->argv[0], '=')) {
312 expression = options->argv[0];
317 if (options->argc > 0) {
318 attrs = (const char * const *)(options->argv);
321 if (options->basedn != NULL) {
322 basedn = ldb_dn_new(ldb, ldb, options->basedn);
323 if ( ! ldb_dn_validate(basedn)) {
324 printf("Invalid Base DN format\n");
329 req_ctrls = ldb_parse_control_strings(ldb, ldb, (const char **)options->controls);
330 if (options->controls != NULL && req_ctrls== NULL) {
331 printf("parsing controls failed: %s\n", ldb_errstring(ldb));
335 ret = ldb_search_ctrl(ldb, ldb, &result, basedn, options->scope, attrs, req_ctrls, "%s", expression);
336 if (ret != LDB_SUCCESS) {
337 printf("search failed - %s\n", ldb_errstring(ldb));
341 if (result->count == 0) {
342 printf("no matching records - cannot edit\n");
346 do_edit(ldb, result->msgs, result->count, options->editor);
349 ret = talloc_free(result);
351 fprintf(stderr, "talloc_free failed\n");
356 talloc_free(mem_ctx);