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.3 2001/05/10 15:40:07 assar 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_string == NULL) { 154 ret = krb5_kt_default_modify_name (context, keytab_buf, 155 sizeof(keytab_buf)); 156 if (ret) { 157 krb5_warn(context, ret, "krb5_kt_default_modify_name"); 158 return 1; 159 } 160 keytab_string = keytab_buf; 161 } 162 ret = krb5_kt_resolve(context, keytab_string, &keytab); 163 if (ret) { 164 krb5_warn(context, ret, "resolving keytab %s", keytab_string); 165 return 1; 166 } 167 168 if (verbose_flag) 169 fprintf (stderr, "Using keytab %s\n", keytab_string); 170 171 j = 0; 172 max = 10; 173 princs = malloc (max * sizeof(*princs)); 174 if (princs == NULL) { 175 krb5_warnx (context, "malloc: out of memory"); 176 goto out; 177 } 178 179 ret = krb5_kt_start_seq_get(context, keytab, &cursor); 180 if(ret){ 181 krb5_warn(context, ret, "krb5_kt_start_seq_get %s", keytab_string); 182 goto out; 183 } 184 185 while((ret = krb5_kt_next_entry(context, keytab, &entry, &cursor)) == 0) { 186 int i; 187 int done = 0; 188 189 for (i = 0; i < j; ++i) 190 if (krb5_principal_compare (context, princs[i], 191 entry.principal)) 192 break; 193 if (i < j) 194 continue; 195 196 if (optind == argc) { 197 change_entry (context, keytab, &entry, realm, admin_server, 198 server_port); 199 done = 1; 200 } else { 201 for (i = optind; i < argc; ++i) { 202 krb5_principal princ; 203 204 ret = krb5_parse_name (context, argv[i], &princ); 205 if (ret) { 206 krb5_warn (context, ret, "krb5_parse_name %s", argv[i]); 207 continue; 208 } 209 if (krb5_principal_compare (context, princ, entry.principal)) { 210 change_entry (context, keytab, &entry, 211 realm, admin_server, server_port); 212 done = 1; 213 } 214 krb5_free_principal (context, princ); 215 } 216 } 217 if (done) { 218 if (j >= max) { 219 void *tmp; 220 221 max *= 2; 222 tmp = realloc (princs, max * sizeof(*princs)); 223 if (tmp == NULL) { 224 krb5_kt_free_entry (context, &entry); 225 krb5_warnx (context, "realloc: out of memory"); 226 break; 227 } 228 princs = tmp; 229 } 230 ret = krb5_copy_principal (context, entry.principal, &princs[j]); 231 if (ret) { 232 krb5_warn (context, ret, "krb5_copy_principal"); 233 krb5_kt_free_entry (context, &entry); 234 break; 235 } 236 ++j; 237 } 238 krb5_kt_free_entry (context, &entry); 239 } 240 while (j-- > 0) 241 krb5_free_principal (context, princs[j]); 242 free (princs); 243 ret = krb5_kt_end_seq_get(context, keytab, &cursor); 244 out: 245 krb5_kt_close(context, keytab); 246 return 0; 247 } 248