2 Unix SMB/CIFS implementation.
4 Kerberos backend for GENSEC
6 Copyright (C) Andrew Bartlett <abartlet@samba.org> 2004
7 Copyright (C) Andrew Tridgell 2001
8 Copyright (C) Luke Howard 2002-2003
9 Copyright (C) Stefan Metzmacher 2004-2005
11 This program is free software; you can redistribute it and/or modify
12 it under the terms of the GNU General Public License as published by
13 the Free Software Foundation; either version 3 of the License, or
14 (at your option) any later version.
16 This program is distributed in the hope that it will be useful,
17 but WITHOUT ANY WARRANTY; without even the implied warranty of
18 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 GNU General Public License for more details.
22 You should have received a copy of the GNU General Public License
23 along with this program. If not, see <http://www.gnu.org/licenses/>.
27 #include "system/kerberos.h"
28 #include "auth/kerberos/kerberos.h"
29 #include "auth/auth.h"
30 #include "lib/socket/socket.h"
31 #include "lib/tsocket/tsocket.h"
32 #include "librpc/rpc/dcerpc.h"
33 #include "auth/credentials/credentials.h"
34 #include "auth/credentials/credentials_krb5.h"
35 #include "auth/kerberos/kerberos_credentials.h"
36 #include "auth/gensec/gensec.h"
37 #include "auth/gensec/gensec_internal.h"
38 #include "auth/gensec/gensec_proto.h"
39 #include "auth/gensec/gensec_toplevel_proto.h"
40 #include "param/param.h"
41 #include "auth/auth_sam_reply.h"
42 #include "lib/util/util_net.h"
43 #include "../lib/util/asn1.h"
44 #include "auth/kerberos/pac_utils.h"
45 #include "gensec_krb5_util.h"
47 _PUBLIC_ NTSTATUS
gensec_krb5_init(void);
49 enum GENSEC_KRB5_STATE
{
50 GENSEC_KRB5_SERVER_START
,
51 GENSEC_KRB5_CLIENT_START
,
52 GENSEC_KRB5_CLIENT_MUTUAL_AUTH
,
56 struct gensec_krb5_state
{
57 enum GENSEC_KRB5_STATE state_position
;
58 struct smb_krb5_context
*smb_krb5_context
;
59 krb5_auth_context auth_context
;
61 krb5_keyblock
*keyblock
;
64 krb5_flags ap_req_options
;
67 static int gensec_krb5_destroy(struct gensec_krb5_state
*gensec_krb5_state
)
69 if (!gensec_krb5_state
->smb_krb5_context
) {
70 /* We can't clean anything else up unless we started up this far */
73 if (gensec_krb5_state
->enc_ticket
.length
) {
74 kerberos_free_data_contents(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
75 &gensec_krb5_state
->enc_ticket
);
78 if (gensec_krb5_state
->ticket
) {
79 krb5_free_ticket(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
80 gensec_krb5_state
->ticket
);
83 /* ccache freed in a child destructor */
85 krb5_free_keyblock(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
86 gensec_krb5_state
->keyblock
);
88 if (gensec_krb5_state
->auth_context
) {
89 krb5_auth_con_free(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
90 gensec_krb5_state
->auth_context
);
96 static NTSTATUS
gensec_krb5_start(struct gensec_security
*gensec_security
, bool gssapi
)
99 struct gensec_krb5_state
*gensec_krb5_state
;
100 struct cli_credentials
*creds
;
101 const struct tsocket_address
*tlocal_addr
, *tremote_addr
;
102 krb5_address my_krb5_addr
, peer_krb5_addr
;
104 creds
= gensec_get_credentials(gensec_security
);
106 return NT_STATUS_INVALID_PARAMETER
;
109 gensec_krb5_state
= talloc(gensec_security
, struct gensec_krb5_state
);
110 if (!gensec_krb5_state
) {
111 return NT_STATUS_NO_MEMORY
;
114 gensec_security
->private_data
= gensec_krb5_state
;
115 gensec_krb5_state
->smb_krb5_context
= NULL
;
116 gensec_krb5_state
->auth_context
= NULL
;
117 gensec_krb5_state
->ticket
= NULL
;
118 ZERO_STRUCT(gensec_krb5_state
->enc_ticket
);
119 gensec_krb5_state
->keyblock
= NULL
;
120 gensec_krb5_state
->gssapi
= gssapi
;
122 talloc_set_destructor(gensec_krb5_state
, gensec_krb5_destroy
);
124 if (cli_credentials_get_krb5_context(creds
,
125 gensec_security
->settings
->lp_ctx
, &gensec_krb5_state
->smb_krb5_context
)) {
126 talloc_free(gensec_krb5_state
);
127 return NT_STATUS_INTERNAL_ERROR
;
130 ret
= krb5_auth_con_init(gensec_krb5_state
->smb_krb5_context
->krb5_context
, &gensec_krb5_state
->auth_context
);
132 DEBUG(1,("gensec_krb5_start: krb5_auth_con_init failed (%s)\n",
133 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
134 ret
, gensec_krb5_state
)));
135 talloc_free(gensec_krb5_state
);
136 return NT_STATUS_INTERNAL_ERROR
;
139 ret
= krb5_auth_con_setflags(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
140 gensec_krb5_state
->auth_context
,
141 KRB5_AUTH_CONTEXT_DO_SEQUENCE
);
143 DEBUG(1,("gensec_krb5_start: krb5_auth_con_setflags failed (%s)\n",
144 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
145 ret
, gensec_krb5_state
)));
146 talloc_free(gensec_krb5_state
);
147 return NT_STATUS_INTERNAL_ERROR
;
150 tlocal_addr
= gensec_get_local_address(gensec_security
);
153 struct sockaddr_storage ss
;
155 socklen
= tsocket_address_bsd_sockaddr(tlocal_addr
,
156 (struct sockaddr
*) &ss
,
157 sizeof(struct sockaddr_storage
));
159 talloc_free(gensec_krb5_state
);
160 return NT_STATUS_INTERNAL_ERROR
;
162 ret
= krb5_sockaddr2address(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
163 (const struct sockaddr
*) &ss
, &my_krb5_addr
);
165 DEBUG(1,("gensec_krb5_start: krb5_sockaddr2address (local) failed (%s)\n",
166 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
167 ret
, gensec_krb5_state
)));
168 talloc_free(gensec_krb5_state
);
169 return NT_STATUS_INTERNAL_ERROR
;
173 tremote_addr
= gensec_get_remote_address(gensec_security
);
176 struct sockaddr_storage ss
;
178 socklen
= tsocket_address_bsd_sockaddr(tremote_addr
,
179 (struct sockaddr
*) &ss
,
180 sizeof(struct sockaddr_storage
));
182 talloc_free(gensec_krb5_state
);
183 return NT_STATUS_INTERNAL_ERROR
;
185 ret
= krb5_sockaddr2address(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
186 (const struct sockaddr
*) &ss
, &peer_krb5_addr
);
188 DEBUG(1,("gensec_krb5_start: krb5_sockaddr2address (local) failed (%s)\n",
189 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
190 ret
, gensec_krb5_state
)));
191 talloc_free(gensec_krb5_state
);
192 return NT_STATUS_INTERNAL_ERROR
;
196 ret
= krb5_auth_con_setaddrs(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
197 gensec_krb5_state
->auth_context
,
198 tlocal_addr
? &my_krb5_addr
: NULL
,
199 tremote_addr
? &peer_krb5_addr
: NULL
);
201 DEBUG(1,("gensec_krb5_start: krb5_auth_con_setaddrs failed (%s)\n",
202 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
203 ret
, gensec_krb5_state
)));
204 talloc_free(gensec_krb5_state
);
205 return NT_STATUS_INTERNAL_ERROR
;
211 static NTSTATUS
gensec_krb5_common_server_start(struct gensec_security
*gensec_security
, bool gssapi
)
214 struct gensec_krb5_state
*gensec_krb5_state
;
216 nt_status
= gensec_krb5_start(gensec_security
, gssapi
);
217 if (!NT_STATUS_IS_OK(nt_status
)) {
221 gensec_krb5_state
= (struct gensec_krb5_state
*)gensec_security
->private_data
;
222 gensec_krb5_state
->state_position
= GENSEC_KRB5_SERVER_START
;
227 static NTSTATUS
gensec_krb5_server_start(struct gensec_security
*gensec_security
)
229 return gensec_krb5_common_server_start(gensec_security
, false);
232 static NTSTATUS
gensec_fake_gssapi_krb5_server_start(struct gensec_security
*gensec_security
)
234 return gensec_krb5_common_server_start(gensec_security
, true);
237 static NTSTATUS
gensec_krb5_common_client_start(struct gensec_security
*gensec_security
, bool gssapi
)
239 const char *hostname
;
240 struct gensec_krb5_state
*gensec_krb5_state
;
242 hostname
= gensec_get_target_hostname(gensec_security
);
244 DEBUG(3, ("No hostname for target computer passed in, cannot use kerberos for this connection\n"));
245 return NT_STATUS_INVALID_PARAMETER
;
247 if (is_ipaddress(hostname
)) {
248 DEBUG(2, ("Cannot do krb5 to an IP address"));
249 return NT_STATUS_INVALID_PARAMETER
;
251 if (strcmp(hostname
, "localhost") == 0) {
252 DEBUG(2, ("krb5 to 'localhost' does not make sense"));
253 return NT_STATUS_INVALID_PARAMETER
;
256 nt_status
= gensec_krb5_start(gensec_security
, gssapi
);
257 if (!NT_STATUS_IS_OK(nt_status
)) {
261 gensec_krb5_state
= (struct gensec_krb5_state
*)gensec_security
->private_data
;
262 gensec_krb5_state
->state_position
= GENSEC_KRB5_CLIENT_START
;
263 gensec_krb5_state
->ap_req_options
= AP_OPTS_USE_SUBKEY
;
265 if (gensec_krb5_state
->gssapi
) {
266 /* The Fake GSSAPI model emulates Samba3, which does not do mutual authentication */
267 if (gensec_setting_bool(gensec_security
->settings
, "gensec_fake_gssapi_krb5", "mutual", false)) {
268 gensec_krb5_state
->ap_req_options
|= AP_OPTS_MUTUAL_REQUIRED
;
271 /* The wrapping for KPASSWD (a user of the raw KRB5 API) should be mutually authenticated */
272 if (gensec_setting_bool(gensec_security
->settings
, "gensec_krb5", "mutual", true)) {
273 gensec_krb5_state
->ap_req_options
|= AP_OPTS_MUTUAL_REQUIRED
;
279 static NTSTATUS
gensec_krb5_common_client_creds(struct gensec_security
*gensec_security
,
280 struct tevent_context
*ev
,
283 struct gensec_krb5_state
*gensec_krb5_state
;
285 struct ccache_container
*ccache_container
;
286 const char *error_string
;
287 const char *principal
;
288 const char *hostname
;
290 struct tevent_context
*previous_ev
;
292 gensec_krb5_state
= (struct gensec_krb5_state
*)gensec_security
->private_data
;
294 principal
= gensec_get_target_principal(gensec_security
);
295 hostname
= gensec_get_target_hostname(gensec_security
);
297 ret
= cli_credentials_get_ccache(gensec_get_credentials(gensec_security
),
299 gensec_security
->settings
->lp_ctx
, &ccache_container
, &error_string
);
303 case KRB5KDC_ERR_PREAUTH_FAILED
:
304 case KRB5KDC_ERR_C_PRINCIPAL_UNKNOWN
:
305 return NT_STATUS_LOGON_FAILURE
;
306 case KRB5_KDC_UNREACH
:
307 DEBUG(3, ("Cannot reach a KDC we require to contact %s: %s\n", principal
, error_string
));
308 return NT_STATUS_INVALID_PARAMETER
; /* Make SPNEGO ignore us, we can't go any further here */
309 case KRB5_CC_NOTFOUND
:
311 DEBUG(3, ("Error preparing credentials we require to contact %s : %s\n", principal
, error_string
));
312 return NT_STATUS_INVALID_PARAMETER
; /* Make SPNEGO ignore us, we can't go any further here */
314 DEBUG(1, ("gensec_krb5_start: Aquiring initiator credentials failed: %s\n", error_string
));
315 return NT_STATUS_UNSUCCESSFUL
;
319 /* Do this every time, in case we have weird recursive issues here */
320 ret
= smb_krb5_context_set_event_ctx(gensec_krb5_state
->smb_krb5_context
, ev
, &previous_ev
);
322 DEBUG(1, ("gensec_krb5_start: Setting event context failed\n"));
323 return NT_STATUS_NO_MEMORY
;
326 krb5_principal target_principal
;
327 ret
= krb5_parse_name(gensec_krb5_state
->smb_krb5_context
->krb5_context
, principal
,
330 ret
= krb5_mk_req_exact(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
331 &gensec_krb5_state
->auth_context
,
332 gensec_krb5_state
->ap_req_options
,
334 &in_data
, ccache_container
->ccache
,
335 &gensec_krb5_state
->enc_ticket
);
336 krb5_free_principal(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
340 ret
= krb5_mk_req(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
341 &gensec_krb5_state
->auth_context
,
342 gensec_krb5_state
->ap_req_options
,
343 gensec_get_target_service(gensec_security
),
345 &in_data
, ccache_container
->ccache
,
346 &gensec_krb5_state
->enc_ticket
);
349 smb_krb5_context_remove_event_ctx(gensec_krb5_state
->smb_krb5_context
, previous_ev
, ev
);
354 case KRB5KDC_ERR_S_PRINCIPAL_UNKNOWN
:
355 DEBUG(3, ("Server [%s] is not registered with our KDC: %s\n",
356 hostname
, smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
, ret
, gensec_krb5_state
)));
357 return NT_STATUS_INVALID_PARAMETER
; /* Make SPNEGO ignore us, we can't go any further here */
358 case KRB5_KDC_UNREACH
:
359 DEBUG(3, ("Cannot reach a KDC we require to contact host [%s]: %s\n",
360 hostname
, smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
, ret
, gensec_krb5_state
)));
361 return NT_STATUS_INVALID_PARAMETER
; /* Make SPNEGO ignore us, we can't go any further here */
362 case KRB5KDC_ERR_PREAUTH_FAILED
:
363 case KRB5KRB_AP_ERR_TKT_EXPIRED
:
365 /* Too much clock skew - we will need to kinit to re-skew the clock */
366 case KRB5KRB_AP_ERR_SKEW
:
367 case KRB5_KDCREP_SKEW
:
369 DEBUG(3, ("kerberos (mk_req) failed: %s\n",
370 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
, ret
, gensec_krb5_state
)));
374 /* just don't print a message for these really ordinary messages */
375 case KRB5_FCC_NOFILE
:
376 case KRB5_CC_NOTFOUND
:
379 return NT_STATUS_UNSUCCESSFUL
;
383 DEBUG(0, ("kerberos: %s\n",
384 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
, ret
, gensec_krb5_state
)));
385 return NT_STATUS_UNSUCCESSFUL
;
389 static NTSTATUS
gensec_krb5_client_start(struct gensec_security
*gensec_security
)
391 return gensec_krb5_common_client_start(gensec_security
, false);
394 static NTSTATUS
gensec_fake_gssapi_krb5_client_start(struct gensec_security
*gensec_security
)
396 return gensec_krb5_common_client_start(gensec_security
, true);
401 generate a krb5 GSS-API wrapper packet given a ticket
403 static DATA_BLOB
gensec_gssapi_gen_krb5_wrap(TALLOC_CTX
*mem_ctx
, const DATA_BLOB
*ticket
, const uint8_t tok_id
[2])
405 struct asn1_data
*data
;
408 data
= asn1_init(mem_ctx
);
409 if (!data
|| !ticket
->data
) {
410 return data_blob(NULL
,0);
413 asn1_push_tag(data
, ASN1_APPLICATION(0));
414 asn1_write_OID(data
, GENSEC_OID_KERBEROS5
);
416 asn1_write(data
, tok_id
, 2);
417 asn1_write(data
, ticket
->data
, ticket
->length
);
420 if (data
->has_error
) {
421 DEBUG(1,("Failed to build krb5 wrapper at offset %d\n", (int)data
->ofs
));
423 return data_blob(NULL
,0);
426 ret
= data_blob_talloc(mem_ctx
, data
->data
, data
->length
);
433 parse a krb5 GSS-API wrapper packet giving a ticket
435 static bool gensec_gssapi_parse_krb5_wrap(TALLOC_CTX
*mem_ctx
, const DATA_BLOB
*blob
, DATA_BLOB
*ticket
, uint8_t tok_id
[2])
438 struct asn1_data
*data
= asn1_init(mem_ctx
);
445 asn1_load(data
, *blob
);
446 asn1_start_tag(data
, ASN1_APPLICATION(0));
447 asn1_check_OID(data
, GENSEC_OID_KERBEROS5
);
449 data_remaining
= asn1_tag_remaining(data
);
451 if (data_remaining
< 3) {
452 data
->has_error
= true;
454 asn1_read(data
, tok_id
, 2);
456 *ticket
= data_blob_talloc(mem_ctx
, NULL
, data_remaining
);
457 asn1_read(data
, ticket
->data
, ticket
->length
);
462 ret
= !data
->has_error
;
470 * Next state function for the Krb5 GENSEC mechanism
472 * @param gensec_krb5_state KRB5 State
473 * @param out_mem_ctx The TALLOC_CTX for *out to be allocated on
474 * @param in The request, as a DATA_BLOB
475 * @param out The reply, as an talloc()ed DATA_BLOB, on *out_mem_ctx
476 * @return Error, MORE_PROCESSING_REQUIRED if a reply is sent,
477 * or NT_STATUS_OK if the user is authenticated.
480 static NTSTATUS
gensec_krb5_update(struct gensec_security
*gensec_security
,
481 TALLOC_CTX
*out_mem_ctx
,
482 struct tevent_context
*ev
,
483 const DATA_BLOB in
, DATA_BLOB
*out
)
485 struct gensec_krb5_state
*gensec_krb5_state
= (struct gensec_krb5_state
*)gensec_security
->private_data
;
486 krb5_error_code ret
= 0;
489 switch (gensec_krb5_state
->state_position
) {
490 case GENSEC_KRB5_CLIENT_START
:
492 DATA_BLOB unwrapped_out
;
494 nt_status
= gensec_krb5_common_client_creds(gensec_security
, ev
, gensec_krb5_state
->gssapi
);
495 if (!NT_STATUS_IS_OK(nt_status
)) {
499 if (gensec_krb5_state
->gssapi
) {
500 unwrapped_out
= data_blob_talloc(out_mem_ctx
, gensec_krb5_state
->enc_ticket
.data
, gensec_krb5_state
->enc_ticket
.length
);
502 /* wrap that up in a nice GSS-API wrapping */
503 *out
= gensec_gssapi_gen_krb5_wrap(out_mem_ctx
, &unwrapped_out
, TOK_ID_KRB_AP_REQ
);
505 *out
= data_blob_talloc(out_mem_ctx
, gensec_krb5_state
->enc_ticket
.data
, gensec_krb5_state
->enc_ticket
.length
);
507 if (gensec_krb5_state
->ap_req_options
& AP_OPTS_MUTUAL_REQUIRED
) {
508 gensec_krb5_state
->state_position
= GENSEC_KRB5_CLIENT_MUTUAL_AUTH
;
509 nt_status
= NT_STATUS_MORE_PROCESSING_REQUIRED
;
511 gensec_krb5_state
->state_position
= GENSEC_KRB5_DONE
;
512 nt_status
= NT_STATUS_OK
;
517 case GENSEC_KRB5_CLIENT_MUTUAL_AUTH
:
519 DATA_BLOB unwrapped_in
;
521 krb5_ap_rep_enc_part
*repl
= NULL
;
524 if (gensec_krb5_state
->gssapi
) {
525 if (!gensec_gssapi_parse_krb5_wrap(out_mem_ctx
, &in
, &unwrapped_in
, tok_id
)) {
526 DEBUG(1,("gensec_gssapi_parse_krb5_wrap(mutual authentication) failed to parse\n"));
527 dump_data_pw("Mutual authentication message:\n", in
.data
, in
.length
);
528 return NT_STATUS_INVALID_PARAMETER
;
533 /* TODO: check the tok_id */
535 inbuf
.data
= unwrapped_in
.data
;
536 inbuf
.length
= unwrapped_in
.length
;
537 ret
= krb5_rd_rep(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
538 gensec_krb5_state
->auth_context
,
541 DEBUG(1,("krb5_rd_rep (mutual authentication) failed (%s)\n",
542 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
, ret
, out_mem_ctx
)));
543 dump_data_pw("Mutual authentication message:\n", (uint8_t *)inbuf
.data
, inbuf
.length
);
544 nt_status
= NT_STATUS_ACCESS_DENIED
;
546 *out
= data_blob(NULL
, 0);
547 nt_status
= NT_STATUS_OK
;
548 gensec_krb5_state
->state_position
= GENSEC_KRB5_DONE
;
551 krb5_free_ap_rep_enc_part(gensec_krb5_state
->smb_krb5_context
->krb5_context
, repl
);
556 case GENSEC_KRB5_SERVER_START
:
558 DATA_BLOB unwrapped_in
;
559 DATA_BLOB unwrapped_out
= data_blob(NULL
, 0);
560 krb5_data inbuf
, outbuf
;
562 struct keytab_container
*keytab
;
563 krb5_principal server_in_keytab
;
564 const char *error_string
;
565 enum credentials_obtained obtained
;
568 return NT_STATUS_INVALID_PARAMETER
;
571 /* Grab the keytab, however generated */
572 ret
= cli_credentials_get_keytab(gensec_get_credentials(gensec_security
),
573 gensec_security
->settings
->lp_ctx
, &keytab
);
575 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO
;
578 /* This ensures we lookup the correct entry in that
579 * keytab. A NULL principal is acceptable, and means
580 * that the krb5 libs should search the keytab at
581 * accept time for any matching key */
582 ret
= principal_from_credentials(out_mem_ctx
, gensec_get_credentials(gensec_security
),
583 gensec_krb5_state
->smb_krb5_context
,
584 &server_in_keytab
, &obtained
, &error_string
);
587 DEBUG(2,("Failed to make credentials from principal: %s\n", error_string
));
588 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO
;
591 /* Parse the GSSAPI wrapping, if it's there... (win2k3 allows it to be omited) */
592 if (gensec_krb5_state
->gssapi
593 && gensec_gssapi_parse_krb5_wrap(out_mem_ctx
, &in
, &unwrapped_in
, tok_id
)) {
594 inbuf
.data
= unwrapped_in
.data
;
595 inbuf
.length
= unwrapped_in
.length
;
597 inbuf
.data
= in
.data
;
598 inbuf
.length
= in
.length
;
601 ret
= smb_rd_req_return_stuff(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
602 &gensec_krb5_state
->auth_context
,
603 &inbuf
, keytab
->keytab
, server_in_keytab
,
605 &gensec_krb5_state
->ticket
,
606 &gensec_krb5_state
->keyblock
);
609 return NT_STATUS_LOGON_FAILURE
;
611 unwrapped_out
.data
= (uint8_t *)outbuf
.data
;
612 unwrapped_out
.length
= outbuf
.length
;
613 gensec_krb5_state
->state_position
= GENSEC_KRB5_DONE
;
614 /* wrap that up in a nice GSS-API wrapping */
615 if (gensec_krb5_state
->gssapi
) {
616 *out
= gensec_gssapi_gen_krb5_wrap(out_mem_ctx
, &unwrapped_out
, TOK_ID_KRB_AP_REP
);
618 *out
= data_blob_talloc(out_mem_ctx
, outbuf
.data
, outbuf
.length
);
620 krb5_data_free(&outbuf
);
624 case GENSEC_KRB5_DONE
:
626 /* Asking too many times... */
627 return NT_STATUS_INVALID_PARAMETER
;
631 static NTSTATUS
gensec_krb5_session_key(struct gensec_security
*gensec_security
,
633 DATA_BLOB
*session_key
)
635 struct gensec_krb5_state
*gensec_krb5_state
= (struct gensec_krb5_state
*)gensec_security
->private_data
;
636 krb5_context context
= gensec_krb5_state
->smb_krb5_context
->krb5_context
;
637 krb5_auth_context auth_context
= gensec_krb5_state
->auth_context
;
639 krb5_error_code err
= -1;
641 if (gensec_krb5_state
->state_position
!= GENSEC_KRB5_DONE
) {
642 return NT_STATUS_NO_USER_SESSION_KEY
;
645 switch (gensec_security
->gensec_role
) {
647 err
= krb5_auth_con_getlocalsubkey(context
, auth_context
, &skey
);
650 err
= krb5_auth_con_getremotesubkey(context
, auth_context
, &skey
);
653 if (err
== 0 && skey
!= NULL
) {
654 DEBUG(10, ("Got KRB5 session key of length %d\n",
655 (int)KRB5_KEY_LENGTH(skey
)));
656 *session_key
= data_blob_talloc(mem_ctx
,
657 KRB5_KEY_DATA(skey
), KRB5_KEY_LENGTH(skey
));
658 dump_data_pw("KRB5 Session Key:\n", session_key
->data
, session_key
->length
);
660 krb5_free_keyblock(context
, skey
);
663 DEBUG(10, ("KRB5 error getting session key %d\n", err
));
664 return NT_STATUS_NO_USER_SESSION_KEY
;
668 static NTSTATUS
gensec_krb5_session_info(struct gensec_security
*gensec_security
,
670 struct auth_session_info
**_session_info
)
672 NTSTATUS nt_status
= NT_STATUS_UNSUCCESSFUL
;
673 struct gensec_krb5_state
*gensec_krb5_state
= (struct gensec_krb5_state
*)gensec_security
->private_data
;
674 krb5_context context
= gensec_krb5_state
->smb_krb5_context
->krb5_context
;
675 struct auth_session_info
*session_info
= NULL
;
677 krb5_principal client_principal
;
678 char *principal_string
;
680 DATA_BLOB pac_blob
, *pac_blob_ptr
= NULL
;
685 TALLOC_CTX
*tmp_ctx
= talloc_new(mem_ctx
);
687 return NT_STATUS_NO_MEMORY
;
690 ret
= krb5_ticket_get_client(context
, gensec_krb5_state
->ticket
, &client_principal
);
692 DEBUG(5, ("krb5_ticket_get_client failed to get cleint principal: %s\n",
693 smb_get_krb5_error_message(context
,
695 talloc_free(tmp_ctx
);
696 return NT_STATUS_NO_MEMORY
;
699 ret
= krb5_unparse_name(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
700 client_principal
, &principal_string
);
702 DEBUG(1, ("Unable to parse client principal: %s\n",
703 smb_get_krb5_error_message(context
,
705 krb5_free_principal(context
, client_principal
);
706 talloc_free(tmp_ctx
);
707 return NT_STATUS_NO_MEMORY
;
710 ret
= krb5_ticket_get_authorization_data_type(context
, gensec_krb5_state
->ticket
,
711 KRB5_AUTHDATA_WIN2K_PAC
,
716 DEBUG(5, ("krb5_ticket_get_authorization_data_type failed to find PAC: %s\n",
717 smb_get_krb5_error_message(context
,
721 pac_blob
= data_blob_talloc(tmp_ctx
, pac_data
.data
, pac_data
.length
);
722 if (!pac_blob
.data
) {
723 free(principal_string
);
724 krb5_free_principal(context
, client_principal
);
725 talloc_free(tmp_ctx
);
726 return NT_STATUS_NO_MEMORY
;
729 /* decode and verify the pac */
730 nt_status
= kerberos_decode_pac(gensec_krb5_state
,
732 gensec_krb5_state
->smb_krb5_context
->krb5_context
,
733 NULL
, gensec_krb5_state
->keyblock
,
735 gensec_krb5_state
->ticket
->ticket
.authtime
, NULL
);
737 if (!NT_STATUS_IS_OK(nt_status
)) {
738 free(principal_string
);
739 krb5_free_principal(context
, client_principal
);
740 talloc_free(tmp_ctx
);
744 pac_blob_ptr
= &pac_blob
;
747 nt_status
= gensec_generate_session_info_pac(tmp_ctx
,
749 gensec_krb5_state
->smb_krb5_context
,
750 pac_blob_ptr
, principal_string
,
751 gensec_get_remote_address(gensec_security
),
754 free(principal_string
);
755 krb5_free_principal(context
, client_principal
);
757 if (!NT_STATUS_IS_OK(nt_status
)) {
758 talloc_free(tmp_ctx
);
762 nt_status
= gensec_krb5_session_key(gensec_security
, session_info
, &session_info
->session_key
);
764 if (!NT_STATUS_IS_OK(nt_status
)) {
765 talloc_free(tmp_ctx
);
769 *_session_info
= talloc_steal(mem_ctx
, session_info
);
771 talloc_free(tmp_ctx
);
775 static NTSTATUS
gensec_krb5_wrap(struct gensec_security
*gensec_security
,
780 struct gensec_krb5_state
*gensec_krb5_state
= (struct gensec_krb5_state
*)gensec_security
->private_data
;
781 krb5_context context
= gensec_krb5_state
->smb_krb5_context
->krb5_context
;
782 krb5_auth_context auth_context
= gensec_krb5_state
->auth_context
;
784 krb5_data input
, output
;
785 input
.length
= in
->length
;
786 input
.data
= in
->data
;
788 if (gensec_have_feature(gensec_security
, GENSEC_FEATURE_SEAL
)) {
789 ret
= krb5_mk_priv(context
, auth_context
, &input
, &output
, NULL
);
791 DEBUG(1, ("krb5_mk_priv failed: %s\n",
792 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
794 return NT_STATUS_ACCESS_DENIED
;
796 *out
= data_blob_talloc(mem_ctx
, output
.data
, output
.length
);
798 krb5_data_free(&output
);
800 return NT_STATUS_ACCESS_DENIED
;
805 static NTSTATUS
gensec_krb5_unwrap(struct gensec_security
*gensec_security
,
810 struct gensec_krb5_state
*gensec_krb5_state
= (struct gensec_krb5_state
*)gensec_security
->private_data
;
811 krb5_context context
= gensec_krb5_state
->smb_krb5_context
->krb5_context
;
812 krb5_auth_context auth_context
= gensec_krb5_state
->auth_context
;
814 krb5_data input
, output
;
815 krb5_replay_data replay
;
816 input
.length
= in
->length
;
817 input
.data
= in
->data
;
819 if (gensec_have_feature(gensec_security
, GENSEC_FEATURE_SEAL
)) {
820 ret
= krb5_rd_priv(context
, auth_context
, &input
, &output
, &replay
);
822 DEBUG(1, ("krb5_rd_priv failed: %s\n",
823 smb_get_krb5_error_message(gensec_krb5_state
->smb_krb5_context
->krb5_context
,
825 return NT_STATUS_ACCESS_DENIED
;
827 *out
= data_blob_talloc(mem_ctx
, output
.data
, output
.length
);
829 krb5_data_free(&output
);
831 return NT_STATUS_ACCESS_DENIED
;
836 static bool gensec_krb5_have_feature(struct gensec_security
*gensec_security
,
839 struct gensec_krb5_state
*gensec_krb5_state
= (struct gensec_krb5_state
*)gensec_security
->private_data
;
840 if (feature
& GENSEC_FEATURE_SESSION_KEY
) {
843 if (!gensec_krb5_state
->gssapi
&&
844 (feature
& GENSEC_FEATURE_SEAL
)) {
851 static const char *gensec_krb5_oids
[] = {
852 GENSEC_OID_KERBEROS5
,
853 GENSEC_OID_KERBEROS5_OLD
,
857 static const struct gensec_security_ops gensec_fake_gssapi_krb5_security_ops
= {
858 .name
= "fake_gssapi_krb5",
859 .auth_type
= DCERPC_AUTH_TYPE_KRB5
,
860 .oid
= gensec_krb5_oids
,
861 .client_start
= gensec_fake_gssapi_krb5_client_start
,
862 .server_start
= gensec_fake_gssapi_krb5_server_start
,
863 .update
= gensec_krb5_update
,
864 .magic
= gensec_magic_check_krb5_oid
,
865 .session_key
= gensec_krb5_session_key
,
866 .session_info
= gensec_krb5_session_info
,
867 .have_feature
= gensec_krb5_have_feature
,
870 .priority
= GENSEC_KRB5
873 static const struct gensec_security_ops gensec_krb5_security_ops
= {
875 .client_start
= gensec_krb5_client_start
,
876 .server_start
= gensec_krb5_server_start
,
877 .update
= gensec_krb5_update
,
878 .session_key
= gensec_krb5_session_key
,
879 .session_info
= gensec_krb5_session_info
,
880 .have_feature
= gensec_krb5_have_feature
,
881 .wrap
= gensec_krb5_wrap
,
882 .unwrap
= gensec_krb5_unwrap
,
885 .priority
= GENSEC_KRB5
888 _PUBLIC_ NTSTATUS
gensec_krb5_init(void)
892 ret
= gensec_register(&gensec_krb5_security_ops
);
893 if (!NT_STATUS_IS_OK(ret
)) {
894 DEBUG(0,("Failed to register '%s' gensec backend!\n",
895 gensec_krb5_security_ops
.name
));
899 ret
= gensec_register(&gensec_fake_gssapi_krb5_security_ops
);
900 if (!NT_STATUS_IS_OK(ret
)) {
901 DEBUG(0,("Failed to register '%s' gensec backend!\n",
902 gensec_krb5_security_ops
.name
));