Format source code
This commit is contained in:
parent
b6df536fe9
commit
d0be6165c0
165 changed files with 30306 additions and 33687 deletions
426
srchnum.c
426
srchnum.c
|
|
@ -1,6 +1,6 @@
|
|||
/*
|
||||
* 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
|
||||
|
|
@ -8,10 +8,10 @@
|
|||
* 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.
|
||||
|
|
@ -19,7 +19,7 @@
|
|||
* 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
|
||||
|
|
@ -28,14 +28,13 @@
|
|||
*/
|
||||
|
||||
/*
|
||||
* $SonyRCSfile: srchnum.c,v $
|
||||
* $SonyRevision: 1.1 $
|
||||
* $SonyRCSfile: srchnum.c,v $
|
||||
* $SonyRevision: 1.1 $
|
||||
* $SonyDate: 1994/06/03 08:02:30 $
|
||||
*
|
||||
* $Id$
|
||||
*/
|
||||
|
||||
|
||||
#include <sys/types.h>
|
||||
#include <string.h>
|
||||
#include "sj_kcnv.h"
|
||||
|
|
@ -44,141 +43,133 @@
|
|||
#include "sj_suuji.h"
|
||||
#include "kanakan.h"
|
||||
|
||||
|
||||
static void srch_kurai1(unsigned char* ptr, unsigned char* cnct);
|
||||
static void srch_kurai2(unsigned char* ptr, unsigned char* cnct);
|
||||
|
||||
static void
|
||||
srch_josuu_sub(JREC *jrec, TypeGram gram)
|
||||
{
|
||||
unsigned char *tagp;
|
||||
DICTL *dp;
|
||||
srch_josuu_sub(JREC* jrec, TypeGram gram) {
|
||||
unsigned char* tagp;
|
||||
DICTL* dp;
|
||||
|
||||
for (dp = dictlist ; dp ; dp = dp -> next) {
|
||||
curdict = dp -> dict;
|
||||
dicinl = 1;
|
||||
for(dp = dictlist; dp; dp = dp->next) {
|
||||
curdict = dp->dict;
|
||||
dicinl = 1;
|
||||
dicsaml = 0;
|
||||
prevseg = -1;
|
||||
while ((tagp = srchdict(tagp)) != NULL)
|
||||
while((tagp = srchdict(tagp)) != NULL)
|
||||
setnumrec(tagp, jrec, gram);
|
||||
}
|
||||
}
|
||||
|
||||
static void
|
||||
srch_josuu(JREC *jrec)
|
||||
{
|
||||
unsigned char *kp;
|
||||
int klen;
|
||||
int len;
|
||||
srch_josuu(JREC* jrec) {
|
||||
unsigned char* kp;
|
||||
int klen;
|
||||
int len;
|
||||
|
||||
if (headcode && headcode != SETTOU_DAI) return;
|
||||
if(headcode && headcode != SETTOU_DAI) return;
|
||||
|
||||
kp = cnvstart;
|
||||
klen = cnvlen;
|
||||
|
||||
cnvstart += (len = jrec -> numlen);
|
||||
cnvlen -= len;
|
||||
cnvstart += (len = jrec->numlen);
|
||||
cnvlen -= len;
|
||||
|
||||
srch_josuu_sub(jrec, JOSUUSI);
|
||||
|
||||
if (!headcode) srch_josuu_sub(jrec, JOSUUSI2);
|
||||
if(!headcode) srch_josuu_sub(jrec, JOSUUSI2);
|
||||
|
||||
cnvstart = kp;
|
||||
cnvlen = klen;
|
||||
cnvlen = klen;
|
||||
}
|
||||
|
||||
static void
|
||||
setnrec_sub(unsigned char* p, unsigned short flag, int stb)
|
||||
{
|
||||
JREC *rec;
|
||||
int len1;
|
||||
int len2;
|
||||
setnrec_sub(unsigned char* p, unsigned short flag, int stb) {
|
||||
JREC* rec;
|
||||
int len1;
|
||||
int len2;
|
||||
|
||||
len1 = len2 = p - suuji_yptr;
|
||||
if (headcode) len1 += headlen;
|
||||
if (stb) len2--;
|
||||
if(headcode) len1 += headlen;
|
||||
if(stb) len2--;
|
||||
|
||||
if ((int)suuji_len == len2) {
|
||||
if (suuji_wkeep) {
|
||||
if((int)suuji_len == len2) {
|
||||
if(suuji_wkeep) {
|
||||
memcpy((unsigned char*)suuji_wbuf, (unsigned char*)suuji_wkeep,
|
||||
sizeof(suuji_wbuf[0]) * NumWordBuf);
|
||||
sizeof(suuji_wbuf[0]) * NumWordBuf);
|
||||
}
|
||||
if (suuji_ukeep) {
|
||||
if(suuji_ukeep) {
|
||||
memcpy(suuji_ubuf, suuji_ukeep, NumKetaLength);
|
||||
}
|
||||
suuji_exit = suuji_keta;
|
||||
return;
|
||||
}
|
||||
|
||||
if ((rec = argjrec(len1, (JREC *)NULL)) != NULL) {
|
||||
rec -> class = suuji_class;
|
||||
rec -> hinsi = SUUSI;
|
||||
rec -> sttofs = headcode;
|
||||
rec -> stbofs = (unsigned char)stb;
|
||||
rec -> flags = flag;
|
||||
rec -> numlen = (unsigned char)len2;
|
||||
if((rec = argjrec(len1, (JREC*)NULL)) != NULL) {
|
||||
rec->class = suuji_class;
|
||||
rec->hinsi = SUUSI;
|
||||
rec->sttofs = headcode;
|
||||
rec->stbofs = (unsigned char)stb;
|
||||
rec->flags = flag;
|
||||
rec->numlen = (unsigned char)len2;
|
||||
|
||||
if (!stb) srch_josuu(rec);
|
||||
if(!stb) srch_josuu(rec);
|
||||
}
|
||||
}
|
||||
|
||||
static void
|
||||
setnrec(unsigned char* p, unsigned short flag)
|
||||
{
|
||||
setnrec(unsigned char* p, unsigned short flag) {
|
||||
setnrec_sub(p, flag, 0);
|
||||
|
||||
if (!headcode && (*p == Y_S_KIGOU2)) {
|
||||
if(!headcode && (*p == Y_S_KIGOU2)) {
|
||||
setnrec_sub(p + 1, flag, -1);
|
||||
}
|
||||
}
|
||||
|
||||
static unsigned char*
|
||||
srchtbl(unsigned char ch, unsigned char* tbl, int rec, int n)
|
||||
{
|
||||
int high, low, mid;
|
||||
unsigned char *p;
|
||||
srchtbl(unsigned char ch, unsigned char* tbl, int rec, int n) {
|
||||
int high, low, mid;
|
||||
unsigned char* p;
|
||||
|
||||
if (!ch) return NULL;
|
||||
if(!ch) return NULL;
|
||||
|
||||
low = 0;
|
||||
low = 0;
|
||||
high = n - 1;
|
||||
|
||||
while (low <= high) {
|
||||
while(low <= high) {
|
||||
mid = (low + high) / 2;
|
||||
p = tbl + mid * rec;
|
||||
p = tbl + mid * rec;
|
||||
|
||||
if (ch == *p)
|
||||
if(ch == *p)
|
||||
break;
|
||||
|
||||
else if (ch < *p)
|
||||
else if(ch < *p)
|
||||
high = mid - 1;
|
||||
|
||||
else
|
||||
low = mid + 1;
|
||||
}
|
||||
|
||||
if (low > high) return NULL;
|
||||
if(low > high) return NULL;
|
||||
|
||||
while (mid-- > 0 && ch == *(p - rec)) p -= rec;
|
||||
while(mid-- > 0 && ch == *(p - rec)) p -= rec;
|
||||
|
||||
return p;
|
||||
}
|
||||
|
||||
static int
|
||||
isconnect(unsigned char* cnct, int num)
|
||||
{
|
||||
isconnect(unsigned char* cnct, int num) {
|
||||
return (cnct[num / 8] & (0x80 >> (num % 8)));
|
||||
}
|
||||
|
||||
static int
|
||||
string_cmp(unsigned char* s, int l, unsigned char* d)
|
||||
{
|
||||
unsigned char *p;
|
||||
string_cmp(unsigned char* s, int l, unsigned char* d) {
|
||||
unsigned char* p;
|
||||
|
||||
p = s;
|
||||
|
||||
while (*s && l-- > 0) {
|
||||
if (*s != *d) return 0;
|
||||
while(*s && l-- > 0) {
|
||||
if(*s != *d) return 0;
|
||||
s++;
|
||||
d++;
|
||||
}
|
||||
|
|
@ -187,47 +178,46 @@ string_cmp(unsigned char* s, int l, unsigned char* d)
|
|||
}
|
||||
|
||||
static int
|
||||
check_num(unsigned char* ptr)
|
||||
{
|
||||
int i;
|
||||
int j;
|
||||
int k;
|
||||
int tmp;
|
||||
int hketa;
|
||||
int lketa;
|
||||
int flg = FALSE;
|
||||
int cnt;
|
||||
unsigned short flag;
|
||||
check_num(unsigned char* ptr) {
|
||||
int i;
|
||||
int j;
|
||||
int k;
|
||||
int tmp;
|
||||
int hketa;
|
||||
int lketa;
|
||||
int flg = FALSE;
|
||||
int cnt;
|
||||
unsigned short flag;
|
||||
|
||||
memset((unsigned char*)suuji_wbuf, 0, sizeof(unsigned short) * NumWordBuf);
|
||||
flag = 0;
|
||||
|
||||
hketa = lketa = cnt = 0;
|
||||
for (i = suuji_keta ; --i >= 0 ;) {
|
||||
if (hketa >= 4) return FALSE;
|
||||
for(i = suuji_keta; --i >= 0;) {
|
||||
if(hketa >= 4) return FALSE;
|
||||
tmp = suuji_ubuf[i];
|
||||
if ((j = ((tmp >> 6) & 3)) != 0) {
|
||||
if (j < hketa) return FALSE;
|
||||
if (j > hketa) {
|
||||
if((j = ((tmp >> 6) & 3)) != 0) {
|
||||
if(j < hketa) return FALSE;
|
||||
if(j > hketa) {
|
||||
flag |= JFLAG_N01;
|
||||
do {
|
||||
suuji_wbuf[hketa] |= (_Num0<<(lketa*4));
|
||||
if (++lketa >= 4) {
|
||||
suuji_wbuf[hketa] |= (_Num0 << (lketa * 4));
|
||||
if(++lketa >= 4) {
|
||||
lketa = 0;
|
||||
hketa++;
|
||||
}
|
||||
} while (j > hketa);
|
||||
} while(j > hketa);
|
||||
}
|
||||
}
|
||||
k = ((tmp >> 4) & 3);
|
||||
if (j || k) {
|
||||
if (k < lketa) return FALSE;
|
||||
if (k > lketa) {
|
||||
if(j || k) {
|
||||
if(k < lketa) return FALSE;
|
||||
if(k > lketa) {
|
||||
flag |= JFLAG_N01;
|
||||
do {
|
||||
suuji_wbuf[hketa] |= (_Num0<<(lketa*4));
|
||||
suuji_wbuf[hketa] |= (_Num0 << (lketa * 4));
|
||||
lketa++;
|
||||
} while (k > lketa);
|
||||
} while(k > lketa);
|
||||
}
|
||||
flg = TRUE;
|
||||
}
|
||||
|
|
@ -236,16 +226,16 @@ check_num(unsigned char* ptr)
|
|||
cnt++;
|
||||
|
||||
j = (1 << tmp);
|
||||
if (j & NumberS1) flag |= JFLAG_NS1;
|
||||
if (j & Number01) flag |= JFLAG_N01;
|
||||
if (j & Number23) flag |= JFLAG_N23;
|
||||
if(j & NumberS1) flag |= JFLAG_NS1;
|
||||
if(j & Number01) flag |= JFLAG_N01;
|
||||
if(j & Number23) flag |= JFLAG_N23;
|
||||
|
||||
if (tmp != _Num0) {
|
||||
if(tmp != _Num0) {
|
||||
flg = FALSE;
|
||||
|
||||
switch (lketa) {
|
||||
switch(lketa) {
|
||||
case 0:
|
||||
if (tmp == _Num1) flag |= JFLAG_N_1;
|
||||
if(tmp == _Num1) flag |= JFLAG_N_1;
|
||||
break;
|
||||
|
||||
case 1:
|
||||
|
|
@ -253,22 +243,22 @@ check_num(unsigned char* ptr)
|
|||
break;
|
||||
}
|
||||
}
|
||||
if (++lketa >= 4) {
|
||||
if(++lketa >= 4) {
|
||||
lketa = 0;
|
||||
hketa++;
|
||||
}
|
||||
}
|
||||
|
||||
if (flg) return FALSE;
|
||||
if(flg) return FALSE;
|
||||
|
||||
if (suuji_keta == 1 || tmp != _Num0) flag |= JFLAG_NN0;
|
||||
if(suuji_keta == 1 || tmp != _Num0) flag |= JFLAG_NN0;
|
||||
|
||||
if (hketa)
|
||||
if(hketa)
|
||||
flag |= (JFLAG_NK4 | JFLAG_NK2);
|
||||
else if (lketa > 1)
|
||||
else if(lketa > 1)
|
||||
flag |= JFLAG_NK2;
|
||||
|
||||
if (cnt > 1) flag |= JFLAG_NSN;
|
||||
if(cnt > 1) flag |= JFLAG_NSN;
|
||||
|
||||
setnrec(ptr, flag);
|
||||
|
||||
|
|
@ -276,35 +266,34 @@ check_num(unsigned char* ptr)
|
|||
}
|
||||
|
||||
static void
|
||||
srch_number1(unsigned char* ptr)
|
||||
{
|
||||
unsigned char ch;
|
||||
unsigned char mode;
|
||||
unsigned char *p;
|
||||
int l;
|
||||
TypeClass cls;
|
||||
int len;
|
||||
unsigned char *tptr;
|
||||
srch_number1(unsigned char* ptr) {
|
||||
unsigned char ch;
|
||||
unsigned char mode;
|
||||
unsigned char* p;
|
||||
int l;
|
||||
TypeClass cls;
|
||||
int len;
|
||||
unsigned char* tptr;
|
||||
|
||||
if (suuji_keta >= NumKetaLength) return;
|
||||
if(suuji_keta >= NumKetaLength) return;
|
||||
|
||||
if (!(p = srchtbl((ch = *ptr), Suuji_tbl, SjTblRecLen, SjTblRecNum)))
|
||||
if(!(p = srchtbl((ch = *ptr), Suuji_tbl, SjTblRecLen, SjTblRecNum)))
|
||||
return;
|
||||
|
||||
len = suuji_yptr + MaxClInputLen - ptr;
|
||||
|
||||
for ( ; *SjTblYPos(p) == ch ; p += SjTblRecLen) {
|
||||
if (!(l = string_cmp(SjTblYPos(p), SjTblYLen, ptr))) continue;
|
||||
for(; *SjTblYPos(p) == ch; p += SjTblRecLen) {
|
||||
if(!(l = string_cmp(SjTblYPos(p), SjTblYLen, ptr))) continue;
|
||||
|
||||
if (l > len) continue;
|
||||
if(l > len) continue;
|
||||
|
||||
mode = *SjTblModeP(p);
|
||||
mode = *SjTblModeP(p);
|
||||
suuji_ubuf[suuji_keta++] = SjTblNumber(mode);
|
||||
tptr = ptr + l;
|
||||
tptr = ptr + l;
|
||||
|
||||
switch (suuji_class) {
|
||||
switch(suuji_class) {
|
||||
case C_N_ARABIA:
|
||||
if (!(mode & SjTblNArabiaF)) break;
|
||||
if(!(mode & SjTblNArabiaF)) break;
|
||||
|
||||
check_num(tptr);
|
||||
srch_number1(tptr);
|
||||
|
|
@ -313,7 +302,7 @@ srch_number1(unsigned char* ptr)
|
|||
break;
|
||||
|
||||
case C_N_SUUJI:
|
||||
if (mode & (SjTblNArabiaF | SjTblNYomiF)) break;
|
||||
if(mode & (SjTblNArabiaF | SjTblNYomiF)) break;
|
||||
|
||||
check_num(tptr);
|
||||
srch_number1(tptr);
|
||||
|
|
@ -324,9 +313,9 @@ srch_number1(unsigned char* ptr)
|
|||
|
||||
case C_N_KAZU:
|
||||
case C_N_NANSUU:
|
||||
if (mode & SjTblNNarabiF) break;
|
||||
if (mode & SjTblNNanSuuF) {
|
||||
cls = suuji_class;
|
||||
if(mode & SjTblNNarabiF) break;
|
||||
if(mode & SjTblNNanSuuF) {
|
||||
cls = suuji_class;
|
||||
suuji_class = C_N_NANSUU;
|
||||
}
|
||||
|
||||
|
|
@ -334,32 +323,29 @@ srch_number1(unsigned char* ptr)
|
|||
srch_kurai1(tptr, SjTblCnctP(p));
|
||||
srch_kurai2(tptr, SjTblCnctP(p));
|
||||
|
||||
if (mode & SjTblNNanSuuF) suuji_class = cls;
|
||||
if(mode & SjTblNNanSuuF) suuji_class = cls;
|
||||
break;
|
||||
|
||||
default:
|
||||
if (mode & SjTblNArabiaF) {
|
||||
if(mode & SjTblNArabiaF) {
|
||||
suuji_class = C_N_ARABIA;
|
||||
check_num(tptr);
|
||||
srch_number1(tptr);
|
||||
srch_kurai2(tptr, (unsigned char*)NULL);
|
||||
|
||||
suuji_class = C_N_KAZU;
|
||||
}
|
||||
else if (mode & SjTblNYomiF) {
|
||||
if (mode & SjTblNNanSuuF)
|
||||
} else if(mode & SjTblNYomiF) {
|
||||
if(mode & SjTblNNanSuuF)
|
||||
suuji_class = C_N_NANSUU;
|
||||
else
|
||||
suuji_class = C_N_KAZU;
|
||||
check_num(tptr);
|
||||
}
|
||||
else if (mode & SjTblNNarabiF) {
|
||||
} else if(mode & SjTblNNarabiF) {
|
||||
suuji_class = C_N_SUUJI;
|
||||
check_num(tptr);
|
||||
srch_number1(tptr);
|
||||
break;
|
||||
}
|
||||
else {
|
||||
} else {
|
||||
suuji_class = C_N_SUUJI;
|
||||
srch_number1(tptr);
|
||||
|
||||
|
|
@ -376,35 +362,33 @@ srch_number1(unsigned char* ptr)
|
|||
}
|
||||
|
||||
static void
|
||||
srch_kurai1(unsigned char* ptr, unsigned char* cnct)
|
||||
{
|
||||
unsigned char ch;
|
||||
unsigned char *p;
|
||||
int l;
|
||||
int keta;
|
||||
int mode;
|
||||
TypeClass cls;
|
||||
int len;
|
||||
unsigned char *tptr;
|
||||
srch_kurai1(unsigned char* ptr, unsigned char* cnct) {
|
||||
unsigned char ch;
|
||||
unsigned char* p;
|
||||
int l;
|
||||
int keta;
|
||||
int mode;
|
||||
TypeClass cls;
|
||||
int len;
|
||||
unsigned char* tptr;
|
||||
|
||||
if (!(p = srchtbl((ch = *ptr), Kurai1_tbl, Kr1TblRecLen, Kr1TblRecNum)))
|
||||
if(!(p = srchtbl((ch = *ptr), Kurai1_tbl, Kr1TblRecLen, Kr1TblRecNum)))
|
||||
return;
|
||||
|
||||
len = suuji_yptr + MaxClInputLen - ptr;
|
||||
|
||||
for ( ; *Kr1TblYPos(p) == ch ; p += Kr1TblRecLen) {
|
||||
if (!(l = string_cmp(Kr1TblYPos(p), Kr1TblYLen, ptr))) continue;
|
||||
for(; *Kr1TblYPos(p) == ch; p += Kr1TblRecLen) {
|
||||
if(!(l = string_cmp(Kr1TblYPos(p), Kr1TblYLen, ptr))) continue;
|
||||
|
||||
if (l > len) continue;
|
||||
if(l > len) continue;
|
||||
|
||||
mode = *Kr1TblModeP(p);
|
||||
keta = Kr1TblKeta(mode);
|
||||
tptr = ptr + l;
|
||||
|
||||
if (suuji_class != C_N_KAZU && suuji_class != C_N_NANSUU) {
|
||||
cls = suuji_class;
|
||||
suuji_class = (suuji_class == C_N_ARABIA) ?
|
||||
C_N_ARAKURA : C_N_KANKURA;
|
||||
if(suuji_class != C_N_KAZU && suuji_class != C_N_NANSUU) {
|
||||
cls = suuji_class;
|
||||
suuji_class = (suuji_class == C_N_ARABIA) ? C_N_ARAKURA : C_N_KANKURA;
|
||||
suuji_ubuf[suuji_keta - 1] |= (keta << 4);
|
||||
check_num(tptr);
|
||||
suuji_class = cls;
|
||||
|
|
@ -412,13 +396,12 @@ srch_kurai1(unsigned char* ptr, unsigned char* cnct)
|
|||
continue;
|
||||
}
|
||||
|
||||
if (cnct) {
|
||||
if (!isconnect(cnct, (int)Kr1TblCnct(mode))) continue;
|
||||
if(cnct) {
|
||||
if(!isconnect(cnct, (int)Kr1TblCnct(mode))) continue;
|
||||
suuji_ubuf[suuji_keta - 1] |= (keta << 4);
|
||||
}
|
||||
else {
|
||||
if (!Kr1TblTop(mode)) continue;
|
||||
if (suuji_keta >= NumKetaLength) continue;
|
||||
} else {
|
||||
if(!Kr1TblTop(mode)) continue;
|
||||
if(suuji_keta >= NumKetaLength) continue;
|
||||
suuji_ubuf[suuji_keta++] = (_Num1 | (keta << 4));
|
||||
}
|
||||
|
||||
|
|
@ -428,7 +411,7 @@ srch_kurai1(unsigned char* ptr, unsigned char* cnct)
|
|||
srch_kurai1(tptr, (unsigned char*)NULL);
|
||||
srch_kurai2(tptr, Kr1TblCnctP(p));
|
||||
|
||||
if (cnct)
|
||||
if(cnct)
|
||||
suuji_ubuf[suuji_keta - 1] &= 0xcf;
|
||||
else
|
||||
suuji_keta--;
|
||||
|
|
@ -436,50 +419,47 @@ srch_kurai1(unsigned char* ptr, unsigned char* cnct)
|
|||
}
|
||||
|
||||
static void
|
||||
srch_kurai2(unsigned char* ptr, unsigned char* cnct)
|
||||
{
|
||||
unsigned char ch;
|
||||
unsigned char *p;
|
||||
int l;
|
||||
int keta;
|
||||
int mode;
|
||||
TypeClass cls;
|
||||
int len;
|
||||
unsigned char *tptr;
|
||||
srch_kurai2(unsigned char* ptr, unsigned char* cnct) {
|
||||
unsigned char ch;
|
||||
unsigned char* p;
|
||||
int l;
|
||||
int keta;
|
||||
int mode;
|
||||
TypeClass cls;
|
||||
int len;
|
||||
unsigned char* tptr;
|
||||
|
||||
if ((suuji_ubuf[0] & 0x0f) == _Num0) return;
|
||||
if((suuji_ubuf[0] & 0x0f) == _Num0) return;
|
||||
|
||||
if (!(p = srchtbl((ch = *ptr), Kurai2_tbl, Kr2TblRecLen, Kr2TblRecNum)))
|
||||
if(!(p = srchtbl((ch = *ptr), Kurai2_tbl, Kr2TblRecLen, Kr2TblRecNum)))
|
||||
return;
|
||||
|
||||
len = suuji_yptr + MaxClInputLen - ptr;
|
||||
|
||||
for ( ; *Kr2TblYPos(p) == ch ; p += Kr2TblRecLen) {
|
||||
if (!(l = string_cmp(Kr2TblYPos(p), Kr2TblYLen, ptr))) continue;
|
||||
for(; *Kr2TblYPos(p) == ch; p += Kr2TblRecLen) {
|
||||
if(!(l = string_cmp(Kr2TblYPos(p), Kr2TblYLen, ptr))) continue;
|
||||
|
||||
if (l > len) continue;
|
||||
if(l > len) continue;
|
||||
|
||||
mode = *Kr2TblModeP(p);
|
||||
keta = Kr2TblKeta(mode);
|
||||
tptr = ptr + l;
|
||||
|
||||
if (suuji_class != C_N_KAZU && suuji_class != C_N_NANSUU) {
|
||||
if(suuji_class != C_N_KAZU && suuji_class != C_N_NANSUU) {
|
||||
suuji_ubuf[suuji_keta - 1] |= (keta << 6);
|
||||
cls = suuji_class;
|
||||
suuji_class = (suuji_class == C_N_ARABIA) ?
|
||||
C_N_ARAKURA : C_N_KANKURA;
|
||||
cls = suuji_class;
|
||||
suuji_class = (suuji_class == C_N_ARABIA) ? C_N_ARAKURA : C_N_KANKURA;
|
||||
check_num(tptr);
|
||||
suuji_class = cls;
|
||||
suuji_ubuf[suuji_keta - 1] &= 0x3f;
|
||||
continue;
|
||||
}
|
||||
|
||||
if (cnct) {
|
||||
if (!isconnect(cnct, (int)Kr2TblCnct(mode))) continue;
|
||||
if(cnct) {
|
||||
if(!isconnect(cnct, (int)Kr2TblCnct(mode))) continue;
|
||||
suuji_ubuf[suuji_keta - 1] |= (keta << 6);
|
||||
}
|
||||
else {
|
||||
if (suuji_keta >= NumKetaLength) continue;
|
||||
} else {
|
||||
if(suuji_keta >= NumKetaLength) continue;
|
||||
suuji_ubuf[suuji_keta++] = (_Num1 | (keta << 6));
|
||||
}
|
||||
|
||||
|
|
@ -488,7 +468,7 @@ srch_kurai2(unsigned char* ptr, unsigned char* cnct)
|
|||
srch_number1(tptr);
|
||||
srch_kurai1(tptr, (unsigned char*)NULL);
|
||||
|
||||
if (cnct)
|
||||
if(cnct)
|
||||
suuji_ubuf[suuji_keta - 1] &= 0x3f;
|
||||
else
|
||||
suuji_keta--;
|
||||
|
|
@ -496,53 +476,47 @@ srch_kurai2(unsigned char* ptr, unsigned char* cnct)
|
|||
}
|
||||
|
||||
static void
|
||||
srch_number2(unsigned char* p)
|
||||
{
|
||||
unsigned char ch;
|
||||
int i;
|
||||
srch_number2(unsigned char* p) {
|
||||
unsigned char ch;
|
||||
int i;
|
||||
|
||||
suuji_class = (*p == N_0) ? C_N_SUUJILONG : C_N_KAZULONG;
|
||||
|
||||
suuji_keta = suuji_comma = 0;
|
||||
for (i = 0 ; i < MaxClInputLen ; i++) {
|
||||
if ((ch = *p++) == Y_COMMA) {
|
||||
if (suuji_keta) {
|
||||
if (suuji_comma) {
|
||||
if (suuji_comma != 3) break;
|
||||
for(i = 0; i < MaxClInputLen; i++) {
|
||||
if((ch = *p++) == Y_COMMA) {
|
||||
if(suuji_keta) {
|
||||
if(suuji_comma) {
|
||||
if(suuji_comma != 3) break;
|
||||
} else {
|
||||
if(suuji_keta >= 4) break;
|
||||
if(*suuji_yptr == N_0) break;
|
||||
}
|
||||
else {
|
||||
if (suuji_keta >= 4) break;
|
||||
if (*suuji_yptr == N_0) break;
|
||||
}
|
||||
}
|
||||
else
|
||||
} else
|
||||
break;
|
||||
|
||||
suuji_comma = 1;
|
||||
ch = *p++;
|
||||
}
|
||||
else if (suuji_comma) {
|
||||
ch = *p++;
|
||||
} else if(suuji_comma) {
|
||||
suuji_comma++;
|
||||
}
|
||||
|
||||
if (suuji_comma > 3) break;
|
||||
if(suuji_comma > 3) break;
|
||||
|
||||
if (!(Chrtbl[ch] & NUMBER)) break;
|
||||
if(!(Chrtbl[ch] & NUMBER)) break;
|
||||
|
||||
if (suuji_keta < NumKetaLength) {
|
||||
if(suuji_keta < NumKetaLength) {
|
||||
suuji_ubuf[suuji_keta] = ch - N_0 + _Num0;
|
||||
}
|
||||
suuji_keta++;
|
||||
|
||||
if (!suuji_comma && suuji_keta > NumKetaLength) {
|
||||
if(!suuji_comma && suuji_keta > NumKetaLength) {
|
||||
setnrec(p, 0);
|
||||
}
|
||||
else if (suuji_comma == 3) {
|
||||
if (suuji_keta <= NumKetaLength) {
|
||||
} else if(suuji_comma == 3) {
|
||||
if(suuji_keta <= NumKetaLength) {
|
||||
suuji_class = C_N_ARACMA;
|
||||
check_num(p);
|
||||
}
|
||||
else {
|
||||
} else {
|
||||
suuji_class = C_N_KAZULCMA;
|
||||
setnrec(p, 0);
|
||||
}
|
||||
|
|
@ -551,32 +525,29 @@ srch_number2(unsigned char* p)
|
|||
}
|
||||
|
||||
static void
|
||||
srchnum_sub(unsigned char* p)
|
||||
{
|
||||
srchnum_sub(unsigned char* p) {
|
||||
suuji_yptr = p;
|
||||
|
||||
suuji_comma = suuji_keta = 0;
|
||||
suuji_class = 0;
|
||||
suuji_class = 0;
|
||||
srch_number1(p);
|
||||
|
||||
suuji_keta = 0;
|
||||
suuji_keta = 0;
|
||||
suuji_class = C_N_KAZU;
|
||||
srch_kurai1(p, (unsigned char*)NULL);
|
||||
if (suuji_exit) return;
|
||||
if(suuji_exit) return;
|
||||
|
||||
srch_number2(p);
|
||||
}
|
||||
|
||||
void
|
||||
srchnum(void)
|
||||
{
|
||||
void srchnum(void) {
|
||||
suuji_len = suuji_exit = 0;
|
||||
|
||||
srchnum_sub(cnvstart);
|
||||
|
||||
if (!headcode && (*cnvstart == Y_S_KIGOU1)) {
|
||||
if(!headcode && (*cnvstart == Y_S_KIGOU1)) {
|
||||
headcode = SETTOU_KIGOU;
|
||||
headlen = 1;
|
||||
headlen = 1;
|
||||
|
||||
srchnum_sub(cnvstart + 1);
|
||||
|
||||
|
|
@ -584,29 +555,24 @@ srchnum(void)
|
|||
}
|
||||
}
|
||||
|
||||
void
|
||||
setwdnum(unsigned char* p, int len, unsigned short* wd)
|
||||
{
|
||||
void setwdnum(unsigned char* p, int len, unsigned short* wd) {
|
||||
suuji_len = (unsigned char)len;
|
||||
suuji_wkeep = wd;
|
||||
suuji_ukeep = NULL;
|
||||
headcode = headlen = 0;
|
||||
suuji_exit = 0;
|
||||
suuji_exit = 0;
|
||||
|
||||
srchnum_sub(p);
|
||||
}
|
||||
|
||||
int
|
||||
setucnum(unsigned char* p, int len, unsigned char* ud)
|
||||
{
|
||||
int setucnum(unsigned char* p, int len, unsigned char* ud) {
|
||||
suuji_len = (unsigned char)len;
|
||||
suuji_wkeep = NULL;
|
||||
suuji_ukeep = ud;
|
||||
headcode = headlen = 0;
|
||||
suuji_exit = 0;
|
||||
suuji_exit = 0;
|
||||
|
||||
srchnum_sub(p);
|
||||
|
||||
return (int)suuji_exit;
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue