/* 

 * 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

#ifdef REV_INFO

#ifndef lint

static char rcsid[] = "$TOG: VendorS.c /main/21 1999/08/09 10:49:41 mgreess $"

#endif

#endif

/* (c) Copyright 1987, 1988, 1989, 1990, 1991, 1992 HEWLETT-PACKARD COMPANY */

/* (c) Copyright 1987, 1988, DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS. */

/* (c) Copyright 1988 MASSACHUSETTS INSTITUTE OF TECHNOLOGY */

/* Make sure all wm properties can make it out of the resource manager */

#include <stdio.h>

#include <Xm/AccColorT.h>

#include <Xm/AtomMgr.h>

#include <Xm/DisplayP.h>

#include <Xm/LayoutT.h>

#include <Xm/MenuShell.h>

#include <Xm/ProtocolsP.h>

#include <Xm/ScreenP.h>

#include <Xm/SpecRenderT.h>

#include <Xm/TraitP.h>

#include <Xm/UnitTypeT.h>

#include <Xm/VendorSEP.h>

#include <Xm/VendorSP.h>

#include <Xm/XmosP.h>		/* for bzero */

#include <Xm/ToolTipCT.h>

#include "BaseClassI.h"

#include "CallbackI.h"

#include "ExtObjectI.h"

#include "MenuShellI.h"

#include "MessagesI.h"

#include "PixConvI.h"

#include "ProtocolsI.h"

#include "ResConverI.h"

#include "SyntheticI.h"

#include "TraitI.h"

#include "TravActI.h"

#include "TraversalI.h"

#include "XmImI.h"

#include "VendorSI.h"

#include "EditresComI.h"

#include "XmI.h"

#ifndef NO_MESSAGE_CATALOG

#if !defined(NL_CAT_LOCALE)

#define NL_CAT_LOCALE	0

#endif

#endif

/* #define DEBUG_GRABS */

#define MSG1	_XmMMsgVendor_0000

#define MSG2	_XmMMsgVendor_0001

#define MSG3	_XmMMsgVendor_0002

#define MSG4	_XmMMsgVendor_0003

#define DONT_CARE -1

typedef struct {   

    XmVendorShellExtObject ve ;

    Widget shell ;

    } XmDestroyGrabRec, *XmDestroyGrabList ;

/********    Static Function Declarations    ********/

static XtPointer BaseProc( 

                        Widget widget,

                        XtPointer client_data) ;

static Cardinal GetSecResData( 

                        WidgetClass w_class,

                        XmSecondaryResourceData **secResDataRtn) ;

static void ClassInitialize( void ) ;

static void ClassPartInitialize( 

                        WidgetClass wc) ;

static void SetMwmStuff( 

                        XmVendorShellExtObject ove,

                        XmVendorShellExtObject nve) ;

static void AddGrab( 

                        XmVendorShellExtObject ve,

                        Widget shell,

#if NeedWidePrototypes

                        int exclusive,

                        int springLoaded,

#else

                        Boolean exclusive,

                        Boolean springLoaded,

#endif /* NeedWidePrototypes */

                        XmVendorShellExtObject origKid) ;

static void RemoveGrab( 

                        XmVendorShellExtObject ve,

#if NeedWidePrototypes

                        int being_destroyed,

#else

                        Boolean being_destroyed,

#endif /* NeedWidePrototypes */

                        Widget shell) ;

static void RemoveGrabCallback( 

                        Widget w,

                        XtPointer client_data,

                        XtPointer call_data) ;

static void AddToGrabList( 

                        Widget parent,

                        Widget excludedKid,

                        Widget origKid) ;

static void AddCousinsToGrabList( 

                        Widget parent,

                        Widget excludedKid,

                        Widget origKid) ;

static Boolean IsPopupShell( 

                        Widget shell) ;

static void PopupCallback( 

                        Widget shellParent,

                        XtPointer closure,

                        XtPointer callData) ;

static void PopdownCallback( 

                        Widget shellParent,

                        XtPointer closure,

                        XtPointer callData) ;

static Widget GetNextShell( 

                        Widget vw) ;

static XmDesktopObject GetShellDesktopParent( 

                        VendorShellWidget vw,

                        ArgList args,

                        Cardinal *num_args) ;

static void SecondaryObjectCreate( 

                        Widget req,

                        Widget new_w,

                        ArgList args,

                        Cardinal *num_args) ;

static void InitializePrehook( 

                        Widget req,

                        Widget new_w,

                        ArgList args,

                        Cardinal *num_args) ;

static void VendorExtInitialize( 

                        Widget req,

                        Widget new_w,

                        ArgList args,

                        Cardinal *num_args) ;

static void MotifWarningHandler (

                        String name,

                        String type, 

                        String s_class, 

                        String message,

                        String * params,

                        Cardinal* num_params);

static void Initialize( 

                        Widget req,

                        Widget new_w,

                        ArgList args,

                        Cardinal *num_args) ;

static void InitializePosthook( 

                        Widget req,

                        Widget new_w,

                        ArgList args,

                        Cardinal *num_args) ;

static Boolean SetValuesPrehook( 

                        Widget old,

                        Widget ref,

                        Widget new_w,

                        ArgList args,

                        Cardinal *num_args) ;

static Boolean VendorExtSetValues( 

                        Widget old,

                        Widget ref,

                        Widget new_w,

                        ArgList args,

                        Cardinal *num_args) ;

static Boolean SetValues( 

                        Widget current,

                        Widget req,

                        Widget new_w,

                        ArgList args,

                        Cardinal *num_args) ;

static Boolean SetValuesPosthook( 

                        Widget current,

                        Widget req,

                        Widget new_w,

                        ArgList args,

                        Cardinal *num_args) ;

static void GetValuesPrehook( 

                        Widget w,

                        ArgList args,

                        Cardinal *num_args) ;

static void GetValuesHook( 

                        Widget w,

                        ArgList args,

                        Cardinal *num_args) ;

static void GetValuesPosthook( 

                        Widget w,

                        ArgList args,

                        Cardinal *num_args) ;

static void PendingTransientDestroyed( 

                        Widget vw,

                        XtPointer cl_data,

                        XtPointer ca_data) ;

static void SetTransientFor( 

                        Widget w,

                        XtPointer closure,

                        XtPointer call_data) ;

static void Resize( 

                        Widget w) ;

static void ChangeManaged( 

                        Widget wid) ;

static void UpdateCoreGeometry( 

                        VendorShellWidget vw,

                        XmVendorShellExtObject vendorExt) ;

static void Realize( 

                        Widget wid,

                        XtValueMask *vmask,

                        XSetWindowAttributes *attr) ;

static XtGeometryResult GeometryManager( 

                        Widget wid,

                        XtWidgetGeometry *request,

                        XtWidgetGeometry *reply) ;

static XtGeometryResult RootGeometryManager( 

                        Widget wid,

                        XtWidgetGeometry *request,

                        XtWidgetGeometry *reply) ;

static void SetMwmHints( 

                        XmVendorShellExtObject ve) ;

static void SetMwmMenu( 

                        XmVendorShellExtObject ve) ;

static void VendorExtRealize( 

                        Widget w,

                        XtPointer closure,

                        XtPointer call_data) ;

static void AddDLEntry( 

                        XmVendorShellExtObject ve,

                        Widget shell) ;

static void RemoveDLEntry( 

                        unsigned pos) ;

static void Destroy( 

                        Widget wid) ;

static void Redisplay( 

                        Widget wid,

                        XEvent *event,

                        Region region) ;

static XmFontList GetTable(Widget wid,

			   XtEnum type);

static XmDirection GetDirection(Widget);

static void GetColors(Widget widget, 

		      XmAccessColorData color_data);

static unsigned char GetUnitType(Widget);

/********    End Static Function Declarations    ********/

#ifdef DEBUG_GRABS

static void PrintModal(

                        XmModalData modal) ;

static void PrintXmGrabs(

                        Widget wid) ;

#endif /* DEBUG_GRABS */

char _XmVersionString[] = XmVERSION_STRING ;

static XmDestroyGrabList destroy_list ;

static unsigned short destroy_list_size ;

static unsigned short destroy_list_cnt ;

static Display * _XmDisplayHandle = NULL ;

static XtErrorMsgHandler previousWarningHandler = NULL;

/***************************************************************************

 *

 * Vendor shell class record

 *

 ***************************************************************************/

#define Offset(field) (XtOffsetOf(WMShellRec, field))

static int default_unspecified_shell_int = XtUnspecifiedShellInt;

/*

 * Warning, casting XtUnspecifiedShellInt (which is -1) to an (XtPointer)

 * can result is loss of bits on some machines (i.e. crays)

 */

static XtResource resources[] =

{

    {

	XmNx, XmCPosition, XmRHorizontalPosition, sizeof(Position),

	XtOffsetOf(WidgetRec, core.x), XmRImmediate, (XtPointer) 0,

    },

    {

	XmNy, XmCPosition, XmRVerticalPosition, sizeof(Position),

	XtOffsetOf(WidgetRec, core.y), XmRImmediate, (XtPointer) 0,

    },

    {

	XmNwidth, XmCDimension, XmRHorizontalDimension, sizeof(Dimension),

	XtOffsetOf(WidgetRec, core.width), XmRImmediate, (XtPointer) 0,

    },

    {

	XmNheight, XmCDimension, XmRVerticalDimension, sizeof(Dimension),

	XtOffsetOf(WidgetRec, core.height), XmRImmediate, (XtPointer) 0,

    },

    {

	XmNborderWidth, XmCBorderWidth, XmRHorizontalDimension, 

	sizeof(Dimension),

	XtOffsetOf(WidgetRec, core.border_width), XmRImmediate, (XtPointer) 0,

    },

    /* size_hints minus things stored in core */

    { XmNbaseWidth, XmCBaseWidth, XmRHorizontalInt, sizeof(int),

	Offset(wm.base_width),

	XmRHorizontalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNbaseHeight, XmCBaseHeight, XmRVerticalInt, sizeof(int),

	Offset(wm.base_height),

	XmRVerticalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNminWidth, XmCMinWidth, XmRHorizontalInt, sizeof(int),

	Offset(wm.size_hints.min_width),

	XmRHorizontalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNminHeight, XmCMinHeight, XmRVerticalInt, sizeof(int),

	Offset(wm.size_hints.min_height),

	XmRVerticalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNmaxWidth, XmCMaxWidth, XmRHorizontalInt, sizeof(int),

	Offset(wm.size_hints.max_width),

	XmRHorizontalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNmaxHeight, XmCMaxHeight, XmRVerticalInt, sizeof(int),

	Offset(wm.size_hints.max_height),

	XmRVerticalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNwidthInc, XmCWidthInc, XmRHorizontalInt, sizeof(int),

	Offset(wm.size_hints.width_inc),

	XmRHorizontalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNheightInc, XmCHeightInc, XmRVerticalInt, sizeof(int),

	Offset(wm.size_hints.height_inc),

	XmRVerticalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNminAspectX, XmCMinAspectX, XmRHorizontalInt, sizeof(int),

	Offset(wm.size_hints.min_aspect.x),

	XmRHorizontalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNminAspectY, XmCMinAspectY, XmRVerticalInt, sizeof(int),

	Offset(wm.size_hints.min_aspect.y),

	XmRVerticalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNmaxAspectX, XmCMaxAspectX, XmRHorizontalInt, sizeof(int),

	Offset(wm.size_hints.max_aspect.x),

	XmRHorizontalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNmaxAspectY, XmCMaxAspectY, XmRVerticalInt, sizeof(int),

	Offset(wm.size_hints.max_aspect.y),

	XmRVerticalInt, (XtPointer) &default_unspecified_shell_int},

    /* wm_hints */

    { XmNiconPixmap, XmCIconPixmap, XmRDynamicPixmap, sizeof(Pixmap),

	Offset(wm.wm_hints.icon_pixmap), XmRPixmap, NULL},

    { XmNiconX, XmCIconX, XmRHorizontalInt, sizeof(int),

	Offset(wm.wm_hints.icon_x),

	XmRHorizontalInt, (XtPointer) &default_unspecified_shell_int},

    { XmNiconY, XmCIconY, XmRVerticalInt, sizeof(int),

	Offset(wm.wm_hints.icon_y),

	XmRVerticalInt, (XtPointer) &default_unspecified_shell_int},

    { /* override dec default */

	XmNinput, XmCInput, XmRBool, 

	sizeof(Bool), Offset(wm.wm_hints.input), 

	XmRImmediate, (XtPointer) TRUE,

    },

    { /* override incorrect default in Shell.c */

	XmNwindowGroup, XmCWindowGroup, XmRWindow, sizeof(Window),

	Offset(wm.wm_hints.window_group),

	XmRImmediate, (XtPointer)XtUnspecifiedWindowGroup,

    },

   {  /* default visual dynamically, see _XmDefaultVisualResources */    

       XtNvisual, XtCVisual, 

       XtRVisual, sizeof(Visual*),

       XtOffsetOf(ShellRec, shell.visual), 

       XtRImmediate, (XtPointer)INVALID_VISUAL

   },

};	

#undef Offset

static XtResource subresources[] =

{

    {

        XmNtoolTipPostDelay, XmCToolTipPostDelay, XmRInt,

        sizeof(unsigned int), XtOffsetOf(XmToolTipConfigTraitRec, post_delay),

        XmRImmediate, (XtPointer) 5000,

    },

    {

        XmNtoolTipPostDuration, XmCToolTipPostDuration, XmRInt,

        sizeof(unsigned int), XtOffsetOf(XmToolTipConfigTraitRec, post_duration),

        XmRImmediate, (XtPointer) 5000,

    },

    {

        XmNtoolTipEnable, XmCToolTipEnable, XmRBoolean,

        sizeof(Boolean), XtOffsetOf(XmToolTipConfigTraitRec, enable),

        XmRImmediate, (XtPointer) False,

    },

};

static CompositeClassExtensionRec compositeClassExtRec = {

    NULL,

    NULLQUARK,

    XtCompositeExtensionVersion,

    sizeof(CompositeClassExtensionRec),

    TRUE,

};

static ShellClassExtensionRec shellClassExtRec = {

    NULL,

    NULLQUARK,

    XtShellExtensionVersion,

    sizeof(ShellClassExtensionRec),

    RootGeometryManager,

};

static XmBaseClassExtRec baseClassExtRec = {

    NULL,

    NULLQUARK,

    XmBaseClassExtVersion,

    sizeof(XmBaseClassExtRec),

    InitializePrehook,				/* init prehook		*/

    SetValuesPrehook,				/* setval prehook	*/

    InitializePosthook,				/* init posthook	*/

    SetValuesPosthook,				/* setval posthook	*/

    (WidgetClass)&xmVendorShellExtClassRec,	/* secondary class	*/

    SecondaryObjectCreate,	        /* secondary create	*/

    GetSecResData,		                /* getSecRes data       */

    {0},					/* class flags		*/

    GetValuesPrehook,				/* get_values_prehook	*/

    GetValuesPosthook,				/* get_values_posthook  */

};

externaldef(vendorshellclassrec)

VendorShellClassRec vendorShellClassRec = {

    {	

	(WidgetClass) &wmShellClassRec, /* superclass 		*/   

	"VendorShell", 			/* class_name 		*/   

	sizeof(VendorShellRec), 	/* size 		*/   

	ClassInitialize, 		/* Class Initializer 	*/   

	ClassPartInitialize, 		/* class_part_init 	*/ 

	FALSE, 				/* Class init'ed ? 	*/   

	Initialize, 			/* initialize         	*/   

	NULL, 				/* initialize_hook	*/ 

	Realize, 			/* realize            	*/   

	NULL,	 			/* actions            	*/   

	0,				/* num_actions        	*/   

	resources, 			/* resources          	*/   

	XtNumber(resources), 		/* resource_count     	*/   

	NULLQUARK, 			/* xrm_class          	*/   

	FALSE, 				/* compress_motion    	*/   

	XtExposeCompressSeries, 	/* compress_exposure  	*/   

	FALSE, 				/* compress_enterleave	*/   

	FALSE, 				/* visible_interest   	*/   

	Destroy,			/* destroy            	*/   

	Resize,		 		/* resize             	*/   

	NULL,				/* expose             	*/   

	SetValues,	 		/* set_values         	*/   

	NULL, 				/* set_values_hook      */ 

	XtInheritSetValuesAlmost, 	/* set_values_almost    */ 

	GetValuesHook,			/* get_values_hook      */ 

	NULL, 				/* accept_focus       	*/   

	XtVersion, 			/* intrinsics version 	*/   

	NULL, 				/* callback offsets   	*/   

	NULL,				/* tm_table           	*/   

	NULL, 				/* query_geometry       */ 

	NULL, 				/* display_accelerator  */ 

	(XtPointer)&baseClassExtRec,	/* extension		*/ 

    },	

    { 					/* composite_class	*/

	GeometryManager,		/* geometry_manager 	*/   

	ChangeManaged,		 	/* change_managed 	*/   

	XtInheritInsertChild, 		/* insert_child 	*/   

	XtInheritDeleteChild, 		/* delete_child 	*/   

	(XtPointer)&compositeClassExtRec,/* extension            */ 

    },                           

    {                            	/* shell class		*/

	(XtPointer)&shellClassExtRec,	/* extension 		*/ 

    }, 

    {                            	/* wmshell class	*/

	NULL, 				/* extension            */ 

    }, 	

    {   				/* vendorshell class	*/

	NULL, 				/* extension            */ 

    }                            

};	   

externaldef(vendorshellwidgetclass) WidgetClass 

  vendorShellWidgetClass = (WidgetClass) (&vendorShellClassRec);

/* Trait record for VendorS specify render table */

static XmConst XmSpecRenderTraitRec vsSRT = {

  0,		/* version */

  GetTable,

};

/* Trait record for VendorS specify layout direction  */

static XmConst XmSpecifyLayoutDirectionTraitRec vsLDT = {

  0,			/* version */

  GetDirection

};

/* Access Colors Trait record for vendor shell */

static XmConst XmAccessColorsTraitRec vsACT = {

  0,			/* version */

  GetColors

};

/* Unit Type Trait record for VendorShell */

static XmConst XmSpecUnitTypeTraitRec vsUTT = {

  0,			/* version */

  GetUnitType

};

/************************************************************************

 *

 *  BaseProc

 *    This function can be used to check if the widget has actually

 *    been initialize (vs in the process of creation, like a conversion)

 *

 ************************************************************************/

/*ARGSUSED*/

static XtPointer 

BaseProc(

        Widget widget,

        XtPointer client_data )	/* unused */

{   

   XmWidgetExtData	extData;

   Widget		secObj = NULL;

   _XmWidgetToAppContext(widget);

   _XmAppLock(app);

    if ((extData = _XmGetWidgetExtData(widget, XmSHELL_EXTENSION)))

    {

	secObj = extData->widget;

    }

    _XmAppUnlock(app);

    return secObj;

}

/************************************************************************

 *

 *  GetSecResData

 *

 ************************************************************************/

static Cardinal 

GetSecResData(

        WidgetClass w_class,

        XmSecondaryResourceData **secResDataRtn )

{

    XmBaseClassExt	*bcePtr;

    int arrayCount = 0;

    String  resource_class, resource_name;

    XtPointer  client_data;

    _XmProcessLock();

    if ((bcePtr = _XmGetBaseClassExtPtr(w_class, XmQmotif)) &&

	(bcePtr) && (*bcePtr) &&

	((*bcePtr)->secondaryObjectClass))

    {

      client_data = NULL;

      resource_class = NULL;

      resource_name = NULL;

      arrayCount =

        _XmSecondaryResourceData ( *bcePtr, secResDataRtn, client_data,  

                                   resource_name, resource_class,

			           BaseProc) ;

    }

    _XmProcessUnlock();

    return arrayCount;

}

/************************************************************************

 *

 *  ClassInitialize

 *    Initialize the vendorShell class structure.  This is called only

 *    the first time a vendorShell widget is created.  It registers the

 *    resource type converters unique to this class.

 *

 ************************************************************************/

static void 

ClassInitialize( void )

{

  Cardinal                    wc_num_res, sc_num_res;

  XtResource                  *merged_list;

  int                         i, j;

  XtResourceList              uncompiled;

  Cardinal                    num;

/**************************************************************************

   ShellExt's and VendorShellExt's resource lists are being merged into one

   and assigned to xmVendorShellExtObjectClassRec. This is for performance

   reasons, since, instead of two calls to XtGetSubResources() XtGetSubvaluse()

   and XtSetSubvalues() for both the superclass and the widget class, now

   we have just one call with a merged resource list.

   NOTE: At this point the resource lists for ShellExt and VendorShellExt do

         have unique entries, but if there are resources in the superclass

         that are being overwritten by the subclass then the merged_lists

         need to be created differently.

****************************************************************************/

  _XmProcessLock();

  wc_num_res = xmVendorShellExtClassRec.object_class.num_resources;

  sc_num_res = xmShellExtClassRec.object_class.num_resources;

  merged_list = (XtResource *)XtMalloc((sizeof(XtResource) * (wc_num_res +

                                                                 sc_num_res)));

  _XmTransformSubResources(xmShellExtClassRec.object_class.resources,

                           sc_num_res, &uncompiled, &num);

  for (i = 0; i < num; i++)

  {

  merged_list[i] = uncompiled[i];

  }

  _XmProcessUnlock();

  _XmProcessLock();

  for (i = 0, j = num; i < wc_num_res; i++, j++)

  {

   merged_list[j] =

        xmVendorShellExtClassRec.object_class.resources[i];

  }

  _XmProcessUnlock();

  _XmProcessLock();

  xmVendorShellExtClassRec.object_class.resources = merged_list;

  xmVendorShellExtClassRec.object_class.num_resources = wc_num_res + sc_num_res ;

  _XmProcessUnlock();

  _XmRegisterConverters();

  _XmRegisterPixmapConverters();

  _XmInitializeExtensions();

  _XmInitializeTraits();

{

   XtProc class_initialize;

   _XmProcessLock();

   class_initialize = xmVendorShellExtObjectClass->core_class.class_initialize;

   _XmProcessUnlock();

   (*class_initialize) ();

}

   baseClassExtRec.record_type = XmQmotif;

   _XmBuildExtResources((WidgetClass) baseClassExtRec.secondaryObjectClass);

    _XmProcessLock();

   if (((XmShellExtObjectClass)baseClassExtRec.secondaryObjectClass)->desktop_class.insert_child ==

          XtInheritInsertChild)

       ((XmShellExtObjectClass)baseClassExtRec.secondaryObjectClass)->desktop_class.insert_child =

        ((XmShellExtObjectClass) xmDesktopClass)->desktop_class.insert_child;

   if (((XmShellExtObjectClass)baseClassExtRec.secondaryObjectClass)->desktop_class.delete_child ==

          XtInheritDeleteChild)

       ((XmShellExtObjectClass)baseClassExtRec.secondaryObjectClass)->desktop_class.delete_child =

        ((XmShellExtObjectClass) xmDesktopClass)->desktop_class.delete_child;

   if (((XmShellExtObjectClass)baseClassExtRec.secondaryObjectClass)->shell_class.structureNotifyHandler ==

          XmInheritEventHandler)

       ((XmShellExtObjectClass)baseClassExtRec.secondaryObjectClass)->shell_class.structureNotifyHandler =

        ((XmShellExtObjectClass) xmShellExtObjectClass)->shell_class.structureNotifyHandler;

   if (((XmVendorShellExtObjectClass)baseClassExtRec.secondaryObjectClass)->vendor_class.offset_handler ==

          XmInheritProtocolHandler)

       ((XmVendorShellExtObjectClass)baseClassExtRec.secondaryObjectClass)->vendor_class.offset_handler =

        ((XmVendorShellExtObjectClass) xmVendorShellExtObjectClass)->vendor_class.offset_handler;

    _XmProcessUnlock();

   XtFree((char *)uncompiled);

#ifndef NO_MESSAGE_CATALOG

    Xm_catd = catopen("Xm", NL_CAT_LOCALE);    

#endif

}

/************************************************************************

 *

 *  ClassPartInitialize

 *    Set up the inheritance mechanism for the routines exported by

 *    vendorShells class part.

 *

 ************************************************************************/

static void 

ClassPartInitialize(

        WidgetClass wc )

{

    CompositeWidgetClass	compWc = (CompositeWidgetClass)wc;

    CompositeClassExtensionRec 	**compExtPtr;

    XmBaseClassExt		*wcePtr, *scePtr;

    XmVendorShellWidgetClass    vc = (XmVendorShellWidgetClass) wc; 

    CompositeWidgetClass	superWc;

    _XmProcessLock();

    superWc = (CompositeWidgetClass)wc->core_class.superclass;

    _XmProcessUnlock();

    wcePtr = _XmGetBaseClassExtPtr(wc, XmQmotif);

    _XmProcessLock();

    scePtr = _XmGetBaseClassExtPtr(wc->core_class.superclass, XmQmotif);

    if ( (vc != (XmVendorShellWidgetClass)vendorShellWidgetClass) && 

	scePtr && *scePtr && 

	(*wcePtr)->secondaryObjectClass != NULL &&

	((*scePtr)->secondaryObjectClass != (*wcePtr)->secondaryObjectClass)){

	XmVendorShellExtObjectClass  wceClass, sceClass;

	wceClass = (XmVendorShellExtObjectClass)(*wcePtr)->

	    secondaryObjectClass;

	sceClass = (XmVendorShellExtObjectClass)(*scePtr)->

	    secondaryObjectClass;

	_XmBuildExtResources((WidgetClass) (*wcePtr)->secondaryObjectClass);

	if (wceClass->desktop_class.insert_child == XtInheritInsertChild)

	    wceClass->desktop_class.insert_child = 

		sceClass->desktop_class.insert_child;

	if (wceClass->desktop_class.delete_child == XtInheritDeleteChild)

	    wceClass->desktop_class.delete_child =

		sceClass->desktop_class.delete_child;

	if (wceClass->shell_class.structureNotifyHandler == 

	    XmInheritEventHandler)

	    wceClass->shell_class.structureNotifyHandler =

		sceClass->shell_class.structureNotifyHandler;

	if (wceClass->vendor_class.offset_handler == XmInheritProtocolHandler)

	    wceClass->vendor_class.offset_handler = 

		sceClass->vendor_class.offset_handler;

      }

    compExtPtr = (CompositeClassExtensionRec **) 

	&(compWc->composite_class.extension);

    _XmProcessUnlock();

    compExtPtr = (CompositeClassExtensionRec **)

	_XmGetClassExtensionPtr( (XmGenericClassExt *) compExtPtr, NULLQUARK);

    if (*compExtPtr == NULL) {

	CompositeClassExtensionRec 	**superExtPtr;

    _XmProcessLock();

	superExtPtr = (CompositeClassExtensionRec **) &(superWc->composite_class.extension);

    _XmProcessUnlock();

	superExtPtr = (CompositeClassExtensionRec **)

                  _XmGetClassExtensionPtr(

                      (XmGenericClassExt *) superExtPtr,

                      NULLQUARK);

	*compExtPtr = XtNew(CompositeClassExtensionRec);

	memcpy((char*)*compExtPtr, (char*)*superExtPtr, 

	       sizeof(CompositeClassExtensionRec));

    }

    /* Do this here because of bug in Xt */

    _XmProcessLock();

    wc->core_class.expose = Redisplay;

    _XmProcessUnlock();

   /* Install the render table trait for all subclasses as well. */

    XmeTraitSet((XtPointer)wc, XmQTspecifyRenderTable, (XtPointer)&vsSRT);

   /* Install the direction trait for all subclasses as well. */

    XmeTraitSet((XtPointer)wc, XmQTspecifyLayoutDirection, (XtPointer)&vsLDT);

   /* Install the accessColors trait for all subclasses as well. */

    XmeTraitSet((XtPointer)wc, XmQTaccessColors, (XtPointer)&vsACT);

   /* Install the unit type trait for all subclasses as well. */

    XmeTraitSet((XtPointer)wc, XmQTspecifyUnitType, (XtPointer)&vsUTT);

}

/************************************************************************

 *

 *  SetMwmStuff

 *     ov will be null when called from Initialize

 *

 ************************************************************************/

static void 

SetMwmStuff(

        XmVendorShellExtObject ove,

        XmVendorShellExtObject nve )

{

    Boolean		changed = FALSE;

    Widget		extParent = nve->ext.logicalParent;

    if (!ove || (ove->vendor.mwm_menu != nve->vendor.mwm_menu))

      {

	  /* make mwm_menu local */

	  if (ove && ove->vendor.mwm_menu) 

	    XtFree(ove->vendor.mwm_menu);

	  if (nve->vendor.mwm_menu)

	    nve->vendor.mwm_menu = XtNewString(nve->vendor.mwm_menu);

	  if (XtIsRealized(extParent))

	    SetMwmMenu(nve);

      }

    if (!ove || (ove->vendor.mwm_hints.functions != nve->vendor.mwm_hints.functions))

      {

	  if (nve->vendor.mwm_hints.functions == DONT_CARE)

	    nve->vendor.mwm_hints.flags &= ~MWM_HINTS_FUNCTIONS;

	  else

	    nve->vendor.mwm_hints.flags |= MWM_HINTS_FUNCTIONS;

	  changed |= TRUE;

      }

    if (!ove || (ove->vendor.mwm_hints.decorations != nve->vendor.mwm_hints.decorations))

      {

	  if (nve->vendor.mwm_hints.decorations == DONT_CARE)

	    nve->vendor.mwm_hints.flags &= ~MWM_HINTS_DECORATIONS;

	  else

	    nve->vendor.mwm_hints.flags |= MWM_HINTS_DECORATIONS;

	  changed |= TRUE;

      }

    if (!ove || (ove->vendor.mwm_hints.input_mode != nve->vendor.mwm_hints.input_mode))

      {

	  if (nve->vendor.mwm_hints.input_mode == DONT_CARE)

	    nve->vendor.mwm_hints.flags &= ~MWM_HINTS_INPUT_MODE;

	  else

	    nve->vendor.mwm_hints.flags |= MWM_HINTS_INPUT_MODE;

	  changed |= TRUE;

      }

    if (changed && XtIsRealized(extParent))