2 * Copyright (c) 1997 - 2001, 2003, 2005 - 2006 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
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
34 #include "kadm5_locl.h"
38 struct delete_principal_hook_ctx
{
39 kadm5_server_context
*context
;
40 enum kadm5_hook_stage stage
;
42 krb5_const_principal princ
;
45 static krb5_error_code KRB5_LIB_CALL
46 delete_principal_hook_cb(krb5_context context
,
52 const struct kadm5_hook_ftable
*ftable
= hook
;
53 struct delete_principal_hook_ctx
*ctx
= userctx
;
55 ret
= ftable
->delete(context
, hookctx
,
56 ctx
->stage
, ctx
->code
, ctx
->princ
);
57 if (ret
!= 0 && ret
!= KRB5_PLUGIN_NO_HANDLE
)
58 _kadm5_s_set_hook_error_message(ctx
->context
, ret
, "delete",
61 /* only pre-commit plugins can abort */
62 if (ret
== 0 || ctx
->stage
== KADM5_HOOK_STAGE_POSTCOMMIT
)
63 ret
= KRB5_PLUGIN_NO_HANDLE
;
69 delete_principal_hook(kadm5_server_context
*context
,
70 enum kadm5_hook_stage stage
,
72 krb5_const_principal princ
)
75 struct delete_principal_hook_ctx ctx
;
77 ctx
.context
= context
;
82 ret
= _krb5_plugin_run_f(context
->context
, &kadm5_hook_plugin_data
,
83 0, &ctx
, delete_principal_hook_cb
);
84 if (ret
== KRB5_PLUGIN_NO_HANDLE
)
91 kadm5_s_delete_principal(void *server_handle
, krb5_principal princ
)
93 kadm5_server_context
*context
= server_handle
;
97 memset(&ent
, 0, sizeof(ent
));
98 if (!context
->keep_open
) {
99 ret
= context
->db
->hdb_open(context
->context
, context
->db
, O_RDWR
, 0);
101 krb5_warn(context
->context
, ret
, "opening database");
106 ret
= kadm5_log_init(context
);
110 ret
= context
->db
->hdb_fetch_kvno(context
->context
, context
->db
, princ
,
111 HDB_F_DECRYPT
|HDB_F_GET_ANY
|HDB_F_ADMIN_DATA
,
113 if (ret
== HDB_ERR_NOENTRY
)
115 if (ent
.flags
.immutable
) {
116 ret
= KADM5_PROTECT_PRINCIPAL
;
120 ret
= delete_principal_hook(context
, KADM5_HOOK_STAGE_PRECOMMIT
, 0, princ
);
124 ret
= hdb_seal_keys(context
->context
, context
->db
, &ent
);
128 /* This logs the change for iprop and writes to the HDB */
129 ret
= kadm5_log_delete(context
, princ
);
131 (void) delete_principal_hook(context
, KADM5_HOOK_STAGE_POSTCOMMIT
, ret
, princ
);
134 hdb_free_entry(context
->context
, context
->db
, &ent
);
136 (void) kadm5_log_end(context
);
138 if (!context
->keep_open
) {
140 ret2
= context
->db
->hdb_close(context
->context
, context
->db
);
141 if (ret
== 0 && ret2
!= 0)
144 return _kadm5_error_code(ret
);