Home | History | Annotate | Line # | Download | only in usb
if_upl.c revision 1.22.2.2
      1 /*	$NetBSD: if_upl.c,v 1.22.2.2 2006/12/30 20:49:38 yamt Exp $	*/
      2 /*
      3  * Copyright (c) 2000 The NetBSD Foundation, Inc.
      4  * All rights reserved.
      5  *
      6  * This code is derived from software contributed to The NetBSD Foundation
      7  * by Lennart Augustsson (lennart (at) augustsson.net) at
      8  * Carlstedt Research & Technology.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *        This product includes software developed by the NetBSD
     21  *        Foundation, Inc. and its contributors.
     22  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  *    contributors may be used to endorse or promote products derived
     24  *    from this software without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  * POSSIBILITY OF SUCH DAMAGE.
     37  */
     38 
     39 /*
     40  * Prolific PL2301/PL2302 driver
     41  */
     42 
     43 #include <sys/cdefs.h>
     44 __KERNEL_RCSID(0, "$NetBSD: if_upl.c,v 1.22.2.2 2006/12/30 20:49:38 yamt Exp $");
     45 
     46 #include "opt_inet.h"
     47 #include "bpfilter.h"
     48 #include "rnd.h"
     49 
     50 #include <sys/param.h>
     51 #include <sys/systm.h>
     52 #include <sys/callout.h>
     53 #include <sys/sockio.h>
     54 #include <sys/mbuf.h>
     55 #include <sys/malloc.h>
     56 #include <sys/kernel.h>
     57 #include <sys/socket.h>
     58 
     59 #include <sys/device.h>
     60 #if NRND > 0
     61 #include <sys/rnd.h>
     62 #endif
     63 
     64 #include <net/if.h>
     65 #include <net/if_types.h>
     66 #include <net/if_dl.h>
     67 #include <net/netisr.h>
     68 
     69 #define BPF_MTAP(ifp, m) bpf_mtap((ifp)->if_bpf, (m))
     70 
     71 #if NBPFILTER > 0
     72 #include <net/bpf.h>
     73 #endif
     74 
     75 #ifdef INET
     76 #include <netinet/in.h>
     77 #include <netinet/in_var.h>
     78 #include <netinet/if_inarp.h>
     79 #endif
     80 
     81 
     82 #include <dev/usb/usb.h>
     83 #include <dev/usb/usbdi.h>
     84 #include <dev/usb/usbdi_util.h>
     85 #include <dev/usb/usbdevs.h>
     86 
     87 /*
     88  * 7  6  5  4  3  2  1  0
     89  * tx rx 1  0
     90  * 1110 0000 rxdata
     91  * 1010 0000 idle
     92  * 0010 0000 tx over
     93  * 0110      tx over + rxd
     94  */
     95 
     96 #define UPL_RXDATA		0x40
     97 #define UPL_TXOK		0x80
     98 
     99 #define UPL_INTR_PKTLEN		1
    100 
    101 #define UPL_CONFIG_NO		1
    102 #define UPL_IFACE_IDX		0
    103 
    104 /***/
    105 
    106 #define UPL_INTR_INTERVAL	20
    107 
    108 #define UPL_BUFSZ		1024
    109 
    110 #define UPL_RX_FRAMES		1
    111 #define UPL_TX_FRAMES		1
    112 
    113 #define UPL_RX_LIST_CNT		1
    114 #define UPL_TX_LIST_CNT		1
    115 
    116 #define UPL_ENDPT_RX		0x0
    117 #define UPL_ENDPT_TX		0x1
    118 #define UPL_ENDPT_INTR		0x2
    119 #define UPL_ENDPT_MAX		0x3
    120 
    121 struct upl_type {
    122 	u_int16_t		upl_vid;
    123 	u_int16_t		upl_did;
    124 };
    125 
    126 struct upl_softc;
    127 
    128 struct upl_chain {
    129 	struct upl_softc	*upl_sc;
    130 	usbd_xfer_handle	upl_xfer;
    131 	char			*upl_buf;
    132 	struct mbuf		*upl_mbuf;
    133 	int			upl_idx;
    134 };
    135 
    136 struct upl_cdata {
    137 	struct upl_chain	upl_tx_chain[UPL_TX_LIST_CNT];
    138 	struct upl_chain	upl_rx_chain[UPL_RX_LIST_CNT];
    139 	int			upl_tx_prod;
    140 	int			upl_tx_cons;
    141 	int			upl_tx_cnt;
    142 	int			upl_rx_prod;
    143 };
    144 
    145 struct upl_softc {
    146 	USBBASEDEVICE		sc_dev;
    147 
    148 	struct ifnet		sc_if;
    149 #if NRND > 0
    150 	rndsource_element_t	sc_rnd_source;
    151 #endif
    152 
    153 	usb_callout_t		sc_stat_ch;
    154 
    155 	usbd_device_handle	sc_udev;
    156 	usbd_interface_handle	sc_iface;
    157 	u_int16_t		sc_vendor;
    158 	u_int16_t		sc_product;
    159 	int			sc_ed[UPL_ENDPT_MAX];
    160 	usbd_pipe_handle	sc_ep[UPL_ENDPT_MAX];
    161 	struct upl_cdata	sc_cdata;
    162 
    163 	uByte			sc_ibuf;
    164 
    165 	char			sc_dying;
    166 	char			sc_attached;
    167 	u_int			sc_rx_errs;
    168 	struct timeval		sc_rx_notice;
    169 	u_int			sc_intr_errs;
    170 };
    171 
    172 #ifdef UPL_DEBUG
    173 #define DPRINTF(x)	if (upldebug) logprintf x
    174 #define DPRINTFN(n,x)	if (upldebug >= (n)) logprintf x
    175 int	upldebug = 0;
    176 #else
    177 #define DPRINTF(x)
    178 #define DPRINTFN(n,x)
    179 #endif
    180 
    181 /*
    182  * Various supported device vendors/products.
    183  */
    184 Static struct upl_type sc_devs[] = {
    185 	{ USB_VENDOR_PROLIFIC, USB_PRODUCT_PROLIFIC_PL2301 },
    186 	{ USB_VENDOR_PROLIFIC, USB_PRODUCT_PROLIFIC_PL2302 },
    187 	{ 0, 0 }
    188 };
    189 
    190 USB_DECLARE_DRIVER(upl);
    191 
    192 Static int upl_openpipes(struct upl_softc *);
    193 Static int upl_tx_list_init(struct upl_softc *);
    194 Static int upl_rx_list_init(struct upl_softc *);
    195 Static int upl_newbuf(struct upl_softc *, struct upl_chain *, struct mbuf *);
    196 Static int upl_send(struct upl_softc *, struct mbuf *, int);
    197 Static void upl_intr(usbd_xfer_handle, usbd_private_handle, usbd_status);
    198 Static void upl_rxeof(usbd_xfer_handle, usbd_private_handle, usbd_status);
    199 Static void upl_txeof(usbd_xfer_handle, usbd_private_handle, usbd_status);
    200 Static void upl_start(struct ifnet *);
    201 Static int upl_ioctl(struct ifnet *, u_long, caddr_t);
    202 Static void upl_init(void *);
    203 Static void upl_stop(struct upl_softc *);
    204 Static void upl_watchdog(struct ifnet *);
    205 
    206 Static int upl_output(struct ifnet *, struct mbuf *, struct sockaddr *,
    207 		      struct rtentry *);
    208 Static void upl_input(struct ifnet *, struct mbuf *);
    209 
    210 /*
    211  * Probe for a Prolific chip.
    212  */
    213 USB_MATCH(upl)
    214 {
    215 	USB_MATCH_START(upl, uaa);
    216 	struct upl_type			*t;
    217 
    218 	if (uaa->iface != NULL)
    219 		return (UMATCH_NONE);
    220 
    221 	for (t = sc_devs; t->upl_vid != 0; t++)
    222 		if (uaa->vendor == t->upl_vid && uaa->product == t->upl_did)
    223 			return (UMATCH_VENDOR_PRODUCT);
    224 
    225 	return (UMATCH_NONE);
    226 }
    227 
    228 USB_ATTACH(upl)
    229 {
    230 	USB_ATTACH_START(upl, sc, uaa);
    231 	char			*devinfop;
    232 	int			s;
    233 	usbd_device_handle	dev = uaa->device;
    234 	usbd_interface_handle	iface;
    235 	usbd_status		err;
    236 	struct ifnet		*ifp;
    237 	usb_interface_descriptor_t	*id;
    238 	usb_endpoint_descriptor_t	*ed;
    239 	int			i;
    240 
    241 	DPRINTFN(5,(" : upl_attach: sc=%p, dev=%p", sc, dev));
    242 
    243 	devinfop = usbd_devinfo_alloc(dev, 0);
    244 	USB_ATTACH_SETUP;
    245 	printf("%s: %s\n", USBDEVNAME(sc->sc_dev), devinfop);
    246 	usbd_devinfo_free(devinfop);
    247 
    248 	err = usbd_set_config_no(dev, UPL_CONFIG_NO, 1);
    249 	if (err) {
    250 		printf("%s: setting config no failed\n",
    251 		    USBDEVNAME(sc->sc_dev));
    252 		USB_ATTACH_ERROR_RETURN;
    253 	}
    254 
    255 	sc->sc_udev = dev;
    256 	sc->sc_product = uaa->product;
    257 	sc->sc_vendor = uaa->vendor;
    258 
    259 	err = usbd_device2interface_handle(dev, UPL_IFACE_IDX, &iface);
    260 	if (err) {
    261 		printf("%s: getting interface handle failed\n",
    262 		    USBDEVNAME(sc->sc_dev));
    263 		USB_ATTACH_ERROR_RETURN;
    264 	}
    265 
    266 	sc->sc_iface = iface;
    267 	id = usbd_get_interface_descriptor(iface);
    268 
    269 	/* Find endpoints. */
    270 	for (i = 0; i < id->bNumEndpoints; i++) {
    271 		ed = usbd_interface2endpoint_descriptor(iface, i);
    272 		if (ed == NULL) {
    273 			printf("%s: couldn't get ep %d\n",
    274 			    USBDEVNAME(sc->sc_dev), i);
    275 			USB_ATTACH_ERROR_RETURN;
    276 		}
    277 		if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_IN &&
    278 		    UE_GET_XFERTYPE(ed->bmAttributes) == UE_BULK) {
    279 			sc->sc_ed[UPL_ENDPT_RX] = ed->bEndpointAddress;
    280 		} else if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_OUT &&
    281 			   UE_GET_XFERTYPE(ed->bmAttributes) == UE_BULK) {
    282 			sc->sc_ed[UPL_ENDPT_TX] = ed->bEndpointAddress;
    283 		} else if (UE_GET_DIR(ed->bEndpointAddress) == UE_DIR_IN &&
    284 			   UE_GET_XFERTYPE(ed->bmAttributes) == UE_INTERRUPT) {
    285 			sc->sc_ed[UPL_ENDPT_INTR] = ed->bEndpointAddress;
    286 		}
    287 	}
    288 
    289 	if (sc->sc_ed[UPL_ENDPT_RX] == 0 || sc->sc_ed[UPL_ENDPT_TX] == 0 ||
    290 	    sc->sc_ed[UPL_ENDPT_INTR] == 0) {
    291 		printf("%s: missing endpoint\n", USBDEVNAME(sc->sc_dev));
    292 		USB_ATTACH_ERROR_RETURN;
    293 	}
    294 
    295 	s = splnet();
    296 
    297 	/* Initialize interface info.*/
    298 	ifp = &sc->sc_if;
    299 	ifp->if_softc = sc;
    300 	ifp->if_mtu = UPL_BUFSZ;
    301 	ifp->if_flags = IFF_POINTOPOINT | IFF_NOARP | IFF_SIMPLEX;
    302 	ifp->if_ioctl = upl_ioctl;
    303 	ifp->if_start = upl_start;
    304 	ifp->if_watchdog = upl_watchdog;
    305 	strncpy(ifp->if_xname, USBDEVNAME(sc->sc_dev), IFNAMSIZ);
    306 
    307 	ifp->if_type = IFT_OTHER;
    308 	ifp->if_addrlen = 0;
    309 	ifp->if_hdrlen = 0;
    310 	ifp->if_output = upl_output;
    311 	ifp->if_input = upl_input;
    312 	ifp->if_baudrate = 12000000;
    313 	ifp->if_dlt = DLT_RAW;
    314 	IFQ_SET_READY(&ifp->if_snd);
    315 
    316 	/* Attach the interface. */
    317 	if_attach(ifp);
    318 	if_alloc_sadl(ifp);
    319 
    320 #if NBPFILTER > 0
    321 	bpfattach(ifp, DLT_RAW, 0);
    322 #endif
    323 #if NRND > 0
    324 	rnd_attach_source(&sc->sc_rnd_source, USBDEVNAME(sc->sc_dev),
    325 	    RND_TYPE_NET, 0);
    326 #endif
    327 
    328 	sc->sc_attached = 1;
    329 	splx(s);
    330 
    331 	usbd_add_drv_event(USB_EVENT_DRIVER_ATTACH, sc->sc_udev,
    332 	    USBDEV(sc->sc_dev));
    333 
    334 	USB_ATTACH_SUCCESS_RETURN;
    335 }
    336 
    337 USB_DETACH(upl)
    338 {
    339 	USB_DETACH_START(upl, sc);
    340 	struct ifnet		*ifp = &sc->sc_if;
    341 	int			s;
    342 
    343 	DPRINTFN(2,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev), __func__));
    344 
    345 	s = splusb();
    346 
    347 	if (!sc->sc_attached) {
    348 		/* Detached before attached finished, so just bail out. */
    349 		splx(s);
    350 		return (0);
    351 	}
    352 
    353 	if (ifp->if_flags & IFF_RUNNING)
    354 		upl_stop(sc);
    355 
    356 #if NRND > 0
    357 	rnd_detach_source(&sc->sc_rnd_source);
    358 #endif
    359 #if NBPFILTER > 0
    360 	bpfdetach(ifp);
    361 #endif
    362 
    363 	if_detach(ifp);
    364 
    365 #ifdef DIAGNOSTIC
    366 	if (sc->sc_ep[UPL_ENDPT_TX] != NULL ||
    367 	    sc->sc_ep[UPL_ENDPT_RX] != NULL ||
    368 	    sc->sc_ep[UPL_ENDPT_INTR] != NULL)
    369 		printf("%s: detach has active endpoints\n",
    370 		       USBDEVNAME(sc->sc_dev));
    371 #endif
    372 
    373 	sc->sc_attached = 0;
    374 	splx(s);
    375 
    376 	usbd_add_drv_event(USB_EVENT_DRIVER_DETACH, sc->sc_udev,
    377 	    USBDEV(sc->sc_dev));
    378 
    379 	return (0);
    380 }
    381 
    382 int
    383 upl_activate(device_ptr_t self, enum devact act)
    384 {
    385 	struct upl_softc *sc = (struct upl_softc *)self;
    386 
    387 	DPRINTFN(2,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev), __func__));
    388 
    389 	switch (act) {
    390 	case DVACT_ACTIVATE:
    391 		return (EOPNOTSUPP);
    392 		break;
    393 
    394 	case DVACT_DEACTIVATE:
    395 		/* Deactivate the interface. */
    396 		if_deactivate(&sc->sc_if);
    397 		sc->sc_dying = 1;
    398 		break;
    399 	}
    400 	return (0);
    401 }
    402 
    403 /*
    404  * Initialize an RX descriptor and attach an MBUF cluster.
    405  */
    406 Static int
    407 upl_newbuf(struct upl_softc *sc, struct upl_chain *c, struct mbuf *m)
    408 {
    409 	struct mbuf		*m_new = NULL;
    410 
    411 	DPRINTFN(8,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev), __func__));
    412 
    413 	if (m == NULL) {
    414 		MGETHDR(m_new, M_DONTWAIT, MT_DATA);
    415 		if (m_new == NULL) {
    416 			printf("%s: no memory for rx list "
    417 			    "-- packet dropped!\n", USBDEVNAME(sc->sc_dev));
    418 			return (ENOBUFS);
    419 		}
    420 
    421 		MCLGET(m_new, M_DONTWAIT);
    422 		if (!(m_new->m_flags & M_EXT)) {
    423 			printf("%s: no memory for rx list "
    424 			    "-- packet dropped!\n", USBDEVNAME(sc->sc_dev));
    425 			m_freem(m_new);
    426 			return (ENOBUFS);
    427 		}
    428 		m_new->m_len = m_new->m_pkthdr.len = MCLBYTES;
    429 	} else {
    430 		m_new = m;
    431 		m_new->m_len = m_new->m_pkthdr.len = MCLBYTES;
    432 		m_new->m_data = m_new->m_ext.ext_buf;
    433 	}
    434 
    435 	c->upl_mbuf = m_new;
    436 
    437 	return (0);
    438 }
    439 
    440 Static int
    441 upl_rx_list_init(struct upl_softc *sc)
    442 {
    443 	struct upl_cdata	*cd;
    444 	struct upl_chain	*c;
    445 	int			i;
    446 
    447 	DPRINTFN(5,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev), __func__));
    448 
    449 	cd = &sc->sc_cdata;
    450 	for (i = 0; i < UPL_RX_LIST_CNT; i++) {
    451 		c = &cd->upl_rx_chain[i];
    452 		c->upl_sc = sc;
    453 		c->upl_idx = i;
    454 		if (upl_newbuf(sc, c, NULL) == ENOBUFS)
    455 			return (ENOBUFS);
    456 		if (c->upl_xfer == NULL) {
    457 			c->upl_xfer = usbd_alloc_xfer(sc->sc_udev);
    458 			if (c->upl_xfer == NULL)
    459 				return (ENOBUFS);
    460 			c->upl_buf = usbd_alloc_buffer(c->upl_xfer, UPL_BUFSZ);
    461 			if (c->upl_buf == NULL) {
    462 				usbd_free_xfer(c->upl_xfer);
    463 				return (ENOBUFS);
    464 			}
    465 		}
    466 	}
    467 
    468 	return (0);
    469 }
    470 
    471 Static int
    472 upl_tx_list_init(struct upl_softc *sc)
    473 {
    474 	struct upl_cdata	*cd;
    475 	struct upl_chain	*c;
    476 	int			i;
    477 
    478 	DPRINTFN(5,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev), __func__));
    479 
    480 	cd = &sc->sc_cdata;
    481 	for (i = 0; i < UPL_TX_LIST_CNT; i++) {
    482 		c = &cd->upl_tx_chain[i];
    483 		c->upl_sc = sc;
    484 		c->upl_idx = i;
    485 		c->upl_mbuf = NULL;
    486 		if (c->upl_xfer == NULL) {
    487 			c->upl_xfer = usbd_alloc_xfer(sc->sc_udev);
    488 			if (c->upl_xfer == NULL)
    489 				return (ENOBUFS);
    490 			c->upl_buf = usbd_alloc_buffer(c->upl_xfer, UPL_BUFSZ);
    491 			if (c->upl_buf == NULL) {
    492 				usbd_free_xfer(c->upl_xfer);
    493 				return (ENOBUFS);
    494 			}
    495 		}
    496 	}
    497 
    498 	return (0);
    499 }
    500 
    501 /*
    502  * A frame has been uploaded: pass the resulting mbuf chain up to
    503  * the higher level protocols.
    504  */
    505 Static void
    506 upl_rxeof(usbd_xfer_handle xfer, usbd_private_handle priv, usbd_status status)
    507 {
    508 	struct upl_chain	*c = priv;
    509 	struct upl_softc	*sc = c->upl_sc;
    510 	struct ifnet		*ifp = &sc->sc_if;
    511 	struct mbuf		*m;
    512 	int			total_len = 0;
    513 	int			s;
    514 
    515 	if (sc->sc_dying)
    516 		return;
    517 
    518 	if (!(ifp->if_flags & IFF_RUNNING))
    519 		return;
    520 
    521 	if (status != USBD_NORMAL_COMPLETION) {
    522 		if (status == USBD_NOT_STARTED || status == USBD_CANCELLED)
    523 			return;
    524 		sc->sc_rx_errs++;
    525 		if (usbd_ratecheck(&sc->sc_rx_notice)) {
    526 			printf("%s: %u usb errors on rx: %s\n",
    527 			    USBDEVNAME(sc->sc_dev), sc->sc_rx_errs,
    528 			    usbd_errstr(status));
    529 			sc->sc_rx_errs = 0;
    530 		}
    531 		if (status == USBD_STALLED)
    532 			usbd_clear_endpoint_stall_async(sc->sc_ep[UPL_ENDPT_RX]);
    533 		goto done;
    534 	}
    535 
    536 	usbd_get_xfer_status(xfer, NULL, NULL, &total_len, NULL);
    537 
    538 	DPRINTFN(9,("%s: %s: enter status=%d length=%d\n",
    539 		    USBDEVNAME(sc->sc_dev), __func__, status, total_len));
    540 
    541 	m = c->upl_mbuf;
    542 	memcpy(mtod(c->upl_mbuf, char *), c->upl_buf, total_len);
    543 
    544 	ifp->if_ipackets++;
    545 	m->m_pkthdr.len = m->m_len = total_len;
    546 
    547 	m->m_pkthdr.rcvif = ifp;
    548 
    549 	s = splnet();
    550 
    551 	/* XXX ugly */
    552 	if (upl_newbuf(sc, c, NULL) == ENOBUFS) {
    553 		ifp->if_ierrors++;
    554 		goto done1;
    555 	}
    556 
    557 #if NBPFILTER > 0
    558 	/*
    559 	 * Handle BPF listeners. Let the BPF user see the packet, but
    560 	 * don't pass it up to the ether_input() layer unless it's
    561 	 * a broadcast packet, multicast packet, matches our ethernet
    562 	 * address or the interface is in promiscuous mode.
    563 	 */
    564 	if (ifp->if_bpf) {
    565 		BPF_MTAP(ifp, m);
    566 	}
    567 #endif
    568 
    569 	DPRINTFN(10,("%s: %s: deliver %d\n", USBDEVNAME(sc->sc_dev),
    570 		    __func__, m->m_len));
    571 
    572 	IF_INPUT(ifp, m);
    573 
    574  done1:
    575 	splx(s);
    576 
    577  done:
    578 #if 1
    579 	/* Setup new transfer. */
    580 	usbd_setup_xfer(c->upl_xfer, sc->sc_ep[UPL_ENDPT_RX],
    581 	    c, c->upl_buf, UPL_BUFSZ, USBD_SHORT_XFER_OK | USBD_NO_COPY,
    582 	    USBD_NO_TIMEOUT, upl_rxeof);
    583 	usbd_transfer(c->upl_xfer);
    584 
    585 	DPRINTFN(10,("%s: %s: start rx\n", USBDEVNAME(sc->sc_dev),
    586 		    __func__));
    587 #endif
    588 }
    589 
    590 /*
    591  * A frame was downloaded to the chip. It's safe for us to clean up
    592  * the list buffers.
    593  */
    594 Static void
    595 upl_txeof(usbd_xfer_handle xfer, usbd_private_handle priv,
    596     usbd_status status)
    597 {
    598 	struct upl_chain	*c = priv;
    599 	struct upl_softc	*sc = c->upl_sc;
    600 	struct ifnet		*ifp = &sc->sc_if;
    601 	int			s;
    602 
    603 	if (sc->sc_dying)
    604 		return;
    605 
    606 	s = splnet();
    607 
    608 	DPRINTFN(10,("%s: %s: enter status=%d\n", USBDEVNAME(sc->sc_dev),
    609 		    __func__, status));
    610 
    611 	ifp->if_timer = 0;
    612 	ifp->if_flags &= ~IFF_OACTIVE;
    613 
    614 	if (status != USBD_NORMAL_COMPLETION) {
    615 		if (status == USBD_NOT_STARTED || status == USBD_CANCELLED) {
    616 			splx(s);
    617 			return;
    618 		}
    619 		ifp->if_oerrors++;
    620 		printf("%s: usb error on tx: %s\n", USBDEVNAME(sc->sc_dev),
    621 		    usbd_errstr(status));
    622 		if (status == USBD_STALLED)
    623 			usbd_clear_endpoint_stall_async(sc->sc_ep[UPL_ENDPT_TX]);
    624 		splx(s);
    625 		return;
    626 	}
    627 
    628 	ifp->if_opackets++;
    629 
    630 	m_freem(c->upl_mbuf);
    631 	c->upl_mbuf = NULL;
    632 
    633 	if (IFQ_IS_EMPTY(&ifp->if_snd) == 0)
    634 		upl_start(ifp);
    635 
    636 	splx(s);
    637 }
    638 
    639 Static int
    640 upl_send(struct upl_softc *sc, struct mbuf *m, int idx)
    641 {
    642 	int			total_len;
    643 	struct upl_chain	*c;
    644 	usbd_status		err;
    645 
    646 	c = &sc->sc_cdata.upl_tx_chain[idx];
    647 
    648 	/*
    649 	 * Copy the mbuf data into a contiguous buffer, leaving two
    650 	 * bytes at the beginning to hold the frame length.
    651 	 */
    652 	m_copydata(m, 0, m->m_pkthdr.len, c->upl_buf);
    653 	c->upl_mbuf = m;
    654 
    655 	total_len = m->m_pkthdr.len;
    656 
    657 	DPRINTFN(10,("%s: %s: total_len=%d\n",
    658 		     USBDEVNAME(sc->sc_dev), __func__, total_len));
    659 
    660 	usbd_setup_xfer(c->upl_xfer, sc->sc_ep[UPL_ENDPT_TX],
    661 	    c, c->upl_buf, total_len, USBD_NO_COPY, USBD_DEFAULT_TIMEOUT,
    662 	    upl_txeof);
    663 
    664 	/* Transmit */
    665 	err = usbd_transfer(c->upl_xfer);
    666 	if (err != USBD_IN_PROGRESS) {
    667 		printf("%s: upl_send error=%s\n", USBDEVNAME(sc->sc_dev),
    668 		       usbd_errstr(err));
    669 		upl_stop(sc);
    670 		return (EIO);
    671 	}
    672 
    673 	sc->sc_cdata.upl_tx_cnt++;
    674 
    675 	return (0);
    676 }
    677 
    678 Static void
    679 upl_start(struct ifnet *ifp)
    680 {
    681 	struct upl_softc	*sc = ifp->if_softc;
    682 	struct mbuf		*m_head = NULL;
    683 
    684 	if (sc->sc_dying)
    685 		return;
    686 
    687 	DPRINTFN(10,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev),__func__));
    688 
    689 	if (ifp->if_flags & IFF_OACTIVE)
    690 		return;
    691 
    692 	IFQ_POLL(&ifp->if_snd, m_head);
    693 	if (m_head == NULL)
    694 		return;
    695 
    696 	if (upl_send(sc, m_head, 0)) {
    697 		ifp->if_flags |= IFF_OACTIVE;
    698 		return;
    699 	}
    700 
    701 	IFQ_DEQUEUE(&ifp->if_snd, m_head);
    702 
    703 #if NBPFILTER > 0
    704 	/*
    705 	 * If there's a BPF listener, bounce a copy of this frame
    706 	 * to him.
    707 	 */
    708 	if (ifp->if_bpf)
    709 		BPF_MTAP(ifp, m_head);
    710 #endif
    711 
    712 	ifp->if_flags |= IFF_OACTIVE;
    713 
    714 	/*
    715 	 * Set a timeout in case the chip goes out to lunch.
    716 	 */
    717 	ifp->if_timer = 5;
    718 }
    719 
    720 Static void
    721 upl_init(void *xsc)
    722 {
    723 	struct upl_softc	*sc = xsc;
    724 	struct ifnet		*ifp = &sc->sc_if;
    725 	int			s;
    726 
    727 	if (sc->sc_dying)
    728 		return;
    729 
    730 	DPRINTFN(10,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev),__func__));
    731 
    732 	if (ifp->if_flags & IFF_RUNNING)
    733 		return;
    734 
    735 	s = splnet();
    736 
    737 	/* Init TX ring. */
    738 	if (upl_tx_list_init(sc) == ENOBUFS) {
    739 		printf("%s: tx list init failed\n", USBDEVNAME(sc->sc_dev));
    740 		splx(s);
    741 		return;
    742 	}
    743 
    744 	/* Init RX ring. */
    745 	if (upl_rx_list_init(sc) == ENOBUFS) {
    746 		printf("%s: rx list init failed\n", USBDEVNAME(sc->sc_dev));
    747 		splx(s);
    748 		return;
    749 	}
    750 
    751 	if (sc->sc_ep[UPL_ENDPT_RX] == NULL) {
    752 		if (upl_openpipes(sc)) {
    753 			splx(s);
    754 			return;
    755 		}
    756 	}
    757 
    758 	ifp->if_flags |= IFF_RUNNING;
    759 	ifp->if_flags &= ~IFF_OACTIVE;
    760 
    761 	splx(s);
    762 }
    763 
    764 Static int
    765 upl_openpipes(struct upl_softc *sc)
    766 {
    767 	struct upl_chain	*c;
    768 	usbd_status		err;
    769 	int			i;
    770 
    771 	/* Open RX and TX pipes. */
    772 	err = usbd_open_pipe(sc->sc_iface, sc->sc_ed[UPL_ENDPT_RX],
    773 	    USBD_EXCLUSIVE_USE, &sc->sc_ep[UPL_ENDPT_RX]);
    774 	if (err) {
    775 		printf("%s: open rx pipe failed: %s\n",
    776 		    USBDEVNAME(sc->sc_dev), usbd_errstr(err));
    777 		return (EIO);
    778 	}
    779 	err = usbd_open_pipe(sc->sc_iface, sc->sc_ed[UPL_ENDPT_TX],
    780 	    USBD_EXCLUSIVE_USE, &sc->sc_ep[UPL_ENDPT_TX]);
    781 	if (err) {
    782 		printf("%s: open tx pipe failed: %s\n",
    783 		    USBDEVNAME(sc->sc_dev), usbd_errstr(err));
    784 		return (EIO);
    785 	}
    786 	err = usbd_open_pipe_intr(sc->sc_iface, sc->sc_ed[UPL_ENDPT_INTR],
    787 	    USBD_EXCLUSIVE_USE, &sc->sc_ep[UPL_ENDPT_INTR], sc,
    788 	    &sc->sc_ibuf, UPL_INTR_PKTLEN, upl_intr,
    789 	    UPL_INTR_INTERVAL);
    790 	if (err) {
    791 		printf("%s: open intr pipe failed: %s\n",
    792 		    USBDEVNAME(sc->sc_dev), usbd_errstr(err));
    793 		return (EIO);
    794 	}
    795 
    796 
    797 #if 1
    798 	/* Start up the receive pipe. */
    799 	for (i = 0; i < UPL_RX_LIST_CNT; i++) {
    800 		c = &sc->sc_cdata.upl_rx_chain[i];
    801 		usbd_setup_xfer(c->upl_xfer, sc->sc_ep[UPL_ENDPT_RX],
    802 		    c, c->upl_buf, UPL_BUFSZ,
    803 		    USBD_SHORT_XFER_OK | USBD_NO_COPY, USBD_NO_TIMEOUT,
    804 		    upl_rxeof);
    805 		usbd_transfer(c->upl_xfer);
    806 	}
    807 #endif
    808 
    809 	return (0);
    810 }
    811 
    812 Static void
    813 upl_intr(usbd_xfer_handle xfer, usbd_private_handle priv,
    814     usbd_status status)
    815 {
    816 	struct upl_softc	*sc = priv;
    817 	struct ifnet		*ifp = &sc->sc_if;
    818 	uByte			stat;
    819 
    820 	DPRINTFN(15,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev),__func__));
    821 
    822 	if (sc->sc_dying)
    823 		return;
    824 
    825 	if (!(ifp->if_flags & IFF_RUNNING))
    826 		return;
    827 
    828 	if (status != USBD_NORMAL_COMPLETION) {
    829 		if (status == USBD_NOT_STARTED || status == USBD_CANCELLED) {
    830 			return;
    831 		}
    832 		sc->sc_intr_errs++;
    833 		if (usbd_ratecheck(&sc->sc_rx_notice)) {
    834 			printf("%s: %u usb errors on intr: %s\n",
    835 			    USBDEVNAME(sc->sc_dev), sc->sc_rx_errs,
    836 			    usbd_errstr(status));
    837 			sc->sc_intr_errs = 0;
    838 		}
    839 		if (status == USBD_STALLED)
    840 			usbd_clear_endpoint_stall_async(sc->sc_ep[UPL_ENDPT_RX]);
    841 		return;
    842 	}
    843 
    844 	stat = sc->sc_ibuf;
    845 
    846 	if (stat == 0)
    847 		return;
    848 
    849 	DPRINTFN(10,("%s: %s: stat=0x%02x\n", USBDEVNAME(sc->sc_dev),
    850 		     __func__, stat));
    851 
    852 }
    853 
    854 Static int
    855 upl_ioctl(struct ifnet *ifp, u_long command, caddr_t data)
    856 {
    857 	struct upl_softc	*sc = ifp->if_softc;
    858 	struct ifaddr 		*ifa = (struct ifaddr *)data;
    859 	struct ifreq		*ifr = (struct ifreq *)data;
    860 	int			s, error = 0;
    861 
    862 	if (sc->sc_dying)
    863 		return (EIO);
    864 
    865 	DPRINTFN(5,("%s: %s: cmd=0x%08lx\n",
    866 		    USBDEVNAME(sc->sc_dev), __func__, command));
    867 
    868 	s = splnet();
    869 
    870 	switch(command) {
    871 	case SIOCSIFADDR:
    872 		ifp->if_flags |= IFF_UP;
    873 		upl_init(sc);
    874 
    875 		switch (ifa->ifa_addr->sa_family) {
    876 #ifdef INET
    877 		case AF_INET:
    878 			break;
    879 #endif /* INET */
    880 		}
    881 		break;
    882 
    883 	case SIOCSIFMTU:
    884 		if (ifr->ifr_mtu > UPL_BUFSZ)
    885 			error = EINVAL;
    886 		else
    887 			ifp->if_mtu = ifr->ifr_mtu;
    888 		break;
    889 
    890 	case SIOCSIFFLAGS:
    891 		if (ifp->if_flags & IFF_UP) {
    892 			if (!(ifp->if_flags & IFF_RUNNING))
    893 				upl_init(sc);
    894 		} else {
    895 			if (ifp->if_flags & IFF_RUNNING)
    896 				upl_stop(sc);
    897 		}
    898 		error = 0;
    899 		break;
    900 	default:
    901 		error = EINVAL;
    902 		break;
    903 	}
    904 
    905 	splx(s);
    906 
    907 	return (error);
    908 }
    909 
    910 Static void
    911 upl_watchdog(struct ifnet *ifp)
    912 {
    913 	struct upl_softc	*sc = ifp->if_softc;
    914 
    915 	DPRINTFN(5,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev),__func__));
    916 
    917 	if (sc->sc_dying)
    918 		return;
    919 
    920 	ifp->if_oerrors++;
    921 	printf("%s: watchdog timeout\n", USBDEVNAME(sc->sc_dev));
    922 
    923 	upl_stop(sc);
    924 	upl_init(sc);
    925 
    926 	if (IFQ_IS_EMPTY(&ifp->if_snd) == 0)
    927 		upl_start(ifp);
    928 }
    929 
    930 /*
    931  * Stop the adapter and free any mbufs allocated to the
    932  * RX and TX lists.
    933  */
    934 Static void
    935 upl_stop(struct upl_softc *sc)
    936 {
    937 	usbd_status		err;
    938 	struct ifnet		*ifp;
    939 	int			i;
    940 
    941 	DPRINTFN(10,("%s: %s: enter\n", USBDEVNAME(sc->sc_dev),__func__));
    942 
    943 	ifp = &sc->sc_if;
    944 	ifp->if_timer = 0;
    945 
    946 	/* Stop transfers. */
    947 	if (sc->sc_ep[UPL_ENDPT_RX] != NULL) {
    948 		err = usbd_abort_pipe(sc->sc_ep[UPL_ENDPT_RX]);
    949 		if (err) {
    950 			printf("%s: abort rx pipe failed: %s\n",
    951 			USBDEVNAME(sc->sc_dev), usbd_errstr(err));
    952 		}
    953 		err = usbd_close_pipe(sc->sc_ep[UPL_ENDPT_RX]);
    954 		if (err) {
    955 			printf("%s: close rx pipe failed: %s\n",
    956 			USBDEVNAME(sc->sc_dev), usbd_errstr(err));
    957 		}
    958 		sc->sc_ep[UPL_ENDPT_RX] = NULL;
    959 	}
    960 
    961 	if (sc->sc_ep[UPL_ENDPT_TX] != NULL) {
    962 		err = usbd_abort_pipe(sc->sc_ep[UPL_ENDPT_TX]);
    963 		if (err) {
    964 			printf("%s: abort tx pipe failed: %s\n",
    965 			USBDEVNAME(sc->sc_dev), usbd_errstr(err));
    966 		}
    967 		err = usbd_close_pipe(sc->sc_ep[UPL_ENDPT_TX]);
    968 		if (err) {
    969 			printf("%s: close tx pipe failed: %s\n",
    970 			    USBDEVNAME(sc->sc_dev), usbd_errstr(err));
    971 		}
    972 		sc->sc_ep[UPL_ENDPT_TX] = NULL;
    973 	}
    974 
    975 	if (sc->sc_ep[UPL_ENDPT_INTR] != NULL) {
    976 		err = usbd_abort_pipe(sc->sc_ep[UPL_ENDPT_INTR]);
    977 		if (err) {
    978 			printf("%s: abort intr pipe failed: %s\n",
    979 			USBDEVNAME(sc->sc_dev), usbd_errstr(err));
    980 		}
    981 		err = usbd_close_pipe(sc->sc_ep[UPL_ENDPT_INTR]);
    982 		if (err) {
    983 			printf("%s: close intr pipe failed: %s\n",
    984 			    USBDEVNAME(sc->sc_dev), usbd_errstr(err));
    985 		}
    986 		sc->sc_ep[UPL_ENDPT_INTR] = NULL;
    987 	}
    988 
    989 	/* Free RX resources. */
    990 	for (i = 0; i < UPL_RX_LIST_CNT; i++) {
    991 		if (sc->sc_cdata.upl_rx_chain[i].upl_mbuf != NULL) {
    992 			m_freem(sc->sc_cdata.upl_rx_chain[i].upl_mbuf);
    993 			sc->sc_cdata.upl_rx_chain[i].upl_mbuf = NULL;
    994 		}
    995 		if (sc->sc_cdata.upl_rx_chain[i].upl_xfer != NULL) {
    996 			usbd_free_xfer(sc->sc_cdata.upl_rx_chain[i].upl_xfer);
    997 			sc->sc_cdata.upl_rx_chain[i].upl_xfer = NULL;
    998 		}
    999 	}
   1000 
   1001 	/* Free TX resources. */
   1002 	for (i = 0; i < UPL_TX_LIST_CNT; i++) {
   1003 		if (sc->sc_cdata.upl_tx_chain[i].upl_mbuf != NULL) {
   1004 			m_freem(sc->sc_cdata.upl_tx_chain[i].upl_mbuf);
   1005 			sc->sc_cdata.upl_tx_chain[i].upl_mbuf = NULL;
   1006 		}
   1007 		if (sc->sc_cdata.upl_tx_chain[i].upl_xfer != NULL) {
   1008 			usbd_free_xfer(sc->sc_cdata.upl_tx_chain[i].upl_xfer);
   1009 			sc->sc_cdata.upl_tx_chain[i].upl_xfer = NULL;
   1010 		}
   1011 	}
   1012 
   1013 	ifp->if_flags &= ~(IFF_RUNNING | IFF_OACTIVE);
   1014 }
   1015 
   1016 Static int
   1017 upl_output(struct ifnet *ifp, struct mbuf *m, struct sockaddr *dst,
   1018     struct rtentry *rt0)
   1019 {
   1020 	int s, len, error;
   1021 	ALTQ_DECL(struct altq_pktattr pktattr;)
   1022 
   1023 	DPRINTFN(10,("%s: %s: enter\n",
   1024 		     USBDEVNAME(((struct upl_softc *)ifp->if_softc)->sc_dev),
   1025 		     __func__));
   1026 
   1027 	/*
   1028 	 * if the queueing discipline needs packet classification,
   1029 	 * do it now.
   1030 	 */
   1031 	IFQ_CLASSIFY(&ifp->if_snd, m, dst->sa_family, &pktattr);
   1032 
   1033 	len = m->m_pkthdr.len;
   1034 	s = splnet();
   1035 	/*
   1036 	 * Queue message on interface, and start output if interface
   1037 	 * not yet active.
   1038 	 */
   1039 	IFQ_ENQUEUE(&ifp->if_snd, m, &pktattr, error);
   1040 	if (error) {
   1041 		/* mbuf is already freed */
   1042 		splx(s);
   1043 		return (error);
   1044 	}
   1045 	ifp->if_obytes += len;
   1046 	if ((ifp->if_flags & IFF_OACTIVE) == 0)
   1047 		(*ifp->if_start)(ifp);
   1048 	splx(s);
   1049 
   1050 	return (0);
   1051 }
   1052 
   1053 Static void
   1054 upl_input(struct ifnet *ifp, struct mbuf *m)
   1055 {
   1056 #ifdef INET
   1057 	struct ifqueue *inq;
   1058 	int s;
   1059 
   1060 	/* XXX Assume all traffic is IP */
   1061 
   1062 	schednetisr(NETISR_IP);
   1063 	inq = &ipintrq;
   1064 
   1065 	s = splnet();
   1066 	if (IF_QFULL(inq)) {
   1067 		IF_DROP(inq);
   1068 		splx(s);
   1069 #if 0
   1070 		if (sc->sc_flags & SC_DEBUG)
   1071 			printf("%s: input queue full\n", ifp->if_xname);
   1072 #endif
   1073 		ifp->if_iqdrops++;
   1074 		return;
   1075 	}
   1076 	IF_ENQUEUE(inq, m);
   1077 	splx(s);
   1078 #endif
   1079 	ifp->if_ipackets++;
   1080 	ifp->if_ibytes += m->m_len;
   1081 }
   1082