event.c revision 1.10 1 /* $NetBSD: event.c,v 1.10 2002/10/21 15:22:03 uwe Exp $ */
2
3 /*
4 * Copyright (c) 1992, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * This software was developed by the Computer Systems Engineering group
8 * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
9 * contributed to Berkeley.
10 *
11 * All advertising materials mentioning features or use of this software
12 * must display the following acknowledgement:
13 * This product includes software developed by the University of
14 * California, Lawrence Berkeley Laboratory.
15 *
16 * Redistribution and use in source and binary forms, with or without
17 * modification, are permitted provided that the following conditions
18 * are met:
19 * 1. Redistributions of source code must retain the above copyright
20 * notice, this list of conditions and the following disclaimer.
21 * 2. Redistributions in binary form must reproduce the above copyright
22 * notice, this list of conditions and the following disclaimer in the
23 * documentation and/or other materials provided with the distribution.
24 * 3. All advertising materials mentioning features or use of this software
25 * must display the following acknowledgement:
26 * This product includes software developed by the University of
27 * California, Berkeley and its contributors.
28 * 4. Neither the name of the University nor the names of its contributors
29 * may be used to endorse or promote products derived from this software
30 * without specific prior written permission.
31 *
32 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
33 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
34 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
35 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
36 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
37 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
38 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
39 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
40 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
41 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
42 * SUCH DAMAGE.
43 *
44 * @(#)event.c 8.1 (Berkeley) 6/11/93
45 */
46
47 /*
48 * Internal `Firm_event' interface for the keyboard and mouse drivers.
49 */
50
51 #include <sys/cdefs.h>
52 __KERNEL_RCSID(0, "$NetBSD: event.c,v 1.10 2002/10/21 15:22:03 uwe Exp $");
53
54 #include <sys/param.h>
55 #include <sys/fcntl.h>
56 #include <sys/malloc.h>
57 #include <sys/proc.h>
58 #include <sys/systm.h>
59 #include <sys/vnode.h>
60 #include <sys/select.h>
61 #include <sys/poll.h>
62
63 #include <dev/sun/vuid_event.h>
64 #include <dev/sun/event_var.h>
65
66 int (*ev_out32_hook) __P((struct firm_event *, int, struct uio *));
67
68 /*
69 * Initialize a firm_event queue.
70 */
71 void
72 ev_init(ev)
73 struct evvar *ev;
74 {
75
76 ev->ev_get = ev->ev_put = 0;
77 ev->ev_q = malloc((u_long)EV_QSIZE * sizeof(struct firm_event),
78 M_DEVBUF, M_WAITOK|M_ZERO);
79 }
80
81 /*
82 * Tear down a firm_event queue.
83 */
84 void
85 ev_fini(ev)
86 struct evvar *ev;
87 {
88
89 free(ev->ev_q, M_DEVBUF);
90 }
91
92 /*
93 * User-level interface: read, select.
94 * (User cannot write an event queue.)
95 */
96 int
97 ev_read(ev, uio, flags)
98 struct evvar *ev;
99 struct uio *uio;
100 int flags;
101 {
102 int s, n, cnt, error;
103
104 /*
105 * Make sure we can return at least 1.
106 */
107 if (uio->uio_resid < sizeof(struct firm_event))
108 return (EMSGSIZE); /* ??? */
109 s = splev();
110 while (ev->ev_get == ev->ev_put) {
111 if (flags & IO_NDELAY) {
112 splx(s);
113 return (EWOULDBLOCK);
114 }
115 ev->ev_wanted = 1;
116 error = tsleep((caddr_t)ev, PEVENT | PCATCH, "firm_event", 0);
117 if (error) {
118 splx(s);
119 return (error);
120 }
121 }
122 /*
123 * Move firm_events from tail end of queue (there is at least one
124 * there).
125 */
126 if (ev->ev_put < ev->ev_get)
127 cnt = EV_QSIZE - ev->ev_get; /* events in [get..QSIZE) */
128 else
129 cnt = ev->ev_put - ev->ev_get; /* events in [get..put) */
130 splx(s);
131 n = howmany(uio->uio_resid, sizeof(struct firm_event));
132 if (cnt > n)
133 cnt = n;
134 if ((curproc->p_flag & P_32) && ev_out32_hook != NULL)
135 error = (*ev_out32_hook)(&ev->ev_q[ev->ev_get], cnt, uio);
136 else
137 error = uiomove((caddr_t)&ev->ev_q[ev->ev_get],
138 cnt * sizeof(struct firm_event), uio);
139 n -= cnt;
140 /*
141 * If we do not wrap to 0, used up all our space, or had an error,
142 * stop. Otherwise move from front of queue to put index, if there
143 * is anything there to move.
144 */
145 if ((ev->ev_get = (ev->ev_get + cnt) % EV_QSIZE) != 0 ||
146 n == 0 || error || (cnt = ev->ev_put) == 0)
147 return (error);
148 if (cnt > n)
149 cnt = n;
150 if ((curproc->p_flag & P_32) && ev_out32_hook != NULL)
151 error = (*ev_out32_hook)(&ev->ev_q[0], cnt, uio);
152 else
153 error = uiomove((caddr_t)&ev->ev_q[0],
154 cnt * sizeof(struct firm_event), uio);
155 ev->ev_get = cnt;
156 return (error);
157 }
158
159 int
160 ev_poll(ev, events, p)
161 struct evvar *ev;
162 int events;
163 struct proc *p;
164 {
165 int s = splev(), revents = 0;
166
167 if (events & (POLLIN | POLLRDNORM)) {
168 if (ev->ev_get == ev->ev_put)
169 selrecord(p, &ev->ev_sel);
170 else
171 revents |= events & (POLLIN | POLLRDNORM);
172 }
173 revents |= events & (POLLOUT | POLLWRNORM);
174
175 splx(s);
176 return (revents);
177 }
178