r23456: Update Samba4 to current lorikeet-heimdal.
[jelmer/samba4-debian.git] / source / heimdal / lib / gssapi / mech / gss_duplicate_name.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_duplicate_name.c,v 1.1 2005/12/29 14:40:20 dfr Exp $
27  */
28
29 #include "mech_locl.h"
30 RCSID("$Id: gss_duplicate_name.c 19953 2007-01-17 11:16:35Z lha $");
31
32 OM_uint32 gss_duplicate_name(OM_uint32 *minor_status,
33     const gss_name_t src_name,
34     gss_name_t *dest_name)
35 {
36         OM_uint32               major_status;
37         struct _gss_name        *name = (struct _gss_name *) src_name;
38         struct _gss_name        *new_name;
39         struct _gss_mechanism_name *mn;
40
41         *minor_status = 0;
42         *dest_name = GSS_C_NO_NAME;
43
44         /*
45          * If this name has a value (i.e. it didn't come from
46          * gss_canonicalize_name(), we re-import the thing. Otherwise,
47          * we make an empty name to hold the MN copy.
48          */
49         if (name->gn_value.value) {
50                 major_status = gss_import_name(minor_status,
51                     &name->gn_value, &name->gn_type, dest_name);
52                 if (major_status != GSS_S_COMPLETE)
53                         return (major_status);
54                 new_name = (struct _gss_name *) *dest_name;
55         } else {
56                 new_name = malloc(sizeof(struct _gss_name));
57                 if (!new_name) {
58                         *minor_status = ENOMEM;
59                         return (GSS_S_FAILURE);
60                 }
61                 memset(new_name, 0, sizeof(struct _gss_name));
62                 SLIST_INIT(&name->gn_mn);
63                 *dest_name = (gss_name_t) new_name;
64         }
65
66         /*
67          * Import the new name into any mechanisms listed in the
68          * original name. We could probably get away with only doing
69          * this if the original was canonical.
70          */
71         SLIST_FOREACH(mn, &name->gn_mn, gmn_link) {
72                 _gss_find_mn(new_name, mn->gmn_mech_oid);
73         }
74
75         return (GSS_S_COMPLETE);
76 }