Home | History | Annotate | Line # | Download | only in motif 
      1 /*-
      2  * Copyright (c) 1996
      3  *	Rob Zimmermann.  All rights reserved.
      4  * Copyright (c) 1996
      5  *	Keith Bostic.  All rights reserved.
      6  *
      7  * See the LICENSE file for redistribution information.
      8  */
      9 
     10 #include "config.h"
     11 
     12 #include <sys/cdefs.h>
     13 #if 0
     14 #ifndef lint
     15 static const char sccsid[] = "Id: m_cde.c,v 8.11 2003/11/05 17:09:58 skimo Exp  (Berkeley) Date: 2003/11/05 17:09:58 ";
     16 #endif /* not lint */
     17 #else
     18 __RCSID("$NetBSD: m_cde.c,v 1.3 2014/01/26 21:43:45 christos Exp $");
     19 #endif
     20 
     21 #include <sys/types.h>
     22 #include <sys/queue.h>
     23 
     24 #include <X11/X.h>
     25 #include <X11/Xlib.h>
     26 #include <X11/Xatom.h>
     27 
     28 #include <bitstring.h>
     29 #include <stdio.h>
     30 
     31 #undef LOCK_SUCCESS
     32 #include "../common/common.h"
     33 #include "motif_extern.h"
     34 
     35 #if SelfTest
     36 #define	_TRACE( x )	printf x
     37 #else
     38 #define	_TRACE( x )
     39 #endif
     40 
     41 #define	Required	10
     42 #define	Useful		3
     43 #define	Present		(Required+Useful)
     44 
     45 static struct {
     46     char	*name;
     47     int		value;
     48 } Atoms[] = {
     49     { "_VUE_SM_WINDOW_INFO",	Required,	/* "vue" */		},
     50     { "_DT_SM_WINDOW_INFO",	Required,	/* "dtwm" */		},
     51     { "_SUN_WM_PROTOCOLS",	Useful,		/* "olwm" */		},
     52     { "_MOTIF_WM_INFO",		Useful,		/* "mwm/dtwm" */	},
     53 };
     54 
     55 /*
     56  * is_cde --
     57  *
     58  * When running under CDE (or VUE on HPUX) applications should not define
     59  * fallback colors (or fonts).  The only way to tell is to check the atoms
     60  * attached to the server.  This routine does that.
     61  *
     62  * PUBLIC: int is_cde __P((Display *));
     63  */
     64 int
     65 is_cde(Display *d)
     66 {
     67     int			i, r, format;
     68     unsigned long	nitems, remaining;
     69     unsigned char	*prop;
     70     Window		root = DefaultRootWindow( d );
     71     Atom		atom, type;
     72     int			retval = 0;
     73 
     74     _TRACE( ( "Root window is 0x%x\n", root ) );
     75 
     76     /* create our atoms */
     77     for (i=0; i< (sizeof(Atoms)/sizeof(Atoms[0])); i++ ) {
     78 
     79 	atom = XInternAtom( d, Atoms[i].name, True );
     80 	if ( atom == None ) {
     81 	    _TRACE( ( "Atom \"%s\" does not exist\n", Atoms[i].name ) );
     82 	    continue;
     83 	}
     84 
     85 	/* what is the value of the atom? */
     86 	r = XGetWindowProperty( d,
     87 				root,
     88 				atom,
     89 				0,
     90 				1024,
     91 				False,			/* do not delete */
     92 				AnyPropertyType,	/* request type */
     93 				&type,			/* actual type */
     94 				&format,		/* byte size */
     95 				&nitems,		/* number of items */
     96 				&remaining,		/* anything left over? */
     97 				&prop			/* the data itself */
     98 				);
     99 	if ( r != Success ) {
    100 	    _TRACE( ( "Atom \"%s\" cannot be converted to string\n", Atoms[i].name ) );
    101 	    continue;
    102 	}
    103 
    104 	retval += Atoms[i].value;
    105 
    106 
    107 #if SelfTest
    108 	_TRACE( ( "Atom \"%s\"\n", Atoms[i].name ) );
    109 
    110 	switch ( type ) {
    111 	    case 0:
    112 		_TRACE( ( "\t does not exist on the root window\n", Atoms[i].name ) );
    113 
    114 	    case XA_ATOM:
    115 		for (j=0; j<nitems; j++) {
    116 		    name = XGetAtomName( d, ((Atom *) prop)[j] );
    117 		    _TRACE( ( "\t[%d] = \"%s\"\n", j, name ) );
    118 		    XFree( name );
    119 		}
    120 		break;
    121 
    122 	    case XA_STRING:
    123 		_TRACE( ( "\t is a string\n", Atoms[i].name ) );
    124 		break;
    125 
    126 	    default:
    127 		_TRACE( ( "\tunknown type %s\n", XGetAtomName( d, type ) ) );
    128 		break;
    129 	}
    130 #endif
    131 
    132 	/* done */
    133 	XFree( (caddr_t) prop );
    134 
    135     }
    136 
    137     _TRACE( ( "retval = %d\n", retval ) );
    138     return retval >= Present;
    139 }
    140 
    141 #if SelfTest
    142 
    143 main () {
    144     Display *d = XOpenDisplay( 0 );
    145 
    146     if ( d == 0 )
    147 	printf ( "Could not open display\n" );
    148     else {
    149 	printf ( "_vi_is_cde() == %d\n", _vi_is_cde( d ) );
    150 	XCloseDisplay( d );
    151     }
    152 }
    153 #endif
    154