812563661b49fc936f125276d1be6fd04ad4392f
[linux-flexiantxendom0-3.2.10.git] / drivers / usb / host / ehci-mem.c
1 /*
2  * Copyright (c) 2001 by David Brownell
3  * 
4  * This program is free software; you can redistribute it and/or modify it
5  * under the terms of the GNU General Public License as published by the
6  * Free Software Foundation; either version 2 of the License, or (at your
7  * option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful, but
10  * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
11  * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
12  * for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software Foundation,
16  * Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17  */
18
19 /* this file is part of ehci-hcd.c */
20
21 /*-------------------------------------------------------------------------*/
22
23 /*
24  * There's basically three types of memory:
25  *      - data used only by the HCD ... kmalloc is fine
26  *      - async and periodic schedules, shared by HC and HCD ... these
27  *        need to use pci_pool or pci_alloc_consistent
28  *      - driver buffers, read/written by HC ... single shot DMA mapped 
29  *
30  * There's also PCI "register" data, which is memory mapped.
31  * No memory seen by this driver is pageable.
32  */
33
34 /*-------------------------------------------------------------------------*/
35 /* 
36  * Allocator / cleanup for the per device structure
37  * Called by hcd init / removal code
38  */
39 static struct usb_hcd *ehci_hcd_alloc (void)
40 {
41         struct ehci_hcd *ehci;
42
43         ehci = (struct ehci_hcd *)
44                 kmalloc (sizeof (struct ehci_hcd), GFP_KERNEL);
45         if (ehci != 0) {
46                 memset (ehci, 0, sizeof (struct ehci_hcd));
47                 ehci->hcd.product_desc = "EHCI Host Controller";
48                 return &ehci->hcd;
49         }
50         return 0;
51 }
52
53 static void ehci_hcd_free (struct usb_hcd *hcd)
54 {
55         kfree (hcd_to_ehci (hcd));
56 }
57
58 /*-------------------------------------------------------------------------*/
59
60 /* Allocate the key transfer structures from the previously allocated pool */
61
62 static inline void ehci_qtd_init (struct ehci_qtd *qtd, dma_addr_t dma)
63 {
64         memset (qtd, 0, sizeof *qtd);
65         qtd->qtd_dma = dma;
66         qtd->hw_token = cpu_to_le32 (QTD_STS_HALT);
67         qtd->hw_next = EHCI_LIST_END;
68         qtd->hw_alt_next = EHCI_LIST_END;
69         INIT_LIST_HEAD (&qtd->qtd_list);
70 }
71
72 static struct ehci_qtd *ehci_qtd_alloc (struct ehci_hcd *ehci, int flags)
73 {
74         struct ehci_qtd         *qtd;
75         dma_addr_t              dma;
76
77         qtd = pci_pool_alloc (ehci->qtd_pool, flags, &dma);
78         if (qtd != 0) {
79                 ehci_qtd_init (qtd, dma);
80         }
81         return qtd;
82 }
83
84 static inline void ehci_qtd_free (struct ehci_hcd *ehci, struct ehci_qtd *qtd)
85 {
86         pci_pool_free (ehci->qtd_pool, qtd, qtd->qtd_dma);
87 }
88
89
90 static struct ehci_qh *ehci_qh_alloc (struct ehci_hcd *ehci, int flags)
91 {
92         struct ehci_qh          *qh;
93         dma_addr_t              dma;
94
95         qh = (struct ehci_qh *)
96                 pci_pool_alloc (ehci->qh_pool, flags, &dma);
97         if (!qh)
98                 return qh;
99
100         memset (qh, 0, sizeof *qh);
101         atomic_set (&qh->refcount, 1);
102         qh->qh_dma = dma;
103         // INIT_LIST_HEAD (&qh->qh_list);
104         INIT_LIST_HEAD (&qh->qtd_list);
105
106         /* dummy td enables safe urb queuing */
107         qh->dummy = ehci_qtd_alloc (ehci, flags);
108         if (qh->dummy == 0) {
109                 ehci_dbg (ehci, "no dummy td\n");
110                 pci_pool_free (ehci->qh_pool, qh, qh->qh_dma);
111                 qh = 0;
112         }
113         return qh;
114 }
115
116 /* to share a qh (cpu threads, or hc) */
117 static inline struct ehci_qh *qh_get (/* ehci, */ struct ehci_qh *qh)
118 {
119         atomic_inc (&qh->refcount);
120         return qh;
121 }
122
123 static void qh_put (struct ehci_hcd *ehci, struct ehci_qh *qh)
124 {
125         if (!atomic_dec_and_test (&qh->refcount))
126                 return;
127         /* clean qtds first, and know this is not linked */
128         if (!list_empty (&qh->qtd_list) || qh->qh_next.ptr) {
129                 ehci_dbg (ehci, "unused qh not empty!\n");
130                 BUG ();
131         }
132         if (qh->dummy)
133                 ehci_qtd_free (ehci, qh->dummy);
134         usb_put_dev (qh->dev);
135         pci_pool_free (ehci->qh_pool, qh, qh->qh_dma);
136 }
137
138 /*-------------------------------------------------------------------------*/
139
140 /* The queue heads and transfer descriptors are managed from pools tied 
141  * to each of the "per device" structures.
142  * This is the initialisation and cleanup code.
143  */
144
145 static void ehci_mem_cleanup (struct ehci_hcd *ehci)
146 {
147         if (ehci->async)
148                 qh_put (ehci, ehci->async);
149         ehci->async = 0;
150
151         /* PCI consistent memory and pools */
152         if (ehci->qtd_pool)
153                 pci_pool_destroy (ehci->qtd_pool);
154         ehci->qtd_pool = 0;
155
156         if (ehci->qh_pool) {
157                 pci_pool_destroy (ehci->qh_pool);
158                 ehci->qh_pool = 0;
159         }
160
161         if (ehci->itd_pool)
162                 pci_pool_destroy (ehci->itd_pool);
163         ehci->itd_pool = 0;
164
165         if (ehci->sitd_pool)
166                 pci_pool_destroy (ehci->sitd_pool);
167         ehci->sitd_pool = 0;
168
169         if (ehci->periodic)
170                 pci_free_consistent (ehci->hcd.pdev,
171                         ehci->periodic_size * sizeof (u32),
172                         ehci->periodic, ehci->periodic_dma);
173         ehci->periodic = 0;
174
175         /* shadow periodic table */
176         if (ehci->pshadow)
177                 kfree (ehci->pshadow);
178         ehci->pshadow = 0;
179 }
180
181 /* remember to add cleanup code (above) if you add anything here */
182 static int ehci_mem_init (struct ehci_hcd *ehci, int flags)
183 {
184         int i;
185
186         /* QTDs for control/bulk/intr transfers */
187         ehci->qtd_pool = pci_pool_create ("ehci_qtd", ehci->hcd.pdev,
188                         sizeof (struct ehci_qtd),
189                         32 /* byte alignment (for hw parts) */,
190                         4096 /* can't cross 4K */);
191         if (!ehci->qtd_pool) {
192                 goto fail;
193         }
194
195         /* QHs for control/bulk/intr transfers */
196         ehci->qh_pool = pci_pool_create ("ehci_qh", ehci->hcd.pdev,
197                         sizeof (struct ehci_qh),
198                         32 /* byte alignment (for hw parts) */,
199                         4096 /* can't cross 4K */);
200         if (!ehci->qh_pool) {
201                 goto fail;
202         }
203         ehci->async = ehci_qh_alloc (ehci, flags);
204         if (!ehci->async) {
205                 goto fail;
206         }
207
208         /* ITD for high speed ISO transfers */
209         ehci->itd_pool = pci_pool_create ("ehci_itd", ehci->hcd.pdev,
210                         sizeof (struct ehci_itd),
211                         32 /* byte alignment (for hw parts) */,
212                         4096 /* can't cross 4K */);
213         if (!ehci->itd_pool) {
214                 goto fail;
215         }
216
217         /* SITD for full/low speed split ISO transfers */
218         ehci->sitd_pool = pci_pool_create ("ehci_sitd", ehci->hcd.pdev,
219                         sizeof (struct ehci_sitd),
220                         32 /* byte alignment (for hw parts) */,
221                         4096 /* can't cross 4K */);
222         if (!ehci->sitd_pool) {
223                 goto fail;
224         }
225
226         /* Hardware periodic table */
227         ehci->periodic = (u32 *)
228                 pci_alloc_consistent (ehci->hcd.pdev,
229                         ehci->periodic_size * sizeof (u32),
230                         &ehci->periodic_dma);
231         if (ehci->periodic == 0) {
232                 goto fail;
233         }
234         for (i = 0; i < ehci->periodic_size; i++)
235                 ehci->periodic [i] = EHCI_LIST_END;
236
237         /* software shadow of hardware table */
238         ehci->pshadow = kmalloc (ehci->periodic_size * sizeof (void *), flags);
239         if (ehci->pshadow == 0) {
240                 goto fail;
241         }
242         memset (ehci->pshadow, 0, ehci->periodic_size * sizeof (void *));
243
244         return 0;
245
246 fail:
247         ehci_dbg (ehci, "couldn't init memory\n");
248         ehci_mem_cleanup (ehci);
249         return -ENOMEM;
250 }