Add _krb5_kcm_is_running/_krb5_kcm_noop API
[heimdal.git] / kdc / config.c
blobd77eb3857c7b2d66404bd4ee8bc2c8f2cc96d6ba
1 /*
2 * Copyright (c) 1997-2004 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
4 * All rights reserved.
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
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.
17 * 3. Neither the name of the Institute nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
34 #include "kdc_locl.h"
35 #include <getarg.h>
36 #include <parse_bytes.h>
38 RCSID("$Id$");
40 static const char *config_file; /* location of kdc config file */
42 int require_preauth = -1; /* 1 == require preauth for all principals */
44 size_t max_request; /* maximal size of a request */
46 static char *max_request_str; /* `max_request' as a string */
48 time_t kdc_warn_pwexpire; /* time before expiration to print a warning */
50 struct dbinfo *databases;
51 HDB **db;
52 int num_db;
54 const char *port_str;
56 #ifdef HAVE_DAEMON
57 int detach_from_console = -1;
58 #define DETACH_IS_DEFAULT FALSE
59 #endif
61 int enable_http = -1;
62 krb5_boolean encode_as_rep_as_tgs_rep; /* bug compatibility */
64 krb5_boolean check_ticket_addresses;
65 krb5_boolean allow_null_ticket_addresses;
66 krb5_boolean allow_anonymous;
67 int trpolicy;
68 static const char *trpolicy_str;
70 static struct getarg_strings addresses_str; /* addresses to listen on */
71 krb5_addresses explicit_addresses;
73 static int disable_des = -1;
75 #ifdef KRB4
76 char *v4_realm;
77 int enable_v4 = -1;
78 int enable_kaserver = -1;
79 #endif
81 int enable_524 = -1;
82 int enable_v4_cross_realm = -1;
84 static int builtin_hdb_flag;
85 static int help_flag;
86 static int version_flag;
88 static struct getargs args[] = {
90 "config-file", 'c', arg_string, &config_file,
91 "location of config file", "file"
94 "require-preauth", 'p', arg_negative_flag, &require_preauth,
95 "don't require pa-data in as-reqs"
98 "max-request", 0, arg_string, &max_request,
99 "max size for a kdc-request", "size"
101 #if 0
103 "database", 'd', arg_string, &databases,
104 "location of database", "database"
106 #endif
107 { "enable-http", 'H', arg_flag, &enable_http, "turn on HTTP support" },
108 { "524", 0, arg_negative_flag, &enable_524,
109 "don't respond to 524 requests"
111 #ifdef KRB4
113 "kaserver", 'K', arg_flag, &enable_kaserver,
114 "enable kaserver support"
116 { "kerberos4", 0, arg_flag, &enable_v4,
117 "respond to kerberos 4 requests"
120 "v4-realm", 'r', arg_string, &v4_realm,
121 "realm to serve v4-requests for"
123 #endif
124 { "kerberos4-cross-realm", 0, arg_flag,
125 &enable_v4_cross_realm,
126 "respond to kerberos 4 requests from foreign realms"
128 { "ports", 'P', arg_string, &port_str,
129 "ports to listen to", "portspec"
131 #ifdef HAVE_DAEMON
132 #if DETACH_IS_DEFAULT
134 "detach", 'D', arg_negative_flag, &detach_from_console,
135 "don't detach from console"
137 #else
139 "detach", 0 , arg_flag, &detach_from_console,
140 "detach from console"
142 #endif
143 #endif
144 { "addresses", 0, arg_strings, &addresses_str,
145 "addresses to listen on", "list of addresses" },
146 { "disable-des", 0, arg_flag, &disable_des,
147 "disable DES" },
148 { "builtin-hdb", 0, arg_flag, &builtin_hdb_flag,
149 "list builtin hdb backends"},
150 { "help", 'h', arg_flag, &help_flag },
151 { "version", 'v', arg_flag, &version_flag }
154 static int num_args = sizeof(args) / sizeof(args[0]);
156 static void
157 usage(int ret)
159 arg_printusage (args, num_args, NULL, "");
160 exit (ret);
163 static void
164 get_dbinfo(void)
166 const krb5_config_binding *top_binding = NULL;
167 const krb5_config_binding *db_binding;
168 const krb5_config_binding *default_binding = NULL;
169 struct dbinfo *di, **dt;
170 const char *default_dbname = HDB_DEFAULT_DB;
171 const char *default_mkey = HDB_DB_DIR "/m-key";
172 const char *p;
174 databases = NULL;
175 dt = &databases;
176 while((db_binding = (const krb5_config_binding *)
177 krb5_config_get_next(context, NULL, &top_binding,
178 krb5_config_list,
179 "kdc",
180 "database",
181 NULL))) {
182 p = krb5_config_get_string(context, db_binding, "realm", NULL);
183 if(p == NULL) {
184 if(default_binding) {
185 krb5_warnx(context, "WARNING: more than one realm-less "
186 "database specification");
187 krb5_warnx(context, "WARNING: using the first encountered");
188 } else
189 default_binding = db_binding;
190 continue;
192 di = calloc(1, sizeof(*di));
193 di->realm = strdup(p);
194 p = krb5_config_get_string(context, db_binding, "dbname", NULL);
195 if(p)
196 di->dbname = strdup(p);
197 p = krb5_config_get_string(context, db_binding, "mkey_file", NULL);
198 if(p)
199 di->mkey_file = strdup(p);
200 *dt = di;
201 dt = &di->next;
203 if(default_binding) {
204 di = calloc(1, sizeof(*di));
205 p = krb5_config_get_string(context, default_binding, "dbname", NULL);
206 if(p) {
207 di->dbname = strdup(p);
208 default_dbname = p;
210 p = krb5_config_get_string(context, default_binding, "mkey_file", NULL);
211 if(p) {
212 di->mkey_file = strdup(p);
213 default_mkey = p;
215 *dt = di;
216 dt = &di->next;
217 } else if(databases == NULL) {
218 /* if there are none specified, use some default */
219 di = calloc(1, sizeof(*di));
220 di->dbname = strdup(default_dbname);
221 di->mkey_file = strdup(default_mkey);
222 *dt = di;
223 dt = &di->next;
225 for(di = databases; di; di = di->next) {
226 if(di->dbname == NULL)
227 di->dbname = strdup(default_dbname);
228 if(di->mkey_file == NULL) {
229 p = strrchr(di->dbname, '.');
230 if(p == NULL || strchr(p, '/') != NULL)
231 /* final pathname component does not contain a . */
232 asprintf(&di->mkey_file, "%s.mkey", di->dbname);
233 else
234 /* the filename is something.else, replace .else with
235 .mkey */
236 asprintf(&di->mkey_file, "%.*s.mkey",
237 (int)(p - di->dbname), di->dbname);
242 static void
243 add_one_address (const char *str, int first)
245 krb5_error_code ret;
246 krb5_addresses tmp;
248 ret = krb5_parse_address (context, str, &tmp);
249 if (ret)
250 krb5_err (context, 1, ret, "parse_address `%s'", str);
251 if (first)
252 krb5_copy_addresses(context, &tmp, &explicit_addresses);
253 else
254 krb5_append_addresses(context, &explicit_addresses, &tmp);
255 krb5_free_addresses (context, &tmp);
258 void
259 configure(int argc, char **argv)
261 krb5_error_code ret;
262 int optind = 0;
263 const char *p;
265 while(getarg(args, num_args, argc, argv, &optind))
266 warnx("error at argument `%s'", argv[optind]);
268 if(help_flag)
269 usage (0);
271 if (version_flag) {
272 print_version(NULL);
273 exit(0);
276 if (builtin_hdb_flag) {
277 char *list;
278 ret = hdb_list_builtin(context, &list);
279 if (ret)
280 krb5_err(context, 1, ret, "listing builtin hdb backends");
281 printf("builtin hdb backends: %s\n", list);
282 free(list);
283 exit(0);
286 argc -= optind;
287 argv += optind;
289 if (argc != 0)
290 usage(1);
293 char **files;
295 if(config_file == NULL)
296 config_file = _PATH_KDC_CONF;
298 ret = krb5_prepend_config_files_default(config_file, &files);
299 if (ret)
300 krb5_err(context, 1, ret, "getting configuration files");
302 ret = krb5_set_config_files(context, files);
303 krb5_free_config_files(files);
304 if(ret)
305 krb5_err(context, 1, ret, "reading configuration files");
308 get_dbinfo();
310 if(max_request_str)
311 max_request = parse_bytes(max_request_str, NULL);
313 if(max_request == 0){
314 p = krb5_config_get_string (context,
315 NULL,
316 "kdc",
317 "max-request",
318 NULL);
319 if(p)
320 max_request = parse_bytes(p, NULL);
323 if(require_preauth == -1)
324 require_preauth = krb5_config_get_bool(context, NULL, "kdc",
325 "require-preauth", NULL);
327 if(port_str == NULL){
328 p = krb5_config_get_string(context, NULL, "kdc", "ports", NULL);
329 if (p != NULL)
330 port_str = strdup(p);
333 explicit_addresses.len = 0;
335 if (addresses_str.num_strings) {
336 int i;
338 for (i = 0; i < addresses_str.num_strings; ++i)
339 add_one_address (addresses_str.strings[i], i == 0);
340 free_getarg_strings (&addresses_str);
341 } else {
342 char **foo = krb5_config_get_strings (context, NULL,
343 "kdc", "addresses", NULL);
345 if (foo != NULL) {
346 add_one_address (*foo++, TRUE);
347 while (*foo)
348 add_one_address (*foo++, FALSE);
352 #ifdef KRB4
353 if(enable_v4 == -1)
354 enable_v4 = krb5_config_get_bool_default(context, NULL, FALSE, "kdc",
355 "enable-kerberos4", NULL);
356 #else
357 #define enable_v4 0
358 #endif
359 if(enable_v4_cross_realm == -1)
360 enable_v4_cross_realm =
361 krb5_config_get_bool_default(context, NULL,
362 FALSE, "kdc",
363 "enable-kerberos4-cross-realm",
364 NULL);
365 if(enable_524 == -1)
366 enable_524 = krb5_config_get_bool_default(context, NULL, enable_v4,
367 "kdc", "enable-524", NULL);
369 if(enable_http == -1)
370 enable_http = krb5_config_get_bool(context, NULL, "kdc",
371 "enable-http", NULL);
372 check_ticket_addresses =
373 krb5_config_get_bool_default(context, NULL, TRUE, "kdc",
374 "check-ticket-addresses", NULL);
375 allow_null_ticket_addresses =
376 krb5_config_get_bool_default(context, NULL, TRUE, "kdc",
377 "allow-null-ticket-addresses", NULL);
379 allow_anonymous =
380 krb5_config_get_bool(context, NULL, "kdc",
381 "allow-anonymous", NULL);
382 trpolicy_str =
383 krb5_config_get_string_default(context, NULL, "always-check", "kdc",
384 "transited-policy", NULL);
385 if(strcasecmp(trpolicy_str, "always-check") == 0)
386 trpolicy = TRPOLICY_ALWAYS_CHECK;
387 else if(strcasecmp(trpolicy_str, "allow-per-principal") == 0)
388 trpolicy = TRPOLICY_ALLOW_PER_PRINCIPAL;
389 else if(strcasecmp(trpolicy_str, "always-honour-request") == 0)
390 trpolicy = TRPOLICY_ALWAYS_HONOUR_REQUEST;
391 else {
392 kdc_log(0, "unknown transited-policy: %s, reverting to always-check",
393 trpolicy_str);
394 trpolicy = TRPOLICY_ALWAYS_CHECK;
397 if (krb5_config_get_string(context, NULL, "kdc",
398 "enforce-transited-policy", NULL))
399 krb5_errx(context, 1, "enforce-transited-policy deprecated, "
400 "use [kdc]transited-policy instead");
402 #ifdef KRB4
403 if(v4_realm == NULL){
404 p = krb5_config_get_string (context, NULL,
405 "kdc",
406 "v4-realm",
407 NULL);
408 if(p != NULL) {
409 v4_realm = strdup(p);
410 if (v4_realm == NULL)
411 krb5_errx(context, 1, "out of memory");
414 if (enable_kaserver == -1)
415 enable_kaserver = krb5_config_get_bool_default(context, NULL, FALSE,
416 "kdc",
417 "enable-kaserver",
418 NULL);
419 #endif
421 encode_as_rep_as_tgs_rep = krb5_config_get_bool(context, NULL, "kdc",
422 "encode_as_rep_as_tgs_rep",
423 NULL);
425 kdc_warn_pwexpire = krb5_config_get_time (context, NULL,
426 "kdc",
427 "kdc_warn_pwexpire",
428 NULL);
430 #ifdef HAVE_DAEMON
431 if(detach_from_console == -1)
432 detach_from_console = krb5_config_get_bool_default(context, NULL,
433 DETACH_IS_DEFAULT,
434 "kdc",
435 "detach", NULL);
436 #endif
437 kdc_openlog();
438 if(max_request == 0)
439 max_request = 64 * 1024;
440 if(require_preauth == -1)
441 require_preauth = 1;
442 if (port_str == NULL)
443 port_str = "+";
445 #ifdef PKINIT
446 enable_pkinit = krb5_config_get_bool_default(context, NULL, FALSE,
447 "kdc",
448 "enable-pkinit",
449 NULL);
450 if (enable_pkinit) {
451 const char *user_id, *x509_anchors;
453 user_id = krb5_config_get_string(context, NULL,
454 "kdc",
455 "pki-identity",
456 NULL);
457 if (user_id == NULL)
458 krb5_errx(context, 1, "pkinit enabled but no identity");
460 x509_anchors = krb5_config_get_string(context, NULL,
461 "kdc",
462 "pki-anchors",
463 NULL);
464 if (x509_anchors == NULL)
465 krb5_errx(context, 1, "pkinit enabled but no X509 anchors");
467 pk_initialize(user_id, x509_anchors);
469 enable_pkinit_princ_in_cert =
470 krb5_config_get_bool_default(context,
471 NULL, TRUE,
472 "kdc",
473 "pkinit-principal-in-certificate",
474 NULL);
476 #endif
478 #ifdef KRB4
479 if(v4_realm == NULL){
480 v4_realm = malloc(40); /* REALM_SZ */
481 if (v4_realm == NULL)
482 krb5_errx(context, 1, "out of memory");
483 krb_get_lrealm(v4_realm, 1);
485 #endif
486 if(disable_des == -1)
487 disable_des = krb5_config_get_bool_default(context, NULL,
489 "kdc",
490 "disable-des", NULL);
491 if(disable_des) {
492 krb5_enctype_disable(context, ETYPE_DES_CBC_CRC);
493 krb5_enctype_disable(context, ETYPE_DES_CBC_MD4);
494 krb5_enctype_disable(context, ETYPE_DES_CBC_MD5);
495 krb5_enctype_disable(context, ETYPE_DES_CBC_NONE);
496 krb5_enctype_disable(context, ETYPE_DES_CFB64_NONE);
497 krb5_enctype_disable(context, ETYPE_DES_PCBC_NONE);