cacalabs
/
libcaca
kopia lustrzana https://github.com/cacalabs/libcaca.git
1
0
Forkuj 0
Kod Zgłoszenia 0 Wydania 7 Wiki Aktywność
Nie możesz wybrać więcej, niż 25 tematów Tematy muszą się zaczynać od litery lub cyfry, mogą zawierać myślniki ('-') i mogą mieć do 35 znaków.
1208 Commity
1 Gałąź
4.9 MiB
 
 
 
 
 
 
Drzewo: 7362a612c4
Gałęzie Tagi
${ item.name }
Utwórz gałąź ${ searchTerm }
z '7362a612c4'
${ noResults }
libcaca/caca/driver_x11.c

802 wiersze
25 KiB
Czysty Wina Historia 

  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$

  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.  */

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

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

  46.                           uint32_t, uint32_t);

  47. 

  48. struct 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. 

  73. static 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.     dp->resize.allow = 1;

  92.     cucul_set_canvas_size(dp->cv, width ? width : 80, height ? height : 32);

  93.     dp->resize.allow = 0;

  94. 

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

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

  97.         return -1;

  98. 

  99. #if defined(HAVE_GETENV)

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

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

  102.         parser = fonts;

  103.     else

  104. #endif

  105.         parser = fonts + 1;

  106. 

  107.     /* Ignore font errors */

  108.     old_error_handler = XSetErrorHandler(x11_error_handler);

  109. 

  110.     /* Parse our font list */

  111.     for( ; ; parser++)

  112.     {

  113.         unsigned int font_max_char;

  114. 

  115.         if(!*parser)

  116.         {

  117.             XSetErrorHandler(old_error_handler);

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

  119.             return -1;

  120.         }

  121. 

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

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

  124.             continue;

  125. 

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

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

  128.         {

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

  130.             continue;

  131.         }

  132. 

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

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

  135.                           - strlen(UNICODE_XLFD_SUFFIX), UNICODE_XLFD_SUFFIX))

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

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

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

  139.                         - strlen(LATIN_1_XLFD_SUFFIX), LATIN_1_XLFD_SUFFIX))

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

  141.         else

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

  143. 

  144.         font_max_char = 

  145.             (((unsigned int)dp->drv.p->font_struct->max_byte1) << 8)

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

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

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

  149. 

  150.         break;

  151.     }

  152. 

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

  154.     XSetErrorHandler(old_error_handler);

  155.     

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

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

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

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

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

  161.     {

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

  163.         {

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

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

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

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

  168.         }

  169.     }

  170. 

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

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

  173. 

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

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

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

  177. 

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

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

  180.     {

  181.         XColor color;

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

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

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

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

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

  187.     }

  188. 

  189.     x11_winattr.backing_store = Always;

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

  191.     x11_winattr.event_mask = ExposureMask | StructureNotifyMask;

  192. 

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

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

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

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

  197.                       0, 0, InputOutput, 0,

  198.                       CWBackingStore | CWBackPixel | CWEventMask,

  199.                       &x11_winattr);

  200. 

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

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

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

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

  205. 

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

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

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

  209. 

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

  211. 

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

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

  214. 

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

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

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

  218. 

  219.     for(;;)

  220.     {

  221.         XEvent xevent;

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

  223.         if(xevent.type == MapNotify)

  224.             break;

  225.     }

  226. 

  227. #if defined(HAVE_X11_XKBLIB_H)

  228.     /* Disable autorepeat */

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

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

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

  232. #endif

  233. 

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

  235.           | ButtonReleaseMask | PointerMotionMask | StructureNotifyMask

  236.           | ExposureMask;

  237. 

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

  239. 

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

  241. 

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

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

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

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

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

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

  248. 

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

  250. 

  251.     return 0;

  252. }

  253. 

  254. static int x11_end_graphics(caca_display_t *dp)

  255. {

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

  257. #if defined(HAVE_X11_XKBLIB_H)

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

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

  260. #endif

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

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

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

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

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

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

  267. 

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

  269. 

  270.     return 0;

  271. }

  272. 

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

  274. {

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

  276.     return 0;

  277. }

  278. 

  279. static unsigned int x11_get_display_width(caca_display_t const *dp)

  280. {

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

  282. }

  283. 

  284. static unsigned int x11_get_display_height(caca_display_t const *dp)

  285. {

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

  287. }

  288. 

  289. static void x11_display(caca_display_t *dp)

  290. {

  291.     unsigned int x, y, len;

  292. 

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

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

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

  296.     {

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

  298.         {

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

  300.             uint16_t bg = _cucul_attr_to_rgb12bg(*attrs);

  301. 

  302.             len = 1;

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

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

  305.                 len++;

  306. 

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

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

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

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

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

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

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

  314.         }

  315.     }

  316. 

  317.     /* Then print the foreground characters */

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

  319.     {

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

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

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

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

  324. 

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

  326.         {

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

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

  329. 

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

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

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

  333.                           *attrs, *chars);

  334.         }

  335.     }

  336. 

  337.     /* Print the cursor if necessary */

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

  339.     {

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

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

  342.         x = cucul_get_cursor_x(dp->cv);

  343.         y = cucul_get_cursor_y(dp->cv);

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

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

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

  347.     }

  348. 

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

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

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

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

  353.               0, 0);

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

  355. }

  356. 

  357. static void x11_handle_resize(caca_display_t *dp)

  358. {

  359.     Pixmap new_pixmap;

  360. 

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

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

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

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

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

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

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

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

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

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

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

  372. }

  373. 

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

  375. {

  376.     XEvent xevent;

  377.     char key;

  378. 

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

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

  381.     {

  382.         KeySym keysym;

  383. 

  384.         /* Expose event */

  385.         if(xevent.type == Expose)

  386.         {

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

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

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

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

  391.             continue;

  392.         }

  393. 

  394.         /* Resize event */

  395.         if(xevent.type == ConfigureNotify)

  396.         {

  397.             unsigned int w, h;

  398. 

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

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

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

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

  403. 

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

  405.                 continue;

  406. 

  407.             dp->resize.w = w;

  408.             dp->resize.h = h;

  409.             dp->resize.resized = 1;

  410. 

  411.             continue;

  412.         }

  413. 

  414.         /* Check for mouse motion events */

  415.         if(xevent.type == MotionNotify)

  416.         {

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

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

  419. 

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

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

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

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

  424. 

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

  426.                 continue;

  427. 

  428.             dp->mouse.x = newx;

  429.             dp->mouse.y = newy;

  430. 

  431.             ev->type = CACA_EVENT_MOUSE_MOTION;

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

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

  434.             return 1;

  435.         }

  436. 

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

  438.         if(xevent.type == ButtonPress)

  439.         {

  440.             ev->type = CACA_EVENT_MOUSE_PRESS;

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

  442.             return 1;

  443.         }

  444. 

  445.         if(xevent.type == ButtonRelease)

  446.         {

  447.             ev->type = CACA_EVENT_MOUSE_RELEASE;

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

  449.             return 1;

  450.         }

  451. 

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

  453.         if(xevent.type == KeyPress)

  454.             ev->type = CACA_EVENT_KEY_PRESS;

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

  456.             ev->type = CACA_EVENT_KEY_RELEASE;

  457.         else

  458.             continue;

  459. 

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

  461.         {

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

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

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

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

  466.             return 1;

  467.         }

  468. 

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

  470.         switch(keysym)

  471.         {

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

  491.             case XK_KP_Page_Up:

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

  493.             case XK_KP_Page_Down:

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

  495.             case XK_KP_Home:

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

  497.             case XK_KP_End:

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

  499. 

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

  501.         }

  502. 

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

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

  505.         return 1;

  506.     }

  507. 

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

  509.     {

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

  511.             continue;

  512. 

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

  514.         {

  515.             ev->type = CACA_EVENT_QUIT;

  516.             return 1;

  517.         }

  518.     }

  519. 

  520.     ev->type = CACA_EVENT_NONE;

  521.     return 0;

  522. }

  523. 

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

  525. {

  526.     Cursor no_ptr;

  527.     Pixmap bm_no;

  528.     XColor black, dummy;

  529.     Colormap colormap;

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

  531. 

  532.     if(flags)

  533.     {

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

  535.         return;

  536.     }

  537. 

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

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

  540.     {

  541.         return;

  542.     }

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

  544.                                   empty, 8, 8);

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

  546.                                  &black, &black, 0, 0);

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

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

  549.     if(bm_no != None)

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

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

  552. 

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

  554. }

  555. 

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

  557. {

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

  559. }

  560. 

  561. /*

  562.  * XXX: following functions are local

  563.  */

  564. 

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

  566. {

  567.     /* Ignore the error */

  568.     return 0;

  569. }

  570. 

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

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

  573. {

  574.     static uint8_t const udlr[] =

  575.     {

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

  577.         0x05, 0x00, 0x50, 0x00, 0x00, 0x00, 0x00, 0x00,

  578.         0x00, 0x00, 0x00, 0x00, 0x11, 0x00, 0x00, 0x00,

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

  580.         0x14, 0x00, 0x00, 0x00, 0x41, 0x00, 0x00, 0x00,

  581.         0x44, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00,

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

  583.         0x00, 0x00, 0x00, 0x00, 0x54, 0x00, 0x00, 0x00,

  584.         0x00, 0x00, 0x00, 0x00, 0x15, 0x00, 0x00, 0x00,

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

  586.         0x00, 0x00, 0x00, 0x00, 0x45, 0x00, 0x00, 0x00,

  587.         0x00, 0x00, 0x00, 0x00, 0x55, 0x00, 0x00, 0x00,

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

  589.         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

  590.         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,

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

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

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

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

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

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

  597.     };

  598. 

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

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

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

  602.     int fw;

  603.     XChar2b ch16;

  604. 

  605.     /* Underline */

  606.     if(attr & CUCUL_UNDERLINE)

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

  608. 

  609.     /* Skip spaces and magic stuff */

  610.     if(ch <= 0x00000020)

  611.         return;

  612. 

  613.     if(ch == CUCUL_MAGIC_FULLWIDTH)

  614.         return;

  615. 

  616.     fw = w;

  617.     if(cucul_utf32_is_fullwidth(ch))

  618.         fw *= 2;

  619. 

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

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

  622.      * characters, print what cucul_utf32_to_ascii() returns. */

  623. 

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

  625.     {

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

  627. 

  628.         if(D & 0x04)

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

  630. 

  631.         if(D & 0x01)

  632.             XFillRectangle(dpy, px, gc,

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

  634. 

  635.         if(D & 0x40)

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

  637. 

  638.         if(D & 0x10)

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

  640. 

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

  642. 

  643.         if(D & 0x08)

  644.         {

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

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

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

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

  649.         }

  650. 

  651.         if(D & 0x02)

  652.         {

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

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

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

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

  657.         }

  658. 

  659.         if(D & 0x80)

  660.         {

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

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

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

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

  665.         }

  666. 

  667.         if(D & 0x20)

  668.         {

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

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

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

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

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

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

  675.         }

  676. 

  677.         return;

  678.     }

  679. 

  680.     switch(ch)

  681.     {

  682.         case 0x000000b7: /* · */

  683.         case 0x00002219: /* ∙ */

  684.         case 0x000030fb: /* ・ */

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

  686.             return;

  687. 

  688.         case 0x00002261: /* ≡ */

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

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

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

  692.             return;

  693. 

  694.         case 0x00002580: /* ▀ */

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

  696.             return;

  697. 

  698.         case 0x00002584: /* ▄ */

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

  700.             return;

  701. 

  702.         case 0x00002588: /* █ */

  703.         case 0x000025ae: /* ▮ */

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

  705.             return;

  706. 

  707.         case 0x0000258c: /* ▌ */

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

  709.             return;

  710. 

  711.         case 0x00002590: /* ▐ */

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

  713.             return;

  714. 

  715.         case 0x000025a0: /* ■ */

  716.         case 0x000025ac: /* ▬ */

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

  718.             return;

  719. 

  720.         case 0x00002593: /* ▓ */

  721.         case 0x00002592: /* ▒ */

  722.         case 0x00002591: /* ░ */

  723.         {

  724.             /* FIXME: this sucks utterly */

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

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

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

  728.             {

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

  730.                     continue;

  731. 

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

  733.             }

  734.             return;

  735.         }

  736. 

  737.         case 0x000025cb: /* ○ */

  738.         case 0x00002022: /* • */

  739.         case 0x000025cf: /* ● */

  740.         {

  741.             int d, xo, yo;

  742. 

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

  744.             if(h < fw)

  745.                 d = h;

  746.             if(d < 1)

  747.                 d = 1;

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

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

  750.             if(ch == 0x000025cb)

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

  752.             else

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

  754.             return;

  755.         }

  756.     }

  757. 

  758.     if(ch >= 0x00000020 && ch <= dp->drv.p->max_char)

  759.     {

  760.         /* ascii, latin-1 or unicode font (might draw a blank square) */

  761.         ch16.byte1 = (ch) >> 8;

  762.         ch16.byte2 = (ch) & 0xff;

  763.     }

  764.     else

  765.     {

  766.         ch16.byte1 = 0;

  767.         ch16.byte2 = cucul_utf32_to_ascii(ch);

  768.     }

  769. 

  770.     XDrawString16(dpy, px, gc, x + (ch16.byte1 ? 0 : (fw - w) / 2), yoff, &ch16, 1);

  771. }

  772. 

  773. /*

  774.  * Driver initialisation

  775.  */

  776. 

  777. int x11_install(caca_display_t *dp)

  778. {

  779. #if defined(HAVE_GETENV)

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

  781.         return -1;

  782. #endif

  783. 

  784.     dp->drv.driver = CACA_DRIVER_X11;

  785. 

  786.     dp->drv.init_graphics = x11_init_graphics;

  787.     dp->drv.end_graphics = x11_end_graphics;

  788.     dp->drv.set_display_title = x11_set_display_title;

  789.     dp->drv.get_display_width = x11_get_display_width;

  790.     dp->drv.get_display_height = x11_get_display_height;

  791.     dp->drv.display = x11_display;

  792.     dp->drv.handle_resize = x11_handle_resize;

  793.     dp->drv.get_event = x11_get_event;

  794.     dp->drv.set_mouse = x11_set_mouse;

  795.     dp->drv.set_cursor = x11_set_cursor;

  796. 

  797.     return 0;

  798. }

  799. 

  800. #endif /* USE_X11 */