wskbdutil.c revision 1.11.4.2 1 1.11.4.2 yamt /* $NetBSD: wskbdutil.c,v 1.11.4.2 2007/02/26 09:10:52 yamt Exp $ */
2 1.1 hannken
3 1.1 hannken /*-
4 1.1 hannken * Copyright (c) 1997 The NetBSD Foundation, Inc.
5 1.1 hannken * All rights reserved.
6 1.1 hannken *
7 1.1 hannken * This code is derived from software contributed to The NetBSD Foundation
8 1.1 hannken * by Juergen Hannken-Illjes.
9 1.1 hannken *
10 1.1 hannken * Redistribution and use in source and binary forms, with or without
11 1.1 hannken * modification, are permitted provided that the following conditions
12 1.1 hannken * are met:
13 1.1 hannken * 1. Redistributions of source code must retain the above copyright
14 1.1 hannken * notice, this list of conditions and the following disclaimer.
15 1.1 hannken * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 hannken * notice, this list of conditions and the following disclaimer in the
17 1.1 hannken * documentation and/or other materials provided with the distribution.
18 1.1 hannken * 3. All advertising materials mentioning features or use of this software
19 1.1 hannken * must display the following acknowledgement:
20 1.1 hannken * This product includes software developed by the NetBSD
21 1.1 hannken * Foundation, Inc. and its contributors.
22 1.1 hannken * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.1 hannken * contributors may be used to endorse or promote products derived
24 1.1 hannken * from this software without specific prior written permission.
25 1.1 hannken *
26 1.1 hannken * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.1 hannken * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.1 hannken * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.1 hannken * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.1 hannken * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.1 hannken * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.1 hannken * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.1 hannken * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.1 hannken * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.1 hannken * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.1 hannken * POSSIBILITY OF SUCH DAMAGE.
37 1.1 hannken */
38 1.9 lukem
39 1.9 lukem #include <sys/cdefs.h>
40 1.11.4.2 yamt __KERNEL_RCSID(0, "$NetBSD: wskbdutil.c,v 1.11.4.2 2007/02/26 09:10:52 yamt Exp $");
41 1.1 hannken
42 1.1 hannken #include <sys/param.h>
43 1.1 hannken #include <sys/errno.h>
44 1.1 hannken #include <sys/systm.h>
45 1.1 hannken #include <sys/malloc.h>
46 1.1 hannken #include <dev/wscons/wsksymdef.h>
47 1.1 hannken #include <dev/wscons/wsksymvar.h>
48 1.1 hannken
49 1.1 hannken static struct compose_tab_s {
50 1.1 hannken keysym_t elem[2];
51 1.1 hannken keysym_t result;
52 1.1 hannken } compose_tab[] = {
53 1.1 hannken { { KS_plus, KS_plus }, KS_numbersign },
54 1.1 hannken { { KS_a, KS_a }, KS_at },
55 1.1 hannken { { KS_parenleft, KS_parenleft }, KS_bracketleft },
56 1.1 hannken { { KS_slash, KS_slash }, KS_backslash },
57 1.1 hannken { { KS_parenright, KS_parenright }, KS_bracketright },
58 1.1 hannken { { KS_parenleft, KS_minus }, KS_braceleft },
59 1.1 hannken { { KS_slash, KS_minus }, KS_bar },
60 1.1 hannken { { KS_parenright, KS_minus }, KS_braceright },
61 1.1 hannken { { KS_exclam, KS_exclam }, KS_exclamdown },
62 1.1 hannken { { KS_c, KS_slash }, KS_cent },
63 1.1 hannken { { KS_l, KS_minus }, KS_sterling },
64 1.1 hannken { { KS_y, KS_minus }, KS_yen },
65 1.1 hannken { { KS_s, KS_o }, KS_section },
66 1.1 hannken { { KS_x, KS_o }, KS_currency },
67 1.1 hannken { { KS_c, KS_o }, KS_copyright },
68 1.1 hannken { { KS_less, KS_less }, KS_guillemotleft },
69 1.1 hannken { { KS_greater, KS_greater }, KS_guillemotright },
70 1.1 hannken { { KS_question, KS_question }, KS_questiondown },
71 1.1 hannken { { KS_dead_acute, KS_space }, KS_acute },
72 1.1 hannken { { KS_dead_grave, KS_space }, KS_grave },
73 1.1 hannken { { KS_dead_tilde, KS_space }, KS_asciitilde },
74 1.1 hannken { { KS_dead_circumflex, KS_space }, KS_asciicircum },
75 1.1 hannken { { KS_dead_circumflex, KS_A }, KS_Acircumflex },
76 1.1 hannken { { KS_dead_diaeresis, KS_A }, KS_Adiaeresis },
77 1.1 hannken { { KS_dead_grave, KS_A }, KS_Agrave },
78 1.1 hannken { { KS_dead_abovering, KS_A }, KS_Aring },
79 1.1 hannken { { KS_dead_tilde, KS_A }, KS_Atilde },
80 1.1 hannken { { KS_dead_cedilla, KS_C }, KS_Ccedilla },
81 1.1 hannken { { KS_dead_acute, KS_E }, KS_Eacute },
82 1.1 hannken { { KS_dead_circumflex, KS_E }, KS_Ecircumflex },
83 1.1 hannken { { KS_dead_diaeresis, KS_E }, KS_Ediaeresis },
84 1.1 hannken { { KS_dead_grave, KS_E }, KS_Egrave },
85 1.1 hannken { { KS_dead_acute, KS_I }, KS_Iacute },
86 1.1 hannken { { KS_dead_circumflex, KS_I }, KS_Icircumflex },
87 1.1 hannken { { KS_dead_diaeresis, KS_I }, KS_Idiaeresis },
88 1.1 hannken { { KS_dead_grave, KS_I }, KS_Igrave },
89 1.1 hannken { { KS_dead_tilde, KS_N }, KS_Ntilde },
90 1.1 hannken { { KS_dead_acute, KS_O }, KS_Oacute },
91 1.1 hannken { { KS_dead_circumflex, KS_O }, KS_Ocircumflex },
92 1.1 hannken { { KS_dead_diaeresis, KS_O }, KS_Odiaeresis },
93 1.1 hannken { { KS_dead_grave, KS_O }, KS_Ograve },
94 1.1 hannken { { KS_dead_tilde, KS_O }, KS_Otilde },
95 1.1 hannken { { KS_dead_acute, KS_U }, KS_Uacute },
96 1.1 hannken { { KS_dead_circumflex, KS_U }, KS_Ucircumflex },
97 1.1 hannken { { KS_dead_diaeresis, KS_U }, KS_Udiaeresis },
98 1.1 hannken { { KS_dead_grave, KS_U }, KS_Ugrave },
99 1.1 hannken { { KS_dead_acute, KS_Y }, KS_Yacute },
100 1.1 hannken { { KS_dead_acute, KS_a }, KS_aacute },
101 1.1 hannken { { KS_dead_circumflex, KS_a }, KS_acircumflex },
102 1.1 hannken { { KS_dead_diaeresis, KS_a }, KS_adiaeresis },
103 1.1 hannken { { KS_dead_grave, KS_a }, KS_agrave },
104 1.1 hannken { { KS_dead_abovering, KS_a }, KS_aring },
105 1.1 hannken { { KS_dead_tilde, KS_a }, KS_atilde },
106 1.1 hannken { { KS_dead_cedilla, KS_c }, KS_ccedilla },
107 1.1 hannken { { KS_dead_acute, KS_e }, KS_eacute },
108 1.1 hannken { { KS_dead_circumflex, KS_e }, KS_ecircumflex },
109 1.1 hannken { { KS_dead_diaeresis, KS_e }, KS_ediaeresis },
110 1.1 hannken { { KS_dead_grave, KS_e }, KS_egrave },
111 1.1 hannken { { KS_dead_acute, KS_i }, KS_iacute },
112 1.1 hannken { { KS_dead_circumflex, KS_i }, KS_icircumflex },
113 1.1 hannken { { KS_dead_diaeresis, KS_i }, KS_idiaeresis },
114 1.1 hannken { { KS_dead_grave, KS_i }, KS_igrave },
115 1.1 hannken { { KS_dead_tilde, KS_n }, KS_ntilde },
116 1.1 hannken { { KS_dead_acute, KS_o }, KS_oacute },
117 1.1 hannken { { KS_dead_circumflex, KS_o }, KS_ocircumflex },
118 1.1 hannken { { KS_dead_diaeresis, KS_o }, KS_odiaeresis },
119 1.1 hannken { { KS_dead_grave, KS_o }, KS_ograve },
120 1.1 hannken { { KS_dead_tilde, KS_o }, KS_otilde },
121 1.1 hannken { { KS_dead_acute, KS_u }, KS_uacute },
122 1.1 hannken { { KS_dead_circumflex, KS_u }, KS_ucircumflex },
123 1.1 hannken { { KS_dead_diaeresis, KS_u }, KS_udiaeresis },
124 1.1 hannken { { KS_dead_grave, KS_u }, KS_ugrave },
125 1.1 hannken { { KS_dead_acute, KS_y }, KS_yacute },
126 1.1 hannken { { KS_dead_diaeresis, KS_y }, KS_ydiaeresis },
127 1.1 hannken { { KS_quotedbl, KS_A }, KS_Adiaeresis },
128 1.1 hannken { { KS_quotedbl, KS_E }, KS_Ediaeresis },
129 1.1 hannken { { KS_quotedbl, KS_I }, KS_Idiaeresis },
130 1.1 hannken { { KS_quotedbl, KS_O }, KS_Odiaeresis },
131 1.1 hannken { { KS_quotedbl, KS_U }, KS_Udiaeresis },
132 1.1 hannken { { KS_quotedbl, KS_a }, KS_adiaeresis },
133 1.1 hannken { { KS_quotedbl, KS_e }, KS_ediaeresis },
134 1.1 hannken { { KS_quotedbl, KS_i }, KS_idiaeresis },
135 1.1 hannken { { KS_quotedbl, KS_o }, KS_odiaeresis },
136 1.1 hannken { { KS_quotedbl, KS_u }, KS_udiaeresis },
137 1.1 hannken { { KS_quotedbl, KS_y }, KS_ydiaeresis },
138 1.1 hannken { { KS_acute, KS_A }, KS_Aacute },
139 1.1 hannken { { KS_asciicircum, KS_A }, KS_Acircumflex },
140 1.1 hannken { { KS_grave, KS_A }, KS_Agrave },
141 1.1 hannken { { KS_asterisk, KS_A }, KS_Aring },
142 1.1 hannken { { KS_asciitilde, KS_A }, KS_Atilde },
143 1.1 hannken { { KS_cedilla, KS_C }, KS_Ccedilla },
144 1.1 hannken { { KS_acute, KS_E }, KS_Eacute },
145 1.1 hannken { { KS_asciicircum, KS_E }, KS_Ecircumflex },
146 1.1 hannken { { KS_grave, KS_E }, KS_Egrave },
147 1.1 hannken { { KS_acute, KS_I }, KS_Iacute },
148 1.1 hannken { { KS_asciicircum, KS_I }, KS_Icircumflex },
149 1.1 hannken { { KS_grave, KS_I }, KS_Igrave },
150 1.1 hannken { { KS_asciitilde, KS_N }, KS_Ntilde },
151 1.1 hannken { { KS_acute, KS_O }, KS_Oacute },
152 1.1 hannken { { KS_asciicircum, KS_O }, KS_Ocircumflex },
153 1.1 hannken { { KS_grave, KS_O }, KS_Ograve },
154 1.1 hannken { { KS_asciitilde, KS_O }, KS_Otilde },
155 1.1 hannken { { KS_acute, KS_U }, KS_Uacute },
156 1.1 hannken { { KS_asciicircum, KS_U }, KS_Ucircumflex },
157 1.1 hannken { { KS_grave, KS_U }, KS_Ugrave },
158 1.1 hannken { { KS_acute, KS_Y }, KS_Yacute },
159 1.1 hannken { { KS_acute, KS_a }, KS_aacute },
160 1.1 hannken { { KS_asciicircum, KS_a }, KS_acircumflex },
161 1.1 hannken { { KS_grave, KS_a }, KS_agrave },
162 1.1 hannken { { KS_asterisk, KS_a }, KS_aring },
163 1.1 hannken { { KS_asciitilde, KS_a }, KS_atilde },
164 1.1 hannken { { KS_cedilla, KS_c }, KS_ccedilla },
165 1.1 hannken { { KS_acute, KS_e }, KS_eacute },
166 1.1 hannken { { KS_asciicircum, KS_e }, KS_ecircumflex },
167 1.1 hannken { { KS_grave, KS_e }, KS_egrave },
168 1.1 hannken { { KS_acute, KS_i }, KS_iacute },
169 1.1 hannken { { KS_asciicircum, KS_i }, KS_icircumflex },
170 1.1 hannken { { KS_grave, KS_i }, KS_igrave },
171 1.1 hannken { { KS_asciitilde, KS_n }, KS_ntilde },
172 1.1 hannken { { KS_acute, KS_o }, KS_oacute },
173 1.1 hannken { { KS_asciicircum, KS_o }, KS_ocircumflex },
174 1.1 hannken { { KS_grave, KS_o }, KS_ograve },
175 1.1 hannken { { KS_asciitilde, KS_o }, KS_otilde },
176 1.1 hannken { { KS_acute, KS_u }, KS_uacute },
177 1.1 hannken { { KS_asciicircum, KS_u }, KS_ucircumflex },
178 1.1 hannken { { KS_grave, KS_u }, KS_ugrave },
179 1.11.4.1 yamt { { KS_acute, KS_y }, KS_yacute },
180 1.11.4.1 yamt { { KS_dead_semi, KS_gr_A }, KS_gr_At },
181 1.11.4.1 yamt { { KS_dead_semi, KS_gr_E }, KS_gr_Et },
182 1.11.4.1 yamt { { KS_dead_semi, KS_gr_H }, KS_gr_Ht },
183 1.11.4.1 yamt { { KS_dead_semi, KS_gr_I }, KS_gr_It },
184 1.11.4.1 yamt { { KS_dead_semi, KS_gr_O }, KS_gr_Ot },
185 1.11.4.1 yamt { { KS_dead_semi, KS_gr_Y }, KS_gr_Yt },
186 1.11.4.1 yamt { { KS_dead_semi, KS_gr_V }, KS_gr_Vt },
187 1.11.4.1 yamt { { KS_dead_colon, KS_gr_I }, KS_gr_Id },
188 1.11.4.1 yamt { { KS_dead_colon, KS_gr_Y }, KS_gr_Yd },
189 1.11.4.1 yamt { { KS_dead_semi, KS_gr_a }, KS_gr_at },
190 1.11.4.1 yamt { { KS_dead_semi, KS_gr_e }, KS_gr_et },
191 1.11.4.1 yamt { { KS_dead_semi, KS_gr_h }, KS_gr_ht },
192 1.11.4.1 yamt { { KS_dead_semi, KS_gr_i }, KS_gr_it },
193 1.11.4.1 yamt { { KS_dead_semi, KS_gr_o }, KS_gr_ot },
194 1.11.4.1 yamt { { KS_dead_semi, KS_gr_y }, KS_gr_yt },
195 1.11.4.1 yamt { { KS_dead_semi, KS_gr_v }, KS_gr_vt },
196 1.11.4.1 yamt { { KS_dead_colon, KS_gr_i }, KS_gr_id },
197 1.11.4.1 yamt { { KS_dead_colon, KS_gr_y }, KS_gr_yd }
198 1.1 hannken };
199 1.1 hannken
200 1.1 hannken #define COMPOSE_SIZE sizeof(compose_tab)/sizeof(compose_tab[0])
201 1.1 hannken
202 1.1 hannken static int compose_tab_inorder = 0;
203 1.1 hannken
204 1.8 augustss static inline int compose_tab_cmp(struct compose_tab_s *, struct compose_tab_s *);
205 1.8 augustss static keysym_t ksym_upcase(keysym_t);
206 1.8 augustss static void fillmapentry(const keysym_t *, int, struct wscons_keymap *);
207 1.1 hannken
208 1.1 hannken static inline int
209 1.8 augustss compose_tab_cmp(struct compose_tab_s *i, struct compose_tab_s *j)
210 1.1 hannken {
211 1.1 hannken if (i->elem[0] == j->elem[0])
212 1.1 hannken return(i->elem[1] - j->elem[1]);
213 1.1 hannken else
214 1.1 hannken return(i->elem[0] - j->elem[0]);
215 1.1 hannken }
216 1.1 hannken
217 1.1 hannken keysym_t
218 1.8 augustss wskbd_compose_value(keysym_t *compose_buf)
219 1.1 hannken {
220 1.1 hannken int i, j, r;
221 1.1 hannken struct compose_tab_s v;
222 1.1 hannken
223 1.1 hannken if (! compose_tab_inorder) {
224 1.1 hannken /* Insertion sort. */
225 1.1 hannken for (i = 1; i < COMPOSE_SIZE; i++) {
226 1.1 hannken v = compose_tab[i];
227 1.1 hannken /* find correct slot, moving others up */
228 1.1 hannken for (j = i; --j >= 0 && compose_tab_cmp(& v, & compose_tab[j]) < 0; )
229 1.1 hannken compose_tab[j + 1] = compose_tab[j];
230 1.1 hannken compose_tab[j + 1] = v;
231 1.1 hannken }
232 1.1 hannken compose_tab_inorder = 1;
233 1.1 hannken }
234 1.1 hannken
235 1.1 hannken for (j = 0, i = COMPOSE_SIZE; i != 0; i /= 2) {
236 1.1 hannken if (compose_tab[j + i/2].elem[0] == compose_buf[0]) {
237 1.1 hannken if (compose_tab[j + i/2].elem[1] == compose_buf[1])
238 1.1 hannken return(compose_tab[j + i/2].result);
239 1.1 hannken r = compose_tab[j + i/2].elem[1] < compose_buf[1];
240 1.1 hannken } else
241 1.1 hannken r = compose_tab[j + i/2].elem[0] < compose_buf[0];
242 1.1 hannken if (r) {
243 1.1 hannken j += i/2 + 1;
244 1.1 hannken i--;
245 1.1 hannken }
246 1.1 hannken }
247 1.1 hannken
248 1.1 hannken return(KS_voidSymbol);
249 1.1 hannken }
250 1.1 hannken
251 1.1 hannken static const u_char latin1_to_upper[256] = {
252 1.1 hannken /* 0 8 1 9 2 a 3 b 4 c 5 d 6 e 7 f */
253 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0 */
254 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 0 */
255 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 1 */
256 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 1 */
257 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 2 */
258 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 2 */
259 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 3 */
260 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 3 */
261 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 4 */
262 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 4 */
263 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 5 */
264 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 5 */
265 1.1 hannken 0x00, 'A', 'B', 'C', 'D', 'E', 'F', 'G', /* 6 */
266 1.1 hannken 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', /* 6 */
267 1.1 hannken 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', /* 7 */
268 1.1 hannken 'X', 'Y', 'Z', 0x00, 0x00, 0x00, 0x00, 0x00, /* 7 */
269 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 8 */
270 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 8 */
271 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 9 */
272 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* 9 */
273 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* a */
274 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* a */
275 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* b */
276 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* b */
277 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* c */
278 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* c */
279 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* d */
280 1.1 hannken 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* d */
281 1.1 hannken 0xc0, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, /* e */
282 1.1 hannken 0xc8, 0xc9, 0xca, 0xcb, 0xcc, 0xcd, 0xce, 0xcf, /* e */
283 1.1 hannken 0xd0, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6, 0x00, /* f */
284 1.1 hannken 0xd8, 0xd9, 0xda, 0xdb, 0xdc, 0xdd, 0xde, 0x00, /* f */
285 1.1 hannken };
286 1.1 hannken
287 1.1 hannken static keysym_t
288 1.8 augustss ksym_upcase(keysym_t ksym)
289 1.1 hannken {
290 1.1 hannken if (ksym >= KS_f1 && ksym <= KS_f20)
291 1.1 hannken return(KS_F1 - KS_f1 + ksym);
292 1.1 hannken
293 1.3 hannken if (KS_GROUP(ksym) == KS_GROUP_Ascii && ksym <= 0xff &&
294 1.3 hannken latin1_to_upper[ksym] != 0x00)
295 1.3 hannken return(latin1_to_upper[ksym]);
296 1.1 hannken
297 1.1 hannken return(ksym);
298 1.1 hannken }
299 1.1 hannken
300 1.2 hannken static void
301 1.8 augustss fillmapentry(const keysym_t *kp, int len, struct wscons_keymap *mapentry)
302 1.2 hannken {
303 1.2 hannken switch (len) {
304 1.2 hannken case 0:
305 1.2 hannken mapentry->group1[0] = KS_voidSymbol;
306 1.2 hannken mapentry->group1[1] = KS_voidSymbol;
307 1.2 hannken mapentry->group2[0] = KS_voidSymbol;
308 1.2 hannken mapentry->group2[1] = KS_voidSymbol;
309 1.2 hannken break;
310 1.2 hannken
311 1.2 hannken case 1:
312 1.2 hannken mapentry->group1[0] = kp[0];
313 1.2 hannken mapentry->group1[1] = ksym_upcase(kp[0]);
314 1.2 hannken mapentry->group2[0] = mapentry->group1[0];
315 1.2 hannken mapentry->group2[1] = mapentry->group1[1];
316 1.2 hannken break;
317 1.2 hannken
318 1.2 hannken case 2:
319 1.2 hannken mapentry->group1[0] = kp[0];
320 1.2 hannken mapentry->group1[1] = kp[1];
321 1.2 hannken mapentry->group2[0] = mapentry->group1[0];
322 1.2 hannken mapentry->group2[1] = mapentry->group1[1];
323 1.2 hannken break;
324 1.2 hannken
325 1.2 hannken case 3:
326 1.2 hannken mapentry->group1[0] = kp[0];
327 1.2 hannken mapentry->group1[1] = kp[1];
328 1.2 hannken mapentry->group2[0] = kp[2];
329 1.2 hannken mapentry->group2[1] = ksym_upcase(kp[2]);
330 1.2 hannken break;
331 1.2 hannken
332 1.2 hannken case 4:
333 1.2 hannken mapentry->group1[0] = kp[0];
334 1.2 hannken mapentry->group1[1] = kp[1];
335 1.2 hannken mapentry->group2[0] = kp[2];
336 1.2 hannken mapentry->group2[1] = kp[3];
337 1.2 hannken break;
338 1.2 hannken
339 1.2 hannken }
340 1.2 hannken }
341 1.2 hannken
342 1.2 hannken void
343 1.8 augustss wskbd_get_mapentry(const struct wskbd_mapdata *mapdata, int kc,
344 1.8 augustss struct wscons_keymap *mapentry)
345 1.2 hannken {
346 1.2 hannken kbd_t cur;
347 1.2 hannken const keysym_t *kp;
348 1.2 hannken const struct wscons_keydesc *mp;
349 1.6 drochner int l;
350 1.2 hannken
351 1.2 hannken mapentry->command = KS_voidSymbol;
352 1.2 hannken mapentry->group1[0] = KS_voidSymbol;
353 1.2 hannken mapentry->group1[1] = KS_voidSymbol;
354 1.2 hannken mapentry->group2[0] = KS_voidSymbol;
355 1.2 hannken mapentry->group2[1] = KS_voidSymbol;
356 1.2 hannken
357 1.7 drochner for (cur = mapdata->layout & ~KB_HANDLEDBYWSKBD; cur != 0; ) {
358 1.6 drochner mp = mapdata->keydesc;
359 1.6 drochner while (mp->map_size > 0) {
360 1.6 drochner if (mp->name == cur)
361 1.2 hannken break;
362 1.6 drochner mp++;
363 1.6 drochner }
364 1.2 hannken
365 1.2 hannken /* If map not found, return */
366 1.6 drochner if (mp->map_size <= 0)
367 1.2 hannken return;
368 1.2 hannken
369 1.2 hannken for (kp = mp->map; kp < mp->map + mp->map_size; kp++)
370 1.2 hannken if (KS_GROUP(*kp) == KS_GROUP_Keycode &&
371 1.2 hannken KS_VALUE(*kp) == kc) {
372 1.2 hannken /* First skip keycode and possible command */
373 1.2 hannken kp++;
374 1.2 hannken if (KS_GROUP(*kp) == KS_GROUP_Command ||
375 1.2 hannken *kp == KS_Cmd || *kp == KS_Cmd1 || *kp == KS_Cmd2)
376 1.2 hannken mapentry->command = *kp++;
377 1.2 hannken
378 1.2 hannken for (l = 0; kp + l < mp->map + mp->map_size; l++)
379 1.2 hannken if (KS_GROUP(kp[l]) == KS_GROUP_Keycode)
380 1.2 hannken break;
381 1.2 hannken if (l > 4)
382 1.2 hannken panic("wskbd_get_mapentry: %d(%d): bad entry",
383 1.2 hannken mp->name, *kp);
384 1.2 hannken fillmapentry(kp, l, mapentry);
385 1.2 hannken return;
386 1.2 hannken }
387 1.2 hannken
388 1.6 drochner cur = mp->base;
389 1.2 hannken }
390 1.2 hannken }
391 1.2 hannken
392 1.1 hannken void
393 1.8 augustss wskbd_init_keymap(int newlen, struct wscons_keymap **map, int *maplen)
394 1.1 hannken {
395 1.1 hannken int i;
396 1.1 hannken
397 1.1 hannken if (newlen != *maplen) {
398 1.1 hannken if (*maplen > 0)
399 1.1 hannken free(*map, M_TEMP);
400 1.1 hannken *maplen = newlen;
401 1.1 hannken *map = malloc(newlen*sizeof(struct wscons_keymap),
402 1.1 hannken M_TEMP, M_WAITOK);
403 1.1 hannken }
404 1.1 hannken
405 1.1 hannken for (i = 0; i < *maplen; i++) {
406 1.1 hannken (*map)[i].command = KS_voidSymbol;
407 1.1 hannken (*map)[i].group1[0] = KS_voidSymbol;
408 1.1 hannken (*map)[i].group1[1] = KS_voidSymbol;
409 1.1 hannken (*map)[i].group2[0] = KS_voidSymbol;
410 1.1 hannken (*map)[i].group2[1] = KS_voidSymbol;
411 1.1 hannken }
412 1.1 hannken }
413 1.1 hannken
414 1.1 hannken int
415 1.11 perry wskbd_load_keymap(const struct wskbd_mapdata *mapdata,
416 1.8 augustss struct wscons_keymap **map, int *maplen)
417 1.1 hannken {
418 1.6 drochner int i, s, kc, stack_ptr;
419 1.1 hannken const keysym_t *kp;
420 1.6 drochner const struct wscons_keydesc *mp, *stack[10];
421 1.1 hannken kbd_t cur;
422 1.1 hannken
423 1.7 drochner for (cur = mapdata->layout & ~KB_HANDLEDBYWSKBD, stack_ptr = 0;
424 1.7 drochner cur != 0; stack_ptr++) {
425 1.6 drochner mp = mapdata->keydesc;
426 1.6 drochner while (mp->map_size > 0) {
427 1.6 drochner if (cur == 0 || mp->name == cur) {
428 1.1 hannken break;
429 1.1 hannken }
430 1.6 drochner mp++;
431 1.6 drochner }
432 1.1 hannken
433 1.1 hannken if (stack_ptr == sizeof(stack)/sizeof(stack[0]))
434 1.5 drochner panic("wskbd_load_keymap: %d: recursion too deep",
435 1.5 drochner mapdata->layout);
436 1.6 drochner if (mp->map_size <= 0)
437 1.1 hannken return(EINVAL);
438 1.1 hannken
439 1.6 drochner stack[stack_ptr] = mp;
440 1.6 drochner cur = mp->base;
441 1.1 hannken }
442 1.1 hannken
443 1.1 hannken for (i = 0, s = stack_ptr - 1; s >= 0; s--) {
444 1.6 drochner mp = stack[s];
445 1.1 hannken for (kp = mp->map; kp < mp->map + mp->map_size; kp++)
446 1.1 hannken if (KS_GROUP(*kp) == KS_GROUP_Keycode && KS_VALUE(*kp) > i)
447 1.1 hannken i = KS_VALUE(*kp);
448 1.1 hannken }
449 1.1 hannken
450 1.1 hannken wskbd_init_keymap(i + 1, map, maplen);
451 1.1 hannken
452 1.1 hannken for (s = stack_ptr - 1; s >= 0; s--) {
453 1.6 drochner mp = stack[s];
454 1.1 hannken for (kp = mp->map; kp < mp->map + mp->map_size; ) {
455 1.1 hannken if (KS_GROUP(*kp) != KS_GROUP_Keycode)
456 1.1 hannken panic("wskbd_load_keymap: %d(%d): bad entry",
457 1.1 hannken mp->name, *kp);
458 1.1 hannken
459 1.1 hannken kc = KS_VALUE(*kp);
460 1.1 hannken kp++;
461 1.1 hannken
462 1.1 hannken if (KS_GROUP(*kp) == KS_GROUP_Command ||
463 1.1 hannken *kp == KS_Cmd || *kp == KS_Cmd1 || *kp == KS_Cmd2) {
464 1.1 hannken (*map)[kc].command = *kp;
465 1.1 hannken kp++;
466 1.1 hannken }
467 1.1 hannken
468 1.1 hannken for (i = 0; kp + i < mp->map + mp->map_size; i++)
469 1.1 hannken if (KS_GROUP(kp[i]) == KS_GROUP_Keycode)
470 1.1 hannken break;
471 1.1 hannken
472 1.1 hannken if (i > 4)
473 1.1 hannken panic("wskbd_load_keymap: %d(%d): bad entry",
474 1.1 hannken mp->name, *kp);
475 1.1 hannken
476 1.2 hannken fillmapentry(kp, i, &(*map)[kc]);
477 1.1 hannken kp += i;
478 1.1 hannken }
479 1.1 hannken }
480 1.1 hannken
481 1.1 hannken return(0);
482 1.1 hannken }
483