xref: /netbsd-src/crypto/external/bsd/heimdal/dist/lib/wind/stringprep.c (revision d3273b5b76f5afaafe308cead5511dbb8df8c5e9)
1*d3273b5bSchristos /*	$NetBSD: stringprep.c,v 1.2 2017/01/28 21:31:50 christos Exp $	*/
2ca1c9b0cSelric 
3ca1c9b0cSelric /*
4ca1c9b0cSelric  * Copyright (c) 2004, 2006, 2008 Kungliga Tekniska Högskolan
5ca1c9b0cSelric  * (Royal Institute of Technology, Stockholm, Sweden).
6ca1c9b0cSelric  * All rights reserved.
7ca1c9b0cSelric  *
8ca1c9b0cSelric  * Redistribution and use in source and binary forms, with or without
9ca1c9b0cSelric  * modification, are permitted provided that the following conditions
10ca1c9b0cSelric  * are met:
11ca1c9b0cSelric  *
12ca1c9b0cSelric  * 1. Redistributions of source code must retain the above copyright
13ca1c9b0cSelric  *    notice, this list of conditions and the following disclaimer.
14ca1c9b0cSelric  *
15ca1c9b0cSelric  * 2. Redistributions in binary form must reproduce the above copyright
16ca1c9b0cSelric  *    notice, this list of conditions and the following disclaimer in the
17ca1c9b0cSelric  *    documentation and/or other materials provided with the distribution.
18ca1c9b0cSelric  *
19ca1c9b0cSelric  * 3. Neither the name of the Institute nor the names of its contributors
20ca1c9b0cSelric  *    may be used to endorse or promote products derived from this software
21ca1c9b0cSelric  *    without specific prior written permission.
22ca1c9b0cSelric  *
23ca1c9b0cSelric  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
24ca1c9b0cSelric  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25ca1c9b0cSelric  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26ca1c9b0cSelric  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
27ca1c9b0cSelric  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28ca1c9b0cSelric  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29ca1c9b0cSelric  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30ca1c9b0cSelric  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31ca1c9b0cSelric  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32ca1c9b0cSelric  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33ca1c9b0cSelric  * SUCH DAMAGE.
34ca1c9b0cSelric  */
35ca1c9b0cSelric 
36ca1c9b0cSelric #ifdef HAVE_CONFIG_H
37ca1c9b0cSelric #include <config.h>
38ca1c9b0cSelric #endif
39ca1c9b0cSelric #include "windlocl.h"
40ca1c9b0cSelric #include <stdlib.h>
41ca1c9b0cSelric #include <string.h>
42ca1c9b0cSelric #include <errno.h>
43ca1c9b0cSelric 
44ca1c9b0cSelric /**
45ca1c9b0cSelric  * Process a input UCS4 string according a string-prep profile.
46ca1c9b0cSelric  *
47ca1c9b0cSelric  * @param in input UCS4 string to process
48ca1c9b0cSelric  * @param in_len length of the input string
49ca1c9b0cSelric  * @param out output UCS4 string
50ca1c9b0cSelric  * @param out_len length of the output string.
51ca1c9b0cSelric  * @param flags stringprep profile.
52ca1c9b0cSelric  *
53ca1c9b0cSelric  * @return returns 0 on success, an wind error code otherwise
54ca1c9b0cSelric  * @ingroup wind
55ca1c9b0cSelric  */
56ca1c9b0cSelric 
57ca1c9b0cSelric int
wind_stringprep(const uint32_t * in,size_t in_len,uint32_t * out,size_t * out_len,wind_profile_flags flags)58ca1c9b0cSelric wind_stringprep(const uint32_t *in, size_t in_len,
59ca1c9b0cSelric 		uint32_t *out, size_t *out_len,
60ca1c9b0cSelric 		wind_profile_flags flags)
61ca1c9b0cSelric {
62ca1c9b0cSelric     size_t tmp_len = in_len * 3;
63ca1c9b0cSelric     uint32_t *tmp;
64ca1c9b0cSelric     int ret;
65ca1c9b0cSelric     size_t olen;
66ca1c9b0cSelric 
67ca1c9b0cSelric     if (in_len == 0) {
68ca1c9b0cSelric 	*out_len = 0;
69ca1c9b0cSelric 	return 0;
70ca1c9b0cSelric     }
71ca1c9b0cSelric 
72ca1c9b0cSelric     tmp = malloc(tmp_len * sizeof(uint32_t));
73ca1c9b0cSelric     if (tmp == NULL)
74ca1c9b0cSelric 	return ENOMEM;
75ca1c9b0cSelric 
76ca1c9b0cSelric     ret = _wind_stringprep_map(in, in_len, tmp, &tmp_len, flags);
77ca1c9b0cSelric     if (ret) {
78ca1c9b0cSelric 	free(tmp);
79ca1c9b0cSelric 	return ret;
80ca1c9b0cSelric     }
81ca1c9b0cSelric 
82ca1c9b0cSelric     olen = *out_len;
83ca1c9b0cSelric     ret = _wind_stringprep_normalize(tmp, tmp_len, tmp, &olen);
84ca1c9b0cSelric     if (ret) {
85ca1c9b0cSelric 	free(tmp);
86ca1c9b0cSelric 	return ret;
87ca1c9b0cSelric     }
88ca1c9b0cSelric     ret = _wind_stringprep_prohibited(tmp, olen, flags);
89ca1c9b0cSelric     if (ret) {
90ca1c9b0cSelric 	free(tmp);
91ca1c9b0cSelric 	return ret;
92ca1c9b0cSelric     }
93ca1c9b0cSelric     ret = _wind_stringprep_testbidi(tmp, olen, flags);
94ca1c9b0cSelric     if (ret) {
95ca1c9b0cSelric 	free(tmp);
96ca1c9b0cSelric 	return ret;
97ca1c9b0cSelric     }
98ca1c9b0cSelric 
99ca1c9b0cSelric     /* Insignificant Character Handling for ldap-prep */
100ca1c9b0cSelric     if (flags & WIND_PROFILE_LDAP_CASE_EXACT_ATTRIBUTE) {
101ca1c9b0cSelric 	ret = _wind_ldap_case_exact_attribute(tmp, olen, out, out_len);
102ca1c9b0cSelric #if 0
103ca1c9b0cSelric     } else if (flags & WIND_PROFILE_LDAP_CASE_EXACT_ASSERTION) {
104ca1c9b0cSelric     } else if (flags & WIND_PROFILE_LDAP_NUMERIC) {
105ca1c9b0cSelric     } else if (flags & WIND_PROFILE_LDAP_TELEPHONE) {
106ca1c9b0cSelric #endif
107ca1c9b0cSelric     } else {
108ca1c9b0cSelric 	memcpy(out, tmp, sizeof(out[0]) * olen);
109ca1c9b0cSelric 	*out_len = olen;
110ca1c9b0cSelric     }
111ca1c9b0cSelric     free(tmp);
112ca1c9b0cSelric 
113ca1c9b0cSelric     return ret;
114ca1c9b0cSelric }
115ca1c9b0cSelric 
1164f77a458Spettai static const struct {
117ca1c9b0cSelric     const char *name;
118ca1c9b0cSelric     wind_profile_flags flags;
119ca1c9b0cSelric } profiles[] = {
120ca1c9b0cSelric     { "nameprep", WIND_PROFILE_NAME },
121ca1c9b0cSelric     { "saslprep", WIND_PROFILE_SASL },
122ca1c9b0cSelric     { "ldapprep", WIND_PROFILE_LDAP }
123ca1c9b0cSelric };
124ca1c9b0cSelric 
125ca1c9b0cSelric /**
126ca1c9b0cSelric  * Try to find the profile given a name.
127ca1c9b0cSelric  *
128ca1c9b0cSelric  * @param name name of the profile.
129ca1c9b0cSelric  * @param flags the resulting profile.
130ca1c9b0cSelric  *
131ca1c9b0cSelric  * @return returns 0 on success, an wind error code otherwise
132ca1c9b0cSelric  * @ingroup wind
133ca1c9b0cSelric  */
134ca1c9b0cSelric 
135ca1c9b0cSelric int
wind_profile(const char * name,wind_profile_flags * flags)136ca1c9b0cSelric wind_profile(const char *name, wind_profile_flags *flags)
137ca1c9b0cSelric {
138ca1c9b0cSelric     unsigned int i;
139ca1c9b0cSelric 
140ca1c9b0cSelric     for (i = 0; i < sizeof(profiles)/sizeof(profiles[0]); i++) {
141ca1c9b0cSelric 	if (strcasecmp(profiles[i].name, name) == 0) {
142ca1c9b0cSelric 	    *flags = profiles[i].flags;
143ca1c9b0cSelric 	    return 0;
144ca1c9b0cSelric 	}
145ca1c9b0cSelric     }
146ca1c9b0cSelric     return WIND_ERR_NO_PROFILE;
147ca1c9b0cSelric }
148