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