/*
 * 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: cl2knj.c,v $
 * $SonyRevision: 1.1 $
 * $SonyDate: 1994/06/03 08:01:31 $
 */

#include "sj_kcnv.h"

#include "sj_kanakan.h"

static CLREC *nextrecblk(), *prevrecblk();

static void initkbuf(u_char*);

int cl2knj(u_char* yomi, int len, u_char* kouho) {
	u_char* ptr1;
	u_char* ptr2;
	int	i;

	khcount = nkhcount = 0;

	initkbuf(kouho);

	if(len > MAXCLINPUTLEN * 2) len = MAXCLINPUTLEN * 2;

	ptr1 = yomi;
	ptr2 = hyomi;
	for(i = 0; i < len; i++) {
		if(isknj1(*ptr1)) {
			if(++i >= len) break;
		}
		ptr1 += sj2cd_chr(ptr1, ptr2++);
	}
	*ptr2 = 0;

	strlcpy(orgyomi, yomi, (int)(ptr1 - yomi) + 1);

	if(!hyomi[0]) return 0;

	freework();

	inputyomi = orgyomi;
	cnvstart = ystart = hyomi;
	cnvlen		  = sstrlen(hyomi);

	mkjiritu(0);

	mkbunsetu();

	if(!maxclptr) wakachi();

	jrt1st = maxjptr;
	clt1st = maxclptr;

	mkkouho();

	getrank();

	selectid = 1;

	cvtclknj();

	return hzstrlen(inputyomi, (int)clt1st->cllen);
}

int nextcl(u_char* kouho, int mode) {
	CLREC* clptr;

	initkbuf(kouho);

	if(!khcount) return 0;

	if(!mode && (selectid < khcount))
		selectid++;

	else if((mode < 2) && (clptr = nextrecblk())) {
		selectid = 1;
		clt1st	 = clptr;
		mkkouho();
		getrank();
	} else {
		cvtclknj();
		return 0;
	}

	cvtclknj();

	return hzstrlen(inputyomi, (int)clt1st->cllen);
}

static CLREC*
nextrecblk() {
	CLREC* clptr;
	int    keeplen;

	keeplen = clt1st->cllen;

	clptr = clt1st->clsort;

	while(clptr && (int)clptr->cllen == keeplen)
		clptr = clptr->clsort;

	return clptr;
}

int prevcl(u_char* kouho, int mode) {
	CLREC* clptr;

	initkbuf(kouho);

	if(!khcount) return 0;

	if(!mode && (selectid > 1))
		selectid--;

	else if((mode < 2) && (clptr = prevrecblk())) {
		clt1st = clptr;
		mkkouho();
		getrank();
		selectid = khcount;
	} else {
		cvtclknj();
		return 0;
	}

	cvtclknj();

	return hzstrlen(inputyomi, (int)clt1st->cllen);
}

static CLREC*
prevrecblk() {
	CLREC* clptr;
	CLREC* keepptr;
	int    keeplen;
	int    cllen;

	clptr = maxclptr;

	if((cllen = clt1st->cllen) == clptr->cllen)
		return NULL;

	while((int)clptr->cllen > cllen) {
		keeplen = clptr->cllen;

		keepptr = clptr;

		while((int)clptr->cllen == keeplen)
			clptr = clptr->clsort;
	}

	return keepptr;
}

static void
initkbuf(u_char* kouho) {
	kanjitmp = kouho;
	memset(kanjitmp, 0, sizeof(STDYOUT) + 1);
}

int selectnum() {
	return selectid;
}