WINGs/winputmethod.c

   1
   2 #include <X11/Xlib.h>
   3
   4 #include "wconfig.h"
   5
   6 #include "WINGsP.h"
   7
   8 typedef struct W_IMContext {
   9         XIM xim;
  10         XIMStyle ximstyle;
  11 } WMIMContext;
  12
  13 static void instantiateIM_cb(Display * display, XPointer client_data, XPointer call_data)
  14 {
  15         /* Parameter not used, but tell the compiler that it is ok */
  16         (void) display;
  17         (void) call_data;
  18
  19         W_InitIM((W_Screen *) client_data);
  20 }
  21
  22 static void destroyIM_cb(XIM xim, XPointer client_data, XPointer call_data)
  23 {
  24         W_Screen *scr = (W_Screen *) client_data;
  25         W_View *target;
  26
  27         /* Parameter not used, but tell the compiler that it is ok */
  28         (void) call_data;
  29
  30         if (scr->imctx->xim != xim)
  31                 return;
  32
  33         target = scr->rootView->childrenList;
  34         while (target != NULL) {
  35                 W_DestroyIC(target);
  36                 target = target->nextSister;
  37         }
  38
  39         wfree(scr->imctx);
  40         scr->imctx = NULL;
  41
  42         XRegisterIMInstantiateCallback(scr->display, NULL, NULL, NULL, instantiateIM_cb, (XPointer) scr);
  43 }
  44
  45 void W_InitIM(W_Screen * scr)
  46 {
  47         XIM xim;
  48
  49         if (scr->imctx)
  50                 return;
  51
  52         xim = XOpenIM(scr->display, NULL, NULL, NULL);
  53
  54         if (xim) {
  55                 XIMStyles *im_styles;
  56                 XIMCallback cb;
  57                 int i;
  58
  59                 scr->imctx = wmalloc(sizeof(WMIMContext));
  60                 scr->imctx->xim = xim;
  61
  62                 cb.callback = destroyIM_cb;
  63                 cb.client_data = (XPointer) scr;
  64                 if (XSetIMValues(scr->imctx->xim, XNDestroyCallback, &cb, NULL))
  65                         wwarning(_("could not add destroy callback for XIM input method"));
  66                 XUnregisterIMInstantiateCallback(scr->display, NULL, NULL, NULL, instantiateIM_cb, (XPointer) scr);
  67                 /* Get available input style */
  68                 XGetIMValues(scr->imctx->xim, XNQueryInputStyle, &im_styles, NULL);
  69
  70                 scr->imctx->ximstyle = 0;
  71
  72                 for (i = 0; i < im_styles->count_styles && scr->imctx->ximstyle == 0; i++) {
  73                         if ((im_styles->supported_styles[i] & XIMPreeditPosition) &&
  74                             (im_styles->supported_styles[i] & XIMStatusNothing)) {
  75                                 scr->imctx->ximstyle = XIMPreeditPosition | XIMStatusNothing;
  76                         } else if ((im_styles->supported_styles[i] & XIMPreeditNothing) &&
  77                                    (im_styles->supported_styles[i] & XIMStatusNothing)) {
  78                                 scr->imctx->ximstyle = XIMPreeditNothing | XIMStatusNothing;
  79                         }
  80                 }
  81                 XFree(im_styles);
  82         } else {
  83                 XRegisterIMInstantiateCallback(scr->display, NULL, NULL, NULL, instantiateIM_cb, (XPointer) scr);
  84         }
  85 }
  86
  87 void W_CreateIC(WMView * view)
  88 {
  89         WMScreen *scr = W_VIEW_SCREEN(view);
  90         XVaNestedList preedit_attr = NULL;
  91
  92         if (view->xic || !view->flags.realized || !scr->imctx)
  93                 return;
  94
  95         if (scr->imctx->ximstyle & XIMPreeditPosition) {
  96                 XPoint spot;
  97                 XRectangle rect;
  98                 int ofs;
  99
 100                 ofs = (view->size.height - WMFontHeight(scr->normalFont)) / 2;
 101
 102                 rect.x = ofs;
 103                 rect.y = ofs;
 104                 rect.height = WMFontHeight(scr->normalFont);
 105                 rect.width = view->size.width - ofs * 2;
 106                 spot.x = rect.x;
 107                 spot.y = rect.y + rect.height;
 108
 109                 // this really needs to be changed, but I don't know how yet -Dan
 110                 // it used to be like this with fontsets, but no longer applies to xft
 111                 preedit_attr = XVaCreateNestedList(0, XNSpotLocation, &spot,
 112                                                    XNArea, &rect, XNFontInfo, scr->normalFont->font, NULL);
 113         }
 114
 115         view->xic = XCreateIC(scr->imctx->xim, XNInputStyle, scr->imctx->ximstyle,
 116                               XNClientWindow, view->window,
 117                               preedit_attr ? XNPreeditAttributes : NULL, preedit_attr, NULL);
 118
 119         if (preedit_attr)
 120                 XFree(preedit_attr);
 121
 122         if (view->xic) {
 123                 unsigned long fevent = 0;
 124                 XGetICValues(view->xic, XNFilterEvents, &fevent, NULL);
 125                 XSelectInput(scr->display, view->window,
 126                              ButtonPressMask | ButtonReleaseMask | ExposureMask |
 127                              KeyPressMask | FocusChangeMask | ButtonMotionMask | fevent);
 128         }
 129 }
 130
 131 void W_DestroyIC(WMView * view)
 132 {
 133         if (view->xic) {
 134                 XDestroyIC(view->xic);
 135                 view->xic = 0;
 136         }
 137 }
 138
 139 static void setPreeditArea(W_View * view)
 140 {
 141         WMScreen *scr = W_VIEW_SCREEN(view);
 142         XVaNestedList preedit_attr = NULL;
 143
 144         if (view->xic && (scr->imctx->ximstyle & XIMPreeditPosition)) {
 145                 XRectangle rect;
 146                 int ofs;
 147
 148                 ofs = (view->size.height - WMFontHeight(scr->normalFont)) / 2;
 149                 rect.x = ofs;
 150                 rect.y = ofs;
 151                 rect.height = WMFontHeight(scr->normalFont);
 152                 rect.width = view->size.width - ofs * 2;
 153
 154                 preedit_attr = XVaCreateNestedList(0, XNArea, &rect, NULL);
 155                 XSetICValues(view->xic, XNPreeditAttributes, preedit_attr, NULL);
 156
 157                 if (preedit_attr) {
 158                         XFree(preedit_attr);
 159                 }
 160         }
 161 }
 162
 163 void W_FocusIC(WMView * view)
 164 {
 165         WMScreen *scr = W_VIEW_SCREEN(view);
 166
 167         if (view->xic) {
 168                 XSetICFocus(view->xic);
 169                 XSetICValues(view->xic, XNFocusWindow, view->window, NULL);
 170
 171                 if (scr->imctx->ximstyle & XIMPreeditPosition) {
 172                         setPreeditArea(view);
 173                 }
 174         }
 175 }
 176
 177 void W_UnFocusIC(WMView * view)
 178 {
 179         if (view->xic) {
 180                 XUnsetICFocus(view->xic);
 181         }
 182 }
 183
 184 void W_SetPreeditPositon(W_View * view, int x, int y)
 185 {
 186         WMScreen *scr = W_VIEW_SCREEN(view);
 187         XVaNestedList preedit_attr = NULL;
 188
 189         if (view->xic && (scr->imctx->ximstyle & XIMPreeditPosition)) {
 190                 XPoint spot;
 191                 int ofs;
 192
 193                 ofs = (view->size.height - WMFontHeight(scr->normalFont)) / 2;
 194                 spot.x = x;
 195                 spot.y = y + view->size.height - ofs - 3;
 196                 preedit_attr = XVaCreateNestedList(0, XNSpotLocation, &spot, NULL);
 197                 XSetICValues(view->xic, XNPreeditAttributes, preedit_attr, NULL);
 198                 if (preedit_attr) {
 199                         XFree(preedit_attr);
 200                 }
 201         }
 202 }
 203
 204 int W_LookupString(W_View *view, XKeyPressedEvent *event, char *buffer, int buflen, KeySym *keysym, Status *status)
 205 {
 206         WMScreen *scr = W_VIEW_SCREEN(view);
 207
 208         XSetInputFocus(scr->display, view->window, RevertToParent, CurrentTime);
 209
 210 #ifdef X_HAVE_UTF8_STRING
 211         if (view->xic)
 212                 return Xutf8LookupString(view->xic, event, buffer, buflen, keysym, status);
 213 #endif
 214         return XLookupString(event, buffer, buflen, keysym, (XComposeStatus *) status);
 215 }
 216
 217 /*
 218  * Map a keycode to the corresponding keysym
 219  * To replace the deprecated X11 function XKeycodeToKeysym
 220  */
 221 KeySym W_KeycodeToKeysym(Display *display, KeyCode keycode, int index)
 222 {
 223         static int min_kc = -1;
 224         static int max_kc;
 225         int num_syms;
 226         KeySym *key_syms;
 227         KeySym ks;
 228
 229         XDisplayKeycodes(display, &min_kc, &max_kc);
 230         if (keycode < min_kc || keycode > max_kc || index < 0) {
 231                 return NoSymbol;
 232         }
 233
 234         key_syms = XGetKeyboardMapping(display, keycode, 1, &num_syms);
 235         if (index >= num_syms) {
 236                 XFree(key_syms);
 237                 return NoSymbol;
 238         }
 239
 240         ks = key_syms[index];
 241         XFree(key_syms);
 242
 243         return ks;
 244 }