home *** CD-ROM | disk | FTP | other *** search
- /* $XConsortium: xgrabdev.c,v 1.10 90/05/18 15:32:29 rws Exp $ */
-
- /************************************************************
- Copyright (c) 1989 by Hewlett-Packard Company, Palo Alto, California, and the
- Massachusetts Institute of Technology, Cambridge, Massachusetts.
-
- All Rights Reserved
-
- Permission to use, copy, modify, and distribute this software and its
- documentation for any purpose and without fee is hereby granted,
- provided that the above copyright notice appear in all copies and that
- both that copyright notice and this permission notice appear in
- supporting documentation, and that the names of Hewlett-Packard or MIT not be
- used in advertising or publicity pertaining to distribution of the
- software without specific, written prior permission.
-
- HEWLETT-PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
- ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
- HEWLETT-PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
- ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
- WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
- ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
- SOFTWARE.
-
- ********************************************************/
-
- /***********************************************************************
- *
- * Extension function to grab an extension device.
- *
- */
-
-
- #define NEED_EVENTS
- #define NEED_REPLIES
- #include "X.h" /* for inputstr.h */
- #include "Xproto.h" /* Request macro */
- #include "inputstr.h" /* DeviceIntPtr */
- #include "windowstr.h" /* window structure */
- #include "XI.h"
- #include "XIproto.h"
-
- extern int IReqCode;
- extern int BadDevice;
- extern int BadClass;
- extern InputInfo inputInfo;
- extern XExtEventInfo EventInfo[];
- extern void (* ReplySwapVector[256]) ();
- DeviceIntPtr LookupDeviceIntRec();
-
- /***********************************************************************
- *
- * Swap the request if the requestor has a different byte order than us.
- *
- */
-
- int
- SProcXGrabDevice(client)
- register ClientPtr client;
- {
- register char n;
- register long *p;
- register int i;
-
- REQUEST(xGrabDeviceReq);
- swaps(&stuff->length, n);
- swapl(&stuff->grabWindow, n);
- swapl(&stuff->time, n);
- swaps(&stuff->event_count, n);
- p = (long *) &stuff[1];
- for (i=0; i<stuff->event_count; i++)
- {
- swapl(p, n);
- p++;
- }
-
- return(ProcXGrabDevice(client));
- }
-
- /***********************************************************************
- *
- * Grab an extension device.
- *
- */
-
- int
- ProcXGrabDevice(client)
- ClientPtr client;
- {
- int error;
- xGrabDeviceReply rep;
- DeviceIntPtr dev;
- struct tmask tmp[EMASKSIZE];
-
- REQUEST(xGrabDeviceReq);
- REQUEST_AT_LEAST_SIZE(xGrabDeviceReq);
-
- if (stuff->length !=(sizeof(xGrabDeviceReq)>>2) + stuff->event_count)
- {
- SendErrorToClient (client, IReqCode, X_GrabDevice, 0, BadLength);
- return Success;
- }
-
- rep.repType = X_Reply;
- rep.RepType = X_GrabDevice;
- rep.sequenceNumber = client->sequence;
- rep.length = 0;
-
- dev = LookupDeviceIntRec (stuff->deviceid);
- if (dev == NULL)
- {
- SendErrorToClient(client, IReqCode, X_GrabDevice, 0, BadDevice);
- return Success;
- }
-
- if (CreateMaskFromList (client, (XEventClass *)&stuff[1],
- stuff->event_count, tmp, dev, X_GrabDevice) != Success)
- return Success;
-
- error = GrabDevice (client, dev, stuff->this_device_mode,
- stuff->other_devices_mode, stuff->grabWindow, stuff->ownerEvents,
- stuff->time, tmp[stuff->deviceid].mask, &rep.status);
-
- if (error != Success)
- {
- SendErrorToClient(client, IReqCode, X_GrabDevice, 0, error);
- return Success;
- }
- WriteReplyToClient(client, sizeof(xGrabDeviceReply), &rep);
- return Success;
- }
-
-
- /***********************************************************************
- *
- * This procedure creates an event mask from a list of XEventClasses.
- *
- */
-
- int
- CreateMaskFromList (client, list, count, mask, dev, req)
- ClientPtr client;
- XEventClass *list;
- int count;
- struct tmask mask[];
- DeviceIntPtr dev;
- int req;
- {
- int i,j;
- int device;
- DeviceIntPtr tdev;
- extern int ExtEventIndex;
-
- for (i=0; i<EMASKSIZE; i++)
- {
- mask[i].mask = 0;
- mask[i].dev = NULL;
- }
-
- for (i=0; i<count; i++, list++)
- {
- device = *list >> 8;
- tdev = LookupDeviceIntRec (device);
- if (tdev==NULL || (dev != NULL && tdev != dev))
- {
- SendErrorToClient(client, IReqCode, req, 0, BadClass);
- return BadClass;
- }
-
- for (j=0; j<ExtEventIndex; j++)
- if (EventInfo[j].type == (*list & 0xff))
- {
- mask[device].mask |= EventInfo[j].mask;
- mask[device].dev = (Pointer) tdev;
- break;
- }
- }
- return Success;
- }
-
- /***********************************************************************
- *
- * This procedure writes the reply for the XGrabDevice function,
- * if the client and server have a different byte ordering.
- *
- */
-
- SRepXGrabDevice (client, size, rep)
- ClientPtr client;
- int size;
- xGrabDeviceReply *rep;
- {
- register char n;
-
- swaps(&rep->sequenceNumber, n);
- swapl(&rep->length, n);
- WriteToClient(client, size, rep);
- }
-