2 * Copyright (c) 1997 - 2001 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
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
34 #include "krb5_locl.h"
36 RCSID("$Id: init_creds.c,v 1.9 2001/07/03 18:42:07 assar Exp $");
39 krb5_get_init_creds_opt_init(krb5_get_init_creds_opt *opt)
41 memset (opt, 0, sizeof(*opt));
46 get_config_time (krb5_context context,
53 ret = krb5_config_get_time (context, NULL,
60 ret = krb5_config_get_time (context, NULL,
70 get_config_bool (krb5_context context,
74 return krb5_config_get_bool (context,
80 || krb5_config_get_bool (context,
88 * set all the values in `opt' to the appropriate values for
89 * application `appname' (default to getprogname() if NULL), and realm
90 * `realm'. First looks in [appdefaults] but falls back to
91 * [realms] or [libdefaults] for some of the values.
94 static krb5_addresses no_addrs = {0, NULL};
97 krb5_get_init_creds_opt_set_default_flags(krb5_context context,
99 krb5_const_realm realm,
100 krb5_get_init_creds_opt *opt)
105 b = get_config_bool (context, realm, "forwardable");
106 krb5_appdefault_boolean(context, appname, realm, "forwardable", b, &b);
107 krb5_get_init_creds_opt_set_forwardable(opt, b);
109 b = get_config_bool (context, realm, "proxiable");
110 krb5_appdefault_boolean(context, appname, realm, "proxiable", b, &b);
111 krb5_get_init_creds_opt_set_proxiable (opt, b);
113 krb5_appdefault_time(context, appname, realm, "ticket_lifetime", 0, &t);
115 t = get_config_time (context, realm, "ticket_lifetime", 0);
117 krb5_get_init_creds_opt_set_tkt_life(opt, t);
119 krb5_appdefault_time(context, appname, realm, "renew_lifetime", 0, &t);
121 t = get_config_time (context, realm, "renew_lifetime", 0);
123 krb5_get_init_creds_opt_set_renew_life(opt, t);
125 krb5_appdefault_boolean(context, appname, realm, "no-addresses", FALSE, &b);
127 krb5_get_init_creds_opt_set_address_list (opt, &no_addrs);
130 krb5_appdefault_boolean(context, appname, realm, "anonymous", FALSE, &b);
131 krb5_get_init_creds_opt_set_anonymous (opt, b);
133 krb5_get_init_creds_opt_set_etype_list(opt, enctype,
134 etype_str.num_strings);
136 krb5_get_init_creds_opt_set_salt(krb5_get_init_creds_opt *opt,
139 krb5_get_init_creds_opt_set_preauth_list(krb5_get_init_creds_opt *opt,
140 krb5_preauthtype *preauth_list,
141 int preauth_list_length);
147 krb5_get_init_creds_opt_set_tkt_life(krb5_get_init_creds_opt *opt,
148 krb5_deltat tkt_life)
150 opt->flags |= KRB5_GET_INIT_CREDS_OPT_TKT_LIFE;
151 opt->tkt_life = tkt_life;
155 krb5_get_init_creds_opt_set_renew_life(krb5_get_init_creds_opt *opt,
156 krb5_deltat renew_life)
158 opt->flags |= KRB5_GET_INIT_CREDS_OPT_RENEW_LIFE;
159 opt->renew_life = renew_life;
163 krb5_get_init_creds_opt_set_forwardable(krb5_get_init_creds_opt *opt,
166 opt->flags |= KRB5_GET_INIT_CREDS_OPT_FORWARDABLE;
167 opt->forwardable = forwardable;
171 krb5_get_init_creds_opt_set_proxiable(krb5_get_init_creds_opt *opt,
174 opt->flags |= KRB5_GET_INIT_CREDS_OPT_PROXIABLE;
175 opt->proxiable = proxiable;
179 krb5_get_init_creds_opt_set_etype_list(krb5_get_init_creds_opt *opt,
180 krb5_enctype *etype_list,
181 int etype_list_length)
183 opt->flags |= KRB5_GET_INIT_CREDS_OPT_ETYPE_LIST;
184 opt->etype_list = etype_list;
185 opt->etype_list_length = etype_list_length;
189 krb5_get_init_creds_opt_set_address_list(krb5_get_init_creds_opt *opt,
190 krb5_addresses *addresses)
192 opt->flags |= KRB5_GET_INIT_CREDS_OPT_ADDRESS_LIST;
193 opt->address_list = addresses;
197 krb5_get_init_creds_opt_set_preauth_list(krb5_get_init_creds_opt *opt,
198 krb5_preauthtype *preauth_list,
199 int preauth_list_length)
201 opt->flags |= KRB5_GET_INIT_CREDS_OPT_PREAUTH_LIST;
202 opt->preauth_list_length = preauth_list_length;
203 opt->preauth_list = preauth_list;
207 krb5_get_init_creds_opt_set_salt(krb5_get_init_creds_opt *opt,
210 opt->flags |= KRB5_GET_INIT_CREDS_OPT_SALT;
215 krb5_get_init_creds_opt_set_anonymous(krb5_get_init_creds_opt *opt,
218 opt->flags |= KRB5_GET_INIT_CREDS_OPT_ANONYMOUS;
219 opt->anonymous = anonymous;