From patchwork Wed Oct 11 08:36:01 2017 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Gerd Hoffmann X-Patchwork-Id: 824292 Return-Path: X-Original-To: incoming@patchwork.ozlabs.org Delivered-To: patchwork-incoming@bilbo.ozlabs.org Authentication-Results: ozlabs.org; spf=pass (mailfrom) smtp.mailfrom=nongnu.org (client-ip=2001:4830:134:3::11; helo=lists.gnu.org; envelope-from=qemu-devel-bounces+incoming=patchwork.ozlabs.org@nongnu.org; receiver=) Received: from lists.gnu.org (lists.gnu.org [IPv6:2001:4830:134:3::11]) (using TLSv1 with cipher AES256-SHA (256/256 bits)) (No client certificate requested) by ozlabs.org (Postfix) with ESMTPS id 3yBnWp4W9jz9t3H for ; Wed, 11 Oct 2017 19:41:26 +1100 (AEDT) Received: from localhost ([::1]:39196 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1e2CZw-00089m-Of for incoming@patchwork.ozlabs.org; Wed, 11 Oct 2017 04:41:24 -0400 Received: from eggs.gnu.org ([2001:4830:134:3::10]:58584) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1e2CV1-00043D-BL for qemu-devel@nongnu.org; Wed, 11 Oct 2017 04:36:22 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1e2CUu-0007pG-Tk for qemu-devel@nongnu.org; Wed, 11 Oct 2017 04:36:19 -0400 Received: from mx1.redhat.com ([209.132.183.28]:34376) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1e2CUu-0007nj-LS for qemu-devel@nongnu.org; Wed, 11 Oct 2017 04:36:12 -0400 Received: from smtp.corp.redhat.com (int-mx06.intmail.prod.int.phx2.redhat.com [10.5.11.16]) (using TLSv1.2 with cipher AECDH-AES256-SHA (256/256 bits)) (No client certificate requested) by mx1.redhat.com (Postfix) with ESMTPS id A6E59A797 for ; Wed, 11 Oct 2017 08:36:11 +0000 (UTC) DMARC-Filter: OpenDMARC Filter v1.3.2 mx1.redhat.com A6E59A797 Authentication-Results: ext-mx05.extmail.prod.ext.phx2.redhat.com; dmarc=none (p=none dis=none) header.from=redhat.com Authentication-Results: ext-mx05.extmail.prod.ext.phx2.redhat.com; spf=fail smtp.mailfrom=kraxel@redhat.com Received: from sirius.home.kraxel.org (ovpn-116-239.ams2.redhat.com [10.36.116.239]) by smtp.corp.redhat.com (Postfix) with ESMTP id A86EF5C66F; Wed, 11 Oct 2017 08:36:08 +0000 (UTC) Received: by sirius.home.kraxel.org (Postfix, from userid 1000) id E046A4FD43; Wed, 11 Oct 2017 10:36:04 +0200 (CEST) From: Gerd Hoffmann To: qemu-devel@nongnu.org Date: Wed, 11 Oct 2017 10:36:01 +0200 Message-Id: <20171011083604.11820-8-kraxel@redhat.com> In-Reply-To: <20171011083604.11820-1-kraxel@redhat.com> References: <20171011083604.11820-1-kraxel@redhat.com> X-Scanned-By: MIMEDefang 2.79 on 10.5.11.16 X-Greylist: Sender IP whitelisted, not delayed by milter-greylist-4.5.16 (mx1.redhat.com [10.5.110.29]); Wed, 11 Oct 2017 08:36:11 +0000 (UTC) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] [fuzzy] X-Received-From: 209.132.183.28 Subject: [Qemu-devel] [PULL 07/10] tools: add qemu-keymap X-BeenThere: qemu-devel@nongnu.org X-Mailman-Version: 2.1.21 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: Gerd Hoffmann Errors-To: qemu-devel-bounces+incoming=patchwork.ozlabs.org@nongnu.org Sender: "Qemu-devel" qemu-keymap generates qemu reverse keymaps from xkb keymaps, which can be used with the qemu "-k" command line switch. Signed-off-by: Gerd Hoffmann Message-id: 20171005153330.19210-2-kraxel@redhat.com --- configure | 23 ++++++ Makefile | 5 ++ qemu-keymap.c | 258 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 286 insertions(+) create mode 100644 qemu-keymap.c diff --git a/configure b/configure index 06f18ea9af..be53b6b104 100755 --- a/configure +++ b/configure @@ -304,6 +304,7 @@ vde="" vnc_sasl="" vnc_jpeg="" vnc_png="" +xkbcommon="" xen="" xen_ctrl_version="" xen_pv_domain_build="no" @@ -2908,6 +2909,21 @@ EOF fi ########################################## +# xkbcommon probe +if test "$xkbcommon" != "no" ; then + if $pkg_config xkbcommon --exists; then + xkbcommon_cflags=$($pkg_config xkbcommon --cflags) + xkbcommon_libs=$($pkg_config xkbcommon --libs) + xkbcommon=yes + else + if test "$xkbcommon" = "yes" ; then + feature_not_found "xkbcommon" "Install libxkbcommon-devel" + fi + xkbcommon=no + fi +fi + +########################################## # fnmatch() probe, used for ACL routines fnmatch="no" cat > $TMPC << EOF @@ -5107,6 +5123,9 @@ if test "$softmmu" = yes ; then mpath=no fi fi +if test "$xkbcommon" = "yes"; then + tools="qemu-keymap\$(EXESUF) $tools" +fi # Probe for guest agent support/options @@ -5606,6 +5625,10 @@ fi if test "$vnc_png" = "yes" ; then echo "CONFIG_VNC_PNG=y" >> $config_host_mak fi +if test "$xkbcommon" = "yes" ; then + echo "XKBCOMMON_CFLAGS=$xkbcommon_cflags" >> $config_host_mak + echo "XKBCOMMON_LIBS=$xkbcommon_libs" >> $config_host_mak +fi if test "$fnmatch" = "yes" ; then echo "CONFIG_FNMATCH=y" >> $config_host_mak fi diff --git a/Makefile b/Makefile index f76b87472c..70235c0442 100644 --- a/Makefile +++ b/Makefile @@ -418,6 +418,8 @@ qemu-io$(EXESUF): qemu-io.o $(block-obj-y) $(crypto-obj-y) $(io-obj-y) $(qom-obj qemu-bridge-helper$(EXESUF): qemu-bridge-helper.o $(COMMON_LDADDS) +qemu-keymap$(EXESUF): qemu-keymap.o ui/input-keymap.o $(COMMON_LDADDS) + fsdev/virtfs-proxy-helper$(EXESUF): fsdev/virtfs-proxy-helper.o fsdev/9p-marshal.o fsdev/9p-iov-marshal.o $(COMMON_LDADDS) fsdev/virtfs-proxy-helper$(EXESUF): LIBS += -lcap @@ -432,6 +434,9 @@ qemu-img-cmds.h: $(SRC_PATH)/qemu-img-cmds.hx $(SRC_PATH)/scripts/hxtool qemu-ga$(EXESUF): LIBS = $(LIBS_QGA) qemu-ga$(EXESUF): QEMU_CFLAGS += -I qga/qapi-generated +qemu-keymap$(EXESUF): LIBS += $(XKBCOMMON_LIBS) +qemu-keymap$(EXESUF): QEMU_CFLAGS += $(XKBCOMMON_CFLAGS) + gen-out-type = $(subst .,-,$(suffix $@)) qapi-py = $(SRC_PATH)/scripts/qapi.py $(SRC_PATH)/scripts/ordereddict.py diff --git a/qemu-keymap.c b/qemu-keymap.c new file mode 100644 index 0000000000..49e9167b86 --- /dev/null +++ b/qemu-keymap.c @@ -0,0 +1,258 @@ +/* + * QEMU keymap utility + * + * Copyright Red Hat, Inc. 2017 + * + * Authors: + * Gerd Hoffmann + * + * This work is licensed under the terms of the GNU GPL, version 2 or later. + * See the COPYING file in the top-level directory. + */ +#include "qemu/osdep.h" +#include "qemu-common.h" +#include "qapi-types.h" +#include "qemu/notify.h" +#include "ui/input.h" + +#include + +struct xkb_rule_names names = { + .rules = NULL, + .model = "pc105", + .layout = "us", + .variant = NULL, + .options = NULL, +}; + +static xkb_mod_mask_t shift; +static xkb_mod_mask_t ctrl; +static xkb_mod_mask_t altgr; +static xkb_mod_mask_t numlock; + +static FILE *outfile; + +/* ------------------------------------------------------------------------ */ + +static uint32_t qcode_to_number(uint32_t qcode) +{ + KeyValue keyvalue; + uint32_t number; + + keyvalue.type = KEY_VALUE_KIND_QCODE; + keyvalue.u.qcode.data = qcode; + number = qemu_input_key_value_to_number(&keyvalue); + assert(number != 0); + return number; +} + +static void print_sym(xkb_keysym_t sym, uint32_t qcode, const char *mod) +{ + char name[64]; + + if (sym == XKB_KEY_NoSymbol) { + return; + } + xkb_keysym_get_name(sym, name, sizeof(name)); + + /* TODO: make ui/keymap.c parser accept QKeyCode names */ + fprintf(outfile, "%s 0x%02x%s\n", name, qcode_to_number(qcode), mod); +} + +static void walk_map(struct xkb_keymap *map, xkb_keycode_t code, void *data) +{ + struct xkb_state *state = data; + xkb_keysym_t kbase, knumlock, kshift, kaltgr, kaltgrshift; + uint32_t evdev, qcode; + char name[64]; + + fprintf(outfile, "\n"); + + /* + * map xkb keycode -> QKeyCode + * + * xkb keycode is linux evdev shifted by 8 + */ + evdev = code - 8; + qcode = qemu_input_linux_to_qcode(evdev); + if (qcode == Q_KEY_CODE_UNMAPPED) { + xkb_state_update_mask(state, 0, 0, 0, 0, 0, 0); + kbase = xkb_state_key_get_one_sym(state, code); + xkb_keysym_get_name(kbase, name, sizeof(name)); + fprintf(outfile, "# evdev %d (0x%x): no evdev -> QKeyCode mapping" + " (xkb keysym %s)\n", evdev, evdev, name); + return; + } + fprintf(outfile, "# evdev %d (0x%x), QKeyCode \"%s\", number 0x%x\n", + evdev, evdev, + QKeyCode_lookup.array[qcode], + qcode_to_number(qcode)); + + /* + * check which modifier states generate which keysyms + */ + xkb_state_update_mask(state, 0, 0, 0, 0, 0, 0); + kbase = xkb_state_key_get_one_sym(state, code); + print_sym(kbase, qcode, ""); + + xkb_state_update_mask(state, 0, 0, numlock, 0, 0, 0); + knumlock = xkb_state_key_get_one_sym(state, code); + if (kbase != knumlock) { + print_sym(knumlock, qcode, " numlock"); + } + + xkb_state_update_mask(state, shift, 0, 0, 0, 0, 0); + kshift = xkb_state_key_get_one_sym(state, code); + if (kbase != kshift && knumlock != kshift) { + print_sym(kshift, qcode, " shift"); + } + + xkb_state_update_mask(state, altgr, 0, 0, 0, 0, 0); + kaltgr = xkb_state_key_get_one_sym(state, code); + if (kbase != kaltgr) { + print_sym(kaltgr, qcode, " altgr"); + } + + xkb_state_update_mask(state, altgr | shift, 0, 0, 0, 0, 0); + kaltgrshift = xkb_state_key_get_one_sym(state, code); + if (kshift != kaltgrshift && kaltgr != kaltgrshift) { + print_sym(kaltgrshift, qcode, " shift altgr"); + } + return; +} + +static void usage(FILE *out) +{ + fprintf(out, + "\n" + "This tool generates qemu reverse keymaps from xkb keymaps,\n" + "which can be used with the qemu \"-k\" command line switch.\n" + "\n" + "usage: qemu-keymap \n" + "options:\n" + " -h print this text\n" + " -f set output file (default: stdout)\n" + " -m set kbd model (default: %s)\n" + " -l set kbd layout (default: %s)\n" + " -v set kbd variant (default: %s)\n" + " -o set kbd options (default: %s)\n" + "\n", + names.model, names.layout, + names.variant ?: "-", + names.options ?: "-"); +} + +int main(int argc, char *argv[]) +{ + struct xkb_context *ctx; + struct xkb_keymap *map; + struct xkb_state *state; + xkb_mod_index_t mod, mods; + int rc; + + for (;;) { + rc = getopt(argc, argv, "hm:l:v:o:f:"); + if (rc == -1) { + break; + } + switch (rc) { + case 'm': + names.model = optarg; + break; + case 'l': + names.layout = optarg; + break; + case 'v': + names.variant = optarg; + break; + case 'o': + names.options = optarg; + break; + case 'f': + outfile = fopen(optarg, "w"); + if (outfile == NULL) { + fprintf(stderr, "open %s: %s\n", optarg, strerror(errno)); + exit(1); + } + break; + case 'h': + usage(stdout); + exit(0); + default: + usage(stderr); + exit(1); + } + } + + if (outfile == NULL) { + outfile = stdout; + } + + fprintf(outfile, + "#\n" + "# generated by qemu-keymap\n" + "# model : %s\n" + "# layout : %s\n" + "# variant : %s\n" + "# options : %s\n" + "\n", + names.model, names.layout, + names.variant ?: "-", + names.options ?: "-"); + + ctx = xkb_context_new(XKB_CONTEXT_NO_FLAGS); + map = xkb_keymap_new_from_names(ctx, &names, XKB_KEYMAP_COMPILE_NO_FLAGS); + if (!map) { + /* libxkbcommon prints error */ + exit(1); + } + + fprintf(outfile, "# name: \"%s\"\n\n", + xkb_keymap_layout_get_name(map, 0)); + fprintf(outfile, "# modifiers\n"); + mods = xkb_keymap_num_mods(map); + for (mod = 0; mod < mods; mod++) { + fprintf(outfile, "# %2d: %s\n", + mod, xkb_keymap_mod_get_name(map, mod)); + } + + mod = xkb_keymap_mod_get_index(map, "Shift"); + shift = (1 << mod); + mod = xkb_keymap_mod_get_index(map, "Control"); + ctrl = (1 << mod); + mod = xkb_keymap_mod_get_index(map, "AltGr"); + altgr = (1 << mod); + mod = xkb_keymap_mod_get_index(map, "NumLock"); + numlock = (1 << mod); + + state = xkb_state_new(map); + xkb_keymap_key_for_each(map, walk_map, state); + + /* add quirks */ + fprintf(outfile, + "\n" + "#\n" + "# quirks section start\n" + "#\n" + "# Sometimes multiple keysyms map to the same keycodes.\n" + "# The keycode -> keysym lookup finds only one of the\n" + "# keysyms. So append them here.\n" + "#\n" + "\n"); + print_sym(XKB_KEY_Print, Q_KEY_CODE_SYSRQ, ""); + print_sym(XKB_KEY_Sys_Req, Q_KEY_CODE_SYSRQ, ""); + print_sym(XKB_KEY_Execute, Q_KEY_CODE_SYSRQ, ""); + + print_sym(XKB_KEY_KP_Decimal, Q_KEY_CODE_KP_DECIMAL, " numlock"); + print_sym(XKB_KEY_KP_Separator, Q_KEY_CODE_KP_DECIMAL, " numlock"); + + print_sym(XKB_KEY_Alt_R, Q_KEY_CODE_ALT_R, ""); + print_sym(XKB_KEY_ISO_Level3_Shift, Q_KEY_CODE_ALT_R, ""); + print_sym(XKB_KEY_Mode_switch, Q_KEY_CODE_ALT_R, ""); + + fprintf(outfile, + "\n" + "# quirks section end\n"); + + exit(0); +}