xref: /freebsd/crypto/heimdal/kuser/kdecode_ticket.c (revision daf1cffce2e07931f27c6c6998652e90df6ba87e)
1 /*
2  * Copyright (c) 1997 - 1999 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 "kuser_locl.h"
35 
36 RCSID("$Id: kdecode_ticket.c,v 1.2 1999/12/02 17:05:00 joda Exp $");
37 
38 static char *etype_str;
39 static int version_flag;
40 static int help_flag;
41 
42 static void
43 print_and_decode_tkt (krb5_context context,
44 		      krb5_data *ticket,
45 		      krb5_principal server,
46 		      krb5_enctype enctype)
47 {
48     krb5_error_code ret;
49     krb5_crypto crypto;
50     krb5_data dec_data;
51     size_t len;
52     EncTicketPart decr_part;
53     krb5_keyblock key;
54     Ticket tkt;
55 
56     ret = decode_Ticket (ticket->data, ticket->length, &tkt, &len);
57     if (ret)
58 	krb5_err (context, 1, ret, "decode_Ticket");
59 
60     ret = krb5_string_to_key (context, enctype, "foo", server, &key);
61     if (ret)
62 	krb5_err (context, 1, ret, "krb5_string_to_key");
63 
64     krb5_crypto_init(context, &key, 0, &crypto);
65 
66     ret = krb5_decrypt_EncryptedData (context, crypto, KRB5_KU_TICKET,
67 				      &tkt.enc_part, &dec_data);
68     krb5_crypto_destroy (context, crypto);
69     if (ret)
70 	krb5_err (context, 1, ret, "krb5_decrypt_EncryptedData");
71     ret = krb5_decode_EncTicketPart (context, dec_data.data, dec_data.length,
72 				     &decr_part, &len);
73     krb5_data_free (&dec_data);
74     if (ret)
75 	krb5_err (context, 1, ret, "krb5_decode_EncTicketPart");
76 }
77 
78 struct getargs args[] = {
79     { "enctype",	'e', arg_string, &etype_str,
80       "encryption type to use", "enctype"},
81     { "version", 	0,   arg_flag, &version_flag },
82     { "help",		0,   arg_flag, &help_flag }
83 };
84 
85 static void
86 usage (int ret)
87 {
88     arg_printusage (args,
89 		    sizeof(args)/sizeof(*args),
90 		    NULL,
91 		    "service");
92     exit (ret);
93 }
94 
95 int
96 main(int argc, char **argv)
97 {
98     krb5_error_code ret;
99     krb5_context context;
100     krb5_ccache cache;
101     krb5_creds in, *out;
102     int optind = 0;
103 
104     set_progname (argv[0]);
105 
106     ret = krb5_init_context (&context);
107     if (ret)
108 	errx(1, "krb5_init_context failed: %u", ret);
109 
110     if(getarg(args, sizeof(args) / sizeof(args[0]), argc, argv, &optind))
111 	usage(1);
112 
113     if (help_flag)
114 	usage (0);
115 
116     if(version_flag) {
117 	print_version(NULL);
118 	exit(0);
119     }
120 
121     argc -= optind;
122     argv += optind;
123 
124     if (argc != 1)
125 	usage (1);
126 
127     ret = krb5_cc_default(context, &cache);
128     if (ret)
129 	krb5_err (context, 1, ret, "krb5_cc_default");
130 
131     memset(&in, 0, sizeof(in));
132 
133     if (etype_str) {
134 	krb5_enctype enctype;
135 
136 	ret = krb5_string_to_enctype(context, etype_str, &enctype);
137 	if (ret)
138 	    krb5_errx (context, 1, "unrecognized enctype: %s", etype_str);
139 	in.session.keytype = enctype;
140     }
141 
142     ret = krb5_cc_get_principal(context, cache, &in.client);
143     if (ret)
144 	krb5_err (context, 1, ret, "krb5_cc_get_principal");
145 
146     ret = krb5_parse_name(context, argv[0], &in.server);
147     if (ret)
148 	krb5_err (context, 1, ret, "krb5_parse_name %s", argv[0]);
149 
150     in.times.endtime = 0;
151     ret = krb5_get_credentials(context, 0, cache, &in, &out);
152     if (ret)
153 	krb5_err (context, 1, ret, "krb5_get_credentials");
154 
155     print_and_decode_tkt (context, &out->ticket, out->server,
156 			  out->session.keytype);
157 
158     krb5_free_creds_contents(context, out);
159     return 0;
160 }
161