xref: /freebsd/sys/dev/usb/usb_device.c (revision 830940567b49bb0c08dfaed40418999e76616909)
1 /* $FreeBSD$ */
2 /*-
3  * Copyright (c) 2008 Hans Petter Selasky. All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  */
26 
27 #include <sys/stdint.h>
28 #include <sys/stddef.h>
29 #include <sys/param.h>
30 #include <sys/queue.h>
31 #include <sys/types.h>
32 #include <sys/systm.h>
33 #include <sys/kernel.h>
34 #include <sys/bus.h>
35 #include <sys/linker_set.h>
36 #include <sys/module.h>
37 #include <sys/lock.h>
38 #include <sys/mutex.h>
39 #include <sys/condvar.h>
40 #include <sys/sysctl.h>
41 #include <sys/sx.h>
42 #include <sys/unistd.h>
43 #include <sys/callout.h>
44 #include <sys/malloc.h>
45 #include <sys/priv.h>
46 #include <sys/conf.h>
47 #include <sys/fcntl.h>
48 
49 #include <dev/usb/usb.h>
50 #include <dev/usb/usbdi.h>
51 #include <dev/usb/usbdi_util.h>
52 #include <dev/usb/usb_ioctl.h>
53 #include "usbdevs.h"
54 
55 #define	USB_DEBUG_VAR usb_debug
56 
57 #include <dev/usb/usb_core.h>
58 #include <dev/usb/usb_debug.h>
59 #include <dev/usb/usb_process.h>
60 #include <dev/usb/usb_device.h>
61 #include <dev/usb/usb_busdma.h>
62 #include <dev/usb/usb_transfer.h>
63 #include <dev/usb/usb_request.h>
64 #include <dev/usb/usb_dynamic.h>
65 #include <dev/usb/usb_hub.h>
66 #include <dev/usb/usb_util.h>
67 #include <dev/usb/usb_msctest.h>
68 #if USB_HAVE_UGEN
69 #include <dev/usb/usb_dev.h>
70 #include <dev/usb/usb_generic.h>
71 #endif
72 
73 #include <dev/usb/quirk/usb_quirk.h>
74 
75 #include <dev/usb/usb_controller.h>
76 #include <dev/usb/usb_bus.h>
77 
78 /* function prototypes  */
79 
80 static void	usb_init_endpoint(struct usb_device *, uint8_t,
81 		    struct usb_endpoint_descriptor *, struct usb_endpoint *);
82 static void	usb_unconfigure(struct usb_device *, uint8_t);
83 static void	usb_detach_device(struct usb_device *, uint8_t, uint8_t);
84 static void	usb_detach_device_sub(struct usb_device *, device_t *,
85 		    uint8_t);
86 static uint8_t	usb_probe_and_attach_sub(struct usb_device *,
87 		    struct usb_attach_arg *);
88 static void	usb_init_attach_arg(struct usb_device *,
89 		    struct usb_attach_arg *);
90 static void	usb_suspend_resume_sub(struct usb_device *, device_t,
91 		    uint8_t);
92 static void	usbd_clear_stall_proc(struct usb_proc_msg *_pm);
93 usb_error_t	usb_config_parse(struct usb_device *, uint8_t, uint8_t);
94 static void	usbd_set_device_strings(struct usb_device *);
95 #if USB_HAVE_UGEN
96 static void	usb_notify_addq(const char *type, struct usb_device *);
97 static void	usb_fifo_free_wrap(struct usb_device *, uint8_t, uint8_t);
98 static struct cdev *usb_make_dev(struct usb_device *, int, int);
99 static void	usb_cdev_create(struct usb_device *);
100 static void	usb_cdev_free(struct usb_device *);
101 static void	usb_cdev_cleanup(void *);
102 #endif
103 
104 /* This variable is global to allow easy access to it: */
105 
106 int	usb_template = 0;
107 
108 SYSCTL_INT(_hw_usb, OID_AUTO, template, CTLFLAG_RW,
109     &usb_template, 0, "Selected USB device side template");
110 
111 static const char* statestr[USB_STATE_MAX] = {
112 	[USB_STATE_DETACHED]	= "DETACHED",
113 	[USB_STATE_ATTACHED]	= "ATTACHED",
114 	[USB_STATE_POWERED]	= "POWERED",
115 	[USB_STATE_ADDRESSED]	= "ADDRESSED",
116 	[USB_STATE_CONFIGURED]	= "CONFIGURED",
117 };
118 
119 const char *
120 usb_statestr(enum usb_dev_state state)
121 {
122 	return ((state < USB_STATE_MAX) ? statestr[state] : "UNKNOWN");
123 }
124 
125 /*------------------------------------------------------------------------*
126  *	usbd_get_ep_by_addr
127  *
128  * This function searches for an USB ep by endpoint address and
129  * direction.
130  *
131  * Returns:
132  * NULL: Failure
133  * Else: Success
134  *------------------------------------------------------------------------*/
135 struct usb_endpoint *
136 usbd_get_ep_by_addr(struct usb_device *udev, uint8_t ea_val)
137 {
138 	struct usb_endpoint *ep = udev->endpoints;
139 	struct usb_endpoint *ep_end = udev->endpoints + udev->endpoints_max;
140 	enum {
141 		EA_MASK = (UE_DIR_IN | UE_DIR_OUT | UE_ADDR),
142 	};
143 
144 	/*
145 	 * According to the USB specification not all bits are used
146 	 * for the endpoint address. Keep defined bits only:
147 	 */
148 	ea_val &= EA_MASK;
149 
150 	/*
151 	 * Iterate accross all the USB endpoints searching for a match
152 	 * based on the endpoint address:
153 	 */
154 	for (; ep != ep_end; ep++) {
155 
156 		if (ep->edesc == NULL) {
157 			continue;
158 		}
159 		/* do the mask and check the value */
160 		if ((ep->edesc->bEndpointAddress & EA_MASK) == ea_val) {
161 			goto found;
162 		}
163 	}
164 
165 	/*
166 	 * The default endpoint is always present and is checked separately:
167 	 */
168 	if ((udev->default_ep.edesc) &&
169 	    ((udev->default_ep.edesc->bEndpointAddress & EA_MASK) == ea_val)) {
170 		ep = &udev->default_ep;
171 		goto found;
172 	}
173 	return (NULL);
174 
175 found:
176 	return (ep);
177 }
178 
179 /*------------------------------------------------------------------------*
180  *	usbd_get_endpoint
181  *
182  * This function searches for an USB endpoint based on the information
183  * given by the passed "struct usb_config" pointer.
184  *
185  * Return values:
186  * NULL: No match.
187  * Else: Pointer to "struct usb_endpoint".
188  *------------------------------------------------------------------------*/
189 struct usb_endpoint *
190 usbd_get_endpoint(struct usb_device *udev, uint8_t iface_index,
191     const struct usb_config *setup)
192 {
193 	struct usb_endpoint *ep = udev->endpoints;
194 	struct usb_endpoint *ep_end = udev->endpoints + udev->endpoints_max;
195 	uint8_t index = setup->ep_index;
196 	uint8_t ea_mask;
197 	uint8_t ea_val;
198 	uint8_t type_mask;
199 	uint8_t type_val;
200 
201 	DPRINTFN(10, "udev=%p iface_index=%d address=0x%x "
202 	    "type=0x%x dir=0x%x index=%d\n",
203 	    udev, iface_index, setup->endpoint,
204 	    setup->type, setup->direction, setup->ep_index);
205 
206 	/* check USB mode */
207 
208 	if (setup->usb_mode != USB_MODE_DUAL &&
209 	    udev->flags.usb_mode != setup->usb_mode) {
210 		/* wrong mode - no endpoint */
211 		return (NULL);
212 	}
213 
214 	/* setup expected endpoint direction mask and value */
215 
216 	if (setup->direction == UE_DIR_RX) {
217 		ea_mask = (UE_DIR_IN | UE_DIR_OUT);
218 		ea_val = (udev->flags.usb_mode == USB_MODE_DEVICE) ?
219 		    UE_DIR_OUT : UE_DIR_IN;
220 	} else if (setup->direction == UE_DIR_TX) {
221 		ea_mask = (UE_DIR_IN | UE_DIR_OUT);
222 		ea_val = (udev->flags.usb_mode == USB_MODE_DEVICE) ?
223 		    UE_DIR_IN : UE_DIR_OUT;
224 	} else if (setup->direction == UE_DIR_ANY) {
225 		/* match any endpoint direction */
226 		ea_mask = 0;
227 		ea_val = 0;
228 	} else {
229 		/* match the given endpoint direction */
230 		ea_mask = (UE_DIR_IN | UE_DIR_OUT);
231 		ea_val = (setup->direction & (UE_DIR_IN | UE_DIR_OUT));
232 	}
233 
234 	/* setup expected endpoint address */
235 
236 	if (setup->endpoint == UE_ADDR_ANY) {
237 		/* match any endpoint address */
238 	} else {
239 		/* match the given endpoint address */
240 		ea_mask |= UE_ADDR;
241 		ea_val |= (setup->endpoint & UE_ADDR);
242 	}
243 
244 	/* setup expected endpoint type */
245 
246 	if (setup->type == UE_BULK_INTR) {
247 		/* this will match BULK and INTERRUPT endpoints */
248 		type_mask = 2;
249 		type_val = 2;
250 	} else if (setup->type == UE_TYPE_ANY) {
251 		/* match any endpoint type */
252 		type_mask = 0;
253 		type_val = 0;
254 	} else {
255 		/* match the given endpoint type */
256 		type_mask = UE_XFERTYPE;
257 		type_val = (setup->type & UE_XFERTYPE);
258 	}
259 
260 	/*
261 	 * Iterate accross all the USB endpoints searching for a match
262 	 * based on the endpoint address. Note that we are searching
263 	 * the endpoints from the beginning of the "udev->endpoints" array.
264 	 */
265 	for (; ep != ep_end; ep++) {
266 
267 		if ((ep->edesc == NULL) ||
268 		    (ep->iface_index != iface_index)) {
269 			continue;
270 		}
271 		/* do the masks and check the values */
272 
273 		if (((ep->edesc->bEndpointAddress & ea_mask) == ea_val) &&
274 		    ((ep->edesc->bmAttributes & type_mask) == type_val)) {
275 			if (!index--) {
276 				goto found;
277 			}
278 		}
279 	}
280 
281 	/*
282 	 * Match against default endpoint last, so that "any endpoint", "any
283 	 * address" and "any direction" returns the first endpoint of the
284 	 * interface. "iface_index" and "direction" is ignored:
285 	 */
286 	if ((udev->default_ep.edesc) &&
287 	    ((udev->default_ep.edesc->bEndpointAddress & ea_mask) == ea_val) &&
288 	    ((udev->default_ep.edesc->bmAttributes & type_mask) == type_val) &&
289 	    (!index)) {
290 		ep = &udev->default_ep;
291 		goto found;
292 	}
293 	return (NULL);
294 
295 found:
296 	return (ep);
297 }
298 
299 /*------------------------------------------------------------------------*
300  *	usbd_interface_count
301  *
302  * This function stores the number of USB interfaces excluding
303  * alternate settings, which the USB config descriptor reports into
304  * the unsigned 8-bit integer pointed to by "count".
305  *
306  * Returns:
307  *    0: Success
308  * Else: Failure
309  *------------------------------------------------------------------------*/
310 usb_error_t
311 usbd_interface_count(struct usb_device *udev, uint8_t *count)
312 {
313 	if (udev->cdesc == NULL) {
314 		*count = 0;
315 		return (USB_ERR_NOT_CONFIGURED);
316 	}
317 	*count = udev->ifaces_max;
318 	return (USB_ERR_NORMAL_COMPLETION);
319 }
320 
321 
322 /*------------------------------------------------------------------------*
323  *	usb_init_endpoint
324  *
325  * This function will initialise the USB endpoint structure pointed to by
326  * the "endpoint" argument. The structure pointed to by "endpoint" must be
327  * zeroed before calling this function.
328  *------------------------------------------------------------------------*/
329 static void
330 usb_init_endpoint(struct usb_device *udev, uint8_t iface_index,
331     struct usb_endpoint_descriptor *edesc, struct usb_endpoint *ep)
332 {
333 	struct usb_bus_methods *methods;
334 
335 	methods = udev->bus->methods;
336 
337 	(methods->endpoint_init) (udev, edesc, ep);
338 
339 	/* initialise USB endpoint structure */
340 	ep->edesc = edesc;
341 	ep->iface_index = iface_index;
342 	TAILQ_INIT(&ep->endpoint_q.head);
343 	ep->endpoint_q.command = &usbd_pipe_start;
344 
345 	/* the pipe is not supported by the hardware */
346  	if (ep->methods == NULL)
347 		return;
348 
349 	/* clear stall, if any */
350 	if (methods->clear_stall != NULL) {
351 		USB_BUS_LOCK(udev->bus);
352 		(methods->clear_stall) (udev, ep);
353 		USB_BUS_UNLOCK(udev->bus);
354 	}
355 }
356 
357 /*-----------------------------------------------------------------------*
358  *	usb_endpoint_foreach
359  *
360  * This function will iterate all the USB endpoints except the control
361  * endpoint. This function is NULL safe.
362  *
363  * Return values:
364  * NULL: End of USB endpoints
365  * Else: Pointer to next USB endpoint
366  *------------------------------------------------------------------------*/
367 struct usb_endpoint *
368 usb_endpoint_foreach(struct usb_device *udev, struct usb_endpoint *ep)
369 {
370 	struct usb_endpoint *ep_end = udev->endpoints + udev->endpoints_max;
371 
372 	/* be NULL safe */
373 	if (udev == NULL)
374 		return (NULL);
375 
376 	/* get next endpoint */
377 	if (ep == NULL)
378 		ep = udev->endpoints;
379 	else
380 		ep++;
381 
382 	/* find next allocated ep */
383 	while (ep != ep_end) {
384 		if (ep->edesc != NULL)
385 			return (ep);
386 		ep++;
387 	}
388 	return (NULL);
389 }
390 
391 /*------------------------------------------------------------------------*
392  *	usb_unconfigure
393  *
394  * This function will free all USB interfaces and USB endpoints belonging
395  * to an USB device.
396  *
397  * Flag values, see "USB_UNCFG_FLAG_XXX".
398  *------------------------------------------------------------------------*/
399 static void
400 usb_unconfigure(struct usb_device *udev, uint8_t flag)
401 {
402 	uint8_t do_unlock;
403 
404 	/* automatic locking */
405 	if (sx_xlocked(udev->default_sx + 1)) {
406 		do_unlock = 0;
407 	} else {
408 		do_unlock = 1;
409 		sx_xlock(udev->default_sx + 1);
410 	}
411 
412 	/* detach all interface drivers */
413 	usb_detach_device(udev, USB_IFACE_INDEX_ANY, flag);
414 
415 #if USB_HAVE_UGEN
416 	/* free all FIFOs except control endpoint FIFOs */
417 	usb_fifo_free_wrap(udev, USB_IFACE_INDEX_ANY, flag);
418 
419 	/*
420 	 * Free all cdev's, if any.
421 	 */
422 	usb_cdev_free(udev);
423 #endif
424 
425 #if USB_HAVE_COMPAT_LINUX
426 	/* free Linux compat device, if any */
427 	if (udev->linux_endpoint_start) {
428 		usb_linux_free_device(udev);
429 		udev->linux_endpoint_start = NULL;
430 	}
431 #endif
432 
433 	usb_config_parse(udev, USB_IFACE_INDEX_ANY, USB_CFG_FREE);
434 
435 	/* free "cdesc" after "ifaces" and "endpoints", if any */
436 	if (udev->cdesc != NULL) {
437 		if (udev->flags.usb_mode != USB_MODE_DEVICE)
438 			free(udev->cdesc, M_USB);
439 		udev->cdesc = NULL;
440 	}
441 	/* set unconfigured state */
442 	udev->curr_config_no = USB_UNCONFIG_NO;
443 	udev->curr_config_index = USB_UNCONFIG_INDEX;
444 
445 	if (do_unlock) {
446 		sx_unlock(udev->default_sx + 1);
447 	}
448 }
449 
450 /*------------------------------------------------------------------------*
451  *	usbd_set_config_index
452  *
453  * This function selects configuration by index, independent of the
454  * actual configuration number. This function should not be used by
455  * USB drivers.
456  *
457  * Returns:
458  *    0: Success
459  * Else: Failure
460  *------------------------------------------------------------------------*/
461 usb_error_t
462 usbd_set_config_index(struct usb_device *udev, uint8_t index)
463 {
464 	struct usb_status ds;
465 	struct usb_config_descriptor *cdp;
466 	uint16_t power;
467 	uint16_t max_power;
468 	uint8_t selfpowered;
469 	uint8_t do_unlock;
470 	usb_error_t err;
471 
472 	DPRINTFN(6, "udev=%p index=%d\n", udev, index);
473 
474 	/* automatic locking */
475 	if (sx_xlocked(udev->default_sx + 1)) {
476 		do_unlock = 0;
477 	} else {
478 		do_unlock = 1;
479 		sx_xlock(udev->default_sx + 1);
480 	}
481 
482 	usb_unconfigure(udev, USB_UNCFG_FLAG_FREE_SUBDEV);
483 
484 	if (index == USB_UNCONFIG_INDEX) {
485 		/*
486 		 * Leave unallocated when unconfiguring the
487 		 * device. "usb_unconfigure()" will also reset
488 		 * the current config number and index.
489 		 */
490 		err = usbd_req_set_config(udev, NULL, USB_UNCONFIG_NO);
491 		if (udev->state == USB_STATE_CONFIGURED)
492 			usb_set_device_state(udev, USB_STATE_ADDRESSED);
493 		goto done;
494 	}
495 	/* get the full config descriptor */
496 	if (udev->flags.usb_mode == USB_MODE_DEVICE) {
497 		/* save some memory */
498 		err = usbd_req_get_descriptor_ptr(udev, &cdp,
499 		    (UDESC_CONFIG << 8) | index);
500 	} else {
501 		/* normal request */
502 		err = usbd_req_get_config_desc_full(udev,
503 		    NULL, &cdp, M_USB, index);
504 	}
505 	if (err) {
506 		goto done;
507 	}
508 	/* set the new config descriptor */
509 
510 	udev->cdesc = cdp;
511 
512 	/* Figure out if the device is self or bus powered. */
513 	selfpowered = 0;
514 	if ((!udev->flags.uq_bus_powered) &&
515 	    (cdp->bmAttributes & UC_SELF_POWERED) &&
516 	    (udev->flags.usb_mode == USB_MODE_HOST)) {
517 		/* May be self powered. */
518 		if (cdp->bmAttributes & UC_BUS_POWERED) {
519 			/* Must ask device. */
520 			err = usbd_req_get_device_status(udev, NULL, &ds);
521 			if (err) {
522 				DPRINTFN(0, "could not read "
523 				    "device status: %s\n",
524 				    usbd_errstr(err));
525 			} else if (UGETW(ds.wStatus) & UDS_SELF_POWERED) {
526 				selfpowered = 1;
527 			}
528 			DPRINTF("status=0x%04x \n",
529 				UGETW(ds.wStatus));
530 		} else
531 			selfpowered = 1;
532 	}
533 	DPRINTF("udev=%p cdesc=%p (addr %d) cno=%d attr=0x%02x, "
534 	    "selfpowered=%d, power=%d\n",
535 	    udev, cdp,
536 	    udev->address, cdp->bConfigurationValue, cdp->bmAttributes,
537 	    selfpowered, cdp->bMaxPower * 2);
538 
539 	/* Check if we have enough power. */
540 	power = cdp->bMaxPower * 2;
541 
542 	if (udev->parent_hub) {
543 		max_power = udev->parent_hub->hub->portpower;
544 	} else {
545 		max_power = USB_MAX_POWER;
546 	}
547 
548 	if (power > max_power) {
549 		DPRINTFN(0, "power exceeded %d > %d\n", power, max_power);
550 		err = USB_ERR_NO_POWER;
551 		goto done;
552 	}
553 	/* Only update "self_powered" in USB Host Mode */
554 	if (udev->flags.usb_mode == USB_MODE_HOST) {
555 		udev->flags.self_powered = selfpowered;
556 	}
557 	udev->power = power;
558 	udev->curr_config_no = cdp->bConfigurationValue;
559 	udev->curr_config_index = index;
560 	usb_set_device_state(udev, USB_STATE_CONFIGURED);
561 
562 	/* Set the actual configuration value. */
563 	err = usbd_req_set_config(udev, NULL, cdp->bConfigurationValue);
564 	if (err) {
565 		goto done;
566 	}
567 
568 	err = usb_config_parse(udev, USB_IFACE_INDEX_ANY, USB_CFG_ALLOC);
569 	if (err) {
570 		goto done;
571 	}
572 
573 	err = usb_config_parse(udev, USB_IFACE_INDEX_ANY, USB_CFG_INIT);
574 	if (err) {
575 		goto done;
576 	}
577 
578 #if USB_HAVE_UGEN
579 	/* create device nodes for each endpoint */
580 	usb_cdev_create(udev);
581 #endif
582 
583 done:
584 	DPRINTF("error=%s\n", usbd_errstr(err));
585 	if (err) {
586 		usb_unconfigure(udev, USB_UNCFG_FLAG_FREE_SUBDEV);
587 	}
588 	if (do_unlock) {
589 		sx_unlock(udev->default_sx + 1);
590 	}
591 	return (err);
592 }
593 
594 /*------------------------------------------------------------------------*
595  *	usb_config_parse
596  *
597  * This function will allocate and free USB interfaces and USB endpoints,
598  * parse the USB configuration structure and initialise the USB endpoints
599  * and interfaces. If "iface_index" is not equal to
600  * "USB_IFACE_INDEX_ANY" then the "cmd" parameter is the
601  * alternate_setting to be selected for the given interface. Else the
602  * "cmd" parameter is defined by "USB_CFG_XXX". "iface_index" can be
603  * "USB_IFACE_INDEX_ANY" or a valid USB interface index. This function
604  * is typically called when setting the configuration or when setting
605  * an alternate interface.
606  *
607  * Returns:
608  *    0: Success
609  * Else: Failure
610  *------------------------------------------------------------------------*/
611 usb_error_t
612 usb_config_parse(struct usb_device *udev, uint8_t iface_index, uint8_t cmd)
613 {
614 	struct usb_idesc_parse_state ips;
615 	struct usb_interface_descriptor *id;
616 	struct usb_endpoint_descriptor *ed;
617 	struct usb_interface *iface;
618 	struct usb_endpoint *ep;
619 	usb_error_t err;
620 	uint8_t ep_curr;
621 	uint8_t ep_max;
622 	uint8_t temp;
623 	uint8_t do_init;
624 	uint8_t alt_index;
625 
626 	if (iface_index != USB_IFACE_INDEX_ANY) {
627 		/* parameter overload */
628 		alt_index = cmd;
629 		cmd = USB_CFG_INIT;
630 	} else {
631 		/* not used */
632 		alt_index = 0;
633 	}
634 
635 	err = 0;
636 
637 	DPRINTFN(5, "iface_index=%d cmd=%d\n",
638 	    iface_index, cmd);
639 
640 	if (cmd == USB_CFG_FREE)
641 		goto cleanup;
642 
643 	if (cmd == USB_CFG_INIT) {
644 		sx_assert(udev->default_sx + 1, SA_LOCKED);
645 
646 		/* check for in-use endpoints */
647 
648 		ep = udev->endpoints;
649 		ep_max = udev->endpoints_max;
650 		while (ep_max--) {
651 			/* look for matching endpoints */
652 			if ((iface_index == USB_IFACE_INDEX_ANY) ||
653 			    (iface_index == ep->iface_index)) {
654 				if (ep->refcount != 0) {
655 					/*
656 					 * This typically indicates a
657 					 * more serious error.
658 					 */
659 					err = USB_ERR_IN_USE;
660 				} else {
661 					/* reset endpoint */
662 					memset(ep, 0, sizeof(*ep));
663 					/* make sure we don't zero the endpoint again */
664 					ep->iface_index = USB_IFACE_INDEX_ANY;
665 				}
666 			}
667 			ep++;
668 		}
669 
670 		if (err)
671 			return (err);
672 	}
673 
674 	memset(&ips, 0, sizeof(ips));
675 
676 	ep_curr = 0;
677 	ep_max = 0;
678 
679 	while ((id = usb_idesc_foreach(udev->cdesc, &ips))) {
680 
681 		/* check for interface overflow */
682 		if (ips.iface_index == USB_IFACE_MAX)
683 			break;			/* crazy */
684 
685 		iface = udev->ifaces + ips.iface_index;
686 
687 		/* check for specific interface match */
688 
689 		if (cmd == USB_CFG_INIT) {
690 			if ((iface_index != USB_IFACE_INDEX_ANY) &&
691 			    (iface_index != ips.iface_index)) {
692 				/* wrong interface */
693 				do_init = 0;
694 			} else if (alt_index != ips.iface_index_alt) {
695 				/* wrong alternate setting */
696 				do_init = 0;
697 			} else {
698 				/* initialise interface */
699 				do_init = 1;
700 			}
701 		} else
702 			do_init = 0;
703 
704 		/* check for new interface */
705 		if (ips.iface_index_alt == 0) {
706 			/* update current number of endpoints */
707 			ep_curr = ep_max;
708 		}
709 		/* check for init */
710 		if (do_init) {
711 			/* setup the USB interface structure */
712 			iface->idesc = id;
713 			/* default setting */
714 			iface->parent_iface_index = USB_IFACE_INDEX_ANY;
715 			/* set alternate index */
716 			iface->alt_index = alt_index;
717 		}
718 
719 		DPRINTFN(5, "found idesc nendpt=%d\n", id->bNumEndpoints);
720 
721 		ed = (struct usb_endpoint_descriptor *)id;
722 
723 		temp = ep_curr;
724 
725 		/* iterate all the endpoint descriptors */
726 		while ((ed = usb_edesc_foreach(udev->cdesc, ed))) {
727 
728 			if (temp == USB_EP_MAX)
729 				break;			/* crazy */
730 
731 			ep = udev->endpoints + temp;
732 
733 			if (do_init) {
734 				usb_init_endpoint(udev,
735 				    ips.iface_index, ed, ep);
736 			}
737 
738 			temp ++;
739 
740 			/* find maximum number of endpoints */
741 			if (ep_max < temp)
742 				ep_max = temp;
743 
744 			/* optimalisation */
745 			id = (struct usb_interface_descriptor *)ed;
746 		}
747 	}
748 
749 	/* NOTE: It is valid to have no interfaces and no endpoints! */
750 
751 	if (cmd == USB_CFG_ALLOC) {
752 		udev->ifaces_max = ips.iface_index;
753 		udev->ifaces = NULL;
754 		if (udev->ifaces_max != 0) {
755 			udev->ifaces = malloc(sizeof(*iface) * udev->ifaces_max,
756 			        M_USB, M_WAITOK | M_ZERO);
757 			if (udev->ifaces == NULL) {
758 				err = USB_ERR_NOMEM;
759 				goto done;
760 			}
761 		}
762 		if (ep_max != 0) {
763 			udev->endpoints = malloc(sizeof(*ep) * ep_max,
764 			        M_USB, M_WAITOK | M_ZERO);
765 			if (udev->endpoints == NULL) {
766 				err = USB_ERR_NOMEM;
767 				goto done;
768 			}
769 		} else {
770 			udev->endpoints = NULL;
771 		}
772 		USB_BUS_LOCK(udev->bus);
773 		udev->endpoints_max = ep_max;
774 		/* reset any ongoing clear-stall */
775 		udev->ep_curr = NULL;
776 		USB_BUS_UNLOCK(udev->bus);
777 	}
778 
779 done:
780 	if (err) {
781 		if (cmd == USB_CFG_ALLOC) {
782 cleanup:
783 			USB_BUS_LOCK(udev->bus);
784 			udev->endpoints_max = 0;
785 			/* reset any ongoing clear-stall */
786 			udev->ep_curr = NULL;
787 			USB_BUS_UNLOCK(udev->bus);
788 
789 			/* cleanup */
790 			if (udev->ifaces != NULL)
791 				free(udev->ifaces, M_USB);
792 			if (udev->endpoints != NULL)
793 				free(udev->endpoints, M_USB);
794 
795 			udev->ifaces = NULL;
796 			udev->endpoints = NULL;
797 			udev->ifaces_max = 0;
798 		}
799 	}
800 	return (err);
801 }
802 
803 /*------------------------------------------------------------------------*
804  *	usbd_set_alt_interface_index
805  *
806  * This function will select an alternate interface index for the
807  * given interface index. The interface should not be in use when this
808  * function is called. That means there should not be any open USB
809  * transfers. Else an error is returned. If the alternate setting is
810  * already set this function will simply return success. This function
811  * is called in Host mode and Device mode!
812  *
813  * Returns:
814  *    0: Success
815  * Else: Failure
816  *------------------------------------------------------------------------*/
817 usb_error_t
818 usbd_set_alt_interface_index(struct usb_device *udev,
819     uint8_t iface_index, uint8_t alt_index)
820 {
821 	struct usb_interface *iface = usbd_get_iface(udev, iface_index);
822 	usb_error_t err;
823 	uint8_t do_unlock;
824 
825 	/* automatic locking */
826 	if (sx_xlocked(udev->default_sx + 1)) {
827 		do_unlock = 0;
828 	} else {
829 		do_unlock = 1;
830 		sx_xlock(udev->default_sx + 1);
831 	}
832 	if (iface == NULL) {
833 		err = USB_ERR_INVAL;
834 		goto done;
835 	}
836 	if (iface->alt_index == alt_index) {
837 		/*
838 		 * Optimise away duplicate setting of
839 		 * alternate setting in USB Host Mode!
840 		 */
841 		err = 0;
842 		goto done;
843 	}
844 #if USB_HAVE_UGEN
845 	/*
846 	 * Free all generic FIFOs for this interface, except control
847 	 * endpoint FIFOs:
848 	 */
849 	usb_fifo_free_wrap(udev, iface_index, 0);
850 #endif
851 
852 	err = usb_config_parse(udev, iface_index, alt_index);
853 	if (err) {
854 		goto done;
855 	}
856 	if (iface->alt_index != alt_index) {
857 		/* the alternate setting does not exist */
858 		err = USB_ERR_INVAL;
859 		goto done;
860 	}
861 
862 	err = usbd_req_set_alt_interface_no(udev, NULL, iface_index,
863 	    iface->idesc->bAlternateSetting);
864 
865 done:
866 	if (do_unlock) {
867 		sx_unlock(udev->default_sx + 1);
868 	}
869 	return (err);
870 }
871 
872 /*------------------------------------------------------------------------*
873  *	usbd_set_endpoint_stall
874  *
875  * This function is used to make a BULK or INTERRUPT endpoint
876  * send STALL tokens.
877  *
878  * Returns:
879  *    0: Success
880  * Else: Failure
881  *------------------------------------------------------------------------*/
882 usb_error_t
883 usbd_set_endpoint_stall(struct usb_device *udev, struct usb_endpoint *ep,
884     uint8_t do_stall)
885 {
886 	struct usb_xfer *xfer;
887 	uint8_t et;
888 	uint8_t was_stalled;
889 
890 	if (ep == NULL) {
891 		/* nothing to do */
892 		DPRINTF("Cannot find endpoint\n");
893 		/*
894 		 * Pretend that the clear or set stall request is
895 		 * successful else some USB host stacks can do
896 		 * strange things, especially when a control endpoint
897 		 * stalls.
898 		 */
899 		return (0);
900 	}
901 	et = (ep->edesc->bmAttributes & UE_XFERTYPE);
902 
903 	if ((et != UE_BULK) &&
904 	    (et != UE_INTERRUPT)) {
905 		/*
906 	         * Should not stall control
907 	         * nor isochronous endpoints.
908 	         */
909 		DPRINTF("Invalid endpoint\n");
910 		return (0);
911 	}
912 	USB_BUS_LOCK(udev->bus);
913 
914 	/* store current stall state */
915 	was_stalled = ep->is_stalled;
916 
917 	/* check for no change */
918 	if (was_stalled && do_stall) {
919 		/* if the endpoint is already stalled do nothing */
920 		USB_BUS_UNLOCK(udev->bus);
921 		DPRINTF("No change\n");
922 		return (0);
923 	}
924 	/* set stalled state */
925 	ep->is_stalled = 1;
926 
927 	if (do_stall || (!was_stalled)) {
928 		if (!was_stalled) {
929 			/* lookup the current USB transfer, if any */
930 			xfer = ep->endpoint_q.curr;
931 		} else {
932 			xfer = NULL;
933 		}
934 
935 		/*
936 		 * If "xfer" is non-NULL the "set_stall" method will
937 		 * complete the USB transfer like in case of a timeout
938 		 * setting the error code "USB_ERR_STALLED".
939 		 */
940 		(udev->bus->methods->set_stall) (udev, xfer, ep, &do_stall);
941 	}
942 	if (!do_stall) {
943 		ep->toggle_next = 0;	/* reset data toggle */
944 		ep->is_stalled = 0;	/* clear stalled state */
945 
946 		(udev->bus->methods->clear_stall) (udev, ep);
947 
948 		/* start up the current or next transfer, if any */
949 		usb_command_wrapper(&ep->endpoint_q, ep->endpoint_q.curr);
950 	}
951 	USB_BUS_UNLOCK(udev->bus);
952 	return (0);
953 }
954 
955 /*------------------------------------------------------------------------*
956  *	usb_reset_iface_endpoints - used in USB device side mode
957  *------------------------------------------------------------------------*/
958 usb_error_t
959 usb_reset_iface_endpoints(struct usb_device *udev, uint8_t iface_index)
960 {
961 	struct usb_endpoint *ep;
962 	struct usb_endpoint *ep_end;
963 
964 	ep = udev->endpoints;
965 	ep_end = udev->endpoints + udev->endpoints_max;
966 
967 	for (; ep != ep_end; ep++) {
968 
969 		if ((ep->edesc == NULL) ||
970 		    (ep->iface_index != iface_index)) {
971 			continue;
972 		}
973 		/* simulate a clear stall from the peer */
974 		usbd_set_endpoint_stall(udev, ep, 0);
975 	}
976 	return (0);
977 }
978 
979 /*------------------------------------------------------------------------*
980  *	usb_detach_device_sub
981  *
982  * This function will try to detach an USB device. If it fails a panic
983  * will result.
984  *
985  * Flag values, see "USB_UNCFG_FLAG_XXX".
986  *------------------------------------------------------------------------*/
987 static void
988 usb_detach_device_sub(struct usb_device *udev, device_t *ppdev,
989     uint8_t flag)
990 {
991 	device_t dev;
992 	int err;
993 
994 	if (!(flag & USB_UNCFG_FLAG_FREE_SUBDEV)) {
995 
996 		*ppdev = NULL;
997 
998 	} else if (*ppdev) {
999 
1000 		/*
1001 		 * NOTE: It is important to clear "*ppdev" before deleting
1002 		 * the child due to some device methods being called late
1003 		 * during the delete process !
1004 		 */
1005 		dev = *ppdev;
1006 		*ppdev = NULL;
1007 
1008 		device_printf(dev, "at %s, port %d, addr %d "
1009 		    "(disconnected)\n",
1010 		    device_get_nameunit(udev->parent_dev),
1011 		    udev->port_no, udev->address);
1012 
1013 		if (device_is_attached(dev)) {
1014 			if (udev->flags.peer_suspended) {
1015 				err = DEVICE_RESUME(dev);
1016 				if (err) {
1017 					device_printf(dev, "Resume failed!\n");
1018 				}
1019 			}
1020 			if (device_detach(dev)) {
1021 				goto error;
1022 			}
1023 		}
1024 		if (device_delete_child(udev->parent_dev, dev)) {
1025 			goto error;
1026 		}
1027 	}
1028 	return;
1029 
1030 error:
1031 	/* Detach is not allowed to fail in the USB world */
1032 	panic("An USB driver would not detach!\n");
1033 }
1034 
1035 /*------------------------------------------------------------------------*
1036  *	usb_detach_device
1037  *
1038  * The following function will detach the matching interfaces.
1039  * This function is NULL safe.
1040  *
1041  * Flag values, see "USB_UNCFG_FLAG_XXX".
1042  *------------------------------------------------------------------------*/
1043 void
1044 usb_detach_device(struct usb_device *udev, uint8_t iface_index,
1045     uint8_t flag)
1046 {
1047 	struct usb_interface *iface;
1048 	uint8_t i;
1049 
1050 	if (udev == NULL) {
1051 		/* nothing to do */
1052 		return;
1053 	}
1054 	DPRINTFN(4, "udev=%p\n", udev);
1055 
1056 	sx_assert(udev->default_sx + 1, SA_LOCKED);
1057 
1058 	/*
1059 	 * First detach the child to give the child's detach routine a
1060 	 * chance to detach the sub-devices in the correct order.
1061 	 * Then delete the child using "device_delete_child()" which
1062 	 * will detach all sub-devices from the bottom and upwards!
1063 	 */
1064 	if (iface_index != USB_IFACE_INDEX_ANY) {
1065 		i = iface_index;
1066 		iface_index = i + 1;
1067 	} else {
1068 		i = 0;
1069 		iface_index = USB_IFACE_MAX;
1070 	}
1071 
1072 	/* do the detach */
1073 
1074 	for (; i != iface_index; i++) {
1075 
1076 		iface = usbd_get_iface(udev, i);
1077 		if (iface == NULL) {
1078 			/* looks like the end of the USB interfaces */
1079 			break;
1080 		}
1081 		usb_detach_device_sub(udev, &iface->subdev, flag);
1082 	}
1083 }
1084 
1085 /*------------------------------------------------------------------------*
1086  *	usb_probe_and_attach_sub
1087  *
1088  * Returns:
1089  *    0: Success
1090  * Else: Failure
1091  *------------------------------------------------------------------------*/
1092 static uint8_t
1093 usb_probe_and_attach_sub(struct usb_device *udev,
1094     struct usb_attach_arg *uaa)
1095 {
1096 	struct usb_interface *iface;
1097 	device_t dev;
1098 	int err;
1099 
1100 	iface = uaa->iface;
1101 	if (iface->parent_iface_index != USB_IFACE_INDEX_ANY) {
1102 		/* leave interface alone */
1103 		return (0);
1104 	}
1105 	dev = iface->subdev;
1106 	if (dev) {
1107 
1108 		/* clean up after module unload */
1109 
1110 		if (device_is_attached(dev)) {
1111 			/* already a device there */
1112 			return (0);
1113 		}
1114 		/* clear "iface->subdev" as early as possible */
1115 
1116 		iface->subdev = NULL;
1117 
1118 		if (device_delete_child(udev->parent_dev, dev)) {
1119 
1120 			/*
1121 			 * Panic here, else one can get a double call
1122 			 * to device_detach().  USB devices should
1123 			 * never fail on detach!
1124 			 */
1125 			panic("device_delete_child() failed!\n");
1126 		}
1127 	}
1128 	if (uaa->temp_dev == NULL) {
1129 
1130 		/* create a new child */
1131 		uaa->temp_dev = device_add_child(udev->parent_dev, NULL, -1);
1132 		if (uaa->temp_dev == NULL) {
1133 			device_printf(udev->parent_dev,
1134 			    "Device creation failed!\n");
1135 			return (1);	/* failure */
1136 		}
1137 		device_set_ivars(uaa->temp_dev, uaa);
1138 		device_quiet(uaa->temp_dev);
1139 	}
1140 	/*
1141 	 * Set "subdev" before probe and attach so that "devd" gets
1142 	 * the information it needs.
1143 	 */
1144 	iface->subdev = uaa->temp_dev;
1145 
1146 	if (device_probe_and_attach(iface->subdev) == 0) {
1147 		/*
1148 		 * The USB attach arguments are only available during probe
1149 		 * and attach !
1150 		 */
1151 		uaa->temp_dev = NULL;
1152 		device_set_ivars(iface->subdev, NULL);
1153 
1154 		if (udev->flags.peer_suspended) {
1155 			err = DEVICE_SUSPEND(iface->subdev);
1156 			if (err)
1157 				device_printf(iface->subdev, "Suspend failed\n");
1158 		}
1159 		return (0);		/* success */
1160 	} else {
1161 		/* No USB driver found */
1162 		iface->subdev = NULL;
1163 	}
1164 	return (1);			/* failure */
1165 }
1166 
1167 /*------------------------------------------------------------------------*
1168  *	usbd_set_parent_iface
1169  *
1170  * Using this function will lock the alternate interface setting on an
1171  * interface. It is typically used for multi interface drivers. In USB
1172  * device side mode it is assumed that the alternate interfaces all
1173  * have the same endpoint descriptors. The default parent index value
1174  * is "USB_IFACE_INDEX_ANY". Then the alternate setting value is not
1175  * locked.
1176  *------------------------------------------------------------------------*/
1177 void
1178 usbd_set_parent_iface(struct usb_device *udev, uint8_t iface_index,
1179     uint8_t parent_index)
1180 {
1181 	struct usb_interface *iface;
1182 
1183 	iface = usbd_get_iface(udev, iface_index);
1184 	if (iface) {
1185 		iface->parent_iface_index = parent_index;
1186 	}
1187 }
1188 
1189 static void
1190 usb_init_attach_arg(struct usb_device *udev,
1191     struct usb_attach_arg *uaa)
1192 {
1193 	bzero(uaa, sizeof(*uaa));
1194 
1195 	uaa->device = udev;
1196 	uaa->usb_mode = udev->flags.usb_mode;
1197 	uaa->port = udev->port_no;
1198 
1199 	uaa->info.idVendor = UGETW(udev->ddesc.idVendor);
1200 	uaa->info.idProduct = UGETW(udev->ddesc.idProduct);
1201 	uaa->info.bcdDevice = UGETW(udev->ddesc.bcdDevice);
1202 	uaa->info.bDeviceClass = udev->ddesc.bDeviceClass;
1203 	uaa->info.bDeviceSubClass = udev->ddesc.bDeviceSubClass;
1204 	uaa->info.bDeviceProtocol = udev->ddesc.bDeviceProtocol;
1205 	uaa->info.bConfigIndex = udev->curr_config_index;
1206 	uaa->info.bConfigNum = udev->curr_config_no;
1207 }
1208 
1209 /*------------------------------------------------------------------------*
1210  *	usb_probe_and_attach
1211  *
1212  * This function is called from "uhub_explore_sub()",
1213  * "usb_handle_set_config()" and "usb_handle_request()".
1214  *
1215  * Returns:
1216  *    0: Success
1217  * Else: A control transfer failed
1218  *------------------------------------------------------------------------*/
1219 usb_error_t
1220 usb_probe_and_attach(struct usb_device *udev, uint8_t iface_index)
1221 {
1222 	struct usb_attach_arg uaa;
1223 	struct usb_interface *iface;
1224 	uint8_t i;
1225 	uint8_t j;
1226 	uint8_t do_unlock;
1227 
1228 	if (udev == NULL) {
1229 		DPRINTF("udev == NULL\n");
1230 		return (USB_ERR_INVAL);
1231 	}
1232 	/* automatic locking */
1233 	if (sx_xlocked(udev->default_sx + 1)) {
1234 		do_unlock = 0;
1235 	} else {
1236 		do_unlock = 1;
1237 		sx_xlock(udev->default_sx + 1);
1238 	}
1239 
1240 	if (udev->curr_config_index == USB_UNCONFIG_INDEX) {
1241 		/* do nothing - no configuration has been set */
1242 		goto done;
1243 	}
1244 	/* setup USB attach arguments */
1245 
1246 	usb_init_attach_arg(udev, &uaa);
1247 
1248 	/* Check if only one interface should be probed: */
1249 	if (iface_index != USB_IFACE_INDEX_ANY) {
1250 		i = iface_index;
1251 		j = i + 1;
1252 	} else {
1253 		i = 0;
1254 		j = USB_IFACE_MAX;
1255 	}
1256 
1257 	/* Do the probe and attach */
1258 	for (; i != j; i++) {
1259 
1260 		iface = usbd_get_iface(udev, i);
1261 		if (iface == NULL) {
1262 			/*
1263 			 * Looks like the end of the USB
1264 			 * interfaces !
1265 			 */
1266 			DPRINTFN(2, "end of interfaces "
1267 			    "at %u\n", i);
1268 			break;
1269 		}
1270 		if (iface->idesc == NULL) {
1271 			/* no interface descriptor */
1272 			continue;
1273 		}
1274 		uaa.iface = iface;
1275 
1276 		uaa.info.bInterfaceClass =
1277 		    iface->idesc->bInterfaceClass;
1278 		uaa.info.bInterfaceSubClass =
1279 		    iface->idesc->bInterfaceSubClass;
1280 		uaa.info.bInterfaceProtocol =
1281 		    iface->idesc->bInterfaceProtocol;
1282 		uaa.info.bIfaceIndex = i;
1283 		uaa.info.bIfaceNum =
1284 		    iface->idesc->bInterfaceNumber;
1285 		uaa.use_generic = 0;
1286 		uaa.driver_info = 0;	/* reset driver_info */
1287 
1288 		DPRINTFN(2, "iclass=%u/%u/%u iindex=%u/%u\n",
1289 		    uaa.info.bInterfaceClass,
1290 		    uaa.info.bInterfaceSubClass,
1291 		    uaa.info.bInterfaceProtocol,
1292 		    uaa.info.bIfaceIndex,
1293 		    uaa.info.bIfaceNum);
1294 
1295 		/* try specific interface drivers first */
1296 
1297 		if (usb_probe_and_attach_sub(udev, &uaa)) {
1298 			/* ignore */
1299 		}
1300 		/* try generic interface drivers last */
1301 
1302 		uaa.use_generic = 1;
1303 		uaa.driver_info = 0;	/* reset driver_info */
1304 
1305 		if (usb_probe_and_attach_sub(udev, &uaa)) {
1306 			/* ignore */
1307 		}
1308 	}
1309 
1310 	if (uaa.temp_dev) {
1311 		/* remove the last created child; it is unused */
1312 
1313 		if (device_delete_child(udev->parent_dev, uaa.temp_dev)) {
1314 			DPRINTFN(0, "device delete child failed!\n");
1315 		}
1316 	}
1317 done:
1318 	if (do_unlock) {
1319 		sx_unlock(udev->default_sx + 1);
1320 	}
1321 	return (0);
1322 }
1323 
1324 /*------------------------------------------------------------------------*
1325  *	usb_suspend_resume_sub
1326  *
1327  * This function is called when the suspend or resume methods should
1328  * be executed on an USB device.
1329  *------------------------------------------------------------------------*/
1330 static void
1331 usb_suspend_resume_sub(struct usb_device *udev, device_t dev, uint8_t do_suspend)
1332 {
1333 	int err;
1334 
1335 	if (dev == NULL) {
1336 		return;
1337 	}
1338 	if (!device_is_attached(dev)) {
1339 		return;
1340 	}
1341 	if (do_suspend) {
1342 		err = DEVICE_SUSPEND(dev);
1343 	} else {
1344 		err = DEVICE_RESUME(dev);
1345 	}
1346 	if (err) {
1347 		device_printf(dev, "%s failed!\n",
1348 		    do_suspend ? "Suspend" : "Resume");
1349 	}
1350 }
1351 
1352 /*------------------------------------------------------------------------*
1353  *	usb_suspend_resume
1354  *
1355  * The following function will suspend or resume the USB device.
1356  *
1357  * Returns:
1358  *    0: Success
1359  * Else: Failure
1360  *------------------------------------------------------------------------*/
1361 usb_error_t
1362 usb_suspend_resume(struct usb_device *udev, uint8_t do_suspend)
1363 {
1364 	struct usb_interface *iface;
1365 	uint8_t i;
1366 
1367 	if (udev == NULL) {
1368 		/* nothing to do */
1369 		return (0);
1370 	}
1371 	DPRINTFN(4, "udev=%p do_suspend=%d\n", udev, do_suspend);
1372 
1373 	sx_assert(udev->default_sx + 1, SA_LOCKED);
1374 
1375 	USB_BUS_LOCK(udev->bus);
1376 	/* filter the suspend events */
1377 	if (udev->flags.peer_suspended == do_suspend) {
1378 		USB_BUS_UNLOCK(udev->bus);
1379 		/* nothing to do */
1380 		return (0);
1381 	}
1382 	udev->flags.peer_suspended = do_suspend;
1383 	USB_BUS_UNLOCK(udev->bus);
1384 
1385 	/* do the suspend or resume */
1386 
1387 	for (i = 0; i != USB_IFACE_MAX; i++) {
1388 
1389 		iface = usbd_get_iface(udev, i);
1390 		if (iface == NULL) {
1391 			/* looks like the end of the USB interfaces */
1392 			break;
1393 		}
1394 		usb_suspend_resume_sub(udev, iface->subdev, do_suspend);
1395 	}
1396 	return (0);
1397 }
1398 
1399 /*------------------------------------------------------------------------*
1400  *      usbd_clear_stall_proc
1401  *
1402  * This function performs generic USB clear stall operations.
1403  *------------------------------------------------------------------------*/
1404 static void
1405 usbd_clear_stall_proc(struct usb_proc_msg *_pm)
1406 {
1407 	struct usb_clear_stall_msg *pm = (void *)_pm;
1408 	struct usb_device *udev = pm->udev;
1409 
1410 	/* Change lock */
1411 	USB_BUS_UNLOCK(udev->bus);
1412 	mtx_lock(udev->default_mtx);
1413 
1414 	/* Start clear stall callback */
1415 	usbd_transfer_start(udev->default_xfer[1]);
1416 
1417 	/* Change lock */
1418 	mtx_unlock(udev->default_mtx);
1419 	USB_BUS_LOCK(udev->bus);
1420 }
1421 
1422 /*------------------------------------------------------------------------*
1423  *	usb_alloc_device
1424  *
1425  * This function allocates a new USB device. This function is called
1426  * when a new device has been put in the powered state, but not yet in
1427  * the addressed state. Get initial descriptor, set the address, get
1428  * full descriptor and get strings.
1429  *
1430  * Return values:
1431  *    0: Failure
1432  * Else: Success
1433  *------------------------------------------------------------------------*/
1434 struct usb_device *
1435 usb_alloc_device(device_t parent_dev, struct usb_bus *bus,
1436     struct usb_device *parent_hub, uint8_t depth, uint8_t port_index,
1437     uint8_t port_no, enum usb_dev_speed speed, enum usb_hc_mode mode)
1438 {
1439 	struct usb_attach_arg uaa;
1440 	struct usb_device *udev;
1441 	struct usb_device *adev;
1442 	struct usb_device *hub;
1443 	uint8_t *scratch_ptr;
1444 	uint32_t scratch_size;
1445 	usb_error_t err;
1446 	uint8_t device_index;
1447 
1448 	DPRINTF("parent_dev=%p, bus=%p, parent_hub=%p, depth=%u, "
1449 	    "port_index=%u, port_no=%u, speed=%u, usb_mode=%u\n",
1450 	    parent_dev, bus, parent_hub, depth, port_index, port_no,
1451 	    speed, mode);
1452 
1453 	/*
1454 	 * Find an unused device index. In USB Host mode this is the
1455 	 * same as the device address.
1456 	 *
1457 	 * Device index zero is not used and device index 1 should
1458 	 * always be the root hub.
1459 	 */
1460 	for (device_index = USB_ROOT_HUB_ADDR;
1461 	    (device_index != bus->devices_max) &&
1462 	    (bus->devices[device_index] != NULL);
1463 	    device_index++) /* nop */;
1464 
1465 	if (device_index == bus->devices_max) {
1466 		device_printf(bus->bdev,
1467 		    "No free USB device index for new device!\n");
1468 		return (NULL);
1469 	}
1470 
1471 	if (depth > 0x10) {
1472 		device_printf(bus->bdev,
1473 		    "Invalid device depth!\n");
1474 		return (NULL);
1475 	}
1476 	udev = malloc(sizeof(*udev), M_USB, M_WAITOK | M_ZERO);
1477 	if (udev == NULL) {
1478 		return (NULL);
1479 	}
1480 	/* initialise our SX-lock */
1481 	sx_init(udev->default_sx, "0123456789ABCDEF - USB device SX lock" + depth);
1482 
1483 	/* initialise our SX-lock */
1484 	sx_init(udev->default_sx + 1, "0123456789ABCDEF - USB config SX lock" + depth);
1485 
1486 	cv_init(udev->default_cv, "WCTRL");
1487 	cv_init(udev->default_cv + 1, "UGONE");
1488 
1489 	/* initialise our mutex */
1490 	mtx_init(udev->default_mtx, "USB device mutex", NULL, MTX_DEF);
1491 
1492 	/* initialise generic clear stall */
1493 	udev->cs_msg[0].hdr.pm_callback = &usbd_clear_stall_proc;
1494 	udev->cs_msg[0].udev = udev;
1495 	udev->cs_msg[1].hdr.pm_callback = &usbd_clear_stall_proc;
1496 	udev->cs_msg[1].udev = udev;
1497 
1498 	/* initialise some USB device fields */
1499 	udev->parent_hub = parent_hub;
1500 	udev->parent_dev = parent_dev;
1501 	udev->port_index = port_index;
1502 	udev->port_no = port_no;
1503 	udev->depth = depth;
1504 	udev->bus = bus;
1505 	udev->address = USB_START_ADDR;	/* default value */
1506 	udev->plugtime = (usb_ticks_t)ticks;
1507 	usb_set_device_state(udev, USB_STATE_POWERED);
1508 	/*
1509 	 * We need to force the power mode to "on" because there are plenty
1510 	 * of USB devices out there that do not work very well with
1511 	 * automatic suspend and resume!
1512 	 */
1513 	udev->power_mode = USB_POWER_MODE_ON;
1514 	udev->pwr_save.last_xfer_time = ticks;
1515 	/* we are not ready yet */
1516 	udev->refcount = 1;
1517 
1518 	/* set up default endpoint descriptor */
1519 	udev->default_ep_desc.bLength = sizeof(udev->default_ep_desc);
1520 	udev->default_ep_desc.bDescriptorType = UDESC_ENDPOINT;
1521 	udev->default_ep_desc.bEndpointAddress = USB_CONTROL_ENDPOINT;
1522 	udev->default_ep_desc.bmAttributes = UE_CONTROL;
1523 	udev->default_ep_desc.wMaxPacketSize[0] = USB_MAX_IPACKET;
1524 	udev->default_ep_desc.wMaxPacketSize[1] = 0;
1525 	udev->default_ep_desc.bInterval = 0;
1526 	udev->ddesc.bMaxPacketSize = USB_MAX_IPACKET;
1527 
1528 	udev->speed = speed;
1529 	udev->flags.usb_mode = mode;
1530 
1531 	/* search for our High Speed USB HUB, if any */
1532 
1533 	adev = udev;
1534 	hub = udev->parent_hub;
1535 
1536 	while (hub) {
1537 		if (hub->speed == USB_SPEED_HIGH) {
1538 			udev->hs_hub_addr = hub->address;
1539 			udev->parent_hs_hub = hub;
1540 			udev->hs_port_no = adev->port_no;
1541 			break;
1542 		}
1543 		adev = hub;
1544 		hub = hub->parent_hub;
1545 	}
1546 
1547 	/* init the default endpoint */
1548 	usb_init_endpoint(udev, 0,
1549 	    &udev->default_ep_desc,
1550 	    &udev->default_ep);
1551 
1552 	/* set device index */
1553 	udev->device_index = device_index;
1554 
1555 #if USB_HAVE_UGEN
1556 	/* Create ugen name */
1557 	snprintf(udev->ugen_name, sizeof(udev->ugen_name),
1558 	    USB_GENERIC_NAME "%u.%u", device_get_unit(bus->bdev),
1559 	    device_index);
1560 	LIST_INIT(&udev->pd_list);
1561 
1562 	/* Create the control endpoint device */
1563 	udev->default_dev = usb_make_dev(udev, 0, FREAD|FWRITE);
1564 
1565 	/* Create a link from /dev/ugenX.X to the default endpoint */
1566 	make_dev_alias(udev->default_dev, udev->ugen_name);
1567 #endif
1568 	if (udev->flags.usb_mode == USB_MODE_HOST) {
1569 
1570 		err = usbd_req_set_address(udev, NULL, device_index);
1571 
1572 		/* This is the new USB device address from now on */
1573 
1574 		udev->address = device_index;
1575 
1576 		/*
1577 		 * We ignore any set-address errors, hence there are
1578 		 * buggy USB devices out there that actually receive
1579 		 * the SETUP PID, but manage to set the address before
1580 		 * the STATUS stage is ACK'ed. If the device responds
1581 		 * to the subsequent get-descriptor at the new
1582 		 * address, then we know that the set-address command
1583 		 * was successful.
1584 		 */
1585 		if (err) {
1586 			DPRINTFN(0, "set address %d failed "
1587 			    "(%s, ignored)\n", udev->address,
1588 			    usbd_errstr(err));
1589 		}
1590 		/* allow device time to set new address */
1591 		usb_pause_mtx(NULL,
1592 		    USB_MS_TO_TICKS(USB_SET_ADDRESS_SETTLE));
1593 	} else {
1594 		/* We are not self powered */
1595 		udev->flags.self_powered = 0;
1596 
1597 		/* Set unconfigured state */
1598 		udev->curr_config_no = USB_UNCONFIG_NO;
1599 		udev->curr_config_index = USB_UNCONFIG_INDEX;
1600 
1601 		/* Setup USB descriptors */
1602 		err = (usb_temp_setup_by_index_p) (udev, usb_template);
1603 		if (err) {
1604 			DPRINTFN(0, "setting up USB template failed maybe the USB "
1605 			    "template module has not been loaded\n");
1606 			goto done;
1607 		}
1608 	}
1609 	usb_set_device_state(udev, USB_STATE_ADDRESSED);
1610 
1611 	/*
1612 	 * Get the first 8 bytes of the device descriptor !
1613 	 *
1614 	 * NOTE: "usbd_do_request" will check the device descriptor
1615 	 * next time we do a request to see if the maximum packet size
1616 	 * changed! The 8 first bytes of the device descriptor
1617 	 * contains the maximum packet size to use on control endpoint
1618 	 * 0. If this value is different from "USB_MAX_IPACKET" a new
1619 	 * USB control request will be setup!
1620 	 */
1621 	err = usbd_req_get_desc(udev, NULL, NULL, &udev->ddesc,
1622 	    USB_MAX_IPACKET, USB_MAX_IPACKET, 0, UDESC_DEVICE, 0, 0);
1623 	if (err) {
1624 		DPRINTFN(0, "getting device descriptor "
1625 		    "at addr %d failed, %s!\n", udev->address,
1626 		    usbd_errstr(err));
1627 		/* XXX try to re-enumerate the device */
1628 		err = usbd_req_re_enumerate(udev, NULL);
1629 		if (err) {
1630 			goto done;
1631 		}
1632 	}
1633 	DPRINTF("adding unit addr=%d, rev=%02x, class=%d, "
1634 	    "subclass=%d, protocol=%d, maxpacket=%d, len=%d, speed=%d\n",
1635 	    udev->address, UGETW(udev->ddesc.bcdUSB),
1636 	    udev->ddesc.bDeviceClass,
1637 	    udev->ddesc.bDeviceSubClass,
1638 	    udev->ddesc.bDeviceProtocol,
1639 	    udev->ddesc.bMaxPacketSize,
1640 	    udev->ddesc.bLength,
1641 	    udev->speed);
1642 
1643 	/* get the full device descriptor */
1644 	err = usbd_req_get_device_desc(udev, NULL, &udev->ddesc);
1645 	if (err) {
1646 		DPRINTF("addr=%d, getting full desc failed\n",
1647 		    udev->address);
1648 		goto done;
1649 	}
1650 	/*
1651 	 * Setup temporary USB attach args so that we can figure out some
1652 	 * basic quirks for this device.
1653 	 */
1654 	usb_init_attach_arg(udev, &uaa);
1655 
1656 	if (usb_test_quirk(&uaa, UQ_BUS_POWERED)) {
1657 		udev->flags.uq_bus_powered = 1;
1658 	}
1659 	if (usb_test_quirk(&uaa, UQ_NO_STRINGS)) {
1660 		udev->flags.no_strings = 1;
1661 	}
1662 	/*
1663 	 * Workaround for buggy USB devices.
1664 	 *
1665 	 * It appears that some string-less USB chips will crash and
1666 	 * disappear if any attempts are made to read any string
1667 	 * descriptors.
1668 	 *
1669 	 * Try to detect such chips by checking the strings in the USB
1670 	 * device descriptor. If no strings are present there we
1671 	 * simply disable all USB strings.
1672 	 */
1673 	scratch_ptr = udev->bus->scratch[0].data;
1674 	scratch_size = sizeof(udev->bus->scratch[0].data);
1675 
1676 	if (udev->ddesc.iManufacturer ||
1677 	    udev->ddesc.iProduct ||
1678 	    udev->ddesc.iSerialNumber) {
1679 		/* read out the language ID string */
1680 		err = usbd_req_get_string_desc(udev, NULL,
1681 		    (char *)scratch_ptr, 4, scratch_size,
1682 		    USB_LANGUAGE_TABLE);
1683 	} else {
1684 		err = USB_ERR_INVAL;
1685 	}
1686 
1687 	if (err || (scratch_ptr[0] < 4)) {
1688 		udev->flags.no_strings = 1;
1689 	} else {
1690 		/* pick the first language as the default */
1691 		udev->langid = UGETW(scratch_ptr + 2);
1692 	}
1693 
1694 	/* assume 100mA bus powered for now. Changed when configured. */
1695 	udev->power = USB_MIN_POWER;
1696 	/* fetch the vendor and product strings from the device */
1697 	usbd_set_device_strings(udev);
1698 
1699 	if (udev->flags.usb_mode == USB_MODE_HOST) {
1700 		uint8_t config_index;
1701 		uint8_t config_quirk;
1702 		uint8_t set_config_failed = 0;
1703 
1704 		/*
1705 		 * Most USB devices should attach to config index 0 by
1706 		 * default
1707 		 */
1708 		if (usb_test_quirk(&uaa, UQ_CFG_INDEX_0)) {
1709 			config_index = 0;
1710 			config_quirk = 1;
1711 		} else if (usb_test_quirk(&uaa, UQ_CFG_INDEX_1)) {
1712 			config_index = 1;
1713 			config_quirk = 1;
1714 		} else if (usb_test_quirk(&uaa, UQ_CFG_INDEX_2)) {
1715 			config_index = 2;
1716 			config_quirk = 1;
1717 		} else if (usb_test_quirk(&uaa, UQ_CFG_INDEX_3)) {
1718 			config_index = 3;
1719 			config_quirk = 1;
1720 		} else if (usb_test_quirk(&uaa, UQ_CFG_INDEX_4)) {
1721 			config_index = 4;
1722 			config_quirk = 1;
1723 		} else {
1724 			config_index = 0;
1725 			config_quirk = 0;
1726 		}
1727 
1728 repeat_set_config:
1729 
1730 		DPRINTF("setting config %u\n", config_index);
1731 
1732 		/* get the USB device configured */
1733 		err = usbd_set_config_index(udev, config_index);
1734 		if (err) {
1735 			if (udev->ddesc.bNumConfigurations != 0) {
1736 				if (!set_config_failed) {
1737 					set_config_failed = 1;
1738 					/* XXX try to re-enumerate the device */
1739 					err = usbd_req_re_enumerate(
1740 					    udev, NULL);
1741 					if (err == 0)
1742 					    goto repeat_set_config;
1743 				}
1744 				DPRINTFN(0, "Failure selecting "
1745 				    "configuration index %u: %s, port %u, "
1746 				    "addr %u (ignored)\n",
1747 				    config_index, usbd_errstr(err), udev->port_no,
1748 				    udev->address);
1749 			}
1750 			/*
1751 			 * Some USB devices do not have any
1752 			 * configurations. Ignore any set config
1753 			 * failures!
1754 			 */
1755 			err = 0;
1756 		} else if (config_quirk) {
1757 			/* user quirk selects configuration index */
1758 		} else if ((config_index + 1) < udev->ddesc.bNumConfigurations) {
1759 
1760 			if ((udev->cdesc->bNumInterface < 2) &&
1761 			    (usbd_get_no_descriptors(udev->cdesc,
1762 			    UDESC_ENDPOINT) == 0)) {
1763 				DPRINTFN(0, "Found no endpoints "
1764 				    "(trying next config)!\n");
1765 				config_index++;
1766 				goto repeat_set_config;
1767 			}
1768 			if (config_index == 0) {
1769 				/*
1770 				 * Try to figure out if we have an
1771 				 * auto-install disk there:
1772 				 */
1773 				if (usb_test_autoinstall(udev, 0, 0) == 0) {
1774 					DPRINTFN(0, "Found possible auto-install "
1775 					    "disk (trying next config)\n");
1776 					config_index++;
1777 					goto repeat_set_config;
1778 				}
1779 			}
1780 		} else if (usb_test_huawei_autoinst_p(udev, &uaa) == 0) {
1781 			DPRINTFN(0, "Found Huawei auto-install disk!\n");
1782 			err = USB_ERR_STALLED;	/* fake an error */
1783 		}
1784 	} else {
1785 		err = 0;		/* set success */
1786 	}
1787 
1788 	DPRINTF("new dev (addr %d), udev=%p, parent_hub=%p\n",
1789 	    udev->address, udev, udev->parent_hub);
1790 
1791 	/* register our device - we are ready */
1792 	usb_bus_port_set_device(bus, parent_hub ?
1793 	    parent_hub->hub->ports + port_index : NULL, udev, device_index);
1794 
1795 #if USB_HAVE_UGEN
1796 	/* Symlink the ugen device name */
1797 	udev->ugen_symlink = usb_alloc_symlink(udev->ugen_name);
1798 
1799 	/* Announce device */
1800 	printf("%s: <%s> at %s\n", udev->ugen_name, udev->manufacturer,
1801 	    device_get_nameunit(udev->bus->bdev));
1802 
1803 	usb_notify_addq("+", udev);
1804 #endif
1805 done:
1806 	if (err) {
1807 		/* free device  */
1808 		usb_free_device(udev,
1809 		    USB_UNCFG_FLAG_FREE_SUBDEV |
1810 		    USB_UNCFG_FLAG_FREE_EP0);
1811 		udev = NULL;
1812 	}
1813 	return (udev);
1814 }
1815 
1816 #if USB_HAVE_UGEN
1817 static struct cdev *
1818 usb_make_dev(struct usb_device *udev, int ep, int mode)
1819 {
1820 	struct usb_fs_privdata* pd;
1821 	char devname[20];
1822 
1823 	/* Store information to locate ourselves again later */
1824 	pd = malloc(sizeof(struct usb_fs_privdata), M_USBDEV,
1825 	    M_WAITOK | M_ZERO);
1826 	pd->bus_index = device_get_unit(udev->bus->bdev);
1827 	pd->dev_index = udev->device_index;
1828 	pd->ep_addr = ep;
1829 	pd->mode = mode;
1830 
1831 	/* Now, create the device itself */
1832 	snprintf(devname, sizeof(devname), "%u.%u.%u",
1833 	    pd->bus_index, pd->dev_index, pd->ep_addr);
1834 	pd->cdev = make_dev(&usb_devsw, 0, UID_ROOT,
1835 	    GID_OPERATOR, 0600, USB_DEVICE_DIR "/%s", devname);
1836 	pd->cdev->si_drv1 = pd;
1837 
1838 	return (pd->cdev);
1839 }
1840 
1841 static void
1842 usb_cdev_create(struct usb_device *udev)
1843 {
1844 	struct usb_config_descriptor *cd;
1845 	struct usb_endpoint_descriptor *ed;
1846 	struct usb_descriptor *desc;
1847 	struct usb_fs_privdata* pd;
1848 	struct cdev *dev;
1849 	int inmode, outmode, inmask, outmask, mode;
1850 	uint8_t ep;
1851 
1852 	KASSERT(LIST_FIRST(&udev->pd_list) == NULL, ("stale cdev entries"));
1853 
1854 	DPRINTFN(2, "Creating device nodes\n");
1855 
1856 	if (usbd_get_mode(udev) == USB_MODE_DEVICE) {
1857 		inmode = FWRITE;
1858 		outmode = FREAD;
1859 	} else {		 /* USB_MODE_HOST */
1860 		inmode = FREAD;
1861 		outmode = FWRITE;
1862 	}
1863 
1864 	inmask = 0;
1865 	outmask = 0;
1866 	desc = NULL;
1867 
1868 	/*
1869 	 * Collect all used endpoint numbers instead of just
1870 	 * generating 16 static endpoints.
1871 	 */
1872 	cd = usbd_get_config_descriptor(udev);
1873 	while ((desc = usb_desc_foreach(cd, desc))) {
1874 		/* filter out all endpoint descriptors */
1875 		if ((desc->bDescriptorType == UDESC_ENDPOINT) &&
1876 		    (desc->bLength >= sizeof(*ed))) {
1877 			ed = (struct usb_endpoint_descriptor *)desc;
1878 
1879 			/* update masks */
1880 			ep = ed->bEndpointAddress;
1881 			if (UE_GET_DIR(ep)  == UE_DIR_OUT)
1882 				outmask |= 1 << UE_GET_ADDR(ep);
1883 			else
1884 				inmask |= 1 << UE_GET_ADDR(ep);
1885 		}
1886 	}
1887 
1888 	/* Create all available endpoints except EP0 */
1889 	for (ep = 1; ep < 16; ep++) {
1890 		mode = inmask & (1 << ep) ? inmode : 0;
1891 		mode |= outmask & (1 << ep) ? outmode : 0;
1892 		if (mode == 0)
1893 			continue;	/* no IN or OUT endpoint */
1894 
1895 		dev = usb_make_dev(udev, ep, mode);
1896 		pd = dev->si_drv1;
1897 		LIST_INSERT_HEAD(&udev->pd_list, pd, pd_next);
1898 	}
1899 }
1900 
1901 static void
1902 usb_cdev_free(struct usb_device *udev)
1903 {
1904 	struct usb_fs_privdata* pd;
1905 
1906 	DPRINTFN(2, "Freeing device nodes\n");
1907 
1908 	while ((pd = LIST_FIRST(&udev->pd_list)) != NULL) {
1909 		KASSERT(pd->cdev->si_drv1 == pd, ("privdata corrupt"));
1910 
1911 		destroy_dev_sched_cb(pd->cdev, usb_cdev_cleanup, pd);
1912 		pd->cdev = NULL;
1913 		LIST_REMOVE(pd, pd_next);
1914 	}
1915 }
1916 
1917 static void
1918 usb_cdev_cleanup(void* arg)
1919 {
1920 	free(arg, M_USBDEV);
1921 }
1922 #endif
1923 
1924 /*------------------------------------------------------------------------*
1925  *	usb_free_device
1926  *
1927  * This function is NULL safe and will free an USB device.
1928  *
1929  * Flag values, see "USB_UNCFG_FLAG_XXX".
1930  *------------------------------------------------------------------------*/
1931 void
1932 usb_free_device(struct usb_device *udev, uint8_t flag)
1933 {
1934 	struct usb_bus *bus;
1935 
1936 	if (udev == NULL)
1937 		return;		/* already freed */
1938 
1939 	DPRINTFN(4, "udev=%p port=%d\n", udev, udev->port_no);
1940 
1941 	bus = udev->bus;
1942 	usb_set_device_state(udev, USB_STATE_DETACHED);
1943 
1944 #if USB_HAVE_UGEN
1945 	usb_notify_addq("-", udev);
1946 
1947 	printf("%s: <%s> at %s (disconnected)\n", udev->ugen_name,
1948 	    udev->manufacturer, device_get_nameunit(bus->bdev));
1949 
1950 	/* Destroy UGEN symlink, if any */
1951 	if (udev->ugen_symlink) {
1952 		usb_free_symlink(udev->ugen_symlink);
1953 		udev->ugen_symlink = NULL;
1954 	}
1955 #endif
1956 	/*
1957 	 * Unregister our device first which will prevent any further
1958 	 * references:
1959 	 */
1960 	usb_bus_port_set_device(bus, udev->parent_hub ?
1961 	    udev->parent_hub->hub->ports + udev->port_index : NULL,
1962 	    NULL, USB_ROOT_HUB_ADDR);
1963 
1964 #if USB_HAVE_UGEN
1965 	/* wait for all pending references to go away: */
1966 	mtx_lock(&usb_ref_lock);
1967 	udev->refcount--;
1968 	while (udev->refcount != 0) {
1969 		cv_wait(udev->default_cv + 1, &usb_ref_lock);
1970 	}
1971 	mtx_unlock(&usb_ref_lock);
1972 
1973 	destroy_dev_sched_cb(udev->default_dev, usb_cdev_cleanup,
1974 	    udev->default_dev->si_drv1);
1975 #endif
1976 
1977 	if (udev->flags.usb_mode == USB_MODE_DEVICE) {
1978 		/* stop receiving any control transfers (Device Side Mode) */
1979 		usbd_transfer_unsetup(udev->default_xfer, USB_DEFAULT_XFER_MAX);
1980 	}
1981 
1982 	/* the following will get the device unconfigured in software */
1983 	usb_unconfigure(udev, flag);
1984 
1985 	/* unsetup any leftover default USB transfers */
1986 	usbd_transfer_unsetup(udev->default_xfer, USB_DEFAULT_XFER_MAX);
1987 
1988 	/* template unsetup, if any */
1989 	(usb_temp_unsetup_p) (udev);
1990 
1991 	/*
1992 	 * Make sure that our clear-stall messages are not queued
1993 	 * anywhere:
1994 	 */
1995 	USB_BUS_LOCK(udev->bus);
1996 	usb_proc_mwait(&udev->bus->non_giant_callback_proc,
1997 	    &udev->cs_msg[0], &udev->cs_msg[1]);
1998 	USB_BUS_UNLOCK(udev->bus);
1999 
2000 	sx_destroy(udev->default_sx);
2001 	sx_destroy(udev->default_sx + 1);
2002 
2003 	cv_destroy(udev->default_cv);
2004 	cv_destroy(udev->default_cv + 1);
2005 
2006 	mtx_destroy(udev->default_mtx);
2007 #if USB_HAVE_UGEN
2008 	KASSERT(LIST_FIRST(&udev->pd_list) == NULL, ("leaked cdev entries"));
2009 #endif
2010 
2011 	/* free device */
2012 	free(udev->serial, M_USB);
2013 	free(udev->manufacturer, M_USB);
2014 	free(udev->product, M_USB);
2015 	free(udev, M_USB);
2016 }
2017 
2018 /*------------------------------------------------------------------------*
2019  *	usbd_get_iface
2020  *
2021  * This function is the safe way to get the USB interface structure
2022  * pointer by interface index.
2023  *
2024  * Return values:
2025  *   NULL: Interface not present.
2026  *   Else: Pointer to USB interface structure.
2027  *------------------------------------------------------------------------*/
2028 struct usb_interface *
2029 usbd_get_iface(struct usb_device *udev, uint8_t iface_index)
2030 {
2031 	struct usb_interface *iface = udev->ifaces + iface_index;
2032 
2033 	if (iface_index >= udev->ifaces_max)
2034 		return (NULL);
2035 	return (iface);
2036 }
2037 
2038 /*------------------------------------------------------------------------*
2039  *	usbd_find_descriptor
2040  *
2041  * This function will lookup the first descriptor that matches the
2042  * criteria given by the arguments "type" and "subtype". Descriptors
2043  * will only be searched within the interface having the index
2044  * "iface_index".  If the "id" argument points to an USB descriptor,
2045  * it will be skipped before the search is started. This allows
2046  * searching for multiple descriptors using the same criteria. Else
2047  * the search is started after the interface descriptor.
2048  *
2049  * Return values:
2050  *   NULL: End of descriptors
2051  *   Else: A descriptor matching the criteria
2052  *------------------------------------------------------------------------*/
2053 void   *
2054 usbd_find_descriptor(struct usb_device *udev, void *id, uint8_t iface_index,
2055     uint8_t type, uint8_t type_mask,
2056     uint8_t subtype, uint8_t subtype_mask)
2057 {
2058 	struct usb_descriptor *desc;
2059 	struct usb_config_descriptor *cd;
2060 	struct usb_interface *iface;
2061 
2062 	cd = usbd_get_config_descriptor(udev);
2063 	if (cd == NULL) {
2064 		return (NULL);
2065 	}
2066 	if (id == NULL) {
2067 		iface = usbd_get_iface(udev, iface_index);
2068 		if (iface == NULL) {
2069 			return (NULL);
2070 		}
2071 		id = usbd_get_interface_descriptor(iface);
2072 		if (id == NULL) {
2073 			return (NULL);
2074 		}
2075 	}
2076 	desc = (void *)id;
2077 
2078 	while ((desc = usb_desc_foreach(cd, desc))) {
2079 
2080 		if (desc->bDescriptorType == UDESC_INTERFACE) {
2081 			break;
2082 		}
2083 		if (((desc->bDescriptorType & type_mask) == type) &&
2084 		    ((desc->bDescriptorSubtype & subtype_mask) == subtype)) {
2085 			return (desc);
2086 		}
2087 	}
2088 	return (NULL);
2089 }
2090 
2091 /*------------------------------------------------------------------------*
2092  *	usb_devinfo
2093  *
2094  * This function will dump information from the device descriptor
2095  * belonging to the USB device pointed to by "udev", to the string
2096  * pointed to by "dst_ptr" having a maximum length of "dst_len" bytes
2097  * including the terminating zero.
2098  *------------------------------------------------------------------------*/
2099 void
2100 usb_devinfo(struct usb_device *udev, char *dst_ptr, uint16_t dst_len)
2101 {
2102 	struct usb_device_descriptor *udd = &udev->ddesc;
2103 	uint16_t bcdDevice;
2104 	uint16_t bcdUSB;
2105 
2106 	bcdUSB = UGETW(udd->bcdUSB);
2107 	bcdDevice = UGETW(udd->bcdDevice);
2108 
2109 	if (udd->bDeviceClass != 0xFF) {
2110 		snprintf(dst_ptr, dst_len, "%s %s, class %d/%d, rev %x.%02x/"
2111 		    "%x.%02x, addr %d",
2112 		    udev->manufacturer, udev->product,
2113 		    udd->bDeviceClass, udd->bDeviceSubClass,
2114 		    (bcdUSB >> 8), bcdUSB & 0xFF,
2115 		    (bcdDevice >> 8), bcdDevice & 0xFF,
2116 		    udev->address);
2117 	} else {
2118 		snprintf(dst_ptr, dst_len, "%s %s, rev %x.%02x/"
2119 		    "%x.%02x, addr %d",
2120 		    udev->manufacturer, udev->product,
2121 		    (bcdUSB >> 8), bcdUSB & 0xFF,
2122 		    (bcdDevice >> 8), bcdDevice & 0xFF,
2123 		    udev->address);
2124 	}
2125 }
2126 
2127 #ifdef USB_VERBOSE
2128 /*
2129  * Descriptions of of known vendors and devices ("products").
2130  */
2131 struct usb_knowndev {
2132 	uint16_t vendor;
2133 	uint16_t product;
2134 	uint32_t flags;
2135 	const char *vendorname;
2136 	const char *productname;
2137 };
2138 
2139 #define	USB_KNOWNDEV_NOPROD	0x01	/* match on vendor only */
2140 
2141 #include "usbdevs.h"
2142 #include "usbdevs_data.h"
2143 #endif					/* USB_VERBOSE */
2144 
2145 static void
2146 usbd_set_device_strings(struct usb_device *udev)
2147 {
2148 	struct usb_device_descriptor *udd = &udev->ddesc;
2149 #ifdef USB_VERBOSE
2150 	const struct usb_knowndev *kdp;
2151 #endif
2152 	char temp[64];
2153 	uint16_t vendor_id;
2154 	uint16_t product_id;
2155 
2156 	vendor_id = UGETW(udd->idVendor);
2157 	product_id = UGETW(udd->idProduct);
2158 
2159 	/* get serial number string */
2160 	bzero(temp, sizeof(temp));
2161 	usbd_req_get_string_any(udev, NULL, temp, sizeof(temp),
2162 	    udev->ddesc.iSerialNumber);
2163 	udev->serial = strdup(temp, M_USB);
2164 
2165 	/* get manufacturer string */
2166 	bzero(temp, sizeof(temp));
2167 	usbd_req_get_string_any(udev, NULL, temp, sizeof(temp),
2168 	    udev->ddesc.iManufacturer);
2169 	usb_trim_spaces(temp);
2170 	if (temp[0] != '\0')
2171 		udev->manufacturer = strdup(temp, M_USB);
2172 
2173 	/* get product string */
2174 	bzero(temp, sizeof(temp));
2175 	usbd_req_get_string_any(udev, NULL, temp, sizeof(temp),
2176 	    udev->ddesc.iProduct);
2177 	usb_trim_spaces(temp);
2178 	if (temp[0] != '\0')
2179 		udev->product = strdup(temp, M_USB);
2180 
2181 #ifdef USB_VERBOSE
2182 	if (udev->manufacturer == NULL || udev->product == NULL) {
2183 		for (kdp = usb_knowndevs; kdp->vendorname != NULL; kdp++) {
2184 			if (kdp->vendor == vendor_id &&
2185 			    (kdp->product == product_id ||
2186 			    (kdp->flags & USB_KNOWNDEV_NOPROD) != 0))
2187 				break;
2188 		}
2189 		if (kdp->vendorname != NULL) {
2190 			/* XXX should use pointer to knowndevs string */
2191 			if (udev->manufacturer == NULL) {
2192 				udev->manufacturer = strdup(kdp->vendorname,
2193 				    M_USB);
2194 			}
2195 			if (udev->product == NULL &&
2196 			    (kdp->flags & USB_KNOWNDEV_NOPROD) == 0) {
2197 				udev->product = strdup(kdp->productname,
2198 				    M_USB);
2199 			}
2200 		}
2201 	}
2202 #endif
2203 	/* Provide default strings if none were found */
2204 	if (udev->manufacturer == NULL) {
2205 		snprintf(temp, sizeof(temp), "vendor 0x%04x", vendor_id);
2206 		udev->manufacturer = strdup(temp, M_USB);
2207 	}
2208 	if (udev->product == NULL) {
2209 		snprintf(temp, sizeof(temp), "product 0x%04x", product_id);
2210 		udev->product = strdup(temp, M_USB);
2211 	}
2212 }
2213 
2214 /*
2215  * Returns:
2216  * See: USB_MODE_XXX
2217  */
2218 enum usb_hc_mode
2219 usbd_get_mode(struct usb_device *udev)
2220 {
2221 	return (udev->flags.usb_mode);
2222 }
2223 
2224 /*
2225  * Returns:
2226  * See: USB_SPEED_XXX
2227  */
2228 enum usb_dev_speed
2229 usbd_get_speed(struct usb_device *udev)
2230 {
2231 	return (udev->speed);
2232 }
2233 
2234 uint32_t
2235 usbd_get_isoc_fps(struct usb_device *udev)
2236 {
2237 	;				/* indent fix */
2238 	switch (udev->speed) {
2239 	case USB_SPEED_LOW:
2240 	case USB_SPEED_FULL:
2241 		return (1000);
2242 	default:
2243 		return (8000);
2244 	}
2245 }
2246 
2247 struct usb_device_descriptor *
2248 usbd_get_device_descriptor(struct usb_device *udev)
2249 {
2250 	if (udev == NULL)
2251 		return (NULL);		/* be NULL safe */
2252 	return (&udev->ddesc);
2253 }
2254 
2255 struct usb_config_descriptor *
2256 usbd_get_config_descriptor(struct usb_device *udev)
2257 {
2258 	if (udev == NULL)
2259 		return (NULL);		/* be NULL safe */
2260 	return (udev->cdesc);
2261 }
2262 
2263 /*------------------------------------------------------------------------*
2264  *	usb_test_quirk - test a device for a given quirk
2265  *
2266  * Return values:
2267  * 0: The USB device does not have the given quirk.
2268  * Else: The USB device has the given quirk.
2269  *------------------------------------------------------------------------*/
2270 uint8_t
2271 usb_test_quirk(const struct usb_attach_arg *uaa, uint16_t quirk)
2272 {
2273 	uint8_t found;
2274 
2275 	found = (usb_test_quirk_p) (&uaa->info, quirk);
2276 	return (found);
2277 }
2278 
2279 struct usb_interface_descriptor *
2280 usbd_get_interface_descriptor(struct usb_interface *iface)
2281 {
2282 	if (iface == NULL)
2283 		return (NULL);		/* be NULL safe */
2284 	return (iface->idesc);
2285 }
2286 
2287 uint8_t
2288 usbd_get_interface_altindex(struct usb_interface *iface)
2289 {
2290 	return (iface->alt_index);
2291 }
2292 
2293 uint8_t
2294 usbd_get_bus_index(struct usb_device *udev)
2295 {
2296 	return ((uint8_t)device_get_unit(udev->bus->bdev));
2297 }
2298 
2299 uint8_t
2300 usbd_get_device_index(struct usb_device *udev)
2301 {
2302 	return (udev->device_index);
2303 }
2304 
2305 #if USB_HAVE_UGEN
2306 /*------------------------------------------------------------------------*
2307  *	usb_notify_addq
2308  *
2309  * This function will generate events for dev.
2310  *------------------------------------------------------------------------*/
2311 static void
2312 usb_notify_addq(const char *type, struct usb_device *udev)
2313 {
2314 	char *data = NULL;
2315 	struct malloc_type *mt;
2316 
2317 	mtx_lock(&malloc_mtx);
2318 	mt = malloc_desc2type("bus");	/* XXX M_BUS */
2319 	mtx_unlock(&malloc_mtx);
2320 	if (mt == NULL)
2321 		return;
2322 
2323 	data = malloc(512, mt, M_NOWAIT);
2324 	if (data == NULL)
2325 		return;
2326 
2327 	/* String it all together. */
2328 	snprintf(data, 1024,
2329 	    "%s"
2330 	    "%s "
2331 	    "vendor=0x%04x "
2332 	    "product=0x%04x "
2333 	    "devclass=0x%02x "
2334 	    "devsubclass=0x%02x "
2335 	    "sernum=\"%s\" "
2336 	    "release=0x%04x "
2337 	    "at "
2338 	    "port=%u "
2339 	    "on "
2340 	    "%s\n",
2341 	    type,
2342 	    udev->ugen_name,
2343 	    UGETW(udev->ddesc.idVendor),
2344 	    UGETW(udev->ddesc.idProduct),
2345 	    udev->ddesc.bDeviceClass,
2346 	    udev->ddesc.bDeviceSubClass,
2347 	    udev->serial,
2348 	    UGETW(udev->ddesc.bcdDevice),
2349 	    udev->port_no,
2350 	    udev->parent_hub != NULL ?
2351 		udev->parent_hub->ugen_name :
2352 		device_get_nameunit(device_get_parent(udev->bus->bdev)));
2353 
2354 	devctl_queue_data(data);
2355 }
2356 
2357 /*------------------------------------------------------------------------*
2358  *	usb_fifo_free_wrap
2359  *
2360  * This function will free the FIFOs.
2361  *
2362  * Description of "flag" argument: If the USB_UNCFG_FLAG_FREE_EP0 flag
2363  * is set and "iface_index" is set to "USB_IFACE_INDEX_ANY", we free
2364  * all FIFOs. If the USB_UNCFG_FLAG_FREE_EP0 flag is not set and
2365  * "iface_index" is set to "USB_IFACE_INDEX_ANY", we free all non
2366  * control endpoint FIFOs. If "iface_index" is not set to
2367  * "USB_IFACE_INDEX_ANY" the flag has no effect.
2368  *------------------------------------------------------------------------*/
2369 static void
2370 usb_fifo_free_wrap(struct usb_device *udev,
2371     uint8_t iface_index, uint8_t flag)
2372 {
2373 	struct usb_fifo *f;
2374 	uint16_t i;
2375 
2376 	/*
2377 	 * Free any USB FIFOs on the given interface:
2378 	 */
2379 	for (i = 0; i != USB_FIFO_MAX; i++) {
2380 		f = udev->fifo[i];
2381 		if (f == NULL) {
2382 			continue;
2383 		}
2384 		/* Check if the interface index matches */
2385 		if (iface_index == f->iface_index) {
2386 			if (f->methods != &usb_ugen_methods) {
2387 				/*
2388 				 * Don't free any non-generic FIFOs in
2389 				 * this case.
2390 				 */
2391 				continue;
2392 			}
2393 			if ((f->dev_ep_index == 0) &&
2394 			    (f->fs_xfer == NULL)) {
2395 				/* no need to free this FIFO */
2396 				continue;
2397 			}
2398 		} else if (iface_index == USB_IFACE_INDEX_ANY) {
2399 			if ((f->methods == &usb_ugen_methods) &&
2400 			    (f->dev_ep_index == 0) &&
2401 			    (!(flag & USB_UNCFG_FLAG_FREE_EP0)) &&
2402 			    (f->fs_xfer == NULL)) {
2403 				/* no need to free this FIFO */
2404 				continue;
2405 			}
2406 		} else {
2407 			/* no need to free this FIFO */
2408 			continue;
2409 		}
2410 		/* free this FIFO */
2411 		usb_fifo_free(f);
2412 	}
2413 }
2414 #endif
2415 
2416 /*------------------------------------------------------------------------*
2417  *	usb_peer_can_wakeup
2418  *
2419  * Return values:
2420  * 0: Peer cannot do resume signalling.
2421  * Else: Peer can do resume signalling.
2422  *------------------------------------------------------------------------*/
2423 uint8_t
2424 usb_peer_can_wakeup(struct usb_device *udev)
2425 {
2426 	const struct usb_config_descriptor *cdp;
2427 
2428 	cdp = udev->cdesc;
2429 	if ((cdp != NULL) && (udev->flags.usb_mode == USB_MODE_HOST)) {
2430 		return (cdp->bmAttributes & UC_REMOTE_WAKEUP);
2431 	}
2432 	return (0);			/* not supported */
2433 }
2434 
2435 void
2436 usb_set_device_state(struct usb_device *udev, enum usb_dev_state state)
2437 {
2438 
2439 	KASSERT(state < USB_STATE_MAX, ("invalid udev state"));
2440 
2441 	DPRINTF("udev %p state %s -> %s\n", udev,
2442 	    usb_statestr(udev->state), usb_statestr(state));
2443 	udev->state = state;
2444 }
2445 
2446 uint8_t
2447 usbd_device_attached(struct usb_device *udev)
2448 {
2449 	return (udev->state > USB_STATE_DETACHED);
2450 }
2451