krb5: Fix API: ccache failure
[heimdal.git] / kadmin / del.c
blobb2ed73500c75a4329a39d3457f19bf9578b41e3d
1 /*
2 * Copyright (c) 1997 - 2004 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
4 * All rights reserved.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * 3. Neither the name of the Institute nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
34 #include "kadmin_locl.h"
35 #include "kadmin-commands.h"
37 static int
38 do_del_entry(krb5_principal principal, void *data)
40 return kadm5_delete_principal(kadm_handle, principal);
43 int
44 del_entry(void *opt, int argc, char **argv)
46 int i;
47 krb5_error_code ret = 0;
49 for(i = 0; i < argc; i++) {
50 ret = foreach_principal(argv[i], do_del_entry, "del", NULL);
51 if (ret)
52 break;
54 return ret != 0;
57 static int
58 do_del_ns_entry(krb5_principal nsp, void *data)
60 krb5_error_code ret;
61 krb5_principal p = NULL;
62 const char *comp0 = krb5_principal_get_comp_string(context, nsp, 0);
63 const char *comp1 = krb5_principal_get_comp_string(context, nsp, 1);
64 char *unsp = NULL;
66 if (krb5_principal_get_num_comp(context, nsp) != 2) {
67 (void) krb5_unparse_name(context, nsp, &unsp);
68 krb5_warn(context, ret = EINVAL, "Not a valid namespace name %s",
69 unsp ? unsp : "<Out of memory>");
70 return EINVAL;
73 ret = krb5_make_principal(context, &p,
74 krb5_principal_get_realm(context, nsp),
75 "WELLKNOWN", HDB_WK_NAMESPACE, NULL);
76 if (ret == 0)
77 ret = krb5_principal_set_comp_string(context, p, 2, comp0);
78 if (ret == 0)
79 ret = krb5_principal_set_comp_string(context, p, 3, comp1);
80 if (ret == 0)
81 ret = kadm5_delete_principal(kadm_handle, p);
82 krb5_free_principal(context, p);
83 free(unsp);
84 return ret;
87 int
88 del_namespace(void *opt, int argc, char **argv)
90 int i;
91 krb5_error_code ret = 0;
93 for(i = 0; i < argc; i++) {
94 ret = foreach_principal(argv[i], do_del_ns_entry, "del_ns", NULL);
95 if (ret)
96 break;
98 return ret != 0;