/* $XConsortium: IsMwmRun.c /main/7 1996/05/21 12:02:11 pascale $ */
/*
* Motif
*
* Copyright (c) 1987-2012, The Open Group. All rights reserved.
*
* These libraries and programs are free software; you can
* redistribute them and/or modify them under the terms of the GNU
* Lesser General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* These libraries and programs are distributed in the hope that
* they will be useful, but WITHOUT ANY WARRANTY; without even the
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU Lesser General Public License for more
* details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with these librararies and programs; if not, write
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
* Floor, Boston, MA 02110-1301 USA
*
*/
/*
* HISTORY
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <Xm/XmP.h>
#include <Xm/MwmUtil.h>
#include "XmI.h"
/************************************************************************
*
* XmIsMotifWMRunning
*
************************************************************************/
Boolean
XmIsMotifWMRunning(
Widget shell )
{
Atom motif_wm_info_atom;
Atom actual_type;
int actual_format;
unsigned long num_items, bytes_after;
PropMotifWmInfo *prop = 0;
Window root = RootWindowOfScreen(XtScreen(shell));
_XmWidgetToAppContext(shell);
_XmAppLock(app);
motif_wm_info_atom = XInternAtom(XtDisplay(shell),
_XA_MOTIF_WM_INFO,
FALSE);
_XmProcessLock();
XGetWindowProperty (XtDisplay(shell),
root,
motif_wm_info_atom,
0, (long)PROP_MOTIF_WM_INFO_ELEMENTS,
FALSE, motif_wm_info_atom,
&actual_type, &actual_format,
&num_items, &bytes_after,
(unsigned char **) &prop);
_XmProcessUnlock();
if ((actual_type != motif_wm_info_atom) ||
(actual_format != 32) ||
(num_items < PROP_MOTIF_WM_INFO_ELEMENTS))
{
if (prop != 0) XFree((char *)prop);
_XmAppUnlock(app);
return (FALSE);
}
else
{
Window wm_window = (Window) prop->wmWindow;
Window top, parent, *children;
unsigned int num_children;
Boolean returnVal;
Cardinal i;
if (XQueryTree(XtDisplay(shell),
root, &top, &parent,
&children, &num_children))
{
i = 0;
while ((i < num_children) && (children[i] != wm_window))
i++;
returnVal = (i == num_children) ? FALSE : TRUE;
}
else
returnVal = FALSE;
if (prop) XFree((char *)prop);
if (children) XFree((char *)children);
_XmAppUnlock(app);
return (returnVal);
}
}