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

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