/*
 * 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: srchdict.c,v $
 * $SonyRevision: 1.1 $
 * $SonyDate: 1994/06/03 08:02:26 $
 */

#include "sj_kcnv.h"

#include "sj_kanakan.h"

int yomicmp(SJ4_CONTEXT u_char* ptr1, u_char* ptr2, u_char* saml) {
	int i, j;
	int same;

	same = *saml;

	i = getplen(ptr2);
	j = getnlen(ptr2);

	if(j == 0) {
		ptr2 = get_idxptr(SJ4_CONTEXT_PASS prevseg);

		for(i = same; i; i--)
			if(*ptr1++ != *ptr2++) return OVER;

		j = sstrlen(ptr2);
	}

	else if(i > same)
		return CONT;

	else {
		if(i < same) same = i;
		ptr1 += same;
		ptr2 += DOUONBLKSIZENUMBER;
	}

	while(j-- > 0) {
		if(*ptr1 > *ptr2) {
			*saml = same;
			return CONT;
		} else if(*ptr1++ < *ptr2++) {
			return OVER;
		}
		same++;
	}

	*saml = same;
	return MATCH;
}

u_char*
srchdict(SJ4_CONTEXT u_char* tagp) {
	TypeDicSeg segno;
	int	   cmp;
	int	   maxlen;

	maxlen = (cnvlen > MAXWDYOMILEN) ? MAXWDYOMILEN : cnvlen;

	while((int)dicinl <= maxlen) {

		segno = srchidx(SJ4_CONTEXT_PASS prevseg, (int)dicinl);

		(*curdict->getdic)(SJ4_CONTEXT_PASS curdict, segno);

		if(prevseg != segno) {

			prevseg = segno;

			tagp = dicbuf;
		}

		else {

			tagp = getntag(tagp);

			if(segend(tagp)) {

				prevseg = ++segno;

				if(segno >= curdict->segunit) return NULL;

				(*curdict->getdic)(SJ4_CONTEXT_PASS curdict, segno);

				tagp = dicbuf;
			}
		}

		if(tagp == dicbuf) {
			get_askknj(SJ4_CONTEXT_PASS2);
			tagp += *tagp + 1;
		}

		while(!segend(tagp)) {

			cmp = yomicmp(SJ4_CONTEXT_PASS cnvstart, tagp, &dicsaml);

			if((int)dicsaml > maxlen) return NULL;

			if(cmp == OVER)
				return NULL;

			else if(cmp == MATCH) {

				if(isdpnd(*(cnvstart + dicsaml))) {
					break;
				}

				else {
					dicinl = dicsaml + 1;
					return tagp;
				}
			}
			tagp = getntag(tagp);
		}
		dicinl = dicsaml + 1;
	}

	return NULL;
}
