support/gssapi/g_delete_sec_context.c

   1 /* #ident  "@(#)gss_delete_sec_context.c 1.10     95/08/07 SMI" */
   2
   3 /*
   4  * Copyright 1996 by Sun Microsystems, Inc.
   5  *
   6  * Permission to use, copy, modify, distribute, and sell this software
   7  * and its documentation for any purpose is hereby granted without fee,
   8  * provided that the above copyright notice appears in all copies and
   9  * that both that copyright notice and this permission notice appear in
  10  * supporting documentation, and that the name of Sun Microsystems not be used
  11  * in advertising or publicity pertaining to distribution of the software
  12  * without specific, written prior permission. Sun Microsystems makes no
  13  * representations about the suitability of this software for any
  14  * purpose.  It is provided "as is" without express or implied warranty.
  15  *
  16  * SUN MICROSYSTEMS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
  17  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
  18  * EVENT SHALL SUN MICROSYSTEMS BE LIABLE FOR ANY SPECIAL, INDIRECT OR
  19  * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
  20  * USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
  21  * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
  22  * PERFORMANCE OF THIS SOFTWARE.
  23  */
  24
  25 /*
  26  *  glue routine for gss_delete_sec_context
  27  */
  28
  29 #include "mglueP.h"
  30 #include <stdio.h>
  31 #ifdef HAVE_STDLIB_H
  32 #include <stdlib.h>
  33 #endif
  34
  35 OM_uint32 KRB5_CALLCONV
  36 gss_delete_sec_context (minor_status,
  37                         context_handle,
  38                         output_token)
  39
  40 OM_uint32 *             minor_status;
  41 gss_ctx_id_t *          context_handle;
  42 gss_buffer_t            output_token;
  43
  44 {
  45     OM_uint32           status;
  46     gss_union_ctx_id_t  ctx;
  47     gss_mechanism       mech;
  48
  49     gss_initialize();
  50
  51     /* if the context_handle is Null, return NO_CONTEXT error */
  52
  53     if(context_handle == NULL || *context_handle == GSS_C_NO_CONTEXT)
  54         return(GSS_S_NO_CONTEXT);
  55
  56     /*
  57      * select the approprate underlying mechanism routine and
  58      * call it.
  59      */
  60
  61     ctx = (gss_union_ctx_id_t) *context_handle;
  62     mech = __gss_get_mechanism (ctx->mech_type);
  63
  64     if (mech) {
  65
  66         if (mech->gss_delete_sec_context)
  67             status = mech->gss_delete_sec_context(
  68 #ifdef USE_MECH_CONTEXT
  69                                                   mech->context,
  70 #endif
  71                                                   minor_status,
  72                                                   &ctx->internal_ctx_id,
  73                                                   output_token);
  74         else
  75             status = GSS_S_BAD_BINDINGS;
  76
  77         /* now free up the space for the union context structure */
  78
  79         free(ctx->mech_type->elements);
  80         free(ctx->mech_type);
  81         free(*context_handle);
  82         *context_handle = NULL;
  83
  84         return(status);
  85     }
  86
  87     return(GSS_S_NO_CONTEXT);
  88 }