Merge from vendor branch HEIMDAL:
[dragonfly.git] / crypto / heimdal-0.6.3 / lib / krb5 / appdefault.c
1 /*
2  * Copyright (c) 2000 - 2001 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 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. 
20  *
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. 
32  */
33
34 #include "krb5_locl.h"
35
36 RCSID("$Id: appdefault.c,v 1.7 2001/09/16 04:48:55 assar Exp $");
37
38 void
39 krb5_appdefault_boolean(krb5_context context, const char *appname, 
40                         krb5_const_realm realm, const char *option,
41                         krb5_boolean def_val, krb5_boolean *ret_val)
42 {
43     
44     if(appname == NULL)
45         appname = getprogname();
46
47     def_val = krb5_config_get_bool_default(context, NULL, def_val, 
48                                            "libdefaults", option, NULL);
49     if(realm != NULL)
50         def_val = krb5_config_get_bool_default(context, NULL, def_val, 
51                                                "realms", realm, option, NULL);
52         
53     def_val = krb5_config_get_bool_default(context, NULL, def_val, 
54                                            "appdefaults", 
55                                            option, 
56                                            NULL);
57     if(realm != NULL)
58         def_val = krb5_config_get_bool_default(context, NULL, def_val,
59                                                "appdefaults", 
60                                                realm, 
61                                                option, 
62                                                NULL);
63     if(appname != NULL) {
64         def_val = krb5_config_get_bool_default(context, NULL, def_val, 
65                                                "appdefaults", 
66                                                appname, 
67                                                option, 
68                                                NULL);
69         if(realm != NULL)
70             def_val = krb5_config_get_bool_default(context, NULL, def_val,
71                                                    "appdefaults", 
72                                                    appname, 
73                                                    realm, 
74                                                    option, 
75                                                    NULL);
76     }
77     *ret_val = def_val;
78 }
79
80 void
81 krb5_appdefault_string(krb5_context context, const char *appname, 
82                        krb5_const_realm realm, const char *option,
83                        const char *def_val, char **ret_val)
84 {
85     if(appname == NULL)
86         appname = getprogname();
87
88     def_val = krb5_config_get_string_default(context, NULL, def_val, 
89                                              "libdefaults", option, NULL);
90     if(realm != NULL)
91         def_val = krb5_config_get_string_default(context, NULL, def_val, 
92                                                  "realms", realm, option, NULL);
93
94     def_val = krb5_config_get_string_default(context, NULL, def_val, 
95                                              "appdefaults", 
96                                              option, 
97                                              NULL);
98     if(realm != NULL)
99         def_val = krb5_config_get_string_default(context, NULL, def_val,
100                                                  "appdefaults", 
101                                                  realm, 
102                                                  option, 
103                                                  NULL);
104     if(appname != NULL) {
105         def_val = krb5_config_get_string_default(context, NULL, def_val, 
106                                                  "appdefaults", 
107                                                  appname, 
108                                                  option, 
109                                                  NULL);
110         if(realm != NULL)
111             def_val = krb5_config_get_string_default(context, NULL, def_val,
112                                                      "appdefaults", 
113                                                      appname, 
114                                                      realm, 
115                                                      option, 
116                                                      NULL);
117     }
118     if(def_val != NULL)
119         *ret_val = strdup(def_val);
120     else
121         *ret_val = NULL;
122 }
123
124 void
125 krb5_appdefault_time(krb5_context context, const char *appname,
126                      krb5_const_realm realm, const char *option,
127                      time_t def_val, time_t *ret_val)
128 {
129     time_t t;
130     char tstr[32];
131     char *val;
132     snprintf(tstr, sizeof(tstr), "%ld", (long)def_val);
133     krb5_appdefault_string(context, appname, realm, option, tstr, &val);
134     t = parse_time (val, NULL);
135     free(val);
136     *ret_val = t;
137 }