Nuke the code specific to NetBSD/OpenBSD/FreeBSD at first. I doubt anyone
[dragonfly.git] / sys / dev / usbmisc / ulpt / ulpt.c
1 /*
2  * $NetBSD: ulpt.c,v 1.55 2002/10/23 09:14:01 jdolecek Exp $
3  * $FreeBSD: src/sys/dev/usb/ulpt.c,v 1.59 2003/09/28 20:48:13 phk Exp $
4  * $DragonFly: src/sys/dev/usbmisc/ulpt/ulpt.c,v 1.17 2007/06/27 12:28:00 hasso Exp $
5  */
6
7 /*
8  * Copyright (c) 1998 The NetBSD Foundation, Inc.
9  * All rights reserved.
10  *
11  * This code is derived from software contributed to The NetBSD Foundation
12  * by Lennart Augustsson (lennart@augustsson.net) at
13  * Carlstedt Research & Technology.
14  *
15  * Redistribution and use in source and binary forms, with or without
16  * modification, are permitted provided that the following conditions
17  * are met:
18  * 1. Redistributions of source code must retain the above copyright
19  *    notice, this list of conditions and the following disclaimer.
20  * 2. Redistributions in binary form must reproduce the above copyright
21  *    notice, this list of conditions and the following disclaimer in the
22  *    documentation and/or other materials provided with the distribution.
23  * 3. All advertising materials mentioning features or use of this software
24  *    must display the following acknowledgement:
25  *        This product includes software developed by the NetBSD
26  *        Foundation, Inc. and its contributors.
27  * 4. Neither the name of The NetBSD Foundation nor the names of its
28  *    contributors may be used to endorse or promote products derived
29  *    from this software without specific prior written permission.
30  *
31  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
32  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
33  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
34  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
35  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
36  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
37  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
38  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
39  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
40  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41  * POSSIBILITY OF SUCH DAMAGE.
42  */
43
44 /*
45  * Printer Class spec: http://www.usb.org/developers/data/devclass/usbprint109.PDF
46  */
47
48 #include <sys/param.h>
49 #include <sys/systm.h>
50 #include <sys/proc.h>
51 #include <sys/kernel.h>
52 #include <sys/ioccom.h>
53 #include <sys/module.h>
54 #include <sys/bus.h>
55 #include <sys/uio.h>
56 #include <sys/conf.h>
57 #include <sys/device.h>
58 #include <sys/syslog.h>
59 #include <sys/sysctl.h>
60 #include <sys/thread2.h>
61
62 #include <bus/usb/usb.h>
63 #include <bus/usb/usbdi.h>
64 #include <bus/usb/usbdi_util.h>
65 #include <bus/usb/usbdevs.h>
66 #include <bus/usb/usb_quirks.h>
67
68 #define TIMEOUT         hz*16   /* wait up to 16 seconds for a ready */
69 #define STEP            hz/4
70
71 #define ULPT_BSIZE      16384
72
73 #ifdef USB_DEBUG
74 #define DPRINTF(x)      if (ulptdebug) logprintf x
75 #define DPRINTFN(n,x)   if (ulptdebug>(n)) logprintf x
76 int     ulptdebug = 0;
77 SYSCTL_NODE(_hw_usb, OID_AUTO, ulpt, CTLFLAG_RW, 0, "USB ulpt");
78 SYSCTL_INT(_hw_usb_ulpt, OID_AUTO, debug, CTLFLAG_RW,
79            &ulptdebug, 0, "ulpt debug level");
80 #else
81 #define DPRINTF(x)
82 #define DPRINTFN(n,x)
83 #endif
84
85 #define UR_GET_DEVICE_ID 0
86 #define UR_GET_PORT_STATUS 1
87 #define UR_SOFT_RESET 2
88
89 #define LPS_NERR                0x08    /* printer no error */
90 #define LPS_SELECT              0x10    /* printer selected */
91 #define LPS_NOPAPER             0x20    /* printer out of paper */
92 #define LPS_INVERT      (LPS_SELECT|LPS_NERR)
93 #define LPS_MASK        (LPS_SELECT|LPS_NERR|LPS_NOPAPER)
94
95 struct ulpt_softc {
96         USBBASEDEVICE sc_dev;
97         usbd_device_handle sc_udev;     /* device */
98         usbd_interface_handle sc_iface; /* interface */
99         int sc_ifaceno;
100
101         int sc_out;
102         usbd_pipe_handle sc_out_pipe;   /* bulk out pipe */
103
104         int sc_in;
105         usbd_pipe_handle sc_in_pipe;    /* bulk in pipe */
106         usbd_xfer_handle sc_in_xfer1;
107         usbd_xfer_handle sc_in_xfer2;
108         u_char sc_junk[64];     /* somewhere to dump input */
109
110         u_char sc_state;
111 #define ULPT_OPEN       0x01    /* device is open */
112 #define ULPT_OBUSY      0x02    /* printer is busy doing output */
113 #define ULPT_INIT       0x04    /* waiting to initialize for open */
114         u_char sc_flags;
115 #define ULPT_NOPRIME    0x40    /* don't prime on open */
116         u_char sc_laststatus;
117
118         int sc_refcnt;
119         u_char sc_dying;
120 };
121
122 Static d_open_t ulptopen;
123 Static d_close_t ulptclose;
124 Static d_write_t ulptwrite;
125 Static d_ioctl_t ulptioctl;
126
127 #define ULPT_CDEV_MAJOR 113
128
129 Static struct dev_ops ulpt_ops = {
130         { "ulpt", ULPT_CDEV_MAJOR, 0 },
131         .d_open =       ulptopen,
132         .d_close =      ulptclose,
133         .d_write =      ulptwrite,
134         .d_ioctl =      ulptioctl,
135 };
136
137 void ulpt_disco(void *);
138
139 int ulpt_do_write(struct ulpt_softc *, struct uio *uio, int);
140 int ulpt_status(struct ulpt_softc *);
141 void ulpt_reset(struct ulpt_softc *);
142 int ulpt_statusmsg(u_char, struct ulpt_softc *);
143
144 #if 0
145 void ieee1284_print_id(char *);
146 #endif
147
148 #define ULPTUNIT(s)     (minor(s) & 0x1f)
149 #define ULPTFLAGS(s)    (minor(s) & 0xe0)
150
151
152 USB_DECLARE_DRIVER(ulpt);
153
154 USB_MATCH(ulpt)
155 {
156         USB_MATCH_START(ulpt, uaa);
157         usb_interface_descriptor_t *id;
158
159         DPRINTFN(10,("ulpt_match\n"));
160         if (uaa->iface == NULL)
161                 return (UMATCH_NONE);
162         id = usbd_get_interface_descriptor(uaa->iface);
163         if (id != NULL &&
164             id->bInterfaceClass == UICLASS_PRINTER &&
165             id->bInterfaceSubClass == UISUBCLASS_PRINTER &&
166             (id->bInterfaceProtocol == UIPROTO_PRINTER_UNI ||
167              id->bInterfaceProtocol == UIPROTO_PRINTER_BI ||
168              id->bInterfaceProtocol == UIPROTO_PRINTER_1284))
169                 return (UMATCH_IFACECLASS_IFACESUBCLASS_IFACEPROTO);
170         return (UMATCH_NONE);
171 }
172
173 USB_ATTACH(ulpt)
174 {
175         USB_ATTACH_START(ulpt, sc, uaa);
176         usbd_device_handle dev = uaa->device;
177         usbd_interface_handle iface = uaa->iface;
178         usb_interface_descriptor_t *ifcd = usbd_get_interface_descriptor(iface);
179         usb_interface_descriptor_t *id, *iend;
180         usb_config_descriptor_t *cdesc;
181         usbd_status err;
182         char devinfo[1024];
183         usb_endpoint_descriptor_t *ed;
184         u_int8_t epcount;
185         int i, altno;
186
187         DPRINTFN(10,("ulpt_attach: sc=%p\n", sc));
188         usbd_devinfo(dev, 0, devinfo);
189         USB_ATTACH_SETUP;
190         kprintf("%s: %s, iclass %d/%d\n", USBDEVNAME(sc->sc_dev),
191                devinfo, ifcd->bInterfaceClass, ifcd->bInterfaceSubClass);
192
193         /* XXX
194          * Stepping through the alternate settings needs to be abstracted out.
195          */
196         cdesc = usbd_get_config_descriptor(dev);
197         if (cdesc == NULL) {
198                 kprintf("%s: failed to get configuration descriptor\n",
199                        USBDEVNAME(sc->sc_dev));
200                 USB_ATTACH_ERROR_RETURN;
201         }
202         iend = (usb_interface_descriptor_t *)
203                    ((char *)cdesc + UGETW(cdesc->wTotalLength));
204 #ifdef DIAGNOSTIC
205         if (ifcd < (usb_interface_descriptor_t *)cdesc ||
206             ifcd >= iend)
207                 panic("ulpt: iface desc out of range");
208 #endif
209         /* Step through all the descriptors looking for bidir mode */
210         for (id = ifcd, altno = 0;
211              id < iend;
212              id = (void *)((char *)id + id->bLength)) {
213                 if (id->bDescriptorType == UDESC_INTERFACE &&
214                     id->bInterfaceNumber == ifcd->bInterfaceNumber) {
215                         if (id->bInterfaceClass == UICLASS_PRINTER &&
216                             id->bInterfaceSubClass == UISUBCLASS_PRINTER &&
217                             (id->bInterfaceProtocol == UIPROTO_PRINTER_BI /* ||
218                              id->bInterfaceProtocol == UIPROTO_PRINTER_1284 */))
219                                 goto found;
220                         altno++;
221                 }
222         }
223         id = ifcd;              /* not found, use original */
224  found:
225         if (id != ifcd) {
226                 /* Found a new bidir setting */
227                 DPRINTF(("ulpt_attach: set altno = %d\n", altno));
228                 err = usbd_set_interface(iface, altno);
229                 if (err) {
230                         kprintf("%s: setting alternate interface failed\n",
231                                USBDEVNAME(sc->sc_dev));
232                         sc->sc_dying = 1;
233                         USB_ATTACH_ERROR_RETURN;
234                 }
235         }
236
237         epcount = 0;
238         (void)usbd_endpoint_count(iface, &epcount);
239
240         sc->sc_in = -1;
241         sc->sc_out = -1;
242         for (i = 0; i < epcount; i++) {
243                 ed = usbd_interface2endpoint_descriptor(iface, i);
244                 if (ed == NULL) {
245                         kprintf("%s: couldn't get ep %d\n",
246                             USBDEVNAME(sc->sc_dev), i);
247                         USB_ATTACH_ERROR_RETURN;
248                 }
249                 if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_IN &&
250                     UE_GET_XFERTYPE(ed->bmAttributes) == UE_BULK) {
251                         sc->sc_in = ed->bEndpointAddress;
252                 } else if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_OUT &&
253                            UE_GET_XFERTYPE(ed->bmAttributes) == UE_BULK) {
254                         sc->sc_out = ed->bEndpointAddress;
255                 }
256         }
257         if (sc->sc_out == -1) {
258                 kprintf("%s: could not find bulk out endpoint\n",
259                     USBDEVNAME(sc->sc_dev));
260                 sc->sc_dying = 1;
261                 USB_ATTACH_ERROR_RETURN;
262         }
263
264         if (usbd_get_quirks(dev)->uq_flags & UQ_BROKEN_BIDIR) {
265                 /* This device doesn't handle reading properly. */
266                 sc->sc_in = -1;
267         }
268
269         kprintf("%s: using %s-directional mode\n", USBDEVNAME(sc->sc_dev),
270                sc->sc_in >= 0 ? "bi" : "uni");
271
272         DPRINTFN(10, ("ulpt_attach: bulk=%d\n", sc->sc_out));
273
274         sc->sc_iface = iface;
275         sc->sc_ifaceno = id->bInterfaceNumber;
276         sc->sc_udev = dev;
277
278 #if 0
279 /*
280  * This code is disabled because for some mysterious reason it causes
281  * printing not to work.  But only sometimes, and mostly with
282  * UHCI and less often with OHCI.  *sigh*
283  */
284         {
285         usb_config_descriptor_t *cd = usbd_get_config_descriptor(dev);
286         usb_device_request_t req;
287         int len, alen;
288
289         req.bmRequestType = UT_READ_CLASS_INTERFACE;
290         req.bRequest = UR_GET_DEVICE_ID;
291         USETW(req.wValue, cd->bConfigurationValue);
292         USETW2(req.wIndex, id->bInterfaceNumber, id->bAlternateSetting);
293         USETW(req.wLength, sizeof devinfo - 1);
294         err = usbd_do_request_flags(dev, &req, devinfo, USBD_SHORT_XFER_OK,
295                   &alen, USBD_DEFAULT_TIMEOUT);
296         if (err) {
297                 kprintf("%s: cannot get device id\n", USBDEVNAME(sc->sc_dev));
298         } else if (alen <= 2) {
299                 kprintf("%s: empty device id, no printer connected?\n",
300                        USBDEVNAME(sc->sc_dev));
301         } else {
302                 /* devinfo now contains an IEEE-1284 device ID */
303                 len = ((devinfo[0] & 0xff) << 8) | (devinfo[1] & 0xff);
304                 if (len > sizeof devinfo - 3)
305                         len = sizeof devinfo - 3;
306                 devinfo[len] = 0;
307                 kprintf("%s: device id <", USBDEVNAME(sc->sc_dev));
308                 ieee1284_print_id(devinfo+2);
309                 kprintf(">\n");
310         }
311         }
312 #endif
313
314         dev_ops_add(&ulpt_ops, -1, device_get_unit(self));
315         make_dev(&ulpt_ops, device_get_unit(self),
316                 UID_ROOT, GID_OPERATOR, 0644, "ulpt%d", device_get_unit(self));
317         make_dev(&ulpt_ops,
318                 device_get_unit(self)|ULPT_NOPRIME,
319                 UID_ROOT, GID_OPERATOR, 0644, "unlpt%d", device_get_unit(self));
320
321         usbd_add_drv_event(USB_EVENT_DRIVER_ATTACH, sc->sc_udev,
322                            sc->sc_dev);
323
324         USB_ATTACH_SUCCESS_RETURN;
325 }
326
327 USB_DETACH(ulpt)
328 {
329         USB_DETACH_START(ulpt, sc);
330
331         DPRINTF(("ulpt_detach: sc=%p\n", sc));
332
333         sc->sc_dying = 1;
334         if (sc->sc_out_pipe != NULL)
335                 usbd_abort_pipe(sc->sc_out_pipe);
336         if (sc->sc_in_pipe != NULL)
337                 usbd_abort_pipe(sc->sc_in_pipe);
338
339         /*
340          * Wait for any ongoing operations to complete before we actually
341          * close things down.
342          */
343
344         crit_enter();
345         --sc->sc_refcnt;
346         if (sc->sc_refcnt >= 0) {
347                 kprintf("%s: waiting for idle\n", USBDEVNAME(sc->sc_dev));
348                 while (sc->sc_refcnt >= 0)
349                         usb_detach_wait(sc->sc_dev);
350                 kprintf("%s: idle wait done\n", USBDEVNAME(sc->sc_dev));
351         }
352         crit_exit();
353
354         dev_ops_remove(&ulpt_ops, -1, device_get_unit(self));
355
356         usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev,
357                            sc->sc_dev);
358
359         return (0);
360 }
361
362 int
363 ulpt_status(struct ulpt_softc *sc)
364 {
365         usb_device_request_t req;
366         usbd_status err;
367         u_char status;
368
369         req.bmRequestType = UT_READ_CLASS_INTERFACE;
370         req.bRequest = UR_GET_PORT_STATUS;
371         USETW(req.wValue, 0);
372         USETW(req.wIndex, sc->sc_ifaceno);
373         USETW(req.wLength, 1);
374         err = usbd_do_request(sc->sc_udev, &req, &status);
375         DPRINTFN(1, ("ulpt_status: status=0x%02x err=%d\n", status, err));
376         if (!err)
377                 return (status);
378         else
379                 return (0);
380 }
381
382 void
383 ulpt_reset(struct ulpt_softc *sc)
384 {
385         usb_device_request_t req;
386
387         DPRINTFN(1, ("ulpt_reset\n"));
388         req.bRequest = UR_SOFT_RESET;
389         USETW(req.wValue, 0);
390         USETW(req.wIndex, sc->sc_ifaceno);
391         USETW(req.wLength, 0);
392
393         /*
394          * There was a mistake in the USB printer 1.0 spec that gave the
395          * request type as UT_WRITE_CLASS_OTHER; it should have been
396          * UT_WRITE_CLASS_INTERFACE.  Many printers use the old one,
397          * so we try both.
398          */
399         req.bmRequestType = UT_WRITE_CLASS_OTHER;
400         if (usbd_do_request(sc->sc_udev, &req, 0)) {    /* 1.0 */
401                 req.bmRequestType = UT_WRITE_CLASS_INTERFACE;
402                 (void)usbd_do_request(sc->sc_udev, &req, 0); /* 1.1 */
403         }
404 }
405
406 static void
407 ulpt_input(usbd_xfer_handle xfer, usbd_private_handle priv, usbd_status status)
408 {
409         struct ulpt_softc *sc = priv;
410         u_int32_t count;
411
412         /* Don't loop on errors or 0-length input. */
413         usbd_get_xfer_status(xfer, NULL, NULL, &count, NULL);
414         if (status != USBD_NORMAL_COMPLETION || count == 0)
415                 return;
416
417         DPRINTFN(2,("ulpt_input: got some data\n"));
418         /* Do it again. */
419         if (xfer == sc->sc_in_xfer1)
420                 usbd_transfer(sc->sc_in_xfer2);
421         else
422                 usbd_transfer(sc->sc_in_xfer1);
423 }
424
425 int ulptusein = 1;
426
427 /*
428  * Reset the printer, then wait until it's selected and not busy.
429  */
430 int
431 ulptopen(struct dev_open_args *ap)
432 {
433         cdev_t dev = ap->a_head.a_dev;
434         u_char flags = ULPTFLAGS(dev);
435         struct ulpt_softc *sc;
436         usbd_status err;
437         int spin, error;
438
439         USB_GET_SC_OPEN(ulpt, ULPTUNIT(dev), sc);
440
441         if (sc == NULL || sc->sc_iface == NULL || sc->sc_dying)
442                 return (ENXIO);
443
444         if (sc->sc_state)
445                 return (EBUSY);
446
447         sc->sc_state = ULPT_INIT;
448         sc->sc_flags = flags;
449         DPRINTF(("ulptopen: flags=0x%x\n", (unsigned)flags));
450
451 #if defined(USB_DEBUG)
452         /* Ignoring these flags might not be a good idea */
453         if ((flags & ~ULPT_NOPRIME) != 0)
454                 kprintf("ulptopen: flags ignored: %b\n", flags,
455                         "\20\3POS_INIT\4POS_ACK\6PRIME_OPEN\7AUTOLF\10BYPASS");
456 #endif
457
458         error = 0;
459         sc->sc_refcnt++;
460
461         if ((flags & ULPT_NOPRIME) == 0) {
462                 ulpt_reset(sc);
463                 if (sc->sc_dying) {
464                         error = ENXIO;
465                         sc->sc_state = 0;
466                         goto done;
467                 }
468         }
469
470         for (spin = 0; (ulpt_status(sc) & LPS_SELECT) == 0; spin += STEP) {
471                 DPRINTF(("ulpt_open: waiting a while\n"));
472                 if (spin >= TIMEOUT) {
473                         error = EBUSY;
474                         sc->sc_state = 0;
475                         goto done;
476                 }
477
478                 /* wait 1/4 second, give up if we get a signal */
479                 error = tsleep((caddr_t)sc, PCATCH, "ulptop", STEP);
480                 if (error != EWOULDBLOCK) {
481                         sc->sc_state = 0;
482                         goto done;
483                 }
484
485                 if (sc->sc_dying) {
486                         error = ENXIO;
487                         sc->sc_state = 0;
488                         goto done;
489                 }
490         }
491
492         err = usbd_open_pipe(sc->sc_iface, sc->sc_out, 0, &sc->sc_out_pipe);
493         if (err) {
494                 sc->sc_state = 0;
495                 error = EIO;
496                 goto done;
497         }
498
499         if (ulptusein && sc->sc_in != -1) {
500                 DPRINTF(("ulpt_open: open input pipe\n"));
501                 err = usbd_open_pipe(sc->sc_iface, sc->sc_in,0,&sc->sc_in_pipe);
502                 if (err) {
503                         error = EIO;
504                         usbd_close_pipe(sc->sc_out_pipe);
505                         sc->sc_out_pipe = NULL;
506                         sc->sc_state = 0;
507                         goto done;
508                 }
509                 sc->sc_in_xfer1 = usbd_alloc_xfer(sc->sc_udev);
510                 sc->sc_in_xfer2 = usbd_alloc_xfer(sc->sc_udev);
511                 if (sc->sc_in_xfer1 == NULL || sc->sc_in_xfer2 == NULL) {
512                         error = ENOMEM;
513                         if (sc->sc_in_xfer1 != NULL) {
514                                 usbd_free_xfer(sc->sc_in_xfer1);
515                                 sc->sc_in_xfer1 = NULL;
516                         }
517                         if (sc->sc_in_xfer2 != NULL) {
518                                 usbd_free_xfer(sc->sc_in_xfer2);
519                                 sc->sc_in_xfer2 = NULL;
520                         }
521                         usbd_close_pipe(sc->sc_out_pipe);
522                         sc->sc_out_pipe = NULL;
523                         usbd_close_pipe(sc->sc_in_pipe);
524                         sc->sc_in_pipe = NULL;
525                         sc->sc_state = 0;
526                         goto done;
527                 }
528                 usbd_setup_xfer(sc->sc_in_xfer1, sc->sc_in_pipe, sc,
529                     sc->sc_junk, sizeof sc->sc_junk, USBD_SHORT_XFER_OK,
530                     USBD_NO_TIMEOUT, ulpt_input);
531                 usbd_setup_xfer(sc->sc_in_xfer2, sc->sc_in_pipe, sc,
532                     sc->sc_junk, sizeof sc->sc_junk, USBD_SHORT_XFER_OK,
533                     USBD_NO_TIMEOUT, ulpt_input);
534                 usbd_transfer(sc->sc_in_xfer1); /* ignore failed start */
535         }
536
537         sc->sc_state = ULPT_OPEN;
538
539 done:
540         if (--sc->sc_refcnt < 0)
541                 usb_detach_wakeup(sc->sc_dev);
542
543         DPRINTF(("ulptopen: done, error=%d\n", error));
544         return (error);
545 }
546
547 int
548 ulpt_statusmsg(u_char status, struct ulpt_softc *sc)
549 {
550         u_char new;
551
552         status = (status ^ LPS_INVERT) & LPS_MASK;
553         new = status & ~sc->sc_laststatus;
554         sc->sc_laststatus = status;
555
556         if (new & LPS_SELECT)
557                 log(LOG_NOTICE, "%s: offline\n", USBDEVNAME(sc->sc_dev));
558         else if (new & LPS_NOPAPER)
559                 log(LOG_NOTICE, "%s: out of paper\n", USBDEVNAME(sc->sc_dev));
560         else if (new & LPS_NERR)
561                 log(LOG_NOTICE, "%s: output error\n", USBDEVNAME(sc->sc_dev));
562
563         return (status);
564 }
565
566 int
567 ulptclose(struct dev_close_args *ap)
568 {
569         cdev_t dev = ap->a_head.a_dev;
570         struct ulpt_softc *sc;
571
572         USB_GET_SC(ulpt, ULPTUNIT(dev), sc);
573
574         if (sc->sc_state != ULPT_OPEN)
575                 /* We are being forced to close before the open completed. */
576                 return (0);
577
578         if (sc->sc_out_pipe != NULL) {
579                 usbd_close_pipe(sc->sc_out_pipe);
580                 sc->sc_out_pipe = NULL;
581         }
582         if (sc->sc_in_pipe != NULL) {
583                 usbd_abort_pipe(sc->sc_in_pipe);
584                 usbd_close_pipe(sc->sc_in_pipe);
585                 sc->sc_in_pipe = NULL;
586                 if (sc->sc_in_xfer1 != NULL) {
587                         usbd_free_xfer(sc->sc_in_xfer1);
588                         sc->sc_in_xfer1 = NULL;
589                 }
590                 if (sc->sc_in_xfer2 != NULL) {
591                         usbd_free_xfer(sc->sc_in_xfer2);
592                         sc->sc_in_xfer2 = NULL;
593                 }
594         }
595
596         sc->sc_state = 0;
597
598         DPRINTF(("ulptclose: closed\n"));
599         return (0);
600 }
601
602 int
603 ulpt_do_write(struct ulpt_softc *sc, struct uio *uio, int flags)
604 {
605         u_int32_t n;
606         int error = 0;
607         void *bufp;
608         usbd_xfer_handle xfer;
609         usbd_status err;
610
611         DPRINTF(("ulptwrite\n"));
612         xfer = usbd_alloc_xfer(sc->sc_udev);
613         if (xfer == NULL)
614                 return (ENOMEM);
615         bufp = usbd_alloc_buffer(xfer, ULPT_BSIZE);
616         if (bufp == NULL) {
617                 usbd_free_xfer(xfer);
618                 return (ENOMEM);
619         }
620         while ((n = min(ULPT_BSIZE, uio->uio_resid)) != 0) {
621                 ulpt_statusmsg(ulpt_status(sc), sc);
622                 error = uiomove(bufp, n, uio);
623                 if (error)
624                         break;
625                 DPRINTFN(1, ("ulptwrite: transfer %d bytes\n", n));
626                 err = usbd_bulk_transfer(xfer, sc->sc_out_pipe, USBD_NO_COPY,
627                           USBD_NO_TIMEOUT, bufp, &n, "ulptwr");
628                 if (err) {
629                         DPRINTF(("ulptwrite: error=%d\n", err));
630                         error = EIO;
631                         break;
632                 }
633         }
634         usbd_free_xfer(xfer);
635
636         return (error);
637 }
638
639 int
640 ulptwrite(struct dev_write_args *ap)
641 {
642         cdev_t dev = ap->a_head.a_dev;
643         struct ulpt_softc *sc;
644         int error;
645
646         USB_GET_SC(ulpt, ULPTUNIT(dev), sc);
647
648         if (sc->sc_dying)
649                 return (EIO);
650
651         sc->sc_refcnt++;
652         error = ulpt_do_write(sc, ap->a_uio, ap->a_ioflag);
653         if (--sc->sc_refcnt < 0)
654                 usb_detach_wakeup(sc->sc_dev);
655         return (error);
656 }
657
658 int
659 ulptioctl(struct dev_ioctl_args *ap)
660 {
661         int error = 0;
662
663         switch (ap->a_cmd) {
664         default:
665                 error = ENODEV;
666         }
667
668         return (error);
669 }
670
671 #if 0
672 /* XXX This does not belong here. */
673 /*
674  * Print select parts of an IEEE 1284 device ID.
675  */
676 void
677 ieee1284_print_id(char *str)
678 {
679         char *p, *q;
680
681         for (p = str-1; p; p = strchr(p, ';')) {
682                 p++;            /* skip ';' */
683                 if (strncmp(p, "MFG:", 4) == 0 ||
684                     strncmp(p, "MANUFACTURER:", 14) == 0 ||
685                     strncmp(p, "MDL:", 4) == 0 ||
686                     strncmp(p, "MODEL:", 6) == 0) {
687                         q = strchr(p, ';');
688                         if (q)
689                                 kprintf("%.*s", (int)(q - p + 1), p);
690                 }
691         }
692 }
693 #endif
694
695 DRIVER_MODULE(ulpt, uhub, ulpt_driver, ulpt_devclass, usbd_driver_load, 0);
696