xref: /openbmc/qemu/qemu-keymap.c (revision 77b535cf)
1 /*
2  * QEMU keymap utility
3  *
4  * Copyright Red Hat, Inc. 2017
5  *
6  * Authors:
7  *     Gerd Hoffmann <kraxel@redhat.com>
8  *
9  * This work is licensed under the terms of the GNU GPL, version 2 or later.
10  * See the COPYING file in the top-level directory.
11  */
12 #include "qemu/osdep.h"
13 #include "qemu/notify.h"
14 #include "ui/input.h"
15 
16 #include <xkbcommon/xkbcommon.h>
17 
18 struct xkb_rule_names names = {
19     .rules   = NULL,
20     .model   = "pc105",
21     .layout  = "us",
22     .variant = NULL,
23     .options = NULL,
24 };
25 
26 static xkb_mod_mask_t shift;
27 static xkb_mod_mask_t ctrl;
28 static xkb_mod_mask_t altgr;
29 static xkb_mod_mask_t numlock;
30 
31 static FILE *outfile;
32 
33 /* ------------------------------------------------------------------------ */
34 
35 static uint32_t qcode_to_number(uint32_t qcode)
36 {
37     KeyValue keyvalue;
38     uint32_t number;
39 
40     keyvalue.type = KEY_VALUE_KIND_QCODE;
41     keyvalue.u.qcode.data = qcode;
42     number = qemu_input_key_value_to_number(&keyvalue);
43     assert(number != 0);
44     return number;
45 }
46 
47 static void print_sym(xkb_keysym_t sym, uint32_t qcode, const char *mod)
48 {
49     char name[64];
50 
51     if (sym == XKB_KEY_NoSymbol) {
52         return;
53     }
54     xkb_keysym_get_name(sym, name, sizeof(name));
55 
56     /* TODO: make ui/keymap.c parser accept QKeyCode names */
57     fprintf(outfile, "%s 0x%02x%s\n", name, qcode_to_number(qcode), mod);
58 }
59 
60 static void walk_map(struct xkb_keymap *map, xkb_keycode_t code, void *data)
61 {
62     struct xkb_state *state = data;
63     xkb_keysym_t kbase, knumlock, kshift, kaltgr, kaltgrshift;
64     uint32_t evdev, qcode;
65     char name[64];
66 
67     fprintf(outfile, "\n");
68 
69     /*
70      * map xkb keycode -> QKeyCode
71      *
72      * xkb keycode is linux evdev shifted by 8
73      */
74     evdev = code - 8;
75     qcode = qemu_input_linux_to_qcode(evdev);
76     if (qcode == Q_KEY_CODE_UNMAPPED) {
77         xkb_state_update_mask(state,  0, 0, 0,  0, 0, 0);
78         kbase = xkb_state_key_get_one_sym(state, code);
79         xkb_keysym_get_name(kbase, name, sizeof(name));
80         fprintf(outfile, "# evdev %d (0x%x): no evdev -> QKeyCode mapping"
81                 " (xkb keysym %s)\n", evdev, evdev, name);
82         return;
83     }
84     fprintf(outfile, "# evdev %d (0x%x), QKeyCode \"%s\", number 0x%x\n",
85             evdev, evdev,
86             QKeyCode_str(qcode),
87             qcode_to_number(qcode));
88 
89     /*
90      * check which modifier states generate which keysyms
91      */
92     xkb_state_update_mask(state,  0, 0, 0,  0, 0, 0);
93     kbase = xkb_state_key_get_one_sym(state, code);
94     print_sym(kbase, qcode, "");
95 
96     xkb_state_update_mask(state,  0, 0, numlock,  0, 0, 0);
97     knumlock = xkb_state_key_get_one_sym(state, code);
98     if (kbase != knumlock) {
99         print_sym(knumlock, qcode, " numlock");
100     }
101 
102     xkb_state_update_mask(state,  shift, 0, 0,  0, 0, 0);
103     kshift = xkb_state_key_get_one_sym(state, code);
104     if (kbase != kshift && knumlock != kshift) {
105         print_sym(kshift, qcode, " shift");
106     }
107 
108     xkb_state_update_mask(state,  altgr, 0, 0,  0, 0, 0);
109     kaltgr = xkb_state_key_get_one_sym(state, code);
110     if (kbase != kaltgr) {
111         print_sym(kaltgr, qcode, " altgr");
112     }
113 
114     xkb_state_update_mask(state,  altgr | shift, 0, 0,  0, 0, 0);
115     kaltgrshift = xkb_state_key_get_one_sym(state, code);
116     if (kshift != kaltgrshift && kaltgr != kaltgrshift) {
117         print_sym(kaltgrshift, qcode, " shift altgr");
118     }
119     return;
120 }
121 
122 static void usage(FILE *out)
123 {
124     fprintf(out,
125             "\n"
126             "This tool generates qemu reverse keymaps from xkb keymaps,\n"
127             "which can be used with the qemu \"-k\" command line switch.\n"
128             "\n"
129             "usage: qemu-keymap <options>\n"
130             "options:\n"
131             "    -h             print this text\n"
132             "    -f <file>      set output file          (default: stdout)\n"
133             "    -m <model>     set kbd model            (default: %s)\n"
134             "    -l <layout>    set kbd layout           (default: %s)\n"
135             "    -v <variant>   set kbd variant          (default: %s)\n"
136             "    -o <options>   set kbd options          (default: %s)\n"
137             "\n",
138             names.model, names.layout,
139             names.variant ?: "-",
140             names.options ?: "-");
141 }
142 
143 static xkb_mod_mask_t get_mod(struct xkb_keymap *map, const char *name)
144 {
145     xkb_mod_index_t mod;
146     xkb_mod_mask_t mask = 0;
147 
148     mod = xkb_keymap_mod_get_index(map, name);
149     if (mod != XKB_MOD_INVALID) {
150         mask = (1 << mod);
151     }
152     return mask;
153 }
154 
155 int main(int argc, char *argv[])
156 {
157     struct xkb_context *ctx;
158     struct xkb_keymap *map;
159     struct xkb_state *state;
160     xkb_mod_index_t mod, mods;
161     int rc;
162 
163     for (;;) {
164         rc = getopt(argc, argv, "hm:l:v:o:f:");
165         if (rc == -1) {
166             break;
167         }
168         switch (rc) {
169         case 'm':
170             names.model = optarg;
171             break;
172         case 'l':
173             names.layout = optarg;
174             break;
175         case 'v':
176             names.variant = optarg;
177             break;
178         case 'o':
179             names.options = optarg;
180             break;
181         case 'f':
182             outfile = fopen(optarg, "w");
183             if (outfile == NULL) {
184                 fprintf(stderr, "open %s: %s\n", optarg, strerror(errno));
185                 exit(1);
186             }
187             break;
188         case 'h':
189             usage(stdout);
190             exit(0);
191         default:
192             usage(stderr);
193             exit(1);
194         }
195     }
196 
197     if (outfile == NULL) {
198         outfile = stdout;
199     }
200 
201     fprintf(outfile,
202             "# SPDX-License-Identifier: GPL-2.0-or-later\n"
203             "#\n"
204             "# generated by qemu-keymap\n"
205             "#    model   : %s\n"
206             "#    layout  : %s\n"
207             "#    variant : %s\n"
208             "#    options : %s\n"
209             "\n",
210             names.model, names.layout,
211             names.variant ?: "-",
212             names.options ?: "-");
213 
214     ctx = xkb_context_new(XKB_CONTEXT_NO_FLAGS);
215     map = xkb_keymap_new_from_names(ctx, &names, XKB_KEYMAP_COMPILE_NO_FLAGS);
216     xkb_context_unref(ctx);
217     if (!map) {
218         /* libxkbcommon prints error */
219         exit(1);
220     }
221 
222     fprintf(outfile, "# name: \"%s\"\n\n",
223             xkb_keymap_layout_get_name(map, 0));
224     fprintf(outfile, "# modifiers\n");
225     mods = xkb_keymap_num_mods(map);
226     for (mod = 0; mod < mods; mod++) {
227         fprintf(outfile, "#    %2d: %s\n",
228                 mod, xkb_keymap_mod_get_name(map, mod));
229     }
230 
231     shift = get_mod(map, "Shift");
232     ctrl = get_mod(map, "Control");
233     altgr = get_mod(map, "AltGr");
234     numlock = get_mod(map, "NumLock");
235 
236     state = xkb_state_new(map);
237     xkb_keymap_key_for_each(map, walk_map, state);
238     xkb_state_unref(state);
239     xkb_keymap_unref(map);
240 
241     /* add quirks */
242     fprintf(outfile,
243             "\n"
244             "#\n"
245             "# quirks section start\n"
246             "#\n"
247             "# Sometimes multiple keysyms map to the same keycodes.\n"
248             "# The keycode -> keysym lookup finds only one of the\n"
249             "# keysyms.  So append them here.\n"
250             "#\n"
251             "\n");
252     print_sym(XKB_KEY_Print,            Q_KEY_CODE_SYSRQ,      "");
253     print_sym(XKB_KEY_Sys_Req,          Q_KEY_CODE_SYSRQ,      "");
254     print_sym(XKB_KEY_Execute,          Q_KEY_CODE_SYSRQ,      "");
255 
256     print_sym(XKB_KEY_KP_Decimal,       Q_KEY_CODE_KP_DECIMAL, " numlock");
257     print_sym(XKB_KEY_KP_Separator,     Q_KEY_CODE_KP_DECIMAL, " numlock");
258 
259     print_sym(XKB_KEY_Alt_R,            Q_KEY_CODE_ALT_R,      "");
260     print_sym(XKB_KEY_ISO_Level3_Shift, Q_KEY_CODE_ALT_R,      "");
261     print_sym(XKB_KEY_Mode_switch,      Q_KEY_CODE_ALT_R,      "");
262 
263     fprintf(outfile,
264             "\n"
265             "# quirks section end\n");
266 
267     exit(0);
268 }
269