cacalabs
/
libcaca
mirror of https://github.com/cacalabs/libcaca.git
1
0
Fork 0
Code Issues 0 Releases 7 Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1064 Commits
1 Branch
84 MiB
 
 
 
 
 
 
Tree: c9570afbbe
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'c9570afbbe'
${ noResults }
libcaca/caca/driver_x11.c

654 lines
22 KiB
Raw Blame History 

  1. /*

  2.  *  libcaca       Colour ASCII-Art library

  3.  *  Copyright (c) 2002-2006 Sam Hocevar <sam@zoy.org>

  4.  *                All Rights Reserved

  5.  *

  6.  *  $Id$

  7.  *

  8.  *  This library is free software. It comes without any warranty, to

  9.  *  the extent permitted by applicable law. You can redistribute it

  10.  *  and/or modify it under the terms of the Do What The Fuck You Want

  11.  *  To Public License, Version 2, as published by Sam Hocevar. See

  12.  *  http://sam.zoy.org/wtfpl/COPYING for more details.

  13.  */

  14. 

  15. /*

  16.  *  This file contains the libcaca X11 input and output driver

  17.  */

  18. 

  19. #include "config.h"

  20. #include "common.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.  */

  42. static int x11_error_handler(Display *, XErrorEvent *);

  43. 

  44. struct 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.     int colors[4096];

  53.     Font font;

  54.     XFontStruct *font_struct;

  55.     int font_offset;

  56.     Cursor pointer;

  57.     Atom wm_protocols;

  58.     Atom wm_delete_window;

  59. #if defined(HAVE_X11_XKBLIB_H)

  60.     Bool autorepeat;

  61. #endif

  62. };

  63. 

  64. static int x11_init_graphics(caca_display_t *dp)

  65. {

  66.     Colormap colormap;

  67.     XSetWindowAttributes x11_winattr;

  68.     int (*old_error_handler)(Display *, XErrorEvent *);

  69.     char const *fonts[] = { NULL, "8x13bold", "fixed" }, **parser;

  70.     char const *geometry;

  71.     unsigned int width = dp->cv->width, height = dp->cv->height;

  72.     int i;

  73. 

  74.     dp->drv.p = malloc(sizeof(struct driver_private));

  75. 

  76. #if defined(HAVE_GETENV)

  77.     geometry = getenv("CACA_GEOMETRY");

  78.     if(geometry && *geometry)

  79.         sscanf(geometry, "%ux%u", &width, &height);

  80. #endif

  81. 

  82.     _cucul_set_canvas_size(dp->cv, width ? width : 80, height ? height : 32);

  83. 

  84.     dp->drv.p->dpy = XOpenDisplay(NULL);

  85.     if(dp->drv.p->dpy == NULL)

  86.         return -1;

  87. 

  88. #if defined(HAVE_GETENV)

  89.     fonts[0] = getenv("CACA_FONT");

  90.     if(fonts[0] && *fonts[0])

  91.         parser = fonts;

  92.     else

  93. #endif

  94.         parser = fonts + 1;

  95. 

  96.     /* Ignore font errors */

  97.     old_error_handler = XSetErrorHandler(x11_error_handler);

  98. 

  99.     /* Parse our font list */

  100.     for( ; ; parser++)

  101.     {

  102.         if(!*parser)

  103.         {

  104.             XSetErrorHandler(old_error_handler);

  105.             XCloseDisplay(dp->drv.p->dpy);

  106.             return -1;

  107.         }

  108. 

  109.         dp->drv.p->font = XLoadFont(dp->drv.p->dpy, *parser);

  110.         if(!dp->drv.p->font)

  111.             continue;

  112. 

  113.         dp->drv.p->font_struct = XQueryFont(dp->drv.p->dpy, dp->drv.p->font);

  114.         if(!dp->drv.p->font_struct)

  115.         {

  116.             XUnloadFont(dp->drv.p->dpy, dp->drv.p->font);

  117.             continue;

  118.         }

  119. 

  120.         break;

  121.     }

  122. 

  123.     /* Reset the default X11 error handler */

  124.     XSetErrorHandler(old_error_handler);

  125. 

  126.     dp->drv.p->font_width = dp->drv.p->font_struct->max_bounds.width;

  127.     dp->drv.p->font_height = dp->drv.p->font_struct->max_bounds.ascent

  128.                          + dp->drv.p->font_struct->max_bounds.descent;

  129.     dp->drv.p->font_offset = dp->drv.p->font_struct->max_bounds.descent;

  130. 

  131.     colormap = DefaultColormap(dp->drv.p->dpy, DefaultScreen(dp->drv.p->dpy));

  132.     for(i = 0x000; i < 0x1000; i++)

  133.     {

  134.         XColor color;

  135.         color.red = ((i & 0xf00) >> 8) * 0x1111;

  136.         color.green = ((i & 0x0f0) >> 4) * 0x1111;

  137.         color.blue = (i & 0x00f) * 0x1111;

  138.         XAllocColor(dp->drv.p->dpy, colormap, &color);

  139.         dp->drv.p->colors[i] = color.pixel;

  140.     }

  141. 

  142.     x11_winattr.backing_store = Always;

  143.     x11_winattr.background_pixel = dp->drv.p->colors[0x000];

  144.     x11_winattr.event_mask = ExposureMask | StructureNotifyMask;

  145. 

  146.     dp->drv.p->window =

  147.         XCreateWindow(dp->drv.p->dpy, DefaultRootWindow(dp->drv.p->dpy), 0, 0,

  148.                       dp->cv->width * dp->drv.p->font_width,

  149.                       dp->cv->height * dp->drv.p->font_height,

  150.                       0, 0, InputOutput, 0,

  151.                       CWBackingStore | CWBackPixel | CWEventMask,

  152.                       &x11_winattr);

  153. 

  154.     dp->drv.p->wm_protocols =

  155.         XInternAtom(dp->drv.p->dpy, "WM_PROTOCOLS", True);

  156.     dp->drv.p->wm_delete_window =

  157.         XInternAtom(dp->drv.p->dpy, "WM_DELETE_WINDOW", True);

  158. 

  159.     if(dp->drv.p->wm_protocols != None && dp->drv.p->wm_delete_window != None)

  160.         XSetWMProtocols(dp->drv.p->dpy, dp->drv.p->window,

  161.                         &dp->drv.p->wm_delete_window, 1);

  162. 

  163.     XStoreName(dp->drv.p->dpy, dp->drv.p->window, "caca for X");

  164. 

  165.     XSelectInput(dp->drv.p->dpy, dp->drv.p->window, StructureNotifyMask);

  166.     XMapWindow(dp->drv.p->dpy, dp->drv.p->window);

  167. 

  168.     dp->drv.p->gc = XCreateGC(dp->drv.p->dpy, dp->drv.p->window, 0, NULL);

  169.     XSetForeground(dp->drv.p->dpy, dp->drv.p->gc, dp->drv.p->colors[0x888]);

  170.     XSetFont(dp->drv.p->dpy, dp->drv.p->gc, dp->drv.p->font);

  171. 

  172.     for(;;)

  173.     {

  174.         XEvent xevent;

  175.         XNextEvent(dp->drv.p->dpy, &xevent);

  176.         if (xevent.type == MapNotify)

  177.             break;

  178.     }

  179. 

  180. #if defined(HAVE_X11_XKBLIB_H)

  181.     /* Disable autorepeat */

  182.     XkbSetDetectableAutoRepeat(dp->drv.p->dpy, True, &dp->drv.p->autorepeat);

  183.     if(!dp->drv.p->autorepeat)

  184.         XAutoRepeatOff(dp->drv.p->dpy);

  185. #endif

  186. 

  187.     dp->drv.p->event_mask = KeyPressMask | KeyReleaseMask | ButtonPressMask

  188.           | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask

  189.           | ExposureMask;

  190. 

  191.     XSelectInput(dp->drv.p->dpy, dp->drv.p->window, dp->drv.p->event_mask);

  192. 

  193.     XSync(dp->drv.p->dpy, False);

  194. 

  195.     dp->drv.p->pixmap = XCreatePixmap(dp->drv.p->dpy, dp->drv.p->window,

  196.                                    dp->cv->width * dp->drv.p->font_width,

  197.                                    dp->cv->height * dp->drv.p->font_height,

  198.                                    DefaultDepth(dp->drv.p->dpy,

  199.                                             DefaultScreen(dp->drv.p->dpy)));

  200.     dp->drv.p->pointer = None;

  201. 

  202.     return 0;

  203. }

  204. 

  205. static int x11_end_graphics(caca_display_t *dp)

  206. {

  207.     XSync(dp->drv.p->dpy, False);

  208. #if defined(HAVE_X11_XKBLIB_H)

  209.     if(!dp->drv.p->autorepeat)

  210.         XAutoRepeatOn(dp->drv.p->dpy);

  211. #endif

  212.     XFreePixmap(dp->drv.p->dpy, dp->drv.p->pixmap);

  213.     XFreeFont(dp->drv.p->dpy, dp->drv.p->font_struct);

  214.     XFreeGC(dp->drv.p->dpy, dp->drv.p->gc);

  215.     XUnmapWindow(dp->drv.p->dpy, dp->drv.p->window);

  216.     XDestroyWindow(dp->drv.p->dpy, dp->drv.p->window);

  217.     XCloseDisplay(dp->drv.p->dpy);

  218. 

  219.     free(dp->drv.p);

  220. 

  221.     return 0;

  222. }

  223. 

  224. static int x11_set_display_title(caca_display_t *dp, char const *title)

  225. {

  226.     XStoreName(dp->drv.p->dpy, dp->drv.p->window, title);

  227.     return 0;

  228. }

  229. 

  230. static unsigned int x11_get_display_width(caca_display_t *dp)

  231. {

  232.     return dp->cv->width * dp->drv.p->font_width;

  233. }

  234. 

  235. static unsigned int x11_get_display_height(caca_display_t *dp)

  236. {

  237.     return dp->cv->height * dp->drv.p->font_height;

  238. }

  239. 

  240. static void x11_display(caca_display_t *dp)

  241. {

  242.     unsigned int x, y, len;

  243. 

  244.     /* First draw the background colours. Splitting the process in two

  245.      * loops like this is actually slightly faster. */

  246.     for(y = 0; y < dp->cv->height; y++)

  247.     {

  248.         for(x = 0; x < dp->cv->width; x += len)

  249.         {

  250.             uint32_t *attrs = dp->cv->attrs + x + y * dp->cv->width;

  251.             uint16_t bg = _cucul_attr_to_rgb12bg(*attrs);

  252. 

  253.             len = 1;

  254.             while(x + len < dp->cv->width

  255.                    && _cucul_attr_to_rgb12bg(attrs[len]) == bg)

  256.                 len++;

  257. 

  258.             XSetForeground(dp->drv.p->dpy, dp->drv.p->gc,

  259.                            dp->drv.p->colors[bg]);

  260.             XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap, dp->drv.p->gc,

  261.                            x * dp->drv.p->font_width, y * dp->drv.p->font_height,

  262.                            len * dp->drv.p->font_width, dp->drv.p->font_height);

  263.         }

  264.     }

  265. 

  266.     /* Then print the foreground characters */

  267.     for(y = 0; y < dp->cv->height; y++)

  268.     {

  269.         unsigned int yoff = (y + 1) * dp->drv.p->font_height

  270.                                     - dp->drv.p->font_offset;

  271.         uint32_t *chars = dp->cv->chars + y * dp->cv->width;

  272. 

  273.         for(x = 0; x < dp->cv->width; x++, chars++)

  274.         {

  275.             uint32_t *attrs = dp->cv->attrs + x + y * dp->cv->width;

  276. 

  277.             /* Underline */

  278.             if(*attrs & CUCUL_UNDERLINE)

  279.                 XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap,

  280.                                    dp->drv.p->gc,

  281.                                    x * dp->drv.p->font_width,

  282.                                    (y + 1) * dp->drv.p->font_height - 1,

  283.                                    dp->drv.p->font_width, 1);

  284. 

  285.             /* Skip spaces */

  286.             if(*chars <= 0x00000020)

  287.                 continue;

  288. 

  289.             if(*chars == CUCUL_MAGIC_FULLWIDTH)

  290.                 continue;

  291. 

  292.             XSetForeground(dp->drv.p->dpy, dp->drv.p->gc,

  293.                            dp->drv.p->colors[_cucul_attr_to_rgb12fg(*attrs)]);

  294. 

  295.             /* Plain ASCII, no problem. */

  296.             if(*chars > 0x00000020 && *chars < 0x00000080)

  297.             {

  298.                 char ch = (uint8_t)*chars;

  299.                 XDrawString(dp->drv.p->dpy, dp->drv.p->pixmap, dp->drv.p->gc,

  300.                             x * dp->drv.p->font_width, yoff, &ch, 1);

  301.                 continue;

  302.             }

  303. 

  304.             /* We want to be able to print a few special Unicode characters

  305.              * such as the CP437 gradients and half blocks. For unknown

  306.              * characters, just print '?'. */

  307.             switch(*chars)

  308.             {

  309.                 case 0x000000b7: /* · */

  310.                     XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap,

  311.                                    dp->drv.p->gc,

  312.                                    x * dp->drv.p->font_width

  313.                                      + dp->drv.p->font_width / 2,

  314.                                    y * dp->drv.p->font_height

  315.                                      + dp->drv.p->font_height / 2, 2, 2);

  316.                     break;

  317.                 case 0x00002500: /* ─ */

  318.                     XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap,

  319.                                    dp->drv.p->gc,

  320.                                    x * dp->drv.p->font_width,

  321.                                    y * dp->drv.p->font_height

  322.                                      + dp->drv.p->font_height / 2 + 1,

  323.                                    dp->drv.p->font_width, 1);

  324.                     break;

  325.                 case 0x00002580: /* ▀ */

  326.                     XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap,

  327.                                    dp->drv.p->gc,

  328.                                    x * dp->drv.p->font_width,

  329.                                    y * dp->drv.p->font_height,

  330.                                    dp->drv.p->font_width,

  331.                                    dp->drv.p->font_height / 2);

  332.                     break;

  333.                 case 0x00002584: /* ▄ */

  334.                     XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap,

  335.                                    dp->drv.p->gc,

  336.                                    x * dp->drv.p->font_width,

  337.                                    (y + 1) * dp->drv.p->font_height

  338.                                            - dp->drv.p->font_height / 2,

  339.                                    dp->drv.p->font_width,

  340.                                    dp->drv.p->font_height / 2);

  341.                     break;

  342.                 case 0x00002588: /* █ */

  343.                     XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap,

  344.                                    dp->drv.p->gc,

  345.                                    x * dp->drv.p->font_width,

  346.                                    y * dp->drv.p->font_height,

  347.                                    dp->drv.p->font_width,

  348.                                    dp->drv.p->font_height);

  349.                     break;

  350.                 case 0x0000258c: /* ▌ */

  351.                     XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap,

  352.                                    dp->drv.p->gc,

  353.                                    x * dp->drv.p->font_width,

  354.                                    y * dp->drv.p->font_height,

  355.                                    dp->drv.p->font_width / 2,

  356.                                    dp->drv.p->font_height);

  357.                     break;

  358.                 case 0x00002590: /* ▐ */

  359.                     XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap,

  360.                                    dp->drv.p->gc,

  361.                                    (x + 1) * dp->drv.p->font_width

  362.                                            - dp->drv.p->font_width / 2,

  363.                                    y * dp->drv.p->font_height,

  364.                                    dp->drv.p->font_width / 2,

  365.                                    dp->drv.p->font_height);

  366.                     break;

  367.                 case 0x000025a0: /* ■ */

  368.                     XFillRectangle(dp->drv.p->dpy, dp->drv.p->pixmap,

  369.                                    dp->drv.p->gc,

  370.                                    x * dp->drv.p->font_width,

  371.                                    y * dp->drv.p->font_height

  372.                                      + dp->drv.p->font_height / 4,

  373.                                    dp->drv.p->font_width,

  374.                                    dp->drv.p->font_height / 2);

  375.                     break;

  376.                 case 0x00002593: /* ▓ */

  377.                 case 0x00002592: /* ▒ */

  378.                 case 0x00002591: /* ░ */

  379.                 {

  380.                     /* FIXME: this sucks utterly */

  381.                     int i, j, k = *chars - 0x00002591;

  382.                     for(j = dp->drv.p->font_height; j--; )

  383.                         for(i = dp->drv.p->font_width; i--; )

  384.                     {

  385.                         if(((i + 2 * (j & 1)) & 3) > k)

  386.                             continue;

  387. 

  388.                         XDrawPoint(dp->drv.p->dpy, dp->drv.p->pixmap,

  389.                                    dp->drv.p->gc,

  390.                                    x * dp->drv.p->font_width + i,

  391.                                    y * dp->drv.p->font_height + j);

  392.                     }

  393.                     break;

  394.                 }

  395.                 default:

  396.                 {

  397.                     char ch;

  398.                     ch = '?';

  399.                     XDrawString(dp->drv.p->dpy, dp->drv.p->pixmap,

  400.                                 dp->drv.p->gc,

  401.                                 x * dp->drv.p->font_width, yoff, &ch, 1);

  402.                     break;

  403.                 }

  404.             }

  405.         }

  406.     }

  407. 

  408.     XCopyArea(dp->drv.p->dpy, dp->drv.p->pixmap, dp->drv.p->window,

  409.               dp->drv.p->gc, 0, 0,

  410.               dp->cv->width * dp->drv.p->font_width,

  411.               dp->cv->height * dp->drv.p->font_height,

  412.               0, 0);

  413.     XFlush(dp->drv.p->dpy);

  414. }

  415. 

  416. static void x11_handle_resize(caca_display_t *dp)

  417. {

  418.     Pixmap new_pixmap;

  419. 

  420.     new_pixmap = XCreatePixmap(dp->drv.p->dpy, dp->drv.p->window,

  421.                                dp->resize.w * dp->drv.p->font_width,

  422.                                dp->resize.h * dp->drv.p->font_height,

  423.                                DefaultDepth(dp->drv.p->dpy,

  424.                                             DefaultScreen(dp->drv.p->dpy)));

  425.     XCopyArea(dp->drv.p->dpy, dp->drv.p->pixmap, new_pixmap,

  426.               dp->drv.p->gc, 0, 0,

  427.               dp->resize.w * dp->drv.p->font_width,

  428.               dp->resize.h * dp->drv.p->font_height, 0, 0);

  429.     XFreePixmap(dp->drv.p->dpy, dp->drv.p->pixmap);

  430.     dp->drv.p->pixmap = new_pixmap;

  431. }

  432. 

  433. static int x11_get_event(caca_display_t *dp, caca_event_t *ev)

  434. {

  435.     XEvent xevent;

  436.     char key;

  437. 

  438.     while(XCheckWindowEvent(dp->drv.p->dpy, dp->drv.p->window,

  439.                             dp->drv.p->event_mask, &xevent) == True)

  440.     {

  441.         KeySym keysym;

  442. 

  443.         /* Expose event */

  444.         if(xevent.type == Expose)

  445.         {

  446.             XCopyArea(dp->drv.p->dpy, dp->drv.p->pixmap,

  447.                       dp->drv.p->window, dp->drv.p->gc, 0, 0,

  448.                       dp->cv->width * dp->drv.p->font_width,

  449.                       dp->cv->height * dp->drv.p->font_height, 0, 0);

  450.             continue;

  451.         }

  452. 

  453.         /* Resize event */

  454.         if(xevent.type == ConfigureNotify)

  455.         {

  456.             unsigned int w, h;

  457. 

  458.             w = (xevent.xconfigure.width + dp->drv.p->font_width / 3)

  459.                   / dp->drv.p->font_width;

  460.             h = (xevent.xconfigure.height + dp->drv.p->font_height / 3)

  461.                   / dp->drv.p->font_height;

  462. 

  463.             if(!w || !h || (w == dp->cv->width && h == dp->cv->height))

  464.                 continue;

  465. 

  466.             dp->resize.w = w;

  467.             dp->resize.h = h;

  468.             dp->resize.resized = 1;

  469. 

  470.             continue;

  471.         }

  472. 

  473.         /* Check for mouse motion events */

  474.         if(xevent.type == MotionNotify)

  475.         {

  476.             unsigned int newx = xevent.xmotion.x / dp->drv.p->font_width;

  477.             unsigned int newy = xevent.xmotion.y / dp->drv.p->font_height;

  478. 

  479.             if(newx >= dp->cv->width)

  480.                 newx = dp->cv->width - 1;

  481.             if(newy >= dp->cv->height)

  482.                 newy = dp->cv->height - 1;

  483. 

  484.             if(dp->mouse.x == newx && dp->mouse.y == newy)

  485.                 continue;

  486. 

  487.             dp->mouse.x = newx;

  488.             dp->mouse.y = newy;

  489. 

  490.             ev->type = CACA_EVENT_MOUSE_MOTION;

  491.             ev->data.mouse.x = dp->mouse.x;

  492.             ev->data.mouse.y = dp->mouse.y;

  493.             return 1;

  494.         }

  495. 

  496.         /* Check for mouse press and release events */

  497.         if(xevent.type == ButtonPress)

  498.         {

  499.             ev->type = CACA_EVENT_MOUSE_PRESS;

  500.             ev->data.mouse.button = ((XButtonEvent *)&xevent)->button;

  501.             return 1;

  502.         }

  503. 

  504.         if(xevent.type == ButtonRelease)

  505.         {

  506.             ev->type = CACA_EVENT_MOUSE_RELEASE;

  507.             ev->data.mouse.button = ((XButtonEvent *)&xevent)->button;

  508.             return 1;

  509.         }

  510. 

  511.         /* Check for key press and release events */

  512.         if(xevent.type == KeyPress)

  513.             ev->type = CACA_EVENT_KEY_PRESS;

  514.         else if(xevent.type == KeyRelease)

  515.             ev->type = CACA_EVENT_KEY_RELEASE;

  516.         else

  517.             continue;

  518. 

  519.         if(XLookupString(&xevent.xkey, &key, 1, NULL, NULL))

  520.         {

  521.             ev->data.key.ch = key;

  522.             ev->data.key.utf32 = key;

  523.             ev->data.key.utf8[0] = key;

  524.             ev->data.key.utf8[1] = '\0';

  525.             return 1;

  526.         }

  527. 

  528.         keysym = XKeycodeToKeysym(dp->drv.p->dpy, xevent.xkey.keycode, 0);

  529.         switch(keysym)

  530.         {

  531.             case XK_F1:    ev->data.key.ch = CACA_KEY_F1;    break;

  532.             case XK_F2:    ev->data.key.ch = CACA_KEY_F2;    break;

  533.             case XK_F3:    ev->data.key.ch = CACA_KEY_F3;    break;

  534.             case XK_F4:    ev->data.key.ch = CACA_KEY_F4;    break;

  535.             case XK_F5:    ev->data.key.ch = CACA_KEY_F5;    break;

  536.             case XK_F6:    ev->data.key.ch = CACA_KEY_F6;    break;

  537.             case XK_F7:    ev->data.key.ch = CACA_KEY_F7;    break;

  538.             case XK_F8:    ev->data.key.ch = CACA_KEY_F8;    break;

  539.             case XK_F9:    ev->data.key.ch = CACA_KEY_F9;    break;

  540.             case XK_F10:   ev->data.key.ch = CACA_KEY_F10;   break;

  541.             case XK_F11:   ev->data.key.ch = CACA_KEY_F11;   break;

  542.             case XK_F12:   ev->data.key.ch = CACA_KEY_F12;   break;

  543.             case XK_F13:   ev->data.key.ch = CACA_KEY_F13;   break;

  544.             case XK_F14:   ev->data.key.ch = CACA_KEY_F14;   break;

  545.             case XK_F15:   ev->data.key.ch = CACA_KEY_F15;   break;

  546.             case XK_Left:  ev->data.key.ch = CACA_KEY_LEFT;  break;

  547.             case XK_Right: ev->data.key.ch = CACA_KEY_RIGHT; break;

  548.             case XK_Up:    ev->data.key.ch = CACA_KEY_UP;    break;

  549.             case XK_Down:  ev->data.key.ch = CACA_KEY_DOWN;  break;

  550.             case XK_KP_Page_Up:

  551.             case XK_Page_Up:      ev->data.key.ch = CACA_KEY_PAGEUP;   break;

  552.             case XK_KP_Page_Down:

  553.             case XK_Page_Down:    ev->data.key.ch = CACA_KEY_PAGEDOWN; break;

  554.             case XK_KP_Home:

  555.             case XK_Home:         ev->data.key.ch = CACA_KEY_HOME;     break;

  556.             case XK_KP_End:

  557.             case XK_End:          ev->data.key.ch = CACA_KEY_END;      break;

  558. 

  559.             default: ev->type = CACA_EVENT_NONE; return 0;

  560.         }

  561. 

  562.         ev->data.key.utf32 = 0;

  563.         ev->data.key.utf8[0] = '\0';

  564.         return 1;

  565.     }

  566. 

  567.     while(XCheckTypedEvent(dp->drv.p->dpy, ClientMessage, &xevent))

  568.     {

  569.         if(xevent.xclient.message_type != dp->drv.p->wm_protocols)

  570.             continue;

  571. 

  572.         if((Atom)xevent.xclient.data.l[0] == dp->drv.p->wm_delete_window)

  573.         {

  574.             ev->type = CACA_EVENT_QUIT;

  575.             return 1;

  576.         }

  577.     }

  578. 

  579.     ev->type = CACA_EVENT_NONE;

  580.     return 0;

  581. }

  582. 

  583. static void x11_set_mouse(caca_display_t *dp, int flags)

  584. {

  585.     Cursor no_ptr;

  586.     Pixmap bm_no;

  587.     XColor black, dummy;

  588.     Colormap colormap;

  589.     static char const empty[] = { 0, 0, 0, 0, 0, 0, 0, 0 };

  590. 

  591.     if(flags)

  592.     {

  593.         XDefineCursor(dp->drv.p->dpy,dp->drv.p->window, 0);

  594.         return;

  595.     }

  596. 

  597.     colormap = DefaultColormap(dp->drv.p->dpy, DefaultScreen(dp->drv.p->dpy));

  598.     if(!XAllocNamedColor(dp->drv.p->dpy, colormap, "black", &black, &dummy))

  599.     {

  600.         return;

  601.     }

  602.     bm_no = XCreateBitmapFromData(dp->drv.p->dpy, dp->drv.p->window,

  603.                                   empty, 8, 8);

  604.     no_ptr = XCreatePixmapCursor(dp->drv.p->dpy, bm_no, bm_no,

  605.                                  &black, &black, 0, 0);

  606.     XDefineCursor(dp->drv.p->dpy, dp->drv.p->window, no_ptr);

  607.     XFreeCursor(dp->drv.p->dpy, no_ptr);

  608.     if(bm_no != None)

  609.         XFreePixmap(dp->drv.p->dpy, bm_no);

  610.     XFreeColors(dp->drv.p->dpy, colormap, &black.pixel, 1, 0);

  611. 

  612.     XSync(dp->drv.p->dpy, False);

  613. }

  614. 

  615. /*

  616.  * XXX: following functions are local

  617.  */

  618. 

  619. static int x11_error_handler(Display *dpy, XErrorEvent *xevent)

  620. {

  621.     /* Ignore the error */

  622.     return 0;

  623. }

  624. 

  625. /*

  626.  * Driver initialisation

  627.  */

  628. 

  629. int x11_install(caca_display_t *dp)

  630. {

  631. #if defined(HAVE_GETENV)

  632.     if(!getenv("DISPLAY") || !*(getenv("DISPLAY")))

  633.         return -1;

  634. #endif

  635. 

  636.     dp->drv.driver = CACA_DRIVER_X11;

  637. 

  638.     dp->drv.init_graphics = x11_init_graphics;

  639.     dp->drv.end_graphics = x11_end_graphics;

  640.     dp->drv.set_display_title = x11_set_display_title;

  641.     dp->drv.get_display_width = x11_get_display_width;

  642.     dp->drv.get_display_height = x11_get_display_height;

  643.     dp->drv.display = x11_display;

  644.     dp->drv.handle_resize = x11_handle_resize;

  645.     dp->drv.get_event = x11_get_event;

  646.     dp->drv.set_mouse = x11_set_mouse;

  647.     dp->drv.set_cursor = NULL;

  648. 

  649.     return 0;

  650. }

  651. 

  652. #endif /* USE_X11 */