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

Last change on this file since 1778 was 1778, checked in by Sam Hocevar, 13 years ago
  • Slightly nicer code in driver_x11.c.
  • Property svn:keywords set to Id
File size: 24.7 KB
Line 
1/*
2 *  libcaca       Colour ASCII-Art library
3 *  Copyright (c) 2002-2007 Sam Hocevar <sam@zoy.org>
4 *                2007 Ben Wiley Sittler <bsittler@gmail.com>
5 *                All Rights Reserved
6 *
7 *  $Id: driver_x11.c 1778 2007-06-28 07:43:41Z sam $
8 *
9 *  This library is free software. It comes without any warranty, to
10 *  the extent permitted by applicable law. You can redistribute it
11 *  and/or modify it under the terms of the Do What The Fuck You Want
12 *  To Public License, Version 2, as published by Sam Hocevar. See
13 *  http://sam.zoy.org/wtfpl/COPYING for more details.
14 */
15
16/*
17 *  This file contains the libcaca X11 input and output driver
18 */
19
20#include "config.h"
21#include "common.h"
22
23#if defined(USE_X11)
24
25#include <X11/Xlib.h>
26#include <X11/Xutil.h>
27#include <X11/keysym.h>
28#if defined(HAVE_X11_XKBLIB_H)
29#   include <X11/XKBlib.h>
30#endif
31
32#include <stdio.h> /* BUFSIZ */
33#include <stdlib.h>
34#include <string.h>
35
36#include "caca.h"
37#include "caca_internals.h"
38#include "cucul.h"
39#include "cucul_internals.h"
40
41/*
42 * Local functions
43 */
44static int x11_error_handler(Display *, XErrorEvent *);
45static void x11_put_glyph(caca_display_t *, int, int, int, int, int,
46                          uint32_t, uint32_t);
47
48struct driver_private
49{
50    Display *dpy;
51    Window window;
52    Pixmap pixmap;
53    GC gc;
54    long int event_mask;
55    int font_width, font_height;
56    int colors[4096];
57    Font font;
58    XFontStruct *font_struct;
59    int font_offset;
60    Cursor pointer;
61    Atom wm_protocols;
62    Atom wm_delete_window;
63#if defined(HAVE_X11_XKBLIB_H)
64    Bool autorepeat;
65#endif
66    uint32_t max_char;
67};
68
69#define UNICODE_XLFD_SUFFIX "-iso10646-1"
70#define LATIN_1_XLFD_SUFFIX "-iso8859-1"
71
72static int x11_init_graphics(caca_display_t *dp)
73{
74    Colormap colormap;
75    XSetWindowAttributes x11_winattr;
76    int (*old_error_handler)(Display *, XErrorEvent *);
77    char const *fonts[] = { NULL, "8x13bold", "fixed" }, **parser;
78    char const *geometry;
79    unsigned int width = dp->cv->width, height = dp->cv->height;
80    int i;
81
82    dp->drv.p = malloc(sizeof(struct driver_private));
83
84#if defined(HAVE_GETENV)
85    geometry = getenv("CACA_GEOMETRY");
86    if(geometry && *geometry)
87        sscanf(geometry, "%ux%u", &width, &height);
88#endif
89
90    _cucul_set_canvas_size(dp->cv, width ? width : 80, height ? height : 32);
91
92    dp->drv.p->dpy = XOpenDisplay(NULL);
93    if(dp->drv.p->dpy == NULL)
94        return -1;
95
96#if defined(HAVE_GETENV)
97    fonts[0] = getenv("CACA_FONT");
98    if(fonts[0] && *fonts[0])
99        parser = fonts;
100    else
101#endif
102        parser = fonts + 1;
103
104    /* Ignore font errors */
105    old_error_handler = XSetErrorHandler(x11_error_handler);
106
107    /* Parse our font list */
108    for( ; ; parser++)
109    {
110        unsigned int font_max_char;
111
112        if(!*parser)
113        {
114            XSetErrorHandler(old_error_handler);
115            XCloseDisplay(dp->drv.p->dpy);
116            return -1;
117        }
118
119        dp->drv.p->font = XLoadFont(dp->drv.p->dpy, *parser);
120        if(!dp->drv.p->font)
121            continue;
122
123        dp->drv.p->font_struct = XQueryFont(dp->drv.p->dpy, dp->drv.p->font);
124        if(!dp->drv.p->font_struct)
125        {
126            XUnloadFont(dp->drv.p->dpy, dp->drv.p->font);
127            continue;
128        }
129
130        if((strlen(*parser) > sizeof(UNICODE_XLFD_SUFFIX))
131             && !strcasecmp(*parser + strlen(*parser)
132                          - strlen(UNICODE_XLFD_SUFFIX), UNICODE_XLFD_SUFFIX))
133            dp->drv.p->max_char = 0xffff;
134        else if((strlen(*parser) > sizeof(LATIN_1_XLFD_SUFFIX))
135                 && !strcasecmp(*parser + strlen(*parser)
136                        - strlen(LATIN_1_XLFD_SUFFIX), LATIN_1_XLFD_SUFFIX))
137            dp->drv.p->max_char = 0xff;
138        else
139            dp->drv.p->max_char = 0x7f;
140
141        font_max_char =
142            (((unsigned int)dp->drv.p->font_struct->max_byte1) << 8)
143             | dp->drv.p->font_struct->max_char_or_byte2;
144        if(font_max_char && (font_max_char < dp->drv.p->max_char))
145            dp->drv.p->max_char = font_max_char;
146
147        break;
148    }
149
150    /* Reset the default X11 error handler */
151    XSetErrorHandler(old_error_handler);
152   
153    dp->drv.p->font_width = 0;
154    if(dp->drv.p->font_struct->per_char
155        && !dp->drv.p->font_struct->min_byte1
156        && dp->drv.p->font_struct->min_char_or_byte2 <= 0x21
157        && dp->drv.p->font_struct->max_char_or_byte2 >= 0x7e)
158    {
159        for(i = 0x21; i < 0x7f; i++)
160        {
161            int cw = dp->drv.p->font_struct->per_char[i
162                           - dp->drv.p->font_struct->min_char_or_byte2].width;
163            if(cw > dp->drv.p->font_width)
164                dp->drv.p->font_width = cw;
165        }
166    }
167
168    if(!dp->drv.p->font_width)
169        dp->drv.p->font_width = dp->drv.p->font_struct->max_bounds.width;
170
171    dp->drv.p->font_height = dp->drv.p->font_struct->max_bounds.ascent
172                         + dp->drv.p->font_struct->max_bounds.descent;
173    dp->drv.p->font_offset = dp->drv.p->font_struct->max_bounds.descent;
174
175    colormap = DefaultColormap(dp->drv.p->dpy, DefaultScreen(dp->drv.p->dpy));
176    for(i = 0x000; i < 0x1000; i++)
177    {
178        XColor color;
179        color.red = ((i & 0xf00) >> 8) * 0x1111;
180        color.green = ((i & 0x0f0) >> 4) * 0x1111;
181        color.blue = (i & 0x00f) * 0x1111;
182        XAllocColor(dp->drv.p->dpy, colormap, &color);
183        dp->drv.p->colors[i] = color.pixel;
184    }
185
186    x11_winattr.backing_store = Always;
187    x11_winattr.background_pixel = dp->drv.p->colors[0x000];
188    x11_winattr.event_mask = ExposureMask | StructureNotifyMask;
189
190    dp->drv.p->window =
191        XCreateWindow(dp->drv.p->dpy, DefaultRootWindow(dp->drv.p->dpy), 0, 0,
192                      dp->cv->width * dp->drv.p->font_width,
193                      dp->cv->height * dp->drv.p->font_height,
194                      0, 0, InputOutput, 0,
195                      CWBackingStore | CWBackPixel | CWEventMask,
196                      &x11_winattr);
197
198    dp->drv.p->wm_protocols =
199        XInternAtom(dp->drv.p->dpy, "WM_PROTOCOLS", True);
200    dp->drv.p->wm_delete_window =
201        XInternAtom(dp->drv.p->dpy, "WM_DELETE_WINDOW", True);
202
203    if(dp->drv.p->wm_protocols != None && dp->drv.p->wm_delete_window != None)
204        XSetWMProtocols(dp->drv.p->dpy, dp->drv.p->window,
205                        &dp->drv.p->wm_delete_window, 1);
206
207    XStoreName(dp->drv.p->dpy, dp->drv.p->window, "caca for X");
208
209    XSelectInput(dp->drv.p->dpy, dp->drv.p->window, StructureNotifyMask);
210    XMapWindow(dp->drv.p->dpy, dp->drv.p->window);
211
212    dp->drv.p->gc = XCreateGC(dp->drv.p->dpy, dp->drv.p->window, 0, NULL);
213    XSetForeground(dp->drv.p->dpy, dp->drv.p->gc, dp->drv.p->colors[0x888]);
214    XSetFont(dp->drv.p->dpy, dp->drv.p->gc, dp->drv.p->font);
215
216    for(;;)
217    {
218        XEvent xevent;
219        XNextEvent(dp->drv.p->dpy, &xevent);
220        if(xevent.type == MapNotify)
221            break;
222    }
223
224#if defined(HAVE_X11_XKBLIB_H)
225    /* Disable autorepeat */
226    XkbSetDetectableAutoRepeat(dp->drv.p->dpy, True, &dp->drv.p->autorepeat);
227    if(!dp->drv.p->autorepeat)
228        XAutoRepeatOff(dp->drv.p->dpy);
229#endif
230
231    dp->drv.p->event_mask = KeyPressMask | KeyReleaseMask | ButtonPressMask
232          | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask
233          | ExposureMask;
234
235    XSelectInput(dp->drv.p->dpy, dp->drv.p->window, dp->drv.p->event_mask);
236
237    XSync(dp->drv.p->dpy, False);
238
239    dp->drv.p->pixmap = XCreatePixmap(dp->drv.p->dpy, dp->drv.p->window,
240                                   dp->cv->width * dp->drv.p->font_width,
241                                   dp->cv->height * dp->drv.p->font_height,
242                                   DefaultDepth(dp->drv.p->dpy,
243                                            DefaultScreen(dp->drv.p->dpy)));
244    dp->drv.p->pointer = None;
245
246    return 0;
247}
248
249static int x11_end_graphics(caca_display_t *dp)
250{
251    XSync(dp->drv.p->dpy, False);
252#if defined(HAVE_X11_XKBLIB_H)
253    if(!dp->drv.p->autorepeat)
254        XAutoRepeatOn(dp->drv.p->dpy);
255#endif
256    XFreePixmap(dp->drv.p->dpy, dp->drv.p->pixmap);
257    XFreeFont(dp->drv.p->dpy, dp->drv.p->font_struct);
258    XFreeGC(dp->drv.p->dpy, dp->drv.p->gc);
259    XUnmapWindow(dp->drv.p->dpy, dp->drv.p->window);
260    XDestroyWindow(dp->drv.p->dpy, dp->drv.p->window);
261    XCloseDisplay(dp->drv.p->dpy);
262
263    free(dp->drv.p);
264
265    return 0;
266}
267
268static int x11_set_display_title(caca_display_t *dp, char const *title)
269{
270    XStoreName(dp->drv.p->dpy, dp->drv.p->window, title);
271    return 0;
272}
273
274static unsigned int x11_get_display_width(caca_display_t *dp)
275{
276    return dp->cv->width * dp->drv.p->font_width;
277}
278
279static unsigned int x11_get_display_height(caca_display_t *dp)
280{
281    return dp->cv->height * dp->drv.p->font_height;
282}
283
284static void x11_display(caca_display_t *dp)
285{
286    unsigned int x, y, len;
287
288    /* First draw the background colours. Splitting the process in two
289     * loops like this is actually slightly faster. */
290    for(y = 0; y < dp->cv->height; y++)
291    {
292        for(x = 0; x < dp->cv->width; x += len)
293        {
294            uint32_t *attrs = dp->cv->attrs + x + y * dp->cv->width;
295            uint16_t bg = _cucul_attr_to_rgb12bg(*attrs);
296
297            len = 1;
298            while(x + len < dp->cv->width
299                   && _cucul_attr_to_rgb12bg(attrs[len]) == bg)
300                len++;
301
302            XSetForeground(dp->drv.p->dpy, dp->drv.p->gc,
303                           dp->drv.p->colors[bg]);
304            XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap, dp->drv.p->gc,
305                           x * dp->drv.p->font_width,
306                           y * dp->drv.p->font_height,
307                           len * dp->drv.p->font_width,
308                           dp->drv.p->font_height);
309        }
310    }
311
312    /* Then print the foreground characters */
313    for(y = 0; y < dp->cv->height; y++)
314    {
315        unsigned int yoff = (y + 1) * dp->drv.p->font_height
316                                    - dp->drv.p->font_offset;
317        uint32_t *chars = dp->cv->chars + y * dp->cv->width;
318        uint32_t *attrs = dp->cv->attrs + y * dp->cv->width;
319
320        for(x = 0; x < dp->cv->width; x++, chars++, attrs++)
321        {
322            XSetForeground(dp->drv.p->dpy, dp->drv.p->gc,
323                           dp->drv.p->colors[_cucul_attr_to_rgb12fg(*attrs)]);
324
325            x11_put_glyph(dp, x * dp->drv.p->font_width,
326                          y * dp->drv.p->font_height, yoff,
327                          dp->drv.p->font_width, dp->drv.p->font_height,
328                          *attrs, *chars);
329        }
330    }
331
332    XCopyArea(dp->drv.p->dpy, dp->drv.p->pixmap, dp->drv.p->window,
333              dp->drv.p->gc, 0, 0,
334              dp->cv->width * dp->drv.p->font_width,
335              dp->cv->height * dp->drv.p->font_height,
336              0, 0);
337    XFlush(dp->drv.p->dpy);
338}
339
340static void x11_handle_resize(caca_display_t *dp)
341{
342    Pixmap new_pixmap;
343
344    new_pixmap = XCreatePixmap(dp->drv.p->dpy, dp->drv.p->window,
345                               dp->resize.w * dp->drv.p->font_width,
346                               dp->resize.h * dp->drv.p->font_height,
347                               DefaultDepth(dp->drv.p->dpy,
348                                            DefaultScreen(dp->drv.p->dpy)));
349    XCopyArea(dp->drv.p->dpy, dp->drv.p->pixmap, new_pixmap,
350              dp->drv.p->gc, 0, 0,
351              dp->resize.w * dp->drv.p->font_width,
352              dp->resize.h * dp->drv.p->font_height, 0, 0);
353    XFreePixmap(dp->drv.p->dpy, dp->drv.p->pixmap);
354    dp->drv.p->pixmap = new_pixmap;
355}
356
357static int x11_get_event(caca_display_t *dp, caca_event_t *ev)
358{
359    XEvent xevent;
360    char key;
361
362    while(XCheckWindowEvent(dp->drv.p->dpy, dp->drv.p->window,
363                            dp->drv.p->event_mask, &xevent) == True)
364    {
365        KeySym keysym;
366
367        /* Expose event */
368        if(xevent.type == Expose)
369        {
370            XCopyArea(dp->drv.p->dpy, dp->drv.p->pixmap,
371                      dp->drv.p->window, dp->drv.p->gc, 0, 0,
372                      dp->cv->width * dp->drv.p->font_width,
373                      dp->cv->height * dp->drv.p->font_height, 0, 0);
374            continue;
375        }
376
377        /* Resize event */
378        if(xevent.type == ConfigureNotify)
379        {
380            unsigned int w, h;
381
382            w = (xevent.xconfigure.width + dp->drv.p->font_width / 3)
383                  / dp->drv.p->font_width;
384            h = (xevent.xconfigure.height + dp->drv.p->font_height / 3)
385                  / dp->drv.p->font_height;
386
387            if(!w || !h || (w == dp->cv->width && h == dp->cv->height))
388                continue;
389
390            dp->resize.w = w;
391            dp->resize.h = h;
392            dp->resize.resized = 1;
393
394            continue;
395        }
396
397        /* Check for mouse motion events */
398        if(xevent.type == MotionNotify)
399        {
400            unsigned int newx = xevent.xmotion.x / dp->drv.p->font_width;
401            unsigned int newy = xevent.xmotion.y / dp->drv.p->font_height;
402
403            if(newx >= dp->cv->width)
404                newx = dp->cv->width - 1;
405            if(newy >= dp->cv->height)
406                newy = dp->cv->height - 1;
407
408            if(dp->mouse.x == newx && dp->mouse.y == newy)
409                continue;
410
411            dp->mouse.x = newx;
412            dp->mouse.y = newy;
413
414            ev->type = CACA_EVENT_MOUSE_MOTION;
415            ev->data.mouse.x = dp->mouse.x;
416            ev->data.mouse.y = dp->mouse.y;
417            return 1;
418        }
419
420        /* Check for mouse press and release events */
421        if(xevent.type == ButtonPress)
422        {
423            ev->type = CACA_EVENT_MOUSE_PRESS;
424            ev->data.mouse.button = ((XButtonEvent *)&xevent)->button;
425            return 1;
426        }
427
428        if(xevent.type == ButtonRelease)
429        {
430            ev->type = CACA_EVENT_MOUSE_RELEASE;
431            ev->data.mouse.button = ((XButtonEvent *)&xevent)->button;
432            return 1;
433        }
434
435        /* Check for key press and release events */
436        if(xevent.type == KeyPress)
437            ev->type = CACA_EVENT_KEY_PRESS;
438        else if(xevent.type == KeyRelease)
439            ev->type = CACA_EVENT_KEY_RELEASE;
440        else
441            continue;
442
443        if(XLookupString(&xevent.xkey, &key, 1, NULL, NULL))
444        {
445            ev->data.key.ch = key;
446            ev->data.key.utf32 = key;
447            ev->data.key.utf8[0] = key;
448            ev->data.key.utf8[1] = '\0';
449            return 1;
450        }
451
452        keysym = XKeycodeToKeysym(dp->drv.p->dpy, xevent.xkey.keycode, 0);
453        switch(keysym)
454        {
455            case XK_F1:    ev->data.key.ch = CACA_KEY_F1;    break;
456            case XK_F2:    ev->data.key.ch = CACA_KEY_F2;    break;
457            case XK_F3:    ev->data.key.ch = CACA_KEY_F3;    break;
458            case XK_F4:    ev->data.key.ch = CACA_KEY_F4;    break;
459            case XK_F5:    ev->data.key.ch = CACA_KEY_F5;    break;
460            case XK_F6:    ev->data.key.ch = CACA_KEY_F6;    break;
461            case XK_F7:    ev->data.key.ch = CACA_KEY_F7;    break;
462            case XK_F8:    ev->data.key.ch = CACA_KEY_F8;    break;
463            case XK_F9:    ev->data.key.ch = CACA_KEY_F9;    break;
464            case XK_F10:   ev->data.key.ch = CACA_KEY_F10;   break;
465            case XK_F11:   ev->data.key.ch = CACA_KEY_F11;   break;
466            case XK_F12:   ev->data.key.ch = CACA_KEY_F12;   break;
467            case XK_F13:   ev->data.key.ch = CACA_KEY_F13;   break;
468            case XK_F14:   ev->data.key.ch = CACA_KEY_F14;   break;
469            case XK_F15:   ev->data.key.ch = CACA_KEY_F15;   break;
470            case XK_Left:  ev->data.key.ch = CACA_KEY_LEFT;  break;
471            case XK_Right: ev->data.key.ch = CACA_KEY_RIGHT; break;
472            case XK_Up:    ev->data.key.ch = CACA_KEY_UP;    break;
473            case XK_Down:  ev->data.key.ch = CACA_KEY_DOWN;  break;
474            case XK_KP_Page_Up:
475            case XK_Page_Up:      ev->data.key.ch = CACA_KEY_PAGEUP;   break;
476            case XK_KP_Page_Down:
477            case XK_Page_Down:    ev->data.key.ch = CACA_KEY_PAGEDOWN; break;
478            case XK_KP_Home:
479            case XK_Home:         ev->data.key.ch = CACA_KEY_HOME;     break;
480            case XK_KP_End:
481            case XK_End:          ev->data.key.ch = CACA_KEY_END;      break;
482
483            default: ev->type = CACA_EVENT_NONE; return 0;
484        }
485
486        ev->data.key.utf32 = 0;
487        ev->data.key.utf8[0] = '\0';
488        return 1;
489    }
490
491    while(XCheckTypedEvent(dp->drv.p->dpy, ClientMessage, &xevent))
492    {
493        if(xevent.xclient.message_type != dp->drv.p->wm_protocols)
494            continue;
495
496        if((Atom)xevent.xclient.data.l[0] == dp->drv.p->wm_delete_window)
497        {
498            ev->type = CACA_EVENT_QUIT;
499            return 1;
500        }
501    }
502
503    ev->type = CACA_EVENT_NONE;
504    return 0;
505}
506
507static void x11_set_mouse(caca_display_t *dp, int flags)
508{
509    Cursor no_ptr;
510    Pixmap bm_no;
511    XColor black, dummy;
512    Colormap colormap;
513    static char const empty[] = { 0, 0, 0, 0, 0, 0, 0, 0 };
514
515    if(flags)
516    {
517        XDefineCursor(dp->drv.p->dpy,dp->drv.p->window, 0);
518        return;
519    }
520
521    colormap = DefaultColormap(dp->drv.p->dpy, DefaultScreen(dp->drv.p->dpy));
522    if(!XAllocNamedColor(dp->drv.p->dpy, colormap, "black", &black, &dummy))
523    {
524        return;
525    }
526    bm_no = XCreateBitmapFromData(dp->drv.p->dpy, dp->drv.p->window,
527                                  empty, 8, 8);
528    no_ptr = XCreatePixmapCursor(dp->drv.p->dpy, bm_no, bm_no,
529                                 &black, &black, 0, 0);
530    XDefineCursor(dp->drv.p->dpy, dp->drv.p->window, no_ptr);
531    XFreeCursor(dp->drv.p->dpy, no_ptr);
532    if(bm_no != None)
533        XFreePixmap(dp->drv.p->dpy, bm_no);
534    XFreeColors(dp->drv.p->dpy, colormap, &black.pixel, 1, 0);
535
536    XSync(dp->drv.p->dpy, False);
537}
538
539/*
540 * XXX: following functions are local
541 */
542
543static int x11_error_handler(Display *dpy, XErrorEvent *xevent)
544{
545    /* Ignore the error */
546    return 0;
547}
548
549static void x11_put_glyph(caca_display_t *dp, int x, int y, int yoff,
550                          int w, int h, uint32_t attr, uint32_t ch)
551{
552    static uint8_t const udlr[] =
553    {
554        /* 0x2500 - 0x250f: ─ . │ . . . . . . . . . ┌ . . . */
555        0x05, 0x00, 0x50, 0x00, 0x00, 0x00, 0x00, 0x00,
556        0x00, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00,
557        /* 0x2510 - 0x251f: ┐ . . . └ . . . ┘ . . . ├ . . . */
558        0x14, 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00,
559        0x44, 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00,
560        /* 0x2520 - 0x252f: . . . . ┤ . . . . . . . ┬ . . . */
561        0x00, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00,
562        0x00, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00,
563        /* 0x2530 - 0x253f: . . . . ┴ . . . . . . . ┼ . . . */
564        0x00, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00,
565        0x00, 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00,
566        /* 0x2540 - 0x254f: . . . . . . . . . . . . . . . . */
567        0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
568        0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
569        /* 0x2550 - 0x255f: ═ ║ ╒ ╓ ╔ ╕ ╖ ╗ ╘ ╙ ╚ ╛ ╜ ╝ ╞ ╟ */
570        0x0a, 0xa0, 0x12, 0x21, 0x22, 0x18, 0x24, 0x28,
571        0x42, 0x81, 0x82, 0x48, 0x84, 0x88, 0x52, 0xa1,
572        /* 0x2560 - 0x256c: ╠ ╡ ╢ ╣ ╤ ╥ ╦ ╧ ╨ ╩ ╪ ╫ ╬ */
573        0xa2, 0x58, 0xa4, 0xa8, 0x1a, 0x25, 0x2a, 0x4a,
574        0x85, 0x8a, 0x5a, 0xa5, 0xaa,
575    };
576
577    Display *dpy = dp->drv.p->dpy;
578    Pixmap px = dp->drv.p->pixmap;
579    GC gc = dp->drv.p->gc;
580    int fw;
581    XChar2b ch16;
582
583    /* Underline */
584    if(attr & CUCUL_UNDERLINE)
585        XFillRectangle(dpy, px, gc, x, y + h - 1, w, 1);
586
587    /* Skip spaces and magic stuff */
588    if(ch <= 0x00000020)
589        return;
590
591    if(ch == CUCUL_MAGIC_FULLWIDTH)
592        return;
593
594    fw = w;
595    if(cucul_utf32_is_fullwidth(ch))
596        fw *= 2;
597
598    /* We want to be able to print a few special Unicode characters
599     * such as the CP437 gradients and half blocks. For unknown
600     * characters, print what cucul_utf32_to_ascii() returns. */
601
602    if(ch >= 0x2500 && ch <= 0x256c && udlr[ch - 0x2500])
603    {
604        uint16_t D = udlr[ch - 0x2500];
605
606        if(D & 0x04)
607            XFillRectangle(dpy, px, gc, x, y + h / 2, fw / 2 + 1, 1);
608
609        if(D & 0x01)
610            XFillRectangle(dpy, px, gc,
611                           x + fw / 2, y + h / 2, (fw + 1) / 2, 1);
612
613        if(D & 0x40)
614            XFillRectangle(dpy, px, gc, x + fw / 2, y, 1, h / 2 + 1);
615
616        if(D & 0x10)
617            XFillRectangle(dpy, px, gc, x + fw / 2, y + h / 2, 1, (h + 1) / 2);
618
619#define STEPIF(a,b) (D&(a)?-1:(D&(b))?1:0)
620
621        if(D & 0x08)
622        {
623            XFillRectangle(dpy, px, gc, x, y - 1 + h / 2,
624                           fw / 2 + 1 + STEPIF(0xc0,0x20), 1);
625            XFillRectangle(dpy, px, gc, x, y + 1 + h / 2,
626                           fw / 2 + 1 + STEPIF(0x30,0x80), 1);
627        }
628
629        if(D & 0x02)
630        {
631            XFillRectangle(dpy, px, gc, x - STEPIF(0xc0,0x20) + fw / 2,
632                           y - 1 + h / 2, (fw + 1) / 2 + STEPIF(0xc0,0x20), 1);
633            XFillRectangle(dpy, px, gc, x - STEPIF(0x30,0x80) + fw / 2,
634                           y + 1 + h / 2, (fw + 1) / 2 + STEPIF(0x30,0x80), 1);
635        }
636
637        if(D & 0x80)
638        {
639            XFillRectangle(dpy, px, gc, x - 1 + fw / 2, y,
640                           1, h / 2 + 1 + STEPIF(0x0c,0x02));
641            XFillRectangle(dpy, px, gc, x + 1 + fw / 2, y,
642                           1, h / 2 + 1 + STEPIF(0x03,0x08));
643        }
644
645        if(D & 0x20)
646        {
647            XFillRectangle(dpy, px, gc, x - 1 + fw / 2,
648                           y - STEPIF(0x0c,0x02) + h / 2,
649                           1, (h + 1) / 2 + STEPIF(0x0c,0x02));
650            XFillRectangle(dpy, px, gc, x + 1 + fw / 2,
651                           y - STEPIF(0x03,0x08) + h / 2,
652                           1, (h + 1) / 2 + STEPIF(0x03,0x08));
653        }
654
655        return;
656    }
657
658    switch(ch)
659    {
660        case 0x000000b7: /* · */
661        case 0x00002219: /* ∙ */
662        case 0x000030fb: /* ・ */
663            XFillRectangle(dpy, px, gc, x + fw / 2 - 1, y + h / 2 - 1, 2, 2);
664            return;
665
666        case 0x00002261: /* ≡ */
667            XFillRectangle(dpy, px, gc, x + 1, y - 2 + h / 2, fw - 1, 1);
668            XFillRectangle(dpy, px, gc, x + 1, y + h / 2, fw - 1, 1);
669            XFillRectangle(dpy, px, gc, x + 1, y + 2 + h / 2, fw - 1, 1);
670            return;
671
672        case 0x00002580: /* ▀ */
673            XFillRectangle(dpy, px, gc, x, y, fw, h / 2);
674            return;
675
676        case 0x00002584: /* ▄ */
677            XFillRectangle(dpy, px, gc, x, y + h - h / 2, fw, h / 2);
678            return;
679
680        case 0x00002588: /* █ */
681        case 0x000025ae: /* ▮ */
682            XFillRectangle(dpy, px, gc, x, y, fw, h);
683            return;
684
685        case 0x0000258c: /* ▌ */
686            XFillRectangle(dpy, px, gc, x, y, fw / 2, h);
687            return;
688
689        case 0x00002590: /* ▐ */
690            XFillRectangle(dpy, px, gc, x + fw - fw / 2, y, fw / 2, h);
691            return;
692
693        case 0x000025a0: /* ■ */
694        case 0x000025ac: /* ▬ */
695            XFillRectangle(dpy, px, gc, x, y + h / 4, fw, h / 2);
696            return;
697
698        case 0x00002593: /* ▓ */
699        case 0x00002592: /* ▒ */
700        case 0x00002591: /* ░ */
701        {
702            /* FIXME: this sucks utterly */
703            int i, j, k = ch - 0x00002591;
704            for(j = h; j--; )
705                for(i = fw; i--; )
706            {
707                if(((i + 2 * (j & 1)) & 3) > k)
708                    continue;
709
710                XDrawPoint(dpy, px, gc, x + i, y + j);
711            }
712            return;
713        }
714
715        case 0x000025cb: /* ○ */
716        case 0x00002022: /* • */
717        case 0x000025cf: /* ● */
718        {
719            int d, xo, yo;
720
721            d = fw;
722            if(h < fw)
723                d = h;
724            if(d < 1)
725                d = 1;
726            xo = (fw - d) / 2;
727            yo = (h - d) / 2;
728            if(ch == 0x000025cb)
729                XDrawArc(dpy, px, gc, x + xo, y + yo, d, d, 0, 64 * 360);
730            else
731                XFillArc(dpy, px, gc, x + xo, y + yo, d, d, 0, 64 * 360);
732            return;
733        }
734    }
735
736    if(ch >= 0x00000020 && ch <= dp->drv.p->max_char)
737    {
738        /* ascii, latin-1 or unicode font (might draw a blank square) */
739        ch16.byte1 = (ch) >> 8;
740        ch16.byte2 = (ch) & 0xff;
741    }
742    else
743    {
744        ch16.byte1 = 0;
745        ch16.byte2 = cucul_utf32_to_ascii(ch);
746    }
747
748    XDrawString16(dpy, px, gc, x + (ch16.byte1 ? 0 : (fw - w) / 2), yoff, &ch16, 1);
749}
750
751/*
752 * Driver initialisation
753 */
754
755int x11_install(caca_display_t *dp)
756{
757#if defined(HAVE_GETENV)
758    if(!getenv("DISPLAY") || !*(getenv("DISPLAY")))
759        return -1;
760#endif
761
762    dp->drv.driver = CACA_DRIVER_X11;
763
764    dp->drv.init_graphics = x11_init_graphics;
765    dp->drv.end_graphics = x11_end_graphics;
766    dp->drv.set_display_title = x11_set_display_title;
767    dp->drv.get_display_width = x11_get_display_width;
768    dp->drv.get_display_height = x11_get_display_height;
769    dp->drv.display = x11_display;
770    dp->drv.handle_resize = x11_handle_resize;
771    dp->drv.get_event = x11_get_event;
772    dp->drv.set_mouse = x11_set_mouse;
773    dp->drv.set_cursor = NULL;
774
775    return 0;
776}
777
778#endif /* USE_X11 */
779
Note: See TracBrowser for help on using the repository browser.