diff options
Diffstat (limited to 'src/window-xlib.c')
| -rw-r--r-- | src/window-xlib.c | 532 |
1 files changed, 532 insertions, 0 deletions
diff --git a/src/window-xlib.c b/src/window-xlib.c new file mode 100644 index 0000000..0051fae --- /dev/null +++ b/src/window-xlib.c @@ -0,0 +1,532 @@ +#include <cairo-xlib.h> +#include <stdio.h> +#include <stdlib.h> +#include <time.h> +#include <unistd.h> +#include <X11/cursorfont.h> +#include <X11/Xlib.h> +#include <X11/Xatom.h> +#include <X11/Xutil.h> + +#include "runes.h" + +static char *atom_names[RUNES_NUM_ATOMS] = { + "WM_DELETE_WINDOW", + "_NET_WM_PING", + "_NET_WM_PID", + "_NET_WM_ICON_NAME", + "_NET_WM_NAME", + "UTF8_STRING", + "WM_PROTOCOLS", + "RUNES_FLUSH", + "RUNES_VISUAL_BELL", + "RUNES_AUDIBLE_BELL" +}; + +struct function_key { + KeySym sym; + char *str; + size_t len; +}; + +#define RUNES_KEY(sym, str) { sym, str, sizeof(str) - 1 } +static struct function_key keys[] = { + RUNES_KEY(XK_Up, "\e[A"), + RUNES_KEY(XK_Down, "\e[B"), + RUNES_KEY(XK_Right, "\e[C"), + RUNES_KEY(XK_Left, "\e[D"), + RUNES_KEY(XK_Page_Up, "\e[5~"), + RUNES_KEY(XK_Page_Down, "\e[6~"), + RUNES_KEY(XK_Home, "\e[H"), + RUNES_KEY(XK_End, "\e[F"), + RUNES_KEY(XK_F1, "\eOP"), + RUNES_KEY(XK_F2, "\eOQ"), + RUNES_KEY(XK_F3, "\eOR"), + RUNES_KEY(XK_F4, "\eOS"), + RUNES_KEY(XK_F5, "\e[15~"), + RUNES_KEY(XK_F6, "\e[17~"), + RUNES_KEY(XK_F7, "\e[18~"), + RUNES_KEY(XK_F8, "\e[19~"), + RUNES_KEY(XK_F9, "\e[20~"), + RUNES_KEY(XK_F10, "\e[21~"), + RUNES_KEY(XK_F11, "\e[23~"), + RUNES_KEY(XK_F12, "\e[24~"), + RUNES_KEY(XK_F13, "\e[25~"), + RUNES_KEY(XK_F14, "\e[26~"), + RUNES_KEY(XK_F15, "\e[28~"), + RUNES_KEY(XK_F16, "\e[29~"), + RUNES_KEY(XK_F17, "\e[31~"), + RUNES_KEY(XK_F18, "\e[32~"), + RUNES_KEY(XK_F19, "\e[33~"), + RUNES_KEY(XK_F20, "\e[34~"), + /* XXX keypad keys need to go here too */ + RUNES_KEY(XK_VoidSymbol, "") +}; + +static struct function_key application_keypad_keys[] = { + /* XXX i don't have a keypad on my laptop, need to get one for testing */ + RUNES_KEY(XK_VoidSymbol, "") +}; + +static struct function_key application_cursor_keys[] = { + RUNES_KEY(XK_Up, "\eOA"), + RUNES_KEY(XK_Down, "\eOB"), + RUNES_KEY(XK_Right, "\eOC"), + RUNES_KEY(XK_Left, "\eOD"), + /* XXX home/end? */ + RUNES_KEY(XK_VoidSymbol, "") +}; +#undef RUNES_KEY + +static void runes_window_backend_get_next_event(uv_work_t *req); +static void runes_window_backend_process_event(uv_work_t *req, int status); +static void runes_window_backend_resize_window( + RunesTerm *t, int width, int height); +static void runes_window_backend_flush(RunesTerm *t); +static void runes_window_backend_draw_cursor(RunesTerm *t); +static void runes_window_backend_set_urgent(RunesTerm *t); +static void runes_window_backend_clear_urgent(RunesTerm *t); + +void runes_window_backend_create_window(RunesTerm *t, int argc, char *argv[]) +{ + RunesWindowBackend *w = &t->w; + pid_t pid; + XClassHint class_hints = { "runes", "runes" }; + XWMHints wm_hints; + XSizeHints normal_hints; + unsigned long white; + XIM im; + Cursor cursor; + XColor cursor_fg, cursor_bg; + Visual *vis; + cairo_surface_t *surface; + + wm_hints.flags = InputHint | StateHint; + wm_hints.input = True; + wm_hints.initial_state = NormalState; + + normal_hints.flags = PMinSize | PResizeInc | PBaseSize; + + normal_hints.min_width = t->fontx; + normal_hints.min_height = t->fonty; + normal_hints.width_inc = t->fontx; + normal_hints.height_inc = t->fonty; + normal_hints.base_width = t->fontx * t->default_cols; + normal_hints.base_height = t->fonty * t->default_rows; + + XInitThreads(); + + w->dpy = XOpenDisplay(NULL); + white = WhitePixel(w->dpy, DefaultScreen(w->dpy)); + w->w = XCreateSimpleWindow( + w->dpy, DefaultRootWindow(w->dpy), + 0, 0, normal_hints.base_width, normal_hints.base_height, + 0, white, white); + + XSetLocaleModifiers(""); + im = XOpenIM(w->dpy, NULL, NULL, NULL); + w->ic = XCreateIC( + im, + XNInputStyle, XIMPreeditNothing | XIMStatusNothing, + XNClientWindow, w->w, + XNFocusWindow, w->w, + NULL + ); + if (w->ic == NULL) { + fprintf(stderr, "failed\n"); + exit(1); + } + + XInternAtoms(w->dpy, atom_names, RUNES_NUM_ATOMS, False, w->atoms); + XSetWMProtocols(w->dpy, w->w, w->atoms, RUNES_NUM_PROTOCOL_ATOMS); + + Xutf8SetWMProperties( + w->dpy, w->w, "runes", "runes", argv, argc, + &normal_hints, &wm_hints, &class_hints); + + pid = getpid(); + XChangeProperty( + w->dpy, w->w, w->atoms[RUNES_ATOM_NET_WM_PID], + XA_CARDINAL, 32, PropModeReplace, (unsigned char *)&pid, 1); + + runes_window_backend_set_icon_name(t, "runes", 5); + runes_window_backend_set_window_title(t, "runes", 5); + + cursor = XCreateFontCursor(w->dpy, XC_xterm); + cursor_fg.red = cursor_fg.green = cursor_fg.blue = 65535; + cursor_bg.red = cursor_bg.green = cursor_bg.blue = 0; + XRecolorCursor(w->dpy, cursor, &cursor_fg, &cursor_bg); + XDefineCursor(w->dpy, w->w, cursor); + + vis = DefaultVisual(w->dpy, DefaultScreen(w->dpy)); + surface = cairo_xlib_surface_create( + w->dpy, w->w, vis, normal_hints.base_width, normal_hints.base_height); + t->backend_cr = cairo_create(surface); + cairo_surface_destroy(surface); + + XMapWindow(w->dpy, w->w); +} + +void runes_window_backend_start_loop(RunesTerm *t) +{ + RunesWindowBackend *w = &t->w; + unsigned long mask; + void *data; + + XGetICValues(w->ic, XNFilterEvents, &mask, NULL); + XSelectInput( + w->dpy, w->w, + mask|KeyPressMask|ButtonPressMask|ButtonReleaseMask|ButtonMotionMask|PointerMotionHintMask|EnterWindowMask|LeaveWindowMask|StructureNotifyMask|ExposureMask|FocusChangeMask); + XSetICFocus(w->ic); + + data = malloc(sizeof(RunesXlibLoopData)); + ((RunesLoopData *)data)->req.data = data; + ((RunesLoopData *)data)->t = t; + + uv_queue_work( + t->loop, data, + runes_window_backend_get_next_event, + runes_window_backend_process_event); +} + +void runes_window_backend_request_flush(RunesTerm *t) +{ + XEvent e; + + e.xclient.type = ClientMessage; + e.xclient.window = t->w.w; + e.xclient.format = 32; + e.xclient.data.l[0] = t->w.atoms[RUNES_ATOM_RUNES_FLUSH]; + + XSendEvent(t->w.dpy, t->w.w, False, NoEventMask, &e); + XLockDisplay(t->w.dpy); + XFlush(t->w.dpy); + XUnlockDisplay(t->w.dpy); +} + +void runes_window_backend_request_visual_bell(RunesTerm *t) +{ + XEvent e; + + e.xclient.type = ClientMessage; + e.xclient.window = t->w.w; + e.xclient.format = 32; + e.xclient.data.l[0] = t->w.atoms[RUNES_ATOM_RUNES_VISUAL_BELL]; + + XSendEvent(t->w.dpy, t->w.w, False, NoEventMask, &e); + XLockDisplay(t->w.dpy); + XFlush(t->w.dpy); + XUnlockDisplay(t->w.dpy); +} + +void runes_window_backend_request_audible_bell(RunesTerm *t) +{ + XEvent e; + + e.xclient.type = ClientMessage; + e.xclient.window = t->w.w; + e.xclient.format = 32; + e.xclient.data.l[0] = t->w.atoms[RUNES_ATOM_RUNES_AUDIBLE_BELL]; + + XSendEvent(t->w.dpy, t->w.w, False, NoEventMask, &e); + XLockDisplay(t->w.dpy); + XFlush(t->w.dpy); + XUnlockDisplay(t->w.dpy); +} + +void runes_window_backend_request_close(RunesTerm *t) +{ + XEvent e; + + e.xclient.type = ClientMessage; + e.xclient.window = t->w.w; + e.xclient.message_type = t->w.atoms[RUNES_ATOM_WM_PROTOCOLS]; + e.xclient.format = 32; + e.xclient.data.l[0] = t->w.atoms[RUNES_ATOM_WM_DELETE_WINDOW]; + e.xclient.data.l[1] = CurrentTime; + + XSendEvent(t->w.dpy, t->w.w, False, NoEventMask, &e); +} + +void runes_window_backend_get_size(RunesTerm *t, int *xpixel, int *ypixel) +{ + cairo_surface_t *surface; + + surface = cairo_get_target(t->backend_cr); + *xpixel = cairo_xlib_surface_get_width(surface); + *ypixel = cairo_xlib_surface_get_height(surface); +} + +void runes_window_backend_set_icon_name(RunesTerm *t, char *name, size_t len) +{ + RunesWindowBackend *w = &t->w; + + XChangeProperty( + w->dpy, w->w, XA_WM_ICON_NAME, + w->atoms[RUNES_ATOM_UTF8_STRING], 8, PropModeReplace, + (unsigned char *)name, len); + XChangeProperty( + w->dpy, w->w, w->atoms[RUNES_ATOM_NET_WM_ICON_NAME], + w->atoms[RUNES_ATOM_UTF8_STRING], 8, PropModeReplace, + (unsigned char *)name, len); +} + +void runes_window_backend_set_window_title( + RunesTerm *t, char *name, size_t len) +{ + RunesWindowBackend *w = &t->w; + + XChangeProperty( + w->dpy, w->w, XA_WM_NAME, + w->atoms[RUNES_ATOM_UTF8_STRING], 8, PropModeReplace, + (unsigned char *)name, len); + XChangeProperty( + w->dpy, w->w, w->atoms[RUNES_ATOM_NET_WM_NAME], + w->atoms[RUNES_ATOM_UTF8_STRING], 8, PropModeReplace, + (unsigned char *)name, len); +} + +void runes_window_backend_cleanup(RunesTerm *t) +{ + RunesWindowBackend *w = &t->w; + XIM im; + + cairo_destroy(t->backend_cr); + im = XIMOfIC(w->ic); + XDestroyIC(w->ic); + XCloseIM(im); + XDestroyWindow(w->dpy, w->w); + XCloseDisplay(w->dpy); +} + +static void runes_window_backend_get_next_event(uv_work_t *req) +{ + RunesXlibLoopData *data; + + data = (RunesXlibLoopData *)req->data; + XNextEvent(data->data.t->w.dpy, &data->e); +} + +static void runes_window_backend_process_event(uv_work_t *req, int status) +{ + RunesXlibLoopData *data = req->data; + XEvent *e = &data->e; + RunesTerm *t = data->data.t; + RunesWindowBackend *w = &t->w; + int should_close = 0; + + UNUSED(status); + + if (!XFilterEvent(e, None)) { + switch (e->type) { + case KeyPress: { + char *buf = NULL; + size_t len = 8; + KeySym sym; + Status s; + size_t chars; + + buf = malloc(len); + + for (;;) { + chars = Xutf8LookupString( + w->ic, &e->xkey, buf, len - 1, &sym, &s); + if (s == XBufferOverflow) { + len = chars + 1; + buf = realloc(buf, len); + continue; + } + break; + } + + switch (s) { + case XLookupChars: + case XLookupBoth: + runes_pty_backend_write(t, buf, chars); + break; + case XLookupKeySym: { + struct function_key *key; + + if (t->application_keypad) { + if (t->application_cursor) { + key = &application_cursor_keys[0]; + while (key->sym != XK_VoidSymbol) { + if (key->sym == sym) { + break; + } + key++; + } + if (key->sym != XK_VoidSymbol) { + runes_pty_backend_write(t, key->str, key->len); + break; + } + } + key = &application_keypad_keys[0]; + while (key->sym != XK_VoidSymbol) { + if (key->sym == sym) { + break; + } + key++; + } + if (key->sym != XK_VoidSymbol) { + runes_pty_backend_write(t, key->str, key->len); + break; + } + } + key = &keys[0]; + while (key->sym != XK_VoidSymbol) { + if (key->sym == sym) { + break; + } + key++; + } + if (key->sym != XK_VoidSymbol) { + runes_pty_backend_write(t, key->str, key->len); + break; + } + break; + } + default: + break; + } + free(buf); + break; + } + case Expose: + runes_window_backend_flush(t); + break; + case ConfigureNotify: + while (XCheckTypedWindowEvent(w->dpy, w->w, ConfigureNotify, e)); + runes_window_backend_resize_window( + t, e->xconfigure.width, e->xconfigure.height); + break; + case FocusIn: + runes_window_backend_clear_urgent(t); + runes_display_focus_in(t); + runes_window_backend_flush(t); + break; + case FocusOut: + runes_display_focus_out(t); + runes_window_backend_flush(t); + break; + case ClientMessage: { + Atom a = e->xclient.data.l[0]; + if (a == w->atoms[RUNES_ATOM_WM_DELETE_WINDOW]) { + should_close = 1; + } + else if (a == w->atoms[RUNES_ATOM_NET_WM_PING]) { + e->xclient.window = DefaultRootWindow(w->dpy); + XSendEvent( + w->dpy, e->xclient.window, False, + SubstructureNotifyMask | SubstructureRedirectMask, + e + ); + } + else if (a == w->atoms[RUNES_ATOM_RUNES_FLUSH]) { + runes_window_backend_flush(t); + } + else if (a == w->atoms[RUNES_ATOM_RUNES_VISUAL_BELL]) { + cairo_pattern_t *white; + struct timespec tm = { 0, 20000000 }; + + runes_window_backend_set_urgent(t); + white = cairo_pattern_create_rgb(1.0, 1.0, 1.0); + cairo_set_source(t->backend_cr, white); + cairo_paint(t->backend_cr); + cairo_pattern_destroy(white); + cairo_surface_flush(cairo_get_target(t->backend_cr)); + XFlush(w->dpy); + nanosleep(&tm, NULL); + runes_window_backend_flush(t); + } + else if (a == w->atoms[RUNES_ATOM_RUNES_AUDIBLE_BELL]) { + XBell(w->dpy, 0); + } + break; + } + default: + break; + } + } + + if (!should_close) { + uv_queue_work( + t->loop, req, runes_window_backend_get_next_event, + runes_window_backend_process_event); + } + else { + runes_pty_backend_request_close(t); + free(req); + } +} + +static void runes_window_backend_resize_window( + RunesTerm *t, int width, int height) +{ + /* XXX no idea why shrinking the window dimensions to 0 makes xlib think + * that the dimension is 65535 */ + if (width < 1 || width >= 65535) { + width = 1; + } + if (height < 1 || height >= 65535) { + height = 1; + } + + if (width != t->xpixel || height != t->ypixel) { + cairo_xlib_surface_set_size( + cairo_get_target(t->backend_cr), width, height); + runes_display_set_window_size(t); + } +} + +static void runes_window_backend_flush(RunesTerm *t) +{ + cairo_set_source_surface(t->backend_cr, cairo_get_target(t->cr), 0.0, 0.0); + cairo_paint(t->backend_cr); + runes_window_backend_draw_cursor(t); + cairo_surface_flush(cairo_get_target(t->backend_cr)); +} + +static void runes_window_backend_draw_cursor(RunesTerm *t) +{ + if (!t->hide_cursor) { + cairo_save(t->backend_cr); + cairo_set_source(t->backend_cr, t->cursorcolor); + if (t->unfocused) { + cairo_set_line_width(t->backend_cr, 1); + cairo_rectangle( + t->backend_cr, + t->col * t->fontx + 0.5, t->row * t->fonty + 0.5, + t->fontx, t->fonty); + cairo_stroke(t->backend_cr); + } + else { + cairo_rectangle( + t->backend_cr, + t->col * t->fontx, t->row * t->fonty, + t->fontx, t->fonty); + cairo_fill(t->backend_cr); + } + cairo_restore(t->backend_cr); + } +} + +static void runes_window_backend_set_urgent(RunesTerm *t) +{ + XWMHints *hints; + + hints = XGetWMHints(t->w.dpy, t->w.w); + hints->flags |= XUrgencyHint; + XSetWMHints(t->w.dpy, t->w.w, hints); + XFree(hints); +} + +static void runes_window_backend_clear_urgent(RunesTerm *t) +{ + XWMHints *hints; + + hints = XGetWMHints(t->w.dpy, t->w.w); + hints->flags &= ~XUrgencyHint; + XSetWMHints(t->w.dpy, t->w.w, hints); + XFree(hints); +} |