2 * Copyright (c) 1997-2007 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Portions Copyright (c) 2009 Apple Inc. All rights reserved.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
19 * 3. Neither the name of the Institute nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
23 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 #include "kuser_locl.h"
39 #include <Security/Security.h>
46 int forwardable_flag
= -1;
47 int proxiable_flag
= -1;
48 int renewable_flag
= -1;
51 int validate_flag
= 0;
55 struct getarg_strings extra_addresses
;
56 int anonymous_flag
= 0;
57 char *lifetime
= NULL
;
58 char *renew_life
= NULL
;
59 char *server_str
= NULL
;
60 char *cred_cache
= NULL
;
61 char *start_str
= NULL
;
62 static int switch_cache_flags
= 1;
63 struct getarg_strings etype_str
;
65 char *keytab_str
= NULL
;
68 char *password_file
= NULL
;
69 char *pk_user_id
= NULL
;
70 int pk_enterprise_flag
= 0;
71 struct hx509_certs_data
*ent_user_id
= NULL
;
72 char *pk_x509_anchors
= NULL
;
73 int pk_use_enckey
= 0;
74 static int canonicalize_flag
= 0;
75 static int enterprise_flag
= 0;
76 static int ok_as_delegate_flag
= 0;
77 static char *fast_armor_cache_string
= NULL
;
78 static int use_referrals_flag
= 0;
79 static int windows_flag
= 0;
81 static char *ntlm_domain
;
85 static struct getargs args
[] = {
99 { "afslog", 0 , arg_flag
, &do_afslog
,
100 NP_("obtain afs tokens", ""), NULL
},
102 { "cache", 'c', arg_string
, &cred_cache
,
103 NP_("credentials cache", ""), "cachename" },
105 { "forwardable", 0, arg_negative_flag
, &forwardable_flag
,
106 NP_("get tickets not forwardable", ""), NULL
},
108 { NULL
, 'f', arg_flag
, &forwardable_flag
,
109 NP_("get forwardable tickets", ""), NULL
},
111 { "keytab", 't', arg_string
, &keytab_str
,
112 NP_("keytab to use", ""), "keytabname" },
114 { "lifetime", 'l', arg_string
, &lifetime
,
115 NP_("lifetime of tickets", ""), "time" },
117 { "proxiable", 'p', arg_flag
, &proxiable_flag
,
118 NP_("get proxiable tickets", ""), NULL
},
120 { "renew", 'R', arg_flag
, &renew_flag
,
121 NP_("renew TGT", ""), NULL
},
123 { "renewable", 0, arg_flag
, &renewable_flag
,
124 NP_("get renewable tickets", ""), NULL
},
126 { "renewable-life", 'r', arg_string
, &renew_life
,
127 NP_("renewable lifetime of tickets", ""), "time" },
129 { "server", 'S', arg_string
, &server_str
,
130 NP_("server to get ticket for", ""), "principal" },
132 { "start-time", 's', arg_string
, &start_str
,
133 NP_("when ticket gets valid", ""), "time" },
135 { "use-keytab", 'k', arg_flag
, &use_keytab
,
136 NP_("get key from keytab", ""), NULL
},
138 { "validate", 'v', arg_flag
, &validate_flag
,
139 NP_("validate TGT", ""), NULL
},
141 { "enctypes", 'e', arg_strings
, &etype_str
,
142 NP_("encryption types to use", ""), "enctypes" },
144 { "fcache-version", 0, arg_integer
, &fcache_version
,
145 NP_("file cache version to create", ""), NULL
},
147 { "addresses", 'A', arg_negative_flag
, &addrs_flag
,
148 NP_("request a ticket with no addresses", ""), NULL
},
150 { "extra-addresses",'a', arg_strings
, &extra_addresses
,
151 NP_("include these extra addresses", ""), "addresses" },
153 { "anonymous", 0, arg_flag
, &anonymous_flag
,
154 NP_("request an anonymous ticket", ""), NULL
},
156 { "request-pac", 0, arg_flag
, &pac_flag
,
157 NP_("request a Windows PAC", ""), NULL
},
159 { "password-file", 0, arg_string
, &password_file
,
160 NP_("read the password from a file", ""), NULL
},
162 { "canonicalize",0, arg_flag
, &canonicalize_flag
,
163 NP_("canonicalize client principal", ""), NULL
},
165 { "enterprise",0, arg_flag
, &enterprise_flag
,
166 NP_("parse principal as a KRB5-NT-ENTERPRISE name", ""), NULL
},
168 { "pk-enterprise", 0, arg_flag
, &pk_enterprise_flag
,
169 NP_("use enterprise name from certificate", ""), NULL
},
171 { "pk-user", 'C', arg_string
, &pk_user_id
,
172 NP_("principal's public/private/certificate identifier", ""), "id" },
174 { "x509-anchors", 'D', arg_string
, &pk_x509_anchors
,
175 NP_("directory with CA certificates", ""), "directory" },
177 { "pk-use-enckey", 0, arg_flag
, &pk_use_enckey
,
178 NP_("Use RSA encrypted reply (instead of DH)", ""), NULL
},
181 { "ntlm-domain", 0, arg_string
, &ntlm_domain
,
182 NP_("NTLM domain", ""), "domain" },
185 { "change-default", 0, arg_negative_flag
, &switch_cache_flags
,
186 NP_("switch the default cache to the new credentials cache", ""), NULL
},
188 { "ok-as-delegate", 0, arg_flag
, &ok_as_delegate_flag
,
189 NP_("honor ok-as-delegate on tickets", ""), NULL
},
191 { "fast-armor-cache", 0, arg_string
, &fast_armor_cache_string
,
192 NP_("use this credential cache as FAST armor cache", ""), "cache" },
194 { "use-referrals", 0, arg_flag
, &use_referrals_flag
,
195 NP_("only use referrals, no dns canalisation", ""), NULL
},
197 { "windows", 0, arg_flag
, &windows_flag
,
198 NP_("get windows behavior", ""), NULL
},
200 { "version", 0, arg_flag
, &version_flag
, NULL
, NULL
},
201 { "help", 0, arg_flag
, &help_flag
, NULL
, NULL
}
207 arg_printusage_i18n (args
,
208 sizeof(args
)/sizeof(*args
),
211 "[principal [command]]",
216 static krb5_error_code
217 get_server(krb5_context context
,
218 krb5_principal client
,
220 krb5_principal
*princ
)
222 krb5_const_realm realm
;
224 return krb5_parse_name(context
, server
, princ
);
226 realm
= krb5_principal_get_realm(context
, client
);
227 return krb5_make_principal(context
, princ
, realm
,
228 KRB5_TGS_NAME
, realm
, NULL
);
232 renew_validate(krb5_context context
,
240 krb5_creds in
, *out
= NULL
;
241 krb5_kdc_flags flags
;
243 memset(&in
, 0, sizeof(in
));
245 ret
= krb5_cc_get_principal(context
, cache
, &in
.client
);
247 krb5_warn(context
, ret
, "krb5_cc_get_principal");
250 ret
= get_server(context
, in
.client
, server
, &in
.server
);
252 krb5_warn(context
, ret
, "get_server");
258 * no need to check the error here, it's only to be
259 * friendly to the user
261 krb5_get_credentials(context
, KRB5_GC_CACHED
, cache
, &in
, &out
);
265 flags
.b
.renewable
= flags
.b
.renew
= renew
;
266 flags
.b
.validate
= validate
;
268 if (forwardable_flag
!= -1)
269 flags
.b
.forwardable
= forwardable_flag
;
271 flags
.b
.forwardable
= out
->flags
.b
.forwardable
;
273 if (proxiable_flag
!= -1)
274 flags
.b
.proxiable
= proxiable_flag
;
276 flags
.b
.proxiable
= out
->flags
.b
.proxiable
;
279 flags
.b
.request_anonymous
= anonymous_flag
;
281 in
.times
.endtime
= time(NULL
) + life
;
284 krb5_free_creds (context
, out
);
289 ret
= krb5_get_kdc_cred(context
,
297 krb5_warn(context
, ret
, "krb5_get_kdc_cred");
300 ret
= krb5_cc_initialize(context
, cache
, in
.client
);
302 krb5_free_creds (context
, out
);
303 krb5_warn(context
, ret
, "krb5_cc_initialize");
306 ret
= krb5_cc_store_cred(context
, cache
, out
);
308 if(ret
== 0 && server
== NULL
) {
309 /* only do this if it's a general renew-my-tgt request */
311 if(do_afslog
&& k_hasafs())
312 krb5_afslog(context
, cache
, NULL
, NULL
);
316 krb5_free_creds (context
, out
);
318 krb5_warn(context
, ret
, "krb5_cc_store_cred");
322 krb5_free_cred_contents(context
, &in
);
328 static krb5_error_code
329 store_ntlmkey(krb5_context context
, krb5_ccache id
,
330 const char *domain
, struct ntlm_buf
*buf
)
336 asprintf(&name
, "ntlm-key-%s", domain
);
338 krb5_clear_error_message(context
);
342 data
.length
= buf
->length
;
343 data
.data
= buf
->data
;
345 ret
= krb5_cc_set_config(context
, id
, NULL
, name
, &data
);
351 static krb5_error_code
352 get_new_tickets(krb5_context context
,
353 krb5_principal principal
,
355 krb5_deltat ticket_life
,
359 krb5_get_init_creds_opt
*opt
;
362 krb5_deltat start_time
= 0;
363 krb5_deltat renew
= 0;
364 const char *renewstr
= NULL
;
365 krb5_enctype
*enctype
= NULL
;
366 krb5_ccache tempccache
;
367 krb5_keytab kt
= NULL
;
368 krb5_init_creds_context ctx
;
370 struct ntlm_buf ntlmkey
;
371 memset(&ntlmkey
, 0, sizeof(ntlmkey
));
378 if (strcasecmp("STDIN", password_file
) == 0)
381 f
= fopen(password_file
, "r");
383 krb5_errx(context
, 1, "Failed to open the password file %s",
386 if (fgets(passwd
, sizeof(passwd
), f
) == NULL
)
387 krb5_errx(context
, 1,
388 N_("Failed to read password from file %s", ""),
392 passwd
[strcspn(passwd
, "\n")] = '\0';
396 if (passwd
[0] == '\0') {
403 realm
= krb5_principal_get_realm(context
, principal
);
405 ret
= krb5_unparse_name_flags(context
, principal
,
406 KRB5_PRINCIPAL_UNPARSE_NO_REALM
, &name
);
410 osret
= SecKeychainFindGenericPassword(NULL
, strlen(realm
), realm
,
412 &length
, &buffer
, NULL
);
414 if (osret
== noErr
&& length
< sizeof(passwd
) - 1) {
415 memcpy(passwd
, buffer
, length
);
416 passwd
[length
] = '\0';
423 memset(&cred
, 0, sizeof(cred
));
425 ret
= krb5_get_init_creds_opt_alloc (context
, &opt
);
427 krb5_err(context
, 1, ret
, "krb5_get_init_creds_opt_alloc");
429 krb5_get_init_creds_opt_set_default_flags(context
, "kinit",
430 krb5_principal_get_realm(context
, principal
), opt
);
432 if(forwardable_flag
!= -1)
433 krb5_get_init_creds_opt_set_forwardable (opt
, forwardable_flag
);
434 if(proxiable_flag
!= -1)
435 krb5_get_init_creds_opt_set_proxiable (opt
, proxiable_flag
);
437 krb5_get_init_creds_opt_set_anonymous (opt
, anonymous_flag
);
439 krb5_get_init_creds_opt_set_pac_request(context
, opt
,
440 pac_flag
? TRUE
: FALSE
);
441 if (canonicalize_flag
)
442 krb5_get_init_creds_opt_set_canonicalize(context
, opt
, TRUE
);
443 if (pk_enterprise_flag
|| enterprise_flag
|| canonicalize_flag
|| windows_flag
)
444 krb5_get_init_creds_opt_set_win2k(context
, opt
, TRUE
);
445 if (pk_user_id
|| ent_user_id
|| anonymous_flag
) {
446 ret
= krb5_get_init_creds_opt_set_pkinit(context
, opt
,
452 pk_use_enckey
? 2 : 0 |
453 anonymous_flag
? 4 : 0,
458 krb5_err(context
, 1, ret
, "krb5_get_init_creds_opt_set_pkinit");
460 krb5_get_init_creds_opt_set_pkinit_user_certs(context
, opt
, ent_user_id
);
463 if (addrs_flag
!= -1)
464 krb5_get_init_creds_opt_set_addressless(context
, opt
,
465 addrs_flag
? FALSE
: TRUE
);
467 if (renew_life
== NULL
&& renewable_flag
)
468 renewstr
= "1 month";
470 renewstr
= renew_life
;
472 renew
= parse_time (renewstr
, "s");
474 errx (1, "unparsable time: %s", renewstr
);
476 krb5_get_init_creds_opt_set_renew_life (opt
, renew
);
480 krb5_get_init_creds_opt_set_tkt_life (opt
, ticket_life
);
483 int tmp
= parse_time (start_str
, "s");
485 errx (1, N_("unparsable time: %s", ""), start_str
);
490 if(etype_str
.num_strings
) {
493 enctype
= malloc(etype_str
.num_strings
* sizeof(*enctype
));
495 errx(1, "out of memory");
496 for(i
= 0; i
< etype_str
.num_strings
; i
++) {
497 ret
= krb5_string_to_enctype(context
,
498 etype_str
.strings
[i
],
501 errx(1, "unrecognized enctype: %s", etype_str
.strings
[i
]);
503 krb5_get_init_creds_opt_set_etype_list(opt
, enctype
,
504 etype_str
.num_strings
);
507 ret
= krb5_init_creds_init(context
, principal
, krb5_prompter_posix
, NULL
, start_time
, opt
, &ctx
);
509 krb5_err(context
, 1, ret
, "krb5_init_creds_init");
512 ret
= krb5_init_creds_set_service(context
, ctx
, server_str
);
514 krb5_err(context
, 1, ret
, "krb5_init_creds_set_service");
517 if (fast_armor_cache_string
) {
520 ret
= krb5_cc_resolve(context
, fast_armor_cache_string
, &fastid
);
522 krb5_err(context
, 1, ret
, "krb5_cc_resolve(FAST cache)");
524 ret
= krb5_init_creds_set_fast_ccache(context
, ctx
, fastid
);
526 krb5_err(context
, 1, ret
, "krb5_init_creds_set_fast_ccache");
529 if(use_keytab
|| keytab_str
) {
532 ret
= krb5_kt_resolve(context
, keytab_str
, &kt
);
534 ret
= krb5_kt_default(context
, &kt
);
536 krb5_err(context
, 1, ret
, "resolving keytab");
538 ret
= krb5_init_creds_set_keytab(context
, ctx
, kt
);
540 krb5_err(context
, 1, ret
, "krb5_init_creds_set_keytab");
542 } else if (pk_user_id
|| ent_user_id
|| anonymous_flag
) {
544 } else if (!interactive
) {
545 krb5_warnx(context
, "Not interactive, failed to get initial ticket");
546 krb5_get_init_creds_opt_free(context
, opt
);
550 if (passwd
[0] == '\0') {
553 krb5_unparse_name (context
, principal
, &p
);
554 asprintf (&prompt
, N_("%s's Password: ", ""), p
);
557 if (UI_UTIL_read_pw_string(passwd
, sizeof(passwd
)-1, prompt
, 0)){
558 memset(passwd
, 0, sizeof(passwd
));
559 errx(1, "failed to read password");
565 ret
= krb5_init_creds_set_password(context
, ctx
, passwd
);
567 krb5_err(context
, 1, ret
, "krb5_init_creds_set_password");
571 ret
= krb5_init_creds_get(context
, ctx
);
574 if (ntlm_domain
&& passwd
[0])
575 heim_ntlm_nt_key(passwd
, &ntlmkey
);
577 memset(passwd
, 0, sizeof(passwd
));
582 case KRB5_LIBOS_PWDINTR
: /* don't print anything if it was just C-c:ed */
584 case KRB5KRB_AP_ERR_BAD_INTEGRITY
:
585 case KRB5KRB_AP_ERR_MODIFIED
:
586 case KRB5KDC_ERR_PREAUTH_FAILED
:
587 krb5_errx(context
, 1, N_("Password incorrect", ""));
589 case KRB5KRB_AP_ERR_V4_REPLY
:
590 krb5_errx(context
, 1, N_("Looks like a Kerberos 4 reply", ""));
593 krb5_err(context
, 1, ret
, "krb5_get_init_creds");
596 krb5_process_last_request(context
, opt
, ctx
);
598 if(ticket_life
!= 0) {
599 if(abs(cred
.times
.endtime
- cred
.times
.starttime
- ticket_life
) > 30) {
601 unparse_time_approx(cred
.times
.endtime
- cred
.times
.starttime
,
603 krb5_warnx(context
, N_("NOTICE: ticket lifetime is %s", ""), life
);
607 if(abs(cred
.times
.renew_till
- cred
.times
.starttime
- renew
) > 30) {
609 unparse_time_approx(cred
.times
.renew_till
- cred
.times
.starttime
,
612 N_("NOTICE: ticket renewable lifetime is %s", ""),
617 ret
= krb5_cc_new_unique(context
, krb5_cc_get_type(context
, ccache
),
620 krb5_err (context
, 1, ret
, "krb5_cc_new_unique");
622 ret
= krb5_init_creds_store(context
, ctx
, tempccache
);
624 krb5_err(context
, 1, ret
, "krb5_init_creds_store");
626 krb5_init_creds_free(context
, ctx
);
628 ret
= krb5_cc_move(context
, tempccache
, ccache
);
630 krb5_err (context
, 1, ret
, "krb5_cc_move");
632 if (switch_cache_flags
)
633 krb5_cc_switch(context
, ccache
);
636 if (ntlm_domain
&& ntlmkey
.data
)
637 store_ntlmkey(context
, ccache
, ntlm_domain
, &ntlmkey
);
640 if (ok_as_delegate_flag
|| windows_flag
|| use_referrals_flag
) {
644 if (ok_as_delegate_flag
|| windows_flag
)
646 if (use_referrals_flag
|| windows_flag
)
652 krb5_cc_set_config(context
, ccache
, NULL
, "realm-config", &data
);
655 krb5_get_init_creds_opt_free(context
, opt
);
658 krb5_kt_close(context
, kt
);
666 ticket_lifetime(krb5_context context
, krb5_ccache cache
,
667 krb5_principal client
, const char *server
)
669 krb5_creds in_cred
, *cred
;
673 memset(&in_cred
, 0, sizeof(in_cred
));
675 ret
= krb5_cc_get_principal(context
, cache
, &in_cred
.client
);
677 krb5_warn(context
, ret
, "krb5_cc_get_principal");
680 ret
= get_server(context
, in_cred
.client
, server
, &in_cred
.server
);
682 krb5_free_principal(context
, in_cred
.client
);
683 krb5_warn(context
, ret
, "get_server");
687 ret
= krb5_get_credentials(context
, KRB5_GC_CACHED
,
688 cache
, &in_cred
, &cred
);
689 krb5_free_principal(context
, in_cred
.client
);
690 krb5_free_principal(context
, in_cred
.server
);
692 krb5_warn(context
, ret
, "krb5_get_credentials");
695 timeout
= cred
->times
.endtime
- cred
->times
.starttime
;
698 krb5_free_creds(context
, cred
);
703 krb5_context context
;
705 krb5_principal principal
;
706 krb5_deltat ticket_life
;
710 renew_func(void *ptr
)
712 struct renew_ctx
*ctx
= ptr
;
717 if (renewable_flag
) {
718 ret
= renew_validate(ctx
->context
, renewable_flag
, validate_flag
,
719 ctx
->ccache
, server_str
, ctx
->ticket_life
);
726 get_new_tickets(ctx
->context
, ctx
->principal
,
727 ctx
->ccache
, ctx
->ticket_life
, 0);
730 if(do_afslog
&& k_hasafs())
731 krb5_afslog(ctx
->context
, ctx
->ccache
, NULL
, NULL
);
734 expire
= ticket_lifetime(ctx
->context
, ctx
->ccache
, ctx
->principal
,
740 main (int argc
, char **argv
)
743 krb5_context context
;
745 krb5_principal principal
;
747 krb5_deltat ticket_life
= 0;
750 setprogname (argv
[0]);
752 setlocale (LC_ALL
, "");
753 bindtextdomain ("heimdal_kuser", HEIMDAL_LOCALEDIR
);
754 textdomain("heimdal_kuser");
756 ret
= krb5_init_context (&context
);
757 if (ret
== KRB5_CONFIG_BADFORMAT
)
758 errx (1, "krb5_init_context failed to parse configuration file");
760 errx(1, "krb5_init_context failed: %d", ret
);
762 if(getarg(args
, sizeof(args
) / sizeof(args
[0]), argc
, argv
, &optidx
))
776 if (canonicalize_flag
|| enterprise_flag
)
777 parseflags
|= KRB5_PRINCIPAL_PARSE_ENTERPRISE
;
779 if (pk_enterprise_flag
) {
780 ret
= krb5_pk_enterprise_cert(context
, pk_user_id
,
784 krb5_err(context
, 1, ret
, "krb5_pk_enterprise_certs");
788 } else if (anonymous_flag
) {
790 ret
= krb5_make_principal(context
, &principal
, argv
[0],
791 KRB5_WELLKNOWN_NAME
, KRB5_ANON_NAME
,
794 krb5_err(context
, 1, ret
, "krb5_make_principal");
795 krb5_principal_set_type(context
, principal
, KRB5_NT_WELLKNOWN
);
799 ret
= krb5_parse_name_flags (context
, argv
[0], parseflags
,
802 krb5_err (context
, 1, ret
, "krb5_parse_name");
804 ret
= krb5_get_default_principal (context
, &principal
);
806 krb5_err (context
, 1, ret
, "krb5_get_default_principal");
811 krb5_set_fcache_version(context
, fcache_version
);
813 if(renewable_flag
== -1)
814 /* this seems somewhat pointless, but whatever */
815 krb5_appdefault_boolean(context
, "kinit",
816 krb5_principal_get_realm(context
, principal
),
817 "renewable", FALSE
, &renewable_flag
);
819 krb5_appdefault_boolean(context
, "kinit",
820 krb5_principal_get_realm(context
, principal
),
821 "afslog", TRUE
, &do_afslog
);
824 ret
= krb5_cc_resolve(context
, cred_cache
, &ccache
);
828 ret
= krb5_cc_new_unique(context
, NULL
, NULL
, &ccache
);
830 krb5_err(context
, 1, ret
, "creating cred cache");
831 snprintf(s
, sizeof(s
), "%s:%s",
832 krb5_cc_get_type(context
, ccache
),
833 krb5_cc_get_name(context
, ccache
));
834 setenv("KRB5CCNAME", s
, 1);
836 ret
= krb5_cc_cache_match(context
, principal
, &ccache
);
839 ret
= krb5_cc_default (context
, &ccache
);
841 krb5_err (context
, 1, ret
, N_("resolving credentials cache", ""));
844 * Check if the type support switching, and we do,
845 * then do that instead over overwriting the current
848 type
= krb5_cc_get_type(context
, ccache
);
849 if (krb5_cc_support_switch(context
, type
)) {
850 krb5_cc_close(context
, ccache
);
851 ret
= krb5_cc_new_unique(context
, type
, NULL
, &ccache
);
857 krb5_err (context
, 1, ret
, N_("resolving credentials cache", ""));
860 if(argc
> 1 && k_hasafs ())
865 int tmp
= parse_time (lifetime
, "s");
867 errx (1, N_("unparsable time: %s", ""), lifetime
);
872 if(addrs_flag
== 0 && extra_addresses
.num_strings
> 0)
873 krb5_errx(context
, 1,
874 N_("specifying both extra addresses and "
875 "no addresses makes no sense", ""));
878 krb5_addresses addresses
;
879 memset(&addresses
, 0, sizeof(addresses
));
880 for(i
= 0; i
< extra_addresses
.num_strings
; i
++) {
881 ret
= krb5_parse_address(context
, extra_addresses
.strings
[i
],
884 krb5_add_extra_addresses(context
, &addresses
);
885 krb5_free_addresses(context
, &addresses
);
888 free_getarg_strings(&extra_addresses
);
891 if(renew_flag
|| validate_flag
) {
892 ret
= renew_validate(context
, renew_flag
, validate_flag
,
893 ccache
, server_str
, ticket_life
);
897 get_new_tickets(context
, principal
, ccache
, ticket_life
, 1);
900 if(do_afslog
&& k_hasafs())
901 krb5_afslog(context
, ccache
, NULL
, NULL
);
904 struct renew_ctx ctx
;
907 timeout
= ticket_lifetime(context
, ccache
, principal
, server_str
) / 2;
909 ctx
.context
= context
;
911 ctx
.principal
= principal
;
912 ctx
.ticket_life
= ticket_life
;
914 ret
= simple_execvp_timed(argv
[1], argv
+1,
915 renew_func
, &ctx
, timeout
);
916 #define EX_NOEXEC 126
917 #define EX_NOTFOUND 127
919 krb5_warnx(context
, N_("permission denied: %s", ""), argv
[1]);
920 else if(ret
== EX_NOTFOUND
)
921 krb5_warnx(context
, N_("command not found: %s", ""), argv
[1]);
923 krb5_cc_destroy(context
, ccache
);
929 krb5_cc_close (context
, ccache
);
932 krb5_free_principal(context
, principal
);
933 krb5_free_context (context
);