diff options
Diffstat (limited to 'src/Manage.c')
| -rw-r--r-- | src/Manage.c | 558 |
1 files changed, 289 insertions, 269 deletions
diff --git a/src/Manage.c b/src/Manage.c index 96bacbb..77f3d9f 100644 --- a/src/Manage.c +++ b/src/Manage.c @@ -78,99 +78,104 @@ static _Xconst _XtString XtNxtUnmanageChildren = "xtUnmanageChildren"; static _Xconst _XtString XtNxtManageChildren = "xtManageChildren"; static _Xconst _XtString XtNxtChangeManagedSet = "xtChangeManagedSet"; -static void UnmanageChildren( - WidgetList children, - Cardinal num_children, - Widget parent, - Cardinal* num_unique_children, - Boolean call_change_managed, - _Xconst _XtString caller_func) +static void +UnmanageChildren(WidgetList children, + Cardinal num_children, + Widget parent, + Cardinal *num_unique_children, + Boolean call_change_managed, + _Xconst _XtString caller_func) { - Widget child; - Cardinal i; - XtWidgetProc change_managed = NULL; - Bool parent_realized = False; + Widget child; + Cardinal i; + XtWidgetProc change_managed = NULL; + Bool parent_realized = False; *num_unique_children = 0; if (XtIsComposite((Widget) parent)) { - LOCK_PROCESS; + LOCK_PROCESS; change_managed = ((CompositeWidgetClass) parent->core.widget_class) - ->composite_class.change_managed; - UNLOCK_PROCESS; - parent_realized = XtIsRealized((Widget)parent); - } else { - XtAppErrorMsg(XtWidgetToApplicationContext((Widget)parent), - "invalidParent",caller_func, XtCXtToolkitError, - "Attempt to unmanage a child when parent is not Composite", - NULL, NULL); + ->composite_class.change_managed; + UNLOCK_PROCESS; + parent_realized = XtIsRealized((Widget) parent); + } + else { + XtAppErrorMsg(XtWidgetToApplicationContext((Widget) parent), + "invalidParent", caller_func, XtCXtToolkitError, + "Attempt to unmanage a child when parent is not Composite", + NULL, NULL); } for (i = 0; i < num_children; i++) { - child = children[i]; - if (child == NULL) { - XtAppWarningMsg(XtWidgetToApplicationContext(parent), - XtNinvalidChild,caller_func,XtCXtToolkitError, - "Null child passed to XtUnmanageChildren", - NULL, NULL); - return; - } + child = children[i]; + if (child == NULL) { + XtAppWarningMsg(XtWidgetToApplicationContext(parent), + XtNinvalidChild, caller_func, XtCXtToolkitError, + "Null child passed to XtUnmanageChildren", + NULL, NULL); + return; + } if (child->core.parent != parent) { - XtAppWarningMsg(XtWidgetToApplicationContext(parent), - "ambiguousParent",caller_func,XtCXtToolkitError, - "Not all children have same parent in UnmanageChildren", - NULL, NULL); - } else - if (child->core.managed) { + XtAppWarningMsg(XtWidgetToApplicationContext(parent), + "ambiguousParent", caller_func, XtCXtToolkitError, + "Not all children have same parent in UnmanageChildren", + NULL, NULL); + } + else if (child->core.managed) { (*num_unique_children)++; - CALLGEOTAT(_XtGeoTrace(child,"Child \"%s\" is marked unmanaged\n", - XtName(child))); - child->core.managed = FALSE; + CALLGEOTAT(_XtGeoTrace(child, "Child \"%s\" is marked unmanaged\n", + XtName(child))); + child->core.managed = FALSE; if (XtIsWidget(child) - && XtIsRealized(child) - && child->core.mapped_when_managed) - XtUnmapWidget(child); - else - { /* RectObj child */ - Widget pw = child->core.parent; - RectObj r = (RectObj) child; - while ((pw!=NULL) && (!XtIsWidget(pw))) pw = pw->core.parent; - if ((pw!=NULL) && XtIsRealized (pw)) - XClearArea (XtDisplay (pw), XtWindow (pw), - r->rectangle.x, r->rectangle.y, - (unsigned) (r->rectangle.width + (r->rectangle.border_width << 1)), - (unsigned) (r->rectangle.height + (r->rectangle.border_width << 1)), - TRUE); - } + && XtIsRealized(child) + && child->core.mapped_when_managed) + XtUnmapWidget(child); + else { /* RectObj child */ + Widget pw = child->core.parent; + RectObj r = (RectObj) child; + + while ((pw != NULL) && (!XtIsWidget(pw))) + pw = pw->core.parent; + if ((pw != NULL) && XtIsRealized(pw)) + XClearArea(XtDisplay(pw), XtWindow(pw), + r->rectangle.x, r->rectangle.y, + (unsigned) (r->rectangle.width + + (r->rectangle.border_width << 1)), + (unsigned) (r->rectangle.height + + (r->rectangle.border_width << 1)), + TRUE); + } } } if (call_change_managed && *num_unique_children != 0 && - change_managed != NULL && parent_realized) { - CALLGEOTAT(_XtGeoTrace((Widget)parent, - "Call parent: \"%s\"[%d,%d]'s changemanaged proc\n", - XtName((Widget)parent), - parent->core.width,parent->core.height)); - (*change_managed) (parent); + change_managed != NULL && parent_realized) { + CALLGEOTAT(_XtGeoTrace((Widget) parent, + "Call parent: \"%s\"[%d,%d]'s changemanaged proc\n", + XtName((Widget) parent), + parent->core.width, parent->core.height)); + (*change_managed) (parent); } -} /* UnmanageChildren */ +} /* UnmanageChildren */ -void XtUnmanageChildren ( - WidgetList children, - Cardinal num_children) +void +XtUnmanageChildren(WidgetList children, Cardinal num_children) { Widget parent, hookobj; Cardinal ii; + #ifdef XTHREADS XtAppContext app; #endif - if (num_children == 0) return; + if (num_children == 0) + return; if (children[0] == NULL) { - XtWarningMsg(XtNinvalidChild,XtNxtUnmanageChildren,XtCXtToolkitError, - "Null child found in argument list to unmanage", - NULL, NULL); - return; + XtWarningMsg(XtNinvalidChild, XtNxtUnmanageChildren, XtCXtToolkitError, + "Null child found in argument list to unmanage", + NULL, NULL); + return; } #ifdef XTHREADS app = XtWidgetToApplicationContext(children[0]); @@ -178,155 +183,166 @@ void XtUnmanageChildren ( LOCK_APP(app); parent = children[0]->core.parent; if (parent->core.being_destroyed) { - UNLOCK_APP(app); - return; + UNLOCK_APP(app); + return; } UnmanageChildren(children, num_children, parent, &ii, - (Boolean)True, XtNxtUnmanageChildren); + (Boolean) True, XtNxtUnmanageChildren); hookobj = XtHooksOfDisplay(XtDisplayOfObject(children[0])); if (XtHasCallbacks(hookobj, XtNchangeHook) == XtCallbackHasSome) { - XtChangeHookDataRec call_data; - - call_data.type = XtHunmanageChildren; - call_data.widget = parent; - call_data.event_data = (XtPointer) children; - call_data.num_event_data = num_children; - XtCallCallbackList(hookobj, - ((HookObject)hookobj)->hooks.changehook_callbacks, - (XtPointer)&call_data); + XtChangeHookDataRec call_data; + + call_data.type = XtHunmanageChildren; + call_data.widget = parent; + call_data.event_data = (XtPointer) children; + call_data.num_event_data = num_children; + XtCallCallbackList(hookobj, + ((HookObject) hookobj)->hooks.changehook_callbacks, + (XtPointer) &call_data); } UNLOCK_APP(app); -} /* XtUnmanageChildren */ +} /* XtUnmanageChildren */ -void XtUnmanageChild( - Widget child) +void +XtUnmanageChild(Widget child) { - XtUnmanageChildren(&child, (Cardinal)1); -} /* XtUnmanageChild */ - - -static void ManageChildren( - WidgetList children, - Cardinal num_children, - Widget parent, - Boolean call_change_managed, - _Xconst _XtString caller_func) + XtUnmanageChildren(&child, (Cardinal) 1); +} /* XtUnmanageChild */ + +static void +ManageChildren(WidgetList children, + Cardinal num_children, + Widget parent, + Boolean call_change_managed, + _Xconst _XtString caller_func) { #define MAXCHILDREN 100 - Widget child; - Cardinal num_unique_children, i; - XtWidgetProc change_managed = NULL; - WidgetList unique_children; - Widget cache[MAXCHILDREN]; - Bool parent_realized = False; + Widget child; + Cardinal num_unique_children, i; + XtWidgetProc change_managed = NULL; + WidgetList unique_children; + Widget cache[MAXCHILDREN]; + Bool parent_realized = False; if (XtIsComposite((Widget) parent)) { - LOCK_PROCESS; + LOCK_PROCESS; change_managed = ((CompositeWidgetClass) parent->core.widget_class) - ->composite_class.change_managed; - UNLOCK_PROCESS; - parent_realized = XtIsRealized((Widget)parent); - } else { - XtAppErrorMsg(XtWidgetToApplicationContext((Widget)parent), - "invalidParent",caller_func, XtCXtToolkitError, - "Attempt to manage a child when parent is not Composite", - NULL, NULL); + ->composite_class.change_managed; + UNLOCK_PROCESS; + parent_realized = XtIsRealized((Widget) parent); + } + else { + XtAppErrorMsg(XtWidgetToApplicationContext((Widget) parent), + "invalidParent", caller_func, XtCXtToolkitError, + "Attempt to manage a child when parent is not Composite", + NULL, NULL); } /* Construct new list of children that really need to be operated upon. */ if (num_children <= MAXCHILDREN) { - unique_children = cache; - } else { - unique_children = (WidgetList) __XtMalloc((Cardinal) ((size_t)num_children * sizeof(Widget))); + unique_children = cache; + } + else { + unique_children = (WidgetList) + __XtMalloc((Cardinal) ((size_t) num_children * sizeof(Widget))); } num_unique_children = 0; for (i = 0; i < num_children; i++) { - child = children[i]; - if (child == NULL) { - XtAppWarningMsg(XtWidgetToApplicationContext((Widget)parent), - XtNinvalidChild,caller_func,XtCXtToolkitError, - "null child passed to ManageChildren", - NULL, NULL); - if (unique_children != cache) XtFree((char *) unique_children); - return; - } + child = children[i]; + if (child == NULL) { + XtAppWarningMsg(XtWidgetToApplicationContext((Widget) parent), + XtNinvalidChild, caller_func, XtCXtToolkitError, + "null child passed to ManageChildren", NULL, NULL); + if (unique_children != cache) + XtFree((char *) unique_children); + return; + } #ifdef DEBUG - if (!XtIsRectObj(child)) { - String params[2]; - Cardinal num_params = 2; - params[0] = XtName(child); - params[1] = child->core.widget_class->core_class.class_name; - XtAppWarningMsg(XtWidgetToApplicationContext((Widget)parent), - "notRectObj",caller_func,XtCXtToolkitError, - "child \"%s\", class %s is not a RectObj", - params, &num_params); - continue; - } -#endif /*DEBUG*/ - if (child->core.parent != parent) { - XtAppWarningMsg(XtWidgetToApplicationContext((Widget)parent), - "ambiguousParent",caller_func,XtCXtToolkitError, - "Not all children have same parent in XtManageChildren", - NULL, NULL); - } else if (! child->core.managed && !child->core.being_destroyed) { - unique_children[num_unique_children++] = child; - CALLGEOTAT(_XtGeoTrace(child, - "Child \"%s\"[%d,%d] is marked managed\n", - XtName(child), - child->core.width,child->core.height)); - child->core.managed = TRUE; - } + if (!XtIsRectObj(child)) { + String params[2]; + Cardinal num_params = 2; + + params[0] = XtName(child); + params[1] = child->core.widget_class->core_class.class_name; + XtAppWarningMsg(XtWidgetToApplicationContext((Widget) parent), + "notRectObj", caller_func, XtCXtToolkitError, + "child \"%s\", class %s is not a RectObj", + params, &num_params); + continue; + } +#endif /*DEBUG*/ + if (child->core.parent != parent) { + XtAppWarningMsg(XtWidgetToApplicationContext((Widget) parent), + "ambiguousParent", caller_func, XtCXtToolkitError, + "Not all children have same parent in XtManageChildren", + NULL, NULL); + } + else if (!child->core.managed && !child->core.being_destroyed) { + unique_children[num_unique_children++] = child; + CALLGEOTAT(_XtGeoTrace(child, + "Child \"%s\"[%d,%d] is marked managed\n", + XtName(child), + child->core.width, child->core.height)); + child->core.managed = TRUE; + } } if ((call_change_managed || num_unique_children != 0) && parent_realized) { - /* Compute geometry of new managed set of children. */ - if (change_managed != NULL) { - CALLGEOTAT(_XtGeoTrace((Widget)parent, - "Call parent: \"%s\"[%d,%d]'s changemanaged\n", - XtName((Widget)parent), - parent->core.width,parent->core.height)); - (*change_managed) ((Widget)parent); - } - - /* Realize each child if necessary, then map if necessary */ - for (i = 0; i < num_unique_children; i++) { - child = unique_children[i]; - if (XtIsWidget(child)) { - if (! XtIsRealized(child)) XtRealizeWidget(child); - if (child->core.mapped_when_managed) XtMapWidget(child); - } else { /* RectObj child */ - Widget pw = child->core.parent; - RectObj r = (RectObj) child; - while ((pw!=NULL) && (!XtIsWidget(pw))) - pw = pw->core.parent; - if (pw != NULL) - XClearArea (XtDisplay (pw), XtWindow (pw), - r->rectangle.x, r->rectangle.y, - (unsigned) (r->rectangle.width + (r->rectangle.border_width << 1)), - (unsigned) (r->rectangle.height + (r->rectangle.border_width << 1)), - TRUE); + /* Compute geometry of new managed set of children. */ + if (change_managed != NULL) { + CALLGEOTAT(_XtGeoTrace((Widget) parent, + "Call parent: \"%s\"[%d,%d]'s changemanaged\n", + XtName((Widget) parent), + parent->core.width, parent->core.height)); + (*change_managed) ((Widget) parent); + } + + /* Realize each child if necessary, then map if necessary */ + for (i = 0; i < num_unique_children; i++) { + child = unique_children[i]; + if (XtIsWidget(child)) { + if (!XtIsRealized(child)) + XtRealizeWidget(child); + if (child->core.mapped_when_managed) + XtMapWidget(child); + } + else { /* RectObj child */ + Widget pw = child->core.parent; + RectObj r = (RectObj) child; + + while ((pw != NULL) && (!XtIsWidget(pw))) + pw = pw->core.parent; + if (pw != NULL) + XClearArea(XtDisplay(pw), XtWindow(pw), + r->rectangle.x, r->rectangle.y, + (unsigned) (r->rectangle.width + + (r->rectangle.border_width << 1)), + (unsigned) (r->rectangle.height + + (r->rectangle.border_width << 1)), + TRUE); } } } - if (unique_children != cache) XtFree((char *) unique_children); -} /* ManageChildren */ + if (unique_children != cache) + XtFree((char *) unique_children); +} /* ManageChildren */ -void XtManageChildren( - WidgetList children, - Cardinal num_children) +void +XtManageChildren(WidgetList children, Cardinal num_children) { Widget parent, hookobj; + #ifdef XTHREADS XtAppContext app; #endif - if (num_children == 0) return; + if (num_children == 0) + return; if (children[0] == NULL) { - XtWarningMsg(XtNinvalidChild, XtNxtManageChildren, XtCXtToolkitError, - "null child passed to XtManageChildren", - NULL, NULL); - return; + XtWarningMsg(XtNinvalidChild, XtNxtManageChildren, XtCXtToolkitError, + "null child passed to XtManageChildren", NULL, NULL); + return; } #ifdef XTHREADS app = XtWidgetToApplicationContext(children[0]); @@ -334,82 +350,83 @@ void XtManageChildren( LOCK_APP(app); parent = children[0]->core.parent; if (parent->core.being_destroyed) { - UNLOCK_APP(app); - return; + UNLOCK_APP(app); + return; } - ManageChildren(children, num_children, parent, (Boolean)False, - XtNxtManageChildren); + ManageChildren(children, num_children, parent, (Boolean) False, + XtNxtManageChildren); hookobj = XtHooksOfDisplay(XtDisplayOfObject(children[0])); if (XtHasCallbacks(hookobj, XtNchangeHook) == XtCallbackHasSome) { - XtChangeHookDataRec call_data; - - call_data.type = XtHmanageChildren; - call_data.widget = parent; - call_data.event_data = (XtPointer) children; - call_data.num_event_data = num_children; - XtCallCallbackList(hookobj, - ((HookObject)hookobj)->hooks.changehook_callbacks, - (XtPointer)&call_data); + XtChangeHookDataRec call_data; + + call_data.type = XtHmanageChildren; + call_data.widget = parent; + call_data.event_data = (XtPointer) children; + call_data.num_event_data = num_children; + XtCallCallbackList(hookobj, + ((HookObject) hookobj)->hooks.changehook_callbacks, + (XtPointer) &call_data); } UNLOCK_APP(app); -} /* XtManageChildren */ +} /* XtManageChildren */ -void XtManageChild( - Widget child) +void +XtManageChild(Widget child) { XtManageChildren(&child, (Cardinal) 1); -} /* XtManageChild */ +} /* XtManageChild */ - -void XtSetMappedWhenManaged( - Widget widget, - _XtBoolean mapped_when_managed) +void +XtSetMappedWhenManaged(Widget widget, _XtBoolean mapped_when_managed) { Widget hookobj; + WIDGET_TO_APPCON(widget); LOCK_APP(app); if (widget->core.mapped_when_managed == mapped_when_managed) { - UNLOCK_APP(app); - return; + UNLOCK_APP(app); + return; } widget->core.mapped_when_managed = (Boolean) mapped_when_managed; hookobj = XtHooksOfDisplay(XtDisplay(widget)); if (XtHasCallbacks(hookobj, XtNchangeHook) == XtCallbackHasSome) { - XtChangeHookDataRec call_data; - - call_data.type = XtHsetMappedWhenManaged; - call_data.widget = widget; - call_data.event_data = (XtPointer) (unsigned long) mapped_when_managed; - XtCallCallbackList(hookobj, - ((HookObject)hookobj)->hooks.changehook_callbacks, - (XtPointer)&call_data); + XtChangeHookDataRec call_data; + + call_data.type = XtHsetMappedWhenManaged; + call_data.widget = widget; + call_data.event_data = (XtPointer) (unsigned long) mapped_when_managed; + XtCallCallbackList(hookobj, + ((HookObject) hookobj)->hooks.changehook_callbacks, + (XtPointer) &call_data); } - if (! XtIsManaged(widget)) { - UNLOCK_APP(app); - return; + if (!XtIsManaged(widget)) { + UNLOCK_APP(app); + return; } if (mapped_when_managed) { - /* Didn't used to be mapped when managed. */ - if (XtIsRealized(widget)) XtMapWidget(widget); - } else { - /* Used to be mapped when managed. */ - if (XtIsRealized(widget)) XtUnmapWidget(widget); + /* Didn't used to be mapped when managed. */ + if (XtIsRealized(widget)) + XtMapWidget(widget); + } + else { + /* Used to be mapped when managed. */ + if (XtIsRealized(widget)) + XtUnmapWidget(widget); } UNLOCK_APP(app); -} /* XtSetMappedWhenManaged */ - - -void XtChangeManagedSet( - WidgetList unmanage_children, - Cardinal num_unmanage, - XtDoChangeProc do_change_proc, - XtPointer client_data, - WidgetList manage_children, - Cardinal num_manage) +} /* XtSetMappedWhenManaged */ + +void +XtChangeManagedSet(WidgetList unmanage_children, + Cardinal num_unmanage, + XtDoChangeProc do_change_proc, + XtPointer client_data, + WidgetList manage_children, + Cardinal num_manage) { WidgetList childp; Widget parent; @@ -421,7 +438,7 @@ void XtChangeManagedSet( XtChangeHookDataRec call_data; if (num_unmanage == 0 && num_manage == 0) - return; + return; /* specification doesn't state that library will check for NULL in list */ @@ -431,68 +448,71 @@ void XtChangeManagedSet( parent = XtParent(*childp); childp = unmanage_children; - for (i = (int) num_unmanage; --i >= 0 && XtParent(*childp) == parent; childp++); + for (i = (int) num_unmanage; --i >= 0 && XtParent(*childp) == parent; + childp++); call_out = (i >= 0); childp = manage_children; - for (i = (int) num_manage; --i >= 0 && XtParent(*childp) == parent; childp++); + for (i = (int) num_manage; --i >= 0 && XtParent(*childp) == parent; + childp++); if (call_out || i >= 0) { - XtAppWarningMsg(app, "ambiguousParent", XtNxtChangeManagedSet, - XtCXtToolkitError, "Not all children have same parent", - NULL, NULL); + XtAppWarningMsg(app, "ambiguousParent", XtNxtChangeManagedSet, + XtCXtToolkitError, "Not all children have same parent", + NULL, NULL); } - if (! XtIsComposite(parent)) { - UNLOCK_APP(app); - XtAppErrorMsg(app, "invalidParent", XtNxtChangeManagedSet, - XtCXtToolkitError, - "Attempt to manage a child when parent is not Composite", - NULL, NULL); + if (!XtIsComposite(parent)) { + UNLOCK_APP(app); + XtAppErrorMsg(app, "invalidParent", XtNxtChangeManagedSet, + XtCXtToolkitError, + "Attempt to manage a child when parent is not Composite", + NULL, NULL); } if (parent->core.being_destroyed) { - UNLOCK_APP(app); - return; + UNLOCK_APP(app); + return; } call_out = False; if (do_change_proc) { - CompositeClassExtension ext = (CompositeClassExtension) - XtGetClassExtension(parent->core.widget_class, - XtOffsetOf(CompositeClassRec, - composite_class.extension), - NULLQUARK, XtCompositeExtensionVersion, - sizeof(CompositeClassExtensionRec)); - if (!ext || !ext->allows_change_managed_set) - call_out = True; + CompositeClassExtension ext = (CompositeClassExtension) + XtGetClassExtension(parent->core.widget_class, + XtOffsetOf(CompositeClassRec, + composite_class.extension), + NULLQUARK, XtCompositeExtensionVersion, + sizeof(CompositeClassExtensionRec)); + + if (!ext || !ext->allows_change_managed_set) + call_out = True; } UnmanageChildren(unmanage_children, num_unmanage, parent, - &some_unmanaged, call_out, XtNxtChangeManagedSet); + &some_unmanaged, call_out, XtNxtChangeManagedSet); hookobj = XtHooksOfDisplay(XtDisplay(parent)); if (XtHasCallbacks(hookobj, XtNchangeHook) == XtCallbackHasSome) { - call_data.type = XtHunmanageSet; - call_data.widget = parent; - call_data.event_data = (XtPointer) unmanage_children; - call_data.num_event_data = num_unmanage; - XtCallCallbackList(hookobj, - ((HookObject)hookobj)->hooks.changehook_callbacks, - (XtPointer) &call_data); + call_data.type = XtHunmanageSet; + call_data.widget = parent; + call_data.event_data = (XtPointer) unmanage_children; + call_data.num_event_data = num_unmanage; + XtCallCallbackList(hookobj, + ((HookObject) hookobj)->hooks.changehook_callbacks, + (XtPointer) &call_data); } if (do_change_proc) - (*do_change_proc)(parent, unmanage_children, &num_unmanage, - manage_children, &num_manage, client_data); + (*do_change_proc) (parent, unmanage_children, &num_unmanage, + manage_children, &num_manage, client_data); call_out = (some_unmanaged && !call_out); ManageChildren(manage_children, num_manage, parent, call_out, - XtNxtChangeManagedSet); + XtNxtChangeManagedSet); if (XtHasCallbacks(hookobj, XtNchangeHook) == XtCallbackHasSome) { - call_data.type = XtHmanageSet; - call_data.event_data = (XtPointer) manage_children; - call_data.num_event_data = num_manage; - XtCallCallbackList(hookobj, - ((HookObject)hookobj)->hooks.changehook_callbacks, - (XtPointer) &call_data); + call_data.type = XtHmanageSet; + call_data.event_data = (XtPointer) manage_children; + call_data.num_event_data = num_manage; + XtCallCallbackList(hookobj, + ((HookObject) hookobj)->hooks.changehook_callbacks, + (XtPointer) &call_data); } UNLOCK_APP(app); -} /* XtChangeManagedSet */ +} /* XtChangeManagedSet */ |