xref: /freebsd/crypto/heimdal/lib/krb5/test_hostname.c (revision c19800e8cd5640693f36f2040db4ab5e8d738146)
1c19800e8SDoug Rabson /*
2c19800e8SDoug Rabson  * 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 <err.h>
35c19800e8SDoug Rabson #include <getarg.h>
36c19800e8SDoug Rabson 
37c19800e8SDoug Rabson RCSID("$Id: test_hostname.c 15965 2005-08-23 20:18:55Z lha $");
38c19800e8SDoug Rabson 
39c19800e8SDoug Rabson static int debug_flag	= 0;
40c19800e8SDoug Rabson static int version_flag = 0;
41c19800e8SDoug Rabson static int help_flag	= 0;
42c19800e8SDoug Rabson 
43c19800e8SDoug Rabson static int
44c19800e8SDoug Rabson expand_hostname(krb5_context context, const char *host)
45c19800e8SDoug Rabson {
46c19800e8SDoug Rabson     krb5_error_code ret;
47c19800e8SDoug Rabson     char *h, **r;
48c19800e8SDoug Rabson 
49c19800e8SDoug Rabson     ret = krb5_expand_hostname(context, host, &h);
50c19800e8SDoug Rabson     if (ret)
51c19800e8SDoug Rabson 	krb5_err(context, 1, ret, "krb5_expand_hostname(%s)", host);
52c19800e8SDoug Rabson 
53c19800e8SDoug Rabson     free(h);
54c19800e8SDoug Rabson 
55c19800e8SDoug Rabson     if (debug_flag)
56c19800e8SDoug Rabson 	printf("hostname: %s -> %s\n", host, h);
57c19800e8SDoug Rabson 
58c19800e8SDoug Rabson     ret = krb5_expand_hostname_realms(context, host, &h, &r);
59c19800e8SDoug Rabson     if (ret)
60c19800e8SDoug Rabson 	krb5_err(context, 1, ret, "krb5_expand_hostname_realms(%s)", host);
61c19800e8SDoug Rabson 
62c19800e8SDoug Rabson     if (debug_flag) {
63c19800e8SDoug Rabson 	int j;
64c19800e8SDoug Rabson 
65c19800e8SDoug Rabson 	printf("hostname: %s -> %s\n", host, h);
66c19800e8SDoug Rabson 	for (j = 0; r[j]; j++) {
67c19800e8SDoug Rabson 	    printf("\trealm: %s\n", r[j]);
68c19800e8SDoug Rabson 	}
69c19800e8SDoug Rabson     }
70c19800e8SDoug Rabson     free(h);
71c19800e8SDoug Rabson     krb5_free_host_realm(context, r);
72c19800e8SDoug Rabson 
73c19800e8SDoug Rabson     return 0;
74c19800e8SDoug Rabson }
75c19800e8SDoug Rabson 
76c19800e8SDoug Rabson static int
77c19800e8SDoug Rabson test_expand_hostname(krb5_context context)
78c19800e8SDoug Rabson {
79c19800e8SDoug Rabson     int i, errors = 0;
80c19800e8SDoug Rabson 
81c19800e8SDoug Rabson     struct t {
82c19800e8SDoug Rabson 	krb5_error_code ret;
83c19800e8SDoug Rabson 	const char *orig_hostname;
84c19800e8SDoug Rabson 	const char *new_hostname;
85c19800e8SDoug Rabson     } tests[] = {
86c19800e8SDoug Rabson 	{ 0, "pstn1.su.se", "pstn1.su.se" },
87c19800e8SDoug Rabson 	{ 0, "pstnproxy.su.se", "pstnproxy.su.se" },
88c19800e8SDoug Rabson     };
89c19800e8SDoug Rabson 
90c19800e8SDoug Rabson     for (i = 0; i < sizeof(tests)/sizeof(tests[0]); i++) {
91c19800e8SDoug Rabson 	errors += expand_hostname(context, tests[i].orig_hostname);
92c19800e8SDoug Rabson     }
93c19800e8SDoug Rabson 
94c19800e8SDoug Rabson     return errors;
95c19800e8SDoug Rabson }
96c19800e8SDoug Rabson 
97c19800e8SDoug Rabson static struct getargs args[] = {
98c19800e8SDoug Rabson     {"debug",	'd',	arg_flag,	&debug_flag,
99c19800e8SDoug Rabson      "turn on debuggin", NULL },
100c19800e8SDoug Rabson     {"version",	0,	arg_flag,	&version_flag,
101c19800e8SDoug Rabson      "print version", NULL },
102c19800e8SDoug Rabson     {"help",	0,	arg_flag,	&help_flag,
103c19800e8SDoug Rabson      NULL, NULL }
104c19800e8SDoug Rabson };
105c19800e8SDoug Rabson 
106c19800e8SDoug Rabson static void
107c19800e8SDoug Rabson usage (int ret)
108c19800e8SDoug Rabson {
109c19800e8SDoug Rabson     arg_printusage (args, sizeof(args)/sizeof(*args), NULL, "hostname ...");
110c19800e8SDoug Rabson     exit (ret);
111c19800e8SDoug Rabson }
112c19800e8SDoug Rabson 
113c19800e8SDoug Rabson 
114c19800e8SDoug Rabson int
115c19800e8SDoug Rabson main(int argc, char **argv)
116c19800e8SDoug Rabson {
117c19800e8SDoug Rabson     krb5_context context;
118c19800e8SDoug Rabson     krb5_error_code ret;
119c19800e8SDoug Rabson     int optidx = 0, errors = 0;
120c19800e8SDoug Rabson 
121c19800e8SDoug Rabson     setprogname(argv[0]);
122c19800e8SDoug Rabson 
123c19800e8SDoug Rabson     if(getarg(args, sizeof(args) / sizeof(args[0]), argc, argv, &optidx))
124c19800e8SDoug Rabson 	usage(1);
125c19800e8SDoug Rabson 
126c19800e8SDoug Rabson     if (help_flag)
127c19800e8SDoug Rabson 	usage (0);
128c19800e8SDoug Rabson 
129c19800e8SDoug Rabson     if(version_flag){
130c19800e8SDoug Rabson 	print_version(NULL);
131c19800e8SDoug Rabson 	exit(0);
132c19800e8SDoug Rabson     }
133c19800e8SDoug Rabson 
134c19800e8SDoug Rabson     argc -= optidx;
135c19800e8SDoug Rabson     argv += optidx;
136c19800e8SDoug Rabson 
137c19800e8SDoug Rabson     ret = krb5_init_context(&context);
138c19800e8SDoug Rabson     if (ret)
139c19800e8SDoug Rabson 	errx (1, "krb5_init_context failed: %d", ret);
140c19800e8SDoug Rabson 
141c19800e8SDoug Rabson     if (argc > 0) {
142c19800e8SDoug Rabson 	while (argc-- > 0)
143c19800e8SDoug Rabson 	    errors += expand_hostname(context, *argv++);
144c19800e8SDoug Rabson 	return errors;
145c19800e8SDoug Rabson     }
146c19800e8SDoug Rabson 
147c19800e8SDoug Rabson     errors += test_expand_hostname(context);
148c19800e8SDoug Rabson 
149c19800e8SDoug Rabson     krb5_free_context(context);
150c19800e8SDoug Rabson 
151c19800e8SDoug Rabson     return errors;
152c19800e8SDoug Rabson }
153