1 /*
2 *
3 * Most of this source has been derived from the Linux USB
4 * project:
5 * (C) Copyright Linus Torvalds 1999
6 * (C) Copyright Johannes Erdfelt 1999-2001
7 * (C) Copyright Andreas Gal 1999
8 * (C) Copyright Gregory P. Smith 1999
9 * (C) Copyright Deti Fliegl 1999 (new USB architecture)
10 * (C) Copyright Randy Dunlap 2000
11 * (C) Copyright David Brownell 2000 (kernel hotplug, usb_device_id)
12 * (C) Copyright Yggdrasil Computing, Inc. 2000
13 * (usb_device_id matching changes by Adam J. Richter)
14 *
15 * Adapted for U-Boot:
16 * (C) Copyright 2001 Denis Peter, MPL AG Switzerland
17 *
18 * See file CREDITS for list of people who contributed to this
19 * project.
20 *
21 * This program is free software; you can redistribute it and/or
22 * modify it under the terms of the GNU General Public License as
23 * published by the Free Software Foundation; either version 2 of
24 * the License, or (at your option) any later version.
25 *
26 * This program is distributed in the hope that it will be useful,
27 * but WITHOUT ANY WARRANTY; without even the implied warranty of
28 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
29 * GNU General Public License for more details.
30 *
31 * You should have received a copy of the GNU General Public License
32 * along with this program; if not, write to the Free Software
33 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
34 * MA 02111-1307 USA
35 *
36 */
37
38 /*
39 * How it works:
40 *
41 * Since this is a bootloader, the devices will not be automatic
42 * (re)configured on hotplug, but after a restart of the USB the
43 * device should work.
44 *
45 * For each transfer (except "Interrupt") we wait for completion.
46 */
47 #include <common.h>
48 #include <command.h>
49 #include <asm/processor.h>
50 #include <linux/ctype.h>
51 #include <asm/byteorder.h>
52
53 #include <usb.h>
54 #ifdef CONFIG_4xx
55 #include <asm/4xx_pci.h>
56 #endif
57
58 #ifdef CONFIG_SAM460EX
59 #include <asm/gpio.h>
60 #include <asm/io.h>
61 #include <asm/4xx_pcie.h>
62
63 DECLARE_GLOBAL_DATA_PTR;
64 #endif
65
66 #undef USB_DEBUG
67
68 #ifdef USB_DEBUG
69 #define USB_PRINTF(fmt, args...) printf(fmt , ##args)
70 #else
71 #define USB_PRINTF(fmt, args...)
72 #endif
73
74 #define USB_BUFSIZ 512
75
76 static struct usb_device usb_dev[USB_MAX_DEVICE];
77 static int dev_index;
78 static int running;
79 static int asynch_allowed;
80 static struct devrequest setup_packet;
81
82 char usb_started; /* flag for the started/stopped USB status */
83
84 /**********************************************************************
85 * some forward declerations...
86 */
87 void usb_scan_devices(void);
88
89 int usb_hub_probe(struct usb_device *dev, int ifnum);
90 void usb_hub_reset(void);
91 static int hub_port_reset(struct usb_device *dev, int port,
92 unsigned short *portstat);
93
94 /***********************************************************************
95 * wait_ms
96 */
97
wait_ms(unsigned long ms)98 inline void wait_ms(unsigned long ms)
99 {
100 while (ms-- > 0)
101 udelay(1000);
102 }
103
104 /***************************************************************************
105 * Init USB Device
106 */
107
usb_init(void)108 int usb_init(void)
109 {
110 int result;
111
112 running = 0;
113 dev_index = 0;
114 asynch_allowed = 1;
115 usb_hub_reset();
116 /* init low_level USB */
117 printf("USB: ");
118 result = usb_lowlevel_init();
119 /* if lowlevel init is OK, scan the bus for devices
120 * i.e. search HUBs and configure them */
121 if (result == 0) {
122 printf("scanning bus for devices... ");
123 running = 1;
124 usb_scan_devices();
125 usb_started = 1;
126 return 0;
127 } else {
128 printf("Error, couldn't init Lowlevel part\n");
129 usb_started = 0;
130 return -1;
131 }
132 }
133
134 /******************************************************************************
135 * Stop USB this stops the LowLevel Part and deregisters USB devices.
136 */
usb_stop(void)137 int usb_stop(void)
138 {
139 int res = 0;
140
141 if (usb_started) {
142 asynch_allowed = 1;
143 usb_started = 0;
144 usb_hub_reset();
145 res = usb_lowlevel_stop();
146 }
147 return res;
148 }
149
150 /*
151 * disables the asynch behaviour of the control message. This is used for data
152 * transfers that uses the exclusiv access to the control and bulk messages.
153 */
usb_disable_asynch(int disable)154 void usb_disable_asynch(int disable)
155 {
156 asynch_allowed = !disable;
157 }
158
159
160 /*-------------------------------------------------------------------
161 * Message wrappers.
162 *
163 */
164
165 /*
166 * submits an Interrupt Message
167 */
usb_submit_int_msg(struct usb_device * dev,unsigned long pipe,void * buffer,int transfer_len,int interval)168 int usb_submit_int_msg(struct usb_device *dev, unsigned long pipe,
169 void *buffer, int transfer_len, int interval)
170 {
171 return submit_int_msg(dev, pipe, buffer, transfer_len, interval);
172 }
173
174 /*
175 * submits a control message and waits for comletion (at least timeout * 1ms)
176 * If timeout is 0, we don't wait for completion (used as example to set and
177 * clear keyboards LEDs). For data transfers, (storage transfers) we don't
178 * allow control messages with 0 timeout, by previousely resetting the flag
179 * asynch_allowed (usb_disable_asynch(1)).
180 * returns the transfered length if OK or -1 if error. The transfered length
181 * and the current status are stored in the dev->act_len and dev->status.
182 */
usb_control_msg(struct usb_device * dev,unsigned int pipe,unsigned char request,unsigned char requesttype,unsigned short value,unsigned short index,void * data,unsigned short size,int timeout)183 int usb_control_msg(struct usb_device *dev, unsigned int pipe,
184 unsigned char request, unsigned char requesttype,
185 unsigned short value, unsigned short index,
186 void *data, unsigned short size, int timeout)
187 {
188 if ((timeout == 0) && (!asynch_allowed)) {
189 /* request for a asynch control pipe is not allowed */
190 return -1;
191 }
192
193 /* set setup command */
194 setup_packet.requesttype = requesttype;
195 setup_packet.request = request;
196 setup_packet.value = cpu_to_le16(value);
197 setup_packet.index = cpu_to_le16(index);
198 setup_packet.length = cpu_to_le16(size);
199 USB_PRINTF("usb_control_msg: request: 0x%X, requesttype: 0x%X, " \
200 "value 0x%X index 0x%X length 0x%X\n",
201 request, requesttype, value, index, size);
202 dev->status = USB_ST_NOT_PROC; /*not yet processed */
203
204 submit_control_msg(dev, pipe, data, size, &setup_packet);
205 if (timeout == 0)
206 return (int)size;
207
208 /*
209 * Wait for status to update until timeout expires, USB driver
210 * interrupt handler may set the status when the USB operation has
211 * been completed.
212 */
213 while (timeout--) {
214 if (!((volatile unsigned long)dev->status & USB_ST_NOT_PROC))
215 break;
216 wait_ms(1);
217 }
218 if (dev->status)
219 return -1;
220
221 return dev->act_len;
222
223 }
224
225 /*-------------------------------------------------------------------
226 * submits bulk message, and waits for completion. returns 0 if Ok or
227 * -1 if Error.
228 * synchronous behavior
229 */
usb_bulk_msg(struct usb_device * dev,unsigned int pipe,void * data,int len,int * actual_length,int timeout)230 int usb_bulk_msg(struct usb_device *dev, unsigned int pipe,
231 void *data, int len, int *actual_length, int timeout)
232 {
233 if (len < 0)
234 return -1;
235 dev->status = USB_ST_NOT_PROC; /*not yet processed */
236 submit_bulk_msg(dev, pipe, data, len);
237 while (timeout--) {
238 if (!((volatile unsigned long)dev->status & USB_ST_NOT_PROC))
239 break;
240 wait_ms(1);
241 }
242 *actual_length = dev->act_len;
243 if (dev->status == 0)
244 return 0;
245 else
246 return -1;
247 }
248
249
250 /*-------------------------------------------------------------------
251 * Max Packet stuff
252 */
253
254 /*
255 * returns the max packet size, depending on the pipe direction and
256 * the configurations values
257 */
usb_maxpacket(struct usb_device * dev,unsigned long pipe)258 int usb_maxpacket(struct usb_device *dev, unsigned long pipe)
259 {
260 /* direction is out -> use emaxpacket out */
261 if ((pipe & USB_DIR_IN) == 0)
262 return dev->epmaxpacketout[((pipe>>15) & 0xf)];
263 else
264 return dev->epmaxpacketin[((pipe>>15) & 0xf)];
265 }
266
267 /* The routine usb_set_maxpacket_ep() is extracted from the loop of routine
268 * usb_set_maxpacket(), because the optimizer of GCC 4.x chokes on this routine
269 * when it is inlined in 1 single routine. What happens is that the register r3
270 * is used as loop-count 'i', but gets overwritten later on.
271 * This is clearly a compiler bug, but it is easier to workaround it here than
272 * to update the compiler (Occurs with at least several GCC 4.{1,2},x
273 * CodeSourcery compilers like e.g. 2007q3, 2008q1, 2008q3 lite editions on ARM)
274 */
275 static void __attribute__((noinline))
usb_set_maxpacket_ep(struct usb_device * dev,struct usb_endpoint_descriptor * ep)276 usb_set_maxpacket_ep(struct usb_device *dev, struct usb_endpoint_descriptor *ep)
277 {
278 int b;
279
280 b = ep->bEndpointAddress & USB_ENDPOINT_NUMBER_MASK;
281
282 if ((ep->bmAttributes & USB_ENDPOINT_XFERTYPE_MASK) ==
283 USB_ENDPOINT_XFER_CONTROL) {
284 /* Control => bidirectional */
285 dev->epmaxpacketout[b] = ep->wMaxPacketSize;
286 dev->epmaxpacketin[b] = ep->wMaxPacketSize;
287 USB_PRINTF("##Control EP epmaxpacketout/in[%d] = %d\n",
288 b, dev->epmaxpacketin[b]);
289 } else {
290 if ((ep->bEndpointAddress & 0x80) == 0) {
291 /* OUT Endpoint */
292 if (ep->wMaxPacketSize > dev->epmaxpacketout[b]) {
293 dev->epmaxpacketout[b] = ep->wMaxPacketSize;
294 USB_PRINTF("##EP epmaxpacketout[%d] = %d\n",
295 b, dev->epmaxpacketout[b]);
296 }
297 } else {
298 /* IN Endpoint */
299 if (ep->wMaxPacketSize > dev->epmaxpacketin[b]) {
300 dev->epmaxpacketin[b] = ep->wMaxPacketSize;
301 USB_PRINTF("##EP epmaxpacketin[%d] = %d\n",
302 b, dev->epmaxpacketin[b]);
303 }
304 } /* if out */
305 } /* if control */
306 }
307
308 /*
309 * set the max packed value of all endpoints in the given configuration
310 */
usb_set_maxpacket(struct usb_device * dev)311 int usb_set_maxpacket(struct usb_device *dev)
312 {
313 int i, ii;
314
315 for (i = 0; i < dev->config.desc.bNumInterfaces; i++)
316 for (ii = 0; ii < dev->config.if_desc[i].desc.bNumEndpoints; ii++)
317 usb_set_maxpacket_ep(dev,
318 &dev->config.if_desc[i].ep_desc[ii]);
319
320 return 0;
321 }
322
323 /*******************************************************************************
324 * Parse the config, located in buffer, and fills the dev->config structure.
325 * Note that all little/big endian swapping are done automatically.
326 */
usb_parse_config(struct usb_device * dev,unsigned char * buffer,int cfgno)327 int usb_parse_config(struct usb_device *dev, unsigned char *buffer, int cfgno)
328 {
329 struct usb_descriptor_header *head;
330 int index, ifno, epno, curr_if_num;
331 int i;
332 unsigned char *ch;
333
334 ifno = -1;
335 epno = -1;
336 curr_if_num = -1;
337
338 dev->configno = cfgno;
339 head = (struct usb_descriptor_header *) &buffer[0];
340 if (head->bDescriptorType != USB_DT_CONFIG) {
341 printf(" ERROR: NOT USB_CONFIG_DESC %x\n",
342 head->bDescriptorType);
343 return -1;
344 }
345 memcpy(&dev->config, buffer, buffer[0]);
346 le16_to_cpus(&(dev->config.desc.wTotalLength));
347 dev->config.no_of_if = 0;
348
349 index = dev->config.desc.bLength;
350 /* Ok the first entry must be a configuration entry,
351 * now process the others */
352 head = (struct usb_descriptor_header *) &buffer[index];
353 while (index + 1 < dev->config.desc.wTotalLength) {
354 switch (head->bDescriptorType) {
355 case USB_DT_INTERFACE:
356 if (((struct usb_interface_descriptor *) \
357 &buffer[index])->bInterfaceNumber != curr_if_num) {
358 /* this is a new interface, copy new desc */
359 ifno = dev->config.no_of_if;
360 dev->config.no_of_if++;
361 memcpy(&dev->config.if_desc[ifno],
362 &buffer[index], buffer[index]);
363 dev->config.if_desc[ifno].no_of_ep = 0;
364 dev->config.if_desc[ifno].num_altsetting = 1;
365 curr_if_num =
366 dev->config.if_desc[ifno].desc.bInterfaceNumber;
367 } else {
368 /* found alternate setting for the interface */
369 dev->config.if_desc[ifno].num_altsetting++;
370 }
371 break;
372 case USB_DT_ENDPOINT:
373 epno = dev->config.if_desc[ifno].no_of_ep;
374 /* found an endpoint */
375 dev->config.if_desc[ifno].no_of_ep++;
376 memcpy(&dev->config.if_desc[ifno].ep_desc[epno],
377 &buffer[index], buffer[index]);
378 le16_to_cpus(&(dev->config.if_desc[ifno].ep_desc[epno].\
379 wMaxPacketSize));
380 USB_PRINTF("if %d, ep %d\n", ifno, epno);
381 break;
382 default:
383 if (head->bLength == 0)
384 return 1;
385
386 USB_PRINTF("unknown Description Type : %x\n",
387 head->bDescriptorType);
388
389 {
390 ch = (unsigned char *)head;
391 for (i = 0; i < head->bLength; i++)
392 USB_PRINTF("%02X ", *ch++);
393 USB_PRINTF("\n\n\n");
394 }
395 break;
396 }
397 index += head->bLength;
398 head = (struct usb_descriptor_header *)&buffer[index];
399 }
400 return 1;
401 }
402
403 /***********************************************************************
404 * Clears an endpoint
405 * endp: endpoint number in bits 0-3;
406 * direction flag in bit 7 (1 = IN, 0 = OUT)
407 */
usb_clear_halt(struct usb_device * dev,int pipe)408 int usb_clear_halt(struct usb_device *dev, int pipe)
409 {
410 int result;
411 int endp = usb_pipeendpoint(pipe)|(usb_pipein(pipe)<<7);
412
413 result = usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
414 USB_REQ_CLEAR_FEATURE, USB_RECIP_ENDPOINT, 0,
415 endp, NULL, 0, USB_CNTL_TIMEOUT * 3);
416
417 /* don't clear if failed */
418 if (result < 0)
419 return result;
420
421 /*
422 * NOTE: we do not get status and verify reset was successful
423 * as some devices are reported to lock up upon this check..
424 */
425
426 usb_endpoint_running(dev, usb_pipeendpoint(pipe), usb_pipeout(pipe));
427
428 /* toggle is reset on clear */
429 usb_settoggle(dev, usb_pipeendpoint(pipe), usb_pipeout(pipe), 0);
430 return 0;
431 }
432
433
434 /**********************************************************************
435 * get_descriptor type
436 */
usb_get_descriptor(struct usb_device * dev,unsigned char type,unsigned char index,void * buf,int size)437 int usb_get_descriptor(struct usb_device *dev, unsigned char type,
438 unsigned char index, void *buf, int size)
439 {
440 int res;
441 res = usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
442 USB_REQ_GET_DESCRIPTOR, USB_DIR_IN,
443 (type << 8) + index, 0,
444 buf, size, USB_CNTL_TIMEOUT);
445 return res;
446 }
447
448 /**********************************************************************
449 * gets configuration cfgno and store it in the buffer
450 */
usb_get_configuration_no(struct usb_device * dev,unsigned char * buffer,int cfgno)451 int usb_get_configuration_no(struct usb_device *dev,
452 unsigned char *buffer, int cfgno)
453 {
454 int result;
455 unsigned int tmp;
456 struct usb_configuration_descriptor *config;
457
458 config = (struct usb_configuration_descriptor *)&buffer[0];
459 result = usb_get_descriptor(dev, USB_DT_CONFIG, cfgno, buffer, 9);
460 if (result < 9) {
461 if (result < 0)
462 printf("unable to get descriptor, error %lX\n",
463 dev->status);
464 else
465 printf("config descriptor too short " \
466 "(expected %i, got %i)\n", 9, result);
467 return -1;
468 }
469 tmp = le16_to_cpu(config->wTotalLength);
470
471 if (tmp > USB_BUFSIZ) {
472 USB_PRINTF("usb_get_configuration_no: failed to get " \
473 "descriptor - too long: %d\n", tmp);
474 return -1;
475 }
476
477 result = usb_get_descriptor(dev, USB_DT_CONFIG, cfgno, buffer, tmp);
478 USB_PRINTF("get_conf_no %d Result %d, wLength %d\n",
479 cfgno, result, tmp);
480 return result;
481 }
482
483 /********************************************************************
484 * set address of a device to the value in dev->devnum.
485 * This can only be done by addressing the device via the default address (0)
486 */
usb_set_address(struct usb_device * dev)487 int usb_set_address(struct usb_device *dev)
488 {
489 int res;
490
491 USB_PRINTF("set address %d\n", dev->devnum);
492 res = usb_control_msg(dev, usb_snddefctrl(dev),
493 USB_REQ_SET_ADDRESS, 0,
494 (dev->devnum), 0,
495 NULL, 0, USB_CNTL_TIMEOUT);
496 return res;
497 }
498
499 /********************************************************************
500 * set interface number to interface
501 */
usb_set_interface(struct usb_device * dev,int interface,int alternate)502 int usb_set_interface(struct usb_device *dev, int interface, int alternate)
503 {
504 struct usb_interface *if_face = NULL;
505 int ret, i;
506
507 for (i = 0; i < dev->config.desc.bNumInterfaces; i++) {
508 if (dev->config.if_desc[i].desc.bInterfaceNumber == interface) {
509 if_face = &dev->config.if_desc[i];
510 break;
511 }
512 }
513 if (!if_face) {
514 printf("selecting invalid interface %d", interface);
515 return -1;
516 }
517 /*
518 * We should return now for devices with only one alternate setting.
519 * According to 9.4.10 of the Universal Serial Bus Specification
520 * Revision 2.0 such devices can return with a STALL. This results in
521 * some USB sticks timeouting during initialization and then being
522 * unusable in U-Boot.
523 */
524 if (if_face->num_altsetting == 1)
525 return 0;
526
527 ret = usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
528 USB_REQ_SET_INTERFACE, USB_RECIP_INTERFACE,
529 alternate, interface, NULL, 0,
530 USB_CNTL_TIMEOUT * 5);
531 if (ret < 0)
532 return ret;
533
534 return 0;
535 }
536
537 /********************************************************************
538 * set configuration number to configuration
539 */
usb_set_configuration(struct usb_device * dev,int configuration)540 int usb_set_configuration(struct usb_device *dev, int configuration)
541 {
542 int res;
543 USB_PRINTF("set configuration %d\n", configuration);
544 /* set setup command */
545 res = usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
546 USB_REQ_SET_CONFIGURATION, 0,
547 configuration, 0,
548 NULL, 0, USB_CNTL_TIMEOUT);
549 if (res == 0) {
550 dev->toggle[0] = 0;
551 dev->toggle[1] = 0;
552 return 0;
553 } else
554 return -1;
555 }
556
557 /********************************************************************
558 * set protocol to protocol
559 */
usb_set_protocol(struct usb_device * dev,int ifnum,int protocol)560 int usb_set_protocol(struct usb_device *dev, int ifnum, int protocol)
561 {
562 return usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
563 USB_REQ_SET_PROTOCOL, USB_TYPE_CLASS | USB_RECIP_INTERFACE,
564 protocol, ifnum, NULL, 0, USB_CNTL_TIMEOUT);
565 }
566
567 /********************************************************************
568 * set idle
569 */
usb_set_idle(struct usb_device * dev,int ifnum,int duration,int report_id)570 int usb_set_idle(struct usb_device *dev, int ifnum, int duration, int report_id)
571 {
572 return usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
573 USB_REQ_SET_IDLE, USB_TYPE_CLASS | USB_RECIP_INTERFACE,
574 (duration << 8) | report_id, ifnum, NULL, 0, USB_CNTL_TIMEOUT);
575 }
576
577 /********************************************************************
578 * get report
579 */
usb_get_report(struct usb_device * dev,int ifnum,unsigned char type,unsigned char id,void * buf,int size)580 int usb_get_report(struct usb_device *dev, int ifnum, unsigned char type,
581 unsigned char id, void *buf, int size)
582 {
583 return usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
584 USB_REQ_GET_REPORT,
585 USB_DIR_IN | USB_TYPE_CLASS | USB_RECIP_INTERFACE,
586 (type << 8) + id, ifnum, buf, size, USB_CNTL_TIMEOUT);
587 }
588
589 /********************************************************************
590 * get class descriptor
591 */
usb_get_class_descriptor(struct usb_device * dev,int ifnum,unsigned char type,unsigned char id,void * buf,int size)592 int usb_get_class_descriptor(struct usb_device *dev, int ifnum,
593 unsigned char type, unsigned char id, void *buf, int size)
594 {
595 return usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
596 USB_REQ_GET_DESCRIPTOR, USB_RECIP_INTERFACE | USB_DIR_IN,
597 (type << 8) + id, ifnum, buf, size, USB_CNTL_TIMEOUT);
598 }
599
600 /********************************************************************
601 * get string index in buffer
602 */
usb_get_string(struct usb_device * dev,unsigned short langid,unsigned char index,void * buf,int size)603 int usb_get_string(struct usb_device *dev, unsigned short langid,
604 unsigned char index, void *buf, int size)
605 {
606 int i;
607 int result;
608
609 for (i = 0; i < 3; ++i) {
610 /* some devices are flaky */
611 result = usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
612 USB_REQ_GET_DESCRIPTOR, USB_DIR_IN,
613 (USB_DT_STRING << 8) + index, langid, buf, size,
614 USB_CNTL_TIMEOUT);
615
616 if (result > 0)
617 break;
618 }
619
620 return result;
621 }
622
623
usb_try_string_workarounds(unsigned char * buf,int * length)624 static void usb_try_string_workarounds(unsigned char *buf, int *length)
625 {
626 int newlength, oldlength = *length;
627
628 for (newlength = 2; newlength + 1 < oldlength; newlength += 2)
629 if (!isprint(buf[newlength]) || buf[newlength + 1])
630 break;
631
632 if (newlength > 2) {
633 buf[0] = newlength;
634 *length = newlength;
635 }
636 }
637
638
usb_string_sub(struct usb_device * dev,unsigned int langid,unsigned int index,unsigned char * buf)639 static int usb_string_sub(struct usb_device *dev, unsigned int langid,
640 unsigned int index, unsigned char *buf)
641 {
642 int rc;
643
644 /* Try to read the string descriptor by asking for the maximum
645 * possible number of bytes */
646 rc = usb_get_string(dev, langid, index, buf, 255);
647
648 /* If that failed try to read the descriptor length, then
649 * ask for just that many bytes */
650 if (rc < 2) {
651 rc = usb_get_string(dev, langid, index, buf, 2);
652 if (rc == 2)
653 rc = usb_get_string(dev, langid, index, buf, buf[0]);
654 }
655
656 if (rc >= 2) {
657 if (!buf[0] && !buf[1])
658 usb_try_string_workarounds(buf, &rc);
659
660 /* There might be extra junk at the end of the descriptor */
661 if (buf[0] < rc)
662 rc = buf[0];
663
664 rc = rc - (rc & 1); /* force a multiple of two */
665 }
666
667 if (rc < 2)
668 rc = -1;
669
670 return rc;
671 }
672
673
674 /********************************************************************
675 * usb_string:
676 * Get string index and translate it to ascii.
677 * returns string length (> 0) or error (< 0)
678 */
usb_string(struct usb_device * dev,int index,char * buf,size_t size)679 int usb_string(struct usb_device *dev, int index, char *buf, size_t size)
680 {
681 unsigned char mybuf[USB_BUFSIZ];
682 unsigned char *tbuf;
683 int err;
684 unsigned int u, idx;
685
686 if (size <= 0 || !buf || !index)
687 return -1;
688 buf[0] = 0;
689 tbuf = &mybuf[0];
690
691 /* get langid for strings if it's not yet known */
692 if (!dev->have_langid) {
693 err = usb_string_sub(dev, 0, 0, tbuf);
694 if (err < 0) {
695 USB_PRINTF("error getting string descriptor 0 " \
696 "(error=%lx)\n", dev->status);
697 return -1;
698 } else if (tbuf[0] < 4) {
699 USB_PRINTF("string descriptor 0 too short\n");
700 return -1;
701 } else {
702 dev->have_langid = -1;
703 dev->string_langid = tbuf[2] | (tbuf[3] << 8);
704 /* always use the first langid listed */
705 USB_PRINTF("USB device number %d default " \
706 "language ID 0x%x\n",
707 dev->devnum, dev->string_langid);
708 }
709 }
710
711 err = usb_string_sub(dev, dev->string_langid, index, tbuf);
712 if (err < 0)
713 return err;
714
715 size--; /* leave room for trailing NULL char in output buffer */
716 for (idx = 0, u = 2; u < err; u += 2) {
717 if (idx >= size)
718 break;
719 if (tbuf[u+1]) /* high byte */
720 buf[idx++] = '?'; /* non-ASCII character */
721 else
722 buf[idx++] = tbuf[u];
723 }
724 buf[idx] = 0;
725 err = idx;
726 return err;
727 }
728
729
730 /********************************************************************
731 * USB device handling:
732 * the USB device are static allocated [USB_MAX_DEVICE].
733 */
734
735
736 /* returns a pointer to the device with the index [index].
737 * if the device is not assigned (dev->devnum==-1) returns NULL
738 */
usb_get_dev_index(int index)739 struct usb_device *usb_get_dev_index(int index)
740 {
741 if (usb_dev[index].devnum == -1)
742 return NULL;
743 else
744 return &usb_dev[index];
745 }
746
747
748 /* returns a pointer of a new device structure or NULL, if
749 * no device struct is available
750 */
usb_alloc_new_device(void)751 struct usb_device *usb_alloc_new_device(void)
752 {
753 int i;
754 USB_PRINTF("New Device %d\n", dev_index);
755 if (dev_index == USB_MAX_DEVICE) {
756 printf("ERROR, too many USB Devices, max=%d\n", USB_MAX_DEVICE);
757 return NULL;
758 }
759 /* default Address is 0, real addresses start with 1 */
760 usb_dev[dev_index].devnum = dev_index + 1;
761 usb_dev[dev_index].maxchild = 0;
762 for (i = 0; i < USB_MAXCHILDREN; i++)
763 usb_dev[dev_index].children[i] = NULL;
764 usb_dev[dev_index].parent = NULL;
765 dev_index++;
766 return &usb_dev[dev_index - 1];
767 }
768
769
770 /*
771 * By the time we get here, the device has gotten a new device ID
772 * and is in the default state. We need to identify the thing and
773 * get the ball rolling..
774 *
775 * Returns 0 for success, != 0 for error.
776 */
usb_new_device(struct usb_device * dev)777 int usb_new_device(struct usb_device *dev)
778 {
779 int addr, err;
780 int tmp;
781 unsigned char tmpbuf[USB_BUFSIZ];
782
783 /* We still haven't set the Address yet */
784 addr = dev->devnum;
785 dev->devnum = 0;
786
787 #ifdef CONFIG_LEGACY_USB_INIT_SEQ
788 /* this is the old and known way of initializing devices, it is
789 * different than what Windows and Linux are doing. Windows and Linux
790 * both retrieve 64 bytes while reading the device descriptor
791 * Several USB stick devices report ERR: CTL_TIMEOUT, caused by an
792 * invalid header while reading 8 bytes as device descriptor. */
793 dev->descriptor.bMaxPacketSize0 = 8; /* Start off at 8 bytes */
794 dev->maxpacketsize = PACKET_SIZE_8;
795 dev->epmaxpacketin[0] = 8;
796 dev->epmaxpacketout[0] = 8;
797
798 err = usb_get_descriptor(dev, USB_DT_DEVICE, 0, &dev->descriptor, 8);
799 if (err < 8) {
800 printf("\n USB device not responding, " \
801 "giving up (status=%lX)\n", dev->status);
802 return 1;
803 }
804 #else
805 /* This is a Windows scheme of initialization sequence, with double
806 * reset of the device (Linux uses the same sequence)
807 * Some equipment is said to work only with such init sequence; this
808 * patch is based on the work by Alan Stern:
809 * http://sourceforge.net/mailarchive/forum.php?
810 * thread_id=5729457&forum_id=5398
811 */
812 struct usb_device_descriptor *desc;
813 int port = -1;
814 struct usb_device *parent = dev->parent;
815 unsigned short portstatus;
816
817 /* send 64-byte GET-DEVICE-DESCRIPTOR request. Since the descriptor is
818 * only 18 bytes long, this will terminate with a short packet. But if
819 * the maxpacket size is 8 or 16 the device may be waiting to transmit
820 * some more, or keeps on retransmitting the 8 byte header. */
821
822 desc = (struct usb_device_descriptor *)tmpbuf;
823 dev->descriptor.bMaxPacketSize0 = 64; /* Start off at 64 bytes */
824 /* Default to 64 byte max packet size */
825 dev->maxpacketsize = PACKET_SIZE_64;
826 dev->epmaxpacketin[0] = 64;
827 dev->epmaxpacketout[0] = 64;
828
829 err = usb_get_descriptor(dev, USB_DT_DEVICE, 0, desc, 64);
830 if (err < 0) {
831 USB_PRINTF("usb_new_device: usb_get_descriptor() failed\n");
832 return 1;
833 }
834
835 dev->descriptor.bMaxPacketSize0 = desc->bMaxPacketSize0;
836
837 /* find the port number we're at */
838 if (parent) {
839 int j;
840
841 for (j = 0; j < parent->maxchild; j++) {
842 if (parent->children[j] == dev) {
843 port = j;
844 break;
845 }
846 }
847 if (port < 0) {
848 printf("usb_new_device:cannot locate device's port.\n");
849 return 1;
850 }
851
852 /* reset the port for the second time */
853 err = hub_port_reset(dev->parent, port, &portstatus);
854 if (err < 0) {
855 printf("\n Couldn't reset port %i\n", port);
856 return 1;
857 }
858 }
859 #endif
860
861 dev->epmaxpacketin[0] = dev->descriptor.bMaxPacketSize0;
862 dev->epmaxpacketout[0] = dev->descriptor.bMaxPacketSize0;
863 switch (dev->descriptor.bMaxPacketSize0) {
864 case 8:
865 dev->maxpacketsize = PACKET_SIZE_8;
866 break;
867 case 16:
868 dev->maxpacketsize = PACKET_SIZE_16;
869 break;
870 case 32:
871 dev->maxpacketsize = PACKET_SIZE_32;
872 break;
873 case 64:
874 dev->maxpacketsize = PACKET_SIZE_64;
875 break;
876 }
877 dev->devnum = addr;
878
879 err = usb_set_address(dev); /* set address */
880
881 if (err < 0) {
882 printf("\n USB device not accepting new address " \
883 "(error=%lX)\n", dev->status);
884 return 1;
885 }
886
887 wait_ms(10); /* Let the SET_ADDRESS settle */
888
889 tmp = sizeof(dev->descriptor);
890
891 err = usb_get_descriptor(dev, USB_DT_DEVICE, 0,
892 &dev->descriptor, sizeof(dev->descriptor));
893 if (err < tmp) {
894 if (err < 0)
895 printf("unable to get device descriptor (error=%d)\n",
896 err);
897 else
898 printf("USB device descriptor short read " \
899 "(expected %i, got %i)\n", tmp, err);
900 return 1;
901 }
902 /* correct le values */
903 le16_to_cpus(&dev->descriptor.bcdUSB);
904 le16_to_cpus(&dev->descriptor.idVendor);
905 le16_to_cpus(&dev->descriptor.idProduct);
906 le16_to_cpus(&dev->descriptor.bcdDevice);
907 /* only support for one config for now */
908 usb_get_configuration_no(dev, &tmpbuf[0], 0);
909 usb_parse_config(dev, &tmpbuf[0], 0);
910 usb_set_maxpacket(dev);
911 /* we set the default configuration here */
912 if (usb_set_configuration(dev, dev->config.desc.bConfigurationValue)) {
913 printf("failed to set default configuration " \
914 "len %d, status %lX\n", dev->act_len, dev->status);
915 return -1;
916 }
917 USB_PRINTF("new device strings: Mfr=%d, Product=%d, SerialNumber=%d\n",
918 dev->descriptor.iManufacturer, dev->descriptor.iProduct,
919 dev->descriptor.iSerialNumber);
920 memset(dev->mf, 0, sizeof(dev->mf));
921 memset(dev->prod, 0, sizeof(dev->prod));
922 memset(dev->serial, 0, sizeof(dev->serial));
923 if (dev->descriptor.iManufacturer)
924 usb_string(dev, dev->descriptor.iManufacturer,
925 dev->mf, sizeof(dev->mf));
926 if (dev->descriptor.iProduct)
927 usb_string(dev, dev->descriptor.iProduct,
928 dev->prod, sizeof(dev->prod));
929 if (dev->descriptor.iSerialNumber)
930 usb_string(dev, dev->descriptor.iSerialNumber,
931 dev->serial, sizeof(dev->serial));
932 USB_PRINTF("Manufacturer %s\n", dev->mf);
933 USB_PRINTF("Product %s\n", dev->prod);
934 USB_PRINTF("SerialNumber %s\n", dev->serial);
935 /* now prode if the device is a hub */
936 usb_hub_probe(dev, 0);
937 return 0;
938 }
939
940 /* build device Tree */
usb_scan_devices(void)941 void usb_scan_devices(void)
942 {
943 int i;
944 struct usb_device *dev;
945
946 /* first make all devices unknown */
947 for (i = 0; i < USB_MAX_DEVICE; i++) {
948 memset(&usb_dev[i], 0, sizeof(struct usb_device));
949 usb_dev[i].devnum = -1;
950 }
951 dev_index = 0;
952 /* device 0 is always present (root hub, so let it analyze) */
953 dev = usb_alloc_new_device();
954 if (usb_new_device(dev))
955 printf("No USB Device found\n");
956 else
957 printf("%d USB Device(s) found\n", dev_index);
958
959 #ifdef CONFIG_SAM460EX
960 static attempts = 0;
961
962 if (dev_index < 3) {
963 u16 fpga_val = in_be16((void *)CONFIG_SYS_FPGA_BASE + 0x2E);
964 fpga_val |= 0x0002;
965 out_be16((void *)CONFIG_SYS_FPGA_BASE + 0x2E, fpga_val);
966
967 char *s = getenv("usb_retry");
968 if ((s) && (attempts < 1)) {
969 if (gd->flags & GD_FLG_SILENT) {
970 gd->flags &= ~GD_FLG_SILENT;
971 puts("*");
972 gd->flags |= GD_FLG_SILENT;
973 }
974 else puts(" USB not ready? Retrying...\n");
975
976 ++attempts;
977
978 //console_assign(stdin, "serial");
979 //usb_kbd_deregister();
980
981 usb_stop();
982
983 SDR_WRITE(SDR0_SRST1, 0x00000008);
984
985 gpio_config(16, GPIO_OUT, GPIO_SEL, GPIO_OUT_0);
986 //gpio_config(19, GPIO_OUT, GPIO_ALT1, GPIO_OUT_0);
987
988 fpga_val = in_be16((void *)CONFIG_SYS_FPGA_BASE + 0x30);
989 fpga_val &= 0xFFFB; //0xFFEB;
990 out_be16((void *)CONFIG_SYS_FPGA_BASE + 0x30, fpga_val);
991
992 wait_ms(500);
993
994 gpio_config(16, GPIO_OUT, GPIO_ALT1, GPIO_OUT_1);
995 //gpio_config(19, GPIO_OUT, GPIO_ALT1, GPIO_OUT_1);
996 //udelay(20000);
997
998 fpga_val = in_be16((void *)CONFIG_SYS_FPGA_BASE + 0x30);
999 fpga_val |= 0x0004; //0x0014;
1000 out_be16((void *)CONFIG_SYS_FPGA_BASE + 0x30, fpga_val);
1001
1002 SDR_WRITE(SDR0_SRST1, 0);
1003
1004 out_le32((void *)CONFIG_SYS_AHB_BASE + 0xd0048,0xff000001);
1005
1006 usb_init();
1007 }
1008 else {
1009 if (gd->flags & GD_FLG_SILENT) {
1010 gd->flags &= ~GD_FLG_SILENT;
1011 puts("*");
1012 gd->flags |= GD_FLG_SILENT;
1013 }
1014 attempts = 0;
1015 }
1016 }
1017 else {
1018 u16 fpga_val = in_be16((void *)CONFIG_SYS_FPGA_BASE + 0x2E);
1019 if ((fpga_val & 0x0002) == 0x0002) fpga_val |= 0x0004;
1020 out_be16((void *)CONFIG_SYS_FPGA_BASE + 0x2E, fpga_val);
1021 }
1022 #endif
1023
1024 /* insert "driver" if possible */
1025 #ifdef CONFIG_USB_KEYBOARD
1026 drv_usb_kbd_init();
1027 USB_PRINTF("scan end\n");
1028 #endif
1029 }
1030
1031
1032 /****************************************************************************
1033 * HUB "Driver"
1034 * Probes device for being a hub and configurate it
1035 */
1036
1037 #undef USB_HUB_DEBUG
1038
1039 #ifdef USB_HUB_DEBUG
1040 #define USB_HUB_PRINTF(fmt, args...) printf(fmt , ##args)
1041 #else
1042 #define USB_HUB_PRINTF(fmt, args...)
1043 #endif
1044
1045
1046 static struct usb_hub_device hub_dev[USB_MAX_HUB];
1047 static int usb_hub_index;
1048
1049
usb_get_hub_descriptor(struct usb_device * dev,void * data,int size)1050 int usb_get_hub_descriptor(struct usb_device *dev, void *data, int size)
1051 {
1052 return usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
1053 USB_REQ_GET_DESCRIPTOR, USB_DIR_IN | USB_RT_HUB,
1054 USB_DT_HUB << 8, 0, data, size, USB_CNTL_TIMEOUT);
1055 }
1056
usb_clear_hub_feature(struct usb_device * dev,int feature)1057 int usb_clear_hub_feature(struct usb_device *dev, int feature)
1058 {
1059 return usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
1060 USB_REQ_CLEAR_FEATURE, USB_RT_HUB, feature,
1061 0, NULL, 0, USB_CNTL_TIMEOUT);
1062 }
1063
usb_clear_port_feature(struct usb_device * dev,int port,int feature)1064 int usb_clear_port_feature(struct usb_device *dev, int port, int feature)
1065 {
1066 return usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
1067 USB_REQ_CLEAR_FEATURE, USB_RT_PORT, feature,
1068 port, NULL, 0, USB_CNTL_TIMEOUT);
1069 }
1070
usb_set_port_feature(struct usb_device * dev,int port,int feature)1071 int usb_set_port_feature(struct usb_device *dev, int port, int feature)
1072 {
1073 return usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
1074 USB_REQ_SET_FEATURE, USB_RT_PORT, feature,
1075 port, NULL, 0, USB_CNTL_TIMEOUT);
1076 }
1077
usb_get_hub_status(struct usb_device * dev,void * data)1078 int usb_get_hub_status(struct usb_device *dev, void *data)
1079 {
1080 return usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
1081 USB_REQ_GET_STATUS, USB_DIR_IN | USB_RT_HUB, 0, 0,
1082 data, sizeof(struct usb_hub_status), USB_CNTL_TIMEOUT);
1083 }
1084
usb_get_port_status(struct usb_device * dev,int port,void * data)1085 int usb_get_port_status(struct usb_device *dev, int port, void *data)
1086 {
1087 return usb_control_msg(dev, usb_rcvctrlpipe(dev, 0),
1088 USB_REQ_GET_STATUS, USB_DIR_IN | USB_RT_PORT, 0, port,
1089 data, sizeof(struct usb_hub_status), USB_CNTL_TIMEOUT);
1090 }
1091
1092
usb_hub_power_on(struct usb_hub_device * hub)1093 static void usb_hub_power_on(struct usb_hub_device *hub)
1094 {
1095 int i;
1096 struct usb_device *dev;
1097
1098 dev = hub->pusb_dev;
1099 /* Enable power to the ports */
1100 USB_HUB_PRINTF("enabling power on all ports\n");
1101 for (i = 0; i < dev->maxchild; i++) {
1102 usb_set_port_feature(dev, i + 1, USB_PORT_FEAT_POWER);
1103 USB_HUB_PRINTF("port %d returns %lX\n", i + 1, dev->status);
1104 wait_ms(hub->desc.bPwrOn2PwrGood * 2);
1105 }
1106 }
1107
usb_hub_reset(void)1108 void usb_hub_reset(void)
1109 {
1110 usb_hub_index = 0;
1111 }
1112
usb_hub_allocate(void)1113 struct usb_hub_device *usb_hub_allocate(void)
1114 {
1115 if (usb_hub_index < USB_MAX_HUB)
1116 return &hub_dev[usb_hub_index++];
1117
1118 printf("ERROR: USB_MAX_HUB (%d) reached\n", USB_MAX_HUB);
1119 return NULL;
1120 }
1121
1122 #define MAX_TRIES 5
1123
portspeed(int portstatus)1124 static inline char *portspeed(int portstatus)
1125 {
1126 if (portstatus & (1 << USB_PORT_FEAT_HIGHSPEED))
1127 return "480 Mb/s";
1128 else if (portstatus & (1 << USB_PORT_FEAT_LOWSPEED))
1129 return "1.5 Mb/s";
1130 else
1131 return "12 Mb/s";
1132 }
1133
hub_port_reset(struct usb_device * dev,int port,unsigned short * portstat)1134 static int hub_port_reset(struct usb_device *dev, int port,
1135 unsigned short *portstat)
1136 {
1137 int tries;
1138 struct usb_port_status portsts;
1139 unsigned short portstatus, portchange;
1140
1141 USB_HUB_PRINTF("hub_port_reset: resetting port %d...\n", port);
1142 for (tries = 0; tries < MAX_TRIES; tries++) {
1143
1144 usb_set_port_feature(dev, port + 1, USB_PORT_FEAT_RESET);
1145 wait_ms(200);
1146
1147 if (usb_get_port_status(dev, port + 1, &portsts) < 0) {
1148 USB_HUB_PRINTF("get_port_status failed status %lX\n",
1149 dev->status);
1150 return -1;
1151 }
1152 portstatus = le16_to_cpu(portsts.wPortStatus);
1153 portchange = le16_to_cpu(portsts.wPortChange);
1154
1155 USB_HUB_PRINTF("portstatus %x, change %x, %s\n",
1156 portstatus, portchange,
1157 portspeed(portstatus));
1158
1159 USB_HUB_PRINTF("STAT_C_CONNECTION = %d STAT_CONNECTION = %d" \
1160 " USB_PORT_STAT_ENABLE %d\n",
1161 (portchange & USB_PORT_STAT_C_CONNECTION) ? 1 : 0,
1162 (portstatus & USB_PORT_STAT_CONNECTION) ? 1 : 0,
1163 (portstatus & USB_PORT_STAT_ENABLE) ? 1 : 0);
1164
1165 if ((portchange & USB_PORT_STAT_C_CONNECTION) ||
1166 !(portstatus & USB_PORT_STAT_CONNECTION))
1167 return -1;
1168
1169 if (portstatus & USB_PORT_STAT_ENABLE)
1170 break;
1171
1172 wait_ms(200);
1173 }
1174
1175 if (tries == MAX_TRIES) {
1176 USB_HUB_PRINTF("Cannot enable port %i after %i retries, " \
1177 "disabling port.\n", port + 1, MAX_TRIES);
1178 USB_HUB_PRINTF("Maybe the USB cable is bad?\n");
1179 return -1;
1180 }
1181
1182 usb_clear_port_feature(dev, port + 1, USB_PORT_FEAT_C_RESET);
1183 *portstat = portstatus;
1184 return 0;
1185 }
1186
1187
usb_hub_port_connect_change(struct usb_device * dev,int port)1188 void usb_hub_port_connect_change(struct usb_device *dev, int port)
1189 {
1190 struct usb_device *usb;
1191 struct usb_port_status portsts;
1192 unsigned short portstatus, portchange;
1193
1194 /* Check status */
1195 if (usb_get_port_status(dev, port + 1, &portsts) < 0) {
1196 USB_HUB_PRINTF("get_port_status failed\n");
1197 return;
1198 }
1199
1200 portstatus = le16_to_cpu(portsts.wPortStatus);
1201 portchange = le16_to_cpu(portsts.wPortChange);
1202 USB_HUB_PRINTF("portstatus %x, change %x, %s\n",
1203 portstatus, portchange, portspeed(portstatus));
1204
1205 /* Clear the connection change status */
1206 usb_clear_port_feature(dev, port + 1, USB_PORT_FEAT_C_CONNECTION);
1207
1208 /* Disconnect any existing devices under this port */
1209 if (((!(portstatus & USB_PORT_STAT_CONNECTION)) &&
1210 (!(portstatus & USB_PORT_STAT_ENABLE))) || (dev->children[port])) {
1211 USB_HUB_PRINTF("usb_disconnect(&hub->children[port]);\n");
1212 /* Return now if nothing is connected */
1213 if (!(portstatus & USB_PORT_STAT_CONNECTION))
1214 return;
1215 }
1216 wait_ms(200);
1217
1218 /* Reset the port */
1219 if (hub_port_reset(dev, port, &portstatus) < 0) {
1220 printf("cannot reset port %i!?\n", port + 1);
1221 return;
1222 }
1223
1224 wait_ms(200);
1225
1226 /* Allocate a new device struct for it */
1227 usb = usb_alloc_new_device();
1228
1229 if (portstatus & USB_PORT_STAT_HIGH_SPEED)
1230 usb->speed = USB_SPEED_HIGH;
1231 else if (portstatus & USB_PORT_STAT_LOW_SPEED)
1232 usb->speed = USB_SPEED_LOW;
1233 else
1234 usb->speed = USB_SPEED_FULL;
1235
1236 dev->children[port] = usb;
1237 usb->parent = dev;
1238 /* Run it through the hoops (find a driver, etc) */
1239 if (usb_new_device(usb)) {
1240 /* Woops, disable the port */
1241 USB_HUB_PRINTF("hub: disabling port %d\n", port + 1);
1242 usb_clear_port_feature(dev, port + 1, USB_PORT_FEAT_ENABLE);
1243 }
1244 }
1245
1246
usb_hub_configure(struct usb_device * dev)1247 int usb_hub_configure(struct usb_device *dev)
1248 {
1249 unsigned char buffer[USB_BUFSIZ], *bitmap;
1250 struct usb_hub_descriptor *descriptor;
1251 struct usb_hub_status *hubsts;
1252 int i;
1253 struct usb_hub_device *hub;
1254
1255 /* "allocate" Hub device */
1256 hub = usb_hub_allocate();
1257 if (hub == NULL)
1258 return -1;
1259 hub->pusb_dev = dev;
1260 /* Get the the hub descriptor */
1261 if (usb_get_hub_descriptor(dev, buffer, 4) < 0) {
1262 USB_HUB_PRINTF("usb_hub_configure: failed to get hub " \
1263 "descriptor, giving up %lX\n", dev->status);
1264 return -1;
1265 }
1266 descriptor = (struct usb_hub_descriptor *)buffer;
1267
1268 /* silence compiler warning if USB_BUFSIZ is > 256 [= sizeof(char)] */
1269 i = descriptor->bLength;
1270 if (i > USB_BUFSIZ) {
1271 USB_HUB_PRINTF("usb_hub_configure: failed to get hub " \
1272 "descriptor - too long: %d\n",
1273 descriptor->bLength);
1274 return -1;
1275 }
1276
1277 if (usb_get_hub_descriptor(dev, buffer, descriptor->bLength) < 0) {
1278 USB_HUB_PRINTF("usb_hub_configure: failed to get hub " \
1279 "descriptor 2nd giving up %lX\n", dev->status);
1280 return -1;
1281 }
1282 memcpy((unsigned char *)&hub->desc, buffer, descriptor->bLength);
1283 /* adjust 16bit values */
1284 hub->desc.wHubCharacteristics =
1285 le16_to_cpu(descriptor->wHubCharacteristics);
1286 /* set the bitmap */
1287 bitmap = (unsigned char *)&hub->desc.DeviceRemovable[0];
1288 /* devices not removable by default */
1289 memset(bitmap, 0xff, (USB_MAXCHILDREN+1+7)/8);
1290 bitmap = (unsigned char *)&hub->desc.PortPowerCtrlMask[0];
1291 memset(bitmap, 0xff, (USB_MAXCHILDREN+1+7)/8); /* PowerMask = 1B */
1292
1293 for (i = 0; i < ((hub->desc.bNbrPorts + 1 + 7)/8); i++)
1294 hub->desc.DeviceRemovable[i] = descriptor->DeviceRemovable[i];
1295
1296 for (i = 0; i < ((hub->desc.bNbrPorts + 1 + 7)/8); i++)
1297 hub->desc.DeviceRemovable[i] = descriptor->PortPowerCtrlMask[i];
1298
1299 dev->maxchild = descriptor->bNbrPorts;
1300 USB_HUB_PRINTF("%d ports detected\n", dev->maxchild);
1301
1302 switch (hub->desc.wHubCharacteristics & HUB_CHAR_LPSM) {
1303 case 0x00:
1304 USB_HUB_PRINTF("ganged power switching\n");
1305 break;
1306 case 0x01:
1307 USB_HUB_PRINTF("individual port power switching\n");
1308 break;
1309 case 0x02:
1310 case 0x03:
1311 USB_HUB_PRINTF("unknown reserved power switching mode\n");
1312 break;
1313 }
1314
1315 if (hub->desc.wHubCharacteristics & HUB_CHAR_COMPOUND)
1316 USB_HUB_PRINTF("part of a compound device\n");
1317 else
1318 USB_HUB_PRINTF("standalone hub\n");
1319
1320 switch (hub->desc.wHubCharacteristics & HUB_CHAR_OCPM) {
1321 case 0x00:
1322 USB_HUB_PRINTF("global over-current protection\n");
1323 break;
1324 case 0x08:
1325 USB_HUB_PRINTF("individual port over-current protection\n");
1326 break;
1327 case 0x10:
1328 case 0x18:
1329 USB_HUB_PRINTF("no over-current protection\n");
1330 break;
1331 }
1332
1333 USB_HUB_PRINTF("power on to power good time: %dms\n",
1334 descriptor->bPwrOn2PwrGood * 2);
1335 USB_HUB_PRINTF("hub controller current requirement: %dmA\n",
1336 descriptor->bHubContrCurrent);
1337
1338 for (i = 0; i < dev->maxchild; i++)
1339 USB_HUB_PRINTF("port %d is%s removable\n", i + 1,
1340 hub->desc.DeviceRemovable[(i + 1) / 8] & \
1341 (1 << ((i + 1) % 8)) ? " not" : "");
1342
1343 if (sizeof(struct usb_hub_status) > USB_BUFSIZ) {
1344 USB_HUB_PRINTF("usb_hub_configure: failed to get Status - " \
1345 "too long: %d\n", descriptor->bLength);
1346 return -1;
1347 }
1348
1349 if (usb_get_hub_status(dev, buffer) < 0) {
1350 USB_HUB_PRINTF("usb_hub_configure: failed to get Status %lX\n",
1351 dev->status);
1352 return -1;
1353 }
1354
1355 hubsts = (struct usb_hub_status *)buffer;
1356 USB_HUB_PRINTF("get_hub_status returned status %X, change %X\n",
1357 le16_to_cpu(hubsts->wHubStatus),
1358 le16_to_cpu(hubsts->wHubChange));
1359 USB_HUB_PRINTF("local power source is %s\n",
1360 (le16_to_cpu(hubsts->wHubStatus) & HUB_STATUS_LOCAL_POWER) ? \
1361 "lost (inactive)" : "good");
1362 USB_HUB_PRINTF("%sover-current condition exists\n",
1363 (le16_to_cpu(hubsts->wHubStatus) & HUB_STATUS_OVERCURRENT) ? \
1364 "" : "no ");
1365 usb_hub_power_on(hub);
1366
1367 for (i = 0; i < dev->maxchild; i++) {
1368 struct usb_port_status portsts;
1369 unsigned short portstatus, portchange;
1370
1371 if (usb_get_port_status(dev, i + 1, &portsts) < 0) {
1372 USB_HUB_PRINTF("get_port_status failed\n");
1373 continue;
1374 }
1375
1376 portstatus = le16_to_cpu(portsts.wPortStatus);
1377 portchange = le16_to_cpu(portsts.wPortChange);
1378 USB_HUB_PRINTF("Port %d Status %X Change %X\n",
1379 i + 1, portstatus, portchange);
1380
1381 if (portchange & USB_PORT_STAT_C_CONNECTION) {
1382 USB_HUB_PRINTF("port %d connection change\n", i + 1);
1383 usb_hub_port_connect_change(dev, i);
1384 }
1385 if (portchange & USB_PORT_STAT_C_ENABLE) {
1386 USB_HUB_PRINTF("port %d enable change, status %x\n",
1387 i + 1, portstatus);
1388 usb_clear_port_feature(dev, i + 1,
1389 USB_PORT_FEAT_C_ENABLE);
1390
1391 /* EM interference sometimes causes bad shielded USB
1392 * devices to be shutdown by the hub, this hack enables
1393 * them again. Works at least with mouse driver */
1394 if (!(portstatus & USB_PORT_STAT_ENABLE) &&
1395 (portstatus & USB_PORT_STAT_CONNECTION) &&
1396 ((dev->children[i]))) {
1397 USB_HUB_PRINTF("already running port %i " \
1398 "disabled by hub (EMI?), " \
1399 "re-enabling...\n", i + 1);
1400 usb_hub_port_connect_change(dev, i);
1401 }
1402 }
1403 if (portstatus & USB_PORT_STAT_SUSPEND) {
1404 USB_HUB_PRINTF("port %d suspend change\n", i + 1);
1405 usb_clear_port_feature(dev, i + 1,
1406 USB_PORT_FEAT_SUSPEND);
1407 }
1408
1409 if (portchange & USB_PORT_STAT_C_OVERCURRENT) {
1410 USB_HUB_PRINTF("port %d over-current change\n", i + 1);
1411 usb_clear_port_feature(dev, i + 1,
1412 USB_PORT_FEAT_C_OVER_CURRENT);
1413 usb_hub_power_on(hub);
1414 }
1415
1416 if (portchange & USB_PORT_STAT_C_RESET) {
1417 USB_HUB_PRINTF("port %d reset change\n", i + 1);
1418 usb_clear_port_feature(dev, i + 1,
1419 USB_PORT_FEAT_C_RESET);
1420 }
1421 } /* end for i all ports */
1422
1423 return 0;
1424 }
1425
usb_hub_probe(struct usb_device * dev,int ifnum)1426 int usb_hub_probe(struct usb_device *dev, int ifnum)
1427 {
1428 struct usb_interface *iface;
1429 struct usb_endpoint_descriptor *ep;
1430 int ret;
1431
1432 iface = &dev->config.if_desc[ifnum];
1433 /* Is it a hub? */
1434 if (iface->desc.bInterfaceClass != USB_CLASS_HUB)
1435 return 0;
1436 /* Some hubs have a subclass of 1, which AFAICT according to the */
1437 /* specs is not defined, but it works */
1438 if ((iface->desc.bInterfaceSubClass != 0) &&
1439 (iface->desc.bInterfaceSubClass != 1))
1440 return 0;
1441 /* Multiple endpoints? What kind of mutant ninja-hub is this? */
1442 if (iface->desc.bNumEndpoints != 1)
1443 return 0;
1444 ep = &iface->ep_desc[0];
1445 /* Output endpoint? Curiousier and curiousier.. */
1446 if (!(ep->bEndpointAddress & USB_DIR_IN))
1447 return 0;
1448 /* If it's not an interrupt endpoint, we'd better punt! */
1449 if ((ep->bmAttributes & 3) != 3)
1450 return 0;
1451 /* We found a hub */
1452 USB_HUB_PRINTF("USB hub found\n");
1453 ret = usb_hub_configure(dev);
1454 return ret;
1455 }
1456
1457 /* EOF */
1458