1254974Sjlh/* 2254974Sjlh * Copyright (c) 2007 Kungliga Tekniska H��gskolan 3254974Sjlh * (Royal Institute of Technology, Stockholm, Sweden). 4254974Sjlh * All rights reserved. 5254974Sjlh * 6254974Sjlh * Redistribution and use in source and binary forms, with or without 7254974Sjlh * modification, are permitted provided that the following conditions 8254974Sjlh * are met: 9254974Sjlh * 10254974Sjlh * 1. Redistributions of source code must retain the above copyright 11254974Sjlh * notice, this list of conditions and the following disclaimer. 12254974Sjlh * 13254974Sjlh * 2. Redistributions in binary form must reproduce the above copyright 14254974Sjlh * notice, this list of conditions and the following disclaimer in the 15254974Sjlh * documentation and/or other materials provided with the distribution. 16254974Sjlh * 17254974Sjlh * 3. Neither the name of KTH nor the names of its contributors may be 18254974Sjlh * used to endorse or promote products derived from this software without 19254974Sjlh * specific prior written permission. 20254974Sjlh * 21254974Sjlh * THIS SOFTWARE IS PROVIDED BY KTH AND ITS CONTRIBUTORS ``AS IS'' AND ANY 22254974Sjlh * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23254974Sjlh * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 24254974Sjlh * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL KTH OR ITS CONTRIBUTORS BE 25254974Sjlh * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 26254974Sjlh * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 27254974Sjlh * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR 28254974Sjlh * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 29254974Sjlh * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR 30254974Sjlh * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF 31254974Sjlh * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 32254974Sjlh */ 33254974Sjlh 34254974Sjlh#include "krb5_locl.h" 35254974Sjlh#include <err.h> 36254974Sjlh#include <getarg.h> 37254974Sjlh 38254974Sjlhstatic int version_flag = 0; 39254974Sjlhstatic int help_flag = 0; 40254974Sjlh 41254974Sjlhstatic struct getargs args[] = { 42 {"version", 0, arg_flag, &version_flag, 43 "print version", NULL }, 44 {"help", 0, arg_flag, &help_flag, 45 NULL, NULL } 46}; 47 48static void 49usage (int ret) 50{ 51 arg_printusage (args, 52 sizeof(args)/sizeof(*args), 53 NULL, 54 "[principal]"); 55 exit (ret); 56} 57 58int 59main(int argc, char **argv) 60{ 61 krb5_principal client; 62 krb5_context context; 63 const char *in_tkt_service = NULL; 64 krb5_ccache id; 65 krb5_error_code ret; 66 krb5_creds out; 67 int optidx = 0; 68 69 setprogname(argv[0]); 70 71 if(getarg(args, sizeof(args) / sizeof(args[0]), argc, argv, &optidx)) 72 usage(1); 73 74 if (help_flag) 75 usage (0); 76 77 if(version_flag){ 78 print_version(NULL); 79 exit(0); 80 } 81 82 argc -= optidx; 83 argv += optidx; 84 85 if (argc > 0) 86 in_tkt_service = argv[0]; 87 88 memset(&out, 0, sizeof(out)); 89 90 ret = krb5_init_context(&context); 91 if (ret) 92 krb5_err(context, 1, ret, "krb5_init_context"); 93 94 ret = krb5_cc_default(context, &id); 95 if (ret) 96 krb5_err(context, 1, ret, "krb5_cc_default"); 97 98 ret = krb5_cc_get_principal(context, id, &client); 99 if (ret) 100 krb5_err(context, 1, ret, "krb5_cc_default"); 101 102 ret = krb5_get_renewed_creds(context, 103 &out, 104 client, 105 id, 106 in_tkt_service); 107 108 if(ret) 109 krb5_err(context, 1, ret, "krb5_get_renewed_creds"); 110 111 if (krb5_principal_compare(context, out.client, client) != TRUE) 112 krb5_errx(context, 1, "return principal is not as expected"); 113 114 krb5_free_cred_contents(context, &out); 115 116 krb5_free_context(context); 117 118 return 0; 119} 120