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 <string.h> 32 #include <errno.h> 33 34 #include "mech_switch.h" 35 #include "name.h" 36 #include "cred.h" 37 #include "context.h" 38 39 OM_uint32 40 gss_init_sec_context(OM_uint32 * minor_status, 41 const gss_cred_id_t initiator_cred_handle, 42 gss_ctx_id_t * context_handle, 43 const gss_name_t target_name, 44 const gss_OID mech_type, 45 OM_uint32 req_flags, 46 OM_uint32 time_req, 47 const gss_channel_bindings_t input_chan_bindings, 48 const gss_buffer_t input_token, 49 gss_OID * actual_mech_type, 50 gss_buffer_t output_token, 51 OM_uint32 * ret_flags, 52 OM_uint32 * time_rec) 53 { 54 OM_uint32 major_status; 55 struct _gss_mech_switch *m; 56 struct _gss_name *name = (struct _gss_name *) target_name; 57 struct _gss_mechanism_name *mn; 58 struct _gss_context *ctx = (struct _gss_context *) *context_handle; 59 struct _gss_cred *cred = (struct _gss_cred *) initiator_cred_handle; 60 struct _gss_mechanism_cred *mc; 61 gss_cred_id_t cred_handle; 62 int allocated_ctx; 63 64 *minor_status = 0; 65 66 /* 67 * If we haven't allocated a context yet, do so now and lookup 68 * the mechanism switch table. If we have one already, make 69 * sure we use the same mechanism switch as before. 70 */ 71 if (!ctx) { 72 ctx = malloc(sizeof(struct _gss_context)); 73 if (!ctx) { 74 *minor_status = ENOMEM; 75 return (GSS_S_FAILURE); 76 } 77 memset(ctx, 0, sizeof(struct _gss_context)); 78 m = ctx->gc_mech = _gss_find_mech_switch(mech_type); 79 if (!m) { 80 free(ctx); 81 return (GSS_S_BAD_MECH); 82 } 83 allocated_ctx = 1; 84 } else { 85 m = ctx->gc_mech; 86 allocated_ctx = 0; 87 } 88 89 /* 90 * Find the MN for this mechanism. 91 */ 92 mn = _gss_find_mn(name, mech_type); 93 94 /* 95 * If we have a cred, find the cred for this mechanism. 96 */ 97 cred_handle = GSS_C_NO_CREDENTIAL; 98 if (cred) { 99 SLIST_FOREACH(mc, &cred->gc_mc, gmc_link) { 100 if (_gss_oid_equal(mech_type, mc->gmc_mech_oid)) { 101 cred_handle = mc->gmc_cred; 102 break; 103 } 104 } 105 } 106 107 major_status = m->gm_init_sec_context(minor_status, 108 cred_handle, 109 &ctx->gc_ctx, 110 mn->gmn_name, 111 mech_type, 112 req_flags, 113 time_req, 114 input_chan_bindings, 115 input_token, 116 actual_mech_type, 117 output_token, 118 ret_flags, 119 time_rec); 120 121 if (major_status != GSS_S_COMPLETE 122 && major_status != GSS_S_CONTINUE_NEEDED) { 123 if (allocated_ctx) 124 free(ctx); 125 } else { 126 *context_handle = (gss_ctx_id_t) ctx; 127 } 128 129 return (major_status); 130 } 131