s4-dbcheck: support the 'none' option for prompts
[gd/samba-autobuild/.git] / lib / ldb / tools / ldbmodify.c
1 /* 
2    ldb database library
3
4    Copyright (C) Andrew Tridgell  2004
5
6      ** NOTE! The following LGPL license applies to the ldb
7      ** library. This does NOT imply that all of Samba is released
8      ** under the LGPL
9    
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.
14
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.
19
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/>.
22 */
23
24 /*
25  *  Name: ldb
26  *
27  *  Component: ldbmodify
28  *
29  *  Description: utility to modify records - modelled on ldapmodify
30  *
31  *  Author: Andrew Tridgell
32  */
33
34 #include "ldb.h"
35 #include "tools/cmdline.h"
36 #include "ldbutil.h"
37
38 static unsigned int failures;
39 static struct ldb_cmdline *options;
40
41 static void usage(struct ldb_context *ldb)
42 {
43         printf("Usage: ldbmodify <options> <ldif...>\n");
44         printf("Modifies a ldb based upon ldif change records\n\n");
45         ldb_cmdline_help(ldb, "ldbmodify", stdout);
46         exit(LDB_ERR_OPERATIONS_ERROR);
47 }
48
49 /*
50   process modifies for one file
51 */
52 static int process_file(struct ldb_context *ldb, FILE *f, unsigned int *count)
53 {
54         struct ldb_ldif *ldif;
55         int fun_ret = LDB_SUCCESS, ret;
56         struct ldb_control **req_ctrls = ldb_parse_control_strings(ldb, ldb, (const char **)options->controls);
57
58         if (options->controls != NULL &&  req_ctrls== NULL) {
59                 printf("parsing controls failed: %s\n", ldb_errstring(ldb));
60                 exit(LDB_ERR_OPERATIONS_ERROR);
61         }
62
63         while ((ldif = ldb_ldif_read_file(ldb, f))) {
64                 struct ldb_dn *olddn;
65                 bool deleteoldrdn = false;
66                 struct ldb_dn *newdn;
67                 const char *errstr = NULL;
68
69                 switch (ldif->changetype) {
70                 case LDB_CHANGETYPE_NONE:
71                 case LDB_CHANGETYPE_ADD:
72                         ret = ldb_add_ctrl(ldb, ldif->msg,req_ctrls);
73                         break;
74                 case LDB_CHANGETYPE_DELETE:
75                         ret = ldb_delete_ctrl(ldb, ldif->msg->dn,req_ctrls);
76                         break;
77                 case LDB_CHANGETYPE_MODIFY:
78                         ret = ldb_modify_ctrl(ldb, ldif->msg,req_ctrls);
79                         break;
80                 case LDB_CHANGETYPE_MODRDN:
81                         ret = ldb_ldif_parse_modrdn(ldb, ldif, ldif, &olddn,
82                                                     NULL, &deleteoldrdn,
83                                                     NULL, &newdn);
84                         if (ret == LDB_SUCCESS) {
85                                 if (deleteoldrdn) {
86                                         ret = ldb_rename(ldb, olddn, newdn);
87                                 } else {
88                                         errstr = "modrdn: deleteoldrdn=0 "
89                                                  "not supported.";
90                                         ret = LDB_ERR_CONSTRAINT_VIOLATION;
91                                 }
92                         }
93                         break;
94                 }
95                 if (ret != LDB_SUCCESS) {
96                         if (errstr == NULL) {
97                                 errstr = ldb_errstring(ldb);
98                         }
99                         fprintf(stderr, "ERR: (%s) \"%s\" on DN %s\n",
100                                 ldb_strerror(ret),
101                                 errstr, ldb_dn_get_linearized(ldif->msg->dn));
102                         failures++;
103                         fun_ret = ret;
104                 } else {
105                         (*count)++;
106                         if (options->verbose) {
107                                 printf("Modified %s\n", ldb_dn_get_linearized(ldif->msg->dn));
108                         }
109                 }
110                 ldb_ldif_read_free(ldb, ldif);
111         }
112
113         if (!feof(f)) {
114                 fprintf(stderr, "Failed to parse ldif\n");
115                 fun_ret = LDB_ERR_OPERATIONS_ERROR;
116         }
117
118         return fun_ret;
119 }
120
121 int main(int argc, const char **argv)
122 {
123         struct ldb_context *ldb;
124         unsigned int i, count = 0;
125         int ret = LDB_SUCCESS;
126         TALLOC_CTX *mem_ctx = talloc_new(NULL);
127
128         ldb = ldb_init(mem_ctx, NULL);
129         if (ldb == NULL) {
130                 return LDB_ERR_OPERATIONS_ERROR;
131         }
132
133         options = ldb_cmdline_process(ldb, argc, argv, usage);
134
135         if (options->argc == 0) {
136                 ret = process_file(ldb, stdin, &count);
137         } else {
138                 for (i=0;i<options->argc;i++) {
139                         const char *fname = options->argv[i];
140                         FILE *f;
141                         f = fopen(fname, "r");
142                         if (!f) {
143                                 perror(fname);
144                                 return LDB_ERR_OPERATIONS_ERROR;
145                         }
146                         ret = process_file(ldb, f, &count);
147                         fclose(f);
148                 }
149         }
150
151         talloc_free(mem_ctx);
152
153         printf("Modified %u records with %u failures\n", count, failures);
154
155         return ret;
156 }