| File: | src/Keyboard.c |
| Location: | line 225, 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 | } |