2 * Copyright (c) 1997 - 2003 Kungliga Tekniska Högskolan
3 * (Royal Institute of Technology, Stockholm, Sweden).
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * 3. Neither the name of the Institute nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 #include "gsskrb5_locl.h"
36 OM_uint32 GSSAPI_CALLCONV
37 _gsskrb5_delete_sec_context(OM_uint32
* minor_status
,
38 gss_ctx_id_t
* context_handle
,
39 gss_buffer_t output_token
)
44 GSSAPI_KRB5_INIT (&context
);
49 output_token
->length
= 0;
50 output_token
->value
= NULL
;
53 if (*context_handle
== GSS_C_NO_CONTEXT
)
54 return GSS_S_COMPLETE
;
56 ctx
= (gsskrb5_ctx
) *context_handle
;
57 *context_handle
= GSS_C_NO_CONTEXT
;
59 HEIMDAL_MUTEX_lock(&ctx
->ctx_id_mutex
);
61 krb5_auth_con_free (context
, ctx
->auth_context
);
62 krb5_auth_con_free (context
, ctx
->deleg_auth_context
);
64 krb5_free_creds(context
, ctx
->kcred
);
66 krb5_free_principal (context
, ctx
->source
);
68 krb5_free_principal (context
, ctx
->target
);
70 krb5_free_ticket (context
, ctx
->ticket
);
72 _gssapi_msg_order_destroy(&ctx
->order
);
73 if (ctx
->service_keyblock
)
74 krb5_free_keyblock (context
, ctx
->service_keyblock
);
75 krb5_data_free(&ctx
->fwd_data
);
77 krb5_crypto_destroy(context
, ctx
->crypto
);
78 if (ctx
->ccache
&& (ctx
->more_flags
& CLOSE_CCACHE
))
79 krb5_cc_close(context
, ctx
->ccache
);
81 HEIMDAL_MUTEX_unlock(&ctx
->ctx_id_mutex
);
82 HEIMDAL_MUTEX_destroy(&ctx
->ctx_id_mutex
);
83 memset(ctx
, 0, sizeof(*ctx
));
85 return GSS_S_COMPLETE
;