133 lines
2.0 KiB
C
133 lines
2.0 KiB
C
/*
|
|
* _codecs_tw.c: Codecs collection for Taiwan's encodings
|
|
*
|
|
* Written by Hye-Shik Chang <perky@FreeBSD.org>
|
|
*/
|
|
|
|
#include "cjkcodecs.h"
|
|
#include "mappings_tw.h"
|
|
|
|
/*
|
|
* BIG5 codec
|
|
*/
|
|
|
|
ENCODER(big5)
|
|
{
|
|
while (inleft > 0) {
|
|
Py_UNICODE c = **inbuf;
|
|
DBCHAR code;
|
|
|
|
if (c < 0x80) {
|
|
REQUIRE_OUTBUF(1)
|
|
**outbuf = (unsigned char)c;
|
|
NEXT(1, 1)
|
|
continue;
|
|
}
|
|
UCS4INVALID(c)
|
|
|
|
REQUIRE_OUTBUF(2)
|
|
|
|
TRYMAP_ENC(big5, code, c);
|
|
else return 1;
|
|
|
|
OUT1(code >> 8)
|
|
OUT2(code & 0xFF)
|
|
NEXT(1, 2)
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
DECODER(big5)
|
|
{
|
|
while (inleft > 0) {
|
|
unsigned char c = IN1;
|
|
|
|
REQUIRE_OUTBUF(1)
|
|
|
|
if (c < 0x80) {
|
|
OUT1(c)
|
|
NEXT(1, 1)
|
|
continue;
|
|
}
|
|
|
|
REQUIRE_INBUF(2)
|
|
TRYMAP_DEC(big5, **outbuf, c, IN2) {
|
|
NEXT(2, 1)
|
|
}
|
|
else return 1;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
/*
|
|
* CP950 codec
|
|
*/
|
|
|
|
ENCODER(cp950)
|
|
{
|
|
while (inleft > 0) {
|
|
Py_UNICODE c = IN1;
|
|
DBCHAR code;
|
|
|
|
if (c < 0x80) {
|
|
WRITE1((unsigned char)c)
|
|
NEXT(1, 1)
|
|
continue;
|
|
}
|
|
UCS4INVALID(c)
|
|
|
|
REQUIRE_OUTBUF(2)
|
|
TRYMAP_ENC(cp950ext, code, c);
|
|
else TRYMAP_ENC(big5, code, c);
|
|
else return 1;
|
|
|
|
OUT1(code >> 8)
|
|
OUT2(code & 0xFF)
|
|
NEXT(1, 2)
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
DECODER(cp950)
|
|
{
|
|
while (inleft > 0) {
|
|
unsigned char c = IN1;
|
|
|
|
REQUIRE_OUTBUF(1)
|
|
|
|
if (c < 0x80) {
|
|
OUT1(c)
|
|
NEXT(1, 1)
|
|
continue;
|
|
}
|
|
|
|
REQUIRE_INBUF(2)
|
|
|
|
TRYMAP_DEC(cp950ext, **outbuf, c, IN2);
|
|
else TRYMAP_DEC(big5, **outbuf, c, IN2);
|
|
else return 1;
|
|
|
|
NEXT(2, 1)
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
|
|
BEGIN_MAPPINGS_LIST
|
|
MAPPING_ENCDEC(big5)
|
|
MAPPING_ENCDEC(cp950ext)
|
|
END_MAPPINGS_LIST
|
|
|
|
BEGIN_CODECS_LIST
|
|
CODEC_STATELESS(big5)
|
|
CODEC_STATELESS(cp950)
|
|
END_CODECS_LIST
|
|
|
|
I_AM_A_MODULE_FOR(tw)
|