컴퓨터이야기/C
한글코드변환
백구씨쥔장
2006. 2. 8. 14:52
출처를 밝히고 싶은데, 어디서 났는지 모르겠습니다 -_-;;
제가 지금 사용하는 것도 이거 조금 고쳐서 쓰구 있습니다.
원 제작자분께 너무 감사드립니다.
혹시라도 여기 올린게 문제가 된다면 바로 내리겠습니다.
제가 지금 사용하는 것도 이거 조금 고쳐서 쓰구 있습니다.
원 제작자분께 너무 감사드립니다.
혹시라도 여기 올린게 문제가 된다면 바로 내리겠습니다.
#ifndef WJ_HAN_CODE_H
#define WJ_HAN_CODE_H 1
#define TG 1 /* 상용 조합형 (삼보 KSSM, 큐닉스, IBM, 쌍용, 현대) */
#define KS 6 /* KS 완성형 (KS C 5601-1987 완성형 표준 코드) */
#define TRI 10 /* 3바이트 코드 TG의 확장 */
extern unsigned char *coco_str(int src, int des, unsigned char *str, unsigned char * out);
extern char tojong(char c);
extern char tocho(char c);
extern char tosph(char c);
extern unsigned char tonorm(unsigned char c);
#define TRI_Co (unsigned char)(0x80)
#define TRI_Jung (unsigned char)(0xa0)
#define TRI_Jong (unsigned char)(0xc0)
#define TRI_Sph (unsigned char)(0x98)
#define FILL_Co (unsigned char)(0x01)
#define FILL_Jung (unsigned char)(0x02)
#define FILL_Jong (unsigned char)(0x01)
#define is_tri_co(c) (((c) & 0xe0) == TRI_Co)
#define is_tri_jung(c) (((c) & 0xe0) == TRI_Jung)
#define is_tri_jong(c) (((c) & 0xe0) == TRI_Jong)
#define is_tri_riul_jong(c) (((c) & 0xe0) == TRI_Jong && ((c) & 0x1f) == 0x09)
#define is_tri_sph(c) (((c) & 0xf8) == TRI_Sph || (c)==(unsigned char)0x97)
#endif /* WJ_HAN_CODE_H */
#define WJ_HAN_CODE_H 1
#define TG 1 /* 상용 조합형 (삼보 KSSM, 큐닉스, IBM, 쌍용, 현대) */
#define KS 6 /* KS 완성형 (KS C 5601-1987 완성형 표준 코드) */
#define TRI 10 /* 3바이트 코드 TG의 확장 */
extern unsigned char *coco_str(int src, int des, unsigned char *str, unsigned char * out);
extern char tojong(char c);
extern char tocho(char c);
extern char tosph(char c);
extern unsigned char tonorm(unsigned char c);
#define TRI_Co (unsigned char)(0x80)
#define TRI_Jung (unsigned char)(0xa0)
#define TRI_Jong (unsigned char)(0xc0)
#define TRI_Sph (unsigned char)(0x98)
#define FILL_Co (unsigned char)(0x01)
#define FILL_Jung (unsigned char)(0x02)
#define FILL_Jong (unsigned char)(0x01)
#define is_tri_co(c) (((c) & 0xe0) == TRI_Co)
#define is_tri_jung(c) (((c) & 0xe0) == TRI_Jung)
#define is_tri_jong(c) (((c) & 0xe0) == TRI_Jong)
#define is_tri_riul_jong(c) (((c) & 0xe0) == TRI_Jong && ((c) & 0x1f) == 0x09)
#define is_tri_sph(c) (((c) & 0xf8) == TRI_Sph || (c)==(unsigned char)0x97)
#endif /* WJ_HAN_CODE_H */
#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include "wjhcode.h"
#define MAXLINE 10240
typedef union {
struct {
#ifdef _ix86
unsigned short t : 5; /* 종성 */
unsigned short s : 5; /* 중성 */
unsigned short f : 5; /* 초성 */
unsigned short i : 1; /* 한/영 구분 */
#else
unsigned short i : 1; /* 한/영 구분 */
unsigned short f : 5; /* 초성 */
unsigned short s : 5; /* 중성 */
unsigned short t : 5; /* 종성 */
#endif
} hancode;
unsigned short shortcode;
struct {
#ifdef _ix86
unsigned char code2;
unsigned char code1;
#else
unsigned char code1;
unsigned char code2;
#endif
} charcode;
} HANCODE;
#define f(hc) ((hc).hancode.f)
#define s(hc) ((hc).hancode.s)
#define t(hc) ((hc).hancode.t)
#define code1(hc) ((hc).charcode.code1)
#define code2(hc) ((hc).charcode.code2)
#define code(hc) ((hc).shortcode)
/**************** 완성형 코드 테이블 ***************/
const unsigned short KStbl[2350] = { /* KS 완성형 2350자의 조합형 코드 */
0x8861,0x8862,0x8865,0x8868,0x8869,0x886a,0x886b,0x8871,
0x8873,0x8874,0x8875,0x8876,0x8877,0x8878,0x8879,0x887b,
0x887c,0x887d,0x8881,0x8882,0x8885,0x8889,0x8891,0x8893,
0x8895,0x8896,0x8897,0x88a1,0x88a2,0x88a5,0x88a9,0x88b5,
0x88b7,0x88c1,0x88c5,0x88c9,0x88e1,0x88e2,0x88e5,0x88e8,
0x88e9,0x88eb,0x88f1,0x88f3,0x88f5,0x88f6,0x88f7,0x88f8,
0x88fb,0x88fc,0x88fd,0x8941,0x8945,0x8949,0x8951,0x8953,
0x8955,0x8956,0x8957,0x8961,0x8962,0x8963,0x8965,0x8968,
0x8969,0x8971,0x8973,0x8975,0x8976,0x8977,0x897b,0x8981,
0x8985,0x8989,0x8993,0x8995,0x89a1,0x89a2,0x89a5,0x89a8,
0x89a9,0x89ab,0x89ad,0x89b0,0x89b1,0x89b3,0x89b5,0x89b7,
0x89b8,0x89c1,0x89c2,0x89c5,0x89c9,0x89cb,
0x89d1,0x89d3,0x89d5,0x89d7,0x89e1,0x89e5,0x89e9,0x89f1,
0x89f6,0x89f7,0x8a41,0x8a42,0x8a45,0x8a49,0x8a51,0x8a53,
0x8a55,0x8a57,0x8a61,0x8a65,0x8a69,0x8a73,0x8a75,0x8a81,
0x8a82,0x8a85,0x8a88,0x8a89,0x8a8a,0x8a8b,0x8a90,0x8a91,
0x8a93,0x8a95,0x8a97,0x8a98,0x8aa1,0x8aa2,0x8aa5,0x8aa9,
0x8ab6,0x8ab7,0x8ac1,0x8ad5,0x8ae1,0x8ae2,0x8ae5,0x8ae9,
0x8af1,0x8af3,0x8af5,0x8b41,0x8b45,0x8b49,0x8b61,0x8b62,
0x8b65,0x8b68,0x8b69,0x8b6a,0x8b71,0x8b73,0x8b75,0x8b77,
0x8b81,0x8ba1,0x8ba2,0x8ba5,0x8ba8,0x8ba9,0x8bab,0x8bb1,
0x8bb3,0x8bb5,0x8bb7,0x8bb8,0x8bbc,0x8c61,0x8c62,0x8c63,
0x8c65,0x8c69,0x8c6b,0x8c71,0x8c73,0x8c75,0x8c76,0x8c77,
0x8c7b,0x8c81,0x8c82,0x8c85,0x8c89,0x8c91,
0x8c93,0x8c95,0x8c96,0x8c97,0x8ca1,0x8ca2,0x8ca9,0x8ce1,
0x8ce2,0x8ce3,0x8ce5,0x8ce9,0x8cf1,0x8cf3,0x8cf5,0x8cf6,
0x8cf7,0x8d41,0x8d42,0x8d45,0x8d51,0x8d55,0x8d57,0x8d61,
0x8d65,0x8d69,0x8d75,0x8d76,0x8d7b,0x8d81,0x8da1,0x8da2,
0x8da5,0x8da7,0x8da9,0x8db1,0x8db3,0x8db5,0x8db7,0x8db8,
0x8db9,0x8dc1,0x8dc2,0x8dc9,0x8dd6,0x8dd7,0x8de1,0x8de2,
0x8df7,0x8e41,0x8e45,0x8e49,0x8e51,0x8e53,0x8e57,0x8e61,
0x8e81,0x8e82,0x8e85,0x8e89,0x8e90,0x8e91,0x8e93,0x8e95,
0x8e97,0x8e98,0x8ea1,0x8ea9,0x8eb6,0x8eb7,0x8ec1,0x8ec2,
0x8ec5,0x8ec9,0x8ed1,0x8ed3,0x8ed6,0x8ee1,0x8ee5,0x8ee9,
0x8ef1,0x8ef3,0x8f41,0x8f61,0x8f62,0x8f65,0x8f67,0x8f69,
0x8f6b,0x8f70,0x8f71,0x8f73,0x8f75,0x8f77,
0x8f7b,0x8fa1,0x8fa2,0x8fa5,0x8fa9,0x8fb1,0x8fb3,0x8fb5,
0x8fb7,0x9061,0x9062,0x9063,0x9065,0x9068,0x9069,0x906a,
0x906b,0x9071,0x9073,0x9075,0x9076,0x9077,0x9078,0x9079,
0x907b,0x907d,0x9081,0x9082,0x9085,0x9089,0x9091,0x9093,
0x9095,0x9096,0x9097,0x90a1,0x90a2,0x90a5,0x90a9,0x90b1,
0x90b7,0x90e1,0x90e2,0x90e4,0x90e5,0x90e9,0x90eb,0x90ec,
0x90f1,0x90f3,0x90f5,0x90f6,0x90f7,0x90fd,0x9141,0x9142,
0x9145,0x9149,0x9151,0x9153,0x9155,0x9156,0x9157,0x9161,
0x9162,0x9165,0x9169,0x9171,0x9173,0x9176,0x9177,0x917a,
0x9181,0x9185,0x91a1,0x91a2,0x91a5,0x91a9,0x91ab,0x91b1,
0x91b3,0x91b5,0x91b7,0x91bc,0x91bd,0x91c1,0x91c5,0x91c9,
0x91d6,0x9241,0x9245,0x9249,0x9251,0x9253,
0x9255,0x9261,0x9262,0x9265,0x9269,0x9273,0x9275,0x9277,
0x9281,0x9282,0x9285,0x9288,0x9289,0x9291,0x9293,0x9295,
0x9297,0x92a1,0x92b6,0x92c1,0x92e1,0x92e5,0x92e9,0x92f1,
0x92f3,0x9341,0x9342,0x9349,0x9351,0x9353,0x9357,0x9361,
0x9362,0x9365,0x9369,0x936a,0x936b,0x9371,0x9373,0x9375,
0x9377,0x9378,0x937c,0x9381,0x9385,0x9389,0x93a1,0x93a2,
0x93a5,0x93a9,0x93af,0x93b1,0x93b3,0x93b5,0x93b7,0x93bc,
0x9461,0x9462,0x9463,0x9465,0x9468,0x9469,0x946a,0x946b,
0x946c,0x9470,0x9471,0x9473,0x9475,0x9476,0x9477,0x9478,
0x9479,0x947d,0x9481,0x9482,0x9485,0x9489,0x9491,0x9493,
0x9495,0x9496,0x9497,0x94a1,0x94e1,0x94e2,0x94e3,0x94e5,
0x94e8,0x94e9,0x94eb,0x94ec,0x94f1,0x94f3,
0x94f5,0x94f7,0x94f9,0x94fc,0x9541,0x9542,0x9545,0x9549,
0x9551,0x9553,0x9555,0x9556,0x9557,0x9561,0x9565,0x9569,
0x9576,0x9577,0x9581,0x9585,0x95a1,0x95a2,0x95a5,0x95a8,
0x95a9,0x95ab,0x95ad,0x95b1,0x95b3,0x95b5,0x95b7,0x95b9,
0x95bb,0x95c1,0x95c5,0x95c9,0x95e1,0x95f6,0x9641,0x9645,
0x9649,0x9651,0x9653,0x9655,0x9661,0x9681,0x9682,0x9685,
0x9689,0x9691,0x9693,0x9695,0x9697,0x96a1,0x96b6,0x96c1,
0x96d7,0x96e1,0x96e5,0x96e9,0x96f3,0x96f5,0x96f7,0x9741,
0x9745,0x9749,0x9751,0x9757,0x9761,0x9762,0x9765,0x9768,
0x9769,0x976b,0x9771,0x9773,0x9775,0x9777,0x9781,0x97a1,
0x97a2,0x97a5,0x97a8,0x97a9,0x97b1,0x97b3,0x97b5,0x97b6,
0x97b7,0x97b8,0x9861,0x9862,0x9865,0x9869,
0x9871,0x9873,0x9875,0x9876,0x9877,0x987d,0x9881,0x9882,
0x9885,0x9889,0x9891,0x9893,0x9895,0x9896,0x9897,0x98e1,
0x98e2,0x98e5,0x98e9,0x98eb,0x98ec,0x98f1,0x98f3,0x98f5,
0x98f6,0x98f7,0x98fd,0x9941,0x9942,0x9945,0x9949,0x9951,
0x9953,0x9955,0x9956,0x9957,0x9961,0x9976,0x99a1,0x99a2,
0x99a5,0x99a9,0x99b7,0x99c1,0x99c9,0x99e1,0x9a41,0x9a45,
0x9a81,0x9a82,0x9a85,0x9a89,0x9a90,0x9a91,0x9a97,0x9ac1,
0x9ae1,0x9ae5,0x9ae9,0x9af1,0x9af3,0x9af7,0x9b61,0x9b62,
0x9b65,0x9b68,0x9b69,0x9b71,0x9b73,0x9b75,0x9b81,0x9b85,
0x9b89,0x9b91,0x9b93,0x9ba1,0x9ba5,0x9ba9,0x9bb1,0x9bb3,
0x9bb5,0x9bb7,0x9c61,0x9c62,0x9c65,0x9c69,0x9c71,0x9c73,
0x9c75,0x9c76,0x9c77,0x9c78,0x9c7c,0x9c7d,
0x9c81,0x9c82,0x9c85,0x9c89,0x9c91,0x9c93,0x9c95,0x9c96,
0x9c97,0x9ca1,0x9ca2,0x9ca5,0x9cb5,0x9cb7,0x9ce1,0x9ce2,
0x9ce5,0x9ce9,0x9cf1,0x9cf3,0x9cf5,0x9cf6,0x9cf7,0x9cfd,
0x9d41,0x9d42,0x9d45,0x9d49,0x9d51,0x9d53,0x9d55,0x9d57,
0x9d61,0x9d62,0x9d65,0x9d69,0x9d71,0x9d73,0x9d75,0x9d76,
0x9d77,0x9d81,0x9d85,0x9d93,0x9d95,0x9da1,0x9da2,0x9da5,
0x9da9,0x9db1,0x9db3,0x9db5,0x9db7,0x9dc1,0x9dc5,0x9dd7,
0x9df6,0x9e41,0x9e45,0x9e49,0x9e51,0x9e53,0x9e55,0x9e57,
0x9e61,0x9e65,0x9e69,0x9e73,0x9e75,0x9e77,0x9e81,0x9e82,
0x9e85,0x9e89,0x9e91,0x9e93,0x9e95,0x9e97,0x9ea1,0x9eb6,
0x9ec1,0x9ee1,0x9ee2,0x9ee5,0x9ee9,0x9ef1,0x9ef5,0x9ef7,
0x9f41,0x9f42,0x9f45,0x9f49,0x9f51,0x9f53,
0x9f55,0x9f57,0x9f61,0x9f62,0x9f65,0x9f69,0x9f71,0x9f73,
0x9f75,0x9f77,0x9f78,0x9f7b,0x9f7c,0x9fa1,0x9fa2,0x9fa5,
0x9fa9,0x9fb1,0x9fb3,0x9fb5,0x9fb7,0xa061,0xa062,0xa065,
0xa067,0xa068,0xa069,0xa06a,0xa06b,0xa071,0xa073,0xa075,
0xa077,0xa078,0xa07b,0xa07d,0xa081,0xa082,0xa085,0xa089,
0xa091,0xa093,0xa095,0xa096,0xa097,0xa098,0xa0a1,0xa0a2,
0xa0a9,0xa0b7,0xa0e1,0xa0e2,0xa0e5,0xa0e9,0xa0eb,0xa0f1,
0xa0f3,0xa0f5,0xa0f7,0xa0f8,0xa0fd,0xa141,0xa142,0xa145,
0xa149,0xa151,0xa153,0xa155,0xa156,0xa157,0xa161,0xa162,
0xa165,0xa169,0xa175,0xa176,0xa177,0xa179,0xa181,0xa1a1,
0xa1a2,0xa1a4,0xa1a5,0xa1a9,0xa1ab,0xa1b1,0xa1b3,0xa1b5,
0xa1b7,0xa1c1,0xa1c5,0xa1d6,0xa1d7,0xa241,
0xa245,0xa249,0xa253,0xa255,0xa257,0xa261,0xa265,0xa269,
0xa273,0xa275,0xa281,0xa282,0xa283,0xa285,0xa288,0xa289,
0xa28a,0xa28b,0xa291,0xa293,0xa295,0xa297,0xa29b,0xa29d,
0xa2a1,0xa2a5,0xa2a9,0xa2b3,0xa2b5,0xa2c1,0xa2e1,0xa2e5,
0xa2e9,0xa341,0xa345,0xa349,0xa351,0xa355,0xa361,0xa365,
0xa369,0xa371,0xa375,0xa3a1,0xa3a2,0xa3a5,0xa3a8,0xa3a9,
0xa3ab,0xa3b1,0xa3b3,0xa3b5,0xa3b6,0xa3b7,0xa3b9,0xa3bb,
0xa461,0xa462,0xa463,0xa464,0xa465,0xa468,0xa469,0xa46a,
0xa46b,0xa46c,0xa471,0xa473,0xa475,0xa477,0xa47b,0xa481,
0xa482,0xa485,0xa489,0xa491,0xa493,0xa495,0xa496,0xa497,
0xa49b,0xa4a1,0xa4a2,0xa4a5,0xa4b3,0xa4e1,0xa4e2,0xa4e5,
0xa4e8,0xa4e9,0xa4eb,0xa4f1,0xa4f3,0xa4f5,
0xa4f7,0xa4f8,0xa541,0xa542,0xa545,0xa548,0xa549,0xa551,
0xa553,0xa555,0xa556,0xa557,0xa561,0xa562,0xa565,0xa569,
0xa573,0xa575,0xa576,0xa577,0xa57b,0xa581,0xa585,0xa5a1,
0xa5a2,0xa5a3,0xa5a5,0xa5a9,0xa5b1,0xa5b3,0xa5b5,0xa5b7,
0xa5c1,0xa5c5,0xa5d6,0xa5e1,0xa5f6,0xa641,0xa642,0xa645,
0xa649,0xa651,0xa653,0xa661,0xa665,0xa681,0xa682,0xa685,
0xa688,0xa689,0xa68a,0xa68b,0xa691,0xa693,0xa695,0xa697,
0xa69b,0xa69c,0xa6a1,0xa6a9,0xa6b6,0xa6c1,0xa6e1,0xa6e2,
0xa6e5,0xa6e9,0xa6f7,0xa741,0xa745,0xa749,0xa751,0xa755,
0xa757,0xa761,0xa762,0xa765,0xa769,0xa771,0xa773,0xa775,
0xa7a1,0xa7a2,0xa7a5,0xa7a9,0xa7ab,0xa7b1,0xa7b3,0xa7b5,
0xa7b7,0xa7b8,0xa7b9,0xa861,0xa862,0xa865,
0xa869,0xa86b,0xa871,0xa873,0xa875,0xa876,0xa877,0xa87d,
0xa881,0xa882,0xa885,0xa889,0xa891,0xa893,0xa895,0xa896,
0xa897,0xa8a1,0xa8a2,0xa8b1,0xa8e1,0xa8e2,0xa8e5,0xa8e8,
0xa8e9,0xa8f1,0xa8f5,0xa8f6,0xa8f7,0xa941,0xa957,0xa961,
0xa962,0xa971,0xa973,0xa975,0xa976,0xa977,0xa9a1,0xa9a2,
0xa9a5,0xa9a9,0xa9b1,0xa9b3,0xa9b7,0xaa41,0xaa61,0xaa77,
0xaa81,0xaa82,0xaa85,0xaa89,0xaa91,0xaa95,0xaa97,0xab41,
0xab57,0xab61,0xab65,0xab69,0xab71,0xab73,0xaba1,0xaba2,
0xaba5,0xaba9,0xabb1,0xabb3,0xabb5,0xabb7,0xac61,0xac62,
0xac64,0xac65,0xac68,0xac69,0xac6a,0xac6b,0xac71,0xac73,
0xac75,0xac76,0xac77,0xac7b,0xac81,0xac82,0xac85,0xac89,
0xac91,0xac93,0xac95,0xac96,0xac97,0xaca1,
0xaca2,0xaca5,0xaca9,0xacb1,0xacb3,0xacb5,0xacb7,0xacc1,
0xacc5,0xacc9,0xacd1,0xacd7,0xace1,0xace2,0xace3,0xace4,
0xace5,0xace8,0xace9,0xaceb,0xacec,0xacf1,0xacf3,0xacf5,
0xacf6,0xacf7,0xacfc,0xad41,0xad42,0xad45,0xad49,0xad51,
0xad53,0xad55,0xad56,0xad57,0xad61,0xad62,0xad65,0xad69,
0xad71,0xad73,0xad75,0xad76,0xad77,0xad81,0xad85,0xad89,
0xad97,0xada1,0xada2,0xada3,0xada5,0xada9,0xadab,0xadb1,
0xadb3,0xadb5,0xadb7,0xadbb,0xadc1,0xadc2,0xadc5,0xadc9,
0xadd7,0xade1,0xade5,0xade9,0xadf1,0xadf5,0xadf6,0xae41,
0xae45,0xae49,0xae51,0xae53,0xae55,0xae61,0xae62,0xae65,
0xae69,0xae71,0xae73,0xae75,0xae77,0xae81,0xae82,0xae85,
0xae88,0xae89,0xae91,0xae93,0xae95,0xae97,
0xae99,0xae9b,0xae9c,0xaea1,0xaeb6,0xaec1,0xaec2,0xaec5,
0xaec9,0xaed1,0xaed7,0xaee1,0xaee2,0xaee5,0xaee9,0xaef1,
0xaef3,0xaef5,0xaef7,0xaf41,0xaf42,0xaf49,0xaf51,0xaf55,
0xaf57,0xaf61,0xaf62,0xaf65,0xaf69,0xaf6a,0xaf71,0xaf73,
0xaf75,0xaf77,0xafa1,0xafa2,0xafa5,0xafa8,0xafa9,0xafb0,
0xafb1,0xafb3,0xafb5,0xafb7,0xafbc,0xb061,0xb062,0xb064,
0xb065,0xb069,0xb071,0xb073,0xb076,0xb077,0xb07d,0xb081,
0xb082,0xb085,0xb089,0xb091,0xb093,0xb096,0xb097,0xb0b7,
0xb0e1,0xb0e2,0xb0e5,0xb0e9,0xb0eb,0xb0f1,0xb0f3,0xb0f6,
0xb0f7,0xb141,0xb145,0xb149,0xb157,0xb1a1,0xb1a2,0xb1a5,
0xb1a8,0xb1a9,0xb1ab,0xb1b1,0xb1b3,0xb1b7,0xb1c1,0xb1c2,
0xb1c5,0xb1d6,0xb1e1,0xb1f6,0xb241,0xb245,
0xb249,0xb251,0xb253,0xb261,0xb281,0xb282,0xb285,0xb289,
0xb291,0xb293,0xb297,0xb2a1,0xb2b6,0xb2c1,0xb2e1,0xb2e5,
0xb357,0xb361,0xb362,0xb365,0xb369,0xb36b,0xb370,0xb371,
0xb373,0xb381,0xb385,0xb389,0xb391,0xb3a1,0xb3a2,0xb3a5,
0xb3a9,0xb3b1,0xb3b3,0xb3b5,0xb3b7,0xb461,0xb462,0xb465,
0xb466,0xb467,0xb469,0xb46a,0xb46b,0xb470,0xb471,0xb473,
0xb475,0xb476,0xb477,0xb47b,0xb47c,0xb481,0xb482,0xb485,
0xb489,0xb491,0xb493,0xb495,0xb496,0xb497,0xb4a1,0xb4a2,
0xb4a5,0xb4a9,0xb4ac,0xb4b1,0xb4b3,0xb4b5,0xb4b7,0xb4bb,
0xb4bd,0xb4c1,0xb4c5,0xb4c9,0xb4d3,0xb4e1,0xb4e2,0xb4e5,
0xb4e6,0xb4e8,0xb4e9,0xb4ea,0xb4eb,0xb4f1,0xb4f3,0xb4f4,
0xb4f5,0xb4f6,0xb4f7,0xb4f8,0xb4fa,0xb4fc,
0xb541,0xb542,0xb545,0xb549,0xb551,0xb553,0xb555,0xb557,
0xb561,0xb562,0xb563,0xb565,0xb569,0xb56b,0xb56c,0xb571,
0xb573,0xb574,0xb575,0xb576,0xb577,0xb57b,0xb57c,0xb57d,
0xb581,0xb585,0xb589,0xb591,0xb593,0xb595,0xb596,0xb5a1,
0xb5a2,0xb5a5,0xb5a9,0xb5aa,0xb5ab,0xb5ad,0xb5b0,0xb5b1,
0xb5b3,0xb5b5,0xb5b7,0xb5b9,0xb5c1,0xb5c2,0xb5c5,0xb5c9,
0xb5d1,0xb5d3,0xb5d5,0xb5d6,0xb5d7,0xb5e1,0xb5e2,0xb5e5,
0xb5f1,0xb5f5,0xb5f7,0xb641,0xb642,0xb645,0xb649,0xb651,
0xb653,0xb655,0xb657,0xb661,0xb662,0xb665,0xb669,0xb671,
0xb673,0xb675,0xb677,0xb681,0xb682,0xb685,0xb689,0xb68a,
0xb68b,0xb691,0xb693,0xb695,0xb697,0xb6a1,0xb6a2,0xb6a5,
0xb6a9,0xb6b1,0xb6b3,0xb6b6,0xb6b7,0xb6c1,
0xb6c2,0xb6c5,0xb6c9,0xb6d1,0xb6d3,0xb6d7,0xb6e1,0xb6e2,
0xb6e5,0xb6e9,0xb6f1,0xb6f3,0xb6f5,0xb6f7,0xb741,0xb742,
0xb745,0xb749,0xb751,0xb753,0xb755,0xb757,0xb759,0xb761,
0xb762,0xb765,0xb769,0xb76f,0xb771,0xb773,0xb775,0xb777,
0xb778,0xb779,0xb77a,0xb77b,0xb77c,0xb77d,0xb781,0xb785,
0xb789,0xb791,0xb795,0xb7a1,0xb7a2,0xb7a5,0xb7a9,0xb7aa,
0xb7ab,0xb7b0,0xb7b1,0xb7b3,0xb7b5,0xb7b6,0xb7b7,0xb7b8,
0xb7bc,0xb861,0xb862,0xb865,0xb867,0xb868,0xb869,0xb86b,
0xb871,0xb873,0xb875,0xb876,0xb877,0xb878,0xb881,0xb882,
0xb885,0xb889,0xb891,0xb893,0xb895,0xb896,0xb897,0xb8a1,
0xb8a2,0xb8a5,0xb8a7,0xb8a9,0xb8b1,0xb8b7,0xb8c1,0xb8c5,
0xb8c9,0xb8e1,0xb8e2,0xb8e5,0xb8e9,0xb8eb,
0xb8f1,0xb8f3,0xb8f5,0xb8f7,0xb8f8,0xb941,0xb942,0xb945,
0xb949,0xb951,0xb953,0xb955,0xb957,0xb961,0xb965,0xb969,
0xb971,0xb973,0xb976,0xb977,0xb981,0xb9a1,0xb9a2,0xb9a5,
0xb9a9,0xb9ab,0xb9b1,0xb9b3,0xb9b5,0xb9b7,0xb9b8,0xb9b9,
0xb9bd,0xb9c1,0xb9c2,0xb9c9,0xb9d3,0xb9d5,0xb9d7,0xb9e1,
0xb9f6,0xb9f7,0xba41,0xba45,0xba49,0xba51,0xba53,0xba55,
0xba57,0xba61,0xba62,0xba65,0xba77,0xba81,0xba82,0xba85,
0xba89,0xba8a,0xba8b,0xba91,0xba93,0xba95,0xba97,0xbaa1,
0xbab6,0xbac1,0xbae1,0xbae2,0xbae5,0xbae9,0xbaf1,0xbaf3,
0xbaf5,0xbb41,0xbb45,0xbb49,0xbb51,0xbb61,0xbb62,0xbb65,
0xbb69,0xbb71,0xbb73,0xbb75,0xbb77,0xbba1,0xbba2,0xbba5,
0xbba8,0xbba9,0xbbab,0xbbb1,0xbbb3,0xbbb5,
0xbbb7,0xbbb8,0xbbbb,0xbbbc,0xbc61,0xbc62,0xbc65,0xbc67,
0xbc69,0xbc6c,0xbc71,0xbc73,0xbc75,0xbc76,0xbc77,0xbc81,
0xbc82,0xbc85,0xbc89,0xbc91,0xbc93,0xbc95,0xbc96,0xbc97,
0xbca1,0xbca5,0xbcb7,0xbce1,0xbce2,0xbce5,0xbce9,0xbcf1,
0xbcf3,0xbcf5,0xbcf6,0xbcf7,0xbd41,0xbd57,0xbd61,0xbd76,
0xbda1,0xbda2,0xbda5,0xbda9,0xbdb1,0xbdb3,0xbdb5,0xbdb7,
0xbdb9,0xbdc1,0xbdc2,0xbdc9,0xbdd6,0xbde1,0xbdf6,0xbe41,
0xbe45,0xbe49,0xbe51,0xbe53,0xbe77,0xbe81,0xbe82,0xbe85,
0xbe89,0xbe91,0xbe93,0xbe97,0xbea1,0xbeb6,0xbeb7,0xbee1,
0xbf41,0xbf61,0xbf71,0xbf75,0xbf77,0xbfa1,0xbfa2,0xbfa5,
0xbfa9,0xbfb1,0xbfb3,0xbfb7,0xbfb8,0xbfbd,0xc061,0xc062,
0xc065,0xc067,0xc069,0xc071,0xc073,0xc075,
0xc076,0xc077,0xc078,0xc081,0xc082,0xc085,0xc089,0xc091,
0xc093,0xc095,0xc096,0xc097,0xc0a1,0xc0a5,0xc0a7,0xc0a9,
0xc0b1,0xc0b7,0xc0e1,0xc0e2,0xc0e5,0xc0e9,0xc0f1,0xc0f3,
0xc0f5,0xc0f6,0xc0f7,0xc141,0xc142,0xc145,0xc149,0xc151,
0xc153,0xc155,0xc157,0xc161,0xc165,0xc176,0xc181,0xc185,
0xc197,0xc1a1,0xc1a2,0xc1a5,0xc1a9,0xc1b1,0xc1b3,0xc1b5,
0xc1b7,0xc1c1,0xc1c5,0xc1c9,0xc1d7,0xc241,0xc245,0xc249,
0xc251,0xc253,0xc255,0xc257,0xc261,0xc271,0xc281,0xc282,
0xc285,0xc289,0xc291,0xc293,0xc295,0xc297,0xc2a1,0xc2b6,
0xc2c1,0xc2c5,0xc2e1,0xc2e5,0xc2e9,0xc2f1,0xc2f3,0xc2f5,
0xc2f7,0xc341,0xc345,0xc349,0xc351,0xc357,0xc361,0xc362,
0xc365,0xc369,0xc371,0xc373,0xc375,0xc377,
0xc3a1,0xc3a2,0xc3a5,0xc3a8,0xc3a9,0xc3aa,0xc3b1,0xc3b3,
0xc3b5,0xc3b7,0xc461,0xc462,0xc465,0xc469,0xc471,0xc473,
0xc475,0xc477,0xc481,0xc482,0xc485,0xc489,0xc491,0xc493,
0xc495,0xc496,0xc497,0xc4a1,0xc4a2,0xc4b7,0xc4e1,0xc4e2,
0xc4e5,0xc4e8,0xc4e9,0xc4f1,0xc4f3,0xc4f5,0xc4f6,0xc4f7,
0xc541,0xc542,0xc545,0xc549,0xc551,0xc553,0xc555,0xc557,
0xc561,0xc565,0xc569,0xc571,0xc573,0xc575,0xc576,0xc577,
0xc581,0xc5a1,0xc5a2,0xc5a5,0xc5a9,0xc5b1,0xc5b3,0xc5b5,
0xc5b7,0xc5c1,0xc5c2,0xc5c5,0xc5c9,0xc5d1,0xc5d7,0xc5e1,
0xc5f7,0xc641,0xc649,0xc661,0xc681,0xc682,0xc685,0xc689,
0xc691,0xc693,0xc695,0xc697,0xc6a1,0xc6a5,0xc6a9,0xc6b7,
0xc6c1,0xc6d7,0xc6e1,0xc6e2,0xc6e5,0xc6e9,
0xc6f1,0xc6f3,0xc6f5,0xc6f7,0xc741,0xc745,0xc749,0xc751,
0xc761,0xc762,0xc765,0xc769,0xc771,0xc773,0xc777,0xc7a1,
0xc7a2,0xc7a5,0xc7a9,0xc7b1,0xc7b3,0xc7b5,0xc7b7,0xc861,
0xc862,0xc865,0xc869,0xc86a,0xc871,0xc873,0xc875,0xc876,
0xc877,0xc881,0xc882,0xc885,0xc889,0xc891,0xc893,0xc895,
0xc896,0xc897,0xc8a1,0xc8b7,0xc8e1,0xc8e2,0xc8e5,0xc8e9,
0xc8eb,0xc8f1,0xc8f3,0xc8f5,0xc8f6,0xc8f7,0xc941,0xc942,
0xc945,0xc949,0xc951,0xc953,0xc955,0xc957,0xc961,0xc965,
0xc976,0xc981,0xc985,0xc9a1,0xc9a2,0xc9a5,0xc9a9,0xc9b1,
0xc9b3,0xc9b5,0xc9b7,0xc9bc,0xc9c1,0xc9c5,0xc9e1,0xca41,
0xca45,0xca55,0xca57,0xca61,0xca81,0xca82,0xca85,0xca89,
0xca91,0xca93,0xca95,0xca97,0xcaa1,0xcab6,
0xcac1,0xcae1,0xcae2,0xcae5,0xcae9,0xcaf1,0xcaf3,0xcaf7,
0xcb41,0xcb45,0xcb49,0xcb51,0xcb57,0xcb61,0xcb62,0xcb65,
0xcb68,0xcb69,0xcb6b,0xcb71,0xcb73,0xcb75,0xcb81,0xcb85,
0xcb89,0xcb91,0xcb93,0xcba1,0xcba2,0xcba5,0xcba9,0xcbb1,
0xcbb3,0xcbb5,0xcbb7,0xcc61,0xcc62,0xcc63,0xcc65,0xcc69,
0xcc6b,0xcc71,0xcc73,0xcc75,0xcc76,0xcc77,0xcc7b,0xcc81,
0xcc82,0xcc85,0xcc89,0xcc91,0xcc93,0xcc95,0xcc96,0xcc97,
0xcca1,0xcca2,0xcce1,0xcce2,0xcce5,0xcce9,0xccf1,0xccf3,
0xccf5,0xccf6,0xccf7,0xcd41,0xcd42,0xcd45,0xcd49,0xcd51,
0xcd53,0xcd55,0xcd57,0xcd61,0xcd65,0xcd69,0xcd71,0xcd73,
0xcd76,0xcd77,0xcd81,0xcd89,0xcd93,0xcd95,0xcda1,0xcda2,
0xcda5,0xcda9,0xcdb1,0xcdb3,0xcdb5,0xcdb7,
0xcdc1,0xcdd7,0xce41,0xce45,0xce61,0xce65,0xce69,0xce73,
0xce75,0xce81,0xce82,0xce85,0xce88,0xce89,0xce8b,0xce91,
0xce93,0xce95,0xce97,0xcea1,0xceb7,0xcee1,0xcee5,0xcee9,
0xcef1,0xcef5,0xcf41,0xcf45,0xcf49,0xcf51,0xcf55,0xcf57,
0xcf61,0xcf65,0xcf69,0xcf71,0xcf73,0xcf75,0xcfa1,0xcfa2,
0xcfa5,0xcfa9,0xcfb1,0xcfb3,0xcfb5,0xcfb7,0xd061,0xd062,
0xd065,0xd069,0xd06e,0xd071,0xd073,0xd075,0xd077,0xd081,
0xd082,0xd085,0xd089,0xd091,0xd093,0xd095,0xd096,0xd097,
0xd0a1,0xd0b7,0xd0e1,0xd0e2,0xd0e5,0xd0e9,0xd0eb,0xd0f1,
0xd0f3,0xd0f5,0xd0f7,0xd141,0xd142,0xd145,0xd149,0xd151,
0xd153,0xd155,0xd157,0xd161,0xd162,0xd165,0xd169,0xd171,
0xd173,0xd175,0xd176,0xd177,0xd181,0xd185,
0xd189,0xd193,0xd1a1,0xd1a2,0xd1a5,0xd1a9,0xd1ae,0xd1b1,
0xd1b3,0xd1b5,0xd1b7,0xd1bb,0xd1c1,0xd1c2,0xd1c5,0xd1c9,
0xd1d5,0xd1d7,0xd1e1,0xd1e2,0xd1e5,0xd1f5,0xd1f7,0xd241,
0xd242,0xd245,0xd249,0xd253,0xd255,0xd257,0xd261,0xd265,
0xd269,0xd273,0xd275,0xd281,0xd282,0xd285,0xd289,0xd28e,
0xd291,0xd295,0xd297,0xd2a1,0xd2a5,0xd2a9,0xd2b1,0xd2b7,
0xd2c1,0xd2c2,0xd2c5,0xd2c9,0xd2d7,0xd2e1,0xd2e2,0xd2e5,
0xd2e9,0xd2f1,0xd2f3,0xd2f5,0xd2f7,0xd341,0xd342,0xd345,
0xd349,0xd351,0xd355,0xd357,0xd361,0xd362,0xd365,0xd367,
0xd368,0xd369,0xd36a,0xd371,0xd373,0xd375,0xd377,0xd37b,
0xd381,0xd385,0xd389,0xd391,0xd393,0xd397,0xd3a1,0xd3a2,
0xd3a5,0xd3a9,0xd3b1,0xd3b3,0xd3b5,0xd3b7
};
#define SINGLENUM 51 /* 한글 낱자의 수 */
const unsigned short Single[SINGLENUM] = { /* 한글 낱자 51자의 조합형 코드 */
0x8841,0x8c41,0x8444,0x9041,0x8446,0x8447,0x9441,0x9841,
0x9c41,0x844a,0x844b,0x844c,0x844d,0x844e,0x844f,0x8450,
0xa041,0xa441,0xa841,0x8454,0xac41,0xb041,0xb441,0xb841,
0xbc41,0xc041,0xc441,0xc841,0xcc41,0xd041,0x8461,0x8481,
0x84a1,0x84c1,0x84e1,0x8541,0x8561,0x8581,0x85a1,0x85c1,
0x85e1,0x8641,0x8661,0x8681,0x86a1,0x86c1,0x86e1,0x8741,
0x8761,0x8781,0x87a1
};
void hancode_init3(HANCODE *hc, char first,char second, char third)
{
hc->hancode.i = 0x0001;
hc->hancode.f = (unsigned short)first;
hc->hancode.s = (unsigned short)second;
hc->hancode.t = (unsigned short)third;
}
void hancode_init2(HANCODE *hc, unsigned char first,unsigned char second)
{
hc->charcode.code1 = first;
hc->charcode.code2 = second;
}
void hancode_init1(HANCODE *hc, unsigned short code)
{
hc->shortcode = code;
}
int codecmp(unsigned short *p, unsigned short *q) /* local function */
{
return (*p - *q);
}
HANCODE TG2KS(HANCODE hc)
{
HANCODE tmpcode;
unsigned short index;
unsigned short *p;
p = (unsigned short *)bsearch(&hc.shortcode, KStbl,
sizeof(KStbl) / sizeof(unsigned short),
sizeof(unsigned short),
(int (*)(const void *, const void *))codecmp);
if(p != NULL) {
index = p - KStbl;
hancode_init2(&tmpcode, (unsigned char)(index / 94 + 0xb0),
(unsigned char )(index % 94 + 0xa1));
return tmpcode;
}
for (index = 0; index < SINGLENUM; index++)
{
if (Single[index] == hc.shortcode)
{
hancode_init1(&tmpcode, 0xa4a1 + index);
return tmpcode;
}
}
hancode_init1(&tmpcode,0);
return tmpcode;
}
HANCODE KS2TG(HANCODE hc)
{
HANCODE tmpcode;
int index;
unsigned short c1, c2;
c1 = code1(hc);
c2 = code2(hc);
if (c1 == 0xa4)
{
hancode_init1(&tmpcode,
(c2 >= 0xa1 && c2 <= 0xd3)? Single[c2 - 0xa1] : 0);
return tmpcode;
}
else if (c1 < 0xb0 || c1 > 0xc8 || c2 < 0xa1 || c2 > 0xfe)
{
hancode_init1(&tmpcode,0);
return tmpcode;
}
index = (code1(hc) - 0xb0) * 94 + code2(hc) - 0xa1;
hancode_init1(&tmpcode,KStbl[index]);
return tmpcode;
}
/*----------------------------------------------------------------------
ㄱ --> 1byte
가 --> 2byte
각 --> 3byte
----------------------------------------------------------------------*/
char * TG2TRI(HANCODE hc, char *out)
{
/*--------------------------------------------------
단독으로 사용된 자음은 모두 종성으로 만든다.
ㄴ다 같은 경우를 처리 하기 위하여
--------------------------------------------------*/
if(f(hc) != FILL_Co) /* 초성이 있는 경우 */
{
if(s(hc) == FILL_Jung) /* 다음 글자가 모음이 아니면 */
*out++=tojong(f(hc)+TRI_Co);
else /* 다음에 모음(중성)이 있는 경우 */
*out++ = f(hc) + TRI_Co;
}
if(s(hc) != FILL_Jung)
*out++ = s(hc) + TRI_Jung;
if(t(hc) != FILL_Jong)
*out++ = t(hc) + TRI_Jong;
*out=0;
return out;
}
unsigned char *tg2tri(unsigned char *str, unsigned char *out)
{
HANCODE t1;
unsigned char *head = out;
while(*str)
{
if(*str & 0x80) /* 이부분은 정확한 type check로 바꾸어야 */
{
code1(t1) = *str++;
code2(t1) = *str++;
out=TG2TRI(t1,out);
}
else
*out++ = *str++;
}
*out = 0;
return head;
}
unsigned char *tri2tg(unsigned char *str, unsigned char *out)
{
HANCODE t1;
unsigned char *head = out;
while(*str)
{
if(*str & 0x80 &&
(*str & TRI_Co || *str & TRI_Jung || *str & TRI_Jong))
{
hancode_init3(&t1,FILL_Co,FILL_Jung,FILL_Jong);
if(is_tri_sph(*str))
*out++=tonorm(*str++);
else
{
if((*str & 0xe0) == TRI_Jong)
f(t1) = 0x1f & (tocho(*str++));
else if((*str & 0xe0) == TRI_Jung)
s(t1) = 0x1f & *str++;
else
{
if((*str & 0xe0) == TRI_Co)
f(t1) = 0x1f & *str++;
if((*str & 0xe0) == TRI_Jung)
{
s(t1) = 0x1f & *str++;
if((*str & 0xe0) == TRI_Jong)
t(t1) = 0x1f & *str++;
}
}
*out++ = code1(t1);
*out++ = code2(t1);
}
}
else
*out++ = *str++;
}
*out = 0;
return head;
}
unsigned char *tri2ks(unsigned char *str, unsigned char *out)
{
HANCODE t1, t2, sc;
unsigned char *head = out;
while(*str)
{
if(*str & 0x80)
{
if(is_tri_co(*str) || is_tri_jung(*str) || is_tri_jong(*str))
{
hancode_init3(&t1,FILL_Co,FILL_Jung,FILL_Jong);
if((*str & 0xe0) == TRI_Jong)
f(t1) = 0x1f & (tocho(*str++));
else if((*str & 0xe0) == TRI_Jung)
s(t1) = 0x1f & *str++;
else
{
if((*str & 0xe0) == TRI_Co)
f(t1) = 0x1f & *str++;
if((*str & 0xe0) == TRI_Jung)
{
s(t1) = 0x1f & *str++;
if((*str & 0xe0) == TRI_Jong)
t(t1) = 0x1f & *str++;
}
}
t2=TG2KS(t1);
*out++ = code1(t2);
*out++ = code2(t2);
}
else if(is_tri_sph(*str))
{
/*
음운 변화 처리용 내부 코드
*/
*out++=tonorm(*str++);
}
else if((*str & 0xe0)==(unsigned char)0xe0)
{
sc.hancode.i = 0x0001;
f(sc) = *str++ & 0x1f;
s(sc) = *str++ & 0x1f;
t(sc) = *str++ & 0x1f;
*out++=code1(sc);
*out++=code2(sc);
}
else
*str++;
}
else
*out++=*str++;
}
*out = 0;
return head;
}
unsigned char *ks2tri(unsigned char *str, unsigned char *out)
{
int ishan=0;
unsigned char *head = out;
HANCODE t1, t2, sc;
unsigned char tmpstr[MAXLINE];
while (*str)
{
/*--------------------------------------------------
한글인지 검사
--------------------------------------------------*/
if ((0xb0 <= str[0] && str[0] <= 0xc8) &&
(0xa1 <= str[1] && str[1] <= 0xfe))
ishan=1;
/* 자소 한글, 고어를 포함하는 것
else if (str[0] == 0xa4 && (0xa1 <= str[1] && str[1] <= 0xfe))
*/
/* 고어를 제외한 것 */
else if (str[0] == 0xa4 && (0xa1 <= str[1] && str[1] <= 0xd3))
ishan=1;
else
ishan=0;
/*--------------------------------------------------
한글인 경우
--------------------------------------------------*/
if (ishan && *(str+1))
{
code1(t1) = *str++;
code2(t1) = *str++;
t2 = KS2TG(t1);
out=TG2TRI(t2,out);
}
/*--------------------------------------------------
일반 아스키
--------------------------------------------------*/
else if((*str & 0x80)==0)
*out++ = *str++;
/*--------------------------------------------------
2바이트짜리 특수 문자
--------------------------------------------------*/
else
{
/*--------------------
특수문자 -일부 무시
--------------------*/
if (0xa1 == str[0])
{
switch(str[1])
{
/* 、 */ case 0xa2: *out++ = '`'; break;
/* … */ case 0xa6: strcpy(out,"..."); out+=3;
break;
/* ‘ */ case 0xae: *out++ = '\''; break;
/* ’ */ case 0xaf: *out++ = '\''; break;
/* “ */ case 0xb0: *out++ = '"'; break;
/* ” */ case 0xb1: *out++ = '"'; break;
/* 「 */ case 0xb8: *out++ = '<'; break;
/* 」 */ case 0xb9: *out++ = '>'; break;
/* 『 */ case 0xba: *out++ = '"'; break;
/* 』 */ case 0xbb: *out++ = '"'; break;
/* 【 */ case 0xbc: *out++ = '['; break;
/* 】 */ case 0xbd: *out++ = ']'; break;
/* ′ */ case 0xc7: *out++ = '\''; break;
/* ″ */ case 0xc8: *out++ = '"'; break;
/* ℃ Å ￠ ￡ ￥ */
case 0xc9:
case 0xca:
case 0xcb:
case 0xcc:
case 0xcd:
code1(sc)=str[0];
code2(sc)=str[1];
*out++ = f(sc) + (unsigned char)0xe0;
*out++ = s(sc) + (unsigned char)0xe0;
*out++ = t(sc) + (unsigned char)0xe0;
break;
default : *out++=' ';
}
}
else if (0xa2 == str[0])
{
switch(str[1])
{
/* ´ */ case 0xa5: *out++ = '\''; break;
/* ℉ ‰ */ case 0xb5: case 0xb6 :
code1(sc)=str[0];
code2(sc)=str[1];
*out++ = f(sc) + (unsigned char)0xe0;
*out++ = s(sc) + (unsigned char)0xe0;
*out++ = t(sc) + (unsigned char)0xe0;
break;
/* ㉿ ㈜ № ㏇ ™ ㏂ ㏘ ℡ */
case 0xde : strcpy(out,"(KS)"); out+=4; break;
case 0xdf :
*out++='(';
*out++=14+TRI_Co; /* 주 */
*out++=20+TRI_Jung;
*out++=')';
break;
case 0xe0 : strcpy(out,"No."); out+=3; break;
case 0xe1 : strcpy(out,"Co."); out+=3; break;
case 0xe2 : strcpy(out,"TM."); out+=3; break;
case 0xe3 : strcpy(out,"am."); out+=3; break;
case 0xe4 : strcpy(out,"pm."); out+=3; break;
case 0xe5 : strcpy(out,"Tel."); out+=4; break;
default : *out++=' ';
}
}
/*--------------------
2byte 영문자
--------------------*/
else if (0xa3 == str[0])
{
if(0xa1 <= str[1] && str[1] <= 0xfe)
*out++=str[1]-0x80;
else
*out++=' ';
}
/*--------------------
단위 기호
--------------------*/
else if ((0xa7 == str[0]) &&
(0xa1 <= str[1] && str[1] <= 0xef))
{
code1(sc)=str[0];
code2(sc)=str[1];
*out++ = f(sc) + (unsigned char)0xe0;
*out++ = s(sc) + (unsigned char)0xe0;
*out++ = t(sc) + (unsigned char)0xe0;
}
/*--------------------------------------------------
한자 --
--------------------------------------------------*/
else if ((0xca <= str[0] && 0xfd >= str[0]) &&
(0xa1 <= str[1] && str[1] <= 0xfe))
{
code1(sc)=str[0];
code2(sc)=str[1];
*out++ = f(sc) + (unsigned char)0xe0;
*out++ = s(sc) + (unsigned char)0xe0;
*out++ = t(sc) + (unsigned char)0xe0;
}
else
*out++=' ';
str+=2;
}
}
*out = 0;
return head;
}
unsigned char *ks2tg(unsigned char *str, unsigned char *out)
{
int ishan=0;
unsigned char *head = out;
HANCODE t1, t2;
while (*str)
{
if ((0xb0 <= str[0] && str[0] <= 0xc8) &&
(0xa1 <= str[1] && str[1] <= 0xfe))
ishan=1;
else if (str[0] == 0xa4 && (0xa1 <= str[1] && str[1] <= 0xd3))
ishan=1;
else
ishan=0;
if (ishan && *(str+1))
{
code1(t1) = *str++;
code2(t1) = *str++;
t2 = KS2TG(t1);
*out++ = code1(t2);
*out++ = code2(t2);
}
else if(*str & 0x80)
str+=2;
else
*out++ = *str++;
}
*out = 0;
return head;
}
unsigned char *tg2ks(unsigned char *str, unsigned char *out)
{
int ishan=0;
unsigned char *head = out;
HANCODE t1, t2;
while (*str)
{
/* 한글인가 체크 */
ishan = *str & 0x80;
if (ishan && *(str+1))
{
code1(t1) = *str++;
code2(t1) = *str++;
t2 = TG2KS(t1);
if(code(t2) != 0)
{
*out++ = code1(t2);
*out++ = code2(t2);
}
}
else
*out++ = *str++;
}
*out = 0;
return head;
}
unsigned char * coco_str(int src, int des, unsigned char *str, unsigned char *out)
{
unsigned char tmpstr[MAXLINE];
if(src == des)
return (unsigned char *)strcpy(out,str);
else if(src == TRI)
{
if(des == TG)
return tri2tg(str,out);
else if(des == KS)
return tri2ks(str,out);
}
else if(src == TG)
{
if(des == TRI)
return tg2tri(str,out);
else if(des == KS)
return tg2ks(str,out);
}
else if(src == KS)
{
if(des == TRI)
return ks2tri(str,out);
else if(des == TG)
return ks2tg(str,out);
}
}
char jong_co[] = {
0,1,2,3,0,4,0,0,5,7,0,0,0,0,0,0,0,8,0,9,0,11,12,13,14,16,17,18,19,20,0,0
};
char co_jong[] = {
0,1,2,3,5,8,0,9,17,19,0,21,22,23,24,0,25,26,27,28,29,0,0,0,0,0,0,0,0,0,0,0
};
char tocho(char c)
{
if((c & TRI_Jong) && jong_co[c&0x1f])
return jong_co[c&0x1f] + TRI_Co;
else
return c;
}
char tojong(char c)
{
if((c & TRI_Co) && co_jong[c&0x1f])
return co_jong[c&0x1f] + TRI_Jong;
else
return c;
}
char tosph(char c)
{
switch(c)
{
case '0' : return 0x80+23;
case 'A' : return 0x80+24;
case 'I' : return 0x80+25;
case 'U' : return 0x80+26;
case 'S' : return 0x80+27;
case 'w' : return 0x80+28;
case 'l' : return 0x80+29;
case 'h' : return 0x80+30;
case 's' : return 0x80+31;default: return c;
}
}
unsigned char tonorm(unsigned char c)
{
switch(c)
{
case 0x98 : return 'A';
case 0x99 : return 'I';
case 0x9a : return 'U';
case 0x9b : return 'S';
case 0x9c : return 'w';
case 0x9d : return 'l';
case 0x9e : return 'h';
case 0x9f : return 's';
default: return c;
}
}
#include <stdlib.h>
#include <ctype.h>
#include "wjhcode.h"
#define MAXLINE 10240
typedef union {
struct {
#ifdef _ix86
unsigned short t : 5; /* 종성 */
unsigned short s : 5; /* 중성 */
unsigned short f : 5; /* 초성 */
unsigned short i : 1; /* 한/영 구분 */
#else
unsigned short i : 1; /* 한/영 구분 */
unsigned short f : 5; /* 초성 */
unsigned short s : 5; /* 중성 */
unsigned short t : 5; /* 종성 */
#endif
} hancode;
unsigned short shortcode;
struct {
#ifdef _ix86
unsigned char code2;
unsigned char code1;
#else
unsigned char code1;
unsigned char code2;
#endif
} charcode;
} HANCODE;
#define f(hc) ((hc).hancode.f)
#define s(hc) ((hc).hancode.s)
#define t(hc) ((hc).hancode.t)
#define code1(hc) ((hc).charcode.code1)
#define code2(hc) ((hc).charcode.code2)
#define code(hc) ((hc).shortcode)
/**************** 완성형 코드 테이블 ***************/
const unsigned short KStbl[2350] = { /* KS 완성형 2350자의 조합형 코드 */
0x8861,0x8862,0x8865,0x8868,0x8869,0x886a,0x886b,0x8871,
0x8873,0x8874,0x8875,0x8876,0x8877,0x8878,0x8879,0x887b,
0x887c,0x887d,0x8881,0x8882,0x8885,0x8889,0x8891,0x8893,
0x8895,0x8896,0x8897,0x88a1,0x88a2,0x88a5,0x88a9,0x88b5,
0x88b7,0x88c1,0x88c5,0x88c9,0x88e1,0x88e2,0x88e5,0x88e8,
0x88e9,0x88eb,0x88f1,0x88f3,0x88f5,0x88f6,0x88f7,0x88f8,
0x88fb,0x88fc,0x88fd,0x8941,0x8945,0x8949,0x8951,0x8953,
0x8955,0x8956,0x8957,0x8961,0x8962,0x8963,0x8965,0x8968,
0x8969,0x8971,0x8973,0x8975,0x8976,0x8977,0x897b,0x8981,
0x8985,0x8989,0x8993,0x8995,0x89a1,0x89a2,0x89a5,0x89a8,
0x89a9,0x89ab,0x89ad,0x89b0,0x89b1,0x89b3,0x89b5,0x89b7,
0x89b8,0x89c1,0x89c2,0x89c5,0x89c9,0x89cb,
0x89d1,0x89d3,0x89d5,0x89d7,0x89e1,0x89e5,0x89e9,0x89f1,
0x89f6,0x89f7,0x8a41,0x8a42,0x8a45,0x8a49,0x8a51,0x8a53,
0x8a55,0x8a57,0x8a61,0x8a65,0x8a69,0x8a73,0x8a75,0x8a81,
0x8a82,0x8a85,0x8a88,0x8a89,0x8a8a,0x8a8b,0x8a90,0x8a91,
0x8a93,0x8a95,0x8a97,0x8a98,0x8aa1,0x8aa2,0x8aa5,0x8aa9,
0x8ab6,0x8ab7,0x8ac1,0x8ad5,0x8ae1,0x8ae2,0x8ae5,0x8ae9,
0x8af1,0x8af3,0x8af5,0x8b41,0x8b45,0x8b49,0x8b61,0x8b62,
0x8b65,0x8b68,0x8b69,0x8b6a,0x8b71,0x8b73,0x8b75,0x8b77,
0x8b81,0x8ba1,0x8ba2,0x8ba5,0x8ba8,0x8ba9,0x8bab,0x8bb1,
0x8bb3,0x8bb5,0x8bb7,0x8bb8,0x8bbc,0x8c61,0x8c62,0x8c63,
0x8c65,0x8c69,0x8c6b,0x8c71,0x8c73,0x8c75,0x8c76,0x8c77,
0x8c7b,0x8c81,0x8c82,0x8c85,0x8c89,0x8c91,
0x8c93,0x8c95,0x8c96,0x8c97,0x8ca1,0x8ca2,0x8ca9,0x8ce1,
0x8ce2,0x8ce3,0x8ce5,0x8ce9,0x8cf1,0x8cf3,0x8cf5,0x8cf6,
0x8cf7,0x8d41,0x8d42,0x8d45,0x8d51,0x8d55,0x8d57,0x8d61,
0x8d65,0x8d69,0x8d75,0x8d76,0x8d7b,0x8d81,0x8da1,0x8da2,
0x8da5,0x8da7,0x8da9,0x8db1,0x8db3,0x8db5,0x8db7,0x8db8,
0x8db9,0x8dc1,0x8dc2,0x8dc9,0x8dd6,0x8dd7,0x8de1,0x8de2,
0x8df7,0x8e41,0x8e45,0x8e49,0x8e51,0x8e53,0x8e57,0x8e61,
0x8e81,0x8e82,0x8e85,0x8e89,0x8e90,0x8e91,0x8e93,0x8e95,
0x8e97,0x8e98,0x8ea1,0x8ea9,0x8eb6,0x8eb7,0x8ec1,0x8ec2,
0x8ec5,0x8ec9,0x8ed1,0x8ed3,0x8ed6,0x8ee1,0x8ee5,0x8ee9,
0x8ef1,0x8ef3,0x8f41,0x8f61,0x8f62,0x8f65,0x8f67,0x8f69,
0x8f6b,0x8f70,0x8f71,0x8f73,0x8f75,0x8f77,
0x8f7b,0x8fa1,0x8fa2,0x8fa5,0x8fa9,0x8fb1,0x8fb3,0x8fb5,
0x8fb7,0x9061,0x9062,0x9063,0x9065,0x9068,0x9069,0x906a,
0x906b,0x9071,0x9073,0x9075,0x9076,0x9077,0x9078,0x9079,
0x907b,0x907d,0x9081,0x9082,0x9085,0x9089,0x9091,0x9093,
0x9095,0x9096,0x9097,0x90a1,0x90a2,0x90a5,0x90a9,0x90b1,
0x90b7,0x90e1,0x90e2,0x90e4,0x90e5,0x90e9,0x90eb,0x90ec,
0x90f1,0x90f3,0x90f5,0x90f6,0x90f7,0x90fd,0x9141,0x9142,
0x9145,0x9149,0x9151,0x9153,0x9155,0x9156,0x9157,0x9161,
0x9162,0x9165,0x9169,0x9171,0x9173,0x9176,0x9177,0x917a,
0x9181,0x9185,0x91a1,0x91a2,0x91a5,0x91a9,0x91ab,0x91b1,
0x91b3,0x91b5,0x91b7,0x91bc,0x91bd,0x91c1,0x91c5,0x91c9,
0x91d6,0x9241,0x9245,0x9249,0x9251,0x9253,
0x9255,0x9261,0x9262,0x9265,0x9269,0x9273,0x9275,0x9277,
0x9281,0x9282,0x9285,0x9288,0x9289,0x9291,0x9293,0x9295,
0x9297,0x92a1,0x92b6,0x92c1,0x92e1,0x92e5,0x92e9,0x92f1,
0x92f3,0x9341,0x9342,0x9349,0x9351,0x9353,0x9357,0x9361,
0x9362,0x9365,0x9369,0x936a,0x936b,0x9371,0x9373,0x9375,
0x9377,0x9378,0x937c,0x9381,0x9385,0x9389,0x93a1,0x93a2,
0x93a5,0x93a9,0x93af,0x93b1,0x93b3,0x93b5,0x93b7,0x93bc,
0x9461,0x9462,0x9463,0x9465,0x9468,0x9469,0x946a,0x946b,
0x946c,0x9470,0x9471,0x9473,0x9475,0x9476,0x9477,0x9478,
0x9479,0x947d,0x9481,0x9482,0x9485,0x9489,0x9491,0x9493,
0x9495,0x9496,0x9497,0x94a1,0x94e1,0x94e2,0x94e3,0x94e5,
0x94e8,0x94e9,0x94eb,0x94ec,0x94f1,0x94f3,
0x94f5,0x94f7,0x94f9,0x94fc,0x9541,0x9542,0x9545,0x9549,
0x9551,0x9553,0x9555,0x9556,0x9557,0x9561,0x9565,0x9569,
0x9576,0x9577,0x9581,0x9585,0x95a1,0x95a2,0x95a5,0x95a8,
0x95a9,0x95ab,0x95ad,0x95b1,0x95b3,0x95b5,0x95b7,0x95b9,
0x95bb,0x95c1,0x95c5,0x95c9,0x95e1,0x95f6,0x9641,0x9645,
0x9649,0x9651,0x9653,0x9655,0x9661,0x9681,0x9682,0x9685,
0x9689,0x9691,0x9693,0x9695,0x9697,0x96a1,0x96b6,0x96c1,
0x96d7,0x96e1,0x96e5,0x96e9,0x96f3,0x96f5,0x96f7,0x9741,
0x9745,0x9749,0x9751,0x9757,0x9761,0x9762,0x9765,0x9768,
0x9769,0x976b,0x9771,0x9773,0x9775,0x9777,0x9781,0x97a1,
0x97a2,0x97a5,0x97a8,0x97a9,0x97b1,0x97b3,0x97b5,0x97b6,
0x97b7,0x97b8,0x9861,0x9862,0x9865,0x9869,
0x9871,0x9873,0x9875,0x9876,0x9877,0x987d,0x9881,0x9882,
0x9885,0x9889,0x9891,0x9893,0x9895,0x9896,0x9897,0x98e1,
0x98e2,0x98e5,0x98e9,0x98eb,0x98ec,0x98f1,0x98f3,0x98f5,
0x98f6,0x98f7,0x98fd,0x9941,0x9942,0x9945,0x9949,0x9951,
0x9953,0x9955,0x9956,0x9957,0x9961,0x9976,0x99a1,0x99a2,
0x99a5,0x99a9,0x99b7,0x99c1,0x99c9,0x99e1,0x9a41,0x9a45,
0x9a81,0x9a82,0x9a85,0x9a89,0x9a90,0x9a91,0x9a97,0x9ac1,
0x9ae1,0x9ae5,0x9ae9,0x9af1,0x9af3,0x9af7,0x9b61,0x9b62,
0x9b65,0x9b68,0x9b69,0x9b71,0x9b73,0x9b75,0x9b81,0x9b85,
0x9b89,0x9b91,0x9b93,0x9ba1,0x9ba5,0x9ba9,0x9bb1,0x9bb3,
0x9bb5,0x9bb7,0x9c61,0x9c62,0x9c65,0x9c69,0x9c71,0x9c73,
0x9c75,0x9c76,0x9c77,0x9c78,0x9c7c,0x9c7d,
0x9c81,0x9c82,0x9c85,0x9c89,0x9c91,0x9c93,0x9c95,0x9c96,
0x9c97,0x9ca1,0x9ca2,0x9ca5,0x9cb5,0x9cb7,0x9ce1,0x9ce2,
0x9ce5,0x9ce9,0x9cf1,0x9cf3,0x9cf5,0x9cf6,0x9cf7,0x9cfd,
0x9d41,0x9d42,0x9d45,0x9d49,0x9d51,0x9d53,0x9d55,0x9d57,
0x9d61,0x9d62,0x9d65,0x9d69,0x9d71,0x9d73,0x9d75,0x9d76,
0x9d77,0x9d81,0x9d85,0x9d93,0x9d95,0x9da1,0x9da2,0x9da5,
0x9da9,0x9db1,0x9db3,0x9db5,0x9db7,0x9dc1,0x9dc5,0x9dd7,
0x9df6,0x9e41,0x9e45,0x9e49,0x9e51,0x9e53,0x9e55,0x9e57,
0x9e61,0x9e65,0x9e69,0x9e73,0x9e75,0x9e77,0x9e81,0x9e82,
0x9e85,0x9e89,0x9e91,0x9e93,0x9e95,0x9e97,0x9ea1,0x9eb6,
0x9ec1,0x9ee1,0x9ee2,0x9ee5,0x9ee9,0x9ef1,0x9ef5,0x9ef7,
0x9f41,0x9f42,0x9f45,0x9f49,0x9f51,0x9f53,
0x9f55,0x9f57,0x9f61,0x9f62,0x9f65,0x9f69,0x9f71,0x9f73,
0x9f75,0x9f77,0x9f78,0x9f7b,0x9f7c,0x9fa1,0x9fa2,0x9fa5,
0x9fa9,0x9fb1,0x9fb3,0x9fb5,0x9fb7,0xa061,0xa062,0xa065,
0xa067,0xa068,0xa069,0xa06a,0xa06b,0xa071,0xa073,0xa075,
0xa077,0xa078,0xa07b,0xa07d,0xa081,0xa082,0xa085,0xa089,
0xa091,0xa093,0xa095,0xa096,0xa097,0xa098,0xa0a1,0xa0a2,
0xa0a9,0xa0b7,0xa0e1,0xa0e2,0xa0e5,0xa0e9,0xa0eb,0xa0f1,
0xa0f3,0xa0f5,0xa0f7,0xa0f8,0xa0fd,0xa141,0xa142,0xa145,
0xa149,0xa151,0xa153,0xa155,0xa156,0xa157,0xa161,0xa162,
0xa165,0xa169,0xa175,0xa176,0xa177,0xa179,0xa181,0xa1a1,
0xa1a2,0xa1a4,0xa1a5,0xa1a9,0xa1ab,0xa1b1,0xa1b3,0xa1b5,
0xa1b7,0xa1c1,0xa1c5,0xa1d6,0xa1d7,0xa241,
0xa245,0xa249,0xa253,0xa255,0xa257,0xa261,0xa265,0xa269,
0xa273,0xa275,0xa281,0xa282,0xa283,0xa285,0xa288,0xa289,
0xa28a,0xa28b,0xa291,0xa293,0xa295,0xa297,0xa29b,0xa29d,
0xa2a1,0xa2a5,0xa2a9,0xa2b3,0xa2b5,0xa2c1,0xa2e1,0xa2e5,
0xa2e9,0xa341,0xa345,0xa349,0xa351,0xa355,0xa361,0xa365,
0xa369,0xa371,0xa375,0xa3a1,0xa3a2,0xa3a5,0xa3a8,0xa3a9,
0xa3ab,0xa3b1,0xa3b3,0xa3b5,0xa3b6,0xa3b7,0xa3b9,0xa3bb,
0xa461,0xa462,0xa463,0xa464,0xa465,0xa468,0xa469,0xa46a,
0xa46b,0xa46c,0xa471,0xa473,0xa475,0xa477,0xa47b,0xa481,
0xa482,0xa485,0xa489,0xa491,0xa493,0xa495,0xa496,0xa497,
0xa49b,0xa4a1,0xa4a2,0xa4a5,0xa4b3,0xa4e1,0xa4e2,0xa4e5,
0xa4e8,0xa4e9,0xa4eb,0xa4f1,0xa4f3,0xa4f5,
0xa4f7,0xa4f8,0xa541,0xa542,0xa545,0xa548,0xa549,0xa551,
0xa553,0xa555,0xa556,0xa557,0xa561,0xa562,0xa565,0xa569,
0xa573,0xa575,0xa576,0xa577,0xa57b,0xa581,0xa585,0xa5a1,
0xa5a2,0xa5a3,0xa5a5,0xa5a9,0xa5b1,0xa5b3,0xa5b5,0xa5b7,
0xa5c1,0xa5c5,0xa5d6,0xa5e1,0xa5f6,0xa641,0xa642,0xa645,
0xa649,0xa651,0xa653,0xa661,0xa665,0xa681,0xa682,0xa685,
0xa688,0xa689,0xa68a,0xa68b,0xa691,0xa693,0xa695,0xa697,
0xa69b,0xa69c,0xa6a1,0xa6a9,0xa6b6,0xa6c1,0xa6e1,0xa6e2,
0xa6e5,0xa6e9,0xa6f7,0xa741,0xa745,0xa749,0xa751,0xa755,
0xa757,0xa761,0xa762,0xa765,0xa769,0xa771,0xa773,0xa775,
0xa7a1,0xa7a2,0xa7a5,0xa7a9,0xa7ab,0xa7b1,0xa7b3,0xa7b5,
0xa7b7,0xa7b8,0xa7b9,0xa861,0xa862,0xa865,
0xa869,0xa86b,0xa871,0xa873,0xa875,0xa876,0xa877,0xa87d,
0xa881,0xa882,0xa885,0xa889,0xa891,0xa893,0xa895,0xa896,
0xa897,0xa8a1,0xa8a2,0xa8b1,0xa8e1,0xa8e2,0xa8e5,0xa8e8,
0xa8e9,0xa8f1,0xa8f5,0xa8f6,0xa8f7,0xa941,0xa957,0xa961,
0xa962,0xa971,0xa973,0xa975,0xa976,0xa977,0xa9a1,0xa9a2,
0xa9a5,0xa9a9,0xa9b1,0xa9b3,0xa9b7,0xaa41,0xaa61,0xaa77,
0xaa81,0xaa82,0xaa85,0xaa89,0xaa91,0xaa95,0xaa97,0xab41,
0xab57,0xab61,0xab65,0xab69,0xab71,0xab73,0xaba1,0xaba2,
0xaba5,0xaba9,0xabb1,0xabb3,0xabb5,0xabb7,0xac61,0xac62,
0xac64,0xac65,0xac68,0xac69,0xac6a,0xac6b,0xac71,0xac73,
0xac75,0xac76,0xac77,0xac7b,0xac81,0xac82,0xac85,0xac89,
0xac91,0xac93,0xac95,0xac96,0xac97,0xaca1,
0xaca2,0xaca5,0xaca9,0xacb1,0xacb3,0xacb5,0xacb7,0xacc1,
0xacc5,0xacc9,0xacd1,0xacd7,0xace1,0xace2,0xace3,0xace4,
0xace5,0xace8,0xace9,0xaceb,0xacec,0xacf1,0xacf3,0xacf5,
0xacf6,0xacf7,0xacfc,0xad41,0xad42,0xad45,0xad49,0xad51,
0xad53,0xad55,0xad56,0xad57,0xad61,0xad62,0xad65,0xad69,
0xad71,0xad73,0xad75,0xad76,0xad77,0xad81,0xad85,0xad89,
0xad97,0xada1,0xada2,0xada3,0xada5,0xada9,0xadab,0xadb1,
0xadb3,0xadb5,0xadb7,0xadbb,0xadc1,0xadc2,0xadc5,0xadc9,
0xadd7,0xade1,0xade5,0xade9,0xadf1,0xadf5,0xadf6,0xae41,
0xae45,0xae49,0xae51,0xae53,0xae55,0xae61,0xae62,0xae65,
0xae69,0xae71,0xae73,0xae75,0xae77,0xae81,0xae82,0xae85,
0xae88,0xae89,0xae91,0xae93,0xae95,0xae97,
0xae99,0xae9b,0xae9c,0xaea1,0xaeb6,0xaec1,0xaec2,0xaec5,
0xaec9,0xaed1,0xaed7,0xaee1,0xaee2,0xaee5,0xaee9,0xaef1,
0xaef3,0xaef5,0xaef7,0xaf41,0xaf42,0xaf49,0xaf51,0xaf55,
0xaf57,0xaf61,0xaf62,0xaf65,0xaf69,0xaf6a,0xaf71,0xaf73,
0xaf75,0xaf77,0xafa1,0xafa2,0xafa5,0xafa8,0xafa9,0xafb0,
0xafb1,0xafb3,0xafb5,0xafb7,0xafbc,0xb061,0xb062,0xb064,
0xb065,0xb069,0xb071,0xb073,0xb076,0xb077,0xb07d,0xb081,
0xb082,0xb085,0xb089,0xb091,0xb093,0xb096,0xb097,0xb0b7,
0xb0e1,0xb0e2,0xb0e5,0xb0e9,0xb0eb,0xb0f1,0xb0f3,0xb0f6,
0xb0f7,0xb141,0xb145,0xb149,0xb157,0xb1a1,0xb1a2,0xb1a5,
0xb1a8,0xb1a9,0xb1ab,0xb1b1,0xb1b3,0xb1b7,0xb1c1,0xb1c2,
0xb1c5,0xb1d6,0xb1e1,0xb1f6,0xb241,0xb245,
0xb249,0xb251,0xb253,0xb261,0xb281,0xb282,0xb285,0xb289,
0xb291,0xb293,0xb297,0xb2a1,0xb2b6,0xb2c1,0xb2e1,0xb2e5,
0xb357,0xb361,0xb362,0xb365,0xb369,0xb36b,0xb370,0xb371,
0xb373,0xb381,0xb385,0xb389,0xb391,0xb3a1,0xb3a2,0xb3a5,
0xb3a9,0xb3b1,0xb3b3,0xb3b5,0xb3b7,0xb461,0xb462,0xb465,
0xb466,0xb467,0xb469,0xb46a,0xb46b,0xb470,0xb471,0xb473,
0xb475,0xb476,0xb477,0xb47b,0xb47c,0xb481,0xb482,0xb485,
0xb489,0xb491,0xb493,0xb495,0xb496,0xb497,0xb4a1,0xb4a2,
0xb4a5,0xb4a9,0xb4ac,0xb4b1,0xb4b3,0xb4b5,0xb4b7,0xb4bb,
0xb4bd,0xb4c1,0xb4c5,0xb4c9,0xb4d3,0xb4e1,0xb4e2,0xb4e5,
0xb4e6,0xb4e8,0xb4e9,0xb4ea,0xb4eb,0xb4f1,0xb4f3,0xb4f4,
0xb4f5,0xb4f6,0xb4f7,0xb4f8,0xb4fa,0xb4fc,
0xb541,0xb542,0xb545,0xb549,0xb551,0xb553,0xb555,0xb557,
0xb561,0xb562,0xb563,0xb565,0xb569,0xb56b,0xb56c,0xb571,
0xb573,0xb574,0xb575,0xb576,0xb577,0xb57b,0xb57c,0xb57d,
0xb581,0xb585,0xb589,0xb591,0xb593,0xb595,0xb596,0xb5a1,
0xb5a2,0xb5a5,0xb5a9,0xb5aa,0xb5ab,0xb5ad,0xb5b0,0xb5b1,
0xb5b3,0xb5b5,0xb5b7,0xb5b9,0xb5c1,0xb5c2,0xb5c5,0xb5c9,
0xb5d1,0xb5d3,0xb5d5,0xb5d6,0xb5d7,0xb5e1,0xb5e2,0xb5e5,
0xb5f1,0xb5f5,0xb5f7,0xb641,0xb642,0xb645,0xb649,0xb651,
0xb653,0xb655,0xb657,0xb661,0xb662,0xb665,0xb669,0xb671,
0xb673,0xb675,0xb677,0xb681,0xb682,0xb685,0xb689,0xb68a,
0xb68b,0xb691,0xb693,0xb695,0xb697,0xb6a1,0xb6a2,0xb6a5,
0xb6a9,0xb6b1,0xb6b3,0xb6b6,0xb6b7,0xb6c1,
0xb6c2,0xb6c5,0xb6c9,0xb6d1,0xb6d3,0xb6d7,0xb6e1,0xb6e2,
0xb6e5,0xb6e9,0xb6f1,0xb6f3,0xb6f5,0xb6f7,0xb741,0xb742,
0xb745,0xb749,0xb751,0xb753,0xb755,0xb757,0xb759,0xb761,
0xb762,0xb765,0xb769,0xb76f,0xb771,0xb773,0xb775,0xb777,
0xb778,0xb779,0xb77a,0xb77b,0xb77c,0xb77d,0xb781,0xb785,
0xb789,0xb791,0xb795,0xb7a1,0xb7a2,0xb7a5,0xb7a9,0xb7aa,
0xb7ab,0xb7b0,0xb7b1,0xb7b3,0xb7b5,0xb7b6,0xb7b7,0xb7b8,
0xb7bc,0xb861,0xb862,0xb865,0xb867,0xb868,0xb869,0xb86b,
0xb871,0xb873,0xb875,0xb876,0xb877,0xb878,0xb881,0xb882,
0xb885,0xb889,0xb891,0xb893,0xb895,0xb896,0xb897,0xb8a1,
0xb8a2,0xb8a5,0xb8a7,0xb8a9,0xb8b1,0xb8b7,0xb8c1,0xb8c5,
0xb8c9,0xb8e1,0xb8e2,0xb8e5,0xb8e9,0xb8eb,
0xb8f1,0xb8f3,0xb8f5,0xb8f7,0xb8f8,0xb941,0xb942,0xb945,
0xb949,0xb951,0xb953,0xb955,0xb957,0xb961,0xb965,0xb969,
0xb971,0xb973,0xb976,0xb977,0xb981,0xb9a1,0xb9a2,0xb9a5,
0xb9a9,0xb9ab,0xb9b1,0xb9b3,0xb9b5,0xb9b7,0xb9b8,0xb9b9,
0xb9bd,0xb9c1,0xb9c2,0xb9c9,0xb9d3,0xb9d5,0xb9d7,0xb9e1,
0xb9f6,0xb9f7,0xba41,0xba45,0xba49,0xba51,0xba53,0xba55,
0xba57,0xba61,0xba62,0xba65,0xba77,0xba81,0xba82,0xba85,
0xba89,0xba8a,0xba8b,0xba91,0xba93,0xba95,0xba97,0xbaa1,
0xbab6,0xbac1,0xbae1,0xbae2,0xbae5,0xbae9,0xbaf1,0xbaf3,
0xbaf5,0xbb41,0xbb45,0xbb49,0xbb51,0xbb61,0xbb62,0xbb65,
0xbb69,0xbb71,0xbb73,0xbb75,0xbb77,0xbba1,0xbba2,0xbba5,
0xbba8,0xbba9,0xbbab,0xbbb1,0xbbb3,0xbbb5,
0xbbb7,0xbbb8,0xbbbb,0xbbbc,0xbc61,0xbc62,0xbc65,0xbc67,
0xbc69,0xbc6c,0xbc71,0xbc73,0xbc75,0xbc76,0xbc77,0xbc81,
0xbc82,0xbc85,0xbc89,0xbc91,0xbc93,0xbc95,0xbc96,0xbc97,
0xbca1,0xbca5,0xbcb7,0xbce1,0xbce2,0xbce5,0xbce9,0xbcf1,
0xbcf3,0xbcf5,0xbcf6,0xbcf7,0xbd41,0xbd57,0xbd61,0xbd76,
0xbda1,0xbda2,0xbda5,0xbda9,0xbdb1,0xbdb3,0xbdb5,0xbdb7,
0xbdb9,0xbdc1,0xbdc2,0xbdc9,0xbdd6,0xbde1,0xbdf6,0xbe41,
0xbe45,0xbe49,0xbe51,0xbe53,0xbe77,0xbe81,0xbe82,0xbe85,
0xbe89,0xbe91,0xbe93,0xbe97,0xbea1,0xbeb6,0xbeb7,0xbee1,
0xbf41,0xbf61,0xbf71,0xbf75,0xbf77,0xbfa1,0xbfa2,0xbfa5,
0xbfa9,0xbfb1,0xbfb3,0xbfb7,0xbfb8,0xbfbd,0xc061,0xc062,
0xc065,0xc067,0xc069,0xc071,0xc073,0xc075,
0xc076,0xc077,0xc078,0xc081,0xc082,0xc085,0xc089,0xc091,
0xc093,0xc095,0xc096,0xc097,0xc0a1,0xc0a5,0xc0a7,0xc0a9,
0xc0b1,0xc0b7,0xc0e1,0xc0e2,0xc0e5,0xc0e9,0xc0f1,0xc0f3,
0xc0f5,0xc0f6,0xc0f7,0xc141,0xc142,0xc145,0xc149,0xc151,
0xc153,0xc155,0xc157,0xc161,0xc165,0xc176,0xc181,0xc185,
0xc197,0xc1a1,0xc1a2,0xc1a5,0xc1a9,0xc1b1,0xc1b3,0xc1b5,
0xc1b7,0xc1c1,0xc1c5,0xc1c9,0xc1d7,0xc241,0xc245,0xc249,
0xc251,0xc253,0xc255,0xc257,0xc261,0xc271,0xc281,0xc282,
0xc285,0xc289,0xc291,0xc293,0xc295,0xc297,0xc2a1,0xc2b6,
0xc2c1,0xc2c5,0xc2e1,0xc2e5,0xc2e9,0xc2f1,0xc2f3,0xc2f5,
0xc2f7,0xc341,0xc345,0xc349,0xc351,0xc357,0xc361,0xc362,
0xc365,0xc369,0xc371,0xc373,0xc375,0xc377,
0xc3a1,0xc3a2,0xc3a5,0xc3a8,0xc3a9,0xc3aa,0xc3b1,0xc3b3,
0xc3b5,0xc3b7,0xc461,0xc462,0xc465,0xc469,0xc471,0xc473,
0xc475,0xc477,0xc481,0xc482,0xc485,0xc489,0xc491,0xc493,
0xc495,0xc496,0xc497,0xc4a1,0xc4a2,0xc4b7,0xc4e1,0xc4e2,
0xc4e5,0xc4e8,0xc4e9,0xc4f1,0xc4f3,0xc4f5,0xc4f6,0xc4f7,
0xc541,0xc542,0xc545,0xc549,0xc551,0xc553,0xc555,0xc557,
0xc561,0xc565,0xc569,0xc571,0xc573,0xc575,0xc576,0xc577,
0xc581,0xc5a1,0xc5a2,0xc5a5,0xc5a9,0xc5b1,0xc5b3,0xc5b5,
0xc5b7,0xc5c1,0xc5c2,0xc5c5,0xc5c9,0xc5d1,0xc5d7,0xc5e1,
0xc5f7,0xc641,0xc649,0xc661,0xc681,0xc682,0xc685,0xc689,
0xc691,0xc693,0xc695,0xc697,0xc6a1,0xc6a5,0xc6a9,0xc6b7,
0xc6c1,0xc6d7,0xc6e1,0xc6e2,0xc6e5,0xc6e9,
0xc6f1,0xc6f3,0xc6f5,0xc6f7,0xc741,0xc745,0xc749,0xc751,
0xc761,0xc762,0xc765,0xc769,0xc771,0xc773,0xc777,0xc7a1,
0xc7a2,0xc7a5,0xc7a9,0xc7b1,0xc7b3,0xc7b5,0xc7b7,0xc861,
0xc862,0xc865,0xc869,0xc86a,0xc871,0xc873,0xc875,0xc876,
0xc877,0xc881,0xc882,0xc885,0xc889,0xc891,0xc893,0xc895,
0xc896,0xc897,0xc8a1,0xc8b7,0xc8e1,0xc8e2,0xc8e5,0xc8e9,
0xc8eb,0xc8f1,0xc8f3,0xc8f5,0xc8f6,0xc8f7,0xc941,0xc942,
0xc945,0xc949,0xc951,0xc953,0xc955,0xc957,0xc961,0xc965,
0xc976,0xc981,0xc985,0xc9a1,0xc9a2,0xc9a5,0xc9a9,0xc9b1,
0xc9b3,0xc9b5,0xc9b7,0xc9bc,0xc9c1,0xc9c5,0xc9e1,0xca41,
0xca45,0xca55,0xca57,0xca61,0xca81,0xca82,0xca85,0xca89,
0xca91,0xca93,0xca95,0xca97,0xcaa1,0xcab6,
0xcac1,0xcae1,0xcae2,0xcae5,0xcae9,0xcaf1,0xcaf3,0xcaf7,
0xcb41,0xcb45,0xcb49,0xcb51,0xcb57,0xcb61,0xcb62,0xcb65,
0xcb68,0xcb69,0xcb6b,0xcb71,0xcb73,0xcb75,0xcb81,0xcb85,
0xcb89,0xcb91,0xcb93,0xcba1,0xcba2,0xcba5,0xcba9,0xcbb1,
0xcbb3,0xcbb5,0xcbb7,0xcc61,0xcc62,0xcc63,0xcc65,0xcc69,
0xcc6b,0xcc71,0xcc73,0xcc75,0xcc76,0xcc77,0xcc7b,0xcc81,
0xcc82,0xcc85,0xcc89,0xcc91,0xcc93,0xcc95,0xcc96,0xcc97,
0xcca1,0xcca2,0xcce1,0xcce2,0xcce5,0xcce9,0xccf1,0xccf3,
0xccf5,0xccf6,0xccf7,0xcd41,0xcd42,0xcd45,0xcd49,0xcd51,
0xcd53,0xcd55,0xcd57,0xcd61,0xcd65,0xcd69,0xcd71,0xcd73,
0xcd76,0xcd77,0xcd81,0xcd89,0xcd93,0xcd95,0xcda1,0xcda2,
0xcda5,0xcda9,0xcdb1,0xcdb3,0xcdb5,0xcdb7,
0xcdc1,0xcdd7,0xce41,0xce45,0xce61,0xce65,0xce69,0xce73,
0xce75,0xce81,0xce82,0xce85,0xce88,0xce89,0xce8b,0xce91,
0xce93,0xce95,0xce97,0xcea1,0xceb7,0xcee1,0xcee5,0xcee9,
0xcef1,0xcef5,0xcf41,0xcf45,0xcf49,0xcf51,0xcf55,0xcf57,
0xcf61,0xcf65,0xcf69,0xcf71,0xcf73,0xcf75,0xcfa1,0xcfa2,
0xcfa5,0xcfa9,0xcfb1,0xcfb3,0xcfb5,0xcfb7,0xd061,0xd062,
0xd065,0xd069,0xd06e,0xd071,0xd073,0xd075,0xd077,0xd081,
0xd082,0xd085,0xd089,0xd091,0xd093,0xd095,0xd096,0xd097,
0xd0a1,0xd0b7,0xd0e1,0xd0e2,0xd0e5,0xd0e9,0xd0eb,0xd0f1,
0xd0f3,0xd0f5,0xd0f7,0xd141,0xd142,0xd145,0xd149,0xd151,
0xd153,0xd155,0xd157,0xd161,0xd162,0xd165,0xd169,0xd171,
0xd173,0xd175,0xd176,0xd177,0xd181,0xd185,
0xd189,0xd193,0xd1a1,0xd1a2,0xd1a5,0xd1a9,0xd1ae,0xd1b1,
0xd1b3,0xd1b5,0xd1b7,0xd1bb,0xd1c1,0xd1c2,0xd1c5,0xd1c9,
0xd1d5,0xd1d7,0xd1e1,0xd1e2,0xd1e5,0xd1f5,0xd1f7,0xd241,
0xd242,0xd245,0xd249,0xd253,0xd255,0xd257,0xd261,0xd265,
0xd269,0xd273,0xd275,0xd281,0xd282,0xd285,0xd289,0xd28e,
0xd291,0xd295,0xd297,0xd2a1,0xd2a5,0xd2a9,0xd2b1,0xd2b7,
0xd2c1,0xd2c2,0xd2c5,0xd2c9,0xd2d7,0xd2e1,0xd2e2,0xd2e5,
0xd2e9,0xd2f1,0xd2f3,0xd2f5,0xd2f7,0xd341,0xd342,0xd345,
0xd349,0xd351,0xd355,0xd357,0xd361,0xd362,0xd365,0xd367,
0xd368,0xd369,0xd36a,0xd371,0xd373,0xd375,0xd377,0xd37b,
0xd381,0xd385,0xd389,0xd391,0xd393,0xd397,0xd3a1,0xd3a2,
0xd3a5,0xd3a9,0xd3b1,0xd3b3,0xd3b5,0xd3b7
};
#define SINGLENUM 51 /* 한글 낱자의 수 */
const unsigned short Single[SINGLENUM] = { /* 한글 낱자 51자의 조합형 코드 */
0x8841,0x8c41,0x8444,0x9041,0x8446,0x8447,0x9441,0x9841,
0x9c41,0x844a,0x844b,0x844c,0x844d,0x844e,0x844f,0x8450,
0xa041,0xa441,0xa841,0x8454,0xac41,0xb041,0xb441,0xb841,
0xbc41,0xc041,0xc441,0xc841,0xcc41,0xd041,0x8461,0x8481,
0x84a1,0x84c1,0x84e1,0x8541,0x8561,0x8581,0x85a1,0x85c1,
0x85e1,0x8641,0x8661,0x8681,0x86a1,0x86c1,0x86e1,0x8741,
0x8761,0x8781,0x87a1
};
void hancode_init3(HANCODE *hc, char first,char second, char third)
{
hc->hancode.i = 0x0001;
hc->hancode.f = (unsigned short)first;
hc->hancode.s = (unsigned short)second;
hc->hancode.t = (unsigned short)third;
}
void hancode_init2(HANCODE *hc, unsigned char first,unsigned char second)
{
hc->charcode.code1 = first;
hc->charcode.code2 = second;
}
void hancode_init1(HANCODE *hc, unsigned short code)
{
hc->shortcode = code;
}
int codecmp(unsigned short *p, unsigned short *q) /* local function */
{
return (*p - *q);
}
HANCODE TG2KS(HANCODE hc)
{
HANCODE tmpcode;
unsigned short index;
unsigned short *p;
p = (unsigned short *)bsearch(&hc.shortcode, KStbl,
sizeof(KStbl) / sizeof(unsigned short),
sizeof(unsigned short),
(int (*)(const void *, const void *))codecmp);
if(p != NULL) {
index = p - KStbl;
hancode_init2(&tmpcode, (unsigned char)(index / 94 + 0xb0),
(unsigned char )(index % 94 + 0xa1));
return tmpcode;
}
for (index = 0; index < SINGLENUM; index++)
{
if (Single[index] == hc.shortcode)
{
hancode_init1(&tmpcode, 0xa4a1 + index);
return tmpcode;
}
}
hancode_init1(&tmpcode,0);
return tmpcode;
}
HANCODE KS2TG(HANCODE hc)
{
HANCODE tmpcode;
int index;
unsigned short c1, c2;
c1 = code1(hc);
c2 = code2(hc);
if (c1 == 0xa4)
{
hancode_init1(&tmpcode,
(c2 >= 0xa1 && c2 <= 0xd3)? Single[c2 - 0xa1] : 0);
return tmpcode;
}
else if (c1 < 0xb0 || c1 > 0xc8 || c2 < 0xa1 || c2 > 0xfe)
{
hancode_init1(&tmpcode,0);
return tmpcode;
}
index = (code1(hc) - 0xb0) * 94 + code2(hc) - 0xa1;
hancode_init1(&tmpcode,KStbl[index]);
return tmpcode;
}
/*----------------------------------------------------------------------
ㄱ --> 1byte
가 --> 2byte
각 --> 3byte
----------------------------------------------------------------------*/
char * TG2TRI(HANCODE hc, char *out)
{
/*--------------------------------------------------
단독으로 사용된 자음은 모두 종성으로 만든다.
ㄴ다 같은 경우를 처리 하기 위하여
--------------------------------------------------*/
if(f(hc) != FILL_Co) /* 초성이 있는 경우 */
{
if(s(hc) == FILL_Jung) /* 다음 글자가 모음이 아니면 */
*out++=tojong(f(hc)+TRI_Co);
else /* 다음에 모음(중성)이 있는 경우 */
*out++ = f(hc) + TRI_Co;
}
if(s(hc) != FILL_Jung)
*out++ = s(hc) + TRI_Jung;
if(t(hc) != FILL_Jong)
*out++ = t(hc) + TRI_Jong;
*out=0;
return out;
}
unsigned char *tg2tri(unsigned char *str, unsigned char *out)
{
HANCODE t1;
unsigned char *head = out;
while(*str)
{
if(*str & 0x80) /* 이부분은 정확한 type check로 바꾸어야 */
{
code1(t1) = *str++;
code2(t1) = *str++;
out=TG2TRI(t1,out);
}
else
*out++ = *str++;
}
*out = 0;
return head;
}
unsigned char *tri2tg(unsigned char *str, unsigned char *out)
{
HANCODE t1;
unsigned char *head = out;
while(*str)
{
if(*str & 0x80 &&
(*str & TRI_Co || *str & TRI_Jung || *str & TRI_Jong))
{
hancode_init3(&t1,FILL_Co,FILL_Jung,FILL_Jong);
if(is_tri_sph(*str))
*out++=tonorm(*str++);
else
{
if((*str & 0xe0) == TRI_Jong)
f(t1) = 0x1f & (tocho(*str++));
else if((*str & 0xe0) == TRI_Jung)
s(t1) = 0x1f & *str++;
else
{
if((*str & 0xe0) == TRI_Co)
f(t1) = 0x1f & *str++;
if((*str & 0xe0) == TRI_Jung)
{
s(t1) = 0x1f & *str++;
if((*str & 0xe0) == TRI_Jong)
t(t1) = 0x1f & *str++;
}
}
*out++ = code1(t1);
*out++ = code2(t1);
}
}
else
*out++ = *str++;
}
*out = 0;
return head;
}
unsigned char *tri2ks(unsigned char *str, unsigned char *out)
{
HANCODE t1, t2, sc;
unsigned char *head = out;
while(*str)
{
if(*str & 0x80)
{
if(is_tri_co(*str) || is_tri_jung(*str) || is_tri_jong(*str))
{
hancode_init3(&t1,FILL_Co,FILL_Jung,FILL_Jong);
if((*str & 0xe0) == TRI_Jong)
f(t1) = 0x1f & (tocho(*str++));
else if((*str & 0xe0) == TRI_Jung)
s(t1) = 0x1f & *str++;
else
{
if((*str & 0xe0) == TRI_Co)
f(t1) = 0x1f & *str++;
if((*str & 0xe0) == TRI_Jung)
{
s(t1) = 0x1f & *str++;
if((*str & 0xe0) == TRI_Jong)
t(t1) = 0x1f & *str++;
}
}
t2=TG2KS(t1);
*out++ = code1(t2);
*out++ = code2(t2);
}
else if(is_tri_sph(*str))
{
/*
음운 변화 처리용 내부 코드
*/
*out++=tonorm(*str++);
}
else if((*str & 0xe0)==(unsigned char)0xe0)
{
sc.hancode.i = 0x0001;
f(sc) = *str++ & 0x1f;
s(sc) = *str++ & 0x1f;
t(sc) = *str++ & 0x1f;
*out++=code1(sc);
*out++=code2(sc);
}
else
*str++;
}
else
*out++=*str++;
}
*out = 0;
return head;
}
unsigned char *ks2tri(unsigned char *str, unsigned char *out)
{
int ishan=0;
unsigned char *head = out;
HANCODE t1, t2, sc;
unsigned char tmpstr[MAXLINE];
while (*str)
{
/*--------------------------------------------------
한글인지 검사
--------------------------------------------------*/
if ((0xb0 <= str[0] && str[0] <= 0xc8) &&
(0xa1 <= str[1] && str[1] <= 0xfe))
ishan=1;
/* 자소 한글, 고어를 포함하는 것
else if (str[0] == 0xa4 && (0xa1 <= str[1] && str[1] <= 0xfe))
*/
/* 고어를 제외한 것 */
else if (str[0] == 0xa4 && (0xa1 <= str[1] && str[1] <= 0xd3))
ishan=1;
else
ishan=0;
/*--------------------------------------------------
한글인 경우
--------------------------------------------------*/
if (ishan && *(str+1))
{
code1(t1) = *str++;
code2(t1) = *str++;
t2 = KS2TG(t1);
out=TG2TRI(t2,out);
}
/*--------------------------------------------------
일반 아스키
--------------------------------------------------*/
else if((*str & 0x80)==0)
*out++ = *str++;
/*--------------------------------------------------
2바이트짜리 특수 문자
--------------------------------------------------*/
else
{
/*--------------------
특수문자 -일부 무시
--------------------*/
if (0xa1 == str[0])
{
switch(str[1])
{
/* 、 */ case 0xa2: *out++ = '`'; break;
/* … */ case 0xa6: strcpy(out,"..."); out+=3;
break;
/* ‘ */ case 0xae: *out++ = '\''; break;
/* ’ */ case 0xaf: *out++ = '\''; break;
/* “ */ case 0xb0: *out++ = '"'; break;
/* ” */ case 0xb1: *out++ = '"'; break;
/* 「 */ case 0xb8: *out++ = '<'; break;
/* 」 */ case 0xb9: *out++ = '>'; break;
/* 『 */ case 0xba: *out++ = '"'; break;
/* 』 */ case 0xbb: *out++ = '"'; break;
/* 【 */ case 0xbc: *out++ = '['; break;
/* 】 */ case 0xbd: *out++ = ']'; break;
/* ′ */ case 0xc7: *out++ = '\''; break;
/* ″ */ case 0xc8: *out++ = '"'; break;
/* ℃ Å ￠ ￡ ￥ */
case 0xc9:
case 0xca:
case 0xcb:
case 0xcc:
case 0xcd:
code1(sc)=str[0];
code2(sc)=str[1];
*out++ = f(sc) + (unsigned char)0xe0;
*out++ = s(sc) + (unsigned char)0xe0;
*out++ = t(sc) + (unsigned char)0xe0;
break;
default : *out++=' ';
}
}
else if (0xa2 == str[0])
{
switch(str[1])
{
/* ´ */ case 0xa5: *out++ = '\''; break;
/* ℉ ‰ */ case 0xb5: case 0xb6 :
code1(sc)=str[0];
code2(sc)=str[1];
*out++ = f(sc) + (unsigned char)0xe0;
*out++ = s(sc) + (unsigned char)0xe0;
*out++ = t(sc) + (unsigned char)0xe0;
break;
/* ㉿ ㈜ № ㏇ ™ ㏂ ㏘ ℡ */
case 0xde : strcpy(out,"(KS)"); out+=4; break;
case 0xdf :
*out++='(';
*out++=14+TRI_Co; /* 주 */
*out++=20+TRI_Jung;
*out++=')';
break;
case 0xe0 : strcpy(out,"No."); out+=3; break;
case 0xe1 : strcpy(out,"Co."); out+=3; break;
case 0xe2 : strcpy(out,"TM."); out+=3; break;
case 0xe3 : strcpy(out,"am."); out+=3; break;
case 0xe4 : strcpy(out,"pm."); out+=3; break;
case 0xe5 : strcpy(out,"Tel."); out+=4; break;
default : *out++=' ';
}
}
/*--------------------
2byte 영문자
--------------------*/
else if (0xa3 == str[0])
{
if(0xa1 <= str[1] && str[1] <= 0xfe)
*out++=str[1]-0x80;
else
*out++=' ';
}
/*--------------------
단위 기호
--------------------*/
else if ((0xa7 == str[0]) &&
(0xa1 <= str[1] && str[1] <= 0xef))
{
code1(sc)=str[0];
code2(sc)=str[1];
*out++ = f(sc) + (unsigned char)0xe0;
*out++ = s(sc) + (unsigned char)0xe0;
*out++ = t(sc) + (unsigned char)0xe0;
}
/*--------------------------------------------------
한자 --
--------------------------------------------------*/
else if ((0xca <= str[0] && 0xfd >= str[0]) &&
(0xa1 <= str[1] && str[1] <= 0xfe))
{
code1(sc)=str[0];
code2(sc)=str[1];
*out++ = f(sc) + (unsigned char)0xe0;
*out++ = s(sc) + (unsigned char)0xe0;
*out++ = t(sc) + (unsigned char)0xe0;
}
else
*out++=' ';
str+=2;
}
}
*out = 0;
return head;
}
unsigned char *ks2tg(unsigned char *str, unsigned char *out)
{
int ishan=0;
unsigned char *head = out;
HANCODE t1, t2;
while (*str)
{
if ((0xb0 <= str[0] && str[0] <= 0xc8) &&
(0xa1 <= str[1] && str[1] <= 0xfe))
ishan=1;
else if (str[0] == 0xa4 && (0xa1 <= str[1] && str[1] <= 0xd3))
ishan=1;
else
ishan=0;
if (ishan && *(str+1))
{
code1(t1) = *str++;
code2(t1) = *str++;
t2 = KS2TG(t1);
*out++ = code1(t2);
*out++ = code2(t2);
}
else if(*str & 0x80)
str+=2;
else
*out++ = *str++;
}
*out = 0;
return head;
}
unsigned char *tg2ks(unsigned char *str, unsigned char *out)
{
int ishan=0;
unsigned char *head = out;
HANCODE t1, t2;
while (*str)
{
/* 한글인가 체크 */
ishan = *str & 0x80;
if (ishan && *(str+1))
{
code1(t1) = *str++;
code2(t1) = *str++;
t2 = TG2KS(t1);
if(code(t2) != 0)
{
*out++ = code1(t2);
*out++ = code2(t2);
}
}
else
*out++ = *str++;
}
*out = 0;
return head;
}
unsigned char * coco_str(int src, int des, unsigned char *str, unsigned char *out)
{
unsigned char tmpstr[MAXLINE];
if(src == des)
return (unsigned char *)strcpy(out,str);
else if(src == TRI)
{
if(des == TG)
return tri2tg(str,out);
else if(des == KS)
return tri2ks(str,out);
}
else if(src == TG)
{
if(des == TRI)
return tg2tri(str,out);
else if(des == KS)
return tg2ks(str,out);
}
else if(src == KS)
{
if(des == TRI)
return ks2tri(str,out);
else if(des == TG)
return ks2tg(str,out);
}
}
char jong_co[] = {
0,1,2,3,0,4,0,0,5,7,0,0,0,0,0,0,0,8,0,9,0,11,12,13,14,16,17,18,19,20,0,0
};
char co_jong[] = {
0,1,2,3,5,8,0,9,17,19,0,21,22,23,24,0,25,26,27,28,29,0,0,0,0,0,0,0,0,0,0,0
};
char tocho(char c)
{
if((c & TRI_Jong) && jong_co[c&0x1f])
return jong_co[c&0x1f] + TRI_Co;
else
return c;
}
char tojong(char c)
{
if((c & TRI_Co) && co_jong[c&0x1f])
return co_jong[c&0x1f] + TRI_Jong;
else
return c;
}
char tosph(char c)
{
switch(c)
{
case '0' : return 0x80+23;
case 'A' : return 0x80+24;
case 'I' : return 0x80+25;
case 'U' : return 0x80+26;
case 'S' : return 0x80+27;
case 'w' : return 0x80+28;
case 'l' : return 0x80+29;
case 'h' : return 0x80+30;
case 's' : return 0x80+31;default: return c;
}
}
unsigned char tonorm(unsigned char c)
{
switch(c)
{
case 0x98 : return 'A';
case 0x99 : return 'I';
case 0x9a : return 'U';
case 0x9b : return 'S';
case 0x9c : return 'w';
case 0x9d : return 'l';
case 0x9e : return 'h';
case 0x9f : return 's';
default: return c;
}
}