hcd-ohci.c 60.8 KB
Newer Older
P
pbrook 已提交
1 2 3 4
/*
 * QEMU USB OHCI Emulation
 * Copyright (c) 2004 Gianni Tedesco
 * Copyright (c) 2006 CodeSourcery
5
 * Copyright (c) 2006 Openedhand Ltd.
P
pbrook 已提交
6 7 8 9 10 11 12 13 14 15 16 17
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
18
 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
P
pbrook 已提交
19 20 21 22 23 24 25 26 27
 *
 * TODO:
 *  o Isochronous transfers
 *  o Allocate bandwidth in frames properly
 *  o Disable timers when nothing needs to be done, or remove timer usage
 *    all together.
 *  o BIOS work to boot from USB storage
*/

G
Gerd Hoffmann 已提交
28
#include "hw/hw.h"
29
#include "qemu/timer.h"
G
Gerd Hoffmann 已提交
30
#include "hw/usb.h"
31
#include "hw/pci/pci.h"
G
Gerd Hoffmann 已提交
32
#include "hw/sysbus.h"
33
#include "hw/qdev-dma.h"
P
pbrook 已提交
34 35 36 37

//#define DEBUG_OHCI
/* Dump packet contents.  */
//#define DEBUG_PACKET
38
//#define DEBUG_ISOCH
P
pbrook 已提交
39 40 41 42
/* This causes frames to occur 1000x slower */
//#define OHCI_TIME_WARP 1

#ifdef DEBUG_OHCI
M
malc 已提交
43
#define DPRINTF printf
P
pbrook 已提交
44
#else
M
malc 已提交
45
#define DPRINTF(...)
P
pbrook 已提交
46 47 48 49 50 51 52 53 54 55 56 57 58 59 60
#endif

/* Number of Downstream Ports on the root hub.  */

#define OHCI_MAX_PORTS 15

static int64_t usb_frame_time;
static int64_t usb_bit_time;

typedef struct OHCIPort {
    USBPort port;
    uint32_t ctrl;
} OHCIPort;

typedef struct {
61
    USBBus bus;
P
pbrook 已提交
62
    qemu_irq irq;
A
Avi Kivity 已提交
63
    MemoryRegion mem;
P
Paolo Bonzini 已提交
64
    AddressSpace *as;
P
pbrook 已提交
65
    int num_ports;
66
    const char *name;
P
pbrook 已提交
67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82

    QEMUTimer *eof_timer;
    int64_t sof_time;

    /* OHCI state */
    /* Control partition */
    uint32_t ctl, status;
    uint32_t intr_status;
    uint32_t intr;

    /* memory pointer partition */
    uint32_t hcca;
    uint32_t ctrl_head, ctrl_cur;
    uint32_t bulk_head, bulk_cur;
    uint32_t per_cur;
    uint32_t done;
83
    int32_t done_count;
P
pbrook 已提交
84 85

    /* Frame counter partition */
86 87 88 89
    uint16_t fsmps;
    uint8_t fit;
    uint16_t fi;
    uint8_t frt;
P
pbrook 已提交
90 91 92 93 94 95 96 97 98
    uint16_t frame_number;
    uint16_t padding;
    uint32_t pstart;
    uint32_t lst;

    /* Root Hub partition */
    uint32_t rhdesc_a, rhdesc_b;
    uint32_t rhstatus;
    OHCIPort rhport[OHCI_MAX_PORTS];
P
pbrook 已提交
99

100 101 102 103 104 105
    /* PXA27x Non-OHCI events */
    uint32_t hstatus;
    uint32_t hmask;
    uint32_t hreset;
    uint32_t htest;

A
aurel32 已提交
106
    /* SM501 local memory offset */
107
    dma_addr_t localmem_base;
A
aurel32 已提交
108

P
pbrook 已提交
109 110 111 112 113
    /* Active packets.  */
    uint32_t old_ctl;
    USBPacket usb_packet;
    uint8_t usb_buf[8192];
    uint32_t async_td;
114
    bool async_complete;
P
pbrook 已提交
115

P
pbrook 已提交
116 117 118 119 120 121 122 123
} OHCIState;

/* Host Controller Communications Area */
struct ohci_hcca {
    uint32_t intr[32];
    uint16_t frame, pad;
    uint32_t done;
};
W
Wei Yang 已提交
124 125 126 127 128
#define HCCA_WRITEBACK_OFFSET   offsetof(struct ohci_hcca, frame)
#define HCCA_WRITEBACK_SIZE     8 /* frame, pad, done */

#define ED_WBACK_OFFSET offsetof(struct ohci_ed, head)
#define ED_WBACK_SIZE   4
P
pbrook 已提交
129

130
static void ohci_bus_stop(OHCIState *ohci);
131
static void ohci_async_cancel_device(OHCIState *ohci, USBDevice *dev);
132

P
pbrook 已提交
133 134 135 136 137 138 139 140 141 142
/* Bitfields for the first word of an Endpoint Desciptor.  */
#define OHCI_ED_FA_SHIFT  0
#define OHCI_ED_FA_MASK   (0x7f<<OHCI_ED_FA_SHIFT)
#define OHCI_ED_EN_SHIFT  7
#define OHCI_ED_EN_MASK   (0xf<<OHCI_ED_EN_SHIFT)
#define OHCI_ED_D_SHIFT   11
#define OHCI_ED_D_MASK    (3<<OHCI_ED_D_SHIFT)
#define OHCI_ED_S         (1<<13)
#define OHCI_ED_K         (1<<14)
#define OHCI_ED_F         (1<<15)
143 144
#define OHCI_ED_MPS_SHIFT 16
#define OHCI_ED_MPS_MASK  (0x7ff<<OHCI_ED_MPS_SHIFT)
P
pbrook 已提交
145 146 147 148 149 150 151 152 153 154 155 156

/* Flags in the head field of an Endpoint Desciptor.  */
#define OHCI_ED_H         1
#define OHCI_ED_C         2

/* Bitfields for the first word of a Transfer Desciptor.  */
#define OHCI_TD_R         (1<<18)
#define OHCI_TD_DP_SHIFT  19
#define OHCI_TD_DP_MASK   (3<<OHCI_TD_DP_SHIFT)
#define OHCI_TD_DI_SHIFT  21
#define OHCI_TD_DI_MASK   (7<<OHCI_TD_DI_SHIFT)
#define OHCI_TD_T0        (1<<24)
157
#define OHCI_TD_T1        (1<<25)
P
pbrook 已提交
158 159 160 161 162
#define OHCI_TD_EC_SHIFT  26
#define OHCI_TD_EC_MASK   (3<<OHCI_TD_EC_SHIFT)
#define OHCI_TD_CC_SHIFT  28
#define OHCI_TD_CC_MASK   (0xf<<OHCI_TD_CC_SHIFT)

163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178
/* Bitfields for the first word of an Isochronous Transfer Desciptor.  */
/* CC & DI - same as in the General Transfer Desciptor */
#define OHCI_TD_SF_SHIFT  0
#define OHCI_TD_SF_MASK   (0xffff<<OHCI_TD_SF_SHIFT)
#define OHCI_TD_FC_SHIFT  24
#define OHCI_TD_FC_MASK   (7<<OHCI_TD_FC_SHIFT)

/* Isochronous Transfer Desciptor - Offset / PacketStatusWord */
#define OHCI_TD_PSW_CC_SHIFT 12
#define OHCI_TD_PSW_CC_MASK  (0xf<<OHCI_TD_PSW_CC_SHIFT)
#define OHCI_TD_PSW_SIZE_SHIFT 0
#define OHCI_TD_PSW_SIZE_MASK  (0xfff<<OHCI_TD_PSW_SIZE_SHIFT)

#define OHCI_PAGE_MASK    0xfffff000
#define OHCI_OFFSET_MASK  0xfff

P
pbrook 已提交
179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204
#define OHCI_DPTR_MASK    0xfffffff0

#define OHCI_BM(val, field) \
  (((val) & OHCI_##field##_MASK) >> OHCI_##field##_SHIFT)

#define OHCI_SET_BM(val, field, newval) do { \
    val &= ~OHCI_##field##_MASK; \
    val |= ((newval) << OHCI_##field##_SHIFT) & OHCI_##field##_MASK; \
    } while(0)

/* endpoint descriptor */
struct ohci_ed {
    uint32_t flags;
    uint32_t tail;
    uint32_t head;
    uint32_t next;
};

/* General transfer descriptor */
struct ohci_td {
    uint32_t flags;
    uint32_t cbp;
    uint32_t next;
    uint32_t be;
};

205 206 207 208 209 210 211 212 213
/* Isochronous transfer descriptor */
struct ohci_iso_td {
    uint32_t flags;
    uint32_t bp;
    uint32_t next;
    uint32_t be;
    uint16_t offset[8];
};

P
pbrook 已提交
214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236
#define USB_HZ                      12000000

/* OHCI Local stuff */
#define OHCI_CTL_CBSR         ((1<<0)|(1<<1))
#define OHCI_CTL_PLE          (1<<2)
#define OHCI_CTL_IE           (1<<3)
#define OHCI_CTL_CLE          (1<<4)
#define OHCI_CTL_BLE          (1<<5)
#define OHCI_CTL_HCFS         ((1<<6)|(1<<7))
#define  OHCI_USB_RESET       0x00
#define  OHCI_USB_RESUME      0x40
#define  OHCI_USB_OPERATIONAL 0x80
#define  OHCI_USB_SUSPEND     0xc0
#define OHCI_CTL_IR           (1<<8)
#define OHCI_CTL_RWC          (1<<9)
#define OHCI_CTL_RWE          (1<<10)

#define OHCI_STATUS_HCR       (1<<0)
#define OHCI_STATUS_CLF       (1<<1)
#define OHCI_STATUS_BLF       (1<<2)
#define OHCI_STATUS_OCR       (1<<3)
#define OHCI_STATUS_SOC       ((1<<6)|(1<<7))

237 238 239 240 241 242 243 244 245
#define OHCI_INTR_SO          (1U<<0) /* Scheduling overrun */
#define OHCI_INTR_WD          (1U<<1) /* HcDoneHead writeback */
#define OHCI_INTR_SF          (1U<<2) /* Start of frame */
#define OHCI_INTR_RD          (1U<<3) /* Resume detect */
#define OHCI_INTR_UE          (1U<<4) /* Unrecoverable error */
#define OHCI_INTR_FNO         (1U<<5) /* Frame number overflow */
#define OHCI_INTR_RHSC        (1U<<6) /* Root hub status change */
#define OHCI_INTR_OC          (1U<<30) /* Ownership change */
#define OHCI_INTR_MIE         (1U<<31) /* Master Interrupt Enable */
P
pbrook 已提交
246 247 248 249 250 251 252 253 254 255

#define OHCI_HCCA_SIZE        0x100
#define OHCI_HCCA_MASK        0xffffff00

#define OHCI_EDPTR_MASK       0xfffffff0

#define OHCI_FMI_FI           0x00003fff
#define OHCI_FMI_FSMPS        0xffff0000
#define OHCI_FMI_FIT          0x80000000

256
#define OHCI_FR_RT            (1U<<31)
P
pbrook 已提交
257 258 259 260 261 262 263 264 265 266 267

#define OHCI_LS_THRESH        0x628

#define OHCI_RHA_RW_MASK      0x00000000 /* Mask of supported features.  */
#define OHCI_RHA_PSM          (1<<8)
#define OHCI_RHA_NPS          (1<<9)
#define OHCI_RHA_DT           (1<<10)
#define OHCI_RHA_OCPM         (1<<11)
#define OHCI_RHA_NOCP         (1<<12)
#define OHCI_RHA_POTPGT_MASK  0xff000000

268 269 270 271 272 273
#define OHCI_RHS_LPS          (1U<<0)
#define OHCI_RHS_OCI          (1U<<1)
#define OHCI_RHS_DRWE         (1U<<15)
#define OHCI_RHS_LPSC         (1U<<16)
#define OHCI_RHS_OCIC         (1U<<17)
#define OHCI_RHS_CRWE         (1U<<31)
P
pbrook 已提交
274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307

#define OHCI_PORT_CCS         (1<<0)
#define OHCI_PORT_PES         (1<<1)
#define OHCI_PORT_PSS         (1<<2)
#define OHCI_PORT_POCI        (1<<3)
#define OHCI_PORT_PRS         (1<<4)
#define OHCI_PORT_PPS         (1<<8)
#define OHCI_PORT_LSDA        (1<<9)
#define OHCI_PORT_CSC         (1<<16)
#define OHCI_PORT_PESC        (1<<17)
#define OHCI_PORT_PSSC        (1<<18)
#define OHCI_PORT_OCIC        (1<<19)
#define OHCI_PORT_PRSC        (1<<20)
#define OHCI_PORT_WTC         (OHCI_PORT_CSC|OHCI_PORT_PESC|OHCI_PORT_PSSC \
                               |OHCI_PORT_OCIC|OHCI_PORT_PRSC)

#define OHCI_TD_DIR_SETUP     0x0
#define OHCI_TD_DIR_OUT       0x1
#define OHCI_TD_DIR_IN        0x2
#define OHCI_TD_DIR_RESERVED  0x3

#define OHCI_CC_NOERROR             0x0
#define OHCI_CC_CRC                 0x1
#define OHCI_CC_BITSTUFFING         0x2
#define OHCI_CC_DATATOGGLEMISMATCH  0x3
#define OHCI_CC_STALL               0x4
#define OHCI_CC_DEVICENOTRESPONDING 0x5
#define OHCI_CC_PIDCHECKFAILURE     0x6
#define OHCI_CC_UNDEXPETEDPID       0x7
#define OHCI_CC_DATAOVERRUN         0x8
#define OHCI_CC_DATAUNDERRUN        0x9
#define OHCI_CC_BUFFEROVERRUN       0xc
#define OHCI_CC_BUFFERUNDERRUN      0xd

308 309
#define OHCI_HRESET_FSBIR       (1 << 0)

310 311
static void ohci_die(OHCIState *ohci);

P
pbrook 已提交
312 313 314 315 316 317 318 319 320
/* Update IRQ levels */
static inline void ohci_intr_update(OHCIState *ohci)
{
    int level = 0;

    if ((ohci->intr & OHCI_INTR_MIE) &&
        (ohci->intr_status & ohci->intr))
        level = 1;

P
pbrook 已提交
321
    qemu_set_irq(ohci->irq, level);
P
pbrook 已提交
322 323 324 325 326 327 328 329 330 331
}

/* Set an interrupt */
static inline void ohci_set_interrupt(OHCIState *ohci, uint32_t intr)
{
    ohci->intr_status |= intr;
    ohci_intr_update(ohci);
}

/* Attach or detach a device on a root hub port.  */
332
static void ohci_attach(USBPort *port1)
P
pbrook 已提交
333 334 335
{
    OHCIState *s = port1->opaque;
    OHCIPort *port = &s->rhport[port1->index];
336
    uint32_t old_state = port->ctrl;
P
pbrook 已提交
337

338 339 340 341 342 343
    /* set connect status */
    port->ctrl |= OHCI_PORT_CCS | OHCI_PORT_CSC;

    /* update speed */
    if (port->port.dev->speed == USB_SPEED_LOW) {
        port->ctrl |= OHCI_PORT_LSDA;
P
pbrook 已提交
344
    } else {
345 346 347 348 349 350 351 352 353
        port->ctrl &= ~OHCI_PORT_LSDA;
    }

    /* notify of remote-wakeup */
    if ((s->ctl & OHCI_CTL_HCFS) == OHCI_USB_SUSPEND) {
        ohci_set_interrupt(s, OHCI_INTR_RD);
    }

    DPRINTF("usb-ohci: Attached port %d\n", port1->index);
354 355 356 357

    if (old_state != port->ctrl) {
        ohci_set_interrupt(s, OHCI_INTR_RHSC);
    }
358 359 360 361 362 363 364 365
}

static void ohci_detach(USBPort *port1)
{
    OHCIState *s = port1->opaque;
    OHCIPort *port = &s->rhport[port1->index];
    uint32_t old_state = port->ctrl;

366 367
    ohci_async_cancel_device(s, port1->dev);

368 369 370 371 372 373 374 375 376
    /* set connect status */
    if (port->ctrl & OHCI_PORT_CCS) {
        port->ctrl &= ~OHCI_PORT_CCS;
        port->ctrl |= OHCI_PORT_CSC;
    }
    /* disable port */
    if (port->ctrl & OHCI_PORT_PES) {
        port->ctrl &= ~OHCI_PORT_PES;
        port->ctrl |= OHCI_PORT_PESC;
P
pbrook 已提交
377
    }
378
    DPRINTF("usb-ohci: Detached port %d\n", port1->index);
P
pbrook 已提交
379

380
    if (old_state != port->ctrl) {
P
pbrook 已提交
381
        ohci_set_interrupt(s, OHCI_INTR_RHSC);
382
    }
P
pbrook 已提交
383 384
}

385
static void ohci_wakeup(USBPort *port1)
386
{
387 388
    OHCIState *s = port1->opaque;
    OHCIPort *port = &s->rhport[port1->index];
389
    uint32_t intr = 0;
390
    if (port->ctrl & OHCI_PORT_PSS) {
391
        DPRINTF("usb-ohci: port %d: wakeup\n", port1->index);
392 393
        port->ctrl |= OHCI_PORT_PSSC;
        port->ctrl &= ~OHCI_PORT_PSS;
394
        intr = OHCI_INTR_RHSC;
395
    }
396 397 398 399 400 401 402 403 404 405 406 407
    /* Note that the controller can be suspended even if this port is not */
    if ((s->ctl & OHCI_CTL_HCFS) == OHCI_USB_SUSPEND) {
        DPRINTF("usb-ohci: remote-wakeup: SUSPEND->RESUME\n");
        /* This is the one state transition the controller can do by itself */
        s->ctl &= ~OHCI_CTL_HCFS;
        s->ctl |= OHCI_USB_RESUME;
        /* In suspend mode only ResumeDetected is possible, not RHSC:
         * see the OHCI spec 5.1.2.3.
         */
        intr = OHCI_INTR_RD;
    }
    ohci_set_interrupt(s, intr);
408 409
}

410 411 412 413 414 415 416
static void ohci_child_detach(USBPort *port1, USBDevice *child)
{
    OHCIState *s = port1->opaque;

    ohci_async_cancel_device(s, child);
}

417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433
static USBDevice *ohci_find_device(OHCIState *ohci, uint8_t addr)
{
    USBDevice *dev;
    int i;

    for (i = 0; i < ohci->num_ports; i++) {
        if ((ohci->rhport[i].ctrl & OHCI_PORT_PES) == 0) {
            continue;
        }
        dev = usb_find_device(&ohci->rhport[i].port, addr);
        if (dev != NULL) {
            return dev;
        }
    }
    return NULL;
}

434 435 436 437 438 439 440 441 442 443 444 445 446 447 448 449 450
static void ohci_stop_endpoints(OHCIState *ohci)
{
    USBDevice *dev;
    int i, j;

    for (i = 0; i < ohci->num_ports; i++) {
        dev = ohci->rhport[i].port.dev;
        if (dev && dev->attached) {
            usb_device_ep_stopped(dev, &dev->ep_ctl);
            for (j = 0; j < USB_MAX_ENDPOINTS; j++) {
                usb_device_ep_stopped(dev, &dev->ep_in[j]);
                usb_device_ep_stopped(dev, &dev->ep_out[j]);
            }
        }
    }
}

P
pbrook 已提交
451
/* Reset the controller */
452
static void ohci_reset(void *opaque)
P
pbrook 已提交
453
{
454
    OHCIState *ohci = opaque;
P
pbrook 已提交
455 456 457
    OHCIPort *port;
    int i;

458
    ohci_bus_stop(ohci);
P
pbrook 已提交
459
    ohci->ctl = 0;
P
pbrook 已提交
460
    ohci->old_ctl = 0;
P
pbrook 已提交
461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490
    ohci->status = 0;
    ohci->intr_status = 0;
    ohci->intr = OHCI_INTR_MIE;

    ohci->hcca = 0;
    ohci->ctrl_head = ohci->ctrl_cur = 0;
    ohci->bulk_head = ohci->bulk_cur = 0;
    ohci->per_cur = 0;
    ohci->done = 0;
    ohci->done_count = 7;

    /* FSMPS is marked TBD in OCHI 1.0, what gives ffs?
     * I took the value linux sets ...
     */
    ohci->fsmps = 0x2778;
    ohci->fi = 0x2edf;
    ohci->fit = 0;
    ohci->frt = 0;
    ohci->frame_number = 0;
    ohci->pstart = 0;
    ohci->lst = OHCI_LS_THRESH;

    ohci->rhdesc_a = OHCI_RHA_NPS | ohci->num_ports;
    ohci->rhdesc_b = 0x0; /* Impl. specific */
    ohci->rhstatus = 0;

    for (i = 0; i < ohci->num_ports; i++)
      {
        port = &ohci->rhport[i];
        port->ctrl = 0;
491
        if (port->port.dev && port->port.dev->attached) {
G
Gerd Hoffmann 已提交
492
            usb_port_reset(&port->port);
493
        }
P
pbrook 已提交
494
      }
P
pbrook 已提交
495 496 497 498
    if (ohci->async_td) {
        usb_cancel_packet(&ohci->usb_packet);
        ohci->async_td = 0;
    }
499
    ohci_stop_endpoints(ohci);
M
malc 已提交
500
    DPRINTF("usb-ohci: Reset %s\n", ohci->name);
P
pbrook 已提交
501 502 503
}

/* Get an array of dwords from main memory */
A
aurel32 已提交
504
static inline int get_dwords(OHCIState *ohci,
505
                             dma_addr_t addr, uint32_t *buf, int num)
P
pbrook 已提交
506 507 508
{
    int i;

A
aurel32 已提交
509 510
    addr += ohci->localmem_base;

P
pbrook 已提交
511
    for (i = 0; i < num; i++, buf++, addr += sizeof(*buf)) {
512 513 514
        if (dma_memory_read(ohci->as, addr, buf, sizeof(*buf))) {
            return -1;
        }
P
pbrook 已提交
515 516 517
        *buf = le32_to_cpu(*buf);
    }

518
    return 0;
P
pbrook 已提交
519 520 521
}

/* Put an array of dwords in to main memory */
A
aurel32 已提交
522
static inline int put_dwords(OHCIState *ohci,
523
                             dma_addr_t addr, uint32_t *buf, int num)
P
pbrook 已提交
524 525 526
{
    int i;

A
aurel32 已提交
527 528
    addr += ohci->localmem_base;

P
pbrook 已提交
529 530
    for (i = 0; i < num; i++, buf++, addr += sizeof(*buf)) {
        uint32_t tmp = cpu_to_le32(*buf);
531 532 533
        if (dma_memory_write(ohci->as, addr, &tmp, sizeof(tmp))) {
            return -1;
        }
P
pbrook 已提交
534 535
    }

536
    return 0;
P
pbrook 已提交
537 538
}

539
/* Get an array of words from main memory */
A
aurel32 已提交
540
static inline int get_words(OHCIState *ohci,
541
                            dma_addr_t addr, uint16_t *buf, int num)
542 543 544
{
    int i;

A
aurel32 已提交
545 546
    addr += ohci->localmem_base;

547
    for (i = 0; i < num; i++, buf++, addr += sizeof(*buf)) {
548 549 550
        if (dma_memory_read(ohci->as, addr, buf, sizeof(*buf))) {
            return -1;
        }
551 552 553
        *buf = le16_to_cpu(*buf);
    }

554
    return 0;
555 556 557
}

/* Put an array of words in to main memory */
A
aurel32 已提交
558
static inline int put_words(OHCIState *ohci,
559
                            dma_addr_t addr, uint16_t *buf, int num)
560 561 562
{
    int i;

A
aurel32 已提交
563 564
    addr += ohci->localmem_base;

565 566
    for (i = 0; i < num; i++, buf++, addr += sizeof(*buf)) {
        uint16_t tmp = cpu_to_le16(*buf);
567 568 569
        if (dma_memory_write(ohci->as, addr, &tmp, sizeof(tmp))) {
            return -1;
        }
570 571
    }

572
    return 0;
573 574
}

A
aurel32 已提交
575
static inline int ohci_read_ed(OHCIState *ohci,
576
                               dma_addr_t addr, struct ohci_ed *ed)
P
pbrook 已提交
577
{
A
aurel32 已提交
578
    return get_dwords(ohci, addr, (uint32_t *)ed, sizeof(*ed) >> 2);
P
pbrook 已提交
579 580
}

A
aurel32 已提交
581
static inline int ohci_read_td(OHCIState *ohci,
582
                               dma_addr_t addr, struct ohci_td *td)
P
pbrook 已提交
583
{
A
aurel32 已提交
584
    return get_dwords(ohci, addr, (uint32_t *)td, sizeof(*td) >> 2);
P
pbrook 已提交
585 586
}

A
aurel32 已提交
587
static inline int ohci_read_iso_td(OHCIState *ohci,
588
                                   dma_addr_t addr, struct ohci_iso_td *td)
589
{
590 591
    return get_dwords(ohci, addr, (uint32_t *)td, 4) ||
           get_words(ohci, addr + 16, td->offset, 8);
592 593
}

A
aurel32 已提交
594
static inline int ohci_read_hcca(OHCIState *ohci,
595
                                 dma_addr_t addr, struct ohci_hcca *hcca)
P
pbrook 已提交
596
{
597 598
    return dma_memory_read(ohci->as, addr + ohci->localmem_base,
                           hcca, sizeof(*hcca));
P
pbrook 已提交
599 600
}

A
aurel32 已提交
601
static inline int ohci_put_ed(OHCIState *ohci,
602
                              dma_addr_t addr, struct ohci_ed *ed)
P
pbrook 已提交
603
{
W
Wei Yang 已提交
604 605 606 607 608 609 610
    /* ed->tail is under control of the HCD.
     * Since just ed->head is changed by HC, just write back this
     */

    return put_dwords(ohci, addr + ED_WBACK_OFFSET,
                      (uint32_t *)((char *)ed + ED_WBACK_OFFSET),
                      ED_WBACK_SIZE >> 2);
P
pbrook 已提交
611 612
}

A
aurel32 已提交
613
static inline int ohci_put_td(OHCIState *ohci,
614
                              dma_addr_t addr, struct ohci_td *td)
615
{
A
aurel32 已提交
616 617 618 619
    return put_dwords(ohci, addr, (uint32_t *)td, sizeof(*td) >> 2);
}

static inline int ohci_put_iso_td(OHCIState *ohci,
620
                                  dma_addr_t addr, struct ohci_iso_td *td)
A
aurel32 已提交
621
{
622 623
    return put_dwords(ohci, addr, (uint32_t *)td, 4) ||
           put_words(ohci, addr + 16, td->offset, 8);
A
aurel32 已提交
624 625 626
}

static inline int ohci_put_hcca(OHCIState *ohci,
627
                                dma_addr_t addr, struct ohci_hcca *hcca)
A
aurel32 已提交
628
{
629 630 631 632
    return dma_memory_write(ohci->as,
                            addr + ohci->localmem_base + HCCA_WRITEBACK_OFFSET,
                            (char *)hcca + HCCA_WRITEBACK_OFFSET,
                            HCCA_WRITEBACK_SIZE);
633 634
}

P
pbrook 已提交
635
/* Read/Write the contents of a TD from/to main memory.  */
636 637
static int ohci_copy_td(OHCIState *ohci, struct ohci_td *td,
                        uint8_t *buf, int len, DMADirection dir)
P
pbrook 已提交
638
{
639
    dma_addr_t ptr, n;
P
pbrook 已提交
640 641 642 643 644

    ptr = td->cbp;
    n = 0x1000 - (ptr & 0xfff);
    if (n > len)
        n = len;
645 646 647 648 649 650 651

    if (dma_memory_rw(ohci->as, ptr + ohci->localmem_base, buf, n, dir)) {
        return -1;
    }
    if (n == len) {
        return 0;
    }
P
pbrook 已提交
652
    ptr = td->be & ~0xfffu;
P
pbrook 已提交
653
    buf += n;
654 655 656 657 658
    if (dma_memory_rw(ohci->as, ptr + ohci->localmem_base, buf,
                      len - n, dir)) {
        return -1;
    }
    return 0;
P
pbrook 已提交
659 660
}

661
/* Read/Write the contents of an ISO TD from/to main memory.  */
662 663 664
static int ohci_copy_iso_td(OHCIState *ohci,
                            uint32_t start_addr, uint32_t end_addr,
                            uint8_t *buf, int len, DMADirection dir)
665
{
666
    dma_addr_t ptr, n;
P
pbrook 已提交
667

668 669 670 671
    ptr = start_addr;
    n = 0x1000 - (ptr & 0xfff);
    if (n > len)
        n = len;
672 673 674 675 676 677 678

    if (dma_memory_rw(ohci->as, ptr + ohci->localmem_base, buf, n, dir)) {
        return -1;
    }
    if (n == len) {
        return 0;
    }
679 680
    ptr = end_addr & ~0xfffu;
    buf += n;
681 682 683 684 685
    if (dma_memory_rw(ohci->as, ptr + ohci->localmem_base, buf,
                      len - n, dir)) {
        return -1;
    }
    return 0;
686 687 688 689
}

static void ohci_process_lists(OHCIState *ohci, int completion);

690
static void ohci_async_complete_packet(USBPort *port, USBPacket *packet)
P
pbrook 已提交
691
{
692
    OHCIState *ohci = container_of(packet, OHCIState, usb_packet);
P
pbrook 已提交
693
#ifdef DEBUG_PACKET
M
malc 已提交
694
    DPRINTF("Async packet complete\n");
P
pbrook 已提交
695
#endif
696
    ohci->async_complete = true;
697 698 699 700 701 702 703 704 705 706
    ohci_process_lists(ohci, 1);
}

#define USUB(a, b) ((int16_t)((uint16_t)(a) - (uint16_t)(b)))

static int ohci_service_iso_td(OHCIState *ohci, struct ohci_ed *ed,
                               int completion)
{
    int dir;
    size_t len = 0;
707
#ifdef DEBUG_ISOCH
708
    const char *str = NULL;
709
#endif
710 711 712 713
    int pid;
    int ret;
    int i;
    USBDevice *dev;
714
    USBEndpoint *ep;
715 716 717 718 719 720 721 722 723 724
    struct ohci_iso_td iso_td;
    uint32_t addr;
    uint16_t starting_frame;
    int16_t relative_frame_number;
    int frame_count;
    uint32_t start_offset, next_offset, end_offset = 0;
    uint32_t start_addr, end_addr;

    addr = ed->head & OHCI_DPTR_MASK;

725
    if (ohci_read_iso_td(ohci, addr, &iso_td)) {
726
        printf("usb-ohci: ISO_TD read error at %x\n", addr);
727
        ohci_die(ohci);
728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752
        return 0;
    }

    starting_frame = OHCI_BM(iso_td.flags, TD_SF);
    frame_count = OHCI_BM(iso_td.flags, TD_FC);
    relative_frame_number = USUB(ohci->frame_number, starting_frame); 

#ifdef DEBUG_ISOCH
    printf("--- ISO_TD ED head 0x%.8x tailp 0x%.8x\n"
           "0x%.8x 0x%.8x 0x%.8x 0x%.8x\n"
           "0x%.8x 0x%.8x 0x%.8x 0x%.8x\n"
           "0x%.8x 0x%.8x 0x%.8x 0x%.8x\n"
           "frame_number 0x%.8x starting_frame 0x%.8x\n"
           "frame_count  0x%.8x relative %d\n"
           "di 0x%.8x cc 0x%.8x\n",
           ed->head & OHCI_DPTR_MASK, ed->tail & OHCI_DPTR_MASK,
           iso_td.flags, iso_td.bp, iso_td.next, iso_td.be,
           iso_td.offset[0], iso_td.offset[1], iso_td.offset[2], iso_td.offset[3],
           iso_td.offset[4], iso_td.offset[5], iso_td.offset[6], iso_td.offset[7],
           ohci->frame_number, starting_frame, 
           frame_count, relative_frame_number,         
           OHCI_BM(iso_td.flags, TD_DI), OHCI_BM(iso_td.flags, TD_CC));
#endif

    if (relative_frame_number < 0) {
M
malc 已提交
753
        DPRINTF("usb-ohci: ISO_TD R=%d < 0\n", relative_frame_number);
754 755 756 757
        return 1;
    } else if (relative_frame_number > frame_count) {
        /* ISO TD expired - retire the TD to the Done Queue and continue with
           the next ISO TD of the same ED */
M
malc 已提交
758
        DPRINTF("usb-ohci: ISO_TD R=%d > FC=%d\n", relative_frame_number, 
759 760 761 762 763 764 765 766 767
               frame_count);
        OHCI_SET_BM(iso_td.flags, TD_CC, OHCI_CC_DATAOVERRUN);
        ed->head &= ~OHCI_DPTR_MASK;
        ed->head |= (iso_td.next & OHCI_DPTR_MASK);
        iso_td.next = ohci->done;
        ohci->done = addr;
        i = OHCI_BM(iso_td.flags, TD_DI);
        if (i < ohci->done_count)
            ohci->done_count = i;
768 769 770 771
        if (ohci_put_iso_td(ohci, addr, &iso_td)) {
            ohci_die(ohci);
            return 1;
        }
772 773 774 775 776 777
        return 0;
    }

    dir = OHCI_BM(ed->flags, ED_D);
    switch (dir) {
    case OHCI_TD_DIR_IN:
778
#ifdef DEBUG_ISOCH
779
        str = "in";
780
#endif
781 782 783
        pid = USB_TOKEN_IN;
        break;
    case OHCI_TD_DIR_OUT:
784
#ifdef DEBUG_ISOCH
785
        str = "out";
786
#endif
787 788 789
        pid = USB_TOKEN_OUT;
        break;
    case OHCI_TD_DIR_SETUP:
790
#ifdef DEBUG_ISOCH
791
        str = "setup";
792
#endif
793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851
        pid = USB_TOKEN_SETUP;
        break;
    default:
        printf("usb-ohci: Bad direction %d\n", dir);
        return 1;
    }

    if (!iso_td.bp || !iso_td.be) {
        printf("usb-ohci: ISO_TD bp 0x%.8x be 0x%.8x\n", iso_td.bp, iso_td.be);
        return 1;
    }

    start_offset = iso_td.offset[relative_frame_number];
    next_offset = iso_td.offset[relative_frame_number + 1];

    if (!(OHCI_BM(start_offset, TD_PSW_CC) & 0xe) || 
        ((relative_frame_number < frame_count) && 
         !(OHCI_BM(next_offset, TD_PSW_CC) & 0xe))) {
        printf("usb-ohci: ISO_TD cc != not accessed 0x%.8x 0x%.8x\n",
               start_offset, next_offset);
        return 1;
    }

    if ((relative_frame_number < frame_count) && (start_offset > next_offset)) {
        printf("usb-ohci: ISO_TD start_offset=0x%.8x > next_offset=0x%.8x\n",
                start_offset, next_offset);
        return 1;
    }

    if ((start_offset & 0x1000) == 0) {
        start_addr = (iso_td.bp & OHCI_PAGE_MASK) |
            (start_offset & OHCI_OFFSET_MASK);
    } else {
        start_addr = (iso_td.be & OHCI_PAGE_MASK) |
            (start_offset & OHCI_OFFSET_MASK);
    }

    if (relative_frame_number < frame_count) {
        end_offset = next_offset - 1;
        if ((end_offset & 0x1000) == 0) {
            end_addr = (iso_td.bp & OHCI_PAGE_MASK) |
                (end_offset & OHCI_OFFSET_MASK);
        } else {
            end_addr = (iso_td.be & OHCI_PAGE_MASK) |
                (end_offset & OHCI_OFFSET_MASK);
        }
    } else {
        /* Last packet in the ISO TD */
        end_addr = iso_td.be;
    }

    if ((start_addr & OHCI_PAGE_MASK) != (end_addr & OHCI_PAGE_MASK)) {
        len = (end_addr & OHCI_OFFSET_MASK) + 0x1001
            - (start_addr & OHCI_OFFSET_MASK);
    } else {
        len = end_addr - start_addr + 1;
    }

    if (len && dir != OHCI_TD_DIR_IN) {
852 853 854 855 856
        if (ohci_copy_iso_td(ohci, start_addr, end_addr, ohci->usb_buf, len,
                             DMA_DIRECTION_TO_DEVICE)) {
            ohci_die(ohci);
            return 1;
        }
857 858
    }

859
    if (!completion) {
860 861
        bool int_req = relative_frame_number == frame_count &&
                       OHCI_BM(iso_td.flags, TD_DI) == 0;
862 863
        dev = ohci_find_device(ohci, OHCI_BM(ed->flags, ED_FA));
        ep = usb_ep_get(dev, pid, OHCI_BM(ed->flags, ED_EN));
G
Gerd Hoffmann 已提交
864
        usb_packet_setup(&ohci->usb_packet, pid, ep, 0, addr, false, int_req);
865
        usb_packet_addbuf(&ohci->usb_packet, ohci->usb_buf, len);
866 867
        usb_handle_packet(dev, &ohci->usb_packet);
        if (ohci->usb_packet.status == USB_RET_ASYNC) {
868
            usb_device_flush_ep_queue(dev, ep);
869 870 871
            return 1;
        }
    }
872 873 874 875 876
    if (ohci->usb_packet.status == USB_RET_SUCCESS) {
        ret = ohci->usb_packet.actual_length;
    } else {
        ret = ohci->usb_packet.status;
    }
877 878 879 880 881 882 883 884 885

#ifdef DEBUG_ISOCH
    printf("so 0x%.8x eo 0x%.8x\nsa 0x%.8x ea 0x%.8x\ndir %s len %zu ret %d\n",
           start_offset, end_offset, start_addr, end_addr, str, len, ret);
#endif

    /* Writeback */
    if (dir == OHCI_TD_DIR_IN && ret >= 0 && ret <= len) {
        /* IN transfer succeeded */
886 887 888 889 890
        if (ohci_copy_iso_td(ohci, start_addr, end_addr, ohci->usb_buf, ret,
                             DMA_DIRECTION_FROM_DEVICE)) {
            ohci_die(ohci);
            return 1;
        }
891 892 893 894 895 896 897 898 899
        OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_CC,
                    OHCI_CC_NOERROR);
        OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_SIZE, ret);
    } else if (dir == OHCI_TD_DIR_OUT && ret == len) {
        /* OUT transfer succeeded */
        OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_CC,
                    OHCI_CC_NOERROR);
        OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_SIZE, 0);
    } else {
900
        if (ret > (ssize_t) len) {
901 902 903 904 905 906 907 908 909 910 911
            printf("usb-ohci: DataOverrun %d > %zu\n", ret, len);
            OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_CC,
                        OHCI_CC_DATAOVERRUN);
            OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_SIZE,
                        len);
        } else if (ret >= 0) {
            printf("usb-ohci: DataUnderrun %d\n", ret);
            OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_CC,
                        OHCI_CC_DATAUNDERRUN);
        } else {
            switch (ret) {
H
Hans de Goede 已提交
912
            case USB_RET_IOERROR:
913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946
            case USB_RET_NODEV:
                OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_CC,
                            OHCI_CC_DEVICENOTRESPONDING);
                OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_SIZE,
                            0);
                break;
            case USB_RET_NAK:
            case USB_RET_STALL:
                printf("usb-ohci: got NAK/STALL %d\n", ret);
                OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_CC,
                            OHCI_CC_STALL);
                OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_SIZE,
                            0);
                break;
            default:
                printf("usb-ohci: Bad device response %d\n", ret);
                OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_CC,
                            OHCI_CC_UNDEXPETEDPID);
                break;
            }
        }
    }

    if (relative_frame_number == frame_count) {
        /* Last data packet of ISO TD - retire the TD to the Done Queue */
        OHCI_SET_BM(iso_td.flags, TD_CC, OHCI_CC_NOERROR);
        ed->head &= ~OHCI_DPTR_MASK;
        ed->head |= (iso_td.next & OHCI_DPTR_MASK);
        iso_td.next = ohci->done;
        ohci->done = addr;
        i = OHCI_BM(iso_td.flags, TD_DI);
        if (i < ohci->done_count)
            ohci->done_count = i;
    }
947 948 949
    if (ohci_put_iso_td(ohci, addr, &iso_td)) {
        ohci_die(ohci);
    }
950
    return 1;
P
pbrook 已提交
951 952
}

P
pbrook 已提交
953 954 955 956 957 958
/* Service a transport descriptor.
   Returns nonzero to terminate processing of this endpoint.  */

static int ohci_service_td(OHCIState *ohci, struct ohci_ed *ed)
{
    int dir;
959
    size_t len = 0, pktlen = 0;
960
#ifdef DEBUG_PACKET
961
    const char *str = NULL;
962
#endif
P
pbrook 已提交
963 964 965 966
    int pid;
    int ret;
    int i;
    USBDevice *dev;
967
    USBEndpoint *ep;
P
pbrook 已提交
968 969 970
    struct ohci_td td;
    uint32_t addr;
    int flag_r;
P
pbrook 已提交
971
    int completion;
P
pbrook 已提交
972 973

    addr = ed->head & OHCI_DPTR_MASK;
P
pbrook 已提交
974 975 976 977
    /* See if this TD has already been submitted to the device.  */
    completion = (addr == ohci->async_td);
    if (completion && !ohci->async_complete) {
#ifdef DEBUG_PACKET
M
malc 已提交
978
        DPRINTF("Skipping async TD\n");
P
pbrook 已提交
979 980 981
#endif
        return 1;
    }
982
    if (ohci_read_td(ohci, addr, &td)) {
P
pbrook 已提交
983
        fprintf(stderr, "usb-ohci: TD read error at %x\n", addr);
984
        ohci_die(ohci);
P
pbrook 已提交
985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000
        return 0;
    }

    dir = OHCI_BM(ed->flags, ED_D);
    switch (dir) {
    case OHCI_TD_DIR_OUT:
    case OHCI_TD_DIR_IN:
        /* Same value.  */
        break;
    default:
        dir = OHCI_BM(td.flags, TD_DP);
        break;
    }

    switch (dir) {
    case OHCI_TD_DIR_IN:
1001
#ifdef DEBUG_PACKET
P
pbrook 已提交
1002
        str = "in";
1003
#endif
P
pbrook 已提交
1004 1005 1006
        pid = USB_TOKEN_IN;
        break;
    case OHCI_TD_DIR_OUT:
1007
#ifdef DEBUG_PACKET
P
pbrook 已提交
1008
        str = "out";
1009
#endif
P
pbrook 已提交
1010 1011 1012
        pid = USB_TOKEN_OUT;
        break;
    case OHCI_TD_DIR_SETUP:
1013
#ifdef DEBUG_PACKET
P
pbrook 已提交
1014
        str = "setup";
1015
#endif
P
pbrook 已提交
1016 1017 1018 1019 1020 1021 1022
        pid = USB_TOKEN_SETUP;
        break;
    default:
        fprintf(stderr, "usb-ohci: Bad direction\n");
        return 1;
    }
    if (td.cbp && td.be) {
P
pbrook 已提交
1023 1024 1025 1026 1027 1028
        if ((td.cbp & 0xfffff000) != (td.be & 0xfffff000)) {
            len = (td.be & 0xfff) + 0x1001 - (td.cbp & 0xfff);
        } else {
            len = (td.be - td.cbp) + 1;
        }

1029 1030 1031 1032 1033 1034 1035 1036
        pktlen = len;
        if (len && dir != OHCI_TD_DIR_IN) {
            /* The endpoint may not allow us to transfer it all now */
            pktlen = (ed->flags & OHCI_ED_MPS_MASK) >> OHCI_ED_MPS_SHIFT;
            if (pktlen > len) {
                pktlen = len;
            }
            if (!completion) {
1037 1038 1039 1040
                if (ohci_copy_td(ohci, &td, ohci->usb_buf, pktlen,
                                 DMA_DIRECTION_TO_DEVICE)) {
                    ohci_die(ohci);
                }
1041
            }
P
pbrook 已提交
1042 1043 1044 1045 1046
        }
    }

    flag_r = (td.flags & OHCI_TD_R) != 0;
#ifdef DEBUG_PACKET
1047 1048 1049
    DPRINTF(" TD @ 0x%.8x %" PRId64 " of %" PRId64
            " bytes %s r=%d cbp=0x%.8x be=0x%.8x\n",
            addr, (int64_t)pktlen, (int64_t)len, str, flag_r, td.cbp, td.be);
P
pbrook 已提交
1050

1051
    if (pktlen > 0 && dir != OHCI_TD_DIR_IN) {
M
malc 已提交
1052
        DPRINTF("  data:");
1053
        for (i = 0; i < pktlen; i++) {
P
pbrook 已提交
1054
            printf(" %.2x", ohci->usb_buf[i]);
1055
        }
M
malc 已提交
1056
        DPRINTF("\n");
P
pbrook 已提交
1057 1058
    }
#endif
P
pbrook 已提交
1059 1060
    if (completion) {
        ohci->async_td = 0;
1061
        ohci->async_complete = false;
P
pbrook 已提交
1062
    } else {
1063 1064 1065 1066 1067 1068
        if (ohci->async_td) {
            /* ??? The hardware should allow one active packet per
               endpoint.  We only allow one active packet per controller.
               This should be sufficient as long as devices respond in a
               timely manner.
            */
P
pbrook 已提交
1069
#ifdef DEBUG_PACKET
1070
            DPRINTF("Too many pending packets\n");
P
pbrook 已提交
1071
#endif
1072
            return 1;
P
pbrook 已提交
1073
        }
1074 1075
        dev = ohci_find_device(ohci, OHCI_BM(ed->flags, ED_FA));
        ep = usb_ep_get(dev, pid, OHCI_BM(ed->flags, ED_EN));
G
Gerd Hoffmann 已提交
1076
        usb_packet_setup(&ohci->usb_packet, pid, ep, 0, addr, !flag_r,
1077
                         OHCI_BM(td.flags, TD_DI) == 0);
1078
        usb_packet_addbuf(&ohci->usb_packet, ohci->usb_buf, pktlen);
1079
        usb_handle_packet(dev, &ohci->usb_packet);
P
pbrook 已提交
1080
#ifdef DEBUG_PACKET
1081
        DPRINTF("status=%d\n", ohci->usb_packet.status);
P
pbrook 已提交
1082
#endif
1083
        if (ohci->usb_packet.status == USB_RET_ASYNC) {
1084
            usb_device_flush_ep_queue(dev, ep);
P
pbrook 已提交
1085 1086 1087 1088
            ohci->async_td = addr;
            return 1;
        }
    }
1089 1090 1091 1092 1093 1094
    if (ohci->usb_packet.status == USB_RET_SUCCESS) {
        ret = ohci->usb_packet.actual_length;
    } else {
        ret = ohci->usb_packet.status;
    }

P
pbrook 已提交
1095 1096
    if (ret >= 0) {
        if (dir == OHCI_TD_DIR_IN) {
1097 1098 1099 1100
            if (ohci_copy_td(ohci, &td, ohci->usb_buf, ret,
                             DMA_DIRECTION_FROM_DEVICE)) {
                ohci_die(ohci);
            }
P
pbrook 已提交
1101
#ifdef DEBUG_PACKET
M
malc 已提交
1102
            DPRINTF("  data:");
P
pbrook 已提交
1103
            for (i = 0; i < ret; i++)
P
pbrook 已提交
1104
                printf(" %.2x", ohci->usb_buf[i]);
M
malc 已提交
1105
            DPRINTF("\n");
P
pbrook 已提交
1106 1107
#endif
        } else {
1108
            ret = pktlen;
P
pbrook 已提交
1109 1110 1111 1112
        }
    }

    /* Writeback */
1113
    if (ret == pktlen || (dir == OHCI_TD_DIR_IN && ret >= 0 && flag_r)) {
P
pbrook 已提交
1114 1115 1116 1117 1118
        /* Transmission succeeded.  */
        if (ret == len) {
            td.cbp = 0;
        } else {
            if ((td.cbp & 0xfff) + ret > 0xfff) {
1119 1120 1121
                td.cbp = (td.be & ~0xfff) + ((td.cbp + ret) & 0xfff);
            } else {
                td.cbp += ret;
P
pbrook 已提交
1122 1123 1124 1125 1126 1127 1128
            }
        }
        td.flags |= OHCI_TD_T1;
        td.flags ^= OHCI_TD_T0;
        OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_NOERROR);
        OHCI_SET_BM(td.flags, TD_EC, 0);

1129 1130 1131 1132 1133 1134
        if ((dir != OHCI_TD_DIR_IN) && (ret != len)) {
            /* Partial packet transfer: TD not ready to retire yet */
            goto exit_no_retire;
        }

        /* Setting ED_C is part of the TD retirement process */
P
pbrook 已提交
1135 1136 1137 1138 1139
        ed->head &= ~OHCI_ED_C;
        if (td.flags & OHCI_TD_T0)
            ed->head |= OHCI_ED_C;
    } else {
        if (ret >= 0) {
M
malc 已提交
1140
            DPRINTF("usb-ohci: Underrun\n");
P
pbrook 已提交
1141 1142 1143
            OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_DATAUNDERRUN);
        } else {
            switch (ret) {
H
Hans de Goede 已提交
1144
            case USB_RET_IOERROR:
P
pbrook 已提交
1145
            case USB_RET_NODEV:
1146
                DPRINTF("usb-ohci: got DEV ERROR\n");
P
pbrook 已提交
1147
                OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_DEVICENOTRESPONDING);
1148
                break;
P
pbrook 已提交
1149
            case USB_RET_NAK:
M
malc 已提交
1150
                DPRINTF("usb-ohci: got NAK\n");
P
pbrook 已提交
1151 1152
                return 1;
            case USB_RET_STALL:
M
malc 已提交
1153
                DPRINTF("usb-ohci: got STALL\n");
P
pbrook 已提交
1154 1155 1156
                OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_STALL);
                break;
            case USB_RET_BABBLE:
M
malc 已提交
1157
                DPRINTF("usb-ohci: got BABBLE\n");
P
pbrook 已提交
1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177
                OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_DATAOVERRUN);
                break;
            default:
                fprintf(stderr, "usb-ohci: Bad device response %d\n", ret);
                OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_UNDEXPETEDPID);
                OHCI_SET_BM(td.flags, TD_EC, 3);
                break;
            }
        }
        ed->head |= OHCI_ED_H;
    }

    /* Retire this TD */
    ed->head &= ~OHCI_DPTR_MASK;
    ed->head |= td.next & OHCI_DPTR_MASK;
    td.next = ohci->done;
    ohci->done = addr;
    i = OHCI_BM(td.flags, TD_DI);
    if (i < ohci->done_count)
        ohci->done_count = i;
1178
exit_no_retire:
1179 1180 1181 1182
    if (ohci_put_td(ohci, addr, &td)) {
        ohci_die(ohci);
        return 1;
    }
P
pbrook 已提交
1183 1184 1185 1186
    return OHCI_BM(td.flags, TD_CC) != OHCI_CC_NOERROR;
}

/* Service an endpoint list.  Returns nonzero if active TD were found.  */
1187
static int ohci_service_ed_list(OHCIState *ohci, uint32_t head, int completion)
P
pbrook 已提交
1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199
{
    struct ohci_ed ed;
    uint32_t next_ed;
    uint32_t cur;
    int active;

    active = 0;

    if (head == 0)
        return 0;

    for (cur = head; cur; cur = next_ed) {
1200
        if (ohci_read_ed(ohci, cur, &ed)) {
P
pbrook 已提交
1201
            fprintf(stderr, "usb-ohci: ED read error at %x\n", cur);
1202
            ohci_die(ohci);
P
pbrook 已提交
1203 1204 1205 1206 1207
            return 0;
        }

        next_ed = ed.next & OHCI_DPTR_MASK;

P
pbrook 已提交
1208 1209 1210 1211 1212 1213 1214
        if ((ed.head & OHCI_ED_H) || (ed.flags & OHCI_ED_K)) {
            uint32_t addr;
            /* Cancel pending packets for ED that have been paused.  */
            addr = ed.head & OHCI_DPTR_MASK;
            if (ohci->async_td && addr == ohci->async_td) {
                usb_cancel_packet(&ohci->usb_packet);
                ohci->async_td = 0;
1215 1216
                usb_device_ep_stopped(ohci->usb_packet.ep->dev,
                                      ohci->usb_packet.ep);
P
pbrook 已提交
1217
            }
P
pbrook 已提交
1218
            continue;
P
pbrook 已提交
1219
        }
P
pbrook 已提交
1220 1221 1222

        while ((ed.head & OHCI_DPTR_MASK) != ed.tail) {
#ifdef DEBUG_PACKET
M
malc 已提交
1223
            DPRINTF("ED @ 0x%.8x fa=%u en=%u d=%u s=%u k=%u f=%u mps=%u "
P
pbrook 已提交
1224 1225 1226 1227 1228 1229 1230 1231 1232 1233
                    "h=%u c=%u\n  head=0x%.8x tailp=0x%.8x next=0x%.8x\n", cur,
                    OHCI_BM(ed.flags, ED_FA), OHCI_BM(ed.flags, ED_EN),
                    OHCI_BM(ed.flags, ED_D), (ed.flags & OHCI_ED_S)!= 0,
                    (ed.flags & OHCI_ED_K) != 0, (ed.flags & OHCI_ED_F) != 0,
                    OHCI_BM(ed.flags, ED_MPS), (ed.head & OHCI_ED_H) != 0,
                    (ed.head & OHCI_ED_C) != 0, ed.head & OHCI_DPTR_MASK,
                    ed.tail & OHCI_DPTR_MASK, ed.next & OHCI_DPTR_MASK);
#endif
            active = 1;

1234 1235 1236 1237 1238 1239 1240 1241
            if ((ed.flags & OHCI_ED_F) == 0) {
                if (ohci_service_td(ohci, &ed))
                    break;
            } else {
                /* Handle isochronous endpoints */
                if (ohci_service_iso_td(ohci, &ed, completion))
                    break;
            }
P
pbrook 已提交
1242 1243
        }

1244 1245 1246 1247
        if (ohci_put_ed(ohci, cur, &ed)) {
            ohci_die(ohci);
            return 0;
        }
P
pbrook 已提交
1248 1249 1250 1251 1252 1253 1254 1255
    }

    return active;
}

/* Generate a SOF event, and set a timer for EOF */
static void ohci_sof(OHCIState *ohci)
{
1256 1257
    ohci->sof_time = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
    timer_mod(ohci->eof_timer, ohci->sof_time + usb_frame_time);
P
pbrook 已提交
1258 1259 1260
    ohci_set_interrupt(ohci, OHCI_INTR_SF);
}

P
pbrook 已提交
1261
/* Process Control and Bulk lists.  */
1262
static void ohci_process_lists(OHCIState *ohci, int completion)
P
pbrook 已提交
1263 1264
{
    if ((ohci->ctl & OHCI_CTL_CLE) && (ohci->status & OHCI_STATUS_CLF)) {
1265 1266 1267 1268
        if (ohci->ctrl_cur && ohci->ctrl_cur != ohci->ctrl_head) {
            DPRINTF("usb-ohci: head %x, cur %x\n",
                    ohci->ctrl_head, ohci->ctrl_cur);
        }
1269
        if (!ohci_service_ed_list(ohci, ohci->ctrl_head, completion)) {
P
pbrook 已提交
1270 1271 1272 1273 1274 1275
            ohci->ctrl_cur = 0;
            ohci->status &= ~OHCI_STATUS_CLF;
        }
    }

    if ((ohci->ctl & OHCI_CTL_BLE) && (ohci->status & OHCI_STATUS_BLF)) {
1276
        if (!ohci_service_ed_list(ohci, ohci->bulk_head, completion)) {
P
pbrook 已提交
1277 1278 1279 1280 1281 1282
            ohci->bulk_cur = 0;
            ohci->status &= ~OHCI_STATUS_BLF;
        }
    }
}

P
pbrook 已提交
1283 1284 1285 1286 1287 1288
/* Do frame processing on frame boundary */
static void ohci_frame_boundary(void *opaque)
{
    OHCIState *ohci = opaque;
    struct ohci_hcca hcca;

1289 1290 1291 1292 1293
    if (ohci_read_hcca(ohci, ohci->hcca, &hcca)) {
        fprintf(stderr, "usb-ohci: HCCA read error at %x\n", ohci->hcca);
        ohci_die(ohci);
        return;
    }
P
pbrook 已提交
1294 1295 1296 1297 1298 1299

    /* Process all the lists at the end of the frame */
    if (ohci->ctl & OHCI_CTL_PLE) {
        int n;

        n = ohci->frame_number & 0x1f;
1300
        ohci_service_ed_list(ohci, le32_to_cpu(hcca.intr[n]), 0);
P
pbrook 已提交
1301 1302
    }

P
pbrook 已提交
1303
    /* Cancel all pending packets if either of the lists has been disabled.  */
1304 1305 1306 1307 1308 1309
    if (ohci->old_ctl & (~ohci->ctl) & (OHCI_CTL_BLE | OHCI_CTL_CLE)) {
        if (ohci->async_td) {
            usb_cancel_packet(&ohci->usb_packet);
            ohci->async_td = 0;
        }
        ohci_stop_endpoints(ohci);
P
pbrook 已提交
1310
    }
P
pbrook 已提交
1311
    ohci->old_ctl = ohci->ctl;
1312
    ohci_process_lists(ohci, 0);
P
pbrook 已提交
1313

1314 1315 1316 1317 1318
    /* Stop if UnrecoverableError happened or ohci_sof will crash */
    if (ohci->intr_status & OHCI_INTR_UE) {
        return;
    }

P
pbrook 已提交
1319 1320 1321
    /* Frame boundary, so do EOF stuf here */
    ohci->frt = ohci->fit;

M
Michael Buesch 已提交
1322
    /* Increment frame number and take care of endianness. */
P
pbrook 已提交
1323
    ohci->frame_number = (ohci->frame_number + 1) & 0xffff;
M
Michael Buesch 已提交
1324
    hcca.frame = cpu_to_le16(ohci->frame_number);
P
pbrook 已提交
1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343

    if (ohci->done_count == 0 && !(ohci->intr_status & OHCI_INTR_WD)) {
        if (!ohci->done)
            abort();
        if (ohci->intr & ohci->intr_status)
            ohci->done |= 1;
        hcca.done = cpu_to_le32(ohci->done);
        ohci->done = 0;
        ohci->done_count = 7;
        ohci_set_interrupt(ohci, OHCI_INTR_WD);
    }

    if (ohci->done_count != 7 && ohci->done_count != 0)
        ohci->done_count--;

    /* Do SOF stuff here */
    ohci_sof(ohci);

    /* Writeback HCCA */
1344 1345 1346
    if (ohci_put_hcca(ohci, ohci->hcca, &hcca)) {
        ohci_die(ohci);
    }
P
pbrook 已提交
1347 1348 1349 1350 1351 1352 1353
}

/* Start sending SOF tokens across the USB bus, lists are processed in
 * next frame
 */
static int ohci_bus_start(OHCIState *ohci)
{
1354
    ohci->eof_timer = timer_new_ns(QEMU_CLOCK_VIRTUAL,
P
pbrook 已提交
1355 1356 1357 1358
                    ohci_frame_boundary,
                    ohci);

    if (ohci->eof_timer == NULL) {
1359
        fprintf(stderr, "usb-ohci: %s: timer_new_ns failed\n", ohci->name);
1360
        ohci_die(ohci);
P
pbrook 已提交
1361 1362 1363
        return 0;
    }

M
malc 已提交
1364
    DPRINTF("usb-ohci: %s: USB Operational\n", ohci->name);
P
pbrook 已提交
1365 1366 1367 1368 1369 1370 1371 1372 1373

    ohci_sof(ohci);

    return 1;
}

/* Stop sending SOF tokens on the bus */
static void ohci_bus_stop(OHCIState *ohci)
{
1374
    if (ohci->eof_timer) {
1375
        timer_del(ohci->eof_timer);
1376 1377
        timer_free(ohci->eof_timer);
    }
1378
    ohci->eof_timer = NULL;
P
pbrook 已提交
1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418
}

/* Sets a flag in a port status register but only set it if the port is
 * connected, if not set ConnectStatusChange flag. If flag is enabled
 * return 1.
 */
static int ohci_port_set_if_connected(OHCIState *ohci, int i, uint32_t val)
{
    int ret = 1;

    /* writing a 0 has no effect */
    if (val == 0)
        return 0;

    /* If CurrentConnectStatus is cleared we set
     * ConnectStatusChange
     */
    if (!(ohci->rhport[i].ctrl & OHCI_PORT_CCS)) {
        ohci->rhport[i].ctrl |= OHCI_PORT_CSC;
        if (ohci->rhstatus & OHCI_RHS_DRWE) {
            /* TODO: CSC is a wakeup event */
        }
        return 0;
    }

    if (ohci->rhport[i].ctrl & val)
        ret = 0;

    /* set the bit */
    ohci->rhport[i].ctrl |= val;

    return ret;
}

/* Set the frame interval - frame interval toggle is manipulated by the hcd only */
static void ohci_set_frame_interval(OHCIState *ohci, uint16_t val)
{
    val &= OHCI_FMI_FI;

    if (val != ohci->fi) {
M
malc 已提交
1419
        DPRINTF("usb-ohci: %s: FrameInterval = 0x%x (%u)\n",
1420
            ohci->name, ohci->fi, ohci->fi);
P
pbrook 已提交
1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457
    }

    ohci->fi = val;
}

static void ohci_port_power(OHCIState *ohci, int i, int p)
{
    if (p) {
        ohci->rhport[i].ctrl |= OHCI_PORT_PPS;
    } else {
        ohci->rhport[i].ctrl &= ~(OHCI_PORT_PPS|
                    OHCI_PORT_CCS|
                    OHCI_PORT_PSS|
                    OHCI_PORT_PRS);
    }
}

/* Set HcControlRegister */
static void ohci_set_ctl(OHCIState *ohci, uint32_t val)
{
    uint32_t old_state;
    uint32_t new_state;

    old_state = ohci->ctl & OHCI_CTL_HCFS;
    ohci->ctl = val;
    new_state = ohci->ctl & OHCI_CTL_HCFS;

    /* no state change */
    if (old_state == new_state)
        return;

    switch (new_state) {
    case OHCI_USB_OPERATIONAL:
        ohci_bus_start(ohci);
        break;
    case OHCI_USB_SUSPEND:
        ohci_bus_stop(ohci);
M
malc 已提交
1458
        DPRINTF("usb-ohci: %s: USB Suspended\n", ohci->name);
P
pbrook 已提交
1459 1460
        break;
    case OHCI_USB_RESUME:
M
malc 已提交
1461
        DPRINTF("usb-ohci: %s: USB Resume\n", ohci->name);
P
pbrook 已提交
1462 1463
        break;
    case OHCI_USB_RESET:
1464
        ohci_reset(ohci);
M
malc 已提交
1465
        DPRINTF("usb-ohci: %s: USB Reset\n", ohci->name);
P
pbrook 已提交
1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480
        break;
    }
}

static uint32_t ohci_get_frame_remaining(OHCIState *ohci)
{
    uint16_t fr;
    int64_t tks;

    if ((ohci->ctl & OHCI_CTL_HCFS) != OHCI_USB_OPERATIONAL)
        return (ohci->frt << 31);

    /* Being in USB operational state guarnatees sof_time was
     * set already.
     */
1481
    tks = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) - ohci->sof_time;
P
pbrook 已提交
1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509

    /* avoid muldiv if possible */
    if (tks >= usb_frame_time)
        return (ohci->frt << 31);

    tks = muldiv64(1, tks, usb_bit_time);
    fr = (uint16_t)(ohci->fi - tks);

    return (ohci->frt << 31) | fr;
}


/* Set root hub status */
static void ohci_set_hub_status(OHCIState *ohci, uint32_t val)
{
    uint32_t old_state;

    old_state = ohci->rhstatus;

    /* write 1 to clear OCIC */
    if (val & OHCI_RHS_OCIC)
        ohci->rhstatus &= ~OHCI_RHS_OCIC;

    if (val & OHCI_RHS_LPS) {
        int i;

        for (i = 0; i < ohci->num_ports; i++)
            ohci_port_power(ohci, i, 0);
M
malc 已提交
1510
        DPRINTF("usb-ohci: powered down all ports\n");
P
pbrook 已提交
1511 1512 1513 1514 1515 1516 1517
    }

    if (val & OHCI_RHS_LPSC) {
        int i;

        for (i = 0; i < ohci->num_ports; i++)
            ohci_port_power(ohci, i, 1);
M
malc 已提交
1518
        DPRINTF("usb-ohci: powered up all ports\n");
P
pbrook 已提交
1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548
    }

    if (val & OHCI_RHS_DRWE)
        ohci->rhstatus |= OHCI_RHS_DRWE;

    if (val & OHCI_RHS_CRWE)
        ohci->rhstatus &= ~OHCI_RHS_DRWE;

    if (old_state != ohci->rhstatus)
        ohci_set_interrupt(ohci, OHCI_INTR_RHSC);
}

/* Set root hub port status */
static void ohci_port_set_status(OHCIState *ohci, int portnum, uint32_t val)
{
    uint32_t old_state;
    OHCIPort *port;

    port = &ohci->rhport[portnum];
    old_state = port->ctrl;

    /* Write to clear CSC, PESC, PSSC, OCIC, PRSC */
    if (val & OHCI_PORT_WTC)
        port->ctrl &= ~(val & OHCI_PORT_WTC);

    if (val & OHCI_PORT_CCS)
        port->ctrl &= ~OHCI_PORT_PES;

    ohci_port_set_if_connected(ohci, portnum, val & OHCI_PORT_PES);

1549
    if (ohci_port_set_if_connected(ohci, portnum, val & OHCI_PORT_PSS)) {
M
malc 已提交
1550
        DPRINTF("usb-ohci: port %d: SUSPEND\n", portnum);
1551
    }
P
pbrook 已提交
1552 1553

    if (ohci_port_set_if_connected(ohci, portnum, val & OHCI_PORT_PRS)) {
M
malc 已提交
1554
        DPRINTF("usb-ohci: port %d: RESET\n", portnum);
G
Gerd Hoffmann 已提交
1555
        usb_device_reset(port->port.dev);
P
pbrook 已提交
1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572
        port->ctrl &= ~OHCI_PORT_PRS;
        /* ??? Should this also set OHCI_PORT_PESC.  */
        port->ctrl |= OHCI_PORT_PES | OHCI_PORT_PRSC;
    }

    /* Invert order here to ensure in ambiguous case, device is
     * powered up...
     */
    if (val & OHCI_PORT_LSDA)
        ohci_port_power(ohci, portnum, 0);
    if (val & OHCI_PORT_PPS)
        ohci_port_power(ohci, portnum, 1);

    if (old_state != port->ctrl)
        ohci_set_interrupt(ohci, OHCI_INTR_RHSC);
}

A
Avi Kivity 已提交
1573
static uint64_t ohci_mem_read(void *opaque,
A
Avi Kivity 已提交
1574
                              hwaddr addr,
A
Avi Kivity 已提交
1575
                              unsigned size)
P
pbrook 已提交
1576
{
A
Avi Kivity 已提交
1577
    OHCIState *ohci = opaque;
1578
    uint32_t retval;
P
pbrook 已提交
1579 1580 1581 1582 1583

    /* Only aligned reads are allowed on OHCI */
    if (addr & 3) {
        fprintf(stderr, "usb-ohci: Mis-aligned read\n");
        return 0xffffffff;
1584
    } else if (addr >= 0x54 && addr < 0x54 + ohci->num_ports * 4) {
P
pbrook 已提交
1585
        /* HcRhPortStatus */
1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690
        retval = ohci->rhport[(addr - 0x54) >> 2].ctrl | OHCI_PORT_PPS;
    } else {
        switch (addr >> 2) {
        case 0: /* HcRevision */
            retval = 0x10;
            break;

        case 1: /* HcControl */
            retval = ohci->ctl;
            break;

        case 2: /* HcCommandStatus */
            retval = ohci->status;
            break;

        case 3: /* HcInterruptStatus */
            retval = ohci->intr_status;
            break;

        case 4: /* HcInterruptEnable */
        case 5: /* HcInterruptDisable */
            retval = ohci->intr;
            break;

        case 6: /* HcHCCA */
            retval = ohci->hcca;
            break;

        case 7: /* HcPeriodCurrentED */
            retval = ohci->per_cur;
            break;

        case 8: /* HcControlHeadED */
            retval = ohci->ctrl_head;
            break;

        case 9: /* HcControlCurrentED */
            retval = ohci->ctrl_cur;
            break;

        case 10: /* HcBulkHeadED */
            retval = ohci->bulk_head;
            break;

        case 11: /* HcBulkCurrentED */
            retval = ohci->bulk_cur;
            break;

        case 12: /* HcDoneHead */
            retval = ohci->done;
            break;

        case 13: /* HcFmInterretval */
            retval = (ohci->fit << 31) | (ohci->fsmps << 16) | (ohci->fi);
            break;

        case 14: /* HcFmRemaining */
            retval = ohci_get_frame_remaining(ohci);
            break;

        case 15: /* HcFmNumber */
            retval = ohci->frame_number;
            break;

        case 16: /* HcPeriodicStart */
            retval = ohci->pstart;
            break;

        case 17: /* HcLSThreshold */
            retval = ohci->lst;
            break;

        case 18: /* HcRhDescriptorA */
            retval = ohci->rhdesc_a;
            break;

        case 19: /* HcRhDescriptorB */
            retval = ohci->rhdesc_b;
            break;

        case 20: /* HcRhStatus */
            retval = ohci->rhstatus;
            break;

        /* PXA27x specific registers */
        case 24: /* HcStatus */
            retval = ohci->hstatus & ohci->hmask;
            break;

        case 25: /* HcHReset */
            retval = ohci->hreset;
            break;

        case 26: /* HcHInterruptEnable */
            retval = ohci->hmask;
            break;

        case 27: /* HcHInterruptTest */
            retval = ohci->htest;
            break;

        default:
            fprintf(stderr, "ohci_read: Bad offset %x\n", (int)addr);
            retval = 0xffffffff;
        }
P
pbrook 已提交
1691 1692
    }

1693
    return retval;
P
pbrook 已提交
1694 1695
}

A
Avi Kivity 已提交
1696
static void ohci_mem_write(void *opaque,
A
Avi Kivity 已提交
1697
                           hwaddr addr,
A
Avi Kivity 已提交
1698 1699
                           uint64_t val,
                           unsigned size)
P
pbrook 已提交
1700
{
A
Avi Kivity 已提交
1701
    OHCIState *ohci = opaque;
P
Paul Brook 已提交
1702

P
pbrook 已提交
1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749
    /* Only aligned reads are allowed on OHCI */
    if (addr & 3) {
        fprintf(stderr, "usb-ohci: Mis-aligned write\n");
        return;
    }

    if (addr >= 0x54 && addr < 0x54 + ohci->num_ports * 4) {
        /* HcRhPortStatus */
        ohci_port_set_status(ohci, (addr - 0x54) >> 2, val);
        return;
    }

    switch (addr >> 2) {
    case 1: /* HcControl */
        ohci_set_ctl(ohci, val);
        break;

    case 2: /* HcCommandStatus */
        /* SOC is read-only */
        val = (val & ~OHCI_STATUS_SOC);

        /* Bits written as '0' remain unchanged in the register */
        ohci->status |= val;

        if (ohci->status & OHCI_STATUS_HCR)
            ohci_reset(ohci);
        break;

    case 3: /* HcInterruptStatus */
        ohci->intr_status &= ~val;
        ohci_intr_update(ohci);
        break;

    case 4: /* HcInterruptEnable */
        ohci->intr |= val;
        ohci_intr_update(ohci);
        break;

    case 5: /* HcInterruptDisable */
        ohci->intr &= ~val;
        ohci_intr_update(ohci);
        break;

    case 6: /* HcHCCA */
        ohci->hcca = val & OHCI_HCCA_MASK;
        break;

1750 1751 1752 1753
    case 7: /* HcPeriodCurrentED */
        /* Ignore writes to this read-only register, Linux does them */
        break;

P
pbrook 已提交
1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775
    case 8: /* HcControlHeadED */
        ohci->ctrl_head = val & OHCI_EDPTR_MASK;
        break;

    case 9: /* HcControlCurrentED */
        ohci->ctrl_cur = val & OHCI_EDPTR_MASK;
        break;

    case 10: /* HcBulkHeadED */
        ohci->bulk_head = val & OHCI_EDPTR_MASK;
        break;

    case 11: /* HcBulkCurrentED */
        ohci->bulk_cur = val & OHCI_EDPTR_MASK;
        break;

    case 13: /* HcFmInterval */
        ohci->fsmps = (val & OHCI_FMI_FSMPS) >> 16;
        ohci->fit = (val & OHCI_FMI_FIT) >> 31;
        ohci_set_frame_interval(ohci, val);
        break;

1776 1777 1778
    case 15: /* HcFmNumber */
        break;

P
pbrook 已提交
1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798
    case 16: /* HcPeriodicStart */
        ohci->pstart = val & 0xffff;
        break;

    case 17: /* HcLSThreshold */
        ohci->lst = val & 0xffff;
        break;

    case 18: /* HcRhDescriptorA */
        ohci->rhdesc_a &= ~OHCI_RHA_RW_MASK;
        ohci->rhdesc_a |= val & OHCI_RHA_RW_MASK;
        break;

    case 19: /* HcRhDescriptorB */
        break;

    case 20: /* HcRhStatus */
        ohci_set_hub_status(ohci, val);
        break;

1799 1800 1801
    /* PXA27x specific registers */
    case 24: /* HcStatus */
        ohci->hstatus &= ~(val & ohci->hmask);
G
Gerd Hoffmann 已提交
1802
        break;
1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817

    case 25: /* HcHReset */
        ohci->hreset = val & ~OHCI_HRESET_FSBIR;
        if (val & OHCI_HRESET_FSBIR)
            ohci_reset(ohci);
        break;

    case 26: /* HcHInterruptEnable */
        ohci->hmask = val;
        break;

    case 27: /* HcHInterruptTest */
        ohci->htest = val;
        break;

P
pbrook 已提交
1818 1819 1820 1821 1822 1823
    default:
        fprintf(stderr, "ohci_write: Bad offset %x\n", (int)addr);
        break;
    }
}

1824
static void ohci_async_cancel_device(OHCIState *ohci, USBDevice *dev)
1825
{
1826
    if (ohci->async_td &&
1827 1828
        usb_packet_is_inflight(&ohci->usb_packet) &&
        ohci->usb_packet.ep->dev == dev) {
1829 1830 1831 1832 1833
        usb_cancel_packet(&ohci->usb_packet);
        ohci->async_td = 0;
    }
}

A
Avi Kivity 已提交
1834 1835 1836 1837
static const MemoryRegionOps ohci_mem_ops = {
    .read = ohci_mem_read,
    .write = ohci_mem_write,
    .endianness = DEVICE_LITTLE_ENDIAN,
P
pbrook 已提交
1838 1839
};

1840 1841
static USBPortOps ohci_port_ops = {
    .attach = ohci_attach,
1842
    .detach = ohci_detach,
1843
    .child_detach = ohci_child_detach,
1844
    .wakeup = ohci_wakeup,
1845
    .complete = ohci_async_complete_packet,
1846 1847
};

1848 1849 1850
static USBBusOps ohci_bus_ops = {
};

1851
static int usb_ohci_init(OHCIState *ohci, DeviceState *dev,
1852 1853
                         int num_ports, dma_addr_t localmem_base,
                         char *masterbus, uint32_t firstport,
P
Paolo Bonzini 已提交
1854
                         AddressSpace *as)
P
pbrook 已提交
1855 1856 1857
{
    int i;

P
Paolo Bonzini 已提交
1858
    ohci->as = as;
1859

P
pbrook 已提交
1860
    if (usb_frame_time == 0) {
1861
#ifdef OHCI_TIME_WARP
1862 1863
        usb_frame_time = get_ticks_per_sec();
        usb_bit_time = muldiv64(1, get_ticks_per_sec(), USB_HZ/1000);
P
pbrook 已提交
1864
#else
1865 1866 1867
        usb_frame_time = muldiv64(1, get_ticks_per_sec(), 1000);
        if (get_ticks_per_sec() >= USB_HZ) {
            usb_bit_time = muldiv64(1, get_ticks_per_sec(), USB_HZ);
P
pbrook 已提交
1868 1869 1870 1871
        } else {
            usb_bit_time = 1;
        }
#endif
M
malc 已提交
1872
        DPRINTF("usb-ohci: usb_bit_time=%" PRId64 " usb_frame_time=%" PRId64 "\n",
P
pbrook 已提交
1873 1874 1875
                usb_frame_time, usb_bit_time);
    }

1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887
    ohci->num_ports = num_ports;
    if (masterbus) {
        USBPort *ports[OHCI_MAX_PORTS];
        for(i = 0; i < num_ports; i++) {
            ports[i] = &ohci->rhport[i].port;
        }
        if (usb_register_companion(masterbus, ports, num_ports,
                firstport, ohci, &ohci_port_ops,
                USB_SPEED_MASK_LOW | USB_SPEED_MASK_FULL) != 0) {
            return -1;
        }
    } else {
1888
        usb_bus_new(&ohci->bus, sizeof(ohci->bus), &ohci_bus_ops, dev);
1889 1890 1891 1892 1893 1894 1895
        for (i = 0; i < num_ports; i++) {
            usb_register_port(&ohci->bus, &ohci->rhport[i].port,
                              ohci, i, &ohci_port_ops,
                              USB_SPEED_MASK_LOW | USB_SPEED_MASK_FULL);
        }
    }

1896 1897
    memory_region_init_io(&ohci->mem, OBJECT(dev), &ohci_mem_ops,
                          ohci, "ohci", 256);
A
aurel32 已提交
1898
    ohci->localmem_base = localmem_base;
1899

1900
    ohci->name = object_get_typename(OBJECT(dev));
G
Gerd Hoffmann 已提交
1901
    usb_packet_init(&ohci->usb_packet);
1902 1903

    ohci->async_td = 0;
1904
    qemu_register_reset(ohci_reset, ohci);
1905 1906

    return 0;
1907 1908
}

H
Hu Tao 已提交
1909 1910 1911
#define TYPE_PCI_OHCI "pci-ohci"
#define PCI_OHCI(obj) OBJECT_CHECK(OHCIPCIState, (obj), TYPE_PCI_OHCI)

1912
typedef struct {
H
Hu Tao 已提交
1913 1914 1915 1916
    /*< private >*/
    PCIDevice parent_obj;
    /*< public >*/

1917
    OHCIState state;
1918 1919 1920
    char *masterbus;
    uint32_t num_ports;
    uint32_t firstport;
1921 1922
} OHCIPCIState;

1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938
/** A typical O/EHCI will stop operating, set itself into error state
 * (which can be queried by MMIO) and will set PERR in its config
 * space to signal that it got an error
 */
static void ohci_die(OHCIState *ohci)
{
    OHCIPCIState *dev = container_of(ohci, OHCIPCIState, state);

    fprintf(stderr, "%s: DMA error\n", __func__);

    ohci_set_interrupt(ohci, OHCI_INTR_UE);
    ohci_bus_stop(ohci);
    pci_set_word(dev->parent_obj.config + PCI_STATUS,
                 PCI_STATUS_DETECTED_PARITY);
}

H
Hu Tao 已提交
1939
static int usb_ohci_initfn_pci(PCIDevice *dev)
1940
{
H
Hu Tao 已提交
1941
    OHCIPCIState *ohci = PCI_OHCI(dev);
P
pbrook 已提交
1942

H
Hu Tao 已提交
1943 1944
    dev->config[PCI_CLASS_PROG] = 0x10; /* OHCI */
    dev->config[PCI_INTERRUPT_PIN] = 0x01; /* interrupt pin A */
P
pbrook 已提交
1945

H
Hu Tao 已提交
1946
    if (usb_ohci_init(&ohci->state, DEVICE(dev), ohci->num_ports, 0,
1947
                      ohci->masterbus, ohci->firstport,
P
Paolo Bonzini 已提交
1948
                      pci_get_address_space(dev)) != 0) {
1949 1950
        return -1;
    }
1951
    ohci->state.irq = pci_allocate_irq(dev);
P
pbrook 已提交
1952

H
Hu Tao 已提交
1953
    pci_register_bar(dev, 0, 0, &ohci->state.mem);
G
Gerd Hoffmann 已提交
1954 1955 1956
    return 0;
}

G
Gonglei 已提交
1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971 1972 1973 1974
static void usb_ohci_exit(PCIDevice *dev)
{
    OHCIPCIState *ohci = PCI_OHCI(dev);
    OHCIState *s = &ohci->state;

    ohci_bus_stop(s);

    if (s->async_td) {
        usb_cancel_packet(&s->usb_packet);
        s->async_td = 0;
    }
    ohci_stop_endpoints(s);

    if (!ohci->masterbus) {
        usb_bus_release(&s->bus);
    }
}

H
Hu Tao 已提交
1975 1976 1977
#define TYPE_SYSBUS_OHCI "sysbus-ohci"
#define SYSBUS_OHCI(obj) OBJECT_CHECK(OHCISysBusState, (obj), TYPE_SYSBUS_OHCI)

P
Paul Brook 已提交
1978
typedef struct {
H
Hu Tao 已提交
1979 1980 1981 1982
    /*< private >*/
    SysBusDevice parent_obj;
    /*< public >*/

P
Paul Brook 已提交
1983 1984
    OHCIState ohci;
    uint32_t num_ports;
1985
    dma_addr_t dma_offset;
P
Paul Brook 已提交
1986
} OHCISysBusState;
A
aurel32 已提交
1987

H
Hu Tao 已提交
1988
static void ohci_realize_pxa(DeviceState *dev, Error **errp)
A
aurel32 已提交
1989
{
H
Hu Tao 已提交
1990
    OHCISysBusState *s = SYSBUS_OHCI(dev);
H
Hu Tao 已提交
1991
    SysBusDevice *sbd = SYS_BUS_DEVICE(dev);
A
aurel32 已提交
1992

1993
    /* Cannot fail as we pass NULL for masterbus */
H
Hu Tao 已提交
1994
    usb_ohci_init(&s->ohci, dev, s->num_ports, s->dma_offset, NULL, 0,
P
Paolo Bonzini 已提交
1995
                  &address_space_memory);
H
Hu Tao 已提交
1996 1997
    sysbus_init_irq(sbd, &s->ohci.irq);
    sysbus_init_mmio(sbd, &s->ohci.mem);
A
aurel32 已提交
1998 1999
}

2000 2001 2002 2003 2004 2005 2006
static Property ohci_pci_properties[] = {
    DEFINE_PROP_STRING("masterbus", OHCIPCIState, masterbus),
    DEFINE_PROP_UINT32("num-ports", OHCIPCIState, num_ports, 3),
    DEFINE_PROP_UINT32("firstport", OHCIPCIState, firstport, 0),
    DEFINE_PROP_END_OF_LIST(),
};

2007 2008 2009 2010
static const VMStateDescription vmstate_ohci_state_port = {
    .name = "ohci-core/port",
    .version_id = 1,
    .minimum_version_id = 1,
2011
    .fields = (VMStateField[]) {
2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037
        VMSTATE_UINT32(ctrl, OHCIPort),
        VMSTATE_END_OF_LIST()
    },
};

static bool ohci_eof_timer_needed(void *opaque)
{
    OHCIState *ohci = opaque;

    return ohci->eof_timer != NULL;
}

static int ohci_eof_timer_pre_load(void *opaque)
{
    OHCIState *ohci = opaque;

    ohci_bus_start(ohci);

    return 0;
}

static const VMStateDescription vmstate_ohci_eof_timer = {
    .name = "ohci-core/eof-timer",
    .version_id = 1,
    .minimum_version_id = 1,
    .pre_load = ohci_eof_timer_pre_load,
2038
    .fields = (VMStateField[]) {
2039 2040 2041 2042 2043
        VMSTATE_TIMER(eof_timer, OHCIState),
        VMSTATE_END_OF_LIST()
    },
};

2044
static const VMStateDescription vmstate_ohci_state = {
2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105
    .name = "ohci-core",
    .version_id = 1,
    .minimum_version_id = 1,
    .fields = (VMStateField[]) {
        VMSTATE_INT64(sof_time, OHCIState),
        VMSTATE_UINT32(ctl, OHCIState),
        VMSTATE_UINT32(status, OHCIState),
        VMSTATE_UINT32(intr_status, OHCIState),
        VMSTATE_UINT32(intr, OHCIState),
        VMSTATE_UINT32(hcca, OHCIState),
        VMSTATE_UINT32(ctrl_head, OHCIState),
        VMSTATE_UINT32(ctrl_cur, OHCIState),
        VMSTATE_UINT32(bulk_head, OHCIState),
        VMSTATE_UINT32(bulk_cur, OHCIState),
        VMSTATE_UINT32(per_cur, OHCIState),
        VMSTATE_UINT32(done, OHCIState),
        VMSTATE_INT32(done_count, OHCIState),
        VMSTATE_UINT16(fsmps, OHCIState),
        VMSTATE_UINT8(fit, OHCIState),
        VMSTATE_UINT16(fi, OHCIState),
        VMSTATE_UINT8(frt, OHCIState),
        VMSTATE_UINT16(frame_number, OHCIState),
        VMSTATE_UINT16(padding, OHCIState),
        VMSTATE_UINT32(pstart, OHCIState),
        VMSTATE_UINT32(lst, OHCIState),
        VMSTATE_UINT32(rhdesc_a, OHCIState),
        VMSTATE_UINT32(rhdesc_b, OHCIState),
        VMSTATE_UINT32(rhstatus, OHCIState),
        VMSTATE_STRUCT_ARRAY(rhport, OHCIState, OHCI_MAX_PORTS, 0,
                             vmstate_ohci_state_port, OHCIPort),
        VMSTATE_UINT32(hstatus, OHCIState),
        VMSTATE_UINT32(hmask, OHCIState),
        VMSTATE_UINT32(hreset, OHCIState),
        VMSTATE_UINT32(htest, OHCIState),
        VMSTATE_UINT32(old_ctl, OHCIState),
        VMSTATE_UINT8_ARRAY(usb_buf, OHCIState, 8192),
        VMSTATE_UINT32(async_td, OHCIState),
        VMSTATE_BOOL(async_complete, OHCIState),
        VMSTATE_END_OF_LIST()
    },
    .subsections = (VMStateSubsection []) {
        {
            .vmsd = &vmstate_ohci_eof_timer,
            .needed = ohci_eof_timer_needed,
        } , {
            /* empty */
        }
    }
};

static const VMStateDescription vmstate_ohci = {
    .name = "ohci",
    .version_id = 1,
    .minimum_version_id = 1,
    .fields = (VMStateField[]) {
        VMSTATE_PCI_DEVICE(parent_obj, OHCIPCIState),
        VMSTATE_STRUCT(state, OHCIPCIState, 1, vmstate_ohci_state, OHCIState),
        VMSTATE_END_OF_LIST()
    }
};

2106 2107
static void ohci_pci_class_init(ObjectClass *klass, void *data)
{
2108
    DeviceClass *dc = DEVICE_CLASS(klass);
2109 2110 2111
    PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);

    k->init = usb_ohci_initfn_pci;
G
Gonglei 已提交
2112
    k->exit = usb_ohci_exit;
2113 2114 2115
    k->vendor_id = PCI_VENDOR_ID_APPLE;
    k->device_id = PCI_DEVICE_ID_APPLE_IPID_USB;
    k->class_id = PCI_CLASS_SERIAL_USB;
2116
    set_bit(DEVICE_CATEGORY_USB, dc->categories);
2117 2118
    dc->desc = "Apple USB Controller";
    dc->props = ohci_pci_properties;
2119
    dc->hotpluggable = false;
2120
    dc->vmsd = &vmstate_ohci;
2121 2122
}

2123
static const TypeInfo ohci_pci_info = {
H
Hu Tao 已提交
2124
    .name          = TYPE_PCI_OHCI,
2125 2126 2127 2128 2129 2130 2131
    .parent        = TYPE_PCI_DEVICE,
    .instance_size = sizeof(OHCIPCIState),
    .class_init    = ohci_pci_class_init,
};

static Property ohci_sysbus_properties[] = {
    DEFINE_PROP_UINT32("num-ports", OHCISysBusState, num_ports, 3),
2132
    DEFINE_PROP_DMAADDR("dma-offset", OHCISysBusState, dma_offset, 3),
2133
    DEFINE_PROP_END_OF_LIST(),
G
Gerd Hoffmann 已提交
2134 2135
};

2136 2137
static void ohci_sysbus_class_init(ObjectClass *klass, void *data)
{
2138
    DeviceClass *dc = DEVICE_CLASS(klass);
2139

H
Hu Tao 已提交
2140
    dc->realize = ohci_realize_pxa;
2141
    set_bit(DEVICE_CATEGORY_USB, dc->categories);
2142 2143
    dc->desc = "OHCI USB Controller";
    dc->props = ohci_sysbus_properties;
2144 2145
}

2146
static const TypeInfo ohci_sysbus_info = {
H
Hu Tao 已提交
2147
    .name          = TYPE_SYSBUS_OHCI,
2148 2149 2150
    .parent        = TYPE_SYS_BUS_DEVICE,
    .instance_size = sizeof(OHCISysBusState),
    .class_init    = ohci_sysbus_class_init,
P
Paul Brook 已提交
2151 2152
};

A
Andreas Färber 已提交
2153
static void ohci_register_types(void)
G
Gerd Hoffmann 已提交
2154
{
2155 2156
    type_register_static(&ohci_pci_info);
    type_register_static(&ohci_sysbus_info);
G
Gerd Hoffmann 已提交
2157
}
A
Andreas Färber 已提交
2158 2159

type_init(ohci_register_types)