xref: /freebsd/crypto/heimdal/lib/krb5/test_kuserok.c (revision 6a068746777241722b2b32c5d0bc443a2a64d80b)
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