1 /*- 2 * Copyright (c) 2005 Doug Rabson 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 * 26 * $FreeBSD$ 27 */ 28 29 #include <gssapi/gssapi.h> 30 #include <stdlib.h> 31 #include <errno.h> 32 33 #include "mech_switch.h" 34 #include "name.h" 35 #include "cred.h" 36 #include "context.h" 37 38 OM_uint32 39 gss_init_sec_context(OM_uint32 * minor_status, 40 const gss_cred_id_t initiator_cred_handle, 41 gss_ctx_id_t * context_handle, 42 const gss_name_t target_name, 43 const gss_OID mech_type, 44 OM_uint32 req_flags, 45 OM_uint32 time_req, 46 const gss_channel_bindings_t input_chan_bindings, 47 const gss_buffer_t input_token, 48 gss_OID * actual_mech_type, 49 gss_buffer_t output_token, 50 OM_uint32 * ret_flags, 51 OM_uint32 * time_rec) 52 { 53 OM_uint32 major_status; 54 struct _gss_mech_switch *m; 55 struct _gss_name *name = (struct _gss_name *) target_name; 56 struct _gss_mechanism_name *mn; 57 struct _gss_context *ctx = (struct _gss_context *) *context_handle; 58 struct _gss_cred *cred = (struct _gss_cred *) initiator_cred_handle; 59 struct _gss_mechanism_cred *mc; 60 gss_cred_id_t cred_handle; 61 int allocated_ctx; 62 63 *minor_status = 0; 64 65 /* 66 * If we haven't allocated a context yet, do so now and lookup 67 * the mechanism switch table. If we have one already, make 68 * sure we use the same mechanism switch as before. 69 */ 70 if (!ctx) { 71 ctx = malloc(sizeof(struct _gss_context)); 72 if (!ctx) { 73 *minor_status = ENOMEM; 74 return (GSS_S_FAILURE); 75 } 76 memset(ctx, 0, sizeof(struct _gss_context)); 77 m = ctx->gc_mech = _gss_find_mech_switch(mech_type); 78 if (!m) { 79 free(ctx); 80 return (GSS_S_BAD_MECH); 81 } 82 allocated_ctx = 1; 83 } else { 84 m = ctx->gc_mech; 85 allocated_ctx = 0; 86 } 87 88 /* 89 * Find the MN for this mechanism. 90 */ 91 mn = _gss_find_mn(name, mech_type); 92 93 /* 94 * If we have a cred, find the cred for this mechanism. 95 */ 96 cred_handle = GSS_C_NO_CREDENTIAL; 97 if (cred) { 98 SLIST_FOREACH(mc, &cred->gc_mc, gmc_link) { 99 if (_gss_oid_equal(mech_type, mc->gmc_mech_oid)) { 100 cred_handle = mc->gmc_cred; 101 break; 102 } 103 } 104 } 105 106 major_status = m->gm_init_sec_context(minor_status, 107 cred_handle, 108 &ctx->gc_ctx, 109 mn->gmn_name, 110 mech_type, 111 req_flags, 112 time_req, 113 input_chan_bindings, 114 input_token, 115 actual_mech_type, 116 output_token, 117 ret_flags, 118 time_rec); 119 120 if (major_status != GSS_S_COMPLETE 121 && major_status != GSS_S_CONTINUE_NEEDED) { 122 if (allocated_ctx) 123 free(ctx); 124 } else { 125 *context_handle = (gss_ctx_id_t) ctx; 126 } 127 128 return (major_status); 129 } 130