/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright (c) 1996 by Sun Microsystems, Inc.
 */

#include "common_han.h"
#include "common_utf.h"

#define UNICODE_UDC_START       0xF700
#define UNICODE_UDC_END         0xF8FF
#define UNICODE_UDC_MAX         (UNICODE_UDC_END - UNICODE_UDC_START)

/****  _ U N I _ T O _ U T F 8  ****/

hcode_type _uni_to_utf8(hcode_type unicode)
{
        hcode_type utf8;
        utf8.code = 0;

        /* new code */
        if(unicode.code <= 0x007F){
                utf8.code = unicode.code;
        }
        else if(unicode.code >= 0x0080 && unicode.code <= 0x07FF){
                utf8.utf8.high8bits = 0x00;
                utf8.utf8.sign1 = 0x00;
                utf8.utf8.data1 = 0x00;
                utf8.utf8.sign2 = 0x03;
                utf8.utf8.data2 = unicode.unicode.data2;
                utf8.utf8.sign3 = 0x02;
                utf8.utf8.data3 = unicode.unicode.data3;
        }
        else if(unicode.code >= 0x0800 && unicode.code < 0xFFFF){
                utf8.utf8.high8bits = 0x00;
                utf8.utf8.sign1 = 0x0E;
                utf8.utf8.data1 = unicode.unicode.data1;
                utf8.utf8.sign2 = 0x02;                  /* 10xxxxxx */
                utf8.utf8.data2 = unicode.unicode.data2;
                utf8.utf8.sign3 = 0x02;                  /* 10xxxxxx */
                utf8.utf8.data3 = unicode.unicode.data3;
        }

        return(utf8);

}  /* end of hcode_type _uni_to_utf8(hcode_type uni_code) */

/****  _ U T F 8 _ T O _ U N I  ****/

hcode_type _utf8_to_uni(hcode_type utf8)
{
        hcode_type unicode;
        unicode.code = 0;

        if(utf8.byte.byte3 == 0 && utf8.byte.byte2 ==0)
        {/* ASCII */
                unicode.byte.byte1 = 0;
                unicode.byte.byte2 = 0;
                unicode.byte.byte3 = 0;
                unicode.byte.byte4 = utf8.byte.byte4;
                return(unicode);
        }

        if(utf8.byte.byte2 == 0){
        /* 2-byte UTF-8 */
                unicode.byte.byte1 = 0;
                unicode.byte.byte2 = 0;
                unicode.byte.byte3 = (utf8.byte.byte3 & 0x3F) >> 2;
                unicode.byte.byte4 = (utf8.byte.byte3 << 6) | (0x3F & utf8.byte.byte4);
        }
        else {
        /* 3-byte UTF-8 */
                unicode.unicode.data1 = utf8.utf8.data1;
                unicode.unicode.data2 = utf8.utf8.data2;
                unicode.unicode.data3 = utf8.utf8.data3;
        }
        return (unicode);

}  /* end of hcode_type _utf8_to_uni(hcode_type utf8) */

/*  Return UTF-8 code from given User Defined Character Index(Serial Number) */
hcode_type _udcidx_to_utf(int udcidx)
{
        hcode_type unicode, utf8;

        if (udcidx < 0 || UNICODE_UDC_MAX < udcidx)
                utf8.code = UTF_UDC_ERROR;      /* over the UDC bound */
        else {
                unicode.code = UNICODE_UDC_START + udcidx;
                utf8 = _uni_to_utf8(unicode);
        }

        return(utf8);
}

/*  Return User Defined Character Index(Serial Number) from given UTF-8 code */
int _utf_to_udcidx(hcode_type utf_code)
{
        hcode_type unicode;

        unicode = _utf8_to_uni(utf_code);

        if (unicode.code < UNICODE_UDC_START || UNICODE_UDC_END < unicode.code)
                return(IDX_UDC_ERROR);
        else
                return((int)(unicode.code - UNICODE_UDC_START));
}