File: | src/Keyboard.c |
Location: | line 769, column 33 |
Description: | Dereference of null pointer |
1 | /* | |||||
2 | ||||||
3 | Copyright (c) 1993, Oracle and/or its affiliates. All rights reserved. | |||||
4 | ||||||
5 | Permission is hereby granted, free of charge, to any person obtaining a | |||||
6 | copy of this software and associated documentation files (the "Software"), | |||||
7 | to deal in the Software without restriction, including without limitation | |||||
8 | the rights to use, copy, modify, merge, publish, distribute, sublicense, | |||||
9 | and/or sell copies of the Software, and to permit persons to whom the | |||||
10 | Software is furnished to do so, subject to the following conditions: | |||||
11 | ||||||
12 | The above copyright notice and this permission notice (including the next | |||||
13 | paragraph) shall be included in all copies or substantial portions of the | |||||
14 | Software. | |||||
15 | ||||||
16 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |||||
17 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |||||
18 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL | |||||
19 | THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER | |||||
20 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING | |||||
21 | FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER | |||||
22 | DEALINGS IN THE SOFTWARE. | |||||
23 | ||||||
24 | */ | |||||
25 | /******************************************************** | |||||
26 | ||||||
27 | Copyright 1988 by Hewlett-Packard Company | |||||
28 | Copyright 1987, 1988, 1989 by Digital Equipment Corporation, Maynard, Massachusetts | |||||
29 | ||||||
30 | Permission to use, copy, modify, and distribute this software | |||||
31 | and its documentation for any purpose and without fee is hereby | |||||
32 | granted, provided that the above copyright notice appear in all | |||||
33 | copies and that both that copyright notice and this permission | |||||
34 | notice appear in supporting documentation, and that the names of | |||||
35 | Hewlett-Packard or Digital not be used in advertising or | |||||
36 | publicity pertaining to distribution of the software without specific, | |||||
37 | written prior permission. | |||||
38 | ||||||
39 | DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING | |||||
40 | ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL | |||||
41 | DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR | |||||
42 | ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, | |||||
43 | WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, | |||||
44 | ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS | |||||
45 | SOFTWARE. | |||||
46 | ||||||
47 | ********************************************************/ | |||||
48 | ||||||
49 | /* | |||||
50 | ||||||
51 | Copyright 1987, 1988, 1994, 1998 The Open Group | |||||
52 | ||||||
53 | Permission to use, copy, modify, distribute, and sell this software and its | |||||
54 | documentation for any purpose is hereby granted without fee, provided that | |||||
55 | the above copyright notice appear in all copies and that both that | |||||
56 | copyright notice and this permission notice appear in supporting | |||||
57 | documentation. | |||||
58 | ||||||
59 | The above copyright notice and this permission notice shall be included in | |||||
60 | all copies or substantial portions of the Software. | |||||
61 | ||||||
62 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |||||
63 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |||||
64 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE | |||||
65 | OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN | |||||
66 | AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN | |||||
67 | CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. | |||||
68 | ||||||
69 | Except as contained in this notice, the name of The Open Group shall not be | |||||
70 | used in advertising or otherwise to promote the sale, use or other dealings | |||||
71 | in this Software without prior written authorization from The Open Group. | |||||
72 | ||||||
73 | */ | |||||
74 | ||||||
75 | #ifdef HAVE_CONFIG_H1 | |||||
76 | #include <config.h> | |||||
77 | #endif | |||||
78 | #include "IntrinsicI.h" | |||||
79 | ||||||
80 | #include "PassivGraI.h" | |||||
81 | #include "EventI.h" | |||||
82 | ||||||
83 | #define _GetWindowedAncestor(w)((((Object)(w))->object.widget_class->core_class.class_inited & 0x04) ? w : _XtWindowedAncestor(w)) (XtIsWidget(w)(((Object)(w))->object.widget_class->core_class.class_inited & 0x04) ? w : _XtWindowedAncestor(w)) | |||||
84 | ||||||
85 | /* InActiveSubtree cache of the current focus source and its ancestors */ | |||||
86 | static Widget *pathTrace = NULL((void*)0); | |||||
87 | static int pathTraceDepth = 0; | |||||
88 | static int pathTraceMax = 0; | |||||
89 | ||||||
90 | /* FindKeyDestination cache of focus destination and ancestors up to source */ | |||||
91 | static Widget *pseudoTrace = NULL((void*)0); | |||||
92 | static int pseudoTraceDepth = 0; | |||||
93 | static int pseudoTraceMax = 0; | |||||
94 | ||||||
95 | void _XtClearAncestorCache(Widget widget) | |||||
96 | { | |||||
97 | /* the caller must lock the process lock */ | |||||
98 | if (pathTraceDepth && pathTrace[0] == widget) | |||||
99 | pathTraceDepth = 0; | |||||
100 | } | |||||
101 | ||||||
102 | static XtServerGrabPtr CheckServerGrabs( | |||||
103 | XEvent *event, | |||||
104 | Widget *trace, | |||||
105 | Cardinal traceDepth) | |||||
106 | { | |||||
107 | XtServerGrabPtr grab; | |||||
108 | Cardinal i; | |||||
109 | ||||||
110 | for (i = traceDepth; i > 0; i--) | |||||
111 | { | |||||
112 | if ((grab = _XtCheckServerGrabsOnWidget(event, trace[i-1], KEYBOARD1))) | |||||
113 | return (grab); | |||||
114 | } | |||||
115 | return (XtServerGrabPtr)0; | |||||
116 | } | |||||
117 | ||||||
118 | static Boolean IsParent(Widget a, Widget b) | |||||
119 | { | |||||
120 | for (b = XtParent(b)((b)->core.parent); b; b = XtParent(b)((b)->core.parent)) { | |||||
121 | if (b == a) return TRUE1; | |||||
122 | if (XtIsShell(b)(((Object)(b))->object.widget_class->core_class.class_inited & 0x20)) return FALSE0; | |||||
123 | } | |||||
124 | return FALSE0; | |||||
125 | } | |||||
126 | ||||||
127 | #define RelRtn(lca, type) {*relTypeRtn = type; return lca;} | |||||
128 | ||||||
129 | static Widget CommonAncestor( | |||||
130 | register Widget a, | |||||
131 | register Widget b, | |||||
132 | XtGeneology * relTypeRtn) | |||||
133 | { | |||||
134 | if (a == b) | |||||
135 | { | |||||
136 | RelRtn(a, XtMySelf3) | |||||
137 | } | |||||
138 | else if (IsParent(a, b)) | |||||
139 | { | |||||
140 | RelRtn(a, XtMyAncestor0) | |||||
141 | } | |||||
142 | else if (IsParent(b, a)) | |||||
143 | { | |||||
144 | RelRtn(b, XtMyDescendant1) | |||||
145 | } | |||||
146 | else | |||||
147 | for (b = XtParent(b)((b)->core.parent); | |||||
148 | b && !XtIsShell(b)(((Object)(b))->object.widget_class->core_class.class_inited & 0x20); | |||||
149 | b = XtParent(b)((b)->core.parent)) | |||||
150 | if (IsParent(b, a)) | |||||
151 | { | |||||
152 | RelRtn(b, XtMyCousin2) | |||||
153 | } | |||||
154 | RelRtn(NULL((void*)0), XtUnrelated4) | |||||
155 | } | |||||
156 | #undef RelRtn | |||||
157 | ||||||
158 | ||||||
159 | ||||||
160 | ||||||
161 | ||||||
162 | static Widget _FindFocusWidget( | |||||
163 | Widget widget, | |||||
164 | Widget *trace, | |||||
165 | int traceDepth, | |||||
166 | Boolean activeCheck, | |||||
167 | Boolean *isTarget) | |||||
168 | { | |||||
169 | int src; | |||||
170 | Widget dst; | |||||
171 | XtPerWidgetInput pwi = NULL((void*)0); | |||||
172 | ||||||
173 | /* For each ancestor, starting at the top, see if it's forwarded */ | |||||
174 | ||||||
175 | ||||||
176 | /* first check the trace list till done or we go to branch */ | |||||
177 | for (src = traceDepth-1, dst = widget; src > 0;) | |||||
178 | { | |||||
179 | if ((pwi = _XtGetPerWidgetInput(trace[src], FALSE0))) | |||||
180 | { | |||||
181 | if (pwi->focusKid) | |||||
182 | { | |||||
183 | dst = pwi->focusKid; | |||||
184 | for (src--; src > 0 && trace[src] != dst; src--) {} | |||||
185 | } | |||||
186 | else dst = trace[--src]; | |||||
187 | } | |||||
188 | else dst = trace[--src]; | |||||
189 | } | |||||
190 | ||||||
191 | if (isTarget) { | |||||
192 | if (pwi && pwi->focusKid == widget) | |||||
193 | *isTarget = TRUE1; | |||||
194 | else | |||||
195 | *isTarget = FALSE0; | |||||
196 | } | |||||
197 | ||||||
198 | if (!activeCheck) | |||||
199 | while (XtIsWidget(dst)(((Object)(dst))->object.widget_class->core_class.class_inited & 0x04) | |||||
200 | && (pwi = _XtGetPerWidgetInput(dst, FALSE0)) | |||||
201 | && pwi->focusKid) | |||||
202 | dst = pwi->focusKid; | |||||
203 | ||||||
204 | return dst; | |||||
205 | } | |||||
206 | ||||||
207 | ||||||
208 | static Widget FindFocusWidget( | |||||
209 | Widget widget, | |||||
210 | XtPerDisplayInput pdi) | |||||
211 | { | |||||
212 | if (pdi->focusWidget) | |||||
213 | return pdi->focusWidget; | |||||
214 | else | |||||
215 | return _FindFocusWidget(widget, pdi->trace, pdi->traceDepth, FALSE0, NULL((void*)0)); | |||||
216 | } | |||||
217 | ||||||
218 | Widget XtGetKeyboardFocusWidget(Widget widget) | |||||
219 | { | |||||
220 | XtPerDisplayInput pdi; | |||||
221 | Widget retval; | |||||
222 | WIDGET_TO_APPCON(widget)XtAppContext app = (widget && _XtProcessLock ? XtWidgetToApplicationContext (widget) : ((void*)0)); | |||||
223 | ||||||
224 | LOCK_APP(app)if(app && app->lock)(*app->lock)(app); | |||||
225 | pdi = _XtGetPerDisplayInput(XtDisplay(widget)(((widget)->core.screen)->display)); | |||||
226 | retval = FindFocusWidget(widget, pdi); | |||||
227 | UNLOCK_APP(app)if(app && app->unlock)(*app->unlock)(app); | |||||
228 | return retval; | |||||
229 | } | |||||
230 | ||||||
231 | static Boolean IsOutside( | |||||
232 | XKeyEvent *e, | |||||
233 | Widget w) | |||||
234 | { | |||||
235 | Position left, right, top, bottom; | |||||
236 | ||||||
237 | /* | |||||
238 | * if the pointer is outside the shell or inside | |||||
239 | * the window try to see if it would recieve the | |||||
240 | * focus | |||||
241 | */ | |||||
242 | XtTranslateCoords(w, 0, 0, &left, &top); | |||||
243 | /* We need to take borders into consideration */ | |||||
244 | left = left - w->core.border_width; | |||||
245 | top = top - w->core.border_width; | |||||
246 | right = left + w->core.width + w->core.border_width; | |||||
247 | bottom = top + w->core.height + w->core.border_width; | |||||
248 | ||||||
249 | if ( | |||||
250 | (e->x_root < left) || (e->y_root < top) || | |||||
251 | (e->x_root > right) || (e->y_root > bottom)) | |||||
252 | return TRUE1; | |||||
253 | else | |||||
254 | return FALSE0; | |||||
255 | } | |||||
256 | ||||||
257 | static Widget FindKeyDestination( | |||||
258 | Widget widget, | |||||
259 | XKeyEvent *event, | |||||
260 | XtServerGrabPtr prevGrab, | |||||
261 | XtServerGrabType prevGrabType, | |||||
262 | XtServerGrabPtr devGrab, | |||||
263 | XtServerGrabType devGrabType, | |||||
264 | XtPerDisplayInput pdi) | |||||
265 | { | |||||
266 | ||||||
267 | Widget dspWidget; | |||||
268 | Widget focusWidget; | |||||
269 | ||||||
270 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
271 | dspWidget = | |||||
272 | focusWidget = | |||||
273 | pdi->focusWidget = | |||||
274 | _GetWindowedAncestor(FindFocusWidget(widget, pdi))((((Object)(FindFocusWidget(widget, pdi)))->object.widget_class ->core_class.class_inited & 0x04) ? FindFocusWidget(widget , pdi) : _XtWindowedAncestor(FindFocusWidget(widget, pdi))); | |||||
275 | ||||||
276 | ||||||
277 | /* | |||||
278 | * If a grab is active from a previous activation then dispatch | |||||
279 | * based on owner_events ala protocol but with focus being | |||||
280 | * determined by XtSetKeyboardFocus. | |||||
281 | */ | |||||
282 | if (IsAnyGrab(prevGrabType)((prevGrabType == XtPassiveServerGrab) || (prevGrabType == XtActiveServerGrab ) || (prevGrabType == XtPseudoPassiveServerGrab))) | |||||
283 | { | |||||
284 | if (prevGrab->ownerEvents) | |||||
285 | dspWidget = focusWidget; | |||||
286 | else | |||||
287 | dspWidget = prevGrab->widget; | |||||
288 | } | |||||
289 | else | |||||
290 | { | |||||
291 | /* | |||||
292 | * If the focus widget is the event widget or a descendant | |||||
293 | * then we can avoid the rest of this. Else ugh... | |||||
294 | */ | |||||
295 | if (focusWidget != widget) | |||||
296 | { | |||||
297 | XtGeneology ewRelFw; /* relationship of event widget to | |||||
298 | focusWidget */ | |||||
299 | Widget lca; | |||||
300 | ||||||
301 | lca = CommonAncestor(widget, focusWidget, &ewRelFw); | |||||
302 | ||||||
303 | /* | |||||
304 | * if the event widget is an ancestor of focus due to the pointer | |||||
305 | * and/or the grab being in an ancestor and it's a passive grab | |||||
306 | * send to grab widget. | |||||
307 | * we are also dispatching to widget if ownerEvents and the event | |||||
308 | * is outside the client | |||||
309 | */ | |||||
310 | if ((ewRelFw == XtMyAncestor0) && | |||||
311 | (devGrabType == XtPassiveServerGrab)) | |||||
312 | { | |||||
313 | if (IsOutside(event, widget) || | |||||
314 | event->type ==KeyPress2 | |||||
315 | ) | |||||
316 | dspWidget = devGrab->widget; | |||||
317 | } | |||||
318 | else | |||||
319 | { | |||||
320 | /* | |||||
321 | * if the grab widget is not an ancestor of the focus | |||||
322 | * release the grab in order to avoid locking. There | |||||
323 | * is a possible case in that ownerEvents true will fall | |||||
324 | * through and if synch is set and the event widget | |||||
325 | * could turn it off we'll lock. check for it ? why not | |||||
326 | */ | |||||
327 | if ((ewRelFw != XtMyAncestor0) | |||||
328 | && (devGrabType == XtPassiveServerGrab) | |||||
329 | && (!IsAnyGrab(prevGrabType)((prevGrabType == XtPassiveServerGrab) || (prevGrabType == XtActiveServerGrab ) || (prevGrabType == XtPseudoPassiveServerGrab))) | |||||
330 | ) | |||||
331 | { | |||||
332 | XtUngrabKeyboard(devGrab->widget, | |||||
333 | event->time); | |||||
334 | devGrabType = XtNoServerGrab; | |||||
335 | } | |||||
336 | /* | |||||
337 | * if there isn't a grab with then check | |||||
338 | * for a logical grab that would have been activated | |||||
339 | * if the server was using Xt focus instead of server | |||||
340 | * focus | |||||
341 | */ | |||||
342 | if ( | |||||
343 | (event->type != KeyPress2) || | |||||
344 | (event->keycode == 0) /* Xlib XIM composed input */ | |||||
345 | ) | |||||
346 | dspWidget = focusWidget; | |||||
347 | else | |||||
348 | { | |||||
349 | XtServerGrabPtr grab; | |||||
350 | ||||||
351 | if (!pseudoTraceDepth || | |||||
352 | !(focusWidget == pseudoTrace[0]) || | |||||
353 | !(lca == pseudoTrace[pseudoTraceDepth])) | |||||
354 | { | |||||
355 | /* | |||||
356 | * fill ancestor list from lca | |||||
357 | * (non-inclusive)to focusWidget by | |||||
358 | * passing in lca as breakWidget | |||||
359 | */ | |||||
360 | _XtFillAncestorList(&pseudoTrace, | |||||
361 | &pseudoTraceMax, | |||||
362 | &pseudoTraceDepth, | |||||
363 | focusWidget, | |||||
364 | lca); | |||||
365 | /* ignore lca */ | |||||
366 | pseudoTraceDepth--; | |||||
367 | } | |||||
368 | if ((grab = CheckServerGrabs((XEvent*)event, | |||||
369 | pseudoTrace, | |||||
370 | pseudoTraceDepth))) | |||||
371 | { | |||||
372 | XtDevice device = &pdi->keyboard; | |||||
373 | ||||||
374 | device->grabType = XtPseudoPassiveServerGrab; | |||||
375 | pdi->activatingKey = event->keycode; | |||||
376 | device->grab = *grab; | |||||
377 | ||||||
378 | if (grab | |||||
379 | ) | |||||
380 | dspWidget = grab->widget; | |||||
381 | else | |||||
382 | dspWidget = focusWidget; | |||||
383 | } | |||||
384 | } | |||||
385 | } | |||||
386 | } | |||||
387 | } | |||||
388 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
389 | return dspWidget; | |||||
390 | } | |||||
391 | ||||||
392 | Widget _XtProcessKeyboardEvent( | |||||
393 | XKeyEvent *event, | |||||
394 | Widget widget, | |||||
395 | XtPerDisplayInput pdi) | |||||
396 | { | |||||
397 | XtDevice device = &pdi->keyboard; | |||||
398 | XtServerGrabPtr newGrab, devGrab = &device->grab; | |||||
399 | XtServerGrabRec prevGrabRec; | |||||
400 | XtServerGrabType prevGrabType = device->grabType; | |||||
401 | Widget dspWidget = NULL((void*)0); | |||||
402 | Boolean deactivateGrab = FALSE0; | |||||
403 | ||||||
404 | prevGrabRec = *devGrab; | |||||
405 | ||||||
406 | switch (event->type) | |||||
407 | { | |||||
408 | case KeyPress2: | |||||
409 | { | |||||
410 | if (event->keycode != 0 && /* Xlib XIM composed input */ | |||||
411 | !IsServerGrab(device->grabType)((device->grabType == XtPassiveServerGrab) || (device-> grabType == XtActiveServerGrab)) && | |||||
412 | (newGrab = CheckServerGrabs((XEvent*)event, | |||||
413 | pdi->trace, | |||||
414 | pdi->traceDepth))) | |||||
415 | { | |||||
416 | /* | |||||
417 | * honor pseudo-grab from prior event by X | |||||
418 | * unlocking keyboard. Not Xt Unlock ! | |||||
419 | */ | |||||
420 | if (IsPseudoGrab(prevGrabType)((prevGrabType == XtPseudoPassiveServerGrab))) | |||||
421 | XUngrabKeyboard(XtDisplay(newGrab->widget)(((newGrab->widget)->core.screen)->display), | |||||
422 | event->time); | |||||
423 | else | |||||
424 | { | |||||
425 | /* Activate the grab */ | |||||
426 | device->grab = *newGrab; | |||||
427 | pdi->activatingKey = event->keycode; | |||||
428 | device->grabType = XtPassiveServerGrab; | |||||
429 | } | |||||
430 | } | |||||
431 | } | |||||
432 | break; | |||||
433 | ||||||
434 | case KeyRelease3: | |||||
435 | { | |||||
436 | if (IsEitherPassiveGrab(device->grabType)((device->grabType == XtPassiveServerGrab) || (device-> grabType == XtPseudoPassiveServerGrab)) && | |||||
437 | (event->keycode == pdi->activatingKey)) | |||||
438 | deactivateGrab = TRUE1; | |||||
439 | } | |||||
440 | break; | |||||
441 | } | |||||
442 | dspWidget = FindKeyDestination(widget, event, | |||||
443 | &prevGrabRec, prevGrabType, | |||||
444 | devGrab, device->grabType, | |||||
445 | pdi); | |||||
446 | if (deactivateGrab) | |||||
447 | { | |||||
448 | /* Deactivate the grab */ | |||||
449 | device->grabType = XtNoServerGrab; | |||||
450 | pdi->activatingKey = 0; | |||||
451 | } | |||||
452 | return dspWidget; | |||||
453 | } | |||||
454 | ||||||
455 | static Widget GetShell(Widget widget) | |||||
456 | { | |||||
457 | Widget shell; | |||||
458 | ||||||
459 | for (shell = widget; | |||||
460 | shell && !XtIsShell(shell)(((Object)(shell))->object.widget_class->core_class.class_inited & 0x20); | |||||
461 | shell = XtParent(shell)((shell)->core.parent)){} | |||||
462 | return shell; | |||||
463 | } | |||||
464 | ||||||
465 | ||||||
466 | /* | |||||
467 | * Check that widget really has Xt focus due to it having recieved an | |||||
468 | * event | |||||
469 | */ | |||||
470 | typedef enum {NotActive = 0, IsActive, IsTarget} ActiveType; | |||||
471 | static ActiveType InActiveSubtree(Widget widget) | |||||
472 | { | |||||
473 | Boolean isTarget; | |||||
474 | ActiveType retval; | |||||
475 | ||||||
476 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
477 | if (!pathTraceDepth || widget != pathTrace[0]) { | |||||
478 | _XtFillAncestorList(&pathTrace, | |||||
479 | &pathTraceMax, | |||||
480 | &pathTraceDepth, | |||||
481 | widget, | |||||
482 | NULL((void*)0)); | |||||
483 | } | |||||
484 | if (widget == _FindFocusWidget(widget, | |||||
485 | pathTrace, | |||||
486 | pathTraceDepth, | |||||
487 | TRUE1, | |||||
488 | &isTarget)) | |||||
489 | retval = (isTarget ? IsTarget : IsActive); | |||||
490 | else | |||||
491 | retval = NotActive; | |||||
492 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
493 | return retval; | |||||
494 | } | |||||
495 | ||||||
496 | ||||||
497 | ||||||
498 | ||||||
499 | /* ARGSUSED */ | |||||
500 | void _XtHandleFocus( | |||||
501 | Widget widget, | |||||
502 | XtPointer client_data, /* child who wants focus */ | |||||
503 | XEvent *event, | |||||
504 | Boolean *cont) /* unused */ | |||||
505 | { | |||||
506 | XtPerDisplayInput pdi = _XtGetPerDisplayInput(XtDisplay(widget)(((widget)->core.screen)->display)); | |||||
507 | XtPerWidgetInput pwi = (XtPerWidgetInput)client_data; | |||||
508 | XtGeneology oldFocalPoint = pwi->focalPoint; | |||||
509 | XtGeneology newFocalPoint = pwi->focalPoint; | |||||
510 | ||||||
511 | switch( event->type ) { | |||||
512 | ||||||
513 | case KeyPress2: | |||||
514 | case KeyRelease3: | |||||
515 | /* | |||||
516 | * We're getting the keyevents used to guarantee propagating | |||||
517 | * child interest ala ForwardEvent in R3 | |||||
518 | */ | |||||
519 | return; | |||||
520 | ||||||
521 | case EnterNotify7: | |||||
522 | case LeaveNotify8: | |||||
523 | ||||||
524 | /* | |||||
525 | * If operating in a focus driven model, then enter and | |||||
526 | * leave events do not affect the keyboard focus. | |||||
527 | */ | |||||
528 | if ((event->xcrossing.detail != NotifyInferior2) | |||||
529 | && (event->xcrossing.focus)) | |||||
530 | { | |||||
531 | switch (oldFocalPoint) | |||||
532 | { | |||||
533 | case XtMyAncestor0: | |||||
534 | if (event->type == LeaveNotify8) | |||||
535 | newFocalPoint = XtUnrelated4; | |||||
536 | break; | |||||
537 | case XtUnrelated4: | |||||
538 | if (event->type == EnterNotify7) | |||||
539 | newFocalPoint = XtMyAncestor0; | |||||
540 | break; | |||||
541 | case XtMySelf3: | |||||
542 | break; | |||||
543 | case XtMyDescendant1: | |||||
544 | break; | |||||
545 | ||||||
546 | } | |||||
547 | } | |||||
548 | break; | |||||
549 | case FocusIn9: | |||||
550 | switch (event->xfocus.detail) | |||||
551 | { | |||||
552 | case NotifyNonlinear3: | |||||
553 | case NotifyAncestor0: | |||||
554 | case NotifyInferior2: | |||||
555 | newFocalPoint = XtMySelf3; | |||||
556 | break; | |||||
557 | case NotifyNonlinearVirtual4: | |||||
558 | case NotifyVirtual1: | |||||
559 | newFocalPoint = XtMyDescendant1; | |||||
560 | break; | |||||
561 | case NotifyPointer5: | |||||
562 | newFocalPoint = XtMyAncestor0; | |||||
563 | break; | |||||
564 | } | |||||
565 | break; | |||||
566 | case FocusOut10: | |||||
567 | switch (event->xfocus.detail) | |||||
568 | { | |||||
569 | case NotifyPointer5: | |||||
570 | case NotifyNonlinear3: | |||||
571 | case NotifyAncestor0: | |||||
572 | case NotifyNonlinearVirtual4: | |||||
573 | case NotifyVirtual1: | |||||
574 | newFocalPoint = XtUnrelated4; | |||||
575 | break; | |||||
576 | case NotifyInferior2: | |||||
577 | newFocalPoint = XtMyDescendant1; | |||||
578 | return; | |||||
579 | break; | |||||
580 | } | |||||
581 | break; | |||||
582 | } | |||||
583 | ||||||
584 | if (newFocalPoint != oldFocalPoint) | |||||
585 | { | |||||
586 | Boolean add; | |||||
587 | Widget descendant = pwi->focusKid; | |||||
588 | ||||||
589 | pwi->focalPoint = newFocalPoint; | |||||
590 | ||||||
591 | if ((oldFocalPoint == XtUnrelated4) && | |||||
592 | InActiveSubtree(widget) != NotActive) | |||||
593 | { | |||||
594 | pdi->focusWidget = NULL((void*)0); /* invalidate the cache */ | |||||
595 | pwi->haveFocus = TRUE1; | |||||
596 | add = TRUE1; | |||||
597 | } | |||||
598 | else if (newFocalPoint == XtUnrelated4) | |||||
599 | { | |||||
600 | pdi->focusWidget = NULL((void*)0); /* invalidate the cache */ | |||||
601 | pwi->haveFocus = FALSE0; | |||||
602 | add = FALSE0; | |||||
603 | } | |||||
604 | else | |||||
605 | return; | |||||
606 | ||||||
607 | if (descendant) | |||||
608 | { | |||||
609 | if (add) | |||||
610 | { | |||||
611 | _XtSendFocusEvent(descendant, FocusIn9); | |||||
612 | } | |||||
613 | else | |||||
614 | { | |||||
615 | _XtSendFocusEvent(descendant, FocusOut10); | |||||
616 | } | |||||
617 | } | |||||
618 | } | |||||
619 | } | |||||
620 | ||||||
621 | ||||||
622 | static void AddFocusHandler( | |||||
623 | Widget widget, | |||||
624 | Widget descendant, | |||||
625 | XtPerWidgetInput pwi, | |||||
626 | XtPerWidgetInput psi, | |||||
627 | XtPerDisplayInput pdi, | |||||
628 | EventMask oldEventMask) | |||||
629 | { | |||||
630 | EventMask eventMask, targetEventMask; | |||||
631 | Widget target; | |||||
632 | ||||||
633 | /* | |||||
634 | * widget must now select for key events if the descendant is | |||||
635 | * interested in them. | |||||
636 | * | |||||
637 | * shell borders are not occluded by the child, they're occluded | |||||
638 | * by reparenting window managers. !!! | |||||
639 | */ | |||||
640 | target = descendant ? _GetWindowedAncestor(descendant)((((Object)(descendant))->object.widget_class->core_class .class_inited & 0x04) ? descendant : _XtWindowedAncestor( descendant)) : NULL((void*)0); | |||||
641 | targetEventMask = XtBuildEventMask(target); | |||||
642 | eventMask = targetEventMask & (KeyPressMask(1L<<0) | KeyReleaseMask(1L<<1)); | |||||
643 | eventMask |= FocusChangeMask(1L<<21) | EnterWindowMask(1L<<4) | LeaveWindowMask(1L<<5); | |||||
644 | ||||||
645 | if (oldEventMask) { | |||||
646 | oldEventMask &= KeyPressMask(1L<<0) | KeyReleaseMask(1L<<1); | |||||
647 | oldEventMask |= FocusChangeMask(1L<<21) | EnterWindowMask(1L<<4) | LeaveWindowMask(1L<<5); | |||||
648 | ||||||
649 | if (oldEventMask != eventMask) | |||||
650 | XtRemoveEventHandler(widget, (oldEventMask & ~eventMask), | |||||
651 | False0, _XtHandleFocus, (XtPointer)pwi); | |||||
652 | } | |||||
653 | ||||||
654 | if (oldEventMask != eventMask) | |||||
655 | XtAddEventHandler(widget, eventMask, False0, | |||||
656 | _XtHandleFocus, (XtPointer)pwi); | |||||
657 | ||||||
658 | /* What follows is too much grief to go through if the | |||||
659 | * target doesn't actually care about focus change events, | |||||
660 | * so just invalidate the focus cache & refill it when | |||||
661 | * the next input event actually arrives. | |||||
662 | */ | |||||
663 | ||||||
664 | if (!(targetEventMask & FocusChangeMask(1L<<21))) { | |||||
665 | pdi->focusWidget = NULL((void*)0); | |||||
666 | return; | |||||
667 | } | |||||
668 | ||||||
669 | if (XtIsRealized(widget)((((((Object)(widget))->object.widget_class->core_class .class_inited & 0x04) ? (widget) : _XtWindowedAncestor(widget )) ->core.window) != 0L) && !pwi->haveFocus) { | |||||
670 | if (psi->haveFocus) { | |||||
671 | Window root, child; | |||||
672 | int root_x, root_y, win_x, win_y; | |||||
673 | int left, right, top, bottom; | |||||
674 | unsigned int modMask; | |||||
675 | ActiveType act; | |||||
676 | ||||||
677 | /* | |||||
678 | * If the shell has the focus but the source widget | |||||
679 | * doesn't, it may only be because the source widget | |||||
680 | * wasn't previously tracking focus or crossing events. | |||||
681 | * If the target wants focus events, we have to | |||||
682 | * now determine whether the source has the focus. | |||||
683 | */ | |||||
684 | ||||||
685 | if ((act = InActiveSubtree(widget)) == IsTarget) | |||||
686 | pwi->haveFocus = TRUE1; | |||||
687 | else if (act == IsActive) { | |||||
688 | /* | |||||
689 | * An ancestor contains the focus, so if source | |||||
690 | * contains the pointer, then source has the focus. | |||||
691 | */ | |||||
692 | ||||||
693 | if (XQueryPointer(XtDisplay(widget)(((widget)->core.screen)->display), XtWindow(widget)((widget)->core.window), | |||||
694 | &root, &child, | |||||
695 | &root_x, &root_y, &win_x, &win_y, &modMask)) | |||||
696 | { | |||||
697 | /* We need to take borders into consideration */ | |||||
698 | left = top = -((int) widget->core.border_width); | |||||
699 | right = (int) (widget->core.width + (widget->core.border_width << 1)); | |||||
700 | bottom = (int) (widget->core.height + (widget->core.border_width << 1)); | |||||
701 | ||||||
702 | if (win_x >= left && win_x < right && | |||||
703 | win_y >= top && win_y < bottom) | |||||
704 | pwi->haveFocus = TRUE1; | |||||
705 | } | |||||
706 | } | |||||
707 | } | |||||
708 | } | |||||
709 | if (pwi->haveFocus) { | |||||
710 | pdi->focusWidget = NULL((void*)0); /* invalidate the cache */ | |||||
711 | _XtSendFocusEvent(target, FocusIn9); | |||||
712 | } | |||||
713 | } | |||||
714 | ||||||
715 | ||||||
716 | /* ARGSUSED */ | |||||
717 | static void QueryEventMask( | |||||
718 | Widget widget, /* child who gets focus */ | |||||
719 | XtPointer client_data, /* ancestor giving it */ | |||||
720 | XEvent *event, | |||||
721 | Boolean *cont) /* unused */ | |||||
722 | { | |||||
723 | /* widget was once the target of an XtSetKeyboardFocus but | |||||
724 | * was unrealized at the time. Make sure ancestor still wants | |||||
725 | * focus set here then install the handler now that we know the | |||||
726 | * complete event mask. | |||||
727 | */ | |||||
728 | Widget ancestor = (Widget)client_data; | |||||
729 | XtPerWidgetInput pwi = _XtGetPerWidgetInput(ancestor, FALSE0); | |||||
730 | ||||||
731 | if (pwi) { | |||||
732 | Widget target = pwi->queryEventDescendant; | |||||
733 | ||||||
734 | /* use of 'target' is non-standard hackery; | |||||
735 | allows focus to non-widget */ | |||||
736 | if ( pwi->focusKid == target ) { | |||||
737 | AddFocusHandler(ancestor, target, pwi, | |||||
738 | _XtGetPerWidgetInput(GetShell(ancestor), TRUE1), | |||||
739 | _XtGetPerDisplayInput(XtDisplay(ancestor)(((ancestor)->core.screen)->display)), | |||||
740 | (EventMask)0); | |||||
741 | } | |||||
742 | XtRemoveEventHandler(widget, XtAllEvents((EventMask) -1L), True1, | |||||
743 | QueryEventMask, client_data); | |||||
744 | pwi->map_handler_added = FALSE0; | |||||
745 | } | |||||
746 | } | |||||
747 | ||||||
748 | ||||||
749 | /* ARGSUSED */ | |||||
750 | static void FocusDestroyCallback( | |||||
751 | Widget widget, | |||||
752 | XtPointer closure, /* Widget */ | |||||
753 | XtPointer call_data) | |||||
754 | { | |||||
755 | XtSetKeyboardFocus((Widget)closure, NULL((void*)0)); | |||||
756 | } | |||||
757 | ||||||
758 | void XtSetKeyboardFocus( | |||||
759 | Widget widget, | |||||
760 | Widget descendant) | |||||
761 | { | |||||
762 | XtPerDisplayInput pdi; | |||||
763 | XtPerWidgetInput pwi; | |||||
764 | Widget oldDesc, oldTarget, target, hookobj; | |||||
765 | WIDGET_TO_APPCON(widget)XtAppContext app = (widget && _XtProcessLock ? XtWidgetToApplicationContext (widget) : ((void*)0)); | |||||
| ||||||
766 | ||||||
767 | LOCK_APP(app)if(app && app->lock)(*app->lock)(app); | |||||
768 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
769 | pdi = _XtGetPerDisplayInput(XtDisplay(widget)(((widget)->core.screen)->display)); | |||||
| ||||||
770 | pwi = _XtGetPerWidgetInput(widget, TRUE1); | |||||
771 | oldDesc = pwi->focusKid; | |||||
772 | ||||||
773 | if (descendant == widget) descendant = (Widget)None0L; | |||||
774 | ||||||
775 | target = descendant ? _GetWindowedAncestor(descendant)((((Object)(descendant))->object.widget_class->core_class .class_inited & 0x04) ? descendant : _XtWindowedAncestor( descendant)) : NULL((void*)0); | |||||
776 | oldTarget = oldDesc ? _GetWindowedAncestor(oldDesc)((((Object)(oldDesc))->object.widget_class->core_class. class_inited & 0x04) ? oldDesc : _XtWindowedAncestor(oldDesc )) : NULL((void*)0); | |||||
777 | ||||||
778 | if (descendant != oldDesc) { | |||||
779 | ||||||
780 | /* update the forward path */ | |||||
781 | pwi->focusKid = descendant; | |||||
782 | ||||||
783 | ||||||
784 | /* all the rest handles focus ins and focus outs and misc gunk */ | |||||
785 | ||||||
786 | if (oldDesc) { | |||||
787 | /* invalidate FindKeyDestination's ancestor list */ | |||||
788 | if (pseudoTraceDepth && oldTarget == pseudoTrace[0]) | |||||
789 | pseudoTraceDepth = 0; | |||||
790 | ||||||
791 | XtRemoveCallback(oldDesc, XtNdestroyCallback((char*)&XtStrings[169]), | |||||
792 | FocusDestroyCallback, (XtPointer)widget); | |||||
793 | ||||||
794 | if (!oldTarget->core.being_destroyed) { | |||||
795 | if (pwi->map_handler_added) { | |||||
796 | XtRemoveEventHandler(oldTarget, XtAllEvents((EventMask) -1L), True1, | |||||
797 | QueryEventMask, (XtPointer)widget); | |||||
798 | pwi->map_handler_added = FALSE0; | |||||
799 | } | |||||
800 | if (pwi->haveFocus) { | |||||
801 | _XtSendFocusEvent( oldTarget, FocusOut10); | |||||
802 | } | |||||
803 | } | |||||
804 | else if (pwi->map_handler_added) { | |||||
805 | pwi->map_handler_added = FALSE0; | |||||
806 | } | |||||
807 | ||||||
808 | if (pwi->haveFocus) | |||||
809 | pdi->focusWidget = NULL((void*)0); /* invalidate cache */ | |||||
810 | ||||||
811 | /* | |||||
812 | * If there was a forward path then remove the handler if | |||||
813 | * the path is being set to null and it isn't a shell. | |||||
814 | * shells always have a handler for tracking focus for the | |||||
815 | * hierarchy. | |||||
816 | * | |||||
817 | * Keep the pwi record on the assumption that the client | |||||
818 | * will continue to dynamically assign focus for this widget. | |||||
819 | */ | |||||
820 | if (!XtIsShell(widget)(((Object)(widget))->object.widget_class->core_class.class_inited & 0x20) && !descendant) { | |||||
821 | XtRemoveEventHandler(widget, XtAllEvents((EventMask) -1L), True1, | |||||
822 | _XtHandleFocus, (XtPointer)pwi); | |||||
823 | pwi->haveFocus = FALSE0; | |||||
824 | } | |||||
825 | } | |||||
826 | ||||||
827 | if (descendant) { | |||||
828 | Widget shell = GetShell(widget); | |||||
829 | XtPerWidgetInput psi = _XtGetPerWidgetInput(shell, TRUE1); | |||||
830 | XtAddCallback (descendant, XtNdestroyCallback((char*)&XtStrings[169]), | |||||
831 | FocusDestroyCallback, (XtPointer) widget); | |||||
832 | ||||||
833 | AddFocusHandler(widget, descendant, pwi, psi, pdi, | |||||
834 | oldTarget ? XtBuildEventMask(oldTarget) : 0); | |||||
835 | ||||||
836 | if (widget != shell) | |||||
837 | XtAddEventHandler( | |||||
838 | shell, | |||||
839 | FocusChangeMask(1L<<21) | EnterWindowMask(1L<<4) | LeaveWindowMask(1L<<5), | |||||
840 | False0, | |||||
841 | _XtHandleFocus, | |||||
842 | (XtPointer)psi | |||||
843 | ); | |||||
844 | ||||||
845 | if (! XtIsRealized(target)((((((Object)(target))->object.widget_class->core_class .class_inited & 0x04) ? (target) : _XtWindowedAncestor(target )) ->core.window) != 0L)) { | |||||
846 | XtAddEventHandler(target, (EventMask)StructureNotifyMask(1L<<17), | |||||
847 | False0, QueryEventMask, (XtPointer)widget); | |||||
848 | pwi->map_handler_added = TRUE1; | |||||
849 | pwi->queryEventDescendant = descendant; | |||||
850 | } | |||||
851 | } | |||||
852 | } | |||||
853 | hookobj = XtHooksOfDisplay(XtDisplay(widget)(((widget)->core.screen)->display)); | |||||
854 | if (XtHasCallbacks(hookobj, XtNchangeHook((char*)&XtStrings[2061])) == XtCallbackHasSome) { | |||||
855 | XtChangeHookDataRec call_data; | |||||
856 | ||||||
857 | call_data.type = XtHsetKeyboardFocus((char*)&XtStrings[2469]); | |||||
858 | call_data.widget = widget; | |||||
859 | call_data.event_data = (XtPointer) descendant; | |||||
860 | XtCallCallbackList(hookobj, | |||||
861 | ((HookObject)hookobj)->hooks.changehook_callbacks, | |||||
862 | (XtPointer)&call_data); | |||||
863 | } | |||||
864 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
865 | UNLOCK_APP(app)if(app && app->unlock)(*app->unlock)(app); | |||||
866 | } |