s4-ldb: use TYPESAFE_QSORT() in the rest of the ldb code
[ira/wip.git] / source4 / lib / ldb / tools / ldbdel.c
index 72540db07ae507a102731f08a158e69c2f9622f5..1b8adf714c9e44cb6d9dba5a828709af7bd29d3c 100644 (file)
@@ -10,7 +10,7 @@
    This library is free software; you can redistribute it and/or
    modify it under the terms of the GNU Lesser General Public
    License as published by the Free Software Foundation; either
-   version 2 of the License, or (at your option) any later version.
+   version 3 of the License, or (at your option) any later version.
 
    This library is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
@@ -18,8 +18,7 @@
    Lesser General Public License for more details.
 
    You should have received a copy of the GNU Lesser General Public
-   License along with this library; if not, write to the Free Software
-   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+   License along with this library; if not, see <http://www.gnu.org/licenses/>.
 */
 
 /*
  *  Author: Andrew Tridgell
  */
 
-#include "includes.h"
-#include "ldb/include/ldb.h"
-#include "ldb/include/ldb_private.h"
+#include "ldb.h"
+#include "tools/cmdline.h"
+#include "ldbutil.h"
+#include "replace.h"
 
-#ifdef _SAMBA_BUILD_
-#include "system/filesys.h"
-#endif
+static int dn_cmp(struct ldb_message **msg1, struct ldb_message **msg2)
+{
+       return ldb_dn_compare((*msg1)->dn, (*msg2)->dn);
+}
 
-static int ldb_delete_recursive(struct ldb_context *ldb, const char *dn)
+static int ldb_delete_recursive(struct ldb_context *ldb, struct ldb_dn *dn,struct ldb_control **req_ctrls)
 {
        int ret, i, total=0;
-       const char *attrs[] = { "dn", NULL };
-       struct ldb_message **res;
+       const char *attrs[] = { NULL };
+       struct ldb_result *res;
        
-       ret = ldb_search(ldb, dn, LDB_SCOPE_SUBTREE, "dn=*", attrs, &res);
-       if (ret <= 0) return -1;
+       ret = ldb_search(ldb, ldb, &res, dn, LDB_SCOPE_SUBTREE, attrs, "distinguishedName=*");
+       if (ret != LDB_SUCCESS) return -1;
+
+       /* sort the DNs, deepest first */
+       TYPESAFE_QSORT(res->msgs, res->count, dn_cmp);
 
-       for (i=0;i<ret;i++) {
-               if (ldb_delete(ldb, res[i]->dn) == 0) {
+       for (i = 0; i < res->count; i++) {
+               if (ldb_delete_ctrl(ldb, res->msgs[i]->dn,req_ctrls) == 0) {
                        total++;
+               } else {
+                       printf("Failed to delete '%s' - %s\n",
+                              ldb_dn_get_linearized(res->msgs[i]->dn),
+                              ldb_errstring(ldb));
                }
        }
 
-       ldb_search_free(ldb, res);
+       talloc_free(res);
 
        if (total == 0) {
                return -1;
@@ -67,86 +75,58 @@ static int ldb_delete_recursive(struct ldb_context *ldb, const char *dn)
 static void usage(void)
 {
        printf("Usage: ldbdel <options> <DN...>\n");
-       printf("Options:\n");
-       printf("  -r               recursively delete the given subtree\n");
-       printf("  -H ldb_url       choose the database (or $LDB_URL)\n");
-       printf("  -o options       pass options like modules to activate\n");
-       printf("              e.g: -o modules:timestamps\n");
-       printf("\n");
        printf("Deletes records from a ldb\n\n");
+       ldb_cmdline_help("ldbdel", stdout);
        exit(1);
 }
 
- int main(int argc, char * const argv[])
+int main(int argc, const char **argv)
 {
+       struct ldb_control **req_ctrls;
+       struct ldb_cmdline *options;
        struct ldb_context *ldb;
-       const char **options = NULL;
-       int ldbopts;
-       int ret, i;
-       const char *ldb_url;
-       int opt, recursive=0;
-
-       ldb_url = getenv("LDB_URL");
-
-       ldbopts = 0;
-       while ((opt = getopt(argc, argv, "hH:ro:")) != EOF) {
-               switch (opt) {
-               case 'H':
-                       ldb_url = optarg;
-                       break;
-
-               case 'r':
-                       recursive=1;
-                       break;
-
-               case 'o':
-                       options = ldb_options_parse(options, &ldbopts, optarg);
-                       break;
-
-               case 'h':
-               default:
-                       usage();
-                       break;
-               }
-       }
+       int ret = 0, i;
 
-       if (!ldb_url) {
-               fprintf(stderr, "You must specify a ldb URL\n\n");
-               usage();
-       }
+       ldb = ldb_init(NULL, NULL);
 
-       argc -= optind;
-       argv += optind;
+       options = ldb_cmdline_process(ldb, argc, argv, usage);
 
-       if (argc < 1) {
+       if (options->argc < 1) {
                usage();
                exit(1);
        }
 
-       ldb = ldb_connect(ldb_url, 0, options);
-       if (!ldb) {
-               perror("ldb_connect");
-               exit(1);
+       req_ctrls = ldb_parse_control_strings(ldb, ldb, (const char **)options->controls);
+       if (options->controls != NULL &&  req_ctrls== NULL) {
+               printf("parsing controls failed: %s\n", ldb_errstring(ldb));
+               return -1;
        }
 
-       ldb_set_debug_stderr(ldb);
+       for (i=0;i<options->argc;i++) {
+               struct ldb_dn *dn;
 
-       for (i=0;i<argc;i++) {
-               if (recursive) {
-                       ret = ldb_delete_recursive(ldb, argv[i]);
+               dn = ldb_dn_new(ldb, ldb, options->argv[i]);
+               if ( ! ldb_dn_validate(dn)) {
+                       printf("Invalid DN format\n");
+                       exit(1);
+               }
+               if (options->recursive) {
+                       ret = ldb_delete_recursive(ldb, dn,req_ctrls);
                } else {
-                       ret = ldb_delete(ldb, argv[i]);
+                       ret = ldb_delete_ctrl(ldb, dn,req_ctrls);
                        if (ret == 0) {
                                printf("Deleted 1 record\n");
                        }
                }
                if (ret != 0) {
-                       printf("delete of '%s' failed - %s\n", 
-                              argv[i], ldb_errstring(ldb));
+                       printf("delete of '%s' failed - (%s) %s\n",
+                              ldb_dn_get_linearized(dn),
+                              ldb_strerror(ret),
+                              ldb_errstring(ldb));
                }
        }
 
        talloc_free(ldb);
 
-       return 0;
+       return ret;
 }