Merge branch 's390-reorg' of git://repo.or.cz/qemu/rth
[qemu/agraf.git] / hw / intel-hda.c
blob784c229d8f68fd4d3631ac58f63ea7d50358ad2e
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/pci.h"
22 #include "pci/msi.h"
23 #include "qemu/timer.h"
24 #include "audiodev.h"
25 #include "intel-hda.h"
26 #include "intel-hda-defs.h"
27 #include "sysemu/dma.h"
29 /* --------------------------------------------------------------------- */
30 /* hda bus */
32 static Property hda_props[] = {
33 DEFINE_PROP_UINT32("cad", HDACodecDevice, cad, -1),
34 DEFINE_PROP_END_OF_LIST()
37 static const TypeInfo hda_codec_bus_info = {
38 .name = TYPE_HDA_BUS,
39 .parent = TYPE_BUS,
40 .instance_size = sizeof(HDACodecBus),
43 void hda_codec_bus_init(DeviceState *dev, HDACodecBus *bus,
44 hda_codec_response_func response,
45 hda_codec_xfer_func xfer)
47 qbus_create_inplace(&bus->qbus, TYPE_HDA_BUS, dev, NULL);
48 bus->response = response;
49 bus->xfer = xfer;
52 static int hda_codec_dev_init(DeviceState *qdev)
54 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, qdev->parent_bus);
55 HDACodecDevice *dev = DO_UPCAST(HDACodecDevice, qdev, qdev);
56 HDACodecDeviceClass *cdc = HDA_CODEC_DEVICE_GET_CLASS(dev);
58 if (dev->cad == -1) {
59 dev->cad = bus->next_cad;
61 if (dev->cad >= 15) {
62 return -1;
64 bus->next_cad = dev->cad + 1;
65 return cdc->init(dev);
68 static int hda_codec_dev_exit(DeviceState *qdev)
70 HDACodecDevice *dev = DO_UPCAST(HDACodecDevice, qdev, qdev);
71 HDACodecDeviceClass *cdc = HDA_CODEC_DEVICE_GET_CLASS(dev);
73 if (cdc->exit) {
74 cdc->exit(dev);
76 return 0;
79 HDACodecDevice *hda_codec_find(HDACodecBus *bus, uint32_t cad)
81 BusChild *kid;
82 HDACodecDevice *cdev;
84 QTAILQ_FOREACH(kid, &bus->qbus.children, sibling) {
85 DeviceState *qdev = kid->child;
86 cdev = DO_UPCAST(HDACodecDevice, qdev, qdev);
87 if (cdev->cad == cad) {
88 return cdev;
91 return NULL;
94 void hda_codec_response(HDACodecDevice *dev, bool solicited, uint32_t response)
96 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, dev->qdev.parent_bus);
97 bus->response(dev, solicited, response);
100 bool hda_codec_xfer(HDACodecDevice *dev, uint32_t stnr, bool output,
101 uint8_t *buf, uint32_t len)
103 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, dev->qdev.parent_bus);
104 return bus->xfer(dev, stnr, output, buf, len);
107 /* --------------------------------------------------------------------- */
108 /* intel hda emulation */
110 typedef struct IntelHDAStream IntelHDAStream;
111 typedef struct IntelHDAState IntelHDAState;
112 typedef struct IntelHDAReg IntelHDAReg;
114 typedef struct bpl {
115 uint64_t addr;
116 uint32_t len;
117 uint32_t flags;
118 } bpl;
120 struct IntelHDAStream {
121 /* registers */
122 uint32_t ctl;
123 uint32_t lpib;
124 uint32_t cbl;
125 uint32_t lvi;
126 uint32_t fmt;
127 uint32_t bdlp_lbase;
128 uint32_t bdlp_ubase;
130 /* state */
131 bpl *bpl;
132 uint32_t bentries;
133 uint32_t bsize, be, bp;
136 struct IntelHDAState {
137 PCIDevice pci;
138 const char *name;
139 HDACodecBus codecs;
141 /* registers */
142 uint32_t g_ctl;
143 uint32_t wake_en;
144 uint32_t state_sts;
145 uint32_t int_ctl;
146 uint32_t int_sts;
147 uint32_t wall_clk;
149 uint32_t corb_lbase;
150 uint32_t corb_ubase;
151 uint32_t corb_rp;
152 uint32_t corb_wp;
153 uint32_t corb_ctl;
154 uint32_t corb_sts;
155 uint32_t corb_size;
157 uint32_t rirb_lbase;
158 uint32_t rirb_ubase;
159 uint32_t rirb_wp;
160 uint32_t rirb_cnt;
161 uint32_t rirb_ctl;
162 uint32_t rirb_sts;
163 uint32_t rirb_size;
165 uint32_t dp_lbase;
166 uint32_t dp_ubase;
168 uint32_t icw;
169 uint32_t irr;
170 uint32_t ics;
172 /* streams */
173 IntelHDAStream st[8];
175 /* state */
176 MemoryRegion mmio;
177 uint32_t rirb_count;
178 int64_t wall_base_ns;
180 /* debug logging */
181 const IntelHDAReg *last_reg;
182 uint32_t last_val;
183 uint32_t last_write;
184 uint32_t last_sec;
185 uint32_t repeat_count;
187 /* properties */
188 uint32_t debug;
189 uint32_t msi;
192 struct IntelHDAReg {
193 const char *name; /* register name */
194 uint32_t size; /* size in bytes */
195 uint32_t reset; /* reset value */
196 uint32_t wmask; /* write mask */
197 uint32_t wclear; /* write 1 to clear bits */
198 uint32_t offset; /* location in IntelHDAState */
199 uint32_t shift; /* byte access entries for dwords */
200 uint32_t stream;
201 void (*whandler)(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old);
202 void (*rhandler)(IntelHDAState *d, const IntelHDAReg *reg);
205 static void intel_hda_reset(DeviceState *dev);
207 /* --------------------------------------------------------------------- */
209 static hwaddr intel_hda_addr(uint32_t lbase, uint32_t ubase)
211 hwaddr addr;
213 addr = ((uint64_t)ubase << 32) | lbase;
214 return addr;
217 static void intel_hda_update_int_sts(IntelHDAState *d)
219 uint32_t sts = 0;
220 uint32_t i;
222 /* update controller status */
223 if (d->rirb_sts & ICH6_RBSTS_IRQ) {
224 sts |= (1 << 30);
226 if (d->rirb_sts & ICH6_RBSTS_OVERRUN) {
227 sts |= (1 << 30);
229 if (d->state_sts & d->wake_en) {
230 sts |= (1 << 30);
233 /* update stream status */
234 for (i = 0; i < 8; i++) {
235 /* buffer completion interrupt */
236 if (d->st[i].ctl & (1 << 26)) {
237 sts |= (1 << i);
241 /* update global status */
242 if (sts & d->int_ctl) {
243 sts |= (1 << 31);
246 d->int_sts = sts;
249 static void intel_hda_update_irq(IntelHDAState *d)
251 int msi = d->msi && msi_enabled(&d->pci);
252 int level;
254 intel_hda_update_int_sts(d);
255 if (d->int_sts & (1 << 31) && d->int_ctl & (1 << 31)) {
256 level = 1;
257 } else {
258 level = 0;
260 dprint(d, 2, "%s: level %d [%s]\n", __FUNCTION__,
261 level, msi ? "msi" : "intx");
262 if (msi) {
263 if (level) {
264 msi_notify(&d->pci, 0);
266 } else {
267 qemu_set_irq(d->pci.irq[0], level);
271 static int intel_hda_send_command(IntelHDAState *d, uint32_t verb)
273 uint32_t cad, nid, data;
274 HDACodecDevice *codec;
275 HDACodecDeviceClass *cdc;
277 cad = (verb >> 28) & 0x0f;
278 if (verb & (1 << 27)) {
279 /* indirect node addressing, not specified in HDA 1.0 */
280 dprint(d, 1, "%s: indirect node addressing (guest bug?)\n", __FUNCTION__);
281 return -1;
283 nid = (verb >> 20) & 0x7f;
284 data = verb & 0xfffff;
286 codec = hda_codec_find(&d->codecs, cad);
287 if (codec == NULL) {
288 dprint(d, 1, "%s: addressed non-existing codec\n", __FUNCTION__);
289 return -1;
291 cdc = HDA_CODEC_DEVICE_GET_CLASS(codec);
292 cdc->command(codec, nid, data);
293 return 0;
296 static void intel_hda_corb_run(IntelHDAState *d)
298 hwaddr addr;
299 uint32_t rp, verb;
301 if (d->ics & ICH6_IRS_BUSY) {
302 dprint(d, 2, "%s: [icw] verb 0x%08x\n", __FUNCTION__, d->icw);
303 intel_hda_send_command(d, d->icw);
304 return;
307 for (;;) {
308 if (!(d->corb_ctl & ICH6_CORBCTL_RUN)) {
309 dprint(d, 2, "%s: !run\n", __FUNCTION__);
310 return;
312 if ((d->corb_rp & 0xff) == d->corb_wp) {
313 dprint(d, 2, "%s: corb ring empty\n", __FUNCTION__);
314 return;
316 if (d->rirb_count == d->rirb_cnt) {
317 dprint(d, 2, "%s: rirb count reached\n", __FUNCTION__);
318 return;
321 rp = (d->corb_rp + 1) & 0xff;
322 addr = intel_hda_addr(d->corb_lbase, d->corb_ubase);
323 verb = ldl_le_pci_dma(&d->pci, addr + 4*rp);
324 d->corb_rp = rp;
326 dprint(d, 2, "%s: [rp 0x%x] verb 0x%08x\n", __FUNCTION__, rp, verb);
327 intel_hda_send_command(d, verb);
331 static void intel_hda_response(HDACodecDevice *dev, bool solicited, uint32_t response)
333 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, dev->qdev.parent_bus);
334 IntelHDAState *d = container_of(bus, IntelHDAState, codecs);
335 hwaddr addr;
336 uint32_t wp, ex;
338 if (d->ics & ICH6_IRS_BUSY) {
339 dprint(d, 2, "%s: [irr] response 0x%x, cad 0x%x\n",
340 __FUNCTION__, response, dev->cad);
341 d->irr = response;
342 d->ics &= ~(ICH6_IRS_BUSY | 0xf0);
343 d->ics |= (ICH6_IRS_VALID | (dev->cad << 4));
344 return;
347 if (!(d->rirb_ctl & ICH6_RBCTL_DMA_EN)) {
348 dprint(d, 1, "%s: rirb dma disabled, drop codec response\n", __FUNCTION__);
349 return;
352 ex = (solicited ? 0 : (1 << 4)) | dev->cad;
353 wp = (d->rirb_wp + 1) & 0xff;
354 addr = intel_hda_addr(d->rirb_lbase, d->rirb_ubase);
355 stl_le_pci_dma(&d->pci, addr + 8*wp, response);
356 stl_le_pci_dma(&d->pci, addr + 8*wp + 4, ex);
357 d->rirb_wp = wp;
359 dprint(d, 2, "%s: [wp 0x%x] response 0x%x, extra 0x%x\n",
360 __FUNCTION__, wp, response, ex);
362 d->rirb_count++;
363 if (d->rirb_count == d->rirb_cnt) {
364 dprint(d, 2, "%s: rirb count reached (%d)\n", __FUNCTION__, d->rirb_count);
365 if (d->rirb_ctl & ICH6_RBCTL_IRQ_EN) {
366 d->rirb_sts |= ICH6_RBSTS_IRQ;
367 intel_hda_update_irq(d);
369 } else if ((d->corb_rp & 0xff) == d->corb_wp) {
370 dprint(d, 2, "%s: corb ring empty (%d/%d)\n", __FUNCTION__,
371 d->rirb_count, d->rirb_cnt);
372 if (d->rirb_ctl & ICH6_RBCTL_IRQ_EN) {
373 d->rirb_sts |= ICH6_RBSTS_IRQ;
374 intel_hda_update_irq(d);
379 static bool intel_hda_xfer(HDACodecDevice *dev, uint32_t stnr, bool output,
380 uint8_t *buf, uint32_t len)
382 HDACodecBus *bus = DO_UPCAST(HDACodecBus, qbus, dev->qdev.parent_bus);
383 IntelHDAState *d = container_of(bus, IntelHDAState, codecs);
384 hwaddr addr;
385 uint32_t s, copy, left;
386 IntelHDAStream *st;
387 bool irq = false;
389 st = output ? d->st + 4 : d->st;
390 for (s = 0; s < 4; s++) {
391 if (stnr == ((st[s].ctl >> 20) & 0x0f)) {
392 st = st + s;
393 break;
396 if (s == 4) {
397 return false;
399 if (st->bpl == NULL) {
400 return false;
402 if (st->ctl & (1 << 26)) {
404 * Wait with the next DMA xfer until the guest
405 * has acked the buffer completion interrupt
407 return false;
410 left = len;
411 while (left > 0) {
412 copy = left;
413 if (copy > st->bsize - st->lpib)
414 copy = st->bsize - st->lpib;
415 if (copy > st->bpl[st->be].len - st->bp)
416 copy = st->bpl[st->be].len - st->bp;
418 dprint(d, 3, "dma: entry %d, pos %d/%d, copy %d\n",
419 st->be, st->bp, st->bpl[st->be].len, copy);
421 pci_dma_rw(&d->pci, st->bpl[st->be].addr + st->bp, buf, copy, !output);
422 st->lpib += copy;
423 st->bp += copy;
424 buf += copy;
425 left -= copy;
427 if (st->bpl[st->be].len == st->bp) {
428 /* bpl entry filled */
429 if (st->bpl[st->be].flags & 0x01) {
430 irq = true;
432 st->bp = 0;
433 st->be++;
434 if (st->be == st->bentries) {
435 /* bpl wrap around */
436 st->be = 0;
437 st->lpib = 0;
441 if (d->dp_lbase & 0x01) {
442 addr = intel_hda_addr(d->dp_lbase & ~0x01, d->dp_ubase);
443 stl_le_pci_dma(&d->pci, addr + 8*s, st->lpib);
445 dprint(d, 3, "dma: --\n");
447 if (irq) {
448 st->ctl |= (1 << 26); /* buffer completion interrupt */
449 intel_hda_update_irq(d);
451 return true;
454 static void intel_hda_parse_bdl(IntelHDAState *d, IntelHDAStream *st)
456 hwaddr addr;
457 uint8_t buf[16];
458 uint32_t i;
460 addr = intel_hda_addr(st->bdlp_lbase, st->bdlp_ubase);
461 st->bentries = st->lvi +1;
462 g_free(st->bpl);
463 st->bpl = g_malloc(sizeof(bpl) * st->bentries);
464 for (i = 0; i < st->bentries; i++, addr += 16) {
465 pci_dma_read(&d->pci, addr, buf, 16);
466 st->bpl[i].addr = le64_to_cpu(*(uint64_t *)buf);
467 st->bpl[i].len = le32_to_cpu(*(uint32_t *)(buf + 8));
468 st->bpl[i].flags = le32_to_cpu(*(uint32_t *)(buf + 12));
469 dprint(d, 1, "bdl/%d: 0x%" PRIx64 " +0x%x, 0x%x\n",
470 i, st->bpl[i].addr, st->bpl[i].len, st->bpl[i].flags);
473 st->bsize = st->cbl;
474 st->lpib = 0;
475 st->be = 0;
476 st->bp = 0;
479 static void intel_hda_notify_codecs(IntelHDAState *d, uint32_t stream, bool running, bool output)
481 BusChild *kid;
482 HDACodecDevice *cdev;
484 QTAILQ_FOREACH(kid, &d->codecs.qbus.children, sibling) {
485 DeviceState *qdev = kid->child;
486 HDACodecDeviceClass *cdc;
488 cdev = DO_UPCAST(HDACodecDevice, qdev, qdev);
489 cdc = HDA_CODEC_DEVICE_GET_CLASS(cdev);
490 if (cdc->stream) {
491 cdc->stream(cdev, stream, running, output);
496 /* --------------------------------------------------------------------- */
498 static void intel_hda_set_g_ctl(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
500 if ((d->g_ctl & ICH6_GCTL_RESET) == 0) {
501 intel_hda_reset(&d->pci.qdev);
505 static void intel_hda_set_wake_en(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
507 intel_hda_update_irq(d);
510 static void intel_hda_set_state_sts(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
512 intel_hda_update_irq(d);
515 static void intel_hda_set_int_ctl(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
517 intel_hda_update_irq(d);
520 static void intel_hda_get_wall_clk(IntelHDAState *d, const IntelHDAReg *reg)
522 int64_t ns;
524 ns = qemu_get_clock_ns(vm_clock) - d->wall_base_ns;
525 d->wall_clk = (uint32_t)(ns * 24 / 1000); /* 24 MHz */
528 static void intel_hda_set_corb_wp(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
530 intel_hda_corb_run(d);
533 static void intel_hda_set_corb_ctl(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
535 intel_hda_corb_run(d);
538 static void intel_hda_set_rirb_wp(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
540 if (d->rirb_wp & ICH6_RIRBWP_RST) {
541 d->rirb_wp = 0;
545 static void intel_hda_set_rirb_sts(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
547 intel_hda_update_irq(d);
549 if ((old & ICH6_RBSTS_IRQ) && !(d->rirb_sts & ICH6_RBSTS_IRQ)) {
550 /* cleared ICH6_RBSTS_IRQ */
551 d->rirb_count = 0;
552 intel_hda_corb_run(d);
556 static void intel_hda_set_ics(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
558 if (d->ics & ICH6_IRS_BUSY) {
559 intel_hda_corb_run(d);
563 static void intel_hda_set_st_ctl(IntelHDAState *d, const IntelHDAReg *reg, uint32_t old)
565 bool output = reg->stream >= 4;
566 IntelHDAStream *st = d->st + reg->stream;
568 if (st->ctl & 0x01) {
569 /* reset */
570 dprint(d, 1, "st #%d: reset\n", reg->stream);
571 st->ctl = 0;
573 if ((st->ctl & 0x02) != (old & 0x02)) {
574 uint32_t stnr = (st->ctl >> 20) & 0x0f;
575 /* run bit flipped */
576 if (st->ctl & 0x02) {
577 /* start */
578 dprint(d, 1, "st #%d: start %d (ring buf %d bytes)\n",
579 reg->stream, stnr, st->cbl);
580 intel_hda_parse_bdl(d, st);
581 intel_hda_notify_codecs(d, stnr, true, output);
582 } else {
583 /* stop */
584 dprint(d, 1, "st #%d: stop %d\n", reg->stream, stnr);
585 intel_hda_notify_codecs(d, stnr, false, output);
588 intel_hda_update_irq(d);
591 /* --------------------------------------------------------------------- */
593 #define ST_REG(_n, _o) (0x80 + (_n) * 0x20 + (_o))
595 static const struct IntelHDAReg regtab[] = {
596 /* global */
597 [ ICH6_REG_GCAP ] = {
598 .name = "GCAP",
599 .size = 2,
600 .reset = 0x4401,
602 [ ICH6_REG_VMIN ] = {
603 .name = "VMIN",
604 .size = 1,
606 [ ICH6_REG_VMAJ ] = {
607 .name = "VMAJ",
608 .size = 1,
609 .reset = 1,
611 [ ICH6_REG_OUTPAY ] = {
612 .name = "OUTPAY",
613 .size = 2,
614 .reset = 0x3c,
616 [ ICH6_REG_INPAY ] = {
617 .name = "INPAY",
618 .size = 2,
619 .reset = 0x1d,
621 [ ICH6_REG_GCTL ] = {
622 .name = "GCTL",
623 .size = 4,
624 .wmask = 0x0103,
625 .offset = offsetof(IntelHDAState, g_ctl),
626 .whandler = intel_hda_set_g_ctl,
628 [ ICH6_REG_WAKEEN ] = {
629 .name = "WAKEEN",
630 .size = 2,
631 .wmask = 0x7fff,
632 .offset = offsetof(IntelHDAState, wake_en),
633 .whandler = intel_hda_set_wake_en,
635 [ ICH6_REG_STATESTS ] = {
636 .name = "STATESTS",
637 .size = 2,
638 .wmask = 0x7fff,
639 .wclear = 0x7fff,
640 .offset = offsetof(IntelHDAState, state_sts),
641 .whandler = intel_hda_set_state_sts,
644 /* interrupts */
645 [ ICH6_REG_INTCTL ] = {
646 .name = "INTCTL",
647 .size = 4,
648 .wmask = 0xc00000ff,
649 .offset = offsetof(IntelHDAState, int_ctl),
650 .whandler = intel_hda_set_int_ctl,
652 [ ICH6_REG_INTSTS ] = {
653 .name = "INTSTS",
654 .size = 4,
655 .wmask = 0xc00000ff,
656 .wclear = 0xc00000ff,
657 .offset = offsetof(IntelHDAState, int_sts),
660 /* misc */
661 [ ICH6_REG_WALLCLK ] = {
662 .name = "WALLCLK",
663 .size = 4,
664 .offset = offsetof(IntelHDAState, wall_clk),
665 .rhandler = intel_hda_get_wall_clk,
667 [ ICH6_REG_WALLCLK + 0x2000 ] = {
668 .name = "WALLCLK(alias)",
669 .size = 4,
670 .offset = offsetof(IntelHDAState, wall_clk),
671 .rhandler = intel_hda_get_wall_clk,
674 /* dma engine */
675 [ ICH6_REG_CORBLBASE ] = {
676 .name = "CORBLBASE",
677 .size = 4,
678 .wmask = 0xffffff80,
679 .offset = offsetof(IntelHDAState, corb_lbase),
681 [ ICH6_REG_CORBUBASE ] = {
682 .name = "CORBUBASE",
683 .size = 4,
684 .wmask = 0xffffffff,
685 .offset = offsetof(IntelHDAState, corb_ubase),
687 [ ICH6_REG_CORBWP ] = {
688 .name = "CORBWP",
689 .size = 2,
690 .wmask = 0xff,
691 .offset = offsetof(IntelHDAState, corb_wp),
692 .whandler = intel_hda_set_corb_wp,
694 [ ICH6_REG_CORBRP ] = {
695 .name = "CORBRP",
696 .size = 2,
697 .wmask = 0x80ff,
698 .offset = offsetof(IntelHDAState, corb_rp),
700 [ ICH6_REG_CORBCTL ] = {
701 .name = "CORBCTL",
702 .size = 1,
703 .wmask = 0x03,
704 .offset = offsetof(IntelHDAState, corb_ctl),
705 .whandler = intel_hda_set_corb_ctl,
707 [ ICH6_REG_CORBSTS ] = {
708 .name = "CORBSTS",
709 .size = 1,
710 .wmask = 0x01,
711 .wclear = 0x01,
712 .offset = offsetof(IntelHDAState, corb_sts),
714 [ ICH6_REG_CORBSIZE ] = {
715 .name = "CORBSIZE",
716 .size = 1,
717 .reset = 0x42,
718 .offset = offsetof(IntelHDAState, corb_size),
720 [ ICH6_REG_RIRBLBASE ] = {
721 .name = "RIRBLBASE",
722 .size = 4,
723 .wmask = 0xffffff80,
724 .offset = offsetof(IntelHDAState, rirb_lbase),
726 [ ICH6_REG_RIRBUBASE ] = {
727 .name = "RIRBUBASE",
728 .size = 4,
729 .wmask = 0xffffffff,
730 .offset = offsetof(IntelHDAState, rirb_ubase),
732 [ ICH6_REG_RIRBWP ] = {
733 .name = "RIRBWP",
734 .size = 2,
735 .wmask = 0x8000,
736 .offset = offsetof(IntelHDAState, rirb_wp),
737 .whandler = intel_hda_set_rirb_wp,
739 [ ICH6_REG_RINTCNT ] = {
740 .name = "RINTCNT",
741 .size = 2,
742 .wmask = 0xff,
743 .offset = offsetof(IntelHDAState, rirb_cnt),
745 [ ICH6_REG_RIRBCTL ] = {
746 .name = "RIRBCTL",
747 .size = 1,
748 .wmask = 0x07,
749 .offset = offsetof(IntelHDAState, rirb_ctl),
751 [ ICH6_REG_RIRBSTS ] = {
752 .name = "RIRBSTS",
753 .size = 1,
754 .wmask = 0x05,
755 .wclear = 0x05,
756 .offset = offsetof(IntelHDAState, rirb_sts),
757 .whandler = intel_hda_set_rirb_sts,
759 [ ICH6_REG_RIRBSIZE ] = {
760 .name = "RIRBSIZE",
761 .size = 1,
762 .reset = 0x42,
763 .offset = offsetof(IntelHDAState, rirb_size),
766 [ ICH6_REG_DPLBASE ] = {
767 .name = "DPLBASE",
768 .size = 4,
769 .wmask = 0xffffff81,
770 .offset = offsetof(IntelHDAState, dp_lbase),
772 [ ICH6_REG_DPUBASE ] = {
773 .name = "DPUBASE",
774 .size = 4,
775 .wmask = 0xffffffff,
776 .offset = offsetof(IntelHDAState, dp_ubase),
779 [ ICH6_REG_IC ] = {
780 .name = "ICW",
781 .size = 4,
782 .wmask = 0xffffffff,
783 .offset = offsetof(IntelHDAState, icw),
785 [ ICH6_REG_IR ] = {
786 .name = "IRR",
787 .size = 4,
788 .offset = offsetof(IntelHDAState, irr),
790 [ ICH6_REG_IRS ] = {
791 .name = "ICS",
792 .size = 2,
793 .wmask = 0x0003,
794 .wclear = 0x0002,
795 .offset = offsetof(IntelHDAState, ics),
796 .whandler = intel_hda_set_ics,
799 #define HDA_STREAM(_t, _i) \
800 [ ST_REG(_i, ICH6_REG_SD_CTL) ] = { \
801 .stream = _i, \
802 .name = _t stringify(_i) " CTL", \
803 .size = 4, \
804 .wmask = 0x1cff001f, \
805 .offset = offsetof(IntelHDAState, st[_i].ctl), \
806 .whandler = intel_hda_set_st_ctl, \
807 }, \
808 [ ST_REG(_i, ICH6_REG_SD_CTL) + 2] = { \
809 .stream = _i, \
810 .name = _t stringify(_i) " CTL(stnr)", \
811 .size = 1, \
812 .shift = 16, \
813 .wmask = 0x00ff0000, \
814 .offset = offsetof(IntelHDAState, st[_i].ctl), \
815 .whandler = intel_hda_set_st_ctl, \
816 }, \
817 [ ST_REG(_i, ICH6_REG_SD_STS)] = { \
818 .stream = _i, \
819 .name = _t stringify(_i) " CTL(sts)", \
820 .size = 1, \
821 .shift = 24, \
822 .wmask = 0x1c000000, \
823 .wclear = 0x1c000000, \
824 .offset = offsetof(IntelHDAState, st[_i].ctl), \
825 .whandler = intel_hda_set_st_ctl, \
826 }, \
827 [ ST_REG(_i, ICH6_REG_SD_LPIB) ] = { \
828 .stream = _i, \
829 .name = _t stringify(_i) " LPIB", \
830 .size = 4, \
831 .offset = offsetof(IntelHDAState, st[_i].lpib), \
832 }, \
833 [ ST_REG(_i, ICH6_REG_SD_LPIB) + 0x2000 ] = { \
834 .stream = _i, \
835 .name = _t stringify(_i) " LPIB(alias)", \
836 .size = 4, \
837 .offset = offsetof(IntelHDAState, st[_i].lpib), \
838 }, \
839 [ ST_REG(_i, ICH6_REG_SD_CBL) ] = { \
840 .stream = _i, \
841 .name = _t stringify(_i) " CBL", \
842 .size = 4, \
843 .wmask = 0xffffffff, \
844 .offset = offsetof(IntelHDAState, st[_i].cbl), \
845 }, \
846 [ ST_REG(_i, ICH6_REG_SD_LVI) ] = { \
847 .stream = _i, \
848 .name = _t stringify(_i) " LVI", \
849 .size = 2, \
850 .wmask = 0x00ff, \
851 .offset = offsetof(IntelHDAState, st[_i].lvi), \
852 }, \
853 [ ST_REG(_i, ICH6_REG_SD_FIFOSIZE) ] = { \
854 .stream = _i, \
855 .name = _t stringify(_i) " FIFOS", \
856 .size = 2, \
857 .reset = HDA_BUFFER_SIZE, \
858 }, \
859 [ ST_REG(_i, ICH6_REG_SD_FORMAT) ] = { \
860 .stream = _i, \
861 .name = _t stringify(_i) " FMT", \
862 .size = 2, \
863 .wmask = 0x7f7f, \
864 .offset = offsetof(IntelHDAState, st[_i].fmt), \
865 }, \
866 [ ST_REG(_i, ICH6_REG_SD_BDLPL) ] = { \
867 .stream = _i, \
868 .name = _t stringify(_i) " BDLPL", \
869 .size = 4, \
870 .wmask = 0xffffff80, \
871 .offset = offsetof(IntelHDAState, st[_i].bdlp_lbase), \
872 }, \
873 [ ST_REG(_i, ICH6_REG_SD_BDLPU) ] = { \
874 .stream = _i, \
875 .name = _t stringify(_i) " BDLPU", \
876 .size = 4, \
877 .wmask = 0xffffffff, \
878 .offset = offsetof(IntelHDAState, st[_i].bdlp_ubase), \
879 }, \
881 HDA_STREAM("IN", 0)
882 HDA_STREAM("IN", 1)
883 HDA_STREAM("IN", 2)
884 HDA_STREAM("IN", 3)
886 HDA_STREAM("OUT", 4)
887 HDA_STREAM("OUT", 5)
888 HDA_STREAM("OUT", 6)
889 HDA_STREAM("OUT", 7)
893 static const IntelHDAReg *intel_hda_reg_find(IntelHDAState *d, hwaddr addr)
895 const IntelHDAReg *reg;
897 if (addr >= sizeof(regtab)/sizeof(regtab[0])) {
898 goto noreg;
900 reg = regtab+addr;
901 if (reg->name == NULL) {
902 goto noreg;
904 return reg;
906 noreg:
907 dprint(d, 1, "unknown register, addr 0x%x\n", (int) addr);
908 return NULL;
911 static uint32_t *intel_hda_reg_addr(IntelHDAState *d, const IntelHDAReg *reg)
913 uint8_t *addr = (void*)d;
915 addr += reg->offset;
916 return (uint32_t*)addr;
919 static void intel_hda_reg_write(IntelHDAState *d, const IntelHDAReg *reg, uint32_t val,
920 uint32_t wmask)
922 uint32_t *addr;
923 uint32_t old;
925 if (!reg) {
926 return;
929 if (d->debug) {
930 time_t now = time(NULL);
931 if (d->last_write && d->last_reg == reg && d->last_val == val) {
932 d->repeat_count++;
933 if (d->last_sec != now) {
934 dprint(d, 2, "previous register op repeated %d times\n", d->repeat_count);
935 d->last_sec = now;
936 d->repeat_count = 0;
938 } else {
939 if (d->repeat_count) {
940 dprint(d, 2, "previous register op repeated %d times\n", d->repeat_count);
942 dprint(d, 2, "write %-16s: 0x%x (%x)\n", reg->name, val, wmask);
943 d->last_write = 1;
944 d->last_reg = reg;
945 d->last_val = val;
946 d->last_sec = now;
947 d->repeat_count = 0;
950 assert(reg->offset != 0);
952 addr = intel_hda_reg_addr(d, reg);
953 old = *addr;
955 if (reg->shift) {
956 val <<= reg->shift;
957 wmask <<= reg->shift;
959 wmask &= reg->wmask;
960 *addr &= ~wmask;
961 *addr |= wmask & val;
962 *addr &= ~(val & reg->wclear);
964 if (reg->whandler) {
965 reg->whandler(d, reg, old);
969 static uint32_t intel_hda_reg_read(IntelHDAState *d, const IntelHDAReg *reg,
970 uint32_t rmask)
972 uint32_t *addr, ret;
974 if (!reg) {
975 return 0;
978 if (reg->rhandler) {
979 reg->rhandler(d, reg);
982 if (reg->offset == 0) {
983 /* constant read-only register */
984 ret = reg->reset;
985 } else {
986 addr = intel_hda_reg_addr(d, reg);
987 ret = *addr;
988 if (reg->shift) {
989 ret >>= reg->shift;
991 ret &= rmask;
993 if (d->debug) {
994 time_t now = time(NULL);
995 if (!d->last_write && d->last_reg == reg && d->last_val == ret) {
996 d->repeat_count++;
997 if (d->last_sec != now) {
998 dprint(d, 2, "previous register op repeated %d times\n", d->repeat_count);
999 d->last_sec = now;
1000 d->repeat_count = 0;
1002 } else {
1003 if (d->repeat_count) {
1004 dprint(d, 2, "previous register op repeated %d times\n", d->repeat_count);
1006 dprint(d, 2, "read %-16s: 0x%x (%x)\n", reg->name, ret, rmask);
1007 d->last_write = 0;
1008 d->last_reg = reg;
1009 d->last_val = ret;
1010 d->last_sec = now;
1011 d->repeat_count = 0;
1014 return ret;
1017 static void intel_hda_regs_reset(IntelHDAState *d)
1019 uint32_t *addr;
1020 int i;
1022 for (i = 0; i < sizeof(regtab)/sizeof(regtab[0]); i++) {
1023 if (regtab[i].name == NULL) {
1024 continue;
1026 if (regtab[i].offset == 0) {
1027 continue;
1029 addr = intel_hda_reg_addr(d, regtab + i);
1030 *addr = regtab[i].reset;
1034 /* --------------------------------------------------------------------- */
1036 static void intel_hda_mmio_writeb(void *opaque, hwaddr addr, uint32_t val)
1038 IntelHDAState *d = opaque;
1039 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1041 intel_hda_reg_write(d, reg, val, 0xff);
1044 static void intel_hda_mmio_writew(void *opaque, hwaddr addr, uint32_t val)
1046 IntelHDAState *d = opaque;
1047 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1049 intel_hda_reg_write(d, reg, val, 0xffff);
1052 static void intel_hda_mmio_writel(void *opaque, hwaddr addr, uint32_t val)
1054 IntelHDAState *d = opaque;
1055 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1057 intel_hda_reg_write(d, reg, val, 0xffffffff);
1060 static uint32_t intel_hda_mmio_readb(void *opaque, hwaddr addr)
1062 IntelHDAState *d = opaque;
1063 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1065 return intel_hda_reg_read(d, reg, 0xff);
1068 static uint32_t intel_hda_mmio_readw(void *opaque, hwaddr addr)
1070 IntelHDAState *d = opaque;
1071 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1073 return intel_hda_reg_read(d, reg, 0xffff);
1076 static uint32_t intel_hda_mmio_readl(void *opaque, hwaddr addr)
1078 IntelHDAState *d = opaque;
1079 const IntelHDAReg *reg = intel_hda_reg_find(d, addr);
1081 return intel_hda_reg_read(d, reg, 0xffffffff);
1084 static const MemoryRegionOps intel_hda_mmio_ops = {
1085 .old_mmio = {
1086 .read = {
1087 intel_hda_mmio_readb,
1088 intel_hda_mmio_readw,
1089 intel_hda_mmio_readl,
1091 .write = {
1092 intel_hda_mmio_writeb,
1093 intel_hda_mmio_writew,
1094 intel_hda_mmio_writel,
1097 .endianness = DEVICE_NATIVE_ENDIAN,
1100 /* --------------------------------------------------------------------- */
1102 static void intel_hda_reset(DeviceState *dev)
1104 BusChild *kid;
1105 IntelHDAState *d = DO_UPCAST(IntelHDAState, pci.qdev, dev);
1106 HDACodecDevice *cdev;
1108 intel_hda_regs_reset(d);
1109 d->wall_base_ns = qemu_get_clock_ns(vm_clock);
1111 /* reset codecs */
1112 QTAILQ_FOREACH(kid, &d->codecs.qbus.children, sibling) {
1113 DeviceState *qdev = kid->child;
1114 cdev = DO_UPCAST(HDACodecDevice, qdev, qdev);
1115 device_reset(DEVICE(cdev));
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 = object_get_typename(OBJECT(d));
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 memory_region_init_io(&d->mmio, &intel_hda_mmio_ops, d,
1134 "intel-hda", 0x4000);
1135 pci_register_bar(&d->pci, 0, 0, &d->mmio);
1136 if (d->msi) {
1137 msi_init(&d->pci, 0x50, 1, true, false);
1140 hda_codec_bus_init(&d->pci.qdev, &d->codecs,
1141 intel_hda_response, intel_hda_xfer);
1143 return 0;
1146 static void intel_hda_exit(PCIDevice *pci)
1148 IntelHDAState *d = DO_UPCAST(IntelHDAState, pci, pci);
1150 msi_uninit(&d->pci);
1151 memory_region_destroy(&d->mmio);
1154 static int intel_hda_post_load(void *opaque, int version)
1156 IntelHDAState* d = opaque;
1157 int i;
1159 dprint(d, 1, "%s\n", __FUNCTION__);
1160 for (i = 0; i < ARRAY_SIZE(d->st); i++) {
1161 if (d->st[i].ctl & 0x02) {
1162 intel_hda_parse_bdl(d, &d->st[i]);
1165 intel_hda_update_irq(d);
1166 return 0;
1169 static const VMStateDescription vmstate_intel_hda_stream = {
1170 .name = "intel-hda-stream",
1171 .version_id = 1,
1172 .fields = (VMStateField []) {
1173 VMSTATE_UINT32(ctl, IntelHDAStream),
1174 VMSTATE_UINT32(lpib, IntelHDAStream),
1175 VMSTATE_UINT32(cbl, IntelHDAStream),
1176 VMSTATE_UINT32(lvi, IntelHDAStream),
1177 VMSTATE_UINT32(fmt, IntelHDAStream),
1178 VMSTATE_UINT32(bdlp_lbase, IntelHDAStream),
1179 VMSTATE_UINT32(bdlp_ubase, IntelHDAStream),
1180 VMSTATE_END_OF_LIST()
1184 static const VMStateDescription vmstate_intel_hda = {
1185 .name = "intel-hda",
1186 .version_id = 1,
1187 .post_load = intel_hda_post_load,
1188 .fields = (VMStateField []) {
1189 VMSTATE_PCI_DEVICE(pci, IntelHDAState),
1191 /* registers */
1192 VMSTATE_UINT32(g_ctl, IntelHDAState),
1193 VMSTATE_UINT32(wake_en, IntelHDAState),
1194 VMSTATE_UINT32(state_sts, IntelHDAState),
1195 VMSTATE_UINT32(int_ctl, IntelHDAState),
1196 VMSTATE_UINT32(int_sts, IntelHDAState),
1197 VMSTATE_UINT32(wall_clk, IntelHDAState),
1198 VMSTATE_UINT32(corb_lbase, IntelHDAState),
1199 VMSTATE_UINT32(corb_ubase, IntelHDAState),
1200 VMSTATE_UINT32(corb_rp, IntelHDAState),
1201 VMSTATE_UINT32(corb_wp, IntelHDAState),
1202 VMSTATE_UINT32(corb_ctl, IntelHDAState),
1203 VMSTATE_UINT32(corb_sts, IntelHDAState),
1204 VMSTATE_UINT32(corb_size, IntelHDAState),
1205 VMSTATE_UINT32(rirb_lbase, IntelHDAState),
1206 VMSTATE_UINT32(rirb_ubase, IntelHDAState),
1207 VMSTATE_UINT32(rirb_wp, IntelHDAState),
1208 VMSTATE_UINT32(rirb_cnt, IntelHDAState),
1209 VMSTATE_UINT32(rirb_ctl, IntelHDAState),
1210 VMSTATE_UINT32(rirb_sts, IntelHDAState),
1211 VMSTATE_UINT32(rirb_size, IntelHDAState),
1212 VMSTATE_UINT32(dp_lbase, IntelHDAState),
1213 VMSTATE_UINT32(dp_ubase, IntelHDAState),
1214 VMSTATE_UINT32(icw, IntelHDAState),
1215 VMSTATE_UINT32(irr, IntelHDAState),
1216 VMSTATE_UINT32(ics, IntelHDAState),
1217 VMSTATE_STRUCT_ARRAY(st, IntelHDAState, 8, 0,
1218 vmstate_intel_hda_stream,
1219 IntelHDAStream),
1221 /* additional state info */
1222 VMSTATE_UINT32(rirb_count, IntelHDAState),
1223 VMSTATE_INT64(wall_base_ns, IntelHDAState),
1225 VMSTATE_END_OF_LIST()
1229 static Property intel_hda_properties[] = {
1230 DEFINE_PROP_UINT32("debug", IntelHDAState, debug, 0),
1231 DEFINE_PROP_UINT32("msi", IntelHDAState, msi, 1),
1232 DEFINE_PROP_END_OF_LIST(),
1235 static void intel_hda_class_init_common(ObjectClass *klass)
1237 DeviceClass *dc = DEVICE_CLASS(klass);
1238 PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
1240 k->init = intel_hda_init;
1241 k->exit = intel_hda_exit;
1242 k->vendor_id = PCI_VENDOR_ID_INTEL;
1243 k->class_id = PCI_CLASS_MULTIMEDIA_HD_AUDIO;
1244 dc->reset = intel_hda_reset;
1245 dc->vmsd = &vmstate_intel_hda;
1246 dc->props = intel_hda_properties;
1249 static void intel_hda_class_init_ich6(ObjectClass *klass, void *data)
1251 DeviceClass *dc = DEVICE_CLASS(klass);
1252 PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
1254 intel_hda_class_init_common(klass);
1255 k->device_id = 0x2668;
1256 k->revision = 1;
1257 dc->desc = "Intel HD Audio Controller (ich6)";
1260 static void intel_hda_class_init_ich9(ObjectClass *klass, void *data)
1262 DeviceClass *dc = DEVICE_CLASS(klass);
1263 PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
1265 intel_hda_class_init_common(klass);
1266 k->device_id = 0x293e;
1267 k->revision = 3;
1268 dc->desc = "Intel HD Audio Controller (ich9)";
1271 static const TypeInfo intel_hda_info_ich6 = {
1272 .name = "intel-hda",
1273 .parent = TYPE_PCI_DEVICE,
1274 .instance_size = sizeof(IntelHDAState),
1275 .class_init = intel_hda_class_init_ich6,
1278 static const TypeInfo intel_hda_info_ich9 = {
1279 .name = "ich9-intel-hda",
1280 .parent = TYPE_PCI_DEVICE,
1281 .instance_size = sizeof(IntelHDAState),
1282 .class_init = intel_hda_class_init_ich9,
1285 static void hda_codec_device_class_init(ObjectClass *klass, void *data)
1287 DeviceClass *k = DEVICE_CLASS(klass);
1288 k->init = hda_codec_dev_init;
1289 k->exit = hda_codec_dev_exit;
1290 k->bus_type = TYPE_HDA_BUS;
1291 k->props = hda_props;
1294 static const TypeInfo hda_codec_device_type_info = {
1295 .name = TYPE_HDA_CODEC_DEVICE,
1296 .parent = TYPE_DEVICE,
1297 .instance_size = sizeof(HDACodecDevice),
1298 .abstract = true,
1299 .class_size = sizeof(HDACodecDeviceClass),
1300 .class_init = hda_codec_device_class_init,
1303 static void intel_hda_register_types(void)
1305 type_register_static(&hda_codec_bus_info);
1306 type_register_static(&intel_hda_info_ich6);
1307 type_register_static(&intel_hda_info_ich9);
1308 type_register_static(&hda_codec_device_type_info);
1311 type_init(intel_hda_register_types)
1314 * create intel hda controller with codec attached to it,
1315 * so '-soundhw hda' works.
1317 int intel_hda_and_codec_init(PCIBus *bus)
1319 PCIDevice *controller;
1320 BusState *hdabus;
1321 DeviceState *codec;
1323 controller = pci_create_simple(bus, -1, "intel-hda");
1324 hdabus = QLIST_FIRST(&controller->qdev.child_bus);
1325 codec = qdev_create(hdabus, "hda-duplex");
1326 qdev_init_nofail(codec);
1327 return 0;