sj4/lib/sj4core/sj2code.c
2026-07-02 13:21:58 +09:00

116 lines
3 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.
*
*/
#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;
}