1/************************************************************
2
3Copyright 1989, 1998  The Open Group
4
5Permission to use, copy, modify, distribute, and sell this software and its
6documentation for any purpose is hereby granted without fee, provided that
7the above copyright notice appear in all copies and that both that
8copyright notice and this permission notice appear in supporting
9documentation.
10
11The above copyright notice and this permission notice shall be included in
12all copies or substantial portions of the Software.
13
14THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
15IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
17OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
18AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
19CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
20
21Except as contained in this notice, the name of The Open Group shall not be
22used in advertising or otherwise to promote the sale, use or other dealings
23in this Software without prior written authorization from The Open Group.
24
25Copyright 1989 by Hewlett-Packard Company, Palo Alto, California.
26
27			All Rights Reserved
28
29Permission to use, copy, modify, and distribute this software and its
30documentation for any purpose and without fee is hereby granted,
31provided that the above copyright notice appear in all copies and that
32both that copyright notice and this permission notice appear in
33supporting documentation, and that the name of Hewlett-Packard not be
34used in advertising or publicity pertaining to distribution of the
35software without specific, written prior permission.
36
37HEWLETT-PACKARD DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
38ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
39HEWLETT-PACKARD BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
40ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
41WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
42ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
43SOFTWARE.
44
45********************************************************/
46
47/***********************************************************************
48 *
49 * Extension function to change the keyboard device.
50 *
51 */
52
53#ifdef HAVE_DIX_CONFIG_H
54#include <dix-config.h>
55#endif
56
57#include "inputstr.h"           /* DeviceIntPtr      */
58#include <X11/extensions/XI.h>
59#include <X11/extensions/XIproto.h>
60#include "exglobals.h"
61
62#include "devbell.h"
63
64/***********************************************************************
65 *
66 * This procedure is invoked to swap the request bytes if the server and
67 * client have a different byte order.
68 *
69 */
70
71int _X_COLD
72SProcXDeviceBell(ClientPtr client)
73{
74    REQUEST(xDeviceBellReq);
75    swaps(&stuff->length);
76    return (ProcXDeviceBell(client));
77}
78
79/***********************************************************************
80 *
81 * This procedure rings a bell on an extension device.
82 *
83 */
84
85int
86ProcXDeviceBell(ClientPtr client)
87{
88    DeviceIntPtr dev;
89    KbdFeedbackPtr k;
90    BellFeedbackPtr b;
91    int rc, base;
92    int newpercent;
93    CARD8 class;
94    void *ctrl;
95    BellProcPtr proc;
96
97    REQUEST(xDeviceBellReq);
98    REQUEST_SIZE_MATCH(xDeviceBellReq);
99
100    rc = dixLookupDevice(&dev, stuff->deviceid, client, DixBellAccess);
101    if (rc != Success) {
102        client->errorValue = stuff->deviceid;
103        return rc;
104    }
105
106    if (stuff->percent < -100 || stuff->percent > 100) {
107        client->errorValue = stuff->percent;
108        return BadValue;
109    }
110    if (stuff->feedbackclass == KbdFeedbackClass) {
111        for (k = dev->kbdfeed; k; k = k->next)
112            if (k->ctrl.id == stuff->feedbackid)
113                break;
114        if (!k) {
115            client->errorValue = stuff->feedbackid;
116            return BadValue;
117        }
118        base = k->ctrl.bell;
119        proc = k->BellProc;
120        ctrl = (void *) &(k->ctrl);
121        class = KbdFeedbackClass;
122    }
123    else if (stuff->feedbackclass == BellFeedbackClass) {
124        for (b = dev->bell; b; b = b->next)
125            if (b->ctrl.id == stuff->feedbackid)
126                break;
127        if (!b) {
128            client->errorValue = stuff->feedbackid;
129            return BadValue;
130        }
131        base = b->ctrl.percent;
132        proc = b->BellProc;
133        ctrl = (void *) &(b->ctrl);
134        class = BellFeedbackClass;
135    }
136    else {
137        client->errorValue = stuff->feedbackclass;
138        return BadValue;
139    }
140    newpercent = (base * stuff->percent) / 100;
141    if (stuff->percent < 0)
142        newpercent = base + newpercent;
143    else
144        newpercent = base - newpercent + stuff->percent;
145    if (proc == NULL)
146        return BadValue;
147    (*proc) (newpercent, dev, ctrl, class);
148    return Success;
149}
150