/*
 * Copyright 2007-2008 Peter Hutterer
 *
 * Permission is hereby granted, free of charge, to any person obtaining a
 * copy of this software and associated documentation files (the "Software"),
 * to deal in the Software without restriction, including without limitation
 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the
 * Software is furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice (including the next
 * paragraph) shall be included in all copies or substantial portions of the
 * Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
 * DEALINGS IN THE SOFTWARE.
 *
 * Author: Peter Hutterer, University of South Australia, NICTA
 */

/***********************************************************************
 *
 * Request to fake data for a given device.
 *
 */

#ifdef HAVE_DIX_CONFIG_H
#include <dix-config.h>
#endif

#include <X11/X.h>	/* for inputstr.h    */
#include <X11/Xproto.h>	/* Request macro     */
#include "inputstr.h"	/* DeviceIntPtr      */
#include "windowstr.h"	/* window structure  */
#include "scrnintstr.h"	/* screen structure  */
#include <X11/extensions/XI.h>
#include <X11/extensions/XIproto.h>
#include <X11/extensions/Xge.h>
#include "extnsionst.h"
#include "exevents.h"
#include "exglobals.h"

#include "grabdev.h"    /* CreateMaskFromList */

#include "extgrbdev.h"

int
SProcXExtendedGrabDevice(ClientPtr client)
{
    char        n;
    int         i;
    long*       p;

    REQUEST(xExtendedGrabDeviceReq);
    swaps(&stuff->length, n);
    REQUEST_AT_LEAST_SIZE(xExtendedGrabDeviceReq);

    swapl(&stuff->grab_window, n);
    swapl(&stuff->time, n);
    swapl(&stuff->confine_to, n);
    swapl(&stuff->cursor, n);
    swaps(&stuff->event_count, n);
    swaps(&stuff->generic_event_count, n);

    p = (long *)&stuff[1];
    for (i = 0; i < stuff->event_count; i++) {
	swapl(p, n);
	p++;
    }

    for (i = 0; i < stuff->generic_event_count; i++) {
        p++; /* first 4 bytes are extension type and padding */
        swapl(p, n);
        p++;
    }

    return ProcXExtendedGrabDevice(client);
}


int
ProcXExtendedGrabDevice(ClientPtr client)
{
    xExtendedGrabDeviceReply rep;
    DeviceIntPtr             dev;
    int                      rc,
                             errval = 0,
                             i;
    WindowPtr                grab_window,
                             confineTo = 0;
    CursorPtr                cursor = NULL;
    struct tmask             tmp[EMASKSIZE];
    TimeStamp                time;
    XGenericEventMask*       xgeMask;
    GenericMaskPtr           gemasks = NULL;

    REQUEST(xExtendedGrabDeviceReq);
    REQUEST_AT_LEAST_SIZE(xExtendedGrabDeviceReq);

    rep.repType         = X_Reply;
    rep.RepType         = X_ExtendedGrabDevice;
    rep.sequenceNumber  = client->sequence;
    rep.length          = 0;

    if (stuff->length != (sizeof(xExtendedGrabDeviceReq) >> 2) +
            stuff->event_count + 2 * stuff->generic_event_count)
    {
        errval = 0;
        rc = BadLength;
        goto cleanup;
    }

    rc = dixLookupDevice(&dev, stuff->deviceid, client, DixGrabAccess);
    if (rc != Success) {
	goto cleanup;
    }

    rc = dixLookupWindow(&grab_window,
                          stuff->grab_window,
                          client,
                          DixReadAccess);
    if (rc != Success)
    {
        errval = stuff->grab_window;
        goto cleanup;
    }

    if (stuff->confine_to)
    {
        rc = dixLookupWindow(&confineTo,
                              stuff->confine_to,
                              client,
                              DixReadAccess);
        if (rc != Success)
        {
            errval = stuff->confine_to;
            goto cleanup;
        }
    }

    if (stuff->cursor)
    {
	rc = dixLookupResourceByType((pointer *)&cursor, stuff->cursor,
				     RT_CURSOR, client, DixReadAccess);
	if (rc != Success)
	{
            errval = stuff->cursor;
            rc = (rc == BadValue) ? BadCursor : rc;
            goto cleanup;
        }
    }

    if (CreateMaskFromList(client,
                           (XEventClass*)&stuff[1],
                           stuff->event_count,
                           tmp,
                           dev,
                           X_GrabDevice) != Success)
        return Success;

    time = ClientTimeToServerTime(stuff->time);

    if (stuff->generic_event_count)
    {
        xgeMask =
            (XGenericEventMask*)(((XEventClass*)&stuff[1]) + stuff->event_count);

        gemasks = xcalloc(1, sizeof(GenericMaskRec));
        gemasks->resource = FakeClientID(client->index);
        gemasks->next = NULL;
        gemasks->eventMask[xgeMask->extension & 0x7F] = xgeMask->evmask;

        xgeMask++;
        for (i = 1; i < stuff->generic_event_count; i++, xgeMask++)
            gemasks->eventMask[xgeMask->extension & 0x7F]= xgeMask->evmask;
    }

    rep.status = ExtGrabDevice(client, dev, stuff->device_mode,
                               grab_window, confineTo, time,
                               stuff->owner_events, cursor,
                               tmp[stuff->deviceid].mask,
                               gemasks);
cleanup:

    if (gemasks)
        xfree(gemasks);

    if (rc == Success)
    {
        WriteReplyToClient(client, sizeof(xGrabDeviceReply), &rep);
    }
    else
    {
        return rc;
    }
    return Success;
}

void
SRepXExtendedGrabDevice(ClientPtr client, int size,
                        xExtendedGrabDeviceReply* rep)
{
    char n;
    swaps(&rep->sequenceNumber, n);
    swaps(&rep->length, n);
    WriteToClient(client, size, (char*)rep);
}