Statistics
| Branch: | Revision:

root / hw / usb-uhci.c @ 9ea0b7a1

History | View | Annotate | Download (28.5 kB)

1 bb36d470 bellard
/*
2 bb36d470 bellard
 * USB UHCI controller emulation
3 5fafdf24 ths
 *
4 bb36d470 bellard
 * Copyright (c) 2005 Fabrice Bellard
5 5fafdf24 ths
 *
6 54f254f9 aliguori
 * Copyright (c) 2008 Max Krasnyansky
7 54f254f9 aliguori
 *     Magor rewrite of the UHCI data structures parser and frame processor
8 54f254f9 aliguori
 *     Support for fully async operation and multiple outstanding transactions
9 54f254f9 aliguori
 *
10 bb36d470 bellard
 * Permission is hereby granted, free of charge, to any person obtaining a copy
11 bb36d470 bellard
 * of this software and associated documentation files (the "Software"), to deal
12 bb36d470 bellard
 * in the Software without restriction, including without limitation the rights
13 bb36d470 bellard
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
14 bb36d470 bellard
 * copies of the Software, and to permit persons to whom the Software is
15 bb36d470 bellard
 * furnished to do so, subject to the following conditions:
16 bb36d470 bellard
 *
17 bb36d470 bellard
 * The above copyright notice and this permission notice shall be included in
18 bb36d470 bellard
 * all copies or substantial portions of the Software.
19 bb36d470 bellard
 *
20 bb36d470 bellard
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
21 bb36d470 bellard
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
22 bb36d470 bellard
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
23 bb36d470 bellard
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
24 bb36d470 bellard
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
25 bb36d470 bellard
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
26 bb36d470 bellard
 * THE SOFTWARE.
27 bb36d470 bellard
 */
28 87ecb68b pbrook
#include "hw.h"
29 87ecb68b pbrook
#include "usb.h"
30 87ecb68b pbrook
#include "pci.h"
31 87ecb68b pbrook
#include "qemu-timer.h"
32 bb36d470 bellard
33 bb36d470 bellard
//#define DEBUG
34 54f254f9 aliguori
//#define DEBUG_DUMP_DATA
35 bb36d470 bellard
36 96217e31 ths
#define UHCI_CMD_FGR      (1 << 4)
37 96217e31 ths
#define UHCI_CMD_EGSM     (1 << 3)
38 bb36d470 bellard
#define UHCI_CMD_GRESET   (1 << 2)
39 bb36d470 bellard
#define UHCI_CMD_HCRESET  (1 << 1)
40 bb36d470 bellard
#define UHCI_CMD_RS       (1 << 0)
41 bb36d470 bellard
42 bb36d470 bellard
#define UHCI_STS_HCHALTED (1 << 5)
43 bb36d470 bellard
#define UHCI_STS_HCPERR   (1 << 4)
44 bb36d470 bellard
#define UHCI_STS_HSERR    (1 << 3)
45 bb36d470 bellard
#define UHCI_STS_RD       (1 << 2)
46 bb36d470 bellard
#define UHCI_STS_USBERR   (1 << 1)
47 bb36d470 bellard
#define UHCI_STS_USBINT   (1 << 0)
48 bb36d470 bellard
49 bb36d470 bellard
#define TD_CTRL_SPD     (1 << 29)
50 bb36d470 bellard
#define TD_CTRL_ERROR_SHIFT  27
51 bb36d470 bellard
#define TD_CTRL_IOS     (1 << 25)
52 bb36d470 bellard
#define TD_CTRL_IOC     (1 << 24)
53 bb36d470 bellard
#define TD_CTRL_ACTIVE  (1 << 23)
54 bb36d470 bellard
#define TD_CTRL_STALL   (1 << 22)
55 bb36d470 bellard
#define TD_CTRL_BABBLE  (1 << 20)
56 bb36d470 bellard
#define TD_CTRL_NAK     (1 << 19)
57 bb36d470 bellard
#define TD_CTRL_TIMEOUT (1 << 18)
58 bb36d470 bellard
59 bb36d470 bellard
#define UHCI_PORT_RESET (1 << 9)
60 bb36d470 bellard
#define UHCI_PORT_LSDA  (1 << 8)
61 bb36d470 bellard
#define UHCI_PORT_ENC   (1 << 3)
62 bb36d470 bellard
#define UHCI_PORT_EN    (1 << 2)
63 bb36d470 bellard
#define UHCI_PORT_CSC   (1 << 1)
64 bb36d470 bellard
#define UHCI_PORT_CCS   (1 << 0)
65 bb36d470 bellard
66 bb36d470 bellard
#define FRAME_TIMER_FREQ 1000
67 bb36d470 bellard
68 bb36d470 bellard
#define FRAME_MAX_LOOPS  100
69 bb36d470 bellard
70 bb36d470 bellard
#define NB_PORTS 2
71 bb36d470 bellard
72 54f254f9 aliguori
#ifdef DEBUG
73 54f254f9 aliguori
#define dprintf printf
74 54f254f9 aliguori
75 54f254f9 aliguori
const char *pid2str(int pid)
76 54f254f9 aliguori
{
77 54f254f9 aliguori
    switch (pid) {
78 54f254f9 aliguori
    case USB_TOKEN_SETUP: return "SETUP";
79 54f254f9 aliguori
    case USB_TOKEN_IN:    return "IN";
80 54f254f9 aliguori
    case USB_TOKEN_OUT:   return "OUT";
81 54f254f9 aliguori
    }
82 54f254f9 aliguori
    return "?";
83 54f254f9 aliguori
}
84 54f254f9 aliguori
85 54f254f9 aliguori
#else
86 54f254f9 aliguori
#define dprintf(...)
87 54f254f9 aliguori
#endif
88 54f254f9 aliguori
89 54f254f9 aliguori
#ifdef DEBUG_DUMP_DATA
90 54f254f9 aliguori
static void dump_data(const uint8_t *data, int len)
91 54f254f9 aliguori
{
92 54f254f9 aliguori
    int i;
93 54f254f9 aliguori
94 54f254f9 aliguori
    printf("uhci: data: ");
95 54f254f9 aliguori
    for(i = 0; i < len; i++)
96 54f254f9 aliguori
        printf(" %02x", data[i]);
97 54f254f9 aliguori
    printf("\n");
98 54f254f9 aliguori
}
99 54f254f9 aliguori
#else
100 54f254f9 aliguori
static void dump_data(const uint8_t *data, int len) {}
101 54f254f9 aliguori
#endif
102 54f254f9 aliguori
103 54f254f9 aliguori
/* 
104 54f254f9 aliguori
 * Pending async transaction.
105 54f254f9 aliguori
 * 'packet' must be the first field because completion
106 54f254f9 aliguori
 * handler does "(UHCIAsync *) pkt" cast.
107 54f254f9 aliguori
 */
108 54f254f9 aliguori
typedef struct UHCIAsync {
109 54f254f9 aliguori
    USBPacket packet;
110 54f254f9 aliguori
    struct UHCIAsync *next;
111 54f254f9 aliguori
    uint32_t  td;
112 54f254f9 aliguori
    uint32_t  token;
113 54f254f9 aliguori
    int8_t    valid;
114 54f254f9 aliguori
    uint8_t   done;
115 54f254f9 aliguori
    uint8_t   buffer[2048];
116 54f254f9 aliguori
} UHCIAsync;
117 54f254f9 aliguori
118 bb36d470 bellard
typedef struct UHCIPort {
119 bb36d470 bellard
    USBPort port;
120 bb36d470 bellard
    uint16_t ctrl;
121 bb36d470 bellard
} UHCIPort;
122 bb36d470 bellard
123 bb36d470 bellard
typedef struct UHCIState {
124 bb36d470 bellard
    PCIDevice dev;
125 bb36d470 bellard
    uint16_t cmd; /* cmd register */
126 bb36d470 bellard
    uint16_t status;
127 bb36d470 bellard
    uint16_t intr; /* interrupt enable register */
128 bb36d470 bellard
    uint16_t frnum; /* frame number */
129 bb36d470 bellard
    uint32_t fl_base_addr; /* frame list base address */
130 bb36d470 bellard
    uint8_t sof_timing;
131 bb36d470 bellard
    uint8_t status2; /* bit 0 and 1 are used to generate UHCI_STS_USBINT */
132 bb36d470 bellard
    QEMUTimer *frame_timer;
133 bb36d470 bellard
    UHCIPort ports[NB_PORTS];
134 4d611c9a pbrook
135 4d611c9a pbrook
    /* Interrupts that should be raised at the end of the current frame.  */
136 4d611c9a pbrook
    uint32_t pending_int_mask;
137 54f254f9 aliguori
138 54f254f9 aliguori
    /* Active packets */
139 54f254f9 aliguori
    UHCIAsync *async_pending;
140 54f254f9 aliguori
    UHCIAsync *async_pool;
141 bb36d470 bellard
} UHCIState;
142 bb36d470 bellard
143 bb36d470 bellard
typedef struct UHCI_TD {
144 bb36d470 bellard
    uint32_t link;
145 bb36d470 bellard
    uint32_t ctrl; /* see TD_CTRL_xxx */
146 bb36d470 bellard
    uint32_t token;
147 bb36d470 bellard
    uint32_t buffer;
148 bb36d470 bellard
} UHCI_TD;
149 bb36d470 bellard
150 bb36d470 bellard
typedef struct UHCI_QH {
151 bb36d470 bellard
    uint32_t link;
152 bb36d470 bellard
    uint32_t el_link;
153 bb36d470 bellard
} UHCI_QH;
154 bb36d470 bellard
155 54f254f9 aliguori
static UHCIAsync *uhci_async_alloc(UHCIState *s)
156 54f254f9 aliguori
{
157 54f254f9 aliguori
    UHCIAsync *async = qemu_malloc(sizeof(UHCIAsync));
158 487414f1 aliguori
159 487414f1 aliguori
    memset(&async->packet, 0, sizeof(async->packet));
160 487414f1 aliguori
    async->valid = 0;
161 487414f1 aliguori
    async->td    = 0;
162 487414f1 aliguori
    async->token = 0;
163 487414f1 aliguori
    async->done  = 0;
164 487414f1 aliguori
    async->next  = NULL;
165 54f254f9 aliguori
166 54f254f9 aliguori
    return async;
167 54f254f9 aliguori
}
168 54f254f9 aliguori
169 54f254f9 aliguori
static void uhci_async_free(UHCIState *s, UHCIAsync *async)
170 54f254f9 aliguori
{
171 54f254f9 aliguori
    qemu_free(async);
172 54f254f9 aliguori
}
173 54f254f9 aliguori
174 54f254f9 aliguori
static void uhci_async_link(UHCIState *s, UHCIAsync *async)
175 54f254f9 aliguori
{
176 54f254f9 aliguori
    async->next = s->async_pending;
177 54f254f9 aliguori
    s->async_pending = async;
178 54f254f9 aliguori
}
179 54f254f9 aliguori
180 54f254f9 aliguori
static void uhci_async_unlink(UHCIState *s, UHCIAsync *async)
181 54f254f9 aliguori
{
182 54f254f9 aliguori
    UHCIAsync *curr = s->async_pending;
183 54f254f9 aliguori
    UHCIAsync **prev = &s->async_pending;
184 54f254f9 aliguori
185 54f254f9 aliguori
    while (curr) {
186 54f254f9 aliguori
        if (curr == async) {
187 54f254f9 aliguori
            *prev = curr->next;
188 54f254f9 aliguori
            return;
189 54f254f9 aliguori
        }
190 54f254f9 aliguori
191 54f254f9 aliguori
        prev = &curr->next;
192 54f254f9 aliguori
        curr = curr->next;
193 54f254f9 aliguori
    }
194 54f254f9 aliguori
}
195 54f254f9 aliguori
196 54f254f9 aliguori
static void uhci_async_cancel(UHCIState *s, UHCIAsync *async)
197 54f254f9 aliguori
{
198 54f254f9 aliguori
    dprintf("uhci: cancel td 0x%x token 0x%x done %u\n",
199 54f254f9 aliguori
           async->td, async->token, async->done);
200 54f254f9 aliguori
201 54f254f9 aliguori
    if (!async->done)
202 54f254f9 aliguori
        usb_cancel_packet(&async->packet);
203 54f254f9 aliguori
    uhci_async_free(s, async);
204 54f254f9 aliguori
}
205 54f254f9 aliguori
206 54f254f9 aliguori
/*
207 54f254f9 aliguori
 * Mark all outstanding async packets as invalid.
208 54f254f9 aliguori
 * This is used for canceling them when TDs are removed by the HCD.
209 54f254f9 aliguori
 */
210 54f254f9 aliguori
static UHCIAsync *uhci_async_validate_begin(UHCIState *s)
211 54f254f9 aliguori
{
212 54f254f9 aliguori
    UHCIAsync *async = s->async_pending;
213 54f254f9 aliguori
214 54f254f9 aliguori
    while (async) {
215 54f254f9 aliguori
        async->valid--;
216 54f254f9 aliguori
        async = async->next;
217 54f254f9 aliguori
    }
218 54f254f9 aliguori
    return NULL;
219 54f254f9 aliguori
}
220 54f254f9 aliguori
221 54f254f9 aliguori
/*
222 54f254f9 aliguori
 * Cancel async packets that are no longer valid
223 54f254f9 aliguori
 */
224 54f254f9 aliguori
static void uhci_async_validate_end(UHCIState *s)
225 54f254f9 aliguori
{
226 54f254f9 aliguori
    UHCIAsync *curr = s->async_pending;
227 54f254f9 aliguori
    UHCIAsync **prev = &s->async_pending;
228 54f254f9 aliguori
    UHCIAsync *next;
229 54f254f9 aliguori
230 54f254f9 aliguori
    while (curr) {
231 54f254f9 aliguori
        if (curr->valid > 0) {
232 54f254f9 aliguori
            prev = &curr->next;
233 54f254f9 aliguori
            curr = curr->next;
234 54f254f9 aliguori
            continue;
235 54f254f9 aliguori
        }
236 54f254f9 aliguori
237 54f254f9 aliguori
        next = curr->next;
238 54f254f9 aliguori
239 54f254f9 aliguori
        /* Unlink */
240 54f254f9 aliguori
        *prev = next;
241 54f254f9 aliguori
242 54f254f9 aliguori
        uhci_async_cancel(s, curr);
243 54f254f9 aliguori
244 54f254f9 aliguori
        curr = next;
245 54f254f9 aliguori
    }
246 54f254f9 aliguori
}
247 54f254f9 aliguori
248 54f254f9 aliguori
static void uhci_async_cancel_all(UHCIState *s)
249 54f254f9 aliguori
{
250 54f254f9 aliguori
    UHCIAsync *curr = s->async_pending;
251 54f254f9 aliguori
    UHCIAsync *next;
252 54f254f9 aliguori
253 54f254f9 aliguori
    while (curr) {
254 54f254f9 aliguori
        next = curr->next;
255 54f254f9 aliguori
256 54f254f9 aliguori
        uhci_async_cancel(s, curr);
257 54f254f9 aliguori
258 54f254f9 aliguori
        curr = next;
259 54f254f9 aliguori
    }
260 54f254f9 aliguori
261 54f254f9 aliguori
    s->async_pending = NULL;
262 54f254f9 aliguori
}
263 54f254f9 aliguori
264 54f254f9 aliguori
static UHCIAsync *uhci_async_find_td(UHCIState *s, uint32_t addr, uint32_t token)
265 54f254f9 aliguori
{
266 54f254f9 aliguori
    UHCIAsync *async = s->async_pending;
267 e8ee3c72 aurel32
    UHCIAsync *match = NULL;
268 e8ee3c72 aurel32
    int count = 0;
269 e8ee3c72 aurel32
270 e8ee3c72 aurel32
    /*
271 e8ee3c72 aurel32
     * We're looking for the best match here. ie both td addr and token.
272 e8ee3c72 aurel32
     * Otherwise we return last good match. ie just token.
273 e8ee3c72 aurel32
     * It's ok to match just token because it identifies the transaction
274 e8ee3c72 aurel32
     * rather well, token includes: device addr, endpoint, size, etc.
275 e8ee3c72 aurel32
     *
276 e8ee3c72 aurel32
     * Also since we queue async transactions in reverse order by returning
277 e8ee3c72 aurel32
     * last good match we restores the order.
278 e8ee3c72 aurel32
     *
279 e8ee3c72 aurel32
     * It's expected that we wont have a ton of outstanding transactions.
280 e8ee3c72 aurel32
     * If we ever do we'd want to optimize this algorithm.
281 e8ee3c72 aurel32
     */
282 54f254f9 aliguori
283 54f254f9 aliguori
    while (async) {
284 e8ee3c72 aurel32
        if (async->token == token) {
285 e8ee3c72 aurel32
            /* Good match */
286 e8ee3c72 aurel32
            match = async;
287 e8ee3c72 aurel32
288 e8ee3c72 aurel32
            if (async->td == addr) {
289 e8ee3c72 aurel32
                /* Best match */
290 e8ee3c72 aurel32
                break;
291 54f254f9 aliguori
            }
292 54f254f9 aliguori
        }
293 54f254f9 aliguori
294 54f254f9 aliguori
        async = async->next;
295 e8ee3c72 aurel32
        count++;
296 54f254f9 aliguori
    }
297 e8ee3c72 aurel32
298 e8ee3c72 aurel32
    if (count > 64)
299 e8ee3c72 aurel32
        fprintf(stderr, "uhci: warning lots of async transactions\n");
300 e8ee3c72 aurel32
301 e8ee3c72 aurel32
    return match;
302 54f254f9 aliguori
}
303 54f254f9 aliguori
304 bb36d470 bellard
static void uhci_attach(USBPort *port1, USBDevice *dev);
305 bb36d470 bellard
306 bb36d470 bellard
static void uhci_update_irq(UHCIState *s)
307 bb36d470 bellard
{
308 bb36d470 bellard
    int level;
309 bb36d470 bellard
    if (((s->status2 & 1) && (s->intr & (1 << 2))) ||
310 bb36d470 bellard
        ((s->status2 & 2) && (s->intr & (1 << 3))) ||
311 bb36d470 bellard
        ((s->status & UHCI_STS_USBERR) && (s->intr & (1 << 0))) ||
312 bb36d470 bellard
        ((s->status & UHCI_STS_RD) && (s->intr & (1 << 1))) ||
313 bb36d470 bellard
        (s->status & UHCI_STS_HSERR) ||
314 bb36d470 bellard
        (s->status & UHCI_STS_HCPERR)) {
315 bb36d470 bellard
        level = 1;
316 bb36d470 bellard
    } else {
317 bb36d470 bellard
        level = 0;
318 bb36d470 bellard
    }
319 d537cf6c pbrook
    qemu_set_irq(s->dev.irq[3], level);
320 bb36d470 bellard
}
321 bb36d470 bellard
322 bb36d470 bellard
static void uhci_reset(UHCIState *s)
323 bb36d470 bellard
{
324 bb36d470 bellard
    uint8_t *pci_conf;
325 bb36d470 bellard
    int i;
326 bb36d470 bellard
    UHCIPort *port;
327 bb36d470 bellard
328 6f382b5e aliguori
    dprintf("uhci: full reset\n");
329 6f382b5e aliguori
330 bb36d470 bellard
    pci_conf = s->dev.config;
331 bb36d470 bellard
332 bb36d470 bellard
    pci_conf[0x6a] = 0x01; /* usb clock */
333 bb36d470 bellard
    pci_conf[0x6b] = 0x00;
334 bb36d470 bellard
    s->cmd = 0;
335 bb36d470 bellard
    s->status = 0;
336 bb36d470 bellard
    s->status2 = 0;
337 bb36d470 bellard
    s->intr = 0;
338 bb36d470 bellard
    s->fl_base_addr = 0;
339 bb36d470 bellard
    s->sof_timing = 64;
340 54f254f9 aliguori
341 bb36d470 bellard
    for(i = 0; i < NB_PORTS; i++) {
342 bb36d470 bellard
        port = &s->ports[i];
343 bb36d470 bellard
        port->ctrl = 0x0080;
344 a594cfbf bellard
        if (port->port.dev)
345 a594cfbf bellard
            uhci_attach(&port->port, port->port.dev);
346 bb36d470 bellard
    }
347 54f254f9 aliguori
348 54f254f9 aliguori
    uhci_async_cancel_all(s);
349 bb36d470 bellard
}
350 bb36d470 bellard
351 b9dc033c balrog
static void uhci_save(QEMUFile *f, void *opaque)
352 b9dc033c balrog
{
353 b9dc033c balrog
    UHCIState *s = opaque;
354 b9dc033c balrog
    uint8_t num_ports = NB_PORTS;
355 b9dc033c balrog
    int i;
356 b9dc033c balrog
357 6f382b5e aliguori
    uhci_async_cancel_all(s);
358 6f382b5e aliguori
359 b9dc033c balrog
    pci_device_save(&s->dev, f);
360 b9dc033c balrog
361 b9dc033c balrog
    qemu_put_8s(f, &num_ports);
362 b9dc033c balrog
    for (i = 0; i < num_ports; ++i)
363 b9dc033c balrog
        qemu_put_be16s(f, &s->ports[i].ctrl);
364 b9dc033c balrog
    qemu_put_be16s(f, &s->cmd);
365 b9dc033c balrog
    qemu_put_be16s(f, &s->status);
366 b9dc033c balrog
    qemu_put_be16s(f, &s->intr);
367 b9dc033c balrog
    qemu_put_be16s(f, &s->frnum);
368 b9dc033c balrog
    qemu_put_be32s(f, &s->fl_base_addr);
369 b9dc033c balrog
    qemu_put_8s(f, &s->sof_timing);
370 b9dc033c balrog
    qemu_put_8s(f, &s->status2);
371 b9dc033c balrog
    qemu_put_timer(f, s->frame_timer);
372 b9dc033c balrog
}
373 b9dc033c balrog
374 b9dc033c balrog
static int uhci_load(QEMUFile *f, void *opaque, int version_id)
375 b9dc033c balrog
{
376 b9dc033c balrog
    UHCIState *s = opaque;
377 b9dc033c balrog
    uint8_t num_ports;
378 b9dc033c balrog
    int i, ret;
379 b9dc033c balrog
380 b9dc033c balrog
    if (version_id > 1)
381 b9dc033c balrog
        return -EINVAL;
382 b9dc033c balrog
383 b9dc033c balrog
    ret = pci_device_load(&s->dev, f);
384 b9dc033c balrog
    if (ret < 0)
385 b9dc033c balrog
        return ret;
386 b9dc033c balrog
387 b9dc033c balrog
    qemu_get_8s(f, &num_ports);
388 b9dc033c balrog
    if (num_ports != NB_PORTS)
389 b9dc033c balrog
        return -EINVAL;
390 b9dc033c balrog
391 b9dc033c balrog
    for (i = 0; i < num_ports; ++i)
392 b9dc033c balrog
        qemu_get_be16s(f, &s->ports[i].ctrl);
393 b9dc033c balrog
    qemu_get_be16s(f, &s->cmd);
394 b9dc033c balrog
    qemu_get_be16s(f, &s->status);
395 b9dc033c balrog
    qemu_get_be16s(f, &s->intr);
396 b9dc033c balrog
    qemu_get_be16s(f, &s->frnum);
397 b9dc033c balrog
    qemu_get_be32s(f, &s->fl_base_addr);
398 b9dc033c balrog
    qemu_get_8s(f, &s->sof_timing);
399 b9dc033c balrog
    qemu_get_8s(f, &s->status2);
400 b9dc033c balrog
    qemu_get_timer(f, s->frame_timer);
401 b9dc033c balrog
402 b9dc033c balrog
    return 0;
403 b9dc033c balrog
}
404 b9dc033c balrog
405 bb36d470 bellard
static void uhci_ioport_writeb(void *opaque, uint32_t addr, uint32_t val)
406 bb36d470 bellard
{
407 bb36d470 bellard
    UHCIState *s = opaque;
408 3b46e624 ths
409 bb36d470 bellard
    addr &= 0x1f;
410 bb36d470 bellard
    switch(addr) {
411 bb36d470 bellard
    case 0x0c:
412 bb36d470 bellard
        s->sof_timing = val;
413 bb36d470 bellard
        break;
414 bb36d470 bellard
    }
415 bb36d470 bellard
}
416 bb36d470 bellard
417 bb36d470 bellard
static uint32_t uhci_ioport_readb(void *opaque, uint32_t addr)
418 bb36d470 bellard
{
419 bb36d470 bellard
    UHCIState *s = opaque;
420 bb36d470 bellard
    uint32_t val;
421 bb36d470 bellard
422 bb36d470 bellard
    addr &= 0x1f;
423 bb36d470 bellard
    switch(addr) {
424 bb36d470 bellard
    case 0x0c:
425 bb36d470 bellard
        val = s->sof_timing;
426 d80cfb3f pbrook
        break;
427 bb36d470 bellard
    default:
428 bb36d470 bellard
        val = 0xff;
429 bb36d470 bellard
        break;
430 bb36d470 bellard
    }
431 bb36d470 bellard
    return val;
432 bb36d470 bellard
}
433 bb36d470 bellard
434 bb36d470 bellard
static void uhci_ioport_writew(void *opaque, uint32_t addr, uint32_t val)
435 bb36d470 bellard
{
436 bb36d470 bellard
    UHCIState *s = opaque;
437 3b46e624 ths
438 bb36d470 bellard
    addr &= 0x1f;
439 54f254f9 aliguori
    dprintf("uhci: writew port=0x%04x val=0x%04x\n", addr, val);
440 54f254f9 aliguori
441 bb36d470 bellard
    switch(addr) {
442 bb36d470 bellard
    case 0x00:
443 bb36d470 bellard
        if ((val & UHCI_CMD_RS) && !(s->cmd & UHCI_CMD_RS)) {
444 bb36d470 bellard
            /* start frame processing */
445 bb36d470 bellard
            qemu_mod_timer(s->frame_timer, qemu_get_clock(vm_clock));
446 52328140 bellard
            s->status &= ~UHCI_STS_HCHALTED;
447 467d409f bellard
        } else if (!(val & UHCI_CMD_RS)) {
448 52328140 bellard
            s->status |= UHCI_STS_HCHALTED;
449 bb36d470 bellard
        }
450 bb36d470 bellard
        if (val & UHCI_CMD_GRESET) {
451 bb36d470 bellard
            UHCIPort *port;
452 bb36d470 bellard
            USBDevice *dev;
453 bb36d470 bellard
            int i;
454 bb36d470 bellard
455 bb36d470 bellard
            /* send reset on the USB bus */
456 bb36d470 bellard
            for(i = 0; i < NB_PORTS; i++) {
457 bb36d470 bellard
                port = &s->ports[i];
458 a594cfbf bellard
                dev = port->port.dev;
459 bb36d470 bellard
                if (dev) {
460 4d611c9a pbrook
                    usb_send_msg(dev, USB_MSG_RESET);
461 bb36d470 bellard
                }
462 bb36d470 bellard
            }
463 bb36d470 bellard
            uhci_reset(s);
464 bb36d470 bellard
            return;
465 bb36d470 bellard
        }
466 5e9ab4c4 bellard
        if (val & UHCI_CMD_HCRESET) {
467 bb36d470 bellard
            uhci_reset(s);
468 bb36d470 bellard
            return;
469 bb36d470 bellard
        }
470 bb36d470 bellard
        s->cmd = val;
471 bb36d470 bellard
        break;
472 bb36d470 bellard
    case 0x02:
473 bb36d470 bellard
        s->status &= ~val;
474 bb36d470 bellard
        /* XXX: the chip spec is not coherent, so we add a hidden
475 bb36d470 bellard
           register to distinguish between IOC and SPD */
476 bb36d470 bellard
        if (val & UHCI_STS_USBINT)
477 bb36d470 bellard
            s->status2 = 0;
478 bb36d470 bellard
        uhci_update_irq(s);
479 bb36d470 bellard
        break;
480 bb36d470 bellard
    case 0x04:
481 bb36d470 bellard
        s->intr = val;
482 bb36d470 bellard
        uhci_update_irq(s);
483 bb36d470 bellard
        break;
484 bb36d470 bellard
    case 0x06:
485 bb36d470 bellard
        if (s->status & UHCI_STS_HCHALTED)
486 bb36d470 bellard
            s->frnum = val & 0x7ff;
487 bb36d470 bellard
        break;
488 bb36d470 bellard
    case 0x10 ... 0x1f:
489 bb36d470 bellard
        {
490 bb36d470 bellard
            UHCIPort *port;
491 bb36d470 bellard
            USBDevice *dev;
492 bb36d470 bellard
            int n;
493 bb36d470 bellard
494 bb36d470 bellard
            n = (addr >> 1) & 7;
495 bb36d470 bellard
            if (n >= NB_PORTS)
496 bb36d470 bellard
                return;
497 bb36d470 bellard
            port = &s->ports[n];
498 a594cfbf bellard
            dev = port->port.dev;
499 bb36d470 bellard
            if (dev) {
500 bb36d470 bellard
                /* port reset */
501 5fafdf24 ths
                if ( (val & UHCI_PORT_RESET) &&
502 bb36d470 bellard
                     !(port->ctrl & UHCI_PORT_RESET) ) {
503 4d611c9a pbrook
                    usb_send_msg(dev, USB_MSG_RESET);
504 bb36d470 bellard
                }
505 bb36d470 bellard
            }
506 bb36d470 bellard
            port->ctrl = (port->ctrl & 0x01fb) | (val & ~0x01fb);
507 bb36d470 bellard
            /* some bits are reset when a '1' is written to them */
508 bb36d470 bellard
            port->ctrl &= ~(val & 0x000a);
509 bb36d470 bellard
        }
510 bb36d470 bellard
        break;
511 bb36d470 bellard
    }
512 bb36d470 bellard
}
513 bb36d470 bellard
514 bb36d470 bellard
static uint32_t uhci_ioport_readw(void *opaque, uint32_t addr)
515 bb36d470 bellard
{
516 bb36d470 bellard
    UHCIState *s = opaque;
517 bb36d470 bellard
    uint32_t val;
518 bb36d470 bellard
519 bb36d470 bellard
    addr &= 0x1f;
520 bb36d470 bellard
    switch(addr) {
521 bb36d470 bellard
    case 0x00:
522 bb36d470 bellard
        val = s->cmd;
523 bb36d470 bellard
        break;
524 bb36d470 bellard
    case 0x02:
525 bb36d470 bellard
        val = s->status;
526 bb36d470 bellard
        break;
527 bb36d470 bellard
    case 0x04:
528 bb36d470 bellard
        val = s->intr;
529 bb36d470 bellard
        break;
530 bb36d470 bellard
    case 0x06:
531 bb36d470 bellard
        val = s->frnum;
532 bb36d470 bellard
        break;
533 bb36d470 bellard
    case 0x10 ... 0x1f:
534 bb36d470 bellard
        {
535 bb36d470 bellard
            UHCIPort *port;
536 bb36d470 bellard
            int n;
537 bb36d470 bellard
            n = (addr >> 1) & 7;
538 5fafdf24 ths
            if (n >= NB_PORTS)
539 bb36d470 bellard
                goto read_default;
540 bb36d470 bellard
            port = &s->ports[n];
541 bb36d470 bellard
            val = port->ctrl;
542 bb36d470 bellard
        }
543 bb36d470 bellard
        break;
544 bb36d470 bellard
    default:
545 bb36d470 bellard
    read_default:
546 bb36d470 bellard
        val = 0xff7f; /* disabled port */
547 bb36d470 bellard
        break;
548 bb36d470 bellard
    }
549 54f254f9 aliguori
550 54f254f9 aliguori
    dprintf("uhci: readw port=0x%04x val=0x%04x\n", addr, val);
551 54f254f9 aliguori
552 bb36d470 bellard
    return val;
553 bb36d470 bellard
}
554 bb36d470 bellard
555 bb36d470 bellard
static void uhci_ioport_writel(void *opaque, uint32_t addr, uint32_t val)
556 bb36d470 bellard
{
557 bb36d470 bellard
    UHCIState *s = opaque;
558 bb36d470 bellard
559 bb36d470 bellard
    addr &= 0x1f;
560 54f254f9 aliguori
    dprintf("uhci: writel port=0x%04x val=0x%08x\n", addr, val);
561 54f254f9 aliguori
562 bb36d470 bellard
    switch(addr) {
563 bb36d470 bellard
    case 0x08:
564 bb36d470 bellard
        s->fl_base_addr = val & ~0xfff;
565 bb36d470 bellard
        break;
566 bb36d470 bellard
    }
567 bb36d470 bellard
}
568 bb36d470 bellard
569 bb36d470 bellard
static uint32_t uhci_ioport_readl(void *opaque, uint32_t addr)
570 bb36d470 bellard
{
571 bb36d470 bellard
    UHCIState *s = opaque;
572 bb36d470 bellard
    uint32_t val;
573 bb36d470 bellard
574 bb36d470 bellard
    addr &= 0x1f;
575 bb36d470 bellard
    switch(addr) {
576 bb36d470 bellard
    case 0x08:
577 bb36d470 bellard
        val = s->fl_base_addr;
578 bb36d470 bellard
        break;
579 bb36d470 bellard
    default:
580 bb36d470 bellard
        val = 0xffffffff;
581 bb36d470 bellard
        break;
582 bb36d470 bellard
    }
583 bb36d470 bellard
    return val;
584 bb36d470 bellard
}
585 bb36d470 bellard
586 96217e31 ths
/* signal resume if controller suspended */
587 96217e31 ths
static void uhci_resume (void *opaque)
588 96217e31 ths
{
589 96217e31 ths
    UHCIState *s = (UHCIState *)opaque;
590 96217e31 ths
591 96217e31 ths
    if (!s)
592 96217e31 ths
        return;
593 96217e31 ths
594 96217e31 ths
    if (s->cmd & UHCI_CMD_EGSM) {
595 96217e31 ths
        s->cmd |= UHCI_CMD_FGR;
596 96217e31 ths
        s->status |= UHCI_STS_RD;
597 96217e31 ths
        uhci_update_irq(s);
598 96217e31 ths
    }
599 96217e31 ths
}
600 96217e31 ths
601 bb36d470 bellard
static void uhci_attach(USBPort *port1, USBDevice *dev)
602 bb36d470 bellard
{
603 bb36d470 bellard
    UHCIState *s = port1->opaque;
604 bb36d470 bellard
    UHCIPort *port = &s->ports[port1->index];
605 bb36d470 bellard
606 bb36d470 bellard
    if (dev) {
607 a594cfbf bellard
        if (port->port.dev) {
608 bb36d470 bellard
            usb_attach(port1, NULL);
609 bb36d470 bellard
        }
610 bb36d470 bellard
        /* set connect status */
611 61064870 pbrook
        port->ctrl |= UHCI_PORT_CCS | UHCI_PORT_CSC;
612 61064870 pbrook
613 bb36d470 bellard
        /* update speed */
614 bb36d470 bellard
        if (dev->speed == USB_SPEED_LOW)
615 bb36d470 bellard
            port->ctrl |= UHCI_PORT_LSDA;
616 bb36d470 bellard
        else
617 bb36d470 bellard
            port->ctrl &= ~UHCI_PORT_LSDA;
618 96217e31 ths
619 96217e31 ths
        uhci_resume(s);
620 96217e31 ths
621 a594cfbf bellard
        port->port.dev = dev;
622 bb36d470 bellard
        /* send the attach message */
623 4d611c9a pbrook
        usb_send_msg(dev, USB_MSG_ATTACH);
624 bb36d470 bellard
    } else {
625 bb36d470 bellard
        /* set connect status */
626 61064870 pbrook
        if (port->ctrl & UHCI_PORT_CCS) {
627 61064870 pbrook
            port->ctrl &= ~UHCI_PORT_CCS;
628 61064870 pbrook
            port->ctrl |= UHCI_PORT_CSC;
629 bb36d470 bellard
        }
630 bb36d470 bellard
        /* disable port */
631 bb36d470 bellard
        if (port->ctrl & UHCI_PORT_EN) {
632 bb36d470 bellard
            port->ctrl &= ~UHCI_PORT_EN;
633 bb36d470 bellard
            port->ctrl |= UHCI_PORT_ENC;
634 bb36d470 bellard
        }
635 96217e31 ths
636 96217e31 ths
        uhci_resume(s);
637 96217e31 ths
638 a594cfbf bellard
        dev = port->port.dev;
639 bb36d470 bellard
        if (dev) {
640 bb36d470 bellard
            /* send the detach message */
641 4d611c9a pbrook
            usb_send_msg(dev, USB_MSG_DETACH);
642 bb36d470 bellard
        }
643 a594cfbf bellard
        port->port.dev = NULL;
644 bb36d470 bellard
    }
645 bb36d470 bellard
}
646 bb36d470 bellard
647 4d611c9a pbrook
static int uhci_broadcast_packet(UHCIState *s, USBPacket *p)
648 bb36d470 bellard
{
649 bb36d470 bellard
    int i, ret;
650 bb36d470 bellard
651 54f254f9 aliguori
    dprintf("uhci: packet enter. pid %s addr 0x%02x ep %d len %d\n",
652 54f254f9 aliguori
           pid2str(p->pid), p->devaddr, p->devep, p->len);
653 5d808245 aurel32
    if (p->pid == USB_TOKEN_OUT || p->pid == USB_TOKEN_SETUP)
654 54f254f9 aliguori
        dump_data(p->data, p->len);
655 54f254f9 aliguori
656 54f254f9 aliguori
    ret = USB_RET_NODEV;
657 54f254f9 aliguori
    for (i = 0; i < NB_PORTS && ret == USB_RET_NODEV; i++) {
658 54f254f9 aliguori
        UHCIPort *port = &s->ports[i];
659 54f254f9 aliguori
        USBDevice *dev = port->port.dev;
660 54f254f9 aliguori
661 54f254f9 aliguori
        if (dev && (port->ctrl & UHCI_PORT_EN))
662 4d611c9a pbrook
            ret = dev->handle_packet(dev, p);
663 bb36d470 bellard
    }
664 54f254f9 aliguori
665 54f254f9 aliguori
    dprintf("uhci: packet exit. ret %d len %d\n", ret, p->len);
666 54f254f9 aliguori
    if (p->pid == USB_TOKEN_IN && ret > 0)
667 54f254f9 aliguori
        dump_data(p->data, ret);
668 54f254f9 aliguori
669 54f254f9 aliguori
    return ret;
670 bb36d470 bellard
}
671 bb36d470 bellard
672 54f254f9 aliguori
static void uhci_async_complete(USBPacket * packet, void *opaque);
673 54f254f9 aliguori
static void uhci_process_frame(UHCIState *s);
674 4d611c9a pbrook
675 bb36d470 bellard
/* return -1 if fatal error (frame must be stopped)
676 bb36d470 bellard
          0 if TD successful
677 bb36d470 bellard
          1 if TD unsuccessful or inactive
678 bb36d470 bellard
*/
679 54f254f9 aliguori
static int uhci_complete_td(UHCIState *s, UHCI_TD *td, UHCIAsync *async, uint32_t *int_mask)
680 bb36d470 bellard
{
681 54f254f9 aliguori
    int len = 0, max_len, err, ret;
682 bb36d470 bellard
    uint8_t pid;
683 bb36d470 bellard
684 54f254f9 aliguori
    max_len = ((td->token >> 21) + 1) & 0x7ff;
685 54f254f9 aliguori
    pid = td->token & 0xff;
686 54f254f9 aliguori
687 54f254f9 aliguori
    ret = async->packet.len;
688 54f254f9 aliguori
689 54f254f9 aliguori
    if (td->ctrl & TD_CTRL_IOC)
690 bb36d470 bellard
        *int_mask |= 0x01;
691 3b46e624 ths
692 54f254f9 aliguori
    if (td->ctrl & TD_CTRL_IOS)
693 54f254f9 aliguori
        td->ctrl &= ~TD_CTRL_ACTIVE;
694 bb36d470 bellard
695 54f254f9 aliguori
    if (ret < 0)
696 54f254f9 aliguori
        goto out;
697 b9dc033c balrog
698 54f254f9 aliguori
    len = async->packet.len;
699 54f254f9 aliguori
    td->ctrl = (td->ctrl & ~0x7ff) | ((len - 1) & 0x7ff);
700 54f254f9 aliguori
701 54f254f9 aliguori
    /* The NAK bit may have been set by a previous frame, so clear it
702 54f254f9 aliguori
       here.  The docs are somewhat unclear, but win2k relies on this
703 54f254f9 aliguori
       behavior.  */
704 54f254f9 aliguori
    td->ctrl &= ~(TD_CTRL_ACTIVE | TD_CTRL_NAK);
705 54f254f9 aliguori
706 54f254f9 aliguori
    if (pid == USB_TOKEN_IN) {
707 54f254f9 aliguori
        if (len > max_len) {
708 4d611c9a pbrook
            len = max_len;
709 54f254f9 aliguori
            ret = USB_RET_BABBLE;
710 54f254f9 aliguori
            goto out;
711 4d611c9a pbrook
        }
712 b9dc033c balrog
713 54f254f9 aliguori
        if (len > 0) {
714 54f254f9 aliguori
            /* write the data back */
715 54f254f9 aliguori
            cpu_physical_memory_write(td->buffer, async->buffer, len);
716 54f254f9 aliguori
        }
717 54f254f9 aliguori
718 54f254f9 aliguori
        if ((td->ctrl & TD_CTRL_SPD) && len < max_len) {
719 bb36d470 bellard
            *int_mask |= 0x02;
720 bb36d470 bellard
            /* short packet: do not update QH */
721 54f254f9 aliguori
            dprintf("uhci: short packet. td 0x%x token 0x%x\n", async->td, async->token);
722 bb36d470 bellard
            return 1;
723 bb36d470 bellard
        }
724 54f254f9 aliguori
    }
725 54f254f9 aliguori
726 54f254f9 aliguori
    /* success */
727 54f254f9 aliguori
    return 0;
728 54f254f9 aliguori
729 54f254f9 aliguori
out:
730 54f254f9 aliguori
    switch(ret) {
731 54f254f9 aliguori
    case USB_RET_STALL:
732 54f254f9 aliguori
        td->ctrl |= TD_CTRL_STALL;
733 54f254f9 aliguori
        td->ctrl &= ~TD_CTRL_ACTIVE;
734 54f254f9 aliguori
        return 1;
735 54f254f9 aliguori
736 54f254f9 aliguori
    case USB_RET_BABBLE:
737 54f254f9 aliguori
        td->ctrl |= TD_CTRL_BABBLE | TD_CTRL_STALL;
738 54f254f9 aliguori
        td->ctrl &= ~TD_CTRL_ACTIVE;
739 54f254f9 aliguori
        /* frame interrupted */
740 54f254f9 aliguori
        return -1;
741 54f254f9 aliguori
742 54f254f9 aliguori
    case USB_RET_NAK:
743 54f254f9 aliguori
        td->ctrl |= TD_CTRL_NAK;
744 54f254f9 aliguori
        if (pid == USB_TOKEN_SETUP)
745 54f254f9 aliguori
            break;
746 54f254f9 aliguori
        return 1;
747 54f254f9 aliguori
748 54f254f9 aliguori
    case USB_RET_NODEV:
749 54f254f9 aliguori
    default:
750 54f254f9 aliguori
        break;
751 54f254f9 aliguori
    }
752 54f254f9 aliguori
753 54f254f9 aliguori
    /* Retry the TD if error count is not zero */
754 54f254f9 aliguori
755 54f254f9 aliguori
    td->ctrl |= TD_CTRL_TIMEOUT;
756 54f254f9 aliguori
    err = (td->ctrl >> TD_CTRL_ERROR_SHIFT) & 3;
757 54f254f9 aliguori
    if (err != 0) {
758 54f254f9 aliguori
        err--;
759 54f254f9 aliguori
        if (err == 0) {
760 bb36d470 bellard
            td->ctrl &= ~TD_CTRL_ACTIVE;
761 54f254f9 aliguori
            s->status |= UHCI_STS_USBERR;
762 54f254f9 aliguori
            uhci_update_irq(s);
763 bb36d470 bellard
        }
764 bb36d470 bellard
    }
765 54f254f9 aliguori
    td->ctrl = (td->ctrl & ~(3 << TD_CTRL_ERROR_SHIFT)) |
766 54f254f9 aliguori
        (err << TD_CTRL_ERROR_SHIFT);
767 54f254f9 aliguori
    return 1;
768 bb36d470 bellard
}
769 bb36d470 bellard
770 54f254f9 aliguori
static int uhci_handle_td(UHCIState *s, uint32_t addr, UHCI_TD *td, uint32_t *int_mask)
771 54f254f9 aliguori
{
772 54f254f9 aliguori
    UHCIAsync *async;
773 5d808245 aurel32
    int len = 0, max_len;
774 54f254f9 aliguori
    uint8_t pid;
775 54f254f9 aliguori
776 54f254f9 aliguori
    /* Is active ? */
777 54f254f9 aliguori
    if (!(td->ctrl & TD_CTRL_ACTIVE))
778 54f254f9 aliguori
        return 1;
779 54f254f9 aliguori
780 54f254f9 aliguori
    async = uhci_async_find_td(s, addr, td->token);
781 54f254f9 aliguori
    if (async) {
782 54f254f9 aliguori
        /* Already submitted */
783 a145ea51 aliguori
        async->valid = 32;
784 54f254f9 aliguori
785 54f254f9 aliguori
        if (!async->done)
786 54f254f9 aliguori
            return 1;
787 54f254f9 aliguori
788 54f254f9 aliguori
        uhci_async_unlink(s, async);
789 54f254f9 aliguori
        goto done;
790 54f254f9 aliguori
    }
791 54f254f9 aliguori
792 54f254f9 aliguori
    /* Allocate new packet */
793 54f254f9 aliguori
    async = uhci_async_alloc(s);
794 54f254f9 aliguori
    if (!async)
795 54f254f9 aliguori
        return 1;
796 54f254f9 aliguori
797 54f254f9 aliguori
    async->valid = 10;
798 54f254f9 aliguori
    async->td    = addr;
799 54f254f9 aliguori
    async->token = td->token;
800 54f254f9 aliguori
801 54f254f9 aliguori
    max_len = ((td->token >> 21) + 1) & 0x7ff;
802 54f254f9 aliguori
    pid = td->token & 0xff;
803 54f254f9 aliguori
804 54f254f9 aliguori
    async->packet.pid     = pid;
805 54f254f9 aliguori
    async->packet.devaddr = (td->token >> 8) & 0x7f;
806 54f254f9 aliguori
    async->packet.devep   = (td->token >> 15) & 0xf;
807 54f254f9 aliguori
    async->packet.data    = async->buffer;
808 54f254f9 aliguori
    async->packet.len     = max_len;
809 54f254f9 aliguori
    async->packet.complete_cb     = uhci_async_complete;
810 54f254f9 aliguori
    async->packet.complete_opaque = s;
811 54f254f9 aliguori
812 54f254f9 aliguori
    switch(pid) {
813 54f254f9 aliguori
    case USB_TOKEN_OUT:
814 54f254f9 aliguori
    case USB_TOKEN_SETUP:
815 54f254f9 aliguori
        cpu_physical_memory_read(td->buffer, async->buffer, max_len);
816 5d808245 aurel32
        len = uhci_broadcast_packet(s, &async->packet);
817 5d808245 aurel32
        if (len >= 0)
818 5d808245 aurel32
            len = max_len;
819 54f254f9 aliguori
        break;
820 54f254f9 aliguori
821 54f254f9 aliguori
    case USB_TOKEN_IN:
822 5d808245 aurel32
        len = uhci_broadcast_packet(s, &async->packet);
823 54f254f9 aliguori
        break;
824 54f254f9 aliguori
825 54f254f9 aliguori
    default:
826 54f254f9 aliguori
        /* invalid pid : frame interrupted */
827 54f254f9 aliguori
        uhci_async_free(s, async);
828 54f254f9 aliguori
        s->status |= UHCI_STS_HCPERR;
829 54f254f9 aliguori
        uhci_update_irq(s);
830 54f254f9 aliguori
        return -1;
831 54f254f9 aliguori
    }
832 54f254f9 aliguori
 
833 5d808245 aurel32
    if (len == USB_RET_ASYNC) {
834 54f254f9 aliguori
        uhci_async_link(s, async);
835 54f254f9 aliguori
        return 2;
836 54f254f9 aliguori
    }
837 54f254f9 aliguori
838 5d808245 aurel32
    async->packet.len = len;
839 54f254f9 aliguori
840 54f254f9 aliguori
done:
841 5d808245 aurel32
    len = uhci_complete_td(s, td, async, int_mask);
842 54f254f9 aliguori
    uhci_async_free(s, async);
843 5d808245 aurel32
    return len;
844 54f254f9 aliguori
}
845 54f254f9 aliguori
846 54f254f9 aliguori
static void uhci_async_complete(USBPacket *packet, void *opaque)
847 4d611c9a pbrook
{
848 4d611c9a pbrook
    UHCIState *s = opaque;
849 54f254f9 aliguori
    UHCIAsync *async = (UHCIAsync *) packet;
850 54f254f9 aliguori
851 54f254f9 aliguori
    dprintf("uhci: async complete. td 0x%x token 0x%x\n", async->td, async->token);
852 54f254f9 aliguori
853 54f254f9 aliguori
    async->done = 1;
854 54f254f9 aliguori
855 54f254f9 aliguori
    uhci_process_frame(s);
856 54f254f9 aliguori
}
857 54f254f9 aliguori
858 54f254f9 aliguori
static int is_valid(uint32_t link)
859 54f254f9 aliguori
{
860 54f254f9 aliguori
    return (link & 1) == 0;
861 54f254f9 aliguori
}
862 54f254f9 aliguori
863 54f254f9 aliguori
static int is_qh(uint32_t link)
864 54f254f9 aliguori
{
865 54f254f9 aliguori
    return (link & 2) != 0;
866 54f254f9 aliguori
}
867 54f254f9 aliguori
868 54f254f9 aliguori
static int depth_first(uint32_t link)
869 54f254f9 aliguori
{
870 54f254f9 aliguori
    return (link & 4) != 0;
871 54f254f9 aliguori
}
872 54f254f9 aliguori
873 54f254f9 aliguori
/* QH DB used for detecting QH loops */
874 54f254f9 aliguori
#define UHCI_MAX_QUEUES 128
875 54f254f9 aliguori
typedef struct {
876 54f254f9 aliguori
    uint32_t addr[UHCI_MAX_QUEUES];
877 54f254f9 aliguori
    int      count;
878 54f254f9 aliguori
} QhDb;
879 54f254f9 aliguori
880 54f254f9 aliguori
static void qhdb_reset(QhDb *db)
881 54f254f9 aliguori
{
882 54f254f9 aliguori
    db->count = 0;
883 54f254f9 aliguori
}
884 54f254f9 aliguori
885 54f254f9 aliguori
/* Add QH to DB. Returns 1 if already present or DB is full. */
886 54f254f9 aliguori
static int qhdb_insert(QhDb *db, uint32_t addr)
887 54f254f9 aliguori
{
888 54f254f9 aliguori
    int i;
889 54f254f9 aliguori
    for (i = 0; i < db->count; i++)
890 54f254f9 aliguori
        if (db->addr[i] == addr)
891 54f254f9 aliguori
            return 1;
892 54f254f9 aliguori
893 54f254f9 aliguori
    if (db->count >= UHCI_MAX_QUEUES)
894 54f254f9 aliguori
        return 1;
895 54f254f9 aliguori
896 54f254f9 aliguori
    db->addr[db->count++] = addr;
897 54f254f9 aliguori
    return 0;
898 54f254f9 aliguori
}
899 54f254f9 aliguori
900 54f254f9 aliguori
static void uhci_process_frame(UHCIState *s)
901 54f254f9 aliguori
{
902 54f254f9 aliguori
    uint32_t frame_addr, link, old_td_ctrl, val, int_mask;
903 54f254f9 aliguori
    uint32_t curr_qh;
904 54f254f9 aliguori
    int cnt, ret;
905 4d611c9a pbrook
    UHCI_TD td;
906 54f254f9 aliguori
    UHCI_QH qh;
907 54f254f9 aliguori
    QhDb qhdb;
908 4d611c9a pbrook
909 54f254f9 aliguori
    frame_addr = s->fl_base_addr + ((s->frnum & 0x3ff) << 2);
910 54f254f9 aliguori
911 54f254f9 aliguori
    dprintf("uhci: processing frame %d addr 0x%x\n" , s->frnum, frame_addr);
912 54f254f9 aliguori
913 54f254f9 aliguori
    cpu_physical_memory_read(frame_addr, (uint8_t *)&link, 4);
914 54f254f9 aliguori
    le32_to_cpus(&link);
915 b9dc033c balrog
916 54f254f9 aliguori
    int_mask = 0;
917 54f254f9 aliguori
    curr_qh  = 0;
918 54f254f9 aliguori
919 54f254f9 aliguori
    qhdb_reset(&qhdb);
920 54f254f9 aliguori
921 54f254f9 aliguori
    for (cnt = FRAME_MAX_LOOPS; is_valid(link) && cnt; cnt--) {
922 54f254f9 aliguori
        if (is_qh(link)) {
923 54f254f9 aliguori
            /* QH */
924 54f254f9 aliguori
925 54f254f9 aliguori
            if (qhdb_insert(&qhdb, link)) {
926 54f254f9 aliguori
                /*
927 54f254f9 aliguori
                 * We're going in circles. Which is not a bug because
928 54f254f9 aliguori
                 * HCD is allowed to do that as part of the BW management. 
929 54f254f9 aliguori
                 * In our case though it makes no sense to spin here. Sync transations 
930 54f254f9 aliguori
                 * are already done, and async completion handler will re-process 
931 54f254f9 aliguori
                 * the frame when something is ready.
932 54f254f9 aliguori
                 */
933 54f254f9 aliguori
                dprintf("uhci: detected loop. qh 0x%x\n", link);
934 54f254f9 aliguori
                break;
935 54f254f9 aliguori
            }
936 54f254f9 aliguori
937 54f254f9 aliguori
            cpu_physical_memory_read(link & ~0xf, (uint8_t *) &qh, sizeof(qh));
938 54f254f9 aliguori
            le32_to_cpus(&qh.link);
939 54f254f9 aliguori
            le32_to_cpus(&qh.el_link);
940 54f254f9 aliguori
941 54f254f9 aliguori
            dprintf("uhci: QH 0x%x load. link 0x%x elink 0x%x\n",
942 54f254f9 aliguori
                    link, qh.link, qh.el_link);
943 54f254f9 aliguori
944 54f254f9 aliguori
            if (!is_valid(qh.el_link)) {
945 54f254f9 aliguori
                /* QH w/o elements */
946 54f254f9 aliguori
                curr_qh = 0;
947 54f254f9 aliguori
                link = qh.link;
948 54f254f9 aliguori
            } else {
949 54f254f9 aliguori
                /* QH with elements */
950 54f254f9 aliguori
                    curr_qh = link;
951 54f254f9 aliguori
                    link = qh.el_link;
952 54f254f9 aliguori
            }
953 54f254f9 aliguori
            continue;
954 54f254f9 aliguori
        }
955 54f254f9 aliguori
956 54f254f9 aliguori
        /* TD */
957 54f254f9 aliguori
        cpu_physical_memory_read(link & ~0xf, (uint8_t *) &td, sizeof(td));
958 b9dc033c balrog
        le32_to_cpus(&td.link);
959 b9dc033c balrog
        le32_to_cpus(&td.ctrl);
960 b9dc033c balrog
        le32_to_cpus(&td.token);
961 b9dc033c balrog
        le32_to_cpus(&td.buffer);
962 b9dc033c balrog
963 54f254f9 aliguori
        dprintf("uhci: TD 0x%x load. link 0x%x ctrl 0x%x token 0x%x qh 0x%x\n", 
964 54f254f9 aliguori
                link, td.link, td.ctrl, td.token, curr_qh);
965 54f254f9 aliguori
966 54f254f9 aliguori
        old_td_ctrl = td.ctrl;
967 54f254f9 aliguori
        ret = uhci_handle_td(s, link, &td, &int_mask);
968 b9dc033c balrog
        if (old_td_ctrl != td.ctrl) {
969 54f254f9 aliguori
            /* update the status bits of the TD */
970 b9dc033c balrog
            val = cpu_to_le32(td.ctrl);
971 b9dc033c balrog
            cpu_physical_memory_write((link & ~0xf) + 4,
972 54f254f9 aliguori
                                      (const uint8_t *)&val, sizeof(val));
973 b9dc033c balrog
        }
974 54f254f9 aliguori
975 54f254f9 aliguori
        if (ret < 0) {
976 54f254f9 aliguori
            /* interrupted frame */
977 54f254f9 aliguori
            break;
978 b9dc033c balrog
        }
979 b9dc033c balrog
980 54f254f9 aliguori
        if (ret == 2 || ret == 1) {
981 54f254f9 aliguori
            dprintf("uhci: TD 0x%x %s. link 0x%x ctrl 0x%x token 0x%x qh 0x%x\n",
982 54f254f9 aliguori
                    link, ret == 2 ? "pend" : "skip",
983 54f254f9 aliguori
                    td.link, td.ctrl, td.token, curr_qh);
984 b9dc033c balrog
985 54f254f9 aliguori
            link = curr_qh ? qh.link : td.link;
986 54f254f9 aliguori
            continue;
987 4d611c9a pbrook
        }
988 54f254f9 aliguori
989 54f254f9 aliguori
        /* completed TD */
990 54f254f9 aliguori
991 54f254f9 aliguori
        dprintf("uhci: TD 0x%x done. link 0x%x ctrl 0x%x token 0x%x qh 0x%x\n", 
992 54f254f9 aliguori
                link, td.link, td.ctrl, td.token, curr_qh);
993 54f254f9 aliguori
994 54f254f9 aliguori
        link = td.link;
995 54f254f9 aliguori
996 54f254f9 aliguori
        if (curr_qh) {
997 54f254f9 aliguori
            /* update QH element link */
998 54f254f9 aliguori
            qh.el_link = link;
999 4d611c9a pbrook
            val = cpu_to_le32(qh.el_link);
1000 54f254f9 aliguori
            cpu_physical_memory_write((curr_qh & ~0xf) + 4,
1001 54f254f9 aliguori
                                          (const uint8_t *)&val, sizeof(val));
1002 54f254f9 aliguori
1003 54f254f9 aliguori
            if (!depth_first(link)) {
1004 54f254f9 aliguori
               /* done with this QH */
1005 54f254f9 aliguori
1006 54f254f9 aliguori
               dprintf("uhci: QH 0x%x done. link 0x%x elink 0x%x\n",
1007 54f254f9 aliguori
                       curr_qh, qh.link, qh.el_link);
1008 54f254f9 aliguori
1009 54f254f9 aliguori
               curr_qh = 0;
1010 54f254f9 aliguori
               link    = qh.link;
1011 54f254f9 aliguori
            }
1012 4d611c9a pbrook
        }
1013 54f254f9 aliguori
1014 54f254f9 aliguori
        /* go to the next entry */
1015 4d611c9a pbrook
    }
1016 54f254f9 aliguori
1017 54f254f9 aliguori
    s->pending_int_mask = int_mask;
1018 4d611c9a pbrook
}
1019 4d611c9a pbrook
1020 bb36d470 bellard
static void uhci_frame_timer(void *opaque)
1021 bb36d470 bellard
{
1022 bb36d470 bellard
    UHCIState *s = opaque;
1023 bb36d470 bellard
    int64_t expire_time;
1024 bb36d470 bellard
1025 bb36d470 bellard
    if (!(s->cmd & UHCI_CMD_RS)) {
1026 54f254f9 aliguori
        /* Full stop */
1027 bb36d470 bellard
        qemu_del_timer(s->frame_timer);
1028 52328140 bellard
        /* set hchalted bit in status - UHCI11D 2.1.2 */
1029 52328140 bellard
        s->status |= UHCI_STS_HCHALTED;
1030 6f382b5e aliguori
1031 6f382b5e aliguori
        dprintf("uhci: halted\n");
1032 bb36d470 bellard
        return;
1033 bb36d470 bellard
    }
1034 54f254f9 aliguori
1035 54f254f9 aliguori
    /* Complete the previous frame */
1036 4d611c9a pbrook
    if (s->pending_int_mask) {
1037 4d611c9a pbrook
        s->status2 |= s->pending_int_mask;
1038 54f254f9 aliguori
        s->status  |= UHCI_STS_USBINT;
1039 4d611c9a pbrook
        uhci_update_irq(s);
1040 4d611c9a pbrook
    }
1041 b9dc033c balrog
1042 54f254f9 aliguori
    /* Start new frame */
1043 54f254f9 aliguori
    s->frnum = (s->frnum + 1) & 0x7ff;
1044 54f254f9 aliguori
1045 54f254f9 aliguori
    dprintf("uhci: new frame #%u\n" , s->frnum);
1046 54f254f9 aliguori
1047 54f254f9 aliguori
    uhci_async_validate_begin(s);
1048 54f254f9 aliguori
1049 54f254f9 aliguori
    uhci_process_frame(s);
1050 54f254f9 aliguori
1051 54f254f9 aliguori
    uhci_async_validate_end(s);
1052 b9dc033c balrog
1053 bb36d470 bellard
    /* prepare the timer for the next frame */
1054 5fafdf24 ths
    expire_time = qemu_get_clock(vm_clock) +
1055 bb36d470 bellard
        (ticks_per_sec / FRAME_TIMER_FREQ);
1056 bb36d470 bellard
    qemu_mod_timer(s->frame_timer, expire_time);
1057 bb36d470 bellard
}
1058 bb36d470 bellard
1059 5fafdf24 ths
static void uhci_map(PCIDevice *pci_dev, int region_num,
1060 bb36d470 bellard
                    uint32_t addr, uint32_t size, int type)
1061 bb36d470 bellard
{
1062 bb36d470 bellard
    UHCIState *s = (UHCIState *)pci_dev;
1063 bb36d470 bellard
1064 bb36d470 bellard
    register_ioport_write(addr, 32, 2, uhci_ioport_writew, s);
1065 bb36d470 bellard
    register_ioport_read(addr, 32, 2, uhci_ioport_readw, s);
1066 bb36d470 bellard
    register_ioport_write(addr, 32, 4, uhci_ioport_writel, s);
1067 bb36d470 bellard
    register_ioport_read(addr, 32, 4, uhci_ioport_readl, s);
1068 bb36d470 bellard
    register_ioport_write(addr, 32, 1, uhci_ioport_writeb, s);
1069 bb36d470 bellard
    register_ioport_read(addr, 32, 1, uhci_ioport_readb, s);
1070 bb36d470 bellard
}
1071 bb36d470 bellard
1072 afcc3cdf ths
void usb_uhci_piix3_init(PCIBus *bus, int devfn)
1073 bb36d470 bellard
{
1074 bb36d470 bellard
    UHCIState *s;
1075 bb36d470 bellard
    uint8_t *pci_conf;
1076 bb36d470 bellard
    int i;
1077 bb36d470 bellard
1078 bb36d470 bellard
    s = (UHCIState *)pci_register_device(bus,
1079 bb36d470 bellard
                                        "USB-UHCI", sizeof(UHCIState),
1080 502a5395 pbrook
                                        devfn, NULL, NULL);
1081 bb36d470 bellard
    pci_conf = s->dev.config;
1082 deb54399 aliguori
    pci_config_set_vendor_id(pci_conf, PCI_VENDOR_ID_INTEL);
1083 deb54399 aliguori
    pci_config_set_device_id(pci_conf, PCI_DEVICE_ID_INTEL_82371SB_2);
1084 bb36d470 bellard
    pci_conf[0x08] = 0x01; // revision number
1085 bb36d470 bellard
    pci_conf[0x09] = 0x00;
1086 173a543b blueswir1
    pci_config_set_class(pci_conf, PCI_CLASS_SERIAL_USB);
1087 bb36d470 bellard
    pci_conf[0x0e] = 0x00; // header_type
1088 f04308e4 bellard
    pci_conf[0x3d] = 4; // interrupt pin 3
1089 38ca0f6d pbrook
    pci_conf[0x60] = 0x10; // release number
1090 3b46e624 ths
1091 bb36d470 bellard
    for(i = 0; i < NB_PORTS; i++) {
1092 0d92ed30 pbrook
        qemu_register_usb_port(&s->ports[i].port, s, i, uhci_attach);
1093 bb36d470 bellard
    }
1094 bb36d470 bellard
    s->frame_timer = qemu_new_timer(vm_clock, uhci_frame_timer, s);
1095 bb36d470 bellard
1096 bb36d470 bellard
    uhci_reset(s);
1097 bb36d470 bellard
1098 38ca0f6d pbrook
    /* Use region 4 for consistency with real hardware.  BSD guests seem
1099 38ca0f6d pbrook
       to rely on this.  */
1100 5fafdf24 ths
    pci_register_io_region(&s->dev, 4, 0x20,
1101 bb36d470 bellard
                           PCI_ADDRESS_SPACE_IO, uhci_map);
1102 6f382b5e aliguori
1103 6f382b5e aliguori
    register_savevm("uhci", 0, 1, uhci_save, uhci_load, s);
1104 bb36d470 bellard
}
1105 afcc3cdf ths
1106 afcc3cdf ths
void usb_uhci_piix4_init(PCIBus *bus, int devfn)
1107 afcc3cdf ths
{
1108 afcc3cdf ths
    UHCIState *s;
1109 afcc3cdf ths
    uint8_t *pci_conf;
1110 afcc3cdf ths
    int i;
1111 afcc3cdf ths
1112 afcc3cdf ths
    s = (UHCIState *)pci_register_device(bus,
1113 afcc3cdf ths
                                        "USB-UHCI", sizeof(UHCIState),
1114 afcc3cdf ths
                                        devfn, NULL, NULL);
1115 afcc3cdf ths
    pci_conf = s->dev.config;
1116 deb54399 aliguori
    pci_config_set_vendor_id(pci_conf, PCI_VENDOR_ID_INTEL);
1117 deb54399 aliguori
    pci_config_set_device_id(pci_conf, PCI_DEVICE_ID_INTEL_82371AB_2);
1118 afcc3cdf ths
    pci_conf[0x08] = 0x01; // revision number
1119 afcc3cdf ths
    pci_conf[0x09] = 0x00;
1120 173a543b blueswir1
    pci_config_set_class(pci_conf, PCI_CLASS_SERIAL_USB);
1121 afcc3cdf ths
    pci_conf[0x0e] = 0x00; // header_type
1122 afcc3cdf ths
    pci_conf[0x3d] = 4; // interrupt pin 3
1123 afcc3cdf ths
    pci_conf[0x60] = 0x10; // release number
1124 afcc3cdf ths
1125 afcc3cdf ths
    for(i = 0; i < NB_PORTS; i++) {
1126 afcc3cdf ths
        qemu_register_usb_port(&s->ports[i].port, s, i, uhci_attach);
1127 afcc3cdf ths
    }
1128 afcc3cdf ths
    s->frame_timer = qemu_new_timer(vm_clock, uhci_frame_timer, s);
1129 afcc3cdf ths
1130 afcc3cdf ths
    uhci_reset(s);
1131 afcc3cdf ths
1132 afcc3cdf ths
    /* Use region 4 for consistency with real hardware.  BSD guests seem
1133 afcc3cdf ths
       to rely on this.  */
1134 afcc3cdf ths
    pci_register_io_region(&s->dev, 4, 0x20,
1135 afcc3cdf ths
                           PCI_ADDRESS_SPACE_IO, uhci_map);
1136 54f254f9 aliguori
1137 54f254f9 aliguori
    register_savevm("uhci", 0, 1, uhci_save, uhci_load, s);
1138 afcc3cdf ths
}