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