File: | 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 | } |