2 * Copyright (c) 2011, 2013, 2015, JANET(UK)
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of JANET(UK) nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
21 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * Establish a security context on the acceptor (server). These functions
35 * wrap around libradsec and (thus) talk to a RADIUS server or proxy.
38 #include "gssapiP_eap.h"
40 #ifdef GSSEAP_ENABLE_REAUTH
42 eapGssSmAcceptGssReauth(OM_uint32 *minor,
45 gss_const_name_t target,
49 gss_channel_bindings_t chanBindings,
50 gss_buffer_t inputToken,
51 gss_buffer_t outputToken,
56 * Mark an acceptor context as ready for cryptographic operations
59 acceptReadyEap(OM_uint32 *minor, gss_ctx_id_t ctx, gss_cred_id_t cred)
61 OM_uint32 major, tmpMinor;
63 gss_buffer_desc nameBuf = GSS_C_EMPTY_BUFFER;
65 /* Cache encryption type derived from selected mechanism OID */
66 major = gssEapOidToEnctype(minor, ctx->mechanismUsed,
67 &ctx->encryptionType);
71 gssEapReleaseName(&tmpMinor, &ctx->initiatorName);
73 major = gssEapRadiusGetRawAvp(minor, ctx->acceptorCtx.vps,
74 PW_USER_NAME, 0, &vp);
75 if (major == GSS_S_COMPLETE && rs_avp_length(vp) != 0) {
76 rs_avp_octets_value_byref((rs_avp *)vp,
77 (unsigned char **)&nameBuf.value,
80 ctx->gssFlags |= GSS_C_ANON_FLAG;
83 major = gssEapImportName(minor, &nameBuf,
84 (ctx->gssFlags & GSS_C_ANON_FLAG) ?
85 GSS_C_NT_ANONYMOUS : GSS_C_NT_USER_NAME,
91 major = gssEapRadiusGetRawAvp(minor, ctx->acceptorCtx.vps,
92 PW_MS_MPPE_SEND_KEY, VENDORPEC_MICROSOFT, &vp);
93 if (GSS_ERROR(major)) {
94 *minor = GSSEAP_KEY_UNAVAILABLE;
95 return GSS_S_UNAVAILABLE;
98 major = gssEapDeriveRfc3961Key(minor,
99 rs_avp_octets_value_const_ptr(vp),
103 if (GSS_ERROR(major))
106 major = rfc3961ChecksumTypeForKey(minor, &ctx->rfc3961Key,
108 if (GSS_ERROR(major))
111 major = sequenceInit(minor,
112 &ctx->seqState, ctx->recvSeq,
113 ((ctx->gssFlags & GSS_C_REPLAY_FLAG) != 0),
114 ((ctx->gssFlags & GSS_C_SEQUENCE_FLAG) != 0),
116 if (GSS_ERROR(major))
119 major = gssEapCreateAttrContext(minor, cred, ctx,
120 &ctx->initiatorName->attrCtx,
122 if (GSS_ERROR(major))
125 if (ctx->expiryTime != 0 && ctx->expiryTime < time(NULL)) {
126 *minor = GSSEAP_CRED_EXPIRED;
127 return GSS_S_CREDENTIALS_EXPIRED;
131 return GSS_S_COMPLETE;
135 eapGssSmAcceptAcceptorName(OM_uint32 *minor,
136 gss_cred_id_t cred GSSEAP_UNUSED,
138 gss_const_name_t target GSSEAP_UNUSED,
139 gss_OID mech GSSEAP_UNUSED,
140 OM_uint32 reqFlags GSSEAP_UNUSED,
141 OM_uint32 timeReq GSSEAP_UNUSED,
142 gss_channel_bindings_t chanBindings GSSEAP_UNUSED,
143 gss_buffer_t inputToken GSSEAP_UNUSED,
144 gss_buffer_t outputToken,
145 OM_uint32 *smFlags GSSEAP_UNUSED)
149 /* XXX TODO import and validate name from inputToken */
151 if (ctx->acceptorName != GSS_C_NO_NAME) {
152 /* Send desired target name to acceptor */
153 major = gssEapDisplayName(minor, ctx->acceptorName,
155 if (GSS_ERROR(major))
159 return GSS_S_CONTINUE_NEEDED;
164 eapGssSmAcceptVendorInfo(OM_uint32 *minor,
165 gss_cred_id_t cred GSSEAP_UNUSED,
166 gss_ctx_id_t ctx GSSEAP_UNUSED,
167 gss_const_name_t target GSSEAP_UNUSED,
168 gss_OID mech GSSEAP_UNUSED,
169 OM_uint32 reqFlags GSSEAP_UNUSED,
170 OM_uint32 timeReq GSSEAP_UNUSED,
171 gss_channel_bindings_t chanBindings GSSEAP_UNUSED,
172 gss_buffer_t inputToken,
173 gss_buffer_t outputToken GSSEAP_UNUSED,
174 OM_uint32 *smFlags GSSEAP_UNUSED)
176 fprintf(stderr, "GSS-EAP: vendor: %.*s\n",
177 (int)inputToken->length, (char *)inputToken->value);
180 return GSS_S_CONTINUE_NEEDED;
186 * Emit a identity EAP request to force the initiator (peer) to identify
190 eapGssSmAcceptIdentity(OM_uint32 *minor,
193 gss_const_name_t target GSSEAP_UNUSED,
194 gss_OID mech GSSEAP_UNUSED,
195 OM_uint32 reqFlags GSSEAP_UNUSED,
196 OM_uint32 timeReq GSSEAP_UNUSED,
197 gss_channel_bindings_t chanBindings GSSEAP_UNUSED,
198 gss_buffer_t inputToken,
199 gss_buffer_t outputToken,
203 struct wpabuf *reqData;
204 gss_buffer_desc pktBuffer;
206 if (!gssEapCredAvailable(cred, ctx->mechanismUsed)) {
207 *minor = GSSEAP_CRED_MECH_MISMATCH;
208 return GSS_S_BAD_MECH;
211 if (inputToken != GSS_C_NO_BUFFER && inputToken->length != 0) {
212 *minor = GSSEAP_WRONG_SIZE;
213 return GSS_S_DEFECTIVE_TOKEN;
216 reqData = eap_msg_alloc(EAP_VENDOR_IETF, EAP_TYPE_IDENTITY, 0,
217 EAP_CODE_REQUEST, 0);
218 if (reqData == NULL) {
220 return GSS_S_FAILURE;
223 pktBuffer.length = wpabuf_len(reqData);
224 pktBuffer.value = (void *)wpabuf_head(reqData);
226 major = duplicateBuffer(minor, &pktBuffer, outputToken);
227 if (GSS_ERROR(major))
230 wpabuf_free(reqData);
232 GSSEAP_SM_TRANSITION_NEXT(ctx);
235 *smFlags |= SM_FLAG_OUTPUT_TOKEN_CRITICAL;
237 return GSS_S_CONTINUE_NEEDED;
241 * Returns TRUE if the input token contains an EAP identity response.
244 isIdentityResponseP(gss_buffer_t inputToken)
246 struct wpabuf respData;
248 wpabuf_set(&respData, inputToken->value, inputToken->length);
250 return (eap_get_type(&respData) == EAP_TYPE_IDENTITY);
254 * Save the asserted initiator identity from the EAP identity response.
257 importInitiatorIdentity(OM_uint32 *minor,
259 gss_buffer_t inputToken)
262 struct wpabuf respData;
263 const unsigned char *pos;
265 gss_buffer_desc nameBuf;
267 wpabuf_set(&respData, inputToken->value, inputToken->length);
269 pos = eap_hdr_validate(EAP_VENDOR_IETF, EAP_TYPE_IDENTITY,
272 *minor = GSSEAP_PEER_BAD_MESSAGE;
273 return GSS_S_DEFECTIVE_TOKEN;
276 nameBuf.value = (void *)pos;
277 nameBuf.length = len;
279 gssEapReleaseName(&tmpMinor, &ctx->initiatorName);
281 return gssEapImportName(minor, &nameBuf, GSS_C_NT_USER_NAME,
282 ctx->mechanismUsed, &ctx->initiatorName);
286 * Pass the asserted initiator identity to the authentication server.
289 setInitiatorIdentity(OM_uint32 *minor,
291 struct rs_packet *req)
293 OM_uint32 major, tmpMinor;
294 gss_buffer_desc nameBuf;
297 * We should have got an EAP identity response, but if we didn't, then
298 * we will just avoid sending User-Name. Note that radsecproxy requires
299 * User-Name to be sent on every request (presumably so it can remain
302 if (ctx->initiatorName != GSS_C_NO_NAME) {
303 major = gssEapDisplayName(minor, ctx->initiatorName, &nameBuf, NULL);
304 if (GSS_ERROR(major))
307 major = gssEapRadiusAddAvp(minor, req, PW_USER_NAME, 0, &nameBuf);
308 if (GSS_ERROR(major))
311 gss_release_buffer(&tmpMinor, &nameBuf);
315 return GSS_S_COMPLETE;
319 * Pass the asserted acceptor identity to the authentication server.
322 setAcceptorIdentity(OM_uint32 *minor,
324 struct rs_packet *req)
327 gss_buffer_desc nameBuf;
328 krb5_context krbContext = NULL;
329 krb5_principal krbPrinc;
330 struct rs_context *rc = ctx->acceptorCtx.radContext;
332 GSSEAP_ASSERT(rc != NULL);
334 if (ctx->acceptorName == GSS_C_NO_NAME) {
336 return GSS_S_COMPLETE;
339 if ((ctx->acceptorName->flags & NAME_FLAG_SERVICE) == 0) {
340 *minor = GSSEAP_BAD_SERVICE_NAME;
341 return GSS_S_BAD_NAME;
344 GSSEAP_KRB_INIT(&krbContext);
346 krbPrinc = ctx->acceptorName->krbPrincipal;
347 GSSEAP_ASSERT(krbPrinc != NULL);
348 GSSEAP_ASSERT(KRB_PRINC_LENGTH(krbPrinc) >= 1);
350 /* Acceptor-Service-Name */
351 krbPrincComponentToGssBuffer(krbPrinc, 0, &nameBuf);
353 major = gssEapRadiusAddAvp(minor, req,
354 PW_GSS_ACCEPTOR_SERVICE_NAME,
357 if (GSS_ERROR(major))
360 /* Acceptor-Host-Name */
361 if (KRB_PRINC_LENGTH(krbPrinc) >= 2) {
362 krbPrincComponentToGssBuffer(krbPrinc, 1, &nameBuf);
364 major = gssEapRadiusAddAvp(minor, req,
365 PW_GSS_ACCEPTOR_HOST_NAME,
368 if (GSS_ERROR(major))
371 if (KRB_PRINC_LENGTH(krbPrinc) > 2) {
372 /* Acceptor-Service-Specific */
373 *minor = krbPrincUnparseServiceSpecifics(krbContext,
376 return GSS_S_FAILURE;
378 major = gssEapRadiusAddAvp(minor, req,
379 PW_GSS_ACCEPTOR_SERVICE_SPECIFICS,
382 krbFreeUnparsedName(krbContext, &nameBuf);
383 if (GSS_ERROR(major))
387 krbPrincRealmToGssBuffer(krbPrinc, &nameBuf);
388 if (nameBuf.length != 0) {
389 /* Acceptor-Realm-Name */
390 major = gssEapRadiusAddAvp(minor, req,
391 PW_GSS_ACCEPTOR_REALM_NAME,
394 if (GSS_ERROR(major))
399 return GSS_S_COMPLETE;
403 * Allocate a RadSec handle
406 createRadiusHandle(OM_uint32 *minor,
410 struct gss_eap_acceptor_ctx *actx = &ctx->acceptorCtx;
411 struct rs_error *err;
412 const char *configStanza = "gss-eap";
415 GSSEAP_ASSERT(actx->radContext == NULL);
416 GSSEAP_ASSERT(actx->radConn == NULL);
417 GSSEAP_ASSERT(cred != GSS_C_NO_CREDENTIAL);
419 major = gssEapCreateRadiusContext(minor, cred, &actx->radContext);
420 if (GSS_ERROR(major))
423 if (cred->radiusConfigStanza.value != NULL)
424 configStanza = (const char *)cred->radiusConfigStanza.value;
426 if (rs_conn_create(actx->radContext, &actx->radConn, configStanza) != 0) {
427 err = rs_err_conn_pop(actx->radConn);
428 return gssEapRadiusMapError(minor, err);
431 if (actx->radServer != NULL) {
432 if (rs_conn_select_peer(actx->radConn, actx->radServer) != 0) {
433 err = rs_err_conn_pop(actx->radConn);
434 return gssEapRadiusMapError(minor, err);
439 return GSS_S_COMPLETE;
443 * Choose the correct error for an access reject packet.
446 eapGssAcceptHandleReject(OM_uint32 *minor,
447 struct rs_packet *response)
450 rs_const_avp *vp = NULL;
452 const char *reply_message = NULL;
453 size_t reply_length = 0;
455 rs_packet_avps(response, &vps);
456 major = gssEapRadiusGetRawAvp(minor, *vps,
457 PW_REPLY_MESSAGE, 0, &vp);
458 if (!GSS_ERROR(major)) {
459 reply_message = rs_avp_string_value(vp);
460 reply_length = rs_avp_length(vp);
463 major = gssEapRadiusGetRawAvp(minor, *vps,
464 PW_ERROR_CAUSE, 0, &vp);
465 if (!GSS_ERROR(major)) {
466 switch (rs_avp_integer_value(vp)) {
467 /* Values from http://www.iana.org/assignments/radius-types/radius-types.xhtml#radius-types-18 */
468 case 502: /* request not routable (proxy) */
469 *minor = GSSEAP_RADIUS_UNROUTABLE;
471 case 501: /* administratively prohibited */
472 *minor = GSSEAP_RADIUS_ADMIN_PROHIBIT;
476 *minor = GSSEAP_RADIUS_AUTH_FAILURE;
480 *minor = GSSEAP_RADIUS_AUTH_FAILURE;
482 if (reply_message != NULL)
483 gssEapSaveStatusInfo(*minor, "%s: %.*s", error_message(*minor),
484 reply_length, reply_message);
486 gssEapSaveStatusInfo(*minor, "%s", error_message(*minor));
488 return GSS_S_DEFECTIVE_CREDENTIAL;
492 * Process a EAP response from the initiator.
495 eapGssSmAcceptAuthenticate(OM_uint32 *minor,
498 gss_const_name_t target GSSEAP_UNUSED,
499 gss_OID mech GSSEAP_UNUSED,
500 OM_uint32 reqFlags GSSEAP_UNUSED,
501 OM_uint32 timeReq GSSEAP_UNUSED,
502 gss_channel_bindings_t chanBindings GSSEAP_UNUSED,
503 gss_buffer_t inputToken,
504 gss_buffer_t outputToken,
507 OM_uint32 major, tmpMinor;
508 struct rs_connection *rconn;
509 struct rs_request *request = NULL;
510 struct rs_packet *req = NULL, *resp = NULL;
511 int isAccessChallenge;
513 if (ctx->acceptorCtx.radContext == NULL) {
514 /* May be NULL from an imported partial context */
515 major = createRadiusHandle(minor, cred, ctx);
516 if (GSS_ERROR(major))
520 if (isIdentityResponseP(inputToken)) {
521 major = importInitiatorIdentity(minor, ctx, inputToken);
522 if (GSS_ERROR(major))
526 rconn = ctx->acceptorCtx.radConn;
528 if (rs_packet_create_authn_request(rconn, &req, NULL, NULL) != 0) {
529 major = gssEapRadiusMapError(minor, rs_err_conn_pop(rconn));
533 major = setInitiatorIdentity(minor, ctx, req);
534 if (GSS_ERROR(major))
537 major = setAcceptorIdentity(minor, ctx, req);
538 if (GSS_ERROR(major))
541 major = gssEapRadiusAddAvp(minor, req,
542 PW_EAP_MESSAGE, 0, inputToken);
543 if (GSS_ERROR(major))
546 if (ctx->acceptorCtx.state.length != 0) {
547 major = gssEapRadiusAddAvp(minor, req, PW_STATE, 0,
548 &ctx->acceptorCtx.state);
549 if (GSS_ERROR(major))
552 gss_release_buffer(&tmpMinor, &ctx->acceptorCtx.state);
555 if (rs_request_create(rconn, &request) != 0) {
556 major = gssEapRadiusMapError(minor, rs_err_conn_pop(rconn));
560 rs_request_add_reqpkt(request, req);
563 if (rs_request_send(request, &resp) != 0) {
564 major = gssEapRadiusMapError(minor, rs_err_conn_pop(rconn));
568 GSSEAP_ASSERT(resp != NULL);
570 isAccessChallenge = 0;
572 switch (rs_packet_code(resp)) {
573 case PW_ACCESS_CHALLENGE:
574 isAccessChallenge = 1;
576 case PW_ACCESS_ACCEPT:
578 case PW_ACCESS_REJECT:
579 major = eapGssAcceptHandleReject( minor, resp);
583 *minor = GSSEAP_UNKNOWN_RADIUS_CODE;
584 major = GSS_S_FAILURE;
589 major = gssEapRadiusGetAvp(minor, resp, PW_EAP_MESSAGE, 0,
591 if (major == GSS_S_UNAVAILABLE && isAccessChallenge) {
592 *minor = GSSEAP_MISSING_EAP_REQUEST;
593 major = GSS_S_DEFECTIVE_TOKEN;
595 } else if (GSS_ERROR(major))
598 if (isAccessChallenge) {
599 major = gssEapRadiusGetAvp(minor, resp, PW_STATE, 0,
600 &ctx->acceptorCtx.state, TRUE);
601 if (GSS_ERROR(major) && *minor != GSSEAP_NO_SUCH_ATTR)
606 rs_packet_avps(resp, &vps);
608 ctx->acceptorCtx.vps = *vps;
611 major = acceptReadyEap(minor, ctx, cred);
612 if (GSS_ERROR(major))
615 GSSEAP_SM_TRANSITION_NEXT(ctx);
618 major = GSS_S_CONTINUE_NEEDED;
620 *smFlags |= SM_FLAG_OUTPUT_TOKEN_CRITICAL;
624 rs_request_destroy(request);
626 rs_packet_destroy(req);
628 rs_packet_destroy(resp);
629 if (GSSEAP_SM_STATE(ctx) == GSSEAP_STATE_INITIATOR_EXTS) {
630 GSSEAP_ASSERT(major == GSS_S_CONTINUE_NEEDED);
632 rs_conn_destroy(ctx->acceptorCtx.radConn);
633 ctx->acceptorCtx.radConn = NULL;
640 eapGssSmAcceptGssFlags(OM_uint32 *minor,
641 gss_cred_id_t cred GSSEAP_UNUSED,
643 gss_const_name_t target GSSEAP_UNUSED,
644 gss_OID mech GSSEAP_UNUSED,
645 OM_uint32 reqFlags GSSEAP_UNUSED,
646 OM_uint32 timeReq GSSEAP_UNUSED,
647 gss_channel_bindings_t chanBindings GSSEAP_UNUSED,
648 gss_buffer_t inputToken,
649 gss_buffer_t outputToken GSSEAP_UNUSED,
650 OM_uint32 *smFlags GSSEAP_UNUSED)
653 OM_uint32 initiatorGssFlags;
655 GSSEAP_ASSERT((ctx->flags & CTX_FLAG_KRB_REAUTH) == 0);
657 if (inputToken->length < 4) {
658 *minor = GSSEAP_TOK_TRUNC;
659 return GSS_S_DEFECTIVE_TOKEN;
662 /* allow flags to grow for future expansion */
663 p = (unsigned char *)inputToken->value + inputToken->length - 4;
665 initiatorGssFlags = load_uint32_be(p);
666 initiatorGssFlags &= GSSEAP_WIRE_FLAGS_MASK;
668 ctx->gssFlags |= initiatorGssFlags;
670 return GSS_S_CONTINUE_NEEDED;
674 eapGssSmAcceptGssChannelBindings(OM_uint32 *minor,
675 gss_cred_id_t cred GSSEAP_UNUSED,
677 gss_const_name_t target GSSEAP_UNUSED,
678 gss_OID mech GSSEAP_UNUSED,
679 OM_uint32 reqFlags GSSEAP_UNUSED,
680 OM_uint32 timeReq GSSEAP_UNUSED,
681 gss_channel_bindings_t chanBindings,
682 gss_buffer_t inputToken,
683 gss_buffer_t outputToken GSSEAP_UNUSED,
684 OM_uint32 *smFlags GSSEAP_UNUSED)
686 krb5_error_code code;
687 krb5_context krbContext;
690 krb5_boolean valid = FALSE;
691 #ifdef HAVE_HEIMDAL_VERSION
692 krb5_crypto krbCrypto;
695 if (chanBindings == GSS_C_NO_CHANNEL_BINDINGS ||
696 chanBindings->application_data.length == 0)
697 return GSS_S_CONTINUE_NEEDED;
699 GSSEAP_KRB_INIT(&krbContext);
701 KRB_DATA_INIT(&data);
703 gssBufferToKrbData(&chanBindings->application_data, &data);
705 KRB_CHECKSUM_INIT(&cksum, ctx->checksumType, inputToken);
707 #ifdef HAVE_HEIMDAL_VERSION
708 code = krb5_crypto_init(krbContext, &ctx->rfc3961Key, 0, &krbCrypto);
711 return GSS_S_FAILURE;
714 code = krb5_verify_checksum(krbContext, krbCrypto,
715 KEY_USAGE_GSSEAP_CHBIND_MIC,
716 data.data, data.length, &cksum);
717 if (code == KRB5KRB_AP_ERR_BAD_INTEGRITY) {
720 } else if (code == 0) {
724 krb5_crypto_destroy(krbContext, krbCrypto);
726 code = krb5_c_verify_checksum(krbContext, &ctx->rfc3961Key,
727 KEY_USAGE_GSSEAP_CHBIND_MIC,
728 &data, &cksum, &valid);
729 #endif /* HAVE_HEIMDAL_VERSION */
732 return GSS_S_FAILURE;
735 if (valid == FALSE) {
736 *minor = GSSEAP_BINDINGS_MISMATCH;
737 return GSS_S_BAD_BINDINGS;
740 ctx->flags |= CTX_FLAG_CHANNEL_BINDINGS_VERIFIED;
743 return GSS_S_CONTINUE_NEEDED;
747 eapGssSmAcceptInitiatorMIC(OM_uint32 *minor,
748 gss_cred_id_t cred GSSEAP_UNUSED,
750 gss_const_name_t target GSSEAP_UNUSED,
751 gss_OID mech GSSEAP_UNUSED,
752 OM_uint32 reqFlags GSSEAP_UNUSED,
753 OM_uint32 timeReq GSSEAP_UNUSED,
754 gss_channel_bindings_t chanBindings,
755 gss_buffer_t inputToken,
756 gss_buffer_t outputToken GSSEAP_UNUSED,
757 OM_uint32 *smFlags GSSEAP_UNUSED)
762 * The channel binding token is optional, however if the caller indicated
763 * bindings we must raise an error if it was absent.
765 * In the future, we might use a context option to allow the caller to
766 * indicate that missing bindings are acceptable.
768 if (chanBindings != NULL &&
769 chanBindings->application_data.length != 0 &&
770 (ctx->flags & CTX_FLAG_CHANNEL_BINDINGS_VERIFIED) == 0) {
771 *minor = GSSEAP_MISSING_BINDINGS;
772 return GSS_S_BAD_BINDINGS;
775 major = gssEapVerifyTokenMIC(minor, ctx, inputToken);
776 if (GSS_ERROR(major))
779 GSSEAP_SM_TRANSITION_NEXT(ctx);
782 return GSS_S_CONTINUE_NEEDED;
785 #ifdef GSSEAP_ENABLE_REAUTH
787 eapGssSmAcceptReauthCreds(OM_uint32 *minor,
790 gss_const_name_t target GSSEAP_UNUSED,
791 gss_OID mech GSSEAP_UNUSED,
792 OM_uint32 reqFlags GSSEAP_UNUSED,
793 OM_uint32 timeReq GSSEAP_UNUSED,
794 gss_channel_bindings_t chanBindings GSSEAP_UNUSED,
795 gss_buffer_t inputToken GSSEAP_UNUSED,
796 gss_buffer_t outputToken,
797 OM_uint32 *smFlags GSSEAP_UNUSED)
802 * If we're built with fast reauthentication enabled, then
803 * fabricate a ticket from the initiator to ourselves.
805 major = gssEapMakeReauthCreds(minor, ctx, cred, outputToken);
806 if (major == GSS_S_UNAVAILABLE)
807 major = GSS_S_COMPLETE;
808 if (major == GSS_S_COMPLETE)
809 major = GSS_S_CONTINUE_NEEDED;
816 eapGssSmAcceptAcceptorMIC(OM_uint32 *minor,
817 gss_cred_id_t cred GSSEAP_UNUSED,
819 gss_const_name_t target GSSEAP_UNUSED,
820 gss_OID mech GSSEAP_UNUSED,
821 OM_uint32 reqFlags GSSEAP_UNUSED,
822 OM_uint32 timeReq GSSEAP_UNUSED,
823 gss_channel_bindings_t chanBindings GSSEAP_UNUSED,
824 gss_buffer_t inputToken GSSEAP_UNUSED,
825 gss_buffer_t outputToken,
830 major = gssEapMakeTokenMIC(minor, ctx, outputToken);
831 if (GSS_ERROR(major))
834 GSSEAP_SM_TRANSITION(ctx, GSSEAP_STATE_ESTABLISHED);
837 *smFlags |= SM_FLAG_OUTPUT_TOKEN_CRITICAL;
839 return GSS_S_COMPLETE;
842 static struct gss_eap_sm eapGssAcceptorSm[] = {
844 ITOK_TYPE_ACCEPTOR_NAME_REQ,
845 ITOK_TYPE_ACCEPTOR_NAME_RESP,
846 GSSEAP_STATE_INITIAL,
848 eapGssSmAcceptAcceptorName
852 ITOK_TYPE_VENDOR_INFO,
854 GSSEAP_STATE_INITIAL,
856 eapGssSmAcceptVendorInfo,
859 #ifdef GSSEAP_ENABLE_REAUTH
861 ITOK_TYPE_REAUTH_REQ,
862 ITOK_TYPE_REAUTH_RESP,
863 GSSEAP_STATE_INITIAL,
865 eapGssSmAcceptGssReauth,
871 GSSEAP_STATE_INITIAL,
872 SM_ITOK_FLAG_REQUIRED,
873 eapGssSmAcceptIdentity,
878 GSSEAP_STATE_AUTHENTICATE,
879 SM_ITOK_FLAG_REQUIRED,
880 eapGssSmAcceptAuthenticate
885 GSSEAP_STATE_INITIATOR_EXTS,
887 eapGssSmAcceptGssFlags
890 ITOK_TYPE_GSS_CHANNEL_BINDINGS,
892 GSSEAP_STATE_INITIATOR_EXTS,
894 eapGssSmAcceptGssChannelBindings,
897 ITOK_TYPE_INITIATOR_MIC,
899 GSSEAP_STATE_INITIATOR_EXTS,
900 SM_ITOK_FLAG_REQUIRED,
901 eapGssSmAcceptInitiatorMIC,
903 #ifdef GSSEAP_ENABLE_REAUTH
906 ITOK_TYPE_REAUTH_CREDS,
907 GSSEAP_STATE_ACCEPTOR_EXTS,
909 eapGssSmAcceptReauthCreds,
914 ITOK_TYPE_ACCEPTOR_NAME_RESP,
915 GSSEAP_STATE_ACCEPTOR_EXTS,
917 eapGssSmAcceptAcceptorName
921 ITOK_TYPE_ACCEPTOR_MIC,
922 GSSEAP_STATE_ACCEPTOR_EXTS,
924 eapGssSmAcceptAcceptorMIC
929 gssEapAcceptSecContext(OM_uint32 *minor,
932 gss_buffer_t input_token,
933 gss_channel_bindings_t input_chan_bindings,
934 gss_name_t *src_name,
936 gss_buffer_t output_token,
937 OM_uint32 *ret_flags,
939 gss_cred_id_t *delegated_cred_handle)
941 OM_uint32 major, tmpMinor;
943 if (cred == GSS_C_NO_CREDENTIAL) {
944 if (ctx->cred == GSS_C_NO_CREDENTIAL) {
945 major = gssEapAcquireCred(minor,
953 if (GSS_ERROR(major))
961 * Previously we acquired the credential mutex here, but it should not be
962 * necessary as the acceptor does not access any mutable elements of the
966 if (cred->name != GSS_C_NO_NAME) {
967 major = gssEapDuplicateName(minor, cred->name, &ctx->acceptorName);
968 if (GSS_ERROR(major))
972 major = gssEapSmStep(minor,
983 sizeof(eapGssAcceptorSm) / sizeof(eapGssAcceptorSm[0]));
984 if (GSS_ERROR(major))
987 if (mech_type != NULL) {
990 tmpMajor = gssEapCanonicalizeOid(&tmpMinor, ctx->mechanismUsed, 0, mech_type);
991 if (GSS_ERROR(tmpMajor)) {
997 if (ret_flags != NULL)
998 *ret_flags = ctx->gssFlags;
999 if (delegated_cred_handle != NULL)
1000 *delegated_cred_handle = GSS_C_NO_CREDENTIAL;
1002 if (major == GSS_S_COMPLETE) {
1003 if (src_name != NULL && ctx->initiatorName != GSS_C_NO_NAME) {
1004 major = gssEapDuplicateName(&tmpMinor, ctx->initiatorName, src_name);
1005 if (GSS_ERROR(major))
1008 if (time_rec != NULL) {
1009 major = gssEapContextTime(&tmpMinor, ctx, time_rec);
1010 if (GSS_ERROR(major))
1015 GSSEAP_ASSERT(CTX_IS_ESTABLISHED(ctx) || major == GSS_S_CONTINUE_NEEDED);
1021 #ifdef GSSEAP_ENABLE_REAUTH
1023 acceptReadyKrb(OM_uint32 *minor,
1026 const gss_name_t initiator,
1032 major = gssEapGlueToMechName(minor, ctx, initiator, &ctx->initiatorName);
1033 if (GSS_ERROR(major))
1036 major = gssEapReauthComplete(minor, ctx, cred, mech, timeRec);
1037 if (GSS_ERROR(major))
1041 return GSS_S_COMPLETE;
1045 eapGssSmAcceptGssReauth(OM_uint32 *minor,
1048 gss_const_name_t target GSSEAP_UNUSED,
1050 OM_uint32 reqFlags GSSEAP_UNUSED,
1051 OM_uint32 timeReq GSSEAP_UNUSED,
1052 gss_channel_bindings_t chanBindings,
1053 gss_buffer_t inputToken,
1054 gss_buffer_t outputToken,
1057 OM_uint32 major, tmpMinor;
1058 gss_name_t krbInitiator = GSS_C_NO_NAME;
1059 OM_uint32 gssFlags, timeRec = GSS_C_INDEFINITE;
1062 * If we're built with fast reauthentication support, it's valid
1063 * for an initiator to send a GSS reauthentication token as its
1064 * initial context token, causing us to short-circuit the state
1065 * machine and process Kerberos GSS messages instead.
1068 ctx->flags |= CTX_FLAG_KRB_REAUTH;
1070 major = gssAcceptSecContext(minor,
1081 if (major == GSS_S_COMPLETE) {
1082 major = acceptReadyKrb(minor, ctx, cred,
1083 krbInitiator, mech, timeRec);
1084 if (major == GSS_S_COMPLETE) {
1085 GSSEAP_SM_TRANSITION(ctx, GSSEAP_STATE_ESTABLISHED);
1087 ctx->gssFlags = gssFlags;
1088 } else if (GSS_ERROR(major) &&
1089 (*smFlags & SM_FLAG_INPUT_TOKEN_CRITICAL) == 0) {
1090 /* pretend reauthentication attempt never happened */
1091 gssDeleteSecContext(&tmpMinor, &ctx->reauthCtx, GSS_C_NO_BUFFER);
1092 ctx->flags &= ~(CTX_FLAG_KRB_REAUTH);
1093 GSSEAP_SM_TRANSITION(ctx, GSSEAP_STATE_INITIAL);
1094 major = GSS_S_CONTINUE_NEEDED;
1097 gssReleaseName(&tmpMinor, &krbInitiator);
1101 #endif /* GSSEAP_ENABLE_REAUTH */
1103 OM_uint32 GSSAPI_CALLCONV
1104 gss_accept_sec_context(OM_uint32 *minor,
1105 gss_ctx_id_t *context_handle,
1106 #ifdef HAVE_HEIMDAL_VERSION
1107 gss_const_cred_id_t cred,
1111 gss_buffer_t input_token,
1112 gss_channel_bindings_t input_chan_bindings,
1113 gss_name_t *src_name,
1115 gss_buffer_t output_token,
1116 OM_uint32 *ret_flags,
1117 OM_uint32 *time_rec,
1118 gss_cred_id_t *delegated_cred_handle)
1120 OM_uint32 major, tmpMinor;
1121 gss_ctx_id_t ctx = *context_handle;
1125 output_token->length = 0;
1126 output_token->value = NULL;
1128 if (src_name != NULL)
1129 *src_name = GSS_C_NO_NAME;
1131 if (input_token == GSS_C_NO_BUFFER || input_token->length == 0) {
1132 *minor = GSSEAP_TOK_TRUNC;
1133 return GSS_S_DEFECTIVE_TOKEN;
1136 if (ctx == GSS_C_NO_CONTEXT) {
1137 major = gssEapAllocContext(minor, &ctx);
1138 if (GSS_ERROR(major))
1141 *context_handle = ctx;
1144 GSSEAP_MUTEX_LOCK(&ctx->mutex);
1146 major = gssEapAcceptSecContext(minor,
1148 (gss_cred_id_t)cred,
1150 input_chan_bindings,
1156 delegated_cred_handle);
1158 GSSEAP_MUTEX_UNLOCK(&ctx->mutex);
1160 if (GSS_ERROR(major))
1161 gssEapReleaseContext(&tmpMinor, context_handle);
1163 gssEapTraceStatus("gss_accept_sec_context", major, *minor);