1/* 2 * Copyright (c) 1997-2001, 2003-2006 Kungliga Tekniska Högskolan 3 * (Royal Institute of Technology, Stockholm, Sweden). 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 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. 16 * 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. 20 * 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. 32 */ 33 34#include "kadm5_locl.h" 35 36RCSID("$Id$"); 37 38/* 39 * Set the keys of `princ' to random values, returning the random keys 40 * in `new_keys', `n_keys'. 41 */ 42 43kadm5_ret_t 44kadm5_s_randkey_principal(void *server_handle, 45 krb5_principal princ, 46 krb5_boolean keepold, 47 int n_ks_tuple, 48 krb5_key_salt_tuple *ks_tuple, 49 krb5_keyblock **new_keys, 50 int *n_keys) 51{ 52 kadm5_server_context *context = server_handle; 53 hdb_entry_ex ent; 54 kadm5_ret_t ret; 55 56 memset(&ent, 0, sizeof(ent)); 57 if (!context->keep_open) { 58 ret = context->db->hdb_open(context->context, context->db, O_RDWR, 0); 59 if(ret) 60 return ret; 61 } 62 ret = context->db->hdb_fetch_kvno(context->context, context->db, princ, 63 HDB_F_GET_ANY|HDB_F_ADMIN_DATA, 0, &ent); 64 if(ret) 65 goto out; 66 67 if (keepold) { 68 ret = hdb_add_current_keys_to_history(context->context, &ent.entry); 69 if (ret) 70 goto out2; 71 } 72 73 ret = _kadm5_set_keys_randomly (context, 74 &ent.entry, 75 n_ks_tuple, 76 ks_tuple, 77 new_keys, 78 n_keys); 79 if (ret) 80 goto out2; 81 ent.entry.kvno++; 82 83 ret = _kadm5_set_modifier(context, &ent.entry); 84 if(ret) 85 goto out3; 86 ret = _kadm5_bump_pw_expire(context, &ent.entry); 87 if (ret) 88 goto out2; 89 90 if (keepold) { 91 ret = hdb_seal_keys(context->context, context->db, &ent.entry); 92 if (ret) 93 goto out2; 94 } else { 95 HDB_extension ext; 96 97 ext.data.element = choice_HDB_extension_data_hist_keys; 98 ext.data.u.hist_keys.len = 0; 99 ext.data.u.hist_keys.val = NULL; 100 hdb_replace_extension(context->context, &ent.entry, &ext); 101 } 102 103 ret = context->db->hdb_store(context->context, context->db, 104 HDB_F_REPLACE, &ent); 105 if (ret) 106 goto out2; 107 108 kadm5_log_modify (context, 109 &ent.entry, 110 KADM5_PRINCIPAL | KADM5_MOD_NAME | KADM5_MOD_TIME | 111 KADM5_KEY_DATA | KADM5_KVNO | KADM5_PW_EXPIRATION | 112 KADM5_TL_DATA); 113 114out3: 115 if (ret) { 116 int i; 117 118 for (i = 0; i < *n_keys; ++i) 119 krb5_free_keyblock_contents (context->context, &(*new_keys)[i]); 120 free (*new_keys); 121 *new_keys = NULL; 122 *n_keys = 0; 123 } 124out2: 125 hdb_free_entry(context->context, &ent); 126out: 127 if (!context->keep_open) 128 context->db->hdb_close(context->context, context->db); 129 return _kadm5_error_code(ret); 130} 131