xref: /freebsd/sys/dev/usb/net/if_usie.c (revision 84dfba8d183d31e3412639ecb4b8ad4433cf7e80)
1 /*-
2  * Copyright (c) 2011 Anybots Inc
3  * written by Akinori Furukoshi <moonlightakkiy@yahoo.ca>
4  *  - ucom part is based on u3g.c
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  */
27 
28 #include <sys/cdefs.h>
29 __FBSDID("$FreeBSD$");
30 
31 #include <sys/param.h>
32 #include <sys/systm.h>
33 #include <sys/queue.h>
34 #include <sys/systm.h>
35 #include <sys/socket.h>
36 #include <sys/kernel.h>
37 #include <sys/bus.h>
38 #include <sys/module.h>
39 #include <sys/sockio.h>
40 #include <sys/socket.h>
41 #include <sys/lock.h>
42 #include <sys/mutex.h>
43 #include <sys/condvar.h>
44 #include <sys/sysctl.h>
45 #include <sys/malloc.h>
46 #include <sys/taskqueue.h>
47 
48 #include <net/if.h>
49 #include <net/if_var.h>
50 
51 #include <machine/bus.h>
52 
53 #include <net/if.h>
54 #include <net/if_types.h>
55 #include <net/netisr.h>
56 #include <net/bpf.h>
57 #include <net/ethernet.h>
58 
59 #include <netinet/in.h>
60 #include <netinet/ip.h>
61 #include <netinet/ip6.h>
62 #include <netinet/udp.h>
63 
64 #include <net80211/ieee80211_ioctl.h>
65 
66 #include <dev/usb/usb.h>
67 #include <dev/usb/usbdi.h>
68 #include <dev/usb/usbdi_util.h>
69 #include <dev/usb/usb_cdc.h>
70 #include "usbdevs.h"
71 
72 #define	USB_DEBUG_VAR usie_debug
73 #include <dev/usb/usb_debug.h>
74 #include <dev/usb/usb_process.h>
75 #include <dev/usb/usb_msctest.h>
76 
77 #include <dev/usb/serial/usb_serial.h>
78 
79 #include <dev/usb/net/if_usievar.h>
80 
81 #ifdef	USB_DEBUG
82 static int usie_debug = 0;
83 
84 static SYSCTL_NODE(_hw_usb, OID_AUTO, usie, CTLFLAG_RW, 0, "sierra USB modem");
85 SYSCTL_INT(_hw_usb_usie, OID_AUTO, debug, CTLFLAG_RW, &usie_debug, 0,
86     "usie debug level");
87 #endif
88 
89 /* Sierra Wireless Direct IP modems */
90 static const STRUCT_USB_HOST_ID usie_devs[] = {
91 #define	USIE_DEV(v, d) {				\
92     USB_VP(USB_VENDOR_##v, USB_PRODUCT_##v##_##d) }
93 	USIE_DEV(SIERRA, MC8700),
94 	USIE_DEV(SIERRA, TRUINSTALL),
95 	USIE_DEV(AIRPRIME, USB308),
96 #undef	USIE_DEV
97 };
98 
99 static device_probe_t usie_probe;
100 static device_attach_t usie_attach;
101 static device_detach_t usie_detach;
102 static void usie_free_softc(struct usie_softc *);
103 
104 static void usie_free(struct ucom_softc *);
105 static void usie_uc_update_line_state(struct ucom_softc *, uint8_t);
106 static void usie_uc_cfg_get_status(struct ucom_softc *, uint8_t *, uint8_t *);
107 static void usie_uc_cfg_set_dtr(struct ucom_softc *, uint8_t);
108 static void usie_uc_cfg_set_rts(struct ucom_softc *, uint8_t);
109 static void usie_uc_cfg_open(struct ucom_softc *);
110 static void usie_uc_cfg_close(struct ucom_softc *);
111 static void usie_uc_start_read(struct ucom_softc *);
112 static void usie_uc_stop_read(struct ucom_softc *);
113 static void usie_uc_start_write(struct ucom_softc *);
114 static void usie_uc_stop_write(struct ucom_softc *);
115 
116 static usb_callback_t usie_uc_tx_callback;
117 static usb_callback_t usie_uc_rx_callback;
118 static usb_callback_t usie_uc_status_callback;
119 static usb_callback_t usie_if_tx_callback;
120 static usb_callback_t usie_if_rx_callback;
121 static usb_callback_t usie_if_status_callback;
122 
123 static void usie_if_sync_to(void *);
124 static void usie_if_sync_cb(void *, int);
125 static void usie_if_status_cb(void *, int);
126 
127 static void usie_if_start(struct ifnet *);
128 static int usie_if_output(struct ifnet *, struct mbuf *,
129 	const struct sockaddr *, struct route *);
130 static void usie_if_init(void *);
131 static void usie_if_stop(struct usie_softc *);
132 static int usie_if_ioctl(struct ifnet *, u_long, caddr_t);
133 
134 static int usie_do_request(struct usie_softc *, struct usb_device_request *, void *);
135 static int usie_if_cmd(struct usie_softc *, uint8_t);
136 static void usie_cns_req(struct usie_softc *, uint32_t, uint16_t);
137 static void usie_cns_rsp(struct usie_softc *, struct usie_cns *);
138 static void usie_hip_rsp(struct usie_softc *, uint8_t *, uint32_t);
139 static int usie_driver_loaded(struct module *, int, void *);
140 
141 static const struct usb_config usie_uc_config[USIE_UC_N_XFER] = {
142 	[USIE_UC_STATUS] = {
143 		.type = UE_INTERRUPT,
144 		.endpoint = UE_ADDR_ANY,
145 		.direction = UE_DIR_IN,
146 		.bufsize = 0,		/* use wMaxPacketSize */
147 		.flags = {.pipe_bof = 1,.short_xfer_ok = 1,},
148 		.callback = &usie_uc_status_callback,
149 	},
150 	[USIE_UC_RX] = {
151 		.type = UE_BULK,
152 		.endpoint = UE_ADDR_ANY,
153 		.direction = UE_DIR_IN,
154 		.bufsize = USIE_BUFSIZE,
155 		.flags = {.pipe_bof = 1,.short_xfer_ok = 1,.proxy_buffer = 1,},
156 		.callback = &usie_uc_rx_callback,
157 	},
158 	[USIE_UC_TX] = {
159 		.type = UE_BULK,
160 		.endpoint = UE_ADDR_ANY,
161 		.direction = UE_DIR_OUT,
162 		.bufsize = USIE_BUFSIZE,
163 		.flags = {.pipe_bof = 1,.force_short_xfer = 1,},
164 		.callback = &usie_uc_tx_callback,
165 	}
166 };
167 
168 static const struct usb_config usie_if_config[USIE_IF_N_XFER] = {
169 	[USIE_IF_STATUS] = {
170 		.type = UE_INTERRUPT,
171 		.endpoint = UE_ADDR_ANY,
172 		.direction = UE_DIR_IN,
173 		.bufsize = 0,		/* use wMaxPacketSize */
174 		.flags = {.pipe_bof = 1,.short_xfer_ok = 1,},
175 		.callback = &usie_if_status_callback,
176 	},
177 	[USIE_IF_RX] = {
178 		.type = UE_BULK,
179 		.endpoint = UE_ADDR_ANY,
180 		.direction = UE_DIR_IN,
181 		.bufsize = USIE_BUFSIZE,
182 		.flags = {.pipe_bof = 1,.short_xfer_ok = 1,},
183 		.callback = &usie_if_rx_callback,
184 	},
185 	[USIE_IF_TX] = {
186 		.type = UE_BULK,
187 		.endpoint = UE_ADDR_ANY,
188 		.direction = UE_DIR_OUT,
189 		.bufsize = MAX(USIE_BUFSIZE, MCLBYTES),
190 		.flags = {.pipe_bof = 1,.force_short_xfer = 1,},
191 		.callback = &usie_if_tx_callback,
192 	}
193 };
194 
195 static device_method_t usie_methods[] = {
196 	DEVMETHOD(device_probe, usie_probe),
197 	DEVMETHOD(device_attach, usie_attach),
198 	DEVMETHOD(device_detach, usie_detach),
199 	DEVMETHOD_END
200 };
201 
202 static driver_t usie_driver = {
203 	.name = "usie",
204 	.methods = usie_methods,
205 	.size = sizeof(struct usie_softc),
206 };
207 
208 static devclass_t usie_devclass;
209 static eventhandler_tag usie_etag;
210 
211 DRIVER_MODULE(usie, uhub, usie_driver, usie_devclass, usie_driver_loaded, 0);
212 MODULE_DEPEND(usie, ucom, 1, 1, 1);
213 MODULE_DEPEND(usie, usb, 1, 1, 1);
214 MODULE_VERSION(usie, 1);
215 
216 static const struct ucom_callback usie_uc_callback = {
217 	.ucom_cfg_get_status = &usie_uc_cfg_get_status,
218 	.ucom_cfg_set_dtr = &usie_uc_cfg_set_dtr,
219 	.ucom_cfg_set_rts = &usie_uc_cfg_set_rts,
220 	.ucom_cfg_open = &usie_uc_cfg_open,
221 	.ucom_cfg_close = &usie_uc_cfg_close,
222 	.ucom_start_read = &usie_uc_start_read,
223 	.ucom_stop_read = &usie_uc_stop_read,
224 	.ucom_start_write = &usie_uc_start_write,
225 	.ucom_stop_write = &usie_uc_stop_write,
226 	.ucom_free = &usie_free,
227 };
228 
229 static void
230 usie_autoinst(void *arg, struct usb_device *udev,
231     struct usb_attach_arg *uaa)
232 {
233 	struct usb_interface *iface;
234 	struct usb_interface_descriptor *id;
235 	struct usb_device_request req;
236 	int err;
237 
238 	if (uaa->dev_state != UAA_DEV_READY)
239 		return;
240 
241 	iface = usbd_get_iface(udev, 0);
242 	if (iface == NULL)
243 		return;
244 
245 	id = iface->idesc;
246 	if (id == NULL || id->bInterfaceClass != UICLASS_MASS)
247 		return;
248 
249 	if (usbd_lookup_id_by_uaa(usie_devs, sizeof(usie_devs), uaa) != 0)
250 		return;			/* no device match */
251 
252 	if (bootverbose) {
253 		DPRINTF("Ejecting %s %s\n",
254 		    usb_get_manufacturer(udev),
255 		    usb_get_product(udev));
256 	}
257 	req.bmRequestType = UT_VENDOR;
258 	req.bRequest = UR_SET_INTERFACE;
259 	USETW(req.wValue, UF_DEVICE_REMOTE_WAKEUP);
260 	USETW(req.wIndex, UHF_PORT_CONNECTION);
261 	USETW(req.wLength, 0);
262 
263 	/* at this moment there is no mutex */
264 	err = usbd_do_request_flags(udev, NULL, &req,
265 	    NULL, 0, NULL, 250 /* ms */ );
266 
267 	/* success, mark the udev as disappearing */
268 	if (err == 0)
269 		uaa->dev_state = UAA_DEV_EJECTING;
270 }
271 
272 static int
273 usie_probe(device_t self)
274 {
275 	struct usb_attach_arg *uaa = device_get_ivars(self);
276 
277 	if (uaa->usb_mode != USB_MODE_HOST)
278 		return (ENXIO);
279 	if (uaa->info.bConfigIndex != USIE_CNFG_INDEX)
280 		return (ENXIO);
281 	if (uaa->info.bIfaceIndex != USIE_IFACE_INDEX)
282 		return (ENXIO);
283 	if (uaa->info.bInterfaceClass != UICLASS_VENDOR)
284 		return (ENXIO);
285 
286 	return (usbd_lookup_id_by_uaa(usie_devs, sizeof(usie_devs), uaa));
287 }
288 
289 static int
290 usie_attach(device_t self)
291 {
292 	struct usie_softc *sc = device_get_softc(self);
293 	struct usb_attach_arg *uaa = device_get_ivars(self);
294 	struct ifnet *ifp;
295 	struct usb_interface *iface;
296 	struct usb_interface_descriptor *id;
297 	struct usb_device_request req;
298 	int err;
299 	uint16_t fwattr;
300 	uint8_t iface_index;
301 	uint8_t ifidx;
302 	uint8_t start;
303 
304 	device_set_usb_desc(self);
305 	sc->sc_udev = uaa->device;
306 	sc->sc_dev = self;
307 
308 	mtx_init(&sc->sc_mtx, "usie", MTX_NETWORK_LOCK, MTX_DEF);
309 	ucom_ref(&sc->sc_super_ucom);
310 
311 	TASK_INIT(&sc->sc_if_status_task, 0, usie_if_status_cb, sc);
312 	TASK_INIT(&sc->sc_if_sync_task, 0, usie_if_sync_cb, sc);
313 
314 	usb_callout_init_mtx(&sc->sc_if_sync_ch, &sc->sc_mtx, 0);
315 
316 	mtx_lock(&sc->sc_mtx);
317 
318 	/* set power mode to D0 */
319 	req.bmRequestType = UT_WRITE_VENDOR_DEVICE;
320 	req.bRequest = USIE_POWER;
321 	USETW(req.wValue, 0);
322 	USETW(req.wIndex, 0);
323 	USETW(req.wLength, 0);
324 	if (usie_do_request(sc, &req, NULL)) {
325 		mtx_unlock(&sc->sc_mtx);
326 		goto detach;
327 	}
328 	/* read fw attr */
329 	fwattr = 0;
330 	req.bmRequestType = UT_READ_VENDOR_DEVICE;
331 	req.bRequest = USIE_FW_ATTR;
332 	USETW(req.wValue, 0);
333 	USETW(req.wIndex, 0);
334 	USETW(req.wLength, sizeof(fwattr));
335 	if (usie_do_request(sc, &req, &fwattr)) {
336 		mtx_unlock(&sc->sc_mtx);
337 		goto detach;
338 	}
339 	mtx_unlock(&sc->sc_mtx);
340 
341 	/* check DHCP supports */
342 	DPRINTF("fwattr=%x\n", fwattr);
343 	if (!(fwattr & USIE_FW_DHCP)) {
344 		device_printf(self, "DHCP is not supported. A firmware upgrade might be needed.\n");
345 	}
346 
347 	/* find available interfaces */
348 	sc->sc_nucom = 0;
349 	for (ifidx = 0; ifidx < USIE_IFACE_MAX; ifidx++) {
350 		iface = usbd_get_iface(uaa->device, ifidx);
351 		if (iface == NULL)
352 			break;
353 
354 		id = usbd_get_interface_descriptor(iface);
355 		if ((id == NULL) || (id->bInterfaceClass != UICLASS_VENDOR))
356 			continue;
357 
358 		/* setup Direct IP transfer */
359 		if (id->bInterfaceNumber >= 7 && id->bNumEndpoints == 3) {
360 			sc->sc_if_ifnum = id->bInterfaceNumber;
361 			iface_index = ifidx;
362 
363 			DPRINTF("ifnum=%d, ifidx=%d\n",
364 			    sc->sc_if_ifnum, ifidx);
365 
366 			err = usbd_transfer_setup(uaa->device,
367 			    &iface_index, sc->sc_if_xfer, usie_if_config,
368 			    USIE_IF_N_XFER, sc, &sc->sc_mtx);
369 
370 			if (err == 0)
371 				continue;
372 
373 			device_printf(self,
374 			    "could not allocate USB transfers on "
375 			    "iface_index=%d, err=%s\n",
376 			    iface_index, usbd_errstr(err));
377 			goto detach;
378 		}
379 
380 		/* setup ucom */
381 		if (sc->sc_nucom >= USIE_UCOM_MAX)
382 			continue;
383 
384 		usbd_set_parent_iface(uaa->device, ifidx,
385 		    uaa->info.bIfaceIndex);
386 
387 		DPRINTF("NumEndpoints=%d bInterfaceNumber=%d\n",
388 		    id->bNumEndpoints, id->bInterfaceNumber);
389 
390 		if (id->bNumEndpoints == 2) {
391 			sc->sc_uc_xfer[sc->sc_nucom][0] = NULL;
392 			start = 1;
393 		} else
394 			start = 0;
395 
396 		err = usbd_transfer_setup(uaa->device, &ifidx,
397 		    sc->sc_uc_xfer[sc->sc_nucom] + start,
398 		    usie_uc_config + start, USIE_UC_N_XFER - start,
399 		    &sc->sc_ucom[sc->sc_nucom], &sc->sc_mtx);
400 
401 		if (err != 0) {
402 			DPRINTF("usbd_transfer_setup error=%s\n", usbd_errstr(err));
403 			continue;
404 		}
405 
406 		mtx_lock(&sc->sc_mtx);
407 		for (; start < USIE_UC_N_XFER; start++)
408 			usbd_xfer_set_stall(sc->sc_uc_xfer[sc->sc_nucom][start]);
409 		mtx_unlock(&sc->sc_mtx);
410 
411 		sc->sc_uc_ifnum[sc->sc_nucom] = id->bInterfaceNumber;
412 
413 		sc->sc_nucom++;		/* found a port */
414 	}
415 
416 	if (sc->sc_nucom == 0) {
417 		device_printf(self, "no comports found\n");
418 		goto detach;
419 	}
420 
421 	err = ucom_attach(&sc->sc_super_ucom, sc->sc_ucom,
422 	    sc->sc_nucom, sc, &usie_uc_callback, &sc->sc_mtx);
423 
424 	if (err != 0) {
425 		DPRINTF("ucom_attach failed\n");
426 		goto detach;
427 	}
428 	DPRINTF("Found %d interfaces.\n", sc->sc_nucom);
429 
430 	/* setup ifnet (Direct IP) */
431 	sc->sc_ifp = ifp = if_alloc(IFT_OTHER);
432 
433 	if (ifp == NULL) {
434 		device_printf(self, "Could not allocate a network interface\n");
435 		goto detach;
436 	}
437 	if_initname(ifp, "usie", device_get_unit(self));
438 
439 	ifp->if_softc = sc;
440 	ifp->if_mtu = USIE_MTU_MAX;
441 	ifp->if_flags |= IFF_NOARP;
442 	ifp->if_init = usie_if_init;
443 	ifp->if_ioctl = usie_if_ioctl;
444 	ifp->if_start = usie_if_start;
445 	ifp->if_output = usie_if_output;
446 	IFQ_SET_MAXLEN(&ifp->if_snd, ifqmaxlen);
447 	ifp->if_snd.ifq_drv_maxlen = ifqmaxlen;
448 	IFQ_SET_READY(&ifp->if_snd);
449 
450 	if_attach(ifp);
451 	bpfattach(ifp, DLT_RAW, 0);
452 
453 	if (fwattr & USIE_PM_AUTO) {
454 		usbd_set_power_mode(uaa->device, USB_POWER_MODE_SAVE);
455 		DPRINTF("enabling automatic suspend and resume\n");
456 	} else {
457 		usbd_set_power_mode(uaa->device, USB_POWER_MODE_ON);
458 		DPRINTF("USB power is always ON\n");
459 	}
460 
461 	DPRINTF("device attached\n");
462 	return (0);
463 
464 detach:
465 	usie_detach(self);
466 	return (ENOMEM);
467 }
468 
469 static int
470 usie_detach(device_t self)
471 {
472 	struct usie_softc *sc = device_get_softc(self);
473 	uint8_t x;
474 
475 	/* detach ifnet */
476 	if (sc->sc_ifp != NULL) {
477 		usie_if_stop(sc);
478 		usbd_transfer_unsetup(sc->sc_if_xfer, USIE_IF_N_XFER);
479 		bpfdetach(sc->sc_ifp);
480 		if_detach(sc->sc_ifp);
481 		if_free(sc->sc_ifp);
482 		sc->sc_ifp = NULL;
483 	}
484 	/* detach ucom */
485 	if (sc->sc_nucom > 0)
486 		ucom_detach(&sc->sc_super_ucom, sc->sc_ucom);
487 
488 	/* stop all USB transfers */
489 	usbd_transfer_unsetup(sc->sc_if_xfer, USIE_IF_N_XFER);
490 
491 	for (x = 0; x != USIE_UCOM_MAX; x++)
492 		usbd_transfer_unsetup(sc->sc_uc_xfer[x], USIE_UC_N_XFER);
493 
494 
495 	device_claim_softc(self);
496 
497 	usie_free_softc(sc);
498 
499 	return (0);
500 }
501 
502 UCOM_UNLOAD_DRAIN(usie);
503 
504 static void
505 usie_free_softc(struct usie_softc *sc)
506 {
507 	if (ucom_unref(&sc->sc_super_ucom)) {
508 		mtx_destroy(&sc->sc_mtx);
509 		device_free_softc(sc);
510 	}
511 }
512 
513 static void
514 usie_free(struct ucom_softc *ucom)
515 {
516 	usie_free_softc(ucom->sc_parent);
517 }
518 
519 static void
520 usie_uc_update_line_state(struct ucom_softc *ucom, uint8_t ls)
521 {
522 	struct usie_softc *sc = ucom->sc_parent;
523 	struct usb_device_request req;
524 
525 	if (sc->sc_uc_xfer[ucom->sc_subunit][USIE_UC_STATUS] == NULL)
526 		return;
527 
528 	req.bmRequestType = UT_WRITE_CLASS_INTERFACE;
529 	req.bRequest = USIE_LINK_STATE;
530 	USETW(req.wValue, ls);
531 	USETW(req.wIndex, sc->sc_uc_ifnum[ucom->sc_subunit]);
532 	USETW(req.wLength, 0);
533 
534 	DPRINTF("sc_uc_ifnum=%d\n", sc->sc_uc_ifnum[ucom->sc_subunit]);
535 
536 	usie_do_request(sc, &req, NULL);
537 }
538 
539 static void
540 usie_uc_cfg_get_status(struct ucom_softc *ucom, uint8_t *lsr, uint8_t *msr)
541 {
542 	struct usie_softc *sc = ucom->sc_parent;
543 
544 	*msr = sc->sc_msr;
545 	*lsr = sc->sc_lsr;
546 }
547 
548 static void
549 usie_uc_cfg_set_dtr(struct ucom_softc *ucom, uint8_t flag)
550 {
551 	uint8_t dtr;
552 
553 	dtr = flag ? USIE_LS_DTR : 0;
554 	usie_uc_update_line_state(ucom, dtr);
555 }
556 
557 static void
558 usie_uc_cfg_set_rts(struct ucom_softc *ucom, uint8_t flag)
559 {
560 	uint8_t rts;
561 
562 	rts = flag ? USIE_LS_RTS : 0;
563 	usie_uc_update_line_state(ucom, rts);
564 }
565 
566 static void
567 usie_uc_cfg_open(struct ucom_softc *ucom)
568 {
569 	struct usie_softc *sc = ucom->sc_parent;
570 
571 	/* usbd_transfer_start() is NULL safe */
572 
573 	usbd_transfer_start(sc->sc_uc_xfer[ucom->sc_subunit][USIE_UC_STATUS]);
574 }
575 
576 static void
577 usie_uc_cfg_close(struct ucom_softc *ucom)
578 {
579 	struct usie_softc *sc = ucom->sc_parent;
580 
581 	usbd_transfer_stop(sc->sc_uc_xfer[ucom->sc_subunit][USIE_UC_STATUS]);
582 }
583 
584 static void
585 usie_uc_start_read(struct ucom_softc *ucom)
586 {
587 	struct usie_softc *sc = ucom->sc_parent;
588 
589 	usbd_transfer_start(sc->sc_uc_xfer[ucom->sc_subunit][USIE_UC_RX]);
590 }
591 
592 static void
593 usie_uc_stop_read(struct ucom_softc *ucom)
594 {
595 	struct usie_softc *sc = ucom->sc_parent;
596 
597 	usbd_transfer_stop(sc->sc_uc_xfer[ucom->sc_subunit][USIE_UC_RX]);
598 }
599 
600 static void
601 usie_uc_start_write(struct ucom_softc *ucom)
602 {
603 	struct usie_softc *sc = ucom->sc_parent;
604 
605 	usbd_transfer_start(sc->sc_uc_xfer[ucom->sc_subunit][USIE_UC_TX]);
606 }
607 
608 static void
609 usie_uc_stop_write(struct ucom_softc *ucom)
610 {
611 	struct usie_softc *sc = ucom->sc_parent;
612 
613 	usbd_transfer_stop(sc->sc_uc_xfer[ucom->sc_subunit][USIE_UC_TX]);
614 }
615 
616 static void
617 usie_uc_rx_callback(struct usb_xfer *xfer, usb_error_t error)
618 {
619 	struct ucom_softc *ucom = usbd_xfer_softc(xfer);
620 	struct usie_softc *sc = ucom->sc_parent;
621 	struct usb_page_cache *pc;
622 	uint32_t actlen;
623 
624 	usbd_xfer_status(xfer, &actlen, NULL, NULL, NULL);
625 
626 	switch (USB_GET_STATE(xfer)) {
627 	case USB_ST_TRANSFERRED:
628 		pc = usbd_xfer_get_frame(xfer, 0);
629 
630 		/* handle CnS response */
631 		if (ucom == sc->sc_ucom && actlen >= USIE_HIPCNS_MIN) {
632 
633 			DPRINTF("transferred=%u\n", actlen);
634 
635 			/* check if it is really CnS reply */
636 			usbd_copy_out(pc, 0, sc->sc_resp_temp, 1);
637 
638 			if (sc->sc_resp_temp[0] == USIE_HIP_FRM_CHR) {
639 
640 				/* verify actlen */
641 				if (actlen > USIE_BUFSIZE)
642 					actlen = USIE_BUFSIZE;
643 
644 				/* get complete message */
645 				usbd_copy_out(pc, 0, sc->sc_resp_temp, actlen);
646 				usie_hip_rsp(sc, sc->sc_resp_temp, actlen);
647 
648 				/* need to fall though */
649 				goto tr_setup;
650 			}
651 			/* else call ucom_put_data() */
652 		}
653 		/* standard ucom transfer */
654 		ucom_put_data(ucom, pc, 0, actlen);
655 
656 		/* fall though */
657 	case USB_ST_SETUP:
658 tr_setup:
659 		usbd_xfer_set_frame_len(xfer, 0, usbd_xfer_max_len(xfer));
660 		usbd_transfer_submit(xfer);
661 		break;
662 
663 	default:			/* Error */
664 		if (error != USB_ERR_CANCELLED) {
665 			usbd_xfer_set_stall(xfer);
666 			goto tr_setup;
667 		}
668 		break;
669 	}
670 }
671 
672 static void
673 usie_uc_tx_callback(struct usb_xfer *xfer, usb_error_t error)
674 {
675 	struct ucom_softc *ucom = usbd_xfer_softc(xfer);
676 	struct usb_page_cache *pc;
677 	uint32_t actlen;
678 
679 	switch (USB_GET_STATE(xfer)) {
680 	case USB_ST_TRANSFERRED:
681 	case USB_ST_SETUP:
682 tr_setup:
683 		pc = usbd_xfer_get_frame(xfer, 0);
684 
685 		/* handle CnS request */
686 		struct mbuf *m = usbd_xfer_get_priv(xfer);
687 
688 		if (m != NULL) {
689 			usbd_m_copy_in(pc, 0, m, 0, m->m_pkthdr.len);
690 			usbd_xfer_set_frame_len(xfer, 0, m->m_pkthdr.len);
691 			usbd_xfer_set_priv(xfer, NULL);
692 			usbd_transfer_submit(xfer);
693 			m_freem(m);
694 			break;
695 		}
696 		/* standard ucom transfer */
697 		if (ucom_get_data(ucom, pc, 0, USIE_BUFSIZE, &actlen)) {
698 			usbd_xfer_set_frame_len(xfer, 0, actlen);
699 			usbd_transfer_submit(xfer);
700 		}
701 		break;
702 
703 	default:			/* Error */
704 		if (error != USB_ERR_CANCELLED) {
705 			usbd_xfer_set_stall(xfer);
706 			goto tr_setup;
707 		}
708 		break;
709 	}
710 }
711 
712 static void
713 usie_uc_status_callback(struct usb_xfer *xfer, usb_error_t error)
714 {
715 	struct usb_page_cache *pc;
716 	struct {
717 		struct usb_device_request req;
718 		uint16_t param;
719 	}      st;
720 	uint32_t actlen;
721 	uint16_t param;
722 
723 	usbd_xfer_status(xfer, &actlen, NULL, NULL, NULL);
724 
725 	switch (USB_GET_STATE(xfer)) {
726 	case USB_ST_TRANSFERRED:
727 		DPRINTFN(4, "info received, actlen=%u\n", actlen);
728 
729 		if (actlen < sizeof(st)) {
730 			DPRINTF("data too short actlen=%u\n", actlen);
731 			goto tr_setup;
732 		}
733 		pc = usbd_xfer_get_frame(xfer, 0);
734 		usbd_copy_out(pc, 0, &st, sizeof(st));
735 
736 		if (st.req.bmRequestType == 0xa1 && st.req.bRequest == 0x20) {
737 			struct ucom_softc *ucom = usbd_xfer_softc(xfer);
738 			struct usie_softc *sc = ucom->sc_parent;
739 
740 			param = le16toh(st.param);
741 			DPRINTF("param=%x\n", param);
742 			sc->sc_msr = sc->sc_lsr = 0;
743 			sc->sc_msr |= (param & USIE_DCD) ? SER_DCD : 0;
744 			sc->sc_msr |= (param & USIE_DSR) ? SER_DSR : 0;
745 			sc->sc_msr |= (param & USIE_RI) ? SER_RI : 0;
746 			sc->sc_msr |= (param & USIE_CTS) ? 0 : SER_CTS;
747 			sc->sc_msr |= (param & USIE_RTS) ? SER_RTS : 0;
748 			sc->sc_msr |= (param & USIE_DTR) ? SER_DTR : 0;
749 		}
750 		/* fall though */
751 	case USB_ST_SETUP:
752 tr_setup:
753 		usbd_xfer_set_frame_len(xfer, 0, usbd_xfer_max_len(xfer));
754 		usbd_transfer_submit(xfer);
755 		break;
756 
757 	default:			/* Error */
758 		DPRINTF("USB transfer error, %s\n",
759 		    usbd_errstr(error));
760 
761 		if (error != USB_ERR_CANCELLED) {
762 			usbd_xfer_set_stall(xfer);
763 			goto tr_setup;
764 		}
765 		break;
766 	}
767 }
768 
769 static void
770 usie_if_rx_callback(struct usb_xfer *xfer, usb_error_t error)
771 {
772 	struct usie_softc *sc = usbd_xfer_softc(xfer);
773 	struct ifnet *ifp = sc->sc_ifp;
774 	struct mbuf *m0;
775 	struct mbuf *m = NULL;
776 	struct usie_desc *rxd;
777 	uint32_t actlen;
778 	uint16_t err;
779 	uint16_t pkt;
780 	uint16_t ipl;
781 	uint16_t len;
782 	uint16_t diff;
783 	uint8_t pad;
784 	uint8_t ipv;
785 
786 	usbd_xfer_status(xfer, &actlen, NULL, NULL, NULL);
787 
788 	switch (USB_GET_STATE(xfer)) {
789 	case USB_ST_TRANSFERRED:
790 		DPRINTFN(15, "rx done, actlen=%u\n", actlen);
791 
792 		if (actlen < sizeof(struct usie_hip)) {
793 			DPRINTF("data too short %u\n", actlen);
794 			goto tr_setup;
795 		}
796 		m = sc->sc_rxm;
797 		sc->sc_rxm = NULL;
798 
799 		/* fall though */
800 	case USB_ST_SETUP:
801 tr_setup:
802 
803 		if (sc->sc_rxm == NULL) {
804 			sc->sc_rxm = m_getjcl(M_NOWAIT, MT_DATA, M_PKTHDR,
805 			    MJUMPAGESIZE /* could be bigger than MCLBYTES */ );
806 		}
807 		if (sc->sc_rxm == NULL) {
808 			DPRINTF("could not allocate Rx mbuf\n");
809 			ifp->if_ierrors++;
810 			usbd_xfer_set_stall(xfer);
811 			usbd_xfer_set_frames(xfer, 0);
812 		} else {
813 			/*
814 			 * Directly loading a mbuf cluster into DMA to
815 			 * save some data copying. This works because
816 			 * there is only one cluster.
817 			 */
818 			usbd_xfer_set_frame_data(xfer, 0,
819 			    mtod(sc->sc_rxm, caddr_t), MIN(MJUMPAGESIZE, USIE_RXSZ_MAX));
820 			usbd_xfer_set_frames(xfer, 1);
821 		}
822 		usbd_transfer_submit(xfer);
823 		break;
824 
825 	default:			/* Error */
826 		DPRINTF("USB transfer error, %s\n", usbd_errstr(error));
827 
828 		if (error != USB_ERR_CANCELLED) {
829 			/* try to clear stall first */
830 			usbd_xfer_set_stall(xfer);
831 			ifp->if_ierrors++;
832 			goto tr_setup;
833 		}
834 		if (sc->sc_rxm != NULL) {
835 			m_freem(sc->sc_rxm);
836 			sc->sc_rxm = NULL;
837 		}
838 		break;
839 	}
840 
841 	if (m == NULL)
842 		return;
843 
844 	mtx_unlock(&sc->sc_mtx);
845 
846 	m->m_pkthdr.len = m->m_len = actlen;
847 
848 	err = pkt = 0;
849 
850 	/* HW can aggregate multiple frames in a single USB xfer */
851 	for (;;) {
852 		rxd = mtod(m, struct usie_desc *);
853 
854 		len = be16toh(rxd->hip.len) & USIE_HIP_IP_LEN_MASK;
855 		pad = (rxd->hip.id & USIE_HIP_PAD) ? 1 : 0;
856 		ipl = (len - pad - ETHER_HDR_LEN);
857 		if (ipl >= len) {
858 			DPRINTF("Corrupt frame\n");
859 			m_freem(m);
860 			break;
861 		}
862 		diff = sizeof(struct usie_desc) + ipl + pad;
863 
864 		if (((rxd->hip.id & USIE_HIP_MASK) != USIE_HIP_IP) ||
865 		    (be16toh(rxd->desc_type) & USIE_TYPE_MASK) != USIE_IP_RX) {
866 			DPRINTF("received wrong type of packet\n");
867 			m->m_data += diff;
868 			m->m_pkthdr.len = (m->m_len -= diff);
869 			err++;
870 			if (m->m_pkthdr.len > 0)
871 				continue;
872 			m_freem(m);
873 			break;
874 		}
875 		switch (be16toh(rxd->ethhdr.ether_type)) {
876 		case ETHERTYPE_IP:
877 			ipv = NETISR_IP;
878 			break;
879 #ifdef INET6
880 		case ETHERTYPE_IPV6:
881 			ipv = NETISR_IPV6;
882 			break;
883 #endif
884 		default:
885 			DPRINTF("unsupported ether type\n");
886 			err++;
887 			break;
888 		}
889 
890 		/* the last packet */
891 		if (m->m_pkthdr.len <= diff) {
892 			m->m_data += (sizeof(struct usie_desc) + pad);
893 			m->m_pkthdr.len = m->m_len = ipl;
894 			m->m_pkthdr.rcvif = ifp;
895 			BPF_MTAP(sc->sc_ifp, m);
896 			netisr_dispatch(ipv, m);
897 			break;
898 		}
899 		/* copy aggregated frames to another mbuf */
900 		m0 = m_getcl(M_NOWAIT, MT_DATA, M_PKTHDR);
901 		if (__predict_false(m0 == NULL)) {
902 			DPRINTF("could not allocate mbuf\n");
903 			err++;
904 			m_freem(m);
905 			break;
906 		}
907 		m_copydata(m, sizeof(struct usie_desc) + pad, ipl, mtod(m0, caddr_t));
908 		m0->m_pkthdr.rcvif = ifp;
909 		m0->m_pkthdr.len = m0->m_len = ipl;
910 
911 		BPF_MTAP(sc->sc_ifp, m0);
912 		netisr_dispatch(ipv, m0);
913 
914 		m->m_data += diff;
915 		m->m_pkthdr.len = (m->m_len -= diff);
916 	}
917 
918 	mtx_lock(&sc->sc_mtx);
919 
920 	ifp->if_ierrors += err;
921 	ifp->if_ipackets += pkt;
922 }
923 
924 static void
925 usie_if_tx_callback(struct usb_xfer *xfer, usb_error_t error)
926 {
927 	struct usie_softc *sc = usbd_xfer_softc(xfer);
928 	struct usb_page_cache *pc;
929 	struct ifnet *ifp = sc->sc_ifp;
930 	struct mbuf *m;
931 	uint16_t size;
932 
933 	switch (USB_GET_STATE(xfer)) {
934 	case USB_ST_TRANSFERRED:
935 		DPRINTFN(11, "transfer complete\n");
936 		ifp->if_drv_flags &= ~IFF_DRV_OACTIVE;
937 		ifp->if_opackets++;
938 
939 		/* fall though */
940 	case USB_ST_SETUP:
941 tr_setup:
942 
943 		if ((ifp->if_drv_flags & IFF_DRV_RUNNING) == 0)
944 			break;
945 
946 		IFQ_DRV_DEQUEUE(&ifp->if_snd, m);
947 		if (m == NULL)
948 			break;
949 
950 		if (m->m_pkthdr.len > (int)(MCLBYTES - ETHER_HDR_LEN +
951 		    ETHER_CRC_LEN - sizeof(sc->sc_txd))) {
952 			DPRINTF("packet len is too big: %d\n",
953 			    m->m_pkthdr.len);
954 			break;
955 		}
956 		pc = usbd_xfer_get_frame(xfer, 0);
957 
958 		sc->sc_txd.hip.len = htobe16(m->m_pkthdr.len +
959 		    ETHER_HDR_LEN + ETHER_CRC_LEN);
960 		size = sizeof(sc->sc_txd);
961 
962 		usbd_copy_in(pc, 0, &sc->sc_txd, size);
963 		usbd_m_copy_in(pc, size, m, 0, m->m_pkthdr.len);
964 		usbd_xfer_set_frame_len(xfer, 0, m->m_pkthdr.len +
965 		    size + ETHER_CRC_LEN);
966 
967 		BPF_MTAP(ifp, m);
968 
969 		m_freem(m);
970 
971 		usbd_transfer_submit(xfer);
972 		break;
973 
974 	default:			/* Error */
975 		DPRINTF("USB transfer error, %s\n",
976 		    usbd_errstr(error));
977 		ifp->if_oerrors++;
978 
979 		if (error != USB_ERR_CANCELLED) {
980 			usbd_xfer_set_stall(xfer);
981 			ifp->if_ierrors++;
982 			goto tr_setup;
983 		}
984 		break;
985 	}
986 }
987 
988 static void
989 usie_if_status_callback(struct usb_xfer *xfer, usb_error_t error)
990 {
991 	struct usie_softc *sc = usbd_xfer_softc(xfer);
992 	struct usb_page_cache *pc;
993 	struct usb_cdc_notification cdc;
994 	uint32_t actlen;
995 
996 	usbd_xfer_status(xfer, &actlen, NULL, NULL, NULL);
997 
998 	switch (USB_GET_STATE(xfer)) {
999 	case USB_ST_TRANSFERRED:
1000 		DPRINTFN(4, "info received, actlen=%d\n", actlen);
1001 
1002 		/* usb_cdc_notification - .data[16] */
1003 		if (actlen < (sizeof(cdc) - 16)) {
1004 			DPRINTF("data too short %d\n", actlen);
1005 			goto tr_setup;
1006 		}
1007 		pc = usbd_xfer_get_frame(xfer, 0);
1008 		usbd_copy_out(pc, 0, &cdc, (sizeof(cdc) - 16));
1009 
1010 		DPRINTFN(4, "bNotification=%x\n", cdc.bNotification);
1011 
1012 		if (cdc.bNotification & UCDC_N_RESPONSE_AVAILABLE) {
1013 			taskqueue_enqueue(taskqueue_thread,
1014 			    &sc->sc_if_status_task);
1015 		}
1016 		/* fall though */
1017 	case USB_ST_SETUP:
1018 tr_setup:
1019 		usbd_xfer_set_frame_len(xfer, 0, usbd_xfer_max_len(xfer));
1020 		usbd_transfer_submit(xfer);
1021 		break;
1022 
1023 	default:			/* Error */
1024 		DPRINTF("USB transfer error, %s\n",
1025 		    usbd_errstr(error));
1026 
1027 		if (error != USB_ERR_CANCELLED) {
1028 			usbd_xfer_set_stall(xfer);
1029 			goto tr_setup;
1030 		}
1031 		break;
1032 	}
1033 }
1034 
1035 static void
1036 usie_if_sync_to(void *arg)
1037 {
1038 	struct usie_softc *sc = arg;
1039 
1040 	taskqueue_enqueue(taskqueue_thread, &sc->sc_if_sync_task);
1041 }
1042 
1043 static void
1044 usie_if_sync_cb(void *arg, int pending)
1045 {
1046 	struct usie_softc *sc = arg;
1047 
1048 	mtx_lock(&sc->sc_mtx);
1049 
1050 	/* call twice */
1051 	usie_if_cmd(sc, USIE_HIP_SYNC2M);
1052 	usie_if_cmd(sc, USIE_HIP_SYNC2M);
1053 
1054 	usb_callout_reset(&sc->sc_if_sync_ch, 2 * hz, usie_if_sync_to, sc);
1055 
1056 	mtx_unlock(&sc->sc_mtx);
1057 }
1058 
1059 static void
1060 usie_if_status_cb(void *arg, int pending)
1061 {
1062 	struct usie_softc *sc = arg;
1063 	struct ifnet *ifp = sc->sc_ifp;
1064 	struct usb_device_request req;
1065 	struct usie_hip *hip;
1066 	struct usie_lsi *lsi;
1067 	uint16_t actlen;
1068 	uint8_t ntries;
1069 	uint8_t pad;
1070 
1071 	mtx_lock(&sc->sc_mtx);
1072 
1073 	req.bmRequestType = UT_READ_CLASS_INTERFACE;
1074 	req.bRequest = UCDC_GET_ENCAPSULATED_RESPONSE;
1075 	USETW(req.wValue, 0);
1076 	USETW(req.wIndex, sc->sc_if_ifnum);
1077 	USETW(req.wLength, sizeof(sc->sc_status_temp));
1078 
1079 	for (ntries = 0; ntries != 10; ntries++) {
1080 		int err;
1081 
1082 		err = usbd_do_request_flags(sc->sc_udev,
1083 		    &sc->sc_mtx, &req, sc->sc_status_temp, USB_SHORT_XFER_OK,
1084 		    &actlen, USB_DEFAULT_TIMEOUT);
1085 
1086 		if (err == 0)
1087 			break;
1088 
1089 		DPRINTF("Control request failed: %s %d/10\n",
1090 		    usbd_errstr(err), ntries);
1091 
1092 		usb_pause_mtx(&sc->sc_mtx, USB_MS_TO_TICKS(10));
1093 	}
1094 
1095 	if (ntries == 10) {
1096 		mtx_unlock(&sc->sc_mtx);
1097 		DPRINTF("Timeout\n");
1098 		return;
1099 	}
1100 
1101 	hip = (struct usie_hip *)sc->sc_status_temp;
1102 
1103 	pad = (hip->id & USIE_HIP_PAD) ? 1 : 0;
1104 
1105 	DPRINTF("hip.id=%x hip.len=%d actlen=%u pad=%d\n",
1106 	    hip->id, be16toh(hip->len), actlen, pad);
1107 
1108 	switch (hip->id & USIE_HIP_MASK) {
1109 	case USIE_HIP_SYNC2H:
1110 		usie_if_cmd(sc, USIE_HIP_SYNC2M);
1111 		break;
1112 	case USIE_HIP_RESTR:
1113 		usb_callout_stop(&sc->sc_if_sync_ch);
1114 		break;
1115 	case USIE_HIP_UMTS:
1116 		lsi = (struct usie_lsi *)(
1117 		    sc->sc_status_temp + sizeof(struct usie_hip) + pad);
1118 
1119 		DPRINTF("lsi.proto=%x lsi.len=%d\n", lsi->proto,
1120 		    be16toh(lsi->len));
1121 
1122 		if (lsi->proto != USIE_LSI_UMTS)
1123 			break;
1124 
1125 		if (lsi->area == USIE_LSI_AREA_NO ||
1126 		    lsi->area == USIE_LSI_AREA_NODATA) {
1127 			device_printf(sc->sc_dev, "no service available\n");
1128 			break;
1129 		}
1130 		if (lsi->state == USIE_LSI_STATE_IDLE) {
1131 			DPRINTF("lsi.state=%x\n", lsi->state);
1132 			break;
1133 		}
1134 		DPRINTF("ctx=%x\n", hip->param);
1135 		sc->sc_txd.hip.param = hip->param;
1136 
1137 		sc->sc_net.addr_len = lsi->pdp_addr_len;
1138 		memcpy(&sc->sc_net.dns1_addr, &lsi->dns1_addr, 16);
1139 		memcpy(&sc->sc_net.dns2_addr, &lsi->dns2_addr, 16);
1140 		memcpy(sc->sc_net.pdp_addr, lsi->pdp_addr, 16);
1141 		memcpy(sc->sc_net.gw_addr, lsi->gw_addr, 16);
1142 		ifp->if_flags |= IFF_UP;
1143 		ifp->if_drv_flags |= IFF_DRV_RUNNING;
1144 
1145 		device_printf(sc->sc_dev, "IP Addr=%d.%d.%d.%d\n",
1146 		    *lsi->pdp_addr, *(lsi->pdp_addr + 1),
1147 		    *(lsi->pdp_addr + 2), *(lsi->pdp_addr + 3));
1148 		device_printf(sc->sc_dev, "Gateway Addr=%d.%d.%d.%d\n",
1149 		    *lsi->gw_addr, *(lsi->gw_addr + 1),
1150 		    *(lsi->gw_addr + 2), *(lsi->gw_addr + 3));
1151 		device_printf(sc->sc_dev, "Prim NS Addr=%d.%d.%d.%d\n",
1152 		    *lsi->dns1_addr, *(lsi->dns1_addr + 1),
1153 		    *(lsi->dns1_addr + 2), *(lsi->dns1_addr + 3));
1154 		device_printf(sc->sc_dev, "Scnd NS Addr=%d.%d.%d.%d\n",
1155 		    *lsi->dns2_addr, *(lsi->dns2_addr + 1),
1156 		    *(lsi->dns2_addr + 2), *(lsi->dns2_addr + 3));
1157 
1158 		usie_cns_req(sc, USIE_CNS_ID_RSSI, USIE_CNS_OB_RSSI);
1159 		break;
1160 
1161 	case USIE_HIP_RCGI:
1162 		/* ignore, workaround for sloppy windows */
1163 		break;
1164 	default:
1165 		DPRINTF("undefined msgid: %x\n", hip->id);
1166 		break;
1167 	}
1168 
1169 	mtx_unlock(&sc->sc_mtx);
1170 }
1171 
1172 static void
1173 usie_if_start(struct ifnet *ifp)
1174 {
1175 	struct usie_softc *sc = ifp->if_softc;
1176 
1177 	if (!(ifp->if_drv_flags & IFF_DRV_RUNNING)) {
1178 		DPRINTF("Not running\n");
1179 		return;
1180 	}
1181 	mtx_lock(&sc->sc_mtx);
1182 	usbd_transfer_start(sc->sc_if_xfer[USIE_IF_TX]);
1183 	mtx_unlock(&sc->sc_mtx);
1184 
1185 	DPRINTFN(3, "interface started\n");
1186 }
1187 
1188 static int
1189 usie_if_output(struct ifnet *ifp, struct mbuf *m, const struct sockaddr *dst,
1190     struct route *ro)
1191 {
1192 	int err;
1193 
1194 	DPRINTF("proto=%x\n", dst->sa_family);
1195 
1196 	switch (dst->sa_family) {
1197 #ifdef INET6
1198 	case AF_INET6;
1199 	/* fall though */
1200 #endif
1201 	case AF_INET:
1202 		break;
1203 
1204 		/* silently drop dhclient packets */
1205 	case AF_UNSPEC:
1206 		m_freem(m);
1207 		return (0);
1208 
1209 		/* drop other packet types */
1210 	default:
1211 		m_freem(m);
1212 		return (EAFNOSUPPORT);
1213 	}
1214 
1215 	err = (ifp->if_transmit)(ifp, m);
1216 	if (err) {
1217 		ifp->if_oerrors++;
1218 		return (ENOBUFS);
1219 	}
1220 	ifp->if_opackets++;
1221 
1222 	return (0);
1223 }
1224 
1225 static void
1226 usie_if_init(void *arg)
1227 {
1228 	struct usie_softc *sc = arg;
1229 	struct ifnet *ifp = sc->sc_ifp;
1230 	uint8_t i;
1231 
1232 	mtx_lock(&sc->sc_mtx);
1233 
1234 	/* write tx descriptor */
1235 	sc->sc_txd.hip.id = USIE_HIP_CTX;
1236 	sc->sc_txd.hip.param = 0;	/* init value */
1237 	sc->sc_txd.desc_type = htobe16(USIE_IP_TX);
1238 
1239 	for (i = 0; i != USIE_IF_N_XFER; i++)
1240 		usbd_xfer_set_stall(sc->sc_if_xfer[i]);
1241 
1242 	usbd_transfer_start(sc->sc_uc_xfer[USIE_HIP_IF][USIE_UC_RX]);
1243 	usbd_transfer_start(sc->sc_if_xfer[USIE_IF_STATUS]);
1244 	usbd_transfer_start(sc->sc_if_xfer[USIE_IF_RX]);
1245 
1246 	/* if not running, initiate the modem */
1247 	if (!(ifp->if_drv_flags & IFF_DRV_RUNNING))
1248 		usie_cns_req(sc, USIE_CNS_ID_INIT, USIE_CNS_OB_LINK_UPDATE);
1249 
1250 	mtx_unlock(&sc->sc_mtx);
1251 
1252 	DPRINTF("ifnet initialized\n");
1253 }
1254 
1255 static void
1256 usie_if_stop(struct usie_softc *sc)
1257 {
1258 	usb_callout_drain(&sc->sc_if_sync_ch);
1259 
1260 	mtx_lock(&sc->sc_mtx);
1261 
1262 	/* usie_cns_req() clears IFF_* flags */
1263 	usie_cns_req(sc, USIE_CNS_ID_STOP, USIE_CNS_OB_LINK_UPDATE);
1264 
1265 	usbd_transfer_stop(sc->sc_if_xfer[USIE_IF_TX]);
1266 	usbd_transfer_stop(sc->sc_if_xfer[USIE_IF_RX]);
1267 	usbd_transfer_stop(sc->sc_if_xfer[USIE_IF_STATUS]);
1268 
1269 	/* shutdown device */
1270 	usie_if_cmd(sc, USIE_HIP_DOWN);
1271 
1272 	mtx_unlock(&sc->sc_mtx);
1273 }
1274 
1275 static int
1276 usie_if_ioctl(struct ifnet *ifp, u_long cmd, caddr_t data)
1277 {
1278 	struct usie_softc *sc = ifp->if_softc;
1279 	struct ieee80211req *ireq;
1280 	struct ieee80211req_sta_info si;
1281 	struct ifmediareq *ifmr;
1282 
1283 	switch (cmd) {
1284 	case SIOCSIFFLAGS:
1285 		if (ifp->if_flags & IFF_UP) {
1286 			if (!(ifp->if_drv_flags & IFF_DRV_RUNNING))
1287 				usie_if_init(sc);
1288 		} else {
1289 			if (ifp->if_drv_flags & IFF_DRV_RUNNING)
1290 				usie_if_stop(sc);
1291 		}
1292 		break;
1293 
1294 	case SIOCSIFCAP:
1295 		if (!(ifp->if_drv_flags & IFF_DRV_RUNNING)) {
1296 			device_printf(sc->sc_dev,
1297 			    "Connect to the network first.\n");
1298 			break;
1299 		}
1300 		mtx_lock(&sc->sc_mtx);
1301 		usie_cns_req(sc, USIE_CNS_ID_RSSI, USIE_CNS_OB_RSSI);
1302 		mtx_unlock(&sc->sc_mtx);
1303 		break;
1304 
1305 	case SIOCG80211:
1306 		ireq = (struct ieee80211req *)data;
1307 
1308 		if (ireq->i_type != IEEE80211_IOC_STA_INFO)
1309 			break;
1310 
1311 		memset(&si, 0, sizeof(si));
1312 		si.isi_len = sizeof(si);
1313 		/*
1314 		 * ifconfig expects RSSI in 0.5dBm units
1315 		 * relative to the noise floor.
1316 		 */
1317 		si.isi_rssi = 2 * sc->sc_rssi;
1318 		if (copyout(&si, (uint8_t *)ireq->i_data + 8,
1319 		    sizeof(struct ieee80211req_sta_info)))
1320 			DPRINTF("copyout failed\n");
1321 		DPRINTF("80211\n");
1322 		break;
1323 
1324 	case SIOCGIFMEDIA:		/* to fool ifconfig */
1325 		ifmr = (struct ifmediareq *)data;
1326 		ifmr->ifm_count = 1;
1327 		DPRINTF("media\n");
1328 		break;
1329 
1330 	case SIOCSIFADDR:
1331 		break;
1332 
1333 	default:
1334 		return (EINVAL);
1335 	}
1336 	return (0);
1337 }
1338 
1339 static int
1340 usie_do_request(struct usie_softc *sc, struct usb_device_request *req,
1341     void *data)
1342 {
1343 	int err = 0;
1344 	int ntries;
1345 
1346 	mtx_assert(&sc->sc_mtx, MA_OWNED);
1347 
1348 	for (ntries = 0; ntries != 10; ntries++) {
1349 		err = usbd_do_request(sc->sc_udev,
1350 		    &sc->sc_mtx, req, data);
1351 		if (err == 0)
1352 			break;
1353 
1354 		DPRINTF("Control request failed: %s %d/10\n",
1355 		    usbd_errstr(err), ntries);
1356 
1357 		usb_pause_mtx(&sc->sc_mtx, USB_MS_TO_TICKS(10));
1358 	}
1359 	return (err);
1360 }
1361 
1362 static int
1363 usie_if_cmd(struct usie_softc *sc, uint8_t cmd)
1364 {
1365 	struct usb_device_request req;
1366 	struct usie_hip msg;
1367 
1368 	msg.len = 0;
1369 	msg.id = cmd;
1370 	msg.param = 0;
1371 
1372 	req.bmRequestType = UT_WRITE_CLASS_INTERFACE;
1373 	req.bRequest = UCDC_SEND_ENCAPSULATED_COMMAND;
1374 	USETW(req.wValue, 0);
1375 	USETW(req.wIndex, sc->sc_if_ifnum);
1376 	USETW(req.wLength, sizeof(msg));
1377 
1378 	DPRINTF("cmd=%x\n", cmd);
1379 
1380 	return (usie_do_request(sc, &req, &msg));
1381 }
1382 
1383 static void
1384 usie_cns_req(struct usie_softc *sc, uint32_t id, uint16_t obj)
1385 {
1386 	struct ifnet *ifp = sc->sc_ifp;
1387 	struct mbuf *m;
1388 	struct usb_xfer *xfer;
1389 	struct usie_hip *hip;
1390 	struct usie_cns *cns;
1391 	uint8_t *param;
1392 	uint8_t *tmp;
1393 	uint8_t cns_len;
1394 
1395 	m = m_getcl(M_NOWAIT, MT_DATA, M_PKTHDR);
1396 	if (__predict_false(m == NULL)) {
1397 		DPRINTF("could not allocate mbuf\n");
1398 		ifp->if_ierrors++;
1399 		return;
1400 	}
1401 	/* to align usie_hip{} on 32 bit */
1402 	m->m_data += 3;
1403 	param = mtod(m, uint8_t *);
1404 	*param++ = USIE_HIP_FRM_CHR;
1405 	hip = (struct usie_hip *)param;
1406 	cns = (struct usie_cns *)(hip + 1);
1407 
1408 	tmp = param + USIE_HIPCNS_MIN - 2;
1409 
1410 	switch (obj) {
1411 	case USIE_CNS_OB_LINK_UPDATE:
1412 		cns_len = 2;
1413 		cns->op = USIE_CNS_OP_SET;
1414 		*tmp++ = 1;		/* profile ID, always use 1 for now */
1415 		*tmp++ = id == USIE_CNS_ID_INIT ? 1 : 0;
1416 		break;
1417 
1418 	case USIE_CNS_OB_PROF_WRITE:
1419 		cns_len = 245;
1420 		cns->op = USIE_CNS_OP_SET;
1421 		*tmp++ = 1;		/* profile ID, always use 1 for now */
1422 		*tmp++ = 2;
1423 		memcpy(tmp, &sc->sc_net, 34);
1424 		memset(tmp + 35, 0, 245 - 36);
1425 		tmp += 243;
1426 		break;
1427 
1428 	case USIE_CNS_OB_RSSI:
1429 		cns_len = 0;
1430 		cns->op = USIE_CNS_OP_REQ;
1431 		break;
1432 
1433 	default:
1434 		DPRINTF("unsupported CnS object type\n");
1435 		return;
1436 	}
1437 	*tmp = USIE_HIP_FRM_CHR;
1438 
1439 	hip->len = htobe16(sizeof(struct usie_cns) + cns_len);
1440 	hip->id = USIE_HIP_CNS2M;
1441 	hip->param = 0;			/* none for CnS */
1442 
1443 	cns->obj = htobe16(obj);
1444 	cns->id = htobe32(id);
1445 	cns->len = cns_len;
1446 	cns->rsv0 = cns->rsv1 = 0;	/* always '0' */
1447 
1448 	param = (uint8_t *)(cns + 1);
1449 
1450 	DPRINTF("param: %16D\n", param, ":");
1451 
1452 	m->m_pkthdr.len = m->m_len = USIE_HIPCNS_MIN + cns_len + 2;
1453 
1454 	xfer = sc->sc_uc_xfer[USIE_HIP_IF][USIE_UC_TX];
1455 
1456 	if (usbd_xfer_get_priv(xfer) == NULL) {
1457 		usbd_xfer_set_priv(xfer, m);
1458 		usbd_transfer_start(xfer);
1459 	} else {
1460 		DPRINTF("Dropped CNS event\n");
1461 		m_freem(m);
1462 	}
1463 }
1464 
1465 static void
1466 usie_cns_rsp(struct usie_softc *sc, struct usie_cns *cns)
1467 {
1468 	struct ifnet *ifp = sc->sc_ifp;
1469 
1470 	DPRINTF("received CnS\n");
1471 
1472 	switch (be16toh(cns->obj)) {
1473 	case USIE_CNS_OB_LINK_UPDATE:
1474 		if (be32toh(cns->id) & USIE_CNS_ID_INIT)
1475 			usie_if_sync_to(sc);
1476 		else if (be32toh(cns->id) & USIE_CNS_ID_STOP) {
1477 			ifp->if_flags &= ~IFF_UP;
1478 			ifp->if_drv_flags &=
1479 			    ~(IFF_DRV_RUNNING | IFF_DRV_OACTIVE);
1480 		} else
1481 			DPRINTF("undefined link update\n");
1482 		break;
1483 
1484 	case USIE_CNS_OB_RSSI:
1485 		sc->sc_rssi = be16toh(*(int16_t *)(cns + 1));
1486 		if (sc->sc_rssi <= 0)
1487 			device_printf(sc->sc_dev, "No signal\n");
1488 		else {
1489 			device_printf(sc->sc_dev, "RSSI=%ddBm\n",
1490 			    sc->sc_rssi - 110);
1491 		}
1492 		break;
1493 
1494 	case USIE_CNS_OB_PROF_WRITE:
1495 		break;
1496 
1497 	case USIE_CNS_OB_PDP_READ:
1498 		break;
1499 
1500 	default:
1501 		DPRINTF("undefined CnS\n");
1502 		break;
1503 	}
1504 }
1505 
1506 static void
1507 usie_hip_rsp(struct usie_softc *sc, uint8_t *rsp, uint32_t len)
1508 {
1509 	struct usie_hip *hip;
1510 	struct usie_cns *cns;
1511 	uint32_t i;
1512 	uint32_t j;
1513 	uint32_t off;
1514 	uint8_t tmp[USIE_HIPCNS_MAX] __aligned(4);
1515 
1516 	for (off = 0; (off + USIE_HIPCNS_MIN) <= len; off++) {
1517 
1518 		uint8_t pad;
1519 
1520 		while ((off < len) && (rsp[off] == USIE_HIP_FRM_CHR))
1521 			off++;
1522 
1523 		/* Unstuff the bytes */
1524 		for (i = j = 0; ((i + off) < len) &&
1525 		    (j < USIE_HIPCNS_MAX); i++) {
1526 
1527 			if (rsp[i + off] == USIE_HIP_FRM_CHR)
1528 				break;
1529 
1530 			if (rsp[i + off] == USIE_HIP_ESC_CHR) {
1531 				if ((i + off + 1) >= len)
1532 					break;
1533 				tmp[j++] = rsp[i++ + off + 1] ^ 0x20;
1534 			} else {
1535 				tmp[j++] = rsp[i + off];
1536 			}
1537 		}
1538 
1539 		off += i;
1540 
1541 		DPRINTF("frame len=%d\n", j);
1542 
1543 		if (j < sizeof(struct usie_hip)) {
1544 			DPRINTF("too little data\n");
1545 			break;
1546 		}
1547 		/*
1548 		 * Make sure we are not reading the stack if something
1549 		 * is wrong.
1550 		 */
1551 		memset(tmp + j, 0, sizeof(tmp) - j);
1552 
1553 		hip = (struct usie_hip *)tmp;
1554 
1555 		DPRINTF("hip: len=%d msgID=%02x, param=%02x\n",
1556 		    be16toh(hip->len), hip->id, hip->param);
1557 
1558 		pad = (hip->id & USIE_HIP_PAD) ? 1 : 0;
1559 
1560 		if ((hip->id & USIE_HIP_MASK) == USIE_HIP_CNS2H) {
1561 			cns = (struct usie_cns *)(((uint8_t *)(hip + 1)) + pad);
1562 
1563 			if (j < (sizeof(struct usie_cns) +
1564 			    sizeof(struct usie_hip) + pad)) {
1565 				DPRINTF("too little data\n");
1566 				break;
1567 			}
1568 			DPRINTF("cns: obj=%04x, op=%02x, rsv0=%02x, "
1569 			    "app=%08x, rsv1=%02x, len=%d\n",
1570 			    be16toh(cns->obj), cns->op, cns->rsv0,
1571 			    be32toh(cns->id), cns->rsv1, cns->len);
1572 
1573 			if (cns->op & USIE_CNS_OP_ERR)
1574 				DPRINTF("CnS error response\n");
1575 			else
1576 				usie_cns_rsp(sc, cns);
1577 
1578 			i = sizeof(struct usie_hip) + pad + sizeof(struct usie_cns);
1579 			j = cns->len;
1580 		} else {
1581 			i = sizeof(struct usie_hip) + pad;
1582 			j = be16toh(hip->len);
1583 		}
1584 #ifdef	USB_DEBUG
1585 		if (usie_debug == 0)
1586 			continue;
1587 
1588 		while (i < USIE_HIPCNS_MAX && j > 0) {
1589 			DPRINTF("param[0x%02x] = 0x%02x\n", i, tmp[i]);
1590 			i++;
1591 			j--;
1592 		}
1593 #endif
1594 	}
1595 }
1596 
1597 static int
1598 usie_driver_loaded(struct module *mod, int what, void *arg)
1599 {
1600 	switch (what) {
1601 	case MOD_LOAD:
1602 		/* register autoinstall handler */
1603 		usie_etag = EVENTHANDLER_REGISTER(usb_dev_configured,
1604 		    usie_autoinst, NULL, EVENTHANDLER_PRI_ANY);
1605 		break;
1606 	case MOD_UNLOAD:
1607 		EVENTHANDLER_DEREGISTER(usb_dev_configured, usie_etag);
1608 		break;
1609 	default:
1610 		return (EOPNOTSUPP);
1611 	}
1612 	return (0);
1613 }
1614 
1615