sj4/lib/sj3core/mk2claus.c
2026-06-19 01:49:53 +09:00

156 lines
3.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.
*
*/
/*
* $SonyRCSfile: mk2claus.c,v $
* $SonyRevision: 1.1 $
* $SonyDate: 1994/06/03 08:02:00 $
*/
#include "sj_kcnv.h"
#include "sj_right.h"
#include "sj_kanakan.h"
static int
set2nd(CLREC* clrec) {
CLREC* rec2;
mkjiritu(DO_IKKATU | DO_CLSTUDY);
mkbunsetu();
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() {
u_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 = (u_char)len;
else
clrec->cl2len = (u_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;
}