xref: /freebsd/crypto/heimdal/kuser/kcc.c (revision f4b37ed0f8b307b1f3f0f630ca725d68f1dff30d)
1 /*
2  * Copyright (c) 2010 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 #include <sl.h>
36 #include "kcc-commands.h"
37 
38 krb5_context kcc_context;
39 static int version_flag;
40 static int help_flag;
41 
42 static struct getargs args[] = {
43     { "version", 	0,   arg_flag, &version_flag, NULL, NULL },
44     { "help",		0,   arg_flag, &help_flag, NULL, NULL }
45 };
46 
47 static void
48 usage(int ret)
49 {
50     arg_printusage_i18n(args,
51 			sizeof(args)/sizeof(*args),
52 			N_("Usage: ", ""),
53 			NULL,
54 			"command ..",
55 			getarg_i18n);
56     exit (ret);
57 }
58 
59 int
60 help(void *opt, int argc, char **argv)
61 {
62     sl_slc_help(commands, argc, argv);
63     return 0;
64 }
65 
66 int
67 kgetcred(struct kgetcred_options *opt, int argc, char **argv)
68 {
69     return 0;
70 }
71 
72 /*
73  * Wrapper for command line compatiblity
74  */
75 
76 int
77 kvno(struct kvno_options *opt, int argc, char **argv)
78 {
79     struct kgetcred_options k;
80     memset(&k, 0, sizeof(k));
81 
82     k.cache_string = opt->cache_string;
83     k.enctype_string = opt->enctype_string;
84 
85     return kgetcred(&k, argc, argv);
86 }
87 
88 static int
89 command_alias(const char *name)
90 {
91     const char *aliases[] = {
92 	"kinit", "klist", "kswitch", "kgetcred", "kvno", "kdeltkt",
93 	"kdestroy", "kcpytkt", NULL
94     }, **p = aliases;
95 
96     while (*p && strcmp(name, *p) != 0)
97 	p++;
98     return *p != NULL;
99 }
100 
101 
102 int
103 main(int argc, char **argv)
104 {
105     krb5_error_code ret;
106     int optidx = 0;
107     int exit_status = 0;
108 
109     setprogname (argv[0]);
110 
111     setlocale (LC_ALL, "");
112     bindtextdomain ("heimdal_kuser", HEIMDAL_LOCALEDIR);
113     textdomain("heimdal_kuser");
114 
115     ret = krb5_init_context(&kcc_context);
116     if (ret == KRB5_CONFIG_BADFORMAT)
117 	errx (1, "krb5_init_context failed to parse configuration file");
118     else if (ret)
119 	errx(1, "krb5_init_context failed: %d", ret);
120 
121     /*
122      * Support linking of kcc to commands
123      */
124 
125     if (!command_alias(getprogname())) {
126 
127 	if (argc == 1) {
128 	    sl_slc_help(commands, 0, NULL);
129 	    return 1;
130 	}
131 
132 	if(getarg(args, sizeof(args) / sizeof(args[0]), argc, argv, &optidx))
133 	    usage(1);
134 
135 	if (help_flag)
136 	    usage (0);
137 
138 	if(version_flag) {
139 	    print_version(NULL);
140 	    exit(0);
141 	}
142 
143     } else {
144 	argv[0] = rk_UNCONST(getprogname());
145     }
146 
147     argc -= optidx;
148     argv += optidx;
149 
150     if (argc != 0) {
151 	ret = sl_command(commands, argc, argv);
152 	if(ret == -1)
153 	    krb5_warnx(kcc_context, "unrecognized command: %s", argv[0]);
154 	else if (ret == -2)
155 	    ret = 0;
156 	if(ret != 0)
157 	    exit_status = 1;
158     } else {
159 	sl_slc_help(commands, argc, argv);
160 	exit_status = 1;
161     }
162 
163     krb5_free_context(kcc_context);
164     return exit_status;
165 }
166