Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
freebsd
GitHub Repository: freebsd/freebsd-ports
Path: blob/main/japanese/FreeWnn-lib/files/patch-Wnn-conv-cvt_read.c
18157 views
1
Index: Wnn/conv/cvt_read.c
2
===================================================================
3
RCS file: /home/cvs/private/hrs/freewnn/Wnn/conv/cvt_read.c,v
4
retrieving revision 1.1.1.1
5
retrieving revision 1.2
6
diff -u -p -r1.1.1.1 -r1.2
7
--- Wnn/conv/cvt_read.c 20 Dec 2008 07:13:30 -0000 1.1.1.1
8
+++ Wnn/conv/cvt_read.c 20 Dec 2008 15:22:37 -0000 1.2
9
@@ -67,8 +67,8 @@
10
/*
11
#define NOFILE_NOT_ABORT
12
*/
13
- /* �����define���Ƥ����ȡ��Ѵ�ɽ��open�Ǥ��ʤ����˥��顼��λ������
14
- ñ���Ѵ��ؿ��������ؿ��ˤʤ롣 */
15
+/* �����define���Ƥ����ȡ��Ѵ�ɽ��open�Ǥ��ʤ����˥��顼��λ������
16
+ ñ���Ѵ��ؿ��������ؿ��ˤʤ롣 */
17
18
#define is_digit(x) (isascii(x) && isdigit(x))
19
#define is_xdigit(x) (isascii(x) && isxdigit(x))
20
@@ -82,14 +82,13 @@
21
22
#define ESCCHR '\033'
23
24
- /* convert_key ���Ѵ�ɽ�Υե�����̾�Υǥե���Ȥ򥻥åȡ�
25
- �Ѵ�ɽ��̾������Ū�˻��ꤵ�줿�顢���줬�����ѿ����ͤˤʤ롣 */
26
+/* convert_key ���Ѵ�ɽ�Υե�����̾�Υǥե���Ȥ򥻥åȡ�
27
+ �Ѵ�ɽ��̾������Ū�˻��ꤵ�줿�顢���줬�����ѿ����ͤˤʤ롣 */
28
static char *convert_filename;
29
static char default_cvt_fn[128];
30
31
static FILE *convert_hyo;
32
33
-
34
/** ���顼��å�������ɽ�� */
35
#define errdsp1(mes, conv_fnm) \
36
fprintf(stderr, "%s: %s.\r\n%s = %s\r\n\n", \
37
@@ -132,11 +131,10 @@ static FILE *convert_hyo;
38
39
/** ������c���ܤ˸�������ǰ��� */
40
static void
41
-printcode (f, c)
42
- FILE *f;
43
- int c;
44
+printcode(FILE *f,
45
+ int c)
46
{
47
- fprintf (f, (' ' <= c && c < '\177') ? "'%c'" : ((c & ~0xff) ? "0x%X" : "'\\%03o'"), c);
48
+ fprintf(f, (' ' <= c && c < '\177') ? "'%c'" : ((c & ~0xff) ? "0x%X" : "'\\%03o'"), c);
49
}
50
51
/*
52
@@ -145,58 +143,58 @@ char **pterp;
53
{�ѻ�}
54
*/
55
56
- /** 8��10��16�ʥ������ѤΥ���饯����ºݤΥ����ɤ�ľ�������ϤΥ����å���
57
- ���ʤ������Ϥϱѿ����Ȳ��ꤷ�Ƥ���ˡ�*/
58
+/** 8��10��16�ʥ������ѤΥ���饯����ºݤΥ����ɤ�ľ�������ϤΥ����å���
59
+ ���ʤ������Ϥϱѿ����Ȳ��ꤷ�Ƥ���ˡ�*/
60
static int
61
-charvalue (c)
62
- char c;
63
+charvalue (char c)
64
{
65
- if (isupper (c))
66
- return (c - 'A' + 10);
67
- if (islower (c))
68
- return (c - 'a' + 10);
69
- return (c - '0');
70
-}
71
+ if (isupper(c))
72
+ return (c - 'A' + 10);
73
74
+ if (islower(c))
75
+ return (c - 'a' + 10);
76
+
77
+ return (c - '0');
78
+}
79
80
#ifdef TERMCAP
81
char *cvttbl_entry[] = {
82
- "k0", "k1", "k2", "k3", "k4", "k5", "k6", "k7", "k8", "k9",
83
+ "k0", "k1", "k2", "k3", "k4", "k5", "k6", "k7", "k8", "k9",
84
#ifdef SUPPORT_TWODIGIT_FUNCTIONS
85
- "k;",
86
- "F1", "F2", "F3", "F4", "F5", "F6", "F7", "F8", "F9", "FA",
87
- "FB", "FC", "FD", "FE", "FF", "FG", "FH", "FI", "FJ", "FK",
88
- "FL", "FM", "FN", "FO", "FP", "FQ", "FR", "FS", "FT", "FU",
89
- "FV", "FW", "FX", "FY", "FZ", "Fa", "Fb", "Fc", "Fd", "Fe",
90
- "Ff", "Fg", "Fh", "Fi", "Fj", "Fk", "Fl", "Fm", "Fn", "Fo",
91
- "Fp", "Fq", "Fr",
92
+ "k;",
93
+ "F1", "F2", "F3", "F4", "F5", "F6", "F7", "F8", "F9", "FA",
94
+ "FB", "FC", "FD", "FE", "FF", "FG", "FH", "FI", "FJ", "FK",
95
+ "FL", "FM", "FN", "FO", "FP", "FQ", "FR", "FS", "FT", "FU",
96
+ "FV", "FW", "FX", "FY", "FZ", "Fa", "Fb", "Fc", "Fd", "Fe",
97
+ "Ff", "Fg", "Fh", "Fi", "Fj", "Fk", "Fl", "Fm", "Fn", "Fo",
98
+ "Fp", "Fq", "Fr",
99
#endif /* SUPPORT_TWODIGIT_FUNCTIONS */
100
- "ku", "kr", "kl", "kd", "kh",
101
- "up", "ri", "le", "do", "ho",
102
- "kb",
103
- "!del", /* ���� */
104
+ "ku", "kr", "kl", "kd", "kh",
105
+ "up", "ri", "le", "do", "ho",
106
+ "kb",
107
+ "!del", /* ���� */
108
};
109
#endif /* TERMCAP */
110
#ifdef TERMINFO
111
char *cvttbl_entry[] = {
112
- "kf0", "kf1", "kf2", "kf3", "kf4", "kf5", "kf6", "kf7",
113
- "kf8", "kf9", "kf10",
114
+ "kf0", "kf1", "kf2", "kf3", "kf4", "kf5", "kf6", "kf7",
115
+ "kf8", "kf9", "kf10",
116
#ifdef SUPPORT_TWODIGIT_FUNCTIONS
117
- "kf11", "kf12", "kf13", "kf14", "kf15", "kf16", "kf17",
118
- "kf18", "kf19", "kf20", "kf21", "kf22", "kf23", "kf24",
119
- "kf25", "kf26", "kf27", "kf28", "kf29", "kf30", "kf31",
120
+ "kf11", "kf12", "kf13", "kf14", "kf15", "kf16", "kf17",
121
+ "kf18", "kf19", "kf20", "kf21", "kf22", "kf23", "kf24",
122
+ "kf25", "kf26", "kf27", "kf28", "kf29", "kf30", "kf31",
123
#ifndef uniosu
124
- "kf32", "kf33", "kf34", "kf35", "kf36", "kf37", "kf38",
125
- "kf39", "kf40", "kf41", "kf42", "kf43", "kf44", "kf45",
126
- "kf46", "kf47", "kf48", "kf49", "kf50", "kf51", "kf52",
127
- "kf53", "kf54", "kf55", "kf56", "kf57", "kf58", "kf59",
128
- "kf60", "kf61", "kf62", "kf63",
129
+ "kf32", "kf33", "kf34", "kf35", "kf36", "kf37", "kf38",
130
+ "kf39", "kf40", "kf41", "kf42", "kf43", "kf44", "kf45",
131
+ "kf46", "kf47", "kf48", "kf49", "kf50", "kf51", "kf52",
132
+ "kf53", "kf54", "kf55", "kf56", "kf57", "kf58", "kf59",
133
+ "kf60", "kf61", "kf62", "kf63",
134
#endif
135
#endif /* SUPPORT_TWODIGIT_FUNCTIONS */
136
- "kcuu1", "kcuf1", "kcub1", "kcud1", "khome",
137
- "kbs", "ktbc", "kclr", "kctab", "kdch1", "kdl1",
138
- "krmir", "kel", "ked", "kich1", "kil1",
139
- "kll", "knp", "kpp", "kind", "kri", "khts",
140
+ "kcuu1", "kcuf1", "kcub1", "kcud1", "khome",
141
+ "kbs", "ktbc", "kclr", "kctab", "kdch1", "kdl1",
142
+ "krmir", "kel", "ked", "kich1", "kil1",
143
+ "kll", "knp", "kpp", "kind", "kri", "khts",
144
};
145
#endif /* TERMINFO */
146
147
@@ -208,494 +206,496 @@ char tdataarea[AREASIZE]; /* �ǡ��
148
149
struct CONVCODE tbl[CVTTBLSIZ];
150
int cnv_tbl_cnt; /* convert table count */
151
- /* �����ϸ��� convert_key.c���static�ѿ����ä� */
152
+/* �����ϸ��� convert_key.c���static�ѿ����ä� */
153
154
- /** ����С���ɽ�Υ���ȥ���ʬ��Ȥ롣����������Ĺ��Ķ������0���֤� */
155
+/** ����С���ɽ�Υ���ȥ���ʬ��Ȥ롣����������Ĺ��Ķ������0���֤� */
156
static int
157
-get_entrynm (buf)
158
- char *buf;
159
+get_entrynm(char *buf)
160
{
161
- int i, c;
162
+ int i, c;
163
164
- for (i = 0; i <= ENTRY_LEN; i++)
165
- {
166
- c = getc (convert_hyo);
167
- if (is_eofsp (c))
168
- {
169
- ungetc (c, convert_hyo);
170
- *buf = '\0';
171
- return (1);
172
- }
173
- else
174
- *buf++ = c;
175
- }
176
- return (0);
177
+ for (i = 0; i <= ENTRY_LEN; i++) {
178
+ c = getc(convert_hyo);
179
+
180
+ if (is_eofsp(c)) {
181
+ ungetc(c, convert_hyo);
182
+ *buf = '\0';
183
+ return (1);
184
+ } else
185
+ *buf++ = c;
186
+ }
187
+
188
+ return (0);
189
}
190
191
/** ����ʲ���ʸ��������ˤ�ȤФ��Ƽ���ʸ�����֤� */
192
static int
193
-blank_ign_getc (f)
194
- FILE *f;
195
+blank_ign_getc(FILE *f)
196
{
197
- int c;
198
+ int c;
199
+
200
+ while (c = getc(f),
201
+ is_space(c) && c != '\n');
202
203
- while (c = getc (f), is_space (c) && c != '\n');
204
- return (c);
205
+ return (c);
206
}
207
208
- /** ����������EOF�ˤޤ����Ф������δ֤������ʸ�������ä�����0���֤���*/
209
+/** ����������EOF�ˤޤ����Ф������δ֤������ʸ�������ä�����0���֤���*/
210
static int
211
-linepass (f)
212
- FILE *f;
213
+linepass(FILE *f)
214
{
215
- int c, flg = 0;
216
+ int c, flg = 0;
217
218
- while (c = getc (f), !is_eofnl (c))
219
- flg = (flg || !is_space (c));
220
- return (flg);
221
+ while (c = getc(f), !is_eofnl(c))
222
+ flg = (flg || !is_space(c));
223
+
224
+ return (flg);
225
}
226
227
- /** ����ȥ����륳���ɷ����Υ�����ɽ����ʸ��ʬ��Ȥ롣���顼����������͡�0*/
228
+/** ����ȥ����륳���ɷ����Υ�����ɽ����ʸ��ʬ��Ȥ롣���顼����������͡�0*/
229
static int
230
-get_ctrl (cptr)
231
- int *cptr;
232
+get_ctrl(int *cptr)
233
{
234
- int c;
235
+ int c;
236
+
237
+ if (!(' ' <= (c = getc(convert_hyo))
238
+ && c < '\177'))
239
+ return (1);
240
+
241
+ *cptr = (c == '?' ? '\177' : c & 0x1f);
242
243
- if (!(' ' <= (c = getc (convert_hyo)) && c < '\177'))
244
- return (1);
245
- *cptr = (c == '?' ? '\177' : c & 0x1f);
246
- return (0);
247
+ return (0);
248
}
249
250
/** �Хå�����å�������Υ�����ɽ����ʸ��ʬ��Ȥ롣���顼���������0���֤�*/
251
static int
252
-get_bcksla (cptr)
253
- int *cptr;
254
+get_bcksla(int *cptr)
255
{
256
- int c, code = 0, digflg = 0;
257
+ int c, code = 0, digflg = 0;
258
259
- switch (c = getc (convert_hyo))
260
- {
261
- case 'n':
262
- *cptr = '\n';
263
- return (0);
264
- case 't':
265
- *cptr = '\t';
266
- return (0);
267
- case 'b':
268
- *cptr = '\b';
269
- return (0);
270
- case 'r':
271
- *cptr = '\r';
272
- return (0);
273
- case 'f':
274
- *cptr = '\f';
275
- return (0);
276
- case 'e':
277
- case 'E':
278
- *cptr = ESCCHR;
279
- return (0);
280
- case 'o':
281
- while (c = getc (convert_hyo), is_octal (c))
282
- {
283
- code <<= 3;
284
- code += charvalue (c);
285
- digflg = 1;
286
- }
287
- ungetc (c, convert_hyo);
288
- *cptr = code;
289
- return (digflg == 0);
290
- case 'd':
291
- while (c = getc (convert_hyo), is_digit (c))
292
- {
293
- code *= 10;
294
- code += charvalue (c);
295
- digflg = 1;
296
- }
297
- ungetc (c, convert_hyo);
298
- *cptr = code;
299
- return (digflg == 0);
300
- case 'x':
301
- while (c = getc (convert_hyo), is_xdigit (c))
302
- {
303
- code <<= 4;
304
- code += charvalue (c);
305
- digflg = 1;
306
- }
307
- ungetc (c, convert_hyo);
308
- *cptr = code;
309
- return (digflg == 0);
310
- default:
311
- if (is_octal (c))
312
- {
313
- code = charvalue (c);
314
- while (c = getc (convert_hyo), is_octal (c))
315
- {
316
- code <<= 3;
317
- code += charvalue (c);
318
- }
319
- ungetc (c, convert_hyo);
320
- *cptr = code;
321
- return (0);
322
- }
323
- else
324
- {
325
- *cptr = c;
326
- return (0);
327
- }
328
- }
329
+ switch (c = getc(convert_hyo)) {
330
+ case 'n':
331
+ *cptr = '\n';
332
+ return (0);
333
+ case 't':
334
+ *cptr = '\t';
335
+ return (0);
336
+ case 'b':
337
+ *cptr = '\b';
338
+ return (0);
339
+ case 'r':
340
+ *cptr = '\r';
341
+ return (0);
342
+ case 'f':
343
+ *cptr = '\f';
344
+ return (0);
345
+ case 'e':
346
+ case 'E':
347
+ *cptr = ESCCHR;
348
+ return (0);
349
+ case 'o':
350
+ while (c = getc(convert_hyo), is_octal(c)) {
351
+ code <<= 3;
352
+ code += charvalue(c);
353
+ digflg = 1;
354
+ }
355
+ ungetc(c, convert_hyo);
356
+ *cptr = code;
357
+ return (digflg == 0);
358
+ case 'd':
359
+ while (c = getc(convert_hyo), is_digit(c)) {
360
+ code *= 10;
361
+ code += charvalue(c);
362
+ digflg = 1;
363
+ }
364
+
365
+ ungetc(c, convert_hyo);
366
+ *cptr = code;
367
+ return (digflg == 0);
368
+ case 'x':
369
+ while (c = getc(convert_hyo), is_xdigit(c)) {
370
+ code <<= 4;
371
+ code += charvalue(c);
372
+ digflg = 1;
373
+ }
374
+ ungetc(c, convert_hyo);
375
+ *cptr = code;
376
+ return (digflg == 0);
377
+ default:
378
+ if (is_octal(c)) {
379
+ code = charvalue(c);
380
+ while (c = getc(convert_hyo), is_octal(c)) {
381
+ code <<= 3;
382
+ code += charvalue(c);
383
+ }
384
+ ungetc(c, convert_hyo);
385
+ *cptr = code;
386
+ return (0);
387
+ } else {
388
+ *cptr = c;
389
+ return (0);
390
+ }
391
+ }
392
}
393
394
- /** ������ɽ����Ȥäơ�cptr�λؤ���ˤ��Υ����ɤ�����롣
395
- ʸˡ���顼ȯ��������0���֤���*/
396
+/** ������ɽ����Ȥäơ�cptr�λؤ���ˤ��Υ����ɤ�����롣
397
+ ʸˡ���顼ȯ��������0���֤���*/
398
static int
399
-get_code (cptr)
400
- int *cptr;
401
+get_code(int *cptr)
402
{
403
- int c;
404
+ int c;
405
406
- switch (c = getc (convert_hyo))
407
- {
408
- case '\\':
409
- return (get_bcksla (cptr));
410
- case '^':
411
- return (get_ctrl (cptr));
412
- default:
413
- *cptr = c;
414
- return (0);
415
- }
416
+ switch (c = getc(convert_hyo)) {
417
+ case '\\':
418
+ return (get_bcksla(cptr));
419
+ case '^':
420
+ return (get_ctrl(cptr));
421
+ default:
422
+ *cptr = c;
423
+ return (0);
424
+ }
425
}
426
427
#ifdef TERMCAP
428
- /** tgetstr��Ʊ���δؿ���â��������ȥ�̾��!del�ס�DEL�������Ѵ��򤹤뤿��
429
- ����Ū���ɲä��Ƥ��륨��ȥ�ˤ��Ф��Ƥϡ���ʸ����"\177"���֤���*/
430
+/** tgetstr��Ʊ���δؿ���â��������ȥ�̾��!del�ס�DEL�������Ѵ��򤹤뤿��
431
+ ����Ū���ɲä��Ƥ��륨��ȥ�ˤ��Ф��Ƥϡ���ʸ����"\177"���֤���*/
432
static char *
433
-my_tgetstr (name, ptr)
434
- char *name, **ptr;
435
+my_tgetstr(char *name,
436
+ char **ptr)
437
{
438
- extern char *tgetstr ();
439
- static char *del = "\177";
440
+ extern char *tgetstr ();
441
+ static char *del = "\177";
442
443
- if (strcmp (name, "!del") == 0)
444
- return (del);
445
- return (tgetstr (name, ptr));
446
+ if (strcmp(name, "!del") == 0)
447
+ return (del);
448
+
449
+ return (tgetstr(name, ptr));
450
}
451
#endif
452
453
#ifdef TERMINFO
454
- /** pp1�λؤ��Ƥ��륨�ꥢ��p2�����Ƥ����줿�塢pp1�Υݥ��󥿤�ʤ�Ƥ���*/
455
+/** pp1�λؤ��Ƥ��륨�ꥢ��p2�����Ƥ����줿�塢pp1�Υݥ��󥿤�ʤ�Ƥ���*/
456
static char *
457
-stradd (pp1, p2)
458
- char **pp1, *p2;
459
+stradd(char **pp1, char *p2)
460
{
461
- if (p2 != NULL)
462
- {
463
- strcpy (*pp1, p2);
464
- (*pp1) += strlen (p2 = *pp1) + 1;
465
- }
466
- return (p2);
467
+ if (p2 != NULL) {
468
+ strcpy(*pp1, p2);
469
+ (*pp1) += strlen(p2 = *pp1) + 1;
470
+ }
471
+
472
+ return (p2);
473
}
474
#endif
475
476
/** termcap/info�����ɤ�������Υǡ��������ѥ��ꥢ�˥��ԡ���*/
477
static void
478
-convert_getstrs (flg)
479
- int flg; /* verbose�⡼�ɤǵ��������Υե饰�ʺ��νꤽ���������������
480
- ��ĥ�����뤫�⤷��ʤ��Τǡ�1��0��Ϳ���Ʋ����������Υե�����
481
- ��Ρ�̾����convert_�ǻϤޤ�¾�δؿ��Ǥ�Ʊ���Ǥ��� */
482
+convert_getstrs(int flg)
483
+/* verbose�⡼�ɤǵ��������Υե饰�ʺ��νꤽ���������������
484
+ ��ĥ�����뤫�⤷��ʤ��Τǡ�1��0��Ϳ���Ʋ����������Υե�����
485
+ ��Ρ�̾����convert_�ǻϤޤ�¾�δؿ��Ǥ�Ʊ���Ǥ��� */
486
{
487
- char *tdataptr;
488
- int i;
489
+ char *tdataptr;
490
+ int i;
491
492
- tdataptr = tdataarea;
493
+ tdataptr = tdataarea;
494
495
#ifdef TERMCAP
496
- for (i = 0; i < ENTRY_CNT; i++)
497
- keydef_key[i] = my_tgetstr (cvttbl_entry[i], &tdataptr);
498
+ for (i = 0; i < ENTRY_CNT; i++)
499
+ keydef_key[i] = my_tgetstr(cvttbl_entry[i], &tdataptr);
500
/* keydef_key[i] ���ͤϡ�NULL����tdataarea���ϰ���Ȥϸ¤�ʤ���
501
"\177"�ʤɤ��ü�ǡ�����ؤ����Ȥ⤢�롣 */
502
503
- if (flg)
504
- fprintf (stderr, "convert_key: finished getting TERMCAP.\r\n");
505
+ if (flg)
506
+ fprintf (stderr, "convert_key: finished getting TERMCAP.\r\n");
507
#endif
508
509
#ifdef TERMINFO
510
- i = 0;
511
- keydef_key[i++] = stradd (&tdataptr, key_f0);
512
- keydef_key[i++] = stradd (&tdataptr, key_f1);
513
- keydef_key[i++] = stradd (&tdataptr, key_f2);
514
- keydef_key[i++] = stradd (&tdataptr, key_f3);
515
- keydef_key[i++] = stradd (&tdataptr, key_f4);
516
- keydef_key[i++] = stradd (&tdataptr, key_f5);
517
- keydef_key[i++] = stradd (&tdataptr, key_f6);
518
- keydef_key[i++] = stradd (&tdataptr, key_f7);
519
- keydef_key[i++] = stradd (&tdataptr, key_f8);
520
- keydef_key[i++] = stradd (&tdataptr, key_f9);
521
- keydef_key[i++] = stradd (&tdataptr, key_f10);
522
+ i = 0;
523
+ keydef_key[i++] = stradd(&tdataptr, key_f0);
524
+ keydef_key[i++] = stradd(&tdataptr, key_f1);
525
+ keydef_key[i++] = stradd(&tdataptr, key_f2);
526
+ keydef_key[i++] = stradd(&tdataptr, key_f3);
527
+ keydef_key[i++] = stradd(&tdataptr, key_f4);
528
+ keydef_key[i++] = stradd(&tdataptr, key_f5);
529
+ keydef_key[i++] = stradd(&tdataptr, key_f6);
530
+ keydef_key[i++] = stradd(&tdataptr, key_f7);
531
+ keydef_key[i++] = stradd(&tdataptr, key_f8);
532
+ keydef_key[i++] = stradd(&tdataptr, key_f9);
533
+ keydef_key[i++] = stradd(&tdataptr, key_f10);
534
#ifdef SUPPORT_TWODIGIT_FUNCTIONS
535
- keydef_key[i++] = stradd (&tdataptr, key_f11);
536
- keydef_key[i++] = stradd (&tdataptr, key_f12);
537
- keydef_key[i++] = stradd (&tdataptr, key_f13);
538
- keydef_key[i++] = stradd (&tdataptr, key_f14);
539
- keydef_key[i++] = stradd (&tdataptr, key_f15);
540
- keydef_key[i++] = stradd (&tdataptr, key_f16);
541
- keydef_key[i++] = stradd (&tdataptr, key_f17);
542
- keydef_key[i++] = stradd (&tdataptr, key_f18);
543
- keydef_key[i++] = stradd (&tdataptr, key_f19);
544
- keydef_key[i++] = stradd (&tdataptr, key_f20);
545
- keydef_key[i++] = stradd (&tdataptr, key_f21);
546
- keydef_key[i++] = stradd (&tdataptr, key_f22);
547
- keydef_key[i++] = stradd (&tdataptr, key_f23);
548
- keydef_key[i++] = stradd (&tdataptr, key_f24);
549
- keydef_key[i++] = stradd (&tdataptr, key_f25);
550
- keydef_key[i++] = stradd (&tdataptr, key_f26);
551
- keydef_key[i++] = stradd (&tdataptr, key_f27);
552
- keydef_key[i++] = stradd (&tdataptr, key_f28);
553
- keydef_key[i++] = stradd (&tdataptr, key_f29);
554
- keydef_key[i++] = stradd (&tdataptr, key_f30);
555
- keydef_key[i++] = stradd (&tdataptr, key_f31);
556
+ keydef_key[i++] = stradd(&tdataptr, key_f11);
557
+ keydef_key[i++] = stradd(&tdataptr, key_f12);
558
+ keydef_key[i++] = stradd(&tdataptr, key_f13);
559
+ keydef_key[i++] = stradd(&tdataptr, key_f14);
560
+ keydef_key[i++] = stradd(&tdataptr, key_f15);
561
+ keydef_key[i++] = stradd(&tdataptr, key_f16);
562
+ keydef_key[i++] = stradd(&tdataptr, key_f17);
563
+ keydef_key[i++] = stradd(&tdataptr, key_f18);
564
+ keydef_key[i++] = stradd(&tdataptr, key_f19);
565
+ keydef_key[i++] = stradd(&tdataptr, key_f20);
566
+ keydef_key[i++] = stradd(&tdataptr, key_f21);
567
+ keydef_key[i++] = stradd(&tdataptr, key_f22);
568
+ keydef_key[i++] = stradd(&tdataptr, key_f23);
569
+ keydef_key[i++] = stradd(&tdataptr, key_f24);
570
+ keydef_key[i++] = stradd(&tdataptr, key_f25);
571
+ keydef_key[i++] = stradd(&tdataptr, key_f26);
572
+ keydef_key[i++] = stradd(&tdataptr, key_f27);
573
+ keydef_key[i++] = stradd(&tdataptr, key_f28);
574
+ keydef_key[i++] = stradd(&tdataptr, key_f29);
575
+ keydef_key[i++] = stradd(&tdataptr, key_f30);
576
+ keydef_key[i++] = stradd(&tdataptr, key_f31);
577
#endif /* SUPPORT_TWODIGIT_FUNCTIONS */
578
/* �ʲ����
579
- "kcuu1", "kcuf1", "kcub1", "kcud1", "khome",
580
- "kbs", "ktbc", "kclr", "kctab", "kdch1", "kdl1",
581
- "krmir", "kel", "ked", "kich1", "kil1",
582
- "kll", "knp", "kpp", "kind", "kri", "khts",
583
+ "kcuu1", "kcuf1", "kcub1", "kcud1", "khome",
584
+ "kbs", "ktbc", "kclr", "kctab", "kdch1", "kdl1",
585
+ "krmir", "kel", "ked", "kich1", "kil1",
586
+ "kll", "knp", "kpp", "kind", "kri", "khts",
587
*/
588
- keydef_key[i++] = stradd (&tdataptr, key_up);
589
- keydef_key[i++] = stradd (&tdataptr, key_right);
590
- keydef_key[i++] = stradd (&tdataptr, key_left);
591
- keydef_key[i++] = stradd (&tdataptr, key_down);
592
- keydef_key[i++] = stradd (&tdataptr, key_home);
593
- keydef_key[i++] = stradd (&tdataptr, key_backspace);
594
- keydef_key[i++] = stradd (&tdataptr, key_catab);
595
- keydef_key[i++] = stradd (&tdataptr, key_clear);
596
- keydef_key[i++] = stradd (&tdataptr, key_ctab);
597
- keydef_key[i++] = stradd (&tdataptr, key_dc);
598
- keydef_key[i++] = stradd (&tdataptr, key_dl);
599
- keydef_key[i++] = stradd (&tdataptr, key_eic);
600
- keydef_key[i++] = stradd (&tdataptr, key_eol);
601
- keydef_key[i++] = stradd (&tdataptr, key_eos);
602
- keydef_key[i++] = stradd (&tdataptr, key_ic);
603
- keydef_key[i++] = stradd (&tdataptr, key_il);
604
- keydef_key[i++] = stradd (&tdataptr, key_ll);
605
- keydef_key[i++] = stradd (&tdataptr, key_npage);
606
- keydef_key[i++] = stradd (&tdataptr, key_ppage);
607
- keydef_key[i++] = stradd (&tdataptr, key_sf);
608
- keydef_key[i++] = stradd (&tdataptr, key_sr);
609
- keydef_key[i++] = stradd (&tdataptr, key_stab);
610
-
611
- if (flg)
612
- fprintf (stderr, "convert_key: finished getting TERMINFO.\r\n");
613
+ keydef_key[i++] = stradd(&tdataptr, key_up);
614
+ keydef_key[i++] = stradd(&tdataptr, key_right);
615
+ keydef_key[i++] = stradd(&tdataptr, key_left);
616
+ keydef_key[i++] = stradd(&tdataptr, key_down);
617
+ keydef_key[i++] = stradd(&tdataptr, key_home);
618
+ keydef_key[i++] = stradd(&tdataptr, key_backspace);
619
+ keydef_key[i++] = stradd(&tdataptr, key_catab);
620
+ keydef_key[i++] = stradd(&tdataptr, key_clear);
621
+ keydef_key[i++] = stradd(&tdataptr, key_ctab);
622
+ keydef_key[i++] = stradd(&tdataptr, key_dc);
623
+ keydef_key[i++] = stradd(&tdataptr, key_dl);
624
+ keydef_key[i++] = stradd(&tdataptr, key_eic);
625
+ keydef_key[i++] = stradd(&tdataptr, key_eol);
626
+ keydef_key[i++] = stradd(&tdataptr, key_eos);
627
+ keydef_key[i++] = stradd(&tdataptr, key_ic);
628
+ keydef_key[i++] = stradd(&tdataptr, key_il);
629
+ keydef_key[i++] = stradd(&tdataptr, key_ll);
630
+ keydef_key[i++] = stradd(&tdataptr, key_npage);
631
+ keydef_key[i++] = stradd(&tdataptr, key_ppage);
632
+ keydef_key[i++] = stradd(&tdataptr, key_sf);
633
+ keydef_key[i++] = stradd(&tdataptr, key_sr);
634
+ keydef_key[i++] = stradd(&tdataptr, key_stab);
635
+
636
+ if (flg)
637
+ fprintf(stderr, "convert_key: finished getting TERMINFO.\r\n");
638
#endif
639
}
640
641
- /** TERMINFO �ξ��� setupterm()��TERMCAP�ξ��� tgetent()�ν�����Ԥä�
642
- �塢������ȯ�����륷�����󥹤Υǡ��������ѤΥ��ꥢ�˥��ԡ����롣
643
- termcap/info�Υǡ����١����������ץ�Ǥ��ʤ��ä�����0���֤���*/
644
+/** TERMINFO �ξ��� setupterm()��TERMCAP�ξ��� tgetent()�ν�����Ԥä�
645
+ �塢������ȯ�����륷�����󥹤Υǡ��������ѤΥ��ꥢ�˥��ԡ����롣
646
+ termcap/info�Υǡ����١����������ץ�Ǥ��ʤ��ä�����0���֤���*/
647
#ifdef TERMCAP
648
int
649
-convert_getterm (termname, flg)
650
- char *termname;
651
- int flg;
652
-{
653
- extern int tgetent ();
654
- char tcaparea[AREASIZE];
655
-
656
- if (flg)
657
- fprintf (stderr, "convert_key: using TERMCAP entry %s...\r\n", termname);
658
- if (tgetent (tcaparea, termname) <= 0)
659
- {
660
- errdsp2 ("Can't get termcap entry", termname);
661
- return (1);
662
- }
663
- convert_getstrs (flg);
664
- return (0);
665
+convert_getterm(char *termname,
666
+ int flg)
667
+{
668
+ extern int tgetent ();
669
+ char tcaparea[AREASIZE];
670
+
671
+ if (flg)
672
+ fprintf(stderr, "convert_key: using TERMCAP entry %s...\r\n",
673
+ termname);
674
+
675
+ if (tgetent(tcaparea, termname) <= 0) {
676
+ errdsp2("Can't get termcap entry", termname);
677
+ return (1);
678
+ }
679
+
680
+ convert_getstrs(flg);
681
+
682
+ return (0);
683
}
684
#endif
685
#ifdef TERMINFO
686
int
687
-convert_getterm (termname, flg)
688
- char *termname;
689
- int flg;
690
-{
691
- int fd, rsl;
692
-
693
- if (flg)
694
- fprintf (stderr, "convert_key: using TERMINFO entry %s...\r\n", termname);
695
- fd = open ("/dev/null", O_WRONLY, 0);
696
- setupterm (termname, fd, &rsl);
697
- close (fd);
698
- if (rsl != 1)
699
- {
700
- errdsp2 ("Can't get terminfo entry", termname);
701
- /* ���ΤȤ�resetterm()��ɬ�פ��� */
702
- return (1);
703
- }
704
- convert_getstrs (flg);
705
- resetterm ();
706
- return (0);
707
+convert_getterm(char *termname,
708
+ int flg)
709
+{
710
+ int fd, rsl;
711
+
712
+ if (flg)
713
+ fprintf (stderr,
714
+ "convert_key: using TERMINFO entry %s...\r\n",
715
+ termname);
716
+
717
+ fd = open("/dev/null", O_WRONLY, 0);
718
+ setupterm(termname, fd, &rsl);
719
+ close (fd);
720
+
721
+ if (rsl != 1) {
722
+ errdsp2("Can't get terminfo entry", termname);
723
+ /* ���ΤȤ�resetterm()��ɬ�פ��� */
724
+ return (1);
725
+ }
726
+
727
+ convert_getstrs(flg);
728
+ resetterm();
729
+ return (0);
730
}
731
#endif
732
733
- /** termcap/info�����ä������Υǡ������������ѥ��ꥢ�˼��ޤäƤ����
734
- ���ơ������Ȥä�convert_key�����ν�����򤹤롣���ͤ����ェλ��0��
735
- ɽ�ɤ߹��߻���Warning��ȯ��������1��Error�򸡽Ф����Ȥ�-1��*/
736
+/** termcap/info�����ä������Υǡ������������ѥ��ꥢ�˼��ޤäƤ����
737
+ ���ơ������Ȥä�convert_key�����ν�����򤹤롣���ͤ����ェλ��0��
738
+ ɽ�ɤ߹��߻���Warning��ȯ��������1��Error�򸡽Ф����Ȥ�-1��*/
739
int
740
-convert_key_setup (filename, flg)
741
- char *filename;
742
- int flg;
743
-{
744
- register int i;
745
- int c, d, cnt = 0, warn_occur = 0, entry_found;
746
- char name[ENTRY_LEN + 1];
747
-
748
- int keydef_code[ENTRY_CNT]; /* convert code */
749
-
750
- if (CHANGE_MAX < div_up (ENTRY_CNT, BITSIZ))
751
- {
752
- fprintf (stderr, "%s%s%d%s", "Sorry, please set CHANGE_MAX(in file ", "conv/cvt_head.h) larger than ", div_up (ENTRY_CNT, BITSIZ) - 1, ",\r\nand recompile.\r\n");
753
- return (-1);
754
- }
755
-
756
- for (i = 0; i < ENTRY_CNT; i++)
757
- keydef_code[i] = -1;
758
- /* code�� -1 �Τޤޤʤ顢convert_keyɽ�˥���ȥ꤬�ʤ����Ȥ򼨤��� */
759
-
760
- if (NULL != filename)
761
- convert_filename = filename;
762
- else
763
- {
764
- convert_filename = default_cvt_fn;
765
+convert_key_setup(char *filename,
766
+ int flg)
767
+{
768
+ register int i;
769
+ int c, d, cnt = 0, warn_occur = 0, entry_found;
770
+ char name[ENTRY_LEN + 1];
771
+
772
+ int keydef_code[ENTRY_CNT]; /* convert code */
773
+
774
+ if (CHANGE_MAX < div_up (ENTRY_CNT, BITSIZ)) {
775
+ fprintf (stderr, "%s%s%d%s",
776
+ "Sorry, please set CHANGE_MAX(in file ",
777
+ "conv/cvt_head.h) larger than ",
778
+ div_up (ENTRY_CNT, BITSIZ) - 1,
779
+ ",\r\nand recompile.\r\n");
780
+ return (-1);
781
+ }
782
+
783
+ for (i = 0; i < ENTRY_CNT; i++)
784
+ keydef_code[i] = -1;
785
+ /* code�� -1 �Τޤޤʤ顢convert_keyɽ�˥���ȥ꤬�ʤ����Ȥ򼨤��� */
786
+
787
+ if (NULL != filename)
788
+ convert_filename = filename;
789
+ else {
790
+ convert_filename = default_cvt_fn;
791
#ifdef WNNDEFAULT
792
- strcpy (convert_filename, LIBDIR); /* /usr/local/lib/wnn */
793
- strcat (convert_filename, CONVERT_FILENAME); /* /cvt_key_tbl */
794
+ strcpy(convert_filename, LIBDIR); /* /usr/local/lib/wnn */
795
+ strcat(convert_filename, CONVERT_FILENAME); /* /cvt_key_tbl */
796
#else
797
- strcpy (convert_filename, CONVERT_FILENAME);
798
+ strcpy(convert_filename, CONVERT_FILENAME);
799
#endif /* WNNDEFAULT */
800
- }
801
- if (flg)
802
- fprintf (stderr, "convert_key: using convert_key table %s...\r\n", convert_filename);
803
- if (NULL == (convert_hyo = fopen (convert_filename, "r")))
804
- {
805
+ }
806
+
807
+ if (flg)
808
+ fprintf (stderr, "convert_key: using convert_key table %s...\r\n",
809
+ convert_filename);
810
+
811
+ if (NULL == (convert_hyo = fopen(convert_filename, "r"))) {
812
#ifdef NOFILE_NOT_ABORT
813
- warn1 (convert_filename);
814
- cnv_tbl_cnt = 0;
815
- return (1);
816
+ warn1(convert_filename);
817
+ cnv_tbl_cnt = 0;
818
+ return (1);
819
#else
820
- errdsp1 ("Convert-table file is not found", convert_filename);
821
- return (-1);
822
+ errdsp1("Convert-table file is not found",
823
+ convert_filename);
824
+ return (-1);
825
#endif
826
- }
827
+ }
828
829
- /* ɽ������ɤߤ��� */
830
- while (EOF != (d = getc (convert_hyo)))
831
- {
832
- if (d == '#' || d == ';')
833
- {
834
- /* '#'����';'�ǻϤޤ�Ԥ�����Ȥ����ɤ����Ф��� */
835
- linepass (convert_hyo);
836
- continue;
837
- }
838
- ungetc (d, convert_hyo);
839
-
840
- d = blank_ign_getc (convert_hyo);
841
- if (is_eofnl (d))
842
- continue; /* ���� */
843
- else
844
- ungetc (d, convert_hyo);
845
- if (!get_entrynm (name))
846
- {
847
- errdsp1 ("Entry name too long", convert_filename);
848
- fclose (convert_hyo);
849
- return (-1);
850
- } /* ����ȥ�̾���ɤ߹������ */
851
-
852
- d = blank_ign_getc (convert_hyo);
853
- if (is_eofnl (d))
854
- {
855
- errdsp1 ("Convert code missing", convert_filename);
856
- fclose (convert_hyo);
857
- return (-1);
858
- }
859
- else
860
- ungetc (d, convert_hyo);
861
- if (get_code (&c) != 0 || linepass (convert_hyo) != 0)
862
- {
863
- errdsp1 ("Convert code illegal", convert_filename);
864
- fclose (convert_hyo);
865
- return (-1);
866
- } /* �Ѵ������ɤ��ɤ߹������ */
867
+ /* ɽ������ɤߤ��� */
868
+ while (EOF != (d = getc(convert_hyo))) {
869
+ if (d == '#' || d == ';') {
870
+ /* '#'����';'�ǻϤޤ�Ԥ�����Ȥ����ɤ����Ф��� */
871
+ linepass(convert_hyo);
872
+ continue;
873
+ }
874
+
875
+ ungetc(d, convert_hyo);
876
+
877
+ d = blank_ign_getc(convert_hyo);
878
+
879
+ if (is_eofnl(d))
880
+ /* ���� */
881
+ continue;
882
+ else
883
+ ungetc(d, convert_hyo);
884
+
885
+ if (!get_entrynm(name)) {
886
+ errdsp1("Entry name too long",
887
+ convert_filename);
888
+ fclose(convert_hyo);
889
+ return (-1);
890
+ }
891
+ /* ����ȥ�̾���ɤ߹������ */
892
+
893
+ d = blank_ign_getc(convert_hyo);
894
+
895
+ if (is_eofnl(d)) {
896
+ errdsp1("Convert code missing",
897
+ convert_filename);
898
+ fclose (convert_hyo);
899
+ return (-1);
900
+ } else
901
+ ungetc(d, convert_hyo);
902
+
903
+ if (get_code(&c) != 0
904
+ || linepass(convert_hyo) != 0) {
905
+ errdsp1("Convert code illegal", convert_filename);
906
+ fclose(convert_hyo);
907
+ return (-1);
908
+ }
909
+ /* �Ѵ������ɤ��ɤ߹������ */
910
#ifdef DEBUG
911
- printf ("%s %d\n", name, c);
912
+ printf("%s %d\n", name, c);
913
#endif
914
- for (entry_found = i = 0; i < ENTRY_CNT; i++)
915
- {
916
- if (!strcmp (cvttbl_entry[i], name))
917
- {
918
- if (keydef_code[i] != -1)
919
- {
920
- warn2 (name, convert_filename);
921
- warn_occur = 1;
922
- }
923
- keydef_code[i] = c;
924
- entry_found = 1;
925
- break;
926
- }
927
- }
928
- if (!entry_found)
929
- {
930
- warn3 (name, convert_filename);
931
- warn_occur = 1;
932
- }
933
- }
934
-
935
- /* �ɤߤ�����ǡ�����ơ��֥�˥��å� */
936
- for (i = 0; i < ENTRY_CNT; i++)
937
- {
938
- if (keydef_key[i] != NULL)
939
- {
940
- if (keydef_code[i] != -1 && ((int) strlen (keydef_key[i]) > 1 || *keydef_key[i] != keydef_code[i]))
941
- {
942
- tbl[cnt].fromkey = keydef_key[i];
943
- tbl[cnt++].tokey = keydef_code[i];
944
- }
945
- }
946
- else if (keydef_code[i] != -1)
947
- {
948
- warn4 (cvttbl_entry[i], convert_filename, keydef_code[i]);
949
- warn_occur = 1;
950
- }
951
- }
952
-
953
- cnv_tbl_cnt = cnt;
954
- fclose (convert_hyo);
955
- if (flg)
956
- fprintf (stderr, "convert_key: finished setting up.\r\n");
957
- return (warn_occur);
958
-}
959
-
960
- /** convert_key����������롼����TERMINFO �ξ��� setupterm()��TERMCAP��
961
- ���� tgetent()�򤽤줾�쥳���뤷����˸Ƥ֡����ͤ�convert_key_setup
962
- ���ȡ�*/
963
+ for (entry_found = i = 0; i < ENTRY_CNT; i++) {
964
+ if (!strcmp(cvttbl_entry[i], name)) {
965
+ if (keydef_code[i] != -1) {
966
+ warn2(name, convert_filename);
967
+ warn_occur = 1;
968
+ }
969
+ keydef_code[i] = c;
970
+ entry_found = 1;
971
+ break;
972
+ }
973
+ }
974
+
975
+ if (!entry_found) {
976
+ warn3(name, convert_filename);
977
+ warn_occur = 1;
978
+ }
979
+ }
980
+
981
+ /* �ɤߤ�����ǡ�����ơ��֥�˥��å� */
982
+
983
+ for (i = 0; i < ENTRY_CNT; i++) {
984
+ if (keydef_key[i] != NULL) {
985
+ if (keydef_code[i] != -1
986
+ && ((int)strlen(keydef_key[i]) > 1
987
+ || *keydef_key[i] != keydef_code[i])) {
988
+ tbl[cnt].fromkey = keydef_key[i];
989
+ tbl[cnt++].tokey = keydef_code[i];
990
+ }
991
+ } else if (keydef_code[i] != -1) {
992
+ warn4 (cvttbl_entry[i], convert_filename, keydef_code[i]);
993
+ warn_occur = 1;
994
+ }
995
+ }
996
+
997
+ cnv_tbl_cnt = cnt;
998
+ fclose(convert_hyo);
999
+
1000
+ if (flg)
1001
+ fprintf(stderr, "convert_key: finished setting up.\r\n");
1002
+
1003
+ return (warn_occur);
1004
+}
1005
+
1006
+/** convert_key����������롼����TERMINFO �ξ��� setupterm()��TERMCAP��
1007
+ ���� tgetent()�򤽤줾�쥳���뤷����˸Ƥ֡����ͤ�convert_key_setup
1008
+ ���ȡ�*/
1009
int
1010
-convert_key_init (filename, flg)
1011
- char *filename;
1012
- int flg;
1013
+convert_key_init (char *filename,
1014
+ int flg)
1015
{
1016
- convert_getstrs (flg);
1017
- return (convert_key_setup (filename, flg));
1018
+ convert_getstrs (flg);
1019
+ return (convert_key_setup (filename, flg));
1020
}
1021
1022
- /** TERMINFO �ξ��� setupterm()��TERMCAP�ξ��� tgetent()�ޤǴޤ�Ƽ¹�
1023
- convert_key����������롼�����֤��ͤ�convert_key_setup���ȡ�â����
1024
- termcap/info���ɤ߹��ߤ˼��Ԥ������ϡ�-2���֤롣*/
1025
+/** TERMINFO �ξ��� setupterm()��TERMCAP�ξ��� tgetent()�ޤǴޤ�Ƽ¹�
1026
+ convert_key����������롼�����֤��ͤ�convert_key_setup���ȡ�â����
1027
+ termcap/info���ɤ߹��ߤ˼��Ԥ������ϡ�-2���֤롣*/
1028
int
1029
-convert_getterm_init (termname, filename, flg)
1030
- char *termname, *filename;
1031
- int flg;
1032
-{
1033
- if (convert_getterm (termname, flg) != 0)
1034
- return (-2);
1035
- return (convert_key_setup (filename, flg));
1036
+convert_getterm_init (char *termname,
1037
+ char *filename,
1038
+ int flg)
1039
+{
1040
+ if (convert_getterm (termname, flg) != 0)
1041
+ return (-2);
1042
+
1043
+ return (convert_key_setup (filename, flg));
1044
}
1045
1046