1 /* 2 * "Inventra" High-speed Dual-Role Controller (MUSB-HDRC), Mentor Graphics, 3 * USB2.0 OTG compliant core used in various chips. 4 * 5 * Copyright (C) 2008 Nokia Corporation 6 * Written by Andrzej Zaborowski <andrew@openedhand.com> 7 * 8 * This program is free software; you can redistribute it and/or 9 * modify it under the terms of the GNU General Public License as 10 * published by the Free Software Foundation; either version 2 or 11 * (at your option) version 3 of the License. 12 * 13 * This program is distributed in the hope that it will be useful, 14 * but WITHOUT ANY WARRANTY; without even the implied warranty of 15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 16 * GNU General Public License for more details. 17 * 18 * You should have received a copy of the GNU General Public License along 19 * with this program; if not, see <http://www.gnu.org/licenses/>. 20 * 21 * Only host-mode and non-DMA accesses are currently supported. 22 */ 23 #include "qemu/osdep.h" 24 #include "qemu-common.h" 25 #include "qemu/timer.h" 26 #include "hw/usb.h" 27 #include "hw/irq.h" 28 #include "hw/hw.h" 29 30 /* Common USB registers */ 31 #define MUSB_HDRC_FADDR 0x00 /* 8-bit */ 32 #define MUSB_HDRC_POWER 0x01 /* 8-bit */ 33 34 #define MUSB_HDRC_INTRTX 0x02 /* 16-bit */ 35 #define MUSB_HDRC_INTRRX 0x04 36 #define MUSB_HDRC_INTRTXE 0x06 37 #define MUSB_HDRC_INTRRXE 0x08 38 #define MUSB_HDRC_INTRUSB 0x0a /* 8 bit */ 39 #define MUSB_HDRC_INTRUSBE 0x0b /* 8 bit */ 40 #define MUSB_HDRC_FRAME 0x0c /* 16-bit */ 41 #define MUSB_HDRC_INDEX 0x0e /* 8 bit */ 42 #define MUSB_HDRC_TESTMODE 0x0f /* 8 bit */ 43 44 /* Per-EP registers in indexed mode */ 45 #define MUSB_HDRC_EP_IDX 0x10 /* 8-bit */ 46 47 /* EP FIFOs */ 48 #define MUSB_HDRC_FIFO 0x20 49 50 /* Additional Control Registers */ 51 #define MUSB_HDRC_DEVCTL 0x60 /* 8 bit */ 52 53 /* These are indexed */ 54 #define MUSB_HDRC_TXFIFOSZ 0x62 /* 8 bit (see masks) */ 55 #define MUSB_HDRC_RXFIFOSZ 0x63 /* 8 bit (see masks) */ 56 #define MUSB_HDRC_TXFIFOADDR 0x64 /* 16 bit offset shifted right 3 */ 57 #define MUSB_HDRC_RXFIFOADDR 0x66 /* 16 bit offset shifted right 3 */ 58 59 /* Some more registers */ 60 #define MUSB_HDRC_VCTRL 0x68 /* 8 bit */ 61 #define MUSB_HDRC_HWVERS 0x6c /* 8 bit */ 62 63 /* Added in HDRC 1.9(?) & MHDRC 1.4 */ 64 /* ULPI pass-through */ 65 #define MUSB_HDRC_ULPI_VBUSCTL 0x70 66 #define MUSB_HDRC_ULPI_REGDATA 0x74 67 #define MUSB_HDRC_ULPI_REGADDR 0x75 68 #define MUSB_HDRC_ULPI_REGCTL 0x76 69 70 /* Extended config & PHY control */ 71 #define MUSB_HDRC_ENDCOUNT 0x78 /* 8 bit */ 72 #define MUSB_HDRC_DMARAMCFG 0x79 /* 8 bit */ 73 #define MUSB_HDRC_PHYWAIT 0x7a /* 8 bit */ 74 #define MUSB_HDRC_PHYVPLEN 0x7b /* 8 bit */ 75 #define MUSB_HDRC_HS_EOF1 0x7c /* 8 bit, units of 546.1 us */ 76 #define MUSB_HDRC_FS_EOF1 0x7d /* 8 bit, units of 533.3 ns */ 77 #define MUSB_HDRC_LS_EOF1 0x7e /* 8 bit, units of 1.067 us */ 78 79 /* Per-EP BUSCTL registers */ 80 #define MUSB_HDRC_BUSCTL 0x80 81 82 /* Per-EP registers in flat mode */ 83 #define MUSB_HDRC_EP 0x100 84 85 /* offsets to registers in flat model */ 86 #define MUSB_HDRC_TXMAXP 0x00 /* 16 bit apparently */ 87 #define MUSB_HDRC_TXCSR 0x02 /* 16 bit apparently */ 88 #define MUSB_HDRC_CSR0 MUSB_HDRC_TXCSR /* re-used for EP0 */ 89 #define MUSB_HDRC_RXMAXP 0x04 /* 16 bit apparently */ 90 #define MUSB_HDRC_RXCSR 0x06 /* 16 bit apparently */ 91 #define MUSB_HDRC_RXCOUNT 0x08 /* 16 bit apparently */ 92 #define MUSB_HDRC_COUNT0 MUSB_HDRC_RXCOUNT /* re-used for EP0 */ 93 #define MUSB_HDRC_TXTYPE 0x0a /* 8 bit apparently */ 94 #define MUSB_HDRC_TYPE0 MUSB_HDRC_TXTYPE /* re-used for EP0 */ 95 #define MUSB_HDRC_TXINTERVAL 0x0b /* 8 bit apparently */ 96 #define MUSB_HDRC_NAKLIMIT0 MUSB_HDRC_TXINTERVAL /* re-used for EP0 */ 97 #define MUSB_HDRC_RXTYPE 0x0c /* 8 bit apparently */ 98 #define MUSB_HDRC_RXINTERVAL 0x0d /* 8 bit apparently */ 99 #define MUSB_HDRC_FIFOSIZE 0x0f /* 8 bit apparently */ 100 #define MUSB_HDRC_CONFIGDATA MGC_O_HDRC_FIFOSIZE /* re-used for EP0 */ 101 102 /* "Bus control" registers */ 103 #define MUSB_HDRC_TXFUNCADDR 0x00 104 #define MUSB_HDRC_TXHUBADDR 0x02 105 #define MUSB_HDRC_TXHUBPORT 0x03 106 107 #define MUSB_HDRC_RXFUNCADDR 0x04 108 #define MUSB_HDRC_RXHUBADDR 0x06 109 #define MUSB_HDRC_RXHUBPORT 0x07 110 111 /* 112 * MUSBHDRC Register bit masks 113 */ 114 115 /* POWER */ 116 #define MGC_M_POWER_ISOUPDATE 0x80 117 #define MGC_M_POWER_SOFTCONN 0x40 118 #define MGC_M_POWER_HSENAB 0x20 119 #define MGC_M_POWER_HSMODE 0x10 120 #define MGC_M_POWER_RESET 0x08 121 #define MGC_M_POWER_RESUME 0x04 122 #define MGC_M_POWER_SUSPENDM 0x02 123 #define MGC_M_POWER_ENSUSPEND 0x01 124 125 /* INTRUSB */ 126 #define MGC_M_INTR_SUSPEND 0x01 127 #define MGC_M_INTR_RESUME 0x02 128 #define MGC_M_INTR_RESET 0x04 129 #define MGC_M_INTR_BABBLE 0x04 130 #define MGC_M_INTR_SOF 0x08 131 #define MGC_M_INTR_CONNECT 0x10 132 #define MGC_M_INTR_DISCONNECT 0x20 133 #define MGC_M_INTR_SESSREQ 0x40 134 #define MGC_M_INTR_VBUSERROR 0x80 /* FOR SESSION END */ 135 #define MGC_M_INTR_EP0 0x01 /* FOR EP0 INTERRUPT */ 136 137 /* DEVCTL */ 138 #define MGC_M_DEVCTL_BDEVICE 0x80 139 #define MGC_M_DEVCTL_FSDEV 0x40 140 #define MGC_M_DEVCTL_LSDEV 0x20 141 #define MGC_M_DEVCTL_VBUS 0x18 142 #define MGC_S_DEVCTL_VBUS 3 143 #define MGC_M_DEVCTL_HM 0x04 144 #define MGC_M_DEVCTL_HR 0x02 145 #define MGC_M_DEVCTL_SESSION 0x01 146 147 /* TESTMODE */ 148 #define MGC_M_TEST_FORCE_HOST 0x80 149 #define MGC_M_TEST_FIFO_ACCESS 0x40 150 #define MGC_M_TEST_FORCE_FS 0x20 151 #define MGC_M_TEST_FORCE_HS 0x10 152 #define MGC_M_TEST_PACKET 0x08 153 #define MGC_M_TEST_K 0x04 154 #define MGC_M_TEST_J 0x02 155 #define MGC_M_TEST_SE0_NAK 0x01 156 157 /* CSR0 */ 158 #define MGC_M_CSR0_FLUSHFIFO 0x0100 159 #define MGC_M_CSR0_TXPKTRDY 0x0002 160 #define MGC_M_CSR0_RXPKTRDY 0x0001 161 162 /* CSR0 in Peripheral mode */ 163 #define MGC_M_CSR0_P_SVDSETUPEND 0x0080 164 #define MGC_M_CSR0_P_SVDRXPKTRDY 0x0040 165 #define MGC_M_CSR0_P_SENDSTALL 0x0020 166 #define MGC_M_CSR0_P_SETUPEND 0x0010 167 #define MGC_M_CSR0_P_DATAEND 0x0008 168 #define MGC_M_CSR0_P_SENTSTALL 0x0004 169 170 /* CSR0 in Host mode */ 171 #define MGC_M_CSR0_H_NO_PING 0x0800 172 #define MGC_M_CSR0_H_WR_DATATOGGLE 0x0400 /* set to allow setting: */ 173 #define MGC_M_CSR0_H_DATATOGGLE 0x0200 /* data toggle control */ 174 #define MGC_M_CSR0_H_NAKTIMEOUT 0x0080 175 #define MGC_M_CSR0_H_STATUSPKT 0x0040 176 #define MGC_M_CSR0_H_REQPKT 0x0020 177 #define MGC_M_CSR0_H_ERROR 0x0010 178 #define MGC_M_CSR0_H_SETUPPKT 0x0008 179 #define MGC_M_CSR0_H_RXSTALL 0x0004 180 181 /* CONFIGDATA */ 182 #define MGC_M_CONFIGDATA_MPRXE 0x80 /* auto bulk pkt combining */ 183 #define MGC_M_CONFIGDATA_MPTXE 0x40 /* auto bulk pkt splitting */ 184 #define MGC_M_CONFIGDATA_BIGENDIAN 0x20 185 #define MGC_M_CONFIGDATA_HBRXE 0x10 /* HB-ISO for RX */ 186 #define MGC_M_CONFIGDATA_HBTXE 0x08 /* HB-ISO for TX */ 187 #define MGC_M_CONFIGDATA_DYNFIFO 0x04 /* dynamic FIFO sizing */ 188 #define MGC_M_CONFIGDATA_SOFTCONE 0x02 /* SoftConnect */ 189 #define MGC_M_CONFIGDATA_UTMIDW 0x01 /* Width, 0 => 8b, 1 => 16b */ 190 191 /* TXCSR in Peripheral and Host mode */ 192 #define MGC_M_TXCSR_AUTOSET 0x8000 193 #define MGC_M_TXCSR_ISO 0x4000 194 #define MGC_M_TXCSR_MODE 0x2000 195 #define MGC_M_TXCSR_DMAENAB 0x1000 196 #define MGC_M_TXCSR_FRCDATATOG 0x0800 197 #define MGC_M_TXCSR_DMAMODE 0x0400 198 #define MGC_M_TXCSR_CLRDATATOG 0x0040 199 #define MGC_M_TXCSR_FLUSHFIFO 0x0008 200 #define MGC_M_TXCSR_FIFONOTEMPTY 0x0002 201 #define MGC_M_TXCSR_TXPKTRDY 0x0001 202 203 /* TXCSR in Peripheral mode */ 204 #define MGC_M_TXCSR_P_INCOMPTX 0x0080 205 #define MGC_M_TXCSR_P_SENTSTALL 0x0020 206 #define MGC_M_TXCSR_P_SENDSTALL 0x0010 207 #define MGC_M_TXCSR_P_UNDERRUN 0x0004 208 209 /* TXCSR in Host mode */ 210 #define MGC_M_TXCSR_H_WR_DATATOGGLE 0x0200 211 #define MGC_M_TXCSR_H_DATATOGGLE 0x0100 212 #define MGC_M_TXCSR_H_NAKTIMEOUT 0x0080 213 #define MGC_M_TXCSR_H_RXSTALL 0x0020 214 #define MGC_M_TXCSR_H_ERROR 0x0004 215 216 /* RXCSR in Peripheral and Host mode */ 217 #define MGC_M_RXCSR_AUTOCLEAR 0x8000 218 #define MGC_M_RXCSR_DMAENAB 0x2000 219 #define MGC_M_RXCSR_DISNYET 0x1000 220 #define MGC_M_RXCSR_DMAMODE 0x0800 221 #define MGC_M_RXCSR_INCOMPRX 0x0100 222 #define MGC_M_RXCSR_CLRDATATOG 0x0080 223 #define MGC_M_RXCSR_FLUSHFIFO 0x0010 224 #define MGC_M_RXCSR_DATAERROR 0x0008 225 #define MGC_M_RXCSR_FIFOFULL 0x0002 226 #define MGC_M_RXCSR_RXPKTRDY 0x0001 227 228 /* RXCSR in Peripheral mode */ 229 #define MGC_M_RXCSR_P_ISO 0x4000 230 #define MGC_M_RXCSR_P_SENTSTALL 0x0040 231 #define MGC_M_RXCSR_P_SENDSTALL 0x0020 232 #define MGC_M_RXCSR_P_OVERRUN 0x0004 233 234 /* RXCSR in Host mode */ 235 #define MGC_M_RXCSR_H_AUTOREQ 0x4000 236 #define MGC_M_RXCSR_H_WR_DATATOGGLE 0x0400 237 #define MGC_M_RXCSR_H_DATATOGGLE 0x0200 238 #define MGC_M_RXCSR_H_RXSTALL 0x0040 239 #define MGC_M_RXCSR_H_REQPKT 0x0020 240 #define MGC_M_RXCSR_H_ERROR 0x0004 241 242 /* HUBADDR */ 243 #define MGC_M_HUBADDR_MULTI_TT 0x80 244 245 /* ULPI: Added in HDRC 1.9(?) & MHDRC 1.4 */ 246 #define MGC_M_ULPI_VBCTL_USEEXTVBUSIND 0x02 247 #define MGC_M_ULPI_VBCTL_USEEXTVBUS 0x01 248 #define MGC_M_ULPI_REGCTL_INT_ENABLE 0x08 249 #define MGC_M_ULPI_REGCTL_READNOTWRITE 0x04 250 #define MGC_M_ULPI_REGCTL_COMPLETE 0x02 251 #define MGC_M_ULPI_REGCTL_REG 0x01 252 253 /* #define MUSB_DEBUG */ 254 255 #ifdef MUSB_DEBUG 256 #define TRACE(fmt,...) fprintf(stderr, "%s@%d: " fmt "\n", __FUNCTION__, \ 257 __LINE__, ##__VA_ARGS__) 258 #else 259 #define TRACE(...) 260 #endif 261 262 263 static void musb_attach(USBPort *port); 264 static void musb_detach(USBPort *port); 265 static void musb_child_detach(USBPort *port, USBDevice *child); 266 static void musb_schedule_cb(USBPort *port, USBPacket *p); 267 static void musb_async_cancel_device(MUSBState *s, USBDevice *dev); 268 269 static USBPortOps musb_port_ops = { 270 .attach = musb_attach, 271 .detach = musb_detach, 272 .child_detach = musb_child_detach, 273 .complete = musb_schedule_cb, 274 }; 275 276 static USBBusOps musb_bus_ops = { 277 }; 278 279 typedef struct MUSBPacket MUSBPacket; 280 typedef struct MUSBEndPoint MUSBEndPoint; 281 282 struct MUSBPacket { 283 USBPacket p; 284 MUSBEndPoint *ep; 285 int dir; 286 }; 287 288 struct MUSBEndPoint { 289 uint16_t faddr[2]; 290 uint8_t haddr[2]; 291 uint8_t hport[2]; 292 uint16_t csr[2]; 293 uint16_t maxp[2]; 294 uint16_t rxcount; 295 uint8_t type[2]; 296 uint8_t interval[2]; 297 uint8_t config; 298 uint8_t fifosize; 299 int timeout[2]; /* Always in microframes */ 300 301 uint8_t *buf[2]; 302 int fifolen[2]; 303 int fifostart[2]; 304 int fifoaddr[2]; 305 MUSBPacket packey[2]; 306 int status[2]; 307 int ext_size[2]; 308 309 /* For callbacks' use */ 310 int epnum; 311 int interrupt[2]; 312 MUSBState *musb; 313 USBCallback *delayed_cb[2]; 314 QEMUTimer *intv_timer[2]; 315 }; 316 317 struct MUSBState { 318 qemu_irq irqs[musb_irq_max]; 319 USBBus bus; 320 USBPort port; 321 322 int idx; 323 uint8_t devctl; 324 uint8_t power; 325 uint8_t faddr; 326 327 uint8_t intr; 328 uint8_t mask; 329 uint16_t tx_intr; 330 uint16_t tx_mask; 331 uint16_t rx_intr; 332 uint16_t rx_mask; 333 334 int setup_len; 335 int session; 336 337 uint8_t buf[0x8000]; 338 339 /* Duplicating the world since 2008!... probably we should have 32 340 * logical, single endpoints instead. */ 341 MUSBEndPoint ep[16]; 342 }; 343 344 void musb_reset(MUSBState *s) 345 { 346 int i; 347 348 s->faddr = 0x00; 349 s->devctl = 0; 350 s->power = MGC_M_POWER_HSENAB; 351 s->tx_intr = 0x0000; 352 s->rx_intr = 0x0000; 353 s->tx_mask = 0xffff; 354 s->rx_mask = 0xffff; 355 s->intr = 0x00; 356 s->mask = 0x06; 357 s->idx = 0; 358 359 s->setup_len = 0; 360 s->session = 0; 361 memset(s->buf, 0, sizeof(s->buf)); 362 363 /* TODO: _DW */ 364 s->ep[0].config = MGC_M_CONFIGDATA_SOFTCONE | MGC_M_CONFIGDATA_DYNFIFO; 365 for (i = 0; i < 16; i ++) { 366 s->ep[i].fifosize = 64; 367 s->ep[i].maxp[0] = 0x40; 368 s->ep[i].maxp[1] = 0x40; 369 s->ep[i].musb = s; 370 s->ep[i].epnum = i; 371 usb_packet_init(&s->ep[i].packey[0].p); 372 usb_packet_init(&s->ep[i].packey[1].p); 373 } 374 } 375 376 struct MUSBState *musb_init(DeviceState *parent_device, int gpio_base) 377 { 378 MUSBState *s = g_malloc0(sizeof(*s)); 379 int i; 380 381 for (i = 0; i < musb_irq_max; i++) { 382 s->irqs[i] = qdev_get_gpio_in(parent_device, gpio_base + i); 383 } 384 385 musb_reset(s); 386 387 usb_bus_new(&s->bus, sizeof(s->bus), &musb_bus_ops, parent_device); 388 usb_register_port(&s->bus, &s->port, s, 0, &musb_port_ops, 389 USB_SPEED_MASK_LOW | USB_SPEED_MASK_FULL); 390 391 return s; 392 } 393 394 static void musb_vbus_set(MUSBState *s, int level) 395 { 396 if (level) 397 s->devctl |= 3 << MGC_S_DEVCTL_VBUS; 398 else 399 s->devctl &= ~MGC_M_DEVCTL_VBUS; 400 401 qemu_set_irq(s->irqs[musb_set_vbus], level); 402 } 403 404 static void musb_intr_set(MUSBState *s, int line, int level) 405 { 406 if (!level) { 407 s->intr &= ~(1 << line); 408 qemu_irq_lower(s->irqs[line]); 409 } else if (s->mask & (1 << line)) { 410 s->intr |= 1 << line; 411 qemu_irq_raise(s->irqs[line]); 412 } 413 } 414 415 static void musb_tx_intr_set(MUSBState *s, int line, int level) 416 { 417 if (!level) { 418 s->tx_intr &= ~(1 << line); 419 if (!s->tx_intr) 420 qemu_irq_lower(s->irqs[musb_irq_tx]); 421 } else if (s->tx_mask & (1 << line)) { 422 s->tx_intr |= 1 << line; 423 qemu_irq_raise(s->irqs[musb_irq_tx]); 424 } 425 } 426 427 static void musb_rx_intr_set(MUSBState *s, int line, int level) 428 { 429 if (line) { 430 if (!level) { 431 s->rx_intr &= ~(1 << line); 432 if (!s->rx_intr) 433 qemu_irq_lower(s->irqs[musb_irq_rx]); 434 } else if (s->rx_mask & (1 << line)) { 435 s->rx_intr |= 1 << line; 436 qemu_irq_raise(s->irqs[musb_irq_rx]); 437 } 438 } else 439 musb_tx_intr_set(s, line, level); 440 } 441 442 uint32_t musb_core_intr_get(MUSBState *s) 443 { 444 return (s->rx_intr << 15) | s->tx_intr; 445 } 446 447 void musb_core_intr_clear(MUSBState *s, uint32_t mask) 448 { 449 if (s->rx_intr) { 450 s->rx_intr &= mask >> 15; 451 if (!s->rx_intr) 452 qemu_irq_lower(s->irqs[musb_irq_rx]); 453 } 454 455 if (s->tx_intr) { 456 s->tx_intr &= mask & 0xffff; 457 if (!s->tx_intr) 458 qemu_irq_lower(s->irqs[musb_irq_tx]); 459 } 460 } 461 462 void musb_set_size(MUSBState *s, int epnum, int size, int is_tx) 463 { 464 s->ep[epnum].ext_size[!is_tx] = size; 465 s->ep[epnum].fifostart[0] = 0; 466 s->ep[epnum].fifostart[1] = 0; 467 s->ep[epnum].fifolen[0] = 0; 468 s->ep[epnum].fifolen[1] = 0; 469 } 470 471 static void musb_session_update(MUSBState *s, int prev_dev, int prev_sess) 472 { 473 int detect_prev = prev_dev && prev_sess; 474 int detect = !!s->port.dev && s->session; 475 476 if (detect && !detect_prev) { 477 /* Let's skip the ID pin sense and VBUS sense formalities and 478 * and signal a successful SRP directly. This should work at least 479 * for the Linux driver stack. */ 480 musb_intr_set(s, musb_irq_connect, 1); 481 482 if (s->port.dev->speed == USB_SPEED_LOW) { 483 s->devctl &= ~MGC_M_DEVCTL_FSDEV; 484 s->devctl |= MGC_M_DEVCTL_LSDEV; 485 } else { 486 s->devctl |= MGC_M_DEVCTL_FSDEV; 487 s->devctl &= ~MGC_M_DEVCTL_LSDEV; 488 } 489 490 /* A-mode? */ 491 s->devctl &= ~MGC_M_DEVCTL_BDEVICE; 492 493 /* Host-mode bit? */ 494 s->devctl |= MGC_M_DEVCTL_HM; 495 #if 1 496 musb_vbus_set(s, 1); 497 #endif 498 } else if (!detect && detect_prev) { 499 #if 1 500 musb_vbus_set(s, 0); 501 #endif 502 } 503 } 504 505 /* Attach or detach a device on our only port. */ 506 static void musb_attach(USBPort *port) 507 { 508 MUSBState *s = (MUSBState *) port->opaque; 509 510 musb_intr_set(s, musb_irq_vbus_request, 1); 511 musb_session_update(s, 0, s->session); 512 } 513 514 static void musb_detach(USBPort *port) 515 { 516 MUSBState *s = (MUSBState *) port->opaque; 517 518 musb_async_cancel_device(s, port->dev); 519 520 musb_intr_set(s, musb_irq_disconnect, 1); 521 musb_session_update(s, 1, s->session); 522 } 523 524 static void musb_child_detach(USBPort *port, USBDevice *child) 525 { 526 MUSBState *s = (MUSBState *) port->opaque; 527 528 musb_async_cancel_device(s, child); 529 } 530 531 static void musb_cb_tick0(void *opaque) 532 { 533 MUSBEndPoint *ep = (MUSBEndPoint *) opaque; 534 535 ep->delayed_cb[0](&ep->packey[0].p, opaque); 536 } 537 538 static void musb_cb_tick1(void *opaque) 539 { 540 MUSBEndPoint *ep = (MUSBEndPoint *) opaque; 541 542 ep->delayed_cb[1](&ep->packey[1].p, opaque); 543 } 544 545 #define musb_cb_tick (dir ? musb_cb_tick1 : musb_cb_tick0) 546 547 static void musb_schedule_cb(USBPort *port, USBPacket *packey) 548 { 549 MUSBPacket *p = container_of(packey, MUSBPacket, p); 550 MUSBEndPoint *ep = p->ep; 551 int dir = p->dir; 552 int timeout = 0; 553 554 if (ep->status[dir] == USB_RET_NAK) 555 timeout = ep->timeout[dir]; 556 else if (ep->interrupt[dir]) 557 timeout = 8; 558 else { 559 musb_cb_tick(ep); 560 return; 561 } 562 563 if (!ep->intv_timer[dir]) 564 ep->intv_timer[dir] = timer_new_ns(QEMU_CLOCK_VIRTUAL, musb_cb_tick, ep); 565 566 timer_mod(ep->intv_timer[dir], qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) + 567 muldiv64(timeout, NANOSECONDS_PER_SECOND, 8000)); 568 } 569 570 static int musb_timeout(int ttype, int speed, int val) 571 { 572 #if 1 573 return val << 3; 574 #endif 575 576 switch (ttype) { 577 case USB_ENDPOINT_XFER_CONTROL: 578 if (val < 2) 579 return 0; 580 else if (speed == USB_SPEED_HIGH) 581 return 1 << (val - 1); 582 else 583 return 8 << (val - 1); 584 585 case USB_ENDPOINT_XFER_INT: 586 if (speed == USB_SPEED_HIGH) 587 if (val < 2) 588 return 0; 589 else 590 return 1 << (val - 1); 591 else 592 return val << 3; 593 594 case USB_ENDPOINT_XFER_BULK: 595 case USB_ENDPOINT_XFER_ISOC: 596 if (val < 2) 597 return 0; 598 else if (speed == USB_SPEED_HIGH) 599 return 1 << (val - 1); 600 else 601 return 8 << (val - 1); 602 /* TODO: what with low-speed Bulk and Isochronous? */ 603 } 604 605 hw_error("bad interval\n"); 606 } 607 608 static void musb_packet(MUSBState *s, MUSBEndPoint *ep, 609 int epnum, int pid, int len, USBCallback cb, int dir) 610 { 611 USBDevice *dev; 612 USBEndpoint *uep; 613 int idx = epnum && dir; 614 int id; 615 int ttype; 616 617 /* ep->type[0,1] contains: 618 * in bits 7:6 the speed (0 - invalid, 1 - high, 2 - full, 3 - slow) 619 * in bits 5:4 the transfer type (BULK / INT) 620 * in bits 3:0 the EP num 621 */ 622 ttype = epnum ? (ep->type[idx] >> 4) & 3 : 0; 623 624 ep->timeout[dir] = musb_timeout(ttype, 625 ep->type[idx] >> 6, ep->interval[idx]); 626 ep->interrupt[dir] = ttype == USB_ENDPOINT_XFER_INT; 627 ep->delayed_cb[dir] = cb; 628 629 /* A wild guess on the FADDR semantics... */ 630 dev = usb_find_device(&s->port, ep->faddr[idx]); 631 uep = usb_ep_get(dev, pid, ep->type[idx] & 0xf); 632 id = pid; 633 if (uep) { 634 id |= (dev->addr << 16) | (uep->nr << 8); 635 } 636 usb_packet_setup(&ep->packey[dir].p, pid, uep, 0, id, false, true); 637 usb_packet_addbuf(&ep->packey[dir].p, ep->buf[idx], len); 638 ep->packey[dir].ep = ep; 639 ep->packey[dir].dir = dir; 640 641 usb_handle_packet(dev, &ep->packey[dir].p); 642 643 if (ep->packey[dir].p.status == USB_RET_ASYNC) { 644 usb_device_flush_ep_queue(dev, uep); 645 ep->status[dir] = len; 646 return; 647 } 648 649 if (ep->packey[dir].p.status == USB_RET_SUCCESS) { 650 ep->status[dir] = ep->packey[dir].p.actual_length; 651 } else { 652 ep->status[dir] = ep->packey[dir].p.status; 653 } 654 musb_schedule_cb(&s->port, &ep->packey[dir].p); 655 } 656 657 static void musb_tx_packet_complete(USBPacket *packey, void *opaque) 658 { 659 /* Unfortunately we can't use packey->devep because that's the remote 660 * endpoint number and may be different than our local. */ 661 MUSBEndPoint *ep = (MUSBEndPoint *) opaque; 662 int epnum = ep->epnum; 663 MUSBState *s = ep->musb; 664 665 ep->fifostart[0] = 0; 666 ep->fifolen[0] = 0; 667 #ifdef CLEAR_NAK 668 if (ep->status[0] != USB_RET_NAK) { 669 #endif 670 if (epnum) 671 ep->csr[0] &= ~(MGC_M_TXCSR_FIFONOTEMPTY | MGC_M_TXCSR_TXPKTRDY); 672 else 673 ep->csr[0] &= ~MGC_M_CSR0_TXPKTRDY; 674 #ifdef CLEAR_NAK 675 } 676 #endif 677 678 /* Clear all of the error bits first */ 679 if (epnum) 680 ep->csr[0] &= ~(MGC_M_TXCSR_H_ERROR | MGC_M_TXCSR_H_RXSTALL | 681 MGC_M_TXCSR_H_NAKTIMEOUT); 682 else 683 ep->csr[0] &= ~(MGC_M_CSR0_H_ERROR | MGC_M_CSR0_H_RXSTALL | 684 MGC_M_CSR0_H_NAKTIMEOUT | MGC_M_CSR0_H_NO_PING); 685 686 if (ep->status[0] == USB_RET_STALL) { 687 /* Command not supported by target! */ 688 ep->status[0] = 0; 689 690 if (epnum) 691 ep->csr[0] |= MGC_M_TXCSR_H_RXSTALL; 692 else 693 ep->csr[0] |= MGC_M_CSR0_H_RXSTALL; 694 } 695 696 if (ep->status[0] == USB_RET_NAK) { 697 ep->status[0] = 0; 698 699 /* NAK timeouts are only generated in Bulk transfers and 700 * Data-errors in Isochronous. */ 701 if (ep->interrupt[0]) { 702 return; 703 } 704 705 if (epnum) 706 ep->csr[0] |= MGC_M_TXCSR_H_NAKTIMEOUT; 707 else 708 ep->csr[0] |= MGC_M_CSR0_H_NAKTIMEOUT; 709 } 710 711 if (ep->status[0] < 0) { 712 if (ep->status[0] == USB_RET_BABBLE) 713 musb_intr_set(s, musb_irq_rst_babble, 1); 714 715 /* Pretend we've tried three times already and failed (in 716 * case of USB_TOKEN_SETUP). */ 717 if (epnum) 718 ep->csr[0] |= MGC_M_TXCSR_H_ERROR; 719 else 720 ep->csr[0] |= MGC_M_CSR0_H_ERROR; 721 722 musb_tx_intr_set(s, epnum, 1); 723 return; 724 } 725 /* TODO: check len for over/underruns of an OUT packet? */ 726 727 #ifdef SETUPLEN_HACK 728 if (!epnum && ep->packey[0].pid == USB_TOKEN_SETUP) 729 s->setup_len = ep->packey[0].data[6]; 730 #endif 731 732 /* In DMA mode: if no error, assert DMA request for this EP, 733 * and skip the interrupt. */ 734 musb_tx_intr_set(s, epnum, 1); 735 } 736 737 static void musb_rx_packet_complete(USBPacket *packey, void *opaque) 738 { 739 /* Unfortunately we can't use packey->devep because that's the remote 740 * endpoint number and may be different than our local. */ 741 MUSBEndPoint *ep = (MUSBEndPoint *) opaque; 742 int epnum = ep->epnum; 743 MUSBState *s = ep->musb; 744 745 ep->fifostart[1] = 0; 746 ep->fifolen[1] = 0; 747 748 #ifdef CLEAR_NAK 749 if (ep->status[1] != USB_RET_NAK) { 750 #endif 751 ep->csr[1] &= ~MGC_M_RXCSR_H_REQPKT; 752 if (!epnum) 753 ep->csr[0] &= ~MGC_M_CSR0_H_REQPKT; 754 #ifdef CLEAR_NAK 755 } 756 #endif 757 758 /* Clear all of the imaginable error bits first */ 759 ep->csr[1] &= ~(MGC_M_RXCSR_H_ERROR | MGC_M_RXCSR_H_RXSTALL | 760 MGC_M_RXCSR_DATAERROR); 761 if (!epnum) 762 ep->csr[0] &= ~(MGC_M_CSR0_H_ERROR | MGC_M_CSR0_H_RXSTALL | 763 MGC_M_CSR0_H_NAKTIMEOUT | MGC_M_CSR0_H_NO_PING); 764 765 if (ep->status[1] == USB_RET_STALL) { 766 ep->status[1] = 0; 767 768 ep->csr[1] |= MGC_M_RXCSR_H_RXSTALL; 769 if (!epnum) 770 ep->csr[0] |= MGC_M_CSR0_H_RXSTALL; 771 } 772 773 if (ep->status[1] == USB_RET_NAK) { 774 ep->status[1] = 0; 775 776 /* NAK timeouts are only generated in Bulk transfers and 777 * Data-errors in Isochronous. */ 778 if (ep->interrupt[1]) { 779 musb_packet(s, ep, epnum, USB_TOKEN_IN, 780 packey->iov.size, musb_rx_packet_complete, 1); 781 return; 782 } 783 784 ep->csr[1] |= MGC_M_RXCSR_DATAERROR; 785 if (!epnum) 786 ep->csr[0] |= MGC_M_CSR0_H_NAKTIMEOUT; 787 } 788 789 if (ep->status[1] < 0) { 790 if (ep->status[1] == USB_RET_BABBLE) { 791 musb_intr_set(s, musb_irq_rst_babble, 1); 792 return; 793 } 794 795 /* Pretend we've tried three times already and failed (in 796 * case of a control transfer). */ 797 ep->csr[1] |= MGC_M_RXCSR_H_ERROR; 798 if (!epnum) 799 ep->csr[0] |= MGC_M_CSR0_H_ERROR; 800 801 musb_rx_intr_set(s, epnum, 1); 802 return; 803 } 804 /* TODO: check len for over/underruns of an OUT packet? */ 805 /* TODO: perhaps make use of e->ext_size[1] here. */ 806 807 if (!(ep->csr[1] & (MGC_M_RXCSR_H_RXSTALL | MGC_M_RXCSR_DATAERROR))) { 808 ep->csr[1] |= MGC_M_RXCSR_FIFOFULL | MGC_M_RXCSR_RXPKTRDY; 809 if (!epnum) 810 ep->csr[0] |= MGC_M_CSR0_RXPKTRDY; 811 812 ep->rxcount = ep->status[1]; /* XXX: MIN(packey->len, ep->maxp[1]); */ 813 /* In DMA mode: assert DMA request for this EP */ 814 } 815 816 /* Only if DMA has not been asserted */ 817 musb_rx_intr_set(s, epnum, 1); 818 } 819 820 static void musb_async_cancel_device(MUSBState *s, USBDevice *dev) 821 { 822 int ep, dir; 823 824 for (ep = 0; ep < 16; ep++) { 825 for (dir = 0; dir < 2; dir++) { 826 if (!usb_packet_is_inflight(&s->ep[ep].packey[dir].p) || 827 s->ep[ep].packey[dir].p.ep->dev != dev) { 828 continue; 829 } 830 usb_cancel_packet(&s->ep[ep].packey[dir].p); 831 /* status updates needed here? */ 832 } 833 } 834 } 835 836 static void musb_tx_rdy(MUSBState *s, int epnum) 837 { 838 MUSBEndPoint *ep = s->ep + epnum; 839 int pid; 840 int total, valid = 0; 841 TRACE("start %d, len %d", ep->fifostart[0], ep->fifolen[0] ); 842 ep->fifostart[0] += ep->fifolen[0]; 843 ep->fifolen[0] = 0; 844 845 /* XXX: how's the total size of the packet retrieved exactly in 846 * the generic case? */ 847 total = ep->maxp[0] & 0x3ff; 848 849 if (ep->ext_size[0]) { 850 total = ep->ext_size[0]; 851 ep->ext_size[0] = 0; 852 valid = 1; 853 } 854 855 /* If the packet is not fully ready yet, wait for a next segment. */ 856 if (epnum && (ep->fifostart[0]) < total) 857 return; 858 859 if (!valid) 860 total = ep->fifostart[0]; 861 862 pid = USB_TOKEN_OUT; 863 if (!epnum && (ep->csr[0] & MGC_M_CSR0_H_SETUPPKT)) { 864 pid = USB_TOKEN_SETUP; 865 if (total != 8) { 866 TRACE("illegal SETUPPKT length of %i bytes", total); 867 } 868 /* Controller should retry SETUP packets three times on errors 869 * but it doesn't make sense for us to do that. */ 870 } 871 872 musb_packet(s, ep, epnum, pid, total, musb_tx_packet_complete, 0); 873 } 874 875 static void musb_rx_req(MUSBState *s, int epnum) 876 { 877 MUSBEndPoint *ep = s->ep + epnum; 878 int total; 879 880 /* If we already have a packet, which didn't fit into the 881 * 64 bytes of the FIFO, only move the FIFO start and return. (Obsolete) */ 882 if (ep->packey[1].p.pid == USB_TOKEN_IN && ep->status[1] >= 0 && 883 (ep->fifostart[1]) + ep->rxcount < 884 ep->packey[1].p.iov.size) { 885 TRACE("0x%08x, %d", ep->fifostart[1], ep->rxcount ); 886 ep->fifostart[1] += ep->rxcount; 887 ep->fifolen[1] = 0; 888 889 ep->rxcount = MIN(ep->packey[0].p.iov.size - (ep->fifostart[1]), 890 ep->maxp[1]); 891 892 ep->csr[1] &= ~MGC_M_RXCSR_H_REQPKT; 893 if (!epnum) 894 ep->csr[0] &= ~MGC_M_CSR0_H_REQPKT; 895 896 /* Clear all of the error bits first */ 897 ep->csr[1] &= ~(MGC_M_RXCSR_H_ERROR | MGC_M_RXCSR_H_RXSTALL | 898 MGC_M_RXCSR_DATAERROR); 899 if (!epnum) 900 ep->csr[0] &= ~(MGC_M_CSR0_H_ERROR | MGC_M_CSR0_H_RXSTALL | 901 MGC_M_CSR0_H_NAKTIMEOUT | MGC_M_CSR0_H_NO_PING); 902 903 ep->csr[1] |= MGC_M_RXCSR_FIFOFULL | MGC_M_RXCSR_RXPKTRDY; 904 if (!epnum) 905 ep->csr[0] |= MGC_M_CSR0_RXPKTRDY; 906 musb_rx_intr_set(s, epnum, 1); 907 return; 908 } 909 910 /* The driver sets maxp[1] to 64 or less because it knows the hardware 911 * FIFO is this deep. Bigger packets get split in 912 * usb_generic_handle_packet but we can also do the splitting locally 913 * for performance. It turns out we can also have a bigger FIFO and 914 * ignore the limit set in ep->maxp[1]. The Linux MUSB driver deals 915 * OK with single packets of even 32KB and we avoid splitting, however 916 * usb_msd.c sometimes sends a packet bigger than what Linux expects 917 * (e.g. 8192 bytes instead of 4096) and we get an OVERRUN. Splitting 918 * hides this overrun from Linux. Up to 4096 everything is fine 919 * though. Currently this is disabled. 920 * 921 * XXX: mind ep->fifosize. */ 922 total = MIN(ep->maxp[1] & 0x3ff, sizeof(s->buf)); 923 924 #ifdef SETUPLEN_HACK 925 /* Why should *we* do that instead of Linux? */ 926 if (!epnum) { 927 if (ep->packey[0].p.devaddr == 2) { 928 total = MIN(s->setup_len, 8); 929 } else { 930 total = MIN(s->setup_len, 64); 931 } 932 s->setup_len -= total; 933 } 934 #endif 935 936 musb_packet(s, ep, epnum, USB_TOKEN_IN, total, musb_rx_packet_complete, 1); 937 } 938 939 static uint8_t musb_read_fifo(MUSBEndPoint *ep) 940 { 941 uint8_t value; 942 if (ep->fifolen[1] >= 64) { 943 /* We have a FIFO underrun */ 944 TRACE("EP%d FIFO is now empty, stop reading", ep->epnum); 945 return 0x00000000; 946 } 947 /* In DMA mode clear RXPKTRDY and set REQPKT automatically 948 * (if AUTOREQ is set) */ 949 950 ep->csr[1] &= ~MGC_M_RXCSR_FIFOFULL; 951 value=ep->buf[1][ep->fifostart[1] + ep->fifolen[1] ++]; 952 TRACE("EP%d 0x%02x, %d", ep->epnum, value, ep->fifolen[1] ); 953 return value; 954 } 955 956 static void musb_write_fifo(MUSBEndPoint *ep, uint8_t value) 957 { 958 TRACE("EP%d = %02x", ep->epnum, value); 959 if (ep->fifolen[0] >= 64) { 960 /* We have a FIFO overrun */ 961 TRACE("EP%d FIFO exceeded 64 bytes, stop feeding data", ep->epnum); 962 return; 963 } 964 965 ep->buf[0][ep->fifostart[0] + ep->fifolen[0] ++] = value; 966 ep->csr[0] |= MGC_M_TXCSR_FIFONOTEMPTY; 967 } 968 969 static void musb_ep_frame_cancel(MUSBEndPoint *ep, int dir) 970 { 971 if (ep->intv_timer[dir]) 972 timer_del(ep->intv_timer[dir]); 973 } 974 975 /* Bus control */ 976 static uint8_t musb_busctl_readb(void *opaque, int ep, int addr) 977 { 978 MUSBState *s = (MUSBState *) opaque; 979 980 switch (addr) { 981 /* For USB2.0 HS hubs only */ 982 case MUSB_HDRC_TXHUBADDR: 983 return s->ep[ep].haddr[0]; 984 case MUSB_HDRC_TXHUBPORT: 985 return s->ep[ep].hport[0]; 986 case MUSB_HDRC_RXHUBADDR: 987 return s->ep[ep].haddr[1]; 988 case MUSB_HDRC_RXHUBPORT: 989 return s->ep[ep].hport[1]; 990 991 default: 992 TRACE("unknown register 0x%02x", addr); 993 return 0x00; 994 }; 995 } 996 997 static void musb_busctl_writeb(void *opaque, int ep, int addr, uint8_t value) 998 { 999 MUSBState *s = (MUSBState *) opaque; 1000 1001 switch (addr) { 1002 case MUSB_HDRC_TXFUNCADDR: 1003 s->ep[ep].faddr[0] = value; 1004 break; 1005 case MUSB_HDRC_RXFUNCADDR: 1006 s->ep[ep].faddr[1] = value; 1007 break; 1008 case MUSB_HDRC_TXHUBADDR: 1009 s->ep[ep].haddr[0] = value; 1010 break; 1011 case MUSB_HDRC_TXHUBPORT: 1012 s->ep[ep].hport[0] = value; 1013 break; 1014 case MUSB_HDRC_RXHUBADDR: 1015 s->ep[ep].haddr[1] = value; 1016 break; 1017 case MUSB_HDRC_RXHUBPORT: 1018 s->ep[ep].hport[1] = value; 1019 break; 1020 1021 default: 1022 TRACE("unknown register 0x%02x", addr); 1023 break; 1024 }; 1025 } 1026 1027 static uint16_t musb_busctl_readh(void *opaque, int ep, int addr) 1028 { 1029 MUSBState *s = (MUSBState *) opaque; 1030 1031 switch (addr) { 1032 case MUSB_HDRC_TXFUNCADDR: 1033 return s->ep[ep].faddr[0]; 1034 case MUSB_HDRC_RXFUNCADDR: 1035 return s->ep[ep].faddr[1]; 1036 1037 default: 1038 return musb_busctl_readb(s, ep, addr) | 1039 (musb_busctl_readb(s, ep, addr | 1) << 8); 1040 }; 1041 } 1042 1043 static void musb_busctl_writeh(void *opaque, int ep, int addr, uint16_t value) 1044 { 1045 MUSBState *s = (MUSBState *) opaque; 1046 1047 switch (addr) { 1048 case MUSB_HDRC_TXFUNCADDR: 1049 s->ep[ep].faddr[0] = value; 1050 break; 1051 case MUSB_HDRC_RXFUNCADDR: 1052 s->ep[ep].faddr[1] = value; 1053 break; 1054 1055 default: 1056 musb_busctl_writeb(s, ep, addr, value & 0xff); 1057 musb_busctl_writeb(s, ep, addr | 1, value >> 8); 1058 }; 1059 } 1060 1061 /* Endpoint control */ 1062 static uint8_t musb_ep_readb(void *opaque, int ep, int addr) 1063 { 1064 MUSBState *s = (MUSBState *) opaque; 1065 1066 switch (addr) { 1067 case MUSB_HDRC_TXTYPE: 1068 return s->ep[ep].type[0]; 1069 case MUSB_HDRC_TXINTERVAL: 1070 return s->ep[ep].interval[0]; 1071 case MUSB_HDRC_RXTYPE: 1072 return s->ep[ep].type[1]; 1073 case MUSB_HDRC_RXINTERVAL: 1074 return s->ep[ep].interval[1]; 1075 case (MUSB_HDRC_FIFOSIZE & ~1): 1076 return 0x00; 1077 case MUSB_HDRC_FIFOSIZE: 1078 return ep ? s->ep[ep].fifosize : s->ep[ep].config; 1079 case MUSB_HDRC_RXCOUNT: 1080 return s->ep[ep].rxcount; 1081 1082 default: 1083 TRACE("unknown register 0x%02x", addr); 1084 return 0x00; 1085 }; 1086 } 1087 1088 static void musb_ep_writeb(void *opaque, int ep, int addr, uint8_t value) 1089 { 1090 MUSBState *s = (MUSBState *) opaque; 1091 1092 switch (addr) { 1093 case MUSB_HDRC_TXTYPE: 1094 s->ep[ep].type[0] = value; 1095 break; 1096 case MUSB_HDRC_TXINTERVAL: 1097 s->ep[ep].interval[0] = value; 1098 musb_ep_frame_cancel(&s->ep[ep], 0); 1099 break; 1100 case MUSB_HDRC_RXTYPE: 1101 s->ep[ep].type[1] = value; 1102 break; 1103 case MUSB_HDRC_RXINTERVAL: 1104 s->ep[ep].interval[1] = value; 1105 musb_ep_frame_cancel(&s->ep[ep], 1); 1106 break; 1107 case (MUSB_HDRC_FIFOSIZE & ~1): 1108 break; 1109 case MUSB_HDRC_FIFOSIZE: 1110 TRACE("somebody messes with fifosize (now %i bytes)", value); 1111 s->ep[ep].fifosize = value; 1112 break; 1113 default: 1114 TRACE("unknown register 0x%02x", addr); 1115 break; 1116 }; 1117 } 1118 1119 static uint16_t musb_ep_readh(void *opaque, int ep, int addr) 1120 { 1121 MUSBState *s = (MUSBState *) opaque; 1122 uint16_t ret; 1123 1124 switch (addr) { 1125 case MUSB_HDRC_TXMAXP: 1126 return s->ep[ep].maxp[0]; 1127 case MUSB_HDRC_TXCSR: 1128 return s->ep[ep].csr[0]; 1129 case MUSB_HDRC_RXMAXP: 1130 return s->ep[ep].maxp[1]; 1131 case MUSB_HDRC_RXCSR: 1132 ret = s->ep[ep].csr[1]; 1133 1134 /* TODO: This and other bits probably depend on 1135 * ep->csr[1] & MGC_M_RXCSR_AUTOCLEAR. */ 1136 if (s->ep[ep].csr[1] & MGC_M_RXCSR_AUTOCLEAR) 1137 s->ep[ep].csr[1] &= ~MGC_M_RXCSR_RXPKTRDY; 1138 1139 return ret; 1140 case MUSB_HDRC_RXCOUNT: 1141 return s->ep[ep].rxcount; 1142 1143 default: 1144 return musb_ep_readb(s, ep, addr) | 1145 (musb_ep_readb(s, ep, addr | 1) << 8); 1146 }; 1147 } 1148 1149 static void musb_ep_writeh(void *opaque, int ep, int addr, uint16_t value) 1150 { 1151 MUSBState *s = (MUSBState *) opaque; 1152 1153 switch (addr) { 1154 case MUSB_HDRC_TXMAXP: 1155 s->ep[ep].maxp[0] = value; 1156 break; 1157 case MUSB_HDRC_TXCSR: 1158 if (ep) { 1159 s->ep[ep].csr[0] &= value & 0xa6; 1160 s->ep[ep].csr[0] |= value & 0xff59; 1161 } else { 1162 s->ep[ep].csr[0] &= value & 0x85; 1163 s->ep[ep].csr[0] |= value & 0xf7a; 1164 } 1165 1166 musb_ep_frame_cancel(&s->ep[ep], 0); 1167 1168 if ((ep && (value & MGC_M_TXCSR_FLUSHFIFO)) || 1169 (!ep && (value & MGC_M_CSR0_FLUSHFIFO))) { 1170 s->ep[ep].fifolen[0] = 0; 1171 s->ep[ep].fifostart[0] = 0; 1172 if (ep) 1173 s->ep[ep].csr[0] &= 1174 ~(MGC_M_TXCSR_FIFONOTEMPTY | MGC_M_TXCSR_TXPKTRDY); 1175 else 1176 s->ep[ep].csr[0] &= 1177 ~(MGC_M_CSR0_TXPKTRDY | MGC_M_CSR0_RXPKTRDY); 1178 } 1179 if ( 1180 (ep && 1181 #ifdef CLEAR_NAK 1182 (value & MGC_M_TXCSR_TXPKTRDY) && 1183 !(value & MGC_M_TXCSR_H_NAKTIMEOUT)) || 1184 #else 1185 (value & MGC_M_TXCSR_TXPKTRDY)) || 1186 #endif 1187 (!ep && 1188 #ifdef CLEAR_NAK 1189 (value & MGC_M_CSR0_TXPKTRDY) && 1190 !(value & MGC_M_CSR0_H_NAKTIMEOUT))) 1191 #else 1192 (value & MGC_M_CSR0_TXPKTRDY))) 1193 #endif 1194 musb_tx_rdy(s, ep); 1195 if (!ep && 1196 (value & MGC_M_CSR0_H_REQPKT) && 1197 #ifdef CLEAR_NAK 1198 !(value & (MGC_M_CSR0_H_NAKTIMEOUT | 1199 MGC_M_CSR0_RXPKTRDY))) 1200 #else 1201 !(value & MGC_M_CSR0_RXPKTRDY)) 1202 #endif 1203 musb_rx_req(s, ep); 1204 break; 1205 1206 case MUSB_HDRC_RXMAXP: 1207 s->ep[ep].maxp[1] = value; 1208 break; 1209 case MUSB_HDRC_RXCSR: 1210 /* (DMA mode only) */ 1211 if ( 1212 (value & MGC_M_RXCSR_H_AUTOREQ) && 1213 !(value & MGC_M_RXCSR_RXPKTRDY) && 1214 (s->ep[ep].csr[1] & MGC_M_RXCSR_RXPKTRDY)) 1215 value |= MGC_M_RXCSR_H_REQPKT; 1216 1217 s->ep[ep].csr[1] &= 0x102 | (value & 0x4d); 1218 s->ep[ep].csr[1] |= value & 0xfeb0; 1219 1220 musb_ep_frame_cancel(&s->ep[ep], 1); 1221 1222 if (value & MGC_M_RXCSR_FLUSHFIFO) { 1223 s->ep[ep].fifolen[1] = 0; 1224 s->ep[ep].fifostart[1] = 0; 1225 s->ep[ep].csr[1] &= ~(MGC_M_RXCSR_FIFOFULL | MGC_M_RXCSR_RXPKTRDY); 1226 /* If double buffering and we have two packets ready, flush 1227 * only the first one and set up the fifo at the second packet. */ 1228 } 1229 #ifdef CLEAR_NAK 1230 if ((value & MGC_M_RXCSR_H_REQPKT) && !(value & MGC_M_RXCSR_DATAERROR)) 1231 #else 1232 if (value & MGC_M_RXCSR_H_REQPKT) 1233 #endif 1234 musb_rx_req(s, ep); 1235 break; 1236 case MUSB_HDRC_RXCOUNT: 1237 s->ep[ep].rxcount = value; 1238 break; 1239 1240 default: 1241 musb_ep_writeb(s, ep, addr, value & 0xff); 1242 musb_ep_writeb(s, ep, addr | 1, value >> 8); 1243 }; 1244 } 1245 1246 /* Generic control */ 1247 static uint32_t musb_readb(void *opaque, hwaddr addr) 1248 { 1249 MUSBState *s = (MUSBState *) opaque; 1250 int ep, i; 1251 uint8_t ret; 1252 1253 switch (addr) { 1254 case MUSB_HDRC_FADDR: 1255 return s->faddr; 1256 case MUSB_HDRC_POWER: 1257 return s->power; 1258 case MUSB_HDRC_INTRUSB: 1259 ret = s->intr; 1260 for (i = 0; i < sizeof(ret) * 8; i ++) 1261 if (ret & (1 << i)) 1262 musb_intr_set(s, i, 0); 1263 return ret; 1264 case MUSB_HDRC_INTRUSBE: 1265 return s->mask; 1266 case MUSB_HDRC_INDEX: 1267 return s->idx; 1268 case MUSB_HDRC_TESTMODE: 1269 return 0x00; 1270 1271 case MUSB_HDRC_EP_IDX ... (MUSB_HDRC_EP_IDX + 0xf): 1272 return musb_ep_readb(s, s->idx, addr & 0xf); 1273 1274 case MUSB_HDRC_DEVCTL: 1275 return s->devctl; 1276 1277 case MUSB_HDRC_TXFIFOSZ: 1278 case MUSB_HDRC_RXFIFOSZ: 1279 case MUSB_HDRC_VCTRL: 1280 /* TODO */ 1281 return 0x00; 1282 1283 case MUSB_HDRC_HWVERS: 1284 return (1 << 10) | 400; 1285 1286 case (MUSB_HDRC_VCTRL | 1): 1287 case (MUSB_HDRC_HWVERS | 1): 1288 case (MUSB_HDRC_DEVCTL | 1): 1289 return 0x00; 1290 1291 case MUSB_HDRC_BUSCTL ... (MUSB_HDRC_BUSCTL + 0x7f): 1292 ep = (addr >> 3) & 0xf; 1293 return musb_busctl_readb(s, ep, addr & 0x7); 1294 1295 case MUSB_HDRC_EP ... (MUSB_HDRC_EP + 0xff): 1296 ep = (addr >> 4) & 0xf; 1297 return musb_ep_readb(s, ep, addr & 0xf); 1298 1299 case MUSB_HDRC_FIFO ... (MUSB_HDRC_FIFO + 0x3f): 1300 ep = ((addr - MUSB_HDRC_FIFO) >> 2) & 0xf; 1301 return musb_read_fifo(s->ep + ep); 1302 1303 default: 1304 TRACE("unknown register 0x%02x", (int) addr); 1305 return 0x00; 1306 }; 1307 } 1308 1309 static void musb_writeb(void *opaque, hwaddr addr, uint32_t value) 1310 { 1311 MUSBState *s = (MUSBState *) opaque; 1312 int ep; 1313 1314 switch (addr) { 1315 case MUSB_HDRC_FADDR: 1316 s->faddr = value & 0x7f; 1317 break; 1318 case MUSB_HDRC_POWER: 1319 s->power = (value & 0xef) | (s->power & 0x10); 1320 /* MGC_M_POWER_RESET is also read-only in Peripheral Mode */ 1321 if ((value & MGC_M_POWER_RESET) && s->port.dev) { 1322 usb_device_reset(s->port.dev); 1323 /* Negotiate high-speed operation if MGC_M_POWER_HSENAB is set. */ 1324 if ((value & MGC_M_POWER_HSENAB) && 1325 s->port.dev->speed == USB_SPEED_HIGH) 1326 s->power |= MGC_M_POWER_HSMODE; /* Success */ 1327 /* Restart frame counting. */ 1328 } 1329 if (value & MGC_M_POWER_SUSPENDM) { 1330 /* When all transfers finish, suspend and if MGC_M_POWER_ENSUSPEND 1331 * is set, also go into low power mode. Frame counting stops. */ 1332 /* XXX: Cleared when the interrupt register is read */ 1333 } 1334 if (value & MGC_M_POWER_RESUME) { 1335 /* Wait 20ms and signal resuming on the bus. Frame counting 1336 * restarts. */ 1337 } 1338 break; 1339 case MUSB_HDRC_INTRUSB: 1340 break; 1341 case MUSB_HDRC_INTRUSBE: 1342 s->mask = value & 0xff; 1343 break; 1344 case MUSB_HDRC_INDEX: 1345 s->idx = value & 0xf; 1346 break; 1347 case MUSB_HDRC_TESTMODE: 1348 break; 1349 1350 case MUSB_HDRC_EP_IDX ... (MUSB_HDRC_EP_IDX + 0xf): 1351 musb_ep_writeb(s, s->idx, addr & 0xf, value); 1352 break; 1353 1354 case MUSB_HDRC_DEVCTL: 1355 s->session = !!(value & MGC_M_DEVCTL_SESSION); 1356 musb_session_update(s, 1357 !!s->port.dev, 1358 !!(s->devctl & MGC_M_DEVCTL_SESSION)); 1359 1360 /* It seems this is the only R/W bit in this register? */ 1361 s->devctl &= ~MGC_M_DEVCTL_SESSION; 1362 s->devctl |= value & MGC_M_DEVCTL_SESSION; 1363 break; 1364 1365 case MUSB_HDRC_TXFIFOSZ: 1366 case MUSB_HDRC_RXFIFOSZ: 1367 case MUSB_HDRC_VCTRL: 1368 /* TODO */ 1369 break; 1370 1371 case (MUSB_HDRC_VCTRL | 1): 1372 case (MUSB_HDRC_DEVCTL | 1): 1373 break; 1374 1375 case MUSB_HDRC_BUSCTL ... (MUSB_HDRC_BUSCTL + 0x7f): 1376 ep = (addr >> 3) & 0xf; 1377 musb_busctl_writeb(s, ep, addr & 0x7, value); 1378 break; 1379 1380 case MUSB_HDRC_EP ... (MUSB_HDRC_EP + 0xff): 1381 ep = (addr >> 4) & 0xf; 1382 musb_ep_writeb(s, ep, addr & 0xf, value); 1383 break; 1384 1385 case MUSB_HDRC_FIFO ... (MUSB_HDRC_FIFO + 0x3f): 1386 ep = ((addr - MUSB_HDRC_FIFO) >> 2) & 0xf; 1387 musb_write_fifo(s->ep + ep, value & 0xff); 1388 break; 1389 1390 default: 1391 TRACE("unknown register 0x%02x", (int) addr); 1392 break; 1393 }; 1394 } 1395 1396 static uint32_t musb_readh(void *opaque, hwaddr addr) 1397 { 1398 MUSBState *s = (MUSBState *) opaque; 1399 int ep, i; 1400 uint16_t ret; 1401 1402 switch (addr) { 1403 case MUSB_HDRC_INTRTX: 1404 ret = s->tx_intr; 1405 /* Auto clear */ 1406 for (i = 0; i < sizeof(ret) * 8; i ++) 1407 if (ret & (1 << i)) 1408 musb_tx_intr_set(s, i, 0); 1409 return ret; 1410 case MUSB_HDRC_INTRRX: 1411 ret = s->rx_intr; 1412 /* Auto clear */ 1413 for (i = 0; i < sizeof(ret) * 8; i ++) 1414 if (ret & (1 << i)) 1415 musb_rx_intr_set(s, i, 0); 1416 return ret; 1417 case MUSB_HDRC_INTRTXE: 1418 return s->tx_mask; 1419 case MUSB_HDRC_INTRRXE: 1420 return s->rx_mask; 1421 1422 case MUSB_HDRC_FRAME: 1423 /* TODO */ 1424 return 0x0000; 1425 case MUSB_HDRC_TXFIFOADDR: 1426 return s->ep[s->idx].fifoaddr[0]; 1427 case MUSB_HDRC_RXFIFOADDR: 1428 return s->ep[s->idx].fifoaddr[1]; 1429 1430 case MUSB_HDRC_EP_IDX ... (MUSB_HDRC_EP_IDX + 0xf): 1431 return musb_ep_readh(s, s->idx, addr & 0xf); 1432 1433 case MUSB_HDRC_BUSCTL ... (MUSB_HDRC_BUSCTL + 0x7f): 1434 ep = (addr >> 3) & 0xf; 1435 return musb_busctl_readh(s, ep, addr & 0x7); 1436 1437 case MUSB_HDRC_EP ... (MUSB_HDRC_EP + 0xff): 1438 ep = (addr >> 4) & 0xf; 1439 return musb_ep_readh(s, ep, addr & 0xf); 1440 1441 case MUSB_HDRC_FIFO ... (MUSB_HDRC_FIFO + 0x3f): 1442 ep = ((addr - MUSB_HDRC_FIFO) >> 2) & 0xf; 1443 return (musb_read_fifo(s->ep + ep) | musb_read_fifo(s->ep + ep) << 8); 1444 1445 default: 1446 return musb_readb(s, addr) | (musb_readb(s, addr | 1) << 8); 1447 }; 1448 } 1449 1450 static void musb_writeh(void *opaque, hwaddr addr, uint32_t value) 1451 { 1452 MUSBState *s = (MUSBState *) opaque; 1453 int ep; 1454 1455 switch (addr) { 1456 case MUSB_HDRC_INTRTXE: 1457 s->tx_mask = value; 1458 /* XXX: the masks seem to apply on the raising edge like with 1459 * edge-triggered interrupts, thus no need to update. I may be 1460 * wrong though. */ 1461 break; 1462 case MUSB_HDRC_INTRRXE: 1463 s->rx_mask = value; 1464 break; 1465 1466 case MUSB_HDRC_FRAME: 1467 /* TODO */ 1468 break; 1469 case MUSB_HDRC_TXFIFOADDR: 1470 s->ep[s->idx].fifoaddr[0] = value; 1471 s->ep[s->idx].buf[0] = 1472 s->buf + ((value << 3) & 0x7ff ); 1473 break; 1474 case MUSB_HDRC_RXFIFOADDR: 1475 s->ep[s->idx].fifoaddr[1] = value; 1476 s->ep[s->idx].buf[1] = 1477 s->buf + ((value << 3) & 0x7ff); 1478 break; 1479 1480 case MUSB_HDRC_EP_IDX ... (MUSB_HDRC_EP_IDX + 0xf): 1481 musb_ep_writeh(s, s->idx, addr & 0xf, value); 1482 break; 1483 1484 case MUSB_HDRC_BUSCTL ... (MUSB_HDRC_BUSCTL + 0x7f): 1485 ep = (addr >> 3) & 0xf; 1486 musb_busctl_writeh(s, ep, addr & 0x7, value); 1487 break; 1488 1489 case MUSB_HDRC_EP ... (MUSB_HDRC_EP + 0xff): 1490 ep = (addr >> 4) & 0xf; 1491 musb_ep_writeh(s, ep, addr & 0xf, value); 1492 break; 1493 1494 case MUSB_HDRC_FIFO ... (MUSB_HDRC_FIFO + 0x3f): 1495 ep = ((addr - MUSB_HDRC_FIFO) >> 2) & 0xf; 1496 musb_write_fifo(s->ep + ep, value & 0xff); 1497 musb_write_fifo(s->ep + ep, (value >> 8) & 0xff); 1498 break; 1499 1500 default: 1501 musb_writeb(s, addr, value & 0xff); 1502 musb_writeb(s, addr | 1, value >> 8); 1503 }; 1504 } 1505 1506 static uint32_t musb_readw(void *opaque, hwaddr addr) 1507 { 1508 MUSBState *s = (MUSBState *) opaque; 1509 int ep; 1510 1511 switch (addr) { 1512 case MUSB_HDRC_FIFO ... (MUSB_HDRC_FIFO + 0x3f): 1513 ep = ((addr - MUSB_HDRC_FIFO) >> 2) & 0xf; 1514 return ( musb_read_fifo(s->ep + ep) | 1515 musb_read_fifo(s->ep + ep) << 8 | 1516 musb_read_fifo(s->ep + ep) << 16 | 1517 musb_read_fifo(s->ep + ep) << 24 ); 1518 default: 1519 TRACE("unknown register 0x%02x", (int) addr); 1520 return 0x00000000; 1521 }; 1522 } 1523 1524 static void musb_writew(void *opaque, hwaddr addr, uint32_t value) 1525 { 1526 MUSBState *s = (MUSBState *) opaque; 1527 int ep; 1528 1529 switch (addr) { 1530 case MUSB_HDRC_FIFO ... (MUSB_HDRC_FIFO + 0x3f): 1531 ep = ((addr - MUSB_HDRC_FIFO) >> 2) & 0xf; 1532 musb_write_fifo(s->ep + ep, value & 0xff); 1533 musb_write_fifo(s->ep + ep, (value >> 8 ) & 0xff); 1534 musb_write_fifo(s->ep + ep, (value >> 16) & 0xff); 1535 musb_write_fifo(s->ep + ep, (value >> 24) & 0xff); 1536 break; 1537 default: 1538 TRACE("unknown register 0x%02x", (int) addr); 1539 break; 1540 }; 1541 } 1542 1543 CPUReadMemoryFunc * const musb_read[] = { 1544 musb_readb, 1545 musb_readh, 1546 musb_readw, 1547 }; 1548 1549 CPUWriteMemoryFunc * const musb_write[] = { 1550 musb_writeb, 1551 musb_writeh, 1552 musb_writew, 1553 }; 1554