uirda.c revision 1.2 1 1.2 augustss /* $NetBSD: uirda.c,v 1.2 2001/12/13 02:16:21 augustss Exp $ */
2 1.1 augustss
3 1.1 augustss /*
4 1.1 augustss * Copyright (c) 2001 The NetBSD Foundation, Inc.
5 1.1 augustss * All rights reserved.
6 1.1 augustss *
7 1.1 augustss * This code is derived from software contributed to The NetBSD Foundation
8 1.1 augustss * by Lennart Augustsson (lennart (at) augustsson.net) at
9 1.1 augustss * Carlstedt Research & Technology.
10 1.1 augustss *
11 1.1 augustss * Redistribution and use in source and binary forms, with or without
12 1.1 augustss * modification, are permitted provided that the following conditions
13 1.1 augustss * are met:
14 1.1 augustss * 1. Redistributions of source code must retain the above copyright
15 1.1 augustss * notice, this list of conditions and the following disclaimer.
16 1.1 augustss * 2. Redistributions in binary form must reproduce the above copyright
17 1.1 augustss * notice, this list of conditions and the following disclaimer in the
18 1.1 augustss * documentation and/or other materials provided with the distribution.
19 1.1 augustss * 3. All advertising materials mentioning features or use of this software
20 1.1 augustss * must display the following acknowledgement:
21 1.1 augustss * This product includes software developed by the NetBSD
22 1.1 augustss * Foundation, Inc. and its contributors.
23 1.1 augustss * 4. Neither the name of The NetBSD Foundation nor the names of its
24 1.1 augustss * contributors may be used to endorse or promote products derived
25 1.1 augustss * from this software without specific prior written permission.
26 1.1 augustss *
27 1.1 augustss * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
28 1.1 augustss * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
29 1.1 augustss * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
30 1.1 augustss * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
31 1.1 augustss * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
32 1.1 augustss * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
33 1.1 augustss * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
34 1.1 augustss * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
35 1.1 augustss * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
36 1.1 augustss * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
37 1.1 augustss * POSSIBILITY OF SUCH DAMAGE.
38 1.1 augustss */
39 1.1 augustss
40 1.1 augustss #include <sys/cdefs.h>
41 1.2 augustss __KERNEL_RCSID(0, "$NetBSD: uirda.c,v 1.2 2001/12/13 02:16:21 augustss Exp $");
42 1.1 augustss
43 1.1 augustss #include <sys/param.h>
44 1.1 augustss #include <sys/systm.h>
45 1.1 augustss #include <sys/kernel.h>
46 1.1 augustss #include <sys/device.h>
47 1.1 augustss #include <sys/lock.h>
48 1.1 augustss #include <sys/ioctl.h>
49 1.1 augustss #include <sys/conf.h>
50 1.1 augustss #include <sys/file.h>
51 1.1 augustss #include <sys/poll.h>
52 1.1 augustss #include <sys/select.h>
53 1.1 augustss #include <sys/proc.h>
54 1.1 augustss
55 1.1 augustss #include <dev/usb/usb.h>
56 1.1 augustss #include <dev/usb/usbdi.h>
57 1.1 augustss #include <dev/usb/usbdi_util.h>
58 1.1 augustss #include <dev/usb/usbdevs.h>
59 1.1 augustss
60 1.1 augustss #include <dev/ir/ir.h>
61 1.1 augustss #include <dev/ir/irdaio.h>
62 1.1 augustss #include <dev/ir/irframevar.h>
63 1.1 augustss
64 1.1 augustss #ifdef URIO_DEBUG
65 1.1 augustss #define DPRINTF(x) if (uirdadebug) logprintf x
66 1.1 augustss #define DPRINTFN(n,x) if (uirdadebug>(n)) logprintf x
67 1.1 augustss int uirdadebug = 1;
68 1.1 augustss #else
69 1.1 augustss #define DPRINTF(x)
70 1.1 augustss #define DPRINTFN(n,x)
71 1.1 augustss #endif
72 1.1 augustss
73 1.1 augustss /*
74 1.1 augustss * Protocol related definitions
75 1.1 augustss */
76 1.1 augustss
77 1.1 augustss /* Inbound header byte */
78 1.1 augustss #define UIRDA_MEDIA_BUSY 0x80
79 1.1 augustss #define UIRDA_SPEED_MASK 0x0f
80 1.1 augustss #define UIRDA_NO_SPEED 0x00
81 1.1 augustss #define UIRDA_2400 0x01
82 1.1 augustss #define UIRDA_9600 0x02
83 1.1 augustss #define UIRDA_19200 0x03
84 1.1 augustss #define UIRDA_38400 0x04
85 1.1 augustss #define UIRDA_57600 0x05
86 1.1 augustss #define UIRDA_115200 0x06
87 1.1 augustss #define UIRDA_576000 0x07
88 1.1 augustss #define UIRDA_1152000 0x08
89 1.1 augustss #define UIRDA_4000000 0x09
90 1.1 augustss
91 1.1 augustss /* Outbound header byte */
92 1.1 augustss #define UIRDA_EB_NO_CHANGE 0x00
93 1.1 augustss #define UIRDA_EB_48 0x10
94 1.1 augustss #define UIRDA_EB_24 0x20
95 1.1 augustss #define UIRDA_EB_12 0x30
96 1.1 augustss #define UIRDA_EB_6 0x40
97 1.1 augustss #define UIRDA_EB_3 0x50
98 1.1 augustss #define UIRDA_EB_2 0x60
99 1.1 augustss #define UIRDA_EB_1 0x70
100 1.1 augustss #define UIRDA_EB_0 0x80
101 1.1 augustss /* Speeds as above */
102 1.1 augustss
103 1.1 augustss /* Class specific requests */
104 1.1 augustss #define UR_IRDA_RECEIVING 0x01 /* Receive in progress? */
105 1.1 augustss #define UR_IRDA_CHECK_MEDIA_BUSY 0x03
106 1.1 augustss #define UR_IRDA_SET_RATE_SNIFF 0x04 /* opt */
107 1.1 augustss #define UR_IRDA_SET_UNICAST_LIST 0x05 /* opt */
108 1.1 augustss #define UR_IRDA_GET_DESC 0x06
109 1.1 augustss
110 1.1 augustss typedef struct {
111 1.1 augustss uByte bLength;
112 1.1 augustss uByte bDescriptorType;
113 1.1 augustss #define UDESC_IRDA 0x21
114 1.1 augustss uByte bDescriptorSubtype;
115 1.1 augustss uByte bmDataSize;
116 1.1 augustss #define UI_DS_2048 0x20
117 1.1 augustss #define UI_DS_1024 0x10
118 1.1 augustss #define UI_DS_512 0x08
119 1.1 augustss #define UI_DS_256 0x04
120 1.1 augustss #define UI_DS_128 0x02
121 1.1 augustss #define UI_DS_64 0x01
122 1.1 augustss uByte bmWindowSize;
123 1.1 augustss #define UI_WS_7 0x40
124 1.1 augustss #define UI_WS_6 0x20
125 1.1 augustss #define UI_WS_5 0x10
126 1.1 augustss #define UI_WS_4 0x08
127 1.1 augustss #define UI_WS_3 0x04
128 1.1 augustss #define UI_WS_2 0x02
129 1.1 augustss #define UI_WS_1 0x01
130 1.1 augustss uByte bmMinTurnaroundTime;
131 1.1 augustss #define UI_TA_0 0x80
132 1.1 augustss #define UI_TA_10 0x40
133 1.1 augustss #define UI_TA_50 0x20
134 1.1 augustss #define UI_TA_100 0x10
135 1.1 augustss #define UI_TA_500 0x08
136 1.1 augustss #define UI_TA_1000 0x04
137 1.1 augustss #define UI_TA_5000 0x02
138 1.1 augustss #define UI_TA_10000 0x01
139 1.1 augustss uWord wBaudRate;
140 1.1 augustss #define UI_BR_4000000 0x0100
141 1.1 augustss #define UI_BR_1152000 0x0080
142 1.1 augustss #define UI_BR_576000 0x0040
143 1.1 augustss #define UI_BR_115200 0x0020
144 1.1 augustss #define UI_BR_57600 0x0010
145 1.1 augustss #define UI_BR_38400 0x0008
146 1.1 augustss #define UI_BR_19200 0x0004
147 1.1 augustss #define UI_BR_9600 0x0002
148 1.1 augustss #define UI_BR_2400 0x0001
149 1.1 augustss uByte bmAdditionalBOFs;
150 1.1 augustss #define UI_EB_0 0x80
151 1.1 augustss #define UI_EB_1 0x40
152 1.1 augustss #define UI_EB_2 0x20
153 1.1 augustss #define UI_EB_3 0x10
154 1.1 augustss #define UI_EB_6 0x08
155 1.1 augustss #define UI_EB_12 0x04
156 1.1 augustss #define UI_EB_24 0x02
157 1.1 augustss #define UI_EB_48 0x01
158 1.1 augustss uByte bIrdaSniff;
159 1.1 augustss uByte bMaxUnicastList;
160 1.1 augustss } UPACKED usb_irda_descriptor_t;
161 1.1 augustss #define USB_IRDA_DESCRIPTOR_SIZE 12
162 1.1 augustss
163 1.1 augustss
164 1.1 augustss #define UIRDA_NEBOFS 8
165 1.1 augustss static struct {
166 1.1 augustss int count;
167 1.1 augustss int mask;
168 1.1 augustss int header;
169 1.1 augustss } uirda_ebofs[UIRDA_NEBOFS] = {
170 1.1 augustss { 0, UI_EB_0, UIRDA_EB_0 },
171 1.1 augustss { 1, UI_EB_1, UIRDA_EB_1 },
172 1.1 augustss { 2, UI_EB_2, UIRDA_EB_2 },
173 1.1 augustss { 3, UI_EB_3, UIRDA_EB_3 },
174 1.1 augustss { 6, UI_EB_6, UIRDA_EB_6 },
175 1.1 augustss { 12, UI_EB_12, UIRDA_EB_12 },
176 1.1 augustss { 24, UI_EB_24, UIRDA_EB_24 },
177 1.1 augustss { 48, UI_EB_48, UIRDA_EB_48 }
178 1.1 augustss };
179 1.1 augustss
180 1.1 augustss #define UIRDA_NSPEEDS 9
181 1.1 augustss static struct {
182 1.1 augustss int speed;
183 1.1 augustss int mask;
184 1.1 augustss int header;
185 1.1 augustss } uirda_speeds[UIRDA_NSPEEDS] = {
186 1.1 augustss { 4000000, UI_BR_4000000, UIRDA_4000000 },
187 1.1 augustss { 1152000, UI_BR_1152000, UIRDA_1152000 },
188 1.1 augustss { 576000, UI_BR_576000, UIRDA_576000 },
189 1.1 augustss { 115200, UI_BR_115200, UIRDA_115200 },
190 1.1 augustss { 57600, UI_BR_57600, UIRDA_57600 },
191 1.1 augustss { 38400, UI_BR_38400, UIRDA_38400 },
192 1.1 augustss { 19200, UI_BR_19200, UIRDA_19200 },
193 1.1 augustss { 9600, UI_BR_9600, UIRDA_9600 },
194 1.1 augustss { 2400, UI_BR_2400, UIRDA_2400 },
195 1.1 augustss };
196 1.1 augustss
197 1.1 augustss struct uirda_softc {
198 1.1 augustss USBBASEDEVICE sc_dev;
199 1.1 augustss usbd_device_handle sc_udev;
200 1.1 augustss usbd_interface_handle sc_iface;
201 1.1 augustss
202 1.1 augustss struct lock sc_rd_buf_lk;
203 1.1 augustss u_int8_t *sc_rd_buf;
204 1.1 augustss int sc_rd_addr;
205 1.1 augustss usbd_pipe_handle sc_rd_pipe;
206 1.1 augustss usbd_xfer_handle sc_rd_xfer;
207 1.1 augustss struct selinfo sc_rd_sel;
208 1.1 augustss u_int sc_rd_count;
209 1.1 augustss
210 1.1 augustss struct lock sc_wr_buf_lk;
211 1.1 augustss u_int8_t *sc_wr_buf;
212 1.1 augustss int sc_wr_addr;
213 1.1 augustss usbd_xfer_handle sc_wr_xfer;
214 1.1 augustss usbd_pipe_handle sc_wr_pipe;
215 1.1 augustss
216 1.1 augustss struct device *sc_child;
217 1.1 augustss struct irda_params sc_params;
218 1.1 augustss usb_irda_descriptor_t sc_irdadesc;
219 1.1 augustss
220 1.1 augustss int sc_refcnt;
221 1.1 augustss char sc_dying;
222 1.1 augustss };
223 1.1 augustss
224 1.1 augustss #define UIRDA_WR_TIMEOUT 200
225 1.1 augustss
226 1.1 augustss int uirda_open(void *h, int flag, int mode, struct proc *p);
227 1.1 augustss int uirda_close(void *h, int flag, int mode, struct proc *p);
228 1.1 augustss int uirda_read(void *h, struct uio *uio, int flag);
229 1.1 augustss int uirda_write(void *h, struct uio *uio, int flag);
230 1.1 augustss int uirda_set_params(void *h, struct irda_params *params);
231 1.1 augustss int uirda_get_speeds(void *h, int *speeds);
232 1.1 augustss int uirda_get_turnarounds(void *h, int *times);
233 1.1 augustss int uirda_poll(void *h, int events, struct proc *p);
234 1.1 augustss
235 1.1 augustss struct irframe_methods uirda_methods = {
236 1.1 augustss uirda_open, uirda_close, uirda_read, uirda_write, uirda_poll,
237 1.1 augustss uirda_set_params, uirda_get_speeds, uirda_get_turnarounds
238 1.1 augustss };
239 1.1 augustss
240 1.1 augustss void uirda_rd_cb(usbd_xfer_handle xfer, usbd_private_handle priv,
241 1.1 augustss usbd_status status);
242 1.1 augustss usbd_status uirda_start_read(struct uirda_softc *sc);
243 1.1 augustss
244 1.1 augustss usb_descriptor_t *usb_find_desc(usbd_device_handle dev, int type);
245 1.1 augustss
246 1.1 augustss /*
247 1.1 augustss * These devices don't quite follow the spec. Speed changing is broken
248 1.1 augustss * and they don't handle windows.
249 1.1 augustss * But we change speed in a safe way, and don't use windows now.
250 1.1 augustss * Some devices also seem to have an interrupt pipe that can be ignored.
251 1.1 augustss *
252 1.1 augustss * Table information taken from Linux driver.
253 1.1 augustss */
254 1.1 augustss Static const struct usb_devno uirda_devs[] = {
255 1.1 augustss { USB_VENDOR_ACTISYS, USB_PRODUCT_ACTISYS_IR2000U },
256 1.1 augustss { USB_VENDOR_EXTENDED, USB_PRODUCT_EXTENDED_XTNDACCESS },
257 1.1 augustss { USB_VENDOR_KAWATSU, USB_PRODUCT_KAWATSU_KC180 },
258 1.1 augustss };
259 1.1 augustss #define uirda_lookup(v, p) (usb_lookup(uirda_devs, v, p))
260 1.1 augustss
261 1.1 augustss USB_DECLARE_DRIVER(uirda);
262 1.1 augustss
263 1.1 augustss USB_MATCH(uirda)
264 1.1 augustss {
265 1.1 augustss USB_MATCH_START(uirda, uaa);
266 1.1 augustss usb_interface_descriptor_t *id;
267 1.1 augustss
268 1.1 augustss DPRINTFN(50,("uirda_match\n"));
269 1.1 augustss
270 1.1 augustss if (uaa->iface == NULL)
271 1.1 augustss return (UMATCH_NONE);
272 1.1 augustss
273 1.1 augustss if (uirda_lookup(uaa->vendor, uaa->product) != NULL)
274 1.1 augustss return (UMATCH_VENDOR_PRODUCT);
275 1.1 augustss
276 1.1 augustss id = usbd_get_interface_descriptor(uaa->iface);
277 1.1 augustss if (id != NULL &&
278 1.1 augustss id->bInterfaceClass == UICLASS_APPL_SPEC &&
279 1.1 augustss id->bInterfaceSubClass == UISUBCLASS_IRDA &&
280 1.1 augustss id->bInterfaceProtocol == UIPROTO_IRDA)
281 1.1 augustss return (UMATCH_IFACECLASS_IFACESUBCLASS_IFACEPROTO);
282 1.1 augustss return (UMATCH_NONE);
283 1.1 augustss }
284 1.1 augustss
285 1.1 augustss USB_ATTACH(uirda)
286 1.1 augustss {
287 1.1 augustss USB_ATTACH_START(uirda, sc, uaa);
288 1.1 augustss usbd_device_handle dev = uaa->device;
289 1.1 augustss usbd_interface_handle iface = uaa->iface;
290 1.1 augustss char devinfo[1024];
291 1.1 augustss usb_endpoint_descriptor_t *ed;
292 1.1 augustss usbd_status err;
293 1.1 augustss u_int8_t epcount;
294 1.1 augustss int i;
295 1.1 augustss struct ir_attach_args ia;
296 1.1 augustss
297 1.1 augustss DPRINTFN(10,("uirda_attach: sc=%p\n", sc));
298 1.1 augustss
299 1.1 augustss usbd_devinfo(dev, 0, devinfo);
300 1.1 augustss USB_ATTACH_SETUP;
301 1.1 augustss printf("%s: %s\n", USBDEVNAME(sc->sc_dev), devinfo);
302 1.1 augustss
303 1.1 augustss sc->sc_udev = dev;
304 1.1 augustss sc->sc_iface = iface;
305 1.1 augustss
306 1.1 augustss epcount = 0;
307 1.1 augustss (void)usbd_endpoint_count(iface, &epcount);
308 1.1 augustss
309 1.1 augustss sc->sc_rd_addr = -1;
310 1.1 augustss sc->sc_wr_addr = -1;
311 1.1 augustss for (i = 0; i < epcount; i++) {
312 1.1 augustss ed = usbd_interface2endpoint_descriptor(iface, i);
313 1.1 augustss if (ed == NULL) {
314 1.1 augustss printf("%s: couldn't get ep %d\n",
315 1.1 augustss USBDEVNAME(sc->sc_dev), i);
316 1.1 augustss USB_ATTACH_ERROR_RETURN;
317 1.1 augustss }
318 1.1 augustss if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_IN &&
319 1.1 augustss UE_GET_XFERTYPE(ed->bmAttributes) == UE_BULK) {
320 1.1 augustss sc->sc_rd_addr = ed->bEndpointAddress;
321 1.1 augustss } else if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_OUT &&
322 1.1 augustss UE_GET_XFERTYPE(ed->bmAttributes) == UE_BULK) {
323 1.1 augustss sc->sc_wr_addr = ed->bEndpointAddress;
324 1.1 augustss }
325 1.1 augustss }
326 1.1 augustss if (sc->sc_rd_addr == -1 || sc->sc_wr_addr == -1) {
327 1.1 augustss printf("%s: missing endpoint\n", USBDEVNAME(sc->sc_dev));
328 1.1 augustss USB_ATTACH_ERROR_RETURN;
329 1.1 augustss }
330 1.1 augustss
331 1.1 augustss /* Get the IrDA descriptor */
332 1.1 augustss err = usbd_get_desc(sc->sc_udev, UDESC_IRDA, 0,
333 1.1 augustss USB_IRDA_DESCRIPTOR_SIZE, &sc->sc_irdadesc);
334 1.1 augustss if (err) {
335 1.1 augustss /* maybe it's embedded in the config desc */
336 1.1 augustss void *d = usb_find_desc(sc->sc_udev, UDESC_IRDA);
337 1.1 augustss if (d == NULL) {
338 1.1 augustss printf("%s: Cannot get IrDA descriptor\n",
339 1.1 augustss USBDEVNAME(sc->sc_dev));
340 1.1 augustss USB_ATTACH_ERROR_RETURN;
341 1.1 augustss }
342 1.1 augustss memcpy(&sc->sc_irdadesc, d, USB_IRDA_DESCRIPTOR_SIZE);
343 1.1 augustss }
344 1.1 augustss
345 1.1 augustss
346 1.1 augustss DPRINTFN(10, ("uirda_attach: %p\n", sc->sc_udev));
347 1.1 augustss
348 1.1 augustss usbd_add_drv_event(USB_EVENT_DRIVER_ATTACH, sc->sc_udev,
349 1.1 augustss USBDEV(sc->sc_dev));
350 1.1 augustss
351 1.1 augustss ia.ia_type = IR_TYPE_IRFRAME;
352 1.1 augustss ia.ia_methods = &uirda_methods;
353 1.1 augustss ia.ia_handle = sc;
354 1.1 augustss
355 1.1 augustss sc->sc_child = config_found(self, &ia, ir_print);
356 1.1 augustss
357 1.1 augustss USB_ATTACH_SUCCESS_RETURN;
358 1.1 augustss }
359 1.1 augustss
360 1.1 augustss USB_DETACH(uirda)
361 1.1 augustss {
362 1.1 augustss USB_DETACH_START(uirda, sc);
363 1.1 augustss int s;
364 1.1 augustss int rv = 0;
365 1.1 augustss
366 1.1 augustss DPRINTF(("uirda_detach: sc=%p flags=%d\n", sc, flags));
367 1.1 augustss
368 1.1 augustss sc->sc_dying = 1;
369 1.1 augustss /* Abort all pipes. Causes processes waiting for transfer to wake. */
370 1.1 augustss if (sc->sc_rd_pipe != NULL) {
371 1.1 augustss usbd_abort_pipe(sc->sc_rd_pipe);
372 1.1 augustss usbd_close_pipe(sc->sc_rd_pipe);
373 1.1 augustss sc->sc_rd_pipe = NULL;
374 1.1 augustss }
375 1.1 augustss if (sc->sc_wr_pipe != NULL) {
376 1.1 augustss usbd_abort_pipe(sc->sc_wr_pipe);
377 1.1 augustss usbd_close_pipe(sc->sc_wr_pipe);
378 1.1 augustss sc->sc_wr_pipe = NULL;
379 1.1 augustss }
380 1.1 augustss wakeup(&sc->sc_rd_count);
381 1.1 augustss
382 1.1 augustss s = splusb();
383 1.1 augustss if (--sc->sc_refcnt >= 0) {
384 1.1 augustss /* Wait for processes to go away. */
385 1.1 augustss usb_detach_wait(USBDEV(sc->sc_dev));
386 1.1 augustss }
387 1.1 augustss splx(s);
388 1.1 augustss
389 1.1 augustss if (sc->sc_child != NULL) {
390 1.1 augustss rv = config_detach(sc->sc_child, flags);
391 1.1 augustss sc->sc_child = NULL;
392 1.1 augustss }
393 1.1 augustss
394 1.1 augustss usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev,
395 1.1 augustss USBDEV(sc->sc_dev));
396 1.1 augustss
397 1.1 augustss return (rv);
398 1.1 augustss }
399 1.1 augustss
400 1.1 augustss int
401 1.1 augustss uirda_activate(device_ptr_t self, enum devact act)
402 1.1 augustss {
403 1.1 augustss struct uirda_softc *sc = (struct uirda_softc *)self;
404 1.1 augustss int error = 0;
405 1.1 augustss
406 1.1 augustss switch (act) {
407 1.1 augustss case DVACT_ACTIVATE:
408 1.1 augustss return (EOPNOTSUPP);
409 1.1 augustss break;
410 1.1 augustss
411 1.1 augustss case DVACT_DEACTIVATE:
412 1.1 augustss sc->sc_dying = 1;
413 1.1 augustss if (sc->sc_child != NULL)
414 1.1 augustss error = config_deactivate(sc->sc_child);
415 1.1 augustss break;
416 1.1 augustss }
417 1.1 augustss return (error);
418 1.1 augustss }
419 1.1 augustss
420 1.1 augustss int
421 1.1 augustss uirda_open(void *h, int flag, int mode, struct proc *p)
422 1.1 augustss {
423 1.1 augustss struct uirda_softc *sc = h;
424 1.1 augustss int error;
425 1.1 augustss usbd_status err;
426 1.1 augustss
427 1.1 augustss DPRINTF(("%s: sc=%p\n", __FUNCTION__, sc));
428 1.1 augustss
429 1.1 augustss err = usbd_open_pipe(sc->sc_iface, sc->sc_rd_addr, 0, &sc->sc_rd_pipe);
430 1.1 augustss if (err) {
431 1.1 augustss error = EIO;
432 1.1 augustss goto bad1;
433 1.1 augustss }
434 1.1 augustss err = usbd_open_pipe(sc->sc_iface, sc->sc_wr_addr, 0, &sc->sc_wr_pipe);
435 1.1 augustss if (err) {
436 1.1 augustss error = EIO;
437 1.1 augustss goto bad2;
438 1.1 augustss }
439 1.1 augustss sc->sc_rd_xfer = usbd_alloc_xfer(sc->sc_udev);
440 1.1 augustss if (sc->sc_rd_xfer == NULL) {
441 1.1 augustss error = ENOMEM;
442 1.1 augustss goto bad3;
443 1.1 augustss }
444 1.1 augustss sc->sc_wr_xfer = usbd_alloc_xfer(sc->sc_udev);
445 1.1 augustss if (sc->sc_wr_xfer == NULL) {
446 1.1 augustss error = ENOMEM;
447 1.1 augustss goto bad4;
448 1.1 augustss }
449 1.1 augustss
450 1.2 augustss sc->sc_rd_count = 0;
451 1.2 augustss sc->sc_params.speed = 0;
452 1.2 augustss sc->sc_params.ebofs = 0;
453 1.2 augustss sc->sc_params.maxsize = 0;
454 1.2 augustss
455 1.1 augustss return (0);
456 1.1 augustss
457 1.1 augustss bad4:
458 1.1 augustss usbd_free_xfer(sc->sc_rd_xfer);
459 1.1 augustss sc->sc_rd_xfer = NULL;
460 1.1 augustss bad3:
461 1.1 augustss usbd_close_pipe(sc->sc_wr_pipe);
462 1.1 augustss sc->sc_wr_pipe = NULL;
463 1.1 augustss bad2:
464 1.1 augustss usbd_close_pipe(sc->sc_rd_pipe);
465 1.1 augustss sc->sc_rd_pipe = NULL;
466 1.1 augustss bad1:
467 1.1 augustss return (error);
468 1.1 augustss }
469 1.1 augustss
470 1.1 augustss int
471 1.1 augustss uirda_close(void *h, int flag, int mode, struct proc *p)
472 1.1 augustss {
473 1.1 augustss struct uirda_softc *sc = h;
474 1.1 augustss
475 1.1 augustss DPRINTF(("%s: sc=%p\n", __FUNCTION__, sc));
476 1.1 augustss
477 1.1 augustss if (sc->sc_rd_pipe != NULL) {
478 1.1 augustss usbd_abort_pipe(sc->sc_rd_pipe);
479 1.1 augustss usbd_close_pipe(sc->sc_rd_pipe);
480 1.1 augustss sc->sc_rd_pipe = NULL;
481 1.1 augustss }
482 1.2 augustss if (sc->sc_wr_pipe != NULL) {
483 1.2 augustss usbd_abort_pipe(sc->sc_wr_pipe);
484 1.2 augustss usbd_close_pipe(sc->sc_wr_pipe);
485 1.2 augustss sc->sc_wr_pipe = NULL;
486 1.2 augustss }
487 1.1 augustss if (sc->sc_rd_xfer != NULL) {
488 1.1 augustss usbd_free_xfer(sc->sc_rd_xfer);
489 1.1 augustss sc->sc_rd_xfer = NULL;
490 1.2 augustss sc->sc_rd_buf = NULL;
491 1.1 augustss }
492 1.1 augustss if (sc->sc_wr_xfer != NULL) {
493 1.1 augustss usbd_free_xfer(sc->sc_wr_xfer);
494 1.1 augustss sc->sc_wr_xfer = NULL;
495 1.2 augustss sc->sc_wr_buf = NULL;
496 1.1 augustss }
497 1.1 augustss
498 1.1 augustss return (0);
499 1.1 augustss }
500 1.1 augustss
501 1.1 augustss int
502 1.1 augustss uirda_read(void *h, struct uio *uio, int flag)
503 1.1 augustss {
504 1.1 augustss struct uirda_softc *sc = h;
505 1.1 augustss usbd_status err;
506 1.1 augustss int s;
507 1.1 augustss int error;
508 1.2 augustss u_int n;
509 1.1 augustss
510 1.2 augustss DPRINTFN(1,("%s: sc=%p\n", __FUNCTION__, sc));
511 1.1 augustss
512 1.1 augustss if (sc->sc_dying)
513 1.1 augustss return (EIO);
514 1.1 augustss
515 1.1 augustss if (sc->sc_rd_buf == NULL)
516 1.1 augustss return (EINVAL);
517 1.1 augustss
518 1.2 augustss sc->sc_refcnt++;
519 1.2 augustss
520 1.2 augustss do {
521 1.2 augustss s = splusb();
522 1.2 augustss while (sc->sc_rd_count == 0) {
523 1.2 augustss error = tsleep(&sc->sc_rd_count, PZERO | PCATCH,
524 1.2 augustss "uirdrd", 0);
525 1.2 augustss if (sc->sc_dying)
526 1.2 augustss error = EIO;
527 1.2 augustss if (error) {
528 1.2 augustss splx(s);
529 1.2 augustss DPRINTF(("uirda_read: tsleep() = %d\n", error));
530 1.2 augustss goto ret;
531 1.2 augustss }
532 1.1 augustss }
533 1.2 augustss splx(s);
534 1.2 augustss
535 1.2 augustss lockmgr(&sc->sc_rd_buf_lk, LK_EXCLUSIVE, NULL);
536 1.2 augustss n = sc->sc_rd_count - 1;
537 1.2 augustss DPRINTFN(1,("%s: sc=%p n=%u\n", __FUNCTION__, sc, n));
538 1.2 augustss if (n > uio->uio_resid)
539 1.2 augustss error = EINVAL;
540 1.2 augustss else
541 1.2 augustss error = uiomove(sc->sc_rd_buf+1, n, uio);
542 1.2 augustss sc->sc_rd_count = 0;
543 1.2 augustss lockmgr(&sc->sc_rd_buf_lk, LK_RELEASE, NULL);
544 1.2 augustss
545 1.2 augustss err = uirda_start_read(sc);
546 1.2 augustss /* XXX check err */
547 1.2 augustss
548 1.2 augustss } while (n == 0);
549 1.2 augustss
550 1.2 augustss DPRINTFN(1,("uirda_read: return %d\n", error));
551 1.1 augustss
552 1.2 augustss ret:
553 1.1 augustss if (--sc->sc_refcnt < 0)
554 1.1 augustss usb_detach_wakeup(USBDEV(sc->sc_dev));
555 1.2 augustss return (error);
556 1.1 augustss }
557 1.1 augustss
558 1.1 augustss int
559 1.1 augustss uirda_write(void *h, struct uio *uio, int flag)
560 1.1 augustss {
561 1.1 augustss struct uirda_softc *sc = h;
562 1.1 augustss usbd_status err;
563 1.1 augustss u_int32_t n;
564 1.1 augustss int error = 0;
565 1.1 augustss
566 1.2 augustss DPRINTFN(1,("%s: sc=%p\n", __FUNCTION__, sc));
567 1.1 augustss
568 1.1 augustss if (sc->sc_dying)
569 1.1 augustss return (EIO);
570 1.1 augustss
571 1.1 augustss n = uio->uio_resid;
572 1.1 augustss if (n > sc->sc_params.maxsize || sc->sc_wr_buf == NULL)
573 1.1 augustss return (EINVAL);
574 1.1 augustss
575 1.1 augustss sc->sc_refcnt++;
576 1.1 augustss lockmgr(&sc->sc_wr_buf_lk, LK_EXCLUSIVE, NULL);
577 1.1 augustss
578 1.1 augustss sc->sc_wr_buf[0] = UIRDA_EB_NO_CHANGE | UIRDA_NO_SPEED;
579 1.1 augustss error = uiomove(sc->sc_wr_buf+1, n, uio);
580 1.1 augustss if (!error) {
581 1.1 augustss DPRINTFN(1, ("uirdawrite: transfer %d bytes\n", n));
582 1.1 augustss
583 1.1 augustss err = usbd_bulk_transfer(sc->sc_wr_xfer, sc->sc_wr_pipe,
584 1.1 augustss USBD_FORCE_SHORT_XFER | USBD_NO_COPY,
585 1.1 augustss UIRDA_WR_TIMEOUT,
586 1.1 augustss sc->sc_wr_buf, &n, "uirdawr");
587 1.1 augustss DPRINTFN(2, ("uirdawrite: err=%d\n", err));
588 1.1 augustss if (err) {
589 1.1 augustss if (err == USBD_INTERRUPTED)
590 1.1 augustss error = EINTR;
591 1.1 augustss else if (err == USBD_TIMEOUT)
592 1.1 augustss error = ETIMEDOUT;
593 1.1 augustss else
594 1.1 augustss error = EIO;
595 1.1 augustss }
596 1.1 augustss }
597 1.1 augustss
598 1.1 augustss lockmgr(&sc->sc_wr_buf_lk, LK_RELEASE, NULL);
599 1.1 augustss if (--sc->sc_refcnt < 0)
600 1.1 augustss usb_detach_wakeup(USBDEV(sc->sc_dev));
601 1.1 augustss
602 1.1 augustss DPRINTF(("%s: sc=%p done\n", __FUNCTION__, sc));
603 1.1 augustss return (error);
604 1.1 augustss }
605 1.1 augustss
606 1.1 augustss int
607 1.1 augustss uirda_poll(void *h, int events, struct proc *p)
608 1.1 augustss {
609 1.1 augustss struct uirda_softc *sc = h;
610 1.1 augustss int revents = 0;
611 1.1 augustss int s;
612 1.1 augustss
613 1.2 augustss DPRINTFN(1,("%s: sc=%p\n", __FUNCTION__, sc));
614 1.1 augustss
615 1.1 augustss s = splusb();
616 1.1 augustss if (events & (POLLOUT | POLLWRNORM))
617 1.1 augustss revents |= events & (POLLOUT | POLLWRNORM);
618 1.1 augustss if (events & (POLLIN | POLLRDNORM)) {
619 1.1 augustss if (sc->sc_rd_count != 0) {
620 1.1 augustss DPRINTF(("%s: have data\n", __FUNCTION__));
621 1.1 augustss revents |= events & (POLLIN | POLLRDNORM);
622 1.1 augustss } else {
623 1.1 augustss DPRINTF(("%s: recording select\n", __FUNCTION__));
624 1.1 augustss selrecord(p, &sc->sc_rd_sel);
625 1.1 augustss }
626 1.1 augustss }
627 1.1 augustss splx(s);
628 1.1 augustss
629 1.1 augustss return (revents);
630 1.1 augustss }
631 1.1 augustss
632 1.1 augustss int
633 1.1 augustss uirda_set_params(void *h, struct irda_params *p)
634 1.1 augustss {
635 1.1 augustss struct uirda_softc *sc = h;
636 1.1 augustss usbd_status err;
637 1.1 augustss int i;
638 1.1 augustss u_int8_t hdr;
639 1.1 augustss u_int32_t n;
640 1.1 augustss u_int mask;
641 1.1 augustss
642 1.1 augustss DPRINTF(("%s: sc=%p, speed=%d ebofs=%d maxsize=%d\n", __FUNCTION__,
643 1.1 augustss sc, p->speed, p->ebofs, p->maxsize));
644 1.1 augustss
645 1.1 augustss if (sc->sc_dying)
646 1.1 augustss return (EIO);
647 1.1 augustss
648 1.1 augustss hdr = 0;
649 1.1 augustss if (p->ebofs != sc->sc_params.ebofs) {
650 1.1 augustss /* round up ebofs */
651 1.1 augustss mask = sc->sc_irdadesc.bmAdditionalBOFs;
652 1.1 augustss for (i = 0; i < UIRDA_NEBOFS; i++) {
653 1.1 augustss if ((mask & uirda_ebofs[i].mask) &&
654 1.1 augustss uirda_ebofs[i].count >= p->ebofs) {
655 1.1 augustss hdr = uirda_ebofs[i].header;
656 1.1 augustss goto found1;
657 1.1 augustss }
658 1.1 augustss }
659 1.1 augustss /* no good value found */
660 1.1 augustss return (EINVAL);
661 1.1 augustss found1:
662 1.1 augustss ;
663 1.1 augustss
664 1.1 augustss }
665 1.1 augustss if (p->speed != sc->sc_params.speed) {
666 1.1 augustss /* find speed */
667 1.1 augustss mask = UGETW(sc->sc_irdadesc.wBaudRate);
668 1.1 augustss for (i = 0; i < UIRDA_NSPEEDS; i++) {
669 1.1 augustss if ((mask & uirda_speeds[i].mask) &&
670 1.1 augustss uirda_speeds[i].speed == p->speed) {
671 1.1 augustss hdr |= uirda_speeds[i].header;
672 1.1 augustss goto found2;
673 1.1 augustss }
674 1.1 augustss }
675 1.1 augustss /* no good value found */
676 1.1 augustss return (EINVAL);
677 1.1 augustss found2:
678 1.1 augustss ;
679 1.1 augustss }
680 1.1 augustss if (p->maxsize != sc->sc_params.maxsize) {
681 1.2 augustss DPRINTF(("%s: new buffers, old size=%d\n", __FUNCTION__,
682 1.2 augustss sc->sc_params.maxsize));
683 1.1 augustss if (p->maxsize > 10000 || p < 0) /* XXX */
684 1.1 augustss return (EINVAL);
685 1.1 augustss
686 1.1 augustss /* Change the write buffer */
687 1.1 augustss lockmgr(&sc->sc_wr_buf_lk, LK_EXCLUSIVE, NULL);
688 1.1 augustss if (sc->sc_wr_buf != NULL)
689 1.1 augustss usbd_free_buffer(sc->sc_wr_xfer);
690 1.1 augustss sc->sc_wr_buf = usbd_alloc_buffer(sc->sc_wr_xfer, p->maxsize+1);
691 1.1 augustss lockmgr(&sc->sc_wr_buf_lk, LK_RELEASE, NULL);
692 1.1 augustss if (sc->sc_wr_buf == NULL)
693 1.1 augustss return (ENOMEM);
694 1.1 augustss
695 1.1 augustss /* Change the read buffer */
696 1.1 augustss lockmgr(&sc->sc_rd_buf_lk, LK_EXCLUSIVE, NULL);
697 1.1 augustss usbd_abort_pipe(sc->sc_rd_pipe);
698 1.1 augustss if (sc->sc_rd_buf != NULL)
699 1.1 augustss usbd_free_buffer(sc->sc_rd_xfer);
700 1.1 augustss sc->sc_rd_buf = usbd_alloc_buffer(sc->sc_rd_xfer, p->maxsize+1);
701 1.1 augustss sc->sc_rd_count = 0;
702 1.2 augustss if (sc->sc_rd_buf == NULL) {
703 1.2 augustss lockmgr(&sc->sc_rd_buf_lk, LK_RELEASE, NULL);
704 1.2 augustss return (ENOMEM);
705 1.2 augustss }
706 1.1 augustss err = uirda_start_read(sc); /* XXX check */
707 1.1 augustss lockmgr(&sc->sc_rd_buf_lk, LK_RELEASE, NULL);
708 1.1 augustss }
709 1.1 augustss if (hdr != 0) {
710 1.1 augustss /*
711 1.1 augustss * A change has occurred, transmit a 0 length frame with
712 1.1 augustss * the new settings. The 0 length frame is not sent to the
713 1.1 augustss * device.
714 1.1 augustss */
715 1.2 augustss DPRINTFN(1,("%s: sc=%p setting speed\n", __FUNCTION__, sc));
716 1.2 augustss lockmgr(&sc->sc_wr_buf_lk, LK_EXCLUSIVE, NULL);
717 1.2 augustss sc->sc_wr_buf[0] = hdr;
718 1.2 augustss n = 1;
719 1.1 augustss err = usbd_bulk_transfer(sc->sc_wr_xfer, sc->sc_wr_pipe,
720 1.1 augustss USBD_FORCE_SHORT_XFER | USBD_NO_COPY,
721 1.2 augustss UIRDA_WR_TIMEOUT, sc->sc_wr_buf, &n, "uirdast");
722 1.2 augustss lockmgr(&sc->sc_wr_buf_lk, LK_RELEASE, NULL);
723 1.2 augustss if (err) {
724 1.1 augustss printf("%s: set failed, err=%d\n",
725 1.1 augustss USBDEVNAME(sc->sc_dev), err);
726 1.1 augustss usbd_clear_endpoint_stall(sc->sc_wr_pipe);
727 1.1 augustss }
728 1.1 augustss }
729 1.1 augustss
730 1.1 augustss sc->sc_params = *p;
731 1.1 augustss
732 1.1 augustss return (0);
733 1.1 augustss }
734 1.1 augustss
735 1.1 augustss int
736 1.1 augustss uirda_get_speeds(void *h, int *speeds)
737 1.1 augustss {
738 1.1 augustss struct uirda_softc *sc = h;
739 1.1 augustss u_int isp;
740 1.1 augustss u_int usp;
741 1.1 augustss
742 1.1 augustss DPRINTF(("%s: sc=%p\n", __FUNCTION__, sc));
743 1.1 augustss
744 1.1 augustss if (sc->sc_dying)
745 1.1 augustss return (EIO);
746 1.1 augustss
747 1.1 augustss usp = UGETW(sc->sc_irdadesc.wBaudRate);
748 1.1 augustss isp = 0;
749 1.1 augustss if (usp & UI_BR_4000000) isp |= IRDA_SPEED_4000000;
750 1.1 augustss if (usp & UI_BR_1152000) isp |= IRDA_SPEED_1152000;
751 1.1 augustss if (usp & UI_BR_576000) isp |= IRDA_SPEED_576000;
752 1.1 augustss if (usp & UI_BR_115200) isp |= IRDA_SPEED_115200;
753 1.1 augustss if (usp & UI_BR_57600) isp |= IRDA_SPEED_57600;
754 1.1 augustss if (usp & UI_BR_38400) isp |= IRDA_SPEED_38400;
755 1.1 augustss if (usp & UI_BR_19200) isp |= IRDA_SPEED_19200;
756 1.1 augustss if (usp & UI_BR_9600) isp |= IRDA_SPEED_9600;
757 1.1 augustss if (usp & UI_BR_2400) isp |= IRDA_SPEED_2400;
758 1.1 augustss *speeds = isp;
759 1.1 augustss return (0);
760 1.1 augustss }
761 1.1 augustss
762 1.1 augustss int
763 1.1 augustss uirda_get_turnarounds(void *h, int *turnarounds)
764 1.1 augustss {
765 1.1 augustss struct uirda_softc *sc = h;
766 1.1 augustss u_int ita;
767 1.1 augustss u_int uta;
768 1.1 augustss
769 1.1 augustss DPRINTF(("%s: sc=%p\n", __FUNCTION__, sc));
770 1.1 augustss
771 1.1 augustss if (sc->sc_dying)
772 1.1 augustss return (EIO);
773 1.1 augustss
774 1.1 augustss uta = sc->sc_irdadesc.bmMinTurnaroundTime;
775 1.1 augustss ita = 0;
776 1.1 augustss if (uta & UI_TA_0) ita |= IRDA_TURNT_0;
777 1.1 augustss if (uta & UI_TA_10) ita |= IRDA_TURNT_10;
778 1.1 augustss if (uta & UI_TA_50) ita |= IRDA_TURNT_50;
779 1.1 augustss if (uta & UI_TA_100) ita |= IRDA_TURNT_100;
780 1.1 augustss if (uta & UI_TA_500) ita |= IRDA_TURNT_500;
781 1.1 augustss if (uta & UI_TA_1000) ita |= IRDA_TURNT_1000;
782 1.1 augustss if (uta & UI_TA_5000) ita |= IRDA_TURNT_5000;
783 1.1 augustss if (uta & UI_TA_10000) ita |= IRDA_TURNT_10000;
784 1.1 augustss *turnarounds = ita;
785 1.1 augustss return (0);
786 1.1 augustss }
787 1.1 augustss
788 1.1 augustss void
789 1.1 augustss uirda_rd_cb(usbd_xfer_handle xfer, usbd_private_handle priv,
790 1.1 augustss usbd_status status)
791 1.1 augustss {
792 1.1 augustss struct uirda_softc *sc = priv;
793 1.1 augustss u_int32_t size;
794 1.1 augustss
795 1.2 augustss DPRINTFN(1,("%s: sc=%p\n", __FUNCTION__, sc));
796 1.2 augustss
797 1.1 augustss if (status == USBD_CANCELLED) /* this is normal */
798 1.1 augustss return;
799 1.1 augustss if (status) {
800 1.1 augustss /* what can we do? */
801 1.1 augustss }
802 1.1 augustss
803 1.1 augustss usbd_get_xfer_status(xfer, NULL, NULL, &size, NULL);
804 1.2 augustss DPRINTFN(1,("%s: sc=%p size=%u\n", __FUNCTION__, sc, size));
805 1.1 augustss sc->sc_rd_count = size;
806 1.2 augustss wakeup(&sc->sc_rd_count); /* XXX should use flag */
807 1.1 augustss selwakeup(&sc->sc_rd_sel);
808 1.1 augustss }
809 1.1 augustss
810 1.1 augustss usbd_status
811 1.1 augustss uirda_start_read(struct uirda_softc *sc)
812 1.1 augustss {
813 1.1 augustss usbd_status err;
814 1.1 augustss
815 1.2 augustss DPRINTFN(1,("%s: sc=%p\n", __FUNCTION__, sc));
816 1.2 augustss
817 1.1 augustss if (sc->sc_dying)
818 1.1 augustss return (USBD_IOERROR);
819 1.1 augustss
820 1.1 augustss usbd_setup_xfer(sc->sc_rd_xfer, sc->sc_rd_pipe, sc, sc->sc_rd_buf,
821 1.1 augustss sc->sc_params.maxsize+1,
822 1.2 augustss USBD_SHORT_XFER_OK | USBD_NO_COPY,
823 1.2 augustss USBD_NO_TIMEOUT, uirda_rd_cb);
824 1.1 augustss err = usbd_transfer(sc->sc_rd_xfer);
825 1.1 augustss if (err != USBD_IN_PROGRESS)
826 1.1 augustss return (err);
827 1.1 augustss return (USBD_NORMAL_COMPLETION);
828 1.1 augustss }
829 1.1 augustss
830 1.1 augustss
831 1.1 augustss
832 1.1 augustss
833 1.1 augustss usb_descriptor_t *
834 1.1 augustss usb_find_desc(usbd_device_handle dev, int type)
835 1.1 augustss {
836 1.1 augustss usb_descriptor_t *desc;
837 1.1 augustss usb_config_descriptor_t *cd = usbd_get_config_descriptor(dev);
838 1.1 augustss uByte *p = (uByte *)cd;
839 1.1 augustss uByte *end = p + UGETW(cd->wTotalLength);
840 1.1 augustss
841 1.1 augustss while (p < end) {
842 1.1 augustss desc = (usb_descriptor_t *)p;
843 1.1 augustss if (desc->bDescriptorType == type)
844 1.1 augustss return (desc);
845 1.1 augustss p += desc->bLength;
846 1.1 augustss }
847 1.1 augustss
848 1.1 augustss return (NULL);
849 1.1 augustss }
850