1 /* 2 * Copyright (c) 1997 - 2001 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 "ktutil_locl.h" 35 36 RCSID("$Id: change.c,v 1.4 2001/07/23 09:46:40 joda Exp $"); 37 38 static void 39 change_entry (krb5_context context, krb5_keytab keytab, 40 krb5_keytab_entry *entry, 41 const char *realm, const char *admin_server, int server_port) 42 { 43 krb5_error_code ret; 44 kadm5_config_params conf; 45 void *kadm_handle; 46 char *client_name; 47 krb5_keyblock *keys; 48 int num_keys; 49 int i; 50 51 ret = krb5_unparse_name (context, entry->principal, &client_name); 52 if (ret) { 53 krb5_warn (context, ret, "krb5_unparse_name"); 54 return; 55 } 56 57 memset (&conf, 0, sizeof(conf)); 58 59 if(realm) 60 conf.realm = (char *)realm; 61 else 62 conf.realm = *krb5_princ_realm (context, entry->principal); 63 conf.mask |= KADM5_CONFIG_REALM; 64 65 if (admin_server) { 66 conf.admin_server = (char *)admin_server; 67 conf.mask |= KADM5_CONFIG_ADMIN_SERVER; 68 } 69 70 if (server_port) { 71 conf.kadmind_port = htons(server_port); 72 conf.mask |= KADM5_CONFIG_KADMIND_PORT; 73 } 74 75 ret = kadm5_init_with_skey_ctx (context, 76 client_name, 77 keytab_string, 78 KADM5_ADMIN_SERVICE, 79 &conf, 0, 0, 80 &kadm_handle); 81 free (client_name); 82 if (ret) { 83 krb5_warn (context, ret, "kadm5_c_init_with_skey_ctx"); 84 return; 85 } 86 ret = kadm5_randkey_principal (kadm_handle, entry->principal, 87 &keys, &num_keys); 88 kadm5_destroy (kadm_handle); 89 if (ret) { 90 krb5_warn(context, ret, "kadm5_randkey_principal"); 91 return; 92 } 93 for (i = 0; i < num_keys; ++i) { 94 krb5_keytab_entry new_entry; 95 96 new_entry = *entry; 97 new_entry.timestamp = time (NULL); 98 ++new_entry.vno; 99 new_entry.keyblock = keys[i]; 100 101 ret = krb5_kt_add_entry (context, keytab, &new_entry); 102 if (ret) 103 krb5_warn (context, ret, "krb5_kt_add_entry"); 104 krb5_free_keyblock_contents (context, &keys[i]); 105 } 106 } 107 108 /* 109 * loop over all the entries in the keytab (or those given) and change 110 * their keys, writing the new keys 111 */ 112 113 int 114 kt_change (int argc, char **argv) 115 { 116 krb5_error_code ret; 117 krb5_keytab keytab; 118 krb5_kt_cursor cursor; 119 krb5_keytab_entry entry; 120 char *realm = NULL; 121 char *admin_server = NULL; 122 int server_port = 0; 123 int help_flag = 0; 124 int optind = 0; 125 int j, max; 126 krb5_principal *princs; 127 128 struct getargs args[] = { 129 { "realm", 'r', arg_string, NULL, 130 "realm to use", "realm" 131 }, 132 { "admin-server", 'a', arg_string, NULL, 133 "server to contact", "host" 134 }, 135 { "server-port", 's', arg_integer, NULL, 136 "port to contact", "port number" 137 }, 138 { "help", 'h', arg_flag, NULL } 139 }; 140 141 args[0].value = &realm; 142 args[1].value = &admin_server; 143 args[2].value = &server_port; 144 args[3].value = &help_flag; 145 146 if(getarg(args, sizeof(args) / sizeof(args[0]), argc, argv, &optind) 147 || help_flag) { 148 arg_printusage(args, sizeof(args) / sizeof(args[0]), 149 "ktutil change", "principal..."); 150 return 1; 151 } 152 153 if((keytab = ktutil_open_keytab()) == NULL) 154 return 1; 155 156 j = 0; 157 max = 10; 158 princs = malloc (max * sizeof(*princs)); 159 if (princs == NULL) { 160 krb5_warnx (context, "malloc: out of memory"); 161 goto out; 162 } 163 164 ret = krb5_kt_start_seq_get(context, keytab, &cursor); 165 if(ret){ 166 krb5_warn(context, ret, "krb5_kt_start_seq_get %s", keytab_string); 167 goto out; 168 } 169 170 while((ret = krb5_kt_next_entry(context, keytab, &entry, &cursor)) == 0) { 171 int i; 172 int done = 0; 173 174 for (i = 0; i < j; ++i) 175 if (krb5_principal_compare (context, princs[i], 176 entry.principal)) 177 break; 178 if (i < j) 179 continue; 180 181 if (optind == argc) { 182 change_entry (context, keytab, &entry, realm, admin_server, 183 server_port); 184 done = 1; 185 } else { 186 for (i = optind; i < argc; ++i) { 187 krb5_principal princ; 188 189 ret = krb5_parse_name (context, argv[i], &princ); 190 if (ret) { 191 krb5_warn (context, ret, "krb5_parse_name %s", argv[i]); 192 continue; 193 } 194 if (krb5_principal_compare (context, princ, entry.principal)) { 195 change_entry (context, keytab, &entry, 196 realm, admin_server, server_port); 197 done = 1; 198 } 199 krb5_free_principal (context, princ); 200 } 201 } 202 if (done) { 203 if (j >= max) { 204 void *tmp; 205 206 max *= 2; 207 tmp = realloc (princs, max * sizeof(*princs)); 208 if (tmp == NULL) { 209 krb5_kt_free_entry (context, &entry); 210 krb5_warnx (context, "realloc: out of memory"); 211 break; 212 } 213 princs = tmp; 214 } 215 ret = krb5_copy_principal (context, entry.principal, &princs[j]); 216 if (ret) { 217 krb5_warn (context, ret, "krb5_copy_principal"); 218 krb5_kt_free_entry (context, &entry); 219 break; 220 } 221 ++j; 222 } 223 krb5_kt_free_entry (context, &entry); 224 } 225 while (j-- > 0) 226 krb5_free_principal (context, princs[j]); 227 free (princs); 228 ret = krb5_kt_end_seq_get(context, keytab, &cursor); 229 out: 230 krb5_kt_close(context, keytab); 231 return 0; 232 } 233