5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsstatic char *rcsid = "$Id: nameprep.c,v 1.1 2003/06/04 00:25:56 marka Exp $";
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * Copyright (c) 2001,2002 Japan Network Information Center.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * All rights reserved.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * By using this file, you agree to the terms and conditions set forth bellow.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * LICENSE TERMS AND CONDITIONS
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * The following License Terms and Conditions apply, unless a different
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * license is obtained from Japan Network Information Center ("JPNIC"),
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * a Japanese association, Kokusai-Kougyou-Kanda Bldg 6F, 2-3-4 Uchi-Kanda,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * Chiyoda-ku, Tokyo 101-0047, Japan.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * 1. Use, Modification and Redistribution (including distribution of any
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * modified or derived work) in source and/or binary forms is permitted
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * under this License Terms and Conditions.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * 2. Redistribution of source code must retain the copyright notices as they
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * appear in each source code file, this License Terms and Conditions.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * 3. Redistribution in binary form must reproduce the Copyright Notice,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * this License Terms and Conditions, in the documentation and/or other
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * materials provided with the distribution. For the purposes of binary
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * distribution the "Copyright Notice" refers to the following language:
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * "Copyright (c) 2000-2002 Japan Network Information Center. All rights reserved."
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * 4. The name of JPNIC may not be used to endorse or promote products
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * derived from this Software without specific prior written approval of
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * 5. Disclaimer/Limitation of Liability: THIS SOFTWARE IS PROVIDED BY JPNIC
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL JPNIC BE LIABLE
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * Load NAMEPREP compiled tables.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * Define mapping/checking functions for each version of the draft.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewstypedef const char *(*nameprep_mapproc)(unsigned long v);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewstypedef int (*nameprep_checkproc)(unsigned long v);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewstypedef idn_biditype_t (*nameprep_biditypeproc)(unsigned long v);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsstatic idn_result_t idn_nameprep_check(nameprep_checkproc proc,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews const unsigned long *str,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews const unsigned long **found);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_create(const char *version, idn_nameprep_t *handlep) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews TRACE(("idn_nameprep_create(version=%-.50s)\n",
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * Lookup table for the specified version. Since the number of
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * versions won't be large (I don't want see draft-23 or such :-),
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * simple linear search is OK.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews for (handle = nameprep_versions; handle->version != NULL; handle++) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* Nothing to do. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_map(idn_nameprep_t handle, const unsigned long *from,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews assert(handle != NULL && from != NULL && to != NULL);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews TRACE(("idn_nameprep_map(ctx=%s, from=\"%s\")\n",
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews handle->version, idn__debug_ucs4xstring(from, 50)));
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews unsigned long v = *from;
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* This cannot happen, but just in case.. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews } else if (v > UNICODE_MAX) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* No mapping is possible. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* Try mapping. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* No mapping. Just copy verbatim. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews mappeddata = (const unsigned char *)mapped + 1;
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_isprohibited(idn_nameprep_t handle, const unsigned long *str,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews const unsigned long **found) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews assert(handle != NULL && str != NULL && found != NULL);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews TRACE(("idn_nameprep_isprohibited(ctx=%s, str=\"%s\")\n",
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews handle->version, idn__debug_ucs4xstring(str, 50)));
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews return (idn_nameprep_check(handle->prohibited_proc, str, found));
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_isunassigned(idn_nameprep_t handle, const unsigned long *str,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews const unsigned long **found) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews assert(handle != NULL && str != NULL && found != NULL);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews TRACE(("idn_nameprep_isunassigned(handle->version, str=\"%s\")\n",
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews handle->version, idn__debug_ucs4xstring(str, 50)));
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews return (idn_nameprep_check(handle->unassigned_proc, str, found));
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_check(nameprep_checkproc proc, const unsigned long *str,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews const unsigned long **found) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews unsigned long v;
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* This cannot happen, but just in case.. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews } else if (v > UNICODE_MAX) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* It is invalid.. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews } else if ((*proc)(v)) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_isvalidbidi(idn_nameprep_t handle, const unsigned long *str,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews const unsigned long **found) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews unsigned long v;
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews assert(handle != NULL && str != NULL && found != NULL);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews TRACE(("idn_nameprep_isvalidbidi(ctx=%s, str=\"%s\")\n",
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews handle->version, idn__debug_ucs4xstring(str, 50)));
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * check first character's type and initialize variables.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* This cannot happen, but just in case.. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* It is invalid.. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews first_char = last_char = (*(handle->biditype_proc))(*str);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews * see whether string is valid or not.
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* This cannot happen, but just in case.. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews } else if (v > UNICODE_MAX) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews /* It is invalid.. */
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews if (found_r_al && last_char == idn_biditype_l) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews if (first_char != idn_biditype_r_al && last_char == idn_biditype_r_al) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_createproc(const char *parameter, void **handlep) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews return idn_nameprep_create(parameter, (idn_nameprep_t *)handlep);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_mapproc(void *handle, const unsigned long *from,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews return idn_nameprep_map((idn_nameprep_t)handle, from, to, tolen);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_prohibitproc(void *handle, const unsigned long *str,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews const unsigned long **found) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews return idn_nameprep_isprohibited((idn_nameprep_t)handle, str, found);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_unassignedproc(void *handle, const unsigned long *str,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews const unsigned long **found) {
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews return idn_nameprep_isunassigned((idn_nameprep_t)handle, str, found);
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrewsidn_nameprep_bidiproc(void *handle, const unsigned long *str,
5c526acb82c882e41b655c31f5fa4425c87b671cMark Andrews const unsigned long **found) {