/* * Copyright (c) 1997 Kungliga Tekniska Högskolan * (Royal Institute of Technology, Stockholm, Sweden). * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by Kungliga Tekniska * Högskolan and its contributors. * * 4. Neither the name of the Institute nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #include "gssapi_locl.h" RCSID("$Id$"); static OM_uint32 init_auth (OM_uint32 * minor_status, const gss_cred_id_t initiator_cred_handle, gss_ctx_id_t * context_handle, const gss_name_t target_name, const gss_OID mech_type, OM_uint32 req_flags, OM_uint32 time_req, const gss_channel_bindings_t input_chan_bindings, const gss_buffer_t input_token, gss_OID * actual_mech_type, gss_buffer_t output_token, OM_uint32 * ret_flags, OM_uint32 * time_rec ) { OM_uint32 ret; krb5_error_code kret; krb5_flags ap_options; krb5_creds this_cred, *cred; krb5_data outbuf; krb5_ccache ccache; u_int32_t flags; Authenticator *auth; krb5_data authenticator; Checksum cksum; gssapi_krb5_init (); outbuf.length = 0; outbuf.data = NULL; *context_handle = malloc(sizeof(**context_handle)); if (*context_handle == NULL) return GSS_S_FAILURE; (*context_handle)->auth_context = NULL; (*context_handle)->source = NULL; (*context_handle)->target = NULL; (*context_handle)->flags = 0; (*context_handle)->more_flags = 0; kret = krb5_auth_con_init (gssapi_krb5_context, &(*context_handle)->auth_context); if (kret) { ret = GSS_S_FAILURE; goto failure; } { int32_t tmp; krb5_auth_con_getflags(gssapi_krb5_context, (*context_handle)->auth_context, &tmp); tmp |= KRB5_AUTH_CONTEXT_DO_SEQUENCE; krb5_auth_con_setflags(gssapi_krb5_context, (*context_handle)->auth_context, tmp); } if (actual_mech_type) *actual_mech_type = GSS_KRB5_MECHANISM; flags = 0; ap_options = 0; if (req_flags & GSS_C_DELEG_FLAG) ; /* XXX */ if (req_flags & GSS_C_MUTUAL_FLAG) { flags |= GSS_C_MUTUAL_FLAG; ap_options |= AP_OPTS_MUTUAL_REQUIRED; } if (req_flags & GSS_C_REPLAY_FLAG) ; /* XXX */ if (req_flags & GSS_C_SEQUENCE_FLAG) ; /* XXX */ if (req_flags & GSS_C_ANON_FLAG) ; /* XXX */ flags |= GSS_C_CONF_FLAG; flags |= GSS_C_INTEG_FLAG; flags |= GSS_C_SEQUENCE_FLAG; if (ret_flags) *ret_flags = flags; (*context_handle)->flags = flags; (*context_handle)->more_flags = LOCAL; kret = krb5_cc_default (gssapi_krb5_context, &ccache); if (kret) { ret = GSS_S_FAILURE; goto failure; } kret = krb5_cc_get_principal (gssapi_krb5_context, ccache, &(*context_handle)->source); if (kret) { ret = GSS_S_FAILURE; goto failure; } kret = krb5_copy_principal (gssapi_krb5_context, target_name, &(*context_handle)->target); if (kret) { ret = GSS_S_FAILURE; goto failure; } this_cred.client = (*context_handle)->source; this_cred.server = (*context_handle)->target; this_cred.times.endtime = 0; kret = krb5_get_credentials (gssapi_krb5_context, 0, ccache, &this_cred, &cred); if (kret) { ret = GSS_S_FAILURE; goto failure; } (*context_handle)->auth_context->key.keytype = cred->session.keytype; krb5_data_copy (&(*context_handle)->auth_context->key.keyvalue, cred->session.keyvalue.data, cred->session.keyvalue.length); kret = gssapi_krb5_create_8003_checksum (input_chan_bindings, flags, &cksum); if (kret) { ret = GSS_S_FAILURE; goto failure; } kret = krb5_build_authenticator (gssapi_krb5_context, (*context_handle)->auth_context, cred, &cksum, &auth, &authenticator); if (kret) { ret = GSS_S_FAILURE; goto failure; } kret = krb5_build_ap_req (gssapi_krb5_context, cred, ap_options, authenticator, &outbuf); if (kret) { ret = GSS_S_FAILURE; goto failure; } ret = gssapi_krb5_encapsulate (&outbuf, output_token, "\x01\x00"); if (ret) goto failure; if (flags & GSS_C_MUTUAL_FLAG) { return GSS_S_CONTINUE_NEEDED; } else { (*context_handle)->more_flags |= OPEN; return GSS_S_COMPLETE; } failure: krb5_auth_con_free (gssapi_krb5_context, (*context_handle)->auth_context); if((*context_handle)->source) krb5_free_principal (gssapi_krb5_context, (*context_handle)->source); if((*context_handle)->target) krb5_free_principal (gssapi_krb5_context, (*context_handle)->target); free (*context_handle); krb5_data_free (&outbuf); *context_handle = GSS_C_NO_CONTEXT; return GSS_S_FAILURE; } static OM_uint32 repl_mutual (OM_uint32 * minor_status, const gss_cred_id_t initiator_cred_handle, gss_ctx_id_t * context_handle, const gss_name_t target_name, const gss_OID mech_type, OM_uint32 req_flags, OM_uint32 time_req, const gss_channel_bindings_t input_chan_bindings, const gss_buffer_t input_token, gss_OID * actual_mech_type, gss_buffer_t output_token, OM_uint32 * ret_flags, OM_uint32 * time_rec ) { OM_uint32 ret; krb5_error_code kret; krb5_data indata; krb5_ap_rep_enc_part *repl; ret = gssapi_krb5_decapsulate (input_token, &indata, "\x02\x00"); if (ret) { /* XXX - Handle AP_ERROR */ return GSS_S_FAILURE; } kret = krb5_rd_rep (gssapi_krb5_context, (*context_handle)->auth_context, &indata, &repl); if (kret) return GSS_S_FAILURE; krb5_free_ap_rep_enc_part (gssapi_krb5_context, repl); (*context_handle)->more_flags |= OPEN; return GSS_S_COMPLETE; } /* * gss_init_sec_context */ OM_uint32 gss_init_sec_context (OM_uint32 * minor_status, const gss_cred_id_t initiator_cred_handle, gss_ctx_id_t * context_handle, const gss_name_t target_name, const gss_OID mech_type, OM_uint32 req_flags, OM_uint32 time_req, const gss_channel_bindings_t input_chan_bindings, const gss_buffer_t input_token, gss_OID * actual_mech_type, gss_buffer_t output_token, OM_uint32 * ret_flags, OM_uint32 * time_rec ) { gssapi_krb5_init (); if (input_token == GSS_C_NO_BUFFER || input_token->length == 0) return init_auth (minor_status, initiator_cred_handle, context_handle, target_name, mech_type, req_flags, time_req, input_chan_bindings, input_token, actual_mech_type, output_token, ret_flags, time_rec); else return repl_mutual(minor_status, initiator_cred_handle, context_handle, target_name, mech_type, req_flags, time_req, input_chan_bindings, input_token, actual_mech_type, output_token, ret_flags, time_rec); }