sj3/mk2claus.c

156 lines
3.5 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_kcnv.h"
#include "sj_right.h"
int terminate(TypeCnct right, unsigned char * yomi);
int priority(CLREC * clrec);
void mkjiritsu(int mode);
void mkbunsetsu(void);
void wakachi(void);
void pritiny(void);
void free_clall(CLREC * p);
void free_jall(JREC * p);
static int set2nd(CLREC * clrec)
{
CLREC* rec2;
mkjiritsu(DO_IKKATU | DO_CLSTUDY);
mkbunsetsu();
if(!maxclptr) {
wakachi();
return clrec->cllen;
}
for(rec2 = maxclptr; rec2; rec2 = rec2->clsort) {
if(terminate(rec2->right, cnvstart + rec2->cllen) != SHU)
break;
}
return rec2 ? (clrec->cllen + rec2->cllen) : (clrec->cllen);
}
void mk2claus(void)
{
unsigned char* keepptr;
int keeplen;
CLREC* clrec;
int len;
int save2ln;
int prty;
int maxprty;
int count;
int prty2;
prty = maxprty = prty2 = 0;
clt2nd = maxclptr = NULL;
jrt2nd = maxjptr = NULL;
selcl = clt1st;
if(selcl->right == R_FZKKGU) {
pritiny();
return;
}
if(cnvlen == selcl->cllen) {
pritiny();
return;
}
keepptr = cnvstart;
keeplen = cnvlen;
len = count = 0;
for(clrec = selcl; clrec && count < 5; clrec = clrec->clsort) {
cnvstart = keepptr + clrec->cllen;
cnvlen = keeplen - clrec->cllen;
if(len != clrec->cllen) {
if(clt2nd != maxclptr) {
free_clall(maxclptr);
free_jall(maxjptr);
}
save2ln = set2nd(clrec);
count++;
len = clrec->cllen;
prty2 = 0;
}
if(Termtbl[clrec->right] & T_SHUUJO)
clrec->cl2len = (unsigned char)len;
else
clrec->cl2len = (unsigned char)save2ln;
if(selcl->cl2len > clrec->cl2len) continue;
prty = priority(clrec) - prty2;
prty2++;
if(selcl->cl2len == clrec->cl2len) {
if(clrec->cllen == nextcllen) {
if(selcl->cllen != nextcllen)
;
else if(prty <= maxprty)
continue;
}
else if(prty <= maxprty)
continue;
}
selcl = clrec;
maxprty = prty;
if(clt2nd == maxclptr) continue;
free_clall(clt2nd);
free_jall(jrt2nd);
jrt2nd = maxjptr;
clt2nd = maxclptr;
}
if(clt2nd != maxclptr) {
free_clall(maxclptr);
maxclptr = NULL;
free_jall(maxjptr);
maxjptr = NULL;
}
cnvstart = keepptr;
cnvlen = keeplen;
}