1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
/*
Copyright (C) 1994-2008 Edward Der-Hua Liu, Hsin-Chu, Taiwan
*/
#define InAreaX (0)
#include "gcin.h"
#include "intcode.h"
int current_intcode = INTCODE_UTF32;
static char inch[MAX_INTCODE];
static int cin;
void create_win_intcode();
void init_inter_code()
{
cin=0;
create_win_intcode();
}
static int h2i(int x)
{
return (x<='9'?x-'0':x-'A'+10);
}
static void utf32to8(char *t, char *s)
{
unsigned int rn,wn=0;
GError *err = NULL;
char *utf8 = g_convert(s, 4, "UTF-8", "UTF-32", &rn, &wn, &err);
if (utf8) {
memcpy(t, utf8, wn);
g_free(utf8);
}
t[wn]=0;
}
static char *dstr[]={"０","１","２","３","４","５","６","７","８","９","Ａ","Ｂ","Ｃ","Ｄ","Ｅ","Ｆ"};
void disp_int(int index, char *intcode);
int feedkey_intcode(KeySym key)
{
int i;
#if 0
if (key <= XK_KP_9 && key >= XK_KP_0)
key -= XK_KP_0 - '0';
#endif
key=toupper(key);
if (key==XK_BackSpace||key==XK_Delete) {
if (cin)
cin--;
else
return 0;
goto dispIn;
}
else
if (key<'0'||key>'F'||(key>'9' && key<'A')) {
if (current_intcode==INTCODE_BIG5 || key!=' ')
return 0;
}
if (current_intcode==INTCODE_BIG5) {
if (cin==0 && key<'8')
return 1;
if (cin==1 && inch[0]=='F' && key=='F')
return 1;
if (cin==2 && (key<'4' || (key>'7' && key<'A')))
return 1;
if (cin==3 && (inch[2]=='7'||inch[2]=='F') && key=='F')
return 1;
}
if ((cin<4 || (current_intcode!=INTCODE_BIG5 && cin < MAX_INTCODE)) && key!=' ')
inch[cin++]=key;
dispIn:
clear_int_code_all();
for(i=0;i<cin;i++) {
disp_int(i, dstr[h2i(inch[i])]);
}
if (current_intcode==INTCODE_BIG5 && cin==4 || key==' ') {
u_char utf8[CH_SZ+1];
if (!cin && key==' ')
return 0;
if (current_intcode==INTCODE_BIG5) {
u_char ttt[3];
ttt[3]=0;
ttt[0]=(h2i(inch[0])<<4)+h2i(inch[1]);
ttt[1]=(h2i(inch[2])<<4)+h2i(inch[3]);
big5_utf8(ttt, utf8);
} else {
int i;
u_int v = 0;
for(i=0; i < cin; i++) {
v <<= 4;
v |= h2i(inch[i]);
}
utf32to8(utf8, &v);
}
sendkey_b5(utf8);
cin=0;
clear_int_code_all();
}
return 1;
}
|
