/* $NetBSD: ubsa_common.c,v 1.15 2021/06/13 09:29:38 mlelstv Exp $ */ /*- * Copyright (c) 2002, Alexander Kabaev . * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ /* * Copyright (c) 2001 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Ichiro FUKUHARA (ichiro@ichiro.org). * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ #include __KERNEL_RCSID(0, "$NetBSD: ubsa_common.c,v 1.15 2021/06/13 09:29:38 mlelstv Exp $"); #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #ifdef UBSA_DEBUG extern int ubsadebug; #define DPRINTFN(n, x) do { \ if (ubsadebug > (n)) \ printf x; \ } while (0) #else #define DPRINTFN(n, x) #endif #define DPRINTF(x) DPRINTFN(0, x) int ubsa_request(struct ubsa_softc *sc, int portno, uint8_t request, uint16_t value) { usb_device_request_t req; usbd_status err; if (sc->sc_quadumts) req.bmRequestType = UT_WRITE_CLASS_INTERFACE; else req.bmRequestType = UT_WRITE_VENDOR_DEVICE; if (portno >= UBSA_MAXCONN) { printf("%s: ubsa_request: invalid port(%d)#\n", device_xname(sc->sc_dev), portno); return USBD_INVAL; } req.bRequest = request; USETW(req.wValue, value); USETW(req.wIndex, sc->sc_iface_number[portno]); USETW(req.wLength, 0); err = usbd_do_request(sc->sc_udev, &req, 0); if (err) printf("%s: ubsa_request: %s\n", device_xname(sc->sc_dev), usbd_errstr(err)); return err; } void ubsa_dtr(struct ubsa_softc *sc, int portno, int onoff) { DPRINTF(("ubsa_dtr: onoff = %d\n", onoff)); if (sc->sc_dtr == onoff) return; sc->sc_dtr = onoff; ubsa_request(sc, portno, UBSA_SET_DTR, onoff ? 1 : 0); } void ubsa_rts(struct ubsa_softc *sc, int portno, int onoff) { DPRINTF(("ubsa_rts: onoff = %d\n", onoff)); if (sc->sc_rts == onoff) return; sc->sc_rts = onoff; ubsa_request(sc, portno, UBSA_SET_RTS, onoff ? 1 : 0); } void ubsa_quadumts_dtr(struct ubsa_softc *sc, int portno, int onoff) { DPRINTF(("ubsa_dtr: onoff = %d\n", onoff)); if (sc->sc_dtr == onoff) return; sc->sc_dtr = onoff; ubsa_request(sc, portno, UBSA_QUADUMTS_SET_PIN, (sc->sc_rts ? 2 : 0)+(sc->sc_dtr ? 1 : 0)); } void ubsa_quadumts_rts(struct ubsa_softc *sc, int portno, int onoff) { DPRINTF(("ubsa_rts: onoff = %d\n", onoff)); if (sc->sc_rts == onoff) return; sc->sc_rts = onoff; ubsa_request(sc, portno, UBSA_QUADUMTS_SET_PIN, (sc->sc_rts ? 2 : 0)+(sc->sc_dtr ? 1 : 0)); } void ubsa_break(struct ubsa_softc *sc, int portno, int onoff) { DPRINTF(("ubsa_rts: onoff = %d\n", onoff)); if (sc->sc_dying) return; ubsa_request(sc, portno, UBSA_SET_BREAK, onoff ? 1 : 0); } void ubsa_set(void *addr, int portno, int reg, int onoff) { struct ubsa_softc *sc = addr; if (sc->sc_dying) return; switch (reg) { case UCOM_SET_DTR: if (sc->sc_quadumts) ubsa_quadumts_dtr(sc, portno, onoff); else ubsa_dtr(sc, portno, onoff); break; case UCOM_SET_RTS: if (sc->sc_quadumts) ubsa_quadumts_rts(sc, portno, onoff); else ubsa_rts(sc, portno, onoff); break; case UCOM_SET_BREAK: if (!sc->sc_quadumts) ubsa_break(sc, portno, onoff); break; default: break; } } void ubsa_baudrate(struct ubsa_softc *sc, int portno, speed_t speed) { uint16_t value = 0; DPRINTF(("ubsa_baudrate: speed = %d\n", speed)); switch(speed) { case B0: break; case B300: case B600: case B1200: case B2400: case B4800: case B9600: case B19200: case B38400: case B57600: case B115200: case B230400: value = B230400 / speed; break; default: printf("%s: ubsa_param: unsupported baudrate, " "forcing default of 9600\n", device_xname(sc->sc_dev)); value = B230400 / B9600; break; }; if (speed == B0) { ubsa_flow(sc, portno, 0, 0); ubsa_dtr(sc, portno, 0); ubsa_rts(sc, portno, 0); } else ubsa_request(sc, portno, UBSA_SET_BAUDRATE, value); } void ubsa_parity(struct ubsa_softc *sc, int portno, tcflag_t cflag) { int value; DPRINTF(("ubsa_parity: cflag = %#x\n", cflag)); if (cflag & PARENB) value = (cflag & PARODD) ? UBSA_PARITY_ODD : UBSA_PARITY_EVEN; else value = UBSA_PARITY_NONE; ubsa_request(sc, portno, UBSA_SET_PARITY, value); } void ubsa_databits(struct ubsa_softc *sc, int portno, tcflag_t cflag) { int value; DPRINTF(("ubsa_databits: cflag = %#x\n", cflag)); switch (cflag & CSIZE) { case CS5: value = 0; break; case CS6: value = 1; break; case CS7: value = 2; break; case CS8: value = 3; break; default: printf("%s: ubsa_param: unsupported databits requested, " "forcing default of 8\n", device_xname(sc->sc_dev)); value = 3; } ubsa_request(sc, portno, UBSA_SET_DATA_BITS, value); } void ubsa_stopbits(struct ubsa_softc *sc, int portno, tcflag_t cflag) { int value; DPRINTF(("ubsa_stopbits: cflag = %#x\n", cflag)); value = (cflag & CSTOPB) ? 1 : 0; ubsa_request(sc, portno, UBSA_SET_STOP_BITS, value); } void ubsa_flow(struct ubsa_softc *sc, int portno, tcflag_t cflag, tcflag_t iflag) { int value; DPRINTF(("ubsa_flow: cflag = %#x, iflag = %#x\n", cflag, iflag)); value = 0; if (cflag & CRTSCTS) value |= UBSA_FLOW_OCTS | UBSA_FLOW_IRTS; if (iflag & IXOFF) value |= UBSA_FLOW_OXON; if (iflag & IXON) value |= UBSA_FLOW_IXON; ubsa_request(sc, portno, UBSA_SET_FLOW_CTRL, value); } int ubsa_param(void *addr, int portno, struct termios *ti) { struct ubsa_softc *sc = addr; if (sc->sc_dying) return EIO; DPRINTF(("ubsa_param: sc = %p\n", sc)); if (!sc->sc_quadumts) { ubsa_baudrate(sc, portno, ti->c_ospeed); ubsa_parity(sc, portno, ti->c_cflag); ubsa_databits(sc, portno, ti->c_cflag); ubsa_stopbits(sc, portno, ti->c_cflag); ubsa_flow(sc, portno, ti->c_cflag, ti->c_iflag); } return 0; } int ubsa_open(void *addr, int portno) { struct ubsa_softc *sc = addr; int err; if (sc->sc_dying) return EIO; if (sc->sc_intr_number != -1 && sc->sc_intr_pipe == NULL) { sc->sc_intr_buf = kmem_alloc(sc->sc_isize, KM_SLEEP); /* XXX only iface# = 0 has intr line */ /* XXX E220 specific? need to check */ err = usbd_open_pipe_intr(sc->sc_iface[0], sc->sc_intr_number, USBD_SHORT_XFER_OK, &sc->sc_intr_pipe, sc, sc->sc_intr_buf, sc->sc_isize, ubsa_intr, UBSA_INTR_INTERVAL); if (err) { printf("%s: cannot open interrupt pipe (addr %d)\n", device_xname(sc->sc_dev), sc->sc_intr_number); return EIO; } } return 0; } void ubsa_close_pipe(struct ubsa_softc *sc) { if (sc->sc_intr_pipe != NULL) { usbd_abort_pipe(sc->sc_intr_pipe); usbd_close_pipe(sc->sc_intr_pipe); sc->sc_intr_pipe = NULL; } if (sc->sc_intr_buf) { kmem_free(sc->sc_intr_buf, sc->sc_isize); sc->sc_intr_buf = NULL; } } void ubsa_close(void *addr, int portno) { struct ubsa_softc *sc = addr; DPRINTF(("ubsa_close: close\n")); if (sc->sc_dying) return; ubsa_close_pipe(sc); } void ubsa_intr(struct usbd_xfer *xfer, void *priv, usbd_status status) { struct ubsa_softc *sc = priv; u_char *buf; int i; buf = sc->sc_intr_buf; if (sc->sc_dying) return; if (status != USBD_NORMAL_COMPLETION) { if (status == USBD_NOT_STARTED || status == USBD_CANCELLED) return; DPRINTF(("%s: ubsa_intr: abnormal status: %s\n", device_xname(sc->sc_dev), usbd_errstr(status))); usbd_clear_endpoint_stall_async(sc->sc_intr_pipe); return; } /* incidentally, Belkin adapter status bits match UART 16550 bits */ sc->sc_lsr = buf[2]; sc->sc_msr = buf[3]; DPRINTF(("%s: ubsa lsr = 0x%02x, msr = 0x%02x\n", device_xname(sc->sc_dev), sc->sc_lsr, sc->sc_msr)); for (i = 0; i < sc->sc_numif; i++) { ucom_status_change(device_private(sc->sc_subdevs[i])); } } void ubsa_get_status(void *addr, int portno, u_char *lsr, u_char *msr) { struct ubsa_softc *sc = addr; DPRINTF(("ubsa_get_status\n")); *lsr = sc->sc_lsr; *msr = sc->sc_msr; }