4 * This event handling stuff was based on Tk.
9 #include "../src/config.h"
11 #include <sys/types.h>
21 #ifdef HAVE_SYS_SELECT_H
22 # include <sys/select.h>
27 #ifndef X_GETTIMEOFDAY
28 #define X_GETTIMEOFDAY(t) gettimeofday(t, (struct timezone*)0)
36 typedef struct TimerHandler
{
37 WMCallback
*callback
; /* procedure to call */
38 struct timeval when
; /* when to call the callback */
40 struct TimerHandler
*next
;
44 typedef struct IdleHandler
{
47 struct IdleHandler
*next
;
51 typedef struct InputHandler
{
52 WMInputProc
*callback
;
56 struct InputHandler
*next
;
60 /* table to map event types to event masks */
61 static unsigned long eventMasks
[] = {
64 KeyPressMask
, /* KeyPress */
65 KeyReleaseMask
, /* KeyRelease */
66 ButtonPressMask
, /* ButtonPress */
67 ButtonReleaseMask
, /* ButtonRelease */
68 PointerMotionMask
|PointerMotionHintMask
|ButtonMotionMask
69 |Button1MotionMask
|Button2MotionMask
|Button3MotionMask
70 |Button4MotionMask
|Button5MotionMask
,
72 EnterWindowMask
, /* EnterNotify */
73 LeaveWindowMask
, /* LeaveNotify */
74 FocusChangeMask
, /* FocusIn */
75 FocusChangeMask
, /* FocusOut */
76 KeymapStateMask
, /* KeymapNotify */
77 ExposureMask
, /* Expose */
78 ExposureMask
, /* GraphicsExpose */
79 ExposureMask
, /* NoExpose */
80 VisibilityChangeMask
, /* VisibilityNotify */
81 SubstructureNotifyMask
, /* CreateNotify */
82 StructureNotifyMask
, /* DestroyNotify */
83 StructureNotifyMask
, /* UnmapNotify */
84 StructureNotifyMask
, /* MapNotify */
85 SubstructureRedirectMask
, /* MapRequest */
86 StructureNotifyMask
, /* ReparentNotify */
87 StructureNotifyMask
, /* ConfigureNotify */
88 SubstructureRedirectMask
, /* ConfigureRequest */
89 StructureNotifyMask
, /* GravityNotify */
90 ResizeRedirectMask
, /* ResizeRequest */
91 StructureNotifyMask
, /* CirculateNotify */
92 SubstructureRedirectMask
, /* CirculateRequest */
93 PropertyChangeMask
, /* PropertyNotify */
94 0, /* SelectionClear */
95 0, /* SelectionRequest */
96 0, /* SelectionNotify */
97 ColormapChangeMask
, /* ColormapNotify */
98 ClientMessageMask
, /* ClientMessage */
99 0, /* Mapping Notify */
104 /* queue of timer event handlers */
105 static TimerHandler
*timerHandler
=NULL
;
107 static IdleHandler
*idleHandler
=NULL
;
109 static InputHandler
*inputHandler
=NULL
;
111 /* hook for other toolkits or wmaker process their events */
112 static WMEventHook
*extraEventHandler
=NULL
;
116 #define timerPending() (timerHandler)
118 #define idlePending() (idleHandler)
122 rightNow(struct timeval
*tv
) {
126 /* is t1 after t2 ? */
127 #define IS_AFTER(t1, t2) (((t1).tv_sec > (t2).tv_sec) || \
128 (((t1).tv_sec == (t2).tv_sec) \
129 && ((t1).tv_usec > (t2).tv_usec)))
133 addmillisecs(struct timeval
*tv
, int milliseconds
)
135 tv
->tv_usec
+= milliseconds
*1000;
137 tv
->tv_sec
+= tv
->tv_usec
/1000000;
138 tv
->tv_usec
= tv
->tv_usec
%1000000;
143 WMAddTimerHandler(int milliseconds
, WMCallback
*callback
, void *cdata
)
145 TimerHandler
*handler
, *tmp
;
147 handler
= malloc(sizeof(TimerHandler
));
151 rightNow(&handler
->when
);
152 addmillisecs(&handler
->when
, milliseconds
);
153 handler
->callback
= callback
;
154 handler
->clientData
= cdata
;
155 /* insert callback in queue, sorted by time left */
156 if (!timerHandler
|| !IS_AFTER(handler
->when
, timerHandler
->when
)) {
157 /* first in the queue */
158 handler
->next
= timerHandler
;
159 timerHandler
= handler
;
162 while (tmp
->next
&& IS_AFTER(handler
->when
, tmp
->next
->when
)) {
165 handler
->next
= tmp
->next
;
174 WMDeleteTimerWithClientData(void *cdata
)
176 TimerHandler
*handler
, *tmp
;
178 if (!cdata
|| !timerHandler
)
182 if (tmp
->clientData
==cdata
) {
183 timerHandler
= tmp
->next
;
187 if (tmp
->next
->clientData
==cdata
) {
189 tmp
->next
= handler
->next
;
201 WMDeleteTimerHandler(WMHandlerID handlerID
)
203 TimerHandler
*tmp
, *handler
=(TimerHandler
*)handlerID
;
205 if (!handler
|| !timerHandler
)
210 timerHandler
= handler
->next
;
214 if (tmp
->next
==handler
) {
215 tmp
->next
=handler
->next
;
227 WMAddIdleHandler(WMCallback
*callback
, void *cdata
)
229 IdleHandler
*handler
, *tmp
;
231 handler
= malloc(sizeof(IdleHandler
));
235 handler
->callback
= callback
;
236 handler
->clientData
= cdata
;
237 handler
->next
= NULL
;
238 /* add callback at end of queue */
240 idleHandler
= handler
;
255 WMDeleteIdleHandler(WMHandlerID handlerID
)
257 IdleHandler
*tmp
, *handler
= (IdleHandler
*)handlerID
;
259 if (!handler
|| !idleHandler
)
263 if (tmp
== handler
) {
264 idleHandler
= handler
->next
;
268 if (tmp
->next
== handler
) {
269 tmp
->next
= handler
->next
;
281 WMAddInputHandler(int fd
, int condition
, WMInputProc
*proc
, void *clientData
)
283 InputHandler
*handler
;
285 handler
= wmalloc(sizeof(InputHandler
));
288 handler
->mask
= condition
;
289 handler
->callback
= proc
;
290 handler
->clientData
= clientData
;
292 handler
->next
= inputHandler
;
294 inputHandler
= handler
;
301 WMDeleteInputHandler(WMHandlerID handlerID
)
303 InputHandler
*tmp
, *handler
= (InputHandler
*)handlerID
;
305 if (!handler
|| !inputHandler
)
309 if (tmp
== handler
) {
310 inputHandler
= handler
->next
;
314 if (tmp
->next
== handler
) {
315 tmp
->next
= handler
->next
;
328 IdleHandler
*handler
, *tmp
;
331 W_FlushIdleNotificationQueue();
335 handler
= idleHandler
;
337 /* we will process all idleHandlers so, empty the handler list */
342 (*handler
->callback
)(handler
->clientData
);
343 /* remove the handler */
348 W_FlushIdleNotificationQueue();
356 TimerHandler
*handler
;
361 while (timerHandler
&& IS_AFTER(now
, timerHandler
->when
)) {
362 handler
= timerHandler
;
363 timerHandler
= timerHandler
->next
;
364 handler
->next
= NULL
;
365 (*handler
->callback
)(handler
->clientData
);
369 W_FlushASAPNotificationQueue();
375 delayUntilNextTimerEvent(struct timeval
*delay
)
380 /* The return value of this function is only valid if there _are_
388 if (IS_AFTER(now
, timerHandler
->when
)) {
392 delay
->tv_sec
= timerHandler
->when
.tv_sec
- now
.tv_sec
;
393 delay
->tv_usec
= timerHandler
->when
.tv_usec
- now
.tv_usec
;
394 if (delay
->tv_usec
< 0) {
395 delay
->tv_usec
+= 1000000;
405 * WMCreateEventHandler--
406 * Create an event handler and put it in the event handler list for the
407 * view. If the same callback and clientdata are already used in another
408 * handler, the masks are swapped.
412 WMCreateEventHandler(WMView
*view
, unsigned long mask
, WMEventProc
*eventProc
,
415 W_EventHandler
*handler
;
416 W_EventHandler
*ptr
= view
->handlerList
;
417 unsigned long eventMask
;
420 handler
= wmalloc(sizeof(W_EventHandler
));
422 handler
->nextHandler
= NULL
;
424 view
->handlerList
= handler
;
430 while (ptr
!= NULL
) {
431 if (ptr
->clientData
== clientData
&& ptr
->proc
== eventProc
) {
434 eventMask
|= ptr
->eventMask
;
436 ptr
= ptr
->nextHandler
;
439 handler
= wmalloc(sizeof(W_EventHandler
));
440 handler
->nextHandler
= view
->handlerList
;
441 view
->handlerList
= handler
;
445 /* select events for window */
446 handler
->eventMask
= mask
;
447 handler
->proc
= eventProc
;
448 handler
->clientData
= clientData
;
453 * WMDeleteEventHandler--
454 * Delete event handler matching arguments from windows
455 * event handler list.
459 WMDeleteEventHandler(WMView
*view
, unsigned long mask
, WMEventProc
*eventProc
,
462 W_EventHandler
*handler
, *ptr
, *pptr
;
464 ptr
= view
->handlerList
;
470 if (ptr
->eventMask
== mask
&& ptr
->proc
== eventProc
471 && ptr
->clientData
== clientData
) {
476 ptr
= ptr
->nextHandler
;
483 view
->handlerList
= handler
->nextHandler
;
485 pptr
->nextHandler
= handler
->nextHandler
;
493 W_CleanUpEvents(WMView
*view
)
495 W_EventHandler
*ptr
, *nptr
;
497 ptr
= view
->handlerList
;
500 nptr
= ptr
->nextHandler
;
509 getEventTime(WMScreen
*screen
, XEvent
*event
)
511 switch (event
->type
) {
514 return event
->xbutton
.time
;
517 return event
->xkey
.time
;
519 return event
->xmotion
.time
;
522 return event
->xcrossing
.time
;
524 return event
->xproperty
.time
;
526 return event
->xselectionclear
.time
;
527 case SelectionRequest
:
528 return event
->xselectionrequest
.time
;
529 case SelectionNotify
:
530 return event
->xselection
.time
;
532 return screen
->lastEventTime
;
538 W_CallDestroyHandlers(W_View
*view
)
541 W_EventHandler
*hPtr
;
543 event
.type
= DestroyNotify
;
544 event
.xdestroywindow
.window
= view
->window
;
545 event
.xdestroywindow
.event
= view
->window
;
546 hPtr
= view
->handlerList
;
548 if (hPtr
->eventMask
& StructureNotifyMask
) {
549 (*hPtr
->proc
)(&event
, hPtr
->clientData
);
552 hPtr
= hPtr
->nextHandler
;
558 WMHandleEvent(XEvent
*event
)
560 W_EventHandler
*hPtr
;
561 W_View
*view
, *vPtr
, *toplevel
;
565 if (event
->type
== MappingNotify
) {
566 XRefreshKeyboardMapping(&event
->xmapping
);
570 mask
= eventMasks
[event
->xany
.type
];
572 window
= event
->xany
.window
;
574 /* diferentiate SubstructureNotify with StructureNotify */
575 if (mask
== StructureNotifyMask
) {
576 if (event
->xmap
.event
!= event
->xmap
.window
) {
577 mask
= SubstructureNotifyMask
;
578 window
= event
->xmap
.event
;
581 view
= W_GetViewForXWindow(event
->xany
.display
, window
);
583 if (extraEventHandler
)
584 (extraEventHandler
)(event
);
589 view
->screen
->lastEventTime
= getEventTime(view
->screen
, event
);
591 toplevel
= W_TopLevelOfView(view
);
593 if (event
->type
== SelectionNotify
|| event
->type
== SelectionClear
594 || event
->type
== SelectionRequest
) {
595 /* handle selection related events */
596 W_HandleSelectionEvent(event
);
599 /* if it's a key event, redispatch it to the focused control */
600 if (mask
& (KeyPressMask
|KeyReleaseMask
)) {
601 W_View
*focused
= W_FocusedViewOfToplevel(toplevel
);
608 /* compress Motion events */
609 if (event
->type
== MotionNotify
&& !view
->flags
.dontCompressMotion
) {
610 while (XPending(event
->xmotion
.display
)) {
612 XPeekEvent(event
->xmotion
.display
, &ev
);
613 if (ev
.type
== MotionNotify
614 && event
->xmotion
.window
== ev
.xmotion
.window
615 && event
->xmotion
.subwindow
== ev
.xmotion
.subwindow
) {
617 XNextEvent(event
->xmotion
.display
, event
);
622 /* compress expose events */
623 if (event
->type
== Expose
&& !view
->flags
.dontCompressExpose
) {
624 while (XCheckTypedWindowEvent(event
->xexpose
.display
, view
->window
,
629 if (view
->screen
->modal
&& toplevel
!=view
->screen
->modalView
630 && !toplevel
->flags
.worksWhenModal
) {
631 if (event
->type
== KeyPress
|| event
->type
== KeyRelease
632 || event
->type
== MotionNotify
|| event
->type
== ButtonPress
633 || event
->type
== ButtonRelease
634 || event
->type
== FocusIn
|| event
->type
== FocusOut
) {
639 /* do balloon stuffs */
640 if (event
->type
== EnterNotify
)
641 W_BalloonHandleEnterView(view
);
642 else if (event
->type
== LeaveNotify
)
643 W_BalloonHandleLeaveView(view
);
645 /* This is a hack. It will make the panel be secure while
646 * the event handlers are handled, as some event handler
647 * might destroy the widget. */
648 W_RetainView(toplevel
);
650 hPtr
= view
->handlerList
;
655 tmp
= hPtr
->nextHandler
;
657 if ((hPtr
->eventMask
& mask
)) {
658 (*hPtr
->proc
)(event
, hPtr
->clientData
);
664 /* pass the event to the top level window of the widget */
665 if (view
->parent
!=NULL
) {
667 while (vPtr
->parent
!=NULL
)
670 hPtr
= vPtr
->handlerList
;
674 if (hPtr
->eventMask
& mask
) {
675 (*hPtr
->proc
)(event
, hPtr
->clientData
);
677 hPtr
= hPtr
->nextHandler
;
681 /* save button click info to track double-clicks */
682 if (view
->screen
->ignoreNextDoubleClick
) {
683 view
->screen
->ignoreNextDoubleClick
= 0;
685 if (event
->type
== ButtonPress
) {
686 view
->screen
->lastClickWindow
= event
->xbutton
.window
;
687 view
->screen
->lastClickTime
= event
->xbutton
.time
;
691 W_ReleaseView(toplevel
);
698 WMIsDoubleClick(XEvent
*event
)
702 if (event
->type
!= ButtonPress
)
705 view
= W_GetViewForXWindow(event
->xany
.display
, event
->xbutton
.window
);
710 if (view
->screen
->lastClickWindow
!= event
->xbutton
.window
)
713 if (event
->xbutton
.time
- view
->screen
->lastClickTime
714 < WINGsConfiguration
.doubleClickDelay
) {
715 view
->screen
->lastClickTime
= 0;
716 view
->screen
->lastClickWindow
= None
;
717 view
->screen
->ignoreNextDoubleClick
= 1;
725 W_WaitForEvent(Display
*dpy
, unsigned long xeventmask
)
727 #if defined(HAVE_POLL) && defined(HAVE_POLL_H) && !defined(HAVE_SELECT)
729 InputHandler
*handler
;
730 int count
, timeout
, nfds
, k
, retval
;
732 for (nfds
= 1, handler
= inputHandler
;
733 handler
!= 0; handler
= handler
->next
) nfds
++;
735 fds
= wmalloc(nfds
* sizeof(struct pollfd
));
736 fds
[0].fd
= ConnectionNumber(dpy
);
737 fds
[0].events
= POLLIN
;
739 for (k
= 1, handler
= inputHandler
;
741 handler
= handler
->next
, k
++) {
742 fds
[k
].fd
= handler
->fd
;
744 if (handler
->mask
& WIReadMask
)
745 fds
[k
].events
|= POLLIN
;
747 if (handler
->mask
& WIWriteMask
)
748 fds
[k
].events
|= POLLOUT
;
751 if (handler
->mask
& WIExceptMask
)
752 FD_SET(handler
->fd
, &eset
);
757 * Setup the select() timeout to the estimated time until the
758 * next timer expires.
760 if (timerPending()) {
762 delayUntilNextTimerEvent(&tv
);
763 timeout
= tv
.tv_sec
* 1000 + tv
.tv_usec
/ 1000;
773 if (XCheckMaskEvent(dpy
, xeventmask
, &ev
)) {
774 XPutBackEvent(dpy
, &ev
);
779 count
= poll(fds
, nfds
, timeout
);
782 handler
= inputHandler
;
790 if (fds
[k
].revents
& (POLLIN
|POLLRDNORM
|POLLRDBAND
|POLLPRI
))
793 if (fds
[k
].revents
& (POLLOUT
| POLLWRBAND
))
796 if (fds
[k
].revents
& (POLLHUP
| POLLNVAL
| POLLERR
))
797 mask
|= WIExceptMask
;
799 next
= handler
->next
;
801 if (mask
!=0 && handler
->callback
) {
802 (*handler
->callback
)(handler
->fd
, mask
,
803 handler
->clientData
);
811 retval
= fds
[0].revents
& (POLLIN
|POLLRDNORM
|POLLRDBAND
|POLLPRI
);
814 W_FlushASAPNotificationQueue();
817 #else /* not HAVE_POLL */
819 struct timeval timeout
;
820 struct timeval
*timeoutPtr
;
821 fd_set rset
, wset
, eset
;
824 InputHandler
*handler
= inputHandler
;
830 FD_SET(ConnectionNumber(dpy
), &rset
);
831 maxfd
= ConnectionNumber(dpy
);
834 if (handler
->mask
& WIReadMask
)
835 FD_SET(handler
->fd
, &rset
);
837 if (handler
->mask
& WIWriteMask
)
838 FD_SET(handler
->fd
, &wset
);
840 if (handler
->mask
& WIExceptMask
)
841 FD_SET(handler
->fd
, &eset
);
843 if (maxfd
< handler
->fd
)
846 handler
= handler
->next
;
851 * Setup the select() timeout to the estimated time until the
852 * next timer expires.
854 if (timerPending()) {
855 delayUntilNextTimerEvent(&timeout
);
856 timeoutPtr
= &timeout
;
858 timeoutPtr
= (struct timeval
*)0;
867 if (XCheckMaskEvent(dpy
, xeventmask
, &ev
)) {
868 XPutBackEvent(dpy
, &ev
);
873 count
= select(1 + maxfd
, &rset
, &wset
, &eset
, timeoutPtr
);
876 handler
= inputHandler
;
884 if (FD_ISSET(handler
->fd
, &rset
))
887 if (FD_ISSET(handler
->fd
, &wset
))
890 if (FD_ISSET(handler
->fd
, &eset
))
891 mask
|= WIExceptMask
;
893 next
= handler
->next
;
895 if (mask
!=0 && handler
->callback
) {
896 (*handler
->callback
)(handler
->fd
, mask
,
897 handler
->clientData
);
904 W_FlushASAPNotificationQueue();
906 return FD_ISSET(ConnectionNumber(dpy
), &rset
);
907 #else /* not HAVE_SELECT, not HAVE_POLL */
908 Neither select nor poll
. You lose
.
909 #endif /* HAVE_SELECT */
910 #endif /* HAVE_POLL */
915 WMNextEvent(Display
*dpy
, XEvent
*event
)
917 /* Check any expired timers */
918 if (timerPending()) {
919 checkTimerHandlers();
922 while (XPending(dpy
) == 0) {
924 /* Do idle and timer stuff while there are no timer or X events */
925 while (!XPending(dpy
) && idlePending()) {
928 /* dispatch timer events */
930 checkTimerHandlers();
934 * Make sure that new events did not arrive while we were doing
935 * timer/idle stuff. Or we might block forever waiting for
936 * an event that already arrived.
938 /* wait to something happen */
939 W_WaitForEvent(dpy
, 0);
941 /* Check any expired timers */
942 if (timerPending()) {
943 checkTimerHandlers();
947 XNextEvent(dpy
, event
);
952 WMMaskEvent(Display
*dpy
, long mask
, XEvent
*event
)
954 unsigned long milliseconds
;
955 struct timeval timeout
;
956 struct timeval
*timeoutOrInfty
;
959 while (!XCheckMaskEvent(dpy
, mask
, event
)) {
960 /* Do idle stuff while there are no timer or X events */
961 while (idlePending()) {
963 if (XCheckMaskEvent(dpy
, mask
, event
))
968 * Setup the select() timeout to the estimated time until the
969 * next timer expires.
971 if (timerPending()) {
972 delayUntilNextTimerEvent(&timeout
);
973 timeoutOrInfty
= &timeout
;
975 timeoutOrInfty
= (struct timeval
*)0;
978 if (XCheckMaskEvent(dpy
, mask
, event
))
981 /* Wait for input on the X connection socket */
983 FD_SET(ConnectionNumber(dpy
), &readset
);
984 select(1 + ConnectionNumber(dpy
), &readset
, (fd_set
*)0, (fd_set
*)0,
987 /* Check any expired timers */
988 if (timerPending()) {
989 checkTimerHandlers();
996 * Cant use this because XPending() will make W_WaitForEvent
997 * return even if the event in the queue is not what we want,
998 * and if we block until some new event arrives from the
999 * server, other events already in the queue (like Expose)
1003 WMMaskEvent(Display
*dpy
, long mask
, XEvent
*event
)
1005 while (!XCheckMaskEvent(dpy
, mask
, event
)) {
1006 /* Do idle stuff while there are no timer or X events */
1007 while (idlePending()) {
1008 checkIdleHandlers();
1009 if (XCheckMaskEvent(dpy
, mask
, event
))
1013 /* Wait for input on the X connection socket */
1014 W_WaitForEvent(dpy
, mask
);
1016 /* Check any expired timers */
1017 if (timerPending()) {
1018 checkTimerHandlers();
1025 WMScreenPending(WMScreen
*scr
)
1027 if (XPending(scr
->display
))
1035 WMHookEventHandler(WMEventHook
*handler
)
1037 WMEventHook
*oldHandler
= extraEventHandler
;
1039 extraEventHandler
= handler
;