1c19800e8SDoug Rabson /*
2*ae771770SStanislav Sedov * Copyright (c) 2005 Kungliga Tekniska Högskolan
3c19800e8SDoug Rabson * (Royal Institute of Technology, Stockholm, Sweden).
4c19800e8SDoug Rabson * All rights reserved.
5c19800e8SDoug Rabson *
6c19800e8SDoug Rabson * Redistribution and use in source and binary forms, with or without
7c19800e8SDoug Rabson * modification, are permitted provided that the following conditions
8c19800e8SDoug Rabson * are met:
9c19800e8SDoug Rabson *
10c19800e8SDoug Rabson * 1. Redistributions of source code must retain the above copyright
11c19800e8SDoug Rabson * notice, this list of conditions and the following disclaimer.
12c19800e8SDoug Rabson *
13c19800e8SDoug Rabson * 2. Redistributions in binary form must reproduce the above copyright
14c19800e8SDoug Rabson * notice, this list of conditions and the following disclaimer in the
15c19800e8SDoug Rabson * documentation and/or other materials provided with the distribution.
16c19800e8SDoug Rabson *
17c19800e8SDoug Rabson * 3. Neither the name of KTH nor the names of its contributors may be
18c19800e8SDoug Rabson * used to endorse or promote products derived from this software without
19c19800e8SDoug Rabson * specific prior written permission.
20c19800e8SDoug Rabson *
21c19800e8SDoug Rabson * THIS SOFTWARE IS PROVIDED BY KTH AND ITS CONTRIBUTORS ``AS IS'' AND ANY
22c19800e8SDoug Rabson * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23c19800e8SDoug Rabson * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24c19800e8SDoug Rabson * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL KTH OR ITS CONTRIBUTORS BE
25c19800e8SDoug Rabson * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26c19800e8SDoug Rabson * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27c19800e8SDoug Rabson * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
28c19800e8SDoug Rabson * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29c19800e8SDoug Rabson * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
30c19800e8SDoug Rabson * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
31c19800e8SDoug Rabson * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */
32c19800e8SDoug Rabson
33c19800e8SDoug Rabson #include "krb5_locl.h"
34c19800e8SDoug Rabson #include <getarg.h>
35c19800e8SDoug Rabson #include <err.h>
36c19800e8SDoug Rabson
37c19800e8SDoug Rabson static int version_flag = 0;
38c19800e8SDoug Rabson static int help_flag = 0;
39c19800e8SDoug Rabson
40c19800e8SDoug Rabson static struct getargs args[] = {
41c19800e8SDoug Rabson {"version", 0, arg_flag, &version_flag,
42c19800e8SDoug Rabson "print version", NULL },
43c19800e8SDoug Rabson {"help", 0, arg_flag, &help_flag,
44c19800e8SDoug Rabson NULL, NULL }
45c19800e8SDoug Rabson };
46c19800e8SDoug Rabson
47c19800e8SDoug Rabson static void
usage(int ret)48c19800e8SDoug Rabson usage (int ret)
49c19800e8SDoug Rabson {
50c19800e8SDoug Rabson arg_printusage (args,
51c19800e8SDoug Rabson sizeof(args)/sizeof(*args),
52c19800e8SDoug Rabson NULL,
53c19800e8SDoug Rabson "principal luser");
54c19800e8SDoug Rabson exit (ret);
55c19800e8SDoug Rabson }
56c19800e8SDoug Rabson
57c19800e8SDoug Rabson int
main(int argc,char ** argv)58c19800e8SDoug Rabson main(int argc, char **argv)
59c19800e8SDoug Rabson {
60c19800e8SDoug Rabson krb5_context context;
61c19800e8SDoug Rabson krb5_error_code ret;
62c19800e8SDoug Rabson krb5_principal principal;
63c19800e8SDoug Rabson char *p;
64c19800e8SDoug Rabson int o = 0;
65c19800e8SDoug Rabson
66c19800e8SDoug Rabson setprogname(argv[0]);
67c19800e8SDoug Rabson
68c19800e8SDoug Rabson if(getarg(args, sizeof(args) / sizeof(args[0]), argc, argv, &o))
69c19800e8SDoug Rabson usage(1);
70c19800e8SDoug Rabson
71c19800e8SDoug Rabson if (help_flag)
72c19800e8SDoug Rabson usage (0);
73c19800e8SDoug Rabson
74c19800e8SDoug Rabson if(version_flag){
75c19800e8SDoug Rabson print_version(NULL);
76c19800e8SDoug Rabson exit(0);
77c19800e8SDoug Rabson }
78c19800e8SDoug Rabson
79c19800e8SDoug Rabson argc -= o;
80c19800e8SDoug Rabson argv += o;
81c19800e8SDoug Rabson
82c19800e8SDoug Rabson ret = krb5_init_context(&context);
83c19800e8SDoug Rabson if (ret)
84c19800e8SDoug Rabson errx (1, "krb5_init_context failed: %d", ret);
85c19800e8SDoug Rabson
86c19800e8SDoug Rabson if (argc != 2)
87c19800e8SDoug Rabson usage(1);
88c19800e8SDoug Rabson
89c19800e8SDoug Rabson ret = krb5_parse_name(context, argv[0], &principal);
90c19800e8SDoug Rabson if (ret)
91c19800e8SDoug Rabson krb5_err(context, 1, ret, "krb5_parse_name");
92c19800e8SDoug Rabson
93c19800e8SDoug Rabson ret = krb5_unparse_name(context, principal, &p);
94c19800e8SDoug Rabson if (ret)
95c19800e8SDoug Rabson krb5_err(context, 1, ret, "krb5_unparse_name");
96c19800e8SDoug Rabson
97c19800e8SDoug Rabson ret = krb5_kuserok(context, principal, argv[1]);
98c19800e8SDoug Rabson
99c19800e8SDoug Rabson krb5_free_context(context);
100c19800e8SDoug Rabson
101c19800e8SDoug Rabson printf("%s is %sallowed to login as %s\n", p, ret ? "" : "NOT ", argv[1]);
102c19800e8SDoug Rabson
103c19800e8SDoug Rabson return 0;
104c19800e8SDoug Rabson }
105