xref: /freebsd/crypto/heimdal/lib/krb5/test_config.c (revision 5ca8e32633c4ffbbcd6762e5888b6a4ba0708c6c)
1 /*
2  * Copyright (c) 2003 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 KTH nor the names of its contributors may be
18  *    used to endorse or promote products derived from this software without
19  *    specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY KTH AND ITS CONTRIBUTORS ``AS IS'' AND ANY
22  * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24  * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL KTH OR ITS CONTRIBUTORS BE
25  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
28  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
29  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
30  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
31  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32  */
33 
34 #include "krb5_locl.h"
35 #include <err.h>
36 
37 static int
38 check_config_file(krb5_context context, char *filelist, char **res, int def)
39 {
40     krb5_error_code ret;
41     char **pp;
42     int i;
43 
44     pp = NULL;
45 
46     if (def)
47 	ret = krb5_prepend_config_files_default(filelist, &pp);
48     else
49 	ret = krb5_prepend_config_files(filelist, NULL, &pp);
50 
51     if (ret)
52 	krb5_err(context, 1, ret, "prepend_config_files");
53 
54     for (i = 0; res[i] && pp[i]; i++)
55 	if (strcmp(pp[i], res[i]) != 0)
56 	    krb5_errx(context, 1, "'%s' != '%s'", pp[i], res[i]);
57 
58     if (res[i] != NULL)
59 	krb5_errx(context, 1, "pp ended before res list");
60 
61     if (def) {
62 	char **deflist;
63 	int j;
64 
65 	ret = krb5_get_default_config_files(&deflist);
66 	if (ret)
67 	    krb5_err(context, 1, ret, "get_default_config_files");
68 
69 	for (j = 0 ; pp[i] && deflist[j]; i++, j++)
70 	    if (strcmp(pp[i], deflist[j]) != 0)
71 		krb5_errx(context, 1, "'%s' != '%s'", pp[i], deflist[j]);
72 
73 	if (deflist[j] != NULL)
74 	    krb5_errx(context, 1, "pp ended before def list");
75 	krb5_free_config_files(deflist);
76     }
77 
78     if (pp[i] != NULL)
79 	krb5_errx(context, 1, "pp ended after res (and def) list");
80 
81     krb5_free_config_files(pp);
82 
83     return 0;
84 }
85 
86 char *list0[] =  { "/tmp/foo", NULL };
87 char *list1[] =  { "/tmp/foo", "/tmp/foo/bar", NULL };
88 char *list2[] =  { "", NULL };
89 
90 struct {
91     char *fl;
92     char **res;
93 } test[] = {
94     { "/tmp/foo", NULL },
95     { "/tmp/foo" PATH_SEP "/tmp/foo/bar", NULL },
96     { "", NULL }
97 };
98 
99 static void
100 check_config_files(void)
101 {
102     krb5_context context;
103     krb5_error_code ret;
104     int i;
105 
106     ret = krb5_init_context(&context);
107     if (ret)
108 	errx(1, "krb5_init_context %d", ret);
109 
110     test[0].res = list0;
111     test[1].res = list1;
112     test[2].res = list2;
113 
114     for (i = 0; i < sizeof(test)/sizeof(*test); i++) {
115 	check_config_file(context, test[i].fl, test[i].res, 0);
116 	check_config_file(context, test[i].fl, test[i].res, 1);
117     }
118 
119     krb5_free_context(context);
120 }
121 
122 const char *config_string_result0[] = {
123     "A", "B", "C", "D", NULL
124 };
125 
126 const char *config_string_result1[] = {
127     "A", "B", "C D", NULL
128 };
129 
130 const char *config_string_result2[] = {
131     "A", "B", "", NULL
132 };
133 
134 const char *config_string_result3[] = {
135     "A B;C: D", NULL
136 };
137 
138 const char *config_string_result4[] = {
139     "\"\"", "", "\"\"", NULL
140 };
141 
142 const char *config_string_result5[] = {
143     "A\"BQd", NULL
144 };
145 
146 const char *config_string_result6[] = {
147     "efgh\"", "ABC", NULL
148 };
149 
150 const char *config_string_result7[] = {
151     "SnapeKills\\", "Dumbledore", NULL
152 };
153 
154 const char *config_string_result8[] = {
155     "\"TownOf Sandwich: Massachusetts\"Oldest", "Town", "In", "Cape Cod", NULL
156 };
157 
158 const char *config_string_result9[] = {
159     "\"Begins and\"ends", "In", "One", "String", NULL
160 };
161 
162 const char *config_string_result10[] = {
163     "Redistribution and use in source and binary forms, with or without modification, are permitted provided that the following conditions are met:",
164     "1. Redistributions of source code must retain the above copyright notice, this list of conditions and the following disclaimer.",
165     "2. Redistributions in binary form must reproduce the above copyright notice, this list of conditions and the following disclaimer in the documentation and/or other materials provided with the distribution.",
166     "3. Neither the name of the Institute nor the names of its contributors may be used to endorse or promote products derived from this software without specific prior written permission.",
167     "THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.",
168     "Why do we test with such long strings? Because some people have config files",
169     "That", "look", "Like this.", NULL
170 };
171 
172 const struct {
173     const char * name;
174     const char ** expected;
175 } config_strings_tests[] = {
176     { "foo", config_string_result0 },
177     { "bar", config_string_result1 },
178     { "baz", config_string_result2 },
179     { "quux", config_string_result3 },
180     { "questionable", config_string_result4 },
181     { "mismatch1", config_string_result5 },
182     { "mismatch2", config_string_result6 },
183     { "internal1", config_string_result7 },
184     { "internal2", config_string_result8 },
185     { "internal3", config_string_result9 },
186     { "longer_strings", config_string_result10 }
187 };
188 
189 static void
190 check_escaped_strings(void)
191 {
192     krb5_context context;
193     krb5_config_section *c = NULL;
194     krb5_error_code ret;
195     int i;
196 
197     ret = krb5_init_context(&context);
198     if (ret)
199         errx(1, "krb5_init_context %d", ret);
200 
201     ret = krb5_config_parse_file(context, "test_config_strings.out", &c);
202     if (ret)
203         krb5_errx(context, 1, "krb5_config_parse_file()");
204 
205     for (i=0; i < sizeof(config_strings_tests)/sizeof(config_strings_tests[0]); i++) {
206         char **ps;
207         const char **s;
208         const char **e;
209 
210         ps = krb5_config_get_strings(context, c, "escapes", config_strings_tests[i].name,
211                                      NULL);
212         if (ps == NULL)
213             errx(1, "Failed to read string value %s", config_strings_tests[i].name);
214 
215         e = config_strings_tests[i].expected;
216 
217         for (s = (const char **)ps; *s && *e; s++, e++) {
218             if (strcmp(*s, *e))
219                 errx(1,
220                      "Unexpected configuration string at value [%s].\n"
221                      "Actual=[%s]\n"
222                      "Expected=[%s]\n",
223                      config_strings_tests[i].name, *s, *e);
224         }
225 
226         if (*s || *e)
227             errx(1, "Configuation string list for value [%s] has incorrect length.",
228 		 config_strings_tests[i].name);
229 
230         krb5_config_free_strings(ps);
231     }
232 
233     ret = krb5_config_file_free(context, c);
234     if (ret)
235         krb5_errx(context, 1, "krb5_config_file_free()");
236 
237     krb5_free_context(context);
238 }
239 
240 int
241 main(int argc, char **argv)
242 {
243     check_config_files();
244     check_escaped_strings();
245     return 0;
246 }
247