Import sj3-patches-20040916

Signed-off-by: Masanori Ogino <mogino@acm.org>
This commit is contained in:
Masanori Ogino 2023-11-27 11:34:52 +09:00
commit a76f53bc03
78 changed files with 3433 additions and 3852 deletions

View file

@ -31,30 +31,26 @@
* $SonyRCSfile: addelcmn.c,v $
* $SonyRevision: 1.1 $
* $SonyDate: 1994/06/03 08:01:27 $
*
* $Id$
*/
#include <string.h>
#include "sj_euc.h"
#include "sj_kcnv.h"
#include "sj_hinsi.h"
#include "sj_yomi.h"
#include "kanakan.h"
Uchar *get_idxptr();
Int sj2cd_str(), yomicmp(), codesize();
Int sstrlen(), sstrcmp();
Int sj2cd_str();
Void mvmemi(), mvmemd(), mkidxtbl();
Void set_size(p, size, plen, nlen)
Reg1 Uchar *p;
Int size;
Int plen;
Int nlen;
void
set_size (Uchar *p, Int size, Int plen, Int nlen)
{
*p = (Uchar)(size >> 8);
if (nlen & 0x10) *p |= NokoriYomiTop;
@ -65,21 +61,17 @@ Int nlen;
Static Int isvyomi(yp)
Reg1 Uchar *yp;
static Int
isvyomi (Uchar *yp)
{
Reg2 Int len;
Int len;
if (!*yp) return FALSE;
if (!(Chrtbl[*yp] & DICTOP)) return FALSE;
for (len = 0 ; *yp ; yp++) {
if (!(Chrtbl[*yp]) || (*yp >= Y_KUTEN)) return FALSE;
if (++len > MaxWdYomiLen) return FALSE;
}
@ -88,30 +80,28 @@ Reg1 Uchar *yp;
Static Int isvknj(kanji)
Reg1 Uchar *kanji;
static Int
isvknj(Uchar *kanji)
{
Reg2 Int len;
Int len;
if (!*kanji) return FALSE;
for (len = 0 ; *kanji ; ) {
if (*kanji == SS3) {
kanji += 3;
len += 2;
} else
if (isknj1(*kanji)) {
kanji += 2;
len += 2;
}
else {
kanji++;
len += 2;
}
if (len > MaxWdKanjiLen) return FALSE;
}
@ -120,10 +110,10 @@ Reg1 Uchar *kanji;
Static Int isgrm(gram)
TypeGram gram;
static Int
isgrm (TypeGram gram)
{
Reg1 Int grm = gram;
Int grm = gram;
if (MEISI_1 <= grm && grm <= D_MEISI_6) return TRUE;
if (MYOUJI <= grm && grm <= JOSUUSI2) return TRUE;
@ -142,49 +132,33 @@ TypeGram gram;
Uint addel_arg(yp, kp, grm, nyp, len)
Uchar *yp;
Uchar *kp;
TypeGram grm;
Uchar *nyp;
Int len;
Uint
addel_arg (Uchar *yp, Uchar *kp, TypeGram grm, Uchar *nyp, Int len)
{
Reg1 Ushort err = 0;
Ushort err = 0;
if (!sj2cd_str(yp, nyp, len)) err |= AD_BadYomi;
if (!isvyomi(nyp)) err |= AD_BadYomi;
if (!isvknj(kp)) err |= AD_BadKanji;
if (!isgrm(grm)) err |= AD_BadHinsi;
return err;
}
Static Void yomi2kata(src, dst)
Reg2 Uchar *src;
Reg1 Uchar *dst;
static void
yomi2kata (Uchar *src, Uchar *dst)
{
Reg3 Int first;
Reg4 Int second;
Int first;
Int second;
while (first = *src++) {
while ((first = *src++) != 0) {
second = *src++;
if (first != 0xa4) {
*dst++ = first;
*dst++ = second;
}
else {
*dst++ = 0xa5;
*dst++ = second;
@ -196,86 +170,64 @@ Reg1 Uchar *dst;
Static Int top_strcmp(src, dst)
Reg1 Uchar *src;
Reg3 Uchar *dst;
static Int
top_strcmp (Uchar *src, Uchar *dst)
{
Reg2 Int i;
Int i;
for (i = 0 ; *src && (*src == *dst) ; src++, dst++) i++;
i /= 2;
return (i > MaxYomiAskNumber) ? MaxYomiAskNumber : i;
}
Static Int last_strcmp(src, dst)
Uchar *src;
Uchar *dst;
static Int
last_strcmp (Uchar *src, Uchar *dst)
{
Int slen;
Reg1 Int dlen;
Int dlen;
slen = sstrlen(src);
dlen = sstrlen(dst);
slen = strlen(src);
dlen = strlen(dst);
if (dlen > MaxYomiAskNumber * 2) return 0;
if (sstrcmp(src + (slen - dlen), dst)) return 0;
if (strcmp(src + (slen - dlen), dst)) return 0;
return (dlen / 2);
}
Int cvtknj(yomi, knj, dst)
Uchar *yomi;
Uchar *knj;
Reg1 Uchar *dst;
Int
cvtknj (Uchar *yomi, Uchar *knj, Uchar *dst)
{
Uchar kana[MaxWdYomiLen * 2 + 1];
Reg2 Int len;
Int len;
Uchar *keep;
keep = dst;
yomi2kata(yomi, kana);
if (len = top_strcmp(yomi, knj)) {
if ((len = top_strcmp(yomi, knj)) != 0) {
*dst = (Uchar)(ZenHiraAssyuku | (len - 1));
}
else if (len = top_strcmp(kana, knj)) {
else if ((len = top_strcmp(kana, knj)) != 0) {
*dst = (Uchar)(ZenKataAssyuku | (len - 1));
}
if (len) {
knj += len * 2;
dst++;
}
if (*knj) {
for ( ; ; ) {
if (len = last_strcmp(yomi, knj)) {
if ((len = last_strcmp(yomi, knj)) != 0) {
*dst++ = (Uchar)(ZenHiraAssyuku | (len - 1));
break;
}
else if (len = last_strcmp(kana, knj)) {
else if ((len = last_strcmp(kana, knj)) != 0) {
*dst++ = (Uchar)(ZenKataAssyuku | (len - 1));
break;
}
@ -287,62 +239,48 @@ Reg1 Uchar *dst;
knj++;
*dst++ = (*knj & NormalKanjiMask); knj++;
*dst++ = *knj++;
} else if (*knj & 0x80) {
*dst++ = (*knj & NormalKanjiMask); knj++;
*dst++ = (*knj & NormalKanjiMask); knj++;
}
else {
*dst++ = (Uchar)LeadingHankaku;
*dst++ = *knj++;
}
if (!*knj) {
break;
}
}
}
*dst = 0;
return (dst - keep);
}
Int srchkana(ptr, saml)
Uchar **ptr;
Int *saml;
Int
srchkana (Uchar **ptr, Int *saml)
{
Uchar *p;
Int cmp;
Int cnt = 0;
Uchar same;
Reg1 Int flg = 0;
Int flg = 0;
same = 0;
p = segtop();
while (!segend(p)) {
if (flg == 0) {
cmp = yomicmp(cnvstart, p, &same);
if (cmp == OVER) break;
if (cmp == MATCH && *(cnvstart + same) == 0) {
*ptr = p;
*saml = same;
@ -350,15 +288,12 @@ Int *saml;
}
}
p = getntag(p);
cnt++;
}
if (flg != 0) return cnt;
*ptr = p;
*saml = same;
return 0;
@ -366,30 +301,23 @@ Int *saml;
Int srchgram(ptr, dst, hinsi)
Reg1 Uchar *ptr;
Uchar **dst;
TypeGram hinsi;
Int
srchgram (Uchar *ptr, Uchar **dst, TypeGram hinsi)
{
Uchar *endp;
Int cnt = 0, nlen;
Int flg = FALSE;
endp = getntag(ptr);
nlen = getnlen(ptr);
ptr += DouonBlkSizeNumber + nlen;
while (ptr < endp) {
if (*ptr == hinsi) {
*dst = ptr;
flg = TRUE;
}
do {
ptr += codesize(*ptr);
} while (*ptr != HinsiBlkTerm);
@ -397,43 +325,34 @@ TypeGram hinsi;
cnt++;
}
if (flg) return cnt;
*dst = ptr;
return 0;
}
Int srchkanji(dst, knj, klen)
Uchar **dst;
Uchar *knj;
Int klen;
Int
srchkanji (Uchar **dst, Uchar *knj, Int klen)
{
Reg1 Uchar *ptr;
Uchar *ptr;
Uchar *p, *q;
Int len;
Int flg = FALSE;
Int cnt = 0;
ptr = *dst + 1;
while (*ptr != HinsiBlkTerm) {
for (p = ptr, q = knj, len = klen ; len ; len--)
if (*p++ != *q++) break;
if (!len) {
*dst = ptr;
flg = TRUE;
}
while (!(*ptr == KanjiStrEnd)) {
ptr += codesize(*ptr);
}
@ -441,62 +360,49 @@ Int klen;
cnt++;
}
if (!flg) *dst = ptr;
return cnt;
}
TypeIdxOfs count_uidx()
TypeIdxOfs
count_uidx (void)
{
Uchar *p;
p = get_idxptr(curdict->segunit - 1);
while (*p++) ;
return (curdict->idxlen - (p - idxbuf));
}
Void chg_uidx(seg, yomi, len)
TypeDicSeg seg;
Uchar *yomi;
Int len;
void
chg_uidx (TypeDicSeg seg, Uchar *yomi, Int len)
{
Uchar *p, *q;
Int olen;
p = get_idxptr(seg);
olen = sstrlen(p);
olen = strlen(p);
q = idxbuf + curdict->idxlen;
if (len > olen) {
mvmemd(q - (len-olen), q, (Int)(q - (len-olen) - p));
}
else {
mvmemi(p + (olen-len), p, (Int)(q - (p + (olen-len))));
}
while (len--) *p++ = *yomi++;
(*curdict->putidx)(curdict, 0);
mkidxtbl(curdict);
}