sj4/trunk/lib/sj3core/sj2code.c
2008-01-11 11:57:08 +00:00

132 lines
3.2 KiB
C

/*
* Copyright (c) 1991-1994 Sony Corporation
*
* Permission is hereby granted, free of charge, to any person obtaining
* a copy of this software and associated documentation files (the
* "Software"), to deal in the Software without restriction, including
* without limitation the rights to use, copy, modify, merge, publish,
* distribute, sublicense, and/or sell copies of the Software, and to
* permit persons to whom the Software is furnished to do so, subject to
* the following conditions:
*
* The above copyright notice and this permission notice shall be
* included in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
* IN NO EVENT SHALL SONY CORPORATION BE LIABLE FOR ANY CLAIM,
* DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
* OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR
* THE USE OR OTHER DEALINGS IN THE SOFTWARE.
*
* Except as contained in this notice, the name of Sony Corporation
* shall not be used in advertising or otherwise to promote the sale, use
* or other dealings in this Software without prior written authorization
* from Sony Corporation.
*
*/
/*
* $SonyRCSfile: sj2code.c,v $
* $SonyRevision: 1.2 $
* $SonyDate: 1995/07/21 05:22:51 $
*/
#include "sj_euc.h"
#include "sj_kcnv.h"
#include "sj_yomi.h"
#include "sj_kanakan.h"
int
sj2cd_chr(u_char *euc, u_char *yomi)
{
u_char chr;
if ((chr = *euc++) == EUC_a1) {
chr = *euc;
if (chr < EUC_START)
*yomi = Y_ZENKAKU;
else if (chr <= EUC_END)
*yomi = Kigou[chr - EUC_START];
else
*yomi = Y_ZENKAKU;
} else if (chr == EUC_a2) {
chr = *euc;
if (chr < EUC_START)
*yomi = Y_ZENKAKU;
else if (chr <= EUC_END_KIGOU)
*yomi = Kigou[chr - EUC_START + 94];
else
*yomi = Y_ZENKAKU;
} else if (chr == EUC_a3) {
chr = *euc;
if (chr < EUC_0)
*yomi = Y_ZENKAKU;
else if (chr <= EUC_END_0)
*yomi = chr - EUC_0 + N_0;
else if (chr < EUC_A)
*yomi = Y_ZENKAKU;
else if (chr <= EUC_END_A)
*yomi = chr - EUC_A + A_A;
else if (chr < EUC_a)
*yomi = Y_ZENKAKU;
else if (chr <= EUC_END_a)
*yomi = chr - EUC_a + A_a;
else
*yomi = Y_ZENKAKU;
} else if (chr == EUC_a4) {
chr = *euc;
if (chr < EUC_START)
*yomi = Y_ZENKAKU;
else if (chr <= EUC_END_HIRA)
*yomi = chr - EUC_START + _XA;
else
*yomi = Y_ZENKAKU;
} else if (chr == EUC_a5) {
chr = *euc;
if (chr == EUC_VU)
*yomi = _VU;
else if (chr == EUC_XKA)
*yomi = _XKA;
else if (chr == EUC_XKE)
*yomi = _XKE;
else
*yomi = Y_ZENKAKU;
}
else {
if (!(chr & 0x80)) {
*yomi = Y_HANKAKU;
return 1;
} else if (chr == SS2) {
*yomi = Y_HANKAKU;
} else if (chr == SS3) {
*yomi = Y_ZENKAKU;
return 3;
} else
*yomi = Y_ZENKAKU;
}
return 2;
}
int
sj2cd_str(u_char *euc, u_char *yomi, int len)
{
if (!len--) return FALSE;
while (*euc && len--) euc += sj2cd_chr(euc, yomi++);
*yomi = 0;
return *euc ? FALSE : TRUE;
}