![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to Activate.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / contrib / emacs-18.55 / oldXMenu|
Return to Activate.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / contrib / emacs-18.55 / oldXMenu |
1.1 root 1: /* $Header: Activate.c,v 1.16 88/02/02 19:08:46 jim Exp $ */
2: /* Copyright Massachusetts Institute of Technology 1985 */
3:
4: #include <X11/copyright.h>
5:
6: /*
7: * XMenu: MIT Project Athena, X Window system menu package
8: *
9: * XMenuActivate - Maps a given menu to the display and activates
10: * the menu for user selection. The user is allowed to
11: * specify which pane and selection will be current,
12: * the X and Y location of the menu (relative to the
13: * parent window) and the mouse button event mask that
14: * will be used to identify a selection request.
15: *
16: * A menu selection is shown to be current by placing
17: * a highlight box around the selection as the mouse
18: * cursor enters its active region. Inactive selections
19: * will not be highlited. As the mouse cursor moved
20: * from one menu pane to another menu pane the pane being
21: * entered is raised and made current and the pane being
22: * left is lowered.
23: *
24: * Anytime XMenuActivate returns, the p_num and
25: * s_num are left at their last known values (i.e.,
26: * the last known current pane and selection indices).
27: * The following are the defined return states:
28: *
29: * 1) If at any time an error occurs the data
30: * pointer is left untouched and XM_FAILURE
31: * is returned.
32: *
33: * 2) When a selection request is recieved (i.e.,
34: * when the specified mouse event occurs) the
35: * data pointer will be set to the data
36: * associated with the particular selection
37: * current at the time of the selection request
38: * and XM_SUCCESS is returned.
39: *
40: * 3) If no selection was current at the time a
41: * selection request is made the data pointer
42: * will be left untouched and XM_NO_SELECT will
43: * be returned.
44: *
45: * 4) If the selection that was current at the time
46: * a selection request is made is not an active
47: * selection the data pointer will be left
48: * untouched and XM_IA_SELECT will be returned.
49: *
50: * Since X processes events in an asynchronous manner
51: * it is likely that XMenuActivate will encounter
52: * a "foreign event" while it is executing. Foreign
53: * events are handled in one of three ways:
54: *
55: * 1) The event is discarded. This is the default
56: * mode and requires no action on the part of the
57: * application.
58: *
59: * 2) The application has identified an asynchronous
60: * event handler that will be called and the
61: * foreign event handed off to it. Note:
62: * AEQ mode disables this mode temporarily.
63: *
64: * 3) The application has enabled asynchronous event
65: * queueing mode. In this mode all foreign events
66: * will be queued up untill XMenuActivate
67: * terminates; at which time they will be
68: * returned to the X event queue. As long as
69: * AEQ mode is enabled any asynchronous event
70: * handler as temporarily disabled.
71: *
72: * Any events encountered while taking down the menu
73: * (i.e., exposure events from occluded windows) will
74: * automatically be returned to the X event queue after
75: * XMenuActivate has cleaned the queue of any of its own
76: * events that are no longer needed.
77: *
78: * Author: Tony Della Fera, DEC
79: * March 12, 1986
80: *
81: */
82:
83: #include "XMenuInt.h"
84:
85: int
86: XMenuActivate(display, menu, p_num, s_num, x_pos, y_pos, event_mask, data)
87: register Display *display; /* Display to put menu on. */
88: register XMenu *menu; /* Menu to activate. */
89: int *p_num; /* Pane number selected. */
90: int *s_num; /* Selection number selected. */
91: int x_pos; /* X coordinate of menu position. */
92: int y_pos; /* Y coordinate of menu position. */
93: unsigned int event_mask; /* Mouse button event mask. */
94: char **data; /* Pointer to return data value. */
95: {
96: int status; /* X routine call status. */
97: int orig_x; /* Upper left menu origin X coord. */
98: int orig_y; /* Upper left menu origin Y coord. */
99: int ret_val; /* Return value. */
100:
101: register XMPane *p_ptr; /* Current XMPane. */
102: register XMPane *event_xmp; /* Event XMPane pointer. */
103: register XMPane *cur_p; /* Current pane. */
104: register XMSelect *cur_s; /* Current selection. */
105: XMWindow *event_xmw; /* Event XMWindow pointer. */
106: XEvent event; /* X input event. */
107: XEvent peek_event; /* X input peek ahead event. */
108:
109: Bool selection = False; /* Selection has been made. */
110: Bool forward = True; /* Moving forward in the pane list. */
111:
112: Window root, child;
113: int root_x, root_y, win_x, win_y;
114: unsigned int mask;
115:
116: /*
117: * Define and allocate a foreign event queue to hold events
118: * that don't belong to XMenu. These events are later restored
119: * to the X event queue.
120: */
121: typedef struct _xmeventque {
122: XEvent event;
123: struct _xmeventque *next;
124: } XMEventQue;
125:
126: XMEventQue *feq = NULL; /* Foreign event queue. */
127: XMEventQue *feq_tmp; /* Foreign event queue temporary. */
128:
129: /*
130: * If there are no panes in the menu then return failure
131: * because the menu is not initialized.
132: */
133: if (menu->p_count == 0) {
134: _XMErrorCode = XME_NOT_INIT;
135: return(XM_FAILURE);
136: }
137:
138: /*
139: * Find the desired current pane.
140: */
141: cur_p = _XMGetPanePtr(menu, *p_num);
142: if (cur_p == NULL) {
143: return(XM_FAILURE);
144: }
145: cur_p->activated = cur_p->active;
146:
147: /*
148: * Find the desired current selection.
149: * If the current selection index is out of range a null current selection
150: * will be assumed and the cursor will be placed in the current pane
151: * header.
152: */
153: cur_s = _XMGetSelectionPtr(cur_p, *s_num);
154:
155: /*
156: * Compute origin of menu so that cursor is in
157: * Correct pane and selection.
158: */
159: _XMTransToOrigin(display,
160: menu,
161: cur_p, cur_s,
162: x_pos, y_pos,
163: &orig_x, &orig_y);
164: menu->x_pos = orig_x; /* Store X and Y coords of menu. */
165: menu->y_pos = orig_y;
166:
167: if (XMenuRecompute(display, menu) == XM_FAILURE) {
168: return(XM_FAILURE);
169: }
170:
171: /*
172: * Flush the window creation queue.
173: * This batches all window creates since lazy evaluation
174: * is more efficient than individual evaluation.
175: * This routine also does an XFlush().
176: */
177: if (_XMWinQueFlush(display, menu, cur_p, cur_s) == _FAILURE) {
178: return(XM_FAILURE);
179: }
180:
181: /*
182: * Make sure windows are in correct order (in case we were passed
183: * an already created menu in incorrect order.)
184: */
185: for(p_ptr = menu->p_list->next; p_ptr != cur_p; p_ptr = p_ptr->next)
186: XRaiseWindow(display, p_ptr->window);
187: for(p_ptr = menu->p_list->prev; p_ptr != cur_p->prev; p_ptr = p_ptr->prev)
188: XRaiseWindow(display, p_ptr->window);
189:
190: /*
191: * Make sure all selection windows are mapped.
192: */
193: for (
194: p_ptr = menu->p_list->next;
195: p_ptr != menu->p_list;
196: p_ptr = p_ptr->next
197: ){
198: XMapSubwindows(display, p_ptr->window);
199: }
200:
201: /*
202: * Synchronize the X buffers and the event queue.
203: * From here on, all events in the queue that don't belong to
204: * XMenu are sent back to the application via an application
205: * provided event handler or discarded if the application has
206: * not provided an event handler.
207: */
208: XSync(display, 0);
209:
210: /*
211: * Grab the mouse for menu input.
212: */
213:
214: status = XGrabPointer(
215: display,
216: menu->parent,
217: True,
218: event_mask,
219: GrabModeAsync,
220: GrabModeAsync,
221: None,
222: menu->mouse_cursor,
223: CurrentTime
224: );
225: if (status == _X_FAILURE) {
226: _XMErrorCode = XME_GRAB_MOUSE;
227: return(XM_FAILURE);
228: }
229:
230: /*
231: * Map the menu panes.
232: */
233: XMapWindow(display, cur_p->window);
234: for (p_ptr = menu->p_list->next;
235: p_ptr != cur_p;
236: p_ptr = p_ptr->next)
237: XMapWindow(display, p_ptr->window);
238: for (p_ptr = cur_p->next;
239: p_ptr != menu->p_list;
240: p_ptr = p_ptr->next)
241: XMapWindow(display, p_ptr->window);
242:
243: XRaiseWindow(display, cur_p->window); /* Make sure current */
244: /* pane is on top. */
245:
246: cur_s = NULL; /* Clear current selection. */
247:
248: /*
249: * Begin event processing loop.
250: */
251: while (1) {
252: XNextEvent(display, &event); /* Get next event. */
253: switch (event.type) { /* Dispatch on the event type. */
254: case Expose:
255: event_xmp = (XMPane *)XLookUpAssoc(display,
256: menu->assoc_tab,
257: event.xexpose.window);
258: if (event_xmp == NULL) {
259: /*
260: * If AEQ mode is enabled then queue the event.
261: */
262: if (menu->aeq) {
263: feq_tmp = (XMEventQue *)malloc(sizeof(XMEventQue));
264: if (feq_tmp == NULL) {
265: _XMErrorCode = XME_CALLOC;
266: return(XM_FAILURE);
267: }
268: feq_tmp->event = event;
269: feq_tmp->next = feq;
270: feq = feq_tmp;
271: }
272: else if (_XMEventHandler) (*_XMEventHandler)(&event);
273: break;
274: }
275: if (event_xmp->activated) {
276: XSetWindowBackground(display,
277: event_xmp->window,
278: menu->bkgnd_color);
279: }
280: else {
281: XSetWindowBackgroundPixmap(display,
282: event_xmp->window,
283: menu->inact_pixmap);
284: }
285: _XMRefreshPane(display, menu, event_xmp);
286: break;
287: case EnterNotify:
288: /*
289: * First wait a small period of time, and see
290: * if another EnterNotify event follows hard on the
291: * heels of this one. i.e., the user is simply
292: * "passing through". If so, ignore this one.
293: */
294:
295: event_xmw = (XMWindow *)XLookUpAssoc(display,
296: menu->assoc_tab,
297: event.xcrossing.window);
298: if (event_xmw == NULL) break;
299: if (event_xmw->type == SELECTION) {
300: /*
301: * We have entered a selection.
302: */
303: /* if (XPending(display) == 0) usleep(150000); */
304: if (XPending(display) != 0) {
305: XPeekEvent(display, &peek_event);
306: if(peek_event.type == LeaveNotify) {
307: break;
308: }
309: }
310: cur_s = (XMSelect *)event_xmw;
311: /*
312: * If the pane we are in is active and the
313: * selection entered is active then activate
314: * the selection.
315: */
316: if (cur_p->active && cur_s->active) {
317: cur_s->activated = 1;
318: _XMRefreshSelection(display, menu, cur_s);
319: }
320: }
321: else {
322: /*
323: * We have entered a pane.
324: */
325: /* if (XPending(display) == 0) usleep(150000); */
326: if (XPending(display) != 0) {
327: XPeekEvent(display, &peek_event);
328: if (peek_event.type == EnterNotify) break;
329: }
330: XQueryPointer(display,
331: menu->parent,
332: &root, &child,
333: &root_x, &root_y,
334: &win_x, &win_y,
335: &mask);
336: event_xmp = (XMPane *)XLookUpAssoc(display,
337: menu->assoc_tab,
338: child);
339: if (event_xmp == NULL) break;
340: if (event_xmp == cur_p) break;
341: if (event_xmp->serial > cur_p->serial) forward = True;
342: else forward = False;
343: p_ptr = cur_p;
344: while (p_ptr != event_xmp) {
345: if (forward) p_ptr = p_ptr->next;
346: else p_ptr = p_ptr->prev;
347: XRaiseWindow(display, p_ptr->window);
348: }
349: if (cur_p->activated) {
350: cur_p->activated = False;
351: XSetWindowBackgroundPixmap(display,
352: cur_p->window,
353: menu->inact_pixmap);
354: _XMRefreshPane(display, menu, cur_p);
355: }
356: if (event_xmp->active) event_xmp->activated = True;
357: cur_p = event_xmp;
358: }
359: break;
360: case LeaveNotify:
361: event_xmw = (XMWindow *)XLookUpAssoc(
362: display,
363: menu->assoc_tab,
364: event.xcrossing.window
365: );
366: if (event_xmw == NULL) break;
367: if(cur_s == NULL) break;
368:
369: /*
370: * If the current selection was activated then
371: * deactivate it.
372: */
373: if (cur_s->activated) {
374: cur_s->activated = False;
375: _XMRefreshSelection(display, menu, cur_s);
376: }
377: cur_s = NULL;
378: break;
379:
380: case ButtonPress:
381: case ButtonRelease:
382: *p_num = cur_p->serial;
383: /*
384: * Check to see if there is a current selecion.
385: */
386: if (cur_s != NULL) {
387: /*
388: * Set the selection number to the current selection.
389: */
390: *s_num = cur_s->serial;
391: /*
392: * If the current selection was activated then
393: * we have a valid selection otherwise we have
394: * an inactive selection.
395: */
396: if (cur_s->activated) {
397: *data = cur_s->data;
398: ret_val = XM_SUCCESS;
399: }
400: else {
401: ret_val = XM_IA_SELECT;
402: }
403: }
404: else {
405: /*
406: * No selection was current.
407: */
408: ret_val = XM_NO_SELECT;
409: }
410: selection = True;
411: break;
412: default:
413: /*
414: * If AEQ mode is enabled then queue the event.
415: */
416: if (menu->aeq) {
417: feq_tmp = (XMEventQue *)malloc(sizeof(XMEventQue));
418: if (feq_tmp == NULL) {
419: _XMErrorCode = XME_CALLOC;
420: return(XM_FAILURE);
421: }
422: feq_tmp->event = event;
423: feq_tmp->next = feq;
424: feq = feq_tmp;
425: }
426: else if (_XMEventHandler) (*_XMEventHandler)(&event);
427: }
428: /*
429: * If a selection has been made, break out of the event loop.
430: */
431: if (selection == True) break;
432: }
433:
434: /*
435: * Unmap the menu.
436: */
437: for ( p_ptr = menu->p_list->next;
438: p_ptr != menu->p_list;
439: p_ptr = p_ptr->next)
440: {
441: XUnmapWindow(display, p_ptr->window);
442: }
443:
444: /*
445: * Ungrab the mouse.
446: */
447: XUngrabPointer(display, CurrentTime);
448:
449: /*
450: * Restore bits under where the menu was if we managed
451: * to save them and free the pixmap.
452: */
453:
454: /*
455: * If there is a current selection deactivate it.
456: */
457: if (cur_s != NULL) cur_s->activated = 0;
458:
459: /*
460: * Deactivate the current pane.
461: */
462: cur_p->activated = 0;
463: XSetWindowBackgroundPixmap(display, cur_p->window, menu->inact_pixmap);
464:
465: /*
466: * Synchronize the X buffers and the X event queue.
467: */
468: XSync(display, 0);
469:
470: /*
471: * Dispatch any events remaining on the queue.
472: */
473: while (QLength(display)) {
474: /*
475: * Fetch the next event.
476: */
477: XNextEvent(display, &event);
478:
479: /*
480: * Discard any events left on the queue that belong to XMenu.
481: * All others are held and then returned to the event queue.
482: */
483: switch (event.type) {
484: case Expose:
485: case EnterNotify:
486: case LeaveNotify:
487: case ButtonPress:
488: case ButtonRelease:
489: /*
490: * Does this event belong to one of XMenu's windows?
491: * If so, discard it and process the next event.
492: * If not fall through and treat it as a foreign event.
493: */
494: event_xmp = (XMPane *)XLookUpAssoc(
495: display,
496: menu->assoc_tab,
497: event.xbutton.window
498: );
499: if (event_xmp != NULL) continue;
500: default:
501: /*
502: * This is a foreign event.
503: * Queue it for later return to the X event queue.
504: */
505: feq_tmp = (XMEventQue *)malloc(sizeof(XMEventQue));
506: if (feq_tmp == NULL) {
507: _XMErrorCode = XME_CALLOC;
508: return(XM_FAILURE);
509: }
510: feq_tmp->event = event;
511: feq_tmp->next = feq;
512: feq = feq_tmp;
513: }
514: }
515: /*
516: * Return any foreign events that were queued to the X event queue.
517: */
518: while (feq != NULL) {
519: feq_tmp = feq;
520: XPutBackEvent(display, &feq_tmp->event);
521: feq = feq_tmp->next;
522: free((char *)feq_tmp);
523: }
524:
525: /*
526: * Return successfully.
527: */
528: _XMErrorCode = XME_NO_ERROR;
529: return(ret_val);
530:
531: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.