|
0
|
1 /*
|
|
|
2 * $Id: touroku.c,v 1.2 2001/06/14 18:16:17 ura Exp $
|
|
|
3 */
|
|
|
4
|
|
|
5 /*
|
|
|
6 * FreeWnn is a network-extensible Kana-to-Kanji conversion system.
|
|
|
7 * This file is part of FreeWnn.
|
|
|
8 *
|
|
|
9 * Copyright Kyoto University Research Institute for Mathematical Sciences
|
|
|
10 * 1987, 1988, 1989, 1990, 1991, 1992
|
|
|
11 * Copyright OMRON Corporation. 1987, 1988, 1989, 1990, 1991, 1992, 1999
|
|
|
12 * Copyright ASTEC, Inc. 1987, 1988, 1989, 1990, 1991, 1992
|
|
|
13 * Copyright 1991 by Massachusetts Institute of Technology
|
|
|
14 *
|
|
|
15 * Author: OMRON SOFTWARE Co., Ltd. <freewnn@rd.kyoto.omronsoft.co.jp>
|
|
|
16 *
|
|
|
17 * This program is free software; you can redistribute it and/or modify
|
|
|
18 * it under the terms of the GNU General Public License as published by
|
|
|
19 * the Free Software Foundation; either version 2, or (at your option)
|
|
|
20 * any later version.
|
|
|
21 *
|
|
|
22 * This program is distributed in the hope that it will be useful,
|
|
|
23 * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
24 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
25 * GNU General Public License for more details.
|
|
|
26 *
|
|
|
27 * You should have received a copy of the GNU General Public License
|
|
|
28 * along with GNU Emacs; see the file COPYING. If not, write to the
|
|
|
29 * Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
|
30 *
|
|
|
31 * Commentary:
|
|
|
32 *
|
|
|
33 * Change log:
|
|
|
34 *
|
|
|
35 * Last modified date: 8,Feb.1999
|
|
|
36 *
|
|
|
37 * Code:
|
|
|
38 *
|
|
|
39 */
|
|
|
40 /* Version 4.0
|
|
|
41 */
|
|
|
42 #include <stdio.h>
|
|
|
43 #include "commonhd.h"
|
|
|
44 #include "sdefine.h"
|
|
|
45 #include "xim.h"
|
|
|
46 #include "sheader.h"
|
|
|
47 #include "rk_spclval.h"
|
|
|
48 #include "ext.h"
|
|
|
49
|
|
|
50 static void
|
|
|
51 make_touroku_buffer (bnst, cbup)
|
|
|
52 int bnst;
|
|
|
53 ClientBuf *cbup;
|
|
|
54 {
|
|
|
55 int k, l;
|
|
|
56 w_char *bp;
|
|
|
57 w_char *buffer_end;
|
|
|
58
|
|
|
59 buffer_end = c_b->buffer + c_b->buflen - 1;
|
|
|
60 bp = c_b->buffer;
|
|
|
61 for (k = bnst; k < jl_bun_suu (bun_data_); k++)
|
|
|
62 {
|
|
|
63 if (k < maxbunsetsu)
|
|
|
64 touroku_bnst[k] = bp - c_b->buffer;
|
|
|
65 l = jl_get_kanji (bun_data_, k, k + 1, bp);
|
|
|
66 bp += l;
|
|
|
67 if (bp >= buffer_end)
|
|
|
68 {
|
|
|
69 k--;
|
|
|
70 bp -= l;
|
|
|
71 goto GOT_IT;
|
|
|
72 }
|
|
|
73 }
|
|
|
74 if (cbup->maxlen == 0)
|
|
|
75 {
|
|
|
76 get_end_of_history (bp);
|
|
|
77 }
|
|
|
78 else
|
|
|
79 {
|
|
|
80 Strncpy (bp, cbup->buffer + bunsetsu[jl_bun_suu (bun_data_)], cbup->maxlen - bunsetsu[jl_bun_suu (bun_data_)]);
|
|
|
81 *(bp + cbup->maxlen - bunsetsu[jl_bun_suu (bun_data_)]) = 0;
|
|
|
82 }
|
|
|
83
|
|
|
84 GOT_IT:
|
|
|
85 if (k < maxbunsetsu)
|
|
|
86 {
|
|
|
87 touroku_bnst[k++] = bp - c_b->buffer;
|
|
|
88 touroku_bnst_cnt = k;
|
|
|
89 }
|
|
|
90 else
|
|
|
91 {
|
|
|
92 touroku_bnst[maxbunsetsu - 1] = bp - c_b->buffer;
|
|
|
93 touroku_bnst_cnt = maxbunsetsu;
|
|
|
94 }
|
|
|
95 }
|
|
|
96
|
|
|
97 int
|
|
|
98 touroku ()
|
|
|
99 {
|
|
|
100 w_char buffer[1024];
|
|
|
101 ClientBuf *c_btmp, c_b1;
|
|
|
102
|
|
|
103 #ifdef USING_XJUTIL
|
|
|
104 c_btmp = c_b;
|
|
|
105 c_b = &c_b1;
|
|
|
106
|
|
|
107 c_b->buffer = buffer;
|
|
|
108 c_b->buflen = 1024;
|
|
|
109
|
|
|
110 make_touroku_buffer (0, c_btmp);
|
|
|
111 xw_touroku (touroku_bnst[cur_bnst_]);
|
|
|
112 c_b = c_btmp;
|
|
|
113 #endif /* USING_XJUTIL */
|
|
|
114 return (0);
|
|
|
115 }
|
