2001-03-16 13:03:04 +00:00

125 lines
2.3 KiB
C

/*
* Module : multibyte.c
*
* Description: Mlutibyte related additional function.
*
* Create 2001-03-03 Eiji Tokuya
*
*/
#include <string.h>
#include "multibyte.h"
int multibyte_client_encoding ; /* Multibyte Client Encoding. */
int multibyte_status ; /* Multibyte Odds and ends character. */
unsigned char *multibyte_strchr(unsigned char *s,unsigned char c)
{
int mb_st = 0 ,i = 0;
while (!(mb_st == 0 && s[i] == c || s[i] == 0))
{
if (s[i] == 0)
return (0);
switch ( multibyte_client_encoding )
{
case SJIS:
{
if (mb_st < 2 && s[i] > 0x80 && !(s[i] > 0x9f && s[i] < 0xe0))
mb_st = 2;
else if (mb_st == 2)
mb_st = 1;
else
mb_st = 0;
}
break;
/* Chinese Big5 Support. */
case BIG5:
{
if ( mb_st < 2 && s[i] > 0xA0 )
mb_st = 2;
else if ( mb_st == 2 )
mb_st = 1;
else
mb_st = 0;
}
break;
default:
{
mb_st = 0;
}
}
i++;
}
#ifdef _DEBUG
qlog("i = %d\n",i);
#endif
return (s + i);
}
void multibyte_init(void)
{
multibyte_status = 0;
}
unsigned char *check_client_encoding(unsigned char *str)
{
if(strstr(str,"%27SJIS%27")||strstr(str,"'SJIS'")||strstr(str,"'sjis'"))
{
multibyte_client_encoding = SJIS;
return ("SJIS");
}
if(strstr(str,"%27BIG5%27")||strstr(str,"'BIG5'")||strstr(str,"'big5'"))
{
multibyte_client_encoding = BIG5;
return ("BIG5");
}
return ("OHTER");
}
/*
* Multibyte Status Function.
* Input char
* Output 0 : 1 Byte Character.
* 1 : MultibyteCharacter Last Byte.
* N : MultibyteCharacter Fast or Middle Byte.
*/
int multibyte_char_check(unsigned char s)
{
switch ( multibyte_client_encoding )
{
/* Japanese Shift-JIS(CP932) Support. */
case SJIS:
{
if ( multibyte_status < 2 && s > 0x80 && !(s > 0x9f && s < 0xE0))
multibyte_status = 2;
else if (multibyte_status == 2)
multibyte_status = 1;
else
multibyte_status = 0;
}
break;
/* Chinese Big5(CP950) Support. */
case BIG5:
{
if ( multibyte_status < 2 && s > 0xA0)
multibyte_status = 2;
else if (multibyte_status == 2)
multibyte_status = 1;
else
multibyte_status = 0;
}
break;
default:
{
multibyte_status = 0;
}
}
#ifdef _DEBUG
qlog("multibyte_client_encoding = %d s = 0x%02X multibyte_stat = %d\n", multibyte_client_encoding, s, multibyte_status );
#endif
return( multibyte_status );
}