xref: /openbmc/qemu/hw/usb/hcd-xhci.c (revision 046dbab9)
1 /*
2  * USB xHCI controller emulation
3  *
4  * Copyright (c) 2011 Securiforest
5  * Date: 2011-05-11 ;  Author: Hector Martin <hector@marcansoft.com>
6  * Based on usb-ohci.c, emulates Renesas NEC USB 3.0
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2 of the License, or (at your option) any later version.
12  *
13  * This library 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 GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this library; if not, see <http://www.gnu.org/licenses/>.
20  */
21 #include "hw/hw.h"
22 #include "qemu-timer.h"
23 #include "hw/usb.h"
24 #include "hw/pci.h"
25 #include "hw/msi.h"
26 #include "hw/msix.h"
27 #include "trace.h"
28 
29 //#define DEBUG_XHCI
30 //#define DEBUG_DATA
31 
32 #ifdef DEBUG_XHCI
33 #define DPRINTF(...) fprintf(stderr, __VA_ARGS__)
34 #else
35 #define DPRINTF(...) do {} while (0)
36 #endif
37 #define FIXME() do { fprintf(stderr, "FIXME %s:%d\n", \
38                              __func__, __LINE__); abort(); } while (0)
39 
40 #define MAXPORTS_2 15
41 #define MAXPORTS_3 15
42 
43 #define MAXPORTS (MAXPORTS_2+MAXPORTS_3)
44 #define MAXSLOTS 64
45 #define MAXINTRS 16
46 
47 #define TD_QUEUE 24
48 
49 /* Very pessimistic, let's hope it's enough for all cases */
50 #define EV_QUEUE (((3*TD_QUEUE)+16)*MAXSLOTS)
51 /* Do not deliver ER Full events. NEC's driver does some things not bound
52  * to the specs when it gets them */
53 #define ER_FULL_HACK
54 
55 #define LEN_CAP         0x40
56 #define LEN_OPER        (0x400 + 0x10 * MAXPORTS)
57 #define LEN_RUNTIME     ((MAXINTRS + 1) * 0x20)
58 #define LEN_DOORBELL    ((MAXSLOTS + 1) * 0x20)
59 
60 #define OFF_OPER        LEN_CAP
61 #define OFF_RUNTIME     0x1000
62 #define OFF_DOORBELL    0x2000
63 #define OFF_MSIX_TABLE  0x3000
64 #define OFF_MSIX_PBA    0x3800
65 /* must be power of 2 */
66 #define LEN_REGS        0x4000
67 
68 #if (OFF_OPER + LEN_OPER) > OFF_RUNTIME
69 #error Increase OFF_RUNTIME
70 #endif
71 #if (OFF_RUNTIME + LEN_RUNTIME) > OFF_DOORBELL
72 #error Increase OFF_DOORBELL
73 #endif
74 #if (OFF_DOORBELL + LEN_DOORBELL) > LEN_REGS
75 # error Increase LEN_REGS
76 #endif
77 
78 /* bit definitions */
79 #define USBCMD_RS       (1<<0)
80 #define USBCMD_HCRST    (1<<1)
81 #define USBCMD_INTE     (1<<2)
82 #define USBCMD_HSEE     (1<<3)
83 #define USBCMD_LHCRST   (1<<7)
84 #define USBCMD_CSS      (1<<8)
85 #define USBCMD_CRS      (1<<9)
86 #define USBCMD_EWE      (1<<10)
87 #define USBCMD_EU3S     (1<<11)
88 
89 #define USBSTS_HCH      (1<<0)
90 #define USBSTS_HSE      (1<<2)
91 #define USBSTS_EINT     (1<<3)
92 #define USBSTS_PCD      (1<<4)
93 #define USBSTS_SSS      (1<<8)
94 #define USBSTS_RSS      (1<<9)
95 #define USBSTS_SRE      (1<<10)
96 #define USBSTS_CNR      (1<<11)
97 #define USBSTS_HCE      (1<<12)
98 
99 
100 #define PORTSC_CCS          (1<<0)
101 #define PORTSC_PED          (1<<1)
102 #define PORTSC_OCA          (1<<3)
103 #define PORTSC_PR           (1<<4)
104 #define PORTSC_PLS_SHIFT        5
105 #define PORTSC_PLS_MASK     0xf
106 #define PORTSC_PP           (1<<9)
107 #define PORTSC_SPEED_SHIFT      10
108 #define PORTSC_SPEED_MASK   0xf
109 #define PORTSC_SPEED_FULL   (1<<10)
110 #define PORTSC_SPEED_LOW    (2<<10)
111 #define PORTSC_SPEED_HIGH   (3<<10)
112 #define PORTSC_SPEED_SUPER  (4<<10)
113 #define PORTSC_PIC_SHIFT        14
114 #define PORTSC_PIC_MASK     0x3
115 #define PORTSC_LWS          (1<<16)
116 #define PORTSC_CSC          (1<<17)
117 #define PORTSC_PEC          (1<<18)
118 #define PORTSC_WRC          (1<<19)
119 #define PORTSC_OCC          (1<<20)
120 #define PORTSC_PRC          (1<<21)
121 #define PORTSC_PLC          (1<<22)
122 #define PORTSC_CEC          (1<<23)
123 #define PORTSC_CAS          (1<<24)
124 #define PORTSC_WCE          (1<<25)
125 #define PORTSC_WDE          (1<<26)
126 #define PORTSC_WOE          (1<<27)
127 #define PORTSC_DR           (1<<30)
128 #define PORTSC_WPR          (1<<31)
129 
130 #define CRCR_RCS        (1<<0)
131 #define CRCR_CS         (1<<1)
132 #define CRCR_CA         (1<<2)
133 #define CRCR_CRR        (1<<3)
134 
135 #define IMAN_IP         (1<<0)
136 #define IMAN_IE         (1<<1)
137 
138 #define ERDP_EHB        (1<<3)
139 
140 #define TRB_SIZE 16
141 typedef struct XHCITRB {
142     uint64_t parameter;
143     uint32_t status;
144     uint32_t control;
145     dma_addr_t addr;
146     bool ccs;
147 } XHCITRB;
148 
149 
150 typedef enum TRBType {
151     TRB_RESERVED = 0,
152     TR_NORMAL,
153     TR_SETUP,
154     TR_DATA,
155     TR_STATUS,
156     TR_ISOCH,
157     TR_LINK,
158     TR_EVDATA,
159     TR_NOOP,
160     CR_ENABLE_SLOT,
161     CR_DISABLE_SLOT,
162     CR_ADDRESS_DEVICE,
163     CR_CONFIGURE_ENDPOINT,
164     CR_EVALUATE_CONTEXT,
165     CR_RESET_ENDPOINT,
166     CR_STOP_ENDPOINT,
167     CR_SET_TR_DEQUEUE,
168     CR_RESET_DEVICE,
169     CR_FORCE_EVENT,
170     CR_NEGOTIATE_BW,
171     CR_SET_LATENCY_TOLERANCE,
172     CR_GET_PORT_BANDWIDTH,
173     CR_FORCE_HEADER,
174     CR_NOOP,
175     ER_TRANSFER = 32,
176     ER_COMMAND_COMPLETE,
177     ER_PORT_STATUS_CHANGE,
178     ER_BANDWIDTH_REQUEST,
179     ER_DOORBELL,
180     ER_HOST_CONTROLLER,
181     ER_DEVICE_NOTIFICATION,
182     ER_MFINDEX_WRAP,
183     /* vendor specific bits */
184     CR_VENDOR_VIA_CHALLENGE_RESPONSE = 48,
185     CR_VENDOR_NEC_FIRMWARE_REVISION  = 49,
186     CR_VENDOR_NEC_CHALLENGE_RESPONSE = 50,
187 } TRBType;
188 
189 #define CR_LINK TR_LINK
190 
191 typedef enum TRBCCode {
192     CC_INVALID = 0,
193     CC_SUCCESS,
194     CC_DATA_BUFFER_ERROR,
195     CC_BABBLE_DETECTED,
196     CC_USB_TRANSACTION_ERROR,
197     CC_TRB_ERROR,
198     CC_STALL_ERROR,
199     CC_RESOURCE_ERROR,
200     CC_BANDWIDTH_ERROR,
201     CC_NO_SLOTS_ERROR,
202     CC_INVALID_STREAM_TYPE_ERROR,
203     CC_SLOT_NOT_ENABLED_ERROR,
204     CC_EP_NOT_ENABLED_ERROR,
205     CC_SHORT_PACKET,
206     CC_RING_UNDERRUN,
207     CC_RING_OVERRUN,
208     CC_VF_ER_FULL,
209     CC_PARAMETER_ERROR,
210     CC_BANDWIDTH_OVERRUN,
211     CC_CONTEXT_STATE_ERROR,
212     CC_NO_PING_RESPONSE_ERROR,
213     CC_EVENT_RING_FULL_ERROR,
214     CC_INCOMPATIBLE_DEVICE_ERROR,
215     CC_MISSED_SERVICE_ERROR,
216     CC_COMMAND_RING_STOPPED,
217     CC_COMMAND_ABORTED,
218     CC_STOPPED,
219     CC_STOPPED_LENGTH_INVALID,
220     CC_MAX_EXIT_LATENCY_TOO_LARGE_ERROR = 29,
221     CC_ISOCH_BUFFER_OVERRUN = 31,
222     CC_EVENT_LOST_ERROR,
223     CC_UNDEFINED_ERROR,
224     CC_INVALID_STREAM_ID_ERROR,
225     CC_SECONDARY_BANDWIDTH_ERROR,
226     CC_SPLIT_TRANSACTION_ERROR
227 } TRBCCode;
228 
229 #define TRB_C               (1<<0)
230 #define TRB_TYPE_SHIFT          10
231 #define TRB_TYPE_MASK       0x3f
232 #define TRB_TYPE(t)         (((t).control >> TRB_TYPE_SHIFT) & TRB_TYPE_MASK)
233 
234 #define TRB_EV_ED           (1<<2)
235 
236 #define TRB_TR_ENT          (1<<1)
237 #define TRB_TR_ISP          (1<<2)
238 #define TRB_TR_NS           (1<<3)
239 #define TRB_TR_CH           (1<<4)
240 #define TRB_TR_IOC          (1<<5)
241 #define TRB_TR_IDT          (1<<6)
242 #define TRB_TR_TBC_SHIFT        7
243 #define TRB_TR_TBC_MASK     0x3
244 #define TRB_TR_BEI          (1<<9)
245 #define TRB_TR_TLBPC_SHIFT      16
246 #define TRB_TR_TLBPC_MASK   0xf
247 #define TRB_TR_FRAMEID_SHIFT    20
248 #define TRB_TR_FRAMEID_MASK 0x7ff
249 #define TRB_TR_SIA          (1<<31)
250 
251 #define TRB_TR_DIR          (1<<16)
252 
253 #define TRB_CR_SLOTID_SHIFT     24
254 #define TRB_CR_SLOTID_MASK  0xff
255 #define TRB_CR_EPID_SHIFT       16
256 #define TRB_CR_EPID_MASK    0x1f
257 
258 #define TRB_CR_BSR          (1<<9)
259 #define TRB_CR_DC           (1<<9)
260 
261 #define TRB_LK_TC           (1<<1)
262 
263 #define TRB_INTR_SHIFT          22
264 #define TRB_INTR_MASK       0x3ff
265 #define TRB_INTR(t)         (((t).status >> TRB_INTR_SHIFT) & TRB_INTR_MASK)
266 
267 #define EP_TYPE_MASK        0x7
268 #define EP_TYPE_SHIFT           3
269 
270 #define EP_STATE_MASK       0x7
271 #define EP_DISABLED         (0<<0)
272 #define EP_RUNNING          (1<<0)
273 #define EP_HALTED           (2<<0)
274 #define EP_STOPPED          (3<<0)
275 #define EP_ERROR            (4<<0)
276 
277 #define SLOT_STATE_MASK     0x1f
278 #define SLOT_STATE_SHIFT        27
279 #define SLOT_STATE(s)       (((s)>>SLOT_STATE_SHIFT)&SLOT_STATE_MASK)
280 #define SLOT_ENABLED        0
281 #define SLOT_DEFAULT        1
282 #define SLOT_ADDRESSED      2
283 #define SLOT_CONFIGURED     3
284 
285 #define SLOT_CONTEXT_ENTRIES_MASK 0x1f
286 #define SLOT_CONTEXT_ENTRIES_SHIFT 27
287 
288 typedef struct XHCIState XHCIState;
289 
290 typedef enum EPType {
291     ET_INVALID = 0,
292     ET_ISO_OUT,
293     ET_BULK_OUT,
294     ET_INTR_OUT,
295     ET_CONTROL,
296     ET_ISO_IN,
297     ET_BULK_IN,
298     ET_INTR_IN,
299 } EPType;
300 
301 typedef struct XHCIRing {
302     dma_addr_t base;
303     dma_addr_t dequeue;
304     bool ccs;
305 } XHCIRing;
306 
307 typedef struct XHCIPort {
308     XHCIState *xhci;
309     uint32_t portsc;
310     uint32_t portnr;
311     USBPort  *uport;
312     uint32_t speedmask;
313     char name[16];
314     MemoryRegion mem;
315 } XHCIPort;
316 
317 typedef struct XHCITransfer {
318     XHCIState *xhci;
319     USBPacket packet;
320     QEMUSGList sgl;
321     bool running_async;
322     bool running_retry;
323     bool cancelled;
324     bool complete;
325     unsigned int iso_pkts;
326     unsigned int slotid;
327     unsigned int epid;
328     bool in_xfer;
329     bool iso_xfer;
330 
331     unsigned int trb_count;
332     unsigned int trb_alloced;
333     XHCITRB *trbs;
334 
335     TRBCCode status;
336 
337     unsigned int pkts;
338     unsigned int pktsize;
339     unsigned int cur_pkt;
340 
341     uint64_t mfindex_kick;
342 } XHCITransfer;
343 
344 typedef struct XHCIEPContext {
345     XHCIState *xhci;
346     unsigned int slotid;
347     unsigned int epid;
348 
349     XHCIRing ring;
350     unsigned int next_xfer;
351     unsigned int comp_xfer;
352     XHCITransfer transfers[TD_QUEUE];
353     XHCITransfer *retry;
354     EPType type;
355     dma_addr_t pctx;
356     unsigned int max_psize;
357     uint32_t state;
358 
359     /* iso xfer scheduling */
360     unsigned int interval;
361     int64_t mfindex_last;
362     QEMUTimer *kick_timer;
363 } XHCIEPContext;
364 
365 typedef struct XHCISlot {
366     bool enabled;
367     dma_addr_t ctx;
368     USBPort *uport;
369     unsigned int devaddr;
370     XHCIEPContext * eps[31];
371 } XHCISlot;
372 
373 typedef struct XHCIEvent {
374     TRBType type;
375     TRBCCode ccode;
376     uint64_t ptr;
377     uint32_t length;
378     uint32_t flags;
379     uint8_t slotid;
380     uint8_t epid;
381 } XHCIEvent;
382 
383 typedef struct XHCIInterrupter {
384     uint32_t iman;
385     uint32_t imod;
386     uint32_t erstsz;
387     uint32_t erstba_low;
388     uint32_t erstba_high;
389     uint32_t erdp_low;
390     uint32_t erdp_high;
391 
392     bool msix_used, er_pcs, er_full;
393 
394     dma_addr_t er_start;
395     uint32_t er_size;
396     unsigned int er_ep_idx;
397 
398     XHCIEvent ev_buffer[EV_QUEUE];
399     unsigned int ev_buffer_put;
400     unsigned int ev_buffer_get;
401 
402 } XHCIInterrupter;
403 
404 struct XHCIState {
405     PCIDevice pci_dev;
406     USBBus bus;
407     qemu_irq irq;
408     MemoryRegion mem;
409     MemoryRegion mem_cap;
410     MemoryRegion mem_oper;
411     MemoryRegion mem_runtime;
412     MemoryRegion mem_doorbell;
413     const char *name;
414     unsigned int devaddr;
415 
416     /* properties */
417     uint32_t numports_2;
418     uint32_t numports_3;
419     uint32_t flags;
420 
421     /* Operational Registers */
422     uint32_t usbcmd;
423     uint32_t usbsts;
424     uint32_t dnctrl;
425     uint32_t crcr_low;
426     uint32_t crcr_high;
427     uint32_t dcbaap_low;
428     uint32_t dcbaap_high;
429     uint32_t config;
430 
431     USBPort  uports[MAX(MAXPORTS_2, MAXPORTS_3)];
432     XHCIPort ports[MAXPORTS];
433     XHCISlot slots[MAXSLOTS];
434     uint32_t numports;
435 
436     /* Runtime Registers */
437     int64_t mfindex_start;
438     QEMUTimer *mfwrap_timer;
439     XHCIInterrupter intr[MAXINTRS];
440 
441     XHCIRing cmd_ring;
442 };
443 
444 typedef struct XHCIEvRingSeg {
445     uint32_t addr_low;
446     uint32_t addr_high;
447     uint32_t size;
448     uint32_t rsvd;
449 } XHCIEvRingSeg;
450 
451 enum xhci_flags {
452     XHCI_FLAG_USE_MSI = 1,
453     XHCI_FLAG_USE_MSI_X,
454 };
455 
456 static void xhci_kick_ep(XHCIState *xhci, unsigned int slotid,
457                          unsigned int epid);
458 static void xhci_event(XHCIState *xhci, XHCIEvent *event, int v);
459 static void xhci_write_event(XHCIState *xhci, XHCIEvent *event, int v);
460 
461 static const char *TRBType_names[] = {
462     [TRB_RESERVED]                     = "TRB_RESERVED",
463     [TR_NORMAL]                        = "TR_NORMAL",
464     [TR_SETUP]                         = "TR_SETUP",
465     [TR_DATA]                          = "TR_DATA",
466     [TR_STATUS]                        = "TR_STATUS",
467     [TR_ISOCH]                         = "TR_ISOCH",
468     [TR_LINK]                          = "TR_LINK",
469     [TR_EVDATA]                        = "TR_EVDATA",
470     [TR_NOOP]                          = "TR_NOOP",
471     [CR_ENABLE_SLOT]                   = "CR_ENABLE_SLOT",
472     [CR_DISABLE_SLOT]                  = "CR_DISABLE_SLOT",
473     [CR_ADDRESS_DEVICE]                = "CR_ADDRESS_DEVICE",
474     [CR_CONFIGURE_ENDPOINT]            = "CR_CONFIGURE_ENDPOINT",
475     [CR_EVALUATE_CONTEXT]              = "CR_EVALUATE_CONTEXT",
476     [CR_RESET_ENDPOINT]                = "CR_RESET_ENDPOINT",
477     [CR_STOP_ENDPOINT]                 = "CR_STOP_ENDPOINT",
478     [CR_SET_TR_DEQUEUE]                = "CR_SET_TR_DEQUEUE",
479     [CR_RESET_DEVICE]                  = "CR_RESET_DEVICE",
480     [CR_FORCE_EVENT]                   = "CR_FORCE_EVENT",
481     [CR_NEGOTIATE_BW]                  = "CR_NEGOTIATE_BW",
482     [CR_SET_LATENCY_TOLERANCE]         = "CR_SET_LATENCY_TOLERANCE",
483     [CR_GET_PORT_BANDWIDTH]            = "CR_GET_PORT_BANDWIDTH",
484     [CR_FORCE_HEADER]                  = "CR_FORCE_HEADER",
485     [CR_NOOP]                          = "CR_NOOP",
486     [ER_TRANSFER]                      = "ER_TRANSFER",
487     [ER_COMMAND_COMPLETE]              = "ER_COMMAND_COMPLETE",
488     [ER_PORT_STATUS_CHANGE]            = "ER_PORT_STATUS_CHANGE",
489     [ER_BANDWIDTH_REQUEST]             = "ER_BANDWIDTH_REQUEST",
490     [ER_DOORBELL]                      = "ER_DOORBELL",
491     [ER_HOST_CONTROLLER]               = "ER_HOST_CONTROLLER",
492     [ER_DEVICE_NOTIFICATION]           = "ER_DEVICE_NOTIFICATION",
493     [ER_MFINDEX_WRAP]                  = "ER_MFINDEX_WRAP",
494     [CR_VENDOR_VIA_CHALLENGE_RESPONSE] = "CR_VENDOR_VIA_CHALLENGE_RESPONSE",
495     [CR_VENDOR_NEC_FIRMWARE_REVISION]  = "CR_VENDOR_NEC_FIRMWARE_REVISION",
496     [CR_VENDOR_NEC_CHALLENGE_RESPONSE] = "CR_VENDOR_NEC_CHALLENGE_RESPONSE",
497 };
498 
499 static const char *TRBCCode_names[] = {
500     [CC_INVALID]                       = "CC_INVALID",
501     [CC_SUCCESS]                       = "CC_SUCCESS",
502     [CC_DATA_BUFFER_ERROR]             = "CC_DATA_BUFFER_ERROR",
503     [CC_BABBLE_DETECTED]               = "CC_BABBLE_DETECTED",
504     [CC_USB_TRANSACTION_ERROR]         = "CC_USB_TRANSACTION_ERROR",
505     [CC_TRB_ERROR]                     = "CC_TRB_ERROR",
506     [CC_STALL_ERROR]                   = "CC_STALL_ERROR",
507     [CC_RESOURCE_ERROR]                = "CC_RESOURCE_ERROR",
508     [CC_BANDWIDTH_ERROR]               = "CC_BANDWIDTH_ERROR",
509     [CC_NO_SLOTS_ERROR]                = "CC_NO_SLOTS_ERROR",
510     [CC_INVALID_STREAM_TYPE_ERROR]     = "CC_INVALID_STREAM_TYPE_ERROR",
511     [CC_SLOT_NOT_ENABLED_ERROR]        = "CC_SLOT_NOT_ENABLED_ERROR",
512     [CC_EP_NOT_ENABLED_ERROR]          = "CC_EP_NOT_ENABLED_ERROR",
513     [CC_SHORT_PACKET]                  = "CC_SHORT_PACKET",
514     [CC_RING_UNDERRUN]                 = "CC_RING_UNDERRUN",
515     [CC_RING_OVERRUN]                  = "CC_RING_OVERRUN",
516     [CC_VF_ER_FULL]                    = "CC_VF_ER_FULL",
517     [CC_PARAMETER_ERROR]               = "CC_PARAMETER_ERROR",
518     [CC_BANDWIDTH_OVERRUN]             = "CC_BANDWIDTH_OVERRUN",
519     [CC_CONTEXT_STATE_ERROR]           = "CC_CONTEXT_STATE_ERROR",
520     [CC_NO_PING_RESPONSE_ERROR]        = "CC_NO_PING_RESPONSE_ERROR",
521     [CC_EVENT_RING_FULL_ERROR]         = "CC_EVENT_RING_FULL_ERROR",
522     [CC_INCOMPATIBLE_DEVICE_ERROR]     = "CC_INCOMPATIBLE_DEVICE_ERROR",
523     [CC_MISSED_SERVICE_ERROR]          = "CC_MISSED_SERVICE_ERROR",
524     [CC_COMMAND_RING_STOPPED]          = "CC_COMMAND_RING_STOPPED",
525     [CC_COMMAND_ABORTED]               = "CC_COMMAND_ABORTED",
526     [CC_STOPPED]                       = "CC_STOPPED",
527     [CC_STOPPED_LENGTH_INVALID]        = "CC_STOPPED_LENGTH_INVALID",
528     [CC_MAX_EXIT_LATENCY_TOO_LARGE_ERROR]
529     = "CC_MAX_EXIT_LATENCY_TOO_LARGE_ERROR",
530     [CC_ISOCH_BUFFER_OVERRUN]          = "CC_ISOCH_BUFFER_OVERRUN",
531     [CC_EVENT_LOST_ERROR]              = "CC_EVENT_LOST_ERROR",
532     [CC_UNDEFINED_ERROR]               = "CC_UNDEFINED_ERROR",
533     [CC_INVALID_STREAM_ID_ERROR]       = "CC_INVALID_STREAM_ID_ERROR",
534     [CC_SECONDARY_BANDWIDTH_ERROR]     = "CC_SECONDARY_BANDWIDTH_ERROR",
535     [CC_SPLIT_TRANSACTION_ERROR]       = "CC_SPLIT_TRANSACTION_ERROR",
536 };
537 
538 static const char *lookup_name(uint32_t index, const char **list, uint32_t llen)
539 {
540     if (index >= llen || list[index] == NULL) {
541         return "???";
542     }
543     return list[index];
544 }
545 
546 static const char *trb_name(XHCITRB *trb)
547 {
548     return lookup_name(TRB_TYPE(*trb), TRBType_names,
549                        ARRAY_SIZE(TRBType_names));
550 }
551 
552 static const char *event_name(XHCIEvent *event)
553 {
554     return lookup_name(event->ccode, TRBCCode_names,
555                        ARRAY_SIZE(TRBCCode_names));
556 }
557 
558 static uint64_t xhci_mfindex_get(XHCIState *xhci)
559 {
560     int64_t now = qemu_get_clock_ns(vm_clock);
561     return (now - xhci->mfindex_start) / 125000;
562 }
563 
564 static void xhci_mfwrap_update(XHCIState *xhci)
565 {
566     const uint32_t bits = USBCMD_RS | USBCMD_EWE;
567     uint32_t mfindex, left;
568     int64_t now;
569 
570     if ((xhci->usbcmd & bits) == bits) {
571         now = qemu_get_clock_ns(vm_clock);
572         mfindex = ((now - xhci->mfindex_start) / 125000) & 0x3fff;
573         left = 0x4000 - mfindex;
574         qemu_mod_timer(xhci->mfwrap_timer, now + left * 125000);
575     } else {
576         qemu_del_timer(xhci->mfwrap_timer);
577     }
578 }
579 
580 static void xhci_mfwrap_timer(void *opaque)
581 {
582     XHCIState *xhci = opaque;
583     XHCIEvent wrap = { ER_MFINDEX_WRAP, CC_SUCCESS };
584 
585     xhci_event(xhci, &wrap, 0);
586     xhci_mfwrap_update(xhci);
587 }
588 
589 static inline dma_addr_t xhci_addr64(uint32_t low, uint32_t high)
590 {
591     if (sizeof(dma_addr_t) == 4) {
592         return low;
593     } else {
594         return low | (((dma_addr_t)high << 16) << 16);
595     }
596 }
597 
598 static inline dma_addr_t xhci_mask64(uint64_t addr)
599 {
600     if (sizeof(dma_addr_t) == 4) {
601         return addr & 0xffffffff;
602     } else {
603         return addr;
604     }
605 }
606 
607 static XHCIPort *xhci_lookup_port(XHCIState *xhci, struct USBPort *uport)
608 {
609     int index;
610 
611     if (!uport->dev) {
612         return NULL;
613     }
614     switch (uport->dev->speed) {
615     case USB_SPEED_LOW:
616     case USB_SPEED_FULL:
617     case USB_SPEED_HIGH:
618         index = uport->index;
619         break;
620     case USB_SPEED_SUPER:
621         index = uport->index + xhci->numports_2;
622         break;
623     default:
624         return NULL;
625     }
626     return &xhci->ports[index];
627 }
628 
629 static void xhci_intx_update(XHCIState *xhci)
630 {
631     int level = 0;
632 
633     if (msix_enabled(&xhci->pci_dev) ||
634         msi_enabled(&xhci->pci_dev)) {
635         return;
636     }
637 
638     if (xhci->intr[0].iman & IMAN_IP &&
639         xhci->intr[0].iman & IMAN_IE &&
640         xhci->usbcmd & USBCMD_INTE) {
641         level = 1;
642     }
643 
644     trace_usb_xhci_irq_intx(level);
645     qemu_set_irq(xhci->irq, level);
646 }
647 
648 static void xhci_msix_update(XHCIState *xhci, int v)
649 {
650     bool enabled;
651 
652     if (!msix_enabled(&xhci->pci_dev)) {
653         return;
654     }
655 
656     enabled = xhci->intr[v].iman & IMAN_IE;
657     if (enabled == xhci->intr[v].msix_used) {
658         return;
659     }
660 
661     if (enabled) {
662         trace_usb_xhci_irq_msix_use(v);
663         msix_vector_use(&xhci->pci_dev, v);
664         xhci->intr[v].msix_used = true;
665     } else {
666         trace_usb_xhci_irq_msix_unuse(v);
667         msix_vector_unuse(&xhci->pci_dev, v);
668         xhci->intr[v].msix_used = false;
669     }
670 }
671 
672 static void xhci_intr_raise(XHCIState *xhci, int v)
673 {
674     xhci->intr[v].erdp_low |= ERDP_EHB;
675     xhci->intr[v].iman |= IMAN_IP;
676     xhci->usbsts |= USBSTS_EINT;
677 
678     if (!(xhci->intr[v].iman & IMAN_IE)) {
679         return;
680     }
681 
682     if (!(xhci->usbcmd & USBCMD_INTE)) {
683         return;
684     }
685 
686     if (msix_enabled(&xhci->pci_dev)) {
687         trace_usb_xhci_irq_msix(v);
688         msix_notify(&xhci->pci_dev, v);
689         return;
690     }
691 
692     if (msi_enabled(&xhci->pci_dev)) {
693         trace_usb_xhci_irq_msi(v);
694         msi_notify(&xhci->pci_dev, v);
695         return;
696     }
697 
698     if (v == 0) {
699         trace_usb_xhci_irq_intx(1);
700         qemu_set_irq(xhci->irq, 1);
701     }
702 }
703 
704 static inline int xhci_running(XHCIState *xhci)
705 {
706     return !(xhci->usbsts & USBSTS_HCH) && !xhci->intr[0].er_full;
707 }
708 
709 static void xhci_die(XHCIState *xhci)
710 {
711     xhci->usbsts |= USBSTS_HCE;
712     fprintf(stderr, "xhci: asserted controller error\n");
713 }
714 
715 static void xhci_write_event(XHCIState *xhci, XHCIEvent *event, int v)
716 {
717     XHCIInterrupter *intr = &xhci->intr[v];
718     XHCITRB ev_trb;
719     dma_addr_t addr;
720 
721     ev_trb.parameter = cpu_to_le64(event->ptr);
722     ev_trb.status = cpu_to_le32(event->length | (event->ccode << 24));
723     ev_trb.control = (event->slotid << 24) | (event->epid << 16) |
724                      event->flags | (event->type << TRB_TYPE_SHIFT);
725     if (intr->er_pcs) {
726         ev_trb.control |= TRB_C;
727     }
728     ev_trb.control = cpu_to_le32(ev_trb.control);
729 
730     trace_usb_xhci_queue_event(v, intr->er_ep_idx, trb_name(&ev_trb),
731                                event_name(event), ev_trb.parameter,
732                                ev_trb.status, ev_trb.control);
733 
734     addr = intr->er_start + TRB_SIZE*intr->er_ep_idx;
735     pci_dma_write(&xhci->pci_dev, addr, &ev_trb, TRB_SIZE);
736 
737     intr->er_ep_idx++;
738     if (intr->er_ep_idx >= intr->er_size) {
739         intr->er_ep_idx = 0;
740         intr->er_pcs = !intr->er_pcs;
741     }
742 }
743 
744 static void xhci_events_update(XHCIState *xhci, int v)
745 {
746     XHCIInterrupter *intr = &xhci->intr[v];
747     dma_addr_t erdp;
748     unsigned int dp_idx;
749     bool do_irq = 0;
750 
751     if (xhci->usbsts & USBSTS_HCH) {
752         return;
753     }
754 
755     erdp = xhci_addr64(intr->erdp_low, intr->erdp_high);
756     if (erdp < intr->er_start ||
757         erdp >= (intr->er_start + TRB_SIZE*intr->er_size)) {
758         fprintf(stderr, "xhci: ERDP out of bounds: "DMA_ADDR_FMT"\n", erdp);
759         fprintf(stderr, "xhci: ER[%d] at "DMA_ADDR_FMT" len %d\n",
760                 v, intr->er_start, intr->er_size);
761         xhci_die(xhci);
762         return;
763     }
764     dp_idx = (erdp - intr->er_start) / TRB_SIZE;
765     assert(dp_idx < intr->er_size);
766 
767     /* NEC didn't read section 4.9.4 of the spec (v1.0 p139 top Note) and thus
768      * deadlocks when the ER is full. Hack it by holding off events until
769      * the driver decides to free at least half of the ring */
770     if (intr->er_full) {
771         int er_free = dp_idx - intr->er_ep_idx;
772         if (er_free <= 0) {
773             er_free += intr->er_size;
774         }
775         if (er_free < (intr->er_size/2)) {
776             DPRINTF("xhci_events_update(): event ring still "
777                     "more than half full (hack)\n");
778             return;
779         }
780     }
781 
782     while (intr->ev_buffer_put != intr->ev_buffer_get) {
783         assert(intr->er_full);
784         if (((intr->er_ep_idx+1) % intr->er_size) == dp_idx) {
785             DPRINTF("xhci_events_update(): event ring full again\n");
786 #ifndef ER_FULL_HACK
787             XHCIEvent full = {ER_HOST_CONTROLLER, CC_EVENT_RING_FULL_ERROR};
788             xhci_write_event(xhci, &full, v);
789 #endif
790             do_irq = 1;
791             break;
792         }
793         XHCIEvent *event = &intr->ev_buffer[intr->ev_buffer_get];
794         xhci_write_event(xhci, event, v);
795         intr->ev_buffer_get++;
796         do_irq = 1;
797         if (intr->ev_buffer_get == EV_QUEUE) {
798             intr->ev_buffer_get = 0;
799         }
800     }
801 
802     if (do_irq) {
803         xhci_intr_raise(xhci, v);
804     }
805 
806     if (intr->er_full && intr->ev_buffer_put == intr->ev_buffer_get) {
807         DPRINTF("xhci_events_update(): event ring no longer full\n");
808         intr->er_full = 0;
809     }
810 }
811 
812 static void xhci_event(XHCIState *xhci, XHCIEvent *event, int v)
813 {
814     XHCIInterrupter *intr;
815     dma_addr_t erdp;
816     unsigned int dp_idx;
817 
818     if (v >= MAXINTRS) {
819         DPRINTF("intr nr out of range (%d >= %d)\n", v, MAXINTRS);
820         return;
821     }
822     intr = &xhci->intr[v];
823 
824     if (intr->er_full) {
825         DPRINTF("xhci_event(): ER full, queueing\n");
826         if (((intr->ev_buffer_put+1) % EV_QUEUE) == intr->ev_buffer_get) {
827             fprintf(stderr, "xhci: event queue full, dropping event!\n");
828             return;
829         }
830         intr->ev_buffer[intr->ev_buffer_put++] = *event;
831         if (intr->ev_buffer_put == EV_QUEUE) {
832             intr->ev_buffer_put = 0;
833         }
834         return;
835     }
836 
837     erdp = xhci_addr64(intr->erdp_low, intr->erdp_high);
838     if (erdp < intr->er_start ||
839         erdp >= (intr->er_start + TRB_SIZE*intr->er_size)) {
840         fprintf(stderr, "xhci: ERDP out of bounds: "DMA_ADDR_FMT"\n", erdp);
841         fprintf(stderr, "xhci: ER[%d] at "DMA_ADDR_FMT" len %d\n",
842                 v, intr->er_start, intr->er_size);
843         xhci_die(xhci);
844         return;
845     }
846 
847     dp_idx = (erdp - intr->er_start) / TRB_SIZE;
848     assert(dp_idx < intr->er_size);
849 
850     if ((intr->er_ep_idx+1) % intr->er_size == dp_idx) {
851         DPRINTF("xhci_event(): ER full, queueing\n");
852 #ifndef ER_FULL_HACK
853         XHCIEvent full = {ER_HOST_CONTROLLER, CC_EVENT_RING_FULL_ERROR};
854         xhci_write_event(xhci, &full);
855 #endif
856         intr->er_full = 1;
857         if (((intr->ev_buffer_put+1) % EV_QUEUE) == intr->ev_buffer_get) {
858             fprintf(stderr, "xhci: event queue full, dropping event!\n");
859             return;
860         }
861         intr->ev_buffer[intr->ev_buffer_put++] = *event;
862         if (intr->ev_buffer_put == EV_QUEUE) {
863             intr->ev_buffer_put = 0;
864         }
865     } else {
866         xhci_write_event(xhci, event, v);
867     }
868 
869     xhci_intr_raise(xhci, v);
870 }
871 
872 static void xhci_ring_init(XHCIState *xhci, XHCIRing *ring,
873                            dma_addr_t base)
874 {
875     ring->base = base;
876     ring->dequeue = base;
877     ring->ccs = 1;
878 }
879 
880 static TRBType xhci_ring_fetch(XHCIState *xhci, XHCIRing *ring, XHCITRB *trb,
881                                dma_addr_t *addr)
882 {
883     while (1) {
884         TRBType type;
885         pci_dma_read(&xhci->pci_dev, ring->dequeue, trb, TRB_SIZE);
886         trb->addr = ring->dequeue;
887         trb->ccs = ring->ccs;
888         le64_to_cpus(&trb->parameter);
889         le32_to_cpus(&trb->status);
890         le32_to_cpus(&trb->control);
891 
892         trace_usb_xhci_fetch_trb(ring->dequeue, trb_name(trb),
893                                  trb->parameter, trb->status, trb->control);
894 
895         if ((trb->control & TRB_C) != ring->ccs) {
896             return 0;
897         }
898 
899         type = TRB_TYPE(*trb);
900 
901         if (type != TR_LINK) {
902             if (addr) {
903                 *addr = ring->dequeue;
904             }
905             ring->dequeue += TRB_SIZE;
906             return type;
907         } else {
908             ring->dequeue = xhci_mask64(trb->parameter);
909             if (trb->control & TRB_LK_TC) {
910                 ring->ccs = !ring->ccs;
911             }
912         }
913     }
914 }
915 
916 static int xhci_ring_chain_length(XHCIState *xhci, const XHCIRing *ring)
917 {
918     XHCITRB trb;
919     int length = 0;
920     dma_addr_t dequeue = ring->dequeue;
921     bool ccs = ring->ccs;
922     /* hack to bundle together the two/three TDs that make a setup transfer */
923     bool control_td_set = 0;
924 
925     while (1) {
926         TRBType type;
927         pci_dma_read(&xhci->pci_dev, dequeue, &trb, TRB_SIZE);
928         le64_to_cpus(&trb.parameter);
929         le32_to_cpus(&trb.status);
930         le32_to_cpus(&trb.control);
931 
932         if ((trb.control & TRB_C) != ccs) {
933             return -length;
934         }
935 
936         type = TRB_TYPE(trb);
937 
938         if (type == TR_LINK) {
939             dequeue = xhci_mask64(trb.parameter);
940             if (trb.control & TRB_LK_TC) {
941                 ccs = !ccs;
942             }
943             continue;
944         }
945 
946         length += 1;
947         dequeue += TRB_SIZE;
948 
949         if (type == TR_SETUP) {
950             control_td_set = 1;
951         } else if (type == TR_STATUS) {
952             control_td_set = 0;
953         }
954 
955         if (!control_td_set && !(trb.control & TRB_TR_CH)) {
956             return length;
957         }
958     }
959 }
960 
961 static void xhci_er_reset(XHCIState *xhci, int v)
962 {
963     XHCIInterrupter *intr = &xhci->intr[v];
964     XHCIEvRingSeg seg;
965 
966     /* cache the (sole) event ring segment location */
967     if (intr->erstsz != 1) {
968         fprintf(stderr, "xhci: invalid value for ERSTSZ: %d\n", intr->erstsz);
969         xhci_die(xhci);
970         return;
971     }
972     dma_addr_t erstba = xhci_addr64(intr->erstba_low, intr->erstba_high);
973     pci_dma_read(&xhci->pci_dev, erstba, &seg, sizeof(seg));
974     le32_to_cpus(&seg.addr_low);
975     le32_to_cpus(&seg.addr_high);
976     le32_to_cpus(&seg.size);
977     if (seg.size < 16 || seg.size > 4096) {
978         fprintf(stderr, "xhci: invalid value for segment size: %d\n", seg.size);
979         xhci_die(xhci);
980         return;
981     }
982     intr->er_start = xhci_addr64(seg.addr_low, seg.addr_high);
983     intr->er_size = seg.size;
984 
985     intr->er_ep_idx = 0;
986     intr->er_pcs = 1;
987     intr->er_full = 0;
988 
989     DPRINTF("xhci: event ring[%d]:" DMA_ADDR_FMT " [%d]\n",
990             v, intr->er_start, intr->er_size);
991 }
992 
993 static void xhci_run(XHCIState *xhci)
994 {
995     trace_usb_xhci_run();
996     xhci->usbsts &= ~USBSTS_HCH;
997     xhci->mfindex_start = qemu_get_clock_ns(vm_clock);
998 }
999 
1000 static void xhci_stop(XHCIState *xhci)
1001 {
1002     trace_usb_xhci_stop();
1003     xhci->usbsts |= USBSTS_HCH;
1004     xhci->crcr_low &= ~CRCR_CRR;
1005 }
1006 
1007 static void xhci_set_ep_state(XHCIState *xhci, XHCIEPContext *epctx,
1008                               uint32_t state)
1009 {
1010     uint32_t ctx[5];
1011     if (epctx->state == state) {
1012         return;
1013     }
1014 
1015     pci_dma_read(&xhci->pci_dev, epctx->pctx, ctx, sizeof(ctx));
1016     ctx[0] &= ~EP_STATE_MASK;
1017     ctx[0] |= state;
1018     ctx[2] = epctx->ring.dequeue | epctx->ring.ccs;
1019     ctx[3] = (epctx->ring.dequeue >> 16) >> 16;
1020     DPRINTF("xhci: set epctx: " DMA_ADDR_FMT " state=%d dequeue=%08x%08x\n",
1021             epctx->pctx, state, ctx[3], ctx[2]);
1022     pci_dma_write(&xhci->pci_dev, epctx->pctx, ctx, sizeof(ctx));
1023     epctx->state = state;
1024 }
1025 
1026 static void xhci_ep_kick_timer(void *opaque)
1027 {
1028     XHCIEPContext *epctx = opaque;
1029     xhci_kick_ep(epctx->xhci, epctx->slotid, epctx->epid);
1030 }
1031 
1032 static TRBCCode xhci_enable_ep(XHCIState *xhci, unsigned int slotid,
1033                                unsigned int epid, dma_addr_t pctx,
1034                                uint32_t *ctx)
1035 {
1036     XHCISlot *slot;
1037     XHCIEPContext *epctx;
1038     dma_addr_t dequeue;
1039     int i;
1040 
1041     trace_usb_xhci_ep_enable(slotid, epid);
1042     assert(slotid >= 1 && slotid <= MAXSLOTS);
1043     assert(epid >= 1 && epid <= 31);
1044 
1045     slot = &xhci->slots[slotid-1];
1046     if (slot->eps[epid-1]) {
1047         fprintf(stderr, "xhci: slot %d ep %d already enabled!\n", slotid, epid);
1048         return CC_TRB_ERROR;
1049     }
1050 
1051     epctx = g_malloc(sizeof(XHCIEPContext));
1052     memset(epctx, 0, sizeof(XHCIEPContext));
1053     epctx->xhci = xhci;
1054     epctx->slotid = slotid;
1055     epctx->epid = epid;
1056 
1057     slot->eps[epid-1] = epctx;
1058 
1059     dequeue = xhci_addr64(ctx[2] & ~0xf, ctx[3]);
1060     xhci_ring_init(xhci, &epctx->ring, dequeue);
1061     epctx->ring.ccs = ctx[2] & 1;
1062 
1063     epctx->type = (ctx[1] >> EP_TYPE_SHIFT) & EP_TYPE_MASK;
1064     DPRINTF("xhci: endpoint %d.%d type is %d\n", epid/2, epid%2, epctx->type);
1065     epctx->pctx = pctx;
1066     epctx->max_psize = ctx[1]>>16;
1067     epctx->max_psize *= 1+((ctx[1]>>8)&0xff);
1068     DPRINTF("xhci: endpoint %d.%d max transaction (burst) size is %d\n",
1069             epid/2, epid%2, epctx->max_psize);
1070     for (i = 0; i < ARRAY_SIZE(epctx->transfers); i++) {
1071         usb_packet_init(&epctx->transfers[i].packet);
1072     }
1073 
1074     epctx->interval = 1 << (ctx[0] >> 16) & 0xff;
1075     epctx->mfindex_last = 0;
1076     epctx->kick_timer = qemu_new_timer_ns(vm_clock, xhci_ep_kick_timer, epctx);
1077 
1078     epctx->state = EP_RUNNING;
1079     ctx[0] &= ~EP_STATE_MASK;
1080     ctx[0] |= EP_RUNNING;
1081 
1082     return CC_SUCCESS;
1083 }
1084 
1085 static int xhci_ep_nuke_xfers(XHCIState *xhci, unsigned int slotid,
1086                                unsigned int epid)
1087 {
1088     XHCISlot *slot;
1089     XHCIEPContext *epctx;
1090     int i, xferi, killed = 0;
1091     assert(slotid >= 1 && slotid <= MAXSLOTS);
1092     assert(epid >= 1 && epid <= 31);
1093 
1094     DPRINTF("xhci_ep_nuke_xfers(%d, %d)\n", slotid, epid);
1095 
1096     slot = &xhci->slots[slotid-1];
1097 
1098     if (!slot->eps[epid-1]) {
1099         return 0;
1100     }
1101 
1102     epctx = slot->eps[epid-1];
1103 
1104     xferi = epctx->next_xfer;
1105     for (i = 0; i < TD_QUEUE; i++) {
1106         XHCITransfer *t = &epctx->transfers[xferi];
1107         if (t->running_async) {
1108             usb_cancel_packet(&t->packet);
1109             t->running_async = 0;
1110             t->cancelled = 1;
1111             DPRINTF("xhci: cancelling transfer %d, waiting for it to complete...\n", i);
1112             killed++;
1113         }
1114         if (t->running_retry) {
1115             t->running_retry = 0;
1116             epctx->retry = NULL;
1117             qemu_del_timer(epctx->kick_timer);
1118         }
1119         if (t->trbs) {
1120             g_free(t->trbs);
1121         }
1122 
1123         t->trbs = NULL;
1124         t->trb_count = t->trb_alloced = 0;
1125         xferi = (xferi + 1) % TD_QUEUE;
1126     }
1127     return killed;
1128 }
1129 
1130 static TRBCCode xhci_disable_ep(XHCIState *xhci, unsigned int slotid,
1131                                unsigned int epid)
1132 {
1133     XHCISlot *slot;
1134     XHCIEPContext *epctx;
1135 
1136     trace_usb_xhci_ep_disable(slotid, epid);
1137     assert(slotid >= 1 && slotid <= MAXSLOTS);
1138     assert(epid >= 1 && epid <= 31);
1139 
1140     slot = &xhci->slots[slotid-1];
1141 
1142     if (!slot->eps[epid-1]) {
1143         DPRINTF("xhci: slot %d ep %d already disabled\n", slotid, epid);
1144         return CC_SUCCESS;
1145     }
1146 
1147     xhci_ep_nuke_xfers(xhci, slotid, epid);
1148 
1149     epctx = slot->eps[epid-1];
1150 
1151     xhci_set_ep_state(xhci, epctx, EP_DISABLED);
1152 
1153     qemu_free_timer(epctx->kick_timer);
1154     g_free(epctx);
1155     slot->eps[epid-1] = NULL;
1156 
1157     return CC_SUCCESS;
1158 }
1159 
1160 static TRBCCode xhci_stop_ep(XHCIState *xhci, unsigned int slotid,
1161                              unsigned int epid)
1162 {
1163     XHCISlot *slot;
1164     XHCIEPContext *epctx;
1165 
1166     trace_usb_xhci_ep_stop(slotid, epid);
1167     assert(slotid >= 1 && slotid <= MAXSLOTS);
1168 
1169     if (epid < 1 || epid > 31) {
1170         fprintf(stderr, "xhci: bad ep %d\n", epid);
1171         return CC_TRB_ERROR;
1172     }
1173 
1174     slot = &xhci->slots[slotid-1];
1175 
1176     if (!slot->eps[epid-1]) {
1177         DPRINTF("xhci: slot %d ep %d not enabled\n", slotid, epid);
1178         return CC_EP_NOT_ENABLED_ERROR;
1179     }
1180 
1181     if (xhci_ep_nuke_xfers(xhci, slotid, epid) > 0) {
1182         fprintf(stderr, "xhci: FIXME: endpoint stopped w/ xfers running, "
1183                 "data might be lost\n");
1184     }
1185 
1186     epctx = slot->eps[epid-1];
1187 
1188     xhci_set_ep_state(xhci, epctx, EP_STOPPED);
1189 
1190     return CC_SUCCESS;
1191 }
1192 
1193 static TRBCCode xhci_reset_ep(XHCIState *xhci, unsigned int slotid,
1194                               unsigned int epid)
1195 {
1196     XHCISlot *slot;
1197     XHCIEPContext *epctx;
1198     USBDevice *dev;
1199 
1200     trace_usb_xhci_ep_reset(slotid, epid);
1201     assert(slotid >= 1 && slotid <= MAXSLOTS);
1202 
1203     if (epid < 1 || epid > 31) {
1204         fprintf(stderr, "xhci: bad ep %d\n", epid);
1205         return CC_TRB_ERROR;
1206     }
1207 
1208     slot = &xhci->slots[slotid-1];
1209 
1210     if (!slot->eps[epid-1]) {
1211         DPRINTF("xhci: slot %d ep %d not enabled\n", slotid, epid);
1212         return CC_EP_NOT_ENABLED_ERROR;
1213     }
1214 
1215     epctx = slot->eps[epid-1];
1216 
1217     if (epctx->state != EP_HALTED) {
1218         fprintf(stderr, "xhci: reset EP while EP %d not halted (%d)\n",
1219                 epid, epctx->state);
1220         return CC_CONTEXT_STATE_ERROR;
1221     }
1222 
1223     if (xhci_ep_nuke_xfers(xhci, slotid, epid) > 0) {
1224         fprintf(stderr, "xhci: FIXME: endpoint reset w/ xfers running, "
1225                 "data might be lost\n");
1226     }
1227 
1228     uint8_t ep = epid>>1;
1229 
1230     if (epid & 1) {
1231         ep |= 0x80;
1232     }
1233 
1234     dev = xhci->slots[slotid-1].uport->dev;
1235     if (!dev) {
1236         return CC_USB_TRANSACTION_ERROR;
1237     }
1238 
1239     xhci_set_ep_state(xhci, epctx, EP_STOPPED);
1240 
1241     return CC_SUCCESS;
1242 }
1243 
1244 static TRBCCode xhci_set_ep_dequeue(XHCIState *xhci, unsigned int slotid,
1245                                     unsigned int epid, uint64_t pdequeue)
1246 {
1247     XHCISlot *slot;
1248     XHCIEPContext *epctx;
1249     dma_addr_t dequeue;
1250 
1251     assert(slotid >= 1 && slotid <= MAXSLOTS);
1252 
1253     if (epid < 1 || epid > 31) {
1254         fprintf(stderr, "xhci: bad ep %d\n", epid);
1255         return CC_TRB_ERROR;
1256     }
1257 
1258     trace_usb_xhci_ep_set_dequeue(slotid, epid, pdequeue);
1259     dequeue = xhci_mask64(pdequeue);
1260 
1261     slot = &xhci->slots[slotid-1];
1262 
1263     if (!slot->eps[epid-1]) {
1264         DPRINTF("xhci: slot %d ep %d not enabled\n", slotid, epid);
1265         return CC_EP_NOT_ENABLED_ERROR;
1266     }
1267 
1268     epctx = slot->eps[epid-1];
1269 
1270 
1271     if (epctx->state != EP_STOPPED) {
1272         fprintf(stderr, "xhci: set EP dequeue pointer while EP %d not stopped\n", epid);
1273         return CC_CONTEXT_STATE_ERROR;
1274     }
1275 
1276     xhci_ring_init(xhci, &epctx->ring, dequeue & ~0xF);
1277     epctx->ring.ccs = dequeue & 1;
1278 
1279     xhci_set_ep_state(xhci, epctx, EP_STOPPED);
1280 
1281     return CC_SUCCESS;
1282 }
1283 
1284 static int xhci_xfer_map(XHCITransfer *xfer)
1285 {
1286     int in_xfer = (xfer->packet.pid == USB_TOKEN_IN);
1287     XHCIState *xhci = xfer->xhci;
1288     int i;
1289 
1290     pci_dma_sglist_init(&xfer->sgl, &xhci->pci_dev, xfer->trb_count);
1291     for (i = 0; i < xfer->trb_count; i++) {
1292         XHCITRB *trb = &xfer->trbs[i];
1293         dma_addr_t addr;
1294         unsigned int chunk = 0;
1295 
1296         switch (TRB_TYPE(*trb)) {
1297         case TR_DATA:
1298             if ((!(trb->control & TRB_TR_DIR)) != (!in_xfer)) {
1299                 fprintf(stderr, "xhci: data direction mismatch for TR_DATA\n");
1300                 goto err;
1301             }
1302             /* fallthrough */
1303         case TR_NORMAL:
1304         case TR_ISOCH:
1305             addr = xhci_mask64(trb->parameter);
1306             chunk = trb->status & 0x1ffff;
1307             if (trb->control & TRB_TR_IDT) {
1308                 if (chunk > 8 || in_xfer) {
1309                     fprintf(stderr, "xhci: invalid immediate data TRB\n");
1310                     goto err;
1311                 }
1312                 qemu_sglist_add(&xfer->sgl, trb->addr, chunk);
1313             } else {
1314                 qemu_sglist_add(&xfer->sgl, addr, chunk);
1315             }
1316             break;
1317         }
1318     }
1319 
1320     usb_packet_map(&xfer->packet, &xfer->sgl);
1321     return 0;
1322 
1323 err:
1324     qemu_sglist_destroy(&xfer->sgl);
1325     xhci_die(xhci);
1326     return -1;
1327 }
1328 
1329 static void xhci_xfer_unmap(XHCITransfer *xfer)
1330 {
1331     usb_packet_unmap(&xfer->packet, &xfer->sgl);
1332     qemu_sglist_destroy(&xfer->sgl);
1333 }
1334 
1335 static void xhci_xfer_report(XHCITransfer *xfer)
1336 {
1337     uint32_t edtla = 0;
1338     unsigned int left;
1339     bool reported = 0;
1340     bool shortpkt = 0;
1341     XHCIEvent event = {ER_TRANSFER, CC_SUCCESS};
1342     XHCIState *xhci = xfer->xhci;
1343     int i;
1344 
1345     left = xfer->packet.result < 0 ? 0 : xfer->packet.result;
1346 
1347     for (i = 0; i < xfer->trb_count; i++) {
1348         XHCITRB *trb = &xfer->trbs[i];
1349         unsigned int chunk = 0;
1350 
1351         switch (TRB_TYPE(*trb)) {
1352         case TR_DATA:
1353         case TR_NORMAL:
1354         case TR_ISOCH:
1355             chunk = trb->status & 0x1ffff;
1356             if (chunk > left) {
1357                 chunk = left;
1358                 if (xfer->status == CC_SUCCESS) {
1359                     shortpkt = 1;
1360                 }
1361             }
1362             left -= chunk;
1363             edtla += chunk;
1364             break;
1365         case TR_STATUS:
1366             reported = 0;
1367             shortpkt = 0;
1368             break;
1369         }
1370 
1371         if (!reported && ((trb->control & TRB_TR_IOC) ||
1372                           (shortpkt && (trb->control & TRB_TR_ISP)) ||
1373                           (xfer->status != CC_SUCCESS))) {
1374             event.slotid = xfer->slotid;
1375             event.epid = xfer->epid;
1376             event.length = (trb->status & 0x1ffff) - chunk;
1377             event.flags = 0;
1378             event.ptr = trb->addr;
1379             if (xfer->status == CC_SUCCESS) {
1380                 event.ccode = shortpkt ? CC_SHORT_PACKET : CC_SUCCESS;
1381             } else {
1382                 event.ccode = xfer->status;
1383             }
1384             if (TRB_TYPE(*trb) == TR_EVDATA) {
1385                 event.ptr = trb->parameter;
1386                 event.flags |= TRB_EV_ED;
1387                 event.length = edtla & 0xffffff;
1388                 DPRINTF("xhci_xfer_data: EDTLA=%d\n", event.length);
1389                 edtla = 0;
1390             }
1391             xhci_event(xhci, &event, TRB_INTR(*trb));
1392             reported = 1;
1393             if (xfer->status != CC_SUCCESS) {
1394                 return;
1395             }
1396         }
1397     }
1398 }
1399 
1400 static void xhci_stall_ep(XHCITransfer *xfer)
1401 {
1402     XHCIState *xhci = xfer->xhci;
1403     XHCISlot *slot = &xhci->slots[xfer->slotid-1];
1404     XHCIEPContext *epctx = slot->eps[xfer->epid-1];
1405 
1406     epctx->ring.dequeue = xfer->trbs[0].addr;
1407     epctx->ring.ccs = xfer->trbs[0].ccs;
1408     xhci_set_ep_state(xhci, epctx, EP_HALTED);
1409     DPRINTF("xhci: stalled slot %d ep %d\n", xfer->slotid, xfer->epid);
1410     DPRINTF("xhci: will continue at "DMA_ADDR_FMT"\n", epctx->ring.dequeue);
1411 }
1412 
1413 static int xhci_submit(XHCIState *xhci, XHCITransfer *xfer,
1414                        XHCIEPContext *epctx);
1415 
1416 static int xhci_setup_packet(XHCITransfer *xfer)
1417 {
1418     XHCIState *xhci = xfer->xhci;
1419     USBDevice *dev;
1420     USBEndpoint *ep;
1421     int dir;
1422 
1423     dir = xfer->in_xfer ? USB_TOKEN_IN : USB_TOKEN_OUT;
1424 
1425     if (xfer->packet.ep) {
1426         ep = xfer->packet.ep;
1427         dev = ep->dev;
1428     } else {
1429         if (!xhci->slots[xfer->slotid-1].uport) {
1430             fprintf(stderr, "xhci: slot %d has no device\n",
1431                     xfer->slotid);
1432             return -1;
1433         }
1434         dev = xhci->slots[xfer->slotid-1].uport->dev;
1435         ep = usb_ep_get(dev, dir, xfer->epid >> 1);
1436     }
1437 
1438     usb_packet_setup(&xfer->packet, dir, ep, xfer->trbs[0].addr);
1439     xhci_xfer_map(xfer);
1440     DPRINTF("xhci: setup packet pid 0x%x addr %d ep %d\n",
1441             xfer->packet.pid, dev->addr, ep->nr);
1442     return 0;
1443 }
1444 
1445 static int xhci_complete_packet(XHCITransfer *xfer, int ret)
1446 {
1447     if (ret == USB_RET_ASYNC) {
1448         trace_usb_xhci_xfer_async(xfer);
1449         xfer->running_async = 1;
1450         xfer->running_retry = 0;
1451         xfer->complete = 0;
1452         xfer->cancelled = 0;
1453         return 0;
1454     } else if (ret == USB_RET_NAK) {
1455         trace_usb_xhci_xfer_nak(xfer);
1456         xfer->running_async = 0;
1457         xfer->running_retry = 1;
1458         xfer->complete = 0;
1459         xfer->cancelled = 0;
1460         return 0;
1461     } else {
1462         xfer->running_async = 0;
1463         xfer->running_retry = 0;
1464         xfer->complete = 1;
1465         xhci_xfer_unmap(xfer);
1466     }
1467 
1468     if (ret >= 0) {
1469         trace_usb_xhci_xfer_success(xfer, ret);
1470         xfer->status = CC_SUCCESS;
1471         xhci_xfer_report(xfer);
1472         return 0;
1473     }
1474 
1475     /* error */
1476     trace_usb_xhci_xfer_error(xfer, ret);
1477     switch (ret) {
1478     case USB_RET_NODEV:
1479         xfer->status = CC_USB_TRANSACTION_ERROR;
1480         xhci_xfer_report(xfer);
1481         xhci_stall_ep(xfer);
1482         break;
1483     case USB_RET_STALL:
1484         xfer->status = CC_STALL_ERROR;
1485         xhci_xfer_report(xfer);
1486         xhci_stall_ep(xfer);
1487         break;
1488     default:
1489         fprintf(stderr, "%s: FIXME: ret = %d\n", __FUNCTION__, ret);
1490         FIXME();
1491     }
1492     return 0;
1493 }
1494 
1495 static int xhci_fire_ctl_transfer(XHCIState *xhci, XHCITransfer *xfer)
1496 {
1497     XHCITRB *trb_setup, *trb_status;
1498     uint8_t bmRequestType;
1499     int ret;
1500 
1501     trb_setup = &xfer->trbs[0];
1502     trb_status = &xfer->trbs[xfer->trb_count-1];
1503 
1504     trace_usb_xhci_xfer_start(xfer, xfer->slotid, xfer->epid);
1505 
1506     /* at most one Event Data TRB allowed after STATUS */
1507     if (TRB_TYPE(*trb_status) == TR_EVDATA && xfer->trb_count > 2) {
1508         trb_status--;
1509     }
1510 
1511     /* do some sanity checks */
1512     if (TRB_TYPE(*trb_setup) != TR_SETUP) {
1513         fprintf(stderr, "xhci: ep0 first TD not SETUP: %d\n",
1514                 TRB_TYPE(*trb_setup));
1515         return -1;
1516     }
1517     if (TRB_TYPE(*trb_status) != TR_STATUS) {
1518         fprintf(stderr, "xhci: ep0 last TD not STATUS: %d\n",
1519                 TRB_TYPE(*trb_status));
1520         return -1;
1521     }
1522     if (!(trb_setup->control & TRB_TR_IDT)) {
1523         fprintf(stderr, "xhci: Setup TRB doesn't have IDT set\n");
1524         return -1;
1525     }
1526     if ((trb_setup->status & 0x1ffff) != 8) {
1527         fprintf(stderr, "xhci: Setup TRB has bad length (%d)\n",
1528                 (trb_setup->status & 0x1ffff));
1529         return -1;
1530     }
1531 
1532     bmRequestType = trb_setup->parameter;
1533 
1534     xfer->in_xfer = bmRequestType & USB_DIR_IN;
1535     xfer->iso_xfer = false;
1536 
1537     if (xhci_setup_packet(xfer) < 0) {
1538         return -1;
1539     }
1540     xfer->packet.parameter = trb_setup->parameter;
1541 
1542     ret = usb_handle_packet(xfer->packet.ep->dev, &xfer->packet);
1543 
1544     xhci_complete_packet(xfer, ret);
1545     if (!xfer->running_async && !xfer->running_retry) {
1546         xhci_kick_ep(xhci, xfer->slotid, xfer->epid);
1547     }
1548     return 0;
1549 }
1550 
1551 static void xhci_calc_iso_kick(XHCIState *xhci, XHCITransfer *xfer,
1552                                XHCIEPContext *epctx, uint64_t mfindex)
1553 {
1554     if (xfer->trbs[0].control & TRB_TR_SIA) {
1555         uint64_t asap = ((mfindex + epctx->interval - 1) &
1556                          ~(epctx->interval-1));
1557         if (asap >= epctx->mfindex_last &&
1558             asap <= epctx->mfindex_last + epctx->interval * 4) {
1559             xfer->mfindex_kick = epctx->mfindex_last + epctx->interval;
1560         } else {
1561             xfer->mfindex_kick = asap;
1562         }
1563     } else {
1564         xfer->mfindex_kick = (xfer->trbs[0].control >> TRB_TR_FRAMEID_SHIFT)
1565             & TRB_TR_FRAMEID_MASK;
1566         xfer->mfindex_kick |= mfindex & ~0x3fff;
1567         if (xfer->mfindex_kick < mfindex) {
1568             xfer->mfindex_kick += 0x4000;
1569         }
1570     }
1571 }
1572 
1573 static void xhci_check_iso_kick(XHCIState *xhci, XHCITransfer *xfer,
1574                                 XHCIEPContext *epctx, uint64_t mfindex)
1575 {
1576     if (xfer->mfindex_kick > mfindex) {
1577         qemu_mod_timer(epctx->kick_timer, qemu_get_clock_ns(vm_clock) +
1578                        (xfer->mfindex_kick - mfindex) * 125000);
1579         xfer->running_retry = 1;
1580     } else {
1581         epctx->mfindex_last = xfer->mfindex_kick;
1582         qemu_del_timer(epctx->kick_timer);
1583         xfer->running_retry = 0;
1584     }
1585 }
1586 
1587 
1588 static int xhci_submit(XHCIState *xhci, XHCITransfer *xfer, XHCIEPContext *epctx)
1589 {
1590     uint64_t mfindex;
1591     int ret;
1592 
1593     DPRINTF("xhci_submit(slotid=%d,epid=%d)\n", xfer->slotid, xfer->epid);
1594 
1595     xfer->in_xfer = epctx->type>>2;
1596 
1597     switch(epctx->type) {
1598     case ET_INTR_OUT:
1599     case ET_INTR_IN:
1600     case ET_BULK_OUT:
1601     case ET_BULK_IN:
1602         xfer->pkts = 0;
1603         xfer->iso_xfer = false;
1604         break;
1605     case ET_ISO_OUT:
1606     case ET_ISO_IN:
1607         xfer->pkts = 1;
1608         xfer->iso_xfer = true;
1609         mfindex = xhci_mfindex_get(xhci);
1610         xhci_calc_iso_kick(xhci, xfer, epctx, mfindex);
1611         xhci_check_iso_kick(xhci, xfer, epctx, mfindex);
1612         if (xfer->running_retry) {
1613             return -1;
1614         }
1615         break;
1616     default:
1617         fprintf(stderr, "xhci: unknown or unhandled EP "
1618                 "(type %d, in %d, ep %02x)\n",
1619                 epctx->type, xfer->in_xfer, xfer->epid);
1620         return -1;
1621     }
1622 
1623     if (xhci_setup_packet(xfer) < 0) {
1624         return -1;
1625     }
1626     ret = usb_handle_packet(xfer->packet.ep->dev, &xfer->packet);
1627 
1628     xhci_complete_packet(xfer, ret);
1629     if (!xfer->running_async && !xfer->running_retry) {
1630         xhci_kick_ep(xhci, xfer->slotid, xfer->epid);
1631     }
1632     return 0;
1633 }
1634 
1635 static int xhci_fire_transfer(XHCIState *xhci, XHCITransfer *xfer, XHCIEPContext *epctx)
1636 {
1637     trace_usb_xhci_xfer_start(xfer, xfer->slotid, xfer->epid);
1638     return xhci_submit(xhci, xfer, epctx);
1639 }
1640 
1641 static void xhci_kick_ep(XHCIState *xhci, unsigned int slotid, unsigned int epid)
1642 {
1643     XHCIEPContext *epctx;
1644     uint64_t mfindex;
1645     int length;
1646     int i;
1647 
1648     trace_usb_xhci_ep_kick(slotid, epid);
1649     assert(slotid >= 1 && slotid <= MAXSLOTS);
1650     assert(epid >= 1 && epid <= 31);
1651 
1652     if (!xhci->slots[slotid-1].enabled) {
1653         fprintf(stderr, "xhci: xhci_kick_ep for disabled slot %d\n", slotid);
1654         return;
1655     }
1656     epctx = xhci->slots[slotid-1].eps[epid-1];
1657     if (!epctx) {
1658         fprintf(stderr, "xhci: xhci_kick_ep for disabled endpoint %d,%d\n",
1659                 epid, slotid);
1660         return;
1661     }
1662 
1663     if (epctx->retry) {
1664         XHCITransfer *xfer = epctx->retry;
1665         int result;
1666 
1667         trace_usb_xhci_xfer_retry(xfer);
1668         assert(xfer->running_retry);
1669         if (xfer->iso_xfer) {
1670             /* retry delayed iso transfer */
1671             mfindex = xhci_mfindex_get(xhci);
1672             xhci_check_iso_kick(xhci, xfer, epctx, mfindex);
1673             if (xfer->running_retry) {
1674                 return;
1675             }
1676             if (xhci_setup_packet(xfer) < 0) {
1677                 return;
1678             }
1679             result = usb_handle_packet(xfer->packet.ep->dev, &xfer->packet);
1680             assert(result != USB_RET_NAK);
1681             xhci_complete_packet(xfer, result);
1682         } else {
1683             /* retry nak'ed transfer */
1684             if (xhci_setup_packet(xfer) < 0) {
1685                 return;
1686             }
1687             result = usb_handle_packet(xfer->packet.ep->dev, &xfer->packet);
1688             if (result == USB_RET_NAK) {
1689                 return;
1690             }
1691             xhci_complete_packet(xfer, result);
1692         }
1693         assert(!xfer->running_retry);
1694         epctx->retry = NULL;
1695     }
1696 
1697     if (epctx->state == EP_HALTED) {
1698         DPRINTF("xhci: ep halted, not running schedule\n");
1699         return;
1700     }
1701 
1702     xhci_set_ep_state(xhci, epctx, EP_RUNNING);
1703 
1704     while (1) {
1705         XHCITransfer *xfer = &epctx->transfers[epctx->next_xfer];
1706         if (xfer->running_async || xfer->running_retry) {
1707             break;
1708         }
1709         length = xhci_ring_chain_length(xhci, &epctx->ring);
1710         if (length < 0) {
1711             break;
1712         } else if (length == 0) {
1713             break;
1714         }
1715         if (xfer->trbs && xfer->trb_alloced < length) {
1716             xfer->trb_count = 0;
1717             xfer->trb_alloced = 0;
1718             g_free(xfer->trbs);
1719             xfer->trbs = NULL;
1720         }
1721         if (!xfer->trbs) {
1722             xfer->trbs = g_malloc(sizeof(XHCITRB) * length);
1723             xfer->trb_alloced = length;
1724         }
1725         xfer->trb_count = length;
1726 
1727         for (i = 0; i < length; i++) {
1728             assert(xhci_ring_fetch(xhci, &epctx->ring, &xfer->trbs[i], NULL));
1729         }
1730         xfer->xhci = xhci;
1731         xfer->epid = epid;
1732         xfer->slotid = slotid;
1733 
1734         if (epid == 1) {
1735             if (xhci_fire_ctl_transfer(xhci, xfer) >= 0) {
1736                 epctx->next_xfer = (epctx->next_xfer + 1) % TD_QUEUE;
1737             } else {
1738                 fprintf(stderr, "xhci: error firing CTL transfer\n");
1739             }
1740         } else {
1741             if (xhci_fire_transfer(xhci, xfer, epctx) >= 0) {
1742                 epctx->next_xfer = (epctx->next_xfer + 1) % TD_QUEUE;
1743             } else {
1744                 if (!xfer->iso_xfer) {
1745                     fprintf(stderr, "xhci: error firing data transfer\n");
1746                 }
1747             }
1748         }
1749 
1750         if (epctx->state == EP_HALTED) {
1751             break;
1752         }
1753         if (xfer->running_retry) {
1754             DPRINTF("xhci: xfer nacked, stopping schedule\n");
1755             epctx->retry = xfer;
1756             break;
1757         }
1758     }
1759 }
1760 
1761 static TRBCCode xhci_enable_slot(XHCIState *xhci, unsigned int slotid)
1762 {
1763     trace_usb_xhci_slot_enable(slotid);
1764     assert(slotid >= 1 && slotid <= MAXSLOTS);
1765     xhci->slots[slotid-1].enabled = 1;
1766     xhci->slots[slotid-1].uport = NULL;
1767     memset(xhci->slots[slotid-1].eps, 0, sizeof(XHCIEPContext*)*31);
1768 
1769     return CC_SUCCESS;
1770 }
1771 
1772 static TRBCCode xhci_disable_slot(XHCIState *xhci, unsigned int slotid)
1773 {
1774     int i;
1775 
1776     trace_usb_xhci_slot_disable(slotid);
1777     assert(slotid >= 1 && slotid <= MAXSLOTS);
1778 
1779     for (i = 1; i <= 31; i++) {
1780         if (xhci->slots[slotid-1].eps[i-1]) {
1781             xhci_disable_ep(xhci, slotid, i);
1782         }
1783     }
1784 
1785     xhci->slots[slotid-1].enabled = 0;
1786     return CC_SUCCESS;
1787 }
1788 
1789 static USBPort *xhci_lookup_uport(XHCIState *xhci, uint32_t *slot_ctx)
1790 {
1791     USBPort *uport;
1792     char path[32];
1793     int i, pos, port;
1794 
1795     port = (slot_ctx[1]>>16) & 0xFF;
1796     port = xhci->ports[port-1].uport->index+1;
1797     pos = snprintf(path, sizeof(path), "%d", port);
1798     for (i = 0; i < 5; i++) {
1799         port = (slot_ctx[0] >> 4*i) & 0x0f;
1800         if (!port) {
1801             break;
1802         }
1803         pos += snprintf(path + pos, sizeof(path) - pos, ".%d", port);
1804     }
1805 
1806     QTAILQ_FOREACH(uport, &xhci->bus.used, next) {
1807         if (strcmp(uport->path, path) == 0) {
1808             return uport;
1809         }
1810     }
1811     return NULL;
1812 }
1813 
1814 static TRBCCode xhci_address_slot(XHCIState *xhci, unsigned int slotid,
1815                                   uint64_t pictx, bool bsr)
1816 {
1817     XHCISlot *slot;
1818     USBPort *uport;
1819     USBDevice *dev;
1820     dma_addr_t ictx, octx, dcbaap;
1821     uint64_t poctx;
1822     uint32_t ictl_ctx[2];
1823     uint32_t slot_ctx[4];
1824     uint32_t ep0_ctx[5];
1825     int i;
1826     TRBCCode res;
1827 
1828     trace_usb_xhci_slot_address(slotid);
1829     assert(slotid >= 1 && slotid <= MAXSLOTS);
1830 
1831     dcbaap = xhci_addr64(xhci->dcbaap_low, xhci->dcbaap_high);
1832     pci_dma_read(&xhci->pci_dev, dcbaap + 8*slotid, &poctx, sizeof(poctx));
1833     ictx = xhci_mask64(pictx);
1834     octx = xhci_mask64(le64_to_cpu(poctx));
1835 
1836     DPRINTF("xhci: input context at "DMA_ADDR_FMT"\n", ictx);
1837     DPRINTF("xhci: output context at "DMA_ADDR_FMT"\n", octx);
1838 
1839     pci_dma_read(&xhci->pci_dev, ictx, ictl_ctx, sizeof(ictl_ctx));
1840 
1841     if (ictl_ctx[0] != 0x0 || ictl_ctx[1] != 0x3) {
1842         fprintf(stderr, "xhci: invalid input context control %08x %08x\n",
1843                 ictl_ctx[0], ictl_ctx[1]);
1844         return CC_TRB_ERROR;
1845     }
1846 
1847     pci_dma_read(&xhci->pci_dev, ictx+32, slot_ctx, sizeof(slot_ctx));
1848     pci_dma_read(&xhci->pci_dev, ictx+64, ep0_ctx, sizeof(ep0_ctx));
1849 
1850     DPRINTF("xhci: input slot context: %08x %08x %08x %08x\n",
1851             slot_ctx[0], slot_ctx[1], slot_ctx[2], slot_ctx[3]);
1852 
1853     DPRINTF("xhci: input ep0 context: %08x %08x %08x %08x %08x\n",
1854             ep0_ctx[0], ep0_ctx[1], ep0_ctx[2], ep0_ctx[3], ep0_ctx[4]);
1855 
1856     uport = xhci_lookup_uport(xhci, slot_ctx);
1857     if (uport == NULL) {
1858         fprintf(stderr, "xhci: port not found\n");
1859         return CC_TRB_ERROR;
1860     }
1861 
1862     dev = uport->dev;
1863     if (!dev) {
1864         fprintf(stderr, "xhci: port %s not connected\n", uport->path);
1865         return CC_USB_TRANSACTION_ERROR;
1866     }
1867 
1868     for (i = 0; i < MAXSLOTS; i++) {
1869         if (xhci->slots[i].uport == uport) {
1870             fprintf(stderr, "xhci: port %s already assigned to slot %d\n",
1871                     uport->path, i+1);
1872             return CC_TRB_ERROR;
1873         }
1874     }
1875 
1876     slot = &xhci->slots[slotid-1];
1877     slot->uport = uport;
1878     slot->ctx = octx;
1879 
1880     if (bsr) {
1881         slot_ctx[3] = SLOT_DEFAULT << SLOT_STATE_SHIFT;
1882     } else {
1883         slot->devaddr = xhci->devaddr++;
1884         slot_ctx[3] = (SLOT_ADDRESSED << SLOT_STATE_SHIFT) | slot->devaddr;
1885         DPRINTF("xhci: device address is %d\n", slot->devaddr);
1886         usb_device_handle_control(dev, NULL,
1887                                   DeviceOutRequest | USB_REQ_SET_ADDRESS,
1888                                   slot->devaddr, 0, 0, NULL);
1889     }
1890 
1891     res = xhci_enable_ep(xhci, slotid, 1, octx+32, ep0_ctx);
1892 
1893     DPRINTF("xhci: output slot context: %08x %08x %08x %08x\n",
1894             slot_ctx[0], slot_ctx[1], slot_ctx[2], slot_ctx[3]);
1895     DPRINTF("xhci: output ep0 context: %08x %08x %08x %08x %08x\n",
1896             ep0_ctx[0], ep0_ctx[1], ep0_ctx[2], ep0_ctx[3], ep0_ctx[4]);
1897 
1898     pci_dma_write(&xhci->pci_dev, octx, slot_ctx, sizeof(slot_ctx));
1899     pci_dma_write(&xhci->pci_dev, octx+32, ep0_ctx, sizeof(ep0_ctx));
1900 
1901     return res;
1902 }
1903 
1904 
1905 static TRBCCode xhci_configure_slot(XHCIState *xhci, unsigned int slotid,
1906                                   uint64_t pictx, bool dc)
1907 {
1908     dma_addr_t ictx, octx;
1909     uint32_t ictl_ctx[2];
1910     uint32_t slot_ctx[4];
1911     uint32_t islot_ctx[4];
1912     uint32_t ep_ctx[5];
1913     int i;
1914     TRBCCode res;
1915 
1916     trace_usb_xhci_slot_configure(slotid);
1917     assert(slotid >= 1 && slotid <= MAXSLOTS);
1918 
1919     ictx = xhci_mask64(pictx);
1920     octx = xhci->slots[slotid-1].ctx;
1921 
1922     DPRINTF("xhci: input context at "DMA_ADDR_FMT"\n", ictx);
1923     DPRINTF("xhci: output context at "DMA_ADDR_FMT"\n", octx);
1924 
1925     if (dc) {
1926         for (i = 2; i <= 31; i++) {
1927             if (xhci->slots[slotid-1].eps[i-1]) {
1928                 xhci_disable_ep(xhci, slotid, i);
1929             }
1930         }
1931 
1932         pci_dma_read(&xhci->pci_dev, octx, slot_ctx, sizeof(slot_ctx));
1933         slot_ctx[3] &= ~(SLOT_STATE_MASK << SLOT_STATE_SHIFT);
1934         slot_ctx[3] |= SLOT_ADDRESSED << SLOT_STATE_SHIFT;
1935         DPRINTF("xhci: output slot context: %08x %08x %08x %08x\n",
1936                 slot_ctx[0], slot_ctx[1], slot_ctx[2], slot_ctx[3]);
1937         pci_dma_write(&xhci->pci_dev, octx, slot_ctx, sizeof(slot_ctx));
1938 
1939         return CC_SUCCESS;
1940     }
1941 
1942     pci_dma_read(&xhci->pci_dev, ictx, ictl_ctx, sizeof(ictl_ctx));
1943 
1944     if ((ictl_ctx[0] & 0x3) != 0x0 || (ictl_ctx[1] & 0x3) != 0x1) {
1945         fprintf(stderr, "xhci: invalid input context control %08x %08x\n",
1946                 ictl_ctx[0], ictl_ctx[1]);
1947         return CC_TRB_ERROR;
1948     }
1949 
1950     pci_dma_read(&xhci->pci_dev, ictx+32, islot_ctx, sizeof(islot_ctx));
1951     pci_dma_read(&xhci->pci_dev, octx, slot_ctx, sizeof(slot_ctx));
1952 
1953     if (SLOT_STATE(slot_ctx[3]) < SLOT_ADDRESSED) {
1954         fprintf(stderr, "xhci: invalid slot state %08x\n", slot_ctx[3]);
1955         return CC_CONTEXT_STATE_ERROR;
1956     }
1957 
1958     for (i = 2; i <= 31; i++) {
1959         if (ictl_ctx[0] & (1<<i)) {
1960             xhci_disable_ep(xhci, slotid, i);
1961         }
1962         if (ictl_ctx[1] & (1<<i)) {
1963             pci_dma_read(&xhci->pci_dev, ictx+32+(32*i), ep_ctx,
1964                          sizeof(ep_ctx));
1965             DPRINTF("xhci: input ep%d.%d context: %08x %08x %08x %08x %08x\n",
1966                     i/2, i%2, ep_ctx[0], ep_ctx[1], ep_ctx[2],
1967                     ep_ctx[3], ep_ctx[4]);
1968             xhci_disable_ep(xhci, slotid, i);
1969             res = xhci_enable_ep(xhci, slotid, i, octx+(32*i), ep_ctx);
1970             if (res != CC_SUCCESS) {
1971                 return res;
1972             }
1973             DPRINTF("xhci: output ep%d.%d context: %08x %08x %08x %08x %08x\n",
1974                     i/2, i%2, ep_ctx[0], ep_ctx[1], ep_ctx[2],
1975                     ep_ctx[3], ep_ctx[4]);
1976             pci_dma_write(&xhci->pci_dev, octx+(32*i), ep_ctx, sizeof(ep_ctx));
1977         }
1978     }
1979 
1980     slot_ctx[3] &= ~(SLOT_STATE_MASK << SLOT_STATE_SHIFT);
1981     slot_ctx[3] |= SLOT_CONFIGURED << SLOT_STATE_SHIFT;
1982     slot_ctx[0] &= ~(SLOT_CONTEXT_ENTRIES_MASK << SLOT_CONTEXT_ENTRIES_SHIFT);
1983     slot_ctx[0] |= islot_ctx[0] & (SLOT_CONTEXT_ENTRIES_MASK <<
1984                                    SLOT_CONTEXT_ENTRIES_SHIFT);
1985     DPRINTF("xhci: output slot context: %08x %08x %08x %08x\n",
1986             slot_ctx[0], slot_ctx[1], slot_ctx[2], slot_ctx[3]);
1987 
1988     pci_dma_write(&xhci->pci_dev, octx, slot_ctx, sizeof(slot_ctx));
1989 
1990     return CC_SUCCESS;
1991 }
1992 
1993 
1994 static TRBCCode xhci_evaluate_slot(XHCIState *xhci, unsigned int slotid,
1995                                    uint64_t pictx)
1996 {
1997     dma_addr_t ictx, octx;
1998     uint32_t ictl_ctx[2];
1999     uint32_t iep0_ctx[5];
2000     uint32_t ep0_ctx[5];
2001     uint32_t islot_ctx[4];
2002     uint32_t slot_ctx[4];
2003 
2004     trace_usb_xhci_slot_evaluate(slotid);
2005     assert(slotid >= 1 && slotid <= MAXSLOTS);
2006 
2007     ictx = xhci_mask64(pictx);
2008     octx = xhci->slots[slotid-1].ctx;
2009 
2010     DPRINTF("xhci: input context at "DMA_ADDR_FMT"\n", ictx);
2011     DPRINTF("xhci: output context at "DMA_ADDR_FMT"\n", octx);
2012 
2013     pci_dma_read(&xhci->pci_dev, ictx, ictl_ctx, sizeof(ictl_ctx));
2014 
2015     if (ictl_ctx[0] != 0x0 || ictl_ctx[1] & ~0x3) {
2016         fprintf(stderr, "xhci: invalid input context control %08x %08x\n",
2017                 ictl_ctx[0], ictl_ctx[1]);
2018         return CC_TRB_ERROR;
2019     }
2020 
2021     if (ictl_ctx[1] & 0x1) {
2022         pci_dma_read(&xhci->pci_dev, ictx+32, islot_ctx, sizeof(islot_ctx));
2023 
2024         DPRINTF("xhci: input slot context: %08x %08x %08x %08x\n",
2025                 islot_ctx[0], islot_ctx[1], islot_ctx[2], islot_ctx[3]);
2026 
2027         pci_dma_read(&xhci->pci_dev, octx, slot_ctx, sizeof(slot_ctx));
2028 
2029         slot_ctx[1] &= ~0xFFFF; /* max exit latency */
2030         slot_ctx[1] |= islot_ctx[1] & 0xFFFF;
2031         slot_ctx[2] &= ~0xFF00000; /* interrupter target */
2032         slot_ctx[2] |= islot_ctx[2] & 0xFF000000;
2033 
2034         DPRINTF("xhci: output slot context: %08x %08x %08x %08x\n",
2035                 slot_ctx[0], slot_ctx[1], slot_ctx[2], slot_ctx[3]);
2036 
2037         pci_dma_write(&xhci->pci_dev, octx, slot_ctx, sizeof(slot_ctx));
2038     }
2039 
2040     if (ictl_ctx[1] & 0x2) {
2041         pci_dma_read(&xhci->pci_dev, ictx+64, iep0_ctx, sizeof(iep0_ctx));
2042 
2043         DPRINTF("xhci: input ep0 context: %08x %08x %08x %08x %08x\n",
2044                 iep0_ctx[0], iep0_ctx[1], iep0_ctx[2],
2045                 iep0_ctx[3], iep0_ctx[4]);
2046 
2047         pci_dma_read(&xhci->pci_dev, octx+32, ep0_ctx, sizeof(ep0_ctx));
2048 
2049         ep0_ctx[1] &= ~0xFFFF0000; /* max packet size*/
2050         ep0_ctx[1] |= iep0_ctx[1] & 0xFFFF0000;
2051 
2052         DPRINTF("xhci: output ep0 context: %08x %08x %08x %08x %08x\n",
2053                 ep0_ctx[0], ep0_ctx[1], ep0_ctx[2], ep0_ctx[3], ep0_ctx[4]);
2054 
2055         pci_dma_write(&xhci->pci_dev, octx+32, ep0_ctx, sizeof(ep0_ctx));
2056     }
2057 
2058     return CC_SUCCESS;
2059 }
2060 
2061 static TRBCCode xhci_reset_slot(XHCIState *xhci, unsigned int slotid)
2062 {
2063     uint32_t slot_ctx[4];
2064     dma_addr_t octx;
2065     int i;
2066 
2067     trace_usb_xhci_slot_reset(slotid);
2068     assert(slotid >= 1 && slotid <= MAXSLOTS);
2069 
2070     octx = xhci->slots[slotid-1].ctx;
2071 
2072     DPRINTF("xhci: output context at "DMA_ADDR_FMT"\n", octx);
2073 
2074     for (i = 2; i <= 31; i++) {
2075         if (xhci->slots[slotid-1].eps[i-1]) {
2076             xhci_disable_ep(xhci, slotid, i);
2077         }
2078     }
2079 
2080     pci_dma_read(&xhci->pci_dev, octx, slot_ctx, sizeof(slot_ctx));
2081     slot_ctx[3] &= ~(SLOT_STATE_MASK << SLOT_STATE_SHIFT);
2082     slot_ctx[3] |= SLOT_DEFAULT << SLOT_STATE_SHIFT;
2083     DPRINTF("xhci: output slot context: %08x %08x %08x %08x\n",
2084             slot_ctx[0], slot_ctx[1], slot_ctx[2], slot_ctx[3]);
2085     pci_dma_write(&xhci->pci_dev, octx, slot_ctx, sizeof(slot_ctx));
2086 
2087     return CC_SUCCESS;
2088 }
2089 
2090 static unsigned int xhci_get_slot(XHCIState *xhci, XHCIEvent *event, XHCITRB *trb)
2091 {
2092     unsigned int slotid;
2093     slotid = (trb->control >> TRB_CR_SLOTID_SHIFT) & TRB_CR_SLOTID_MASK;
2094     if (slotid < 1 || slotid > MAXSLOTS) {
2095         fprintf(stderr, "xhci: bad slot id %d\n", slotid);
2096         event->ccode = CC_TRB_ERROR;
2097         return 0;
2098     } else if (!xhci->slots[slotid-1].enabled) {
2099         fprintf(stderr, "xhci: slot id %d not enabled\n", slotid);
2100         event->ccode = CC_SLOT_NOT_ENABLED_ERROR;
2101         return 0;
2102     }
2103     return slotid;
2104 }
2105 
2106 static TRBCCode xhci_get_port_bandwidth(XHCIState *xhci, uint64_t pctx)
2107 {
2108     dma_addr_t ctx;
2109     uint8_t bw_ctx[xhci->numports+1];
2110 
2111     DPRINTF("xhci_get_port_bandwidth()\n");
2112 
2113     ctx = xhci_mask64(pctx);
2114 
2115     DPRINTF("xhci: bandwidth context at "DMA_ADDR_FMT"\n", ctx);
2116 
2117     /* TODO: actually implement real values here */
2118     bw_ctx[0] = 0;
2119     memset(&bw_ctx[1], 80, xhci->numports); /* 80% */
2120     pci_dma_write(&xhci->pci_dev, ctx, bw_ctx, sizeof(bw_ctx));
2121 
2122     return CC_SUCCESS;
2123 }
2124 
2125 static uint32_t rotl(uint32_t v, unsigned count)
2126 {
2127     count &= 31;
2128     return (v << count) | (v >> (32 - count));
2129 }
2130 
2131 
2132 static uint32_t xhci_nec_challenge(uint32_t hi, uint32_t lo)
2133 {
2134     uint32_t val;
2135     val = rotl(lo - 0x49434878, 32 - ((hi>>8) & 0x1F));
2136     val += rotl(lo + 0x49434878, hi & 0x1F);
2137     val -= rotl(hi ^ 0x49434878, (lo >> 16) & 0x1F);
2138     return ~val;
2139 }
2140 
2141 static void xhci_via_challenge(XHCIState *xhci, uint64_t addr)
2142 {
2143     uint32_t buf[8];
2144     uint32_t obuf[8];
2145     dma_addr_t paddr = xhci_mask64(addr);
2146 
2147     pci_dma_read(&xhci->pci_dev, paddr, &buf, 32);
2148 
2149     memcpy(obuf, buf, sizeof(obuf));
2150 
2151     if ((buf[0] & 0xff) == 2) {
2152         obuf[0] = 0x49932000 + 0x54dc200 * buf[2] + 0x7429b578 * buf[3];
2153         obuf[0] |=  (buf[2] * buf[3]) & 0xff;
2154         obuf[1] = 0x0132bb37 + 0xe89 * buf[2] + 0xf09 * buf[3];
2155         obuf[2] = 0x0066c2e9 + 0x2091 * buf[2] + 0x19bd * buf[3];
2156         obuf[3] = 0xd5281342 + 0x2cc9691 * buf[2] + 0x2367662 * buf[3];
2157         obuf[4] = 0x0123c75c + 0x1595 * buf[2] + 0x19ec * buf[3];
2158         obuf[5] = 0x00f695de + 0x26fd * buf[2] + 0x3e9 * buf[3];
2159         obuf[6] = obuf[2] ^ obuf[3] ^ 0x29472956;
2160         obuf[7] = obuf[2] ^ obuf[3] ^ 0x65866593;
2161     }
2162 
2163     pci_dma_write(&xhci->pci_dev, paddr, &obuf, 32);
2164 }
2165 
2166 static void xhci_process_commands(XHCIState *xhci)
2167 {
2168     XHCITRB trb;
2169     TRBType type;
2170     XHCIEvent event = {ER_COMMAND_COMPLETE, CC_SUCCESS};
2171     dma_addr_t addr;
2172     unsigned int i, slotid = 0;
2173 
2174     DPRINTF("xhci_process_commands()\n");
2175     if (!xhci_running(xhci)) {
2176         DPRINTF("xhci_process_commands() called while xHC stopped or paused\n");
2177         return;
2178     }
2179 
2180     xhci->crcr_low |= CRCR_CRR;
2181 
2182     while ((type = xhci_ring_fetch(xhci, &xhci->cmd_ring, &trb, &addr))) {
2183         event.ptr = addr;
2184         switch (type) {
2185         case CR_ENABLE_SLOT:
2186             for (i = 0; i < MAXSLOTS; i++) {
2187                 if (!xhci->slots[i].enabled) {
2188                     break;
2189                 }
2190             }
2191             if (i >= MAXSLOTS) {
2192                 fprintf(stderr, "xhci: no device slots available\n");
2193                 event.ccode = CC_NO_SLOTS_ERROR;
2194             } else {
2195                 slotid = i+1;
2196                 event.ccode = xhci_enable_slot(xhci, slotid);
2197             }
2198             break;
2199         case CR_DISABLE_SLOT:
2200             slotid = xhci_get_slot(xhci, &event, &trb);
2201             if (slotid) {
2202                 event.ccode = xhci_disable_slot(xhci, slotid);
2203             }
2204             break;
2205         case CR_ADDRESS_DEVICE:
2206             slotid = xhci_get_slot(xhci, &event, &trb);
2207             if (slotid) {
2208                 event.ccode = xhci_address_slot(xhci, slotid, trb.parameter,
2209                                                 trb.control & TRB_CR_BSR);
2210             }
2211             break;
2212         case CR_CONFIGURE_ENDPOINT:
2213             slotid = xhci_get_slot(xhci, &event, &trb);
2214             if (slotid) {
2215                 event.ccode = xhci_configure_slot(xhci, slotid, trb.parameter,
2216                                                   trb.control & TRB_CR_DC);
2217             }
2218             break;
2219         case CR_EVALUATE_CONTEXT:
2220             slotid = xhci_get_slot(xhci, &event, &trb);
2221             if (slotid) {
2222                 event.ccode = xhci_evaluate_slot(xhci, slotid, trb.parameter);
2223             }
2224             break;
2225         case CR_STOP_ENDPOINT:
2226             slotid = xhci_get_slot(xhci, &event, &trb);
2227             if (slotid) {
2228                 unsigned int epid = (trb.control >> TRB_CR_EPID_SHIFT)
2229                     & TRB_CR_EPID_MASK;
2230                 event.ccode = xhci_stop_ep(xhci, slotid, epid);
2231             }
2232             break;
2233         case CR_RESET_ENDPOINT:
2234             slotid = xhci_get_slot(xhci, &event, &trb);
2235             if (slotid) {
2236                 unsigned int epid = (trb.control >> TRB_CR_EPID_SHIFT)
2237                     & TRB_CR_EPID_MASK;
2238                 event.ccode = xhci_reset_ep(xhci, slotid, epid);
2239             }
2240             break;
2241         case CR_SET_TR_DEQUEUE:
2242             slotid = xhci_get_slot(xhci, &event, &trb);
2243             if (slotid) {
2244                 unsigned int epid = (trb.control >> TRB_CR_EPID_SHIFT)
2245                     & TRB_CR_EPID_MASK;
2246                 event.ccode = xhci_set_ep_dequeue(xhci, slotid, epid,
2247                                                   trb.parameter);
2248             }
2249             break;
2250         case CR_RESET_DEVICE:
2251             slotid = xhci_get_slot(xhci, &event, &trb);
2252             if (slotid) {
2253                 event.ccode = xhci_reset_slot(xhci, slotid);
2254             }
2255             break;
2256         case CR_GET_PORT_BANDWIDTH:
2257             event.ccode = xhci_get_port_bandwidth(xhci, trb.parameter);
2258             break;
2259         case CR_VENDOR_VIA_CHALLENGE_RESPONSE:
2260             xhci_via_challenge(xhci, trb.parameter);
2261             break;
2262         case CR_VENDOR_NEC_FIRMWARE_REVISION:
2263             event.type = 48; /* NEC reply */
2264             event.length = 0x3025;
2265             break;
2266         case CR_VENDOR_NEC_CHALLENGE_RESPONSE:
2267         {
2268             uint32_t chi = trb.parameter >> 32;
2269             uint32_t clo = trb.parameter;
2270             uint32_t val = xhci_nec_challenge(chi, clo);
2271             event.length = val & 0xFFFF;
2272             event.epid = val >> 16;
2273             slotid = val >> 24;
2274             event.type = 48; /* NEC reply */
2275         }
2276         break;
2277         default:
2278             fprintf(stderr, "xhci: unimplemented command %d\n", type);
2279             event.ccode = CC_TRB_ERROR;
2280             break;
2281         }
2282         event.slotid = slotid;
2283         xhci_event(xhci, &event, 0);
2284     }
2285 }
2286 
2287 static void xhci_update_port(XHCIState *xhci, XHCIPort *port, int is_detach)
2288 {
2289     port->portsc = PORTSC_PP;
2290     if (port->uport->dev && port->uport->dev->attached && !is_detach &&
2291         (1 << port->uport->dev->speed) & port->speedmask) {
2292         port->portsc |= PORTSC_CCS;
2293         switch (port->uport->dev->speed) {
2294         case USB_SPEED_LOW:
2295             port->portsc |= PORTSC_SPEED_LOW;
2296             break;
2297         case USB_SPEED_FULL:
2298             port->portsc |= PORTSC_SPEED_FULL;
2299             break;
2300         case USB_SPEED_HIGH:
2301             port->portsc |= PORTSC_SPEED_HIGH;
2302             break;
2303         case USB_SPEED_SUPER:
2304             port->portsc |= PORTSC_SPEED_SUPER;
2305             break;
2306         }
2307     }
2308 
2309     if (xhci_running(xhci)) {
2310         port->portsc |= PORTSC_CSC;
2311         XHCIEvent ev = { ER_PORT_STATUS_CHANGE, CC_SUCCESS,
2312                          port->portnr << 24};
2313         xhci_event(xhci, &ev, 0);
2314         DPRINTF("xhci: port change event for port %d\n", port->portnr);
2315     }
2316 }
2317 
2318 static void xhci_reset(DeviceState *dev)
2319 {
2320     XHCIState *xhci = DO_UPCAST(XHCIState, pci_dev.qdev, dev);
2321     int i;
2322 
2323     trace_usb_xhci_reset();
2324     if (!(xhci->usbsts & USBSTS_HCH)) {
2325         fprintf(stderr, "xhci: reset while running!\n");
2326     }
2327 
2328     xhci->usbcmd = 0;
2329     xhci->usbsts = USBSTS_HCH;
2330     xhci->dnctrl = 0;
2331     xhci->crcr_low = 0;
2332     xhci->crcr_high = 0;
2333     xhci->dcbaap_low = 0;
2334     xhci->dcbaap_high = 0;
2335     xhci->config = 0;
2336     xhci->devaddr = 2;
2337 
2338     for (i = 0; i < MAXSLOTS; i++) {
2339         xhci_disable_slot(xhci, i+1);
2340     }
2341 
2342     for (i = 0; i < xhci->numports; i++) {
2343         xhci_update_port(xhci, xhci->ports + i, 0);
2344     }
2345 
2346     for (i = 0; i < MAXINTRS; i++) {
2347         xhci->intr[i].iman = 0;
2348         xhci->intr[i].imod = 0;
2349         xhci->intr[i].erstsz = 0;
2350         xhci->intr[i].erstba_low = 0;
2351         xhci->intr[i].erstba_high = 0;
2352         xhci->intr[i].erdp_low = 0;
2353         xhci->intr[i].erdp_high = 0;
2354         xhci->intr[i].msix_used = 0;
2355 
2356         xhci->intr[i].er_ep_idx = 0;
2357         xhci->intr[i].er_pcs = 1;
2358         xhci->intr[i].er_full = 0;
2359         xhci->intr[i].ev_buffer_put = 0;
2360         xhci->intr[i].ev_buffer_get = 0;
2361     }
2362 
2363     xhci->mfindex_start = qemu_get_clock_ns(vm_clock);
2364     xhci_mfwrap_update(xhci);
2365 }
2366 
2367 static uint64_t xhci_cap_read(void *ptr, target_phys_addr_t reg, unsigned size)
2368 {
2369     XHCIState *xhci = ptr;
2370     uint32_t ret;
2371 
2372     switch (reg) {
2373     case 0x00: /* HCIVERSION, CAPLENGTH */
2374         ret = 0x01000000 | LEN_CAP;
2375         break;
2376     case 0x04: /* HCSPARAMS 1 */
2377         ret = ((xhci->numports_2+xhci->numports_3)<<24)
2378             | (MAXINTRS<<8) | MAXSLOTS;
2379         break;
2380     case 0x08: /* HCSPARAMS 2 */
2381         ret = 0x0000000f;
2382         break;
2383     case 0x0c: /* HCSPARAMS 3 */
2384         ret = 0x00000000;
2385         break;
2386     case 0x10: /* HCCPARAMS */
2387         if (sizeof(dma_addr_t) == 4) {
2388             ret = 0x00081000;
2389         } else {
2390             ret = 0x00081001;
2391         }
2392         break;
2393     case 0x14: /* DBOFF */
2394         ret = OFF_DOORBELL;
2395         break;
2396     case 0x18: /* RTSOFF */
2397         ret = OFF_RUNTIME;
2398         break;
2399 
2400     /* extended capabilities */
2401     case 0x20: /* Supported Protocol:00 */
2402         ret = 0x02000402; /* USB 2.0 */
2403         break;
2404     case 0x24: /* Supported Protocol:04 */
2405         ret = 0x20425455; /* "USB " */
2406         break;
2407     case 0x28: /* Supported Protocol:08 */
2408         ret = 0x00000001 | (xhci->numports_2<<8);
2409         break;
2410     case 0x2c: /* Supported Protocol:0c */
2411         ret = 0x00000000; /* reserved */
2412         break;
2413     case 0x30: /* Supported Protocol:00 */
2414         ret = 0x03000002; /* USB 3.0 */
2415         break;
2416     case 0x34: /* Supported Protocol:04 */
2417         ret = 0x20425455; /* "USB " */
2418         break;
2419     case 0x38: /* Supported Protocol:08 */
2420         ret = 0x00000000 | (xhci->numports_2+1) | (xhci->numports_3<<8);
2421         break;
2422     case 0x3c: /* Supported Protocol:0c */
2423         ret = 0x00000000; /* reserved */
2424         break;
2425     default:
2426         fprintf(stderr, "xhci_cap_read: reg %d unimplemented\n", (int)reg);
2427         ret = 0;
2428     }
2429 
2430     trace_usb_xhci_cap_read(reg, ret);
2431     return ret;
2432 }
2433 
2434 static uint64_t xhci_port_read(void *ptr, target_phys_addr_t reg, unsigned size)
2435 {
2436     XHCIPort *port = ptr;
2437     uint32_t ret;
2438 
2439     switch (reg) {
2440     case 0x00: /* PORTSC */
2441         ret = port->portsc;
2442         break;
2443     case 0x04: /* PORTPMSC */
2444     case 0x08: /* PORTLI */
2445         ret = 0;
2446         break;
2447     case 0x0c: /* reserved */
2448     default:
2449         fprintf(stderr, "xhci_port_read (port %d): reg 0x%x unimplemented\n",
2450                 port->portnr, (uint32_t)reg);
2451         ret = 0;
2452     }
2453 
2454     trace_usb_xhci_port_read(port->portnr, reg, ret);
2455     return ret;
2456 }
2457 
2458 static void xhci_port_write(void *ptr, target_phys_addr_t reg,
2459                             uint64_t val, unsigned size)
2460 {
2461     XHCIPort *port = ptr;
2462     uint32_t portsc;
2463 
2464     trace_usb_xhci_port_write(port->portnr, reg, val);
2465 
2466     switch (reg) {
2467     case 0x00: /* PORTSC */
2468         portsc = port->portsc;
2469         /* write-1-to-clear bits*/
2470         portsc &= ~(val & (PORTSC_CSC|PORTSC_PEC|PORTSC_WRC|PORTSC_OCC|
2471                            PORTSC_PRC|PORTSC_PLC|PORTSC_CEC));
2472         if (val & PORTSC_LWS) {
2473             /* overwrite PLS only when LWS=1 */
2474             portsc &= ~(PORTSC_PLS_MASK << PORTSC_PLS_SHIFT);
2475             portsc |= val & (PORTSC_PLS_MASK << PORTSC_PLS_SHIFT);
2476         }
2477         /* read/write bits */
2478         portsc &= ~(PORTSC_PP|PORTSC_WCE|PORTSC_WDE|PORTSC_WOE);
2479         portsc |= (val & (PORTSC_PP|PORTSC_WCE|PORTSC_WDE|PORTSC_WOE));
2480         /* write-1-to-start bits */
2481         if (val & PORTSC_PR) {
2482             DPRINTF("xhci: port %d reset\n", port);
2483             usb_device_reset(port->uport->dev);
2484             portsc |= PORTSC_PRC | PORTSC_PED;
2485         }
2486         port->portsc = portsc;
2487         break;
2488     case 0x04: /* PORTPMSC */
2489     case 0x08: /* PORTLI */
2490     default:
2491         fprintf(stderr, "xhci_port_write (port %d): reg 0x%x unimplemented\n",
2492                 port->portnr, (uint32_t)reg);
2493     }
2494 }
2495 
2496 static uint64_t xhci_oper_read(void *ptr, target_phys_addr_t reg, unsigned size)
2497 {
2498     XHCIState *xhci = ptr;
2499     uint32_t ret;
2500 
2501     switch (reg) {
2502     case 0x00: /* USBCMD */
2503         ret = xhci->usbcmd;
2504         break;
2505     case 0x04: /* USBSTS */
2506         ret = xhci->usbsts;
2507         break;
2508     case 0x08: /* PAGESIZE */
2509         ret = 1; /* 4KiB */
2510         break;
2511     case 0x14: /* DNCTRL */
2512         ret = xhci->dnctrl;
2513         break;
2514     case 0x18: /* CRCR low */
2515         ret = xhci->crcr_low & ~0xe;
2516         break;
2517     case 0x1c: /* CRCR high */
2518         ret = xhci->crcr_high;
2519         break;
2520     case 0x30: /* DCBAAP low */
2521         ret = xhci->dcbaap_low;
2522         break;
2523     case 0x34: /* DCBAAP high */
2524         ret = xhci->dcbaap_high;
2525         break;
2526     case 0x38: /* CONFIG */
2527         ret = xhci->config;
2528         break;
2529     default:
2530         fprintf(stderr, "xhci_oper_read: reg 0x%x unimplemented\n", (int)reg);
2531         ret = 0;
2532     }
2533 
2534     trace_usb_xhci_oper_read(reg, ret);
2535     return ret;
2536 }
2537 
2538 static void xhci_oper_write(void *ptr, target_phys_addr_t reg,
2539                             uint64_t val, unsigned size)
2540 {
2541     XHCIState *xhci = ptr;
2542 
2543     trace_usb_xhci_oper_write(reg, val);
2544 
2545     switch (reg) {
2546     case 0x00: /* USBCMD */
2547         if ((val & USBCMD_RS) && !(xhci->usbcmd & USBCMD_RS)) {
2548             xhci_run(xhci);
2549         } else if (!(val & USBCMD_RS) && (xhci->usbcmd & USBCMD_RS)) {
2550             xhci_stop(xhci);
2551         }
2552         xhci->usbcmd = val & 0xc0f;
2553         xhci_mfwrap_update(xhci);
2554         if (val & USBCMD_HCRST) {
2555             xhci_reset(&xhci->pci_dev.qdev);
2556         }
2557         xhci_intx_update(xhci);
2558         break;
2559 
2560     case 0x04: /* USBSTS */
2561         /* these bits are write-1-to-clear */
2562         xhci->usbsts &= ~(val & (USBSTS_HSE|USBSTS_EINT|USBSTS_PCD|USBSTS_SRE));
2563         xhci_intx_update(xhci);
2564         break;
2565 
2566     case 0x14: /* DNCTRL */
2567         xhci->dnctrl = val & 0xffff;
2568         break;
2569     case 0x18: /* CRCR low */
2570         xhci->crcr_low = (val & 0xffffffcf) | (xhci->crcr_low & CRCR_CRR);
2571         break;
2572     case 0x1c: /* CRCR high */
2573         xhci->crcr_high = val;
2574         if (xhci->crcr_low & (CRCR_CA|CRCR_CS) && (xhci->crcr_low & CRCR_CRR)) {
2575             XHCIEvent event = {ER_COMMAND_COMPLETE, CC_COMMAND_RING_STOPPED};
2576             xhci->crcr_low &= ~CRCR_CRR;
2577             xhci_event(xhci, &event, 0);
2578             DPRINTF("xhci: command ring stopped (CRCR=%08x)\n", xhci->crcr_low);
2579         } else {
2580             dma_addr_t base = xhci_addr64(xhci->crcr_low & ~0x3f, val);
2581             xhci_ring_init(xhci, &xhci->cmd_ring, base);
2582         }
2583         xhci->crcr_low &= ~(CRCR_CA | CRCR_CS);
2584         break;
2585     case 0x30: /* DCBAAP low */
2586         xhci->dcbaap_low = val & 0xffffffc0;
2587         break;
2588     case 0x34: /* DCBAAP high */
2589         xhci->dcbaap_high = val;
2590         break;
2591     case 0x38: /* CONFIG */
2592         xhci->config = val & 0xff;
2593         break;
2594     default:
2595         fprintf(stderr, "xhci_oper_write: reg 0x%x unimplemented\n", (int)reg);
2596     }
2597 }
2598 
2599 static uint64_t xhci_runtime_read(void *ptr, target_phys_addr_t reg,
2600                                   unsigned size)
2601 {
2602     XHCIState *xhci = ptr;
2603     uint32_t ret = 0;
2604 
2605     if (reg < 0x20) {
2606         switch (reg) {
2607         case 0x00: /* MFINDEX */
2608             ret = xhci_mfindex_get(xhci) & 0x3fff;
2609             break;
2610         default:
2611             fprintf(stderr, "xhci_runtime_read: reg 0x%x unimplemented\n",
2612                     (int)reg);
2613             break;
2614         }
2615     } else {
2616         int v = (reg - 0x20) / 0x20;
2617         XHCIInterrupter *intr = &xhci->intr[v];
2618         switch (reg & 0x1f) {
2619         case 0x00: /* IMAN */
2620             ret = intr->iman;
2621             break;
2622         case 0x04: /* IMOD */
2623             ret = intr->imod;
2624             break;
2625         case 0x08: /* ERSTSZ */
2626             ret = intr->erstsz;
2627             break;
2628         case 0x10: /* ERSTBA low */
2629             ret = intr->erstba_low;
2630             break;
2631         case 0x14: /* ERSTBA high */
2632             ret = intr->erstba_high;
2633             break;
2634         case 0x18: /* ERDP low */
2635             ret = intr->erdp_low;
2636             break;
2637         case 0x1c: /* ERDP high */
2638             ret = intr->erdp_high;
2639             break;
2640         }
2641     }
2642 
2643     trace_usb_xhci_runtime_read(reg, ret);
2644     return ret;
2645 }
2646 
2647 static void xhci_runtime_write(void *ptr, target_phys_addr_t reg,
2648                                uint64_t val, unsigned size)
2649 {
2650     XHCIState *xhci = ptr;
2651     int v = (reg - 0x20) / 0x20;
2652     XHCIInterrupter *intr = &xhci->intr[v];
2653     trace_usb_xhci_runtime_write(reg, val);
2654 
2655     if (reg < 0x20) {
2656         fprintf(stderr, "xhci_oper_write: reg 0x%x unimplemented\n", (int)reg);
2657         return;
2658     }
2659 
2660     switch (reg & 0x1f) {
2661     case 0x00: /* IMAN */
2662         if (val & IMAN_IP) {
2663             intr->iman &= ~IMAN_IP;
2664         }
2665         intr->iman &= ~IMAN_IE;
2666         intr->iman |= val & IMAN_IE;
2667         if (v == 0) {
2668             xhci_intx_update(xhci);
2669         }
2670         xhci_msix_update(xhci, v);
2671         break;
2672     case 0x04: /* IMOD */
2673         intr->imod = val;
2674         break;
2675     case 0x08: /* ERSTSZ */
2676         intr->erstsz = val & 0xffff;
2677         break;
2678     case 0x10: /* ERSTBA low */
2679         /* XXX NEC driver bug: it doesn't align this to 64 bytes
2680         intr->erstba_low = val & 0xffffffc0; */
2681         intr->erstba_low = val & 0xfffffff0;
2682         break;
2683     case 0x14: /* ERSTBA high */
2684         intr->erstba_high = val;
2685         xhci_er_reset(xhci, v);
2686         break;
2687     case 0x18: /* ERDP low */
2688         if (val & ERDP_EHB) {
2689             intr->erdp_low &= ~ERDP_EHB;
2690         }
2691         intr->erdp_low = (val & ~ERDP_EHB) | (intr->erdp_low & ERDP_EHB);
2692         break;
2693     case 0x1c: /* ERDP high */
2694         intr->erdp_high = val;
2695         xhci_events_update(xhci, v);
2696         break;
2697     default:
2698         fprintf(stderr, "xhci_oper_write: reg 0x%x unimplemented\n",
2699                 (int)reg);
2700     }
2701 }
2702 
2703 static uint64_t xhci_doorbell_read(void *ptr, target_phys_addr_t reg,
2704                                    unsigned size)
2705 {
2706     /* doorbells always read as 0 */
2707     trace_usb_xhci_doorbell_read(reg, 0);
2708     return 0;
2709 }
2710 
2711 static void xhci_doorbell_write(void *ptr, target_phys_addr_t reg,
2712                                 uint64_t val, unsigned size)
2713 {
2714     XHCIState *xhci = ptr;
2715 
2716     trace_usb_xhci_doorbell_write(reg, val);
2717 
2718     if (!xhci_running(xhci)) {
2719         fprintf(stderr, "xhci: wrote doorbell while xHC stopped or paused\n");
2720         return;
2721     }
2722 
2723     reg >>= 2;
2724 
2725     if (reg == 0) {
2726         if (val == 0) {
2727             xhci_process_commands(xhci);
2728         } else {
2729             fprintf(stderr, "xhci: bad doorbell 0 write: 0x%x\n",
2730                     (uint32_t)val);
2731         }
2732     } else {
2733         if (reg > MAXSLOTS) {
2734             fprintf(stderr, "xhci: bad doorbell %d\n", (int)reg);
2735         } else if (val > 31) {
2736             fprintf(stderr, "xhci: bad doorbell %d write: 0x%x\n",
2737                     (int)reg, (uint32_t)val);
2738         } else {
2739             xhci_kick_ep(xhci, reg, val);
2740         }
2741     }
2742 }
2743 
2744 static const MemoryRegionOps xhci_cap_ops = {
2745     .read = xhci_cap_read,
2746     .valid.min_access_size = 1,
2747     .valid.max_access_size = 4,
2748     .impl.min_access_size = 4,
2749     .impl.max_access_size = 4,
2750     .endianness = DEVICE_LITTLE_ENDIAN,
2751 };
2752 
2753 static const MemoryRegionOps xhci_oper_ops = {
2754     .read = xhci_oper_read,
2755     .write = xhci_oper_write,
2756     .valid.min_access_size = 4,
2757     .valid.max_access_size = 4,
2758     .endianness = DEVICE_LITTLE_ENDIAN,
2759 };
2760 
2761 static const MemoryRegionOps xhci_port_ops = {
2762     .read = xhci_port_read,
2763     .write = xhci_port_write,
2764     .valid.min_access_size = 4,
2765     .valid.max_access_size = 4,
2766     .endianness = DEVICE_LITTLE_ENDIAN,
2767 };
2768 
2769 static const MemoryRegionOps xhci_runtime_ops = {
2770     .read = xhci_runtime_read,
2771     .write = xhci_runtime_write,
2772     .valid.min_access_size = 4,
2773     .valid.max_access_size = 4,
2774     .endianness = DEVICE_LITTLE_ENDIAN,
2775 };
2776 
2777 static const MemoryRegionOps xhci_doorbell_ops = {
2778     .read = xhci_doorbell_read,
2779     .write = xhci_doorbell_write,
2780     .valid.min_access_size = 4,
2781     .valid.max_access_size = 4,
2782     .endianness = DEVICE_LITTLE_ENDIAN,
2783 };
2784 
2785 static void xhci_attach(USBPort *usbport)
2786 {
2787     XHCIState *xhci = usbport->opaque;
2788     XHCIPort *port = xhci_lookup_port(xhci, usbport);
2789 
2790     xhci_update_port(xhci, port, 0);
2791 }
2792 
2793 static void xhci_detach(USBPort *usbport)
2794 {
2795     XHCIState *xhci = usbport->opaque;
2796     XHCIPort *port = xhci_lookup_port(xhci, usbport);
2797 
2798     xhci_update_port(xhci, port, 1);
2799 }
2800 
2801 static void xhci_wakeup(USBPort *usbport)
2802 {
2803     XHCIState *xhci = usbport->opaque;
2804     XHCIPort *port = xhci_lookup_port(xhci, usbport);
2805     XHCIEvent ev = { ER_PORT_STATUS_CHANGE, CC_SUCCESS,
2806                      port->portnr << 24};
2807     uint32_t pls;
2808 
2809     pls = (port->portsc >> PORTSC_PLS_SHIFT) & PORTSC_PLS_MASK;
2810     if (pls != 3) {
2811         return;
2812     }
2813     port->portsc |= 0xf << PORTSC_PLS_SHIFT;
2814     if (port->portsc & PORTSC_PLC) {
2815         return;
2816     }
2817     port->portsc |= PORTSC_PLC;
2818     xhci_event(xhci, &ev, 0);
2819 }
2820 
2821 static void xhci_complete(USBPort *port, USBPacket *packet)
2822 {
2823     XHCITransfer *xfer = container_of(packet, XHCITransfer, packet);
2824 
2825     xhci_complete_packet(xfer, packet->result);
2826     xhci_kick_ep(xfer->xhci, xfer->slotid, xfer->epid);
2827 }
2828 
2829 static void xhci_child_detach(USBPort *uport, USBDevice *child)
2830 {
2831     USBBus *bus = usb_bus_from_device(child);
2832     XHCIState *xhci = container_of(bus, XHCIState, bus);
2833     int i;
2834 
2835     for (i = 0; i < MAXSLOTS; i++) {
2836         if (xhci->slots[i].uport == uport) {
2837             xhci->slots[i].uport = NULL;
2838         }
2839     }
2840 }
2841 
2842 static USBPortOps xhci_uport_ops = {
2843     .attach   = xhci_attach,
2844     .detach   = xhci_detach,
2845     .wakeup   = xhci_wakeup,
2846     .complete = xhci_complete,
2847     .child_detach = xhci_child_detach,
2848 };
2849 
2850 static int xhci_find_slotid(XHCIState *xhci, USBDevice *dev)
2851 {
2852     XHCISlot *slot;
2853     int slotid;
2854 
2855     for (slotid = 1; slotid <= MAXSLOTS; slotid++) {
2856         slot = &xhci->slots[slotid-1];
2857         if (slot->devaddr == dev->addr) {
2858             return slotid;
2859         }
2860     }
2861     return 0;
2862 }
2863 
2864 static int xhci_find_epid(USBEndpoint *ep)
2865 {
2866     if (ep->nr == 0) {
2867         return 1;
2868     }
2869     if (ep->pid == USB_TOKEN_IN) {
2870         return ep->nr * 2 + 1;
2871     } else {
2872         return ep->nr * 2;
2873     }
2874 }
2875 
2876 static void xhci_wakeup_endpoint(USBBus *bus, USBEndpoint *ep)
2877 {
2878     XHCIState *xhci = container_of(bus, XHCIState, bus);
2879     int slotid;
2880 
2881     DPRINTF("%s\n", __func__);
2882     slotid = xhci_find_slotid(xhci, ep->dev);
2883     if (slotid == 0 || !xhci->slots[slotid-1].enabled) {
2884         DPRINTF("%s: oops, no slot for dev %d\n", __func__, ep->dev->addr);
2885         return;
2886     }
2887     xhci_kick_ep(xhci, slotid, xhci_find_epid(ep));
2888 }
2889 
2890 static USBBusOps xhci_bus_ops = {
2891     .wakeup_endpoint = xhci_wakeup_endpoint,
2892 };
2893 
2894 static void usb_xhci_init(XHCIState *xhci, DeviceState *dev)
2895 {
2896     XHCIPort *port;
2897     int i, usbports, speedmask;
2898 
2899     xhci->usbsts = USBSTS_HCH;
2900 
2901     if (xhci->numports_2 > MAXPORTS_2) {
2902         xhci->numports_2 = MAXPORTS_2;
2903     }
2904     if (xhci->numports_3 > MAXPORTS_3) {
2905         xhci->numports_3 = MAXPORTS_3;
2906     }
2907     usbports = MAX(xhci->numports_2, xhci->numports_3);
2908     xhci->numports = xhci->numports_2 + xhci->numports_3;
2909 
2910     usb_bus_new(&xhci->bus, &xhci_bus_ops, &xhci->pci_dev.qdev);
2911 
2912     for (i = 0; i < usbports; i++) {
2913         speedmask = 0;
2914         if (i < xhci->numports_2) {
2915             port = &xhci->ports[i];
2916             port->portnr = i + 1;
2917             port->uport = &xhci->uports[i];
2918             port->speedmask =
2919                 USB_SPEED_MASK_LOW  |
2920                 USB_SPEED_MASK_FULL |
2921                 USB_SPEED_MASK_HIGH;
2922             snprintf(port->name, sizeof(port->name), "usb2 port #%d", i+1);
2923             speedmask |= port->speedmask;
2924         }
2925         if (i < xhci->numports_3) {
2926             port = &xhci->ports[i + xhci->numports_2];
2927             port->portnr = i + 1 + xhci->numports_2;
2928             port->uport = &xhci->uports[i];
2929             port->speedmask = USB_SPEED_MASK_SUPER;
2930             snprintf(port->name, sizeof(port->name), "usb3 port #%d", i+1);
2931             speedmask |= port->speedmask;
2932         }
2933         usb_register_port(&xhci->bus, &xhci->uports[i], xhci, i,
2934                           &xhci_uport_ops, speedmask);
2935     }
2936 }
2937 
2938 static int usb_xhci_initfn(struct PCIDevice *dev)
2939 {
2940     int i, ret;
2941 
2942     XHCIState *xhci = DO_UPCAST(XHCIState, pci_dev, dev);
2943 
2944     xhci->pci_dev.config[PCI_CLASS_PROG] = 0x30;    /* xHCI */
2945     xhci->pci_dev.config[PCI_INTERRUPT_PIN] = 0x01; /* interrupt pin 1 */
2946     xhci->pci_dev.config[PCI_CACHE_LINE_SIZE] = 0x10;
2947     xhci->pci_dev.config[0x60] = 0x30; /* release number */
2948 
2949     usb_xhci_init(xhci, &dev->qdev);
2950 
2951     xhci->mfwrap_timer = qemu_new_timer_ns(vm_clock, xhci_mfwrap_timer, xhci);
2952 
2953     xhci->irq = xhci->pci_dev.irq[0];
2954 
2955     memory_region_init(&xhci->mem, "xhci", LEN_REGS);
2956     memory_region_init_io(&xhci->mem_cap, &xhci_cap_ops, xhci,
2957                           "capabilities", LEN_CAP);
2958     memory_region_init_io(&xhci->mem_oper, &xhci_oper_ops, xhci,
2959                           "operational", 0x400);
2960     memory_region_init_io(&xhci->mem_runtime, &xhci_runtime_ops, xhci,
2961                           "runtime", LEN_RUNTIME);
2962     memory_region_init_io(&xhci->mem_doorbell, &xhci_doorbell_ops, xhci,
2963                           "doorbell", LEN_DOORBELL);
2964 
2965     memory_region_add_subregion(&xhci->mem, 0,            &xhci->mem_cap);
2966     memory_region_add_subregion(&xhci->mem, OFF_OPER,     &xhci->mem_oper);
2967     memory_region_add_subregion(&xhci->mem, OFF_RUNTIME,  &xhci->mem_runtime);
2968     memory_region_add_subregion(&xhci->mem, OFF_DOORBELL, &xhci->mem_doorbell);
2969 
2970     for (i = 0; i < xhci->numports; i++) {
2971         XHCIPort *port = &xhci->ports[i];
2972         uint32_t offset = OFF_OPER + 0x400 + 0x10 * i;
2973         port->xhci = xhci;
2974         memory_region_init_io(&port->mem, &xhci_port_ops, port,
2975                               port->name, 0x10);
2976         memory_region_add_subregion(&xhci->mem, offset, &port->mem);
2977     }
2978 
2979     pci_register_bar(&xhci->pci_dev, 0,
2980                      PCI_BASE_ADDRESS_SPACE_MEMORY|PCI_BASE_ADDRESS_MEM_TYPE_64,
2981                      &xhci->mem);
2982 
2983     ret = pcie_cap_init(&xhci->pci_dev, 0xa0, PCI_EXP_TYPE_ENDPOINT, 0);
2984     assert(ret >= 0);
2985 
2986     if (xhci->flags & (1 << XHCI_FLAG_USE_MSI)) {
2987         msi_init(&xhci->pci_dev, 0x70, MAXINTRS, true, false);
2988     }
2989     if (xhci->flags & (1 << XHCI_FLAG_USE_MSI_X)) {
2990         msix_init(&xhci->pci_dev, MAXINTRS,
2991                   &xhci->mem, 0, OFF_MSIX_TABLE,
2992                   &xhci->mem, 0, OFF_MSIX_PBA,
2993                   0x90);
2994     }
2995 
2996     return 0;
2997 }
2998 
2999 static const VMStateDescription vmstate_xhci = {
3000     .name = "xhci",
3001     .unmigratable = 1,
3002 };
3003 
3004 static Property xhci_properties[] = {
3005     DEFINE_PROP_BIT("msi",    XHCIState, flags, XHCI_FLAG_USE_MSI, true),
3006     DEFINE_PROP_BIT("msix",   XHCIState, flags, XHCI_FLAG_USE_MSI_X, true),
3007     DEFINE_PROP_UINT32("p2",  XHCIState, numports_2, 4),
3008     DEFINE_PROP_UINT32("p3",  XHCIState, numports_3, 4),
3009     DEFINE_PROP_END_OF_LIST(),
3010 };
3011 
3012 static void xhci_class_init(ObjectClass *klass, void *data)
3013 {
3014     PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
3015     DeviceClass *dc = DEVICE_CLASS(klass);
3016 
3017     dc->vmsd    = &vmstate_xhci;
3018     dc->props   = xhci_properties;
3019     dc->reset   = xhci_reset;
3020     k->init         = usb_xhci_initfn;
3021     k->vendor_id    = PCI_VENDOR_ID_NEC;
3022     k->device_id    = PCI_DEVICE_ID_NEC_UPD720200;
3023     k->class_id     = PCI_CLASS_SERIAL_USB;
3024     k->revision     = 0x03;
3025     k->is_express   = 1;
3026 }
3027 
3028 static TypeInfo xhci_info = {
3029     .name          = "nec-usb-xhci",
3030     .parent        = TYPE_PCI_DEVICE,
3031     .instance_size = sizeof(XHCIState),
3032     .class_init    = xhci_class_init,
3033 };
3034 
3035 static void xhci_register_types(void)
3036 {
3037     type_register_static(&xhci_info);
3038 }
3039 
3040 type_init(xhci_register_types)
3041