MadButterfly: src/X_supp.c annotate

annotate src/X_supp.c @ 462:af4b506ad56f

Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime.

author	wycc@122-116-38-188.HINET-IP.hinet.net
date	Wed, 28 Oct 2009 02:39:02 +0800
parents	5c9e2a8a4bd8
children	e98ae1407ca2

rev	line source
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	1 #include <stdio.h>
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	2 #include <stdlib.h>
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	3 #include <string.h>
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	4 #include <X11/Xlib.h>
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	5 #include <X11/Xutil.h>
448 16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	6 #include "mb_graph_engine.h"
186 530bb7728546 Move header files to $(top_srcdir)/include/ and prefixed with 'mb_'. Thinker K.F. Li <thinker@branda.to> parents: 185 diff changeset	7 #include "mb_redraw_man.h"
530bb7728546 Move header files to $(top_srcdir)/include/ and prefixed with 'mb_'. Thinker K.F. Li <thinker@branda.to> parents: 185 diff changeset	8 #include "mb_timer.h"
530bb7728546 Move header files to $(top_srcdir)/include/ and prefixed with 'mb_'. Thinker K.F. Li <thinker@branda.to> parents: 185 diff changeset	9 #include "mb_X_supp.h"
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	10
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	11 #define ERR -1
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	12 #define OK 0
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	13
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	14 #define ONLY_MOUSE_MOVE_RAW 1
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	15
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	16 /*! \ingroup xkb
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	17 * @{
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	18 */
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	19 struct _X_kb_info {
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	20 int keycode_min, keycode_max;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	21 int ksym_per_code;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	22 KeySym *syms;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	23 subject_t *kbevents;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	24 ob_factory_t *ob_factory;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	25 };
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	26
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	27 /* @} */
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	28 #define MAX_MONITORS 200
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	29 typedef struct {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	30 int type;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	31 int fd;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	32 mb_eventcb_t f;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	33 void *arg;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	34 } monitor_t;
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	35 struct _X_MB_runtime {
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	36 Display *display;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	37 Window win;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	38 Visual *visual;
448 16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	39 mbe_surface_t surface, backend_surface;
16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	40 mbe_t cr, backend_cr;
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	41 redraw_man_t *rdman;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	42 mb_tman_t *tman;
259 e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	43 mb_img_ldr_t *img_ldr;
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	44 int w, h;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	45
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	46 X_kb_info_t kbinfo;
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	47 monitor_t monitors[MAX_MONITORS];
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	48 int n_monitor;
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	49
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	50 #ifndef ONLY_MOUSE_MOVE_RAW
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	51 /* States */
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	52 shape_t *last;
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	53 #endif
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	54 };
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	55
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	56 /*! \defgroup xkb X Keyboard Handling
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	57 *
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	58 * Accept keyboard events from X server and delivery it to
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	59 * application through observer pattern. There is a subject,
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	60 * per X-connection, for that.
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	61 * @{
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	62 */
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	63 static int keycode2sym(X_kb_info_t *kbinfo, unsigned int keycode) {
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	64 int sym_idx;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	65 int sym;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	66
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	67 sym_idx = kbinfo->ksym_per_code * (keycode - kbinfo->keycode_min);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	68 sym = kbinfo->syms[sym_idx];
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	69 return sym;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	70 }
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	71
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	72 static int X_kb_init(X_kb_info_t kbinfo, Display display,
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	73 redraw_man_t *rdman) {
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	74 int n_syms;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	75 ob_factory_t *factory;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	76 int r;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	77
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	78 r = XDisplayKeycodes(display,
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	79 &kbinfo->keycode_min,
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	80 &kbinfo->keycode_max);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	81 if(r == 0)
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	82 return ERR;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	83
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	84 n_syms = kbinfo->keycode_max - kbinfo->keycode_min + 1;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	85 kbinfo->syms = XGetKeyboardMapping(display, kbinfo->keycode_min,
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	86 n_syms,
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	87 &kbinfo->ksym_per_code);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	88 if(kbinfo->syms == NULL)
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	89 return ERR;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	90
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	91 factory = rdman_get_ob_factory(rdman);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	92 kbinfo->kbevents = subject_new(factory, kbinfo, OBJT_KB);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	93 if(kbinfo->kbevents == NULL)
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	94 return ERR;
192 54fdc2a65242 Remove factory from observer APIs. Thinker K.F. Li <thinker@branda.to> parents: 186 diff changeset	95 /! \todo Make sure ob_factory is still need. /
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	96 kbinfo->ob_factory = factory;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	97
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	98 return OK;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	99 }
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	100
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	101 static void X_kb_destroy(X_kb_info_t *kbinfo) {
192 54fdc2a65242 Remove factory from observer APIs. Thinker K.F. Li <thinker@branda.to> parents: 186 diff changeset	102 subject_free(kbinfo->kbevents);
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	103 XFree(kbinfo->syms);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	104 }
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	105
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	106 /*! \brief Accept X keyboard events from handle_x_event() and dispatch it.
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	107 */
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	108 static void X_kb_handle_event(X_kb_info_t kbinfo, XKeyEvent xkey) {
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	109 unsigned int code;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	110 int sym;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	111 X_kb_event_t event;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	112
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	113 code = xkey->keycode;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	114 sym = keycode2sym(kbinfo, code);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	115 if(xkey->type == KeyPress)
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	116 event.event.type = EVT_KB_PRESS;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	117 else if(xkey->type == KeyRelease)
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	118 event.event.type = EVT_KB_RELEASE;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	119 event.event.tgt = event.event.cur_tgt = kbinfo->kbevents;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	120 event.keycode = code;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	121 event.sym = sym;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	122
192 54fdc2a65242 Remove factory from observer APIs. Thinker K.F. Li <thinker@branda.to> parents: 186 diff changeset	123 subject_notify(kbinfo->kbevents, &event.event);
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	124 }
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	125
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	126 /* @} */
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	127
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	128 static unsigned int get_button_state(unsigned int state) {
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	129 unsigned int but = 0;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	130
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	131 if(state & Button1Mask)
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	132 but \|= MOUSE_BUT1;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	133 if(state & Button2Mask)
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	134 but \|= MOUSE_BUT2;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	135 if(state & Button3Mask)
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	136 but \|= MOUSE_BUT3;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	137
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	138 return but;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	139 }
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	140
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	141 static unsigned int get_button(unsigned int button) {
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	142 switch(button) {
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	143 case Button1:
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	144 return MOUSE_BUT1;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	145 case Button2:
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	146 return MOUSE_BUT2;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	147 case Button3:
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	148 return MOUSE_BUT3;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	149 }
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	150 return 0;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	151 }
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	152
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	153 /*! \brief Notify observers of the shape at specified
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	154 * position for mouse event.
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	155 *
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	156 * Observers of parent shapes may be called if the subject is not
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	157 * with SUBF_STOP_PROPAGATE flag. The subject of mouse event
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	158 * for a shape is returned by sh_get_mouse_event_subject().
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	159 */
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	160 static void notify_coord_or_shape(redraw_man_t *rdman,
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	161 mb_obj_t *obj,
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	162 co_aix x, co_aix y, int etype,
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	163 unsigned int state,
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	164 unsigned int button) {
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	165 mouse_event_t mouse_event;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	166 subject_t *subject;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	167
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	168 mouse_event.event.type = etype;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	169 mouse_event.x = x;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	170 mouse_event.y = y;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	171 mouse_event.but_state = state;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	172 mouse_event.button = button;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	173
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	174 if(IS_MBO_SHAPES(obj))
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	175 subject = sh_get_mouse_event_subject((shape_t *)obj);
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	176 else
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	177 subject = coord_get_mouse_event((coord_t *)obj);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	178
192 54fdc2a65242 Remove factory from observer APIs. Thinker K.F. Li <thinker@branda.to> parents: 186 diff changeset	179 subject_notify(subject, (event_t *)&mouse_event);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	180 }
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	181
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	182 /*! \brief Dispatch all X events in the queue.
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	183 */
83 ea758bb3bbe2 example Thinker K.F. Li <thinker@branda.to> parents: 82 diff changeset	184 static void handle_x_event(X_MB_runtime_t *rt) {
ea758bb3bbe2 example Thinker K.F. Li <thinker@branda.to> parents: 82 diff changeset	185 Display *display = rt->display;
ea758bb3bbe2 example Thinker K.F. Li <thinker@branda.to> parents: 82 diff changeset	186 redraw_man_t *rdman = rt->rdman;
350 892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	187 XEvent evt, peek_evt;
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	188 XMotionEvent *mevt;
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	189 XButtonEvent *bevt;
81 13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	190 XExposeEvent *eevt;
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	191 XKeyEvent *xkey;
81 13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	192 co_aix x, y, w, h;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	193
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	194 int eflag = 0;
82 4bb6451ef036 - Thinker K.F. Li <thinker@branda.to> parents: 81 diff changeset	195 int ex1=0, ey1=0, ex2=0, ey2=0;
81 13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	196
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	197 shape_t *shape;
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	198 coord_t *root;
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	199
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	200 unsigned int state, button;
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	201 int in_stroke;
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	202 int r;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	203
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	204 while(XEventsQueued(display, QueuedAfterReading) > 0) {
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	205 r = XNextEvent(display, &evt);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	206 if(r == -1)
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	207 break;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	208
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	209 switch(evt.type) {
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	210 case ButtonPress:
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	211 bevt = (XButtonEvent *)&evt;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	212 x = bevt->x;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	213 y = bevt->y;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	214 state = get_button_state(bevt->state);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	215 button = get_button(bevt->button);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	216
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	217 shape = find_shape_at_pos(rdman, x, y,
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	218 &in_stroke);
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	219 if(shape)
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	220 notify_coord_or_shape(rdman, (mb_obj_t *)shape,
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	221 x, y, EVT_MOUSE_BUT_PRESS,
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	222 state, button);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	223 break;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	224
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	225 case ButtonRelease:
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	226 bevt = (XButtonEvent *)&evt;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	227 x = bevt->x;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	228 y = bevt->y;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	229 state = get_button_state(bevt->state);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	230 button = get_button(bevt->button);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	231
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	232 shape = find_shape_at_pos(rdman, x, y,
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	233 &in_stroke);
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	234 if(shape)
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	235 notify_coord_or_shape(rdman, (mb_obj_t *)shape,
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	236 x, y, EVT_MOUSE_BUT_RELEASE,
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	237 state, button);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	238 break;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	239
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	240 case MotionNotify:
350 892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	241 while(XEventsQueued(display, QueuedAfterReading) > 0) {
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	242 r = XPeekEvent(display, &peek_evt);
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	243 if(r == -1)
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	244 break;
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	245 if(peek_evt.type != MotionNotify)
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	246 break;
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	247 XNextEvent(display, &evt);
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	248 }
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	249 if(r == -1)
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	250 break;
892f4efe2e48 Prevent applications from hanging by massive mouse motion events. Thinker K.F. Li <thinker@branda.to> parents: 346 diff changeset	251
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	252 mevt = (XMotionEvent *)&evt;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	253 x = mevt->x;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	254 y = mevt->y;
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	255 state = get_button_state(mevt->state);
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	256
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	257 shape = find_shape_at_pos(rdman, x, y,
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	258 &in_stroke);
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	259 #ifdef ONLY_MOUSE_MOVE_RAW
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	260 if(shape != NULL) {
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	261 notify_coord_or_shape(rdman, (mb_obj_t *)shape,
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	262 x, y, EVT_MOUSE_MOVE_RAW, state, 0);
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	263 } else {
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	264 root = rdman_get_root(rdman);
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	265 notify_coord_or_shape(rdman, (mb_obj_t *)root,
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	266 x, y, EVT_MOUSE_MOVE_RAW, state, 0);
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	267 }
29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	268 #else
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	269 if(shape != NULL) {
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	270 if(rt->last != shape) {
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	271 if(rt->last)
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	272 notify_coord_or_shape(rdman, rt->last, x, y,
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	273 EVT_MOUSE_OUT, state, 0);
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	274 notify_coord_or_shape(rdman, shape, x, y,
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	275 EVT_MOUSE_OVER, state, 0);
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	276 rt->last = shape;
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	277 } else
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	278 notify_coord_or_shape(rdman, shape, x, y,
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	279 EVT_MOUSE_MOVE, state, 0);
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	280 } else {
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	281 if(rt->last) {
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	282 notify_coord_or_shape(rdman, rt->last, x, y,
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	283 EVT_MOUSE_OUT, state, 0);
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	284 rt->last = NULL;
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	285 }
42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	286 }
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	287 #endif
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	288 break;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	289
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	290 case KeyPress:
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	291 case KeyRelease:
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	292 xkey = &evt.xkey;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	293 X_kb_handle_event(&rt->kbinfo, xkey);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	294 break;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	295
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	296 case Expose:
81 13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	297 eevt = &evt.xexpose;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	298 x = eevt->x;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	299 y = eevt->y;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	300 w = eevt->width;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	301 h = eevt->height;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	302
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	303 if(eflag) {
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	304 if(x < ex1)
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	305 ex1 = x;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	306 if(y < ey1)
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	307 ey1 = y;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	308 if((x + w) > ex2)
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	309 ex2 = x + w;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	310 if((y + h) > ey2)
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	311 ey2 = y + h;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	312 } else {
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	313 ex1 = x;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	314 ey1 = y;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	315 ex2 = x + w;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	316 ey2 = y + h;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	317 eflag = 1;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	318 }
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	319 break;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	320 }
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	321 }
81 13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	322 if(eflag) {
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	323 rdman_redraw_area(rdman, ex1, ey1, (ex2 - ex1), (ey2 - ey1));
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	324 eflag = 0;
13fdf205047b Hide shapes and groups Thinker K.F. Li <thinker@branda.to> parents: 78 diff changeset	325 }
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	326 XFlush(display);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	327 }
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	328
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	329 /*! \brief Handle connection coming data and timeout of timers.
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	330 *
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	331 * \param display is a Display returned by XOpenDisplay().
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	332 * \param rdman is a redraw manager.
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	333 * \param tman is a timer manager.
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	334 *
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	335 * The display is managed by specified rdman and tman. rdman draws
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	336 * on the display, and tman trigger actions according timers.
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	337 */
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	338 void X_MB_handle_connection(void *be) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	339 X_MB_runtime_t rt = (X_MB_runtime_t ) be;
83 ea758bb3bbe2 example Thinker K.F. Li <thinker@branda.to> parents: 82 diff changeset	340 Display *display = rt->display;
ea758bb3bbe2 example Thinker K.F. Li <thinker@branda.to> parents: 82 diff changeset	341 redraw_man_t *rdman = rt->rdman;
ea758bb3bbe2 example Thinker K.F. Li <thinker@branda.to> parents: 82 diff changeset	342 mb_tman_t *tman = rt->tman;
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	343 int fd;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	344 mb_timeval_t now, tmo;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	345 struct timeval tv;
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	346 fd_set rfds,wfds;
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	347 int nfds;
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	348 int r, r1,i;
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	349
142 3efe77007127 Do not redraw all at begining, waiting for explosure. Thinker K.F. Li <thinker@branda.to> parents: 131 diff changeset	350 handle_x_event(rt);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	351
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	352 fd = XConnectionNumber(display);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	353 nfds = fd + 1;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	354 while(1) {
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	355 FD_ZERO(&rfds);
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	356 FD_ZERO(&wfds);
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	357 FD_SET(fd, &rfds);
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	358 for(i=0;i<rt->n_monitor;i++) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	359 if (rt->monitors[i].type == MONITOR_READ)
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	360 FD_SET(rt->monitors[i].fd, &rfds);
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	361 else if (rt->monitors[i].type == MONITOR_WRITE)
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	362 FD_SET(rt->monitors[i].fd, &wfds);
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	363 }
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	364
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	365 get_now(&now);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	366 r = mb_tman_next_timeout(tman, &now, &tmo);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	367
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	368 if(r == 0) {
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	369 tv.tv_sec = MB_TIMEVAL_SEC(&tmo);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	370 tv.tv_usec = MB_TIMEVAL_USEC(&tmo);
120 5df7403b6fbc Fix bug of get_now() Thinker K.F. Li <thinker@branda.to> parents: 84 diff changeset	371 r1 = select(nfds, &rfds, NULL, NULL, &tv);
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	372 } else
120 5df7403b6fbc Fix bug of get_now() Thinker K.F. Li <thinker@branda.to> parents: 84 diff changeset	373 r1 = select(nfds, &rfds, NULL, NULL, NULL);
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	374
120 5df7403b6fbc Fix bug of get_now() Thinker K.F. Li <thinker@branda.to> parents: 84 diff changeset	375 if(r1 == -1) {
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	376 perror("select");
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	377 break;
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	378 }
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	379
120 5df7403b6fbc Fix bug of get_now() Thinker K.F. Li <thinker@branda.to> parents: 84 diff changeset	380 if(r1 == 0) {
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	381 get_now(&now);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	382 mb_tman_handle_timeout(tman, &now);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	383 rdman_redraw_changed(rdman);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	384 XFlush(display);
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	385 } else if(FD_ISSET(fd, &rfds)){
83 ea758bb3bbe2 example Thinker K.F. Li <thinker@branda.to> parents: 82 diff changeset	386 handle_x_event(rt);
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	387 } else {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	388 for(i=0;i<rt->n_monitor;i++) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	389 if (rt->monitors[i].type == MONITOR_READ)
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	390 if (FD_ISSET(rt->monitors[i].fd, &rfds))
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	391 rt->monitors[i].f(rt->monitors[i].fd,rt->monitors[i].arg);
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	392 else if (rt->monitors[i].type == MONITOR_WRITE)
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	393 if (FD_ISSET(rt->monitors[i].fd, &wfds))
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	394 rt->monitors[i].f(rt->monitors[i].fd,rt->monitors[i].arg);
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	395 }
77 a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	396 }
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	397 }
a6763f080da5 - Thinker K.F. Li <thinker@branda.to> parents: diff changeset	398 }
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	399
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	400 #define ERR -1
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	401 #define OK 0
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	402
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	403 static int X_init_connection(const char *display_name,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	404 int w, int h,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	405 Display **displayp,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	406 Visual **visualp,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	407 Window *winp) {
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	408 Display *display;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	409 Window root, win;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	410 Visual *visual;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	411 int screen;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	412 XSetWindowAttributes wattr;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	413 int depth;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	414 int x, y;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	415 int r;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	416
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	417 display = XOpenDisplay(display_name);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	418 if(display == NULL)
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	419 return ERR;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	420
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	421 screen = DefaultScreen(display);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	422 root = DefaultRootWindow(display);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	423 visual = DefaultVisual(display, screen);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	424 depth = DefaultDepth(display, screen);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	425 wattr.override_redirect = False;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	426 x = 10;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	427 y = 10;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	428 win = XCreateWindow(display, root,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	429 x, y,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	430 w, h,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	431 1, depth, InputOutput, visual,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	432 CWOverrideRedirect, &wattr);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	433 r = XMapWindow(display, win);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	434 if(r == -1) {
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	435 XCloseDisplay(display);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	436 return ERR;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	437 }
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	438
84 42698de1f653 Support translate() function for transform attribute of 'g' tag. Thinker K.F. Li <thinker@branda.to> parents: 83 diff changeset	439 XSelectInput(display, win, PointerMotionMask \| ExposureMask \|
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	440 ButtonPressMask \| ButtonReleaseMask \|
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	441 KeyPressMask \| KeyReleaseMask);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	442 XFlush(display);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	443
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	444 *displayp = display;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	445 *visualp = visual;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	446 *winp = win;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	447
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	448 return OK;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	449 }
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	450
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	451 /*! \brief Initialize a MadButterfy runtime for Xlib.
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	452 *
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	453 * It setups a runtime environment to run MadButterfly with Xlib.
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	454 * Users should specify width and height of the opening window.
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	455 */
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	456 static int X_MB_init(const char *display_name,
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	457 int w, int h, X_MB_runtime_t *xmb_rt) {
265 b42ee279669e Change function name and add comments. Thinker K.F. Li <thinker@branda.to> parents: 260 diff changeset	458 mb_img_ldr_t *img_ldr;
b42ee279669e Change function name and add comments. Thinker K.F. Li <thinker@branda.to> parents: 260 diff changeset	459
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	460 memset(xmb_rt, 0, sizeof(X_MB_runtime_t));
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	461
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	462 xmb_rt->w = w;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	463 xmb_rt->h = h;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	464 X_init_connection(display_name, w, h, &xmb_rt->display,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	465 &xmb_rt->visual, &xmb_rt->win);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	466
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	467 xmb_rt->surface =
450 a417fd980228 Replace cairo_format_t with mb_img_fmt_t. Thinker K.F. Li <thinker@branda.to> parents: 448 diff changeset	468 mbe_image_surface_create(MB_IFMT_ARGB32, w, h);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	469
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	470 xmb_rt->backend_surface =
448 16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	471 mbe_xlib_surface_create(xmb_rt->display,
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	472 xmb_rt->win,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	473 xmb_rt->visual,
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	474 w, h);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	475
448 16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	476 xmb_rt->cr = mbe_create(xmb_rt->surface);
16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	477 xmb_rt->backend_cr = mbe_create(xmb_rt->backend_surface);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	478
448 16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	479 mbe_set_source_surface(xmb_rt->backend_cr, xmb_rt->surface, 0, 0);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	480
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	481 xmb_rt->rdman = (redraw_man_t *)malloc(sizeof(redraw_man_t));
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	482 redraw_man_init(xmb_rt->rdman, xmb_rt->cr, xmb_rt->backend_cr);
249 ab8284c8dcee * Add loopback reference from rdman to the backend. This is only required when we need to acquire the tman for the animation. This is not a reasonable arrangement since the animation should be backend transparent. We should not touch the backend directly from the animation. We should relocate the tman to the rdman. wycc parents: 224 diff changeset	483 // FIXME: This is a wired loopback reference. This is inly required when we need
ab8284c8dcee * Add loopback reference from rdman to the backend. This is only required when we need to acquire the tman for the animation. This is not a reasonable arrangement since the animation should be backend transparent. We should not touch the backend directly from the animation. We should relocate the tman to the rdman. wycc parents: 224 diff changeset	484 // to get the xmb_rt->tman for the animation. We should relocate the tman
ab8284c8dcee * Add loopback reference from rdman to the backend. This is only required when we need to acquire the tman for the animation. This is not a reasonable arrangement since the animation should be backend transparent. We should not touch the backend directly from the animation. We should relocate the tman to the rdman. wycc parents: 224 diff changeset	485 // to the redraw_man_t instead.
ab8284c8dcee * Add loopback reference from rdman to the backend. This is only required when we need to acquire the tman for the animation. This is not a reasonable arrangement since the animation should be backend transparent. We should not touch the backend directly from the animation. We should relocate the tman to the rdman. wycc parents: 224 diff changeset	486 xmb_rt->rdman->rt = xmb_rt;
270 cd6af7da32c9 Fix the problem that clean_canvas() can not clean canvas cleanly. Thinker K.F. Li <thinker@branda.to> parents: 265 diff changeset	487 xmb_rt->rdman->w = w;
cd6af7da32c9 Fix the problem that clean_canvas() can not clean canvas cleanly. Thinker K.F. Li <thinker@branda.to> parents: 265 diff changeset	488 xmb_rt->rdman->h = h;
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	489
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	490 xmb_rt->tman = mb_tman_new();
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	491
346 b391722bf20e sh_image_t::img_data is managed by paint_image_t. Thinker K.F. Li <thinker@branda.to> parents: 270 diff changeset	492 img_ldr = simple_mb_img_ldr_new("");
265 b42ee279669e Change function name and add comments. Thinker K.F. Li <thinker@branda.to> parents: 260 diff changeset	493 xmb_rt->img_ldr = img_ldr;
b42ee279669e Change function name and add comments. Thinker K.F. Li <thinker@branda.to> parents: 260 diff changeset	494 rdman_set_img_ldr(xmb_rt->rdman, img_ldr);
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	495 memset(xmb_rt->monitors,0,sizeof(xmb_rt->monitors));
260 29acbd8a0dd0 Integrate sh_image with svg2code.py. Thinker K.F. Li <thinker@branda.to> parents: 259 diff changeset	496
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	497 #ifndef ONLY_MOUSE_MOVE_RAW
83 ea758bb3bbe2 example Thinker K.F. Li <thinker@branda.to> parents: 82 diff changeset	498 xmb_rt->last = NULL;
224 29e1b2bffe4c X backend only sent EVT_MOUSE_MOVE_RAW to MadButterfly. Thinker K.F. Li <thinker@branda.to> parents: 192 diff changeset	499 #endif
83 ea758bb3bbe2 example Thinker K.F. Li <thinker@branda.to> parents: 82 diff changeset	500
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	501 X_kb_init(&xmb_rt->kbinfo, xmb_rt->display, xmb_rt->rdman);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	502
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	503 return OK;
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	504 }
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	505
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	506 static void X_MB_destroy(X_MB_runtime_t *xmb_rt) {
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	507 if(xmb_rt->rdman) {
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	508 redraw_man_destroy(xmb_rt->rdman);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	509 free(xmb_rt->rdman);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	510 }
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	511
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	512 if(xmb_rt->tman)
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	513 mb_tman_free(xmb_rt->tman);
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	514
259 e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	515 if(xmb_rt->img_ldr)
e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	516 MB_IMG_LDR_FREE(xmb_rt->img_ldr);
e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	517
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	518 if(xmb_rt->cr)
448 16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	519 mbe_destroy(xmb_rt->cr);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	520 if(xmb_rt->backend_cr)
448 16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	521 mbe_destroy(xmb_rt->backend_cr);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	522
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	523 if(xmb_rt->surface)
448 16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	524 mbe_surface_destroy(xmb_rt->surface);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	525 if(xmb_rt->backend_surface)
448 16116d84bc5e Replace Cairo with a abstract layer mb_graph_engine. Thinker K.F. Li <thinker@branda.to> parents: 350 diff changeset	526 mbe_surface_destroy(xmb_rt->backend_surface);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	527
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	528 if(xmb_rt->display)
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	529 XCloseDisplay(xmb_rt->display);
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	530
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	531 X_kb_destroy(&xmb_rt->kbinfo);
78 3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	532 }
3645e29e4986 Add runtime for Xlib. Thinker K.F. Li <thinker@branda.to> parents: 77 diff changeset	533
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	534 void X_MB_new(const char display_name, int w, int h) {
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	535 X_MB_runtime_t *rt;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	536 int r;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	537
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	538 rt = O_ALLOC(X_MB_runtime_t);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	539 if(rt == NULL)
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	540 return NULL;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	541
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	542 r = X_MB_init(display_name, w, h, rt);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	543 if(r != OK)
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	544 return NULL;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	545
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	546 return rt;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	547 }
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	548
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	549 void X_MB_free(void *rt) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	550 X_MB_destroy((X_MB_runtime_t *) rt);
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	551 free(rt);
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	552 }
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	553
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	554 subject_t X_MB_kbevents(void rt) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	555 X_MB_runtime_t xmb_rt = (X_MB_runtime_t ) rt;
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	556 return xmb_rt->kbinfo.kbevents;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	557 }
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	558
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	559 redraw_man_t X_MB_rdman(void rt) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	560 X_MB_runtime_t xmb_rt = (X_MB_runtime_t ) rt;
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	561 return xmb_rt->rdman;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	562 }
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	563
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	564 mb_tman_t X_MB_tman(void rt) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	565 X_MB_runtime_t xmb_rt = (X_MB_runtime_t ) rt;
122 17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	566 return xmb_rt->tman;
17e97e92b76e Encapsulate X_MB_runtime_t and support X keyboard events. Thinker K.F. Li <thinker@branda.to> parents: 120 diff changeset	567 }
131 6a8588df68af Tank can change direction and navigate on the mud area Thinker K.F. Li <thinker@branda.to> parents: 122 diff changeset	568
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	569 ob_factory_t X_MB_ob_factory(void rt) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	570 X_MB_runtime_t xmb_rt = (X_MB_runtime_t ) rt;
131 6a8588df68af Tank can change direction and navigate on the mud area Thinker K.F. Li <thinker@branda.to> parents: 122 diff changeset	571 ob_factory_t *factory;
6a8588df68af Tank can change direction and navigate on the mud area Thinker K.F. Li <thinker@branda.to> parents: 122 diff changeset	572
6a8588df68af Tank can change direction and navigate on the mud area Thinker K.F. Li <thinker@branda.to> parents: 122 diff changeset	573 factory = rdman_get_ob_factory(xmb_rt->rdman);
6a8588df68af Tank can change direction and navigate on the mud area Thinker K.F. Li <thinker@branda.to> parents: 122 diff changeset	574 return factory;
6a8588df68af Tank can change direction and navigate on the mud area Thinker K.F. Li <thinker@branda.to> parents: 122 diff changeset	575 }
259 e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	576
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	577 mb_img_ldr_t X_MB_img_ldr(void rt) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	578 X_MB_runtime_t xmb_rt = (X_MB_runtime_t ) rt;
259 e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	579 X_MB_runtime_t *img_ldr;
e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	580
e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	581 img_ldr = xmb_rt->img_ldr;
e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	582
e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	583 return img_ldr;
e8a784a306d0 Initialize an image loader for X runtime Thinker K.F. Li <thinker@branda.to> parents: 249 diff changeset	584 }
462 af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	585
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	586 void X_add_event(void rt, int type, int fd, mb_eventcb_t f,void arg)
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	587 {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	588 X_MB_runtime_t xmb_rt = (X_MB_runtime_t ) rt;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	589 int i;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	590
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	591 for(i=0;i<xmb_rt->n_monitor;i++) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	592 if (xmb_rt->monitors[i].type == type && xmb_rt->monitors[i].fd == fd) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	593 xmb_rt->monitors[i].f = f;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	594 xmb_rt->monitors[i].arg = arg;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	595 return;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	596 }
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	597 }
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	598 for(i=0;i<xmb_rt->n_monitor;i++) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	599 if (xmb_rt->monitors[i].type == 0) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	600 xmb_rt->monitors[i].type = type;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	601 xmb_rt->monitors[i].fd = fd;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	602 xmb_rt->monitors[i].f = f;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	603 xmb_rt->monitors[i].arg = arg;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	604 return;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	605 }
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	606 }
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	607 if (i == MAX_MONITORS) return;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	608 xmb_rt->monitors[i].type = type;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	609 xmb_rt->monitors[i].fd = fd;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	610 xmb_rt->monitors[i].f = f;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	611 xmb_rt->monitors[i].arg = arg;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	612 i++;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	613 xmb_rt->n_monitor=i;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	614 }
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	615
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	616 void X_remove_event(void *rt, int type, int fd)
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	617 {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	618 X_MB_runtime_t xmb_rt = (X_MB_runtime_t ) rt;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	619 int i;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	620 for(i=0;i<xmb_rt->n_monitor;i++) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	621 if (xmb_rt->monitors[i].type == type && xmb_rt->monitors[i].fd == fd) {
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	622 xmb_rt->monitors[i].type = 0;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	623 return;
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	624 }
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	625 }
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	626 }
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	627 mb_backend_t backend = { X_MB_new,
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	628 X_MB_free,
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	629 X_add_event,
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	630 X_remove_event,
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	631 X_MB_handle_connection,
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	632 X_MB_kbevents,
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	633 X_MB_rdman,
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	634 X_MB_tman,
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	635 X_MB_ob_factory,
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	636 X_MB_img_ldr
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	637 };
af4b506ad56f Add backend layer to seperate the backend with the MBAF. Currently, X is the only backend. If we have more than one backend, we need to modify the Makefile to sleect the backend or implement a backend selection mechanism in the runtime. wycc@122-116-38-188.HINET-IP.hinet.net parents: 451 diff changeset	638

Mercurial > MadButterfly

annotate src/X_supp.c @ 462:af4b506ad56f