3b60e8c36f
This doesn't include a userland interface, but it does include a couple of commands for the debug shell. ac97_status, which shows some register and port values for the ac97 and ac97_noise which attempts to play a (very annoying) 440Hz sine wave through the sound card.
246 lines
9.9 KiB
C
246 lines
9.9 KiB
C
/* vim: tabstop=4 shiftwidth=4 noexpandtab
|
|
*
|
|
* Driver for the Intel AC'97.
|
|
*
|
|
* See <http://www.intel.com/design/chipsets/manuals/29802801.pdf>.
|
|
*/
|
|
|
|
#include <logging.h>
|
|
#include <mem.h>
|
|
#include <module.h>
|
|
#include <mod/shell.h>
|
|
#include <printf.h>
|
|
#include <pci.h>
|
|
#include <system.h>
|
|
|
|
/* Utility macros */
|
|
#define N_ELEMENTS(arr) (sizeof(arr) / sizeof((arr)[0]))
|
|
|
|
/* BARs! */
|
|
#define AC97_NAMBAR 0x10 /* Native Audio Mixer Base Address Register */
|
|
#define AC97_NABMBAR 0x14 /* Native Audio Bus Mastering Base Address Register */
|
|
|
|
/* Bus mastering IO port offsets */
|
|
#define AC97_PO_BDBAR 0x10 /* PCM out buffer descriptor BAR */
|
|
#define AC97_PO_CIV 0x14 /* PCM out current index value */
|
|
#define AC97_PO_LVI 0x15 /* PCM out last valid index */
|
|
#define AC97_PO_SR 0x16 /* PCM out status register */
|
|
#define AC97_PO_PICB 0x18 /* PCM out position in current buffer register */
|
|
#define AC97_PO_CR 0x1B /* PCM out control register */
|
|
|
|
/* Bus mastering misc */
|
|
/* Buffer descriptor list constants */
|
|
#define AC97_BDL_LEN 32 /* Buffer descriptor list length */
|
|
#define AC97_BDL_BUFFER_LEN 0x8000 /* Length of buffer in BDL */
|
|
#define AC97_CL_GET_LENGTH(cl) ((cl) & 0xFFFF) /* Decode length from cl */
|
|
#define AC97_CL_SET_LENGTH(cl, v) ((cl) = (v) & 0xFFFF) /* Encode length to cl */
|
|
#define AC97_CL_BUP (1 << 30) /* Buffer underrun policy in cl */
|
|
#define AC97_CL_IOC (1 << 31) /* Interrupt on completion flag in cl */
|
|
|
|
/* PCM out control register flags */
|
|
#define AC97_X_CR_RPBM (1 << 0) /* Run/pause bus master */
|
|
#define AC97_X_CR_RR (1 << 1) /* Reset registers */
|
|
#define AC97_X_CR_LVBIE (1 << 2) /* Last valid buffer interrupt enable */
|
|
#define AC97_X_CR_FEIE (1 << 3) /* FIFO error interrupt enable */
|
|
#define AC97_X_CR_IOCE (1 << 4) /* Interrupt on completion enable */
|
|
|
|
/* Status register flags */
|
|
#define AC97_X_SR_DCH (1 << 0) /* DMA controller halted */
|
|
#define AC97_X_SR_CELV (1 << 1) /* Current equals last valid */
|
|
#define AC97_X_SR_LVBCI (1 << 2) /* Last valid buffer completion interrupt */
|
|
#define AC97_X_SR_BCIS (1 << 3) /* Buffer completion interrupt status */
|
|
#define AC97_X_SR_FIFOE (1 << 3) /* FIFO error */
|
|
|
|
/* Mixer IO port offsets */
|
|
#define AC97_RESET 0x00
|
|
#define AC97_MASTER_VOLUME 0x02
|
|
#define AC97_AUX_OUT_VOLUME 0x04
|
|
#define AC97_MONO_VOLUME 0x06
|
|
#define AC97_PCM_OUT_VOLUME 0x18
|
|
|
|
/* An entry in a buffer dscriptor list */
|
|
typedef struct {
|
|
uint32_t pointer; /* Pointer to buffer */
|
|
uint32_t cl; /* Control values and buffer length */
|
|
} __attribute__((packed)) ac97_bdl_entry_t;
|
|
|
|
typedef struct {
|
|
uint32_t pci_device;
|
|
uint16_t nabmbar; /* Native audio bus mastring BAR */
|
|
uint16_t nambar; /* Native audio mixing BAR */
|
|
size_t irq; /* This ac97's irq */
|
|
uint8_t lvi; /* The currently set last valid index */
|
|
ac97_bdl_entry_t * bdl; /* Buffer descriptor list */
|
|
uint16_t * bufs[AC97_BDL_LEN]; /* Virtual addresses for buffers in BDL */
|
|
} ac97_device_t;
|
|
|
|
static ac97_device_t _device;
|
|
|
|
static void find_ac97(uint32_t device, uint16_t vendorid, uint16_t deviceid, void * extra) {
|
|
|
|
ac97_device_t * ac97 = extra;
|
|
|
|
if ((vendorid == 0x8086) && (deviceid == 0x2415)) {
|
|
ac97->pci_device = device;
|
|
}
|
|
|
|
}
|
|
|
|
DEFINE_SHELL_FUNCTION(ac97_status, "[debug] AC'97 status values") {
|
|
if (!_device.pci_device) {
|
|
fprintf(tty, "No AC'97 device found.\n");
|
|
return 1;
|
|
}
|
|
fprintf(tty, "AC'97 audio device is at 0x%x.\n", _device.pci_device);
|
|
size_t irq = pci_read_field(_device.pci_device, PCI_INTERRUPT_LINE, 1);
|
|
fprintf(tty, "IRQ: %d\n", irq);
|
|
uint16_t command_register = pci_read_field(_device.pci_device, PCI_COMMAND, 2);
|
|
fprintf(tty, "COMMAND: 0x%04x\n", command_register);
|
|
fprintf(tty, "NABMBAR: 0x%04x\n", pci_read_field(_device.pci_device, AC97_NABMBAR, 2));
|
|
fprintf(tty, "PO_BDBAR: 0x%08x\n", inportl(_device.nabmbar + AC97_PO_BDBAR));
|
|
if (_device.bdl) {
|
|
for (int i = 0; i < AC97_BDL_LEN; i++) {
|
|
fprintf(tty, "bdl[%d].pointer: 0x%x\n", i, _device.bdl[i].pointer);
|
|
fprintf(tty, "bdl[%d].cl: 0x%x\n", i, _device.bdl[i].cl);
|
|
}
|
|
}
|
|
fprintf(tty, "PO_CIV: %d\n", inportb(_device.nabmbar + AC97_PO_CIV));
|
|
fprintf(tty, "PO_PICB: 0x%04x\n", inportb(_device.nabmbar + AC97_PO_PICB));
|
|
fprintf(tty, "PO_CR: 0x%02x\n", inportb(_device.nabmbar + AC97_PO_CR));
|
|
fprintf(tty, "PO_LVI: 0x%02x\n", inportb(_device.nabmbar + AC97_PO_LVI));
|
|
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* A stereo sample of a 440hz sine wave biased 50% to the right. It is sampled
|
|
* at 48KHz with 16-bit samples and interleaved. Technically you'll get some
|
|
* distortion copying this sample multiple times since the ends don't really
|
|
* line up, but it's good enough for testing purposes.
|
|
*/
|
|
unsigned char sample_440[] = {
|
|
0x0f, 0x00, 0x1f, 0x00, 0xe0, 0x02, 0xc0, 0x05, 0xfb, 0x05, 0xf2, 0x0b,
|
|
0xb7, 0x08, 0x74, 0x11, 0xc3, 0x0b, 0x81, 0x17, 0x7d, 0x0e, 0x00, 0x1d,
|
|
0x61, 0x11, 0xbc, 0x22, 0x13, 0x14, 0x28, 0x28, 0xc3, 0x16, 0x86, 0x2d,
|
|
0x61, 0x19, 0xc3, 0x32, 0xde, 0x1b, 0xbb, 0x37, 0x55, 0x1e, 0xac, 0x3c,
|
|
0x9f, 0x20, 0x38, 0x41, 0xdd, 0x22, 0xc2, 0x45, 0xf2, 0x24, 0xdd, 0x49,
|
|
0xf1, 0x26, 0xe5, 0x4d, 0xc6, 0x28, 0x8e, 0x51, 0x81, 0x2a, 0xfc, 0x54,
|
|
0x11, 0x2c, 0x2a, 0x58, 0x7f, 0x2d, 0xf7, 0x5a, 0xc8, 0x2e, 0x93, 0x5d,
|
|
0xe2, 0x2f, 0xc4, 0x5f, 0xdf, 0x30, 0xbc, 0x61, 0xa5, 0x31, 0x4d, 0x63,
|
|
0x4d, 0x32, 0x98, 0x64, 0xc2, 0x32, 0x87, 0x65, 0x10, 0x33, 0x1c, 0x66,
|
|
0x33, 0x33, 0x69, 0x66, 0x26, 0x33, 0x4a, 0x66, 0xf5, 0x32, 0xe9, 0x65,
|
|
0x8e, 0x32, 0x21, 0x65, 0x0a, 0x32, 0x0e, 0x64, 0x4d, 0x31, 0xa1, 0x62,
|
|
0x74, 0x30, 0xdf, 0x60, 0x66, 0x2f, 0xd2, 0x5e, 0x35, 0x2e, 0x6a, 0x5c,
|
|
0xe0, 0x2c, 0xbe, 0x59, 0x5e, 0x2b, 0xbe, 0x56, 0xbe, 0x29, 0x77, 0x53,
|
|
0xf3, 0x27, 0xed, 0x4f, 0x0e, 0x26, 0x16, 0x4c, 0x02, 0x24, 0x0a, 0x48,
|
|
0xdd, 0x21, 0xb5, 0x43, 0x98, 0x1f, 0x32, 0x3f, 0x37, 0x1d, 0x6f, 0x3a,
|
|
0xc2, 0x1a, 0x82, 0x35, 0x31, 0x18, 0x63, 0x30, 0x8e, 0x15, 0x1d, 0x2b,
|
|
0xda, 0x12, 0xb3, 0x25, 0x12, 0x10, 0x27, 0x20, 0x43, 0x0d, 0x80, 0x1a,
|
|
0x5f, 0x0a, 0xc5, 0x14, 0x7e, 0x07, 0xf5, 0x0e, 0x89, 0x04, 0x1a, 0x09,
|
|
0xa0, 0x01, 0x39, 0x03, 0xa5, 0xfe, 0x50, 0xfd, 0xbb, 0xfb, 0x6f, 0xf7,
|
|
0xc6, 0xf8, 0x94, 0xf1, 0xe3, 0xf5, 0xbf, 0xeb, 0x02, 0xf3, 0x09, 0xe6,
|
|
0x2c, 0xf0, 0x56, 0xe0, 0x6a, 0xed, 0xd1, 0xda, 0xac, 0xea, 0x5e, 0xd5,
|
|
0x0e, 0xe8, 0x16, 0xd0
|
|
};
|
|
|
|
DEFINE_SHELL_FUNCTION(ac97_noise, "[debug] AC'97 noise test (it's loud and annoying)") {
|
|
for (size_t i = 0; i < AC97_BDL_BUFFER_LEN * sizeof(*_device.bufs[0]); i++) {
|
|
((uint8_t *)_device.bufs[0])[i] = sample_440[i % N_ELEMENTS(sample_440)];
|
|
}
|
|
for (size_t i = 1; i < AC97_BDL_LEN; i++) {
|
|
memcpy(_device.bufs[i], _device.bufs[0],
|
|
AC97_BDL_BUFFER_LEN * sizeof(*_device.bufs[0]));
|
|
}
|
|
_device.lvi = AC97_BDL_LEN - 1;
|
|
outportb(_device.nabmbar + AC97_PO_LVI, _device.lvi);
|
|
/* Set it to run! */
|
|
outportb(_device.nabmbar + AC97_PO_CR, inportb(_device.nabmbar + AC97_PO_CR) | AC97_X_CR_RPBM);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void irq_handler(struct regs * regs) {
|
|
debug_print(NOTICE, "AC97 IRQ called");
|
|
uint16_t sr = inports(_device.nabmbar + AC97_PO_SR);
|
|
debug_print(NOTICE, "sr: 0x%04x", sr);
|
|
if (sr & AC97_X_SR_LVBCI) {
|
|
/* Stop playing */
|
|
outportb(_device.nabmbar + AC97_PO_CR,
|
|
inportb(_device.nabmbar + AC97_PO_CR) & ~AC97_X_CR_RPBM);
|
|
outports(_device.nabmbar + AC97_PO_SR, AC97_X_SR_LVBCI);
|
|
debug_print(NOTICE, "Last valid buffer completion interrupt handled");
|
|
} else if (sr & AC97_X_SR_BCIS) {
|
|
if (_device.lvi == AC97_BDL_LEN - 1) {
|
|
_device.lvi = AC97_BDL_LEN / 2;
|
|
} else {
|
|
_device.lvi = AC97_BDL_LEN - 1;
|
|
}
|
|
outportb(_device.nabmbar + AC97_PO_LVI, _device.lvi);
|
|
outports(_device.nabmbar + AC97_PO_SR, AC97_X_SR_BCIS);
|
|
debug_print(NOTICE, "Buffer completion interrupt status handled");
|
|
} else if (sr & AC97_X_SR_FIFOE) {
|
|
outports(_device.nabmbar + AC97_PO_SR, AC97_X_SR_FIFOE);
|
|
debug_print(NOTICE, "FIFO error handled");
|
|
}
|
|
|
|
irq_ack(_device.irq);
|
|
}
|
|
|
|
static int init(void) {
|
|
debug_print(NOTICE, "Initializing AC97");
|
|
BIND_SHELL_FUNCTION(ac97_status);
|
|
BIND_SHELL_FUNCTION(ac97_noise);
|
|
pci_scan(&find_ac97, -1, &_device);
|
|
if (!_device.pci_device) {
|
|
return 1;
|
|
}
|
|
_device.nabmbar = pci_read_field(_device.pci_device, AC97_NABMBAR, 2) & ((uint32_t) -1) << 1;
|
|
_device.nambar = pci_read_field(_device.pci_device, PCI_BAR0, 4) & ((uint32_t) -1) << 1;
|
|
_device.irq = pci_read_field(_device.pci_device, PCI_INTERRUPT_LINE, 1);
|
|
if (!irq_is_handler_free(_device.irq)) {
|
|
debug_print(ERROR, "AC97 IRQ conflict: IRQ %d already in use", _device.irq);
|
|
return 1;
|
|
}
|
|
irq_install_handler(_device.irq, irq_handler);
|
|
/* Enable all matter of interrupts */
|
|
outportb(_device.nabmbar + AC97_PO_CR, AC97_X_CR_FEIE | AC97_X_CR_IOCE);
|
|
|
|
/* Enable bus mastering and disable memory mapped space */
|
|
pci_write_field(_device.pci_device, PCI_COMMAND, 2, 0x5);
|
|
/* Put ourselves at a reasonable volume. */
|
|
uint16_t volume = 0x4F | (0x4F << 8);
|
|
outports(_device.nambar + AC97_MASTER_VOLUME, volume);
|
|
outports(_device.nambar + AC97_PCM_OUT_VOLUME, volume);
|
|
|
|
/* Allocate our BDL and our buffers */
|
|
uint32_t bdl_p;
|
|
_device.bdl = (void *)kmalloc_p(AC97_BDL_LEN * sizeof(*_device.bdl), &bdl_p);
|
|
memset(_device.bdl, 0, AC97_BDL_LEN * sizeof(*_device.bdl));
|
|
for (int i = 0; i < AC97_BDL_LEN; i++) {
|
|
_device.bufs[i] = (uint16_t *)kmalloc_p(AC97_BDL_BUFFER_LEN * sizeof(*_device.bufs[0]),
|
|
&_device.bdl[i].pointer);
|
|
memset(_device.bufs[i], 0, AC97_BDL_BUFFER_LEN * sizeof(*_device.bufs[0]));
|
|
AC97_CL_SET_LENGTH(_device.bdl[i].cl, AC97_BDL_BUFFER_LEN);
|
|
}
|
|
/* Set the midway buffer and the last buffer to interrupt */
|
|
_device.bdl[AC97_BDL_LEN / 2].cl |= AC97_CL_IOC;
|
|
_device.bdl[AC97_BDL_LEN - 1].cl |= AC97_CL_IOC;
|
|
/* Tell the ac97 where our BDL is */
|
|
outportl(_device.nabmbar + AC97_PO_BDBAR, bdl_p);
|
|
|
|
debug_print(NOTICE, "AC97 initialized successfully");
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int fini(void) {
|
|
free(_device.bdl);
|
|
for (int i = 0; i < AC97_BDL_LEN; i++) {
|
|
free(_device.bufs[i]);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
MODULE_DEF(ac97, init, fini);
|
|
MODULE_DEPENDS(debugshell);
|