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

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