e8bb38e6ba
git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@4019 ec53bebd-3082-4978-b11e-865c3cabbd6b
350 lines
9.0 KiB
C
350 lines
9.0 KiB
C
/*
|
|
* 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;
|
|
krb5_enctype enctype;
|
|
|
|
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;
|
|
}
|
|
|
|
{
|
|
/* XXX ugly */
|
|
krb5_keyblock *c;
|
|
krb5_auth_con_getkey(gssapi_krb5_context,
|
|
(*context_handle)->auth_context,
|
|
&c);
|
|
cred->session = *c;
|
|
free(c);
|
|
}
|
|
|
|
kret = gssapi_krb5_create_8003_checksum (input_chan_bindings,
|
|
flags,
|
|
&cksum);
|
|
if (kret) {
|
|
ret = GSS_S_FAILURE;
|
|
goto failure;
|
|
}
|
|
|
|
if ((*context_handle)->auth_context->enctype)
|
|
enctype = (*context_handle)->auth_context->enctype;
|
|
else {
|
|
kret = krb5_keytype_to_etype(gssapi_krb5_context,
|
|
(*context_handle)->auth_context->keyblock->keytype,
|
|
&enctype);
|
|
if (kret)
|
|
return kret;
|
|
}
|
|
|
|
|
|
|
|
kret = krb5_build_authenticator (gssapi_krb5_context,
|
|
(*context_handle)->auth_context,
|
|
enctype,
|
|
cred,
|
|
&cksum,
|
|
&auth,
|
|
&authenticator);
|
|
|
|
if (kret) {
|
|
ret = GSS_S_FAILURE;
|
|
goto failure;
|
|
}
|
|
|
|
kret = krb5_build_ap_req (gssapi_krb5_context,
|
|
enctype,
|
|
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);
|
|
}
|