323 lines
6.4 KiB
C
323 lines
6.4 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_hinsi.h"
|
|
|
|
#include "sj_kanakan.h"
|
|
|
|
int setj_atrb(SJ4_CONTEXT u_char* p) {
|
|
return 2;
|
|
}
|
|
|
|
int setj_ofs(SJ4_CONTEXT u_char* p) {
|
|
int contf = TRUE;
|
|
|
|
p = dicbuf + ((*p & KANJICODEMASK) << 8) + *(p + 1);
|
|
|
|
do {
|
|
if(p[codesize(*p)] == KANJISTREND) contf = FALSE;
|
|
switch(*p & KANJIMODEMASK) {
|
|
case ZENHIRAASSYUKU:
|
|
p += setj_norm1(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case ZENKATAASSYUKU:
|
|
p += setj_norm1(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case OFFSETASSYUKU:
|
|
p += setj_ofs(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case AIATTRIBUTE:
|
|
p += setj_atrb(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case LEADINGHANKAKU:
|
|
p += setj_norm2(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case KANJIASSYUKU:
|
|
p += setj_knj(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case KANJISTREND:
|
|
contf = FALSE;
|
|
break;
|
|
|
|
case KANAKANCOST:
|
|
p += 2;
|
|
break;
|
|
|
|
default:
|
|
p += setj_norm2(SJ4_CONTEXT_PASS p);
|
|
}
|
|
} while(contf);
|
|
|
|
return 2;
|
|
}
|
|
|
|
int setj_knj(SJ4_CONTEXT u_char* p) {
|
|
int contf = TRUE;
|
|
|
|
p = askknj[*p & KNJASSYUKUMASK];
|
|
|
|
do {
|
|
if(p[codesize(*p)] == KANJISTREND) contf = FALSE;
|
|
switch(*p & KANJIMODEMASK) {
|
|
case ZENHIRAASSYUKU:
|
|
p += setj_norm1(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case ZENKATAASSYUKU:
|
|
p += setj_norm1(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case OFFSETASSYUKU:
|
|
p += setj_ofs(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case AIATTRIBUTE:
|
|
p += setj_atrb(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case LEADINGHANKAKU:
|
|
p += setj_norm2(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case KANJIASSYUKU:
|
|
p += setj_knj(SJ4_CONTEXT_PASS p);
|
|
break;
|
|
|
|
case KANJISTREND:
|
|
contf = FALSE;
|
|
break;
|
|
|
|
case KANAKANCOST:
|
|
p += 2;
|
|
break;
|
|
|
|
default:
|
|
p += setj_norm2(SJ4_CONTEXT_PASS p);
|
|
}
|
|
} while(contf);
|
|
|
|
return 1;
|
|
}
|
|
|
|
int setj_norm1(SJ4_CONTEXT u_char* p) {
|
|
return 1;
|
|
}
|
|
|
|
int setj_norm2(SJ4_CONTEXT u_char* p) {
|
|
return 2;
|
|
}
|
|
|
|
int setj_norm3(SJ4_CONTEXT u_char* p) {
|
|
return 3;
|
|
}
|
|
|
|
static u_char
|
|
chkhead(SJ4_CONTEXT TypeGram gram) {
|
|
if(!headcode) return TRUE;
|
|
|
|
if(headcode == SETTOU_DAI) {
|
|
|
|
if(gram == SUUSI) return TRUE;
|
|
}
|
|
|
|
else {
|
|
gram--;
|
|
if((Scncttbl(headcode - 1, gram >> 3) << (gram & 0x07)) & 0x80) {
|
|
return TRUE;
|
|
}
|
|
}
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
void setjrec(SJ4_CONTEXT u_char* tagp, int mode) {
|
|
TypeGram gram;
|
|
u_char* ptr;
|
|
u_char* endp;
|
|
u_char* tmp;
|
|
JREC* rec;
|
|
int plen;
|
|
int nlen;
|
|
int len;
|
|
int cost = 0;
|
|
|
|
plen = getplen(tagp);
|
|
nlen = getnlen(tagp);
|
|
|
|
len = plen + nlen;
|
|
|
|
if(headcode) len += headlen;
|
|
|
|
ptr = tagp + DOUONBLKSIZENUMBER + nlen;
|
|
|
|
endp = tagp + getsize(tagp);
|
|
|
|
for(; ptr < endp; ptr = tmp + 1) {
|
|
for(tmp = ptr + 1; *tmp != HINSIBLKTERM;) {
|
|
switch(*tmp & KANJIMODEMASK) {
|
|
case ZENHIRAASSYUKU:
|
|
tmp += setj_norm1(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case ZENKATAASSYUKU:
|
|
tmp += setj_norm1(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case OFFSETASSYUKU:
|
|
tmp += setj_ofs(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case AIATTRIBUTE:
|
|
tmp += setj_atrb(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case LEADINGHANKAKU:
|
|
tmp += setj_norm2(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case KANJIASSYUKU:
|
|
tmp += setj_knj(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case KANJISTREND:
|
|
tmp++;
|
|
break;
|
|
|
|
case KANAKANCOST:
|
|
cost = ((*tmp & 0xf) << 8) | *(tmp + 1);
|
|
tmp += 2;
|
|
break;
|
|
|
|
default:
|
|
tmp += setj_norm2(SJ4_CONTEXT_PASS tmp);
|
|
}
|
|
}
|
|
|
|
if((gram = *ptr) == IKKATU && !(mode & DO_IKKATU)) continue;
|
|
|
|
if(!chkhead(SJ4_CONTEXT_PASS gram)) continue;
|
|
|
|
if(!(rec = argjrec(SJ4_CONTEXT_PASS len, (JREC*)NULL))) continue;
|
|
|
|
rec->jseg = prevseg;
|
|
rec->jofsst = ptr - dicbuf;
|
|
rec->jofsed = tmp - dicbuf;
|
|
rec->jclass = C_DICT;
|
|
rec->dicid = curdict->dicid;
|
|
rec->hinsi = gram;
|
|
rec->sttofs = headcode;
|
|
rec->cost = cost;
|
|
}
|
|
}
|
|
|
|
void setnumrec(SJ4_CONTEXT u_char* tagp, JREC* rec, TypeGram gram) {
|
|
u_char* ptr;
|
|
u_char* endp;
|
|
u_char* tmp;
|
|
int plen, nlen, len;
|
|
JREC* jrec;
|
|
|
|
plen = getplen(tagp);
|
|
nlen = getnlen(tagp);
|
|
|
|
len = plen + nlen;
|
|
|
|
ptr = tagp + DOUONBLKSIZENUMBER + nlen;
|
|
|
|
endp = tagp + getsize(tagp);
|
|
|
|
for(; ptr < endp; ptr = tmp + 1) {
|
|
for(tmp = ptr + 1; *tmp != HINSIBLKTERM;) {
|
|
switch(*tmp & KANJIMODEMASK) {
|
|
case ZENHIRAASSYUKU:
|
|
tmp += setj_norm1(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case ZENKATAASSYUKU:
|
|
tmp += setj_norm1(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case OFFSETASSYUKU:
|
|
tmp += setj_ofs(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case AIATTRIBUTE:
|
|
tmp += setj_atrb(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case LEADINGHANKAKU:
|
|
tmp += setj_norm2(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case KANJIASSYUKU:
|
|
tmp += setj_knj(SJ4_CONTEXT_PASS tmp);
|
|
break;
|
|
|
|
case KANJISTREND:
|
|
tmp++;
|
|
break;
|
|
|
|
case KANAKANCOST:
|
|
tmp += 2;
|
|
break;
|
|
|
|
default:
|
|
tmp += setj_norm2(SJ4_CONTEXT_PASS tmp);
|
|
}
|
|
}
|
|
|
|
if(gram != *ptr) continue;
|
|
|
|
if(!(jrec = argjrec(SJ4_CONTEXT_PASS(int)(rec->jlen + len), rec))) continue;
|
|
|
|
jrec->jseg = prevseg;
|
|
jrec->jofsst = ptr - dicbuf;
|
|
jrec->jofsed = tmp - dicbuf;
|
|
jrec->dicid = curdict->dicid;
|
|
}
|
|
}
|
|
|
|
void setcrec(SJ4_CONTEXT u_char* tagp) {
|
|
JREC* rec;
|
|
|
|
if(!(rec = argjrec(SJ4_CONTEXT_PASS(int) ClYomiLen(tagp), (JREC*)NULL))) return;
|
|
|
|
rec->jofsst = tagp - CLSTUDYDICT;
|
|
rec->jclass = C_BUNSETU;
|
|
rec->hinsi = ClGramCode(tagp);
|
|
}
|