sj4/lib/sj3core/mkbunset.c
2008-01-11 11:57:08 +00:00

166 lines
3.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.
*
*/
/*
* $SonyRCSfile: mkbunset.c,v $
* $SonyRevision: 1.1 $
* $SonyDate: 1994/06/03 08:02:02 $
*/
#include "sj_kcnv.h"
#include "sj_hinsi.h"
#include "sj_kanakan.h"
void
mkbunsetu()
{
JREC *jrec;
TypeGram hinsi;
u_char *cnj;
CREC crec[4];
int count;
TypeCnct right;
u_char *next;
int i;
fzkcount = 0;
maxclptr = NULL;
jrec = maxjptr;
while (jrec) {
if (jrec -> stbofs && (cnj = getstb(jrec -> hinsi)))
hinsi = StbHinsi(cnj + jrec -> stbofs - 1);
else
hinsi = jrec -> hinsi;
if (right = Connadr[hinsi]) {
gobilen = 0;
next = cnvstart + jrec->jlen;
if (terminate(right, next)) {
fzk_ka_flg = 0;
setclrec(jrec, next, right);
}
srchfzk(jrec, next, right, 0);
}
else if (count = setconj(hinsi, jrec, crec)) {
for (i = count ; i-- > 0 ; ) {
right = crec[i].right;
gobilen = crec[i].len;
next = cnvstart + jrec->jlen + gobilen;
if (terminate(right, next)) {
fzk_ka_flg = 0;
setclrec(jrec, next, right);
}
srchfzk(jrec, next, right, 0);
}
}
jrec = jrec -> jsort;
}
}
CLREC *
argclrec(int len)
{
CLREC *ptr;
CLREC *rec;
CLREC *child;
rec = alloc_clrec();
if (!rec) {
if (!maxclptr)
return NULL;
ptr = NULL;
rec = maxclptr;
while (child = rec -> clsort) {
ptr = rec;
rec = child;
}
if (len <= (int) rec -> cllen)
return NULL;
if (ptr)
ptr -> clsort = NULL;
else
maxclptr = NULL;
if (rec -> jnode) (rec -> jnode)--;
}
memset((u_char *)rec, 0, sizeof(*rec));
rec -> cllen = rec -> cl2len = (u_char)len;
if (!maxclptr) {
maxclptr = rec;
return rec;
}
ptr = maxclptr;
if (((int)ptr -> cllen < len) ||
(((int)ptr -> cllen == len) &&
(ptr -> jnode -> hinsi == TANKANJI))) {
rec -> clsort = maxclptr;
maxclptr = rec;
return rec;
}
while (child = ptr -> clsort) {
if ((int)child -> cllen < len ||
((int)child -> cllen == len &&
child->jnode->hinsi == TANKANJI)){
ptr -> clsort = rec;
rec -> clsort = child;
return rec;
}
else
ptr = child;
}
ptr -> clsort = rec;
return rec;
}