xref: /titanic_52/usr/src/lib/gss_mechs/mech_krb5/mech/rel_name.c (revision ab9b2e153c3a9a2b1141fefa87925b1a9beb1236)
1 #pragma ident	"%Z%%M%	%I%	%E% SMI"
2 
3 /*
4  * Copyright 1993 by OpenVision Technologies, 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 OpenVision not be used
11  * in advertising or publicity pertaining to distribution of the software
12  * without specific, written prior permission. OpenVision 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  * OPENVISION DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
17  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
18  * EVENT SHALL OPENVISION 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 #include "gssapiP_krb5.h"
26 
27 OM_uint32
28 krb5_gss_release_name(minor_status, input_name)
29      OM_uint32 *minor_status;
30      gss_name_t *input_name;
31 {
32    krb5_context context;
33    krb5_error_code code;
34 
35    code = krb5_gss_init_context(&context);
36    if (code) {
37        *minor_status = code;
38        return GSS_S_FAILURE;
39    }
40 
41    if (! kg_validate_name(*input_name)) {
42       *minor_status = (OM_uint32) G_VALIDATE_FAILED;
43       krb5_free_context(context);
44       return(GSS_S_CALL_BAD_STRUCTURE|GSS_S_BAD_NAME);
45    }
46 
47    (void)kg_delete_name(*input_name);
48 
49    krb5_free_principal(context, (krb5_principal) *input_name);
50    krb5_free_context(context);
51 
52    *input_name = (gss_name_t) NULL;
53 
54    *minor_status = 0;
55    return(GSS_S_COMPLETE);
56 }
57