indent'd like "x-indent.sh", but with a more complete set of typedefs - see

https://github.com/ThomasDickey/cindent-snapshots/blob/master/scripts/xxx-profile

Signed-off-by: Thomas E. Dickey <dickey@invisible-island.net>

1 files changed, 155 insertions, 135 deletions

diff --git a/src/VarGet.c b/src/VarGet.c
index 2736899..2a805d2 100644
--- a/src/VarGet.c
+++ b/src/VarGet.c
@@ -59,19 +59,19 @@ in this Software without prior written authorization from The Open Group.
 static String XtNxtGetTypedArg = "xtGetTypedArg";
 
 void
-XtVaGetSubresources(
-    Widget widget,
-    XtPointer base,
-    _Xconst char* name,
-    _Xconst char* class,
-    XtResourceList resources,
-    Cardinal num_resources,
-    ...)
+XtVaGetSubresources(Widget widget,
+                    XtPointer base,
+                    _Xconst char *name,
+                    _Xconst char *class,
+                    XtResourceList resources,
+                    Cardinal num_resources,
+                    ...)
 {
-    va_list                 var;
-    XtTypedArgList          args;
-    Cardinal                num_args;
-    int			    total_count, typed_count;
+    va_list var;
+    XtTypedArgList args;
+    Cardinal num_args;
+    int total_count, typed_count;
+
     WIDGET_TO_APPCON(widget);
 
     LOCK_APP(app);
@@ -84,224 +84,244 @@ XtVaGetSubresources(
     _XtVaToTypedArgList(var, total_count, &args, &num_args);
 
     _XtGetSubresources(widget, base, name, class, resources, num_resources,
-	NULL, 0, args, num_args);
+                       NULL, 0, args, num_args);
 
-    XtFree((XtPointer)args);
+    XtFree((XtPointer) args);
 
     va_end(var);
     UNLOCK_APP(app);
 }
 
-
 void
-XtVaGetApplicationResources(Widget widget, XtPointer base, XtResourceList resources, Cardinal num_resources, ...)
+XtVaGetApplicationResources(Widget widget,
+                            XtPointer base,
+                            XtResourceList resources,
+                            Cardinal num_resources,
+                            ...)
 {
-    va_list                 var;
-    XtTypedArgList          args;
-    Cardinal                num_args;
-    int			    total_count, typed_count;
+    va_list var;
+    XtTypedArgList args;
+    Cardinal num_args;
+    int total_count, typed_count;
+
     WIDGET_TO_APPCON(widget);
 
     LOCK_APP(app);
-    va_start(var,num_resources);
+    va_start(var, num_resources);
     _XtCountVaList(var, &total_count, &typed_count);
     va_end(var);
 
-    va_start(var,num_resources);
+    va_start(var, num_resources);
 
     _XtVaToTypedArgList(var, total_count, &args, &num_args);
 
     _XtGetApplicationResources(widget, base, resources, num_resources,
-	NULL, 0, args, num_args);
+                               NULL, 0, args, num_args);
 
-    XtFree((XtPointer)args);
+    XtFree((XtPointer) args);
 
     va_end(var);
     UNLOCK_APP(app);
 }
 
-
 static void
-GetTypedArg(
-    Widget              widget,
-    XtTypedArgList	typed_arg,
-    XtResourceList      resources,
-    Cardinal            num_resources)
+GetTypedArg(Widget widget,
+            XtTypedArgList typed_arg,
+            XtResourceList resources,
+            Cardinal num_resources)
 {
-    String              from_type = NULL;
-    Cardinal		from_size = 0;
-    XrmValue            from_val, to_val;
-    register Cardinal   i;
-    Arg			arg;
-    XtPointer		value;
+    String from_type = NULL;
+    Cardinal from_size = 0;
+    XrmValue from_val, to_val;
+    register Cardinal i;
+    Arg arg;
+    XtPointer value;
 
     /* note we presume that the XtResourceList to be un-compiled */
 
     for (i = 0; i < num_resources; i++) {
-        if (StringToName(typed_arg->name) == StringToName(resources[i].resource_name)) {
+        if (StringToName(typed_arg->name) ==
+            StringToName(resources[i].resource_name)) {
             from_type = resources[i].resource_type;
-	    from_size = resources[i].resource_size;
+            from_size = resources[i].resource_size;
             break;
         }
     }
 
     if (i == num_resources) {
-	XtAppWarningMsg(XtWidgetToApplicationContext(widget),
-            "unknownType", XtNxtGetTypedArg, XtCXtToolkitError,
-            "Unable to find type of resource for conversion",
-            NULL, NULL);
- 	return;
+        XtAppWarningMsg(XtWidgetToApplicationContext(widget),
+                        "unknownType", XtNxtGetTypedArg, XtCXtToolkitError,
+                        "Unable to find type of resource for conversion",
+                        NULL, NULL);
+        return;
     }
 
     value = ALLOCATE_LOCAL(from_size);
-    if (value == NULL) _XtAllocError(NULL);
+    if (value == NULL)
+        _XtAllocError(NULL);
     XtSetArg(arg, typed_arg->name, value);
     XtGetValues(widget, &arg, 1);
 
     from_val.size = from_size;
-    from_val.addr = (XPointer)value;
-    to_val.addr = (XPointer)typed_arg->value;
+    from_val.addr = (XPointer) value;
+    to_val.addr = (XPointer) typed_arg->value;
     to_val.size = (unsigned) typed_arg->size;
 
     if (!XtConvertAndStore(widget, from_type, &from_val,
-			   typed_arg->type, &to_val)) {
-	if (to_val.size > (unsigned) typed_arg->size) {
-	    String params[2];
-	    Cardinal num_params = 2;
-	    params[0] = typed_arg->type;
-	    params[1] = XtName(widget);
-	    XtAppWarningMsg(XtWidgetToApplicationContext(widget),
-		"insufficientSpace", XtNxtGetTypedArg, XtCXtToolkitError,
-		"Insufficient space for converted type '%s' in widget '%s'",
-		params, &num_params);
-	}
-	else {
-	    String params[3];
-	    Cardinal num_params = 3;
-	    params[0] = from_type;
-	    params[1] = typed_arg->type;
-	    params[2] = XtName(widget);
-	    XtAppWarningMsg(XtWidgetToApplicationContext(widget),
-		"conversionFailed", XtNxtGetTypedArg, XtCXtToolkitError,
-		"Type conversion (%s to %s) failed for widget '%s'",
-		params, &num_params);
-	}
+                           typed_arg->type, &to_val)) {
+        if (to_val.size > (unsigned) typed_arg->size) {
+            String params[2];
+            Cardinal num_params = 2;
+
+            params[0] = typed_arg->type;
+            params[1] = XtName(widget);
+            XtAppWarningMsg(XtWidgetToApplicationContext(widget),
+                            "insufficientSpace", XtNxtGetTypedArg,
+                            XtCXtToolkitError,
+                            "Insufficient space for converted type '%s' in widget '%s'",
+                            params, &num_params);
+        }
+        else {
+            String params[3];
+            Cardinal num_params = 3;
+
+            params[0] = from_type;
+            params[1] = typed_arg->type;
+            params[2] = XtName(widget);
+            XtAppWarningMsg(XtWidgetToApplicationContext(widget),
+                            "conversionFailed", XtNxtGetTypedArg,
+                            XtCXtToolkitError,
+                            "Type conversion (%s to %s) failed for widget '%s'",
+                            params, &num_params);
+        }
     }
     DEALLOCATE_LOCAL(value);
 }
 
 static int
-GetNestedArg(
-    Widget              widget,
-    XtTypedArgList	avlist,
-    ArgList             args,
-    XtResourceList      resources,
-    Cardinal            num_resources)
+GetNestedArg(Widget widget,
+             XtTypedArgList avlist,
+             ArgList args,
+             XtResourceList resources,
+             Cardinal num_resources)
 {
-    int         count = 0;
+    int count = 0;
 
     for (; avlist->name != NULL; avlist++) {
         if (avlist->type != NULL) {
-	    GetTypedArg(widget, avlist, resources, num_resources);
-        } else if(strcmp(avlist->name, XtVaNestedList) == 0) {
-            count += GetNestedArg(widget, (XtTypedArgList)avlist->value,
-				     args, resources, num_resources);
-        } else {
-            (args+count)->name = avlist->name;
-            (args+count)->value = avlist->value;
+            GetTypedArg(widget, avlist, resources, num_resources);
+        }
+        else if (strcmp(avlist->name, XtVaNestedList) == 0) {
+            count += GetNestedArg(widget, (XtTypedArgList) avlist->value,
+                                  args, resources, num_resources);
+        }
+        else {
+            (args + count)->name = avlist->name;
+            (args + count)->value = avlist->value;
             ++count;
         }
     }
 
-    return(count);
+    return (count);
 }
 
 void
 XtVaGetValues(Widget widget, ...)
 {
-    va_list		var;
-    String      	attr;
-    ArgList    		args;
-    XtTypedArg		typed_arg;
-    XtResourceList      resources = (XtResourceList)NULL;
-    Cardinal            num_resources;
-    int			count, total_count, typed_count;
+    va_list var;
+    String attr;
+    ArgList args;
+    XtTypedArg typed_arg;
+    XtResourceList resources = (XtResourceList) NULL;
+    Cardinal num_resources;
+    int count, total_count, typed_count;
+
     WIDGET_TO_APPCON(widget);
 
     LOCK_APP(app);
-    va_start(var,widget);
+    va_start(var, widget);
 
     _XtCountVaList(var, &total_count, &typed_count);
 
     if (total_count != typed_count) {
-	size_t limit = (size_t)(total_count - typed_count);
-        args = (ArgList)__XtMalloc((unsigned)(limit * sizeof(Arg)));
+        size_t limit = (size_t) (total_count - typed_count);
+
+        args = (ArgList) __XtMalloc((unsigned) (limit * sizeof(Arg)));
     }
-    else args = NULL;		/* for lint; really unused */
+    else
+        args = NULL;            /* for lint; really unused */
     va_end(var);
 
     if (args != NULL) {
-	va_start(var,widget);
-	for(attr = va_arg(var, String), count = 0 ; attr != NULL;
-			    attr = va_arg(var, String)) {
-	    if (strcmp(attr, XtVaTypedArg) == 0) {
-		typed_arg.name = va_arg(var, String);
-		typed_arg.type = va_arg(var, String);
-		typed_arg.value = va_arg(var, XtArgVal);
-		typed_arg.size = va_arg(var, int);
-
-		if (resources == NULL) {
-		    XtGetResourceList(XtClass(widget), &resources,&num_resources);
-		}
-
-		GetTypedArg(widget, &typed_arg, resources, num_resources);
-	    } else if (strcmp(attr, XtVaNestedList) == 0) {
-		if (resources == NULL) {
-		    XtGetResourceList(XtClass(widget),&resources, &num_resources);
-		}
-
-		count += GetNestedArg(widget, va_arg(var, XtTypedArgList),
-					 (args+count), resources, num_resources);
-	    } else {
-		args[count].name = attr;
-		args[count].value = va_arg(var, XtArgVal);
-		count ++;
-	    }
-	}
-	va_end(var);
+        va_start(var, widget);
+        for (attr = va_arg(var, String), count = 0; attr != NULL;
+             attr = va_arg(var, String)) {
+            if (strcmp(attr, XtVaTypedArg) == 0) {
+                typed_arg.name = va_arg(var, String);
+                typed_arg.type = va_arg(var, String);
+                typed_arg.value = va_arg(var, XtArgVal);
+                typed_arg.size = va_arg(var, int);
+
+                if (resources == NULL) {
+                    XtGetResourceList(XtClass(widget), &resources,
+                                      &num_resources);
+                }
+
+                GetTypedArg(widget, &typed_arg, resources, num_resources);
+            }
+            else if (strcmp(attr, XtVaNestedList) == 0) {
+                if (resources == NULL) {
+                    XtGetResourceList(XtClass(widget), &resources,
+                                      &num_resources);
+                }
+
+                count += GetNestedArg(widget, va_arg(var, XtTypedArgList),
+                                      (args + count), resources, num_resources);
+            }
+            else {
+                args[count].name = attr;
+                args[count].value = va_arg(var, XtArgVal);
+                count++;
+            }
+        }
+        va_end(var);
     }
 
-    XtFree((XtPointer)resources);
+    XtFree((XtPointer) resources);
 
     if (args != NULL) {
-	XtGetValues(widget, args, (Cardinal) count);
-	XtFree((XtPointer)args);
+        XtGetValues(widget, args, (Cardinal) count);
+        XtFree((XtPointer) args);
     }
     UNLOCK_APP(app);
 }
 
 void
-XtVaGetSubvalues(XtPointer base,XtResourceList  resources, Cardinal num_resources, ...)
+XtVaGetSubvalues(XtPointer base,
+                 XtResourceList resources,
+                 Cardinal num_resources,
+                 ...)
 {
-    va_list	var;
-    ArgList    	args;
-    Cardinal   	num_args;
-    int		total_count, typed_count;
+    va_list var;
+    ArgList args;
+    Cardinal num_args;
+    int total_count, typed_count;
 
-    va_start(var,num_resources);
+    va_start(var, num_resources);
 
     _XtCountVaList(var, &total_count, &typed_count);
 
     if (typed_count != 0) {
-	XtWarning("XtVaTypedArg is an invalid argument to XtVaGetSubvalues()\n");
+        XtWarning
+            ("XtVaTypedArg is an invalid argument to XtVaGetSubvalues()\n");
     }
     va_end(var);
 
-    va_start(var,num_resources);
-    _XtVaToArgList((Widget)NULL, var, total_count, &args, &num_args);
+    va_start(var, num_resources);
+    _XtVaToArgList((Widget) NULL, var, total_count, &args, &num_args);
     va_end(var);
 
     XtGetSubvalues(base, resources, num_resources, args, num_args);
 
-    XtFree((XtPointer)args);
+    XtFree((XtPointer) args);
 }