crypto/heimdal/lib/krb5/test_config.c

   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 }