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