159 lines
3.5 KiB
C
159 lines
3.5 KiB
C
|
/* $NetBSD: m_util.c,v 1.1.1.2 2008/05/18 14:31:29 aymeric Exp $ */
|
|||
|
|
|
|||
|
|
/*-
|
|||
|
|
* Copyright (c) 1996
|
|||
|
|
* Rob Zimmermann. All rights reserved.
|
|||
|
|
* Copyright (c) 1996
|
|||
|
|
* Keith Bostic. All rights reserved.
|
|||
|
|
*
|
|||
|
|
* See the LICENSE file for redistribution information.
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
#include "config.h"
|
|||
|
|
|
|||
|
|
#ifndef lint
|
|||
|
|
static const char sccsid[] = "Id: m_util.c,v 8.12 2003/11/05 17:10:00 skimo Exp (Berkeley) Date: 2003/11/05 17:10:00";
|
|||
|
|
#endif /* not lint */
|
|||
|
|
|
|||
|
|
#include <sys/types.h>
|
|||
|
|
#include <sys/queue.h>
|
|||
|
|
|
|||
|
|
#include <X11/Intrinsic.h>
|
|||
|
|
#include <X11/StringDefs.h>
|
|||
|
|
#include <X11/Shell.h>
|
|||
|
|
#include <X11/Xatom.h>
|
|||
|
|
|
|||
|
|
#include <bitstring.h>
|
|||
|
|
#include <stdio.h>
|
|||
|
|
#include <string.h>
|
|||
|
|
|
|||
|
|
#undef LOCK_SUCCESS
|
|||
|
|
#include "../common/common.h"
|
|||
|
|
#include "../ipc/ip.h"
|
|||
|
|
#include "m_motif.h"
|
|||
|
|
|
|||
|
|
|
|||
|
|
/* Widget hierarchy routines
|
|||
|
|
*
|
|||
|
|
* void XutShowWidgetTree( FILE *fp, Widget root, int indent )
|
|||
|
|
* prints the widgets and sub-widgets beneath the named root widget
|
|||
|
|
*/
|
|||
|
|
#ifdef DEBUG
|
|||
|
|
#if defined(__STDC__)
|
|||
|
|
void XutShowWidgetTree( FILE *fp, Widget root, int indent )
|
|||
|
|
#else
|
|||
|
|
void XutShowWidgetTree( fp, root, indent )
|
|||
|
|
FILE *fp;
|
|||
|
|
Widget root;
|
|||
|
|
int indent;
|
|||
|
|
#endif
|
|||
|
|
{
|
|||
|
|
#if ! defined(DECWINDOWS)
|
|||
|
|
WidgetList l, l2;
|
|||
|
|
int i, count = 0;
|
|||
|
|
|
|||
|
|
/* print where we are right now */
|
|||
|
|
fprintf( fp,
|
|||
|
|
"%*.*swidget => 0x%x name => \"%s\"\n\r",
|
|||
|
|
indent,
|
|||
|
|
indent,
|
|||
|
|
"",
|
|||
|
|
root,
|
|||
|
|
XtName(root) );
|
|||
|
|
|
|||
|
|
/* get the correct widget values */
|
|||
|
|
XtVaGetValues( root, XtNchildren, &l, 0 );
|
|||
|
|
XtVaGetValues( root, XtNchildren, &l2, 0 );
|
|||
|
|
XtVaGetValues( root, XtNnumChildren, &count, 0 );
|
|||
|
|
|
|||
|
|
/* print the sub-widgets */
|
|||
|
|
for ( i=0; i<count; i++ ) {
|
|||
|
|
XutShowWidgetTree( fp, l[i], indent+4 );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/* tidy up if this thing contained children */
|
|||
|
|
if ( count > 0 ) {
|
|||
|
|
/* we may or may not have to free the children */
|
|||
|
|
if ( l != l2 ) {
|
|||
|
|
XtFree( (char *) l );
|
|||
|
|
XtFree( (char *) l2 );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
#endif
|
|||
|
|
}
|
|||
|
|
#endif
|
|||
|
|
|
|||
|
|
|
|||
|
|
/* Utilities for converting X resources...
|
|||
|
|
*
|
|||
|
|
* __XutConvertResources( Widget, String root, XutResource *, int count )
|
|||
|
|
* The resource block is loaded with converted values
|
|||
|
|
* If the X resource does not exist, no change is made to the value
|
|||
|
|
* 'root' should be the application name.
|
|||
|
|
*
|
|||
|
|
* PUBLIC: void __XutConvertResources __P((Widget, String, XutResource *, int));
|
|||
|
|
*/
|
|||
|
|
void __XutConvertResources(Widget wid, String root, XutResource *resources, int count)
|
|||
|
|
{
|
|||
|
|
int i;
|
|||
|
|
XrmValue from, to;
|
|||
|
|
String kind;
|
|||
|
|
Boolean success = True;
|
|||
|
|
|
|||
|
|
/* for each resource */
|
|||
|
|
for (i=0; i<count; i++) {
|
|||
|
|
|
|||
|
|
/* is there a value in the database? */
|
|||
|
|
from.addr = XGetDefault( XtDisplay(wid), root, resources[i].name );
|
|||
|
|
if ( from.addr == NULL || *from.addr == '\0' )
|
|||
|
|
continue;
|
|||
|
|
|
|||
|
|
/* load common parameters */
|
|||
|
|
from.size = strlen( from.addr );
|
|||
|
|
to.addr = resources[i].value;
|
|||
|
|
|
|||
|
|
/* load type-specific parameters */
|
|||
|
|
switch ( resources[i].kind ) {
|
|||
|
|
case XutRKinteger:
|
|||
|
|
to.size = sizeof(int);
|
|||
|
|
kind = XtRInt;
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case XutRKboolean:
|
|||
|
|
/* String to Boolean */
|
|||
|
|
to.size = sizeof(Boolean);
|
|||
|
|
kind = XtRBoolean;
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case XutRKfont:
|
|||
|
|
/* String to Font structure */
|
|||
|
|
to.size = sizeof(XFontStruct *);
|
|||
|
|
kind = XtRFontStruct;
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case XutRKpixelBackup:
|
|||
|
|
/* String to Pixel backup algorithm */
|
|||
|
|
if ( success ) continue;
|
|||
|
|
/* FALL through */
|
|||
|
|
|
|||
|
|
case XutRKpixel:
|
|||
|
|
/* String to Pixel */
|
|||
|
|
to.size = sizeof(Pixel);
|
|||
|
|
kind = XtRPixel;
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
case XutRKcursor:
|
|||
|
|
/* String to Cursor */
|
|||
|
|
to.size = sizeof(int);
|
|||
|
|
kind = XtRCursor;
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
default:
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/* call the converter */
|
|||
|
|
success = XtConvertAndStore( wid, XtRString, &from, kind, &to );
|
|||
|
|
}
|
|||
|
|
}
|