1 /* $NetBSD: export_name.c,v 1.2 2017/01/28 21:31:46 christos Exp $ */
2
3 /*
4 * Copyright (c) 1997, 1999, 2003 Kungliga Tekniska Högskolan
5 * (Royal Institute of Technology, Stockholm, Sweden).
6 * All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 *
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 *
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * 3. Neither the name of the Institute nor the names of its contributors
20 * may be used to endorse or promote products derived from this software
21 * without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 */
35
36 #include "gsskrb5_locl.h"
37
_gsskrb5_export_name(OM_uint32 * minor_status,gss_const_name_t input_name,gss_buffer_t exported_name)38 OM_uint32 GSSAPI_CALLCONV _gsskrb5_export_name
39 (OM_uint32 * minor_status,
40 gss_const_name_t input_name,
41 gss_buffer_t exported_name
42 )
43 {
44 krb5_context context;
45 krb5_const_principal princ = (krb5_const_principal)input_name;
46 krb5_error_code kret;
47 char *buf, *name;
48 size_t len;
49
50 GSSAPI_KRB5_INIT (&context);
51
52 kret = krb5_unparse_name (context, princ, &name);
53 if (kret) {
54 *minor_status = kret;
55 return GSS_S_FAILURE;
56 }
57 len = strlen (name);
58
59 exported_name->length = 10 + len + GSS_KRB5_MECHANISM->length;
60 exported_name->value = malloc(exported_name->length);
61 if (exported_name->value == NULL) {
62 free (name);
63 *minor_status = ENOMEM;
64 return GSS_S_FAILURE;
65 }
66
67 /* TOK, MECH_OID_LEN, DER(MECH_OID), NAME_LEN, NAME */
68
69 buf = exported_name->value;
70 memcpy(buf, "\x04\x01", 2);
71 buf += 2;
72 buf[0] = ((GSS_KRB5_MECHANISM->length + 2) >> 8) & 0xff;
73 buf[1] = (GSS_KRB5_MECHANISM->length + 2) & 0xff;
74 buf+= 2;
75 buf[0] = 0x06;
76 buf[1] = (GSS_KRB5_MECHANISM->length) & 0xFF;
77 buf+= 2;
78
79 memcpy(buf, GSS_KRB5_MECHANISM->elements, GSS_KRB5_MECHANISM->length);
80 buf += GSS_KRB5_MECHANISM->length;
81
82 buf[0] = (len >> 24) & 0xff;
83 buf[1] = (len >> 16) & 0xff;
84 buf[2] = (len >> 8) & 0xff;
85 buf[3] = (len) & 0xff;
86 buf += 4;
87
88 memcpy (buf, name, len);
89
90 free (name);
91
92 *minor_status = 0;
93 return GSS_S_COMPLETE;
94 }
95