coroutine: add test-coroutine --benchmark-lifecycle
[qemu/stefanha.git] / hw / intel-hda.c
blob5a2bc3aaa9ca66619630fc18ac2770e165bb53ba
1 /*
2 * Copyright (C) 2010 Red Hat, Inc.
4 * written by Gerd Hoffmann <kraxel@redhat.com>
6 * This program is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU General Public License as
8 * published by the Free Software Foundation; either version 2 or
9 * (at your option) version 3 of the License.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, see <http://www.gnu.org/licenses/>.
20 #include "hw.h"
21 #include "pci.h"
22 #include "msi.h"
23 #include "qemu-timer.h"
24 #include "audiodev.h"
25 #include "intel-hda.h"
26 #include "intel-hda-defs.h"
28 /* --------------------------------------------------------------------- */
29 /* hda bus */
31 static struct BusInfo hda_codec_bus_info = {
32 .name = "HDA",
33 .size = sizeof(HDACodecBus),
34 .props = (Property[]) {
35 DEFINE_PROP_UINT32("cad", HDACodecDevice, cad, -1),
36 DEFINE_PROP_END_OF_LIST()
40 void hda_codec_bus_init(DeviceState *dev, HDACodecBus *bus,
41 hda_codec_response_func response,
42 hda_codec_xfer_func xfer)
44 qbus_create_inplace(&bus->qbus, &hda_codec_bus_info, dev, NULL);
45 bus->response = response;
46 bus->xfer = xfer;
49 static int hda_codec_dev_init(DeviceState *qdev, DeviceInfo *base)
51 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, qdev->parent_bus);
52 HDACodecDevice *dev = DO_UPCAST(HDACodecDevice, qdev, qdev);
53 HDACodecDeviceInfo *info = DO_UPCAST(HDACodecDeviceInfo, qdev, base);
55 dev->info = info;
56 if (dev->cad == -1) {
57 dev->cad = bus->next_cad;
59 if (dev->cad >= 15) {
60 return -1;
62 bus->next_cad = dev->cad + 1;
63 return info->init(dev);
66 static int hda_codec_dev_exit(DeviceState *qdev)
68 HDACodecDevice *dev = DO_UPCAST(HDACodecDevice, qdev, qdev);
70 if (dev->info->exit) {
71 dev->info->exit(dev);
73 return 0;
76 void hda_codec_register(HDACodecDeviceInfo *info)
78 info->qdev.init = hda_codec_dev_init;
79 info->qdev.exit = hda_codec_dev_exit;
80 info->qdev.bus_info = &hda_codec_bus_info;
81 qdev_register(&info->qdev);
84 HDACodecDevice *hda_codec_find(HDACodecBus *bus, uint32_t cad)
86 DeviceState *qdev;
87 HDACodecDevice *cdev;
89 QLIST_FOREACH(qdev, &bus->qbus.children, sibling) {
90 cdev = DO_UPCAST(HDACodecDevice, qdev, qdev);
91 if (cdev->cad == cad) {
92 return cdev;
95 return NULL;
98 void hda_codec_response(HDACodecDevice *dev, bool solicited, uint32_t response)
100 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, dev->qdev.parent_bus);
101 bus->response(dev, solicited, response);
104 bool hda_codec_xfer(HDACodecDevice *dev, uint32_t stnr, bool output,
105 uint8_t *buf, uint32_t len)
107 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, dev->qdev.parent_bus);
108 return bus->xfer(dev, stnr, output, buf, len);
111 /* --------------------------------------------------------------------- */
112 /* intel hda emulation */
114 typedef struct IntelHDAStream IntelHDAStream;
115 typedef struct IntelHDAState IntelHDAState;
116 typedef struct IntelHDAReg IntelHDAReg;
118 typedef struct bpl {
119 uint64_t addr;
120 uint32_t len;
121 uint32_t flags;
122 } bpl;
124 struct IntelHDAStream {
125 /* registers */
126 uint32_t ctl;
127 uint32_t lpib;
128 uint32_t cbl;
129 uint32_t lvi;
130 uint32_t fmt;
131 uint32_t bdlp_lbase;
132 uint32_t bdlp_ubase;
134 /* state */
135 bpl *bpl;
136 uint32_t bentries;
137 uint32_t bsize, be, bp;
140 struct IntelHDAState {
141 PCIDevice pci;
142 const char *name;
143 HDACodecBus codecs;
145 /* registers */
146 uint32_t g_ctl;
147 uint32_t wake_en;
148 uint32_t state_sts;
149 uint32_t int_ctl;
150 uint32_t int_sts;
151 uint32_t wall_clk;
153 uint32_t corb_lbase;
154 uint32_t corb_ubase;
155 uint32_t corb_rp;
156 uint32_t corb_wp;
157 uint32_t corb_ctl;
158 uint32_t corb_sts;
159 uint32_t corb_size;
161 uint32_t rirb_lbase;
162 uint32_t rirb_ubase;
163 uint32_t rirb_wp;
164 uint32_t rirb_cnt;
165 uint32_t rirb_ctl;
166 uint32_t rirb_sts;
167 uint32_t rirb_size;
169 uint32_t dp_lbase;
170 uint32_t dp_ubase;
172 uint32_t icw;
173 uint32_t irr;
174 uint32_t ics;
176 /* streams */
177 IntelHDAStream st[8];
179 /* state */
180 int mmio_addr;
181 uint32_t rirb_count;
182 int64_t wall_base_ns;
184 /* debug logging */
185 const IntelHDAReg *last_reg;
186 uint32_t last_val;
187 uint32_t last_write;
188 uint32_t last_sec;
189 uint32_t repeat_count;
191 /* properties */
192 uint32_t debug;
193 uint32_t msi;
196 struct IntelHDAReg {
197 const char *name; /* register name */
198 uint32_t size; /* size in bytes */
199 uint32_t reset; /* reset value */
200 uint32_t wmask; /* write mask */
201 uint32_t wclear; /* write 1 to clear bits */
202 uint32_t offset; /* location in IntelHDAState */
203 uint32_t shift; /* byte access entries for dwords */
204 uint32_t stream;
205 void (*whandler)(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old);
206 void (*rhandler)(IntelHDAState *d, const IntelHDAReg *reg);
209 static void intel_hda_reset(DeviceState *dev);
211 /* --------------------------------------------------------------------- */
213 static target_phys_addr_t intel_hda_addr(uint32_t lbase, uint32_t ubase)
215 target_phys_addr_t addr;
217 #if TARGET_PHYS_ADDR_BITS == 32
218 addr = lbase;
219 #else
220 addr = ubase;
221 addr <<= 32;
222 addr |= lbase;
223 #endif
224 return addr;
227 static void intel_hda_update_int_sts(IntelHDAState *d)
229 uint32_t sts = 0;
230 uint32_t i;
232 /* update controller status */
233 if (d->rirb_sts & ICH6_RBSTS_IRQ) {
234 sts |= (1 << 30);
236 if (d->rirb_sts & ICH6_RBSTS_OVERRUN) {
237 sts |= (1 << 30);
239 if (d->state_sts & d->wake_en) {
240 sts |= (1 << 30);
243 /* update stream status */
244 for (i = 0; i < 8; i++) {
245 /* buffer completion interrupt */
246 if (d->st[i].ctl & (1 << 26)) {
247 sts |= (1 << i);
251 /* update global status */
252 if (sts & d->int_ctl) {
253 sts |= (1 << 31);
256 d->int_sts = sts;
259 static void intel_hda_update_irq(IntelHDAState *d)
261 int msi = d->msi && msi_enabled(&d->pci);
262 int level;
264 intel_hda_update_int_sts(d);
265 if (d->int_sts & (1 << 31) && d->int_ctl & (1 << 31)) {
266 level = 1;
267 } else {
268 level = 0;
270 dprint(d, 2, "%s: level %d [%s]\n", __FUNCTION__,
271 level, msi ? "msi" : "intx");
272 if (msi) {
273 if (level) {
274 msi_notify(&d->pci, 0);
276 } else {
277 qemu_set_irq(d->pci.irq[0], level);
281 static int intel_hda_send_command(IntelHDAState *d, uint32_t verb)
283 uint32_t cad, nid, data;
284 HDACodecDevice *codec;
286 cad = (verb >> 28) & 0x0f;
287 if (verb & (1 << 27)) {
288 /* indirect node addressing, not specified in HDA 1.0 */
289 dprint(d, 1, "%s: indirect node addressing (guest bug?)\n", __FUNCTION__);
290 return -1;
292 nid = (verb >> 20) & 0x7f;
293 data = verb & 0xfffff;
295 codec = hda_codec_find(&d->codecs, cad);
296 if (codec == NULL) {
297 dprint(d, 1, "%s: addressed non-existing codec\n", __FUNCTION__);
298 return -1;
300 codec->info->command(codec, nid, data);
301 return 0;
304 static void intel_hda_corb_run(IntelHDAState *d)
306 target_phys_addr_t addr;
307 uint32_t rp, verb;
309 if (d->ics & ICH6_IRS_BUSY) {
310 dprint(d, 2, "%s: [icw] verb 0x%08x\n", __FUNCTION__, d->icw);
311 intel_hda_send_command(d, d->icw);
312 return;
315 for (;;) {
316 if (!(d->corb_ctl & ICH6_CORBCTL_RUN)) {
317 dprint(d, 2, "%s: !run\n", __FUNCTION__);
318 return;
320 if ((d->corb_rp & 0xff) == d->corb_wp) {
321 dprint(d, 2, "%s: corb ring empty\n", __FUNCTION__);
322 return;
324 if (d->rirb_count == d->rirb_cnt) {
325 dprint(d, 2, "%s: rirb count reached\n", __FUNCTION__);
326 return;
329 rp = (d->corb_rp + 1) & 0xff;
330 addr = intel_hda_addr(d->corb_lbase, d->corb_ubase);
331 verb = ldl_le_phys(addr + 4*rp);
332 d->corb_rp = rp;
334 dprint(d, 2, "%s: [rp 0x%x] verb 0x%08x\n", __FUNCTION__, rp, verb);
335 intel_hda_send_command(d, verb);
339 static void intel_hda_response(HDACodecDevice *dev, bool solicited, uint32_t response)
341 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, dev->qdev.parent_bus);
342 IntelHDAState *d = container_of(bus, IntelHDAState, codecs);
343 target_phys_addr_t addr;
344 uint32_t wp, ex;
346 if (d->ics & ICH6_IRS_BUSY) {
347 dprint(d, 2, "%s: [irr] response 0x%x, cad 0x%x\n",
348 __FUNCTION__, response, dev->cad);
349 d->irr = response;
350 d->ics &= ~(ICH6_IRS_BUSY | 0xf0);
351 d->ics |= (ICH6_IRS_VALID | (dev->cad << 4));
352 return;
355 if (!(d->rirb_ctl & ICH6_RBCTL_DMA_EN)) {
356 dprint(d, 1, "%s: rirb dma disabled, drop codec response\n", __FUNCTION__);
357 return;
360 ex = (solicited ? 0 : (1 << 4)) | dev->cad;
361 wp = (d->rirb_wp + 1) & 0xff;
362 addr = intel_hda_addr(d->rirb_lbase, d->rirb_ubase);
363 stl_le_phys(addr + 8*wp, response);
364 stl_le_phys(addr + 8*wp + 4, ex);
365 d->rirb_wp = wp;
367 dprint(d, 2, "%s: [wp 0x%x] response 0x%x, extra 0x%x\n",
368 __FUNCTION__, wp, response, ex);
370 d->rirb_count++;
371 if (d->rirb_count == d->rirb_cnt) {
372 dprint(d, 2, "%s: rirb count reached (%d)\n", __FUNCTION__, d->rirb_count);
373 if (d->rirb_ctl & ICH6_RBCTL_IRQ_EN) {
374 d->rirb_sts |= ICH6_RBSTS_IRQ;
375 intel_hda_update_irq(d);
377 } else if ((d->corb_rp & 0xff) == d->corb_wp) {
378 dprint(d, 2, "%s: corb ring empty (%d/%d)\n", __FUNCTION__,
379 d->rirb_count, d->rirb_cnt);
380 if (d->rirb_ctl & ICH6_RBCTL_IRQ_EN) {
381 d->rirb_sts |= ICH6_RBSTS_IRQ;
382 intel_hda_update_irq(d);
387 static bool intel_hda_xfer(HDACodecDevice *dev, uint32_t stnr, bool output,
388 uint8_t *buf, uint32_t len)
390 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, dev->qdev.parent_bus);
391 IntelHDAState *d = container_of(bus, IntelHDAState, codecs);
392 IntelHDAStream *st = NULL;
393 target_phys_addr_t addr;
394 uint32_t s, copy, left;
395 bool irq = false;
397 for (s = 0; s < ARRAY_SIZE(d->st); s++) {
398 if (stnr == ((d->st[s].ctl >> 20) & 0x0f)) {
399 st = d->st + s;
400 break;
403 if (st == NULL) {
404 return false;
406 if (st->bpl == NULL) {
407 return false;
409 if (st->ctl & (1 << 26)) {
411 * Wait with the next DMA xfer until the guest
412 * has acked the buffer completion interrupt
414 return false;
417 left = len;
418 while (left > 0) {
419 copy = left;
420 if (copy > st->bsize - st->lpib)
421 copy = st->bsize - st->lpib;
422 if (copy > st->bpl[st->be].len - st->bp)
423 copy = st->bpl[st->be].len - st->bp;
425 dprint(d, 3, "dma: entry %d, pos %d/%d, copy %d\n",
426 st->be, st->bp, st->bpl[st->be].len, copy);
428 cpu_physical_memory_rw(st->bpl[st->be].addr + st->bp,
429 buf, copy, !output);
430 st->lpib += copy;
431 st->bp += copy;
432 buf += copy;
433 left -= copy;
435 if (st->bpl[st->be].len == st->bp) {
436 /* bpl entry filled */
437 if (st->bpl[st->be].flags & 0x01) {
438 irq = true;
440 st->bp = 0;
441 st->be++;
442 if (st->be == st->bentries) {
443 /* bpl wrap around */
444 st->be = 0;
445 st->lpib = 0;
449 if (d->dp_lbase & 0x01) {
450 addr = intel_hda_addr(d->dp_lbase & ~0x01, d->dp_ubase);
451 stl_le_phys(addr + 8*s, st->lpib);
453 dprint(d, 3, "dma: --\n");
455 if (irq) {
456 st->ctl |= (1 << 26); /* buffer completion interrupt */
457 intel_hda_update_irq(d);
459 return true;
462 static void intel_hda_parse_bdl(IntelHDAState *d, IntelHDAStream *st)
464 target_phys_addr_t addr;
465 uint8_t buf[16];
466 uint32_t i;
468 addr = intel_hda_addr(st->bdlp_lbase, st->bdlp_ubase);
469 st->bentries = st->lvi +1;
470 qemu_free(st->bpl);
471 st->bpl = qemu_malloc(sizeof(bpl) * st->bentries);
472 for (i = 0; i < st->bentries; i++, addr += 16) {
473 cpu_physical_memory_read(addr, buf, 16);
474 st->bpl[i].addr = le64_to_cpu(*(uint64_t *)buf);
475 st->bpl[i].len = le32_to_cpu(*(uint32_t *)(buf + 8));
476 st->bpl[i].flags = le32_to_cpu(*(uint32_t *)(buf + 12));
477 dprint(d, 1, "bdl/%d: 0x%" PRIx64 " +0x%x, 0x%x\n",
478 i, st->bpl[i].addr, st->bpl[i].len, st->bpl[i].flags);
481 st->bsize = st->cbl;
482 st->lpib = 0;
483 st->be = 0;
484 st->bp = 0;
487 static void intel_hda_notify_codecs(IntelHDAState *d, uint32_t stream, bool running)
489 DeviceState *qdev;
490 HDACodecDevice *cdev;
492 QLIST_FOREACH(qdev, &d->codecs.qbus.children, sibling) {
493 cdev = DO_UPCAST(HDACodecDevice, qdev, qdev);
494 if (cdev->info->stream) {
495 cdev->info->stream(cdev, stream, running);
500 /* --------------------------------------------------------------------- */
502 static void intel_hda_set_g_ctl(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
504 if ((d->g_ctl & ICH6_GCTL_RESET) == 0) {
505 intel_hda_reset(&d->pci.qdev);
509 static void intel_hda_set_wake_en(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
511 intel_hda_update_irq(d);
514 static void intel_hda_set_state_sts(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
516 intel_hda_update_irq(d);
519 static void intel_hda_set_int_ctl(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
521 intel_hda_update_irq(d);
524 static void intel_hda_get_wall_clk(IntelHDAState *d, const IntelHDAReg *reg)
526 int64_t ns;
528 ns = qemu_get_clock_ns(vm_clock) - d->wall_base_ns;
529 d->wall_clk = (uint32_t)(ns * 24 / 1000); /* 24 MHz */
532 static void intel_hda_set_corb_wp(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
534 intel_hda_corb_run(d);
537 static void intel_hda_set_corb_ctl(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
539 intel_hda_corb_run(d);
542 static void intel_hda_set_rirb_wp(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
544 if (d->rirb_wp & ICH6_RIRBWP_RST) {
545 d->rirb_wp = 0;
549 static void intel_hda_set_rirb_sts(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
551 intel_hda_update_irq(d);
553 if ((old & ICH6_RBSTS_IRQ) && !(d->rirb_sts & ICH6_RBSTS_IRQ)) {
554 /* cleared ICH6_RBSTS_IRQ */
555 d->rirb_count = 0;
556 intel_hda_corb_run(d);
560 static void intel_hda_set_ics(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
562 if (d->ics & ICH6_IRS_BUSY) {
563 intel_hda_corb_run(d);
567 static void intel_hda_set_st_ctl(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
569 IntelHDAStream *st = d->st + reg->stream;
571 if (st->ctl & 0x01) {
572 /* reset */
573 dprint(d, 1, "st #%d: reset\n", reg->stream);
574 st->ctl = 0;
576 if ((st->ctl & 0x02) != (old & 0x02)) {
577 uint32_t stnr = (st->ctl >> 20) & 0x0f;
578 /* run bit flipped */
579 if (st->ctl & 0x02) {
580 /* start */
581 dprint(d, 1, "st #%d: start %d (ring buf %d bytes)\n",
582 reg->stream, stnr, st->cbl);
583 intel_hda_parse_bdl(d, st);
584 intel_hda_notify_codecs(d, stnr, true);
585 } else {
586 /* stop */
587 dprint(d, 1, "st #%d: stop %d\n", reg->stream, stnr);
588 intel_hda_notify_codecs(d, stnr, false);
591 intel_hda_update_irq(d);
594 /* --------------------------------------------------------------------- */
596 #define ST_REG(_n, _o) (0x80 + (_n) * 0x20 + (_o))
598 static const struct IntelHDAReg regtab[] = {
599 /* global */
600 [ ICH6_REG_GCAP ] = {
601 .name = "GCAP",
602 .size = 2,
603 .reset = 0x4401,
605 [ ICH6_REG_VMIN ] = {
606 .name = "VMIN",
607 .size = 1,
609 [ ICH6_REG_VMAJ ] = {
610 .name = "VMAJ",
611 .size = 1,
612 .reset = 1,
614 [ ICH6_REG_OUTPAY ] = {
615 .name = "OUTPAY",
616 .size = 2,
617 .reset = 0x3c,
619 [ ICH6_REG_INPAY ] = {
620 .name = "INPAY",
621 .size = 2,
622 .reset = 0x1d,
624 [ ICH6_REG_GCTL ] = {
625 .name = "GCTL",
626 .size = 4,
627 .wmask = 0x0103,
628 .offset = offsetof(IntelHDAState, g_ctl),
629 .whandler = intel_hda_set_g_ctl,
631 [ ICH6_REG_WAKEEN ] = {
632 .name = "WAKEEN",
633 .size = 2,
634 .wmask = 0x7fff,
635 .offset = offsetof(IntelHDAState, wake_en),
636 .whandler = intel_hda_set_wake_en,
638 [ ICH6_REG_STATESTS ] = {
639 .name = "STATESTS",
640 .size = 2,
641 .wmask = 0x7fff,
642 .wclear = 0x7fff,
643 .offset = offsetof(IntelHDAState, state_sts),
644 .whandler = intel_hda_set_state_sts,
647 /* interrupts */
648 [ ICH6_REG_INTCTL ] = {
649 .name = "INTCTL",
650 .size = 4,
651 .wmask = 0xc00000ff,
652 .offset = offsetof(IntelHDAState, int_ctl),
653 .whandler = intel_hda_set_int_ctl,
655 [ ICH6_REG_INTSTS ] = {
656 .name = "INTSTS",
657 .size = 4,
658 .wmask = 0xc00000ff,
659 .wclear = 0xc00000ff,
660 .offset = offsetof(IntelHDAState, int_sts),
663 /* misc */
664 [ ICH6_REG_WALLCLK ] = {
665 .name = "WALLCLK",
666 .size = 4,
667 .offset = offsetof(IntelHDAState, wall_clk),
668 .rhandler = intel_hda_get_wall_clk,
670 [ ICH6_REG_WALLCLK + 0x2000 ] = {
671 .name = "WALLCLK(alias)",
672 .size = 4,
673 .offset = offsetof(IntelHDAState, wall_clk),
674 .rhandler = intel_hda_get_wall_clk,
677 /* dma engine */
678 [ ICH6_REG_CORBLBASE ] = {
679 .name = "CORBLBASE",
680 .size = 4,
681 .wmask = 0xffffff80,
682 .offset = offsetof(IntelHDAState, corb_lbase),
684 [ ICH6_REG_CORBUBASE ] = {
685 .name = "CORBUBASE",
686 .size = 4,
687 .wmask = 0xffffffff,
688 .offset = offsetof(IntelHDAState, corb_ubase),
690 [ ICH6_REG_CORBWP ] = {
691 .name = "CORBWP",
692 .size = 2,
693 .wmask = 0xff,
694 .offset = offsetof(IntelHDAState, corb_wp),
695 .whandler = intel_hda_set_corb_wp,
697 [ ICH6_REG_CORBRP ] = {
698 .name = "CORBRP",
699 .size = 2,
700 .wmask = 0x80ff,
701 .offset = offsetof(IntelHDAState, corb_rp),
703 [ ICH6_REG_CORBCTL ] = {
704 .name = "CORBCTL",
705 .size = 1,
706 .wmask = 0x03,
707 .offset = offsetof(IntelHDAState, corb_ctl),
708 .whandler = intel_hda_set_corb_ctl,
710 [ ICH6_REG_CORBSTS ] = {
711 .name = "CORBSTS",
712 .size = 1,
713 .wmask = 0x01,
714 .wclear = 0x01,
715 .offset = offsetof(IntelHDAState, corb_sts),
717 [ ICH6_REG_CORBSIZE ] = {
718 .name = "CORBSIZE",
719 .size = 1,
720 .reset = 0x42,
721 .offset = offsetof(IntelHDAState, corb_size),
723 [ ICH6_REG_RIRBLBASE ] = {
724 .name = "RIRBLBASE",
725 .size = 4,
726 .wmask = 0xffffff80,
727 .offset = offsetof(IntelHDAState, rirb_lbase),
729 [ ICH6_REG_RIRBUBASE ] = {
730 .name = "RIRBUBASE",
731 .size = 4,
732 .wmask = 0xffffffff,
733 .offset = offsetof(IntelHDAState, rirb_ubase),
735 [ ICH6_REG_RIRBWP ] = {
736 .name = "RIRBWP",
737 .size = 2,
738 .wmask = 0x8000,
739 .offset = offsetof(IntelHDAState, rirb_wp),
740 .whandler = intel_hda_set_rirb_wp,
742 [ ICH6_REG_RINTCNT ] = {
743 .name = "RINTCNT",
744 .size = 2,
745 .wmask = 0xff,
746 .offset = offsetof(IntelHDAState, rirb_cnt),
748 [ ICH6_REG_RIRBCTL ] = {
749 .name = "RIRBCTL",
750 .size = 1,
751 .wmask = 0x07,
752 .offset = offsetof(IntelHDAState, rirb_ctl),
754 [ ICH6_REG_RIRBSTS ] = {
755 .name = "RIRBSTS",
756 .size = 1,
757 .wmask = 0x05,
758 .wclear = 0x05,
759 .offset = offsetof(IntelHDAState, rirb_sts),
760 .whandler = intel_hda_set_rirb_sts,
762 [ ICH6_REG_RIRBSIZE ] = {
763 .name = "RIRBSIZE",
764 .size = 1,
765 .reset = 0x42,
766 .offset = offsetof(IntelHDAState, rirb_size),
769 [ ICH6_REG_DPLBASE ] = {
770 .name = "DPLBASE",
771 .size = 4,
772 .wmask = 0xffffff81,
773 .offset = offsetof(IntelHDAState, dp_lbase),
775 [ ICH6_REG_DPUBASE ] = {
776 .name = "DPUBASE",
777 .size = 4,
778 .wmask = 0xffffffff,
779 .offset = offsetof(IntelHDAState, dp_ubase),
782 [ ICH6_REG_IC ] = {
783 .name = "ICW",
784 .size = 4,
785 .wmask = 0xffffffff,
786 .offset = offsetof(IntelHDAState, icw),
788 [ ICH6_REG_IR ] = {
789 .name = "IRR",
790 .size = 4,
791 .offset = offsetof(IntelHDAState, irr),
793 [ ICH6_REG_IRS ] = {
794 .name = "ICS",
795 .size = 2,
796 .wmask = 0x0003,
797 .wclear = 0x0002,
798 .offset = offsetof(IntelHDAState, ics),
799 .whandler = intel_hda_set_ics,
802 #define HDA_STREAM(_t, _i) \
803 [ ST_REG(_i, ICH6_REG_SD_CTL) ] = { \
804 .stream = _i, \
805 .name = _t stringify(_i) " CTL", \
806 .size = 4, \
807 .wmask = 0x1cff001f, \
808 .offset = offsetof(IntelHDAState, st[_i].ctl), \
809 .whandler = intel_hda_set_st_ctl, \
810 }, \
811 [ ST_REG(_i, ICH6_REG_SD_CTL) + 2] = { \
812 .stream = _i, \
813 .name = _t stringify(_i) " CTL(stnr)", \
814 .size = 1, \
815 .shift = 16, \
816 .wmask = 0x00ff0000, \
817 .offset = offsetof(IntelHDAState, st[_i].ctl), \
818 .whandler = intel_hda_set_st_ctl, \
819 }, \
820 [ ST_REG(_i, ICH6_REG_SD_STS)] = { \
821 .stream = _i, \
822 .name = _t stringify(_i) " CTL(sts)", \
823 .size = 1, \
824 .shift = 24, \
825 .wmask = 0x1c000000, \
826 .wclear = 0x1c000000, \
827 .offset = offsetof(IntelHDAState, st[_i].ctl), \
828 .whandler = intel_hda_set_st_ctl, \
829 }, \
830 [ ST_REG(_i, ICH6_REG_SD_LPIB) ] = { \
831 .stream = _i, \
832 .name = _t stringify(_i) " LPIB", \
833 .size = 4, \
834 .offset = offsetof(IntelHDAState, st[_i].lpib), \
835 }, \
836 [ ST_REG(_i, ICH6_REG_SD_LPIB) + 0x2000 ] = { \
837 .stream = _i, \
838 .name = _t stringify(_i) " LPIB(alias)", \
839 .size = 4, \
840 .offset = offsetof(IntelHDAState, st[_i].lpib), \
841 }, \
842 [ ST_REG(_i, ICH6_REG_SD_CBL) ] = { \
843 .stream = _i, \
844 .name = _t stringify(_i) " CBL", \
845 .size = 4, \
846 .wmask = 0xffffffff, \
847 .offset = offsetof(IntelHDAState, st[_i].cbl), \
848 }, \
849 [ ST_REG(_i, ICH6_REG_SD_LVI) ] = { \
850 .stream = _i, \
851 .name = _t stringify(_i) " LVI", \
852 .size = 2, \
853 .wmask = 0x00ff, \
854 .offset = offsetof(IntelHDAState, st[_i].lvi), \
855 }, \
856 [ ST_REG(_i, ICH6_REG_SD_FIFOSIZE) ] = { \
857 .stream = _i, \
858 .name = _t stringify(_i) " FIFOS", \
859 .size = 2, \
860 .reset = HDA_BUFFER_SIZE, \
861 }, \
862 [ ST_REG(_i, ICH6_REG_SD_FORMAT) ] = { \
863 .stream = _i, \
864 .name = _t stringify(_i) " FMT", \
865 .size = 2, \
866 .wmask = 0x7f7f, \
867 .offset = offsetof(IntelHDAState, st[_i].fmt), \
868 }, \
869 [ ST_REG(_i, ICH6_REG_SD_BDLPL) ] = { \
870 .stream = _i, \
871 .name = _t stringify(_i) " BDLPL", \
872 .size = 4, \
873 .wmask = 0xffffff80, \
874 .offset = offsetof(IntelHDAState, st[_i].bdlp_lbase), \
875 }, \
876 [ ST_REG(_i, ICH6_REG_SD_BDLPU) ] = { \
877 .stream = _i, \
878 .name = _t stringify(_i) " BDLPU", \
879 .size = 4, \
880 .wmask = 0xffffffff, \
881 .offset = offsetof(IntelHDAState, st[_i].bdlp_ubase), \
882 }, \
884 HDA_STREAM("IN", 0)
885 HDA_STREAM("IN", 1)
886 HDA_STREAM("IN", 2)
887 HDA_STREAM("IN", 3)
889 HDA_STREAM("OUT", 4)
890 HDA_STREAM("OUT", 5)
891 HDA_STREAM("OUT", 6)
892 HDA_STREAM("OUT", 7)
896 static const IntelHDAReg *intel_hda_reg_find(IntelHDAState *d, target_phys_addr_t addr)
898 const IntelHDAReg *reg;
900 if (addr >= sizeof(regtab)/sizeof(regtab[0])) {
901 goto noreg;
903 reg = regtab+addr;
904 if (reg->name == NULL) {
905 goto noreg;
907 return reg;
909 noreg:
910 dprint(d, 1, "unknown register, addr 0x%x\n", (int) addr);
911 return NULL;
914 static uint32_t *intel_hda_reg_addr(IntelHDAState *d, const IntelHDAReg *reg)
916 uint8_t *addr = (void*)d;
918 addr += reg->offset;
919 return (uint32_t*)addr;
922 static void intel_hda_reg_write(IntelHDAState *d, const IntelHDAReg *reg, uint32_t val,
923 uint32_t wmask)
925 uint32_t *addr;
926 uint32_t old;
928 if (!reg) {
929 return;
932 if (d->debug) {
933 time_t now = time(NULL);
934 if (d->last_write && d->last_reg == reg && d->last_val == val) {
935 d->repeat_count++;
936 if (d->last_sec != now) {
937 dprint(d, 2, "previous register op repeated %d times\n", d->repeat_count);
938 d->last_sec = now;
939 d->repeat_count = 0;
941 } else {
942 if (d->repeat_count) {
943 dprint(d, 2, "previous register op repeated %d times\n", d->repeat_count);
945 dprint(d, 2, "write %-16s: 0x%x (%x)\n", reg->name, val, wmask);
946 d->last_write = 1;
947 d->last_reg = reg;
948 d->last_val = val;
949 d->last_sec = now;
950 d->repeat_count = 0;
953 assert(reg->offset != 0);
955 addr = intel_hda_reg_addr(d, reg);
956 old = *addr;
958 if (reg->shift) {
959 val <<= reg->shift;
960 wmask <<= reg->shift;
962 wmask &= reg->wmask;
963 *addr &= ~wmask;
964 *addr |= wmask & val;
965 *addr &= ~(val & reg->wclear);
967 if (reg->whandler) {
968 reg->whandler(d, reg, old);
972 static uint32_t intel_hda_reg_read(IntelHDAState *d, const IntelHDAReg *reg,
973 uint32_t rmask)
975 uint32_t *addr, ret;
977 if (!reg) {
978 return 0;
981 if (reg->rhandler) {
982 reg->rhandler(d, reg);
985 if (reg->offset == 0) {
986 /* constant read-only register */
987 ret = reg->reset;
988 } else {
989 addr = intel_hda_reg_addr(d, reg);
990 ret = *addr;
991 if (reg->shift) {
992 ret >>= reg->shift;
994 ret &= rmask;
996 if (d->debug) {
997 time_t now = time(NULL);
998 if (!d->last_write && d->last_reg == reg && d->last_val == ret) {
999 d->repeat_count++;
1000 if (d->last_sec != now) {
1001 dprint(d, 2, "previous register op repeated %d times\n", d->repeat_count);
1002 d->last_sec = now;
1003 d->repeat_count = 0;
1005 } else {
1006 if (d->repeat_count) {
1007 dprint(d, 2, "previous register op repeated %d times\n", d->repeat_count);
1009 dprint(d, 2, "read %-16s: 0x%x (%x)\n", reg->name, ret, rmask);
1010 d->last_write = 0;
1011 d->last_reg = reg;
1012 d->last_val = ret;
1013 d->last_sec = now;
1014 d->repeat_count = 0;
1017 return ret;
1020 static void intel_hda_regs_reset(IntelHDAState *d)
1022 uint32_t *addr;
1023 int i;
1025 for (i = 0; i < sizeof(regtab)/sizeof(regtab[0]); i++) {
1026 if (regtab[i].name == NULL) {
1027 continue;
1029 if (regtab[i].offset == 0) {
1030 continue;
1032 addr = intel_hda_reg_addr(d, regtab + i);
1033 *addr = regtab[i].reset;
1037 /* --------------------------------------------------------------------- */
1039 static void intel_hda_mmio_writeb(void *opaque, target_phys_addr_t addr, uint32_t val)
1041 IntelHDAState *d = opaque;
1042 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1044 intel_hda_reg_write(d, reg, val, 0xff);
1047 static void intel_hda_mmio_writew(void *opaque, target_phys_addr_t addr, uint32_t val)
1049 IntelHDAState *d = opaque;
1050 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1052 intel_hda_reg_write(d, reg, val, 0xffff);
1055 static void intel_hda_mmio_writel(void *opaque, target_phys_addr_t addr, uint32_t val)
1057 IntelHDAState *d = opaque;
1058 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1060 intel_hda_reg_write(d, reg, val, 0xffffffff);
1063 static uint32_t intel_hda_mmio_readb(void *opaque, target_phys_addr_t addr)
1065 IntelHDAState *d = opaque;
1066 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1068 return intel_hda_reg_read(d, reg, 0xff);
1071 static uint32_t intel_hda_mmio_readw(void *opaque, target_phys_addr_t addr)
1073 IntelHDAState *d = opaque;
1074 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1076 return intel_hda_reg_read(d, reg, 0xffff);
1079 static uint32_t intel_hda_mmio_readl(void *opaque, target_phys_addr_t addr)
1081 IntelHDAState *d = opaque;
1082 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1084 return intel_hda_reg_read(d, reg, 0xffffffff);
1087 static CPUReadMemoryFunc * const intel_hda_mmio_read[3] = {
1088 intel_hda_mmio_readb,
1089 intel_hda_mmio_readw,
1090 intel_hda_mmio_readl,
1093 static CPUWriteMemoryFunc * const intel_hda_mmio_write[3] = {
1094 intel_hda_mmio_writeb,
1095 intel_hda_mmio_writew,
1096 intel_hda_mmio_writel,
1099 /* --------------------------------------------------------------------- */
1101 static void intel_hda_reset(DeviceState *dev)
1103 IntelHDAState *d = DO_UPCAST(IntelHDAState, pci.qdev, dev);
1104 DeviceState *qdev;
1105 HDACodecDevice *cdev;
1107 intel_hda_regs_reset(d);
1108 d->wall_base_ns = qemu_get_clock_ns(vm_clock);
1110 /* reset codecs */
1111 QLIST_FOREACH(qdev, &d->codecs.qbus.children, sibling) {
1112 cdev = DO_UPCAST(HDACodecDevice, qdev, qdev);
1113 if (qdev->info->reset) {
1114 qdev->info->reset(qdev);
1116 d->state_sts |= (1 << cdev->cad);
1118 intel_hda_update_irq(d);
1121 static int intel_hda_init(PCIDevice *pci)
1123 IntelHDAState *d = DO_UPCAST(IntelHDAState, pci, pci);
1124 uint8_t *conf = d->pci.config;
1126 d->name = d->pci.qdev.info->name;
1128 pci_config_set_interrupt_pin(conf, 1);
1130 /* HDCTL off 0x40 bit 0 selects signaling mode (1-HDA, 0 - Ac97) 18.1.19 */
1131 conf[0x40] = 0x01;
1133 d->mmio_addr = cpu_register_io_memory(intel_hda_mmio_read,
1134 intel_hda_mmio_write, d,
1135 DEVICE_NATIVE_ENDIAN);
1136 pci_register_bar_simple(&d->pci, 0, 0x4000, 0, d->mmio_addr);
1137 if (d->msi) {
1138 msi_init(&d->pci, 0x50, 1, true, false);
1141 hda_codec_bus_init(&d->pci.qdev, &d->codecs,
1142 intel_hda_response, intel_hda_xfer);
1144 return 0;
1147 static int intel_hda_exit(PCIDevice *pci)
1149 IntelHDAState *d = DO_UPCAST(IntelHDAState, pci, pci);
1151 msi_uninit(&d->pci);
1152 cpu_unregister_io_memory(d->mmio_addr);
1153 return 0;
1156 static void intel_hda_write_config(PCIDevice *pci, uint32_t addr,
1157 uint32_t val, int len)
1159 IntelHDAState *d = DO_UPCAST(IntelHDAState, pci, pci);
1161 pci_default_write_config(pci, addr, val, len);
1162 if (d->msi) {
1163 msi_write_config(pci, addr, val, len);
1167 static int intel_hda_post_load(void *opaque, int version)
1169 IntelHDAState* d = opaque;
1170 int i;
1172 dprint(d, 1, "%s\n", __FUNCTION__);
1173 for (i = 0; i < ARRAY_SIZE(d->st); i++) {
1174 if (d->st[i].ctl & 0x02) {
1175 intel_hda_parse_bdl(d, &d->st[i]);
1178 intel_hda_update_irq(d);
1179 return 0;
1182 static const VMStateDescription vmstate_intel_hda_stream = {
1183 .name = "intel-hda-stream",
1184 .version_id = 1,
1185 .fields = (VMStateField []) {
1186 VMSTATE_UINT32(ctl, IntelHDAStream),
1187 VMSTATE_UINT32(lpib, IntelHDAStream),
1188 VMSTATE_UINT32(cbl, IntelHDAStream),
1189 VMSTATE_UINT32(lvi, IntelHDAStream),
1190 VMSTATE_UINT32(fmt, IntelHDAStream),
1191 VMSTATE_UINT32(bdlp_lbase, IntelHDAStream),
1192 VMSTATE_UINT32(bdlp_ubase, IntelHDAStream),
1193 VMSTATE_END_OF_LIST()
1197 static const VMStateDescription vmstate_intel_hda = {
1198 .name = "intel-hda",
1199 .version_id = 1,
1200 .post_load = intel_hda_post_load,
1201 .fields = (VMStateField []) {
1202 VMSTATE_PCI_DEVICE(pci, IntelHDAState),
1204 /* registers */
1205 VMSTATE_UINT32(g_ctl, IntelHDAState),
1206 VMSTATE_UINT32(wake_en, IntelHDAState),
1207 VMSTATE_UINT32(state_sts, IntelHDAState),
1208 VMSTATE_UINT32(int_ctl, IntelHDAState),
1209 VMSTATE_UINT32(int_sts, IntelHDAState),
1210 VMSTATE_UINT32(wall_clk, IntelHDAState),
1211 VMSTATE_UINT32(corb_lbase, IntelHDAState),
1212 VMSTATE_UINT32(corb_ubase, IntelHDAState),
1213 VMSTATE_UINT32(corb_rp, IntelHDAState),
1214 VMSTATE_UINT32(corb_wp, IntelHDAState),
1215 VMSTATE_UINT32(corb_ctl, IntelHDAState),
1216 VMSTATE_UINT32(corb_sts, IntelHDAState),
1217 VMSTATE_UINT32(corb_size, IntelHDAState),
1218 VMSTATE_UINT32(rirb_lbase, IntelHDAState),
1219 VMSTATE_UINT32(rirb_ubase, IntelHDAState),
1220 VMSTATE_UINT32(rirb_wp, IntelHDAState),
1221 VMSTATE_UINT32(rirb_cnt, IntelHDAState),
1222 VMSTATE_UINT32(rirb_ctl, IntelHDAState),
1223 VMSTATE_UINT32(rirb_sts, IntelHDAState),
1224 VMSTATE_UINT32(rirb_size, IntelHDAState),
1225 VMSTATE_UINT32(dp_lbase, IntelHDAState),
1226 VMSTATE_UINT32(dp_ubase, IntelHDAState),
1227 VMSTATE_UINT32(icw, IntelHDAState),
1228 VMSTATE_UINT32(irr, IntelHDAState),
1229 VMSTATE_UINT32(ics, IntelHDAState),
1230 VMSTATE_STRUCT_ARRAY(st, IntelHDAState, 8, 0,
1231 vmstate_intel_hda_stream,
1232 IntelHDAStream),
1234 /* additional state info */
1235 VMSTATE_UINT32(rirb_count, IntelHDAState),
1236 VMSTATE_INT64(wall_base_ns, IntelHDAState),
1238 VMSTATE_END_OF_LIST()
1242 static PCIDeviceInfo intel_hda_info = {
1243 .qdev.name = "intel-hda",
1244 .qdev.desc = "Intel HD Audio Controller",
1245 .qdev.size = sizeof(IntelHDAState),
1246 .qdev.vmsd = &vmstate_intel_hda,
1247 .qdev.reset = intel_hda_reset,
1248 .init = intel_hda_init,
1249 .exit = intel_hda_exit,
1250 .config_write = intel_hda_write_config,
1251 .vendor_id = PCI_VENDOR_ID_INTEL,
1252 .device_id = 0x2668,
1253 .revision = 1,
1254 .class_id = PCI_CLASS_MULTIMEDIA_HD_AUDIO,
1255 .qdev.props = (Property[]) {
1256 DEFINE_PROP_UINT32("debug", IntelHDAState, debug, 0),
1257 DEFINE_PROP_UINT32("msi", IntelHDAState, msi, 1),
1258 DEFINE_PROP_END_OF_LIST(),
1262 static void intel_hda_register(void)
1264 pci_qdev_register(&intel_hda_info);
1266 device_init(intel_hda_register);
1269 * create intel hda controller with codec attached to it,
1270 * so '-soundhw hda' works.
1272 int intel_hda_and_codec_init(PCIBus *bus)
1274 PCIDevice *controller;
1275 BusState *hdabus;
1276 DeviceState *codec;
1278 controller = pci_create_simple(bus, -1, "intel-hda");
1279 hdabus = QLIST_FIRST(&controller->qdev.child_bus);
1280 codec = qdev_create(hdabus, "hda-duplex");
1281 qdev_init_nofail(codec);
1282 return 0;