r23456: Update Samba4 to current lorikeet-heimdal.
[ab/samba.git/.git] / source4 / heimdal / lib / gssapi / mech / gss_names.c
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: src/lib/libgssapi/gss_names.c,v 1.1 2005/12/29 14:40:20 dfr Exp $
27  */
28
29 #include "mech_locl.h"
30 RCSID("$Id: gss_names.c 19928 2007-01-16 10:37:54Z lha $");
31
32 struct _gss_mechanism_name *
33 _gss_find_mn(struct _gss_name *name, gss_OID mech)
34 {
35         OM_uint32 major_status, minor_status;
36         gssapi_mech_interface m;
37         struct _gss_mechanism_name *mn;
38
39         SLIST_FOREACH(mn, &name->gn_mn, gmn_link) {
40                 if (gss_oid_equal(mech, mn->gmn_mech_oid))
41                         break;
42         }
43
44         if (!mn) {
45                 /*
46                  * If this name is canonical (i.e. there is only an
47                  * MN but it is from a different mech), give up now.
48                  */
49                 if (!name->gn_value.value)
50                         return (0);
51
52                 m = __gss_get_mechanism(mech);
53                 if (!m)
54                         return (0);
55
56                 mn = malloc(sizeof(struct _gss_mechanism_name));
57                 if (!mn)
58                         return (0);
59                 
60                 major_status = m->gm_import_name(&minor_status,
61                     &name->gn_value,
62                     (name->gn_type.elements
63                         ? &name->gn_type : GSS_C_NO_OID),
64                     &mn->gmn_name);
65                 if (major_status != GSS_S_COMPLETE) {
66                         _gss_mg_error(m, major_status, minor_status);
67                         free(mn);
68                         return (0);
69                 }
70
71                 mn->gmn_mech = m;
72                 mn->gmn_mech_oid = &m->gm_mech_oid;
73                 SLIST_INSERT_HEAD(&name->gn_mn, mn, gmn_link);
74         }
75         return (mn);
76 }
77
78 /*
79  * Make a name from an MN.
80  */
81 struct _gss_name *
82 _gss_make_name(gssapi_mech_interface m, gss_name_t new_mn)
83 {
84         struct _gss_name *name;
85         struct _gss_mechanism_name *mn;
86
87         name = malloc(sizeof(struct _gss_name));
88         if (!name)
89                 return (0);
90         memset(name, 0, sizeof(struct _gss_name));
91
92         mn = malloc(sizeof(struct _gss_mechanism_name));
93         if (!mn) {
94                 free(name);
95                 return (0);
96         }
97
98         SLIST_INIT(&name->gn_mn);
99         mn->gmn_mech = m;
100         mn->gmn_mech_oid = &m->gm_mech_oid;
101         mn->gmn_name = new_mn;
102         SLIST_INSERT_HEAD(&name->gn_mn, mn, gmn_link);
103
104         return (name);
105 }
106