/**

 * @file    hangulctype.c

 * @brief   hangulctype source file

 */

/* libhangul

 * Copyright (c) 2005,2006 Choe Hwanjin

 * All rights reserved.

 * This library is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Lesser General Public

 * License as published by the Free Software Foundation; either

 * version 2.1 of the License, or (at your option) any later version.

 *

 * This library is distributed in the hope that it will be useful,

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

 * Lesser General Public License for more details.

 *

 * You should have received a copy of the GNU Lesser General Public

 * License along with this library; if not, write to the Free Software

 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

 */

#ifdef HAVE_CONFIG_H

#include <config.h>

#endif

#include <stdlib.h>

#include "hangul.h"

static const ucschar syllable_base  = 0xac00;

static const ucschar choseong_base  = 0x1100;

static const ucschar jungseong_base = 0x1161;

static const ucschar jongseong_base = 0x11a7;

static const int njungseong = 21;

static const int njongseong = 28;

/**

 * @brief check for a choseong

 * @param c ucs4 code value

 * @return true if the character c falls into choseong class

 *

 * This function check whether c, which must have ucs4 value, falls into

 * choseong (leading consonants) class.

 */

bool

hangul_is_choseong(ucschar c)

{

    return c >= 0x1100 && c <= 0x1159;

}

/**

 * @brief check for a jungseong

 * @param c ucs4 code value

 * @return true if the character c falls into jungseong class

 *

 * This function check whether c, which must have ucs4 value, falls into

 * jungseong (vowels) class.

 */

bool

hangul_is_jungseong(ucschar c)

{

    return c >= 0x1161 && c <= 0x11a2;

}

/**

 * @brief check for a jongseong

 * @param c ucs4 code value

 * @return true if the character c falls into jongseong class

 *

 * This function check whether c, which must have ucs4 value, falls into

 * jongseong (trailing consonants) class.

 */

bool

hangul_is_jongseong(ucschar c)

{

    return c >= 0x11a8 && c <= 0x11f9;

}

bool

hangul_is_combining_mark(ucschar c)

{

    return  c == 0x302e || c == 0x302f  ||

	   (c >= 0x0300 && c <= 0x036F) ||

	   (c >= 0x1dc0 && c <= 0x1dff) ||

	   (c >= 0xfe20 && c <= 0xfe2f);

}

bool

hangul_is_choseong_conjoinable(ucschar c)

{

    return c >= 0x1100 && c <= 0x1112;

}

bool

hangul_is_jungseong_conjoinable(ucschar c)

{

    return c >= 0x1161 && c <= 0x1175;

}

bool

hangul_is_jongseong_conjoinable(ucschar c)

{

    return c >= 0x11a7 && c <= 0x11c2;

}

/**

 * @brief check for a syllable

 * @param c ucs4 code value

 * @return true if the character c falls into syllable class

 *

 * This function check whether c, which must have ucs4 value, falls into

 * syllable class; that is from U+AC00 to 0xD7A3.

 */

bool

hangul_is_syllable(ucschar c)

{

    return c >= 0xac00 && c <= 0xd7a3;

}

/**

 * @brief check for a jaso

 * @param c ucs4 code value

 * @return true if the character c falls into jaso class

 *

 * This function check whether c, which must have ucs4 value, falls into

 * jaso class; that is choseong, jungseong or jongseong.

 */

bool

hangul_is_jaso(ucschar c)

{

    return hangul_is_choseong(c) ||

	   hangul_is_jungseong(c) ||

	   hangul_is_jongseong(c);

}

/**

 * @brief check for a compatibility jamo

 * @param c ucs4 code value

 * @return true if the character c falls into compatibility class

 *

 * This function check whether c, which must have ucs4 value, falls into

 * compatibility jamo class.

 */

bool

hangul_is_jamo(ucschar c)

{

    return c >= 0x3131 && c <= 0x318e;

}

/**

 * @brief convert a jaso to the compatibility jamo

 * @param c ucs4 code value

 * @return converted value, or c

 *

 * This function converts the jaso c, which must have ucs4 value, to

 * comaptibility jamo or c if the conversion is failed

 */

ucschar

hangul_jaso_to_jamo(ucschar c)

{

    static

#ifdef __SYMBIAN32__

    const 

#endif

    ucschar choseong[] = {

	0x3131,	    /* 0x1100 */

	0x3132,	    /* 0x1101 */

	0x3134,	    /* 0x1102 */

	0x3137,	    /* 0x1103 */

	0x3138,	    /* 0x1104 */

	0x3139,	    /* 0x1105 */

	0x3141,	    /* 0x1106 */

	0x3142,	    /* 0x1107 */

	0x3143,	    /* 0x1108 */

	0x3145,	    /* 0x1109 */

	0x3146,	    /* 0x110a */

	0x3147,	    /* 0x110b */

	0x3148,	    /* 0x110c */

	0x3149,	    /* 0x110d */

	0x314a,	    /* 0x110e */

	0x314b,	    /* 0x110f */

	0x314c,	    /* 0x1110 */

	0x314d,	    /* 0x1111 */

	0x314e,	    /* 0x1112 */

    };

    static 

#ifdef __SYMBIAN32__

    const 

#endif

    ucschar jungseong[] = {

	0x314f,	    /* 0x1161 */

	0x3150,	    /* 0x1162 */

	0x3151,	    /* 0x1163 */

	0x3152,	    /* 0x1164 */

	0x3153,	    /* 0x1165 */

	0x3154,	    /* 0x1166 */

	0x3155,	    /* 0x1167 */

	0x3156,	    /* 0x1168 */

	0x3157,	    /* 0x1169 */

	0x3158,	    /* 0x116a */

	0x3159,	    /* 0x116b */

	0x315a,	    /* 0x116c */

	0x315b,	    /* 0x116d */

	0x315c,	    /* 0x116e */

	0x315d,	    /* 0x116f */

	0x315e,	    /* 0x1170 */

	0x315f,	    /* 0x1171 */

	0x3160,	    /* 0x1172 */

	0x3161,	    /* 0x1173 */

	0x3162,	    /* 0x1174 */

	0x3163	    /* 0x1175 */

    };

    static 

#ifdef __SYMBIAN32__

    const 

#endif

    ucschar jongseong[] = {

	0x3131,	    /* 0x11a8 */

	0x3132,	    /* 0x11a9 */

	0x3133,	    /* 0x11aa */

	0x3134,	    /* 0x11ab */

	0x3135,	    /* 0x11ac */

	0x3136,	    /* 0x11ad */

	0x3137,	    /* 0x11ae */

	0x3139,	    /* 0x11af */

	0x313a,	    /* 0x11b0 */

	0x313b,	    /* 0x11b1 */

	0x313c,	    /* 0x11b2 */

	0x313d,	    /* 0x11b3 */

	0x313e,	    /* 0x11b4 */

	0x313f,	    /* 0x11b5 */

	0x3140,	    /* 0x11b6 */

	0x3141,	    /* 0x11b7 */

	0x3142,	    /* 0x11b8 */

	0x3144,	    /* 0x11b9 */

	0x3145,	    /* 0x11ba */

	0x3146,	    /* 0x11bb */

	0x3147,	    /* 0x11bc */

	0x3148,	    /* 0x11bd */

	0x314a,	    /* 0x11be */

	0x314b,	    /* 0x11bf */

	0x314c,	    /* 0x11c0 */

	0x314d,	    /* 0x11c1 */

	0x314e	    /* 0x11c2 */

    };

    if (c >= 0x1100 && c <= 0x1112) {

	return choseong[c - 0x1100];

    } else if (c >= 0x1161 && c <= 0x1175) {

	return jungseong[c - 0x1161];

    } else if (c >= 0x11a8 && c <= 0x11c2) {

	return jongseong[c - 0x11a8];

    }

    return c;

}

ucschar

hangul_choseong_to_jongseong(ucschar c)

{

    static 

#ifdef __SYMBIAN32__

    const 

#endif

    ucschar table[] = {

	0x11a8,  /* choseong kiyeok      -> jongseong kiyeok      */

	0x11a9,  /* choseong ssangkiyeok -> jongseong ssangkiyeok */

	0x11ab,  /* choseong nieun       -> jongseong nieun       */

	0x11ae,  /* choseong tikeut      -> jongseong tikeut      */

	0x0,     /* choseong ssangtikeut -> jongseong tikeut      */

	0x11af,  /* choseong rieul       -> jongseong rieul       */

	0x11b7,  /* choseong mieum       -> jongseong mieum       */

	0x11b8,  /* choseong pieup       -> jongseong pieup       */

	0x0,     /* choseong ssangpieup  -> jongseong pieup       */

	0x11ba,  /* choseong sios        -> jongseong sios        */

	0x11bb,  /* choseong ssangsios   -> jongseong ssangsios   */

	0x11bc,  /* choseong ieung       -> jongseong ieung       */

	0x11bd,  /* choseong cieuc       -> jongseong cieuc       */

	0x0,     /* choseong ssangcieuc  -> jongseong cieuc       */

	0x11be,  /* choseong chieuch     -> jongseong chieuch     */

	0x11bf,  /* choseong khieukh     -> jongseong khieukh     */

	0x11c0,  /* choseong thieuth     -> jongseong thieuth     */

	0x11c1,  /* choseong phieuph     -> jongseong phieuph     */

	0x11c2   /* choseong hieuh       -> jongseong hieuh       */

    };

    if (c < 0x1100 || c > 0x1112)

	return 0;

    return table[c - 0x1100];

}

ucschar

hangul_jongseong_to_choseong(ucschar c)

{

    static 

#ifdef __SYMBIAN32__

    const 

#endif

    ucschar table[] = {

      0x1100,  /* jongseong kiyeok        -> choseong kiyeok       */

      0x1101,  /* jongseong ssangkiyeok   -> choseong ssangkiyeok  */

      0x1109,  /* jongseong kiyeok-sios   -> choseong sios         */

      0x1102,  /* jongseong nieun         -> choseong nieun        */

      0x110c,  /* jongseong nieun-cieuc   -> choseong cieuc        */

      0x1112,  /* jongseong nieun-hieuh   -> choseong hieuh        */

      0x1103,  /* jongseong tikeut        -> choseong tikeut       */

      0x1105,  /* jongseong rieul         -> choseong rieul        */

      0x1100,  /* jongseong rieul-kiyeok  -> choseong kiyeok       */

      0x1106,  /* jongseong rieul-mieum   -> choseong mieum        */

      0x1107,  /* jongseong rieul-pieup   -> choseong pieup        */

      0x1109,  /* jongseong rieul-sios    -> choseong sios         */

      0x1110,  /* jongseong rieul-thieuth -> choseong thieuth      */

      0x1111,  /* jongseong rieul-phieuph -> choseong phieuph      */

      0x1112,  /* jongseong rieul-hieuh   -> choseong hieuh        */

      0x1106,  /* jongseong mieum         -> choseong mieum        */

      0x1107,  /* jongseong pieup         -> choseong pieup        */

      0x1109,  /* jongseong pieup-sios    -> choseong sios         */

      0x1109,  /* jongseong sios          -> choseong sios         */

      0x110a,  /* jongseong ssangsios     -> choseong ssangsios    */

      0x110b,  /* jongseong ieung         -> choseong ieung        */

      0x110c,  /* jongseong cieuc         -> choseong cieuc        */

      0x110e,  /* jongseong chieuch       -> choseong chieuch      */

      0x110f,  /* jongseong khieukh       -> choseong khieukh      */

      0x1110,  /* jongseong thieuth       -> choseong thieuth      */

      0x1111,  /* jongseong phieuph       -> choseong phieuph      */

      0x1112   /* jongseong hieuh         -> choseong hieuh        */

    };

    if (c < 0x11a8 || c > 0x11c2)

	return 0;

    return table[c - 0x11a8];

}

void

hangul_jongseong_dicompose(ucschar c, ucschar* jong, ucschar* cho)

{

    static 

#ifdef __SYMBIAN32__

    const 

#endif

    ucschar table[][2] = {

    { 0,      0x1100 }, /* jong kiyeok	      = cho  kiyeok               */

    { 0x11a8, 0x1100 }, /* jong ssangkiyeok   = jong kiyeok + cho kiyeok  */

    { 0x11a8, 0x1109 }, /* jong kiyeok-sios   = jong kiyeok + cho sios    */

    { 0,      0x1102 }, /* jong nieun	      = cho  nieun                */

    { 0x11ab, 0x110c }, /* jong nieun-cieuc   = jong nieun  + cho cieuc   */

    { 0x11ab, 0x1112 }, /* jong nieun-hieuh   = jong nieun  + cho hieuh   */

    { 0,      0x1103 }, /* jong tikeut	      = cho  tikeut               */

    { 0,      0x1105 }, /* jong rieul         = cho  rieul                */

    { 0x11af, 0x1100 }, /* jong rieul-kiyeok  = jong rieul  + cho kiyeok  */

    { 0x11af, 0x1106 }, /* jong rieul-mieum   = jong rieul  + cho mieum   */

    { 0x11af, 0x1107 }, /* jong rieul-pieup   = jong rieul  + cho pieup   */

    { 0x11af, 0x1109 }, /* jong rieul-sios    = jong rieul  + cho sios    */

    { 0x11af, 0x1110 }, /* jong rieul-thieuth = jong rieul  + cho thieuth */

    { 0x11af, 0x1111 }, /* jong rieul-phieuph = jong rieul  + cho phieuph */

    { 0x11af, 0x1112 }, /* jong rieul-hieuh   = jong rieul  + cho hieuh   */

    { 0,      0x1106 }, /* jong mieum         = cho  mieum                */

    { 0,      0x1107 }, /* jong pieup         = cho  pieup                */

    { 0x11b8, 0x1109 }, /* jong pieup-sios    = jong pieup  + cho sios    */

    { 0,      0x1109 }, /* jong sios          = cho  sios                 */

    { 0x11ba, 0x1109 }, /* jong ssangsios     = jong sios   + cho sios    */

    { 0,      0x110b }, /* jong ieung         = cho  ieung                */

    { 0,      0x110c }, /* jong cieuc         = cho  cieuc                */

    { 0,      0x110e }, /* jong chieuch       = cho  chieuch              */

    { 0,      0x110f }, /* jong khieukh       = cho  khieukh              */

    { 0,      0x1110 }, /* jong thieuth       = cho  thieuth              */

    { 0,      0x1111 }, /* jong phieuph       = cho  phieuph              */

    { 0,      0x1112 }  /* jong hieuh         = cho  hieuh                */

    };

    *jong = table[c - 0x11a8][0];

    *cho  = table[c - 0x11a8][1];

}

/**

 * @brief compose a hangul syllable

 * @param choseong UCS4 code value

 * @param jungseong UCS4 code value

 * @param jongseong UCS4 code value

 * @return syllable code compose from choseong, jungseong and jongseong

 *

 * This function compose hangul jaso choseong, jungseong and jongseong and

 * return the syllable code.

 */

ucschar

hangul_jaso_to_syllable(ucschar choseong, ucschar jungseong, ucschar jongseong)

{

    ucschar c;

    /* we use 0x11a7 like a Jongseong filler */

    if (jongseong == 0)

	jongseong = 0x11a7;         /* Jongseong filler */

    if (!hangul_is_choseong_conjoinable(choseong))

	return 0;

    if (!hangul_is_jungseong_conjoinable(jungseong))

	return 0;

    if (!hangul_is_jongseong_conjoinable(jongseong))

	return 0;

    choseong  -= choseong_base;

    jungseong -= jungseong_base;

    jongseong -= jongseong_base;

    c = ((choseong * njungseong) + jungseong) * njongseong + jongseong

	+ syllable_base;

    return c;

}

void

hangul_syllable_to_jaso(ucschar syllable,

			ucschar* choseong,

			ucschar* jungseong,

			ucschar* jongseong)

{

    if (jongseong != NULL)

	*jongseong = 0;

    if (jungseong != NULL)

	*jungseong = 0;

    if (choseong != NULL)

	*choseong = 0;

    if (!hangul_is_syllable(syllable))

	return;

    syllable -= syllable_base;

    if (jongseong != NULL) {

	if (syllable % njongseong != 0)

	    *jongseong = jongseong_base + syllable % njongseong;

    }

    syllable /= njongseong;

    if (jungseong != NULL) {

	*jungseong = jungseong_base + syllable % njungseong;

    }

    syllable /= njungseong;

    if (choseong != NULL) {

	*choseong = choseong_base + syllable;

    }

}

static

#ifndef __SYMBIAN32__

inline

#endif

bool 

is_syllable_boundary(ucschar prev, ucschar next)

{

    if (hangul_is_choseong(prev)) {

	if (hangul_is_choseong(next))

	    return false;

	if (hangul_is_jungseong(next))

	    return false;

	if (hangul_is_syllable(next))

	    return false;

	if (hangul_is_combining_mark(next))

	    return false;

	if (next == HANGUL_JUNGSEONG_FILLER)

	    return false;

    } else if (prev == HANGUL_CHOSEONG_FILLER) {

	if (hangul_is_jungseong(next))

	    return false;

	if (next == HANGUL_JUNGSEONG_FILLER)

	    return false;

    } else if (hangul_is_jungseong(prev)) {

	if (hangul_is_jungseong(next))

	    return false;

	if (hangul_is_jongseong(next))

	    return false;

	if (hangul_is_combining_mark(next))

	    return false;

    } else if (prev == HANGUL_JUNGSEONG_FILLER) {

	if (hangul_is_jongseong(next))

	    return false;

    } else if (hangul_is_jongseong(prev)) {

	if (hangul_is_jongseong(next))

	    return false;

	if (hangul_is_combining_mark(next))

	    return false;

    } else if (hangul_is_syllable(prev)) {

	if ((prev - syllable_base) % njongseong == 0) {

	    // 醫낆꽦�씠 �뾾�뒗 �쓬�젅: LV

	    if (hangul_is_jungseong(next))

		return false;

	    if (hangul_is_jongseong(next))

		return false;

	} else {

	    // 醫낆꽦�씠 �엳�뒗 �쓬�젅: LVT

	    if (hangul_is_jongseong(next))

		return false;

	}

	if (hangul_is_combining_mark(next))

	    return false;

    }

    return true;

}

static 

#ifndef __SYMBIAN32__

inline 

#endif

ucschar

choseong_compress(ucschar a, ucschar b)

{

    if (a == 0)

	return b;

    if (a == 0x1100 && b == 0x1100)

	return 0x1101;

    if (a == 0x1103 && b == 0x1103)

	return 0x1104;

    if (a == 0x1107 && b == 0x1107)

	return 0x1108;

    if (a == 0x1109 && b == 0x1109)

	return 0x110A;

    if (a == 0x110c && b == 0x110c)

	return 0x110d;

    return 0;

}

static 

#ifndef __SYMBIAN32__

inline 

#endif

ucschar