/*

 * 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

 */

/* $TOG: WmCmd.c /main/11 1997/03/20 11:15:26 dbl $

 *

 * (c) Copyright 1996 Digital Equipment Corporation.

 * (c) Copyright 1996 Hewlett-Packard Company.

 * (c) Copyright 1996 International Business Machines Corp.

 * (c) Copyright 1996 Sun Microsystems, Inc.

 * (c) Copyright 1996 Novell, Inc. 

 * (c) Copyright 1996 FUJITSU LIMITED.

 * (c) Copyright 1996 Hitachi.

 */

#ifdef HAVE_CONFIG_H

#include <config.h>

#endif

#include <Xm/Xm.h>

#include <Xm/ScrollBarP.h>

#include "./WmWsmLib/utm_send.h"

#include "./WmWsmLib/wsm_proto.h"

#include "WmGlobal.h"

#include "WmFunction.h"

#include "WmCmd.h"

#include "WmMenu.h"

#include "WmResParse.h"

#include "WmWsm.h"

#include "WmDebug.h"

#include "WmWinConf.h"

#define MAX_CLIENT_CMDS 1000

static CARD32 cmdKillList[MAX_CLIENT_CMDS];

static unsigned long cmdKillListIndex;

#define ScrNum(w) (XScreenNumberOfScreen(XtScreen(w)))

#define CCI_TREE(w) (wmGD.Screens[ScrNum(w)].cciTree)

#define CCI_TREE_OF_SCR(scr) (wmGD.Screens[(scr)].cciTree)

/*----------------------------------------------------------------------*

 |                              NewCommand                              |

 *----------------------------------------------------------------------*/

CmdTree *

NewCommand (

     CARD32  commandID,

     CARD32  notifyWindow,

     char   *name,

     char   *defaultName)

{

  CmdTree *ptr = (CmdTree *) XtMalloc(sizeof(CmdTree));

  ptr->commandID    = commandID;

  ptr->notifyWindow = notifyWindow;

  if (name != NULL) ptr->name = XtNewString(name);

  else              ptr->name = XtNewString("");

  if (defaultName != NULL) ptr->defaultName = XtNewString(defaultName);

  else                     ptr->defaultName = NULL;

  ptr->subTrees = NULL;

  ptr->next     = NULL;

  return(ptr);

}

/*---------------------------------------------------------------------------*

 |                                  FindCmd                                  |

 *---------------------------------------------------------------------------*/

CmdTree *

FindCmd(

     CARD32    commandID,

     CmdTree  *menuTree)

{

  CmdTree *pCmd;

  if (menuTree != NULL) PRINT("-> %s\n", menuTree->name);

  if (menuTree == NULL)

    {

      PRINT("<- NULL\n");

      return(NULL);

    }

  if (menuTree->commandID == commandID)

    {

      PRINT("<- %d, %s\n", commandID, menuTree->name);

      return(menuTree);

    }

  if ((pCmd = FindCmd(commandID, menuTree->next)) != NULL)

    return(pCmd);

  return(FindCmd(commandID, menuTree->subTrees));

}

/*---------------------------------------------------------------------------*

 |                             FindDuplicateName                             |

 | Scan through commandTree for another defined command with the same name.  |

 | Once found, return the ID of the duplicate.  Note that at most one match  |

 | can be found. If no match is found, 0 is returned.  This should NEVER be  |

 | the value of a command defined by a client.                               |

 *---------------------------------------------------------------------------*/

CARD32

FindDuplicateName(

     CmdTree  *menuTree,

     char     *name)

{

  CmdTree *tmp;

  CARD32  duplicateID;

  if (menuTree == NULL)

    return(0);

  else if ((menuTree->name != NULL) && (strcmp(menuTree->name, name) == 0))

    return(menuTree->commandID);

  else if ((duplicateID = FindDuplicateName(menuTree->subTrees, name)) != 0)

    return(duplicateID);

  else

    return(FindDuplicateName(menuTree->next, name));

}

/*----------------------------------------------------------------------*

 |                              AddCommand                              |

 | Returns true if the commandSet was found and a new command was added.|

 | Note that toplevel commands have 0 as their commandSet.  This will   |

 | always match the top entry in the command tree since it is 0.        |

 *----------------------------------------------------------------------*/

Boolean

AddCommand (

     int      scr,

     CARD32   commandSet,

     CARD32   commandID,

     CARD32   notifyWindow,

     char    *name,

     char    *defaultName,

     CmdTree *ptr)

{

  /*

   *  For each subtree of the cmdtree, look for the commandset.

   *  If found, add the element there else keep looking.

   */

  CmdTree *tmp;

  CARD32 duplicateID;

  if (ptr == NULL) return (False);

  else if (ptr->commandID == commandSet)

    /* FOUND IT */

    {

      if ((duplicateID = FindDuplicateName(CCI_TREE_OF_SCR(scr), name)) != 0)

	{

	  /* a duplicate menu item already exists here, remove it first.

	   */

	  if (ptr->subTrees != NULL)

	    DestroyMenuSpec (&(wmGD.Screens[scr]), commandID);

	  DeleteCommand(commandID, &CCI_TREE_OF_SCR(scr));

	}

      tmp = ptr->subTrees;

      ptr->subTrees = NewCommand(commandID, notifyWindow, name, defaultName);

      ptr->subTrees->next = tmp;

      return(True);

    }

  else

    {

      Boolean found;

      found = AddCommand(scr, commandSet, commandID, notifyWindow,

			 name, defaultName, ptr->next);

      if (!found)

	found = AddCommand(scr, commandSet, commandID, notifyWindow,

			   name, defaultName, ptr->subTrees);

      return (found);

    }

}

/*---------------------------------------------------------------------------*

 |                          RemoveCommandBranch                              |

 | This routine all commands at the specified node in the command tree.      |

 *---------------------------------------------------------------------------*/

void

RemoveCommandBranch (CmdTree *menuTree)

{

  CmdTree *tmp = menuTree;

  while (menuTree != NULL)

    {

      if (menuTree->subTrees != (CmdTree*)NULL)

	RemoveCommandBranch(menuTree->subTrees);

      menuTree = menuTree->next;

      if (tmp->name != NULL)

	XtFree((char*)tmp->name);

      XtFree((char*)tmp);

    }

}

/*---------------------------------------------------------------------------*

 |                              DeleteCommand                                |

 | This routine deletes any matching command entries in the Command Tree.    |

 *---------------------------------------------------------------------------*/

void

DeleteCommand (

     long      commandID,

     CmdTree **pmenuTree)

{

  if ((pmenuTree == NULL) || (*pmenuTree == NULL))

    return;

  else

    {

      CmdTree *tmp  = *pmenuTree;

      CmdTree *prev = NULL;

      while (tmp != (CmdTree *)NULL)

	if (tmp->commandID == commandID)

	  {

	    RemoveCommandBranch(tmp->subTrees); /* remove all sub-commands. */

	    if (prev == (CmdTree *)NULL)

	      *pmenuTree = tmp->next;

	    else

	      prev->next = tmp->next;

	    if (tmp->name != NULL)

	      XtFree((char*)tmp->name);

	    XtFree((char *)tmp);

	    tmp = prev;

	  }

	else

	  {

	    if (tmp->subTrees != (CmdTree *)NULL)

	      DeleteCommand(commandID, &tmp->subTrees);

	    prev = tmp;

	    tmp = tmp->next;

	  }

    }

}

/*----------------------------------------------------------------------*

 |                            DefineCommand                             |

 | hack version - restriction: no spaces allowed in names.              |

 *----------------------------------------------------------------------*/

/*ARGSUSED*/

void

DefineCommand (

     Widget         w,

     Atom           target,

     MessageData    data,

     unsigned long  len,

     int            fmt)

{

  CARD32  commandID, commandSet, selection, duplicateID;

  String  name, defaultLabel;

  Boolean found = False;

  Window  owner;

  XWindowAttributes attr;

  /*

   * check data to make sure somethings there.

   */

  if ((data == NULL) || (len == 0))

    {

      PRINT("Bad data passed to DefineCommand.\n");

      return;

    }

  commandID    = UnpackCARD32(&data);

  selection    = UnpackCARD32(&data); /* selection to use for invoke cmd */

  commandSet   = UnpackCARD32(&data);

  name         = UnpackString(&data);

  defaultLabel = UnpackString(&data);

  PRINT("Define command: %d, %d, '%s', '%s'\n",

	commandID, commandSet, name, defaultLabel);

  /*

   *  Add command to menu structure.

   */

  if (CCI_TREE(w) == NULL)

    {

      CCI_TREE(w) = NewCommand(0, 0, NULL, NULL);

    }

  if (commandSet != 0)

    {

      found = AddCommand(ScrNum(w), commandSet, commandID, selection, name,

			 defaultLabel, CCI_TREE(w));

    }

  else

    /*

     * A leaf is being added to the command tree. There should not

     * be any other entries with the same name since matching with

     * the mwm resource file is done on names.  If a duplicate is

     * found, remove it first and any menu spec if it is a command

     * set. 

     */

    if ((duplicateID = FindDuplicateName(CCI_TREE(w), name)) != 0)

      {

	/* a duplicate menu item already exists here, remove it first.

	 */

	DestroyMenuSpec (&(wmGD.Screens[ScrNum(w)]), duplicateID);

	DeleteCommand(duplicateID, &CCI_TREE(w));

      }

  if (!found || commandSet == 0)

    {

      CmdTree *tmp;

      tmp = NewCommand(commandID, selection, name, defaultLabel);

      tmp->next = CCI_TREE(w)->next;

      CCI_TREE(w)->next = tmp;

    }

}

/*----------------------------------------------------------------------*

 |                            IncludeCommand                            |

 *----------------------------------------------------------------------*/

/*ARGSUSED*/

void

IncludeCommand (

     Widget         w,

     Atom           target,

     MessageData    data,

     unsigned long  len,

     int            fmt)

{

  CARD32         inLine, commandID, selection, count;

  Window        *windowIDs;

  CmdTree       *tPtr, *pNext;

  int            i, win;

  unsigned long  activeContext = 0L;

  /*

   * check data to make sure somethings there.

   */

  if ((data == NULL) || (len == 0))

    {

      PRINT("Bad data passed to IncludeCommand.\n");

      return;

    }

  inLine    = UnpackCARD32(&data);

  commandID = UnpackCARD32(&data);

  selection = UnpackCARD32(&data);

  count     = UnpackCARD32(&data);

  if (count > 0) windowIDs = (Window *) XtMalloc(sizeof(Window)*count);

  for (win=0; win

  {

      windowIDs[win] = UnpackCARD32(&data);

      PRINT("Got window ID %d.\n", windowIDs[win]);

  }

  /*

   *  Insert on root menu

   */

  if ((windowIDs[0] & WINDOW_MASK) == 0L)

    {

      ShowWaitState (TRUE);

	tPtr = FindCmd (commandID, CCI_TREE(w));

	if (tPtr != NULL)

	{

	    activeContext = F_CONTEXT_ROOT;

	    pNext = tPtr->next;

	    tPtr->next = NULL;

	    InsertTreeOnRootMenu(ACTIVE_PSD, tPtr, selection, inLine);

	    tPtr->next = pNext;

	}

      ShowWaitState (FALSE);

    }

  /*

   * Insert on all clients

   */

  else if ((windowIDs[0] & WINDOW_MASK) == ALL_WINDOWS)

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  ShowWaitState (TRUE);

	  activeContext = 0L;

	  if (windowIDs[0] &   ICON_ONLY) activeContext |= F_CONTEXT_ICON;

	  if (windowIDs[0] & WINDOW_ONLY) activeContext |= F_CONTEXT_WINDOW;

	  pNext = tPtr->next;

	  tPtr->next = NULL;

	  InsertTreeOnAllClients (ACTIVE_PSD, tPtr, selection,

				  activeContext, inLine);

	  tPtr->next = pNext;

	  PRINT("Inserted commandID %d on all windows.\n", commandID);

	  ShowWaitState (FALSE);

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  /*

   * Insert on specified clients

   */

  else

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  ShowWaitState (TRUE);

	  for (i=0; i

	    {

	      ClientData *pCD;

	      activeContext = 0L;

	      if (windowIDs[i] &   ICON_ONLY)

		activeContext |= F_CONTEXT_ICON;

	      if (windowIDs[i] & WINDOW_ONLY)

		activeContext |= F_CONTEXT_WINDOW;

	      pCD = GetPCD(ScrNum(w), windowIDs[i] & WINDOW_MASK);

	      if (pCD != NULL)

	      {

		  pNext = tPtr->next;

		  tPtr->next = NULL;

		  InsertTreeOnSingleClient (pCD->pSD, pCD, tPtr, selection,

					    activeContext, inLine);

		  tPtr->next = pNext;

	      }

	    }

	  ShowWaitState (FALSE);

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  if (count > 0)

    XtFree((char*)windowIDs);

}

/*----------------------------------------------------------------------*

 |                             EnableCommand                            |

 *----------------------------------------------------------------------*/

/*ARGSUSED*/

void

EnableCommand (

     Widget         w,

     Atom           target,

     MessageData    data,

     unsigned long  len,

     int            fmt)

{

  CARD32         commandID, count;

  Window        *windowIDs;

  CmdTree       *tPtr, *pNext;

  int            i, win;

  unsigned long  activeContext = 0L;

  /*

   * check data to make sure somethings there.

   */

  if ((data == NULL) || (len == 0))

    {

      PRINT("Bad data passed to EnableCommand.\n");

      return;

    }

  commandID = UnpackCARD32(&data);

  count     = UnpackCARD32(&data);

  if (count > 0) windowIDs = (Window *) XtMalloc(sizeof(Window)*count);

  for (win=0; win

    {

      windowIDs[win] = UnpackCARD32(&data);

      PRINT("Got window ID %d.\n", windowIDs[win]);

    }

  /*

   *  Enable on root menu

   */

  if ((windowIDs[0] & WINDOW_MASK) == 0L)

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  for (i=0; i

	  {

	      activeContext = F_CONTEXT_ROOT;

	      pNext = tPtr->next;

	      tPtr->next = NULL;

	      ModifyClientCommandTree (ACTIVE_PSD, NULL, ROOT, tPtr,

				       ENABLE, activeContext, NULL);

	      tPtr->next = pNext;

	  }

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  /*

   * Enable on all clients

   */

  else if ((windowIDs[0] & WINDOW_MASK) == ALL_WINDOWS)

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  activeContext = 0L;

	  if (windowIDs[0] &   ICON_ONLY) activeContext |= F_CONTEXT_ICON;

	  if (windowIDs[0] & WINDOW_ONLY) activeContext |= F_CONTEXT_WINDOW;

	  pNext = tPtr->next;

	  tPtr->next = NULL;

	  ModifyClientCommandTree (ACTIVE_PSD, NULL, ALL, tPtr, ENABLE,

				   activeContext, NULL);

	  tPtr->next = pNext;

	  PRINT("Enabled commandID %d on all windows.\n", commandID);

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  /*

   * Enable on specified clients

   */

  else

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  for (i=0; i

	    {

	      ClientData *pCD;

	      activeContext = 0L;

	      if (windowIDs[i] &   ICON_ONLY)

		activeContext |= F_CONTEXT_ICON;

	      if (windowIDs[i] & WINDOW_ONLY)

		activeContext |= F_CONTEXT_WINDOW;

	      pCD = GetPCD(ScrNum(w), windowIDs[i] & WINDOW_MASK);

	      if (pCD != NULL)

	      {

		  pNext = tPtr->next;

		  tPtr->next = NULL;

		  ModifyClientCommandTree (pCD->pSD, pCD, SINGLE, tPtr,

					   ENABLE, activeContext, NULL);

		  tPtr->next = pNext;

	      }

	    }

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  if (count > 0)

    XtFree((char*)windowIDs);

}

/*----------------------------------------------------------------------*

 |                             DisableCommand                            |

 *----------------------------------------------------------------------*/

/*ARGSUSED*/

void

DisableCommand (

     Widget         w,

     Atom           target,

     MessageData    data,

     unsigned long  len,

     int            fmt)

{

  CARD32         commandID, count;

  Window        *windowIDs;

  CmdTree       *tPtr, *pNext;

  int            i, win;

  unsigned long  activeContext = 0L;

  /*

   * check data to make sure somethings there.

   */

  if ((data == NULL) || (len == 0))

    {

      PRINT("Bad data passed to DisableCommand.\n");

      return;

    }

  commandID = UnpackCARD32(&data);

  count     = UnpackCARD32(&data);

  if (count > 0) windowIDs = (Window *) XtMalloc(sizeof(Window)*count);

  for (win=0; win

    {

      windowIDs[win] = UnpackCARD32(&data);

      PRINT("Got window ID %d.\n", windowIDs[win]);

    }

  /*

   *  Disable on root menu

   */

  if ((windowIDs[0] & WINDOW_MASK) == 0L)

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  for (i=0; i

	  {

	      activeContext = F_CONTEXT_ROOT;

	      pNext = tPtr->next;

	      tPtr->next = NULL;

	      ModifyClientCommandTree (ACTIVE_PSD, NULL, ROOT, tPtr,

				       DISABLE, activeContext, NULL);

	      tPtr->next = pNext;

	  }

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  /*

   * Disable on all clients

   */

  else if ((windowIDs[0] & WINDOW_MASK) == ALL_WINDOWS)

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  activeContext = 0L;

	  if (windowIDs[0] &   ICON_ONLY) activeContext |= F_CONTEXT_ICON;

	  if (windowIDs[0] & WINDOW_ONLY) activeContext |= F_CONTEXT_WINDOW;

	  pNext = tPtr->next;

	  tPtr->next = NULL;

	  ModifyClientCommandTree (ACTIVE_PSD, NULL, ALL, tPtr,

				   DISABLE, activeContext, NULL);

	  tPtr->next = pNext;

	  PRINT("Disabled commandID %d on all windows.\n", commandID);

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  /*

   * Disable on specified clients

   */

  else

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  for (i=0; i

	    {

	      ClientData *pCD;

	      activeContext = 0L;

	      if (windowIDs[i] &   ICON_ONLY)

		activeContext |= F_CONTEXT_ICON;

	      if (windowIDs[i] & WINDOW_ONLY)

		activeContext |= F_CONTEXT_WINDOW;

	      pCD = GetPCD(ScrNum(w), windowIDs[i] & WINDOW_MASK);

	      if (pCD != NULL)

	      {

		  pNext = tPtr->next;

		  tPtr->next = NULL;

		  ModifyClientCommandTree (pCD->pSD, pCD, SINGLE, tPtr,

					   DISABLE, activeContext, NULL);

		  tPtr->next = pNext;

	      }

	    }

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  if (count > 0)

    XtFree((char*)windowIDs);

}

/*----------------------------------------------------------------------*

 |                             RenameCommand                            |

 *----------------------------------------------------------------------*/

/*ARGSUSED*/

void

RenameCommand (

     Widget         w,

     Atom           target,

     MessageData    data,

     unsigned long  len,

     int            fmt)

{

  CARD32         commandID, count;

  Window        *windowIDs;

  CmdTree       *tPtr, *pNext;

  int            i, win;

  unsigned long  activeContext = 0L;

  String	 newname;

  /*

   * check data to make sure somethings there.

   */

  if ((data == NULL) || (len == 0))

    {

      PRINT("Bad data passed to RenameCommand.\n");

      return;

    }

  commandID = UnpackCARD32(&data);

  newname   = UnpackString(&data);

  count     = UnpackCARD32(&data);

  if (count > 0) windowIDs = (Window *) XtMalloc(sizeof(Window)*count);

  for (win=0; win

    {

      windowIDs[win] = UnpackCARD32(&data);

      PRINT("Got window ID %d.\n", windowIDs[win]);

    }

  /*

   *  Rename on root menu

   */

  if ((windowIDs[0] & WINDOW_MASK) == 0L)

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  for (i=0; i

	  {

	      activeContext = F_CONTEXT_ROOT;

	      pNext = tPtr->next;

	      tPtr->next = NULL;

	      ModifyClientCommandTree (ACTIVE_PSD, NULL, ROOT, tPtr,

				       RENAME, activeContext, newname);

	      tPtr->next = pNext;

	  }

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  /*

   * Rename on all clients

   */

  else if ((windowIDs[0] & WINDOW_MASK) == ALL_WINDOWS)

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  activeContext = 0L;

	  if (windowIDs[0] &   ICON_ONLY) activeContext |= F_CONTEXT_ICON;

	  if (windowIDs[0] & WINDOW_ONLY) activeContext |= F_CONTEXT_WINDOW;

	  pNext = tPtr->next;

	  tPtr->next = NULL;

	  ModifyClientCommandTree (ACTIVE_PSD, NULL, ALL, tPtr,

				   RENAME, activeContext, newname);

	  tPtr->next = pNext;

	  PRINT("Renamed commandID %d on all windows.\n", commandID);

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  /*

   * Rename on specified clients

   */

  else

    {

      tPtr = FindCmd (commandID, CCI_TREE(w));

      if (tPtr != NULL)

	{

	  for (i=0; i

	    {

	      ClientData *pCD;

	      activeContext = 0L;

	      if (windowIDs[i] &   ICON_ONLY)

		activeContext |= F_CONTEXT_ICON;

	      if (windowIDs[i] & WINDOW_ONLY)

		activeContext |= F_CONTEXT_WINDOW;

	      pCD = GetPCD(ScrNum(w), windowIDs[i] & WINDOW_MASK);

	      if (pCD != NULL)

	      {

		  pNext = tPtr->next;

		  tPtr->next = NULL;

		  ModifyClientCommandTree (pCD->pSD, pCD, SINGLE, tPtr,

					   RENAME, activeContext, newname);

		  tPtr->next = pNext;

	      }

	    }

	}

      else

	PRINT("ERROR - commandID %d not found in command tree.\n", commandID);

    }

  if (count > 0)

    XtFree((char*)windowIDs);

}

/*----------------------------------------------------------------------*

 |                             RemoveCommand                            |

 *----------------------------------------------------------------------*/

/*ARGSUSED*/

void

RemoveCommand (

     Widget         w,

     Atom           target,

     MessageData    data,

     unsigned long  len,

     int            fmt)

{

  CARD32         commandID, count;

  Window        *windowIDs;

  CmdTree       *tPtr, *pNext;

  int            i, win;

  unsigned long  activeContext = 0L;

  /*

   * check data to make sure somethings there.

   */

  if ((data == NULL) || (len == 0))