]> git.proxmox.com Git - mirror_qemu.git/blob - hw/usb/hcd-musb.c
projects / mirror_qemu.git / blob
? search:


27d9d0bd82d573483ee3f8bef776000be97ae38a
[mirror_qemu.git] / hw / usb / hcd-musb.c
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 };
QEMU mirror