usb-uhci.c
上传用户:lgb322
上传日期:2013-02-24
资源大小:30529k
文件大小:84k
源码类别:

嵌入式Linux

开发平台:

Unix_Linux

  1. /* 
  2.  * Universal Host Controller Interface driver for USB (take II).
  3.  *
  4.  * (c) 1999-2001 Georg Acher, acher@in.tum.de (executive slave) (base guitar)
  5.  *               Deti Fliegl, deti@fliegl.de (executive slave) (lead voice)
  6.  *               Thomas Sailer, sailer@ife.ee.ethz.ch (chief consultant) (cheer leader)
  7.  *               Roman Weissgaerber, weissg@vienna.at (virt root hub) (studio porter)
  8.  * (c) 2000      Yggdrasil Computing, Inc. (port of new PCI interface support
  9.  *               from usb-ohci.c by Adam Richter, adam@yggdrasil.com).
  10.  * (C) 2000      David Brownell, david-b@pacbell.net (usb-ohci.c)
  11.  *          
  12.  * HW-initalization based on material of
  13.  *
  14.  * (C) Copyright 1999 Linus Torvalds
  15.  * (C) Copyright 1999 Johannes Erdfelt
  16.  * (C) Copyright 1999 Randy Dunlap
  17.  * (C) Copyright 1999 Gregory P. Smith
  18.  *
  19.  * $Id: usb-uhci.c,v 1.275 2002/01/19 20:57:33 acher Exp $
  20.  */
  21. #include <linux/config.h>
  22. #include <linux/module.h>
  23. #include <linux/pci.h>
  24. #include <linux/kernel.h>
  25. #include <linux/delay.h>
  26. #include <linux/ioport.h>
  27. #include <linux/sched.h>
  28. #include <linux/slab.h>
  29. #include <linux/smp_lock.h>
  30. #include <linux/errno.h>
  31. #include <linux/unistd.h>
  32. #include <linux/interrupt.h> /* for in_interrupt() */
  33. #include <linux/init.h>
  34. #include <linux/version.h>
  35. #include <linux/pm.h>
  36. #include <linux/timer.h>
  37. #include <asm/uaccess.h>
  38. #include <asm/io.h>
  39. #include <asm/irq.h>
  40. #include <asm/system.h>
  41. /* This enables more detailed sanity checks in submit_iso */
  42. //#define ISO_SANITY_CHECK
  43. /* This enables debug printks */
  44. #define DEBUG
  45. /* This enables all symbols to be exported, to ease debugging oopses */
  46. //#define DEBUG_SYMBOLS
  47. /* This enables an extra UHCI slab for memory debugging */
  48. #define DEBUG_SLAB
  49. #define VERSTR "$Revision: 1.275 $ time " __TIME__ " " __DATE__
  50. #include <linux/usb.h>
  51. #include "usb-uhci.h"
  52. #include "usb-uhci-debug.h"
  53. /*
  54.  * Version Information
  55.  */
  56. #define DRIVER_VERSION "v1.275"
  57. #define DRIVER_AUTHOR "Georg Acher, Deti Fliegl, Thomas Sailer, Roman Weissgaerber"
  58. #define DRIVER_DESC "USB Universal Host Controller Interface driver"
  59. #undef DEBUG
  60. #undef dbg
  61. #define dbg(format, arg...) do {} while (0)
  62. #define DEBUG_SYMBOLS
  63. #ifdef DEBUG_SYMBOLS
  64. #define _static
  65. #ifndef EXPORT_SYMTAB
  66. #define EXPORT_SYMTAB
  67. #endif
  68. #else
  69. #define _static static
  70. #endif
  71. #define queue_dbg dbg //err
  72. #define async_dbg dbg //err
  73. #ifdef DEBUG_SLAB
  74. static kmem_cache_t *urb_priv_kmem;
  75. #endif
  76. #define SLAB_FLAG     (in_interrupt ()? SLAB_ATOMIC : SLAB_KERNEL)
  77. #define KMALLOC_FLAG  (in_interrupt ()? GFP_ATOMIC : GFP_KERNEL)
  78. /* CONFIG_USB_UHCI_HIGH_BANDWITH turns on Full Speed Bandwidth
  79.  * Reclamation: feature that puts loop on descriptor loop when
  80.  * there's some transfer going on. With FSBR, USB performance
  81.  * is optimal, but PCI can be slowed down up-to 5 times, slowing down
  82.  * system performance (eg. framebuffer devices).
  83.  */
  84. #define CONFIG_USB_UHCI_HIGH_BANDWIDTH 
  85. /* *_DEPTH_FIRST puts descriptor in depth-first mode. This has
  86.  * somehow similar effect to FSBR (higher speed), but does not
  87.  * slow PCI down. OTOH USB performace is slightly slower than
  88.  * in FSBR case and single device could hog whole USB, starving
  89.  * other devices.
  90.  */
  91. #define USE_CTRL_DEPTH_FIRST 0  // 0: Breadth first, 1: Depth first
  92. #define USE_BULK_DEPTH_FIRST 0  // 0: Breadth first, 1: Depth first
  93. /* Turning off both CONFIG_USB_UHCI_HIGH_BANDWITH and *_DEPTH_FIRST
  94.  * will lead to <64KB/sec performance over USB for bulk transfers targeting
  95.  * one device's endpoint. You probably do not want to do that.
  96.  */
  97. // stop bandwidth reclamation after (roughly) 50ms
  98. #define IDLE_TIMEOUT  (HZ/20)
  99. // Suppress HC interrupt error messages for 5s
  100. #define ERROR_SUPPRESSION_TIME (HZ*5)
  101. _static int rh_submit_urb (urb_t *urb);
  102. _static int rh_unlink_urb (urb_t *urb);
  103. _static int delete_qh (uhci_t *s, uhci_desc_t *qh);
  104. _static int process_transfer (uhci_t *s, urb_t *urb, int mode);
  105. _static int process_interrupt (uhci_t *s, urb_t *urb);
  106. _static int process_iso (uhci_t *s, urb_t *urb, int force);
  107. // How much URBs with ->next are walked
  108. #define MAX_NEXT_COUNT 2048
  109. static uhci_t *devs = NULL;
  110. /* used by userspace UHCI data structure dumper */
  111. uhci_t **uhci_devices = &devs;
  112. /*-------------------------------------------------------------------*/
  113. // Cleans up collected QHs, but not more than 100 in one go
  114. void clean_descs(uhci_t *s, int force)
  115. {
  116. struct list_head *q;
  117. uhci_desc_t *qh;
  118. int now=UHCI_GET_CURRENT_FRAME(s), n=0;
  119. q=s->free_desc.prev;
  120. while (q != &s->free_desc && (force || n<100)) {
  121. qh = list_entry (q, uhci_desc_t, horizontal);
  122. q=qh->horizontal.prev;
  123. if ((qh->last_used!=now) || force)
  124. delete_qh(s,qh);
  125. n++;
  126. }
  127. }
  128. /*-------------------------------------------------------------------*/
  129. _static void uhci_switch_timer_int(uhci_t *s)
  130. {
  131. if (!list_empty(&s->urb_unlinked))
  132. set_td_ioc(s->td1ms);
  133. else
  134. clr_td_ioc(s->td1ms);
  135. if (s->timeout_urbs)
  136. set_td_ioc(s->td32ms);
  137. else
  138. clr_td_ioc(s->td32ms);
  139. wmb();
  140. }
  141. /*-------------------------------------------------------------------*/
  142. #ifdef CONFIG_USB_UHCI_HIGH_BANDWIDTH
  143. _static void enable_desc_loop(uhci_t *s, urb_t *urb)
  144. {
  145. int flags;
  146. if (urb->transfer_flags & USB_NO_FSBR)
  147. return;
  148. spin_lock_irqsave (&s->qh_lock, flags);
  149. s->chain_end->hw.qh.head&=cpu_to_le32(~UHCI_PTR_TERM);
  150. mb();
  151. s->loop_usage++;
  152. ((urb_priv_t*)urb->hcpriv)->use_loop=1;
  153. spin_unlock_irqrestore (&s->qh_lock, flags);
  154. }
  155. /*-------------------------------------------------------------------*/
  156. _static void disable_desc_loop(uhci_t *s, urb_t *urb)
  157. {
  158. int flags;
  159. if (urb->transfer_flags & USB_NO_FSBR)
  160. return;
  161. spin_lock_irqsave (&s->qh_lock, flags);
  162. if (((urb_priv_t*)urb->hcpriv)->use_loop) {
  163. s->loop_usage--;
  164. if (!s->loop_usage) {
  165. s->chain_end->hw.qh.head|=cpu_to_le32(UHCI_PTR_TERM);
  166. mb();
  167. }
  168. ((urb_priv_t*)urb->hcpriv)->use_loop=0;
  169. }
  170. spin_unlock_irqrestore (&s->qh_lock, flags);
  171. }
  172. #endif
  173. /*-------------------------------------------------------------------*/
  174. _static void queue_urb_unlocked (uhci_t *s, urb_t *urb)
  175. {
  176. struct list_head *p=&urb->urb_list;
  177. #ifdef CONFIG_USB_UHCI_HIGH_BANDWIDTH
  178. {
  179. int type;
  180. type=usb_pipetype (urb->pipe);
  181. if ((type == PIPE_BULK) || (type == PIPE_CONTROL))
  182. enable_desc_loop(s, urb);
  183. }
  184. #endif
  185. urb->status = -EINPROGRESS;
  186. ((urb_priv_t*)urb->hcpriv)->started=jiffies;
  187. list_add (p, &s->urb_list);
  188. if (urb->timeout)
  189. s->timeout_urbs++;
  190. uhci_switch_timer_int(s);
  191. }
  192. /*-------------------------------------------------------------------*/
  193. _static void queue_urb (uhci_t *s, urb_t *urb)
  194. {
  195. unsigned long flags=0;
  196. spin_lock_irqsave (&s->urb_list_lock, flags);
  197. queue_urb_unlocked(s,urb);
  198. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  199. }
  200. /*-------------------------------------------------------------------*/
  201. _static void dequeue_urb (uhci_t *s, urb_t *urb)
  202. {
  203. #ifdef CONFIG_USB_UHCI_HIGH_BANDWIDTH
  204. int type;
  205. type=usb_pipetype (urb->pipe);
  206. if ((type == PIPE_BULK) || (type == PIPE_CONTROL))
  207. disable_desc_loop(s, urb);
  208. #endif
  209. list_del (&urb->urb_list);
  210. if (urb->timeout && s->timeout_urbs)
  211. s->timeout_urbs--;
  212. }
  213. /*-------------------------------------------------------------------*/
  214. _static int alloc_td (uhci_t *s, uhci_desc_t ** new, int flags)
  215. {
  216. dma_addr_t dma_handle;
  217. *new = pci_pool_alloc(s->desc_pool, GFP_DMA | GFP_ATOMIC, &dma_handle);
  218. if (!*new)
  219. return -ENOMEM;
  220. memset (*new, 0, sizeof (uhci_desc_t));
  221. (*new)->dma_addr = dma_handle;
  222. set_td_link((*new), UHCI_PTR_TERM | (flags & UHCI_PTR_BITS)); // last by default
  223. (*new)->type = TD_TYPE;
  224. mb();
  225. INIT_LIST_HEAD (&(*new)->vertical);
  226. INIT_LIST_HEAD (&(*new)->horizontal);
  227. return 0;
  228. }
  229. /*-------------------------------------------------------------------*/
  230. // append a qh to td.link physically, the SW linkage is not affected
  231. _static void append_qh(uhci_t *s, uhci_desc_t *td, uhci_desc_t* qh, int  flags)
  232. {
  233. unsigned long xxx;
  234. spin_lock_irqsave (&s->td_lock, xxx);
  235. set_td_link(td, qh->dma_addr | (flags & UHCI_PTR_DEPTH) | UHCI_PTR_QH);
  236.        
  237. mb();
  238. spin_unlock_irqrestore (&s->td_lock, xxx);
  239. }
  240. /*-------------------------------------------------------------------*/
  241. /* insert td at last position in td-list of qh (vertical) */
  242. _static int insert_td (uhci_t *s, uhci_desc_t *qh, uhci_desc_t* new, int flags)
  243. {
  244. uhci_desc_t *prev;
  245. unsigned long xxx;
  246. spin_lock_irqsave (&s->td_lock, xxx);
  247. list_add_tail (&new->vertical, &qh->vertical);
  248. prev = list_entry (new->vertical.prev, uhci_desc_t, vertical);
  249. if (qh == prev ) {
  250. // virgin qh without any tds
  251. set_qh_element(qh, new->dma_addr | UHCI_PTR_TERM);
  252. }
  253. else {
  254. // already tds inserted, implicitely remove TERM bit of prev
  255. set_td_link(prev, new->dma_addr | (flags & UHCI_PTR_DEPTH));
  256. }
  257. mb();
  258. spin_unlock_irqrestore (&s->td_lock, xxx);
  259. return 0;
  260. }
  261. /*-------------------------------------------------------------------*/
  262. /* insert new_td after td (horizontal) */
  263. _static int insert_td_horizontal (uhci_t *s, uhci_desc_t *td, uhci_desc_t* new)
  264. {
  265. uhci_desc_t *next;
  266. unsigned long flags;
  267. spin_lock_irqsave (&s->td_lock, flags);
  268. next = list_entry (td->horizontal.next, uhci_desc_t, horizontal);
  269. list_add (&new->horizontal, &td->horizontal);
  270. new->hw.td.link = td->hw.td.link;
  271. set_td_link(td, new->dma_addr);
  272. mb();
  273. spin_unlock_irqrestore (&s->td_lock, flags);
  274. return 0;
  275. }
  276. /*-------------------------------------------------------------------*/
  277. _static int unlink_td (uhci_t *s, uhci_desc_t *element, int phys_unlink)
  278. {
  279. uhci_desc_t *next, *prev;
  280. int dir = 0;
  281. unsigned long flags;
  282. spin_lock_irqsave (&s->td_lock, flags);
  283. next = list_entry (element->vertical.next, uhci_desc_t, vertical);
  284. if (next == element) {
  285. dir = 1;
  286. prev = list_entry (element->horizontal.prev, uhci_desc_t, horizontal);
  287. }
  288. else 
  289. prev = list_entry (element->vertical.prev, uhci_desc_t, vertical);
  290. if (phys_unlink) {
  291. // really remove HW linking
  292. if (prev->type == TD_TYPE)
  293. prev->hw.td.link = element->hw.td.link;
  294. else
  295. prev->hw.qh.element = element->hw.td.link;
  296. }
  297. mb ();
  298. if (dir == 0)
  299. list_del (&element->vertical);
  300. else
  301. list_del (&element->horizontal);
  302. spin_unlock_irqrestore (&s->td_lock, flags);
  303. return 0;
  304. }
  305. /*-------------------------------------------------------------------*/
  306. _static int delete_desc (uhci_t *s, uhci_desc_t *element)
  307. {
  308. pci_pool_free(s->desc_pool, element, element->dma_addr);
  309. return 0;
  310. }
  311. /*-------------------------------------------------------------------*/
  312. // Allocates qh element
  313. _static int alloc_qh (uhci_t *s, uhci_desc_t ** new)
  314. {
  315. dma_addr_t dma_handle;
  316. *new = pci_pool_alloc(s->desc_pool, GFP_DMA | GFP_ATOMIC, &dma_handle);
  317. if (!*new)
  318. return -ENOMEM;
  319. memset (*new, 0, sizeof (uhci_desc_t));
  320. (*new)->dma_addr = dma_handle;
  321. set_qh_head(*new, UHCI_PTR_TERM);
  322. set_qh_element(*new, UHCI_PTR_TERM);
  323. (*new)->type = QH_TYPE;
  324. mb();
  325. INIT_LIST_HEAD (&(*new)->horizontal);
  326. INIT_LIST_HEAD (&(*new)->vertical);
  327. dbg("Allocated qh @ %p", *new);
  328. return 0;
  329. }
  330. /*-------------------------------------------------------------------*/
  331. // inserts new qh before/after the qh at pos
  332. // flags: 0: insert before pos, 1: insert after pos (for low speed transfers)
  333. _static int insert_qh (uhci_t *s, uhci_desc_t *pos, uhci_desc_t *new, int order)
  334. {
  335. uhci_desc_t *old;
  336. unsigned long flags;
  337. spin_lock_irqsave (&s->qh_lock, flags);
  338. if (!order) {
  339. // (OLD) (POS) -> (OLD) (NEW) (POS)
  340. old = list_entry (pos->horizontal.prev, uhci_desc_t, horizontal);
  341. list_add_tail (&new->horizontal, &pos->horizontal);
  342. set_qh_head(new, MAKE_QH_ADDR (pos)) ;
  343. if (!(old->hw.qh.head & cpu_to_le32(UHCI_PTR_TERM)))
  344. set_qh_head(old, MAKE_QH_ADDR (new)) ;
  345. }
  346. else {
  347. // (POS) (OLD) -> (POS) (NEW) (OLD)
  348. old = list_entry (pos->horizontal.next, uhci_desc_t, horizontal);
  349. list_add (&new->horizontal, &pos->horizontal);
  350. set_qh_head(new, MAKE_QH_ADDR (old));
  351. set_qh_head(pos, MAKE_QH_ADDR (new)) ;
  352. }
  353. mb ();
  354. spin_unlock_irqrestore (&s->qh_lock, flags);
  355. return 0;
  356. }
  357. /*-------------------------------------------------------------------*/
  358. _static int unlink_qh (uhci_t *s, uhci_desc_t *element)
  359. {
  360. uhci_desc_t  *prev;
  361. unsigned long flags;
  362. spin_lock_irqsave (&s->qh_lock, flags);
  363. prev = list_entry (element->horizontal.prev, uhci_desc_t, horizontal);
  364. prev->hw.qh.head = element->hw.qh.head;
  365. dbg("unlink qh %p, pqh %p, nxqh %p, to %08x", element, prev, 
  366.     list_entry (element->horizontal.next, uhci_desc_t, horizontal),le32_to_cpu(element->hw.qh.head) &~15);
  367. list_del(&element->horizontal);
  368. mb ();
  369. spin_unlock_irqrestore (&s->qh_lock, flags);
  370. return 0;
  371. }
  372. /*-------------------------------------------------------------------*/
  373. _static int delete_qh (uhci_t *s, uhci_desc_t *qh)
  374. {
  375. uhci_desc_t *td;
  376. struct list_head *p;
  377. list_del (&qh->horizontal);
  378. while ((p = qh->vertical.next) != &qh->vertical) {
  379. td = list_entry (p, uhci_desc_t, vertical);
  380. dbg("unlink td @ %p",td);
  381. unlink_td (s, td, 0); // no physical unlink
  382. delete_desc (s, td);
  383. }
  384. delete_desc (s, qh);
  385. return 0;
  386. }
  387. /*-------------------------------------------------------------------*/
  388. _static void clean_td_chain (uhci_t *s, uhci_desc_t *td)
  389. {
  390. struct list_head *p;
  391. uhci_desc_t *td1;
  392. if (!td)
  393. return;
  394. while ((p = td->horizontal.next) != &td->horizontal) {
  395. td1 = list_entry (p, uhci_desc_t, horizontal);
  396. delete_desc (s, td1);
  397. }
  398. delete_desc (s, td);
  399. }
  400. /*-------------------------------------------------------------------*/
  401. _static void fill_td (uhci_desc_t *td, int status, int info, __u32 buffer)
  402. {
  403. td->hw.td.status = cpu_to_le32(status);
  404. td->hw.td.info = cpu_to_le32(info);
  405. td->hw.td.buffer = cpu_to_le32(buffer);
  406. }
  407. /*-------------------------------------------------------------------*/
  408. // Removes ALL qhs in chain (paranoia!)
  409. _static void cleanup_skel (uhci_t *s)
  410. {
  411. unsigned int n;
  412. uhci_desc_t *td;
  413. dbg("cleanup_skel");
  414. clean_descs(s,1);
  415. if (s->td32ms) {
  416. unlink_td(s,s->td32ms,1);
  417. delete_desc(s, s->td32ms);
  418. }
  419. for (n = 0; n < 8; n++) {
  420. td = s->int_chain[n];
  421. clean_td_chain (s, td);
  422. }
  423. if (s->iso_td) {
  424. for (n = 0; n < 1024; n++) {
  425. td = s->iso_td[n];
  426. clean_td_chain (s, td);
  427. }
  428. kfree (s->iso_td);
  429. }
  430. if (s->framelist)
  431. pci_free_consistent(s->uhci_pci, PAGE_SIZE,
  432.     s->framelist, s->framelist_dma);
  433. if (s->control_chain) {
  434. // completed init_skel?
  435. struct list_head *p;
  436. uhci_desc_t *qh, *qh1;
  437. qh = s->control_chain;
  438. while ((p = qh->horizontal.next) != &qh->horizontal) {
  439. qh1 = list_entry (p, uhci_desc_t, horizontal);
  440. delete_qh (s, qh1);
  441. }
  442. delete_qh (s, qh);
  443. }
  444. else {
  445. if (s->ls_control_chain)
  446. delete_desc (s, s->ls_control_chain);
  447. if (s->control_chain)
  448. delete_desc (s, s->control_chain);
  449. if (s->bulk_chain)
  450. delete_desc (s, s->bulk_chain);
  451. if (s->chain_end)
  452. delete_desc (s, s->chain_end);
  453. }
  454. if (s->desc_pool) {
  455. pci_pool_destroy(s->desc_pool);
  456. s->desc_pool = NULL;
  457. }
  458. dbg("cleanup_skel finished");
  459. }
  460. /*-------------------------------------------------------------------*/
  461. // allocates framelist and qh-skeletons
  462. // only HW-links provide continous linking, SW-links stay in their domain (ISO/INT)
  463. _static int init_skel (uhci_t *s)
  464. {
  465. int n, ret;
  466. uhci_desc_t *qh, *td;
  467. dbg("init_skel");
  468. s->framelist = pci_alloc_consistent(s->uhci_pci, PAGE_SIZE,
  469.     &s->framelist_dma);
  470. if (!s->framelist)
  471. return -ENOMEM;
  472. memset (s->framelist, 0, 4096);
  473. dbg("creating descriptor pci_pool");
  474. s->desc_pool = pci_pool_create("uhci_desc", s->uhci_pci,
  475.        sizeof(uhci_desc_t), 16, 0,
  476.        GFP_DMA | GFP_ATOMIC);
  477. if (!s->desc_pool)
  478. goto init_skel_cleanup;
  479. dbg("allocating iso desc pointer list");
  480. s->iso_td = (uhci_desc_t **) kmalloc (1024 * sizeof (uhci_desc_t*), GFP_KERNEL);
  481. if (!s->iso_td)
  482. goto init_skel_cleanup;
  483. s->ls_control_chain = NULL;
  484. s->control_chain = NULL;
  485. s->bulk_chain = NULL;
  486. s->chain_end = NULL;
  487. dbg("allocating iso descs");
  488. for (n = 0; n < 1024; n++) {
  489.   // allocate skeleton iso/irq-tds
  490. if (alloc_td (s, &td, 0))
  491. goto init_skel_cleanup;
  492. s->iso_td[n] = td;
  493. s->framelist[n] = cpu_to_le32((__u32) td->dma_addr);
  494. }
  495. dbg("allocating qh: chain_end");
  496. if (alloc_qh (s, &qh))
  497. goto init_skel_cleanup;
  498. s->chain_end = qh;
  499. if (alloc_td (s, &td, 0))
  500. goto init_skel_cleanup;
  501. fill_td (td, 0 * TD_CTRL_IOC, 0, 0); // generate 1ms interrupt (enabled on demand)
  502. insert_td (s, qh, td, 0);
  503. qh->hw.qh.element &= cpu_to_le32(~UHCI_PTR_TERM); // remove TERM bit
  504. s->td1ms=td;
  505. dbg("allocating qh: bulk_chain");
  506. if (alloc_qh (s, &qh))
  507. goto init_skel_cleanup;
  508. insert_qh (s, s->chain_end, qh, 0);
  509. s->bulk_chain = qh;
  510. dbg("allocating qh: control_chain");
  511. ret = alloc_qh (s, &qh);
  512. if (ret)
  513. goto init_skel_cleanup;
  514. insert_qh (s, s->bulk_chain, qh, 0);
  515. s->control_chain = qh;
  516. #ifdef CONFIG_USB_UHCI_HIGH_BANDWIDTH
  517. // disabled reclamation loop
  518. set_qh_head(s->chain_end, s->control_chain->dma_addr | UHCI_PTR_QH | UHCI_PTR_TERM);
  519. #endif
  520. dbg("allocating qh: ls_control_chain");
  521. if (alloc_qh (s, &qh))
  522. goto init_skel_cleanup;
  523. insert_qh (s, s->control_chain, qh, 0);
  524. s->ls_control_chain = qh;
  525. for (n = 0; n < 8; n++)
  526. s->int_chain[n] = 0;
  527. dbg("allocating skeleton INT-TDs");
  528. for (n = 0; n < 8; n++) {
  529. uhci_desc_t *td;
  530. if (alloc_td (s, &td, 0))
  531. goto init_skel_cleanup;
  532. s->int_chain[n] = td;
  533. if (n == 0) {
  534. set_td_link(s->int_chain[0], s->ls_control_chain->dma_addr | UHCI_PTR_QH);
  535. }
  536. else {
  537. set_td_link(s->int_chain[n], s->int_chain[0]->dma_addr);
  538. }
  539. }
  540. dbg("Linking skeleton INT-TDs");
  541. for (n = 0; n < 1024; n++) {
  542. // link all iso-tds to the interrupt chains
  543. int m, o;
  544. dbg("framelist[%i]=%x",n,le32_to_cpu(s->framelist[n]));
  545. if ((n&127)==127) 
  546. ((uhci_desc_t*) s->iso_td[n])->hw.td.link = cpu_to_le32(s->int_chain[0]->dma_addr);
  547. else 
  548. for (o = 1, m = 2; m <= 128; o++, m += m)
  549. if ((n & (m - 1)) == ((m - 1) / 2))
  550. set_td_link(((uhci_desc_t*) s->iso_td[n]), s->int_chain[o]->dma_addr);
  551. }
  552. if (alloc_td (s, &td, 0))
  553. goto init_skel_cleanup;
  554. fill_td (td, 0 * TD_CTRL_IOC, 0, 0); // generate 32ms interrupt (activated later)
  555. s->td32ms=td;
  556. insert_td_horizontal (s, s->int_chain[5], td);
  557. mb();
  558. //uhci_show_queue(s->control_chain);   
  559. dbg("init_skel exit");
  560. return 0;
  561.       init_skel_cleanup:
  562. cleanup_skel (s);
  563. return -ENOMEM;
  564. }
  565. /*-------------------------------------------------------------------*/
  566. //                         LOW LEVEL STUFF
  567. //          assembles QHs und TDs for control, bulk and iso
  568. /*-------------------------------------------------------------------*/
  569. _static int uhci_submit_control_urb (urb_t *urb)
  570. {
  571. uhci_desc_t *qh, *td;
  572. uhci_t *s = (uhci_t*) urb->dev->bus->hcpriv;
  573. urb_priv_t *urb_priv = urb->hcpriv;
  574. unsigned long destination, status;
  575. int maxsze = usb_maxpacket (urb->dev, urb->pipe, usb_pipeout (urb->pipe));
  576. unsigned long len;
  577. char *data;
  578. int depth_first=USE_CTRL_DEPTH_FIRST;  // UHCI descriptor chasing method
  579. dbg("uhci_submit_control start");
  580. if (alloc_qh (s, &qh)) // alloc qh for this request
  581. return -ENOMEM;
  582. if (alloc_td (s, &td, UHCI_PTR_DEPTH * depth_first)) // get td for setup stage
  583. {
  584. delete_qh (s, qh);
  585. return -ENOMEM;
  586. }
  587. /* The "pipe" thing contains the destination in bits 8--18 */
  588. destination = (urb->pipe & PIPE_DEVEP_MASK) | USB_PID_SETUP;
  589. /* 3 errors */
  590. status = (urb->pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE |
  591. (urb->transfer_flags & USB_DISABLE_SPD ? 0 : TD_CTRL_SPD) | (3 << 27);
  592. /*  Build the TD for the control request, try forever, 8 bytes of data */
  593. fill_td (td, status, destination | (7 << 21), urb_priv->setup_packet_dma);
  594. insert_td (s, qh, td, 0); // queue 'setup stage'-td in qh
  595. #if 0
  596. {
  597. char *sp=urb->setup_packet;
  598. dbg("SETUP to pipe %x: %x %x %x %x %x %x %x %x", urb->pipe,
  599.     sp[0],sp[1],sp[2],sp[3],sp[4],sp[5],sp[6],sp[7]);
  600. }
  601. //uhci_show_td(td);
  602. #endif
  603. len = urb->transfer_buffer_length;
  604. data = urb->transfer_buffer;
  605. /* If direction is "send", change the frame from SETUP (0x2D)
  606.    to OUT (0xE1). Else change it from SETUP to IN (0x69). */
  607. destination = (urb->pipe & PIPE_DEVEP_MASK) | (usb_pipeout (urb->pipe)?USB_PID_OUT:USB_PID_IN);
  608. while (len > 0) {
  609. int pktsze = len;
  610. if (alloc_td (s, &td, UHCI_PTR_DEPTH * depth_first))
  611. goto fail_unmap_enomem;
  612. if (pktsze > maxsze)
  613. pktsze = maxsze;
  614. destination ^= 1 << TD_TOKEN_TOGGLE; // toggle DATA0/1
  615. // Status, pktsze bytes of data
  616. fill_td (td, status, destination | ((pktsze - 1) << 21),
  617.  urb_priv->transfer_buffer_dma + (data - (char *)urb->transfer_buffer));
  618. insert_td (s, qh, td, UHCI_PTR_DEPTH * depth_first); // queue 'data stage'-td in qh
  619. data += pktsze;
  620. len -= pktsze;
  621. }
  622. /* Build the final TD for control status */
  623. /* It's only IN if the pipe is out AND we aren't expecting data */
  624. destination &= ~UHCI_PID;
  625. if (usb_pipeout (urb->pipe) || (urb->transfer_buffer_length == 0))
  626. destination |= USB_PID_IN;
  627. else
  628. destination |= USB_PID_OUT;
  629. destination |= 1 << TD_TOKEN_TOGGLE; /* End in Data1 */
  630. if (alloc_td (s, &td, UHCI_PTR_DEPTH))
  631. goto fail_unmap_enomem;
  632. status &=~TD_CTRL_SPD;
  633. /* no limit on errors on final packet , 0 bytes of data */
  634. fill_td (td, status | TD_CTRL_IOC, destination | (UHCI_NULL_DATA_SIZE << 21),
  635.  0);
  636. insert_td (s, qh, td, UHCI_PTR_DEPTH * depth_first); // queue status td
  637. list_add (&qh->desc_list, &urb_priv->desc_list);
  638. queue_urb (s, urb); // queue before inserting in desc chain
  639. qh->hw.qh.element &= cpu_to_le32(~UHCI_PTR_TERM);
  640. //uhci_show_queue(qh);
  641. /* Start it up... put low speed first */
  642. if (urb->pipe & TD_CTRL_LS)
  643. insert_qh (s, s->control_chain, qh, 0);
  644. else
  645. insert_qh (s, s->bulk_chain, qh, 0);
  646. dbg("uhci_submit_control end");
  647. return 0;
  648. fail_unmap_enomem:
  649. delete_qh(s, qh);
  650. return -ENOMEM;
  651. }
  652. /*-------------------------------------------------------------------*/
  653. // For queued bulk transfers, two additional QH helpers are allocated (nqh, bqh)
  654. // Due to the linking with other bulk urbs, it has to be locked with urb_list_lock!
  655. _static int uhci_submit_bulk_urb (urb_t *urb, urb_t *bulk_urb)
  656. {
  657. uhci_t *s = (uhci_t*) urb->dev->bus->hcpriv;
  658. urb_priv_t *urb_priv = urb->hcpriv, *upriv, *bpriv=NULL;
  659. uhci_desc_t *qh, *td, *nqh=NULL, *bqh=NULL, *first_td=NULL;
  660. unsigned long destination, status;
  661. char *data;
  662. unsigned int pipe = urb->pipe;
  663. int maxsze = usb_maxpacket (urb->dev, pipe, usb_pipeout (pipe));
  664. int info, len, last;
  665. int depth_first=USE_BULK_DEPTH_FIRST;  // UHCI descriptor chasing method
  666. if (usb_endpoint_halted (urb->dev, usb_pipeendpoint (pipe), usb_pipeout (pipe)))
  667. return -EPIPE;
  668. queue_dbg("uhci_submit_bulk_urb: urb %p, old %p, pipe %08x, len %i",
  669.   urb,bulk_urb,urb->pipe,urb->transfer_buffer_length);
  670. upriv = (urb_priv_t*)urb->hcpriv;
  671. if (!bulk_urb) {
  672. if (alloc_qh (s, &qh)) // get qh for this request
  673. return -ENOMEM;
  674. if (urb->transfer_flags & USB_QUEUE_BULK) {
  675. if (alloc_qh(s, &nqh)) // placeholder for clean unlink
  676. {
  677. delete_desc (s, qh);
  678. return -ENOMEM;
  679. }
  680. upriv->next_qh = nqh;
  681. queue_dbg("new next qh %p",nqh);
  682. }
  683. }
  684. else { 
  685. bpriv = (urb_priv_t*)bulk_urb->hcpriv;
  686. qh = bpriv->bottom_qh;  // re-use bottom qh and next qh
  687. nqh = bpriv->next_qh;
  688. upriv->next_qh=nqh;
  689. upriv->prev_queued_urb=bulk_urb;
  690. }
  691. if (urb->transfer_flags & USB_QUEUE_BULK) {
  692. if (alloc_qh (s, &bqh))  // "bottom" QH
  693. {
  694. if (!bulk_urb) { 
  695. delete_desc(s, qh);
  696. delete_desc(s, nqh);
  697. }
  698. return -ENOMEM;
  699. }
  700. set_qh_element(bqh, UHCI_PTR_TERM);
  701. set_qh_head(bqh, nqh->dma_addr | UHCI_PTR_QH); // element
  702. upriv->bottom_qh = bqh;
  703. }
  704. queue_dbg("uhci_submit_bulk: qh %p bqh %p nqh %p",qh, bqh, nqh);
  705. /* The "pipe" thing contains the destination in bits 8--18. */
  706. destination = (pipe & PIPE_DEVEP_MASK) | usb_packetid (pipe);
  707. /* 3 errors */
  708. status = (pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE |
  709. ((urb->transfer_flags & USB_DISABLE_SPD) ? 0 : TD_CTRL_SPD) | (3 << 27);
  710. /* Build the TDs for the bulk request */
  711. len = urb->transfer_buffer_length;
  712. data = urb->transfer_buffer;
  713. do { // TBD: Really allow zero-length packets?
  714. int pktsze = len;
  715. if (alloc_td (s, &td, UHCI_PTR_DEPTH * depth_first))
  716. {
  717. delete_qh (s, qh);
  718. return -ENOMEM;
  719. }
  720. if (pktsze > maxsze)
  721. pktsze = maxsze;
  722. // pktsze bytes of data 
  723. info = destination | (((pktsze - 1)&UHCI_NULL_DATA_SIZE) << 21) |
  724. (usb_gettoggle (urb->dev, usb_pipeendpoint (pipe), usb_pipeout (pipe)) << TD_TOKEN_TOGGLE);
  725. fill_td (td, status, info,
  726.  urb_priv->transfer_buffer_dma + (data - (char *)urb->transfer_buffer));
  727. data += pktsze;
  728. len -= pktsze;
  729. // Use USB_ZERO_PACKET to finish bulk OUTs always with a zero length packet
  730. last = (len == 0 && (usb_pipein(pipe) || pktsze < maxsze || !(urb->transfer_flags & USB_ZERO_PACKET)));
  731. if (last)
  732. set_td_ioc(td); // last one generates INT
  733. insert_td (s, qh, td, UHCI_PTR_DEPTH * depth_first);
  734. if (!first_td)
  735. first_td=td;
  736. usb_dotoggle (urb->dev, usb_pipeendpoint (pipe), usb_pipeout (pipe));
  737. } while (!last);
  738. if (bulk_urb && bpriv)   // everything went OK, link with old bulk URB
  739. bpriv->next_queued_urb=urb;
  740. list_add (&qh->desc_list, &urb_priv->desc_list);
  741. if (urb->transfer_flags & USB_QUEUE_BULK)
  742. append_qh(s, td, bqh, UHCI_PTR_DEPTH * depth_first);
  743. queue_urb_unlocked (s, urb);
  744. if (urb->transfer_flags & USB_QUEUE_BULK)
  745. set_qh_element(qh, first_td->dma_addr);
  746. else
  747. qh->hw.qh.element &= cpu_to_le32(~UHCI_PTR_TERM);    // arm QH
  748. if (!bulk_urb) {  // new bulk queue
  749. if (urb->transfer_flags & USB_QUEUE_BULK) {
  750. spin_lock (&s->td_lock); // both QHs in one go
  751. insert_qh (s, s->chain_end, qh, 0); // Main QH
  752. insert_qh (s, s->chain_end, nqh, 0); // Helper QH
  753. spin_unlock (&s->td_lock);
  754. }
  755. else
  756. insert_qh (s, s->chain_end, qh, 0);
  757. }
  758. //uhci_show_queue(s->bulk_chain);
  759. //dbg("uhci_submit_bulk_urb: exitn");
  760. return 0;
  761. }
  762. /*-------------------------------------------------------------------*/
  763. _static void uhci_clean_iso_step1(uhci_t *s, urb_priv_t *urb_priv)
  764. {
  765. struct list_head *p;
  766. uhci_desc_t *td;
  767. for (p = urb_priv->desc_list.next; p != &urb_priv->desc_list; p = p->next) {
  768. td = list_entry (p, uhci_desc_t, desc_list);
  769. unlink_td (s, td, 1);
  770. }
  771. }
  772. /*-------------------------------------------------------------------*/
  773. _static void uhci_clean_iso_step2(uhci_t *s, urb_priv_t *urb_priv)
  774. {
  775. struct list_head *p;
  776. uhci_desc_t *td;
  777. while ((p = urb_priv->desc_list.next) != &urb_priv->desc_list) {
  778. td = list_entry (p, uhci_desc_t, desc_list);
  779. list_del (p);
  780. delete_desc (s, td);
  781. }
  782. }
  783. /*-------------------------------------------------------------------*/
  784. /* mode: CLEAN_TRANSFER_NO_DELETION: unlink but no deletion mark (step 1 of async_unlink)
  785.          CLEAN_TRANSFER_REGULAR: regular (unlink/delete-mark)
  786.          CLEAN_TRANSFER_DELETION_MARK: deletion mark for QH (step 2 of async_unlink)
  787.  looks a bit complicated because of all the bulk queueing goodies
  788. */
  789. _static void uhci_clean_transfer (uhci_t *s, urb_t *urb, uhci_desc_t *qh, int mode)
  790. {
  791. uhci_desc_t *bqh, *nqh, *prevqh, *prevtd;
  792. int now;
  793. urb_priv_t *priv=(urb_priv_t*)urb->hcpriv;
  794. now=UHCI_GET_CURRENT_FRAME(s);
  795. bqh=priv->bottom_qh;
  796. if (!priv->next_queued_urb)  { // no more appended bulk queues
  797. queue_dbg("uhci_clean_transfer: No more bulks for urb %p, qh %p, bqh %p, nqh %p", urb, qh, bqh, priv->next_qh);
  798. if (priv->prev_queued_urb && mode != CLEAN_TRANSFER_DELETION_MARK) {  // qh not top of the queue
  799. unsigned long flags; 
  800. urb_priv_t* ppriv=(urb_priv_t*)priv->prev_queued_urb->hcpriv;
  801. spin_lock_irqsave (&s->qh_lock, flags);
  802. prevqh = list_entry (ppriv->desc_list.next, uhci_desc_t, desc_list);
  803. prevtd = list_entry (prevqh->vertical.prev, uhci_desc_t, vertical);
  804. set_td_link(prevtd, priv->bottom_qh->dma_addr | UHCI_PTR_QH); // skip current qh
  805. mb();
  806. queue_dbg("uhci_clean_transfer: relink pqh %p, ptd %p",prevqh, prevtd);
  807. spin_unlock_irqrestore (&s->qh_lock, flags);
  808. ppriv->bottom_qh = priv->bottom_qh;
  809. ppriv->next_queued_urb = NULL;
  810. }
  811. else {   // queue is dead, qh is top of the queue
  812. if (mode != CLEAN_TRANSFER_DELETION_MARK) 
  813. unlink_qh(s, qh); // remove qh from horizontal chain
  814. if (bqh) {  // remove remainings of bulk queue
  815. nqh=priv->next_qh;
  816. if (mode != CLEAN_TRANSFER_DELETION_MARK) 
  817. unlink_qh(s, nqh);  // remove nqh from horizontal chain
  818. if (mode != CLEAN_TRANSFER_NO_DELETION) {  // add helper QHs to free desc list
  819. nqh->last_used = bqh->last_used = now;
  820. list_add_tail (&nqh->horizontal, &s->free_desc);
  821. list_add_tail (&bqh->horizontal, &s->free_desc);
  822. }
  823. }
  824. }
  825. }
  826. else { // there are queued urbs following
  827.   queue_dbg("uhci_clean_transfer: urb %p, prevurb %p, nexturb %p, qh %p, bqh %p, nqh %p",
  828.        urb, priv->prev_queued_urb,  priv->next_queued_urb, qh, bqh, priv->next_qh);
  829.        
  830. if (mode != CLEAN_TRANSFER_DELETION_MARK) { // no work for cleanup at unlink-completion
  831. urb_t *nurb;
  832. unsigned long flags;
  833. nurb = priv->next_queued_urb;
  834. spin_lock_irqsave (&s->qh_lock, flags);
  835. if (!priv->prev_queued_urb) { // top QH
  836. prevqh = list_entry (qh->horizontal.prev, uhci_desc_t, horizontal);
  837. set_qh_head(prevqh, bqh->dma_addr | UHCI_PTR_QH);
  838. list_del (&qh->horizontal);  // remove this qh form horizontal chain
  839. list_add (&bqh->horizontal, &prevqh->horizontal); // insert next bqh in horizontal chain
  840. }
  841. else { // intermediate QH
  842. urb_priv_t* ppriv=(urb_priv_t*)priv->prev_queued_urb->hcpriv;
  843. urb_priv_t* npriv=(urb_priv_t*)nurb->hcpriv;
  844. uhci_desc_t * bnqh;
  845. bnqh = list_entry (npriv->desc_list.next, uhci_desc_t, desc_list);
  846. ppriv->bottom_qh = bnqh;
  847. ppriv->next_queued_urb = nurb;
  848. prevqh = list_entry (ppriv->desc_list.next, uhci_desc_t, desc_list);
  849. set_qh_head(prevqh, bqh->dma_addr | UHCI_PTR_QH);
  850. }
  851. mb();
  852. ((urb_priv_t*)nurb->hcpriv)->prev_queued_urb=priv->prev_queued_urb;
  853. spin_unlock_irqrestore (&s->qh_lock, flags);
  854. }
  855. }
  856. if (mode != CLEAN_TRANSFER_NO_DELETION) {
  857. qh->last_used = now;
  858. list_add_tail (&qh->horizontal, &s->free_desc); // mark qh for later deletion/kfree
  859. }
  860. }
  861. /*-------------------------------------------------------------------*/
  862. // Release bandwidth for Interrupt or Isoc. transfers 
  863. _static void uhci_release_bandwidth(urb_t *urb)
  864. {       
  865. if (urb->bandwidth) {
  866. switch (usb_pipetype(urb->pipe)) {
  867. case PIPE_INTERRUPT:
  868. usb_release_bandwidth (urb->dev, urb, 0);
  869. break;
  870. case PIPE_ISOCHRONOUS:
  871. usb_release_bandwidth (urb->dev, urb, 1);
  872. break;
  873. default:
  874. break;
  875. }
  876. }
  877. }
  878. _static void uhci_urb_dma_sync(uhci_t *s, urb_t *urb, urb_priv_t *urb_priv)
  879. {
  880. if (urb_priv->setup_packet_dma)
  881. pci_dma_sync_single(s->uhci_pci, urb_priv->setup_packet_dma,
  882.     sizeof(devrequest), PCI_DMA_TODEVICE);
  883. if (urb_priv->transfer_buffer_dma)
  884. pci_dma_sync_single(s->uhci_pci, urb_priv->transfer_buffer_dma,
  885.     urb->transfer_buffer_length,
  886.     usb_pipein(urb->pipe) ?
  887.     PCI_DMA_FROMDEVICE :
  888.     PCI_DMA_TODEVICE);
  889. }
  890. _static void uhci_urb_dma_unmap(uhci_t *s, urb_t *urb, urb_priv_t *urb_priv)
  891. {
  892. if (urb_priv->setup_packet_dma) {
  893. pci_unmap_single(s->uhci_pci, urb_priv->setup_packet_dma,
  894.  sizeof(devrequest), PCI_DMA_TODEVICE);
  895. urb_priv->setup_packet_dma = 0;
  896. }
  897. if (urb_priv->transfer_buffer_dma) {
  898. pci_unmap_single(s->uhci_pci, urb_priv->transfer_buffer_dma,
  899.  urb->transfer_buffer_length,
  900.  usb_pipein(urb->pipe) ?
  901.  PCI_DMA_FROMDEVICE :
  902.  PCI_DMA_TODEVICE);
  903. urb_priv->transfer_buffer_dma = 0;
  904. }
  905. }
  906. /*-------------------------------------------------------------------*/
  907. /* needs urb_list_lock!
  908.    mode: UNLINK_ASYNC_STORE_URB: unlink and move URB into unlinked list
  909.          UNLINK_ASYNC_DONT_STORE: unlink, don't move URB into unlinked list
  910. */
  911. _static int uhci_unlink_urb_async (uhci_t *s,urb_t *urb, int mode)
  912. {
  913. uhci_desc_t *qh;
  914. urb_priv_t *urb_priv;
  915. async_dbg("unlink_urb_async called %p",urb);
  916. if ((urb->status == -EINPROGRESS) ||
  917.     ((usb_pipetype (urb->pipe) ==  PIPE_INTERRUPT) && ((urb_priv_t*)urb->hcpriv)->flags))
  918. {
  919. ((urb_priv_t*)urb->hcpriv)->started = ~0;  // mark
  920. dequeue_urb (s, urb);
  921. if (mode==UNLINK_ASYNC_STORE_URB)
  922. list_add_tail (&urb->urb_list, &s->urb_unlinked); // store urb
  923. uhci_switch_timer_int(s);
  924.         s->unlink_urb_done = 1;
  925. uhci_release_bandwidth(urb);
  926. urb->status = -ECONNABORTED; // mark urb as "waiting to be killed"
  927. urb_priv = (urb_priv_t*)urb->hcpriv;
  928. switch (usb_pipetype (urb->pipe)) {
  929. case PIPE_INTERRUPT:
  930. usb_dotoggle (urb->dev, usb_pipeendpoint (urb->pipe), usb_pipeout (urb->pipe));
  931. case PIPE_ISOCHRONOUS:
  932. uhci_clean_iso_step1 (s, urb_priv);
  933. break;
  934. case PIPE_BULK:
  935. case PIPE_CONTROL:
  936. qh = list_entry (urb_priv->desc_list.next, uhci_desc_t, desc_list);
  937. uhci_clean_transfer (s, urb, qh, CLEAN_TRANSFER_NO_DELETION);
  938. break;
  939. }
  940. ((urb_priv_t*)urb->hcpriv)->started = UHCI_GET_CURRENT_FRAME(s);
  941. return -EINPROGRESS;  // completion will follow
  942. }
  943. return 0;    // URB already dead
  944. }
  945. /*-------------------------------------------------------------------*/
  946. // kills an urb by unlinking descriptors and waiting for at least one frame
  947. _static int uhci_unlink_urb_sync (uhci_t *s, urb_t *urb)
  948. {
  949. uhci_desc_t *qh;
  950. urb_priv_t *urb_priv;
  951. unsigned long flags=0;
  952. struct usb_device *usb_dev;
  953. spin_lock_irqsave (&s->urb_list_lock, flags);
  954. if (urb->status == -EINPROGRESS) {
  955. // move descriptors out the the running chains, dequeue urb
  956. uhci_unlink_urb_async(s, urb, UNLINK_ASYNC_DONT_STORE);
  957. urb_priv = urb->hcpriv;
  958. urb->status = -ENOENT; // prevent from double deletion after unlock
  959. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  960. // cleanup the rest
  961. switch (usb_pipetype (urb->pipe)) {
  962. case PIPE_INTERRUPT:
  963. case PIPE_ISOCHRONOUS:
  964. uhci_wait_ms(1);
  965. uhci_clean_iso_step2(s, urb_priv);
  966. break;
  967. case PIPE_BULK:
  968. case PIPE_CONTROL:
  969. qh = list_entry (urb_priv->desc_list.next, uhci_desc_t, desc_list);
  970. uhci_clean_transfer(s, urb, qh, CLEAN_TRANSFER_DELETION_MARK);
  971. uhci_wait_ms(1);
  972. }
  973. urb->status = -ENOENT; // mark urb as killed
  974. uhci_urb_dma_unmap(s, urb, urb->hcpriv);
  975. #ifdef DEBUG_SLAB
  976. kmem_cache_free (urb_priv_kmem, urb->hcpriv);
  977. #else
  978. kfree (urb->hcpriv);
  979. #endif
  980. usb_dev = urb->dev;
  981. if (urb->complete) {
  982. dbg("unlink_urb: calling completion");
  983. urb->dev = NULL;
  984. urb->complete ((struct urb *) urb);
  985. }
  986. usb_dec_dev_use (usb_dev);
  987. }
  988. else
  989. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  990. return 0;
  991. }
  992. /*-------------------------------------------------------------------*/
  993. // async unlink_urb completion/cleanup work
  994. // has to be protected by urb_list_lock!
  995. // features: if set in transfer_flags, the resulting status of the killed
  996. // transaction is not overwritten
  997. _static void uhci_cleanup_unlink(uhci_t *s, int force)
  998. {
  999. struct list_head *q;
  1000. urb_t *urb;
  1001. struct usb_device *dev;
  1002. int now, type;
  1003. urb_priv_t *urb_priv;
  1004. q=s->urb_unlinked.next;
  1005. now=UHCI_GET_CURRENT_FRAME(s);
  1006. while (q != &s->urb_unlinked) {
  1007. urb = list_entry (q, urb_t, urb_list);
  1008. urb_priv = (urb_priv_t*)urb->hcpriv;
  1009. q = urb->urb_list.next;
  1010. if (!urb_priv) // avoid crash when URB is corrupted
  1011. break;
  1012. if (force || ((urb_priv->started != ~0) && (urb_priv->started != now))) {
  1013. async_dbg("async cleanup %p",urb);
  1014. type=usb_pipetype (urb->pipe);
  1015. switch (type) { // process descriptors
  1016. case PIPE_CONTROL:
  1017. process_transfer (s, urb, CLEAN_TRANSFER_DELETION_MARK);  // don't unlink (already done)
  1018. break;
  1019. case PIPE_BULK:
  1020. if (!s->avoid_bulk.counter)
  1021. process_transfer (s, urb, CLEAN_TRANSFER_DELETION_MARK); // don't unlink (already done)
  1022. else
  1023. continue;
  1024. break;
  1025. case PIPE_ISOCHRONOUS:
  1026. process_iso (s, urb, PROCESS_ISO_FORCE); // force, don't unlink
  1027. break;
  1028. case PIPE_INTERRUPT:
  1029. process_interrupt (s, urb);
  1030. break;
  1031. }
  1032. if (!(urb->transfer_flags & USB_TIMEOUT_KILLED))
  1033.    urb->status = -ECONNRESET; // mark as asynchronously killed
  1034. dev = urb->dev; // completion may destroy all...
  1035. urb_priv = urb->hcpriv;
  1036. list_del (&urb->urb_list);
  1037. uhci_urb_dma_sync(s, urb, urb_priv);
  1038. if (urb->complete) {
  1039. spin_unlock(&s->urb_list_lock);
  1040. urb->dev = NULL;
  1041. urb->complete ((struct urb *) urb);
  1042. spin_lock(&s->urb_list_lock);
  1043. }
  1044. if (!(urb->transfer_flags & USB_TIMEOUT_KILLED))
  1045. urb->status = -ENOENT;  // now the urb is really dead
  1046. switch (type) {
  1047. case PIPE_ISOCHRONOUS:
  1048. case PIPE_INTERRUPT:
  1049. uhci_clean_iso_step2(s, urb_priv);
  1050. break;
  1051. }
  1052. uhci_urb_dma_unmap(s, urb, urb_priv);
  1053. usb_dec_dev_use (dev);
  1054. #ifdef DEBUG_SLAB
  1055. kmem_cache_free (urb_priv_kmem, urb_priv);
  1056. #else
  1057. kfree (urb_priv);
  1058. #endif
  1059. }
  1060. }
  1061. }
  1062.  
  1063. /*-------------------------------------------------------------------*/
  1064. _static int uhci_unlink_urb (urb_t *urb)
  1065. {
  1066. uhci_t *s;
  1067. unsigned long flags=0;
  1068. dbg("uhci_unlink_urb called for %p",urb);
  1069. if (!urb || !urb->dev) // you never know...
  1070. return -EINVAL;
  1071. s = (uhci_t*) urb->dev->bus->hcpriv;
  1072. if (usb_pipedevice (urb->pipe) == s->rh.devnum)
  1073. return rh_unlink_urb (urb);
  1074. if (!urb->hcpriv)
  1075. return -EINVAL;
  1076. if (urb->transfer_flags & USB_ASYNC_UNLINK) {
  1077. int ret;
  1078.         spin_lock_irqsave (&s->urb_list_lock, flags);
  1079.        
  1080. uhci_release_bandwidth(urb);
  1081. ret = uhci_unlink_urb_async(s, urb, UNLINK_ASYNC_STORE_URB);
  1082. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  1083. return ret;
  1084. }
  1085. else
  1086. return uhci_unlink_urb_sync(s, urb);
  1087. }
  1088. /*-------------------------------------------------------------------*/
  1089. // In case of ASAP iso transfer, search the URB-list for already queued URBs
  1090. // for this EP and calculate the earliest start frame for the new
  1091. // URB (easy seamless URB continuation!)
  1092. _static int find_iso_limits (urb_t *urb, unsigned int *start, unsigned int *end)
  1093. {
  1094. urb_t *u, *last_urb = NULL;
  1095. uhci_t *s = (uhci_t*) urb->dev->bus->hcpriv;
  1096. struct list_head *p;
  1097. int ret=-1;
  1098. unsigned long flags;
  1099. spin_lock_irqsave (&s->urb_list_lock, flags);
  1100. p=s->urb_list.prev;
  1101. for (; p != &s->urb_list; p = p->prev) {
  1102. u = list_entry (p, urb_t, urb_list);
  1103. // look for pending URBs with identical pipe handle
  1104. // works only because iso doesn't toggle the data bit!
  1105. if ((urb->pipe == u->pipe) && (urb->dev == u->dev) && (u->status == -EINPROGRESS)) {
  1106. if (!last_urb)
  1107. *start = u->start_frame;
  1108. last_urb = u;
  1109. }
  1110. }
  1111. if (last_urb) {
  1112. *end = (last_urb->start_frame + last_urb->number_of_packets) & 1023;
  1113. ret=0;
  1114. }
  1115. spin_unlock_irqrestore(&s->urb_list_lock, flags);
  1116. return ret;
  1117. }
  1118. /*-------------------------------------------------------------------*/
  1119. // adjust start_frame according to scheduling constraints (ASAP etc)
  1120. _static int iso_find_start (urb_t *urb)
  1121. {
  1122. uhci_t *s = (uhci_t*) urb->dev->bus->hcpriv;
  1123. unsigned int now;
  1124. unsigned int start_limit = 0, stop_limit = 0, queued_size;
  1125. int limits;
  1126. now = UHCI_GET_CURRENT_FRAME (s) & 1023;
  1127. if ((unsigned) urb->number_of_packets > 900)
  1128. return -EFBIG;
  1129. limits = find_iso_limits (urb, &start_limit, &stop_limit);
  1130. queued_size = (stop_limit - start_limit) & 1023;
  1131. if (urb->transfer_flags & USB_ISO_ASAP) {
  1132. // first iso
  1133. if (limits) {
  1134. // 10ms setup should be enough //FIXME!
  1135. urb->start_frame = (now + 10) & 1023;
  1136. }
  1137. else {
  1138. urb->start_frame = stop_limit; //seamless linkage
  1139. if (((now - urb->start_frame) & 1023) <= (unsigned) urb->number_of_packets) {
  1140. info("iso_find_start: gap in seamless isochronous scheduling");
  1141. dbg("iso_find_start: now %u start_frame %u number_of_packets %u pipe 0x%08x",
  1142. now, urb->start_frame, urb->number_of_packets, urb->pipe);
  1143. urb->start_frame = (now + 5) & 1023; // 5ms setup should be enough //FIXME!
  1144. }
  1145. }
  1146. }
  1147. else {
  1148. urb->start_frame &= 1023;
  1149. if (((now - urb->start_frame) & 1023) < (unsigned) urb->number_of_packets) {
  1150. dbg("iso_find_start: now between start_frame and end");
  1151. return -EAGAIN;
  1152. }
  1153. }
  1154. /* check if either start_frame or start_frame+number_of_packets-1 lies between start_limit and stop_limit */
  1155. if (limits)
  1156. return 0;
  1157. if (((urb->start_frame - start_limit) & 1023) < queued_size ||
  1158.     ((urb->start_frame + urb->number_of_packets - 1 - start_limit) & 1023) < queued_size) {
  1159. dbg("iso_find_start: start_frame %u number_of_packets %u start_limit %u stop_limit %u",
  1160. urb->start_frame, urb->number_of_packets, start_limit, stop_limit);
  1161. return -EAGAIN;
  1162. }
  1163. return 0;
  1164. }
  1165. /*-------------------------------------------------------------------*/
  1166. // submits USB interrupt (ie. polling ;-) 
  1167. // ASAP-flag set implicitely
  1168. // if period==0, the transfer is only done once
  1169. _static int uhci_submit_int_urb (urb_t *urb)
  1170. {
  1171. uhci_t *s = (uhci_t*) urb->dev->bus->hcpriv;
  1172. urb_priv_t *urb_priv = urb->hcpriv;
  1173. int nint, n;
  1174. uhci_desc_t *td;
  1175. int status, destination;
  1176. int info;
  1177. unsigned int pipe = urb->pipe;
  1178. if (urb->interval < 0 || urb->interval >= 256)
  1179. return -EINVAL;
  1180. if (urb->interval == 0)
  1181. nint = 0;
  1182. else {
  1183. for (nint = 0, n = 1; nint <= 8; nint++, n += n) // round interval down to 2^n
  1184.  {
  1185. if (urb->interval < n) {
  1186. urb->interval = n / 2;
  1187. break;
  1188. }
  1189. }
  1190. nint--;
  1191. }
  1192. dbg("Rounded interval to %i, chain  %i", urb->interval, nint);
  1193. urb->start_frame = UHCI_GET_CURRENT_FRAME (s) & 1023; // remember start frame, just in case...
  1194. urb->number_of_packets = 1;
  1195. // INT allows only one packet
  1196. if (urb->transfer_buffer_length > usb_maxpacket (urb->dev, pipe, usb_pipeout (pipe)))
  1197. return -EINVAL;
  1198. if (alloc_td (s, &td, UHCI_PTR_DEPTH))
  1199. return -ENOMEM;
  1200. status = (pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE | TD_CTRL_IOC |
  1201. (urb->transfer_flags & USB_DISABLE_SPD ? 0 : TD_CTRL_SPD) | (3 << 27);
  1202. destination = (urb->pipe & PIPE_DEVEP_MASK) | usb_packetid (urb->pipe) |
  1203. (((urb->transfer_buffer_length - 1) & 0x7ff) << 21);
  1204. info = destination | (usb_gettoggle (urb->dev, usb_pipeendpoint (pipe), usb_pipeout (pipe)) << TD_TOKEN_TOGGLE);
  1205. fill_td (td, status, info, urb_priv->transfer_buffer_dma);
  1206. list_add_tail (&td->desc_list, &urb_priv->desc_list);
  1207. queue_urb (s, urb);
  1208. insert_td_horizontal (s, s->int_chain[nint], td); // store in INT-TDs
  1209. usb_dotoggle (urb->dev, usb_pipeendpoint (pipe), usb_pipeout (pipe));
  1210. return 0;
  1211. }
  1212. /*-------------------------------------------------------------------*/
  1213. _static int uhci_submit_iso_urb (urb_t *urb)
  1214. {
  1215. uhci_t *s = (uhci_t*) urb->dev->bus->hcpriv;
  1216. urb_priv_t *urb_priv = urb->hcpriv;
  1217. #ifdef ISO_SANITY_CHECK
  1218. int pipe=urb->pipe;
  1219. int maxsze = usb_maxpacket (urb->dev, pipe, usb_pipeout (pipe));
  1220. #endif
  1221. int n, ret, last=0;
  1222. uhci_desc_t *td, **tdm;
  1223. int status, destination;
  1224. unsigned long flags;
  1225. __save_flags(flags);
  1226. __cli();       // Disable IRQs to schedule all ISO-TDs in time
  1227. ret = iso_find_start (urb); // adjusts urb->start_frame for later use
  1228. if (ret)
  1229. goto err;
  1230. tdm = (uhci_desc_t **) kmalloc (urb->number_of_packets * sizeof (uhci_desc_t*), KMALLOC_FLAG);
  1231. if (!tdm) {
  1232. ret = -ENOMEM;
  1233. goto err;
  1234. }
  1235. memset(tdm, 0, urb->number_of_packets * sizeof (uhci_desc_t*));
  1236. // First try to get all TDs. Cause: Removing already inserted TDs can only be done 
  1237. // racefree in three steps: unlink TDs, wait one frame, delete TDs. 
  1238. // So, this solutions seems simpler...
  1239. for (n = 0; n < urb->number_of_packets; n++) {
  1240. dbg("n:%d urb->iso_frame_desc[n].length:%d", n, urb->iso_frame_desc[n].length);
  1241. if (!urb->iso_frame_desc[n].length)
  1242. continue;  // allows ISO striping by setting length to zero in iso_descriptor
  1243. #ifdef ISO_SANITY_CHECK
  1244. if(urb->iso_frame_desc[n].length > maxsze) {
  1245. err("submit_iso: urb->iso_frame_desc[%d].length(%d)>%d",n , urb->iso_frame_desc[n].length, maxsze);
  1246. ret=-EINVAL;
  1247. }
  1248. else
  1249. #endif
  1250. if (alloc_td (s, &td, UHCI_PTR_DEPTH)) {
  1251. int i; // Cleanup allocated TDs
  1252. for (i = 0; i < n; n++)
  1253. if (tdm[i])
  1254.  delete_desc(s, tdm[i]);
  1255. kfree (tdm);
  1256. goto err;
  1257. }
  1258. last=n;
  1259. tdm[n] = td;
  1260. }
  1261. status = TD_CTRL_ACTIVE | TD_CTRL_IOS;
  1262. destination = (urb->pipe & PIPE_DEVEP_MASK) | usb_packetid (urb->pipe);
  1263. // Queue all allocated TDs
  1264. for (n = 0; n < urb->number_of_packets; n++) {
  1265. td = tdm[n];
  1266. if (!td)
  1267. continue;
  1268. if (n  == last) {
  1269. status |= TD_CTRL_IOC;
  1270. queue_urb (s, urb);
  1271. }
  1272. fill_td (td, status, destination | (((urb->iso_frame_desc[n].length - 1) & 0x7ff) << 21),
  1273.  urb_priv->transfer_buffer_dma + urb->iso_frame_desc[n].offset);
  1274. list_add_tail (&td->desc_list, &urb_priv->desc_list);
  1275. insert_td_horizontal (s, s->iso_td[(urb->start_frame + n) & 1023], td); // store in iso-tds
  1276. }
  1277. kfree (tdm);
  1278. dbg("ISO-INT# %i, start %i, now %i", urb->number_of_packets, urb->start_frame, UHCI_GET_CURRENT_FRAME (s) & 1023);
  1279. ret = 0;
  1280.       err:
  1281. __restore_flags(flags);
  1282. return ret;
  1283. }
  1284. /*-------------------------------------------------------------------*/
  1285. // returns: 0 (no transfer queued), urb* (this urb already queued)
  1286.  
  1287. _static urb_t* search_dev_ep (uhci_t *s, urb_t *urb)
  1288. {
  1289. struct list_head *p;
  1290. urb_t *tmp;
  1291. unsigned int mask = usb_pipecontrol(urb->pipe) ? (~USB_DIR_IN) : (~0);
  1292. dbg("search_dev_ep:");
  1293. p=s->urb_list.next;
  1294. for (; p != &s->urb_list; p = p->next) {
  1295. tmp = list_entry (p, urb_t, urb_list);
  1296. dbg("urb: %p", tmp);
  1297. // we can accept this urb if it is not queued at this time 
  1298. // or if non-iso transfer requests should be scheduled for the same device and pipe
  1299. if ((!usb_pipeisoc(urb->pipe) && (tmp->dev == urb->dev) && !((tmp->pipe ^ urb->pipe) & mask)) ||
  1300.     (urb == tmp)) {
  1301. return tmp; // found another urb already queued for processing
  1302. }
  1303. }
  1304. return 0;
  1305. }
  1306. /*-------------------------------------------------------------------*/
  1307. _static int uhci_submit_urb (urb_t *urb)
  1308. {
  1309. uhci_t *s;
  1310. urb_priv_t *urb_priv;
  1311. int ret = 0, type;
  1312. unsigned long flags;
  1313. urb_t *queued_urb=NULL;
  1314. int bustime;
  1315. if (!urb->dev || !urb->dev->bus)
  1316. return -ENODEV;
  1317. s = (uhci_t*) urb->dev->bus->hcpriv;
  1318. //dbg("submit_urb: %p type %d",urb,usb_pipetype(urb->pipe));
  1319. if (!s->running)
  1320. return -ENODEV;
  1321. type = usb_pipetype (urb->pipe);
  1322. if (usb_pipedevice (urb->pipe) == s->rh.devnum)
  1323. return rh_submit_urb (urb); /* virtual root hub */
  1324. // Sanity checks
  1325. if (usb_maxpacket (urb->dev, urb->pipe, usb_pipeout (urb->pipe)) <= 0) {
  1326. err("uhci_submit_urb: pipesize for pipe %x is zero", urb->pipe);
  1327. return -EMSGSIZE;
  1328. }
  1329. if (urb->transfer_buffer_length < 0 && type != PIPE_ISOCHRONOUS) {
  1330. err("uhci_submit_urb: Negative transfer length for urb %p", urb);
  1331. return -EINVAL;
  1332. }
  1333. usb_inc_dev_use (urb->dev);
  1334. spin_lock_irqsave (&s->urb_list_lock, flags);
  1335. queued_urb = search_dev_ep (s, urb); // returns already queued urb for that pipe
  1336. if (queued_urb) {
  1337. queue_dbg("found bulk urb %pn", queued_urb);
  1338. if (( type != PIPE_BULK) ||
  1339.     ((type == PIPE_BULK) &&
  1340.      (!(urb->transfer_flags & USB_QUEUE_BULK) || !(queued_urb->transfer_flags & USB_QUEUE_BULK)))) {
  1341. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  1342. usb_dec_dev_use (urb->dev);
  1343. err("ENXIO %08x, flags %x, urb %p, burb %p",urb->pipe,urb->transfer_flags,urb,queued_urb);
  1344. return -ENXIO; // urb already queued
  1345. }
  1346. }
  1347. #ifdef DEBUG_SLAB
  1348. urb_priv = kmem_cache_alloc(urb_priv_kmem, SLAB_FLAG);
  1349. #else
  1350. urb_priv = kmalloc (sizeof (urb_priv_t), KMALLOC_FLAG);
  1351. #endif
  1352. if (!urb_priv) {
  1353. usb_dec_dev_use (urb->dev);
  1354. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  1355. return -ENOMEM;
  1356. }
  1357. memset(urb_priv, 0, sizeof(urb_priv_t));
  1358. urb->hcpriv = urb_priv;
  1359. INIT_LIST_HEAD (&urb_priv->desc_list);
  1360. dbg("submit_urb: scheduling %p", urb);
  1361. if (type == PIPE_CONTROL)
  1362. urb_priv->setup_packet_dma = pci_map_single(s->uhci_pci, urb->setup_packet,
  1363.     sizeof(devrequest), PCI_DMA_TODEVICE);
  1364. if (urb->transfer_buffer_length)
  1365. urb_priv->transfer_buffer_dma = pci_map_single(s->uhci_pci,
  1366.        urb->transfer_buffer,
  1367.        urb->transfer_buffer_length,
  1368.        usb_pipein(urb->pipe) ?
  1369.        PCI_DMA_FROMDEVICE :
  1370.        PCI_DMA_TODEVICE);
  1371. if (type == PIPE_BULK) {
  1372. if (queued_urb) {
  1373. while (((urb_priv_t*)queued_urb->hcpriv)->next_queued_urb)  // find last queued bulk
  1374. queued_urb=((urb_priv_t*)queued_urb->hcpriv)->next_queued_urb;
  1375. ((urb_priv_t*)queued_urb->hcpriv)->next_queued_urb=urb;
  1376. }
  1377. atomic_inc (&s->avoid_bulk);
  1378. ret = uhci_submit_bulk_urb (urb, queued_urb);
  1379. atomic_dec (&s->avoid_bulk);
  1380. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  1381. }
  1382. else {
  1383. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  1384. switch (type) {
  1385. case PIPE_ISOCHRONOUS:
  1386. if (urb->bandwidth == 0) {      /* not yet checked/allocated */
  1387. if (urb->number_of_packets <= 0) {
  1388. ret = -EINVAL;
  1389. break;
  1390. }
  1391. bustime = usb_check_bandwidth (urb->dev, urb);
  1392. if (bustime < 0) 
  1393. ret = bustime;
  1394. else {
  1395. ret = uhci_submit_iso_urb(urb);
  1396. if (ret == 0)
  1397. usb_claim_bandwidth (urb->dev, urb, bustime, 1);
  1398. }
  1399. } else {        /* bandwidth is already set */
  1400. ret = uhci_submit_iso_urb(urb);
  1401. }
  1402. break;
  1403. case PIPE_INTERRUPT:
  1404. if (urb->bandwidth == 0) {      /* not yet checked/allocated */
  1405. bustime = usb_check_bandwidth (urb->dev, urb);
  1406. if (bustime < 0)
  1407. ret = bustime;
  1408. else {
  1409. ret = uhci_submit_int_urb(urb);
  1410. if (ret == 0)
  1411. usb_claim_bandwidth (urb->dev, urb, bustime, 0);
  1412. }
  1413. } else {        /* bandwidth is already set */
  1414. ret = uhci_submit_int_urb(urb);
  1415. }
  1416. break;
  1417. case PIPE_CONTROL:
  1418. ret = uhci_submit_control_urb (urb);
  1419. break;
  1420. default:
  1421. ret = -EINVAL;
  1422. }
  1423. }
  1424. dbg("submit_urb: scheduled with ret: %d", ret);
  1425. if (ret != 0) {
  1426. uhci_urb_dma_unmap(s, urb, urb_priv);
  1427. usb_dec_dev_use (urb->dev);
  1428. #ifdef DEBUG_SLAB
  1429. kmem_cache_free(urb_priv_kmem, urb_priv);
  1430. #else
  1431. kfree (urb_priv);
  1432. #endif
  1433. return ret;
  1434. }
  1435. return 0;
  1436. }
  1437. // Checks for URB timeout and removes bandwidth reclamation if URB idles too long
  1438. _static void uhci_check_timeouts(uhci_t *s)
  1439. {
  1440. struct list_head *p,*p2;
  1441. urb_t *urb;
  1442. int type;
  1443. p = s->urb_list.prev;
  1444. while (p != &s->urb_list) {
  1445. urb_priv_t *hcpriv;
  1446. p2 = p;
  1447. p = p->prev;
  1448. urb = list_entry (p2, urb_t, urb_list);
  1449. type = usb_pipetype (urb->pipe);
  1450. hcpriv = (urb_priv_t*)urb->hcpriv;
  1451. if ( urb->timeout && time_after(jiffies, hcpriv->started + urb->timeout)) {
  1452. urb->transfer_flags |= USB_TIMEOUT_KILLED | USB_ASYNC_UNLINK;
  1453. async_dbg("uhci_check_timeout: timeout for %p",urb);
  1454. uhci_unlink_urb_async(s, urb, UNLINK_ASYNC_STORE_URB);
  1455. }
  1456. #ifdef CONFIG_USB_UHCI_HIGH_BANDWIDTH
  1457. else if (((type == PIPE_BULK) || (type == PIPE_CONTROL)) &&  
  1458.  (hcpriv->use_loop) && time_after(jiffies, hcpriv->started + IDLE_TIMEOUT))
  1459. disable_desc_loop(s, urb);
  1460. #endif
  1461. }
  1462. s->timeout_check=jiffies;
  1463. }
  1464. /*-------------------------------------------------------------------
  1465.  Virtual Root Hub
  1466.  -------------------------------------------------------------------*/
  1467. _static __u8 root_hub_dev_des[] =
  1468. {
  1469. 0x12, /*  __u8  bLength; */
  1470. 0x01, /*  __u8  bDescriptorType; Device */
  1471. 0x00, /*  __u16 bcdUSB; v1.0 */
  1472. 0x01,
  1473. 0x09, /*  __u8  bDeviceClass; HUB_CLASSCODE */
  1474. 0x00, /*  __u8  bDeviceSubClass; */
  1475. 0x00, /*  __u8  bDeviceProtocol; */
  1476. 0x08, /*  __u8  bMaxPacketSize0; 8 Bytes */
  1477. 0x00, /*  __u16 idVendor; */
  1478. 0x00,
  1479. 0x00, /*  __u16 idProduct; */
  1480. 0x00,
  1481. 0x00, /*  __u16 bcdDevice; */
  1482. 0x00,
  1483. 0x00, /*  __u8  iManufacturer; */
  1484. 0x02, /*  __u8  iProduct; */
  1485. 0x01, /*  __u8  iSerialNumber; */
  1486. 0x01 /*  __u8  bNumConfigurations; */
  1487. };
  1488. /* Configuration descriptor */
  1489. _static __u8 root_hub_config_des[] =
  1490. {
  1491. 0x09, /*  __u8  bLength; */
  1492. 0x02, /*  __u8  bDescriptorType; Configuration */
  1493. 0x19, /*  __u16 wTotalLength; */
  1494. 0x00,
  1495. 0x01, /*  __u8  bNumInterfaces; */
  1496. 0x01, /*  __u8  bConfigurationValue; */
  1497. 0x00, /*  __u8  iConfiguration; */
  1498. 0x40, /*  __u8  bmAttributes; 
  1499.    Bit 7: Bus-powered, 6: Self-powered, 5 Remote-wakwup, 4..0: resvd */
  1500. 0x00, /*  __u8  MaxPower; */
  1501.      /* interface */
  1502. 0x09, /*  __u8  if_bLength; */
  1503. 0x04, /*  __u8  if_bDescriptorType; Interface */
  1504. 0x00, /*  __u8  if_bInterfaceNumber; */
  1505. 0x00, /*  __u8  if_bAlternateSetting; */
  1506. 0x01, /*  __u8  if_bNumEndpoints; */
  1507. 0x09, /*  __u8  if_bInterfaceClass; HUB_CLASSCODE */
  1508. 0x00, /*  __u8  if_bInterfaceSubClass; */
  1509. 0x00, /*  __u8  if_bInterfaceProtocol; */
  1510. 0x00, /*  __u8  if_iInterface; */
  1511.      /* endpoint */
  1512. 0x07, /*  __u8  ep_bLength; */
  1513. 0x05, /*  __u8  ep_bDescriptorType; Endpoint */
  1514. 0x81, /*  __u8  ep_bEndpointAddress; IN Endpoint 1 */
  1515. 0x03, /*  __u8  ep_bmAttributes; Interrupt */
  1516. 0x08, /*  __u16 ep_wMaxPacketSize; 8 Bytes */
  1517. 0x00,
  1518. 0xff /*  __u8  ep_bInterval; 255 ms */
  1519. };
  1520. _static __u8 root_hub_hub_des[] =
  1521. {
  1522. 0x09, /*  __u8  bLength; */
  1523. 0x29, /*  __u8  bDescriptorType; Hub-descriptor */
  1524. 0x02, /*  __u8  bNbrPorts; */
  1525. 0x00, /* __u16  wHubCharacteristics; */
  1526. 0x00,
  1527. 0x01, /*  __u8  bPwrOn2pwrGood; 2ms */
  1528. 0x00, /*  __u8  bHubContrCurrent; 0 mA */
  1529. 0x00, /*  __u8  DeviceRemovable; *** 7 Ports max *** */
  1530. 0xff /*  __u8  PortPwrCtrlMask; *** 7 ports max *** */
  1531. };
  1532. /*-------------------------------------------------------------------------*/
  1533. /* prepare Interrupt pipe transaction data; HUB INTERRUPT ENDPOINT */
  1534. _static int rh_send_irq (urb_t *urb)
  1535. {
  1536. int len = 1;
  1537. int i;
  1538. uhci_t *uhci = urb->dev->bus->hcpriv;
  1539. unsigned int io_addr = uhci->io_addr;
  1540. __u16 data = 0;
  1541. for (i = 0; i < uhci->rh.numports; i++) {
  1542. data |= ((inw (io_addr + USBPORTSC1 + i * 2) & 0xa) > 0 ? (1 << (i + 1)) : 0);
  1543. len = (i + 1) / 8 + 1;
  1544. }
  1545. *(__u16 *) urb->transfer_buffer = cpu_to_le16 (data);
  1546. urb->actual_length = len;
  1547. urb->status = 0;
  1548. if ((data > 0) && (uhci->rh.send != 0)) {
  1549. dbg("Root-Hub INT complete: port1: %x port2: %x data: %x",
  1550.      inw (io_addr + USBPORTSC1), inw (io_addr + USBPORTSC2), data);
  1551. urb->complete (urb);
  1552. }
  1553. return 0;
  1554. }
  1555. /*-------------------------------------------------------------------------*/
  1556. /* Virtual Root Hub INTs are polled by this timer every "intervall" ms */
  1557. _static int rh_init_int_timer (urb_t *urb);
  1558. _static void rh_int_timer_do (unsigned long ptr)
  1559. {
  1560. int len;
  1561. urb_t *urb = (urb_t*) ptr;
  1562. uhci_t *uhci = urb->dev->bus->hcpriv;
  1563. if (uhci->rh.send) {
  1564. len = rh_send_irq (urb);
  1565. if (len > 0) {
  1566. urb->actual_length = len;
  1567. if (urb->complete)
  1568. urb->complete (urb);
  1569. }
  1570. }
  1571. rh_init_int_timer (urb);
  1572. }
  1573. /*-------------------------------------------------------------------------*/
  1574. /* Root Hub INTs are polled by this timer, polling interval 20ms */
  1575. _static int rh_init_int_timer (urb_t *urb)
  1576. {
  1577. uhci_t *uhci = urb->dev->bus->hcpriv;
  1578. uhci->rh.interval = urb->interval;
  1579. init_timer (&uhci->rh.rh_int_timer);
  1580. uhci->rh.rh_int_timer.function = rh_int_timer_do;
  1581. uhci->rh.rh_int_timer.data = (unsigned long) urb;
  1582. uhci->rh.rh_int_timer.expires = jiffies + (HZ * 20) / 1000;
  1583. add_timer (&uhci->rh.rh_int_timer);
  1584. return 0;
  1585. }
  1586. /*-------------------------------------------------------------------------*/
  1587. #define OK(x)  len = (x); break
  1588. #define CLR_RH_PORTSTAT(x) 
  1589. status = inw(io_addr+USBPORTSC1+2*(wIndex-1)); 
  1590. status = (status & 0xfff5) & ~(x); 
  1591. outw(status, io_addr+USBPORTSC1+2*(wIndex-1))
  1592. #define SET_RH_PORTSTAT(x) 
  1593. status = inw(io_addr+USBPORTSC1+2*(wIndex-1)); 
  1594. status = (status & 0xfff5) | (x); 
  1595. outw(status, io_addr+USBPORTSC1+2*(wIndex-1))
  1596. /*-------------------------------------------------------------------------*/
  1597. /****
  1598.  ** Root Hub Control Pipe
  1599.  *************************/
  1600. _static int rh_submit_urb (urb_t *urb)
  1601. {
  1602. struct usb_device *usb_dev = urb->dev;
  1603. uhci_t *uhci = usb_dev->bus->hcpriv;
  1604. unsigned int pipe = urb->pipe;
  1605. devrequest *cmd = (devrequest *) urb->setup_packet;
  1606. void *data = urb->transfer_buffer;
  1607. int leni = urb->transfer_buffer_length;
  1608. int len = 0;
  1609. int status = 0;
  1610. int stat = 0;
  1611. int i;
  1612. unsigned int io_addr = uhci->io_addr;
  1613. __u16 cstatus;
  1614. __u16 bmRType_bReq;
  1615. __u16 wValue;
  1616. __u16 wIndex;
  1617. __u16 wLength;
  1618. if (usb_pipetype (pipe) == PIPE_INTERRUPT) {
  1619. dbg("Root-Hub submit IRQ: every %d ms", urb->interval);
  1620. uhci->rh.urb = urb;
  1621. uhci->rh.send = 1;
  1622. uhci->rh.interval = urb->interval;
  1623. rh_init_int_timer (urb);
  1624. return 0;
  1625. }
  1626. bmRType_bReq = cmd->requesttype | cmd->request << 8;
  1627. wValue = le16_to_cpu (cmd->value);
  1628. wIndex = le16_to_cpu (cmd->index);
  1629. wLength = le16_to_cpu (cmd->length);
  1630. for (i = 0; i < 8; i++)
  1631. uhci->rh.c_p_r[i] = 0;
  1632. dbg("Root-Hub: adr: %2x cmd(%1x): %04x %04x %04x %04x",
  1633.      uhci->rh.devnum, 8, bmRType_bReq, wValue, wIndex, wLength);
  1634. switch (bmRType_bReq) {
  1635. /* Request Destination:
  1636.    without flags: Device, 
  1637.    RH_INTERFACE: interface, 
  1638.    RH_ENDPOINT: endpoint,
  1639.    RH_CLASS means HUB here, 
  1640.    RH_OTHER | RH_CLASS  almost ever means HUB_PORT here 
  1641.  */
  1642. case RH_GET_STATUS:
  1643. *(__u16 *) data = cpu_to_le16 (1);
  1644. OK (2);
  1645. case RH_GET_STATUS | RH_INTERFACE:
  1646. *(__u16 *) data = cpu_to_le16 (0);
  1647. OK (2);
  1648. case RH_GET_STATUS | RH_ENDPOINT:
  1649. *(__u16 *) data = cpu_to_le16 (0);
  1650. OK (2);
  1651. case RH_GET_STATUS | RH_CLASS:
  1652. *(__u32 *) data = cpu_to_le32 (0);
  1653. OK (4); /* hub power ** */
  1654. case RH_GET_STATUS | RH_OTHER | RH_CLASS:
  1655. status = inw (io_addr + USBPORTSC1 + 2 * (wIndex - 1));
  1656. cstatus = ((status & USBPORTSC_CSC) >> (1 - 0)) |
  1657. ((status & USBPORTSC_PEC) >> (3 - 1)) |
  1658. (uhci->rh.c_p_r[wIndex - 1] << (0 + 4));
  1659. status = (status & USBPORTSC_CCS) |
  1660. ((status & USBPORTSC_PE) >> (2 - 1)) |
  1661. ((status & USBPORTSC_SUSP) >> (12 - 2)) |
  1662. ((status & USBPORTSC_PR) >> (9 - 4)) |
  1663. (1 << 8) | /* power on ** */
  1664. ((status & USBPORTSC_LSDA) << (-8 + 9));
  1665. *(__u16 *) data = cpu_to_le16 (status);
  1666. *(__u16 *) (data + 2) = cpu_to_le16 (cstatus);
  1667. OK (4);
  1668. case RH_CLEAR_FEATURE | RH_ENDPOINT:
  1669. switch (wValue) {
  1670. case (RH_ENDPOINT_STALL):
  1671. OK (0);
  1672. }
  1673. break;
  1674. case RH_CLEAR_FEATURE | RH_CLASS:
  1675. switch (wValue) {
  1676. case (RH_C_HUB_OVER_CURRENT):
  1677. OK (0); /* hub power over current ** */
  1678. }
  1679. break;
  1680. case RH_CLEAR_FEATURE | RH_OTHER | RH_CLASS:
  1681. switch (wValue) {
  1682. case (RH_PORT_ENABLE):
  1683. CLR_RH_PORTSTAT (USBPORTSC_PE);
  1684. OK (0);
  1685. case (RH_PORT_SUSPEND):
  1686. CLR_RH_PORTSTAT (USBPORTSC_SUSP);
  1687. OK (0);
  1688. case (RH_PORT_POWER):
  1689. OK (0); /* port power ** */
  1690. case (RH_C_PORT_CONNECTION):
  1691. SET_RH_PORTSTAT (USBPORTSC_CSC);
  1692. OK (0);
  1693. case (RH_C_PORT_ENABLE):
  1694. SET_RH_PORTSTAT (USBPORTSC_PEC);
  1695. OK (0);
  1696. case (RH_C_PORT_SUSPEND):
  1697. /*** WR_RH_PORTSTAT(RH_PS_PSSC); */
  1698. OK (0);
  1699. case (RH_C_PORT_OVER_CURRENT):
  1700. OK (0); /* port power over current ** */
  1701. case (RH_C_PORT_RESET):
  1702. uhci->rh.c_p_r[wIndex - 1] = 0;
  1703. OK (0);
  1704. }
  1705. break;
  1706. case RH_SET_FEATURE | RH_OTHER | RH_CLASS:
  1707. switch (wValue) {
  1708. case (RH_PORT_SUSPEND):
  1709. SET_RH_PORTSTAT (USBPORTSC_SUSP);
  1710. OK (0);
  1711. case (RH_PORT_RESET):
  1712. SET_RH_PORTSTAT (USBPORTSC_PR);
  1713. uhci_wait_ms (10);
  1714. uhci->rh.c_p_r[wIndex - 1] = 1;
  1715. CLR_RH_PORTSTAT (USBPORTSC_PR);
  1716. udelay (10);
  1717. SET_RH_PORTSTAT (USBPORTSC_PE);
  1718. uhci_wait_ms (10);
  1719. SET_RH_PORTSTAT (0xa);
  1720. OK (0);
  1721. case (RH_PORT_POWER):
  1722. OK (0); /* port power ** */
  1723. case (RH_PORT_ENABLE):
  1724. SET_RH_PORTSTAT (USBPORTSC_PE);
  1725. OK (0);
  1726. }
  1727. break;
  1728. case RH_SET_ADDRESS:
  1729. uhci->rh.devnum = wValue;
  1730. OK (0);
  1731. case RH_GET_DESCRIPTOR:
  1732. switch ((wValue & 0xff00) >> 8) {
  1733. case (0x01): /* device descriptor */
  1734. len = min_t(unsigned int, leni,
  1735.   min_t(unsigned int,
  1736.       sizeof (root_hub_dev_des), wLength));
  1737. memcpy (data, root_hub_dev_des, len);
  1738. OK (len);
  1739. case (0x02): /* configuration descriptor */
  1740. len = min_t(unsigned int, leni,
  1741.   min_t(unsigned int,
  1742.       sizeof (root_hub_config_des), wLength));
  1743. memcpy (data, root_hub_config_des, len);
  1744. OK (len);
  1745. case (0x03): /* string descriptors */
  1746. len = usb_root_hub_string (wValue & 0xff,
  1747.         uhci->io_addr, "UHCI",
  1748. data, wLength);
  1749. if (len > 0) {
  1750. OK(min_t(int, leni, len));
  1751. } else 
  1752. stat = -EPIPE;
  1753. }
  1754. break;
  1755. case RH_GET_DESCRIPTOR | RH_CLASS:
  1756. root_hub_hub_des[2] = uhci->rh.numports;
  1757. len = min_t(unsigned int, leni,
  1758.   min_t(unsigned int, sizeof (root_hub_hub_des), wLength));
  1759. memcpy (data, root_hub_hub_des, len);
  1760. OK (len);
  1761. case RH_GET_CONFIGURATION:
  1762. *(__u8 *) data = 0x01;
  1763. OK (1);
  1764. case RH_SET_CONFIGURATION:
  1765. OK (0);
  1766. default:
  1767. stat = -EPIPE;
  1768. }
  1769. dbg("Root-Hub stat port1: %x port2: %x",
  1770.      inw (io_addr + USBPORTSC1), inw (io_addr + USBPORTSC2));
  1771. urb->actual_length = len;
  1772. urb->status = stat;
  1773. urb->dev=NULL;
  1774. if (urb->complete)
  1775. urb->complete (urb);
  1776. return 0;
  1777. }
  1778. /*-------------------------------------------------------------------------*/
  1779. _static int rh_unlink_urb (urb_t *urb)
  1780. {
  1781. uhci_t *uhci = urb->dev->bus->hcpriv;
  1782. if (uhci->rh.urb==urb) {
  1783. dbg("Root-Hub unlink IRQ");
  1784. uhci->rh.send = 0;
  1785. del_timer (&uhci->rh.rh_int_timer);
  1786. }
  1787. return 0;
  1788. }
  1789. /*-------------------------------------------------------------------*/
  1790. /*
  1791.  * Map status to standard result codes
  1792.  *
  1793.  * <status> is (td->status & 0xFE0000) [a.k.a. uhci_status_bits(td->status)
  1794.  * <dir_out> is True for output TDs and False for input TDs.
  1795.  */
  1796. _static int uhci_map_status (int status, int dir_out)
  1797. {
  1798. if (!status)
  1799. return 0;
  1800. if (status & TD_CTRL_BITSTUFF) /* Bitstuff error */
  1801. return -EPROTO;
  1802. if (status & TD_CTRL_CRCTIMEO) { /* CRC/Timeout */
  1803. if (dir_out)
  1804. return -ETIMEDOUT;
  1805. else
  1806. return -EILSEQ;
  1807. }
  1808. if (status & TD_CTRL_NAK) /* NAK */
  1809. return -ETIMEDOUT;
  1810. if (status & TD_CTRL_BABBLE) /* Babble */
  1811. return -EOVERFLOW;
  1812. if (status & TD_CTRL_DBUFERR) /* Buffer error */
  1813. return -ENOSR;
  1814. if (status & TD_CTRL_STALLED) /* Stalled */
  1815. return -EPIPE;
  1816. if (status & TD_CTRL_ACTIVE) /* Active */
  1817. return 0;
  1818. return -EPROTO;
  1819. }
  1820. /*
  1821.  * Only the USB core should call uhci_alloc_dev and uhci_free_dev
  1822.  */
  1823. _static int uhci_alloc_dev (struct usb_device *usb_dev)
  1824. {
  1825. return 0;
  1826. }
  1827. _static void uhci_unlink_urbs(uhci_t *s, struct usb_device *usb_dev, int remove_all)
  1828. {
  1829. unsigned long flags;
  1830. struct list_head *p;
  1831. struct list_head *p2;
  1832. urb_t *urb;
  1833. spin_lock_irqsave (&s->urb_list_lock, flags);
  1834. p = s->urb_list.prev;
  1835. while (p != &s->urb_list) {
  1836. p2 = p;
  1837. p = p->prev ;
  1838. urb = list_entry (p2, urb_t, urb_list);
  1839. dbg("urb: %p, dev %p, %p", urb, usb_dev,urb->dev);
  1840. //urb->transfer_flags |=USB_ASYNC_UNLINK; 
  1841. if (remove_all || (usb_dev == urb->dev)) {
  1842. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  1843. warn("forced removing of queued URB %p due to disconnect",urb);
  1844. uhci_unlink_urb(urb);
  1845. urb->dev = NULL; // avoid further processing of this URB
  1846. spin_lock_irqsave (&s->urb_list_lock, flags);
  1847. p = s->urb_list.prev;
  1848. }
  1849. }
  1850. spin_unlock_irqrestore (&s->urb_list_lock, flags);
  1851. }
  1852. _static int uhci_free_dev (struct usb_device *usb_dev)
  1853. {
  1854. uhci_t *s;
  1855. if(!usb_dev || !usb_dev->bus || !usb_dev->bus->hcpriv)
  1856. return -EINVAL;
  1857. s=(uhci_t*) usb_dev->bus->hcpriv;
  1858. uhci_unlink_urbs(s, usb_dev, 0);
  1859. return 0;
  1860. }
  1861. /*
  1862.  * uhci_get_current_frame_number()
  1863.  *
  1864.  * returns the current frame number for a USB bus/controller.
  1865.  */
  1866. _static int uhci_get_current_frame_number (struct usb_device *usb_dev)
  1867. {
  1868. return UHCI_GET_CURRENT_FRAME ((uhci_t*) usb_dev->bus->hcpriv);
  1869. }
  1870. struct usb_operations uhci_device_operations =
  1871. {
  1872. uhci_alloc_dev,
  1873. uhci_free_dev,
  1874. uhci_get_current_frame_number,
  1875. uhci_submit_urb,
  1876. uhci_unlink_urb
  1877. };
  1878. _static void correct_data_toggles(urb_t *urb)
  1879. {
  1880. usb_settoggle (urb->dev, usb_pipeendpoint (urb->pipe), usb_pipeout (urb->pipe), 
  1881.        !usb_gettoggle (urb->dev, usb_pipeendpoint (urb->pipe), usb_pipeout (urb->pipe)));
  1882. while(urb) {
  1883. urb_priv_t *priv=urb->hcpriv;
  1884. uhci_desc_t *qh = list_entry (priv->desc_list.next, uhci_desc_t, desc_list);
  1885. struct list_head *p = qh->vertical.next;
  1886. uhci_desc_t *td;
  1887. dbg("URB to correct %pn", urb);
  1888. for (; p != &qh->vertical; p = p->next) {
  1889. td = list_entry (p, uhci_desc_t, vertical);
  1890. td->hw.td.info^=cpu_to_le32(1<<TD_TOKEN_TOGGLE);
  1891. }
  1892. urb=priv->next_queued_urb;
  1893. }
  1894. }
  1895. /* 
  1896.  * For IN-control transfers, process_transfer gets a bit more complicated,
  1897.  * since there are devices that return less data (eg. strings) than they
  1898.  * have announced. This leads to a queue abort due to the short packet,
  1899.  * the status stage is not executed. If this happens, the status stage
  1900.  * is manually re-executed.
  1901.  * mode: PROCESS_TRANSFER_REGULAR: regular (unlink QH)
  1902.  *       PROCESS_TRANSFER_DONT_UNLINK: QHs already unlinked (for async unlink_urb)
  1903.  */
  1904. _static int process_transfer (uhci_t *s, urb_t *urb, int mode)
  1905. {
  1906. int ret = 0;
  1907. urb_priv_t *urb_priv = urb->hcpriv;
  1908. struct list_head *qhl = urb_priv->desc_list.next;
  1909. uhci_desc_t *qh = list_entry (qhl, uhci_desc_t, desc_list);
  1910. struct list_head *p = qh->vertical.next;
  1911. uhci_desc_t *desc= list_entry (urb_priv->desc_list.prev, uhci_desc_t, desc_list);
  1912. uhci_desc_t *last_desc = list_entry (desc->vertical.prev, uhci_desc_t, vertical);
  1913. int data_toggle = usb_gettoggle (urb->dev, usb_pipeendpoint (urb->pipe), usb_pipeout (urb->pipe)); // save initial data_toggle
  1914. int maxlength;  // extracted and remapped info from TD
  1915. int actual_length;
  1916. int status = 0;
  1917. //dbg("process_transfer: urb %p, urb_priv %p, qh %p last_desc %pn",urb,urb_priv, qh, last_desc);
  1918. /* if the status phase has been retriggered and the
  1919.    queue is empty or the last status-TD is inactive, the retriggered
  1920.    status stage is completed
  1921.  */
  1922. if (urb_priv->flags && 
  1923.     ((qh->hw.qh.element == cpu_to_le32(UHCI_PTR_TERM)) || !is_td_active(desc)))
  1924. goto transfer_finished;
  1925. urb->actual_length=0;
  1926. for (; p != &qh->vertical; p = p->next) {
  1927. desc = list_entry (p, uhci_desc_t, vertical);
  1928. if (is_td_active(desc)) { // do not process active TDs
  1929. if (mode == CLEAN_TRANSFER_DELETION_MARK) // if called from async_unlink
  1930. uhci_clean_transfer(s, urb, qh, CLEAN_TRANSFER_DELETION_MARK);
  1931. return ret;
  1932. }
  1933. actual_length = uhci_actual_length(le32_to_cpu(desc->hw.td.status)); // extract transfer parameters from TD
  1934. maxlength = (((le32_to_cpu(desc->hw.td.info) >> 21) & 0x7ff) + 1) & 0x7ff;
  1935. status = uhci_map_status (uhci_status_bits (le32_to_cpu(desc->hw.td.status)), usb_pipeout (urb->pipe));
  1936. if (status == -EPIPE) {  // see if EP is stalled
  1937. // set up stalled condition
  1938. usb_endpoint_halt (urb->dev, usb_pipeendpoint (urb->pipe), usb_pipeout (urb->pipe));
  1939. }
  1940. if (status && (status != -EPIPE)) { // if any error occurred stop processing of further TDs
  1941. // only set ret if status returned an error
  1942.   is_error:
  1943. ret = status;
  1944. urb->error_count++;
  1945. break;
  1946. }
  1947. else if ((le32_to_cpu(desc->hw.td.info) & 0xff) != USB_PID_SETUP)
  1948. urb->actual_length += actual_length;
  1949. // got less data than requested
  1950. if ( (actual_length < maxlength)) {
  1951. if (urb->transfer_flags & USB_DISABLE_SPD) {
  1952. status = -EREMOTEIO; // treat as real error
  1953. dbg("process_transfer: SPD!!");
  1954. break; // exit after this TD because SP was detected
  1955. }
  1956. // short read during control-IN: re-start status stage
  1957. if ((usb_pipetype (urb->pipe) == PIPE_CONTROL)) {
  1958. if (uhci_packetid(le32_to_cpu(last_desc->hw.td.info)) == USB_PID_OUT) {
  1959. set_qh_element(qh, last_desc->dma_addr);  // re-trigger status stage
  1960. dbg("short packet during control transfer, retrigger status stage @ %p",last_desc);
  1961. urb_priv->flags = 1; // mark as short control packet
  1962. return 0;
  1963. }
  1964. }
  1965. // all other cases: short read is OK
  1966. data_toggle = uhci_toggle (le32_to_cpu(desc->hw.td.info));
  1967. break;
  1968. }
  1969. else if (status)
  1970. goto is_error;
  1971. data_toggle = uhci_toggle (le32_to_cpu(desc->hw.td.info));
  1972. queue_dbg("process_transfer: len:%d status:%x mapped:%x toggle:%d", actual_length, le32_to_cpu(desc->hw.td.status),status, data_toggle);      
  1973. }
  1974. if (usb_pipetype (urb->pipe) == PIPE_BULK ) {  /* toggle correction for short bulk transfers (nonqueued/queued) */
  1975. urb_priv_t *priv=(urb_priv_t*)urb->hcpriv;
  1976. urb_t *next_queued_urb=priv->next_queued_urb;
  1977. if (next_queued_urb) {
  1978. urb_priv_t *next_priv=(urb_priv_t*)next_queued_urb->hcpriv;
  1979. uhci_desc_t *qh = list_entry (next_priv->desc_list.next, uhci_desc_t, desc_list);
  1980. uhci_desc_t *first_td=list_entry (qh->vertical.next, uhci_desc_t, vertical);
  1981. if (data_toggle == uhci_toggle (le32_to_cpu(first_td->hw.td.info))) {
  1982. err("process_transfer: fixed toggle");
  1983. correct_data_toggles(next_queued_urb);
  1984. }
  1985. }
  1986. else
  1987. usb_settoggle (urb->dev, usb_pipeendpoint (urb->pipe), usb_pipeout (urb->pipe), !data_toggle);
  1988. }
  1989.  transfer_finished:
  1990. uhci_clean_transfer(s, urb, qh, mode);
  1991. urb->status = status;
  1992. #ifdef CONFIG_USB_UHCI_HIGH_BANDWIDTH
  1993. disable_desc_loop(s,urb);
  1994. #endif
  1995. queue_dbg("process_transfer: (end) urb %p, wanted len %d, len %d status %x err %d",
  1996. urb,urb->transfer_buffer_length,urb->actual_length, urb->status, urb->error_count);
  1997. return ret;
  1998. }
  1999. _static int process_interrupt (uhci_t *s, urb_t *urb)
  2000. {
  2001. int i, ret = -EINPROGRESS;
  2002. urb_priv_t *urb_priv = urb->hcpriv;
  2003. struct list_head *p = urb_priv->desc_list.next;
  2004. uhci_desc_t *desc = list_entry (urb_priv->desc_list.prev, uhci_desc_t, desc_list);
  2005. int actual_length;
  2006. int status = 0;
  2007. //dbg("urb contains interrupt request");
  2008. for (i = 0; p != &urb_priv->desc_list; p = p->next, i++) // Maybe we allow more than one TD later ;-)
  2009. {
  2010. desc = list_entry (p, uhci_desc_t, desc_list);
  2011. if (is_td_active(desc)) {
  2012. // do not process active TDs
  2013. //dbg("TD ACT Status @%p %08x",desc,le32_to_cpu(desc->hw.td.status));
  2014. break;
  2015. }
  2016. if (!(desc->hw.td.status & cpu_to_le32(TD_CTRL_IOC))) {
  2017. // do not process one-shot TDs, no recycling
  2018. break;
  2019. }
  2020. // extract transfer parameters from TD
  2021. actual_length = uhci_actual_length(le32_to_cpu(desc->hw.td.status));
  2022. status = uhci_map_status (uhci_status_bits (le32_to_cpu(desc->hw.td.status)), usb_pipeout (urb->pipe));
  2023. // see if EP is stalled
  2024. if (status == -EPIPE) {
  2025. // set up stalled condition
  2026. usb_endpoint_halt (urb->dev, usb_pipeendpoint (urb->pipe), usb_pipeout (urb->pipe));
  2027. }
  2028. // if any error occurred: ignore this td, and continue
  2029. if (status != 0) {
  2030. //uhci_show_td (desc);
  2031. urb->error_count++;
  2032. goto recycle;
  2033. }
  2034. else
  2035. urb->actual_length = actual_length;
  2036. recycle:
  2037. uhci_urb_dma_sync(s, urb, urb->hcpriv);
  2038. if (urb->complete) {
  2039. //dbg("process_interrupt: calling completion, status %i",status);
  2040. urb->status = status;
  2041. ((urb_priv_t*)urb->hcpriv)->flags=1; // if unlink_urb is called during completion
  2042. spin_unlock(&s->urb_list_lock);
  2043. urb->complete ((struct urb *) urb);
  2044. spin_lock(&s->urb_list_lock);
  2045. ((urb_priv_t*)urb->hcpriv)->flags=0;        
  2046. }
  2047. if ((urb->status != -ECONNABORTED) && (urb->status != ECONNRESET) &&
  2048.     (urb->status != -ENOENT)) {
  2049. urb->status = -EINPROGRESS;
  2050. // Recycle INT-TD if interval!=0, else mark TD as one-shot
  2051. if (urb->interval) {
  2052. desc->hw.td.info &= cpu_to_le32(~(1 << TD_TOKEN_TOGGLE));
  2053. if (status==0) {
  2054. ((urb_priv_t*)urb->hcpriv)->started=jiffies;
  2055. desc->hw.td.info |= cpu_to_le32((usb_gettoggle (urb->dev, usb_pipeendpoint (urb->pipe),
  2056.     usb_pipeout (urb->pipe)) << TD_TOKEN_TOGGLE));
  2057. usb_dotoggle (urb->dev, usb_pipeendpoint (urb->pipe), usb_pipeout (urb->pipe));
  2058. } else {
  2059. desc->hw.td.info |= cpu_to_le32((!usb_gettoggle (urb->dev, usb_pipeendpoint (urb->pipe),
  2060.      usb_pipeout (urb->pipe)) << TD_TOKEN_TOGGLE));
  2061. }
  2062. desc->hw.td.status= cpu_to_le32((urb->pipe & TD_CTRL_LS) | TD_CTRL_ACTIVE | TD_CTRL_IOC |
  2063. (urb->transfer_flags & USB_DISABLE_SPD ? 0 : TD_CTRL_SPD) | (3 << 27));
  2064. mb();
  2065. }
  2066. else {
  2067. uhci_unlink_urb_async(s, urb, UNLINK_ASYNC_STORE_URB);
  2068. // correct toggle after unlink
  2069. usb_dotoggle (urb->dev, usb_pipeendpoint (urb->pipe), usb_pipeout (urb->pipe));
  2070. clr_td_ioc(desc); // inactivate TD
  2071. }
  2072. }
  2073. }
  2074. return ret;
  2075. }
  2076. // mode: PROCESS_ISO_REGULAR: processing only for done TDs, unlink TDs
  2077. // mode: PROCESS_ISO_FORCE: force processing, don't unlink TDs (already unlinked)
  2078. _static int process_iso (uhci_t *s, urb_t *urb, int mode)
  2079. {
  2080. int i;
  2081. int ret = 0;
  2082. urb_priv_t *urb_priv = urb->hcpriv;
  2083. struct list_head *p = urb_priv->desc_list.next, *p_tmp;
  2084. uhci_desc_t *desc = list_entry (urb_priv->desc_list.prev, uhci_desc_t, desc_list);
  2085. dbg("urb contains iso request");
  2086. if (is_td_active(desc) && mode==PROCESS_ISO_REGULAR)
  2087. return -EXDEV; // last TD not finished
  2088. urb->error_count = 0;
  2089. urb->actual_length = 0;
  2090. urb->status = 0;
  2091. dbg("process iso urb %p, %li, %i, %i, %i %08x",urb,jiffies,UHCI_GET_CURRENT_FRAME(s),
  2092.     urb->number_of_packets,mode,le32_to_cpu(desc->hw.td.status));
  2093. for (i = 0; p != &urb_priv->desc_list;  i++) {
  2094. desc = list_entry (p, uhci_desc_t, desc_list);
  2095. //uhci_show_td(desc);
  2096. if (is_td_active(desc)) {
  2097. // means we have completed the last TD, but not the TDs before
  2098. desc->hw.td.status &= cpu_to_le32(~TD_CTRL_ACTIVE);
  2099. dbg("TD still active (%x)- grrr. paranoia!", le32_to_cpu(desc->hw.td.status));
  2100. ret = -EXDEV;
  2101. urb->iso_frame_desc[i].status = ret;
  2102. unlink_td (s, desc, 1);
  2103. // FIXME: immediate deletion may be dangerous
  2104. goto err;
  2105. }
  2106. if (mode == PROCESS_ISO_REGULAR)
  2107. unlink_td (s, desc, 1);
  2108. if (urb->number_of_packets <= i) {
  2109. dbg("urb->number_of_packets (%d)<=(%d)", urb->number_of_packets, i);
  2110. ret = -EINVAL;
  2111. goto err;
  2112. }
  2113. urb->iso_frame_desc[i].actual_length = uhci_actual_length(le32_to_cpu(desc->hw.td.status));
  2114. urb->iso_frame_desc[i].status = uhci_map_status (uhci_status_bits (le32_to_cpu(desc->hw.td.status)), usb_pipeout (urb->pipe));
  2115. urb->actual_length += urb->iso_frame_desc[i].actual_length;
  2116.       err:
  2117. if (urb->iso_frame_desc[i].status != 0) {
  2118. urb->error_count++;
  2119. urb->status = urb->iso_frame_desc[i].status;
  2120. }
  2121. dbg("process_iso: %i: len:%d %08x status:%x",
  2122.      i, urb->iso_frame_desc[i].actual_length, le32_to_cpu(desc->hw.td.status),urb->iso_frame_desc[i].status);
  2123. p_tmp = p;
  2124. p = p->next;
  2125. list_del (p_tmp);
  2126. delete_desc (s, desc);
  2127. }
  2128. dbg("process_iso: exit %i (%d), actual_len %i", i, ret,urb->actual_length);
  2129. return ret;
  2130. }
  2131. _static int process_urb (uhci_t *s, struct list_head *p)
  2132. {
  2133. int ret = 0;
  2134. urb_t *urb;
  2135. urb=list_entry (p, urb_t, urb_list);
  2136. //dbg("process_urb: found queued urb: %p", urb);
  2137. switch (usb_pipetype (urb->pipe)) {
  2138. case PIPE_CONTROL:
  2139. ret = process_transfer (s, urb, CLEAN_TRANSFER_REGULAR);
  2140. break;
  2141. case PIPE_BULK:
  2142. if (!s->avoid_bulk.counter)
  2143. ret = process_transfer (s, urb, CLEAN_TRANSFER_REGULAR);
  2144. else
  2145. return 0;
  2146. break;
  2147. case PIPE_ISOCHRONOUS:
  2148. ret = process_iso (s, urb, PROCESS_ISO_REGULAR);
  2149. break;
  2150. case PIPE_INTERRUPT:
  2151. ret = process_interrupt (s, urb);
  2152. break;
  2153. }
  2154. if (urb->status != -EINPROGRESS) {
  2155. urb_priv_t *urb_priv;
  2156. struct usb_device *usb_dev;
  2157. usb_dev=urb->dev;
  2158. /* Release bandwidth for Interrupt or Iso transfers */
  2159. if (urb->bandwidth) {
  2160. if (usb_pipetype(urb->pipe)==PIPE_ISOCHRONOUS)
  2161. usb_release_bandwidth (urb->dev, urb, 1);
  2162. else if (usb_pipetype(urb->pipe)==PIPE_INTERRUPT && urb->interval)
  2163. usb_release_bandwidth (urb->dev, urb, 0);
  2164. }
  2165. dbg("dequeued urb: %p", urb);
  2166. dequeue_urb (s, urb);
  2167. urb_priv = urb->hcpriv;
  2168. uhci_urb_dma_unmap(s, urb, urb_priv);
  2169. #ifdef DEBUG_SLAB
  2170. kmem_cache_free(urb_priv_kmem, urb_priv);
  2171. #else
  2172. kfree (urb_priv);
  2173. #endif
  2174. if ((usb_pipetype (urb->pipe) != PIPE_INTERRUPT)) {  // process_interrupt does completion on its own
  2175. urb_t *next_urb = urb->next;
  2176. int is_ring = 0;
  2177. int contains_killed = 0;
  2178. int loop_count=0;
  2179. if (next_urb) {
  2180. // Find out if the URBs are linked to a ring
  2181. while  (next_urb != NULL && next_urb != urb && loop_count < MAX_NEXT_COUNT) {
  2182. if (next_urb->status == -ENOENT) {// killed URBs break ring structure & resubmission
  2183. contains_killed = 1;
  2184. break;
  2185. }
  2186. next_urb = next_urb->next;
  2187. loop_count++;
  2188. }
  2189. if (loop_count == MAX_NEXT_COUNT)
  2190. err("process_urb: Too much linked URBs in ring detection!");
  2191. if (next_urb == urb)
  2192. is_ring=1;
  2193. }
  2194. // Submit idle/non-killed URBs linked with urb->next
  2195. // Stop before the current URB
  2196. next_urb = urb->next;
  2197. if (next_urb && !contains_killed) {
  2198. int ret_submit;
  2199. next_urb = urb->next;
  2200. loop_count=0;
  2201. while (next_urb != NULL && next_urb != urb && loop_count < MAX_NEXT_COUNT) {
  2202. if (next_urb->status != -EINPROGRESS) {
  2203. if (next_urb->status == -ENOENT) 
  2204. break;
  2205. spin_unlock(&s->urb_list_lock);
  2206. ret_submit=uhci_submit_urb(next_urb);
  2207. spin_lock(&s->urb_list_lock);
  2208. if (ret_submit)
  2209. break;
  2210. }
  2211. loop_count++;
  2212. next_urb = next_urb->next;
  2213. }
  2214. if (loop_count == MAX_NEXT_COUNT)
  2215. err("process_urb: Too much linked URBs in resubmission!");
  2216. }
  2217. // Completion
  2218. if (urb->complete) {
  2219. int was_unlinked = (urb->status == -ENOENT);
  2220. urb->dev = NULL;
  2221. spin_unlock(&s->urb_list_lock);
  2222. urb->complete ((struct urb *) urb);
  2223. // Re-submit the URB if ring-linked
  2224. if (is_ring && !was_unlinked && !contains_killed) {
  2225. urb->dev=usb_dev;
  2226. uhci_submit_urb (urb);
  2227. }
  2228. spin_lock(&s->urb_list_lock);
  2229. }
  2230. usb_dec_dev_use (usb_dev);
  2231. }
  2232. }
  2233. return ret;
  2234. }
  2235. _static void uhci_interrupt (int irq, void *__uhci, struct pt_regs *regs)
  2236. {
  2237. uhci_t *s = __uhci;
  2238. unsigned int io_addr = s->io_addr;
  2239. unsigned short status;
  2240. struct list_head *p, *p2;
  2241. int restarts, work_done;
  2242. /*
  2243.  * Read the interrupt status, and write it back to clear the
  2244.  * interrupt cause
  2245.  */
  2246. status = inw (io_addr + USBSTS);
  2247. if (!status) /* shared interrupt, not mine */
  2248. return;
  2249. dbg("interrupt");
  2250. if (status != 1) {
  2251. // Avoid too much error messages at a time
  2252. if (time_after(jiffies, s->last_error_time + ERROR_SUPPRESSION_TIME)) {
  2253. warn("interrupt, status %x, frame# %i", status, 
  2254.      UHCI_GET_CURRENT_FRAME(s));
  2255. s->last_error_time = jiffies;
  2256. }
  2257. // remove host controller halted state
  2258. if ((status&0x20) && (s->running)) {
  2259. err("Host controller halted, trying to restart.");
  2260. outw (USBCMD_RS | inw(io_addr + USBCMD), io_addr + USBCMD);
  2261. }
  2262. //uhci_show_status (s);
  2263. }
  2264. /*
  2265.  * traverse the list in *reverse* direction, because new entries
  2266.  * may be added at the end.
  2267.  * also, because process_urb may unlink the current urb,
  2268.  * we need to advance the list before
  2269.  * New: check for max. workload and restart count
  2270.  */
  2271. spin_lock (&s->urb_list_lock);
  2272. restarts=0;
  2273. work_done=0;
  2274. restart:
  2275. s->unlink_urb_done=0;
  2276. p = s->urb_list.prev;
  2277. while (p != &s->urb_list && (work_done < 1024)) {
  2278. p2 = p;
  2279. p = p->prev;
  2280. process_urb (s, p2);
  2281. work_done++;
  2282. if (s->unlink_urb_done) {
  2283. s->unlink_urb_done=0;
  2284. restarts++;
  2285. if (restarts<16) // avoid endless restarts
  2286. goto restart;
  2287. else 
  2288. break;
  2289. }
  2290. }
  2291. if (time_after(jiffies, s->timeout_check + (HZ/30)))
  2292. uhci_check_timeouts(s);
  2293. clean_descs(s, CLEAN_NOT_FORCED);
  2294. uhci_cleanup_unlink(s, CLEAN_NOT_FORCED);
  2295. uhci_switch_timer_int(s);
  2296. spin_unlock (&s->urb_list_lock);
  2297. outw (status, io_addr + USBSTS);
  2298. //dbg("uhci_interrupt: done");
  2299. }
  2300. _static void reset_hc (uhci_t *s)
  2301. {
  2302. unsigned int io_addr = s->io_addr;
  2303. s->apm_state = 0;
  2304. /* Global reset for 50ms */
  2305. outw (USBCMD_GRESET, io_addr + USBCMD);
  2306. uhci_wait_ms (50);
  2307. outw (0, io_addr + USBCMD);
  2308. uhci_wait_ms (10);
  2309. }
  2310. _static void start_hc (uhci_t *s)
  2311. {
  2312. unsigned int io_addr = s->io_addr;
  2313. int timeout = 10;
  2314. /*
  2315.  * Reset the HC - this will force us to get a
  2316.  * new notification of any already connected
  2317.  * ports due to the virtual disconnect that it
  2318.  * implies.
  2319.  */
  2320. outw (USBCMD_HCRESET, io_addr + USBCMD);
  2321. while (inw (io_addr + USBCMD) & USBCMD_HCRESET) {
  2322. if (!--timeout) {
  2323. err("USBCMD_HCRESET timed out!");
  2324. break;
  2325. }
  2326. udelay(1);
  2327. }
  2328. /* Turn on all interrupts */
  2329. outw (USBINTR_TIMEOUT | USBINTR_RESUME | USBINTR_IOC | USBINTR_SP, io_addr + USBINTR);
  2330. /* Start at frame 0 */
  2331. outw (0, io_addr + USBFRNUM);
  2332. outl (s->framelist_dma, io_addr + USBFLBASEADD);
  2333. /* Run and mark it configured with a 64-byte max packet */
  2334. outw (USBCMD_RS | USBCMD_CF | USBCMD_MAXP, io_addr + USBCMD);
  2335. s->apm_state = 1;
  2336. s->running = 1;
  2337. }
  2338. /* No  __devexit, since it maybe called from alloc_uhci() */
  2339. _static void
  2340. uhci_pci_remove (struct pci_dev *dev)
  2341. {
  2342. uhci_t *s = pci_get_drvdata(dev);
  2343. struct usb_device *root_hub = s->bus->root_hub;
  2344. s->running = 0;     // Don't allow submit_urb
  2345. if (root_hub)
  2346. usb_disconnect (&root_hub);
  2347. reset_hc (s);
  2348. wait_ms (1);
  2349. uhci_unlink_urbs (s, 0, CLEAN_FORCED);  // Forced unlink of remaining URBs
  2350. uhci_cleanup_unlink (s, CLEAN_FORCED);  // force cleanup of async killed URBs
  2351. usb_deregister_bus (s->bus);
  2352. release_region (s->io_addr, s->io_size);
  2353. free_irq (s->irq, s);
  2354. usb_free_bus (s->bus);
  2355. cleanup_skel (s);
  2356. kfree (s);
  2357. }
  2358. _static int __init uhci_start_usb (uhci_t *s)
  2359. { /* start it up */
  2360. /* connect the virtual root hub */
  2361. struct usb_device *usb_dev;
  2362. usb_dev = usb_alloc_dev (NULL, s->bus);
  2363. if (!usb_dev)
  2364. return -1;
  2365. s->bus->root_hub = usb_dev;
  2366. usb_connect (usb_dev);
  2367. if (usb_new_device (usb_dev) != 0) {
  2368. usb_free_dev (usb_dev);
  2369. return -1;
  2370. }
  2371. return 0;
  2372. }
  2373. #ifdef CONFIG_PM
  2374. _static int
  2375. uhci_pci_suspend (struct pci_dev *dev, u32 state)
  2376. {
  2377. reset_hc((uhci_t *) pci_get_drvdata(dev));
  2378. return 0;
  2379. }
  2380. _static int
  2381. uhci_pci_resume (struct pci_dev *dev)
  2382. {
  2383. start_hc((uhci_t *) pci_get_drvdata(dev));
  2384. return 0;
  2385. }
  2386. #endif
  2387. _static int __devinit alloc_uhci (struct pci_dev *dev, int irq, unsigned int io_addr, unsigned int io_size)
  2388. {
  2389. uhci_t *s;
  2390. struct usb_bus *bus;
  2391. char buf[8], *bufp = buf;
  2392. #ifndef __sparc__
  2393. sprintf(buf, "%d", irq);
  2394. #else
  2395. bufp = __irq_itoa(irq);
  2396. #endif
  2397. printk(KERN_INFO __FILE__ ": USB UHCI at I/O 0x%x, IRQ %sn",
  2398. io_addr, bufp);
  2399. s = kmalloc (sizeof (uhci_t), GFP_KERNEL);
  2400. if (!s)
  2401. return -1;
  2402. memset (s, 0, sizeof (uhci_t));
  2403. INIT_LIST_HEAD (&s->free_desc);
  2404. INIT_LIST_HEAD (&s->urb_list);
  2405. INIT_LIST_HEAD (&s->urb_unlinked);
  2406. spin_lock_init (&s->urb_list_lock);
  2407. spin_lock_init (&s->qh_lock);
  2408. spin_lock_init (&s->td_lock);
  2409. atomic_set(&s->avoid_bulk, 0);
  2410. s->irq = -1;
  2411. s->io_addr = io_addr;
  2412. s->io_size = io_size;
  2413. s->uhci_pci=dev;
  2414. bus = usb_alloc_bus (&uhci_device_operations);
  2415. if (!bus) {
  2416. kfree (s);
  2417. return -1;
  2418. }
  2419. s->bus = bus;
  2420. bus->hcpriv = s;
  2421. /* UHCI specs says devices must have 2 ports, but goes on to say */
  2422. /* they may have more but give no way to determine how many they */
  2423. /* have, so default to 2 */
  2424. /* According to the UHCI spec, Bit 7 is always set to 1. So we try */
  2425. /* to use this to our advantage */
  2426. for (s->maxports = 0; s->maxports < (io_size - 0x10) / 2; s->maxports++) {
  2427. unsigned int portstatus;
  2428. portstatus = inw (io_addr + 0x10 + (s->maxports * 2));
  2429. dbg("port %i, adr %x status %x", s->maxports,
  2430. io_addr + 0x10 + (s->maxports * 2), portstatus);
  2431. if (!(portstatus & 0x0080))
  2432. break;
  2433. }
  2434. warn("Detected %d ports", s->maxports);
  2435. /* This is experimental so anything less than 2 or greater than 8 is */
  2436. /*  something weird and we'll ignore it */
  2437. if (s->maxports < 2 || s->maxports > 8) {
  2438. dbg("Port count misdetected, forcing to 2 ports");
  2439. s->maxports = 2;
  2440. }
  2441. s->rh.numports = s->maxports;
  2442. s->loop_usage=0;
  2443. if (init_skel (s)) {
  2444. usb_free_bus (bus);
  2445. kfree(s);
  2446. return -1;
  2447. }
  2448. request_region (s->io_addr, io_size, MODNAME);
  2449. reset_hc (s);
  2450. usb_register_bus (s->bus);
  2451. start_hc (s);
  2452. if (request_irq (irq, uhci_interrupt, SA_SHIRQ, MODNAME, s)) {
  2453. err("request_irq %d failed!",irq);
  2454. usb_free_bus (bus);
  2455. reset_hc (s);
  2456. release_region (s->io_addr, s->io_size);
  2457. cleanup_skel(s);
  2458. kfree(s);
  2459. return -1;
  2460. }
  2461. /* Enable PIRQ */
  2462. pci_write_config_word (dev, USBLEGSUP, USBLEGSUP_DEFAULT);
  2463. s->irq = irq;
  2464. if(uhci_start_usb (s) < 0) {
  2465. uhci_pci_remove(dev);
  2466. return -1;
  2467. }
  2468. //chain new uhci device into global list
  2469. pci_set_drvdata(dev, s);
  2470. devs=s;
  2471. return 0;
  2472. }
  2473. _static int __devinit
  2474. uhci_pci_probe (struct pci_dev *dev, const struct pci_device_id *id)
  2475. {
  2476. int i;
  2477. if (pci_enable_device(dev) < 0)
  2478. return -ENODEV;
  2479. if (!dev->irq) {
  2480. err("found UHCI device with no IRQ assigned. check BIOS settings!");
  2481. return -ENODEV;
  2482. }
  2483. pci_set_master(dev);
  2484. /* Search for the IO base address.. */
  2485. for (i = 0; i < 6; i++) {
  2486. unsigned int io_addr = pci_resource_start(dev, i);
  2487. unsigned int io_size = pci_resource_len(dev, i);
  2488. if (!(pci_resource_flags(dev,i) & IORESOURCE_IO))
  2489. continue;
  2490. /* Is it already in use? */
  2491. if (check_region (io_addr, io_size))
  2492. break;
  2493. /* disable legacy emulation */
  2494. pci_write_config_word (dev, USBLEGSUP, 0);
  2495. return alloc_uhci(dev, dev->irq, io_addr, io_size);
  2496. }
  2497. return -ENODEV;
  2498. }
  2499. /*-------------------------------------------------------------------------*/
  2500. static const struct pci_device_id __devinitdata uhci_pci_ids [] = { {
  2501. /* handle any USB UHCI controller */
  2502. class:  ((PCI_CLASS_SERIAL_USB << 8) | 0x00),
  2503. class_mask:  ~0,
  2504. /* no matter who makes it */
  2505. vendor: PCI_ANY_ID,
  2506. device: PCI_ANY_ID,
  2507. subvendor: PCI_ANY_ID,
  2508. subdevice: PCI_ANY_ID,
  2509. }, { /* end: all zeroes */ }
  2510. };
  2511. MODULE_DEVICE_TABLE (pci, uhci_pci_ids);
  2512. static struct pci_driver uhci_pci_driver = {
  2513. name: "usb-uhci",
  2514. id_table: &uhci_pci_ids [0],
  2515. probe: uhci_pci_probe,
  2516. remove: uhci_pci_remove,
  2517. #ifdef CONFIG_PM
  2518. suspend: uhci_pci_suspend,
  2519. resume: uhci_pci_resume,
  2520. #endif /* PM */
  2521. };
  2522. /*-------------------------------------------------------------------------*/
  2523. static int __init uhci_hcd_init (void) 
  2524. {
  2525. int retval;
  2526. #ifdef DEBUG_SLAB
  2527. urb_priv_kmem = kmem_cache_create("urb_priv", sizeof(urb_priv_t), 0, SLAB_HWCACHE_ALIGN, NULL, NULL);
  2528. if(!urb_priv_kmem) {
  2529. err("kmem_cache_create for urb_priv_t failed (out of memory)");
  2530. return -ENOMEM;
  2531. }
  2532. #endif
  2533. info(VERSTR);
  2534. #ifdef CONFIG_USB_UHCI_HIGH_BANDWIDTH
  2535. info("High bandwidth mode enabled");
  2536. #endif
  2537. retval = pci_module_init (&uhci_pci_driver);
  2538. #ifdef DEBUG_SLAB
  2539. if (retval < 0 ) {
  2540. if (kmem_cache_destroy(urb_priv_kmem))
  2541. err("urb_priv_kmem remained");
  2542. }
  2543. #endif
  2544. info(DRIVER_VERSION ":" DRIVER_DESC);
  2545. return retval;
  2546. }
  2547. static void __exit uhci_hcd_cleanup (void) 
  2548. {      
  2549. pci_unregister_driver (&uhci_pci_driver);
  2550. #ifdef DEBUG_SLAB
  2551. if(kmem_cache_destroy(urb_priv_kmem))
  2552. err("urb_priv_kmem remained");
  2553. #endif
  2554. }
  2555. module_init (uhci_hcd_init);
  2556. module_exit (uhci_hcd_cleanup);
  2557. MODULE_AUTHOR( DRIVER_AUTHOR );
  2558. MODULE_DESCRIPTION( DRIVER_DESC );
  2559. MODULE_LICENSE("GPL");