1 /************************************************************
2 Copyright (c) 1993 by Silicon Graphics Computer Systems, Inc.
4 Permission to use, copy, modify, and distribute this
5 software and its documentation for any purpose and without
6 fee is hereby granted, provided that the above copyright
7 notice appear in all copies and that both that copyright
8 notice and this permission notice appear in supporting
9 documentation, and that the name of Silicon Graphics not be
10 used in advertising or publicity pertaining to distribution
11 of the software without specific prior written permission.
12 Silicon Graphics makes no representation about the suitability
13 of this software for any purpose. It is provided "as is"
14 without any express or implied warranty.
16 SILICON GRAPHICS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS
17 SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
18 AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL SILICON
19 GRAPHICS BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
20 DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
21 DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
22 OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH
23 THE USE OR PERFORMANCE OF THIS SOFTWARE.
25 ********************************************************/
35 #include "xkbcommon/xkbcommon.h"
36 #include "XKBcommonint.h"
37 #include <X11/keysym.h>
39 #define mapSize(m) (sizeof(m) / sizeof(struct xkb_kt_map_entry))
40 static struct xkb_kt_map_entry map2Level[]= {
41 { True, ShiftMask, {1, ShiftMask, 0} }
44 static struct xkb_kt_map_entry mapAlpha[]= {
45 { True, ShiftMask, { 1, ShiftMask, 0 } },
46 { True, LockMask, { 0, LockMask, 0 } }
49 static struct xkb_mods preAlpha[]= {
51 { LockMask, LockMask, 0 }
54 #define NL_VMOD_MASK 0
55 static struct xkb_kt_map_entry mapKeypad[]= {
56 { True, ShiftMask, { 1, ShiftMask, 0 } },
57 { False, 0, { 1, 0, NL_VMOD_MASK } }
60 static struct xkb_key_type canonicalTypes[XkbNumRequiredTypes] = {
67 { { ShiftMask, ShiftMask, 0 },
69 mapSize(map2Level), /* map_count */
73 { { ShiftMask|LockMask, ShiftMask|LockMask, 0 },
75 mapSize(mapAlpha), /* map_count */
79 { { ShiftMask, ShiftMask, NL_VMOD_MASK },
81 mapSize(mapKeypad), /* map_count */
88 XkbcInitCanonicalKeyTypes(struct xkb_keymap * xkb, unsigned which, int keypadVMod)
90 struct xkb_client_map * map;
91 struct xkb_key_type *from, *to;
97 rtrn= XkbcAllocClientMap(xkb, XkbKeyTypesMask, XkbNumRequiredTypes);
102 if ((which & XkbAllRequiredTypes) == 0)
106 from = canonicalTypes;
109 if (which & XkbOneLevelMask)
110 rtrn = XkbcCopyKeyType(&from[XkbOneLevelIndex], &to[XkbOneLevelIndex]);
112 if ((which & XkbTwoLevelMask) && (rtrn == Success))
113 rtrn = XkbcCopyKeyType(&from[XkbTwoLevelIndex], &to[XkbTwoLevelIndex]);
115 if ((which & XkbAlphabeticMask) && (rtrn == Success))
116 rtrn = XkbcCopyKeyType(&from[XkbAlphabeticIndex],
117 &to[XkbAlphabeticIndex]);
119 if ((which & XkbKeypadMask) && (rtrn == Success)) {
120 struct xkb_key_type * type;
122 rtrn = XkbcCopyKeyType(&from[XkbKeypadIndex], &to[XkbKeypadIndex]);
123 type = &to[XkbKeypadIndex];
125 if ((keypadVMod >= 0) && (keypadVMod < XkbNumVirtualMods) &&
127 type->mods.vmods = (1 << keypadVMod);
128 type->map[0].active = True;
129 type->map[0].mods.mask = ShiftMask;
130 type->map[0].mods.real_mods = ShiftMask;
131 type->map[0].mods.vmods = 0;
132 type->map[0].level = 1;
133 type->map[1].active = False;
134 type->map[1].mods.mask = 0;
135 type->map[1].mods.real_mods = 0;
136 type->map[1].mods.vmods = (1 << keypadVMod);
137 type->map[1].level = 1;
145 XkbcVirtualModsToReal(struct xkb_keymap * xkb, unsigned virtual_mask,
153 if (virtual_mask == 0) {
160 for (i = mask = 0, bit = 1; i < XkbNumVirtualMods; i++, bit <<= 1) {
161 if (virtual_mask & bit)
162 mask |= xkb->server->vmods[i];
170 * All latin-1 alphanumerics, plus parens, slash, minus, underscore and
173 static const unsigned char componentSpecLegal[] = {
174 0x00, 0x00, 0x00, 0x00, 0x00, 0xa7, 0xff, 0x83,
175 0xfe, 0xff, 0xff, 0x87, 0xfe, 0xff, 0xff, 0x07,
176 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
177 0xff, 0xff, 0x7f, 0xff, 0xff, 0xff, 0x7f, 0xff
181 XkbcEnsureSafeMapName(char *name)
186 while (*name!='\0') {
187 if ((componentSpecLegal[(*name) / 8] & (1 << ((*name) % 8))) == 0)
194 _XkbcKSCheckCase(xkb_keysym_t ks)
196 unsigned set = (ks & (~0xff)) >> 8;
200 case 0: /* latin 1 */
201 if ((ks >= XK_A && ks <= XK_Z) ||
202 (ks >= XK_Agrave && ks <= XK_THORN && ks != XK_multiply))
204 if ((ks >= XK_a && ks <= XK_z) ||
205 (ks >= XK_agrave && ks <= XK_ydiaeresis))
208 case 1: /* latin 2 */
209 if ((ks >= XK_Aogonek && ks <= XK_Zabovedot && ks != XK_breve) ||
210 (ks >= XK_Racute && ks<=XK_Tcedilla))
212 if ((ks >= XK_aogonek && ks <= XK_zabovedot && ks != XK_caron) ||
213 (ks >= XK_racute && ks <= XK_tcedilla))
216 case 2: /* latin 3 */
217 if ((ks >= XK_Hstroke && ks <= XK_Jcircumflex) ||
218 (ks >= XK_Cabovedot && ks <= XK_Scircumflex))
220 if ((ks >= XK_hstroke && ks <= XK_jcircumflex) ||
221 (ks >= XK_cabovedot && ks <= XK_scircumflex))
224 case 3: /* latin 4 */
225 if ((ks >= XK_Rcedilla && ks <= XK_Tslash) ||
227 (ks >= XK_Amacron && ks <= XK_Umacron))
229 if ((ks >= XK_rcedilla && ks <= XK_tslash) ||
231 (ks >= XK_amacron && ks <= XK_umacron))
234 case 18: /* latin 8 */
235 if ((ks == XK_Wcircumflex) ||
236 (ks == XK_Ycircumflex) ||
237 (ks == XK_Babovedot) ||
238 (ks == XK_Dabovedot) ||
239 (ks == XK_Fabovedot) ||
240 (ks == XK_Mabovedot) ||
241 (ks == XK_Pabovedot) ||
242 (ks == XK_Sabovedot) ||
243 (ks == XK_Tabovedot) ||
244 (ks == XK_Wdiaeresis) ||
247 if ((ks == XK_wcircumflex) ||
248 (ks == XK_ycircumflex) ||
249 (ks == XK_babovedot) ||
250 (ks == XK_dabovedot) ||
251 (ks == XK_fabovedot) ||
252 (ks == XK_mabovedot) ||
253 (ks == XK_pabovedot) ||
254 (ks == XK_sabovedot) ||
255 (ks == XK_tabovedot) ||
256 (ks == XK_wdiaeresis) ||
260 case 19: /* latin 9 */
261 if (ks == XK_OE || ks == XK_Ydiaeresis)
271 #define UNMATCHABLE(c) ((c) == '(' || (c) == ')' || (c) == '/')
274 XkbcNameMatchesPattern(char *name, char *ptrn)
276 while (ptrn[0] != '\0') {
277 if (name[0] == '\0') {
278 if (ptrn[0] == '*') {
285 if (ptrn[0] == '?') {
286 if (UNMATCHABLE(name[0]))
289 else if (ptrn[0] == '*') {
290 if (!UNMATCHABLE(name[0]) &&
291 XkbcNameMatchesPattern(name + 1, ptrn))
293 return XkbcNameMatchesPattern(name, ptrn + 1);
295 else if (ptrn[0] != name[0])
302 /* if we get here, the pattern is exhausted (-:just like me:-) */
303 return (name[0] == '\0');