1 /*
2  * Copyright (c) 1997 - 2003 Kungliga Tekniska H�gskolan
3  * (Royal Institute of Technology, Stockholm, Sweden).
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  *
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  *
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.
16  *
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.
20  *
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
31  * SUCH DAMAGE.
32  */
33 
34 #include "ntlm/ntlm.h"
35 
36 RCSID("$Id: import_name.c 22373 2007-12-28 18:36:06Z lha $");
37 
38 OM_uint32 _gss_ntlm_import_name
39            (OM_uint32 * minor_status,
40             const gss_buffer_t input_name_buffer,
41             const gss_OID input_name_type,
42             gss_name_t * output_name
43            )
44 {
45     char *name, *p, *p2;
46     ntlm_name n;
47 
48     *minor_status = 0;
49 
50     if (output_name)
51 	*output_name = GSS_C_NO_NAME;
52 
53     if (!gss_oid_equal(input_name_type, GSS_C_NT_HOSTBASED_SERVICE))
54 	return GSS_S_BAD_NAMETYPE;
55 
56     name = malloc(input_name_buffer->length + 1);
57     if (name == NULL) {
58 	*minor_status = ENOMEM;
59 	return GSS_S_FAILURE;
60     }
61     memcpy(name, input_name_buffer->value, input_name_buffer->length);
62     name[input_name_buffer->length] = '\0';
63 
64     /* find "domain" part of the name and uppercase it */
65     p = strchr(name, '@');
66     if (p == NULL)
67 	return GSS_S_BAD_NAME;
68     p[0] = '\0';
69     p++;
70     p2 = strchr(p, '.');
71     if (p2 && p2[1] != '\0') {
72 	p = p2 + 1;
73 	p2 = strchr(p, '.');
74 	if (p2)
75 	    *p2 = '\0';
76     }
77     strupr(p);
78 
79     n = calloc(1, sizeof(*n));
80     if (name == NULL) {
81 	free(name);
82 	*minor_status = ENOMEM;
83 	return GSS_S_FAILURE;
84     }
85 
86     n->user = strdup(name);
87     n->domain = strdup(p);
88 
89     free(name);
90 
91     if (n->user == NULL || n->domain == NULL) {
92 	free(n->user);
93 	free(n->domain);
94 	free(n);
95 	*minor_status = ENOMEM;
96 	return GSS_S_FAILURE;
97     }
98 
99     *output_name = (gss_name_t)n;
100 
101     return GSS_S_COMPLETE;
102 }
103