diff options
| author | bernd <bernd> | 2007-04-27 17:58:48 +0000 |
|---|---|---|
| committer | bernd <bernd> | 2007-04-27 17:58:48 +0000 |
| commit | 3d12c94f42f91e957fa8a68efcd3b0387791e6cf (patch) | |
| tree | 8bd9782a01bbd59ee27201e29b30d058b15445db /input.c | |
| download | cwm-3d12c94f42f91e957fa8a68efcd3b0387791e6cf.tar.gz cwm-3d12c94f42f91e957fa8a68efcd3b0387791e6cf.tar.xz cwm-3d12c94f42f91e957fa8a68efcd3b0387791e6cf.zip | |
Initial revision
Diffstat (limited to 'input.c')
| -rw-r--r-- | input.c | 81 |
1 files changed, 81 insertions, 0 deletions
diff --git a/input.c b/input.c new file mode 100644 index 0000000..95f30f8 --- /dev/null +++ b/input.c @@ -0,0 +1,81 @@ +/* + * calmwm - the calm window manager + * + * Copyright (c) 2004 Marius Aamodt Eriksen <marius@monkey.org> + * All rights reserved. + * + * $Id$ + */ + +#include "headers.h" +#include "calmwm.h" + +int +input_keycodetrans(KeyCode kc, u_int state, + enum ctltype *ctl, char *chr, int normalize) +{ + int ks; + + *ctl = CTL_NONE; + *chr = '\0'; + + ks = XKeycodeToKeysym(G_dpy, kc, 0); + + /* Look for control characters. */ + switch (ks) { + case XK_BackSpace: + *ctl = CTL_ERASEONE; + break; + case XK_Return: + *ctl = CTL_RETURN; + break; + case XK_Up: + *ctl = CTL_UP; + break; + case XK_Down: + *ctl = CTL_DOWN; + break; + case XK_Escape: + *ctl = CTL_ABORT; + break; + } + + if (*ctl == CTL_NONE && (state & ControlMask)) { + switch (ks) { + case XK_s: + case XK_S: + /* Emacs "next" */ + *ctl = CTL_DOWN; + break; + case XK_r: + case XK_R: + /* Emacs "previous" */ + *ctl = CTL_UP; + break; + case XK_u: + case XK_U: + *ctl = CTL_WIPE; + break; + case XK_a: + case XK_A: + *ctl = CTL_ALL; + break; + } + } + + if (*ctl != CTL_NONE) + return (0); + + /* + * For regular characters, only (part of, actually) Latin 1 + * for now. + */ + if (ks < 0x20 || ks > 0x07e) + return (-1); + + *chr = (char)ks; + if (normalize) + *chr = tolower(*chr); + + return (0); +} |