1 /* $NetBSD: ulpt.c,v 1.11 1999/01/10 11:13:36 augustss Exp $ */ 2 3 /* 4 * Copyright (c) 1998 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Lennart Augustsson (augustss@carlstedt.se) at 9 * Carlstedt Research & Technology. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 3. All advertising materials mentioning features or use of this software 20 * must display the following acknowledgement: 21 * This product includes software developed by the NetBSD 22 * Foundation, Inc. and its contributors. 23 * 4. Neither the name of The NetBSD Foundation nor the names of its 24 * contributors may be used to endorse or promote products derived 25 * from this software without specific prior written permission. 26 * 27 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 28 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 29 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 30 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 31 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 32 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 33 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 34 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 35 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 36 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 37 * POSSIBILITY OF SUCH DAMAGE. 38 */ 39 40 /* 41 * Printer Class spec: http://www.usb.org/developers/data/usbprn10.pdf 42 */ 43 44 #include <sys/param.h> 45 #include <sys/systm.h> 46 #include <sys/proc.h> 47 #include <sys/malloc.h> 48 #include <sys/kernel.h> 49 #if defined(__NetBSD__) 50 #include <sys/device.h> 51 #include <sys/ioctl.h> 52 #elif defined(__FreeBSD__) 53 #include <sys/ioccom.h> 54 #include <sys/module.h> 55 #include <sys/bus.h> 56 #endif 57 #include <sys/uio.h> 58 #include <sys/conf.h> 59 #include <sys/syslog.h> 60 61 #include <dev/usb/usb.h> 62 #include <dev/usb/usbdi.h> 63 #include <dev/usb/usbdi_util.h> 64 #include <dev/usb/usbdevs.h> 65 #include <dev/usb/usb_quirks.h> 66 67 #define TIMEOUT hz*16 /* wait up to 16 seconds for a ready */ 68 #define STEP hz/4 69 70 #define LPTPRI (PZERO+8) 71 #define ULPT_BSIZE 1024 72 73 #ifdef USB_DEBUG 74 #define DPRINTF(x) if (ulptdebug) printf x 75 #define DPRINTFN(n,x) if (ulptdebug>(n)) printf x 76 int ulptdebug = 0; 77 #else 78 #define DPRINTF(x) 79 #define DPRINTFN(n,x) 80 #endif 81 82 #define UR_GET_DEVICE_ID 0 83 #define UR_GET_PORT_STATUS 1 84 #define UR_SOFT_RESET 2 85 86 #define LPS_NERR 0x08 /* printer no error */ 87 #define LPS_SELECT 0x10 /* printer selected */ 88 #define LPS_NOPAPER 0x20 /* printer out of paper */ 89 #define LPS_INVERT (LPS_SELECT|LPS_NERR) 90 #define LPS_MASK (LPS_SELECT|LPS_NERR|LPS_NOPAPER) 91 92 struct ulpt_softc { 93 bdevice sc_dev; 94 usbd_device_handle sc_udev; /* device */ 95 usbd_interface_handle sc_iface; /* interface */ 96 int sc_ifaceno; 97 usbd_pipe_handle sc_bulkpipe; /* bulk pipe */ 98 int sc_bulk; 99 100 u_char sc_state; 101 #define ULPT_OPEN 0x01 /* device is open */ 102 #define ULPT_OBUSY 0x02 /* printer is busy doing output */ 103 #define ULPT_INIT 0x04 /* waiting to initialize for open */ 104 u_char sc_flags; 105 #define ULPT_NOPRIME 0x40 /* don't prime on open */ 106 u_char sc_laststatus; 107 }; 108 109 int ulptopen __P((dev_t, int, int, struct proc *)); 110 int ulptclose __P((dev_t, int, int, struct proc *p)); 111 int ulptwrite __P((dev_t, struct uio *uio, int)); 112 int ulptioctl __P((dev_t, u_long, caddr_t, int, struct proc *)); 113 void ulpt_disco __P((void *)); 114 115 int ulpt_status __P((struct ulpt_softc *)); 116 void ulpt_reset __P((struct ulpt_softc *)); 117 int ulpt_statusmsg __P((u_char, struct ulpt_softc *)); 118 119 #define ULPTUNIT(s) (minor(s) & 0x1f) 120 #define ULPTFLAGS(s) (minor(s) & 0xe0) 121 122 USB_DECLARE_DRIVER(ulpt); 123 124 USB_MATCH(ulpt) 125 { 126 USB_MATCH_START(ulpt, uaa); 127 usb_interface_descriptor_t *id; 128 129 DPRINTFN(10,("ulpt_match\n")); 130 if (!uaa->iface) 131 return (UMATCH_NONE); 132 id = usbd_get_interface_descriptor(uaa->iface); 133 if (id && 134 id->bInterfaceClass == UCLASS_PRINTER && 135 id->bInterfaceSubClass == USUBCLASS_PRINTER && 136 (id->bInterfaceProtocol == UPROTO_PRINTER_UNI || 137 id->bInterfaceProtocol == UPROTO_PRINTER_BI)) 138 return (UMATCH_IFACECLASS_IFACESUBCLASS_IFACEPROTO); 139 return (UMATCH_NONE); 140 } 141 142 USB_ATTACH(ulpt) 143 { 144 USB_ATTACH_START(ulpt, sc, uaa); 145 usbd_device_handle dev = uaa->device; 146 usbd_interface_handle iface = uaa->iface; 147 usb_interface_descriptor_t *id = usbd_get_interface_descriptor(iface); 148 #if 0 149 usb_config_descriptor_t *cd = usbd_get_config_descriptor(dev); 150 usb_device_request_t req; 151 #endif 152 char devinfo[1024]; 153 usb_endpoint_descriptor_t *ed; 154 usbd_status r; 155 156 DPRINTFN(10,("ulpt_attach: sc=%p\n", sc)); 157 usbd_devinfo(dev, 0, devinfo); 158 USB_ATTACH_SETUP; 159 printf("%s: %s, iclass %d/%d\n", USBDEVNAME(sc->sc_dev), 160 devinfo, id->bInterfaceClass, id->bInterfaceSubClass); 161 162 /* Figure out which endpoint is the bulk out endpoint. */ 163 ed = usbd_interface2endpoint_descriptor(iface, 0); 164 if (!ed) 165 goto nobulk; 166 if ((ed->bEndpointAddress & UE_IN) != UE_OUT || 167 (ed->bmAttributes & UE_XFERTYPE) != UE_BULK) { 168 /* In case we are using a bidir protocol... */ 169 ed = usbd_interface2endpoint_descriptor(iface, 1); 170 if (!ed) 171 goto nobulk; 172 if ((ed->bEndpointAddress & UE_IN) != UE_OUT || 173 (ed->bmAttributes & UE_XFERTYPE) != UE_BULK) 174 goto nobulk; 175 } 176 sc->sc_bulk = ed->bEndpointAddress; 177 DPRINTFN(10, ("ulpt_attach: bulk=%d\n", sc->sc_bulk)); 178 179 sc->sc_iface = iface; 180 r = usbd_interface2device_handle(iface, &sc->sc_udev); 181 if (r != USBD_NORMAL_COMPLETION) 182 USB_ATTACH_ERROR_RETURN; 183 sc->sc_ifaceno = id->bInterfaceNumber; 184 185 #if 0 186 XXX needs a different way to read the id string since the length 187 is unknown. usbd_do_request() returns error on a short transfer. 188 req.bmRequestType = UT_READ_CLASS_INTERFACE; 189 req.bRequest = UR_GET_DEVICE_ID; 190 USETW(req.wValue, cd->bConfigurationValue); 191 USETW2(req.wIndex, id->bInterfaceNumber, id->bAlternateSetting); 192 USETW(req.wLength, sizeof devinfo - 1); 193 r = usbd_do_request(dev, &req, devinfo); 194 if (r == USBD_NORMAL_COMPLETION) { 195 int len; 196 char *idstr; 197 len = (devinfo[0] << 8) | (devinfo[1] & 0xff); 198 /* devinfo now contains an IEEE-1284 device ID */ 199 idstr = devinfo+2; 200 idstr[len] = 0; 201 printf("%s: device id <%s>\n", USBDEVNAME(sc->sc_dev), idstr); 202 } else { 203 printf("%s: cannot get device id\n", USBDEVNAME(sc->sc_dev)); 204 } 205 #endif 206 207 USB_ATTACH_SUCCESS_RETURN; 208 209 nobulk: 210 printf("%s: could not find bulk endpoint\n", USBDEVNAME(sc->sc_dev)); 211 USB_ATTACH_ERROR_RETURN; 212 } 213 214 int 215 ulpt_status(sc) 216 struct ulpt_softc *sc; 217 { 218 usb_device_request_t req; 219 usbd_status r; 220 u_char status; 221 222 req.bmRequestType = UT_READ_CLASS_INTERFACE; 223 req.bRequest = UR_GET_PORT_STATUS; 224 USETW(req.wValue, 0); 225 USETW(req.wIndex, sc->sc_ifaceno); 226 USETW(req.wLength, 1); 227 r = usbd_do_request(sc->sc_udev, &req, &status); 228 DPRINTFN(1, ("ulpt_status: status=0x%02x r=%d\n", status, r)); 229 if (r == USBD_NORMAL_COMPLETION) 230 return (status); 231 else 232 return (0); 233 } 234 235 void 236 ulpt_reset(sc) 237 struct ulpt_softc *sc; 238 { 239 usb_device_request_t req; 240 241 DPRINTFN(1, ("ulpt_reset\n")); 242 req.bmRequestType = UT_WRITE_CLASS_OTHER; 243 req.bRequest = UR_SOFT_RESET; 244 USETW(req.wValue, 0); 245 USETW(req.wIndex, sc->sc_ifaceno); 246 USETW(req.wLength, 0); 247 (void)usbd_do_request(sc->sc_udev, &req, 0); 248 } 249 250 /* 251 * Reset the printer, then wait until it's selected and not busy. 252 */ 253 int 254 ulptopen(dev, flag, mode, p) 255 dev_t dev; 256 int flag; 257 int mode; 258 struct proc *p; 259 { 260 u_char flags = ULPTFLAGS(dev); 261 usbd_status r; 262 int spin, error; 263 USB_GET_SC_OPEN(ulpt, ULPTUNIT(dev), sc); 264 265 if (!sc || !sc->sc_iface) 266 return ENXIO; 267 268 if (sc->sc_state) 269 return EBUSY; 270 271 sc->sc_state = ULPT_INIT; 272 sc->sc_flags = flags; 273 DPRINTF(("ulptopen: flags=0x%x\n", (unsigned)flags)); 274 275 if ((flags & ULPT_NOPRIME) == 0) 276 ulpt_reset(sc); 277 278 for (spin = 0; (ulpt_status(sc) & LPS_SELECT) == 0; spin += STEP) { 279 if (spin >= TIMEOUT) { 280 sc->sc_state = 0; 281 return EBUSY; 282 } 283 284 /* wait 1/4 second, give up if we get a signal */ 285 error = tsleep((caddr_t)sc, LPTPRI | PCATCH, "ulptop", STEP); 286 if (error != EWOULDBLOCK) { 287 sc->sc_state = 0; 288 return error; 289 } 290 } 291 292 r = usbd_open_pipe(sc->sc_iface, sc->sc_bulk, 0, &sc->sc_bulkpipe); 293 if (r != USBD_NORMAL_COMPLETION) { 294 sc->sc_state = 0; 295 return (EIO); 296 } 297 298 sc->sc_state = ULPT_OPEN; 299 300 DPRINTF(("ulptopen: done\n")); 301 return (0); 302 } 303 304 int 305 ulpt_statusmsg(status, sc) 306 u_char status; 307 struct ulpt_softc *sc; 308 { 309 u_char new; 310 311 status = (status ^ LPS_INVERT) & LPS_MASK; 312 new = status & ~sc->sc_laststatus; 313 sc->sc_laststatus = status; 314 315 if (new & LPS_SELECT) 316 log(LOG_NOTICE, "%s: offline\n", USBDEVNAME(sc->sc_dev)); 317 else if (new & LPS_NOPAPER) 318 log(LOG_NOTICE, "%s: out of paper\n", USBDEVNAME(sc->sc_dev)); 319 else if (new & LPS_NERR) 320 log(LOG_NOTICE, "%s: output error\n", USBDEVNAME(sc->sc_dev)); 321 322 return status; 323 } 324 325 int 326 ulptclose(dev, flag, mode, p) 327 dev_t dev; 328 int flag; 329 int mode; 330 struct proc *p; 331 { 332 USB_GET_SC(ulpt, ULPTUNIT(dev), sc); 333 334 usbd_close_pipe(sc->sc_bulkpipe); 335 336 sc->sc_state = 0; 337 338 DPRINTF(("ulptclose: closed\n")); 339 return (0); 340 } 341 342 int 343 ulptwrite(dev, uio, flags) 344 dev_t dev; 345 struct uio *uio; 346 int flags; 347 { 348 size_t n; 349 int error = 0; 350 char buf[ULPT_BSIZE]; 351 usbd_request_handle reqh; 352 usbd_status r; 353 USB_GET_SC(ulpt, ULPTUNIT(dev), sc); 354 355 DPRINTF(("ulptwrite\n")); 356 reqh = usbd_alloc_request(); 357 if (reqh == 0) 358 return (ENOMEM); 359 while ((n = min(ULPT_BSIZE, uio->uio_resid)) != 0) { 360 ulpt_statusmsg(ulpt_status(sc), sc); 361 error = uiomove(buf, n, uio); 362 if (error) 363 break; 364 /* XXX use callback to enable interrupt? */ 365 r = usbd_setup_request(reqh, sc->sc_bulkpipe, 0, buf, n, 366 0, USBD_NO_TIMEOUT, 0); 367 if (r != USBD_NORMAL_COMPLETION) { 368 error = EIO; 369 break; 370 } 371 DPRINTFN(1, ("ulptwrite: transfer %d bytes\n", n)); 372 r = usbd_sync_transfer(reqh); 373 if (r != USBD_NORMAL_COMPLETION) { 374 DPRINTF(("ulptwrite: error=%d\n", r)); 375 usbd_clear_endpoint_stall(sc->sc_bulkpipe); 376 error = EIO; 377 break; 378 } 379 } 380 usbd_free_request(reqh); 381 return (error); 382 } 383 384 int 385 ulptioctl(dev, cmd, data, flag, p) 386 dev_t dev; 387 u_long cmd; 388 caddr_t data; 389 int flag; 390 struct proc *p; 391 { 392 int error = 0; 393 394 switch (cmd) { 395 default: 396 error = ENODEV; 397 } 398 399 return error; 400 } 401 402 #if defined(__FreeBSD__) 403 static int 404 ulpt_detach(device_t self) 405 { 406 struct ulpt_softc *sc = device_get_softc(self); 407 char *devinfo = (char *) device_get_desc(self); 408 409 if (devinfo) { 410 device_set_desc(self, NULL); 411 free(devinfo, M_USB); 412 } 413 return 0; 414 } 415 416 DRIVER_MODULE(ulpt, usb, ulpt_driver, ulpt_devclass, usbd_driver_load, 0); 417 #endif 418