1 /* $OpenBSD: auth-krb5.c,v 1.22 2016/05/04 14:22:33 markus Exp $ */
3 * Kerberos v5 authentication and ticket-passing routines.
5 * From: FreeBSD: src/crypto/openssh/auth-krb5.c,v 1.6 2001/02/13 16:58:04 assar
8 * Copyright (c) 2002 Daniel Kouril. All rights reserved.
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
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.
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
33 #include <sys/types.h>
55 extern ServerOptions options
;
58 krb5_init(void *context
)
60 Authctxt
*authctxt
= (Authctxt
*)context
;
61 krb5_error_code problem
;
63 if (authctxt
->krb5_ctx
== NULL
) {
64 problem
= krb5_init_context(&authctxt
->krb5_ctx
);
72 auth_krb5_password(Authctxt
*authctxt
, const char *password
)
76 krb5_principal server
;
78 krb5_error_code problem
;
79 krb5_ccache ccache
= NULL
;
81 char *client
, *platform_client
;
84 /* get platform-specific kerberos client principal name (if it exists) */
85 platform_client
= platform_krb5_get_principal_name(authctxt
->pw
->pw_name
);
86 client
= platform_client
? platform_client
: authctxt
->pw
->pw_name
;
88 temporarily_use_uid(authctxt
->pw
);
90 problem
= krb5_init(authctxt
);
94 problem
= krb5_parse_name(authctxt
->krb5_ctx
, client
,
95 &authctxt
->krb5_user
);
100 # ifdef HAVE_KRB5_CC_NEW_UNIQUE
101 problem
= krb5_cc_new_unique(authctxt
->krb5_ctx
,
102 krb5_mcc_ops
.prefix
, NULL
, &ccache
);
104 problem
= krb5_cc_gen_new(authctxt
->krb5_ctx
, &krb5_mcc_ops
, &ccache
);
109 problem
= krb5_cc_initialize(authctxt
->krb5_ctx
, ccache
,
110 authctxt
->krb5_user
);
116 problem
= krb5_verify_user(authctxt
->krb5_ctx
, authctxt
->krb5_user
,
117 ccache
, password
, 1, NULL
);
119 temporarily_use_uid(authctxt
->pw
);
124 # ifdef HAVE_KRB5_CC_NEW_UNIQUE
125 problem
= krb5_cc_new_unique(authctxt
->krb5_ctx
,
126 krb5_fcc_ops
.prefix
, NULL
, &authctxt
->krb5_fwd_ccache
);
128 problem
= krb5_cc_gen_new(authctxt
->krb5_ctx
, &krb5_fcc_ops
,
129 &authctxt
->krb5_fwd_ccache
);
134 problem
= krb5_cc_copy_cache(authctxt
->krb5_ctx
, ccache
,
135 authctxt
->krb5_fwd_ccache
);
136 krb5_cc_destroy(authctxt
->krb5_ctx
, ccache
);
142 problem
= krb5_get_init_creds_password(authctxt
->krb5_ctx
, &creds
,
143 authctxt
->krb5_user
, (char *)password
, NULL
, NULL
, 0, NULL
, NULL
);
147 problem
= krb5_sname_to_principal(authctxt
->krb5_ctx
, NULL
, NULL
,
148 KRB5_NT_SRV_HST
, &server
);
153 problem
= krb5_verify_init_creds(authctxt
->krb5_ctx
, &creds
, server
,
155 krb5_free_principal(authctxt
->krb5_ctx
, server
);
156 temporarily_use_uid(authctxt
->pw
);
160 if (!krb5_kuserok(authctxt
->krb5_ctx
, authctxt
->krb5_user
,
161 authctxt
->pw
->pw_name
)) {
166 problem
= ssh_krb5_cc_gen(authctxt
->krb5_ctx
, &authctxt
->krb5_fwd_ccache
);
170 problem
= krb5_cc_initialize(authctxt
->krb5_ctx
, authctxt
->krb5_fwd_ccache
,
171 authctxt
->krb5_user
);
175 problem
= krb5_cc_store_cred(authctxt
->krb5_ctx
, authctxt
->krb5_fwd_ccache
,
181 authctxt
->krb5_ticket_file
= (char *)krb5_cc_get_name(authctxt
->krb5_ctx
, authctxt
->krb5_fwd_ccache
);
183 len
= strlen(authctxt
->krb5_ticket_file
) + 6;
184 authctxt
->krb5_ccname
= xmalloc(len
);
185 snprintf(authctxt
->krb5_ccname
, len
, "FILE:%s",
186 authctxt
->krb5_ticket_file
);
190 do_pam_putenv("KRB5CCNAME", authctxt
->krb5_ccname
);
196 free(platform_client
);
200 krb5_cc_destroy(authctxt
->krb5_ctx
, ccache
);
202 if (authctxt
->krb5_ctx
!= NULL
&& problem
!=-1) {
203 errmsg
= krb5_get_error_message(authctxt
->krb5_ctx
,
205 debug("Kerberos password authentication failed: %s",
207 krb5_free_error_message(authctxt
->krb5_ctx
, errmsg
);
209 debug("Kerberos password authentication failed: %d",
212 krb5_cleanup_proc(authctxt
);
214 if (options
.kerberos_or_local_passwd
)
219 return (authctxt
->valid
? 1 : 0);
223 krb5_cleanup_proc(Authctxt
*authctxt
)
225 debug("krb5_cleanup_proc called");
226 if (authctxt
->krb5_fwd_ccache
) {
227 krb5_cc_destroy(authctxt
->krb5_ctx
, authctxt
->krb5_fwd_ccache
);
228 authctxt
->krb5_fwd_ccache
= NULL
;
230 if (authctxt
->krb5_user
) {
231 krb5_free_principal(authctxt
->krb5_ctx
, authctxt
->krb5_user
);
232 authctxt
->krb5_user
= NULL
;
234 if (authctxt
->krb5_ctx
) {
235 krb5_free_context(authctxt
->krb5_ctx
);
236 authctxt
->krb5_ctx
= NULL
;
242 ssh_krb5_cc_gen(krb5_context ctx
, krb5_ccache
*ccache
) {
243 int tmpfd
, ret
, oerrno
;
247 ret
= snprintf(ccname
, sizeof(ccname
),
248 "FILE:/tmp/krb5cc_%d_XXXXXXXXXX", geteuid());
249 if (ret
< 0 || (size_t)ret
>= sizeof(ccname
))
252 old_umask
= umask(0177);
253 tmpfd
= mkstemp(ccname
+ strlen("FILE:"));
257 logit("mkstemp(): %.100s", strerror(oerrno
));
261 if (fchmod(tmpfd
,S_IRUSR
| S_IWUSR
) == -1) {
263 logit("fchmod(): %.100s", strerror(oerrno
));
269 return (krb5_cc_resolve(ctx
, ccname
, ccache
));
271 #endif /* !HEIMDAL */