hcd-ohci.c 60.6 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"
34
#include "trace.h"
P
pbrook 已提交
35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51

/* This causes frames to occur 1000x slower */
//#define OHCI_TIME_WARP 1

/* 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 {
52
    USBBus bus;
P
pbrook 已提交
53
    qemu_irq irq;
A
Avi Kivity 已提交
54
    MemoryRegion mem;
P
Paolo Bonzini 已提交
55
    AddressSpace *as;
P
pbrook 已提交
56
    int num_ports;
57
    const char *name;
P
pbrook 已提交
58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73

    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;
74
    int32_t done_count;
P
pbrook 已提交
75 76

    /* Frame counter partition */
77 78 79 80
    uint16_t fsmps;
    uint8_t fit;
    uint16_t fi;
    uint8_t frt;
P
pbrook 已提交
81 82 83 84 85 86 87 88 89
    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 已提交
90

91 92 93 94 95 96
    /* PXA27x Non-OHCI events */
    uint32_t hstatus;
    uint32_t hmask;
    uint32_t hreset;
    uint32_t htest;

A
aurel32 已提交
97
    /* SM501 local memory offset */
98
    dma_addr_t localmem_base;
A
aurel32 已提交
99

P
pbrook 已提交
100 101 102 103 104
    /* Active packets.  */
    uint32_t old_ctl;
    USBPacket usb_packet;
    uint8_t usb_buf[8192];
    uint32_t async_td;
105
    bool async_complete;
P
pbrook 已提交
106

P
pbrook 已提交
107 108 109 110 111 112 113 114
} OHCIState;

/* Host Controller Communications Area */
struct ohci_hcca {
    uint32_t intr[32];
    uint16_t frame, pad;
    uint32_t done;
};
W
Wei Yang 已提交
115 116 117 118 119
#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 已提交
120

121
static void ohci_bus_stop(OHCIState *ohci);
122
static void ohci_async_cancel_device(OHCIState *ohci, USBDevice *dev);
123

P
pbrook 已提交
124 125 126 127 128 129 130 131 132 133
/* 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)
134 135
#define OHCI_ED_MPS_SHIFT 16
#define OHCI_ED_MPS_MASK  (0x7ff<<OHCI_ED_MPS_SHIFT)
P
pbrook 已提交
136 137 138 139 140 141 142 143 144 145 146 147

/* 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)
148
#define OHCI_TD_T1        (1<<25)
P
pbrook 已提交
149 150 151 152 153
#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)

154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169
/* 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 已提交
170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195
#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;
};

196 197 198 199 200 201 202 203 204
/* 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 已提交
205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227
#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))

228 229 230 231 232 233 234 235 236
#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 已提交
237 238 239 240 241 242 243 244 245 246

#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

247
#define OHCI_FR_RT            (1U<<31)
P
pbrook 已提交
248 249 250 251 252 253 254 255 256 257 258

#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

259 260 261 262 263 264
#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 已提交
265 266 267 268 269 270 271 272 273 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

#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

299 300
#define OHCI_HRESET_FSBIR       (1 << 0)

301 302
static void ohci_die(OHCIState *ohci);

P
pbrook 已提交
303 304 305 306 307 308 309 310 311
/* 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 已提交
312
    qemu_set_irq(ohci->irq, level);
P
pbrook 已提交
313 314 315 316 317 318 319 320 321 322
}

/* 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.  */
323
static void ohci_attach(USBPort *port1)
P
pbrook 已提交
324 325 326
{
    OHCIState *s = port1->opaque;
    OHCIPort *port = &s->rhport[port1->index];
327
    uint32_t old_state = port->ctrl;
P
pbrook 已提交
328

329 330 331 332 333 334
    /* 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 已提交
335
    } else {
336 337 338 339 340 341 342 343
        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);
    }

344
    trace_usb_ohci_port_attach(port1->index);
345 346 347 348

    if (old_state != port->ctrl) {
        ohci_set_interrupt(s, OHCI_INTR_RHSC);
    }
349 350 351 352 353 354 355 356
}

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

357 358
    ohci_async_cancel_device(s, port1->dev);

359 360 361 362 363 364 365 366 367
    /* 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 已提交
368
    }
369
    trace_usb_ohci_port_detach(port1->index);
P
pbrook 已提交
370

371
    if (old_state != port->ctrl) {
P
pbrook 已提交
372
        ohci_set_interrupt(s, OHCI_INTR_RHSC);
373
    }
P
pbrook 已提交
374 375
}

376
static void ohci_wakeup(USBPort *port1)
377
{
378 379
    OHCIState *s = port1->opaque;
    OHCIPort *port = &s->rhport[port1->index];
380
    uint32_t intr = 0;
381
    if (port->ctrl & OHCI_PORT_PSS) {
382
        trace_usb_ohci_port_wakeup(port1->index);
383 384
        port->ctrl |= OHCI_PORT_PSSC;
        port->ctrl &= ~OHCI_PORT_PSS;
385
        intr = OHCI_INTR_RHSC;
386
    }
387 388
    /* Note that the controller can be suspended even if this port is not */
    if ((s->ctl & OHCI_CTL_HCFS) == OHCI_USB_SUSPEND) {
389
        trace_usb_ohci_remote_wakeup(s->name);
390 391 392 393 394 395 396 397 398
        /* 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);
399 400
}

401 402 403 404 405 406 407
static void ohci_child_detach(USBPort *port1, USBDevice *child)
{
    OHCIState *s = port1->opaque;

    ohci_async_cancel_device(s, child);
}

408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424
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;
}

425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441
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]);
            }
        }
    }
}

442
static void ohci_roothub_reset(OHCIState *ohci)
P
pbrook 已提交
443 444 445 446
{
    OHCIPort *port;
    int i;

447
    ohci_bus_stop(ohci);
448 449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466 467 468 469 470 471 472
    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;
        if (port->port.dev && port->port.dev->attached) {
            usb_port_reset(&port->port);
        }
    }
    if (ohci->async_td) {
        usb_cancel_packet(&ohci->usb_packet);
        ohci->async_td = 0;
    }
    ohci_stop_endpoints(ohci);
}

/* Reset the controller */
static void ohci_soft_reset(OHCIState *ohci)
{
    trace_usb_ohci_reset(ohci->name);

    ohci_bus_stop(ohci);
    ohci->ctl = (ohci->ctl & OHCI_CTL_IR) | OHCI_USB_SUSPEND;
P
pbrook 已提交
473
    ohci->old_ctl = 0;
P
pbrook 已提交
474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494
    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;
495
}
P
pbrook 已提交
496

497 498 499 500 501
static void ohci_hard_reset(OHCIState *ohci)
{
    ohci_soft_reset(ohci);
    ohci->ctl = 0;
    ohci_roothub_reset(ohci);
P
pbrook 已提交
502 503 504
}

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

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

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

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

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

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

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

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

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

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

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

555
    return 0;
556 557 558
}

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

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

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

573
    return 0;
574 575
}

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

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

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

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

A
aurel32 已提交
602
static inline int ohci_put_ed(OHCIState *ohci,
603
                              dma_addr_t addr, struct ohci_ed *ed)
P
pbrook 已提交
604
{
W
Wei Yang 已提交
605 606 607 608 609 610 611
    /* 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 已提交
612 613
}

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

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

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

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

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

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

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

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

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

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

691
static void ohci_async_complete_packet(USBPort *port, USBPacket *packet)
P
pbrook 已提交
692
{
693
    OHCIState *ohci = container_of(packet, OHCIState, usb_packet);
694 695

    trace_usb_ohci_async_complete();
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
    const char *str = NULL;
708 709 710 711
    int pid;
    int ret;
    int i;
    USBDevice *dev;
712
    USBEndpoint *ep;
713 714 715 716 717 718 719 720 721 722
    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;

723
    if (ohci_read_iso_td(ohci, addr, &iso_td)) {
724
        trace_usb_ohci_iso_td_read_failed(addr);
725
        ohci_die(ohci);
726 727 728 729 730 731 732
        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); 

733
    trace_usb_ohci_iso_td_head(
734 735
           ed->head & OHCI_DPTR_MASK, ed->tail & OHCI_DPTR_MASK,
           iso_td.flags, iso_td.bp, iso_td.next, iso_td.be,
736
           ohci->frame_number, starting_frame,
737
           frame_count, relative_frame_number);
738 739 740 741 742
    trace_usb_ohci_iso_td_head_offset(
           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]);
743 744

    if (relative_frame_number < 0) {
745
        trace_usb_ohci_iso_td_relative_frame_number_neg(relative_frame_number);
746 747 748 749
        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 */
750 751
        trace_usb_ohci_iso_td_relative_frame_number_big(relative_frame_number,
                                                        frame_count);
752 753 754 755 756 757 758 759
        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;
760 761 762 763
        if (ohci_put_iso_td(ohci, addr, &iso_td)) {
            ohci_die(ohci);
            return 1;
        }
764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781
        return 0;
    }

    dir = OHCI_BM(ed->flags, ED_D);
    switch (dir) {
    case OHCI_TD_DIR_IN:
        str = "in";
        pid = USB_TOKEN_IN;
        break;
    case OHCI_TD_DIR_OUT:
        str = "out";
        pid = USB_TOKEN_OUT;
        break;
    case OHCI_TD_DIR_SETUP:
        str = "setup";
        pid = USB_TOKEN_SETUP;
        break;
    default:
782
        trace_usb_ohci_iso_td_bad_direction(dir);
783 784 785 786
        return 1;
    }

    if (!iso_td.bp || !iso_td.be) {
787
        trace_usb_ohci_iso_td_bad_bp_be(iso_td.bp, iso_td.be);
788 789 790 791 792 793 794 795 796
        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))) {
797
        trace_usb_ohci_iso_td_bad_cc_not_accessed(start_offset, next_offset);
798 799 800 801
        return 1;
    }

    if ((relative_frame_number < frame_count) && (start_offset > next_offset)) {
802
        trace_usb_ohci_iso_td_bad_cc_overrun(start_offset, next_offset);
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
        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) {
836 837 838 839 840
        if (ohci_copy_iso_td(ohci, start_addr, end_addr, ohci->usb_buf, len,
                             DMA_DIRECTION_TO_DEVICE)) {
            ohci_die(ohci);
            return 1;
        }
841 842
    }

843
    if (!completion) {
844 845
        bool int_req = relative_frame_number == frame_count &&
                       OHCI_BM(iso_td.flags, TD_DI) == 0;
846 847
        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 已提交
848
        usb_packet_setup(&ohci->usb_packet, pid, ep, 0, addr, false, int_req);
849
        usb_packet_addbuf(&ohci->usb_packet, ohci->usb_buf, len);
850 851
        usb_handle_packet(dev, &ohci->usb_packet);
        if (ohci->usb_packet.status == USB_RET_ASYNC) {
852
            usb_device_flush_ep_queue(dev, ep);
853 854 855
            return 1;
        }
    }
856 857 858 859 860
    if (ohci->usb_packet.status == USB_RET_SUCCESS) {
        ret = ohci->usb_packet.actual_length;
    } else {
        ret = ohci->usb_packet.status;
    }
861

862 863
    trace_usb_ohci_iso_td_so(start_offset, end_offset, start_addr, end_addr,
                             str, len, ret);
864 865 866 867

    /* Writeback */
    if (dir == OHCI_TD_DIR_IN && ret >= 0 && ret <= len) {
        /* IN transfer succeeded */
868 869 870 871 872
        if (ohci_copy_iso_td(ohci, start_addr, end_addr, ohci->usb_buf, ret,
                             DMA_DIRECTION_FROM_DEVICE)) {
            ohci_die(ohci);
            return 1;
        }
873 874 875 876 877 878 879 880 881
        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 {
882
        if (ret > (ssize_t) len) {
883
            trace_usb_ohci_iso_td_data_overrun(ret, len);
884 885 886 887 888
            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) {
889
            trace_usb_ohci_iso_td_data_underrun(ret);
890 891 892 893
            OHCI_SET_BM(iso_td.offset[relative_frame_number], TD_PSW_CC,
                        OHCI_CC_DATAUNDERRUN);
        } else {
            switch (ret) {
H
Hans de Goede 已提交
894
            case USB_RET_IOERROR:
895 896 897 898 899 900 901 902
            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:
903
                trace_usb_ohci_iso_td_nak(ret);
904 905 906 907 908 909
                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:
910
                trace_usb_ohci_iso_td_bad_response(ret);
911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928
                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;
    }
929 930 931
    if (ohci_put_iso_td(ohci, addr, &iso_td)) {
        ohci_die(ohci);
    }
932
    return 1;
P
pbrook 已提交
933 934
}

935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971
#ifdef trace_event_get_state
static void ohci_td_pkt(const char *msg, const uint8_t *buf, size_t len)
{
    bool print16 = !!trace_event_get_state(TRACE_USB_OHCI_TD_PKT_SHORT);
    bool printall = !!trace_event_get_state(TRACE_USB_OHCI_TD_PKT_FULL);
    const int width = 16;
    int i;
    char tmp[3 * width + 1];
    char *p = tmp;

    if (!printall && !print16) {
        return;
    }

    for (i = 0; ; i++) {
        if (i && (!(i % width) || (i == len))) {
            if (!printall) {
                trace_usb_ohci_td_pkt_short(msg, tmp);
                break;
            }
            trace_usb_ohci_td_pkt_full(msg, tmp);
            p = tmp;
            *p = 0;
        }
        if (i == len) {
            break;
        }

        p += sprintf(p, " %.2x", buf[i]);
    }
}
#else
static void ohci_td_pkt(const char *msg, const uint8_t *buf, size_t len)
{
}
#endif

P
pbrook 已提交
972 973 974 975 976 977
/* 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;
978
    size_t len = 0, pktlen = 0;
979
    const char *str = NULL;
P
pbrook 已提交
980 981 982 983
    int pid;
    int ret;
    int i;
    USBDevice *dev;
984
    USBEndpoint *ep;
P
pbrook 已提交
985 986 987
    struct ohci_td td;
    uint32_t addr;
    int flag_r;
P
pbrook 已提交
988
    int completion;
P
pbrook 已提交
989 990

    addr = ed->head & OHCI_DPTR_MASK;
P
pbrook 已提交
991 992 993
    /* See if this TD has already been submitted to the device.  */
    completion = (addr == ohci->async_td);
    if (completion && !ohci->async_complete) {
994
        trace_usb_ohci_td_skip_async();
P
pbrook 已提交
995 996
        return 1;
    }
997
    if (ohci_read_td(ohci, addr, &td)) {
998
        trace_usb_ohci_td_read_error(addr);
999
        ohci_die(ohci);
P
pbrook 已提交
1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027
        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:
        str = "in";
        pid = USB_TOKEN_IN;
        break;
    case OHCI_TD_DIR_OUT:
        str = "out";
        pid = USB_TOKEN_OUT;
        break;
    case OHCI_TD_DIR_SETUP:
        str = "setup";
        pid = USB_TOKEN_SETUP;
        break;
    default:
1028
        trace_usb_ohci_td_bad_direction(dir);
P
pbrook 已提交
1029 1030 1031
        return 1;
    }
    if (td.cbp && td.be) {
P
pbrook 已提交
1032 1033 1034 1035 1036 1037
        if ((td.cbp & 0xfffff000) != (td.be & 0xfffff000)) {
            len = (td.be & 0xfff) + 0x1001 - (td.cbp & 0xfff);
        } else {
            len = (td.be - td.cbp) + 1;
        }

1038 1039 1040 1041 1042 1043 1044 1045
        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) {
1046 1047 1048 1049
                if (ohci_copy_td(ohci, &td, ohci->usb_buf, pktlen,
                                 DMA_DIRECTION_TO_DEVICE)) {
                    ohci_die(ohci);
                }
1050
            }
P
pbrook 已提交
1051 1052 1053 1054
        }
    }

    flag_r = (td.flags & OHCI_TD_R) != 0;
1055 1056 1057 1058
    trace_usb_ohci_td_pkt_hdr(addr, (int64_t)pktlen, (int64_t)len, str,
                              flag_r, td.cbp, td.be);
    ohci_td_pkt("OUT", ohci->usb_buf, pktlen);

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.
            */
1069
            trace_usb_ohci_td_too_many_pending();
1070
            return 1;
P
pbrook 已提交
1071
        }
1072 1073
        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 已提交
1074
        usb_packet_setup(&ohci->usb_packet, pid, ep, 0, addr, !flag_r,
1075
                         OHCI_BM(td.flags, TD_DI) == 0);
1076
        usb_packet_addbuf(&ohci->usb_packet, ohci->usb_buf, pktlen);
1077
        usb_handle_packet(dev, &ohci->usb_packet);
1078 1079
        trace_usb_ohci_td_packet_status(ohci->usb_packet.status);

1080
        if (ohci->usb_packet.status == USB_RET_ASYNC) {
1081
            usb_device_flush_ep_queue(dev, ep);
P
pbrook 已提交
1082 1083 1084 1085
            ohci->async_td = addr;
            return 1;
        }
    }
1086 1087 1088 1089 1090 1091
    if (ohci->usb_packet.status == USB_RET_SUCCESS) {
        ret = ohci->usb_packet.actual_length;
    } else {
        ret = ohci->usb_packet.status;
    }

P
pbrook 已提交
1092 1093
    if (ret >= 0) {
        if (dir == OHCI_TD_DIR_IN) {
1094 1095 1096 1097
            if (ohci_copy_td(ohci, &td, ohci->usb_buf, ret,
                             DMA_DIRECTION_FROM_DEVICE)) {
                ohci_die(ohci);
            }
1098
            ohci_td_pkt("IN", ohci->usb_buf, pktlen);
P
pbrook 已提交
1099
        } else {
1100
            ret = pktlen;
P
pbrook 已提交
1101 1102 1103 1104
        }
    }

    /* Writeback */
1105
    if (ret == pktlen || (dir == OHCI_TD_DIR_IN && ret >= 0 && flag_r)) {
P
pbrook 已提交
1106 1107 1108 1109 1110
        /* Transmission succeeded.  */
        if (ret == len) {
            td.cbp = 0;
        } else {
            if ((td.cbp & 0xfff) + ret > 0xfff) {
1111 1112 1113
                td.cbp = (td.be & ~0xfff) + ((td.cbp + ret) & 0xfff);
            } else {
                td.cbp += ret;
P
pbrook 已提交
1114 1115 1116 1117 1118 1119 1120
            }
        }
        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);

1121 1122 1123 1124 1125 1126
        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 已提交
1127 1128 1129 1130 1131
        ed->head &= ~OHCI_ED_C;
        if (td.flags & OHCI_TD_T0)
            ed->head |= OHCI_ED_C;
    } else {
        if (ret >= 0) {
1132
            trace_usb_ohci_td_underrun();
P
pbrook 已提交
1133 1134 1135
            OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_DATAUNDERRUN);
        } else {
            switch (ret) {
H
Hans de Goede 已提交
1136
            case USB_RET_IOERROR:
P
pbrook 已提交
1137
            case USB_RET_NODEV:
1138
                trace_usb_ohci_td_dev_error();
P
pbrook 已提交
1139
                OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_DEVICENOTRESPONDING);
1140
                break;
P
pbrook 已提交
1141
            case USB_RET_NAK:
1142
                trace_usb_ohci_td_nak();
P
pbrook 已提交
1143 1144
                return 1;
            case USB_RET_STALL:
1145
                trace_usb_ohci_td_stall();
P
pbrook 已提交
1146 1147 1148
                OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_STALL);
                break;
            case USB_RET_BABBLE:
1149
                trace_usb_ohci_td_babble();
P
pbrook 已提交
1150 1151 1152
                OHCI_SET_BM(td.flags, TD_CC, OHCI_CC_DATAOVERRUN);
                break;
            default:
1153
                trace_usb_ohci_td_bad_device_response(ret);
P
pbrook 已提交
1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169
                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;
1170
exit_no_retire:
1171 1172 1173 1174
    if (ohci_put_td(ohci, addr, &td)) {
        ohci_die(ohci);
        return 1;
    }
P
pbrook 已提交
1175 1176 1177 1178
    return OHCI_BM(td.flags, TD_CC) != OHCI_CC_NOERROR;
}

/* Service an endpoint list.  Returns nonzero if active TD were found.  */
1179
static int ohci_service_ed_list(OHCIState *ohci, uint32_t head, int completion)
P
pbrook 已提交
1180 1181 1182 1183 1184 1185 1186 1187 1188 1189 1190 1191
{
    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) {
1192
        if (ohci_read_ed(ohci, cur, &ed)) {
1193
            trace_usb_ohci_ed_read_error(cur);
1194
            ohci_die(ohci);
P
pbrook 已提交
1195 1196 1197 1198 1199
            return 0;
        }

        next_ed = ed.next & OHCI_DPTR_MASK;

P
pbrook 已提交
1200 1201 1202 1203 1204 1205 1206
        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;
1207 1208
                usb_device_ep_stopped(ohci->usb_packet.ep->dev,
                                      ohci->usb_packet.ep);
P
pbrook 已提交
1209
            }
P
pbrook 已提交
1210
            continue;
P
pbrook 已提交
1211
        }
P
pbrook 已提交
1212 1213

        while ((ed.head & OHCI_DPTR_MASK) != ed.tail) {
1214 1215 1216 1217
            trace_usb_ohci_ed_pkt(cur, (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);
            trace_usb_ohci_ed_pkt_flags(
P
pbrook 已提交
1218 1219 1220
                    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,
1221
                    OHCI_BM(ed.flags, ED_MPS));
1222

P
pbrook 已提交
1223 1224
            active = 1;

1225 1226 1227 1228 1229 1230 1231 1232
            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 已提交
1233 1234
        }

1235 1236 1237 1238
        if (ohci_put_ed(ohci, cur, &ed)) {
            ohci_die(ohci);
            return 0;
        }
P
pbrook 已提交
1239 1240 1241 1242 1243 1244 1245 1246
    }

    return active;
}

/* Generate a SOF event, and set a timer for EOF */
static void ohci_sof(OHCIState *ohci)
{
1247 1248
    ohci->sof_time = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
    timer_mod(ohci->eof_timer, ohci->sof_time + usb_frame_time);
P
pbrook 已提交
1249 1250 1251
    ohci_set_interrupt(ohci, OHCI_INTR_SF);
}

P
pbrook 已提交
1252
/* Process Control and Bulk lists.  */
1253
static void ohci_process_lists(OHCIState *ohci, int completion)
P
pbrook 已提交
1254 1255
{
    if ((ohci->ctl & OHCI_CTL_CLE) && (ohci->status & OHCI_STATUS_CLF)) {
1256
        if (ohci->ctrl_cur && ohci->ctrl_cur != ohci->ctrl_head) {
1257
            trace_usb_ohci_process_lists(ohci->ctrl_head, ohci->ctrl_cur);
1258
        }
1259
        if (!ohci_service_ed_list(ohci, ohci->ctrl_head, completion)) {
P
pbrook 已提交
1260 1261 1262 1263 1264 1265
            ohci->ctrl_cur = 0;
            ohci->status &= ~OHCI_STATUS_CLF;
        }
    }

    if ((ohci->ctl & OHCI_CTL_BLE) && (ohci->status & OHCI_STATUS_BLF)) {
1266
        if (!ohci_service_ed_list(ohci, ohci->bulk_head, completion)) {
P
pbrook 已提交
1267 1268 1269 1270 1271 1272
            ohci->bulk_cur = 0;
            ohci->status &= ~OHCI_STATUS_BLF;
        }
    }
}

P
pbrook 已提交
1273 1274 1275 1276 1277 1278
/* Do frame processing on frame boundary */
static void ohci_frame_boundary(void *opaque)
{
    OHCIState *ohci = opaque;
    struct ohci_hcca hcca;

1279
    if (ohci_read_hcca(ohci, ohci->hcca, &hcca)) {
1280
        trace_usb_ohci_hcca_read_error(ohci->hcca);
1281 1282 1283
        ohci_die(ohci);
        return;
    }
P
pbrook 已提交
1284 1285 1286 1287 1288 1289

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

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

P
pbrook 已提交
1293
    /* Cancel all pending packets if either of the lists has been disabled.  */
1294 1295 1296 1297 1298 1299
    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 已提交
1300
    }
P
pbrook 已提交
1301
    ohci->old_ctl = ohci->ctl;
1302
    ohci_process_lists(ohci, 0);
P
pbrook 已提交
1303

1304 1305 1306 1307 1308
    /* Stop if UnrecoverableError happened or ohci_sof will crash */
    if (ohci->intr_status & OHCI_INTR_UE) {
        return;
    }

P
pbrook 已提交
1309 1310 1311
    /* Frame boundary, so do EOF stuf here */
    ohci->frt = ohci->fit;

M
Michael Buesch 已提交
1312
    /* Increment frame number and take care of endianness. */
P
pbrook 已提交
1313
    ohci->frame_number = (ohci->frame_number + 1) & 0xffff;
M
Michael Buesch 已提交
1314
    hcca.frame = cpu_to_le16(ohci->frame_number);
P
pbrook 已提交
1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333

    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 */
1334 1335 1336
    if (ohci_put_hcca(ohci, ohci->hcca, &hcca)) {
        ohci_die(ohci);
    }
P
pbrook 已提交
1337 1338 1339 1340 1341 1342 1343
}

/* Start sending SOF tokens across the USB bus, lists are processed in
 * next frame
 */
static int ohci_bus_start(OHCIState *ohci)
{
1344
    ohci->eof_timer = timer_new_ns(QEMU_CLOCK_VIRTUAL,
P
pbrook 已提交
1345 1346 1347 1348
                    ohci_frame_boundary,
                    ohci);

    if (ohci->eof_timer == NULL) {
1349
        trace_usb_ohci_bus_eof_timer_failed(ohci->name);
1350
        ohci_die(ohci);
P
pbrook 已提交
1351 1352 1353
        return 0;
    }

1354
    trace_usb_ohci_start(ohci->name);
P
pbrook 已提交
1355 1356 1357 1358 1359 1360 1361 1362 1363

    ohci_sof(ohci);

    return 1;
}

/* Stop sending SOF tokens on the bus */
static void ohci_bus_stop(OHCIState *ohci)
{
1364
    trace_usb_ohci_stop(ohci->name);
1365
    if (ohci->eof_timer) {
1366
        timer_del(ohci->eof_timer);
1367 1368
        timer_free(ohci->eof_timer);
    }
1369
    ohci->eof_timer = NULL;
P
pbrook 已提交
1370 1371 1372 1373 1374 1375 1376 1377 1378 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
}

/* 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) {
1410
        trace_usb_ohci_set_frame_interval(ohci->name, ohci->fi, ohci->fi);
P
pbrook 已提交
1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441
    }

    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;

1442
    trace_usb_ohci_set_ctl(ohci->name, new_state);
P
pbrook 已提交
1443 1444 1445 1446 1447 1448 1449 1450
    switch (new_state) {
    case OHCI_USB_OPERATIONAL:
        ohci_bus_start(ohci);
        break;
    case OHCI_USB_SUSPEND:
        ohci_bus_stop(ohci);
        break;
    case OHCI_USB_RESUME:
1451
        trace_usb_ohci_resume(ohci->name);
P
pbrook 已提交
1452 1453
        break;
    case OHCI_USB_RESET:
1454
        ohci_roothub_reset(ohci);
P
pbrook 已提交
1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469
        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.
     */
1470
    tks = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) - ohci->sof_time;
P
pbrook 已提交
1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498

    /* 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);
1499
        trace_usb_ohci_hub_power_down();
P
pbrook 已提交
1500 1501 1502 1503 1504 1505 1506
    }

    if (val & OHCI_RHS_LPSC) {
        int i;

        for (i = 0; i < ohci->num_ports; i++)
            ohci_port_power(ohci, i, 1);
1507
        trace_usb_ohci_hub_power_up();
P
pbrook 已提交
1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537
    }

    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);

1538
    if (ohci_port_set_if_connected(ohci, portnum, val & OHCI_PORT_PSS)) {
1539
        trace_usb_ohci_port_suspend(portnum);
1540
    }
P
pbrook 已提交
1541 1542

    if (ohci_port_set_if_connected(ohci, portnum, val & OHCI_PORT_PRS)) {
1543
        trace_usb_ohci_port_reset(portnum);
G
Gerd Hoffmann 已提交
1544
        usb_device_reset(port->port.dev);
P
pbrook 已提交
1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561
        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 已提交
1562
static uint64_t ohci_mem_read(void *opaque,
A
Avi Kivity 已提交
1563
                              hwaddr addr,
A
Avi Kivity 已提交
1564
                              unsigned size)
P
pbrook 已提交
1565
{
A
Avi Kivity 已提交
1566
    OHCIState *ohci = opaque;
1567
    uint32_t retval;
P
pbrook 已提交
1568 1569 1570

    /* Only aligned reads are allowed on OHCI */
    if (addr & 3) {
1571
        trace_usb_ohci_mem_read_unaligned(addr);
P
pbrook 已提交
1572
        return 0xffffffff;
1573
    } else if (addr >= 0x54 && addr < 0x54 + ohci->num_ports * 4) {
P
pbrook 已提交
1574
        /* HcRhPortStatus */
1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 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
        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:
1677
            trace_usb_ohci_mem_read_bad_offset(addr);
1678 1679
            retval = 0xffffffff;
        }
P
pbrook 已提交
1680 1681
    }

1682
    return retval;
P
pbrook 已提交
1683 1684
}

A
Avi Kivity 已提交
1685
static void ohci_mem_write(void *opaque,
A
Avi Kivity 已提交
1686
                           hwaddr addr,
A
Avi Kivity 已提交
1687 1688
                           uint64_t val,
                           unsigned size)
P
pbrook 已提交
1689
{
A
Avi Kivity 已提交
1690
    OHCIState *ohci = opaque;
P
Paul Brook 已提交
1691

P
pbrook 已提交
1692 1693
    /* Only aligned reads are allowed on OHCI */
    if (addr & 3) {
1694
        trace_usb_ohci_mem_write_unaligned(addr);
P
pbrook 已提交
1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716
        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)
1717
            ohci_hard_reset(ohci);
P
pbrook 已提交
1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738
        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;

1739 1740 1741 1742
    case 7: /* HcPeriodCurrentED */
        /* Ignore writes to this read-only register, Linux does them */
        break;

P
pbrook 已提交
1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764
    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;

1765 1766 1767
    case 15: /* HcFmNumber */
        break;

P
pbrook 已提交
1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787
    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;

1788 1789 1790
    /* PXA27x specific registers */
    case 24: /* HcStatus */
        ohci->hstatus &= ~(val & ohci->hmask);
G
Gerd Hoffmann 已提交
1791
        break;
1792 1793 1794 1795

    case 25: /* HcHReset */
        ohci->hreset = val & ~OHCI_HRESET_FSBIR;
        if (val & OHCI_HRESET_FSBIR)
1796
            ohci_hard_reset(ohci);
1797 1798 1799 1800 1801 1802 1803 1804 1805 1806
        break;

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

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

P
pbrook 已提交
1807
    default:
1808
        trace_usb_ohci_mem_write_bad_offset(addr);
P
pbrook 已提交
1809 1810 1811 1812
        break;
    }
}

1813
static void ohci_async_cancel_device(OHCIState *ohci, USBDevice *dev)
1814
{
1815
    if (ohci->async_td &&
1816 1817
        usb_packet_is_inflight(&ohci->usb_packet) &&
        ohci->usb_packet.ep->dev == dev) {
1818 1819 1820 1821 1822
        usb_cancel_packet(&ohci->usb_packet);
        ohci->async_td = 0;
    }
}

A
Avi Kivity 已提交
1823 1824 1825 1826
static const MemoryRegionOps ohci_mem_ops = {
    .read = ohci_mem_read,
    .write = ohci_mem_write,
    .endianness = DEVICE_LITTLE_ENDIAN,
P
pbrook 已提交
1827 1828
};

1829 1830
static USBPortOps ohci_port_ops = {
    .attach = ohci_attach,
1831
    .detach = ohci_detach,
1832
    .child_detach = ohci_child_detach,
1833
    .wakeup = ohci_wakeup,
1834
    .complete = ohci_async_complete_packet,
1835 1836
};

1837 1838 1839
static USBBusOps ohci_bus_ops = {
};

1840 1841 1842 1843
static void usb_ohci_init(OHCIState *ohci, DeviceState *dev,
                          int num_ports, dma_addr_t localmem_base,
                          char *masterbus, uint32_t firstport,
                          AddressSpace *as, Error **errp)
P
pbrook 已提交
1844
{
1845
    Error *err = NULL;
P
pbrook 已提交
1846 1847
    int i;

P
Paolo Bonzini 已提交
1848
    ohci->as = as;
1849

P
pbrook 已提交
1850
    if (usb_frame_time == 0) {
1851
#ifdef OHCI_TIME_WARP
1852 1853
        usb_frame_time = get_ticks_per_sec();
        usb_bit_time = muldiv64(1, get_ticks_per_sec(), USB_HZ/1000);
P
pbrook 已提交
1854
#else
1855 1856 1857
        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 已提交
1858 1859 1860 1861
        } else {
            usb_bit_time = 1;
        }
#endif
1862
        trace_usb_ohci_init_time(usb_frame_time, usb_bit_time);
P
pbrook 已提交
1863 1864
    }

1865 1866 1867 1868 1869 1870
    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;
        }
1871 1872 1873 1874 1875
        usb_register_companion(masterbus, ports, num_ports,
                               firstport, ohci, &ohci_port_ops,
                               USB_SPEED_MASK_LOW | USB_SPEED_MASK_FULL,
                               &err);
        if (err) {
1876 1877
            error_propagate(errp, err);
            return;
1878 1879
        }
    } else {
1880
        usb_bus_new(&ohci->bus, sizeof(ohci->bus), &ohci_bus_ops, dev);
1881 1882 1883 1884 1885 1886 1887
        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);
        }
    }

1888 1889
    memory_region_init_io(&ohci->mem, OBJECT(dev), &ohci_mem_ops,
                          ohci, "ohci", 256);
A
aurel32 已提交
1890
    ohci->localmem_base = localmem_base;
1891

1892
    ohci->name = object_get_typename(OBJECT(dev));
G
Gerd Hoffmann 已提交
1893
    usb_packet_init(&ohci->usb_packet);
1894 1895 1896 1897

    ohci->async_td = 0;
}

H
Hu Tao 已提交
1898 1899 1900
#define TYPE_PCI_OHCI "pci-ohci"
#define PCI_OHCI(obj) OBJECT_CHECK(OHCIPCIState, (obj), TYPE_PCI_OHCI)

1901
typedef struct {
H
Hu Tao 已提交
1902 1903 1904 1905
    /*< private >*/
    PCIDevice parent_obj;
    /*< public >*/

1906
    OHCIState state;
1907 1908 1909
    char *masterbus;
    uint32_t num_ports;
    uint32_t firstport;
1910 1911
} OHCIPCIState;

1912 1913 1914 1915 1916 1917 1918 1919
/** 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);

1920
    trace_usb_ohci_die();
1921 1922 1923 1924 1925 1926 1927

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

1928
static void usb_ohci_realize_pci(PCIDevice *dev, Error **errp)
1929
{
1930
    Error *err = NULL;
H
Hu Tao 已提交
1931
    OHCIPCIState *ohci = PCI_OHCI(dev);
P
pbrook 已提交
1932

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

1936 1937 1938 1939 1940 1941
    usb_ohci_init(&ohci->state, DEVICE(dev), ohci->num_ports, 0,
                  ohci->masterbus, ohci->firstport,
                  pci_get_address_space(dev), &err);
    if (err) {
        error_propagate(errp, err);
        return;
1942
    }
P
pbrook 已提交
1943

1944
    ohci->state.irq = pci_allocate_irq(dev);
H
Hu Tao 已提交
1945
    pci_register_bar(dev, 0, 0, &ohci->state.mem);
G
Gerd Hoffmann 已提交
1946 1947
}

G
Gonglei 已提交
1948 1949 1950 1951 1952
static void usb_ohci_exit(PCIDevice *dev)
{
    OHCIPCIState *ohci = PCI_OHCI(dev);
    OHCIState *s = &ohci->state;

1953
    trace_usb_ohci_exit(s->name);
G
Gonglei 已提交
1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966
    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);
    }
}

G
Gonglei 已提交
1967 1968 1969 1970 1971 1972
static void usb_ohci_reset_pci(DeviceState *d)
{
    PCIDevice *dev = PCI_DEVICE(d);
    OHCIPCIState *ohci = PCI_OHCI(dev);
    OHCIState *s = &ohci->state;

1973
    ohci_hard_reset(s);
G
Gonglei 已提交
1974 1975
}

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

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

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

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

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

G
Gonglei 已提交
2001 2002 2003 2004 2005
static void usb_ohci_reset_sysbus(DeviceState *dev)
{
    OHCISysBusState *s = SYSBUS_OHCI(dev);
    OHCIState *ohci = &s->ohci;

2006
    ohci_hard_reset(ohci);
G
Gonglei 已提交
2007 2008
}

2009 2010 2011 2012 2013 2014 2015
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(),
};

2016 2017 2018 2019
static const VMStateDescription vmstate_ohci_state_port = {
    .name = "ohci-core/port",
    .version_id = 1,
    .minimum_version_id = 1,
2020
    .fields = (VMStateField[]) {
2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046
        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,
2047
    .needed = ohci_eof_timer_needed,
2048
    .fields = (VMStateField[]) {
2049
        VMSTATE_TIMER_PTR(eof_timer, OHCIState),
2050 2051 2052 2053
        VMSTATE_END_OF_LIST()
    },
};

2054
static const VMStateDescription vmstate_ohci_state = {
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
    .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()
    },
2095 2096 2097
    .subsections = (const VMStateDescription*[]) {
        &vmstate_ohci_eof_timer,
        NULL
2098 2099 2100 2101 2102 2103 2104 2105 2106 2107 2108 2109 2110 2111
    }
};

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()
    }
};

2112 2113
static void ohci_pci_class_init(ObjectClass *klass, void *data)
{
2114
    DeviceClass *dc = DEVICE_CLASS(klass);
2115 2116
    PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);

2117
    k->realize = usb_ohci_realize_pci;
G
Gonglei 已提交
2118
    k->exit = usb_ohci_exit;
2119 2120 2121
    k->vendor_id = PCI_VENDOR_ID_APPLE;
    k->device_id = PCI_DEVICE_ID_APPLE_IPID_USB;
    k->class_id = PCI_CLASS_SERIAL_USB;
2122
    set_bit(DEVICE_CATEGORY_USB, dc->categories);
2123 2124
    dc->desc = "Apple USB Controller";
    dc->props = ohci_pci_properties;
2125
    dc->hotpluggable = false;
2126
    dc->vmsd = &vmstate_ohci;
G
Gonglei 已提交
2127
    dc->reset = usb_ohci_reset_pci;
2128 2129
}

2130
static const TypeInfo ohci_pci_info = {
H
Hu Tao 已提交
2131
    .name          = TYPE_PCI_OHCI,
2132 2133 2134 2135 2136 2137 2138
    .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),
2139
    DEFINE_PROP_DMAADDR("dma-offset", OHCISysBusState, dma_offset, 3),
2140
    DEFINE_PROP_END_OF_LIST(),
G
Gerd Hoffmann 已提交
2141 2142
};

2143 2144
static void ohci_sysbus_class_init(ObjectClass *klass, void *data)
{
2145
    DeviceClass *dc = DEVICE_CLASS(klass);
2146

H
Hu Tao 已提交
2147
    dc->realize = ohci_realize_pxa;
2148
    set_bit(DEVICE_CATEGORY_USB, dc->categories);
2149 2150
    dc->desc = "OHCI USB Controller";
    dc->props = ohci_sysbus_properties;
G
Gonglei 已提交
2151
    dc->reset = usb_ohci_reset_sysbus;
2152 2153
}

2154
static const TypeInfo ohci_sysbus_info = {
H
Hu Tao 已提交
2155
    .name          = TYPE_SYSBUS_OHCI,
2156 2157 2158
    .parent        = TYPE_SYS_BUS_DEVICE,
    .instance_size = sizeof(OHCISysBusState),
    .class_init    = ohci_sysbus_class_init,
P
Paul Brook 已提交
2159 2160
};

A
Andreas Färber 已提交
2161
static void ohci_register_types(void)
G
Gerd Hoffmann 已提交
2162
{
2163 2164
    type_register_static(&ohci_pci_info);
    type_register_static(&ohci_sysbus_info);
G
Gerd Hoffmann 已提交
2165
}
A
Andreas Färber 已提交
2166 2167

type_init(ohci_register_types)