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_proto.h"
38 #include "auth/gensec/gensec_toplevel_proto.h"
39 #include "param/param.h"
40 #include "auth/auth_sam_reply.h"
41 #include "lib/util/util_net.h"
42 #include "../lib/util/asn1.h"
44 _PUBLIC_ NTSTATUS gensec_krb5_init(void);
46 enum GENSEC_KRB5_STATE {
47 GENSEC_KRB5_SERVER_START,
48 GENSEC_KRB5_CLIENT_START,
49 GENSEC_KRB5_CLIENT_MUTUAL_AUTH,
53 struct gensec_krb5_state {
54 enum GENSEC_KRB5_STATE state_position;
55 struct smb_krb5_context *smb_krb5_context;
56 krb5_auth_context auth_context;
58 krb5_keyblock *keyblock;
61 krb5_flags ap_req_options;
64 static int gensec_krb5_destroy(struct gensec_krb5_state *gensec_krb5_state)
66 if (!gensec_krb5_state->smb_krb5_context) {
67 /* We can't clean anything else up unless we started up this far */
70 if (gensec_krb5_state->enc_ticket.length) {
71 kerberos_free_data_contents(gensec_krb5_state->smb_krb5_context->krb5_context,
72 &gensec_krb5_state->enc_ticket);
75 if (gensec_krb5_state->ticket) {
76 krb5_free_ticket(gensec_krb5_state->smb_krb5_context->krb5_context,
77 gensec_krb5_state->ticket);
80 /* ccache freed in a child destructor */
82 krb5_free_keyblock(gensec_krb5_state->smb_krb5_context->krb5_context,
83 gensec_krb5_state->keyblock);
85 if (gensec_krb5_state->auth_context) {
86 krb5_auth_con_free(gensec_krb5_state->smb_krb5_context->krb5_context,
87 gensec_krb5_state->auth_context);
93 static NTSTATUS gensec_krb5_start(struct gensec_security *gensec_security, bool gssapi)
96 struct gensec_krb5_state *gensec_krb5_state;
97 struct cli_credentials *creds;
98 const struct tsocket_address *tlocal_addr, *tremote_addr;
99 krb5_address my_krb5_addr, peer_krb5_addr;
101 creds = gensec_get_credentials(gensec_security);
103 return NT_STATUS_INVALID_PARAMETER;
106 gensec_krb5_state = talloc(gensec_security, struct gensec_krb5_state);
107 if (!gensec_krb5_state) {
108 return NT_STATUS_NO_MEMORY;
111 gensec_security->private_data = gensec_krb5_state;
112 gensec_krb5_state->smb_krb5_context = NULL;
113 gensec_krb5_state->auth_context = NULL;
114 gensec_krb5_state->ticket = NULL;
115 ZERO_STRUCT(gensec_krb5_state->enc_ticket);
116 gensec_krb5_state->keyblock = NULL;
117 gensec_krb5_state->gssapi = gssapi;
119 talloc_set_destructor(gensec_krb5_state, gensec_krb5_destroy);
121 if (cli_credentials_get_krb5_context(creds,
122 gensec_security->settings->lp_ctx, &gensec_krb5_state->smb_krb5_context)) {
123 talloc_free(gensec_krb5_state);
124 return NT_STATUS_INTERNAL_ERROR;
127 ret = krb5_auth_con_init(gensec_krb5_state->smb_krb5_context->krb5_context, &gensec_krb5_state->auth_context);
129 DEBUG(1,("gensec_krb5_start: krb5_auth_con_init failed (%s)\n",
130 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context,
131 ret, gensec_krb5_state)));
132 talloc_free(gensec_krb5_state);
133 return NT_STATUS_INTERNAL_ERROR;
136 ret = krb5_auth_con_setflags(gensec_krb5_state->smb_krb5_context->krb5_context,
137 gensec_krb5_state->auth_context,
138 KRB5_AUTH_CONTEXT_DO_SEQUENCE);
140 DEBUG(1,("gensec_krb5_start: krb5_auth_con_setflags failed (%s)\n",
141 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context,
142 ret, gensec_krb5_state)));
143 talloc_free(gensec_krb5_state);
144 return NT_STATUS_INTERNAL_ERROR;
147 tlocal_addr = gensec_get_local_address(gensec_security);
150 struct sockaddr_storage ss;
152 socklen = tsocket_address_bsd_sockaddr(tlocal_addr,
153 (struct sockaddr *) &ss,
154 sizeof(struct sockaddr_storage));
156 talloc_free(gensec_krb5_state);
157 return NT_STATUS_INTERNAL_ERROR;
159 ret = krb5_sockaddr2address(gensec_krb5_state->smb_krb5_context->krb5_context,
160 (const struct sockaddr *) &ss, &my_krb5_addr);
162 DEBUG(1,("gensec_krb5_start: krb5_sockaddr2address (local) failed (%s)\n",
163 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context,
164 ret, gensec_krb5_state)));
165 talloc_free(gensec_krb5_state);
166 return NT_STATUS_INTERNAL_ERROR;
170 tremote_addr = gensec_get_remote_address(gensec_security);
173 struct sockaddr_storage ss;
175 socklen = tsocket_address_bsd_sockaddr(tremote_addr,
176 (struct sockaddr *) &ss,
177 sizeof(struct sockaddr_storage));
179 talloc_free(gensec_krb5_state);
180 return NT_STATUS_INTERNAL_ERROR;
182 ret = krb5_sockaddr2address(gensec_krb5_state->smb_krb5_context->krb5_context,
183 (const struct sockaddr *) &ss, &peer_krb5_addr);
185 DEBUG(1,("gensec_krb5_start: krb5_sockaddr2address (local) failed (%s)\n",
186 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context,
187 ret, gensec_krb5_state)));
188 talloc_free(gensec_krb5_state);
189 return NT_STATUS_INTERNAL_ERROR;
193 ret = krb5_auth_con_setaddrs(gensec_krb5_state->smb_krb5_context->krb5_context,
194 gensec_krb5_state->auth_context,
195 tlocal_addr ? &my_krb5_addr : NULL,
196 tremote_addr ? &peer_krb5_addr : NULL);
198 DEBUG(1,("gensec_krb5_start: krb5_auth_con_setaddrs failed (%s)\n",
199 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context,
200 ret, gensec_krb5_state)));
201 talloc_free(gensec_krb5_state);
202 return NT_STATUS_INTERNAL_ERROR;
208 static NTSTATUS gensec_krb5_common_server_start(struct gensec_security *gensec_security, bool gssapi)
211 struct gensec_krb5_state *gensec_krb5_state;
213 nt_status = gensec_krb5_start(gensec_security, gssapi);
214 if (!NT_STATUS_IS_OK(nt_status)) {
218 gensec_krb5_state = (struct gensec_krb5_state *)gensec_security->private_data;
219 gensec_krb5_state->state_position = GENSEC_KRB5_SERVER_START;
224 static NTSTATUS gensec_krb5_server_start(struct gensec_security *gensec_security)
226 return gensec_krb5_common_server_start(gensec_security, false);
229 static NTSTATUS gensec_fake_gssapi_krb5_server_start(struct gensec_security *gensec_security)
231 return gensec_krb5_common_server_start(gensec_security, true);
234 static NTSTATUS gensec_krb5_common_client_start(struct gensec_security *gensec_security, bool gssapi)
236 const char *hostname;
237 struct gensec_krb5_state *gensec_krb5_state;
239 hostname = gensec_get_target_hostname(gensec_security);
241 DEBUG(1, ("Could not determine hostname for target computer, cannot use kerberos\n"));
242 return NT_STATUS_INVALID_PARAMETER;
244 if (is_ipaddress(hostname)) {
245 DEBUG(2, ("Cannot do krb5 to an IP address"));
246 return NT_STATUS_INVALID_PARAMETER;
248 if (strcmp(hostname, "localhost") == 0) {
249 DEBUG(2, ("krb5 to 'localhost' does not make sense"));
250 return NT_STATUS_INVALID_PARAMETER;
253 nt_status = gensec_krb5_start(gensec_security, gssapi);
254 if (!NT_STATUS_IS_OK(nt_status)) {
258 gensec_krb5_state = (struct gensec_krb5_state *)gensec_security->private_data;
259 gensec_krb5_state->state_position = GENSEC_KRB5_CLIENT_START;
260 gensec_krb5_state->ap_req_options = AP_OPTS_USE_SUBKEY;
262 if (gensec_krb5_state->gssapi) {
263 /* The Fake GSSAPI modal emulates Samba3, which does not do mutual authentication */
264 if (gensec_setting_bool(gensec_security->settings, "gensec_fake_gssapi_krb5", "mutual", false)) {
265 gensec_krb5_state->ap_req_options |= AP_OPTS_MUTUAL_REQUIRED;
268 /* The wrapping for KPASSWD (a user of the raw KRB5 API) should be mutually authenticated */
269 if (gensec_setting_bool(gensec_security->settings, "gensec_krb5", "mutual", true)) {
270 gensec_krb5_state->ap_req_options |= AP_OPTS_MUTUAL_REQUIRED;
276 static NTSTATUS gensec_krb5_common_client_creds(struct gensec_security *gensec_security,
277 struct tevent_context *ev,
280 struct gensec_krb5_state *gensec_krb5_state;
282 struct ccache_container *ccache_container;
283 const char *error_string;
284 const char *principal;
285 const char *hostname;
287 struct tevent_context *previous_ev;
289 gensec_krb5_state = (struct gensec_krb5_state *)gensec_security->private_data;
291 principal = gensec_get_target_principal(gensec_security);
292 hostname = gensec_get_target_hostname(gensec_security);
294 ret = cli_credentials_get_ccache(gensec_get_credentials(gensec_security),
296 gensec_security->settings->lp_ctx, &ccache_container, &error_string);
300 case KRB5KDC_ERR_PREAUTH_FAILED:
301 case KRB5KDC_ERR_C_PRINCIPAL_UNKNOWN:
302 return NT_STATUS_LOGON_FAILURE;
303 case KRB5_KDC_UNREACH:
304 DEBUG(3, ("Cannot reach a KDC we require to contact %s: %s\n", principal, error_string));
305 return NT_STATUS_INVALID_PARAMETER; /* Make SPNEGO ignore us, we can't go any further here */
306 case KRB5_CC_NOTFOUND:
308 DEBUG(3, ("Error preparing credentials we require to contact %s : %s\n", principal, error_string));
309 return NT_STATUS_INVALID_PARAMETER; /* Make SPNEGO ignore us, we can't go any further here */
311 DEBUG(1, ("gensec_krb5_start: Aquiring initiator credentials failed: %s\n", error_string));
312 return NT_STATUS_UNSUCCESSFUL;
316 /* Do this every time, in case we have weird recursive issues here */
317 ret = smb_krb5_context_set_event_ctx(gensec_krb5_state->smb_krb5_context, ev, &previous_ev);
319 DEBUG(1, ("gensec_krb5_start: Setting event context failed\n"));
320 return NT_STATUS_NO_MEMORY;
323 krb5_principal target_principal;
324 ret = krb5_parse_name(gensec_krb5_state->smb_krb5_context->krb5_context, principal,
327 ret = krb5_mk_req_exact(gensec_krb5_state->smb_krb5_context->krb5_context,
328 &gensec_krb5_state->auth_context,
329 gensec_krb5_state->ap_req_options,
331 &in_data, ccache_container->ccache,
332 &gensec_krb5_state->enc_ticket);
333 krb5_free_principal(gensec_krb5_state->smb_krb5_context->krb5_context,
337 ret = krb5_mk_req(gensec_krb5_state->smb_krb5_context->krb5_context,
338 &gensec_krb5_state->auth_context,
339 gensec_krb5_state->ap_req_options,
340 gensec_get_target_service(gensec_security),
342 &in_data, ccache_container->ccache,
343 &gensec_krb5_state->enc_ticket);
346 smb_krb5_context_remove_event_ctx(gensec_krb5_state->smb_krb5_context, previous_ev, ev);
351 case KRB5KDC_ERR_S_PRINCIPAL_UNKNOWN:
352 DEBUG(3, ("Server [%s] is not registered with our KDC: %s\n",
353 hostname, smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context, ret, gensec_krb5_state)));
354 return NT_STATUS_INVALID_PARAMETER; /* Make SPNEGO ignore us, we can't go any further here */
355 case KRB5_KDC_UNREACH:
356 DEBUG(3, ("Cannot reach a KDC we require to contact host [%s]: %s\n",
357 hostname, smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context, ret, gensec_krb5_state)));
358 return NT_STATUS_INVALID_PARAMETER; /* Make SPNEGO ignore us, we can't go any further here */
359 case KRB5KDC_ERR_PREAUTH_FAILED:
360 case KRB5KRB_AP_ERR_TKT_EXPIRED:
362 /* Too much clock skew - we will need to kinit to re-skew the clock */
363 case KRB5KRB_AP_ERR_SKEW:
364 case KRB5_KDCREP_SKEW:
366 DEBUG(3, ("kerberos (mk_req) failed: %s\n",
367 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context, ret, gensec_krb5_state)));
371 /* just don't print a message for these really ordinary messages */
372 case KRB5_FCC_NOFILE:
373 case KRB5_CC_NOTFOUND:
376 return NT_STATUS_UNSUCCESSFUL;
380 DEBUG(0, ("kerberos: %s\n",
381 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context, ret, gensec_krb5_state)));
382 return NT_STATUS_UNSUCCESSFUL;
386 static NTSTATUS gensec_krb5_client_start(struct gensec_security *gensec_security)
388 return gensec_krb5_common_client_start(gensec_security, false);
391 static NTSTATUS gensec_fake_gssapi_krb5_client_start(struct gensec_security *gensec_security)
393 return gensec_krb5_common_client_start(gensec_security, true);
398 generate a krb5 GSS-API wrapper packet given a ticket
400 static DATA_BLOB gensec_gssapi_gen_krb5_wrap(TALLOC_CTX *mem_ctx, const DATA_BLOB *ticket, const uint8_t tok_id[2])
402 struct asn1_data *data;
405 data = asn1_init(mem_ctx);
406 if (!data || !ticket->data) {
407 return data_blob(NULL,0);
410 asn1_push_tag(data, ASN1_APPLICATION(0));
411 asn1_write_OID(data, GENSEC_OID_KERBEROS5);
413 asn1_write(data, tok_id, 2);
414 asn1_write(data, ticket->data, ticket->length);
417 if (data->has_error) {
418 DEBUG(1,("Failed to build krb5 wrapper at offset %d\n", (int)data->ofs));
420 return data_blob(NULL,0);
423 ret = data_blob_talloc(mem_ctx, data->data, data->length);
430 parse a krb5 GSS-API wrapper packet giving a ticket
432 static bool gensec_gssapi_parse_krb5_wrap(TALLOC_CTX *mem_ctx, const DATA_BLOB *blob, DATA_BLOB *ticket, uint8_t tok_id[2])
435 struct asn1_data *data = asn1_init(mem_ctx);
442 asn1_load(data, *blob);
443 asn1_start_tag(data, ASN1_APPLICATION(0));
444 asn1_check_OID(data, GENSEC_OID_KERBEROS5);
446 data_remaining = asn1_tag_remaining(data);
448 if (data_remaining < 3) {
449 data->has_error = true;
451 asn1_read(data, tok_id, 2);
453 *ticket = data_blob_talloc(mem_ctx, NULL, data_remaining);
454 asn1_read(data, ticket->data, ticket->length);
459 ret = !data->has_error;
467 * Next state function for the Krb5 GENSEC mechanism
469 * @param gensec_krb5_state KRB5 State
470 * @param out_mem_ctx The TALLOC_CTX for *out to be allocated on
471 * @param in The request, as a DATA_BLOB
472 * @param out The reply, as an talloc()ed DATA_BLOB, on *out_mem_ctx
473 * @return Error, MORE_PROCESSING_REQUIRED if a reply is sent,
474 * or NT_STATUS_OK if the user is authenticated.
477 static NTSTATUS gensec_krb5_update(struct gensec_security *gensec_security,
478 TALLOC_CTX *out_mem_ctx,
479 struct tevent_context *ev,
480 const DATA_BLOB in, DATA_BLOB *out)
482 struct gensec_krb5_state *gensec_krb5_state = (struct gensec_krb5_state *)gensec_security->private_data;
483 krb5_error_code ret = 0;
486 switch (gensec_krb5_state->state_position) {
487 case GENSEC_KRB5_CLIENT_START:
489 DATA_BLOB unwrapped_out;
491 nt_status = gensec_krb5_common_client_creds(gensec_security, ev, gensec_krb5_state->gssapi);
492 if (!NT_STATUS_IS_OK(nt_status)) {
496 if (gensec_krb5_state->gssapi) {
497 unwrapped_out = data_blob_talloc(out_mem_ctx, gensec_krb5_state->enc_ticket.data, gensec_krb5_state->enc_ticket.length);
499 /* wrap that up in a nice GSS-API wrapping */
500 *out = gensec_gssapi_gen_krb5_wrap(out_mem_ctx, &unwrapped_out, TOK_ID_KRB_AP_REQ);
502 *out = data_blob_talloc(out_mem_ctx, gensec_krb5_state->enc_ticket.data, gensec_krb5_state->enc_ticket.length);
504 if (gensec_krb5_state->ap_req_options & AP_OPTS_MUTUAL_REQUIRED) {
505 gensec_krb5_state->state_position = GENSEC_KRB5_CLIENT_MUTUAL_AUTH;
506 nt_status = NT_STATUS_MORE_PROCESSING_REQUIRED;
508 gensec_krb5_state->state_position = GENSEC_KRB5_DONE;
509 nt_status = NT_STATUS_OK;
514 case GENSEC_KRB5_CLIENT_MUTUAL_AUTH:
516 DATA_BLOB unwrapped_in;
518 krb5_ap_rep_enc_part *repl = NULL;
521 if (gensec_krb5_state->gssapi) {
522 if (!gensec_gssapi_parse_krb5_wrap(out_mem_ctx, &in, &unwrapped_in, tok_id)) {
523 DEBUG(1,("gensec_gssapi_parse_krb5_wrap(mutual authentication) failed to parse\n"));
524 dump_data_pw("Mutual authentication message:\n", in.data, in.length);
525 return NT_STATUS_INVALID_PARAMETER;
530 /* TODO: check the tok_id */
532 inbuf.data = unwrapped_in.data;
533 inbuf.length = unwrapped_in.length;
534 ret = krb5_rd_rep(gensec_krb5_state->smb_krb5_context->krb5_context,
535 gensec_krb5_state->auth_context,
538 DEBUG(1,("krb5_rd_rep (mutual authentication) failed (%s)\n",
539 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context, ret, out_mem_ctx)));
540 dump_data_pw("Mutual authentication message:\n", (uint8_t *)inbuf.data, inbuf.length);
541 nt_status = NT_STATUS_ACCESS_DENIED;
543 *out = data_blob(NULL, 0);
544 nt_status = NT_STATUS_OK;
545 gensec_krb5_state->state_position = GENSEC_KRB5_DONE;
548 krb5_free_ap_rep_enc_part(gensec_krb5_state->smb_krb5_context->krb5_context, repl);
553 case GENSEC_KRB5_SERVER_START:
555 DATA_BLOB unwrapped_in;
556 DATA_BLOB unwrapped_out = data_blob(NULL, 0);
557 krb5_data inbuf, outbuf;
559 struct keytab_container *keytab;
560 krb5_principal server_in_keytab;
561 const char *error_string;
562 enum credentials_obtained obtained;
565 return NT_STATUS_INVALID_PARAMETER;
568 /* Grab the keytab, however generated */
569 ret = cli_credentials_get_keytab(gensec_get_credentials(gensec_security),
570 gensec_security->settings->lp_ctx, &keytab);
572 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
575 /* This ensures we lookup the correct entry in that
576 * keytab. A NULL principal is acceptable, and means
577 * that the krb5 libs should search the keytab at
578 * accept time for any matching key */
579 ret = principal_from_credentials(out_mem_ctx, gensec_get_credentials(gensec_security),
580 gensec_krb5_state->smb_krb5_context,
581 &server_in_keytab, &obtained, &error_string);
584 DEBUG(2,("Failed to make credentials from principal: %s\n", error_string));
585 return NT_STATUS_CANT_ACCESS_DOMAIN_INFO;
588 /* Parse the GSSAPI wrapping, if it's there... (win2k3 allows it to be omited) */
589 if (gensec_krb5_state->gssapi
590 && gensec_gssapi_parse_krb5_wrap(out_mem_ctx, &in, &unwrapped_in, tok_id)) {
591 inbuf.data = unwrapped_in.data;
592 inbuf.length = unwrapped_in.length;
594 inbuf.data = in.data;
595 inbuf.length = in.length;
598 ret = smb_rd_req_return_stuff(gensec_krb5_state->smb_krb5_context->krb5_context,
599 &gensec_krb5_state->auth_context,
600 &inbuf, keytab->keytab, server_in_keytab,
602 &gensec_krb5_state->ticket,
603 &gensec_krb5_state->keyblock);
606 return NT_STATUS_LOGON_FAILURE;
608 unwrapped_out.data = (uint8_t *)outbuf.data;
609 unwrapped_out.length = outbuf.length;
610 gensec_krb5_state->state_position = GENSEC_KRB5_DONE;
611 /* wrap that up in a nice GSS-API wrapping */
612 if (gensec_krb5_state->gssapi) {
613 *out = gensec_gssapi_gen_krb5_wrap(out_mem_ctx, &unwrapped_out, TOK_ID_KRB_AP_REP);
615 *out = data_blob_talloc(out_mem_ctx, outbuf.data, outbuf.length);
617 krb5_data_free(&outbuf);
621 case GENSEC_KRB5_DONE:
623 /* Asking too many times... */
624 return NT_STATUS_INVALID_PARAMETER;
628 static NTSTATUS gensec_krb5_session_key(struct gensec_security *gensec_security,
630 DATA_BLOB *session_key)
632 struct gensec_krb5_state *gensec_krb5_state = (struct gensec_krb5_state *)gensec_security->private_data;
633 krb5_context context = gensec_krb5_state->smb_krb5_context->krb5_context;
634 krb5_auth_context auth_context = gensec_krb5_state->auth_context;
636 krb5_error_code err = -1;
638 if (gensec_krb5_state->state_position != GENSEC_KRB5_DONE) {
639 return NT_STATUS_NO_USER_SESSION_KEY;
642 switch (gensec_security->gensec_role) {
644 err = krb5_auth_con_getlocalsubkey(context, auth_context, &skey);
647 err = krb5_auth_con_getremotesubkey(context, auth_context, &skey);
650 if (err == 0 && skey != NULL) {
651 DEBUG(10, ("Got KRB5 session key of length %d\n",
652 (int)KRB5_KEY_LENGTH(skey)));
653 *session_key = data_blob_talloc(mem_ctx,
654 KRB5_KEY_DATA(skey), KRB5_KEY_LENGTH(skey));
655 dump_data_pw("KRB5 Session Key:\n", session_key->data, session_key->length);
657 krb5_free_keyblock(context, skey);
660 DEBUG(10, ("KRB5 error getting session key %d\n", err));
661 return NT_STATUS_NO_USER_SESSION_KEY;
665 static NTSTATUS gensec_krb5_session_info(struct gensec_security *gensec_security,
667 struct auth_session_info **_session_info)
669 NTSTATUS nt_status = NT_STATUS_UNSUCCESSFUL;
670 struct gensec_krb5_state *gensec_krb5_state = (struct gensec_krb5_state *)gensec_security->private_data;
671 krb5_context context = gensec_krb5_state->smb_krb5_context->krb5_context;
672 struct auth_session_info *session_info = NULL;
674 krb5_principal client_principal;
675 char *principal_string;
677 DATA_BLOB pac_blob, *pac_blob_ptr = NULL;
682 TALLOC_CTX *tmp_ctx = talloc_new(mem_ctx);
684 return NT_STATUS_NO_MEMORY;
687 ret = krb5_ticket_get_client(context, gensec_krb5_state->ticket, &client_principal);
689 DEBUG(5, ("krb5_ticket_get_client failed to get cleint principal: %s\n",
690 smb_get_krb5_error_message(context,
692 talloc_free(tmp_ctx);
693 return NT_STATUS_NO_MEMORY;
696 ret = krb5_unparse_name(gensec_krb5_state->smb_krb5_context->krb5_context,
697 client_principal, &principal_string);
699 DEBUG(1, ("Unable to parse client principal: %s\n",
700 smb_get_krb5_error_message(context,
702 krb5_free_principal(context, client_principal);
703 talloc_free(tmp_ctx);
704 return NT_STATUS_NO_MEMORY;
707 ret = krb5_ticket_get_authorization_data_type(context, gensec_krb5_state->ticket,
708 KRB5_AUTHDATA_WIN2K_PAC,
713 DEBUG(5, ("krb5_ticket_get_authorization_data_type failed to find PAC: %s\n",
714 smb_get_krb5_error_message(context,
718 pac_blob = data_blob_talloc(tmp_ctx, pac_data.data, pac_data.length);
719 if (!pac_blob.data) {
720 free(principal_string);
721 krb5_free_principal(context, client_principal);
722 talloc_free(tmp_ctx);
723 return NT_STATUS_NO_MEMORY;
726 /* decode and verify the pac */
727 nt_status = kerberos_decode_pac(gensec_krb5_state,
729 gensec_krb5_state->smb_krb5_context->krb5_context,
730 NULL, gensec_krb5_state->keyblock,
732 gensec_krb5_state->ticket->ticket.authtime, NULL);
734 if (!NT_STATUS_IS_OK(nt_status)) {
735 free(principal_string);
736 krb5_free_principal(context, client_principal);
737 talloc_free(tmp_ctx);
741 pac_blob_ptr = &pac_blob;
744 nt_status = gensec_generate_session_info_pac(tmp_ctx,
746 gensec_krb5_state->smb_krb5_context,
747 pac_blob_ptr, principal_string,
748 gensec_get_remote_address(gensec_security),
751 free(principal_string);
752 krb5_free_principal(context, client_principal);
754 if (!NT_STATUS_IS_OK(nt_status)) {
755 talloc_free(tmp_ctx);
759 nt_status = gensec_krb5_session_key(gensec_security, session_info, &session_info->session_key);
761 if (!NT_STATUS_IS_OK(nt_status)) {
762 talloc_free(tmp_ctx);
766 *_session_info = talloc_steal(mem_ctx, session_info);
768 talloc_free(tmp_ctx);
772 static NTSTATUS gensec_krb5_wrap(struct gensec_security *gensec_security,
777 struct gensec_krb5_state *gensec_krb5_state = (struct gensec_krb5_state *)gensec_security->private_data;
778 krb5_context context = gensec_krb5_state->smb_krb5_context->krb5_context;
779 krb5_auth_context auth_context = gensec_krb5_state->auth_context;
781 krb5_data input, output;
782 input.length = in->length;
783 input.data = in->data;
785 if (gensec_have_feature(gensec_security, GENSEC_FEATURE_SEAL)) {
786 ret = krb5_mk_priv(context, auth_context, &input, &output, NULL);
788 DEBUG(1, ("krb5_mk_priv failed: %s\n",
789 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context,
791 return NT_STATUS_ACCESS_DENIED;
793 *out = data_blob_talloc(mem_ctx, output.data, output.length);
795 krb5_data_free(&output);
797 return NT_STATUS_ACCESS_DENIED;
802 static NTSTATUS gensec_krb5_unwrap(struct gensec_security *gensec_security,
807 struct gensec_krb5_state *gensec_krb5_state = (struct gensec_krb5_state *)gensec_security->private_data;
808 krb5_context context = gensec_krb5_state->smb_krb5_context->krb5_context;
809 krb5_auth_context auth_context = gensec_krb5_state->auth_context;
811 krb5_data input, output;
812 krb5_replay_data replay;
813 input.length = in->length;
814 input.data = in->data;
816 if (gensec_have_feature(gensec_security, GENSEC_FEATURE_SEAL)) {
817 ret = krb5_rd_priv(context, auth_context, &input, &output, &replay);
819 DEBUG(1, ("krb5_rd_priv failed: %s\n",
820 smb_get_krb5_error_message(gensec_krb5_state->smb_krb5_context->krb5_context,
822 return NT_STATUS_ACCESS_DENIED;
824 *out = data_blob_talloc(mem_ctx, output.data, output.length);
826 krb5_data_free(&output);
828 return NT_STATUS_ACCESS_DENIED;
833 static bool gensec_krb5_have_feature(struct gensec_security *gensec_security,
836 struct gensec_krb5_state *gensec_krb5_state = (struct gensec_krb5_state *)gensec_security->private_data;
837 if (feature & GENSEC_FEATURE_SESSION_KEY) {
840 if (!gensec_krb5_state->gssapi &&
841 (feature & GENSEC_FEATURE_SEAL)) {
848 static const char *gensec_krb5_oids[] = {
849 GENSEC_OID_KERBEROS5,
850 GENSEC_OID_KERBEROS5_OLD,
854 static const struct gensec_security_ops gensec_fake_gssapi_krb5_security_ops = {
855 .name = "fake_gssapi_krb5",
856 .auth_type = DCERPC_AUTH_TYPE_KRB5,
857 .oid = gensec_krb5_oids,
858 .client_start = gensec_fake_gssapi_krb5_client_start,
859 .server_start = gensec_fake_gssapi_krb5_server_start,
860 .update = gensec_krb5_update,
861 .magic = gensec_magic_check_krb5_oid,
862 .session_key = gensec_krb5_session_key,
863 .session_info = gensec_krb5_session_info,
864 .have_feature = gensec_krb5_have_feature,
867 .priority = GENSEC_KRB5
870 static const struct gensec_security_ops gensec_krb5_security_ops = {
872 .client_start = gensec_krb5_client_start,
873 .server_start = gensec_krb5_server_start,
874 .update = gensec_krb5_update,
875 .session_key = gensec_krb5_session_key,
876 .session_info = gensec_krb5_session_info,
877 .have_feature = gensec_krb5_have_feature,
878 .wrap = gensec_krb5_wrap,
879 .unwrap = gensec_krb5_unwrap,
882 .priority = GENSEC_KRB5
885 _PUBLIC_ NTSTATUS gensec_krb5_init(void)
889 ret = gensec_register(&gensec_krb5_security_ops);
890 if (!NT_STATUS_IS_OK(ret)) {
891 DEBUG(0,("Failed to register '%s' gensec backend!\n",
892 gensec_krb5_security_ops.name));
896 ret = gensec_register(&gensec_fake_gssapi_krb5_security_ops);
897 if (!NT_STATUS_IS_OK(ret)) {
898 DEBUG(0,("Failed to register '%s' gensec backend!\n",
899 gensec_krb5_security_ops.name));