cacalabs
/
libcaca
mirror da https://github.com/cacalabs/libcaca.git
1
0
Forka 0
Codice Problemi 0 Rilasci 7 Wiki Attività
Non puoi selezionare più di 25 argomenti Gli argomenti devono iniziare con una lettera o un numero, possono includere trattini ('-') e possono essere lunghi fino a 35 caratteri.
1756 Commit
1 Ramo (Branch)
181 MiB
 
 
 
 
 
 
Albero (Tree): 84fb312769
Rami (Branch) Tag
${ item.name }
Crea branch ${ searchTerm }
da '84fb312769'
${ noResults }
libcaca/caca/driver/x11.c

953 righe
30 KiB
Originale Blame Cronologia 

  1. /*

  2.  *  libcaca       Colour ASCII-Art library

  3.  *  Copyright (c) 2002-2009 Sam Hocevar <sam@hocevar.net>

  4.  *                2007 Ben Wiley Sittler <bsittler@gmail.com>

  5.  *                All Rights Reserved

  6.  *

  7.  *  $Id$

  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. 

  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. #include <string.h>

  34. 

  35. #include "caca.h"

  36. #include "caca.h"

  37. #include "caca_internals.h"

  38. 

  39. /*

  40.  * Local functions

  41.  */

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

  43. static void x11_put_glyph(caca_display_t *, int, int, int, int, int,

  44.                           uint32_t, uint32_t);

  45. 

  46. struct driver_private

  47. {

  48.     Display *dpy;

  49.     Window window;

  50.     Pixmap pixmap;

  51.     GC gc;

  52.     long int event_mask;

  53.     int font_width, font_height;

  54.     int colors[4096];

  55. #if defined X_HAVE_UTF8_STRING

  56.     XFontSet font_set;

  57. #endif

  58.     Font font;

  59.     XFontStruct *font_struct;

  60.     int font_offset;

  61.     Cursor pointer;

  62.     Atom wm_protocols;

  63.     Atom wm_delete_window;

  64. #if defined HAVE_X11_XKBLIB_H

  65.     Bool autorepeat;

  66. #endif

  67.     uint32_t max_char;

  68.     int cursor_flags;

  69.     int dirty_cursor_x, dirty_cursor_y;

  70. #if defined X_HAVE_UTF8_STRING

  71.     XIM im;

  72.     XIC ic;

  73. #endif

  74. };

  75. 

  76. #define UNICODE_XLFD_SUFFIX "-iso10646-1"

  77. #define LATIN_1_XLFD_SUFFIX "-iso8859-1"

  78. 

  79. static int x11_init_graphics(caca_display_t *dp)

  80. {

  81.     Colormap colormap;

  82.     XSetWindowAttributes x11_winattr;

  83. #if defined X_HAVE_UTF8_STRING

  84.     XVaNestedList list;

  85. #endif

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

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

  88.     char const *geometry;

  89.     int width = caca_get_canvas_width(dp->cv);

  90.     int height = caca_get_canvas_height(dp->cv);

  91.     int i;

  92. 

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

  94. 

  95. #if defined HAVE_GETENV

  96.     geometry = getenv("CACA_GEOMETRY");

  97.     if(geometry && *geometry)

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

  99. #endif

  100. 

  101.     caca_add_dirty_rect(dp->cv, 0, 0, dp->cv->width, dp->cv->height);

  102.     dp->resize.allow = 1;

  103.     caca_set_canvas_size(dp->cv, width ? width : 80, height ? height : 32);

  104.     width = caca_get_canvas_width(dp->cv);

  105.     height = caca_get_canvas_height(dp->cv);

  106.     dp->resize.allow = 0;

  107. 

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

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

  110.         return -1;

  111. 

  112. #if defined HAVE_GETENV

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

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

  115.         parser = fonts;

  116.     else

  117. #endif

  118.         parser = fonts + 1;

  119. 

  120.     /* Ignore font errors */

  121.     old_error_handler = XSetErrorHandler(x11_error_handler);

  122. 

  123.     /* Parse our font list */

  124.     for( ; ; parser++)

  125.     {

  126. #if defined X_HAVE_UTF8_STRING

  127.         char **missing_charset_list;

  128.         char *def_string;

  129.         int missing_charset_count;

  130. #endif

  131.         uint32_t font_max_char;

  132. 

  133.         if(!*parser)

  134.         {

  135.             XSetErrorHandler(old_error_handler);

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

  137.             return -1;

  138.         }

  139. 

  140. #if defined X_HAVE_UTF8_STRING

  141.         dp->drv.p->font_set = XCreateFontSet(dp->drv.p->dpy, *parser,

  142.                                              &missing_charset_list,

  143.                                              &missing_charset_count,

  144.                                              &def_string);

  145.         if (missing_charset_list)

  146.             XFreeStringList(missing_charset_list);

  147. 

  148.         if (!dp->drv.p->font_set || missing_charset_count)

  149.         {

  150.             char buf[BUFSIZ];

  151. 

  152.             if (dp->drv.p->font_set)

  153.                 XFreeFontSet(dp->drv.p->dpy, dp->drv.p->font_set);

  154.             snprintf(buf, BUFSIZ - 1, "%s,*", *parser);

  155.             dp->drv.p->font_set = XCreateFontSet(dp->drv.p->dpy, buf,

  156.                                                  &missing_charset_list,

  157.                                                  &missing_charset_count,

  158.                                                  &def_string);

  159.             if (missing_charset_list)

  160.                 XFreeStringList(missing_charset_list);

  161.         }

  162. 

  163.         if (dp->drv.p->font_set)

  164.             break;

  165. #endif

  166. 

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

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

  169.             continue;

  170. 

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

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

  173.         {

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

  175.             continue;

  176.         }

  177. 

  178.         if((strlen(*parser) > sizeof(UNICODE_XLFD_SUFFIX))

  179.              && !strcasecmp(*parser + strlen(*parser)

  180.                           - strlen(UNICODE_XLFD_SUFFIX), UNICODE_XLFD_SUFFIX))

  181.             dp->drv.p->max_char = 0xffff;

  182.         else if((strlen(*parser) > sizeof(LATIN_1_XLFD_SUFFIX))

  183.                  && !strcasecmp(*parser + strlen(*parser)

  184.                         - strlen(LATIN_1_XLFD_SUFFIX), LATIN_1_XLFD_SUFFIX))

  185.             dp->drv.p->max_char = 0xff;

  186.         else

  187.             dp->drv.p->max_char = 0x7f;

  188. 

  189.         font_max_char =

  190.             (dp->drv.p->font_struct->max_byte1 << 8)

  191.              | dp->drv.p->font_struct->max_char_or_byte2;

  192.         if(font_max_char && (font_max_char < dp->drv.p->max_char))

  193.             dp->drv.p->max_char = font_max_char;

  194. 

  195.         break;

  196.     }

  197. 

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

  199.     XSetErrorHandler(old_error_handler);

  200. 

  201.     /* Set font width to the largest character in the set */

  202. #if defined X_HAVE_UTF8_STRING

  203.     if (dp->drv.p->font_set)

  204.     {

  205.         XFontSetExtents *ex = XExtentsOfFontSet(dp->drv.p->font_set);

  206.         dp->drv.p->font_width =

  207.              XmbTextEscapement(dp->drv.p->font_set, "CAca", 4) / 4;

  208.         dp->drv.p->font_height = ex->max_logical_extent.height;

  209.         dp->drv.p->font_offset = ex->max_logical_extent.height

  210.                                   + ex->max_logical_extent.y;

  211.     }

  212.     else

  213. #endif

  214.     {

  215.         dp->drv.p->font_width = 0;

  216.         if(dp->drv.p->font_struct->per_char

  217.             && !dp->drv.p->font_struct->min_byte1

  218.             && dp->drv.p->font_struct->min_char_or_byte2 <= 0x21

  219.             && dp->drv.p->font_struct->max_char_or_byte2 >= 0x7e)

  220.         {

  221.             for(i = 0x21; i < 0x7f; i++)

  222.             {

  223.                 int cw = dp->drv.p->font_struct->per_char[i

  224.                             - dp->drv.p->font_struct->min_char_or_byte2].width;

  225.                 if(cw > dp->drv.p->font_width)

  226.                     dp->drv.p->font_width = cw;

  227.             }

  228.         }

  229. 

  230.         if(!dp->drv.p->font_width)

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

  232. 

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

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

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

  236.     }

  237. 

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

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

  240.     {

  241.         XColor color;

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

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

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

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

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

  247.     }

  248. 

  249.     x11_winattr.backing_store = Always;

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

  251.     x11_winattr.event_mask = ExposureMask | StructureNotifyMask;

  252. 

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

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

  255.                       width * dp->drv.p->font_width,

  256.                       height * dp->drv.p->font_height,

  257.                       0, 0, InputOutput, 0,

  258.                       CWBackingStore | CWBackPixel | CWEventMask,

  259.                       &x11_winattr);

  260. 

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

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

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

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

  265. 

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

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

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

  269. 

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

  271. 

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

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

  274. 

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

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

  277. #if defined X_HAVE_UTF8_STRING

  278.     if (!dp->drv.p->font_set)

  279. #endif

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

  281. 

  282.     for(;;)

  283.     {

  284.         XEvent xevent;

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

  286.         if(xevent.type == MapNotify)

  287.             break;

  288.     }

  289. 

  290. #if defined HAVE_X11_XKBLIB_H

  291.     /* Disable autorepeat */

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

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

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

  295. #endif

  296. 

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

  298.           | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask

  299.           | ExposureMask;

  300. 

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

  302. 

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

  304. 

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

  306.                                       width * dp->drv.p->font_width,

  307.                                       height * dp->drv.p->font_height,

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

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

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

  311. 

  312.     dp->drv.p->cursor_flags = 0;

  313.     dp->drv.p->dirty_cursor_x = -1;

  314.     dp->drv.p->dirty_cursor_y = -1;

  315. 

  316. #if defined X_HAVE_UTF8_STRING

  317.     list = XVaCreateNestedList(0, XNFontSet, dp->drv.p->font_set, NULL);

  318.     dp->drv.p->im = XOpenIM(dp->drv.p->dpy, NULL, NULL, NULL);

  319.     dp->drv.p->ic = XCreateIC(dp->drv.p->im,

  320.                           XNInputStyle, XIMPreeditNothing | XIMStatusNothing,

  321.                           XNClientWindow, dp->drv.p->window,

  322.                           XNPreeditAttributes, list,

  323.                           XNStatusAttributes, list,

  324.                           NULL);

  325. #endif

  326. 

  327.     return 0;

  328. }

  329. 

  330. static int x11_end_graphics(caca_display_t *dp)

  331. {

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

  333. #if defined HAVE_X11_XKBLIB_H

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

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

  336. #endif

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

  338. #if defined X_HAVE_UTF8_STRING

  339.     if (dp->drv.p->font_set)

  340.         XFreeFontSet(dp->drv.p->dpy, dp->drv.p->font_set);

  341.     else

  342. #endif

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

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

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

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

  347. #if defined X_HAVE_UTF8_STRING

  348.     XDestroyIC(dp->drv.p->ic);

  349.     XCloseIM(dp->drv.p->im);

  350. #endif

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

  352. 

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

  354. 

  355.     return 0;

  356. }

  357. 

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

  359. {

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

  361.     return 0;

  362. }

  363. 

  364. static int x11_get_display_width(caca_display_t const *dp)

  365. {

  366.     return caca_get_canvas_width(dp->cv) * dp->drv.p->font_width;

  367. }

  368. 

  369. static int x11_get_display_height(caca_display_t const *dp)

  370. {

  371.     return caca_get_canvas_height(dp->cv) * dp->drv.p->font_height;

  372. }

  373. 

  374. static void x11_display(caca_display_t *dp)

  375. {

  376.     uint32_t const *cvchars = (uint32_t const *)caca_get_canvas_chars(dp->cv);

  377.     uint32_t const *cvattrs = (uint32_t const *)caca_get_canvas_attrs(dp->cv);

  378.     int width = caca_get_canvas_width(dp->cv);

  379.     int height = caca_get_canvas_height(dp->cv);

  380.     int x, y, i, len;

  381. 

  382.     /* XXX: the magic value -1 is used to handle the cursor area */

  383.     for(i = -1; i < caca_get_dirty_rect_count(dp->cv); i++)

  384.     {

  385.         int dx, dy, dw, dh;

  386. 

  387.         /* Get the dirty rectangle coordinates, either from the previous

  388.          * cursor position, or from the canvas's list. */

  389.         if(i == -1)

  390.         {

  391.             if(dp->drv.p->dirty_cursor_x < 0 || dp->drv.p->dirty_cursor_y < 0

  392.                 || dp->drv.p->dirty_cursor_x >= width

  393.                 || dp->drv.p->dirty_cursor_y >= height)

  394.                 continue;

  395. 

  396.             dx = dp->drv.p->dirty_cursor_x;

  397.             dy = dp->drv.p->dirty_cursor_y;

  398.             dw = dh = 1;

  399. 

  400.             dp->drv.p->dirty_cursor_x = -1;

  401.             dp->drv.p->dirty_cursor_y = -1;

  402.         }

  403.         else

  404.         {

  405.             caca_get_dirty_rect(dp->cv, i, &dx, &dy, &dw, &dh);

  406.         }

  407. 

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

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

  410.         for(y = dy; y < dy + dh; y++)

  411.         {

  412.             for(x = dx; x < dx + dw; x += len)

  413.             {

  414.                 uint32_t const *attrs = cvattrs + x + y * width;

  415.                 uint16_t bg = caca_attr_to_rgb12_bg(*attrs);

  416. 

  417.                 len = 1;

  418.                 while(x + len < dx + dw

  419.                        && caca_attr_to_rgb12_bg(attrs[len]) == bg)

  420.                     len++;

  421. 

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

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

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

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

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

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

  428.                                len * dp->drv.p->font_width,

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

  430.             }

  431.         }

  432. 

  433.         /* Then print the foreground characters */

  434.         for(y = dy; y < dy + dh; y++)

  435.         {

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

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

  438.             uint32_t const *chars = cvchars + dx + y * width;

  439.             uint32_t const *attrs = cvattrs + dx + y * width;

  440. 

  441.             for(x = dx; x < dx + dw; x++, chars++, attrs++)

  442.             {

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

  444.                            dp->drv.p->colors[caca_attr_to_rgb12_fg(*attrs)]);

  445. 

  446.                 x11_put_glyph(dp, x * dp->drv.p->font_width,

  447.                               y * dp->drv.p->font_height, yoff,

  448.                               dp->drv.p->font_width, dp->drv.p->font_height,

  449.                               *attrs, *chars);

  450.             }

  451.         }

  452.     }

  453. 

  454.     /* Print the cursor if necessary. */

  455.     if(dp->drv.p->cursor_flags)

  456.     {

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

  458.                        dp->drv.p->colors[0xfff]);

  459.         x = caca_wherex(dp->cv);

  460.         y = caca_wherey(dp->cv);

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

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

  463.                        dp->drv.p->font_width, dp->drv.p->font_height);

  464. 

  465.         /* Mark the area as dirty */

  466.         dp->drv.p->dirty_cursor_x = x;

  467.         dp->drv.p->dirty_cursor_y = y;

  468.     }

  469. 

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

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

  472.               width * dp->drv.p->font_width,

  473.               height * dp->drv.p->font_height,

  474.               0, 0);

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

  476. }

  477. 

  478. static void x11_handle_resize(caca_display_t *dp)

  479. {

  480.     Pixmap new_pixmap;

  481. 

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

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

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

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

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

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

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

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

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

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

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

  493. }

  494. 

  495. static int x11_get_event(caca_display_t *dp, caca_privevent_t *ev)

  496. {

  497.     int width = caca_get_canvas_width(dp->cv);

  498.     int height = caca_get_canvas_height(dp->cv);

  499.     XEvent xevent;

  500.     char key;

  501. 

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

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

  504.     {

  505.         KeySym keysym;

  506. 

  507.         /* Expose event */

  508.         if(xevent.type == Expose)

  509.         {

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

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

  512.                       width * dp->drv.p->font_width,

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

  514.             continue;

  515.         }

  516. 

  517.         /* Resize event */

  518.         if(xevent.type == ConfigureNotify)

  519.         {

  520.             int w, h;

  521. 

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

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

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

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

  526. 

  527.             if(!w || !h || (w == width && h == height))

  528.                 continue;

  529. 

  530.             dp->resize.w = w;

  531.             dp->resize.h = h;

  532.             dp->resize.resized = 1;

  533. 

  534.             continue;

  535.         }

  536. 

  537.         /* Check for mouse motion events */

  538.         if(xevent.type == MotionNotify)

  539.         {

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

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

  542. 

  543.             if(newx >= width)

  544.                 newx = width - 1;

  545.             if(newy >= height)

  546.                 newy = height - 1;

  547. 

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

  549.                 continue;

  550. 

  551.             dp->mouse.x = newx;

  552.             dp->mouse.y = newy;

  553. 

  554.             ev->type = CACA_EVENT_MOUSE_MOTION;

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

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

  557.             return 1;

  558.         }

  559. 

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

  561.         if(xevent.type == ButtonPress)

  562.         {

  563.             ev->type = CACA_EVENT_MOUSE_PRESS;

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

  565.             return 1;

  566.         }

  567. 

  568.         if(xevent.type == ButtonRelease)

  569.         {

  570.             ev->type = CACA_EVENT_MOUSE_RELEASE;

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

  572.             return 1;

  573.         }

  574. 

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

  576.         if(xevent.type == KeyPress)

  577.             ev->type = CACA_EVENT_KEY_PRESS;

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

  579.             ev->type = CACA_EVENT_KEY_RELEASE;

  580.         else

  581.             continue;

  582. 

  583. #if defined X_HAVE_UTF8_STRING

  584.         if(Xutf8LookupString(dp->drv.p->ic, &xevent.xkey, ev->data.key.utf8, 8, NULL, NULL))

  585.         {

  586.             ev->data.key.utf32 = caca_utf8_to_utf32(ev->data.key.utf8, NULL);

  587.             if(ev->data.key.utf32 <= 0x7f)

  588.             {

  589.                 ev->data.key.ch = ev->data.key.utf32;

  590.             } else {

  591.                 ev->data.key.ch = 0;

  592.             }

  593.             return 1;

  594.         }

  595. #endif

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

  597.         {

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

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

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

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

  602.             return 1;

  603.         }

  604. 

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

  606.         switch(keysym)

  607.         {

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

  627.             case XK_KP_Page_Up:

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

  629.             case XK_KP_Page_Down:

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

  631.             case XK_KP_Home:

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

  633.             case XK_KP_End:

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

  635. 

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

  637.         }

  638. 

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

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

  641.         return 1;

  642.     }

  643. 

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

  645.     {

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

  647.             continue;

  648. 

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

  650.         {

  651.             ev->type = CACA_EVENT_QUIT;

  652.             return 1;

  653.         }

  654.     }

  655. 

  656.     ev->type = CACA_EVENT_NONE;

  657.     return 0;

  658. }

  659. 

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

  661. {

  662.     Cursor no_ptr;

  663.     Pixmap bm_no;

  664.     XColor black, dummy;

  665.     Colormap colormap;

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

  667. 

  668.     if(flags)

  669.     {

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

  671.         return;

  672.     }

  673. 

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

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

  676.     {

  677.         return;

  678.     }

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

  680.                                   empty, 8, 8);

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

  682.                                  &black, &black, 0, 0);

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

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

  685.     if(bm_no != None)

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

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

  688. 

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

  690. }

  691. 

  692. static void x11_set_cursor(caca_display_t *dp, int flags)

  693. {

  694.     dp->drv.p->cursor_flags = flags;

  695. }

  696. 

  697. /*

  698.  * XXX: following functions are local

  699.  */

  700. 

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

  702. {

  703.     /* Ignore the error */

  704.     return 0;

  705. }

  706. 

  707. static void x11_put_glyph(caca_display_t *dp, int x, int y, int yoff,

  708.                           int w, int h, uint32_t attr, uint32_t ch)

  709. {

  710.     static uint8_t const udlr[] =

  711.     {

  712.         /* 0x2500 - 0x250f: ─ . │ . . . . . . . . . ┌ . . . */

  713.         0x05, 0x00, 0x50, 0x00, 0x00, 0x00, 0x00, 0x00,

  714.         0x00, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00,

  715.         /* 0x2510 - 0x251f: ┐ . . . └ . . . ┘ . . . ├ . . . */

  716.         0x14, 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00,

  717.         0x44, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00,

  718.         /* 0x2520 - 0x252f: . . . . ┤ . . . . . . . ┬ . . . */

  719.         0x00, 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00,

  720.         0x00, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00,

  721.         /* 0x2530 - 0x253f: . . . . ┴ . . . . . . . ┼ . . . */

  722.         0x00, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00,

  723.         0x00, 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00,

  724.         /* 0x2540 - 0x254f: . . . . . . . . . . . . . . . . */

  725.         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  726.         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  727.         /* 0x2550 - 0x255f: ═ ║ ╒ ╓ ╔ ╕ ╖ ╗ ╘ ╙ ╚ ╛ ╜ ╝ ╞ ╟ */

  728.         0x0a, 0xa0, 0x12, 0x21, 0x22, 0x18, 0x24, 0x28,

  729.         0x42, 0x81, 0x82, 0x48, 0x84, 0x88, 0x52, 0xa1,

  730.         /* 0x2560 - 0x256c: ╠ ╡ ╢ ╣ ╤ ╥ ╦ ╧ ╨ ╩ ╪ ╫ ╬ */

  731.         0xa2, 0x58, 0xa4, 0xa8, 0x1a, 0x25, 0x2a, 0x4a,

  732.         0x85, 0x8a, 0x5a, 0xa5, 0xaa,

  733.     };

  734. 

  735.     Display *dpy = dp->drv.p->dpy;

  736.     Pixmap px = dp->drv.p->pixmap;

  737.     GC gc = dp->drv.p->gc;

  738.     int fw;

  739. 

  740.     /* Underline */

  741.     if(attr & CACA_UNDERLINE)

  742.         XFillRectangle(dpy, px, gc, x, y + h - 1, w, 1);

  743. 

  744.     /* Skip spaces and magic stuff */

  745.     if(ch <= 0x00000020)

  746.         return;

  747. 

  748.     if(ch == CACA_MAGIC_FULLWIDTH)

  749.         return;

  750. 

  751.     fw = w;

  752.     if(caca_utf32_is_fullwidth(ch))

  753.         fw *= 2;

  754. 

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

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

  757.      * characters, print what caca_utf32_to_ascii() returns. */

  758. 

  759.     if(ch >= 0x2500 && ch <= 0x256c && udlr[ch - 0x2500])

  760.     {

  761.         uint16_t D = udlr[ch - 0x2500];

  762. 

  763.         if(D & 0x04)

  764.             XFillRectangle(dpy, px, gc, x, y + h / 2, fw / 2 + 1, 1);

  765. 

  766.         if(D & 0x01)

  767.             XFillRectangle(dpy, px, gc,

  768.                            x + fw / 2, y + h / 2, (fw + 1) / 2, 1);

  769. 

  770.         if(D & 0x40)

  771.             XFillRectangle(dpy, px, gc, x + fw / 2, y, 1, h / 2 + 1);

  772. 

  773.         if(D & 0x10)

  774.             XFillRectangle(dpy, px, gc, x + fw / 2, y + h / 2, 1, (h + 1) / 2);

  775. 

  776. #define STEPIF(a,b) (D&(a)?-1:(D&(b))?1:0)

  777. 

  778.         if(D & 0x08)

  779.         {

  780.             XFillRectangle(dpy, px, gc, x, y - 1 + h / 2,

  781.                            fw / 2 + 1 + STEPIF(0xc0,0x20), 1);

  782.             XFillRectangle(dpy, px, gc, x, y + 1 + h / 2,

  783.                            fw / 2 + 1 + STEPIF(0x30,0x80), 1);

  784.         }

  785. 

  786.         if(D & 0x02)

  787.         {

  788.             XFillRectangle(dpy, px, gc, x - STEPIF(0xc0,0x20) + fw / 2,

  789.                            y - 1 + h / 2, (fw + 1) / 2 + STEPIF(0xc0,0x20), 1);

  790.             XFillRectangle(dpy, px, gc, x - STEPIF(0x30,0x80) + fw / 2,

  791.                            y + 1 + h / 2, (fw + 1) / 2 + STEPIF(0x30,0x80), 1);

  792.         }

  793. 

  794.         if(D & 0x80)

  795.         {

  796.             XFillRectangle(dpy, px, gc, x - 1 + fw / 2, y,

  797.                            1, h / 2 + 1 + STEPIF(0x0c,0x02));

  798.             XFillRectangle(dpy, px, gc, x + 1 + fw / 2, y,

  799.                            1, h / 2 + 1 + STEPIF(0x03,0x08));

  800.         }

  801. 

  802.         if(D & 0x20)

  803.         {

  804.             XFillRectangle(dpy, px, gc, x - 1 + fw / 2,

  805.                            y - STEPIF(0x0c,0x02) + h / 2,

  806.                            1, (h + 1) / 2 + STEPIF(0x0c,0x02));

  807.             XFillRectangle(dpy, px, gc, x + 1 + fw / 2,

  808.                            y - STEPIF(0x03,0x08) + h / 2,

  809.                            1, (h + 1) / 2 + STEPIF(0x03,0x08));

  810.         }

  811. 

  812.         return;

  813.     }

  814. 

  815.     switch(ch)

  816.     {

  817.         case 0x000000b7: /* · */

  818.         case 0x00002219: /* ∙ */

  819.         case 0x000030fb: /* ・ */

  820.             XFillRectangle(dpy, px, gc, x + fw / 2 - 1, y + h / 2 - 1, 2, 2);

  821.             return;

  822. 

  823.         case 0x00002261: /* ≡ */

  824.             XFillRectangle(dpy, px, gc, x + 1, y - 2 + h / 2, fw - 1, 1);

  825.             XFillRectangle(dpy, px, gc, x + 1, y + h / 2, fw - 1, 1);

  826.             XFillRectangle(dpy, px, gc, x + 1, y + 2 + h / 2, fw - 1, 1);

  827.             return;

  828. 

  829.         case 0x00002580: /* ▀ */

  830.             XFillRectangle(dpy, px, gc, x, y, fw, h / 2);

  831.             return;

  832. 

  833.         case 0x00002584: /* ▄ */

  834.             XFillRectangle(dpy, px, gc, x, y + h - h / 2, fw, h / 2);

  835.             return;

  836. 

  837.         case 0x00002588: /* █ */

  838.         case 0x000025ae: /* ▮ */

  839.             XFillRectangle(dpy, px, gc, x, y, fw, h);

  840.             return;

  841. 

  842.         case 0x0000258c: /* ▌ */

  843.             XFillRectangle(dpy, px, gc, x, y, fw / 2, h);

  844.             return;

  845. 

  846.         case 0x00002590: /* ▐ */

  847.             XFillRectangle(dpy, px, gc, x + fw - fw / 2, y, fw / 2, h);

  848.             return;

  849. 

  850.         case 0x000025a0: /* ■ */

  851.         case 0x000025ac: /* ▬ */

  852.             XFillRectangle(dpy, px, gc, x, y + h / 4, fw, h / 2);

  853.             return;

  854. 

  855.         case 0x00002593: /* ▓ */

  856.         case 0x00002592: /* ▒ */

  857.         case 0x00002591: /* ░ */

  858.         {

  859.             /* FIXME: this sucks utterly */

  860.             int i, j, k = ch - 0x00002591;

  861.             for(j = h; j--; )

  862.                 for(i = fw; i--; )

  863.             {

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

  865.                     continue;

  866. 

  867.                 XDrawPoint(dpy, px, gc, x + i, y + j);

  868.             }

  869.             return;

  870.         }

  871. 

  872.         case 0x000025cb: /* ○ */

  873.         case 0x00002022: /* • */

  874.         case 0x000025cf: /* ● */

  875.         {

  876.             int d, xo, yo;

  877. 

  878.             d = fw >> (~ch & 0x1); /* XXX: hack */

  879.             if(h < fw)

  880.                 d = h;

  881.             if(d < 1)

  882.                 d = 1;

  883.             xo = (fw - d) / 2;

  884.             yo = (h - d) / 2;

  885.             if(ch == 0x000025cb)

  886.                 XDrawArc(dpy, px, gc, x + xo, y + yo, d, d, 0, 64 * 360);

  887.             else

  888.                 XFillArc(dpy, px, gc, x + xo, y + yo, d, d, 0, 64 * 360);

  889.             return;

  890.         }

  891.     }

  892. 

  893. #if defined X_HAVE_UTF8_STRING

  894.     if (dp->drv.p->font_set)

  895.     {

  896.         wchar_t wch = ch;

  897.         XwcDrawString(dpy, px, dp->drv.p->font_set, gc,

  898.                       x + (fw - w) / 2, yoff, &wch, 1);

  899.     }

  900.     else

  901. #endif

  902.     {

  903.         XChar2b ch16;

  904. 

  905. #if !defined X_HAVE_UTF8_STRING

  906.         if(ch > dp->drv.p->max_char)

  907.         {

  908.             ch16.byte1 = 0;

  909.             ch16.byte2 = caca_utf32_to_ascii(ch);

  910.         }

  911.         else

  912. #endif

  913.         {

  914.             ch16.byte1 = (uint8_t)(ch >> 8);

  915.             ch16.byte2 = (uint8_t)ch;

  916.         }

  917. 

  918.         XDrawString16(dpy, px, gc,

  919.                       x + (ch16.byte1 ? 0 : (fw - w) / 2), yoff, &ch16, 1);

  920.     }

  921. }

  922. 

  923. /*

  924.  * Driver initialisation

  925.  */

  926. 

  927. int x11_install(caca_display_t *dp)

  928. {

  929. #if defined HAVE_GETENV

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

  931.         return -1;

  932. #endif

  933. 

  934.     dp->drv.id = CACA_DRIVER_X11;

  935.     dp->drv.driver = "x11";

  936. 

  937.     dp->drv.init_graphics = x11_init_graphics;

  938.     dp->drv.end_graphics = x11_end_graphics;

  939.     dp->drv.set_display_title = x11_set_display_title;

  940.     dp->drv.get_display_width = x11_get_display_width;

  941.     dp->drv.get_display_height = x11_get_display_height;

  942.     dp->drv.display = x11_display;

  943.     dp->drv.handle_resize = x11_handle_resize;

  944.     dp->drv.get_event = x11_get_event;

  945.     dp->drv.set_mouse = x11_set_mouse;

  946.     dp->drv.set_cursor = x11_set_cursor;

  947. 

  948.     return 0;

  949. }

  950. 

  951. #endif /* USE_X11 */