File: | src/Create.c |
Location: | line 652, column 22 |
Description: | Dereference of null pointer |
1 | /*********************************************************** | |||||
2 | Copyright (c) 1993, Oracle and/or its affiliates. All rights reserved. | |||||
3 | ||||||
4 | Permission is hereby granted, free of charge, to any person obtaining a | |||||
5 | copy of this software and associated documentation files (the "Software"), | |||||
6 | to deal in the Software without restriction, including without limitation | |||||
7 | the rights to use, copy, modify, merge, publish, distribute, sublicense, | |||||
8 | and/or sell copies of the Software, and to permit persons to whom the | |||||
9 | Software is furnished to do so, subject to the following conditions: | |||||
10 | ||||||
11 | The above copyright notice and this permission notice (including the next | |||||
12 | paragraph) shall be included in all copies or substantial portions of the | |||||
13 | Software. | |||||
14 | ||||||
15 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |||||
16 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |||||
17 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL | |||||
18 | THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER | |||||
19 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING | |||||
20 | FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER | |||||
21 | DEALINGS IN THE SOFTWARE. | |||||
22 | ||||||
23 | Copyright 1987, 1988 by Digital Equipment Corporation, Maynard, Massachusetts. | |||||
24 | ||||||
25 | All Rights Reserved | |||||
26 | ||||||
27 | Permission to use, copy, modify, and distribute this software and its | |||||
28 | documentation for any purpose and without fee is hereby granted, | |||||
29 | provided that the above copyright notice appear in all copies and that | |||||
30 | both that copyright notice and this permission notice appear in | |||||
31 | supporting documentation, and that the name of Digital not be | |||||
32 | used in advertising or publicity pertaining to distribution of the | |||||
33 | software without specific, written prior permission. | |||||
34 | ||||||
35 | DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING | |||||
36 | ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL | |||||
37 | DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR | |||||
38 | ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, | |||||
39 | WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, | |||||
40 | ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS | |||||
41 | SOFTWARE. | |||||
42 | ||||||
43 | ******************************************************************/ | |||||
44 | ||||||
45 | /* | |||||
46 | ||||||
47 | Copyright 1987, 1988, 1994, 1998 The Open Group | |||||
48 | ||||||
49 | Permission to use, copy, modify, distribute, and sell this software and its | |||||
50 | documentation for any purpose is hereby granted without fee, provided that | |||||
51 | the above copyright notice appear in all copies and that both that | |||||
52 | copyright notice and this permission notice appear in supporting | |||||
53 | documentation. | |||||
54 | ||||||
55 | The above copyright notice and this permission notice shall be included in | |||||
56 | all copies or substantial portions of the Software. | |||||
57 | ||||||
58 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR | |||||
59 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, | |||||
60 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE | |||||
61 | OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN | |||||
62 | AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN | |||||
63 | CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. | |||||
64 | ||||||
65 | Except as contained in this notice, the name of The Open Group shall not be | |||||
66 | used in advertising or otherwise to promote the sale, use or other dealings | |||||
67 | in this Software without prior written authorization from The Open Group. | |||||
68 | ||||||
69 | */ | |||||
70 | ||||||
71 | #ifdef HAVE_CONFIG_H1 | |||||
72 | #include <config.h> | |||||
73 | #endif | |||||
74 | #include "IntrinsicI.h" | |||||
75 | #include "VarargsI.h" | |||||
76 | #include "ShellP.h" | |||||
77 | #include "CreateI.h" | |||||
78 | #ifndef X_NO_RESOURCE_CONFIGURATION_MANAGEMENT | |||||
79 | #include "ResConfigP.h" | |||||
80 | #endif | |||||
81 | #include <stdio.h> | |||||
82 | ||||||
83 | static String XtNxtCreateWidget = "xtCreateWidget"; | |||||
84 | static String XtNxtCreatePopupShell = "xtCreatePopupShell"; | |||||
85 | ||||||
86 | static void | |||||
87 | CallClassPartInit(WidgetClass ancestor, WidgetClass wc) | |||||
88 | { | |||||
89 | if (ancestor->core_class.superclass != NULL((void*)0)) { | |||||
90 | CallClassPartInit(ancestor->core_class.superclass, wc); | |||||
91 | } | |||||
92 | if (ancestor->core_class.class_part_initialize != NULL((void*)0)) { | |||||
93 | (*(ancestor->core_class.class_part_initialize)) (wc); | |||||
94 | } | |||||
95 | } | |||||
96 | ||||||
97 | void | |||||
98 | XtInitializeWidgetClass(WidgetClass wc) | |||||
99 | { | |||||
100 | XtEnum inited; | |||||
101 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
102 | if (wc->core_class.class_inited) { | |||||
103 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
104 | return; | |||||
105 | } | |||||
106 | inited = 0x01; | |||||
107 | { | |||||
108 | WidgetClass pc; | |||||
109 | #define LeaveIfClass(c, d) if (pc == c) { inited = d; break; } | |||||
110 | for (pc = wc; pc; pc = pc->core_class.superclass) { | |||||
111 | LeaveIfClass(rectObjClass, 0x01 | | |||||
112 | RectObjClassFlag0x02); | |||||
113 | LeaveIfClass(coreWidgetClass, 0x01 | | |||||
114 | RectObjClassFlag0x02 | | |||||
115 | WidgetClassFlag0x04); | |||||
116 | LeaveIfClass(compositeWidgetClass, 0x01 | | |||||
117 | RectObjClassFlag0x02 | | |||||
118 | WidgetClassFlag0x04 | | |||||
119 | CompositeClassFlag0x08); | |||||
120 | LeaveIfClass(constraintWidgetClass, 0x01 | | |||||
121 | RectObjClassFlag0x02 | | |||||
122 | WidgetClassFlag0x04 | | |||||
123 | CompositeClassFlag0x08 | | |||||
124 | ConstraintClassFlag0x10); | |||||
125 | LeaveIfClass(shellWidgetClass, 0x01 | | |||||
126 | RectObjClassFlag0x02 | | |||||
127 | WidgetClassFlag0x04 | | |||||
128 | CompositeClassFlag0x08 | | |||||
129 | ShellClassFlag0x20); | |||||
130 | LeaveIfClass(wmShellWidgetClass, 0x01 | | |||||
131 | RectObjClassFlag0x02 | | |||||
132 | WidgetClassFlag0x04 | | |||||
133 | CompositeClassFlag0x08 | | |||||
134 | ShellClassFlag0x20 | | |||||
135 | WMShellClassFlag0x40); | |||||
136 | LeaveIfClass(topLevelShellWidgetClass, 0x01 | | |||||
137 | RectObjClassFlag0x02 | | |||||
138 | WidgetClassFlag0x04 | | |||||
139 | CompositeClassFlag0x08 | | |||||
140 | ShellClassFlag0x20 | | |||||
141 | WMShellClassFlag0x40 | | |||||
142 | TopLevelClassFlag0x80); | |||||
143 | } | |||||
144 | #undef LeaveIfClass | |||||
145 | } | |||||
146 | if (wc->core_class.version != XtVersion(11 * 1000 + 6) && | |||||
147 | wc->core_class.version != XtVersionDontCheck0) { | |||||
148 | String param[3]; | |||||
149 | String mismatch = "Widget class %s version mismatch (recompilation needed):\n widget %d vs. intrinsics %d."; | |||||
150 | String recompile = "Widget class %s must be re-compiled."; | |||||
151 | Cardinal num_params; | |||||
152 | ||||||
153 | param[0] = wc->core_class.class_name; | |||||
154 | param[1] = (String) wc->core_class.version; | |||||
155 | param[2] = (String) XtVersion(11 * 1000 + 6); | |||||
156 | ||||||
157 | if (wc->core_class.version == (11 * 1000 + 5) || /* MIT X11R5 */ | |||||
158 | wc->core_class.version == (11 * 1000 + 4)) { /* MIT X11R4 */ | |||||
159 | if ((inited & WMShellClassFlag0x40) && | |||||
160 | (sizeof(Boolean) != sizeof(char) || | |||||
161 | sizeof(Atom) != sizeof(Widget) || | |||||
162 | sizeof(Atom) != sizeof(String))) { | |||||
163 | num_params=3; | |||||
164 | XtWarningMsg("versionMismatch","widget",XtCXtToolkitError, | |||||
165 | mismatch, param, &num_params); | |||||
166 | num_params=1; | |||||
167 | XtErrorMsg("R4orR5versionMismatch","widget",XtCXtToolkitError, | |||||
168 | recompile, param, &num_params); | |||||
169 | ||||||
170 | } | |||||
171 | } | |||||
172 | else if (wc->core_class.version == (11 * 1000 + 3)) { /* MIT X11R3 */ | |||||
173 | if (inited & ShellClassFlag0x20) { | |||||
174 | num_params=1; | |||||
175 | XtWarningMsg("r3versionMismatch","widget",XtCXtToolkitError, | |||||
176 | "Shell Widget class %s binary compiled for R3", | |||||
177 | param,&num_params); | |||||
178 | XtErrorMsg("R3versionMismatch","widget",XtCXtToolkitError, | |||||
179 | recompile, param, &num_params); | |||||
180 | } | |||||
181 | } | |||||
182 | else { | |||||
183 | num_params=3; | |||||
184 | XtWarningMsg("versionMismatch","widget",XtCXtToolkitError, | |||||
185 | mismatch, param, &num_params); | |||||
186 | if (wc->core_class.version == (2 * 1000 + 2)) /* MIT X11R2 */ { | |||||
187 | num_params=1; | |||||
188 | XtErrorMsg("r2versionMismatch","widget",XtCXtToolkitError, | |||||
189 | recompile, param, &num_params); | |||||
190 | } | |||||
191 | } | |||||
192 | } | |||||
193 | ||||||
194 | if ((wc->core_class.superclass != NULL((void*)0)) | |||||
195 | && (!(wc->core_class.superclass->core_class.class_inited))) | |||||
196 | XtInitializeWidgetClass(wc->core_class.superclass); | |||||
197 | ||||||
198 | if (wc->core_class.class_initialize != NULL((void*)0)) | |||||
199 | (*(wc->core_class.class_initialize))(); | |||||
200 | CallClassPartInit(wc, wc); | |||||
201 | wc->core_class.class_inited = inited; | |||||
202 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
203 | } | |||||
204 | ||||||
205 | static void | |||||
206 | CallInitialize ( | |||||
207 | WidgetClass class, | |||||
208 | Widget req_widget, | |||||
209 | Widget new_widget, | |||||
210 | ArgList args, | |||||
211 | Cardinal num_args) | |||||
212 | { | |||||
213 | WidgetClass superclass; | |||||
214 | XtInitProc initialize; | |||||
215 | XtArgsProc initialize_hook; | |||||
216 | ||||||
217 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
218 | superclass = class->core_class.superclass; | |||||
219 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
220 | if (superclass) | |||||
221 | CallInitialize (superclass, req_widget, new_widget, args, num_args); | |||||
222 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
223 | initialize = class->core_class.initialize; | |||||
224 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
225 | if (initialize) | |||||
226 | (*initialize) (req_widget, new_widget, args, &num_args); | |||||
227 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
228 | initialize_hook = class->core_class.initialize_hook; | |||||
229 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
230 | if (initialize_hook) | |||||
231 | (*initialize_hook) (new_widget, args, &num_args); | |||||
232 | } | |||||
233 | ||||||
234 | static void | |||||
235 | CallConstraintInitialize ( | |||||
236 | ConstraintWidgetClass class, | |||||
237 | Widget req_widget, | |||||
238 | Widget new_widget, | |||||
239 | ArgList args, | |||||
240 | Cardinal num_args) | |||||
241 | { | |||||
242 | WidgetClass superclass; | |||||
243 | XtInitProc initialize; | |||||
244 | ||||||
245 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
246 | superclass = class->core_class.superclass; | |||||
247 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
248 | if (superclass != constraintWidgetClass) | |||||
249 | CallConstraintInitialize((ConstraintWidgetClass) superclass, | |||||
250 | req_widget, new_widget, args, num_args); | |||||
251 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
252 | initialize = class->constraint_class.initialize; | |||||
253 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
254 | if (initialize) | |||||
255 | (*initialize) (req_widget, new_widget, args, &num_args); | |||||
256 | } | |||||
257 | ||||||
258 | static Widget | |||||
259 | xtWidgetAlloc( | |||||
260 | WidgetClass widget_class, | |||||
261 | ConstraintWidgetClass parent_constraint_class, | |||||
262 | Widget parent, | |||||
263 | String name, | |||||
264 | ArgList args, /* must be NULL if typed_args is non-NULL */ | |||||
265 | Cardinal num_args, | |||||
266 | XtTypedArgList typed_args, /* must be NULL if args is non-NULL */ | |||||
267 | Cardinal num_typed_args) | |||||
268 | { | |||||
269 | Widget widget; | |||||
270 | Cardinal wsize, csize = 0; | |||||
271 | ObjectClassExtension ext; | |||||
272 | ||||||
273 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
274 | if (! (widget_class->core_class.class_inited)) | |||||
275 | XtInitializeWidgetClass(widget_class); | |||||
276 | ext = (ObjectClassExtension) | |||||
277 | XtGetClassExtension(widget_class, | |||||
278 | XtOffsetOf(ObjectClassRec, object_class.extension)__builtin_offsetof(ObjectClassRec, object_class.extension), | |||||
279 | NULLQUARK((XrmQuark) 0), XtObjectExtensionVersion1L, | |||||
280 | sizeof(ObjectClassExtensionRec)); | |||||
281 | if (parent_constraint_class) | |||||
282 | csize = parent_constraint_class->constraint_class.constraint_size; | |||||
283 | if (ext && ext->allocate) { | |||||
284 | XtAllocateProc allocate; | |||||
285 | Cardinal extra = 0; | |||||
286 | Cardinal nargs = num_args; | |||||
287 | Cardinal ntyped = num_typed_args; | |||||
288 | allocate = ext->allocate; | |||||
289 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
290 | (*allocate)(widget_class, &csize, &extra, args, &nargs, | |||||
291 | typed_args, &ntyped, &widget, NULL((void*)0)); | |||||
292 | } else { | |||||
293 | wsize = widget_class->core_class.widget_size; | |||||
294 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
295 | if (csize) { | |||||
296 | if (sizeof(struct {char a; double b;}) != | |||||
297 | (sizeof(struct {char a; unsigned long b;}) - | |||||
298 | sizeof(unsigned long) + sizeof(double))) { | |||||
299 | if (csize && !(csize & (sizeof(double) - 1))) | |||||
300 | wsize = (wsize + sizeof(double) - 1) & ~(sizeof(double)-1); | |||||
301 | } | |||||
302 | } | |||||
303 | widget = (Widget) __XtMalloc((unsigned)(wsize + csize)); | |||||
304 | bzero(widget, wsize + csize)__builtin___memset_chk (widget, 0, wsize + csize, __builtin_object_size (widget, 0)); | |||||
305 | widget->core.constraints = | |||||
306 | (csize ? (XtPointer)((char *)widget + wsize) : NULL((void*)0)); | |||||
307 | } | |||||
308 | widget->core.self = widget; | |||||
309 | widget->core.parent = parent; | |||||
310 | widget->core.widget_class = widget_class; | |||||
311 | widget->core.xrm_name = StringToName((name != NULL) ? name : "")XrmStringToQuark((name != ((void*)0)) ? name : ""); | |||||
312 | widget->core.being_destroyed = | |||||
313 | (parent != NULL((void*)0) ? parent->core.being_destroyed : FALSE0); | |||||
314 | return widget; | |||||
315 | } | |||||
316 | ||||||
317 | static void | |||||
318 | CompileCallbacks( | |||||
319 | Widget widget) | |||||
320 | { | |||||
321 | CallbackTable offsets; | |||||
322 | InternalCallbackList* cl; | |||||
323 | int i; | |||||
324 | ||||||
325 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
326 | offsets = (CallbackTable) | |||||
327 | widget->core.widget_class->core_class.callback_private; | |||||
328 | ||||||
329 | for (i = (int)(long) *(offsets++); --i >= 0; offsets++) { | |||||
330 | cl = (InternalCallbackList *) | |||||
331 | ((char *) widget - (*offsets)->xrm_offset - 1); | |||||
332 | if (*cl) | |||||
333 | *cl = _XtCompileCallbackList((XtCallbackList) *cl); | |||||
334 | } | |||||
335 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
336 | } | |||||
337 | ||||||
338 | static Widget | |||||
339 | xtCreate( | |||||
340 | char *name, | |||||
341 | char *class, | |||||
342 | WidgetClass widget_class, | |||||
343 | Widget parent, | |||||
344 | Screen* default_screen, /* undefined when creating a nonwidget */ | |||||
345 | ArgList args, /* must be NULL if typed_args is non-NULL */ | |||||
346 | Cardinal num_args, | |||||
347 | XtTypedArgList typed_args, /* must be NULL if args is non-NULL */ | |||||
348 | Cardinal num_typed_args, | |||||
349 | ConstraintWidgetClass parent_constraint_class, | |||||
350 | /* NULL if not a subclass of Constraint or if child is popup shell */ | |||||
351 | XtWidgetProc post_proc) | |||||
352 | { | |||||
353 | /* need to use strictest alignment rules possible in next two decls. */ | |||||
354 | double widget_cache[100]; | |||||
355 | double constraint_cache[20]; | |||||
356 | Widget req_widget; | |||||
357 | XtPointer req_constraints = NULL((void*)0); | |||||
358 | Cardinal wsize, csize; | |||||
359 | Widget widget; | |||||
360 | XtCacheRef *cache_refs; | |||||
361 | Cardinal i; | |||||
362 | XtCreateHookDataRec call_data; | |||||
363 | ||||||
364 | widget = xtWidgetAlloc(widget_class, parent_constraint_class, parent, | |||||
365 | name, args, num_args, typed_args, num_typed_args); | |||||
366 | ||||||
367 | if (XtIsRectObj(widget)(((Object)(widget))->object.widget_class->core_class.class_inited & 0x02)) { | |||||
368 | widget->core.managed = FALSE0; | |||||
369 | } | |||||
370 | if (XtIsWidget(widget)(((Object)(widget))->object.widget_class->core_class.class_inited & 0x04)) { | |||||
371 | widget->core.name = XrmNameToString(widget->core.xrm_name)XrmQuarkToString(widget->core.xrm_name); | |||||
372 | widget->core.screen = default_screen; | |||||
373 | widget->core.tm.translations = NULL((void*)0); | |||||
374 | widget->core.window = (Window) 0; | |||||
375 | widget->core.visible = TRUE1; | |||||
376 | widget->core.popup_list = NULL((void*)0); | |||||
377 | widget->core.num_popups = 0; | |||||
378 | }; | |||||
379 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
380 | if (XtIsApplicationShell(widget)(_XtIsSubclassOf(widget, (WidgetClass)applicationShellWidgetClass , (WidgetClass)topLevelShellWidgetClass, (XtEnum)0x80))) { | |||||
381 | ApplicationShellWidget a = (ApplicationShellWidget) widget; | |||||
382 | if (class != NULL((void*)0)) | |||||
383 | a->application.xrm_class = StringToClass(class)XrmStringToQuark(class); | |||||
384 | else | |||||
385 | a->application.xrm_class = widget_class->core_class.xrm_class; | |||||
386 | a->application.class = XrmQuarkToString(a->application.xrm_class); | |||||
387 | } | |||||
388 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
389 | ||||||
390 | /* fetch resources */ | |||||
391 | cache_refs = _XtGetResources(widget, args, num_args, | |||||
392 | typed_args, &num_typed_args); | |||||
393 | ||||||
394 | /* Convert typed arg list to arg list */ | |||||
395 | if (typed_args != NULL((void*)0) && num_typed_args > 0) { | |||||
396 | args = (ArgList)ALLOCATE_LOCAL(sizeof(Arg) * num_typed_args)__builtin_alloca((int)(sizeof(Arg) * num_typed_args)); | |||||
397 | if (args == NULL((void*)0)) _XtAllocError(NULL((void*)0)); | |||||
398 | for (i = 0; i < num_typed_args; i++) { | |||||
399 | args[i].name = typed_args[i].name; | |||||
400 | args[i].value = typed_args[i].value; | |||||
401 | } | |||||
402 | num_args = num_typed_args; | |||||
403 | } | |||||
404 | ||||||
405 | CompileCallbacks(widget); | |||||
406 | ||||||
407 | if (cache_refs != NULL((void*)0)) { | |||||
408 | XtAddCallback(widget, XtNdestroyCallback((char*)&XtStrings[169]), | |||||
409 | XtCallbackReleaseCacheRefList, (XtPointer)cache_refs ); | |||||
410 | } | |||||
411 | ||||||
412 | wsize = widget_class->core_class.widget_size; | |||||
413 | csize = 0; | |||||
414 | req_widget = (Widget) XtStackAlloc(wsize, widget_cache)((wsize) <= sizeof(widget_cache) ? (XtPointer)(widget_cache ) : XtMalloc((unsigned)(wsize))); | |||||
415 | (void) memmove ((char *) req_widget, (char *) widget, (int) wsize)__builtin___memmove_chk ((char *) req_widget, (char *) widget , (int) wsize, __builtin_object_size ((char *) req_widget, 0) ); | |||||
416 | CallInitialize (XtClass(widget)((widget)->core.widget_class), req_widget, widget, args, num_args); | |||||
417 | if (parent_constraint_class != NULL((void*)0)) { | |||||
418 | csize = parent_constraint_class->constraint_class.constraint_size; | |||||
419 | if (csize) { | |||||
420 | req_constraints = XtStackAlloc(csize, constraint_cache)((csize) <= sizeof(constraint_cache) ? (XtPointer)(constraint_cache ) : XtMalloc((unsigned)(csize))); | |||||
421 | (void) memmove((char*)req_constraints, widget->core.constraints,__builtin___memmove_chk ((char*)req_constraints, widget->core .constraints, (int)csize, __builtin_object_size ((char*)req_constraints , 0)) | |||||
422 | (int)csize)__builtin___memmove_chk ((char*)req_constraints, widget->core .constraints, (int)csize, __builtin_object_size ((char*)req_constraints , 0)); | |||||
423 | req_widget->core.constraints = req_constraints; | |||||
424 | } else req_widget->core.constraints = NULL((void*)0); | |||||
425 | CallConstraintInitialize(parent_constraint_class, req_widget, widget, | |||||
426 | args, num_args); | |||||
427 | if (csize) { | |||||
428 | XtStackFree(req_constraints, constraint_cache){ if ((req_constraints) != ((XtPointer)(constraint_cache))) XtFree (req_constraints); }; | |||||
429 | } | |||||
430 | } | |||||
431 | XtStackFree((XtPointer)req_widget, widget_cache){ if (((XtPointer)req_widget) != ((XtPointer)(widget_cache))) XtFree((XtPointer)req_widget); }; | |||||
432 | if (post_proc != (XtWidgetProc) NULL((void*)0)) { | |||||
433 | Widget hookobj; | |||||
434 | (*post_proc)(widget); | |||||
435 | hookobj = XtHooksOfDisplay((default_screen != (Screen*) NULL((void*)0)) ? | |||||
436 | default_screen->display : | |||||
437 | XtDisplayOfObject(parent)((((Object)(parent))->object.widget_class->core_class.class_inited & 0x04) ? (parent)->core.screen->display : _XtIsHookObject (parent) ? ((HookObject)(parent))->hooks.screen->display : _XtWindowedAncestor(parent)->core.screen->display)); | |||||
438 | if (XtHasCallbacks(hookobj, XtNcreateHook((char*)&XtStrings[2050])) == XtCallbackHasSome) { | |||||
439 | ||||||
440 | call_data.type = XtHcreate((char*)&XtStrings[2198]); | |||||
441 | call_data.widget = widget; | |||||
442 | call_data.args = args; | |||||
443 | call_data.num_args = num_args; | |||||
444 | XtCallCallbackList(hookobj, | |||||
445 | ((HookObject)hookobj)->hooks.createhook_callbacks, | |||||
446 | (XtPointer)&call_data); | |||||
447 | } | |||||
448 | } | |||||
449 | if (typed_args != NULL((void*)0)) { | |||||
450 | while (num_typed_args-- > 0) { | |||||
451 | ||||||
452 | /* In GetResources we may have dynamically alloc'd store to hold */ | |||||
453 | /* a copy of a resource which was larger then sizeof(XtArgVal). */ | |||||
454 | /* We must free this store now in order to prevent a memory leak */ | |||||
455 | /* A typed arg that has a converted value in dynamic store has a */ | |||||
456 | /* negated size field. */ | |||||
457 | ||||||
458 | if (typed_args->type != NULL((void*)0) && typed_args->size < 0) { | |||||
459 | XtFree((char*)typed_args->value); | |||||
460 | typed_args->size = -(typed_args->size); | |||||
461 | } | |||||
462 | typed_args++; | |||||
463 | } | |||||
464 | DEALLOCATE_LOCAL((char*)args)do {} while(0); | |||||
465 | } | |||||
466 | return (widget); | |||||
467 | } | |||||
468 | ||||||
469 | static void | |||||
470 | widgetPostProc(Widget w) | |||||
471 | { | |||||
472 | XtWidgetProc insert_child; | |||||
473 | Widget parent = XtParent(w)((w)->core.parent); | |||||
474 | String param = XtName(w); | |||||
475 | Cardinal num_params = 1; | |||||
476 | ||||||
477 | if (XtIsComposite(parent)(((Object)(parent))->object.widget_class->core_class.class_inited & 0x08)) { | |||||
478 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
479 | insert_child = ((CompositeWidgetClass) parent->core.widget_class)-> | |||||
480 | composite_class.insert_child; | |||||
481 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
482 | } else { | |||||
483 | return; | |||||
484 | } | |||||
485 | if (insert_child == NULL((void*)0)) { | |||||
486 | XtAppErrorMsg(XtWidgetToApplicationContext(parent), | |||||
487 | "nullProc","insertChild",XtCXtToolkitError, | |||||
488 | "\"%s\" parent has NULL insert_child method", | |||||
489 | ¶m, &num_params); | |||||
490 | } else { | |||||
491 | (*insert_child) (w); | |||||
492 | } | |||||
493 | } | |||||
494 | ||||||
495 | Widget | |||||
496 | _XtCreateWidget( | |||||
497 | String name, | |||||
498 | WidgetClass widget_class, | |||||
499 | Widget parent, | |||||
500 | ArgList args, | |||||
501 | Cardinal num_args, | |||||
502 | XtTypedArgList typed_args, | |||||
503 | Cardinal num_typed_args) | |||||
504 | { | |||||
505 | register Widget widget; | |||||
506 | ConstraintWidgetClass cwc; | |||||
507 | Screen* default_screen; | |||||
508 | XtEnum class_inited; | |||||
509 | String params[3]; | |||||
510 | Cardinal num_params; | |||||
511 | ||||||
512 | params[0] = name; | |||||
513 | num_params = 1; | |||||
514 | ||||||
515 | if (parent == NULL((void*)0)) { | |||||
516 | XtErrorMsg("invalidParent", XtNxtCreateWidget, XtCXtToolkitError, | |||||
517 | "XtCreateWidget \"%s\" requires non-NULL parent", | |||||
518 | params, &num_params); | |||||
519 | } else if (widget_class == NULL((void*)0)) { | |||||
520 | XtAppErrorMsg(XtWidgetToApplicationContext(parent), | |||||
521 | "invalidClass", XtNxtCreateWidget, XtCXtToolkitError, | |||||
522 | "XtCreateWidget \"%s\" requires non-NULL widget class", | |||||
523 | params, &num_params); | |||||
524 | } | |||||
525 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
526 | if (!widget_class->core_class.class_inited) | |||||
527 | XtInitializeWidgetClass(widget_class); | |||||
528 | class_inited = widget_class->core_class.class_inited; | |||||
529 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
530 | if ((class_inited & WidgetClassFlag0x04) == 0) { | |||||
531 | /* not a widget */ | |||||
532 | default_screen = NULL((void*)0); | |||||
533 | if (XtIsComposite(parent)(((Object)(parent))->object.widget_class->core_class.class_inited & 0x08)) { | |||||
534 | CompositeClassExtension ext; | |||||
535 | ext = (CompositeClassExtension) | |||||
536 | XtGetClassExtension(XtClass(parent)((parent)->core.widget_class), | |||||
537 | XtOffsetOf(CompositeClassRec, composite_class.extension)__builtin_offsetof(CompositeClassRec, composite_class.extension ), | |||||
538 | NULLQUARK((XrmQuark) 0), 1L, (Cardinal) 0); | |||||
539 | LOCK_PROCESSif(_XtProcessLock)(*_XtProcessLock)(); | |||||
540 | if (ext && | |||||
541 | (ext->version > XtCompositeExtensionVersion2L || | |||||
542 | ext->record_size > sizeof(CompositeClassExtensionRec))) { | |||||
543 | params[1] = XtClass(parent)((parent)->core.widget_class)->core_class.class_name; | |||||
544 | num_params = 2; | |||||
545 | XtAppWarningMsg(XtWidgetToApplicationContext(parent), | |||||
546 | "invalidExtension", XtNxtCreateWidget, | |||||
547 | XtCXtToolkitError, | |||||
548 | "widget \"%s\" class %s has invalid CompositeClassExtension record", | |||||
549 | params, &num_params); | |||||
550 | } | |||||
551 | if (!ext || !ext->accepts_objects) { | |||||
552 | params[1] = XtName(parent); | |||||
553 | num_params = 2; | |||||
554 | XtAppErrorMsg(XtWidgetToApplicationContext(parent), | |||||
555 | "nonWidget", XtNxtCreateWidget,XtCXtToolkitError, | |||||
556 | "attempt to add non-widget child \"%s\" to parent \"%s\" which supports only widgets", | |||||
557 | params, &num_params); | |||||
558 | } | |||||
559 | UNLOCK_PROCESSif(_XtProcessUnlock)(*_XtProcessUnlock)(); | |||||
560 | } | |||||
561 | } else { | |||||
562 | default_screen = parent->core.screen; | |||||
563 | } | |||||
564 | ||||||
565 | if (XtIsConstraint(parent)(((Object)(parent))->object.widget_class->core_class.class_inited & 0x10)) { | |||||
566 | cwc = (ConstraintWidgetClass) parent->core.widget_class; | |||||
567 | } else { | |||||
568 | cwc = NULL((void*)0); | |||||
569 | } | |||||
570 | widget = xtCreate(name, (char *)NULL((void*)0), widget_class, parent, | |||||
571 | default_screen, args, num_args, | |||||
572 | typed_args, num_typed_args, cwc, widgetPostProc); | |||||
573 | return (widget); | |||||
574 | } | |||||
575 | ||||||
576 | Widget | |||||
577 | XtCreateWidget( | |||||
578 | _Xconstconst char* name, | |||||
579 | WidgetClass widget_class, | |||||
580 | Widget parent, | |||||
581 | ArgList args, | |||||
582 | Cardinal num_args | |||||
583 | ) | |||||
584 | { | |||||
585 | Widget retval; | |||||
586 | WIDGET_TO_APPCON(parent)XtAppContext app = (parent && _XtProcessLock ? XtWidgetToApplicationContext (parent) : ((void*)0)); | |||||
587 | ||||||
588 | LOCK_APP(app)if(app && app->lock)(*app->lock)(app); | |||||
589 | retval = _XtCreateWidget((String)name, widget_class, parent, args, num_args, | |||||
590 | (XtTypedArgList)NULL((void*)0), (Cardinal)0); | |||||
591 | UNLOCK_APP(app)if(app && app->unlock)(*app->unlock)(app); | |||||
592 | return retval; | |||||
593 | } | |||||
594 | ||||||
595 | ||||||
596 | Widget | |||||
597 | XtCreateManagedWidget( | |||||
598 | _Xconstconst char* name, | |||||
599 | WidgetClass widget_class, | |||||
600 | Widget parent, | |||||
601 | ArgList args, | |||||
602 | Cardinal num_args | |||||
603 | ) | |||||
604 | { | |||||
605 | register Widget widget; | |||||
606 | WIDGET_TO_APPCON(parent)XtAppContext app = (parent && _XtProcessLock ? XtWidgetToApplicationContext (parent) : ((void*)0)); | |||||
607 | ||||||
608 | LOCK_APP(app)if(app && app->lock)(*app->lock)(app); | |||||
609 | XtCheckSubclass(parent, compositeWidgetClass, "in XtCreateManagedWidget"); | |||||
610 | widget = _XtCreateWidget((String)name, widget_class, parent, args, | |||||
611 | num_args, (XtTypedArgList)NULL((void*)0), (Cardinal) 0); | |||||
612 | XtManageChild(widget); | |||||
613 | UNLOCK_APP(app)if(app && app->unlock)(*app->unlock)(app); | |||||
614 | return widget; | |||||
615 | } | |||||
616 | ||||||
617 | static void | |||||
618 | popupPostProc(Widget w) | |||||
619 | { | |||||
620 | Widget parent = XtParent(w)((w)->core.parent); | |||||
621 | ||||||
622 | parent->core.popup_list = | |||||
623 | (WidgetList) XtRealloc((char*) parent->core.popup_list, | |||||
624 | (unsigned) (parent->core.num_popups+1) * sizeof(Widget)); | |||||
625 | parent->core.popup_list[parent->core.num_popups++] = w; | |||||
626 | } | |||||
627 | ||||||
628 | Widget | |||||
629 | _XtCreatePopupShell( | |||||
630 | String name, | |||||
631 | WidgetClass widget_class, | |||||
632 | Widget parent, | |||||
633 | ArgList args, | |||||
634 | Cardinal num_args, | |||||
635 | XtTypedArgList typed_args, | |||||
636 | Cardinal num_typed_args) | |||||
637 | { | |||||
638 | register Widget widget; | |||||
639 | Screen* default_screen; | |||||
640 | ||||||
641 | if (parent == NULL((void*)0)) { | |||||
642 | XtErrorMsg("invalidParent",XtNxtCreatePopupShell,XtCXtToolkitError, | |||||
643 | "XtCreatePopupShell requires non-NULL parent", | |||||
644 | (String *)NULL((void*)0), (Cardinal *)NULL((void*)0)); | |||||
645 | } else if (widget_class == NULL((void*)0)) { | |||||
646 | XtAppErrorMsg(XtWidgetToApplicationContext(parent), | |||||
647 | "invalidClass",XtNxtCreatePopupShell,XtCXtToolkitError, | |||||
648 | "XtCreatePopupShell requires non-NULL widget class", | |||||
649 | (String *)NULL((void*)0), (Cardinal *)NULL((void*)0)); | |||||
650 | } | |||||
651 | XtCheckSubclass(parent, coreWidgetClass, "in XtCreatePopupShell"); | |||||
652 | default_screen = parent->core.screen; | |||||
| ||||||
653 | widget = xtCreate(name, (char *)NULL((void*)0), widget_class, parent, | |||||
654 | default_screen, args, num_args, typed_args, | |||||
655 | num_typed_args, (ConstraintWidgetClass)NULL((void*)0), | |||||
656 | popupPostProc); | |||||
657 | ||||||
658 | #ifndef X_NO_RESOURCE_CONFIGURATION_MANAGEMENT | |||||
659 | XtAddEventHandler (widget, (EventMask) PropertyChangeMask(1L<<22), FALSE0, | |||||
660 | (XtEventHandler) _XtResourceConfigurationEH, NULL((void*)0)); | |||||
661 | #endif | |||||
662 | return(widget); | |||||
663 | } | |||||
664 | ||||||
665 | Widget | |||||
666 | XtCreatePopupShell( | |||||
667 | _Xconstconst char* name, | |||||
668 | WidgetClass widget_class, | |||||
669 | Widget parent, | |||||
670 | ArgList args, | |||||
671 | Cardinal num_args | |||||
672 | ) | |||||
673 | { | |||||
674 | Widget retval; | |||||
675 | WIDGET_TO_APPCON(parent)XtAppContext app = (parent && _XtProcessLock ? XtWidgetToApplicationContext (parent) : ((void*)0)); | |||||
| ||||||
676 | ||||||
677 | LOCK_APP(app)if(app && app->lock)(*app->lock)(app); | |||||
678 | retval = _XtCreatePopupShell((String)name, widget_class, parent, args, | |||||
679 | num_args, (XtTypedArgList)NULL((void*)0), (Cardinal)0); | |||||
680 | UNLOCK_APP(app)if(app && app->unlock)(*app->unlock)(app); | |||||
681 | return retval; | |||||
682 | } | |||||
683 | ||||||
684 | Widget | |||||
685 | _XtAppCreateShell( | |||||
686 | String name, | |||||
687 | String class, | |||||
688 | WidgetClass widget_class, | |||||
689 | Display* display, | |||||
690 | ArgList args, | |||||
691 | Cardinal num_args, | |||||
692 | XtTypedArgList typed_args, | |||||
693 | Cardinal num_typed_args) | |||||
694 | { | |||||
695 | Widget shell; | |||||
696 | ||||||
697 | if (widget_class == NULL((void*)0)) { | |||||
698 | XtAppErrorMsg(XtDisplayToApplicationContext(display), | |||||
699 | "invalidClass","xtAppCreateShell",XtCXtToolkitError, | |||||
700 | "XtAppCreateShell requires non-NULL widget class", | |||||
701 | (String *)NULL((void*)0), (Cardinal *)NULL((void*)0)); | |||||
702 | } | |||||
703 | if (name == NULL((void*)0)) | |||||
704 | name = XrmNameToString(_XtGetPerDisplay(display)->name)XrmQuarkToString(_XtGetPerDisplay(display)->name); | |||||
705 | shell = xtCreate(name, class, widget_class, (Widget)NULL((void*)0), | |||||
706 | (Screen*)DefaultScreenOfDisplay(display)(&((_XPrivDisplay)(display))->screens[(((_XPrivDisplay )(display))->default_screen)]), | |||||
707 | args, num_args, typed_args, num_typed_args, | |||||
708 | (ConstraintWidgetClass) NULL((void*)0), _XtAddShellToHookObj); | |||||
709 | ||||||
710 | #ifndef X_NO_RESOURCE_CONFIGURATION_MANAGEMENT | |||||
711 | XtAddEventHandler (shell, (EventMask) PropertyChangeMask(1L<<22), FALSE0, | |||||
712 | (XtEventHandler) _XtResourceConfigurationEH, NULL((void*)0)); | |||||
713 | #endif | |||||
714 | ||||||
715 | return shell; | |||||
716 | } | |||||
717 | ||||||
718 | Widget | |||||
719 | XtAppCreateShell( | |||||
720 | _Xconstconst char* name, | |||||
721 | _Xconstconst char* class, | |||||
722 | WidgetClass widget_class, | |||||
723 | Display *display, | |||||
724 | ArgList args, | |||||
725 | Cardinal num_args | |||||
726 | ) | |||||
727 | { | |||||
728 | Widget retval; | |||||
729 | DPY_TO_APPCON(display)XtAppContext app = (_XtProcessLock ? XtDisplayToApplicationContext (display): ((void*)0)); | |||||
730 | ||||||
731 | LOCK_APP(app)if(app && app->lock)(*app->lock)(app); | |||||
732 | retval = _XtAppCreateShell((String)name, (String)class, widget_class, | |||||
733 | display, args, num_args, (XtTypedArgList)NULL((void*)0), (Cardinal)0); | |||||
734 | UNLOCK_APP(app)if(app && app->unlock)(*app->unlock)(app); | |||||
735 | return retval; | |||||
736 | } | |||||
737 | ||||||
738 | /* ARGSUSED */ | |||||
739 | Widget | |||||
740 | XtCreateApplicationShell( | |||||
741 | _Xconstconst char* name, /* unused in R3 and later */ | |||||
742 | WidgetClass widget_class, | |||||
743 | ArgList args, | |||||
744 | Cardinal num_args | |||||
745 | ) | |||||
746 | { | |||||
747 | Widget retval; | |||||
748 | Display* dpy; | |||||
749 | XrmClass class; | |||||
750 | XtAppContext app = _XtDefaultAppContext(); | |||||
751 | ||||||
752 | LOCK_APP(app)if(app && app->lock)(*app->lock)(app); | |||||
753 | dpy = app->list[0]; | |||||
754 | class = _XtGetPerDisplay(dpy)->class; | |||||
755 | ||||||
756 | retval = _XtAppCreateShell((String)NULL((void*)0), XrmQuarkToString((XrmQuark)class), | |||||
757 | widget_class, dpy, args, num_args, | |||||
758 | (XtTypedArgList)NULL((void*)0), (Cardinal)0); | |||||
759 | UNLOCK_APP(app)if(app && app->unlock)(*app->unlock)(app); | |||||
760 | return retval; | |||||
761 | } | |||||
762 | ||||||
763 | Widget | |||||
764 | _XtCreateHookObj(Screen* screen) | |||||
765 | { | |||||
766 | Widget req_widget; | |||||
767 | double widget_cache[100]; | |||||
768 | Cardinal wsize = 0; | |||||
769 | Widget hookobj = xtWidgetAlloc(hookObjectClass, | |||||
770 | (ConstraintWidgetClass)NULL((void*)0), | |||||
771 | (Widget)NULL((void*)0), "hooks", | |||||
772 | (ArgList)NULL((void*)0), (Cardinal)0, | |||||
773 | (XtTypedArgList)NULL((void*)0), (Cardinal)0); | |||||
774 | ||||||
775 | ((HookObject)hookobj)->hooks.screen = screen; | |||||
776 | (void) _XtGetResources(hookobj, (ArgList)NULL((void*)0), 0, | |||||
777 | (XtTypedArgList)NULL((void*)0), &wsize); | |||||
778 | CompileCallbacks(hookobj); | |||||
779 | wsize = hookObjectClass->core_class.widget_size; | |||||
780 | req_widget = (Widget) XtStackAlloc(wsize, widget_cache)((wsize) <= sizeof(widget_cache) ? (XtPointer)(widget_cache ) : XtMalloc((unsigned)(wsize))); | |||||
781 | (void) memmove ((char *) req_widget, (char *) hookobj, (int) wsize)__builtin___memmove_chk ((char *) req_widget, (char *) hookobj , (int) wsize, __builtin_object_size ((char *) req_widget, 0) ); | |||||
782 | CallInitialize (hookObjectClass, req_widget, hookobj, | |||||
783 | (ArgList)NULL((void*)0), (Cardinal) 0); | |||||
784 | XtStackFree((XtPointer)req_widget, widget_cache){ if (((XtPointer)req_widget) != ((XtPointer)(widget_cache))) XtFree((XtPointer)req_widget); }; | |||||
785 | return hookobj; | |||||
786 | } |