Add conversion procs for CREATE CONVERSION
This commit is contained in:
Tatsuo Ishii
parent
743b747264
commit
3c7798f068
|
|
@ -0,0 +1,118 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# Makefile--
|
||||
# Makefile for utils/mb/conversion_procs
|
||||
#
|
||||
# IDENTIFICATION
|
||||
# $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/Makefile,v 1.1 2002/07/16 09:25:04 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
|
||||
subdir = src/backend/utils/mb/conversion_procs
|
||||
top_builddir = ../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
SQLSCRIPT = conversion_create.sql
|
||||
|
||||
DIRS = \
|
||||
utf8_and_ascii utf8_and_iso8859_1 \
|
||||
utf8_and_euc_jp utf8_and_euc_kr utf8_and_euc_cn utf8_and_euc_tw \
|
||||
utf8_and_sjis utf8_and_big5 utf8_and_gbk utf8_and_gb18030 \
|
||||
utf8_and_uhc utf8_and_johab utf8_and_tcvn utf8_and_iso8859 \
|
||||
euc_jp_and_sjis euc_tw_and_big5
|
||||
|
||||
# conversion_name source_encoding destination_encoding function object
|
||||
$(SQLSCRIPT): Makefile
|
||||
@set \
|
||||
utf8_to_ascii UNICODE SQL_ASCII utf8_to_ascii utf8_and_ascii \
|
||||
ascii_to_utf8 SQL_ASCII UNICODE ascii_to_utf8 utf8_and_ascii \
|
||||
utf8_to_iso8859_1 UNICODE LATIN1 utf8_to_iso8859_1 utf8_and_iso8859_1 \
|
||||
iso8859_1_to_utf8 LATIN1 UNICODE iso8859_1_to_utf8 utf8_and_iso8859_1 \
|
||||
euc_jp_to_utf8 EUC_JP UNICODE euc_jp_to_utf8 utf8_and_euc_jp \
|
||||
utf8_to_euc_jp UNICODE EUC_JP utf8_to_euc_jp utf8_and_euc_jp \
|
||||
euc_kr_to_utf8 EUC_KR UNICODE euc_kr_to_utf8 utf8_and_euc_kr \
|
||||
utf8_to_euc_kr UNICODE EUC_KR utf8_to_euc_kr utf8_and_euc_kr \
|
||||
euc_cn_to_utf8 EUC_CN UNICODE euc_cn_to_utf8 utf8_and_euc_cn \
|
||||
utf8_to_euc_cn UNICODE EUC_CN utf8_to_euc_cn utf8_and_euc_cn \
|
||||
euc_tw_to_utf8 EUC_TW UNICODE euc_tw_to_utf8 utf8_and_euc_tw \
|
||||
utf8_to_euc_tw UNICODE EUC_TW utf8_to_euc_tw utf8_and_euc_tw \
|
||||
sjis_to_utf8 SJIS UNICODE sjis_to_utf8 utf8_and_sjis \
|
||||
utf8_to_sjis UNICODE SJIS utf8_to_sjis utf8_and_sjis \
|
||||
big5_to_utf8 BIG5 UNICODE big5_to_utf8 utf8_and_big5 \
|
||||
utf8_to_big5 UNICODE BIG5 utf8_to_big5 utf8_and_big5 \
|
||||
gbk_to_utf8 GBK UNICODE gbk_to_utf8 utf8_and_gbk \
|
||||
utf8_to_gbk UNICODE GBK utf8_to_gbk utf8_and_gbk \
|
||||
gb18030_to_utf8 GB18030 UNICODE gb18030_to_utf8 utf8_and_gb18030 \
|
||||
utf8_to_gb18030 UNICODE GB18030 utf8_to_gb18030 utf8_and_gb18030 \
|
||||
uhc_to_utf8 UHC UNICODE uhc_to_utf8 utf8_and_uhc \
|
||||
utf8_to_uhc UNICODE UHC utf8_to_uhc utf8_and_uhc \
|
||||
johab_to_utf8 JOHAB UNICODE johab_to_utf8 utf8_and_johab \
|
||||
utf8_to_johab UNICODE JOHAB utf8_to_johab utf8_and_johab \
|
||||
tcvn_to_utf8 TCVN UNICODE tcvn_to_utf8 utf8_and_tcvn \
|
||||
utf8_to_tcvn UNICODE TCVN utf8_to_tcvn utf8_and_tcvn \
|
||||
utf8_to_iso8859_2 UNICODE LATIN2 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_2_to_utf8 LATIN2 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_3 UNICODE LATIN3 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_3_to_utf8 LATIN3 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_4 UNICODE LATIN4 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_4_to_utf8 LATIN4 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_9 UNICODE LATIN5 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_9_to_utf8 LATIN5 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_10 UNICODE LATIN6 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_10_to_utf8 LATIN6 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_13 UNICODE LATIN7 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_13_to_utf8 LATIN7 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_14 UNICODE LATIN8 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_14_to_utf8 LATIN8 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_15 UNICODE LATIN9 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_15_to_utf8 LATIN9 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_16 UNICODE LATIN10 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_16_to_utf8 LATIN10 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_5 UNICODE ISO-8859-5 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_5_to_utf8 ISO-8859-5 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_6 UNICODE ISO-8859-6 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_6_to_utf8 ISO-8859-6 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_7 UNICODE ISO-8859-7 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_7_to_utf8 ISO-8859-7 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
utf8_to_iso8859_8 UNICODE ISO-8859-8 utf8_to_iso8859 utf8_and_iso8859 \
|
||||
iso8859_8_to_utf8 ISO-8859-8 UNICODE iso8859_to_utf8 utf8_and_iso8859 \
|
||||
euc_jp_to_sjis EUC_JP SJIS euc_jp_to_sjis euc_jp_and_sjis \
|
||||
sjis_to_euc_jp SJIS EUC_JP sjis_to_euc_jp euc_jp_and_sjis \
|
||||
euc_jp_to_mic EUC_JP MULE_INTERNAL euc_jp_to_mic euc_jp_and_sjis \
|
||||
sjis_to_mic SJIS MULE_INTERNAL sjis_to_mic euc_jp_and_sjis \
|
||||
mic_to_euc_jp MULE_INTERNAL EUC_JP mic_to_euc_jp euc_jp_and_sjis \
|
||||
mic_to_sjis MULE_INTERNAL SJIS mic_to_sjis euc_jp_and_sjis \
|
||||
euc_tw_to_big5 EUC_TW BIG5 euc_tw_to_big5 euc_tw_and_big5 \
|
||||
big5_to_euc_tw BIG5 EUC_TW big5_to_euc_tw euc_tw_and_big5 \
|
||||
euc_tw_to_mic EUC_TW MULE_INTERNAL euc_tw_to_mic euc_tw_and_big5 \
|
||||
big5_to_mic BIG5 MULE_INTERNAL big5_to_mic euc_tw_and_big5 \
|
||||
mic_to_euc_tw MULE_INTERNAL EUC_TW mic_to_euc_tw euc_tw_and_big5 \
|
||||
mic_to_big5 MULE_INTERNAL BIG5 mic_to_big5 euc_tw_and_big5 \
|
||||
; \
|
||||
while [ "$$#" -gt 0 ] ; \
|
||||
do \
|
||||
name=$$1;shift; \
|
||||
se=$$1;shift; \
|
||||
de=$$1; shift; \
|
||||
func=$$1; shift; \
|
||||
obj=$$1; shift; \
|
||||
echo "-- $$se --> $$de"; \
|
||||
echo "CREATE OR REPLACE FUNCTION $$func (INTEGER, INTEGER, OPAQUE, OPAQUE, INTEGER) RETURNS INTEGER AS '$$"libdir"/$$obj', '$$func' LANGUAGE 'c';"; \
|
||||
echo "DROP CONVERSION pg_catalog.$$name;"; \
|
||||
echo "CREATE DEFAULT CONVERSION pg_catalog.$$name FOR '$$se' TO '$$de' FROM $$func;"; \
|
||||
done > $@
|
||||
|
||||
install:
|
||||
$(INSTALL_DATA) $(SQLSCRIPT) $(datadir)
|
||||
@for dir in $(DIRS); do $(MAKE) -C $$dir $@ || exit; done
|
||||
|
||||
all: $(SQLSCRIPT)
|
||||
@for dir in $(DIRS); do $(MAKE) -C $$dir $@ || exit; done
|
||||
|
||||
clean:
|
||||
$(RM) $(SQLSCRIPT)
|
||||
@for dir in $(DIRS); do $(MAKE) -C $$dir $@; done
|
||||
|
||||
distclean maintainer-clean:
|
||||
$(RM) $(SQLSCRIPT)
|
||||
@for dir in $(DIRS); do $(MAKE) -C $$dir $@; done
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := euc_jp_and_sjis
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,456 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* EUC_JP, SJIS and MULE_INTERNAL
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/euc_jp_and_sjis/euc_jp_and_sjis.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
|
||||
/*
|
||||
* SJIS alternative code.
|
||||
* this code is used if a mapping EUC -> SJIS is not defined.
|
||||
*/
|
||||
#define PGSJISALTCODE 0x81ac
|
||||
#define PGEUCALTCODE 0xa2ae
|
||||
|
||||
/*
|
||||
* conversion table between SJIS UDC (IBM kanji) and EUC_JP
|
||||
*/
|
||||
#include "sjis.map"
|
||||
|
||||
#define ENCODING_GROWTH_RATE 4
|
||||
|
||||
PG_FUNCTION_INFO_V1(euc_jp_to_sjis)
|
||||
PG_FUNCTION_INFO_V1(sjis_to_euc_jp)
|
||||
PG_FUNCTION_INFO_V1(euc_jp_to_mic)
|
||||
PG_FUNCTION_INFO_V1(mic_to_euc_jp)
|
||||
PG_FUNCTION_INFO_V1(sjis_to_mic)
|
||||
PG_FUNCTION_INFO_V1(mic_to_sjis)
|
||||
|
||||
extern Datum euc_jp_to_sjis(PG_FUNCTION_ARGS);
|
||||
extern Datum sjis_to_euc_jp(PG_FUNCTION_ARGS);
|
||||
extern Datum euc_jp_to_mic(PG_FUNCTION_ARGS);
|
||||
extern Datum mic_to_euc_jp(PG_FUNCTION_ARGS);
|
||||
extern Datum sjis_to_mic(PG_FUNCTION_ARGS);
|
||||
extern Datum mic_to_sjis(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
|
||||
static void sjis2mic(unsigned char *sjis, unsigned char *p, int len);
|
||||
static void mic2sjis(unsigned char *mic, unsigned char *p, int len);
|
||||
static void euc_jp2mic(unsigned char *euc, unsigned char *p, int len);
|
||||
static void mic2euc_jp(unsigned char *mic, unsigned char *p, int len);
|
||||
|
||||
Datum
|
||||
euc_jp_to_sjis(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
unsigned char *buf;
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_EUC_JP);
|
||||
Assert(PG_GETARG_INT32(1) == PG_SJIS);
|
||||
Assert(len > 0);
|
||||
|
||||
buf = palloc(len * ENCODING_GROWTH_RATE);
|
||||
euc_jp2mic(src, buf, len);
|
||||
mic2sjis(buf, dest, strlen(buf));
|
||||
pfree(buf);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
sjis_to_euc_jp(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
unsigned char *buf;
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_SJIS);
|
||||
Assert(PG_GETARG_INT32(1) == PG_EUC_JP);
|
||||
Assert(len > 0);
|
||||
|
||||
buf = palloc(len * ENCODING_GROWTH_RATE);
|
||||
sjis2mic(src, buf, len);
|
||||
mic2euc_jp(buf, dest, strlen(buf));
|
||||
pfree(buf);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
euc_jp_to_mic(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_EUC_JP);
|
||||
Assert(PG_GETARG_INT32(1) == PG_MULE_INTERNAL);
|
||||
Assert(len > 0);
|
||||
|
||||
euc_jp2mic(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
mic_to_euc_jp(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_MULE_INTERNAL);
|
||||
Assert(PG_GETARG_INT32(1) == PG_EUC_JP);
|
||||
Assert(len > 0);
|
||||
|
||||
mic2sjis(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
sjis_to_mic(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_SJIS);
|
||||
Assert(PG_GETARG_INT32(1) == PG_MULE_INTERNAL);
|
||||
Assert(len > 0);
|
||||
|
||||
sjis2mic(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
mic_to_sjis(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_MULE_INTERNAL);
|
||||
Assert(PG_GETARG_INT32(1) == PG_SJIS);
|
||||
Assert(len > 0);
|
||||
|
||||
mic2sjis(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
/*
|
||||
* SJIS ---> MIC
|
||||
*/
|
||||
static void
|
||||
sjis2mic(unsigned char *sjis, unsigned char *p, int len)
|
||||
{
|
||||
int c1,
|
||||
c2,
|
||||
/* Eiji Tokuya patched begin */
|
||||
i,
|
||||
k,
|
||||
k2;
|
||||
|
||||
/* Eiji Tokuya patched end */
|
||||
while (len > 0 && (c1 = *sjis++))
|
||||
{
|
||||
if (c1 >= 0xa1 && c1 <= 0xdf)
|
||||
{
|
||||
/* JIS X0201 (1 byte kana) */
|
||||
len--;
|
||||
*p++ = LC_JISX0201K;
|
||||
*p++ = c1;
|
||||
}
|
||||
else if (c1 > 0x7f)
|
||||
{
|
||||
/*
|
||||
* JIS X0208, X0212, user defined extended characters
|
||||
*/
|
||||
c2 = *sjis++;
|
||||
k = (c1 << 8) + c2;
|
||||
/* Eiji Tokuya patched begin */
|
||||
if (k >= 0xed40 && k < 0xf040)
|
||||
{
|
||||
/* NEC selection IBM kanji */
|
||||
for (i = 0;; i++)
|
||||
{
|
||||
k2 = ibmkanji[i].nec;
|
||||
if (k2 == 0xffff)
|
||||
break;
|
||||
if (k2 == k)
|
||||
{
|
||||
k = ibmkanji[i].sjis;
|
||||
c1 = (k >> 8) & 0xff;
|
||||
c2 = k & 0xff;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if (k < 0xeb3f)
|
||||
/* Eiji Tokuya patched end */
|
||||
{
|
||||
/* JIS X0208 */
|
||||
len -= 2;
|
||||
*p++ = LC_JISX0208;
|
||||
*p++ = ((c1 & 0x3f) << 1) + 0x9f + (c2 > 0x9e);
|
||||
*p++ = c2 + ((c2 > 0x9e) ? 2 : 0x60) + (c2 < 0x80);
|
||||
}
|
||||
/* Eiji Tokuya patched begin */
|
||||
else if ((k >= 0xeb40 && k < 0xf040) || (k >= 0xfc4c && k <= 0xfcfc))
|
||||
{
|
||||
/* NEC selection IBM kanji - Other undecided justice */
|
||||
/* Eiji Tokuya patched end */
|
||||
*p++ = LC_JISX0208;
|
||||
*p++ = PGEUCALTCODE >> 8;
|
||||
*p++ = PGEUCALTCODE & 0xff;
|
||||
}
|
||||
else if (k >= 0xf040 && k < 0xf540)
|
||||
{
|
||||
/*
|
||||
* UDC1 mapping to X0208 85 ku - 94 ku JIS code 0x7521 -
|
||||
* 0x7e7e EUC 0xf5a1 - 0xfefe
|
||||
*/
|
||||
len -= 2;
|
||||
*p++ = LC_JISX0208;
|
||||
c1 -= 0x6f;
|
||||
*p++ = ((c1 & 0x3f) << 1) + 0xf3 + (c2 > 0x9e);
|
||||
*p++ = c2 + ((c2 > 0x9e) ? 2 : 0x60) + (c2 < 0x80);
|
||||
}
|
||||
else if (k >= 0xf540 && k < 0xfa40)
|
||||
{
|
||||
/*
|
||||
* UDC2 mapping to X0212 85 ku - 94 ku JIS code 0x7521 -
|
||||
* 0x7e7e EUC 0x8ff5a1 - 0x8ffefe
|
||||
*/
|
||||
len -= 2;
|
||||
*p++ = LC_JISX0212;
|
||||
c1 -= 0x74;
|
||||
*p++ = ((c1 & 0x3f) << 1) + 0xf3 + (c2 > 0x9e);
|
||||
*p++ = c2 + ((c2 > 0x9e) ? 2 : 0x60) + (c2 < 0x80);
|
||||
}
|
||||
else if (k >= 0xfa40)
|
||||
{
|
||||
/*
|
||||
* mapping IBM kanji to X0208 and X0212
|
||||
*
|
||||
*/
|
||||
len -= 2;
|
||||
for (i = 0;; i++)
|
||||
{
|
||||
k2 = ibmkanji[i].sjis;
|
||||
if (k2 == 0xffff)
|
||||
break;
|
||||
if (k2 == k)
|
||||
{
|
||||
k = ibmkanji[i].euc;
|
||||
if (k >= 0x8f0000)
|
||||
{
|
||||
*p++ = LC_JISX0212;
|
||||
*p++ = 0x80 | ((k & 0xff00) >> 8);
|
||||
*p++ = 0x80 | (k & 0xff);
|
||||
}
|
||||
else
|
||||
{
|
||||
*p++ = LC_JISX0208;
|
||||
*p++ = 0x80 | (k >> 8);
|
||||
*p++ = 0x80 | (k & 0xff);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
else
|
||||
{ /* should be ASCII */
|
||||
len--;
|
||||
*p++ = c1;
|
||||
}
|
||||
}
|
||||
*p = '\0';
|
||||
}
|
||||
|
||||
/*
|
||||
* MIC ---> SJIS
|
||||
*/
|
||||
static void
|
||||
mic2sjis(unsigned char *mic, unsigned char *p, int len)
|
||||
{
|
||||
int c1,
|
||||
c2,
|
||||
k;
|
||||
|
||||
while (len > 0 && (c1 = *mic))
|
||||
{
|
||||
len -= pg_mic_mblen(mic++);
|
||||
|
||||
if (c1 == LC_JISX0201K)
|
||||
*p++ = *mic++;
|
||||
else if (c1 == LC_JISX0208)
|
||||
{
|
||||
c1 = *mic++;
|
||||
c2 = *mic++;
|
||||
k = (c1 << 8) | (c2 & 0xff);
|
||||
if (k >= 0xf5a1)
|
||||
{
|
||||
/* UDC1 */
|
||||
c1 -= 0x54;
|
||||
*p++ = ((c1 - 0xa1) >> 1) + ((c1 < 0xdf) ? 0x81 : 0xc1) + 0x6f;
|
||||
}
|
||||
else
|
||||
*p++ = ((c1 - 0xa1) >> 1) + ((c1 < 0xdf) ? 0x81 : 0xc1);
|
||||
*p++ = c2 - ((c1 & 1) ? ((c2 < 0xe0) ? 0x61 : 0x60) : 2);
|
||||
}
|
||||
else if (c1 == LC_JISX0212)
|
||||
{
|
||||
int i,
|
||||
k2;
|
||||
|
||||
c1 = *mic++;
|
||||
c2 = *mic++;
|
||||
k = c1 << 8 | c2;
|
||||
if (k >= 0xf5a1)
|
||||
{
|
||||
/* UDC2 */
|
||||
c1 -= 0x54;
|
||||
*p++ = ((c1 - 0xa1) >> 1) + ((c1 < 0xdf) ? 0x81 : 0xc1) + 0x74;
|
||||
*p++ = c2 - ((c1 & 1) ? ((c2 < 0xe0) ? 0x61 : 0x60) : 2);
|
||||
}
|
||||
else
|
||||
{
|
||||
/* IBM kanji */
|
||||
for (i = 0;; i++)
|
||||
{
|
||||
k2 = ibmkanji[i].euc & 0xffff;
|
||||
if (k2 == 0xffff)
|
||||
{
|
||||
*p++ = PGSJISALTCODE >> 8;
|
||||
*p++ = PGSJISALTCODE & 0xff;
|
||||
break;
|
||||
}
|
||||
if (k2 == k)
|
||||
{
|
||||
k = ibmkanji[i].sjis;
|
||||
*p++ = k >> 8;
|
||||
*p++ = k & 0xff;
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
else if (c1 > 0x7f)
|
||||
{
|
||||
/* cannot convert to SJIS! */
|
||||
*p++ = PGSJISALTCODE >> 8;
|
||||
*p++ = PGSJISALTCODE & 0xff;
|
||||
}
|
||||
else
|
||||
{ /* should be ASCII */
|
||||
*p++ = c1;
|
||||
}
|
||||
}
|
||||
*p = '\0';
|
||||
}
|
||||
|
||||
/*
|
||||
* EUC_JP ---> MIC
|
||||
*/
|
||||
static void
|
||||
euc_jp2mic(unsigned char *euc, unsigned char *p, int len)
|
||||
{
|
||||
int c1;
|
||||
|
||||
while (len > 0 && (c1 = *euc++))
|
||||
{
|
||||
if (c1 == SS2)
|
||||
{ /* 1 byte kana? */
|
||||
len -= 2;
|
||||
*p++ = LC_JISX0201K;
|
||||
*p++ = *euc++;
|
||||
}
|
||||
else if (c1 == SS3)
|
||||
{ /* JIS X0212 kanji? */
|
||||
len -= 3;
|
||||
*p++ = LC_JISX0212;
|
||||
*p++ = *euc++;
|
||||
*p++ = *euc++;
|
||||
}
|
||||
else if (c1 & 0x80)
|
||||
{ /* kanji? */
|
||||
len -= 2;
|
||||
*p++ = LC_JISX0208;
|
||||
*p++ = c1;
|
||||
*p++ = *euc++;
|
||||
}
|
||||
else
|
||||
{ /* should be ASCII */
|
||||
len--;
|
||||
*p++ = c1;
|
||||
}
|
||||
}
|
||||
*p = '\0';
|
||||
}
|
||||
|
||||
/*
|
||||
* MIC ---> EUC_JP
|
||||
*/
|
||||
static void
|
||||
mic2euc_jp(unsigned char *mic, unsigned char *p, int len)
|
||||
{
|
||||
int c1;
|
||||
|
||||
while (len > 0 && (c1 = *mic))
|
||||
{
|
||||
len -= pg_mic_mblen(mic++);
|
||||
|
||||
if (c1 == LC_JISX0201K)
|
||||
{
|
||||
*p++ = SS2;
|
||||
*p++ = *mic++;
|
||||
}
|
||||
else if (c1 == LC_JISX0212)
|
||||
{
|
||||
*p++ = SS3;
|
||||
*p++ = *mic++;
|
||||
*p++ = *mic++;
|
||||
}
|
||||
else if (c1 == LC_JISX0208)
|
||||
{
|
||||
*p++ = *mic++;
|
||||
*p++ = *mic++;
|
||||
}
|
||||
else if (c1 > 0x7f)
|
||||
{ /* cannot convert to EUC_JP! */
|
||||
mic--;
|
||||
pg_print_bogus_char(&mic, &p);
|
||||
}
|
||||
else
|
||||
{ /* should be ASCII */
|
||||
*p++ = c1;
|
||||
}
|
||||
}
|
||||
*p = '\0';
|
||||
}
|
||||
|
|
@ -0,0 +1,396 @@
|
|||
static struct
|
||||
{
|
||||
unsigned short int nec; /* SJIS UDC (NEC selection IBM kanji) */
|
||||
unsigned short int sjis; /* SJIS UDC (IBM kanji) */
|
||||
int euc; /* EUC_JP */
|
||||
} ibmkanji[] = {
|
||||
{ 0xEEEF , 0xfa40 , 0x8ff3f3 },
|
||||
{ 0xEEF0 , 0xfa41 , 0x8ff3f4 },
|
||||
{ 0xEEF1 , 0xfa42 , 0x8ff3f5 },
|
||||
{ 0xEEF2 , 0xfa43 , 0x8ff3f6 },
|
||||
{ 0xEEF3 , 0xfa44 , 0x8ff3f7 },
|
||||
{ 0xEEF4 , 0xfa45 , 0x8ff3f8 },
|
||||
{ 0xEEF5 , 0xfa46 , 0x8ff3f9 },
|
||||
{ 0xEEF6 , 0xfa47 , 0x8ff3fa },
|
||||
{ 0xEEF7 , 0xfa48 , 0x8ff3fb },
|
||||
{ 0xEEF8 , 0xfa49 , 0x8ff3fc },
|
||||
{ 0x8754 , 0xfa4a , 0x8ff3fd },
|
||||
{ 0x8755 , 0xfa4b , 0x8ff3fe },
|
||||
{ 0x8756 , 0xfa4c , 0x8ff4a1 },
|
||||
{ 0x8757 , 0xfa4d , 0x8ff4a2 },
|
||||
{ 0x8758 , 0xfa4e , 0x8ff4a3 },
|
||||
{ 0x8759 , 0xfa4f , 0x8ff4a4 },
|
||||
{ 0x875A , 0xfa50 , 0x8ff4a5 },
|
||||
{ 0x875B , 0xfa51 , 0x8ff4a6 },
|
||||
{ 0x875C , 0xfa52 , 0x8ff4a7 },
|
||||
{ 0x875D , 0xfa53 , 0x8ff4a8 },
|
||||
{ 0xEEF9 , 0xfa54 , 0xa2cc },
|
||||
{ 0xEEFA , 0xfa55 , 0x8fa2c3 },
|
||||
{ 0xEEFB , 0xfa56 , 0x8ff4a9 },
|
||||
{ 0xEEFC , 0xfa57 , 0x8ff4aa },
|
||||
{ 0x878A , 0xfa58 , 0x8ff4ab },
|
||||
{ 0x8782 , 0xfa59 , 0x8ff4ac },
|
||||
{ 0x8784 , 0xfa5a , 0x8ff4ad },
|
||||
{ 0x879A , 0xfa5b , 0xa2e8 },
|
||||
{ 0xED40 , 0xfa5c , 0x8fd4e3 },
|
||||
{ 0xED41 , 0xfa5d , 0x8fdcdf },
|
||||
{ 0xED42 , 0xfa5e , 0x8fe4e9 },
|
||||
{ 0xED43 , 0xfa5f , 0x8fe3f8 },
|
||||
{ 0xED44 , 0xfa60 , 0x8fd9a1 },
|
||||
{ 0xED45 , 0xfa61 , 0x8fb1bb },
|
||||
{ 0xED46 , 0xfa62 , 0x8ff4ae },
|
||||
{ 0xED47 , 0xfa63 , 0x8fc2ad },
|
||||
{ 0xED48 , 0xfa64 , 0x8fc3fc },
|
||||
{ 0xED49 , 0xfa65 , 0x8fe4d0 },
|
||||
{ 0xED4A , 0xfa66 , 0x8fc2bf },
|
||||
{ 0xED4B , 0xfa67 , 0x8fbcf4 },
|
||||
{ 0xED4C , 0xfa68 , 0x8fb0a9 },
|
||||
{ 0xED4D , 0xfa69 , 0x8fb0c8 },
|
||||
{ 0xED4E , 0xfa6a , 0x8ff4af },
|
||||
{ 0xED4F , 0xfa6b , 0x8fb0d2 },
|
||||
{ 0xED50 , 0xfa6c , 0x8fb0d4 },
|
||||
{ 0xED51 , 0xfa6d , 0x8fb0e3 },
|
||||
{ 0xED52 , 0xfa6e , 0x8fb0ee },
|
||||
{ 0xED53 , 0xfa6f , 0x8fb1a7 },
|
||||
{ 0xED54 , 0xfa70 , 0x8fb1a3 },
|
||||
{ 0xED55 , 0xfa71 , 0x8fb1ac },
|
||||
{ 0xED56 , 0xfa72 , 0x8fb1a9 },
|
||||
{ 0xED57 , 0xfa73 , 0x8fb1be },
|
||||
{ 0xED58 , 0xfa74 , 0x8fb1df },
|
||||
{ 0xED59 , 0xfa75 , 0x8fb1d8 },
|
||||
{ 0xED5A , 0xfa76 , 0x8fb1c8 },
|
||||
{ 0xED5B , 0xfa77 , 0x8fb1d7 },
|
||||
{ 0xED5C , 0xfa78 , 0x8fb1e3 },
|
||||
{ 0xED5D , 0xfa79 , 0x8fb1f4 },
|
||||
{ 0xED5E , 0xfa7a , 0x8fb1e1 },
|
||||
{ 0xED5F , 0xfa7b , 0x8fb2a3 },
|
||||
{ 0xED60 , 0xfa7c , 0x8ff4b0 },
|
||||
{ 0xED61 , 0xfa7d , 0x8fb2bb },
|
||||
{ 0xED62 , 0xfa7e , 0x8fb2e6 },
|
||||
{ 0xED63 , 0xfa80 , 0x8fb2ed },
|
||||
{ 0xED64 , 0xfa81 , 0x8fb2f5 },
|
||||
{ 0xED65 , 0xfa82 , 0x8fb2fc },
|
||||
{ 0xED66 , 0xfa83 , 0x8ff4b1 },
|
||||
{ 0xED67 , 0xfa84 , 0x8fb3b5 },
|
||||
{ 0xED68 , 0xfa85 , 0x8fb3d8 },
|
||||
{ 0xED69 , 0xfa86 , 0x8fb3db },
|
||||
{ 0xED6A , 0xfa87 , 0x8fb3e5 },
|
||||
{ 0xED6B , 0xfa88 , 0x8fb3ee },
|
||||
{ 0xED6C , 0xfa89 , 0x8fb3fb },
|
||||
{ 0xED6D , 0xfa8a , 0x8ff4b2 },
|
||||
{ 0xED6E , 0xfa8b , 0x8ff4b3 },
|
||||
{ 0xED6F , 0xfa8c , 0x8fb4c0 },
|
||||
{ 0xED70 , 0xfa8d , 0x8fb4c7 },
|
||||
{ 0xED71 , 0xfa8e , 0x8fb4d0 },
|
||||
{ 0xED72 , 0xfa8f , 0x8fb4de },
|
||||
{ 0xED73 , 0xfa90 , 0x8ff4b4 },
|
||||
{ 0xED74 , 0xfa91 , 0x8fb5aa },
|
||||
{ 0xED75 , 0xfa92 , 0x8ff4b5 },
|
||||
{ 0xED76 , 0xfa93 , 0x8fb5af },
|
||||
{ 0xED77 , 0xfa94 , 0x8fb5c4 },
|
||||
{ 0xED78 , 0xfa95 , 0x8fb5e8 },
|
||||
{ 0xED79 , 0xfa96 , 0x8ff4b6 },
|
||||
{ 0xED7A , 0xfa97 , 0x8fb7c2 },
|
||||
{ 0xED7B , 0xfa98 , 0x8fb7e4 },
|
||||
{ 0xED7C , 0xfa99 , 0x8fb7e8 },
|
||||
{ 0xED7D , 0xfa9a , 0x8fb7e7 },
|
||||
{ 0xED7E , 0xfa9b , 0x8ff4b7 },
|
||||
{ 0xED80 , 0xfa9c , 0x8ff4b8 },
|
||||
{ 0xED81 , 0xfa9d , 0x8ff4b9 },
|
||||
{ 0xED82 , 0xfa9e , 0x8fb8ce },
|
||||
{ 0xED83 , 0xfa9f , 0x8fb8e1 },
|
||||
{ 0xED84 , 0xfaa0 , 0x8fb8f5 },
|
||||
{ 0xED85 , 0xfaa1 , 0x8fb8f7 },
|
||||
{ 0xED86 , 0xfaa2 , 0x8fb8f8 },
|
||||
{ 0xED87 , 0xfaa3 , 0x8fb8fc },
|
||||
{ 0xED88 , 0xfaa4 , 0x8fb9af },
|
||||
{ 0xED89 , 0xfaa5 , 0x8fb9b7 },
|
||||
{ 0xED8A , 0xfaa6 , 0x8fbabe },
|
||||
{ 0xED8B , 0xfaa7 , 0x8fbadb },
|
||||
{ 0xED8C , 0xfaa8 , 0x8fcdaa },
|
||||
{ 0xED8D , 0xfaa9 , 0x8fbae1 },
|
||||
{ 0xED8E , 0xfaaa , 0x8ff4ba },
|
||||
{ 0xED8F , 0xfaab , 0x8fbaeb },
|
||||
{ 0xED90 , 0xfaac , 0x8fbbb3 },
|
||||
{ 0xED91 , 0xfaad , 0x8fbbb8 },
|
||||
{ 0xED92 , 0xfaae , 0x8ff4bb },
|
||||
{ 0xED93 , 0xfaaf , 0x8fbbca },
|
||||
{ 0xED94 , 0xfab0 , 0x8ff4bc },
|
||||
{ 0xED95 , 0xfab1 , 0x8ff4bd },
|
||||
{ 0xED96 , 0xfab2 , 0x8fbbd0 },
|
||||
{ 0xED97 , 0xfab3 , 0x8fbbde },
|
||||
{ 0xED98 , 0xfab4 , 0x8fbbf4 },
|
||||
{ 0xED99 , 0xfab5 , 0x8fbbf5 },
|
||||
{ 0xED9A , 0xfab6 , 0x8fbbf9 },
|
||||
{ 0xED9B , 0xfab7 , 0x8fbce4 },
|
||||
{ 0xED9C , 0xfab8 , 0x8fbced },
|
||||
{ 0xED9D , 0xfab9 , 0x8fbcfe },
|
||||
{ 0xED9E , 0xfaba , 0x8ff4be },
|
||||
{ 0xED9F , 0xfabb , 0x8fbdc2 },
|
||||
{ 0xEDA0 , 0xfabc , 0x8fbde7 },
|
||||
{ 0xEDA1 , 0xfabd , 0x8ff4bf },
|
||||
{ 0xEDA2 , 0xfabe , 0x8fbdf0 },
|
||||
{ 0xEDA3 , 0xfabf , 0x8fbeb0 },
|
||||
{ 0xEDA4 , 0xfac0 , 0x8fbeac },
|
||||
{ 0xEDA5 , 0xfac1 , 0x8ff4c0 },
|
||||
{ 0xEDA6 , 0xfac2 , 0x8fbeb3 },
|
||||
{ 0xEDA7 , 0xfac3 , 0x8fbebd },
|
||||
{ 0xEDA8 , 0xfac4 , 0x8fbecd },
|
||||
{ 0xEDA9 , 0xfac5 , 0x8fbec9 },
|
||||
{ 0xEDAA , 0xfac6 , 0x8fbee4 },
|
||||
{ 0xEDAB , 0xfac7 , 0x8fbfa8 },
|
||||
{ 0xEDAC , 0xfac8 , 0x8fbfc9 },
|
||||
{ 0xEDAD , 0xfac9 , 0x8fc0c4 },
|
||||
{ 0xEDAE , 0xfaca , 0x8fc0e4 },
|
||||
{ 0xEDAF , 0xfacb , 0x8fc0f4 },
|
||||
{ 0xEDB0 , 0xfacc , 0x8fc1a6 },
|
||||
{ 0xEDB1 , 0xfacd , 0x8ff4c1 },
|
||||
{ 0xEDB2 , 0xface , 0x8fc1f5 },
|
||||
{ 0xEDB3 , 0xfacf , 0x8fc1fc },
|
||||
{ 0xEDB4 , 0xfad0 , 0x8ff4c2 },
|
||||
{ 0xEDB5 , 0xfad1 , 0x8fc1f8 },
|
||||
{ 0xEDB6 , 0xfad2 , 0x8fc2ab },
|
||||
{ 0xEDB7 , 0xfad3 , 0x8fc2a1 },
|
||||
{ 0xEDB8 , 0xfad4 , 0x8fc2a5 },
|
||||
{ 0xEDB9 , 0xfad5 , 0x8ff4c3 },
|
||||
{ 0xEDBA , 0xfad6 , 0x8fc2b8 },
|
||||
{ 0xEDBB , 0xfad7 , 0x8fc2ba },
|
||||
{ 0xEDBC , 0xfad8 , 0x8ff4c4 },
|
||||
{ 0xEDBD , 0xfad9 , 0x8fc2c4 },
|
||||
{ 0xEDBE , 0xfada , 0x8fc2d2 },
|
||||
{ 0xEDBF , 0xfadb , 0x8fc2d7 },
|
||||
{ 0xEDC0 , 0xfadc , 0x8fc2db },
|
||||
{ 0xEDC1 , 0xfadd , 0x8fc2de },
|
||||
{ 0xEDC2 , 0xfade , 0x8fc2ed },
|
||||
{ 0xEDC3 , 0xfadf , 0x8fc2f0 },
|
||||
{ 0xEDC4 , 0xfae0 , 0x8ff4c5 },
|
||||
{ 0xEDC5 , 0xfae1 , 0x8fc3a1 },
|
||||
{ 0xEDC6 , 0xfae2 , 0x8fc3b5 },
|
||||
{ 0xEDC7 , 0xfae3 , 0x8fc3c9 },
|
||||
{ 0xEDC8 , 0xfae4 , 0x8fc3b9 },
|
||||
{ 0xEDC9 , 0xfae5 , 0x8ff4c6 },
|
||||
{ 0xEDCA , 0xfae6 , 0x8fc3d8 },
|
||||
{ 0xEDCB , 0xfae7 , 0x8fc3fe },
|
||||
{ 0xEDCC , 0xfae8 , 0x8ff4c7 },
|
||||
{ 0xEDCD , 0xfae9 , 0x8fc4cc },
|
||||
{ 0xEDCE , 0xfaea , 0x8ff4c8 },
|
||||
{ 0xEDCF , 0xfaeb , 0x8fc4d9 },
|
||||
{ 0xEDD0 , 0xfaec , 0x8fc4ea },
|
||||
{ 0xEDD1 , 0xfaed , 0x8fc4fd },
|
||||
{ 0xEDD2 , 0xfaee , 0x8ff4c9 },
|
||||
{ 0xEDD3 , 0xfaef , 0x8fc5a7 },
|
||||
{ 0xEDD4 , 0xfaf0 , 0x8fc5b5 },
|
||||
{ 0xEDD5 , 0xfaf1 , 0x8fc5b6 },
|
||||
{ 0xEDD6 , 0xfaf2 , 0x8ff4ca },
|
||||
{ 0xEDD7 , 0xfaf3 , 0x8fc5d5 },
|
||||
{ 0xEDD8 , 0xfaf4 , 0x8fc6b8 },
|
||||
{ 0xEDD9 , 0xfaf5 , 0x8fc6d7 },
|
||||
{ 0xEDDA , 0xfaf6 , 0x8fc6e0 },
|
||||
{ 0xEDDB , 0xfaf7 , 0x8fc6ea },
|
||||
{ 0xEDDC , 0xfaf8 , 0x8fc6e3 },
|
||||
{ 0xEDDD , 0xfaf9 , 0x8fc7a1 },
|
||||
{ 0xEDDE , 0xfafa , 0x8fc7ab },
|
||||
{ 0xEDDF , 0xfafb , 0x8fc7c7 },
|
||||
{ 0xEDE0 , 0xfafc , 0x8fc7c3 },
|
||||
{ 0xEDE1 , 0xfb40 , 0x8fc7cb },
|
||||
{ 0xEDE2 , 0xfb41 , 0x8fc7cf },
|
||||
{ 0xEDE3 , 0xfb42 , 0x8fc7d9 },
|
||||
{ 0xEDE4 , 0xfb43 , 0x8ff4cb },
|
||||
{ 0xEDE5 , 0xfb44 , 0x8ff4cc },
|
||||
{ 0xEDE6 , 0xfb45 , 0x8fc7e6 },
|
||||
{ 0xEDE7 , 0xfb46 , 0x8fc7ee },
|
||||
{ 0xEDE8 , 0xfb47 , 0x8fc7fc },
|
||||
{ 0xEDE9 , 0xfb48 , 0x8fc7eb },
|
||||
{ 0xEDEA , 0xfb49 , 0x8fc7f0 },
|
||||
{ 0xEDEB , 0xfb4a , 0x8fc8b1 },
|
||||
{ 0xEDEC , 0xfb4b , 0x8fc8e5 },
|
||||
{ 0xEDED , 0xfb4c , 0x8fc8f8 },
|
||||
{ 0xEDEE , 0xfb4d , 0x8fc9a6 },
|
||||
{ 0xEDEF , 0xfb4e , 0x8fc9ab },
|
||||
{ 0xEDF0 , 0xfb4f , 0x8fc9ad },
|
||||
{ 0xEDF1 , 0xfb50 , 0x8ff4cd },
|
||||
{ 0xEDF2 , 0xfb51 , 0x8fc9ca },
|
||||
{ 0xEDF3 , 0xfb52 , 0x8fc9d3 },
|
||||
{ 0xEDF4 , 0xfb53 , 0x8fc9e9 },
|
||||
{ 0xEDF5 , 0xfb54 , 0x8fc9e3 },
|
||||
{ 0xEDF6 , 0xfb55 , 0x8fc9fc },
|
||||
{ 0xEDF7 , 0xfb56 , 0x8fc9f4 },
|
||||
{ 0xEDF8 , 0xfb57 , 0x8fc9f5 },
|
||||
{ 0xEDF9 , 0xfb58 , 0x8ff4ce },
|
||||
{ 0xEDFA , 0xfb59 , 0x8fcab3 },
|
||||
{ 0xEDFB , 0xfb5a , 0x8fcabd },
|
||||
{ 0xEDFC , 0xfb5b , 0x8fcaef },
|
||||
{ 0xEE40 , 0xfb5c , 0x8fcaf1 },
|
||||
{ 0xEE41 , 0xfb5d , 0x8fcbae },
|
||||
{ 0xEE42 , 0xfb5e , 0x8ff4cf },
|
||||
{ 0xEE43 , 0xfb5f , 0x8fcbca },
|
||||
{ 0xEE44 , 0xfb60 , 0x8fcbe6 },
|
||||
{ 0xEE45 , 0xfb61 , 0x8fcbea },
|
||||
{ 0xEE46 , 0xfb62 , 0x8fcbf0 },
|
||||
{ 0xEE47 , 0xfb63 , 0x8fcbf4 },
|
||||
{ 0xEE48 , 0xfb64 , 0x8fcbee },
|
||||
{ 0xEE49 , 0xfb65 , 0x8fcca5 },
|
||||
{ 0xEE4A , 0xfb66 , 0x8fcbf9 },
|
||||
{ 0xEE4B , 0xfb67 , 0x8fccab },
|
||||
{ 0xEE4C , 0xfb68 , 0x8fccae },
|
||||
{ 0xEE4D , 0xfb69 , 0x8fccad },
|
||||
{ 0xEE4E , 0xfb6a , 0x8fccb2 },
|
||||
{ 0xEE4F , 0xfb6b , 0x8fccc2 },
|
||||
{ 0xEE50 , 0xfb6c , 0x8fccd0 },
|
||||
{ 0xEE51 , 0xfb6d , 0x8fccd9 },
|
||||
{ 0xEE52 , 0xfb6e , 0x8ff4d0 },
|
||||
{ 0xEE53 , 0xfb6f , 0x8fcdbb },
|
||||
{ 0xEE54 , 0xfb70 , 0x8ff4d1 },
|
||||
{ 0xEE55 , 0xfb71 , 0x8fcebb },
|
||||
{ 0xEE56 , 0xfb72 , 0x8ff4d2 },
|
||||
{ 0xEE57 , 0xfb73 , 0x8fceba },
|
||||
{ 0xEE58 , 0xfb74 , 0x8fcec3 },
|
||||
{ 0xEE59 , 0xfb75 , 0x8ff4d3 },
|
||||
{ 0xEE5A , 0xfb76 , 0x8fcef2 },
|
||||
{ 0xEE5B , 0xfb77 , 0x8fb3dd },
|
||||
{ 0xEE5C , 0xfb78 , 0x8fcfd5 },
|
||||
{ 0xEE5D , 0xfb79 , 0x8fcfe2 },
|
||||
{ 0xEE5E , 0xfb7a , 0x8fcfe9 },
|
||||
{ 0xEE5F , 0xfb7b , 0x8fcfed },
|
||||
{ 0xEE60 , 0xfb7c , 0x8ff4d4 },
|
||||
{ 0xEE61 , 0xfb7d , 0x8ff4d5 },
|
||||
{ 0xEE62 , 0xfb7e , 0x8ff4d6 },
|
||||
{ 0xEE63 , 0xfb80 , 0x8ff4d7 },
|
||||
{ 0xEE64 , 0xfb81 , 0x8fd0e5 },
|
||||
{ 0xEE65 , 0xfb82 , 0x8ff4d8 },
|
||||
{ 0xEE66 , 0xfb83 , 0x8fd0e9 },
|
||||
{ 0xEE67 , 0xfb84 , 0x8fd1e8 },
|
||||
{ 0xEE68 , 0xfb85 , 0x8ff4d9 },
|
||||
{ 0xEE69 , 0xfb86 , 0x8ff4da },
|
||||
{ 0xEE6A , 0xfb87 , 0x8fd1ec },
|
||||
{ 0xEE6B , 0xfb88 , 0x8fd2bb },
|
||||
{ 0xEE6C , 0xfb89 , 0x8ff4db },
|
||||
{ 0xEE6D , 0xfb8a , 0x8fd3e1 },
|
||||
{ 0xEE6E , 0xfb8b , 0x8fd3e8 },
|
||||
{ 0xEE6F , 0xfb8c , 0x8fd4a7 },
|
||||
{ 0xEE70 , 0xfb8d , 0x8ff4dc },
|
||||
{ 0xEE71 , 0xfb8e , 0x8ff4dd },
|
||||
{ 0xEE72 , 0xfb8f , 0x8fd4d4 },
|
||||
{ 0xEE73 , 0xfb90 , 0x8fd4f2 },
|
||||
{ 0xEE74 , 0xfb91 , 0x8fd5ae },
|
||||
{ 0xEE75 , 0xfb92 , 0x8ff4de },
|
||||
{ 0xEE76 , 0xfb93 , 0x8fd7de },
|
||||
{ 0xEE77 , 0xfb94 , 0x8ff4df },
|
||||
{ 0xEE78 , 0xfb95 , 0x8fd8a2 },
|
||||
{ 0xEE79 , 0xfb96 , 0x8fd8b7 },
|
||||
{ 0xEE7A , 0xfb97 , 0x8fd8c1 },
|
||||
{ 0xEE7B , 0xfb98 , 0x8fd8d1 },
|
||||
{ 0xEE7C , 0xfb99 , 0x8fd8f4 },
|
||||
{ 0xEE7D , 0xfb9a , 0x8fd9c6 },
|
||||
{ 0xEE7E , 0xfb9b , 0x8fd9c8 },
|
||||
{ 0xEE80 , 0xfb9c , 0x8fd9d1 },
|
||||
{ 0xEE81 , 0xfb9d , 0x8ff4e0 },
|
||||
{ 0xEE82 , 0xfb9e , 0x8ff4e1 },
|
||||
{ 0xEE83 , 0xfb9f , 0x8ff4e2 },
|
||||
{ 0xEE84 , 0xfba0 , 0x8ff4e3 },
|
||||
{ 0xEE85 , 0xfba1 , 0x8ff4e4 },
|
||||
{ 0xEE86 , 0xfba2 , 0x8fdcd3 },
|
||||
{ 0xEE87 , 0xfba3 , 0x8fddc8 },
|
||||
{ 0xEE88 , 0xfba4 , 0x8fddd4 },
|
||||
{ 0xEE89 , 0xfba5 , 0x8fddea },
|
||||
{ 0xEE8A , 0xfba6 , 0x8fddfa },
|
||||
{ 0xEE8B , 0xfba7 , 0x8fdea4 },
|
||||
{ 0xEE8C , 0xfba8 , 0x8fdeb0 },
|
||||
{ 0xEE8D , 0xfba9 , 0x8ff4e5 },
|
||||
{ 0xEE8E , 0xfbaa , 0x8fdeb5 },
|
||||
{ 0xEE8F , 0xfbab , 0x8fdecb },
|
||||
{ 0xEE90 , 0xfbac , 0x8ff4e6 },
|
||||
{ 0xEE91 , 0xfbad , 0x8fdfb9 },
|
||||
{ 0xEE92 , 0xfbae , 0x8ff4e7 },
|
||||
{ 0xEE93 , 0xfbaf , 0x8fdfc3 },
|
||||
{ 0xEE94 , 0xfbb0 , 0x8ff4e8 },
|
||||
{ 0xEE95 , 0xfbb1 , 0x8ff4e9 },
|
||||
{ 0xEE96 , 0xfbb2 , 0x8fe0d9 },
|
||||
{ 0xEE97 , 0xfbb3 , 0x8ff4ea },
|
||||
{ 0xEE98 , 0xfbb4 , 0x8ff4eb },
|
||||
{ 0xEE99 , 0xfbb5 , 0x8fe1e2 },
|
||||
{ 0xEE9A , 0xfbb6 , 0x8ff4ec },
|
||||
{ 0xEE9B , 0xfbb7 , 0x8ff4ed },
|
||||
{ 0xEE9C , 0xfbb8 , 0x8ff4ee },
|
||||
{ 0xEE9D , 0xfbb9 , 0x8fe2c7 },
|
||||
{ 0xEE9E , 0xfbba , 0x8fe3a8 },
|
||||
{ 0xEE9F , 0xfbbb , 0x8fe3a6 },
|
||||
{ 0xEEA0 , 0xfbbc , 0x8fe3a9 },
|
||||
{ 0xEEA1 , 0xfbbd , 0x8fe3af },
|
||||
{ 0xEEA2 , 0xfbbe , 0x8fe3b0 },
|
||||
{ 0xEEA3 , 0xfbbf , 0x8fe3aa },
|
||||
{ 0xEEA4 , 0xfbc0 , 0x8fe3ab },
|
||||
{ 0xEEA5 , 0xfbc1 , 0x8fe3bc },
|
||||
{ 0xEEA6 , 0xfbc2 , 0x8fe3c1 },
|
||||
{ 0xEEA7 , 0xfbc3 , 0x8fe3bf },
|
||||
{ 0xEEA8 , 0xfbc4 , 0x8fe3d5 },
|
||||
{ 0xEEA9 , 0xfbc5 , 0x8fe3d8 },
|
||||
{ 0xEEAA , 0xfbc6 , 0x8fe3d6 },
|
||||
{ 0xEEAB , 0xfbc7 , 0x8fe3df },
|
||||
{ 0xEEAC , 0xfbc8 , 0x8fe3e3 },
|
||||
{ 0xEEAD , 0xfbc9 , 0x8fe3e1 },
|
||||
{ 0xEEAE , 0xfbca , 0x8fe3d4 },
|
||||
{ 0xEEAF , 0xfbcb , 0x8fe3e9 },
|
||||
{ 0xEEB0 , 0xfbcc , 0x8fe4a6 },
|
||||
{ 0xEEB1 , 0xfbcd , 0x8fe3f1 },
|
||||
{ 0xEEB2 , 0xfbce , 0x8fe3f2 },
|
||||
{ 0xEEB3 , 0xfbcf , 0x8fe4cb },
|
||||
{ 0xEEB4 , 0xfbd0 , 0x8fe4c1 },
|
||||
{ 0xEEB5 , 0xfbd1 , 0x8fe4c3 },
|
||||
{ 0xEEB6 , 0xfbd2 , 0x8fe4be },
|
||||
{ 0xEEB7 , 0xfbd3 , 0x8ff4ef },
|
||||
{ 0xEEB8 , 0xfbd4 , 0x8fe4c0 },
|
||||
{ 0xEEB9 , 0xfbd5 , 0x8fe4c7 },
|
||||
{ 0xEEBA , 0xfbd6 , 0x8fe4bf },
|
||||
{ 0xEEBB , 0xfbd7 , 0x8fe4e0 },
|
||||
{ 0xEEBC , 0xfbd8 , 0x8fe4de },
|
||||
{ 0xEEBD , 0xfbd9 , 0x8fe4d1 },
|
||||
{ 0xEEBE , 0xfbda , 0x8ff4f0 },
|
||||
{ 0xEEBF , 0xfbdb , 0x8fe4dc },
|
||||
{ 0xEEC0 , 0xfbdc , 0x8fe4d2 },
|
||||
{ 0xEEC1 , 0xfbdd , 0x8fe4db },
|
||||
{ 0xEEC2 , 0xfbde , 0x8fe4d4 },
|
||||
{ 0xEEC3 , 0xfbdf , 0x8fe4fa },
|
||||
{ 0xEEC4 , 0xfbe0 , 0x8fe4ef },
|
||||
{ 0xEEC5 , 0xfbe1 , 0x8fe5b3 },
|
||||
{ 0xEEC6 , 0xfbe2 , 0x8fe5bf },
|
||||
{ 0xEEC7 , 0xfbe3 , 0x8fe5c9 },
|
||||
{ 0xEEC8 , 0xfbe4 , 0x8fe5d0 },
|
||||
{ 0xEEC9 , 0xfbe5 , 0x8fe5e2 },
|
||||
{ 0xEECA , 0xfbe6 , 0x8fe5ea },
|
||||
{ 0xEECB , 0xfbe7 , 0x8fe5eb },
|
||||
{ 0xEECC , 0xfbe8 , 0x8ff4f1 },
|
||||
{ 0xEECD , 0xfbe9 , 0x8ff4f2 },
|
||||
{ 0xEECE , 0xfbea , 0x8ff4f3 },
|
||||
{ 0xEECF , 0xfbeb , 0x8fe6e8 },
|
||||
{ 0xEED0 , 0xfbec , 0x8fe6ef },
|
||||
{ 0xEED1 , 0xfbed , 0x8fe7ac },
|
||||
{ 0xEED2 , 0xfbee , 0x8ff4f4 },
|
||||
{ 0xEED3 , 0xfbef , 0x8fe7ae },
|
||||
{ 0xEED4 , 0xfbf0 , 0x8ff4f5 },
|
||||
{ 0xEED5 , 0xfbf1 , 0x8fe7b1 },
|
||||
{ 0xEED6 , 0xfbf2 , 0x8ff4f6 },
|
||||
{ 0xEED7 , 0xfbf3 , 0x8fe7b2 },
|
||||
{ 0xEED8 , 0xfbf4 , 0x8fe8b1 },
|
||||
{ 0xEED9 , 0xfbf5 , 0x8fe8b6 },
|
||||
{ 0xEEDA , 0xfbf6 , 0x8ff4f7 },
|
||||
{ 0xEEDB , 0xfbf7 , 0x8ff4f8 },
|
||||
{ 0xEEDC , 0xfbf8 , 0x8fe8dd },
|
||||
{ 0xEEDD , 0xfbf9 , 0x8ff4f9 },
|
||||
{ 0xEEDE , 0xfbfa , 0x8ff4fa },
|
||||
{ 0xEEDF , 0xfbfb , 0x8fe9d1 },
|
||||
{ 0xEEE0 , 0xfbfc , 0x8ff4fb },
|
||||
{ 0xEEE1 , 0xfc40 , 0x8fe9ed },
|
||||
{ 0xEEE2 , 0xfc41 , 0x8feacd },
|
||||
{ 0xEEE3 , 0xfc42 , 0x8ff4fc },
|
||||
{ 0xEEE4 , 0xfc43 , 0x8feadb },
|
||||
{ 0xEEE5 , 0xfc44 , 0x8feae6 },
|
||||
{ 0xEEE6 , 0xfc45 , 0x8feaea },
|
||||
{ 0xEEE7 , 0xfc46 , 0x8feba5 },
|
||||
{ 0xEEE8 , 0xfc47 , 0x8febfb },
|
||||
{ 0xEEE9 , 0xfc48 , 0x8febfa },
|
||||
{ 0xEEEA , 0xfc49 , 0x8ff4fd },
|
||||
{ 0xEEEB , 0xfc4a , 0x8fecd6 },
|
||||
{ 0xEEEC , 0xfc4b , 0x8ff4fe },
|
||||
{ 0xffff , 0xffff , 0xffff } /* Stop code */
|
||||
};
|
||||
|
|
@ -0,0 +1,14 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := euc_tw_and_big5
|
||||
|
||||
SRCS += big5.c
|
||||
OBJS += big5.o
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,378 @@
|
|||
/*
|
||||
* conversion between BIG5 and Mule Internal Code(CNS 116643-1992
|
||||
* plane 1 and plane 2).
|
||||
* This program is partially copied from lv(Multilingual file viewer)
|
||||
* and slightly modified. lv is written and copyrighted by NARITA Tomio
|
||||
* (nrt@web.ad.jp).
|
||||
*
|
||||
* 1999/1/15 Tatsuo Ishii
|
||||
*
|
||||
* $Id: big5.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*/
|
||||
|
||||
/* can be used in either frontend or backend */
|
||||
#include "postgres_fe.h"
|
||||
|
||||
#include "mb/pg_wchar.h"
|
||||
|
||||
typedef struct
|
||||
{
|
||||
unsigned short code,
|
||||
peer;
|
||||
} codes_t;
|
||||
|
||||
/* map Big5 Level 1 to CNS 11643-1992 Plane 1 */
|
||||
static codes_t big5Level1ToCnsPlane1[25] = { /* range */
|
||||
{0xA140, 0x2121},
|
||||
{0xA1F6, 0x2258},
|
||||
{0xA1F7, 0x2257},
|
||||
{0xA1F8, 0x2259},
|
||||
{0xA2AF, 0x2421},
|
||||
{0xA3C0, 0x4221},
|
||||
{0xa3e1, 0x0000},
|
||||
{0xA440, 0x4421},
|
||||
{0xACFE, 0x5753},
|
||||
{0xacff, 0x0000},
|
||||
{0xAD40, 0x5323},
|
||||
{0xAFD0, 0x5754},
|
||||
{0xBBC8, 0x6B51},
|
||||
{0xBE52, 0x6B50},
|
||||
{0xBE53, 0x6F5C},
|
||||
{0xC1AB, 0x7536},
|
||||
{0xC2CB, 0x7535},
|
||||
{0xC2CC, 0x7737},
|
||||
{0xC361, 0x782E},
|
||||
{0xC3B9, 0x7865},
|
||||
{0xC3BA, 0x7864},
|
||||
{0xC3BB, 0x7866},
|
||||
{0xC456, 0x782D},
|
||||
{0xC457, 0x7962},
|
||||
{0xc67f, 0x0000}
|
||||
};
|
||||
|
||||
/* map CNS 11643-1992 Plane 1 to Big5 Level 1 */
|
||||
static codes_t cnsPlane1ToBig5Level1[26] = { /* range */
|
||||
{0x2121, 0xA140},
|
||||
{0x2257, 0xA1F7},
|
||||
{0x2258, 0xA1F6},
|
||||
{0x2259, 0xA1F8},
|
||||
{0x234f, 0x0000},
|
||||
{0x2421, 0xA2AF},
|
||||
{0x2571, 0x0000},
|
||||
{0x4221, 0xA3C0},
|
||||
{0x4242, 0x0000},
|
||||
{0x4421, 0xA440},
|
||||
{0x5323, 0xAD40},
|
||||
{0x5753, 0xACFE},
|
||||
{0x5754, 0xAFD0},
|
||||
{0x6B50, 0xBE52},
|
||||
{0x6B51, 0xBBC8},
|
||||
{0x6F5C, 0xBE53},
|
||||
{0x7535, 0xC2CB},
|
||||
{0x7536, 0xC1AB},
|
||||
{0x7737, 0xC2CC},
|
||||
{0x782D, 0xC456},
|
||||
{0x782E, 0xC361},
|
||||
{0x7864, 0xC3BA},
|
||||
{0x7865, 0xC3B9},
|
||||
{0x7866, 0xC3BB},
|
||||
{0x7962, 0xC457},
|
||||
{0x7d4c, 0x0000}
|
||||
};
|
||||
|
||||
/* map Big5 Level 2 to CNS 11643-1992 Plane 2 */
|
||||
static codes_t big5Level2ToCnsPlane2[48] = { /* range */
|
||||
{0xC940, 0x2121},
|
||||
{0xc94a, 0x0000},
|
||||
{0xC94B, 0x212B},
|
||||
{0xC96C, 0x214D},
|
||||
{0xC9BE, 0x214C},
|
||||
{0xC9BF, 0x217D},
|
||||
{0xC9ED, 0x224E},
|
||||
{0xCAF7, 0x224D},
|
||||
{0xCAF8, 0x2439},
|
||||
{0xD77A, 0x3F6A},
|
||||
{0xD77B, 0x387E},
|
||||
{0xDBA7, 0x3F6B},
|
||||
{0xDDFC, 0x4176},
|
||||
{0xDDFD, 0x4424},
|
||||
{0xE8A3, 0x554C},
|
||||
{0xE976, 0x5723},
|
||||
{0xEB5B, 0x5A29},
|
||||
{0xEBF1, 0x554B},
|
||||
{0xEBF2, 0x5B3F},
|
||||
{0xECDE, 0x5722},
|
||||
{0xECDF, 0x5C6A},
|
||||
{0xEDAA, 0x5D75},
|
||||
{0xEEEB, 0x642F},
|
||||
{0xEEEC, 0x6039},
|
||||
{0xF056, 0x5D74},
|
||||
{0xF057, 0x6243},
|
||||
{0xF0CB, 0x5A28},
|
||||
{0xF0CC, 0x6337},
|
||||
{0xF163, 0x6430},
|
||||
{0xF16B, 0x6761},
|
||||
{0xF16C, 0x6438},
|
||||
{0xF268, 0x6934},
|
||||
{0xF269, 0x6573},
|
||||
{0xF2C3, 0x664E},
|
||||
{0xF375, 0x6762},
|
||||
{0xF466, 0x6935},
|
||||
{0xF4B5, 0x664D},
|
||||
{0xF4B6, 0x6962},
|
||||
{0xF4FD, 0x6A4C},
|
||||
{0xF663, 0x6A4B},
|
||||
{0xF664, 0x6C52},
|
||||
{0xF977, 0x7167},
|
||||
{0xF9C4, 0x7166},
|
||||
{0xF9C5, 0x7234},
|
||||
{0xF9C6, 0x7240},
|
||||
{0xF9C7, 0x7235},
|
||||
{0xF9D2, 0x7241},
|
||||
{0xf9d6, 0x0000}
|
||||
};
|
||||
|
||||
/* map CNS 11643-1992 Plane 2 to Big5 Level 2 */
|
||||
static codes_t cnsPlane2ToBig5Level2[49] = { /* range */
|
||||
{0x2121, 0xC940},
|
||||
{0x212B, 0xC94B},
|
||||
{0x214C, 0xC9BE},
|
||||
{0x214D, 0xC96C},
|
||||
{0x217D, 0xC9BF},
|
||||
{0x224D, 0xCAF7},
|
||||
{0x224E, 0xC9ED},
|
||||
{0x2439, 0xCAF8},
|
||||
{0x387E, 0xD77B},
|
||||
{0x3F6A, 0xD77A},
|
||||
{0x3F6B, 0xDBA7},
|
||||
{0x4424, 0x0000},
|
||||
{0x4176, 0xDDFC},
|
||||
{0x4177, 0x0000},
|
||||
{0x4424, 0xDDFD},
|
||||
{0x554B, 0xEBF1},
|
||||
{0x554C, 0xE8A3},
|
||||
{0x5722, 0xECDE},
|
||||
{0x5723, 0xE976},
|
||||
{0x5A28, 0xF0CB},
|
||||
{0x5A29, 0xEB5B},
|
||||
{0x5B3F, 0xEBF2},
|
||||
{0x5C6A, 0xECDF},
|
||||
{0x5D74, 0xF056},
|
||||
{0x5D75, 0xEDAA},
|
||||
{0x6039, 0xEEEC},
|
||||
{0x6243, 0xF057},
|
||||
{0x6337, 0xF0CC},
|
||||
{0x642F, 0xEEEB},
|
||||
{0x6430, 0xF163},
|
||||
{0x6438, 0xF16C},
|
||||
{0x6573, 0xF269},
|
||||
{0x664D, 0xF4B5},
|
||||
{0x664E, 0xF2C3},
|
||||
{0x6761, 0xF16B},
|
||||
{0x6762, 0xF375},
|
||||
{0x6934, 0xF268},
|
||||
{0x6935, 0xF466},
|
||||
{0x6962, 0xF4B6},
|
||||
{0x6A4B, 0xF663},
|
||||
{0x6A4C, 0xF4FD},
|
||||
{0x6C52, 0xF664},
|
||||
{0x7166, 0xF9C4},
|
||||
{0x7167, 0xF977},
|
||||
{0x7234, 0xF9C5},
|
||||
{0x7235, 0xF9C7},
|
||||
{0x7240, 0xF9C6},
|
||||
{0x7241, 0xF9D2},
|
||||
{0x7245, 0x0000}
|
||||
};
|
||||
|
||||
/* Big Five Level 1 Correspondence to CNS 11643-1992 Plane 4 */
|
||||
static unsigned short b1c4[][2] = {
|
||||
{0xC879, 0x2123},
|
||||
{0xC87B, 0x2124},
|
||||
{0xC87D, 0x212A},
|
||||
{0xC8A2, 0x2152}
|
||||
};
|
||||
|
||||
/* Big Five Level 2 Correspondence to CNS 11643-1992 Plane 3 */
|
||||
static unsigned short b2c3[][2] = {
|
||||
{0xF9D6, 0x4337},
|
||||
{0xF9D7, 0x4F50},
|
||||
{0xF9D8, 0x444E},
|
||||
{0xF9D9, 0x504A},
|
||||
{0xF9DA, 0x2C5D},
|
||||
{0xF9DB, 0x3D7E},
|
||||
{0xF9DC, 0x4B5C}
|
||||
};
|
||||
|
||||
static unsigned short BinarySearchRange
|
||||
(codes_t *array, int high, unsigned short code)
|
||||
{
|
||||
int low,
|
||||
mid,
|
||||
distance,
|
||||
tmp;
|
||||
|
||||
low = 0;
|
||||
mid = high >> 1;
|
||||
|
||||
for (; low <= high; mid = (low + high) >> 1)
|
||||
{
|
||||
if ((array[mid].code <= code) && (array[mid + 1].code > code))
|
||||
{
|
||||
if (0 == array[mid].peer)
|
||||
return 0;
|
||||
if (code >= 0xa140U)
|
||||
{
|
||||
/* big5 to cns */
|
||||
tmp = ((code & 0xff00) - (array[mid].code & 0xff00)) >> 8;
|
||||
high = code & 0x00ff;
|
||||
low = array[mid].code & 0x00ff;
|
||||
|
||||
/*
|
||||
* NOTE: big5 high_byte: 0xa1-0xfe, low_byte: 0x40-0x7e,
|
||||
* 0xa1-0xfe (radicals: 0x00-0x3e, 0x3f-0x9c) big5 radix
|
||||
* is 0x9d. [region_low, region_high]
|
||||
* We should remember big5 has two different regions
|
||||
* (above). There is a bias for the distance between these
|
||||
* regions. 0xa1 - 0x7e + bias = 1 (Distance between 0xa1
|
||||
* and 0x7e is 1.) bias = - 0x22.
|
||||
*/
|
||||
distance = tmp * 0x9d + high - low +
|
||||
(high >= 0xa1 ? (low >= 0xa1 ? 0 : -0x22)
|
||||
: (low >= 0xa1 ? +0x22 : 0));
|
||||
|
||||
/*
|
||||
* NOTE: we have to convert the distance into a code
|
||||
* point. The code point's low_byte is 0x21 plus mod_0x5e.
|
||||
* In the first, we extract the mod_0x5e of the starting
|
||||
* code point, subtracting 0x21, and add distance to it.
|
||||
* Then we calculate again mod_0x5e of them, and restore
|
||||
* the final codepoint, adding 0x21.
|
||||
*/
|
||||
tmp = (array[mid].peer & 0x00ff) + distance - 0x21;
|
||||
tmp = (array[mid].peer & 0xff00) + ((tmp / 0x5e) << 8)
|
||||
+ 0x21 + tmp % 0x5e;
|
||||
return tmp;
|
||||
}
|
||||
else
|
||||
{
|
||||
/* cns to big5 */
|
||||
tmp = ((code & 0xff00) - (array[mid].code & 0xff00)) >> 8;
|
||||
|
||||
/*
|
||||
* NOTE: ISO charsets ranges between 0x21-0xfe
|
||||
* (94charset). Its radix is 0x5e. But there is no
|
||||
* distance bias like big5.
|
||||
*/
|
||||
distance = tmp * 0x5e
|
||||
+ ((int) (code & 0x00ff) - (int) (array[mid].code & 0x00ff));
|
||||
|
||||
/*
|
||||
* NOTE: Similar to big5 to cns conversion, we extract
|
||||
* mod_0x9d and restore mod_0x9d into a code point.
|
||||
*/
|
||||
low = array[mid].peer & 0x00ff;
|
||||
tmp = low + distance - (low >= 0xa1 ? 0x62 : 0x40);
|
||||
low = tmp % 0x9d;
|
||||
tmp = (array[mid].peer & 0xff00) + ((tmp / 0x9d) << 8)
|
||||
+ (low > 0x3e ? 0x62 : 0x40) + low;
|
||||
return tmp;
|
||||
}
|
||||
}
|
||||
else if (array[mid].code > code)
|
||||
high = mid - 1;
|
||||
else
|
||||
low = mid + 1;
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
unsigned short
|
||||
BIG5toCNS(unsigned short big5, unsigned char *lc)
|
||||
{
|
||||
unsigned short cns = 0;
|
||||
int i;
|
||||
|
||||
if (big5 < 0xc940U)
|
||||
{
|
||||
/* level 1 */
|
||||
|
||||
for (i = 0; i < sizeof(b1c4) / sizeof(unsigned short); i++)
|
||||
{
|
||||
if (b1c4[i][0] == big5)
|
||||
{
|
||||
*lc = LC_CNS11643_4;
|
||||
return (b1c4[i][1] | 0x8080U);
|
||||
}
|
||||
}
|
||||
|
||||
if (0 < (cns = BinarySearchRange(big5Level1ToCnsPlane1, 23, big5)))
|
||||
*lc = LC_CNS11643_1;
|
||||
}
|
||||
else if (big5 == 0xc94aU)
|
||||
{
|
||||
/* level 2 */
|
||||
*lc = LC_CNS11643_1;
|
||||
cns = 0x4442;
|
||||
}
|
||||
else
|
||||
{
|
||||
/* level 2 */
|
||||
for (i = 0; i < sizeof(b2c3) / sizeof(unsigned short); i++)
|
||||
{
|
||||
if (b2c3[i][0] == big5)
|
||||
{
|
||||
*lc = LC_CNS11643_3;
|
||||
return (b2c3[i][1] | 0x8080U);
|
||||
}
|
||||
}
|
||||
|
||||
if (0 < (cns = BinarySearchRange(big5Level2ToCnsPlane2, 46, big5)))
|
||||
*lc = LC_CNS11643_2;
|
||||
}
|
||||
|
||||
if (0 == cns)
|
||||
{ /* no mapping Big5 to CNS 11643-1992 */
|
||||
*lc = 0;
|
||||
return (unsigned short) '?';
|
||||
}
|
||||
|
||||
return cns | 0x8080;
|
||||
}
|
||||
|
||||
unsigned short
|
||||
CNStoBIG5(unsigned short cns, unsigned char lc)
|
||||
{
|
||||
int i;
|
||||
unsigned int big5 = 0;
|
||||
|
||||
cns &= 0x7f7f;
|
||||
|
||||
switch (lc)
|
||||
{
|
||||
case LC_CNS11643_1:
|
||||
big5 = BinarySearchRange(cnsPlane1ToBig5Level1, 24, cns);
|
||||
break;
|
||||
case LC_CNS11643_2:
|
||||
big5 = BinarySearchRange(cnsPlane2ToBig5Level2, 47, cns);
|
||||
break;
|
||||
case LC_CNS11643_3:
|
||||
for (i = 0; i < sizeof(b2c3) / sizeof(unsigned short); i++)
|
||||
{
|
||||
if (b2c3[i][1] == cns)
|
||||
return (b2c3[i][0]);
|
||||
}
|
||||
break;
|
||||
case LC_CNS11643_4:
|
||||
for (i = 0; i < sizeof(b1c4) / sizeof(unsigned short); i++)
|
||||
{
|
||||
if (b1c4[i][1] == cns)
|
||||
return (b1c4[i][0]);
|
||||
}
|
||||
default:
|
||||
break;
|
||||
}
|
||||
return big5;
|
||||
}
|
||||
|
|
@ -0,0 +1,340 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* EUC_TW, BIG5 and MULE_INTERNAL
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/euc_tw_and_big5/euc_tw_and_big5.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
|
||||
#define ENCODING_GROWTH_RATE 4
|
||||
|
||||
PG_FUNCTION_INFO_V1(euc_tw_to_big5)
|
||||
PG_FUNCTION_INFO_V1(big5_to_euc_tw)
|
||||
PG_FUNCTION_INFO_V1(euc_tw_to_mic)
|
||||
PG_FUNCTION_INFO_V1(mic_to_euc_tw)
|
||||
PG_FUNCTION_INFO_V1(big5_to_mic)
|
||||
PG_FUNCTION_INFO_V1(mic_to_big5)
|
||||
|
||||
extern Datum euc_tw_to_big5(PG_FUNCTION_ARGS);
|
||||
extern Datum big5_to_euc_tw(PG_FUNCTION_ARGS);
|
||||
extern Datum euc_tw_to_mic(PG_FUNCTION_ARGS);
|
||||
extern Datum mic_to_euc_tw(PG_FUNCTION_ARGS);
|
||||
extern Datum big5_to_mic(PG_FUNCTION_ARGS);
|
||||
extern Datum mic_to_big5(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
|
||||
static void big52mic(unsigned char *big5, unsigned char *p, int len);
|
||||
static void mic2big5(unsigned char *mic, unsigned char *p, int len);
|
||||
static void euc_tw2mic(unsigned char *euc, unsigned char *p, int len);
|
||||
static void mic2euc_tw(unsigned char *mic, unsigned char *p, int len);
|
||||
|
||||
Datum
|
||||
euc_tw_to_big5(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
unsigned char *buf;
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_EUC_TW);
|
||||
Assert(PG_GETARG_INT32(1) == PG_BIG5);
|
||||
Assert(len > 0);
|
||||
|
||||
buf = palloc(len * ENCODING_GROWTH_RATE);
|
||||
euc_tw2mic(src, buf, len);
|
||||
mic2big5(buf, dest, strlen(buf));
|
||||
pfree(buf);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
big5_to_euc_tw(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
unsigned char *buf;
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_BIG5);
|
||||
Assert(PG_GETARG_INT32(1) == PG_EUC_TW);
|
||||
Assert(len > 0);
|
||||
|
||||
buf = palloc(len * ENCODING_GROWTH_RATE);
|
||||
big52mic(src, buf, len);
|
||||
mic2euc_tw(buf, dest, strlen(buf));
|
||||
pfree(buf);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
euc_tw_to_mic(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_EUC_TW);
|
||||
Assert(PG_GETARG_INT32(1) == PG_MULE_INTERNAL);
|
||||
Assert(len > 0);
|
||||
|
||||
euc_tw2mic(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
mic_to_euc_tw(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_MULE_INTERNAL);
|
||||
Assert(PG_GETARG_INT32(1) == PG_EUC_TW);
|
||||
Assert(len > 0);
|
||||
|
||||
mic2big5(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
big5_to_mic(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_BIG5);
|
||||
Assert(PG_GETARG_INT32(1) == PG_MULE_INTERNAL);
|
||||
Assert(len > 0);
|
||||
|
||||
big52mic(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
mic_to_big5(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_MULE_INTERNAL);
|
||||
Assert(PG_GETARG_INT32(1) == PG_BIG5);
|
||||
Assert(len > 0);
|
||||
|
||||
mic2big5(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
/*
|
||||
* EUC_TW ---> MIC
|
||||
*/
|
||||
static void
|
||||
euc_tw2mic(unsigned char *euc, unsigned char *p, int len)
|
||||
{
|
||||
int c1;
|
||||
|
||||
while (len > 0 && (c1 = *euc++))
|
||||
{
|
||||
if (c1 == SS2)
|
||||
{
|
||||
len -= 4;
|
||||
c1 = *euc++; /* plane No. */
|
||||
if (c1 == 0xa1)
|
||||
*p++ = LC_CNS11643_1;
|
||||
else if (c1 == 0xa2)
|
||||
*p++ = LC_CNS11643_2;
|
||||
else
|
||||
{
|
||||
*p++ = 0x9d; /* LCPRV2 */
|
||||
*p++ = 0xa3 - c1 + LC_CNS11643_3;
|
||||
}
|
||||
*p++ = *euc++;
|
||||
*p++ = *euc++;
|
||||
}
|
||||
else if (c1 & 0x80)
|
||||
{ /* CNS11643-1 */
|
||||
len -= 2;
|
||||
*p++ = LC_CNS11643_1;
|
||||
*p++ = c1;
|
||||
*p++ = *euc++;
|
||||
}
|
||||
else
|
||||
{ /* should be ASCII */
|
||||
len--;
|
||||
*p++ = c1;
|
||||
}
|
||||
}
|
||||
*p = '\0';
|
||||
}
|
||||
|
||||
/*
|
||||
* MIC ---> EUC_TW
|
||||
*/
|
||||
static void
|
||||
mic2euc_tw(unsigned char *mic, unsigned char *p, int len)
|
||||
{
|
||||
int c1;
|
||||
|
||||
while (len > 0 && (c1 = *mic))
|
||||
{
|
||||
len -= pg_mic_mblen(mic++);
|
||||
|
||||
if (c1 == LC_CNS11643_1)
|
||||
{
|
||||
*p++ = *mic++;
|
||||
*p++ = *mic++;
|
||||
}
|
||||
else if (c1 == LC_CNS11643_2)
|
||||
{
|
||||
*p++ = SS2;
|
||||
*p++ = 0xa2;
|
||||
*p++ = *mic++;
|
||||
*p++ = *mic++;
|
||||
}
|
||||
else if (c1 == 0x9d)
|
||||
{ /* LCPRV2? */
|
||||
*p++ = SS2;
|
||||
*p++ = *mic++ - LC_CNS11643_3 + 0xa3;
|
||||
*p++ = *mic++;
|
||||
*p++ = *mic++;
|
||||
}
|
||||
else if (c1 > 0x7f)
|
||||
{ /* cannot convert to EUC_TW! */
|
||||
mic--;
|
||||
pg_print_bogus_char(&mic, &p);
|
||||
}
|
||||
else
|
||||
{ /* should be ASCII */
|
||||
*p++ = c1;
|
||||
}
|
||||
}
|
||||
*p = '\0';
|
||||
}
|
||||
|
||||
/*
|
||||
* Big5 ---> MIC
|
||||
*/
|
||||
static void
|
||||
big52mic(unsigned char *big5, unsigned char *p, int len)
|
||||
{
|
||||
unsigned short c1;
|
||||
unsigned short big5buf,
|
||||
cnsBuf;
|
||||
unsigned char lc;
|
||||
char bogusBuf[3];
|
||||
int i;
|
||||
|
||||
while (len > 0 && (c1 = *big5++))
|
||||
{
|
||||
if (c1 <= 0x7fU)
|
||||
{ /* ASCII */
|
||||
len--;
|
||||
*p++ = c1;
|
||||
}
|
||||
else
|
||||
{
|
||||
len -= 2;
|
||||
big5buf = c1 << 8;
|
||||
c1 = *big5++;
|
||||
big5buf |= c1;
|
||||
cnsBuf = BIG5toCNS(big5buf, &lc);
|
||||
if (lc != 0)
|
||||
{
|
||||
if (lc == LC_CNS11643_3 || lc == LC_CNS11643_4)
|
||||
{
|
||||
*p++ = 0x9d; /* LCPRV2 */
|
||||
}
|
||||
*p++ = lc; /* Plane No. */
|
||||
*p++ = (cnsBuf >> 8) & 0x00ff;
|
||||
*p++ = cnsBuf & 0x00ff;
|
||||
}
|
||||
else
|
||||
{ /* cannot convert */
|
||||
big5 -= 2;
|
||||
*p++ = '(';
|
||||
for (i = 0; i < 2; i++)
|
||||
{
|
||||
sprintf(bogusBuf, "%02x", *big5++);
|
||||
*p++ = bogusBuf[0];
|
||||
*p++ = bogusBuf[1];
|
||||
}
|
||||
*p++ = ')';
|
||||
}
|
||||
}
|
||||
}
|
||||
*p = '\0';
|
||||
}
|
||||
|
||||
/*
|
||||
* MIC ---> Big5
|
||||
*/
|
||||
static void
|
||||
mic2big5(unsigned char *mic, unsigned char *p, int len)
|
||||
{
|
||||
int l;
|
||||
unsigned short c1;
|
||||
unsigned short big5buf,
|
||||
cnsBuf;
|
||||
|
||||
while (len > 0 && (c1 = *mic))
|
||||
{
|
||||
l = pg_mic_mblen(mic++);
|
||||
len -= l;
|
||||
|
||||
/* 0x9d means LCPRV2 */
|
||||
if (c1 == LC_CNS11643_1 || c1 == LC_CNS11643_2 || c1 == 0x9d)
|
||||
{
|
||||
if (c1 == 0x9d)
|
||||
{
|
||||
c1 = *mic++; /* get plane no. */
|
||||
}
|
||||
cnsBuf = (*mic++) << 8;
|
||||
cnsBuf |= (*mic++) & 0x00ff;
|
||||
big5buf = CNStoBIG5(cnsBuf, c1);
|
||||
if (big5buf == 0)
|
||||
{ /* cannot convert to Big5! */
|
||||
mic -= l;
|
||||
pg_print_bogus_char(&mic, &p);
|
||||
}
|
||||
else
|
||||
{
|
||||
*p++ = (big5buf >> 8) & 0x00ff;
|
||||
*p++ = big5buf & 0x00ff;
|
||||
}
|
||||
}
|
||||
else if (c1 <= 0x7f) /* ASCII */
|
||||
*p++ = c1;
|
||||
else
|
||||
{ /* cannot convert to Big5! */
|
||||
mic--;
|
||||
pg_print_bogus_char(&mic, &p);
|
||||
}
|
||||
}
|
||||
*p = '\0';
|
||||
}
|
||||
|
|
@ -0,0 +1,21 @@
|
|||
SRCS += $(NAME).c
|
||||
OBJS += $(NAME).o
|
||||
|
||||
PG_CPPFLAGS :=
|
||||
SHLIB_LINK :=
|
||||
|
||||
SO_MAJOR_VERSION := 0
|
||||
SO_MINOR_VERSION := 0
|
||||
rpath =
|
||||
|
||||
install: all
|
||||
$(INSTALL_SHLIB) $(shlib) $(DESTDIR)$(pkglibdir)/$(NAME)$(DLSUFFIX)
|
||||
|
||||
uninstall: uninstall-lib
|
||||
|
||||
clean distclean maintainer-clean: clean-lib
|
||||
$(RM) $(OBJS)
|
||||
|
||||
include $(top_builddir)/src/Makefile.shlib
|
||||
|
||||
all: $(shlib)
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_ascii
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,65 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* ASCII <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_ascii/utf8_and_ascii.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
|
||||
PG_FUNCTION_INFO_V1(ascii_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_ascii)
|
||||
|
||||
extern Datum ascii_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_ascii(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
|
||||
Datum
|
||||
ascii_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_SQL_ASCII);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
pg_ascii2mic(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_ascii(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_SQL_ASCII);
|
||||
Assert(len > 0);
|
||||
|
||||
pg_mic2ascii(src, dest, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_big5
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* BIG5 <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_big5/utf8_and_big5.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/big5_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_big5.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(big5_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_big5)
|
||||
|
||||
extern Datum big5_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_big5(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
big5_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_BIG5);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapBIG5,
|
||||
sizeof(LUmapBIG5) / sizeof(pg_local_to_utf), PG_BIG5, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_big5(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_BIG5);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapBIG5,
|
||||
sizeof(ULmapBIG5) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_euc_cn
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* EUC_CN <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_euc_cn/utf8_and_euc_cn.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/euc_cn_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_euc_cn.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(euc_cn_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_euc_cn)
|
||||
|
||||
extern Datum euc_cn_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_euc_cn(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
euc_cn_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_EUC_CN);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapEUC_CN,
|
||||
sizeof(LUmapEUC_CN) / sizeof(pg_local_to_utf), PG_EUC_CN, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_euc_cn(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_EUC_CN);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapEUC_CN,
|
||||
sizeof(ULmapEUC_CN) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_euc_jp
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* EUC_JP <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_euc_jp/utf8_and_euc_jp.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/euc_jp_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_euc_jp.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(euc_jp_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_euc_jp)
|
||||
|
||||
extern Datum euc_jp_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_euc_jp(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
euc_jp_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_EUC_JP);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapEUC_JP,
|
||||
sizeof(LUmapEUC_JP) / sizeof(pg_local_to_utf), PG_EUC_JP, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_euc_jp(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_EUC_JP);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapEUC_JP,
|
||||
sizeof(ULmapEUC_JP) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_euc_kr
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* EUC_KR <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_euc_kr/utf8_and_euc_kr.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/euc_kr_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_euc_kr.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(euc_kr_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_euc_kr)
|
||||
|
||||
extern Datum euc_kr_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_euc_kr(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
euc_kr_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_EUC_KR);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapEUC_KR,
|
||||
sizeof(LUmapEUC_KR) / sizeof(pg_local_to_utf), PG_EUC_KR, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_euc_kr(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_EUC_KR);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapEUC_KR,
|
||||
sizeof(ULmapEUC_KR) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_euc_tw
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* EUC_TW <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_euc_tw/utf8_and_euc_tw.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/euc_tw_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_euc_tw.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(euc_tw_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_euc_tw)
|
||||
|
||||
extern Datum euc_tw_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_euc_tw(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
euc_tw_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_EUC_TW);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapEUC_TW,
|
||||
sizeof(LUmapEUC_TW) / sizeof(pg_local_to_utf), PG_EUC_TW, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_euc_tw(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_EUC_TW);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapEUC_TW,
|
||||
sizeof(ULmapEUC_TW) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_gb18030
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* GB18030 <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_gb18030/utf8_and_gb18030.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/gb18030_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_gb18030.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(gb18030_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_gb18030)
|
||||
|
||||
extern Datum gb18030_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_gb18030(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
gb18030_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_GB18030);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapGB18030,
|
||||
sizeof(LUmapGB18030) / sizeof(pg_local_to_utf), PG_GB18030, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_gb18030(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_GB18030);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapGB18030,
|
||||
sizeof(ULmapGB18030) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_gbk
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* GBK <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_gbk/utf8_and_gbk.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/gbk_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_gbk.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(gbk_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_gbk)
|
||||
|
||||
extern Datum gbk_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_gbk(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
gbk_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_GBK);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapGBK,
|
||||
sizeof(LUmapGBK) / sizeof(pg_local_to_utf), PG_GBK, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_gbk(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_GBK);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapGBK,
|
||||
sizeof(ULmapGBK) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_iso8859
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,156 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* ISO 8859 2-16 <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_iso8859/utf8_and_iso8859.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/utf8_to_iso8859_2.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_3.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_4.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_5.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_6.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_7.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_8.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_9.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_10.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_13.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_14.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_15.map"
|
||||
#include "../../Unicode/utf8_to_iso8859_16.map"
|
||||
#include "../../Unicode/iso8859_2_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_3_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_4_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_5_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_6_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_7_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_8_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_9_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_10_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_13_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_14_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_15_to_utf8.map"
|
||||
#include "../../Unicode/iso8859_16_to_utf8.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(iso8859_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_iso8859)
|
||||
|
||||
extern Datum iso8859_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_iso8859(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
|
||||
typedef struct {
|
||||
pg_enc encoding;
|
||||
pg_local_to_utf *map1; /* to UTF-8 map name */
|
||||
pg_utf_to_local *map2; /* from UTF-8 map name */
|
||||
int size1; /* size of map1 */
|
||||
int size2; /* size of map2 */
|
||||
} pg_conv_map;
|
||||
|
||||
static pg_conv_map maps[] = {
|
||||
{PG_SQL_ASCII}, /* SQL/ASCII */
|
||||
{PG_EUC_JP}, /* EUC for Japanese */
|
||||
{PG_EUC_CN}, /* EUC for Chinese */
|
||||
{PG_EUC_KR}, /* EUC for Korean */
|
||||
{PG_EUC_TW}, /* EUC for Taiwan */
|
||||
{PG_JOHAB}, /* EUC for Korean JOHAB */
|
||||
{PG_UTF8}, /* Unicode UTF-8 */
|
||||
{PG_MULE_INTERNAL}, /* Mule internal code */
|
||||
{PG_LATIN1}, /* ISO-8859-1 Latin 1 */
|
||||
{PG_LATIN2, LUmapISO8859_2, ULmapISO8859_2,
|
||||
sizeof(LUmapISO8859_2)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_2)/sizeof(pg_utf_to_local)}, /* ISO-8859-2 Latin 2 */
|
||||
{PG_LATIN3, LUmapISO8859_3, ULmapISO8859_3,
|
||||
sizeof(LUmapISO8859_3)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_3)/sizeof(pg_utf_to_local)}, /* ISO-8859-3 Latin 3 */
|
||||
{PG_LATIN4, LUmapISO8859_4, ULmapISO8859_4,
|
||||
sizeof(LUmapISO8859_4)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_4)/sizeof(pg_utf_to_local)}, /* ISO-8859-4 Latin 4 */
|
||||
{PG_LATIN5, LUmapISO8859_9, ULmapISO8859_9,
|
||||
sizeof(LUmapISO8859_9)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_9)/sizeof(pg_utf_to_local)}, /* ISO-8859-9 Latin 5 */
|
||||
{PG_LATIN6, LUmapISO8859_10, ULmapISO8859_10,
|
||||
sizeof(LUmapISO8859_10)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_10)/sizeof(pg_utf_to_local)}, /* ISO-8859-10 Latin 6 */
|
||||
{PG_LATIN7, LUmapISO8859_13, ULmapISO8859_13,
|
||||
sizeof(LUmapISO8859_13)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_13)/sizeof(pg_utf_to_local)}, /* ISO-8859-13 Latin 7 */
|
||||
{PG_LATIN8, LUmapISO8859_14, ULmapISO8859_14,
|
||||
sizeof(LUmapISO8859_14)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_14)/sizeof(pg_utf_to_local)}, /* ISO-8859-14 Latin 8 */
|
||||
{PG_LATIN9, LUmapISO8859_2, ULmapISO8859_2,
|
||||
sizeof(LUmapISO8859_15)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_15)/sizeof(pg_utf_to_local)}, /* ISO-8859-15 Latin 9 */
|
||||
{PG_LATIN10, LUmapISO8859_16, ULmapISO8859_16,
|
||||
sizeof(LUmapISO8859_16)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_16)/sizeof(pg_utf_to_local)}, /* ISO-8859-16 Latin 10 */
|
||||
{PG_WIN1256}, /* windows-1256 */
|
||||
{PG_TCVN}, /* TCVN (Windows-1258) */
|
||||
{PG_WIN874}, /* windows-874 */
|
||||
{PG_KOI8R}, /* KOI8-R */
|
||||
{PG_WIN1251}, /* windows-1251 (was: WIN) */
|
||||
{PG_ALT}, /* (MS-DOS CP866) */
|
||||
{PG_ISO_8859_5, LUmapISO8859_5, ULmapISO8859_5,
|
||||
sizeof(LUmapISO8859_5)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_5)/sizeof(pg_utf_to_local)}, /* ISO-8859-5 */
|
||||
{PG_ISO_8859_6, LUmapISO8859_6, ULmapISO8859_6,
|
||||
sizeof(LUmapISO8859_6)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_6)/sizeof(pg_utf_to_local)}, /* ISO-8859-6 */
|
||||
{PG_ISO_8859_7, LUmapISO8859_7, ULmapISO8859_7,
|
||||
sizeof(LUmapISO8859_7)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_7)/sizeof(pg_utf_to_local)}, /* ISO-8859-7 */
|
||||
{PG_ISO_8859_8, LUmapISO8859_8, ULmapISO8859_8,
|
||||
sizeof(LUmapISO8859_8)/sizeof(pg_local_to_utf),
|
||||
sizeof(ULmapISO8859_8)/sizeof(pg_utf_to_local)}, /* ISO-8859-8 */
|
||||
};
|
||||
|
||||
Datum
|
||||
iso8859_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
int encoding = PG_GETARG_INT32(0);
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, maps[encoding].map1, maps[encoding].size1, encoding, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_iso8859(PG_FUNCTION_ARGS)
|
||||
{
|
||||
int encoding = PG_GETARG_INT32(1);
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, maps[encoding].map2, maps[encoding].size2, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_iso8859_1
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,97 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* ISO8859_1 <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_iso8859_1/utf8_and_iso8859_1.c,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
|
||||
PG_FUNCTION_INFO_V1(iso8859_1_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_iso8859_1)
|
||||
|
||||
extern Datum iso8859_1_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_iso8859_1(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
|
||||
Datum
|
||||
iso8859_1_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
unsigned short c;
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_LATIN1);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
while (len-- > 0 && (c = *src++))
|
||||
{
|
||||
if (c < 0x80)
|
||||
*dest++ = c;
|
||||
else
|
||||
{
|
||||
*dest++ = (c >> 6) | 0xc0;
|
||||
*dest++ = (c & 0x003f) | 0x80;
|
||||
}
|
||||
}
|
||||
*dest = '\0';
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_iso8859_1(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
unsigned short c,
|
||||
c1,
|
||||
c2;
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_LATIN1);
|
||||
Assert(len > 0);
|
||||
|
||||
while (len > 0 && (c = *src++))
|
||||
{
|
||||
if ((c & 0xe0) == 0xc0)
|
||||
{
|
||||
c1 = c & 0x1f;
|
||||
c2 = *src++ & 0x3f;
|
||||
*dest = c1 << 6;
|
||||
*dest++ |= c2;
|
||||
len -= 2;
|
||||
}
|
||||
else if ((c & 0xe0) == 0xe0)
|
||||
elog(ERROR, "Could not convert UTF-8 to ISO8859-1");
|
||||
else
|
||||
{
|
||||
*dest++ = c;
|
||||
len--;
|
||||
}
|
||||
}
|
||||
*dest = '\0';
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:05 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_johab
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* JOHAB <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_johab/utf8_and_johab.c,v 1.1 2002/07/16 09:25:06 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/johab_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_johab.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(johab_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_johab)
|
||||
|
||||
extern Datum johab_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_johab(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
johab_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_JOHAB);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapJOHAB,
|
||||
sizeof(LUmapJOHAB) / sizeof(pg_local_to_utf), PG_JOHAB, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_johab(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_JOHAB);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapJOHAB,
|
||||
sizeof(ULmapJOHAB) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:06 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_sjis
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* SJIS <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_sjis/utf8_and_sjis.c,v 1.1 2002/07/16 09:25:06 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/sjis_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_sjis.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(sjis_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_sjis)
|
||||
|
||||
extern Datum sjis_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_sjis(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
sjis_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_SJIS);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapSJIS,
|
||||
sizeof(LUmapSJIS) / sizeof(pg_local_to_utf), PG_SJIS, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_sjis(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_SJIS);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapSJIS,
|
||||
sizeof(ULmapSJIS) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:06 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_tcvn
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* TCVN <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_tcvn/Attic/utf8_and_tcvn.c,v 1.1 2002/07/16 09:25:06 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/tcvn_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_tcvn.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(tcvn_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_tcvn)
|
||||
|
||||
extern Datum tcvn_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_tcvn(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
tcvn_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_TCVN);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapTCVN,
|
||||
sizeof(LUmapTCVN) / sizeof(pg_local_to_utf), PG_TCVN, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_tcvn(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_TCVN);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapTCVN,
|
||||
sizeof(ULmapTCVN) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
|
@ -0,0 +1,11 @@
|
|||
#-------------------------------------------------------------------------
|
||||
#
|
||||
# $Id: Makefile,v 1.1 2002/07/16 09:25:06 ishii Exp $
|
||||
#
|
||||
#-------------------------------------------------------------------------
|
||||
top_builddir = ../../../../../..
|
||||
include $(top_builddir)/src/Makefile.global
|
||||
|
||||
NAME := utf8_and_uhc
|
||||
|
||||
include ../proc.mk
|
||||
|
|
@ -0,0 +1,68 @@
|
|||
/*-------------------------------------------------------------------------
|
||||
*
|
||||
* UHC <--> UTF-8
|
||||
*
|
||||
* Portions Copyright (c) 1996-2002, PostgreSQL Global Development Group
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/utils/mb/conversion_procs/utf8_and_uhc/utf8_and_uhc.c,v 1.1 2002/07/16 09:25:06 ishii Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
||||
#include "postgres.h"
|
||||
#include "fmgr.h"
|
||||
#include "mb/pg_wchar.h"
|
||||
#include "../../Unicode/uhc_to_utf8.map"
|
||||
#include "../../Unicode/utf8_to_uhc.map"
|
||||
|
||||
PG_FUNCTION_INFO_V1(uhc_to_utf8)
|
||||
PG_FUNCTION_INFO_V1(utf8_to_uhc)
|
||||
|
||||
extern Datum uhc_to_utf8(PG_FUNCTION_ARGS);
|
||||
extern Datum utf8_to_uhc(PG_FUNCTION_ARGS);
|
||||
|
||||
/* ----------
|
||||
* conv_proc(
|
||||
* INTEGER, -- source encoding id
|
||||
* INTEGER, -- destination encoding id
|
||||
* OPAQUE, -- source string (null terminated C string)
|
||||
* OPAQUE, -- destination string (null terminated C string)
|
||||
* INTEGER -- source string length
|
||||
* ) returns INTEGER; -- dummy. returns nothing, actually.
|
||||
* ----------
|
||||
*/
|
||||
Datum
|
||||
uhc_to_utf8(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UHC);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UTF8);
|
||||
Assert(len > 0);
|
||||
|
||||
LocalToUtf(src, dest, LUmapUHC,
|
||||
sizeof(LUmapUHC) / sizeof(pg_local_to_utf), PG_UHC, len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
|
||||
Datum
|
||||
utf8_to_uhc(PG_FUNCTION_ARGS)
|
||||
{
|
||||
unsigned char *src = PG_GETARG_CSTRING(2);
|
||||
unsigned char *dest = PG_GETARG_CSTRING(3);
|
||||
int len = PG_GETARG_INT32(4);
|
||||
|
||||
Assert(PG_GETARG_INT32(0) == PG_UTF8);
|
||||
Assert(PG_GETARG_INT32(1) == PG_UHC);
|
||||
Assert(len > 0);
|
||||
|
||||
UtfToLocal(src, dest, ULmapUHC,
|
||||
sizeof(ULmapUHC) / sizeof(pg_utf_to_local), len);
|
||||
|
||||
PG_RETURN_INT32(0);
|
||||
}
|
||||
Loading…
Reference in New Issue