#include <X11/Xlib.h>
#include <X11/keysym.h>
+struct _ObtIC
+{
+ guint ref;
+ XIC xic;
+ Window client;
+ Window focus;
+};
+
/* These masks are constants and the modifier keys are bound to them as
anyone sees fit:
ShiftMask (1<<0), LockMask (1<<1), ControlMask (1<<2), Mod1Mask (1<<3),
#define nth_mask(n) (1 << n)
static void set_modkey_mask(guchar mask, KeySym sym);
+static void xim_init(void);
void obt_keyboard_shutdown();
+void obt_keyboard_context_renew(ObtIC *ic);
static XModifierKeymap *modmap;
static KeySym *keymap;
static gboolean started = FALSE;
+static XIM xim = NULL;
+static XIMStyle xim_style = 0;
+static GSList *xic_all = NULL;
+
void obt_keyboard_reload(void)
{
gint i, j, k;
if (started) obt_keyboard_shutdown(); /* free stuff */
started = TRUE;
+ xim_init();
+
/* reset the keys to not be bound to any masks */
for (i = 0; i < OBT_KEYBOARD_NUM_MODKEYS; ++i)
modkeys_keys[i] = 0;
void obt_keyboard_shutdown(void)
{
+ GSList *it;
+
XFreeModifiermap(modmap);
modmap = NULL;
XFree(keymap);
keymap = NULL;
+ for (it = xic_all; it; it = g_slist_next(it)) {
+ ObtIC* ic = it->data;
+ if (ic->xic) {
+ XDestroyIC(ic->xic);
+ ic->xic = NULL;
+ }
+ }
+ if (xim) XCloseIM(xim);
+ xim = NULL;
+ xim_style = 0;
started = FALSE;
}
+void xim_init(void)
+{
+ GSList *it;
+ gchar *aname, *aclass;
+
+ aname = g_strdup(g_get_prgname());
+ if (!aname) aname = g_strdup("obt");
+
+ aclass = g_strdup(aname);
+ if (g_ascii_islower(aclass[0]))
+ aclass[0] = g_ascii_toupper(aclass[0]);
+
+ g_print("Opening Input Method for %s %s\n", aname, aclass);
+ xim = XOpenIM(obt_display, NULL, aname, aclass);
+
+ if (!xim)
+ g_message("Failed to open an Input Method");
+ else {
+ XIMStyles *xim_styles = NULL;
+ char *r;
+
+ /* get the input method styles */
+ r = XGetIMValues(xim, XNQueryInputStyle, &xim_styles, NULL);
+ if (r || !xim_styles)
+ g_message("Input Method does not support any styles");
+ if (xim_styles) {
+ int i;
+
+ /* find a style that doesnt need preedit or status */
+ for (i = 0; i < xim_styles->count_styles; ++i) {
+ if (xim_styles->supported_styles[i] ==
+ (XIMPreeditNothing | XIMStatusNothing))
+ {
+ xim_style = xim_styles->supported_styles[i];
+ break;
+ }
+ }
+ XFree(xim_styles);
+ }
+
+ if (!xim_style) {
+ g_message("Input Method does not support a usable style");
+
+ XCloseIM(xim);
+ xim = NULL;
+ }
+ }
+
+ /* any existing contexts need to be recreated for the new input method */
+ for (it = xic_all; it; it = g_slist_next(it))
+ obt_keyboard_context_renew(it->data);
+
+ g_free(aclass);
+ g_free(aname);
+}
+
guint obt_keyboard_keycode_to_modmask(guint keycode)
{
gint i, j;
return ret;
}
-gchar *obt_keyboard_keycode_to_string(guint keycode)
+gunichar obt_keyboard_keypress_to_unichar(ObtIC *ic, XEvent *ev)
{
+ gunichar unikey = 0;
KeySym sym;
+ Status status;
+ gchar *buf, fixbuf[4]; /* 4 is enough for a utf8 char */
+ gint len, bufsz;
+ gboolean got_string = FALSE;
+
+ g_return_val_if_fail(ev->type == KeyPress, 0);
+
+ if (!ic)
+ g_warning("Using obt_keyboard_keypress_to_unichar() without an "
+ "Input Context. No i18n support!");
+
+ if (ic && ic->xic) {
+ buf = fixbuf;
+ bufsz = sizeof(fixbuf);
+
+#ifdef X_HAVE_UTF8_STRING
+ len = Xutf8LookupString(ic->xic, &ev->xkey, buf, bufsz, &sym, &status);
+#else
+ len = XmbLookupString(ic->xic, &ev->xkey, buf, bufsz, &sym, &status);
+#endif
+
+ if (status == XBufferOverflow) {
+ buf = g_new(char, len);
+ bufsz = len;
+
+#ifdef X_HAVE_UTF8_STRING
+ len = Xutf8LookupString(ic->xic, &ev->xkey, buf, bufsz, &sym,
+ &status);
+#else
+ len = XmbLookupString(ic->xic, &ev->xkey, buf, bufsz, &sym,
+ &status);
+#endif
+ }
+
+ if ((status == XLookupChars || status == XLookupBoth)) {
+ if ((guchar)buf[0] >= 32) { /* not an ascii control character */
+#ifndef X_HAVE_UTF8_STRING
+ /* convert to utf8 */
+ gchar *buf2 = buf;
+ buf = g_locale_to_utf8(buf2, r, NULL, NULL, NULL);
+ g_free(buf2);
+#endif
+
+ got_string = TRUE;
+ }
+ }
+ else if (status == XLookupKeySym)
+ /* this key doesn't have a text representation, it is a command
+ key of some sort */;
+ else
+ g_message("Bad keycode lookup. Keysym 0x%x Status: %s\n",
+ (guint) sym,
+ (status == XBufferOverflow ? "BufferOverflow" :
+ status == XLookupNone ? "XLookupNone" :
+ status == XLookupKeySym ? "XLookupKeySym" :
+ "Unknown status"));
+ }
+ else {
+ buf = fixbuf;
+ bufsz = sizeof(fixbuf);
+ len = XLookupString(&ev->xkey, buf, bufsz, &sym, NULL);
+ if ((guchar)buf[0] >= 32) /* not an ascii control character */
+ got_string = TRUE;
+ }
- if ((sym = XKeycodeToKeysym(obt_display, keycode, 0)) != NoSymbol)
- return g_locale_to_utf8(XKeysymToString(sym), -1, NULL, NULL, NULL);
- return NULL;
+ if (got_string) {
+ gunichar u = g_utf8_get_char_validated(buf, len);
+ if (u && u != (gunichar)-1 && u != (gunichar)-2)
+ unikey = u;
+ }
+
+ if (buf != fixbuf) g_free(buf);
+
+ return unikey;
}
-gunichar obt_keyboard_keycode_to_unichar(guint keycode)
+KeySym obt_keyboard_keypress_to_keysym(XEvent *ev)
{
- gunichar unikey = 0;
- char *key;
-
- if ((key = obt_keyboard_keycode_to_string(keycode)) != NULL &&
- /* don't accept keys that aren't a single letter, like "space" */
- key[1] == '\0')
- {
- unikey = g_utf8_get_char_validated(key, -1);
- if (unikey == (gunichar)-1 || unikey == (gunichar)-2 || unikey == 0)
- unikey = 0;
+ KeySym sym;
+ gint r;
+
+ g_return_val_if_fail(ev->type == KeyPress, None);
+
+ sym = None;
+ r = XLookupString(&ev->xkey, NULL, 0, &sym, NULL);
+ return sym;
+}
+
+void obt_keyboard_context_renew(ObtIC *ic)
+{
+ if (xim) {
+ ic->xic = XCreateIC(xim,
+ XNInputStyle, xim_style,
+ XNClientWindow, ic->client,
+ XNFocusWindow, ic->focus,
+ NULL);
+ if (!ic->xic)
+ g_message("Error creating Input Context for window 0x%x 0x%x\n",
+ (guint)ic->client, (guint)ic->focus);
+ }
+}
+
+ObtIC* obt_keyboard_context_new(Window client, Window focus)
+{
+ ObtIC *ic;
+
+ g_return_val_if_fail(client != None && focus != None, NULL);
+
+ ic = g_slice_new(ObtIC);
+ ic->ref = 1;
+ ic->client = client;
+ ic->focus = focus;
+ ic->xic = NULL;
+
+ obt_keyboard_context_renew(ic);
+ xic_all = g_slist_prepend(xic_all, ic);
+
+ return ic;
+}
+
+void obt_keyboard_context_ref(ObtIC *ic)
+{
+ ++ic->ref;
+}
+
+void obt_keyboard_context_unref(ObtIC *ic)
+{
+ if (--ic->ref < 1) {
+ xic_all = g_slist_remove(xic_all, ic);
+ XDestroyIC(ic->xic);
+ g_slice_free(ObtIC, ic);
}
- g_free(key);
- return unikey;
}