Fix kadm5 error cleanup
[heimdal.git] / lib / kadm5 / chpass_s.c
blobd1ed7320742096c6d521ffb90702d4619ceb1b20
1 /*
2 * Copyright (c) 1997-2006 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 "kadm5_locl.h"
36 RCSID("$Id$");
38 static kadm5_ret_t
39 change(void *server_handle,
40 krb5_principal princ,
41 int keepold,
42 int n_ks_tuple,
43 krb5_key_salt_tuple *ks_tuple,
44 const char *password,
45 int cond)
47 kadm5_server_context *context = server_handle;
48 hdb_entry_ex ent;
49 kadm5_ret_t ret;
50 Key *keys;
51 size_t num_keys;
52 int existsp = 0;
54 memset(&ent, 0, sizeof(ent));
55 if (!context->keep_open) {
56 ret = context->db->hdb_open(context->context, context->db, O_RDWR, 0);
57 if(ret)
58 return ret;
61 ret = kadm5_log_init(context);
62 if (ret)
63 goto out;
65 ret = context->db->hdb_fetch_kvno(context->context, context->db, princ,
66 HDB_F_DECRYPT|HDB_F_GET_ANY|HDB_F_ADMIN_DATA, 0, &ent);
67 if (ret)
68 goto out2;
70 if (keepold || cond) {
72 * We save these for now so we can handle password history checking;
73 * we handle keepold further below.
75 ret = hdb_add_current_keys_to_history(context->context, &ent.entry);
76 if (ret)
77 goto out3;
80 if (context->db->hdb_capability_flags & HDB_CAP_F_HANDLE_PASSWORDS) {
81 ret = context->db->hdb_password(context->context, context->db,
82 &ent, password, cond);
83 if (ret)
84 goto out3;
85 } else {
87 num_keys = ent.entry.keys.len;
88 keys = ent.entry.keys.val;
90 ent.entry.keys.len = 0;
91 ent.entry.keys.val = NULL;
93 ret = _kadm5_set_keys(context, &ent.entry, n_ks_tuple, ks_tuple,
94 password);
95 if(ret) {
96 _kadm5_free_keys(context->context, num_keys, keys);
97 goto out3;
99 _kadm5_free_keys(context->context, num_keys, keys);
101 if (cond) {
102 HDB_extension *ext;
104 ext = hdb_find_extension(&ent.entry, choice_HDB_extension_data_hist_keys);
105 if (ext != NULL)
106 existsp = _kadm5_exists_keys_hist(ent.entry.keys.val,
107 ent.entry.keys.len,
108 &ext->data.u.hist_keys);
111 if (existsp) {
112 ret = KADM5_PASS_REUSE;
113 krb5_set_error_message(context->context, ret,
114 "Password reuse forbidden");
115 goto out3;
118 ent.entry.kvno++;
120 ent.entry.flags.require_pwchange = 0;
122 if (!keepold) {
123 HDB_extension ext;
125 memset(&ext, 0, sizeof (ext));
126 ext.mandatory = FALSE;
127 ext.data.element = choice_HDB_extension_data_hist_keys;
128 ret = hdb_replace_extension(context->context, &ent.entry, &ext);
129 if (ret)
130 goto out3;
133 ret = hdb_seal_keys(context->context, context->db, &ent.entry);
134 if (ret)
135 goto out3;
137 ret = _kadm5_set_modifier(context, &ent.entry);
138 if(ret)
139 goto out3;
141 ret = _kadm5_bump_pw_expire(context, &ent.entry);
142 if (ret)
143 goto out3;
145 /* This logs the change for iprop and writes to the HDB */
146 ret = kadm5_log_modify(context, &ent.entry,
147 KADM5_ATTRIBUTES | KADM5_PRINCIPAL |
148 KADM5_MOD_NAME | KADM5_MOD_TIME |
149 KADM5_KEY_DATA | KADM5_KVNO |
150 KADM5_PW_EXPIRATION | KADM5_TL_DATA);
152 out3:
153 hdb_free_entry(context->context, &ent);
154 out2:
155 (void) kadm5_log_end(context);
156 out:
157 if (!context->keep_open) {
158 kadm5_ret_t ret2;
159 ret2 = context->db->hdb_close(context->context, context->db);
160 if (ret == 0 && ret2 != 0)
161 ret = ret2;
163 return _kadm5_error_code(ret);
169 * change the password of `princ' to `password' if it's not already that.
172 kadm5_ret_t
173 kadm5_s_chpass_principal_cond(void *server_handle,
174 krb5_principal princ,
175 int keepold,
176 const char *password)
178 return change (server_handle, princ, keepold, 0, NULL, password, 1);
182 * change the password of `princ' to `password'
185 kadm5_ret_t
186 kadm5_s_chpass_principal(void *server_handle,
187 krb5_principal princ,
188 int keepold,
189 int n_ks_tuple,
190 krb5_key_salt_tuple *ks_tuple,
191 const char *password)
193 return change (server_handle, princ, keepold,
194 n_ks_tuple, ks_tuple, password, 0);
198 * change keys for `princ' to `keys'
201 kadm5_ret_t
202 kadm5_s_chpass_principal_with_key(void *server_handle,
203 krb5_principal princ,
204 int keepold,
205 int n_key_data,
206 krb5_key_data *key_data)
208 kadm5_server_context *context = server_handle;
209 hdb_entry_ex ent;
210 kadm5_ret_t ret;
212 memset(&ent, 0, sizeof(ent));
213 if (!context->keep_open) {
214 ret = context->db->hdb_open(context->context, context->db, O_RDWR, 0);
215 if(ret)
216 return ret;
219 ret = kadm5_log_init(context);
220 if (ret)
221 goto out;
223 ret = context->db->hdb_fetch_kvno(context->context, context->db, princ, 0,
224 HDB_F_GET_ANY|HDB_F_ADMIN_DATA, &ent);
225 if (ret == HDB_ERR_NOENTRY)
226 goto out2;
227 if (keepold) {
228 ret = hdb_add_current_keys_to_history(context->context, &ent.entry);
229 if (ret)
230 goto out3;
232 ret = _kadm5_set_keys2(context, &ent.entry, n_key_data, key_data);
233 if (ret)
234 goto out3;
235 ent.entry.kvno++;
236 ret = _kadm5_set_modifier(context, &ent.entry);
237 if (ret)
238 goto out3;
239 ret = _kadm5_bump_pw_expire(context, &ent.entry);
240 if (ret)
241 goto out3;
243 if (keepold) {
244 ret = hdb_seal_keys(context->context, context->db, &ent.entry);
245 if (ret)
246 goto out3;
247 } else {
248 HDB_extension ext;
250 memset(&ext, 0, sizeof (ext));
251 ext.mandatory = FALSE;
252 ext.data.element = choice_HDB_extension_data_hist_keys;
253 ext.data.u.hist_keys.len = 0;
254 ext.data.u.hist_keys.val = NULL;
255 hdb_replace_extension(context->context, &ent.entry, &ext);
258 /* This logs the change for iprop and writes to the HDB */
259 ret = kadm5_log_modify(context, &ent.entry,
260 KADM5_PRINCIPAL | KADM5_MOD_NAME |
261 KADM5_MOD_TIME | KADM5_KEY_DATA | KADM5_KVNO |
262 KADM5_PW_EXPIRATION | KADM5_TL_DATA);
264 out3:
265 hdb_free_entry(context->context, &ent);
266 out2:
267 (void) kadm5_log_end(context);
268 out:
269 if (!context->keep_open) {
270 kadm5_ret_t ret2;
271 ret2 = context->db->hdb_close(context->context, context->db);
272 if (ret == 0 && ret2 != 0)
273 ret = ret2;
275 return _kadm5_error_code(ret);