The two pure things in the Wayland frontend, in the shape the XIM adapter test already uses: wl.c included behind one define that makes the virtual keyboard inert, and a keymap built from a string, so no compositor and no xkb data files are wanted. The mask test holds Caps Lock apart from Shift, which is what a Korean key turns on; the bitmap test holds a release of a key we never passed on, a code the bitmap cannot hold, and the release of everything still down when the context goes. wayland-scanner's output is the parent Makefile's to write, as ../strans already is. Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>
107 lines
2.9 KiB
C
107 lines
2.9 KiB
C
#include <wayland-client.h>
|
|
#include <xkbcommon/xkbcommon.h>
|
|
#include "vkv1.h"
|
|
|
|
/* The virtual keyboard is the only wire call the tested code makes. */
|
|
static int nkeysent;
|
|
static void wirekey(struct zwp_virtual_keyboard_v1*, uint32_t, uint32_t,
|
|
uint32_t);
|
|
|
|
#define zwp_virtual_keyboard_v1_key wirekey
|
|
|
|
#include "wl.c"
|
|
#include "test.h"
|
|
|
|
static void
|
|
wirekey(struct zwp_virtual_keyboard_v1 *vkb, uint32_t time, uint32_t code,
|
|
uint32_t state)
|
|
{
|
|
USED(vkb);
|
|
USED(time);
|
|
USED(code);
|
|
USED(state);
|
|
nkeysent++;
|
|
}
|
|
|
|
/* Only the modifiers are read from it, so nothing else need be here. */
|
|
static char keymaptext[] =
|
|
"xkb_keymap {\n"
|
|
"xkb_keycodes { <AD01> = 24; };\n"
|
|
"xkb_types { type \"ONE_LEVEL\" {\n"
|
|
" modifiers = none; map[none] = 1; level_name[1] = \"Any\"; }; };\n"
|
|
"xkb_compatibility { };\n"
|
|
"xkb_symbols { key <AD01> { [ q ] }; };\n"
|
|
"};\n";
|
|
|
|
void
|
|
wl_modifier_mask(struct ct *t)
|
|
{
|
|
struct xkb_context *ctx;
|
|
struct xkb_keymap *km;
|
|
xkb_mod_mask_t caps, ctrl, shift;
|
|
|
|
kstate = nil;
|
|
CT_EQ_UINT(t, 0, modmask()); /* before any keymap arrives */
|
|
ctx = xkb_context_new(XKB_CONTEXT_NO_FLAGS);
|
|
km = xkb_keymap_new_from_string(ctx, keymaptext,
|
|
XKB_KEYMAP_FORMAT_TEXT_V1, XKB_KEYMAP_COMPILE_NO_FLAGS);
|
|
CT_CHECK(t, km != nil);
|
|
if(km != nil){
|
|
kstate = xkb_state_new(km);
|
|
shift = (xkb_mod_mask_t)1 <<
|
|
xkb_keymap_mod_get_index(km, XKB_MOD_NAME_SHIFT);
|
|
ctrl = (xkb_mod_mask_t)1 <<
|
|
xkb_keymap_mod_get_index(km, XKB_MOD_NAME_CTRL);
|
|
caps = (xkb_mod_mask_t)1 <<
|
|
xkb_keymap_mod_get_index(km, XKB_MOD_NAME_CAPS);
|
|
xkb_state_update_mask(kstate, shift, 0, 0, 0, 0, 0);
|
|
CT_EQ_UINT(t, Mshift, modmask());
|
|
xkb_state_update_mask(kstate, shift|ctrl, 0, 0, 0, 0, 0);
|
|
CT_EQ_UINT(t, Mshift|Mctrl, modmask());
|
|
/* Caps Lock is not Shift; a Korean key must not shift under it. */
|
|
xkb_state_update_mask(kstate, 0, 0, caps, 0, 0, 0);
|
|
CT_EQ_UINT(t, 0, modmask());
|
|
xkb_state_unref(kstate);
|
|
kstate = nil;
|
|
xkb_keymap_unref(km);
|
|
}
|
|
xkb_context_unref(ctx);
|
|
}
|
|
|
|
void
|
|
wl_forwarded_keys(struct ct *t)
|
|
{
|
|
haskeymap = 1;
|
|
memset(sent, 0, sizeof sent);
|
|
nkeysent = 0;
|
|
|
|
forward(30, WL_KEYBOARD_KEY_STATE_PRESSED);
|
|
CT_CHECK(t, issent(30));
|
|
forward(30, WL_KEYBOARD_KEY_STATE_RELEASED);
|
|
CT_CHECK(t, !issent(30));
|
|
CT_EQ_INT(t, 2, nkeysent);
|
|
|
|
/* A code the bitmap cannot hold is not passed on at all. */
|
|
nkeysent = 0;
|
|
forward(Maxcode, WL_KEYBOARD_KEY_STATE_PRESSED);
|
|
CT_EQ_INT(t, 0, nkeysent);
|
|
|
|
/* Whatever is still down is released, once each and no more. */
|
|
forward(1, WL_KEYBOARD_KEY_STATE_PRESSED);
|
|
forward(200, WL_KEYBOARD_KEY_STATE_PRESSED);
|
|
nkeysent = 0;
|
|
releasekeys();
|
|
CT_EQ_INT(t, 2, nkeysent);
|
|
CT_CHECK(t, !issent(1));
|
|
CT_CHECK(t, !issent(200));
|
|
releasekeys();
|
|
CT_EQ_INT(t, 2, nkeysent);
|
|
|
|
/* Before a keymap the virtual keyboard must not be touched. */
|
|
haskeymap = 0;
|
|
nkeysent = 0;
|
|
forward(30, WL_KEYBOARD_KEY_STATE_PRESSED);
|
|
CT_EQ_INT(t, 0, nkeysent);
|
|
CT_CHECK(t, !issent(30));
|
|
}
|