source: libcaca/trunk/caca/driver_x11.c @ 551

Last change on this file since 551 was 551, checked in by Sam Hocevar, 14 years ago
  • Cosmetic changes here and there.
  • Property svn:keywords set to Id
File size: 14.3 KB
Line 
1/*
2 *  libcaca       ASCII-Art library
3 *  Copyright (c) 2002-2006 Sam Hocevar <sam@zoy.org>
4 *                All Rights Reserved
5 *
6 *  This library is free software; you can redistribute it and/or
7 *  modify it under the terms of the Do What The Fuck You Want To
8 *  Public License, Version 2, as published by Sam Hocevar. See
9 *  http://sam.zoy.org/wtfpl/COPYING for more details.
10 */
11
12/** \file driver_x11.c
13 *  \version \$Id: driver_x11.c 551 2006-03-08 11:27:23Z sam $
14 *  \author Sam Hocevar <sam@zoy.org>
15 *  \brief X11 driver
16 *
17 *  This file contains the libcaca X11 input and output driver
18 */
19
20#include "config.h"
21
22#if defined(USE_X11)
23
24#include <X11/Xlib.h>
25#include <X11/Xutil.h>
26#include <X11/keysym.h>
27#if defined(HAVE_X11_XKBLIB_H)
28#   include <X11/XKBlib.h>
29#endif
30
31#include <stdio.h> /* BUFSIZ */
32#include <stdlib.h>
33
34#include "caca.h"
35#include "caca_internals.h"
36#include "cucul.h"
37#include "cucul_internals.h"
38
39/*
40 * Local functions
41 */
42static int x11_error_handler(Display *, XErrorEvent *);
43
44struct driver_private
45{
46    Display *dpy;
47    Window window;
48    Pixmap pixmap;
49    GC gc;
50    long int event_mask;
51    int font_width, font_height;
52    unsigned int new_width, new_height;
53    int colors[16];
54    Font font;
55    XFontStruct *font_struct;
56    int font_offset;
57#if defined(HAVE_X11_XKBLIB_H)
58    Bool autorepeat;
59#endif
60};
61
62static int x11_init_graphics(caca_t *kk)
63{
64    static int const x11_palette[] =
65    {
66        /* Standard curses colours */
67        0x0,    0x0,    0x0,
68        0x0,    0x0,    0x8000,
69        0x0,    0x8000, 0x0,
70        0x0,    0x8000, 0x8000,
71        0x8000, 0x0,    0x0,
72        0x8000, 0x0,    0x8000,
73        0x8000, 0x8000, 0x0,
74        0x8000, 0x8000, 0x8000,
75        /* Extra values for xterm-16color */
76        0x4000, 0x4000, 0x4000,
77        0x4000, 0x4000, 0xffff,
78        0x4000, 0xffff, 0x4000,
79        0x4000, 0xffff, 0xffff,
80        0xffff, 0x4000, 0x4000,
81        0xffff, 0x4000, 0xffff,
82        0xffff, 0xffff, 0x4000,
83        0xffff, 0xffff, 0xffff,
84    };
85
86    Colormap colormap;
87    XSetWindowAttributes x11_winattr;
88    int (*old_error_handler)(Display *, XErrorEvent *);
89    char const *fonts[] = { NULL, "8x13bold", "fixed" }, **parser;
90    char const *geometry;
91    unsigned int width = 0, height = 0;
92    int i;
93
94    kk->drv.p = malloc(sizeof(struct driver_private));
95
96    geometry = getenv("CACA_GEOMETRY");
97    if(geometry && *(geometry))
98        sscanf(geometry, "%ux%u", &width, &height);
99
100    if(width && height)
101        cucul_set_size(kk->qq, width, height);
102
103    kk->drv.p->dpy = XOpenDisplay(NULL);
104    if(kk->drv.p->dpy == NULL)
105        return -1;
106
107    fonts[0] = getenv("CACA_FONT");
108    if(fonts[0] && *fonts[0])
109        parser = fonts;
110    else
111        parser = fonts + 1;
112
113    /* Ignore font errors */
114    old_error_handler = XSetErrorHandler(x11_error_handler);
115
116    /* Parse our font list */
117    for( ; ; parser++)
118    {
119        if(!*parser)
120        {
121            XSetErrorHandler(old_error_handler);
122            XCloseDisplay(kk->drv.p->dpy);
123            return -1;
124        }
125
126        kk->drv.p->font = XLoadFont(kk->drv.p->dpy, *parser);
127        if(!kk->drv.p->font)
128            continue;
129
130        kk->drv.p->font_struct = XQueryFont(kk->drv.p->dpy, kk->drv.p->font);
131        if(!kk->drv.p->font_struct)
132        {
133            XUnloadFont(kk->drv.p->dpy, kk->drv.p->font);
134            continue;
135        }
136
137        break;
138    }
139
140    /* Reset the default X11 error handler */
141    XSetErrorHandler(old_error_handler);
142
143    kk->drv.p->font_width = kk->drv.p->font_struct->max_bounds.width;
144    kk->drv.p->font_height = kk->drv.p->font_struct->max_bounds.ascent
145                         + kk->drv.p->font_struct->max_bounds.descent;
146    kk->drv.p->font_offset = kk->drv.p->font_struct->max_bounds.descent;
147
148    colormap = DefaultColormap(kk->drv.p->dpy, DefaultScreen(kk->drv.p->dpy));
149    for(i = 0; i < 16; i++)
150    {
151        XColor color;
152        color.red = x11_palette[i * 3];
153        color.green = x11_palette[i * 3 + 1];
154        color.blue = x11_palette[i * 3 + 2];
155        XAllocColor(kk->drv.p->dpy, colormap, &color);
156        kk->drv.p->colors[i] = color.pixel;
157    }
158
159    x11_winattr.backing_store = Always;
160    x11_winattr.background_pixel = kk->drv.p->colors[0];
161    x11_winattr.event_mask = ExposureMask | StructureNotifyMask;
162
163    kk->drv.p->window =
164        XCreateWindow(kk->drv.p->dpy, DefaultRootWindow(kk->drv.p->dpy), 0, 0,
165                      kk->qq->width * kk->drv.p->font_width,
166                      kk->qq->height * kk->drv.p->font_height,
167                      0, 0, InputOutput, 0,
168                      CWBackingStore | CWBackPixel | CWEventMask,
169                      &x11_winattr);
170
171    XStoreName(kk->drv.p->dpy, kk->drv.p->window, "caca for X");
172
173    XSelectInput(kk->drv.p->dpy, kk->drv.p->window, StructureNotifyMask);
174    XMapWindow(kk->drv.p->dpy, kk->drv.p->window);
175
176    kk->drv.p->gc = XCreateGC(kk->drv.p->dpy, kk->drv.p->window, 0, NULL);
177    XSetForeground(kk->drv.p->dpy, kk->drv.p->gc, kk->drv.p->colors[15]);
178    XSetFont(kk->drv.p->dpy, kk->drv.p->gc, kk->drv.p->font);
179
180    for(;;)
181    {
182        XEvent xevent;
183        XNextEvent(kk->drv.p->dpy, &xevent);
184        if (xevent.type == MapNotify)
185            break;
186    }
187
188#if defined(HAVE_X11_XKBLIB_H)
189    /* Disable autorepeat */
190    XkbSetDetectableAutoRepeat(kk->drv.p->dpy, True, &kk->drv.p->autorepeat);
191    if(!kk->drv.p->autorepeat)
192        XAutoRepeatOff(kk->drv.p->dpy);
193#endif
194
195    kk->drv.p->event_mask = KeyPressMask | KeyReleaseMask | ButtonPressMask
196          | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask
197          | ExposureMask;
198
199    XSelectInput(kk->drv.p->dpy, kk->drv.p->window, kk->drv.p->event_mask);
200
201    XSync(kk->drv.p->dpy, False);
202
203    kk->drv.p->pixmap = XCreatePixmap(kk->drv.p->dpy, kk->drv.p->window,
204                                   kk->qq->width * kk->drv.p->font_width,
205                                   kk->qq->height * kk->drv.p->font_height,
206                                   DefaultDepth(kk->drv.p->dpy,
207                                            DefaultScreen(kk->drv.p->dpy)));
208
209    kk->drv.p->new_width = kk->drv.p->new_height = 0;
210
211    return 0;
212}
213
214static int x11_end_graphics(caca_t *kk)
215{
216    XSync(kk->drv.p->dpy, False);
217#if defined(HAVE_X11_XKBLIB_H)
218    if(!kk->drv.p->autorepeat)
219        XAutoRepeatOn(kk->drv.p->dpy);
220#endif
221    XFreePixmap(kk->drv.p->dpy, kk->drv.p->pixmap);
222    XFreeFont(kk->drv.p->dpy, kk->drv.p->font_struct);
223    XFreeGC(kk->drv.p->dpy, kk->drv.p->gc);
224    XUnmapWindow(kk->drv.p->dpy, kk->drv.p->window);
225    XDestroyWindow(kk->drv.p->dpy, kk->drv.p->window);
226    XCloseDisplay(kk->drv.p->dpy);
227
228    free(kk->drv.p);
229
230    return 0;
231}
232
233static int x11_set_window_title(caca_t *kk, char const *title)
234{
235    XStoreName(kk->drv.p->dpy, kk->drv.p->window, title);
236    return 0;
237}
238
239static unsigned int x11_get_window_width(caca_t *kk)
240{
241    return kk->qq->width * kk->drv.p->font_width;
242}
243
244static unsigned int x11_get_window_height(caca_t *kk)
245{
246    return kk->qq->height * kk->drv.p->font_height;
247}
248
249static void x11_display(caca_t *kk)
250{
251    unsigned int x, y, len;
252
253    /* First draw the background colours. Splitting the process in two
254     * loops like this is actually slightly faster. */
255    for(y = 0; y < kk->qq->height; y++)
256    {
257        for(x = 0; x < kk->qq->width; x += len)
258        {
259            uint8_t *attr = kk->qq->attr + x + y * kk->qq->width;
260
261            len = 1;
262            while(x + len < kk->qq->width
263                   && (attr[len] >> 4) == (attr[0] >> 4))
264                len++;
265
266            XSetForeground(kk->drv.p->dpy, kk->drv.p->gc,
267                           kk->drv.p->colors[attr[0] >> 4]);
268            XFillRectangle(kk->drv.p->dpy, kk->drv.p->pixmap, kk->drv.p->gc,
269                           x * kk->drv.p->font_width, y * kk->drv.p->font_height,
270                           len * kk->drv.p->font_width, kk->drv.p->font_height);
271        }
272    }
273
274    /* Then print the foreground characters */
275    for(y = 0; y < kk->qq->height; y++)
276    {
277        for(x = 0; x < kk->qq->width; x += len)
278        {
279            char buffer[BUFSIZ]; /* FIXME: use a smaller buffer */
280            uint32_t *chars = kk->qq->chars + x + y * kk->qq->width;
281            uint8_t *attr = kk->qq->attr + x + y * kk->qq->width;
282
283            len = 1;
284
285            /* Skip spaces */
286            if(chars[0] == ' ')
287                continue;
288
289            buffer[0] = chars[0] & 0x7f;
290
291            while(x + len < kk->qq->width
292                   && (attr[len] & 0xf) == (attr[0] & 0xf))
293            {
294                buffer[len] = chars[len] & 0x7f;
295                len++;
296            }
297
298            XSetForeground(kk->drv.p->dpy, kk->drv.p->gc, kk->drv.p->colors[attr[0] & 0xf]);
299            XDrawString(kk->drv.p->dpy, kk->drv.p->pixmap, kk->drv.p->gc,
300                        x * kk->drv.p->font_width,
301                        (y + 1) * kk->drv.p->font_height - kk->drv.p->font_offset,
302                        buffer, len);
303        }
304    }
305
306    XCopyArea(kk->drv.p->dpy, kk->drv.p->pixmap, kk->drv.p->window, kk->drv.p->gc, 0, 0,
307              kk->qq->width * kk->drv.p->font_width,
308              kk->qq->height * kk->drv.p->font_height,
309              0, 0);
310    XFlush(kk->drv.p->dpy);
311}
312
313static void x11_handle_resize(caca_t *kk, unsigned int *new_width,
314                                          unsigned int *new_height)
315{
316    Pixmap new_pixmap;
317
318    *new_width = kk->drv.p->new_width;
319    *new_height = kk->drv.p->new_height;
320
321    new_pixmap = XCreatePixmap(kk->drv.p->dpy, kk->drv.p->window,
322                               kk->qq->width * kk->drv.p->font_width,
323                               kk->qq->height * kk->drv.p->font_height,
324                               DefaultDepth(kk->drv.p->dpy,
325                                            DefaultScreen(kk->drv.p->dpy)));
326    XCopyArea(kk->drv.p->dpy, kk->drv.p->pixmap, new_pixmap, kk->drv.p->gc, 0, 0,
327              kk->qq->width * kk->drv.p->font_width,
328              kk->qq->height * kk->drv.p->font_height, 0, 0);
329    XFreePixmap(kk->drv.p->dpy, kk->drv.p->pixmap);
330    kk->drv.p->pixmap = new_pixmap;
331}
332
333static unsigned int x11_get_event(caca_t *kk)
334{
335    unsigned int event = 0;
336    XEvent xevent;
337    char key;
338
339    while(XCheckWindowEvent(kk->drv.p->dpy, kk->drv.p->window,
340                            kk->drv.p->event_mask, &xevent) == True)
341    {
342        KeySym keysym;
343
344        /* Expose event */
345        if(xevent.type == Expose)
346        {
347            XCopyArea(kk->drv.p->dpy, kk->drv.p->pixmap,
348                      kk->drv.p->window, kk->drv.p->gc, 0, 0,
349                      kk->qq->width * kk->drv.p->font_width,
350                      kk->qq->height * kk->drv.p->font_height, 0, 0);
351            continue;
352        }
353
354        /* Resize event */
355        if(xevent.type == ConfigureNotify)
356        {
357            unsigned int w, h;
358
359            w = (xevent.xconfigure.width + kk->drv.p->font_width / 3)
360                  / kk->drv.p->font_width;
361            h = (xevent.xconfigure.height + kk->drv.p->font_height / 3)
362                  / kk->drv.p->font_height;
363
364            if(!w || !h || (w == kk->qq->width && h == kk->qq->height))
365                continue;
366
367            kk->drv.p->new_width = w;
368            kk->drv.p->new_height = h;
369
370            /* If we are already resizing, ignore the new signal */
371            if(kk->resize)
372                continue;
373
374            kk->resize = 1;
375
376            return CACA_EVENT_RESIZE;
377        }
378
379        /* Check for mouse motion events */
380        if(xevent.type == MotionNotify)
381        {
382            unsigned int newx = xevent.xmotion.x / kk->drv.p->font_width;
383            unsigned int newy = xevent.xmotion.y / kk->drv.p->font_height;
384
385            if(newx >= kk->qq->width)
386                newx = kk->qq->width - 1;
387            if(newy >= kk->qq->height)
388                newy = kk->qq->height - 1;
389
390            if(kk->mouse.x == newx && kk->mouse.y == newy)
391                continue;
392
393            kk->mouse.x = newx;
394            kk->mouse.y = newy;
395
396            return CACA_EVENT_MOUSE_MOTION | (kk->mouse.x << 12) | kk->mouse.y;
397        }
398
399        /* Check for mouse press and release events */
400        if(xevent.type == ButtonPress)
401            return CACA_EVENT_MOUSE_PRESS
402                    | ((XButtonEvent *)&xevent)->button;
403
404        if(xevent.type == ButtonRelease)
405            return CACA_EVENT_MOUSE_RELEASE
406                    | ((XButtonEvent *)&xevent)->button;
407
408        /* Check for key press and release events */
409        if(xevent.type == KeyPress)
410            event |= CACA_EVENT_KEY_PRESS;
411        else if(xevent.type == KeyRelease)
412            event |= CACA_EVENT_KEY_RELEASE;
413        else
414            continue;
415
416        if(XLookupString(&xevent.xkey, &key, 1, NULL, NULL))
417            return event | key;
418
419        keysym = XKeycodeToKeysym(kk->drv.p->dpy, xevent.xkey.keycode, 0);
420        switch(keysym)
421        {
422        case XK_F1:    return event | CACA_KEY_F1;
423        case XK_F2:    return event | CACA_KEY_F2;
424        case XK_F3:    return event | CACA_KEY_F3;
425        case XK_F4:    return event | CACA_KEY_F4;
426        case XK_F5:    return event | CACA_KEY_F5;
427        case XK_F6:    return event | CACA_KEY_F6;
428        case XK_F7:    return event | CACA_KEY_F7;
429        case XK_F8:    return event | CACA_KEY_F8;
430        case XK_F9:    return event | CACA_KEY_F9;
431        case XK_F10:   return event | CACA_KEY_F10;
432        case XK_F11:   return event | CACA_KEY_F11;
433        case XK_F12:   return event | CACA_KEY_F12;
434        case XK_F13:   return event | CACA_KEY_F13;
435        case XK_F14:   return event | CACA_KEY_F14;
436        case XK_F15:   return event | CACA_KEY_F15;
437        case XK_Left:  return event | CACA_KEY_LEFT;
438        case XK_Right: return event | CACA_KEY_RIGHT;
439        case XK_Up:    return event | CACA_KEY_UP;
440        case XK_Down:  return event | CACA_KEY_DOWN;
441        default:       return CACA_EVENT_NONE;
442        }
443    }
444
445    return CACA_EVENT_NONE;
446}
447
448/*
449 * XXX: following functions are local
450 */
451
452static int x11_error_handler(Display *dpy, XErrorEvent *xevent)
453{
454    /* Ignore the error */
455    return 0;
456}
457
458/*
459 * Driver initialisation
460 */
461
462void x11_init_driver(caca_t *kk)
463{
464    kk->drv.driver = CACA_DRIVER_X11;
465
466    kk->drv.init_graphics = x11_init_graphics;
467    kk->drv.end_graphics = x11_end_graphics;
468    kk->drv.set_window_title = x11_set_window_title;
469    kk->drv.get_window_width = x11_get_window_width;
470    kk->drv.get_window_height = x11_get_window_height;
471    kk->drv.display = x11_display;
472    kk->drv.handle_resize = x11_handle_resize;
473    kk->drv.get_event = x11_get_event;
474}
475
476#endif /* USE_X11 */
477
Note: See TracBrowser for help on using the repository browser.