VCVRack
/
Rack
mirror of https://github.com/VCVRack/Rack.git
1
0
Fork 0
Code Issues 0 Releases 43 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.
1181 Commits
4 Branches
540MB
Tree: 30cc445cde
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '30cc445cde'
${ noResults }
Rack/dep/lglw/lglw_linux.c

2195 lines
71KB
Raw Blame History 

  1. /* ----

  2.  * ---- file   : lglw_linux.c  (**stub**)

  3.  * ---- author : bsp

  4.  * ---- legal  : Distributed under terms of the MIT LICENSE (MIT).

  5.  * ----

  6.  * ---- Permission is hereby granted, free of charge, to any person obtaining a copy

  7.  * ---- of this software and associated documentation files (the "Software"), to deal

  8.  * ---- in the Software without restriction, including without limitation the rights

  9.  * ---- to use, copy, modify, merge, publish, distribute, sublicense, and/or sell

  10.  * ---- copies of the Software, and to permit persons to whom the Software is

  11.  * ---- furnished to do so, subject to the following conditions:

  12.  * ----

  13.  * ---- The above copyright notice and this permission notice shall be included in

  14.  * ---- all copies or substantial portions of the Software.

  15.  * ----

  16.  * ---- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR

  17.  * ---- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,

  18.  * ---- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE

  19.  * ---- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER

  20.  * ---- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,

  21.  * ---- OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN

  22.  * ---- THE SOFTWARE.

  23.  * ----

  24.  * ---- info   : This is part of the "lglw" package.

  25.  * ----

  26.  * ---- created: 04Aug2018

  27.  * ---- changed: 05Aug2018, 06Aug2018, 07Aug2018, 08Aug2018, 09Aug2018, 18Aug2018, 10Oct2018, 16Oct2018

  28.  * ----

  29.  * ----

  30.  */

  31. 

  32. #include "lglw.h"

  33. 

  34. #include <stdlib.h>

  35. #include <stdio.h>

  36. #include <string.h>

  37. 

  38. #include <X11/Xlib.h>

  39. #include <X11/Xutil.h>

  40. #include <X11/Xos.h>

  41. 

  42. #include <GL/gl.h>

  43. #include <GL/glx.h>

  44. 

  45. #ifdef ARCH_X64

  46. #include <sys/mman.h>

  47. #include <unistd.h>

  48. #endif // ARCH_X64

  49. 

  50. //

  51. // Regular log entry (low frequency)

  52. //

  53. // #define Dlog_verbose if(1);else lglw_log

  54. #define Dlog if(0);else lglw_log

  55. 

  56. //

  57. // Verbose log entry

  58. //

  59. // #define Dlog_v if(1);else lglw_log

  60. #define Dlog_v if(0);else lglw_log

  61. 

  62. //

  63. // Very-verbose log entry

  64. //

  65. // #define Dlog_vv if(1);else lglw_log

  66. #define Dlog_vv if(0);else lglw_log

  67. 

  68. //

  69. // Very-very-verbose log entry

  70. //

  71. #define Dlog_vvv if(1);else lglw_log

  72. // #define Dlog_vvv if(0);else lglw_log

  73. 

  74. //

  75. // Print to stdout

  76. //

  77. //   Please use the Dlog* macros instead!

  78. //

  79. #define Dprintf if(0);else printf

  80. // #define Dprintf if(1);else printf

  81. 

  82. #define Dprintf_verbose if(1);else printf

  83. // #define Dprintf_verbose if(0);else printf

  84. 

  85. // ---------------------------------------------------------------------------- macros and defines

  86. #define LGLW(a) lglw_int_t *lglw = ((lglw_int_t*)(a))

  87. 

  88. #define LGLW_DEFAULT_HIDDEN_W  (800)

  89. #define LGLW_DEFAULT_HIDDEN_H  (600)

  90. 

  91. #define LGLW_MOUSE_TOUCH_LMB_TIMEOUT   (250u)

  92. #define LGLW_MOUSE_TOUCH_RMB_TIMEOUT   (500u)

  93. #define LGLW_MOUSE_TOUCH_RMB_STATE_IDLE  (0u)

  94. #define LGLW_MOUSE_TOUCH_RMB_STATE_LMB   (1u)

  95. #define LGLW_MOUSE_TOUCH_RMB_STATE_WAIT  (2u)

  96. #define LGLW_MOUSE_TOUCH_RMB_STATE_RMB   (3u)

  97. #define LGLW_MOUSE_TOUCH_RMB_MOVE_THRESHOLD  (7u)

  98. 

  99. #define sABS(x) (((x)>0)?(x):-(x))

  100. 

  101. 

  102. // ---------------------------------------------------------------------------- structs and typedefs

  103. typedef struct lglw_int_s {

  104.    void        *user_data;    // arbitrary user data

  105.    Display     *xdsp;

  106.    XVisualInfo *vi;

  107.    Colormap     cmap;

  108.    Window       parent_xwnd;  // created by host

  109. 

  110.    struct {

  111.       lglw_vec2i_t size;

  112.       Window       xwnd;

  113.    } hidden;

  114. 

  115.    struct {

  116.       lglw_vec2i_t size;

  117.       Window       xwnd;

  118.       lglw_bool_t  mapped;

  119.       int32_t      swap_interval;

  120.       lglw_bool_t  b_owner;

  121.    } win;

  122. 

  123.    GLXContext   ctx;

  124. 

  125.    struct {

  126.       GLXContext   ctx;

  127.       GLXDrawable  drw;

  128.    } prev;

  129. 

  130.    struct {

  131.       uint32_t            kmod_state;  // See LGLW_KMOD_xxx

  132.       lglw_keyboard_fxn_t cbk;

  133.    } keyboard;

  134. 

  135.    struct {

  136.       lglw_vec2i_t     p;  // last seen mouse position

  137.       uint32_t         button_state;

  138.       lglw_mouse_fxn_t cbk;

  139.       struct {

  140.          uint32_t         mode;

  141.          lglw_vec2i_t     p;  // grab-start mouse position

  142.          lglw_bool_t      b_queue_warp;

  143.          lglw_vec2i_t     last_p;

  144.       } grab;

  145.       struct {

  146.          lglw_bool_t      b_enable;

  147.          lglw_bool_t      b_update_queued;

  148.          lglw_bool_t      b_syn_rmb;

  149.          uint32_t         syn_rmb_hold_state;  // see LGLW_MOUSE_TOUCH_RMB_STATE_xxx

  150.          uint32_t         hold_start_ms;

  151.          lglw_vec2i_t     hold_start_p;

  152.       } touch;

  153.    } mouse;

  154. 

  155.    struct {

  156.       uint32_t         state;

  157.       lglw_focus_fxn_t cbk;

  158.    } focus;

  159. 

  160.    struct {

  161.       lglw_bool_t      b_running;

  162.       lglw_timer_fxn_t cbk;

  163.       struct timeval   tv_start;

  164.       uint32_t         interval_ms;

  165.       uint32_t         last_ms;

  166.    } timer;

  167. 

  168.    struct {

  169.       uint32_t numChars;

  170.       char *data;

  171.    } clipboard;

  172. 

  173.    struct {

  174.       lglw_dropfiles_fxn_t cbk;

  175.    } dropfiles;

  176. 

  177.    struct {

  178.       lglw_redraw_fxn_t cbk;

  179.    } redraw;

  180. 

  181. } lglw_int_t;

  182. 

  183. 

  184. // ---------------------------------------------------------------------------- module fxn fwd decls

  185. static lglw_bool_t loc_create_hidden_window (lglw_int_t *lglw, int32_t _w, int32_t _h);

  186. static void loc_destroy_hidden_window(lglw_int_t *lglw);

  187. 

  188. static lglw_bool_t loc_handle_key (lglw_int_t *lglw, lglw_bool_t _bPressed, uint32_t _vkey);

  189. // static lglw_bool_t loc_touchkeyboard_get_rect (RECT *rect);

  190. // static lglw_bool_t loc_touchkeyboard_is_visible (void);

  191. extern lglw_bool_t lglw_int_touchkeyboard_toggle (void);

  192. 

  193. static void loc_handle_mouseleave (lglw_int_t *lglw);

  194. static void loc_handle_mouseenter (lglw_int_t *lglw);

  195. static void loc_handle_mousebutton (lglw_int_t *lglw, lglw_bool_t _bPressed, uint32_t _button);

  196. static void loc_handle_mousemotion (lglw_int_t *lglw);

  197. static void loc_handle_queued_mouse_warp (lglw_int_t *lglw);

  198. 

  199. static void loc_enable_dropfiles (lglw_int_t *lglw, lglw_bool_t _bEnable);

  200. 

  201. static void loc_eventProc (XEvent *xev, lglw_int_t *lglw);

  202. static void loc_XEventProc (void *_xevent);

  203. static void loc_setProperty (Display *_display, Window _window, const char *_name, void *_value);

  204. static void *loc_getProperty (Display *_display, Window _window, const char *_name);

  205. static void loc_setEventProc (Display *display, Window window);

  206. 

  207. static void loc_millisec_init (lglw_int_t *lglw);

  208. static uint32_t loc_millisec_delta (lglw_int_t *lglw);  // return millisec since init()

  209. static void loc_process_timer (lglw_int_t *lglw);

  210. 

  211. 

  212. // ---------------------------------------------------------------------------- lglw_millisec_init

  213. static void loc_millisec_init (lglw_int_t *lglw) {

  214.    gettimeofday(&lglw->timer.tv_start, 0);

  215. }

  216. 

  217. // ---------------------------------------------------------------------------- lglw_millisec_delta

  218. static uint32_t loc_millisec_delta (lglw_int_t *lglw) {

  219.    struct timeval c; gettimeofday(&c, 0);

  220.    const struct timeval*s =  &lglw->timer.tv_start;

  221.    return (uint32_t) ( (c.tv_sec-s->tv_sec)*1000 + (c.tv_usec-s->tv_usec)/1000 );

  222. }

  223. 

  224. 

  225. // TODO: remove and/or improve debug logging for a debug build

  226. // ---------------------------------------------------------------------------- lglw_log

  227. static FILE *logfile;

  228. 

  229. void lglw_log(const char *logData, ...) {

  230.    fprintf(logfile, logData);

  231.    fflush(logfile);

  232.    printf(logData);

  233. }

  234. 

  235. 

  236. // TODO: remove, or maybe not in some specific use cases

  237. // ---------------------------------------------------------------------------- xerror_log

  238. static int xerror_handler(Display *display, XErrorEvent *error) {

  239.    char error_text[1024];

  240.    XGetErrorText(display, error->error_code, error_text, 1024);

  241.    Dlog("XERROR (%d): %s, %d, %d\n", error->error_code, error_text, error->request_code, error->minor_code);

  242.    return 0;

  243. }

  244. 

  245. 

  246. // ---------------------------------------------------------------------------- lglw_init

  247. lglw_t lglw_init(int32_t _w, int32_t _h) {

  248.    lglw_int_t *lglw = malloc(sizeof(lglw_int_t));

  249. 

  250.    Dprintf("xxx lglw_init: sizeof(uint32_t)=%lu sizeof(long)=%lu sizeof(void*)=%lu\n", sizeof(uint32_t), sizeof(long), sizeof(void*));

  251. 

  252.    // TODO: remove/improve

  253.    logfile = fopen("/tmp/lglw_log.txt", "w");

  254.    XSetErrorHandler(xerror_handler);

  255.    XInitThreads();  // fix GL crash, see <https://forum.juce.com/t/linux-vst-opengl-crash-because-xinitthreads-not-called/22821>

  256.    

  257.    loc_millisec_init(lglw);

  258. 

  259.    if(NULL != lglw)

  260.    {

  261.       memset(lglw, 0, sizeof(lglw_int_t));

  262. 

  263.       Dlog("lglw:lglw_init: 1\n");

  264.       if(_w <= 16)

  265.          _w = LGLW_DEFAULT_HIDDEN_W;

  266. 

  267.       if(_h <= 16)

  268.          _h = LGLW_DEFAULT_HIDDEN_H;

  269. 

  270.       Dlog("lglw:lglw_init: 2\n");

  271.       if(!loc_create_hidden_window(lglw, _w, _h))

  272.       {

  273.          free(lglw);

  274.          lglw = NULL;

  275.       }

  276.       Dlog("lglw:lglw_init: 3\n");

  277.    }

  278. 

  279.    Dlog("lglw:lglw_init: EXIT\n");

  280. 

  281.    return lglw;

  282. }

  283. 

  284. 

  285. // ---------------------------------------------------------------------------- lglw_exit

  286. void lglw_exit(lglw_t _lglw) {

  287.    LGLW(_lglw);

  288. 

  289.    if(NULL != lglw)

  290.    {

  291.       Dlog("lglw:lglw_exit: 1\n");

  292. 

  293.       loc_destroy_hidden_window(lglw);

  294. 

  295.       Dlog("lglw:lglw_exit: 2\n");

  296. 

  297.       fclose(logfile);

  298.       free(lglw);

  299.    }

  300. }

  301. 

  302. 

  303. // ---------------------------------------------------------------------------- lglw_userdata_set

  304. void lglw_userdata_set(lglw_t _lglw, void *_userData) {

  305.    LGLW(_lglw);

  306. 

  307.    if(NULL != lglw)

  308.    {

  309.       Dlog_vvv("lglw:lglw_userdata_set: ptr=%p\n", _userData);

  310.       lglw->user_data = _userData;

  311.    }

  312. }

  313. 

  314. // ---------------------------------------------------------------------------- lglw_userdata_get

  315. void *lglw_userdata_get(lglw_t _lglw) {

  316.    LGLW(_lglw);

  317. 

  318.    if(NULL != lglw)

  319.    {

  320.       Dlog_vvv("lglw:lglw_userdata_get: return ptr=%p\n", lglw->user_data);

  321.       return lglw->user_data;

  322.    }

  323. 

  324.    return NULL;

  325. }

  326. 

  327. 

  328. // ---------------------------------------------------------------------------- loc_create_hidden_window

  329. static lglw_bool_t loc_create_hidden_window(lglw_int_t *lglw, int32_t _w, int32_t _h) {

  330. 

  331.    // TODO: compare to 'WindowClass' from Windows implementation

  332. 

  333.    Dlog_v("lglw:loc_create_hidden_window: 1\n");

  334.    XSetWindowAttributes swa;

  335.    int attrib[] = { GLX_RGBA, GLX_DOUBLEBUFFER, GLX_DEPTH_SIZE, 24, None };

  336.    int screen;

  337. 

  338.    Dlog_v("lglw:loc_create_hidden_window: 2\n");

  339.    lglw->xdsp = XOpenDisplay(NULL);

  340.    screen = DefaultScreen(lglw->xdsp);

  341. 

  342.    Dlog_v("lglw:loc_create_hidden_window: 3\n");

  343.    lglw->vi = glXChooseVisual(lglw->xdsp, screen, attrib);

  344. 

  345.    Dlog_v("lglw:loc_create_hidden_window: 4\n");

  346.    if(NULL == lglw->vi)

  347.    {

  348.       Dlog("[---] lglw: failed to find GLX Visual for hidden window\n");

  349.       return LGLW_FALSE;

  350.    }

  351. 

  352.    Dlog_v("lglw:loc_create_hidden_window: 5\n");

  353.    lglw->ctx = glXCreateContext(lglw->xdsp, lglw->vi, None, True);

  354. 

  355.    Dlog_v("lglw:loc_create_hidden_window: 6\n");

  356.    if(NULL == lglw->ctx)

  357.    {

  358.       Dlog("[---] lglw: failed to create GLX Context for hidden window\n");

  359.       return LGLW_FALSE;

  360.    }

  361. 

  362.    Dlog_v("lglw:loc_create_hidden_window: 7\n");

  363.    lglw->cmap = XCreateColormap(lglw->xdsp, RootWindow(lglw->xdsp, lglw->vi->screen),

  364.                                 lglw->vi->visual, AllocNone);

  365. 

  366.    Dlog_v("lglw:loc_create_hidden_window: 8\n");

  367.    swa.border_pixel = 0;

  368.    swa.colormap = lglw->cmap;

  369.    lglw->hidden.xwnd = XCreateWindow(lglw->xdsp, DefaultRootWindow(lglw->xdsp),

  370.                                      0, 0, LGLW_DEFAULT_HIDDEN_W, LGLW_DEFAULT_HIDDEN_H, 0, CopyFromParent, InputOutput,

  371.                                      lglw->vi->visual, CWBorderPixel | CWColormap, &swa);

  372. 

  373.    Dlog_v("lglw:loc_create_hidden_window: 9\n");

  374.    XSetStandardProperties(lglw->xdsp, lglw->hidden.xwnd, "LGLW_hidden", "LGLW_hidden", None, NULL, 0, NULL);

  375.    XSync(lglw->xdsp, False);

  376. 

  377.    Dlog_v("lglw:loc_create_hidden_window: EXIT\n");

  378.    lglw->hidden.size.x = _w;

  379.    lglw->hidden.size.y = _h;

  380. 

  381.    return LGLW_TRUE;

  382. }

  383. 

  384. 

  385. // ---------------------------------------------------------------------------- loc_destroy_hidden_window

  386. static void loc_destroy_hidden_window(lglw_int_t *lglw) {

  387.    Dlog_v("lglw:loc_destroy_hidden_window: 1\n");

  388.    if(NULL != lglw->xdsp && NULL != lglw->ctx)

  389.    {

  390.       glXMakeCurrent(lglw->xdsp, None, NULL);

  391.       glXDestroyContext(lglw->xdsp, lglw->ctx);

  392.    }

  393.    Dlog_v("lglw:loc_destroy_hidden_window: 2\n");

  394.    if(NULL != lglw->xdsp && 0 != lglw->hidden.xwnd) XDestroyWindow(lglw->xdsp, lglw->hidden.xwnd);

  395.    Dlog_v("lglw:loc_destroy_hidden_window: 3\n");

  396.    if(NULL != lglw->xdsp && 0 != lglw->cmap) XFreeColormap(lglw->xdsp, lglw->cmap);

  397.    Dlog_v("lglw:loc_destroy_hidden_window: 4\n");

  398.    if(NULL != lglw->vi) XFree(lglw->vi);

  399. 

  400.    Dlog_v("lglw:loc_destroy_hidden_window: 5\n");

  401.    XSync(lglw->xdsp, False);

  402.    if(NULL != lglw->xdsp) XCloseDisplay(lglw->xdsp);

  403. }

  404. 

  405. 

  406. // ---------------------------------------------------------------------------- loc_setEventProc

  407. // https://www.kvraudio.com/forum/viewtopic.php?t=387924

  408. // https://github.com/Ardour/ardour/blob/master/gtk2_ardour/linux_vst_gui_support.cc

  409. // https://discourse.ardour.org/t/overtonedsp-plugins/90115/22

  410. // https://github.com/amsynth/amsynth/blob/4a87798e650c6d71d70274a961c9b8d98fc6da7e/src/amsynth_vst.cpp

  411. // https://github.com/rsenn/eXT2/blob/7f00a09561ded8175ffed2f4912dad74e466a1c7/vstplugins/vstgui/vstgui.cpp

  412. // https://github.com/COx2/DistortionFilter/blob/c6a34fb56b503a6e95bf0975e00f438bbf4ff52a/juce/modules/juce_audio_processors/format_types/juce_VSTPluginFormat.cpp

  413. 

  414. // Very simple function to test _XEventProc is properly called

  415. static void loc_eventProc(XEvent *xev, lglw_int_t *lglw) {

  416. 

  417.    Dlog_vvv("lglw:loc_eventProc: type=%d serial=%lu send_event=%d lglw=%p\n", xev->xany.type, xev->xany.serial, xev->xany.send_event, lglw);

  418. 

  419.    loc_process_timer(lglw);

  420. 

  421.    if(NULL != lglw)

  422.    {

  423.       lglw_bool_t eventHandled = LGLW_FALSE;

  424. 

  425.       switch(xev->type)

  426.       {

  427.          default:

  428.             Dlog("lglw:loc_eventProc: unhandled X11 event type=%d\n", xev->type);

  429.             eventHandled = LGLW_FALSE;

  430.             break;

  431. 

  432.          case Expose:

  433.             Dlog_v("lglw:loc_eventProc: xev Expose\n");

  434.             loc_handle_queued_mouse_warp(lglw);

  435.             eventHandled = LGLW_FALSE;

  436.             if(NULL != lglw->redraw.cbk)

  437.             {

  438.                lglw->redraw.cbk(lglw);

  439.                eventHandled = LGLW_TRUE;

  440.             }

  441.             break;

  442. 

  443.             // TODO: Should FocusIn/Out be treated like WM_CAPTURECHANGED and reset the grab state?

  444. 

  445.          case FocusIn:

  446.             Dlog_v("lglw:loc_eventProc: xev FocusIn\n");

  447.             eventHandled = LGLW_FALSE;

  448.             break;

  449. 

  450.          case FocusOut:

  451.             Dlog_v("lglw:loc_eventProc: xev FocusOut\n");

  452.             eventHandled = LGLW_FALSE;

  453.             break;

  454. 

  455.          case EnterNotify:

  456.             // Dlog_v("lglw:loc_eventProc: xev XEnterWindowEvent\n");

  457.             ; // empty statement

  458.             XEnterWindowEvent *wenter = (XEnterWindowEvent*)xev;

  459.             Dlog_v("lglw:loc_eventProc: xev EnterNotify: mode:%i, detail:%i, state:%d\n", wenter->mode, wenter->detail, wenter->state);

  460.             lglw->mouse.p.x = wenter->x;

  461.             lglw->mouse.p.y = wenter->y;

  462.             loc_handle_mousemotion(lglw);

  463. 

  464.             // EnterNotify messages can be pseudo-motion events (NotifyGrab, NotifyUngrab)

  465.             // when buttons are pressed, which would trigger false focus changes

  466.             // so, the callback is only sent when a normal entry happens

  467.             if (wenter->mode == NotifyNormal)

  468.             {

  469.                loc_handle_mouseenter(lglw);

  470.             }

  471.             eventHandled = LGLW_TRUE;

  472. 

  473.             break;

  474. 

  475.          case LeaveNotify:

  476.             // Dlog_v("lglw:loc_eventProc: xev XLeaveWindowEvent\n");

  477.             ; // empty statement

  478.             XLeaveWindowEvent *wexit = (XLeaveWindowEvent*)xev;

  479.             Dlog_v("lglw:loc_eventProc: xev LeaveNotify: mode:%i, detail:%i, state:%d\n", wexit->mode, wexit->detail, wexit->state);

  480. 

  481.             // LeaveNotify messages can be pseudo-motion events (NotifyGrab, NotifyUngrab)

  482.             // when buttons are pressed, which would trigger false focus changes

  483.             // so, the callback is only sent when a normal entry happens

  484.             if (wexit->mode == NotifyNormal)

  485.             {

  486.                loc_handle_mouseleave(lglw);

  487.             }

  488.             eventHandled = LGLW_TRUE;

  489. 

  490.             break;

  491. 

  492.          case MotionNotify:

  493.             Dlog_v("lglw:loc_eventProc: xev MotionNotify\n");

  494.             ; // empty statement

  495.             XMotionEvent *motion = (XMotionEvent*)xev;

  496. 

  497.             if(LGLW_MOUSE_GRAB_WARP == lglw->mouse.grab.mode)

  498.             {

  499.                lglw->mouse.grab.b_queue_warp = LGLW_TRUE;

  500. 

  501.                lglw->mouse.p.x += (motion->x - lglw->mouse.grab.last_p.x);

  502.                lglw->mouse.p.y += (motion->y - lglw->mouse.grab.last_p.y);

  503. 

  504.                lglw->mouse.grab.last_p.x = motion->x;

  505.                lglw->mouse.grab.last_p.y = motion->y;

  506.             }

  507.             else

  508.             {

  509.                lglw->mouse.p.x = motion->x;

  510.                lglw->mouse.p.y = motion->y;

  511.             }

  512. 

  513.             loc_handle_mousemotion(lglw);

  514.             eventHandled = LGLW_TRUE;

  515. 

  516.             break;

  517. 

  518.          case KeyPress:

  519.             Dlog("lglw:loc_eventProc: xev KeyPress\n");

  520.             XKeyPressedEvent *keyPress = (XKeyPressedEvent*)xev;

  521. 

  522.             eventHandled = LGLW_FALSE;

  523.             KeySym xkp = XLookupKeysym(keyPress, 0);

  524.             switch(xkp)

  525.             {

  526.                default:

  527.                   Dlog("lglw:loc_eventProc: xev KeyPress: %x or %lu\n", keyPress->keycode, xkp);

  528.                   if(0u != (lglw->keyboard.kmod_state & LGLW_KMOD_SHIFT))

  529.                   {

  530.                      KeySym xkpl;

  531.                      KeySym xkpu;

  532.                      XConvertCase(xkp, &xkpl, &xkpu);

  533.                      eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, xkpu);

  534.                   }

  535.                   else

  536.                   {

  537.                      eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, xkp);

  538.                   }

  539.                   break;

  540. 

  541.                case NoSymbol:

  542.                   Dlog("lglw:loc_eventProc: xev UNKNOWN KeyPress: %x\n", keyPress->keycode);

  543.                   break;

  544. 

  545.                case XK_Left:

  546.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_LEFT);

  547.                   break;

  548. 

  549.                case XK_Right:

  550.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_RIGHT);

  551.                   break;

  552. 

  553.                case XK_Up:

  554.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_UP);

  555.                   break;

  556. 

  557.                case XK_Down:

  558.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_DOWN);

  559.                   break;

  560. 

  561.                case XK_Insert:

  562.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_INSERT);

  563.                   break;

  564. 

  565.                case XK_Delete:

  566.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_DELETE);

  567.                   break;

  568. 

  569.                case XK_Home:

  570.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_HOME);

  571.                   break;

  572. 

  573.                case XK_End:

  574.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_END);

  575.                   break;

  576. 

  577.                case XK_F1:

  578.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F1);

  579.                   break;

  580. 

  581.                case XK_F2:

  582.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F2);

  583.                   break;

  584. 

  585.                case XK_F3:

  586.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F3);

  587.                   break;

  588. 

  589.                case XK_F4:

  590.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F4);

  591.                   break;

  592. 

  593.                case XK_F5:

  594.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F5);

  595.                   break;

  596. 

  597.                case XK_F6:

  598.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F6);

  599.                   break;

  600. 

  601.                case XK_F7:

  602.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F7);

  603.                   break;

  604. 

  605.                case XK_F8:

  606.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F8);

  607.                   break;

  608. 

  609.                case XK_F9:

  610.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F9);

  611.                   break;

  612. 

  613.                case XK_F10:

  614.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F10);

  615.                   break;

  616. 

  617.                case XK_F11:

  618.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F11);

  619.                   break;

  620. 

  621.                case XK_F12:

  622.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_F12);

  623.                   break;

  624. 

  625.                case XK_BackSpace:

  626.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_BACKSPACE);

  627.                   break;

  628. 

  629.                case XK_Tab:

  630.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_TAB);

  631.                   break;

  632. 

  633.                case XK_Return:

  634.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_RETURN);

  635.                   break;

  636. 

  637.                case XK_Escape:

  638.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_ESCAPE);

  639.                   break;

  640. 

  641.                case XK_Shift_L:

  642.                   lglw->keyboard.kmod_state |= LGLW_KMOD_LSHIFT;

  643.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_LSHIFT);

  644.                   eventHandled = LGLW_FALSE;

  645.                   break;

  646. 

  647.                case XK_Shift_R:

  648.                   lglw->keyboard.kmod_state |= LGLW_KMOD_RSHIFT;

  649.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_VKEY_RSHIFT);

  650.                   eventHandled = LGLW_FALSE;

  651.                   break;

  652. 

  653.                case XK_Control_L:

  654.                   lglw->keyboard.kmod_state |= LGLW_KMOD_LCTRL;

  655.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_KMOD_LCTRL);

  656.                   eventHandled = LGLW_FALSE;

  657.                   break;

  658. 

  659.                case XK_Control_R:

  660.                   lglw->keyboard.kmod_state |= LGLW_KMOD_RCTRL;

  661.                   eventHandled = loc_handle_key(lglw, LGLW_TRUE/*bPressed*/, LGLW_KMOD_RCTRL);

  662.                   eventHandled = LGLW_FALSE;

  663.                   break;

  664.             }

  665. 

  666.             break;

  667. 

  668.          case KeyRelease:

  669.             Dlog("lglw:loc_eventProc: xev KeyRelease\n");

  670.             XKeyReleasedEvent *keyRelease = (XKeyReleasedEvent*)xev;

  671. 

  672.             eventHandled = LGLW_FALSE;

  673.             KeySym xkr = XLookupKeysym(keyRelease, 0);

  674.             switch(xkr)

  675.             {

  676.                default:

  677.                   Dlog("lglw:loc_eventProc: xev KeyRelease: %x or %lu\n", keyRelease->keycode, xkr);

  678.                   if(0u != (lglw->keyboard.kmod_state & LGLW_KMOD_SHIFT))

  679.                   {

  680.                      KeySym xkrl;

  681.                      KeySym xkru;

  682.                      XConvertCase(xkr, &xkrl, &xkru);

  683.                      eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, xkru);

  684.                   }

  685.                   else

  686.                   {

  687.                      eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, xkr);

  688.                   }

  689.                   break;

  690. 

  691.                case NoSymbol:

  692.                   Dlog("lglw:loc_eventProc: xev UNKNOWN KeyRelease: %x\n", keyRelease->keycode);

  693.                   break;

  694. 

  695.                case XK_Left:

  696.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_LEFT);

  697.                   break;

  698. 

  699.                case XK_Right:

  700.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_RIGHT);

  701.                   break;

  702. 

  703.                case XK_Up:

  704.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_UP);

  705.                   break;

  706. 

  707.                case XK_Down:

  708.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_DOWN);

  709.                   break;

  710. 

  711.                case XK_Insert:

  712.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_INSERT);

  713.                   break;

  714. 

  715.                case XK_Delete:

  716.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_DELETE);

  717.                   break;

  718. 

  719.                case XK_Home:

  720.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_HOME);

  721.                   break;

  722. 

  723.                case XK_End:

  724.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_END);

  725.                   break;

  726. 

  727.                case XK_F1:

  728.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F1);

  729.                   break;

  730. 

  731.                case XK_F2:

  732.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F2);

  733.                   break;

  734. 

  735.                case XK_F3:

  736.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F3);

  737.                   break;

  738. 

  739.                case XK_F4:

  740.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F4);

  741.                   break;

  742. 

  743.                case XK_F5:

  744.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F5);

  745.                   break;

  746. 

  747.                case XK_F6:

  748.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F6);

  749.                   break;

  750. 

  751.                case XK_F7:

  752.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F7);

  753.                   break;

  754. 

  755.                case XK_F8:

  756.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F8);

  757.                   break;

  758. 

  759.                case XK_F9:

  760.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F9);

  761.                   break;

  762. 

  763.                case XK_F10:

  764.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F10);

  765.                   break;

  766. 

  767.                case XK_F11:

  768.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F11);

  769.                   break;

  770. 

  771.                case XK_F12:

  772.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_F12);

  773.                   break;

  774. 

  775.                case XK_BackSpace:

  776.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_BACKSPACE);

  777.                   break;

  778. 

  779.                case XK_Tab:

  780.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_TAB);

  781.                   break;

  782. 

  783.                case XK_Return:

  784.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_RETURN);

  785.                   break;

  786. 

  787.                case XK_Escape:

  788.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_ESCAPE);

  789.                   break;

  790. 

  791.                case XK_Shift_L:

  792.                   lglw->keyboard.kmod_state &= ~LGLW_KMOD_LSHIFT;

  793.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_LSHIFT);

  794.                   eventHandled = LGLW_FALSE;

  795.                   break;

  796. 

  797.                case XK_Shift_R:

  798.                   lglw->keyboard.kmod_state &= ~LGLW_KMOD_RSHIFT;

  799.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_RSHIFT);

  800.                   eventHandled = LGLW_FALSE;

  801.                   break;

  802. 

  803.                case XK_Control_L:

  804.                   lglw->keyboard.kmod_state &= ~LGLW_KMOD_LCTRL;

  805.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_LCTRL);

  806.                   eventHandled = LGLW_FALSE;

  807.                   break;

  808. 

  809.                case XK_Control_R:

  810.                   lglw->keyboard.kmod_state &= ~LGLW_KMOD_RCTRL;

  811.                   eventHandled = loc_handle_key(lglw, LGLW_FALSE/*bPressed*/, LGLW_VKEY_RCTRL);

  812.                   eventHandled = LGLW_FALSE;

  813.                   break;

  814.             }

  815. 

  816.             break;

  817. 

  818.          case ButtonPress:

  819.             Dlog("lglw:loc_eventProc: xev ButtonPress\n");

  820.             XButtonPressedEvent *btnPress = (XButtonPressedEvent*)xev;

  821.             lglw->mouse.p.x = btnPress->x;

  822.             lglw->mouse.p.y = btnPress->y;

  823. 

  824.             if(0u == (lglw->focus.state & LGLW_FOCUS_MOUSE))

  825.             {

  826.                loc_handle_mouseenter(lglw);

  827.             }

  828. 

  829.             switch(btnPress->button)

  830.             {

  831.                default:

  832.                   Dlog("lglw:loc_eventProc: xev ButtonPress unhandled button: %i\n", btnPress->button);

  833.                   eventHandled = LGLW_FALSE;

  834.                   break;

  835.                case Button1:

  836.                   loc_handle_mousebutton(lglw, LGLW_TRUE/*bPressed*/, LGLW_MOUSE_LBUTTON);

  837.                   eventHandled = LGLW_TRUE;

  838.                   break;

  839.                case Button2:

  840.                   loc_handle_mousebutton(lglw, LGLW_TRUE/*bPressed*/, LGLW_MOUSE_MBUTTON);

  841.                   eventHandled = LGLW_TRUE;

  842.                   break;

  843.                case Button3:

  844.                   loc_handle_mousebutton(lglw, LGLW_TRUE/*bPressed*/, LGLW_MOUSE_RBUTTON);

  845.                   eventHandled = LGLW_TRUE;

  846.                   break;

  847.                case Button4:

  848.                   loc_handle_mousebutton(lglw, LGLW_TRUE/*bPressed*/, LGLW_MOUSE_WHEELUP);

  849.                   eventHandled = LGLW_TRUE;

  850.                   break;

  851.                case Button5:

  852.                   loc_handle_mousebutton(lglw, LGLW_TRUE/*bPressed*/, LGLW_MOUSE_WHEELDOWN);

  853.                   eventHandled = LGLW_TRUE;

  854.                   break;

  855.             }

  856.             break;

  857. 

  858.          case ButtonRelease:

  859.             Dlog("lglw:loc_eventProc: xev ButtonRelease\n");

  860.             XButtonReleasedEvent *btnRelease = (XButtonReleasedEvent*)xev;

  861.             lglw->mouse.p.x = btnRelease->x;

  862.             lglw->mouse.p.y = btnRelease->y;

  863.             switch(btnRelease->button)

  864.             {

  865.                default:

  866.                   Dlog("lglw:loc_eventProc: xev ButtonRelease unhandled button: %i\n", btnRelease->button);

  867.                   eventHandled = LGLW_FALSE;

  868.                   break;

  869.                case Button1:

  870.                   loc_handle_mousebutton(lglw, LGLW_FALSE/*bPressed*/, LGLW_MOUSE_LBUTTON);

  871.                   eventHandled = LGLW_TRUE;

  872.                   break;

  873.                case Button2:

  874.                   loc_handle_mousebutton(lglw, LGLW_FALSE/*bPressed*/, LGLW_MOUSE_MBUTTON);

  875.                   eventHandled = LGLW_TRUE;

  876.                   break;

  877.                case Button3:

  878.                   loc_handle_mousebutton(lglw, LGLW_FALSE/*bPressed*/, LGLW_MOUSE_RBUTTON);

  879.                   eventHandled = LGLW_TRUE;

  880.                   break;

  881.                case Button4:

  882.                   loc_handle_mousebutton(lglw, LGLW_FALSE/*bPressed*/, LGLW_MOUSE_WHEELUP);

  883.                   eventHandled = LGLW_TRUE;

  884.                   break;

  885.                case Button5:

  886.                   loc_handle_mousebutton(lglw, LGLW_FALSE/*bPressed*/, LGLW_MOUSE_WHEELDOWN);

  887.                   eventHandled = LGLW_TRUE;

  888.                   break;

  889.             }

  890.             break;

  891. 

  892.          case SelectionClear:

  893.             Dlog("lglw:loc_eventProc: xev SelectionClear\n");

  894.             lglw->clipboard.numChars = 0;

  895.             free(lglw->clipboard.data);

  896.             eventHandled = LGLW_TRUE;

  897.             break;

  898. 

  899.          case SelectionRequest:

  900.             Dlog("lglw:loc_eventProc: xev SelectionRequest\n");

  901.             XSelectionRequestEvent *cbReq = (XSelectionRequestEvent*)xev;

  902.             XSelectionEvent cbRes;

  903. 

  904.             Atom utf8 = XInternAtom(lglw->xdsp, "UTF8_STRING", False);

  905. 

  906.             cbRes.type = SelectionNotify;

  907.             cbRes.requestor = cbReq->requestor;

  908.             cbRes.selection = cbReq->selection;

  909.             cbRes.target = cbReq->target;

  910.             cbRes.time = cbReq->time;

  911. 

  912.             if(cbReq->target == utf8)

  913.             {

  914.                XChangeProperty(lglw->xdsp, cbReq->requestor, cbReq->property, utf8, 8/*format*/, PropModeReplace,

  915.                                (unsigned char *)lglw->clipboard.data, lglw->clipboard.numChars);

  916. 

  917.                cbRes.property = cbReq->property;

  918.             }

  919.             else

  920.             {

  921.                cbRes.property = None;

  922.             }

  923. 

  924.             XSendEvent(lglw->xdsp, cbReq->requestor, True, NoEventMask, (XEvent *)&cbRes);

  925.             eventHandled = LGLW_TRUE;

  926. 

  927.             break;

  928.       }

  929. 

  930. #if 0

  931.       // (note) this causes a feedback loop in the VST2 debug host

  932.       if(LGLW_FALSE == eventHandled)

  933.       {

  934.          if(0 == lglw->parent_xwnd)

  935.          {

  936.             Dlog("lglw:loc_eventProc: no parent window to send events to");

  937.             XSendEvent(lglw->xdsp, InputFocus, True/*propgate*/, NoEventMask, xev);

  938.          }

  939.          else

  940.          {

  941.             XSendEvent(lglw->xdsp, lglw->parent_xwnd, True/*propgate*/, NoEventMask, xev);

  942.          }

  943.       }

  944. #else

  945.       (void)eventHandled;

  946. #endif

  947.    }

  948. }

  949. 

  950. static void loc_XEventProc(void *_xevent) {

  951.    XEvent *xev = (XEvent*)_xevent;

  952. 

  953.    Dlog_vvv("lglw:loc_XEventProc: ENTER\n");

  954.    // Dlog_vvv("lglw: XEventProc, xev=%p\n", xev);

  955. 

  956.    if(NULL != xev)

  957.    {

  958.       LGLW(loc_getProperty(xev->xany.display, xev->xany.window, "_lglw"));  // get instance pointer

  959.       Dlog_vvv("lglw:loc_XEventProc: xev=%p lglw=%p\n", xev, lglw);

  960. 

  961.       loc_eventProc(xev, lglw);

  962.    }

  963. 

  964.    Dlog_vvv("lglw:loc_XEventProc: LEAVE\n");

  965. }

  966. 

  967. static void loc_setProperty(Display *_display, Window _window, const char *_name, void *_value) {

  968.    size_t data = (size_t)_value;

  969.    long temp[2];

  970. 

  971.    // Split the 64 bit pointer into a little-endian long array

  972.    temp[0] = (long)(data & 0xffffffffUL);

  973.    temp[1] = (long)(data >> 32L);

  974. 

  975.    Dlog_v("lglw:loc_setProperty: name=\"%s\" value=%p temp[0]=%08x temp[1]=%08x\n", _name, _value, (uint32_t)temp[0], (uint32_t)temp[1]);

  976. 

  977.    Atom atom = XInternAtom(_display, _name, False/*only_if_exists*/);

  978. 

  979.    // (note) what's quite weird here is that we're writing an array of 32bit values, yet the element format must be 64bit (long)

  980.    XChangeProperty(_display, _window,

  981.                    atom/*property*/,

  982.                    atom/*type*/,

  983.                    32/*format*/,

  984.                    PropModeReplace/*mode*/,

  985.                    (unsigned char*)temp/*data*/,

  986.                    2/*nelements*/

  987.                    );

  988. }

  989. 

  990. static void *loc_getProperty(Display *_display, Window _window, const char *_name) {

  991.    int userSize;

  992.    unsigned long bytes;

  993.    unsigned long userCount;

  994.    unsigned char *data;

  995.    Atom userType;

  996.    Atom atom = XInternAtom(_display, _name, False);

  997. 

  998.    // (note) 64bit properties need to be read with two XGetWindowProperty() calls.

  999.    //         When using just one call and setting the 'length' to 2, the upper 32bit (second array element) will be 0xFFFFffff.

  1000.    XGetWindowProperty(_display,

  1001.                       _window,

  1002.                       atom,

  1003.                       0/*offset*/,

  1004.                       1/*length*/,

  1005.                       False/*delete*/,

  1006.                       AnyPropertyType,

  1007.                       &userType/*actual_type_return*/,

  1008.                       &userSize/*actual_format_return*/,

  1009.                       &userCount/*nitems_return*/,

  1010.                       &bytes/*bytes_after_return / partial reads*/,

  1011.                       &data);

  1012. 

  1013.    union {

  1014.       uint32_t ui[2];

  1015.       void *any;

  1016.    } uptr;

  1017.    uptr.any = 0;

  1018. 

  1019.    Dlog_vvv("lglw:loc_getProperty: LOWER userSize=%d userCount=%lu bytes=%lu data=%p\n", userSize, userCount, bytes, data);

  1020. 

  1021.    if(NULL != data)

  1022.    {

  1023.       if(userCount >= 1)

  1024.       {

  1025.          // lower 32-bit

  1026.          uptr.ui[0] = *(long*)data;

  1027.          uptr.ui[1] = 0;

  1028. 

  1029.          Dlog_vvv("lglw:loc_getProperty:    lower=0x%08x\n", uptr.ui[0]);

  1030. 

  1031.          XFree(data);

  1032. 

  1033.          XGetWindowProperty(_display,

  1034.                             _window,

  1035.                             atom,

  1036.                             1/*offset*/,

  1037.                             1/*length*/,

  1038.                             False/*delete*/,

  1039.                             AnyPropertyType,

  1040.                             &userType/*actual_type_return*/,

  1041.                             &userSize/*actual_format_return*/,

  1042.                             &userCount/*nitems_return*/,

  1043.                             &bytes/*bytes_after_return / partial reads*/,

  1044.                             &data);

  1045. 

  1046.          Dlog_vvv("lglw:loc_getProperty: UPPER userSize=%d userCount=%lu bytes=%lu data=%p\n", userSize, userCount, bytes, data);

  1047.          if(NULL != data)

  1048.          {

  1049.             // upper 32-bit

  1050.             uptr.ui[1] = *(long*)data;

  1051.             Dlog_vvv("lglw:loc_getProperty:    upper=0x%08x\n", uptr.ui[1]);

  1052.             XFree(data);

  1053.          }

  1054.       }

  1055.    }

  1056. 

  1057.    Dlog_vvv("lglw:loc_getProperty: return value=%p\n", uptr.any);

  1058. 

  1059.    return uptr.any;

  1060. }

  1061. 

  1062. 

  1063. #ifdef ARCH_X64

  1064. #if 0

  1065. // Pulled from the Renoise 64-bit callback example

  1066. // Unsure what data was supposed to be, but swapping it to a function name did not work

  1067. // This does nothing, no event proc found

  1068. static void loc_setEventProc (Display *display, Window window) {

  1069.    size_t data = (size_t)loc_eventProc;

  1070.    long temp[2];

  1071. 

  1072.    Dlog("lglw: setEventProc (2*32bit). window=%lu loc_eventProc=%p\n", window, &loc_eventProc);

  1073. 

  1074.    // Split the 64 bit pointer into a little-endian unsigned int array

  1075.    temp[0] = (uint32_t)(data & 0xffffffffUL);

  1076.    temp[1] = (uint32_t)(data >> 32L);

  1077. 

  1078.    Atom atom = XInternAtom(display, "_XEventProc", False);

  1079.    XChangeProperty(display, window,

  1080.                    atom/*property*/,

  1081.                    atom/*type*/,

  1082.                    32/*format*/,

  1083.                    PropModeReplace/*mode*/,

  1084.                    (unsigned char*)temp/*data*/,

  1085.                    2/*nelements*/

  1086.                    );

  1087. }

  1088. #else

  1089. // GPL code pulled from the amsynth example <https://github.com/amsynth/amsynth/blob/4a87798e650c6d71d70274a961c9b8d98fc6da7e/src/amsynth_vst.cpp>

  1090. // Simply swapped out the function names, crashes Ardour in the same was as the others

  1091. static void loc_setEventProc (Display *display, Window window) {

  1092.    //

  1093.    // JUCE calls XGetWindowProperty with long_length = 1 which means it only fetches the lower 32 bits of the address.

  1094.    // Therefore we need to ensure we return an address in the lower 32-bits of address space.

  1095.    //

  1096. 

  1097.    // based on mach_override

  1098.    static const unsigned char kJumpInstructions[] = {

  1099.          0xFF, 0x25, 0x00, 0x00, 0x00, 0x00,

  1100.          0x00, 0x00, 0x00, 0x00,

  1101.          0x00, 0x00, 0x00, 0x00

  1102.    };

  1103.    static const int kJumpAddress = 6;

  1104. 

  1105.    static char *ptr = 0;

  1106.    if (!ptr) {

  1107.       ptr = (char *)mmap(0,

  1108.                          getpagesize()/*PAGE_SIZE*/,

  1109.                          PROT_READ | PROT_WRITE | PROT_EXEC,

  1110.                          MAP_ANONYMOUS | MAP_PRIVATE | MAP_32BIT,

  1111.                          0, 0);

  1112.       if (ptr == MAP_FAILED) {

  1113.          perror("mmap");

  1114.          ptr = 0;

  1115.          return;

  1116.       } else {

  1117.          memcpy(ptr, kJumpInstructions, sizeof(kJumpInstructions));

  1118.          *((uint64_t *)(ptr + kJumpAddress)) = (uint64_t)(&loc_XEventProc);

  1119.          msync(ptr, sizeof(kJumpInstructions), MS_INVALIDATE);

  1120.          Dlog("lglw: 64bit trampoline installed\n");

  1121.       }

  1122.    }

  1123. 

  1124.    long temp[2] = {(uint32_t)(((size_t)ptr)&0xFFFFfffful), 0};

  1125.    Atom atom = XInternAtom(display, "_XEventProc", False);

  1126.    XChangeProperty(display, window,

  1127.                    atom/*property*/,

  1128.                    atom/*type*/,

  1129.                    32/*format*/,

  1130.                    PropModeReplace/*mode*/,

  1131.                    (unsigned char *)temp/*data*/,

  1132.                    2/*nelements*/

  1133.                    );

  1134. }

  1135. #endif

  1136. #else

  1137. // Pulled from the eXT2 example

  1138. static void loc_setEventProc (Display *display, Window window) {

  1139.    void* data = (void*)&loc_XEventProc; // swapped the function name here

  1140. 

  1141.    // (note) 32-bit only

  1142.    Atom atom = XInternAtom(display, "_XEventProc", False);

  1143.    XChangeProperty(display, window,

  1144.                    atom/*property*/,

  1145.                    atom/*type*/,

  1146.                    32/*format*/,

  1147.                    PropModeReplace/*mode*/,

  1148.                    (unsigned char*)&data/*data*/,

  1149.                    1/*nelements*/

  1150.                    );

  1151. }

  1152. #endif // ARCH_X64

  1153. 

  1154. 

  1155. // ---------------------------------------------------------------------------- lglw_window_open

  1156. lglw_bool_t lglw_window_open (lglw_t _lglw, void *_parentHWNDOrNull, int32_t _x, int32_t _y, int32_t _w, int32_t _h) {

  1157.    lglw_bool_t r = LGLW_FALSE;

  1158.    LGLW(_lglw);

  1159. 

  1160.    if(NULL != lglw)

  1161.    {

  1162.       Dlog_v("lglw:lglw_window_open: 1, %p, %i \n", (Window)_parentHWNDOrNull, (Window)_parentHWNDOrNull);

  1163.       lglw->parent_xwnd = (0 == _parentHWNDOrNull) ? DefaultRootWindow(lglw->xdsp) : (Window)_parentHWNDOrNull;

  1164. 

  1165.       Dlog_v("lglw:lglw_window_open: 2 lglw=%p\n", lglw);

  1166.       if(_w <= 16)

  1167.          _w = lglw->hidden.size.x;

  1168. 

  1169.       Dlog_v("lglw:lglw_window_open: 3\n");

  1170.       if(_h <= 16)

  1171.          _h = lglw->hidden.size.y;

  1172. 

  1173.       // TODO: compare to 'WindowClass' from Windows implementation

  1174. 

  1175.       Dlog_v("lglw:lglw_window_open: 4\n");

  1176.       XSetWindowAttributes swa;

  1177.       // // XEvent event;

  1178.       XSync(lglw->xdsp, False);

  1179. 

  1180. #if 1

  1181.       Dlog_v("lglw:lglw_window_open: 5\n");

  1182.       swa.border_pixel = 0;

  1183.       swa.colormap = lglw->cmap;

  1184.       // (note) [bsp] setting this to NoEventMask causes all events to be propagated to the parent (host) window.

  1185.       //               The host then reports the event to the plugin by calling its eventProc function (set via "_XEventProc").

  1186.       swa.event_mask = NoEventMask;/////ExposureMask | KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | EnterWindowMask | LeaveWindowMask | PointerMotionMask | ButtonMotionMask | FocusChangeMask;

  1187.       lglw->win.xwnd = XCreateWindow(lglw->xdsp/*display*/,

  1188.                                      DefaultRootWindow(lglw->xdsp)/*parent. see Cameron's comment below.*/,

  1189.                                      0/*x*/,

  1190.                                      0/*y*/,

  1191.                                      _w/*width*/,

  1192.                                      _h/*height*/,

  1193.                                      0/*border_width*/,

  1194.                                      CopyFromParent/*depth*/,

  1195.                                      InputOutput/*class*/,

  1196.                                      lglw->vi->visual,

  1197.                                      CWBorderPixel | CWColormap | CWEventMask/*value_mask*/,

  1198.                                      &swa/*attributes*/

  1199.                                      );

  1200. 

  1201.       Dlog_v("lglw:lglw_window_open: 6\n");

  1202.       XSetStandardProperties(lglw->xdsp/*display*/,

  1203.                              lglw->win.xwnd/*window*/,

  1204.                              "LGLW"/*window_name*/,

  1205.                              "LGLW"/*icon_name*/,

  1206.                              None/*icon_pixmap*/,

  1207.                              NULL/*argv*/,

  1208.                              0/*argc*/,

  1209.                              NULL/*XSizeHints*/

  1210.                              );

  1211. 

  1212.       // Setup the event proc now, on the parent window as well just for the debug host

  1213.       // It was simpler to do this than check in the debug host for the reparent event

  1214.       Dlog_v("lglw:lglw_window_open: 7\n");

  1215.       loc_setEventProc(lglw->xdsp, lglw->win.xwnd);

  1216.       loc_setProperty(lglw->xdsp, lglw->win.xwnd, "_lglw", (void*)lglw);  // set instance pointer

  1217. 

  1218.       if(0 != _parentHWNDOrNull)

  1219.       {

  1220.          loc_setEventProc(lglw->xdsp, lglw->parent_xwnd);

  1221.          loc_setProperty(lglw->xdsp, lglw->parent_xwnd, "_lglw", (void*)lglw);  // set instance pointer

  1222.       }

  1223. 

  1224.       // Some hosts only check and store the callback when the Window is reparented

  1225.       // Since creating the Window with a Parent may or may not do that, but the callback is not set,

  1226.       // ... it's created as a root window, the callback is set, and then it's reparented

  1227. #if 1

  1228.       // (note) [cameronleger] In Ardour's code-base, the only time it looks for the _XEventProc is during a ReparentNotify event

  1229.       if (0 != _parentHWNDOrNull)

  1230.       {

  1231.          Dlog_v("lglw:lglw_window_open: 8\n");

  1232.          XReparentWindow(lglw->xdsp, lglw->win.xwnd, lglw->parent_xwnd, 0, 0);

  1233.       }

  1234. #endif

  1235.       lglw->win.b_owner = LGLW_TRUE;

  1236. #else

  1237.       lglw->win.xwnd = (Window)_parentHWNDOrNull;

  1238.       lglw->win.b_owner = LGLW_FALSE;

  1239. #endif

  1240. 

  1241.       Dlog_v("lglw:lglw_window_open: 9\n");

  1242.       if(lglw->win.b_owner)

  1243.       {

  1244.          // // XMapRaised(lglw->xdsp, lglw->win.xwnd);

  1245.          XMapWindow(lglw->xdsp, lglw->win.xwnd);

  1246.       }

  1247. 

  1248. #if 0

  1249.       XSelectInput(lglw->xdsp, lglw->win.xwnd,

  1250.                    ExposureMask | KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | EnterWindowMask | LeaveWindowMask | PointerMotionMask | ButtonMotionMask | FocusChangeMask

  1251.                    );

  1252.       XGrabKeyboard(lglw->xdsp, lglw->win.xwnd,

  1253.                     False/*owner_events*/,

  1254.                     GrabModeAsync/*pointer_mode*/,

  1255.                     GrabModeAsync/*keyboard_mode*/,

  1256.                     CurrentTime/*time*/

  1257.                     );

  1258. #endif

  1259. 

  1260. #if 0

  1261.       XSetInputFocus(lglw->xdsp/*display*/,

  1262.                      PointerRoot/*focus*/,

  1263.                      RevertToPointerRoot/*revert_to*/,

  1264.                      CurrentTime

  1265.                      );

  1266. #endif

  1267. 

  1268.       XSync(lglw->xdsp, False);

  1269.       lglw->win.mapped = LGLW_TRUE;

  1270. 

  1271.       Dlog_v("lglw:lglw_window_open: 10\n");

  1272.       lglw->win.size.x = _w;

  1273.       lglw->win.size.y = _h;

  1274. 

  1275.       Dlog_v("lglw:lglw_window_open: 11\n");

  1276.       loc_enable_dropfiles(lglw, (NULL != lglw->dropfiles.cbk));

  1277. 

  1278.       Dlog_v("lglw:lglw_window_open: EXIT\n");

  1279. 

  1280.       r = LGLW_TRUE;

  1281.    }

  1282.    return r;

  1283. }

  1284. 

  1285. 

  1286. // ---------------------------------------------------------------------------- lglw_window_resize

  1287. lglw_bool_t lglw_window_resize (lglw_t _lglw, int32_t _w, int32_t _h) {

  1288.    lglw_bool_t r = LGLW_FALSE;

  1289.    LGLW(_lglw);

  1290. 

  1291.    if(NULL != lglw)

  1292.    {

  1293.       if(0 != lglw->win.xwnd)

  1294.       {

  1295.          Dlog_v("lglw:lglw_window_resize: 1\n");

  1296.          r = LGLW_TRUE;

  1297. 

  1298.          Dlog_v("lglw:lglw_window_resize: 2\n");

  1299.          XResizeWindow(lglw->xdsp, lglw->win.xwnd, _w, _h);

  1300.          XRaiseWindow(lglw->xdsp, lglw->win.xwnd);

  1301. 

  1302.          Dlog_v("lglw:lglw_window_resize: 3\n");

  1303.          int deltaW = _w - lglw->win.size.x;

  1304.          int deltaH = _h - lglw->win.size.y;

  1305. 

  1306.          Dlog_v("lglw:lglw_window_resize: 4\n");

  1307.          lglw->win.size.x = _w;

  1308.          lglw->win.size.y = _h;

  1309. 

  1310.          Dlog_v("lglw:lglw_window_resize: 5\n");

  1311.          Window root, parent, *children = NULL;

  1312.          unsigned int num_children;

  1313. 

  1314.          Dlog_v("lglw:lglw_window_resize: 6\n");

  1315.          if(!XQueryTree(lglw->xdsp, lglw->win.xwnd, &root, &parent, &children, &num_children))

  1316.             return r;

  1317. 

  1318.          Dlog_v("lglw:lglw_window_resize: 7\n");

  1319.          if(children)

  1320.             XFree((char *)children);

  1321. 

  1322.          Dlog_v("lglw:lglw_window_resize: 8\n");

  1323.          // Resize parent window (if any)

  1324.          if(0 != parent)

  1325.          {

  1326.             Dlog_v("lglw:lglw_window_resize: 8.1\n");

  1327.             int x, y;

  1328.             unsigned int width, height;

  1329.             unsigned int border_width;

  1330.             unsigned int depth;

  1331. 

  1332.             Dlog_v("lglw:lglw_window_resize: 8.2\n");

  1333.             if(!XGetGeometry(lglw->xdsp, lglw->win.xwnd, &root, &x, &y, &width, &height, &border_width, &depth))

  1334.                return r;

  1335. 

  1336.             Dlog_v("lglw:lglw_window_resize: 8.3\n");

  1337.             XResizeWindow(lglw->xdsp, parent, width + deltaW, height + deltaH);

  1338.          }

  1339.          Dlog_v("lglw:lglw_window_resize: EXIT\n");

  1340.       }

  1341.    }

  1342. 

  1343.    return r;

  1344. }

  1345. 

  1346. 

  1347. // ---------------------------------------------------------------------------- lglw_window_close

  1348. void lglw_window_close (lglw_t _lglw) {

  1349.    LGLW(_lglw);

  1350. 

  1351.    if(NULL != lglw)

  1352.    {

  1353.       if(0 != lglw->win.xwnd)

  1354.       {

  1355.          Dlog_v("lglw:lglw_window_close: 1\n");

  1356.          lglw_timer_stop(_lglw);

  1357. 

  1358.          Dlog_v("lglw:lglw_window_close: 2\n");

  1359.          glXMakeCurrent(lglw->xdsp, None, NULL);

  1360. 

  1361.          Dlog_v("lglw:lglw_window_close: 3\n");

  1362.          if(lglw->win.b_owner)

  1363.          {

  1364.             XDestroyWindow(lglw->xdsp, lglw->win.xwnd);

  1365.             lglw->win.b_owner = LGLW_FALSE;

  1366.          }

  1367.          XSync(lglw->xdsp, False);

  1368.          lglw->win.xwnd = 0;

  1369.          lglw->win.mapped = LGLW_FALSE;

  1370.       }

  1371.    }

  1372.    Dlog_v("lglw:lglw_window_close: EXIT\n");

  1373. }

  1374. 

  1375. 

  1376. // ---------------------------------------------------------------------------- lglw_window_show

  1377. void lglw_window_show(lglw_t _lglw) {

  1378.    LGLW(_lglw);

  1379. 

  1380.    if(NULL != lglw)

  1381.    {

  1382.       Dlog_v("lglw:lglw_window_show: 1\n");

  1383.       XMapRaised(lglw->xdsp, lglw->win.xwnd);

  1384. 

  1385.       lglw->win.mapped = LGLW_TRUE;

  1386.    }

  1387.    Dlog_v("lglw:lglw_window_show: EXIT\n");

  1388. }

  1389. 

  1390. 

  1391. // ---------------------------------------------------------------------------- lglw_window_hide

  1392. void lglw_window_hide(lglw_t _lglw) {

  1393.    LGLW(_lglw);

  1394. 

  1395.    if(NULL != lglw)

  1396.    {

  1397.       Dlog_v("lglw:lglw_window_hide: 1\n");

  1398.       XUnmapWindow(lglw->xdsp, lglw->win.xwnd);

  1399. 

  1400.       lglw->win.mapped = LGLW_FALSE;

  1401.    }

  1402.    Dlog_v("lglw:lglw_window_hide: EXIT\n");

  1403. }

  1404. 

  1405. 

  1406. // ---------------------------------------------------------------------------- lglw_window_is_visible

  1407. lglw_bool_t lglw_window_is_visible(lglw_t _lglw) {

  1408.    lglw_bool_t r = LGLW_FALSE;

  1409.    LGLW(_lglw);

  1410. 

  1411.    Dlog_vvv("lglw:lglw_window_is_visible: 1\n");

  1412.    if(NULL != lglw && 0 != lglw->win.xwnd)

  1413.    {

  1414.       Dlog_vvv("lglw:lglw_window_is_visible: 2\n");

  1415.       r = lglw->win.mapped;

  1416.    }

  1417. 

  1418.    Dlog_vvv("lglw:lglw_window_is_visible: EXIT\n");

  1419.    return r;

  1420. }

  1421. 

  1422. 

  1423. // ---------------------------------------------------------------------------- lglw_window_size_get

  1424. void lglw_window_size_get(lglw_t _lglw, int32_t *_retX, int32_t *_retY) {

  1425.    LGLW(_lglw);

  1426. 

  1427.    Dlog_vvv("lglw:lglw_window_size_get: 1\n");

  1428.    if(NULL != lglw)

  1429.    {

  1430.       if(0 != lglw->win.xwnd)

  1431.       {

  1432.          if(NULL != _retX)

  1433.             *_retX = lglw->win.size.x;

  1434. 

  1435.          if(NULL != _retY)

  1436.             *_retY = lglw->win.size.y;

  1437.       }

  1438.    }

  1439.    Dlog_vvv("lglw:lglw_window_size_get: EXIT\n");

  1440. }

  1441. 

  1442. 

  1443. // ---------------------------------------------------------------------------- lglw_redraw

  1444. void lglw_redraw(lglw_t _lglw) {

  1445.    LGLW(_lglw);

  1446. 

  1447.    // (todo) implement me

  1448. 

  1449.    if(NULL != lglw)

  1450.    {

  1451.       if(0 != lglw->win.xwnd)

  1452.       {

  1453.          // TODO Event Loop

  1454.          Dlog_vvv("lglw:lglw_redraw: 1\n");

  1455.          XEvent xev;

  1456.          xev.xany.type       = Expose;

  1457.          xev.xany.serial     = 0;

  1458.          xev.xany.send_event = True;

  1459.          xev.xany.display    = lglw->xdsp;

  1460.          xev.xany.window     = lglw->win.xwnd;

  1461.          xev.xexpose.x      = 0;

  1462.          xev.xexpose.y      = 0;

  1463.          xev.xexpose.width  = lglw->win.size.x;

  1464.          xev.xexpose.height = lglw->win.size.y;

  1465.          xev.xexpose.count  = 0;

  1466.          XSendEvent(lglw->xdsp, lglw->win.xwnd,

  1467.                     True/*propagate*/,

  1468.                     ExposureMask/*event_mask*/,

  1469.                     &xev

  1470.                     );

  1471.          XFlush(lglw->xdsp);

  1472.       }

  1473.    }

  1474. }

  1475. 

  1476. 

  1477. // ---------------------------------------------------------------------------- lglw_redraw_callback_set

  1478. void lglw_redraw_callback_set(lglw_t _lglw, lglw_redraw_fxn_t _cbk) {

  1479.    LGLW(_lglw);

  1480. 

  1481.    if(NULL != lglw)

  1482.    {

  1483.       lglw->redraw.cbk = _cbk;

  1484.    }

  1485. }

  1486. 

  1487. 

  1488. // ---------------------------------------------------------------------------- lglw_glcontext_push

  1489. void lglw_glcontext_push(lglw_t _lglw) {

  1490.    LGLW(_lglw);

  1491. 

  1492.    if(NULL != lglw)

  1493.    {

  1494.       lglw->prev.drw = glXGetCurrentDrawable();

  1495.       lglw->prev.ctx = glXGetCurrentContext();

  1496. 

  1497.       Dlog_vvv("lglw:lglw_glcontext_push: win.xwnd=%p hidden.xwnd=%p ctx=%p\n",

  1498.                lglw->win.xwnd, lglw->hidden.xwnd, lglw->ctx);

  1499.       if(!glXMakeCurrent(lglw->xdsp, (0 == lglw->win.xwnd) ? lglw->hidden.xwnd : lglw->win.xwnd, lglw->ctx))

  1500.       {

  1501.          Dlog("[---] lglw_glcontext_push: glXMakeCurrent() failed. win.xwnd=%p hidden.xwnd=%p ctx=%p glGetError()=%d\n", lglw->win.xwnd, lglw->hidden.xwnd, lglw->ctx, glGetError());

  1502.       }

  1503.    }

  1504. }

  1505. 

  1506. 

  1507. // ---------------------------------------------------------------------------- lglw_glcontext_pop

  1508. void lglw_glcontext_pop(lglw_t _lglw) {

  1509.    LGLW(_lglw);

  1510. 

  1511.    if(NULL != lglw)

  1512.    {

  1513.       Dlog_vvv("lglw:lglw_glcontext_pop: prev.drw=%p prev.ctx=%p\n",

  1514.                lglw->prev.drw, lglw->prev.ctx);

  1515.       if(!glXMakeCurrent(lglw->xdsp, lglw->prev.drw, lglw->prev.ctx))

  1516.       {

  1517.          Dlog("[---] lglw_glcontext_pop: glXMakeCurrent() failed. prev.drw=%p ctx=%p glGetError()=%d\n", lglw->prev.drw, lglw->prev.ctx, glGetError());

  1518.       }

  1519.    }

  1520. }

  1521. 

  1522. 

  1523. // ---------------------------------------------------------------------------- lglw_swap_buffers

  1524. void lglw_swap_buffers(lglw_t _lglw) {

  1525.    LGLW(_lglw);

  1526. 

  1527.    if(NULL != lglw)

  1528.    {

  1529.       if(0 != lglw->win.xwnd)

  1530.       {

  1531.          Dlog_vv("lglw:lglw_swap_buffers: 1\n");

  1532.          glXSwapBuffers(lglw->xdsp, lglw->win.xwnd);

  1533.       }

  1534.    }

  1535. }

  1536. 

  1537. 

  1538. // ---------------------------------------------------------------------------- lglw_swap_interval_set

  1539. typedef void (APIENTRY *PFNWGLEXTSWAPINTERVALPROC) (Display *, GLXDrawable, int);

  1540. void lglw_swap_interval_set(lglw_t _lglw, int32_t _ival) {

  1541.    LGLW(_lglw);

  1542. 

  1543.    if(NULL != lglw)

  1544.    {

  1545.       if(0 != lglw->win.xwnd)

  1546.       {

  1547.          Dlog_vv("lglw:lglw_swap_interval_set: 1\n");

  1548.          PFNWGLEXTSWAPINTERVALPROC glXSwapIntervalEXT;

  1549.          glXSwapIntervalEXT = (PFNWGLEXTSWAPINTERVALPROC) glXGetProcAddress((const GLubyte*)"glXSwapIntervalEXT");

  1550.          if(NULL != glXSwapIntervalEXT)

  1551.          {

  1552.             Dlog_vv("lglw:lglw_swap_interval_set: 2\n");

  1553.             glXSwapIntervalEXT(lglw->xdsp, lglw->win.xwnd, _ival);

  1554.             lglw->win.swap_interval = _ival;

  1555.          }

  1556.       }

  1557.    }

  1558. }

  1559. 

  1560. 

  1561. // ---------------------------------------------------------------------------- lglw_swap_interval_get

  1562. int32_t lglw_swap_interval_get(lglw_t _lglw) {

  1563.    LGLW(_lglw);

  1564.    int32_t r = 0;

  1565. 

  1566.    if(NULL != lglw)

  1567.    {

  1568.       r = lglw->win.swap_interval;

  1569.    }

  1570. 

  1571.    return r;

  1572. }

  1573. 

  1574. 

  1575. // ---------------------------------------------------------------------------- loc_handle_mouseleave

  1576. static void loc_handle_mouseleave(lglw_int_t *lglw) {

  1577.    lglw->focus.state &= ~LGLW_FOCUS_MOUSE;

  1578. 

  1579.    if(NULL != lglw->focus.cbk)

  1580.    {

  1581.       lglw->focus.cbk(lglw, lglw->focus.state, LGLW_FOCUS_MOUSE);

  1582.    }

  1583. 

  1584.    Dlog_vv("xxx lglw:loc_handle_mouseleave: LEAVE\n");

  1585. }

  1586. 

  1587. 

  1588. // ---------------------------------------------------------------------------- loc_handle_mouseenter

  1589. static void loc_handle_mouseenter(lglw_int_t *lglw) {

  1590. 

  1591.    lglw->focus.state |= LGLW_FOCUS_MOUSE;

  1592. 

  1593.    if(NULL != lglw->focus.cbk)

  1594.    {

  1595.       lglw->focus.cbk(lglw, lglw->focus.state, LGLW_FOCUS_MOUSE);

  1596.    }

  1597. 

  1598.    Dlog_vv("xxx lglw:loc_handle_mouseenter: LEAVE\n");

  1599. }

  1600. 

  1601. 

  1602. // ---------------------------------------------------------------------------- loc_handle_mousebutton

  1603. static void loc_handle_mousebutton(lglw_int_t *lglw, lglw_bool_t _bPressed, uint32_t _button) {

  1604.    if(_bPressed)

  1605.       lglw->mouse.button_state |= _button;

  1606.    else

  1607.       lglw->mouse.button_state &= ~_button;

  1608. 

  1609.    if(NULL != lglw->mouse.cbk)

  1610.    {

  1611.       lglw->mouse.cbk(lglw, lglw->mouse.p.x, lglw->mouse.p.y, lglw->mouse.button_state, _button);

  1612.    }

  1613. }

  1614. 

  1615. 

  1616. // ---------------------------------------------------------------------------- loc_handle_mousemotion

  1617. static void loc_handle_mousemotion(lglw_int_t *lglw) {

  1618. 

  1619.    if(NULL != lglw->mouse.cbk)

  1620.    {

  1621.       lglw->mouse.cbk(lglw, lglw->mouse.p.x, lglw->mouse.p.y, lglw->mouse.button_state, 0u/*changedbuttonstate*/);

  1622.    }

  1623. }

  1624. 

  1625. 

  1626. // ---------------------------------------------------------------------------- lglw_mouse_callback_set

  1627. void lglw_mouse_callback_set(lglw_t _lglw, lglw_mouse_fxn_t _cbk) {

  1628.    LGLW(_lglw);

  1629. 

  1630.    if(NULL != lglw)

  1631.    {

  1632.       lglw->mouse.cbk = _cbk;

  1633.    }

  1634. }

  1635. 

  1636. 

  1637. // ---------------------------------------------------------------------------- lglw_mouse_callback_set

  1638. void lglw_focus_callback_set(lglw_t _lglw, lglw_focus_fxn_t _cbk) {

  1639.    LGLW(_lglw);

  1640. 

  1641.    if(NULL != lglw)

  1642.    {

  1643.       lglw->focus.cbk = _cbk;

  1644.    }

  1645. }

  1646. 

  1647. 

  1648. // ---------------------------------------------------------------------------- loc_handle_key

  1649. static lglw_bool_t loc_handle_key(lglw_int_t *lglw, lglw_bool_t _bPressed, uint32_t _vkey) {

  1650.    lglw_bool_t r = LGLW_FALSE;

  1651. 

  1652.    if(NULL != lglw->keyboard.cbk)

  1653.    {

  1654.       r = lglw->keyboard.cbk(lglw, _vkey, lglw->keyboard.kmod_state, _bPressed);

  1655.    }

  1656. 

  1657.    return r;

  1658. }

  1659. 

  1660. 

  1661. // ---------------------------------------------------------------------------- lglw_keyboard_callback_set

  1662. void lglw_keyboard_callback_set(lglw_t _lglw, lglw_keyboard_fxn_t _cbk) {

  1663.    LGLW(_lglw);

  1664. 

  1665.    if(NULL != lglw)

  1666.    {

  1667.       lglw->keyboard.cbk = _cbk;

  1668.    }

  1669. }

  1670. 

  1671. 

  1672. // ---------------------------------------------------------------------------- lglw_keyboard_get_modifiers

  1673. uint32_t lglw_keyboard_get_modifiers(lglw_t _lglw) {

  1674.    uint32_t r = 0u;

  1675.    LGLW(_lglw);

  1676. 

  1677.    if(NULL != lglw)

  1678.    {

  1679.       r = lglw->keyboard.kmod_state;

  1680.    }

  1681. 

  1682.    return r;

  1683. }

  1684. 

  1685. 

  1686. // ---------------------------------------------------------------------------- lglw_touchkeyboard_show

  1687. void lglw_touchkeyboard_show(lglw_t _lglw, lglw_bool_t _bEnable) {

  1688.    LGLW(_lglw);

  1689. 

  1690.    // (todo) implement me

  1691. 

  1692.    if(NULL != lglw)

  1693.    {

  1694.    }

  1695. }

  1696. 

  1697. 

  1698. // ---------------------------------------------------------------------------- lglw_mouse_get_buttons

  1699. uint32_t lglw_mouse_get_buttons(lglw_t _lglw) {

  1700.    uint32_t r = 0u;

  1701.    LGLW(_lglw);

  1702. 

  1703.    if(NULL != lglw)

  1704.    {

  1705.       r = lglw->mouse.button_state;

  1706.    }

  1707. 

  1708.    return r;

  1709. }

  1710. 

  1711. 

  1712. // ---------------------------------------------------------------------------- lglw_mouse_grab

  1713. void lglw_mouse_grab(lglw_t _lglw, uint32_t _grabMode) {

  1714.    LGLW(_lglw);

  1715. 

  1716.    if(NULL != lglw)

  1717.    {

  1718.       if(0 != lglw->win.xwnd)

  1719.       {

  1720.          if(!lglw->mouse.touch.b_enable)

  1721.          {

  1722.             if(lglw->mouse.grab.mode != _grabMode)

  1723.             {

  1724.                lglw_mouse_ungrab(_lglw);

  1725.             }

  1726. 

  1727.             int result;

  1728. 

  1729.             switch(_grabMode)

  1730.             {

  1731.                default:

  1732.                case LGLW_MOUSE_GRAB_NONE:

  1733.                   break;

  1734. 

  1735.                case LGLW_MOUSE_GRAB_CAPTURE:

  1736.                   result = XGrabPointer(lglw->xdsp, lglw->win.xwnd,

  1737.                                         True/*owner_events*/,

  1738.                                         ButtonPressMask | ButtonReleaseMask | EnterWindowMask | LeaveWindowMask | PointerMotionMask | PointerMotionHintMask | ButtonMotionMask | KeymapStateMask/*event_mask*/,

  1739.                                         GrabModeAsync/*pointer_mode*/,

  1740.                                         GrabModeAsync/*keyboard_mode*/,

  1741.                                         lglw->win.xwnd/*confine_to*/,

  1742.                                         None/*cursor*/,

  1743.                                         CurrentTime/*time*/);

  1744.                   if(GrabSuccess != result)

  1745.                   {

  1746.                      Dlog("lglw: Grab Result: %i\n", result);

  1747.                   }

  1748.                   else

  1749.                   {

  1750.                      lglw->mouse.grab.mode = _grabMode;

  1751.                   }

  1752.                   break;

  1753. 

  1754.                case LGLW_MOUSE_GRAB_WARP:

  1755.                   result = XGrabPointer(lglw->xdsp, lglw->win.xwnd,

  1756.                                         True/*owner_events*/,

  1757.                                         ButtonPressMask | ButtonReleaseMask | EnterWindowMask | LeaveWindowMask | PointerMotionMask | PointerMotionHintMask | ButtonMotionMask | KeymapStateMask/*event_mask*/,

  1758.                                         GrabModeAsync/*pointer_mode*/,

  1759.                                         GrabModeAsync/*keyboard_mode*/,

  1760.                                         lglw->win.xwnd/*confine_to*/,

  1761.                                         None/*cursor*/,

  1762.                                         CurrentTime/*time*/);

  1763.                   if(GrabSuccess != result)

  1764.                   {

  1765.                      Dlog("lglw: Grab Result: %i\n", result);

  1766.                   }

  1767.                   else

  1768.                   {

  1769.                      lglw_mouse_cursor_show(_lglw, LGLW_FALSE);

  1770.                      lglw->mouse.grab.p = lglw->mouse.p;

  1771.                      lglw->mouse.grab.last_p = lglw->mouse.p;

  1772.                      lglw->mouse.grab.mode = _grabMode;

  1773.                   }

  1774.                   break;

  1775.             }

  1776.          }

  1777.       }

  1778.    }

  1779. }

  1780. 

  1781. 

  1782. // ---------------------------------------------------------------------------- lglw_mouse_ungrab

  1783. void lglw_mouse_ungrab(lglw_t _lglw) {

  1784.    LGLW(_lglw);

  1785. 

  1786.    if(NULL != lglw)

  1787.    {

  1788.       if(0 != lglw->win.xwnd)

  1789.       {

  1790.          if(!lglw->mouse.touch.b_enable)

  1791.          {

  1792.             switch(lglw->mouse.grab.mode)

  1793.             {

  1794.                default:

  1795.                case LGLW_MOUSE_GRAB_NONE:

  1796.                   break;

  1797. 

  1798.                case LGLW_MOUSE_GRAB_CAPTURE:

  1799.                   XUngrabPointer(lglw->xdsp, CurrentTime);

  1800.                   lglw->mouse.grab.mode = LGLW_MOUSE_GRAB_NONE;

  1801.                   break;

  1802. 

  1803.                case LGLW_MOUSE_GRAB_WARP:

  1804.                   XUngrabPointer(lglw->xdsp, CurrentTime);

  1805.                   lglw->mouse.grab.mode = LGLW_MOUSE_GRAB_NONE;

  1806.                   lglw->mouse.grab.b_queue_warp = LGLW_TRUE;

  1807.                   lglw_mouse_cursor_show(_lglw, LGLW_TRUE);

  1808.                   break;

  1809.             }

  1810.          }

  1811.       }

  1812.    }

  1813. }

  1814. 

  1815. 

  1816. // ---------------------------------------------------------------------------- lglw_mouse_warp

  1817. void lglw_mouse_warp(lglw_t _lglw, int32_t _x, int32_t _y) {

  1818.    LGLW(_lglw);

  1819. 

  1820.    if(NULL != lglw)

  1821.    {

  1822.       if(0 != lglw->win.xwnd)

  1823.       {

  1824.          XWarpPointer(lglw->xdsp,

  1825.                       None/*src_w*/,

  1826.                       lglw->win.xwnd/*dest_w*/,

  1827.                       0/*src_x*/,

  1828.                       0/*src_y*/,

  1829.                       0/*src_width*/,

  1830.                       0/*src_height*/,

  1831.                       _x/*dest_x*/,

  1832.                       _y/*dest_y*/);

  1833.       }

  1834.    }

  1835. }

  1836. 

  1837. 

  1838. // ---------------------------------------------------------------------------- loc_handle_queued_mouse_warp

  1839. static void loc_handle_queued_mouse_warp(lglw_int_t *lglw) {

  1840.    if(lglw->mouse.grab.b_queue_warp)

  1841.    {

  1842.       lglw->mouse.grab.b_queue_warp = LGLW_FALSE;

  1843.       lglw_mouse_warp(lglw, lglw->mouse.grab.p.x, lglw->mouse.grab.p.y);

  1844.       lglw->mouse.grab.last_p = lglw->mouse.grab.p;

  1845.    }

  1846. }

  1847. 

  1848. 

  1849. // ---------------------------------------------------------------------------- lglw_mouse_cursor_show

  1850. void lglw_mouse_cursor_show (lglw_t _lglw, lglw_bool_t _bShow) {

  1851.    LGLW(_lglw);

  1852. 

  1853.    if(NULL != lglw)

  1854.    {

  1855.       if(LGLW_FALSE == _bShow)

  1856.       {

  1857.          Pixmap noPxm;

  1858.          Cursor noCursor;

  1859.          XColor black, dummy;

  1860.          static char pxmNoData[] = {0, 0, 0, 0, 0, 0, 0, 0};

  1861. 

  1862.          XAllocNamedColor(lglw->xdsp, lglw->cmap, "black", &black, &dummy);

  1863.          noPxm = XCreateBitmapFromData(lglw->xdsp, lglw->win.xwnd, pxmNoData, 8, 8);

  1864.          noCursor = XCreatePixmapCursor(lglw->xdsp, noPxm, noPxm, &black, &black, 0, 0);

  1865. 

  1866.          XDefineCursor(lglw->xdsp, lglw->win.xwnd, noCursor);

  1867.          XFreeCursor(lglw->xdsp, noCursor);

  1868.          if(noPxm != None)

  1869.          {

  1870.             XFreePixmap(lglw->xdsp, noPxm);

  1871.          }

  1872.       }

  1873.       else

  1874.       {

  1875.          XUndefineCursor(lglw->xdsp, lglw->win.xwnd);

  1876.       }

  1877.    }

  1878. }

  1879. 

  1880. 

  1881. // ---------------------------------------------------------------------------- lglw_timer_start

  1882. void lglw_timer_start(lglw_t _lglw, uint32_t _millisec) {

  1883.    LGLW(_lglw);

  1884. 

  1885.    if(NULL != lglw)

  1886.    {

  1887.       Dlog_v("lglw:lglw_timer_start: interval=%u\n", _millisec);

  1888.       lglw->timer.interval_ms = _millisec;

  1889.       lglw->timer.b_running   = LGLW_TRUE;

  1890.    }

  1891. }

  1892. 

  1893. 

  1894. // ---------------------------------------------------------------------------- lglw_timer_stop

  1895. void lglw_timer_stop(lglw_t _lglw) {

  1896.    LGLW(_lglw);

  1897. 

  1898.    if(NULL != lglw)

  1899.    {

  1900.       Dlog_v("lglw:lglw_timer_stop\n");

  1901.       lglw->timer.b_running = LGLW_FALSE;

  1902.    }

  1903. }

  1904. 

  1905. 

  1906. // ---------------------------------------------------------------------------- lglw_timer_callback_set

  1907. void lglw_timer_callback_set(lglw_t _lglw, lglw_timer_fxn_t _cbk) {

  1908.    LGLW(_lglw);

  1909. 

  1910.    if(NULL != lglw)

  1911.    {

  1912.       lglw->timer.cbk = _cbk;

  1913.    }

  1914. }

  1915. 

  1916. 

  1917. // ---------------------------------------------------------------------------- loc_process_timer()

  1918. static void loc_process_timer(lglw_int_t *lglw) {

  1919.    if(lglw->timer.b_running)

  1920.    {

  1921.       uint32_t ms = loc_millisec_delta(lglw);

  1922. 

  1923.       if( (ms - lglw->timer.last_ms) >= lglw->timer.interval_ms )

  1924.       {

  1925.          lglw->timer.last_ms = ms;

  1926. 

  1927.          if(NULL != lglw->timer.cbk)

  1928.          {

  1929.             Dlog_vvv("lglw: invoke timer callback\n");

  1930.             lglw->timer.cbk(lglw);

  1931.          }

  1932.       }

  1933.    }

  1934. }

  1935. 

  1936. 

  1937. // ---------------------------------------------------------------------------- loc_enable_dropfiles

  1938. static void loc_enable_dropfiles(lglw_int_t *lglw, lglw_bool_t _bEnable) {

  1939. 

  1940.    // (todo) implement me

  1941. }

  1942. 

  1943. 

  1944. // ---------------------------------------------------------------------------- lglw_dropfiles_callback_set

  1945. void lglw_dropfiles_callback_set(lglw_t _lglw, lglw_dropfiles_fxn_t _cbk) {

  1946.    LGLW(_lglw);

  1947. 

  1948.    if(NULL != _lglw)

  1949.    {

  1950.       lglw->dropfiles.cbk = _cbk;

  1951. 

  1952.       loc_enable_dropfiles(lglw, (NULL != _cbk));

  1953.    }

  1954. }

  1955. 

  1956. 

  1957. // ---------------------------------------------------------------------------- lglw_touchinput_set

  1958. void lglw_touchinput_set(lglw_t _lglw, lglw_bool_t _bEnable) {

  1959.    LGLW(_lglw);

  1960. 

  1961.    if(NULL != _lglw)

  1962.    {

  1963.       lglw->mouse.touch.b_enable = _bEnable;

  1964.       lglw->mouse.touch.b_update_queued = LGLW_TRUE;

  1965.    }

  1966. }

  1967. 

  1968. 

  1969. // ---------------------------------------------------------------------------- lglw_touchinput_get

  1970. lglw_bool_t lglw_touchinput_get(lglw_t _lglw) {

  1971.    lglw_bool_t r = LGLW_FALSE;

  1972.    LGLW(_lglw);

  1973. 

  1974.    if(NULL != _lglw)

  1975.    {

  1976.       r = lglw->mouse.touch.b_enable;

  1977.    }

  1978. 

  1979.    return r;

  1980. }

  1981. 

  1982. 

  1983. // ---------------------------------------------------------------------------- lglw_clipboard_text_set

  1984. void lglw_clipboard_text_set(lglw_t _lglw, const uint32_t _numChars, const char *_text) {

  1985.    LGLW(_lglw);

  1986.    (void)_numChars;

  1987. 

  1988.    if(NULL != _text)

  1989.    {

  1990.       if(NULL != _lglw)

  1991.       {

  1992.          if(0 != lglw->win.xwnd)

  1993.          {

  1994.             uint32_t numChars = (0u == _numChars) ? ((uint32_t)strlen(_text)+1u) : _numChars;

  1995. 

  1996.             if(numChars > 0u)

  1997.             {

  1998.                lglw->clipboard.numChars = numChars;

  1999.                lglw->clipboard.data = malloc(numChars+1);

  2000. 

  2001.                uint32_t i;

  2002.                for(i = 0u; i < numChars; i++)

  2003.                {

  2004.                   lglw->clipboard.data[i] = _text[i];

  2005.                }

  2006.                lglw->clipboard.data[numChars - 1] = 0;

  2007. 

  2008.                Dlog("xxx lglw_clipboard_text_set(%i): %s\n", lglw->clipboard.numChars, lglw->clipboard.data);

  2009. 

  2010.                Atom clipboard = XInternAtom(lglw->xdsp, "CLIPBOARD", False);

  2011.                XSetSelectionOwner(lglw->xdsp, clipboard, lglw->win.xwnd, CurrentTime);

  2012.                XSync(lglw->xdsp, False);

  2013.             }

  2014.          }

  2015.       }

  2016.    }

  2017. }

  2018. 

  2019. 

  2020. // ---------------------------------------------------------------------------- loc_is_clipboard_event

  2021. static Bool loc_is_clipboard_event(Display *_display, XEvent *_xevent, XPointer _xarg) {

  2022.    return _xevent->type == SelectionNotify;

  2023. }

  2024. 

  2025. 

  2026. // ---------------------------------------------------------------------------- lglw_clipboard_text_get

  2027. void lglw_clipboard_text_get(lglw_t _lglw, uint32_t _maxChars, uint32_t *_retNumChars, char *_retText) {

  2028.    LGLW(_lglw);

  2029. 

  2030.    if(NULL != _retNumChars)

  2031.       *_retNumChars = 0u;

  2032. 

  2033.    if(NULL != _retText)

  2034.       *_retText = 0;

  2035. 

  2036.    if(_maxChars > 0u)

  2037.    {

  2038.       if(NULL != _lglw)

  2039.       {

  2040.          if(0 != lglw->win.xwnd)

  2041.          {

  2042.             Window owner;

  2043.             XEvent xev;

  2044.             XSelectionEvent *cbReq;

  2045.             Atom clipboard = XInternAtom(lglw->xdsp, "CLIPBOARD", False);

  2046.             Atom utf8 = XInternAtom(lglw->xdsp, "UTF8_STRING", False);

  2047.             Atom target = XInternAtom(lglw->xdsp, "_clipboard_result", False);

  2048. 

  2049.             owner = XGetSelectionOwner(lglw->xdsp, clipboard);

  2050.             if(owner == None)

  2051.             {

  2052.                Dlog("xxx lglw_clipboard_text_get: No Window can provide a clipboard result\n");

  2053.                return;

  2054.             }

  2055. 

  2056.             if(owner == lglw->win.xwnd)

  2057.             {

  2058.                Dlog("xxx lglw_clipboard_text_get: We are the owner of the clipboard, skip X interactions\n");

  2059. 

  2060.                uint32_t i = 0u;

  2061.                for(; i < _maxChars; i++)

  2062.                {

  2063.                   _retText[i] = lglw->clipboard.data[i];

  2064.                   if(0 == _retText[i])

  2065.                      break;

  2066.                }

  2067.                _retText[_maxChars - 1u] = 0;

  2068. 

  2069.                if(NULL != _retNumChars)

  2070.                   *_retNumChars = i;

  2071. 

  2072.                Dlog("xxx lglw_clipboard_text_get: (result on next line)\n%s\n", _retText);

  2073.                return;

  2074.             }

  2075. 

  2076.             XConvertSelection(lglw->xdsp, clipboard, utf8, target, lglw->win.xwnd, CurrentTime);

  2077.             XIfEvent(lglw->xdsp, &xev, &loc_is_clipboard_event, None);

  2078. 

  2079.             cbReq = (XSelectionEvent*)&xev;

  2080.             if(None == cbReq->property)

  2081.             {

  2082.                Dlog("xxx lglw_clipboard_text_get: Clipboard was not converted to UTF-8 string\n");

  2083.                return;

  2084.             }

  2085. 

  2086.             Atom returnType;

  2087.             int returnFormat;

  2088.             unsigned long size, returnSize, bytesLeft;

  2089.             unsigned char *propertyValue = NULL;

  2090. 

  2091.             XGetWindowProperty(lglw->xdsp, lglw->win.xwnd, target,

  2092.                                0/*offset*/,

  2093.                                0/*length*/,

  2094.                                False/*delete*/,

  2095.                                AnyPropertyType/*req_type*/,

  2096.                                &returnType/*actual_type_return*/,

  2097.                                &returnFormat/*actual_format_return*/,

  2098.                                &returnSize/*nitems_return*/,

  2099.                                &size/*bytes_after_return*/,

  2100.                                &propertyValue/*prop_return*/);

  2101.             XFree(propertyValue);

  2102. 

  2103.             if(utf8 != returnType)

  2104.             {

  2105.                Dlog("xxx lglw_clipboard_text_get: Clipboard result is not a UTF-8 string\n");

  2106.                return;

  2107.             }

  2108. 

  2109.             if(8u != returnFormat)

  2110.             {

  2111.                Dlog("xxx lglw_clipboard_text_get: Clipboard format is not a char array\n");

  2112.                return;

  2113.             }

  2114. 

  2115.             if(_maxChars < size)

  2116.                size = _maxChars;

  2117.             size = 1 + ((size - 1) / 4);

  2118. 

  2119.             // TODO: Even with the largest current use-case, multiple calls aren't necessary. do it anyway just in case

  2120.             XGetWindowProperty(lglw->xdsp, lglw->win.xwnd, target,

  2121.                                0/*offset*/,

  2122.                                size/*length*/,

  2123.                                True/*delete*/,

  2124.                                AnyPropertyType/*req_type*/,

  2125.                                &returnType/*actual_type_return*/,

  2126.                                &returnFormat/*actual_format_return*/,

  2127.                                &returnSize/*nitems_return*/,

  2128.                                &bytesLeft/*bytes_after_return*/,

  2129.                                &propertyValue/*prop_return*/);

  2130. 

  2131.             if(returnSize == 0)

  2132.             {

  2133.                Dlog("xxx lglw_clipboard_text_get: No Clipboard result after final request\n");

  2134.                return;

  2135.             }

  2136. 

  2137.             uint32_t i = 0u;

  2138.             for(; i < _maxChars; i++)

  2139.             {

  2140.                _retText[i] = propertyValue[i];

  2141.                if(0 == _retText[i])

  2142.                   break;

  2143.             }

  2144.             _retText[_maxChars - 1u] = 0;

  2145. 

  2146.             if(NULL != _retNumChars)

  2147.                *_retNumChars = i;

  2148. 

  2149.             Dlog("xxx lglw_clipboard_text_get: (result on next line)\n%s\n", _retText);

  2150.             XFree(propertyValue);

  2151.          }

  2152.       }

  2153.    }

  2154. }

  2155. 

  2156. // ---------------------------------------------------------------------------- lglw_events

  2157. void lglw_events(lglw_t _lglw) {

  2158.    LGLW(_lglw);

  2159. 

  2160.    if(NULL != lglw)

  2161.    {

  2162.       if(0 != lglw->win.xwnd)

  2163.       {

  2164. #if 0

  2165.          //int numEv = XEventsQueued(lglw->xdsp, QueuedAlready);

  2166.          int numEv = XEventsQueued(lglw->xdsp, QueuedAfterReading);

  2167.          // => numEv is always 0

  2168.          int evIdx = 0;

  2169.          Dlog_v("xxx lglw_events: numEv=%d\n", numEv);

  2170. 

  2171.          //for(; evIdx < numEv; evIdx++)

  2172.          for(;;)

  2173.          {

  2174.             XEvent xev;

  2175.             XNextEvent(lglw->xdsp, &xev);

  2176.             Dlog_v("xxx lglw_events: XNextEvent[%d]\n", evIdx++);

  2177.             loc_eventProc(&xev, lglw);

  2178.          }

  2179. #else

  2180.          // // int evIdx = 0;

  2181.          // // for(;;)

  2182.          // // {

  2183.          // //    XEvent xev;

  2184.          // //    // => blocks forever

  2185.          // //    XNextEvent(lglw->xdsp, &xev);

  2186.          // //    Dlog_v("xxx XNextEvent[%d]\n", evIdx++);

  2187.          // // }

  2188. 

  2189.          loc_process_timer(lglw);

  2190. #endif

  2191.          

  2192.       }

  2193.    }

  2194. }