/* * ALSA soundcard driver for Miro miroSOUND PCM1 pro * miroSOUND PCM12 * miroSOUND PCM20 Radio * * Copyright (C) 2004-2005 Martin Langer * * Based on OSS ACI and ALSA OPTi9xx drivers * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #define SNDRV_LEGACY_FIND_FREE_IOPORT #define SNDRV_LEGACY_FIND_FREE_IRQ #define SNDRV_LEGACY_FIND_FREE_DMA #include #include MODULE_AUTHOR("Martin Langer "); MODULE_LICENSE("GPL"); MODULE_DESCRIPTION("Miro miroSOUND PCM1 pro, PCM12, PCM20 Radio"); MODULE_SUPPORTED_DEVICE("{{Miro,miroSOUND PCM1 pro}, " "{Miro,miroSOUND PCM12}, " "{Miro,miroSOUND PCM20 Radio}}"); static int index = SNDRV_DEFAULT_IDX1; /* Index 0-MAX */ static char *id = SNDRV_DEFAULT_STR1; /* ID for this card */ static long port = SNDRV_DEFAULT_PORT1; /* 0x530,0xe80,0xf40,0x604 */ static long mpu_port = SNDRV_DEFAULT_PORT1; /* 0x300,0x310,0x320,0x330 */ static long fm_port = SNDRV_DEFAULT_PORT1; /* 0x388 */ static int irq = SNDRV_DEFAULT_IRQ1; /* 5,7,9,10,11 */ static int mpu_irq = SNDRV_DEFAULT_IRQ1; /* 5,7,9,10 */ static int dma1 = SNDRV_DEFAULT_DMA1; /* 0,1,3 */ static int dma2 = SNDRV_DEFAULT_DMA1; /* 0,1,3 */ static int wss; static int ide; #ifdef CONFIG_PNP static bool isapnp = 1; /* Enable ISA PnP detection */ #endif module_param(index, int, 0444); MODULE_PARM_DESC(index, "Index value for miro soundcard."); module_param(id, charp, 0444); MODULE_PARM_DESC(id, "ID string for miro soundcard."); module_param(port, long, 0444); MODULE_PARM_DESC(port, "WSS port # for miro driver."); module_param(mpu_port, long, 0444); MODULE_PARM_DESC(mpu_port, "MPU-401 port # for miro driver."); module_param(fm_port, long, 0444); MODULE_PARM_DESC(fm_port, "FM Port # for miro driver."); module_param(irq, int, 0444); MODULE_PARM_DESC(irq, "WSS irq # for miro driver."); module_param(mpu_irq, int, 0444); MODULE_PARM_DESC(mpu_irq, "MPU-401 irq # for miro driver."); module_param(dma1, int, 0444); MODULE_PARM_DESC(dma1, "1st dma # for miro driver."); module_param(dma2, int, 0444); MODULE_PARM_DESC(dma2, "2nd dma # for miro driver."); module_param(wss, int, 0444); MODULE_PARM_DESC(wss, "wss mode"); module_param(ide, int, 0444); MODULE_PARM_DESC(ide, "enable ide port"); #ifdef CONFIG_PNP module_param(isapnp, bool, 0444); MODULE_PARM_DESC(isapnp, "Enable ISA PnP detection for specified soundcard."); #endif #define OPTi9XX_HW_DETECT 0 #define OPTi9XX_HW_82C928 1 #define OPTi9XX_HW_82C929 2 #define OPTi9XX_HW_82C924 3 #define OPTi9XX_HW_82C925 4 #define OPTi9XX_HW_82C930 5 #define OPTi9XX_HW_82C931 6 #define OPTi9XX_HW_82C933 7 #define OPTi9XX_HW_LAST OPTi9XX_HW_82C933 #define OPTi9XX_MC_REG(n) n struct snd_miro { unsigned short hardware; unsigned char password; char name[7]; struct resource *res_mc_base; struct resource *res_aci_port; unsigned long mc_base; unsigned long mc_base_size; unsigned long pwd_reg; spinlock_t lock; struct snd_pcm *pcm; long wss_base; int irq; int dma1; int dma2; long mpu_port; int mpu_irq; struct snd_miro_aci *aci; }; static struct snd_miro_aci aci_device; static char * snd_opti9xx_names[] = { "unknown", "82C928", "82C929", "82C924", "82C925", "82C930", "82C931", "82C933" }; static int snd_miro_pnp_is_probed; #ifdef CONFIG_PNP static struct pnp_card_device_id snd_miro_pnpids[] = { /* PCM20 and PCM12 in PnP mode */ { .id = "MIR0924", .devs = { { "MIR0000" }, { "MIR0002" }, { "MIR0005" } }, }, { .id = "" } }; MODULE_DEVICE_TABLE(pnp_card, snd_miro_pnpids); #endif /* CONFIG_PNP */ /* * ACI control */ static int aci_busy_wait(struct snd_miro_aci *aci) { long timeout; unsigned char byte; for (timeout = 1; timeout <= ACI_MINTIME + 30; timeout++) { byte = inb(aci->aci_port + ACI_REG_BUSY); if ((byte & 1) == 0) { if (timeout >= ACI_MINTIME) snd_printd("aci ready in round %ld.\n", timeout-ACI_MINTIME); return byte; } if (timeout >= ACI_MINTIME) { long out=10*HZ; switch (timeout-ACI_MINTIME) { case 0 ... 9: out /= 10; case 10 ... 19: out /= 10; case 20 ... 30: out /= 10; default: set_current_state(TASK_UNINTERRUPTIBLE); schedule_timeout(out); break; } } } snd_printk(KERN_ERR "aci_busy_wait() time out\n"); return -EBUSY; } static inline int aci_write(struct snd_miro_aci *aci, unsigned char byte) { if (aci_busy_wait(aci) >= 0) { outb(byte, aci->aci_port + ACI_REG_COMMAND); return 0; } else { snd_printk(KERN_ERR "aci busy, aci_write(0x%x) stopped.\n", byte); return -EBUSY; } } static inline int aci_read(struct snd_miro_aci *aci) { unsigned char byte; if (aci_busy_wait(aci) >= 0) { byte = inb(aci->aci_port + ACI_REG_STATUS); return byte; } else { snd_printk(KERN_ERR "aci busy, aci_read() stopped.\n"); return -EBUSY; } } int snd_aci_cmd(struct snd_miro_aci *aci, int write1, int write2, int write3) { int write[] = {write1, write2, write3}; int value, i; if (mutex_lock_interruptible(&aci->aci_mutex)) return -EINTR; for (i=0; i<3; i++) { if (write[i]< 0 || write[i] > 255) break; else { value = aci_write(aci, write[i]); if (value < 0) goto out; } } value = aci_read(aci); out: mutex_unlock(&aci->aci_mutex); return value; } EXPORT_SYMBOL(snd_aci_cmd); static int aci_getvalue(struct snd_miro_aci *aci, unsigned char index) { return snd_aci_cmd(aci, ACI_STATUS, index, -1); } static int aci_setvalue(struct snd_miro_aci *aci, unsigned char index, int value) { return snd_aci_cmd(aci, index, value, -1); } struct snd_miro_aci *snd_aci_get_aci(void) { if (aci_device.aci_port == 0) return NULL; return &aci_device; } EXPORT_SYMBOL(snd_aci_get_aci); /* * MIXER part */ #define snd_miro_info_capture snd_ctl_boolean_mono_info static int snd_miro_get_capture(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol) { struct snd_miro *miro = snd_kcontrol_chip(kcontrol); int value; value = aci_getvalue(miro->aci, ACI_S_GENERAL); if (value < 0) { snd_printk(KERN_ERR "snd_miro_get_capture() failed: %d\n", value); return value; } ucontrol->value.integer.value[0] = value & 0x20; return 0; } static int snd_miro_put_capture(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol) { struct snd_miro *miro = snd_kcontrol_chip(kcontrol); int change, value, error; value = !(ucontrol->value.integer.value[0]); error = aci_setvalue(miro->aci, ACI_SET_SOLOMODE, value); if (error < 0) { snd_printk(KERN_ERR "snd_miro_put_capture() failed: %d\n", error); return error; } change = (value != miro->aci->aci_solomode); miro->aci->aci_solomode = value; return change; } static int snd_miro_info_preamp(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo) { uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER; uinfo->count = 1; uinfo->value.integer.min = 0; uinfo->value.integer.max = 3; return 0; } static int snd_miro_get_preamp(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol) { struct snd_miro *miro = snd_kcontrol_chip(kcontrol); int value; if (miro->aci->aci_version <= 176) { /* OSS says it's not readable with versions < 176. But it doesn't work on my card, which is a PCM12 with aci_version = 176. */ ucontrol->value.integer.value[0] = miro->aci->aci_preamp; return 0; } value = aci_getvalue(miro->aci, ACI_GET_PREAMP); if (value < 0) { snd_printk(KERN_ERR "snd_miro_get_preamp() failed: %d\n", value); return value; } ucontrol->value.integer.value[0] = value; return 0; } static int snd_miro_put_preamp(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol) { struct snd_miro *miro = snd_kcontrol_chip(kcontrol); int error, value, change; value = ucontrol->value.integer.value[0]; error = aci_setvalue(miro->aci, ACI_SET_PREAMP, value); if (error < 0) { snd_printk(KERN_ERR "snd_miro_put_preamp() failed: %d\n", error); return error; } change = (value != miro->aci->aci_preamp); miro->aci->aci_preamp = value; return change; } #define snd_miro_info_amp snd_ctl_boolean_mono_info static int snd_miro_get_amp(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol) { struct snd_miro *miro = snd_kcontrol_chip(kcontrol); ucontrol->value.integer.value[0] = miro->aci->aci_amp; return 0; } static int snd_miro_put_amp(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol) { struct snd_miro *miro = snd_kcontrol_chip(kcontrol); int error, value, change; value = ucontrol->value.integer.value[0]; error = aci_setvalue(miro->aci, ACI_SET_POWERAMP, value); if (error < 0) { snd_printk(KERN_ERR "snd_miro_put_amp() to %d failed: %d\n", value, error); return error; } change = (value != miro->aci->aci_amp); miro->aci->aci_amp = value; return change; } #define MIRO_DOUBLE(ctl_name, ctl_index, get_right_reg, set_right_reg) \ { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, \ .name = ctl_name, \ .index = ctl_index, \ .info = snd_miro_info_double, \ .get = snd_miro_get_double, \ .put = snd_miro_put_double, \ .private_value = get_right_reg | (set_right_reg << 8) \ } static int snd_miro_info_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo) { int reg = kcontrol->private_value & 0xff; uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER; uinfo->count = 2; if ((reg >= ACI_GET_EQ1) && (reg <= ACI_GET_EQ7)) { /* equalizer elements */ uinfo->value.integer.min = - 0x7f; uinfo->value.integer.max = 0x7f; } else { /* non-equalizer elements */ uinfo->value.integer.min = 0; uinfo->value.integer.max = 0x20; } return 0; } static int snd_miro_get_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *uinfo) { struct snd_miro *miro = snd_kcontrol_chip(kcontrol); int left_val, right_val; int right_reg = kcontrol->private_value & 0xff; int left_reg = right_reg + 1; right_val = aci_getvalue(miro->aci, right_reg); if (right_val < 0) { snd_printk(KERN_ERR "aci_getvalue(%d) failed: %d\n", right_reg, right_val); return right_val; } left_val = aci_getvalue(miro->aci, left_reg); if (left_val < 0) { snd_printk(KERN_ERR "aci_getvalue(%d) failed: %d\n", left_reg, left_val); return left_val; } if ((right_reg >= ACI_GET_EQ1) && (right_reg <= ACI_GET_EQ7)) { /* equalizer elements */ if (left_val < 0x80) { uinfo->value.integer.value[0] = left_val; } else { uinfo->value.integer.value[0] = 0x80 - left_val; } if (right_val < 0x80) { uinfo->value.integer.value[1] = right_val; } else { uinfo->value.integer.value[1] = 0x80 - right_val; } } else { /* non-equalizer elements */ uinfo->value.integer.value[0] = 0x20 - left_val; uinfo->value.integer.value[1] = 0x20 - right_val; } return 0; } static int snd_miro_put_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol) { struct snd_miro *miro = snd_kcontrol_chip(kcontrol); struct snd_miro_aci *aci = miro->aci; int left, right, left_old, right_old; int setreg_left, setreg_right, getreg_left, getreg_right; int change, error; left = ucontrol->value.integer.value[0]; right = ucontrol->value.integer.value[1]; setreg_right = (kcontrol->private_value >> 8) & 0xff; setreg_left = setreg_right + 8; if (setreg_right == ACI_SET_MASTER) setreg_left -= 7; getreg_right = kcontrol->private_value & 0xff; getreg_left = getreg_right + 1; left_old = aci_getvalue(aci, getreg_left); if (left_old < 0) { snd_printk(KERN_ERR "aci_getvalue(%d) failed: %d\n", getreg_left, left_old); return left_old; } right_old = aci_getvalue(aci, getreg_right); if (right_old < 0) { snd_printk(KERN_ERR "aci_getvalue(%d) failed: %d\n", getreg_right, right_old); return right_old; } if ((getreg_right >= ACI_GET_EQ1) && (getreg_right <= ACI_GET_EQ7)) { /* equalizer elements */ if (left < -0x7f || left > 0x7f || right < -0x7f || right > 0x7f) return -EINVAL; if (left_old > 0x80) left_old = 0x80 - left_old; if (right_old > 0x80) right_old = 0x80 - right_old; if (left >= 0) { error = aci_setvalue(aci, setreg_left, left); if (error < 0) { snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n", left, error); return error; } } else { error = aci_setvalue(aci, setreg_left, 0x80 - left); if (error < 0) { snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n", 0x80 - left, error); return error; } } if (right >= 0) { error = aci_setvalue(aci, setreg_right, right); if (error < 0) { snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n", right, error); return error; } } else { error = aci_setvalue(aci, setreg_right, 0x80 - right); if (error < 0) { snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n", 0x80 - right, error); return error; } } } else { /* non-equalizer elements */ if (left < 0 || left > 0x20 || right < 0 || right > 0x20) return -EINVAL; left_old = 0x20 - left_old; right_old = 0x20 - right_old; error = aci_setvalue(aci, setreg_left, 0x20 - left); if (error < 0) { snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n", 0x20 - left, error); return error; } error = aci_setvalue(aci, setreg_right, 0x20 - right); if (error < 0) { snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n", 0x20 - right, error); return error; } } change = (left != left_old) || (right != right_old); return change; } static struct snd_kcontrol_new snd_miro_controls[] = { MIRO_DOUBLE("Master Playback Volume", 0, ACI_GET_MASTER, ACI_SET_MASTER), MIRO_DOUBLE("Mic Playback Volume", 1, ACI_GET_MIC, ACI_SET_MIC), MIRO_DOUBLE("Line Playback Volume", 1, ACI_GET_LINE, ACI_SET_LINE), MIRO_DOUBLE("CD Playback Volume", 0, ACI_GET_CD, ACI_SET_CD), MIRO_DOUBLE("Synth Playback Volume", 0, ACI_GET_SYNTH, ACI_SET_SYNTH), MIRO_DOUBLE("PCM Playback Volume", 1, ACI_GET_PCM, ACI_SET_PCM), MIRO_DOUBLE("Aux Playback Volume", 2, ACI_GET_LINE2, ACI_SET_LINE2), }; /* Equalizer with seven bands (only PCM20) from -12dB up to +12dB on each band */ static struct snd_kcontrol_new snd_miro_eq_controls[] = { MIRO_DOUBLE("Tone Control - 28 Hz", 0, ACI_GET_EQ1, ACI_SET_EQ1), MIRO_DOUBLE("Tone Control - 160 Hz", 0, ACI_GET_EQ2, ACI_SET_EQ2), MIRO_DOUBLE("Tone Control - 400 Hz", 0, ACI_GET_EQ3, ACI_SET_EQ3), MIRO_DOUBLE("Tone Control - 1 kHz", 0, ACI_GET_EQ4, ACI_SET_EQ4), MIRO_DOUBLE("Tone Control - 2.5 kHz", 0, ACI_GET_EQ5, ACI_SET_EQ5), MIRO_DOUBLE("Tone Control - 6.3 kHz", 0, ACI_GET_EQ6, ACI_SET_EQ6), MIRO_DOUBLE("Tone Control - 16 kHz", 0, ACI_GET_EQ7, ACI_SET_EQ7), }; static struct snd_kcontrol_new snd_miro_radio_control[] = { MIRO_DOUBLE("Radio Playback Volume", 0, ACI_GET_LINE1, ACI_SET_LINE1), }; static struct snd_kcontrol_new snd_miro_line_control[] = { MIRO_DOUBLE("Line Playback Volume", 2, ACI_GET_LINE1, ACI_SET_LINE1), }; static struct snd_kcontrol_new snd_miro_preamp_control[] = { { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = "Mic Boost", .index = 1, .info = snd_miro_info_preamp, .get = snd_miro_get_preamp, .put = snd_miro_put_preamp, }}; static struct snd_kcontrol_new snd_miro_amp_control[] = { { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = "Line Boost", .index = 0, .info = snd_miro_info_amp, .get = snd_miro_get_amp, .put = snd_miro_put_amp, }}; static struct snd_kcontrol_new snd_miro_capture_control[] = { { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = "PCM Capture Switch", .index = 0, .info = snd_miro_info_capture, .get = snd_miro_get_capture, .put = snd_miro_put_capture, }}; static unsigned char aci_init_values[][2] = { { ACI_SET_MUTE, 0x00 }, { ACI_SET_POWERAMP, 0x00 }, { ACI_SET_PREAMP, 0x00 }, { ACI_SET_SOLOMODE, 0x00 }, { ACI_SET_MIC + 0, 0x20 }, { ACI_SET_MIC + 8, 0x20 }, { ACI_SET_LINE + 0, 0x20 }, { ACI_SET_LINE + 8, 0x20 }, { ACI_SET_CD + 0, 0x20 }, { ACI_SET_CD + 8, 0x20 }, { ACI_SET_PCM + 0, 0x20 }, { ACI_SET_PCM + 8, 0x20 }, { ACI_SET_LINE1 + 0, 0x20 }, { ACI_SET_LINE1 + 8, 0x20 }, { ACI_SET_LINE2 + 0, 0x20 }, { ACI_SET_LINE2 + 8, 0x20 }, { ACI_SET_SYNTH + 0, 0x20 }, { ACI_SET_SYNTH + 8, 0x20 }, { ACI_SET_MASTER + 0, 0x20 }, { ACI_SET_MASTER + 1, 0x20 }, }; static int snd_set_aci_init_values(struct snd_miro *miro) { int idx, error; struct snd_miro_aci *aci = miro->aci; /* enable WSS on PCM1 */ if ((aci->aci_product == 'A') && wss) { error = aci_setvalue(aci, ACI_SET_WSS, wss); if (error < 0) { snd_printk(KERN_ERR "enabling WSS mode failed\n"); return error; } } /* enable IDE port */ if (ide) { error = aci_setvalue(aci, ACI_SET_IDE, ide); if (error < 0) { snd_printk(KERN_ERR "enabling IDE port failed\n"); return error; } } /* set common aci values */ for (idx = 0; idx < ARRAY_SIZE(aci_init_values); idx++) { error = aci_setvalue(aci, aci_init_values[idx][0], aci_init_values[idx][1]); if (error < 0) { snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n", aci_init_values[idx][0], error); return error; } } aci->aci_amp = 0; aci->aci_preamp = 0; aci->aci_solomode = 1; return 0; } static int snd_miro_mixer(struct snd_card *card, struct snd_miro *miro) { unsigned int idx; int err; if (snd_BUG_ON(!miro || !card)) return -EINVAL; switch (miro->hardware) { case OPTi9XX_HW_82C924: strcpy(card->mixername, "ACI & OPTi924"); break; case OPTi9XX_HW_82C929: strcpy(card->mixername, "ACI & OPTi929"); break; default: snd_BUG(); break; } for (idx = 0; idx < ARRAY_SIZE(snd_miro_controls); idx++) { if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_controls[idx], miro))) < 0) return err; } if ((miro->aci->aci_product == 'A') || (miro->aci->aci_product == 'B')) { /* PCM1/PCM12 with power-amp and Line 2 */ if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_line_control[0], miro))) < 0) return err; if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_amp_control[0], miro))) < 0) return err; } if ((miro->aci->aci_product == 'B') || (miro->aci->aci_product == 'C')) { /* PCM12/PCM20 with mic-preamp */ if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_preamp_control[0], miro))) < 0) return err; if (miro->aci->aci_version >= 176) if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_capture_control[0], miro))) < 0) return err; } if (miro->aci->aci_product == 'C') { /* PCM20 with radio and 7 band equalizer */ if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_radio_control[0], miro))) < 0) return err; for (idx = 0; idx < ARRAY_SIZE(snd_miro_eq_controls); idx++) { if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_eq_controls[idx], miro))) < 0) return err; } } return 0; } static int snd_miro_init(struct snd_miro *chip, unsigned short hardware) { static int opti9xx_mc_size[] = {7, 7, 10, 10, 2, 2, 2}; chip->hardware = hardware; strcpy(chip->name, snd_opti9xx_names[hardware]); chip->mc_base_size = opti9xx_mc_size[hardware]; spin_lock_init(&chip->lock); chip->wss_base = -1; chip->irq = -1; chip->dma1 = -1; chip->dma2 = -1; chip->mpu_port = -1; chip->mpu_irq = -1; chip->pwd_reg = 3; #ifdef CONFIG_PNP if (isapnp && chip->mc_base) /* PnP resource gives the least 10 bits */ chip->mc_base |= 0xc00; else #endif chip->mc_base = 0xf8c; switch (hardware) { case OPTi9XX_HW_82C929: chip->password = 0xe3; break; case OPTi9XX_HW_82C924: chip->password = 0xe5; break; default: snd_printk(KERN_ERR "sorry, no support for %d\n", hardware); return -ENODEV; } return 0; } static unsigned char snd_miro_read(struct snd_miro *chip, unsigned char reg) { unsigned long flags; unsigned char retval = 0xff; spin_lock_irqsave(&chip->lock, flags); outb(chip->password, chip->mc_base + chip->pwd_reg); switch (chip->hardware) { case OPTi9XX_HW_82C924: if (reg > 7) { outb(reg, chip->mc_base + 8); outb(chip->password, chip->mc_base + chip->pwd_reg); retval = inb(chip->mc_base + 9); break; } case OPTi9XX_HW_82C929: retval = inb(chip->mc_base + reg); break; default: snd_printk(KERN_ERR "sorry, no support for %d\n", chip->hardware); } spin_unlock_irqrestore(&chip->lock, flags); return retval; } static void snd_miro_write(struct snd_miro *chip, unsigned char reg, unsigned char value) { unsigned long flags; spin_lock_irqsave(&chip->lock, flags); outb(chip->password, chip->mc_base + chip->pwd_reg); switch (chip->hardware) { case OPTi9XX_HW_82C924: if (reg > 7) { outb(reg, chip->mc_base + 8); outb(chip->password, chip->mc_base + chip->pwd_reg); outb(value, chip->mc_base + 9); break; } case OPTi9XX_HW_82C929: outb(value, chip->mc_base + reg); break; default: snd_printk(KERN_ERR "sorry, no support for %d\n", chip->hardware); } spin_unlock_irqrestore(&chip->lock, flags); } static inline void snd_miro_write_mask(struct snd_miro *chip, unsigned char reg, unsigned char value, unsigned char mask) { unsigned char oldval = snd_miro_read(chip, reg); snd_miro_write(chip, reg, (oldval & ~mask) | (value & mask)); } /* * Proc Interface */ static void snd_miro_proc_read(struct snd_info_entry * entry, struct snd_info_buffer *buffer) { struct snd_miro *miro = (struct snd_miro *) entry->private_data; struct snd_miro_aci *aci = miro->aci; char* model = "unknown"; /* miroSOUND PCM1 pro, early PCM12 */ if ((miro->hardware == OPTi9XX_HW_82C929) && (aci->aci_vendor == 'm') && (aci->aci_product == 'A')) { switch (aci->aci_version) { case 3: model = "miroSOUND PCM1 pro"; break; default: model = "miroSOUND PCM1 pro / (early) PCM12"; break; } } /* miroSOUND PCM12, PCM12 (Rev. E), PCM12 pnp */ if ((miro->hardware == OPTi9XX_HW_82C924) && (aci->aci_vendor == 'm') && (aci->aci_product == 'B')) { switch (aci->aci_version) { case 4: model = "miroSOUND PCM12"; break; case 176: model = "miroSOUND PCM12 (Rev. E)"; break; default: model = "miroSOUND PCM12 / PCM12 pnp"; break; } } /* miroSOUND PCM20 radio */ if ((miro->hardware == OPTi9XX_HW_82C924) && (aci->aci_vendor == 'm') && (aci->aci_product == 'C')) { switch (aci->aci_version) { case 7: model = "miroSOUND PCM20 radio (Rev. E)"; break; default: model = "miroSOUND PCM20 radio"; break; } } snd_iprintf(buffer, "\nGeneral information:\n"); snd_iprintf(buffer, " model : %s\n", model); snd_iprintf(buffer, " opti : %s\n", miro->name); snd_iprintf(buffer, " codec : %s\n", miro->pcm->name); snd_iprintf(buffer, " port : 0x%lx\n", miro->wss_base); snd_iprintf(buffer, " irq : %d\n", miro->irq); snd_iprintf(buffer, " dma : %d,%d\n\n", miro->dma1, miro->dma2); snd_iprintf(buffer, "MPU-401:\n"); snd_iprintf(buffer, " port : 0x%lx\n", miro->mpu_port); snd_iprintf(buffer, " irq : %d\n\n", miro->mpu_irq); snd_iprintf(buffer, "ACI information:\n"); snd_iprintf(buffer, " vendor : "); switch (aci->aci_vendor) { case 'm': snd_iprintf(buffer, "Miro\n"); break; default: snd_iprintf(buffer, "unknown (0x%x)\n", aci->aci_vendor); break; } snd_iprintf(buffer, " product : "); switch (aci->aci_product) { case 'A': snd_iprintf(buffer, "miroSOUND PCM1 pro / (early) PCM12\n"); break; case 'B': snd_iprintf(buffer, "miroSOUND PCM12\n"); break; case 'C': snd_iprintf(buffer, "miroSOUND PCM20 radio\n"); break; default: snd_iprintf(buffer, "unknown (0x%x)\n", aci->aci_product); break; } snd_iprintf(buffer, " firmware: %d (0x%x)\n", aci->aci_version, aci->aci_version); snd_iprintf(buffer, " port : 0x%lx-0x%lx\n", aci->aci_port, aci->aci_port+2); snd_iprintf(buffer, " wss : 0x%x\n", wss); snd_iprintf(buffer, " ide : 0x%x\n", ide); snd_iprintf(buffer, " solomode: 0x%x\n", aci->aci_solomode); snd_iprintf(buffer, " amp : 0x%x\n", aci->aci_amp); snd_iprintf(buffer, " preamp : 0x%x\n", aci->aci_preamp); } static void snd_miro_proc_init(struct snd_card *card, struct snd_miro *miro) { struct snd_info_entry *entry; if (!snd_card_proc_new(card, "miro", &entry)) snd_info_set_text_ops(entry, miro, snd_miro_proc_read); } /* * Init */ static int snd_miro_configure(struct snd_miro *chip) { unsigned char wss_base_bits; unsigned char irq_bits; unsigned char dma_bits; unsigned char mpu_port_bits = 0; unsigned char mpu_irq_bits; unsigned long flags; snd_miro_write_mask(chip, OPTi9XX_MC_REG(1), 0x80, 0x80); snd_miro_write_mask(chip, OPTi9XX_MC_REG(2), 0x20, 0x20); /* OPL4 */ snd_miro_write_mask(chip, OPTi9XX_MC_REG(5), 0x02, 0x02); switch (chip->hardware) { case OPTi9XX_HW_82C924: snd_miro_write_mask(chip, OPTi9XX_MC_REG(6), 0x02, 0x02); snd_miro_write_mask(chip, OPTi9XX_MC_REG(3), 0xf0, 0xff); break; case OPTi9XX_HW_82C929: /* untested init commands for OPTi929 */ snd_miro_write_mask(chip, OPTi9XX_MC_REG(4), 0x00, 0x0c); break; default: snd_printk(KERN_ERR "chip %d not supported\n", chip->hardware); return -EINVAL; } /* PnP resource says it decodes only 10 bits of address */ switch (chip->wss_base & 0x3ff) { case 0x130: chip->wss_base = 0x530; wss_base_bits = 0x00; break; case 0x204: chip->wss_base = 0x604; wss_base_bits = 0x03; break; case 0x280: chip->wss_base = 0xe80; wss_base_bits = 0x01; break; case 0x340: chip->wss_base = 0xf40; wss_base_bits = 0x02; break; default: snd_printk(KERN_ERR "WSS port 0x%lx not valid\n", chip->wss_base); goto __skip_base; } snd_miro_write_mask(chip, OPTi9XX_MC_REG(1), wss_base_bits << 4, 0x30); __skip_base: switch (chip->irq) { case 5: irq_bits = 0x05; break; case 7: irq_bits = 0x01; break; case 9: irq_bits = 0x02; break; case 10: irq_bits = 0x03; break; case 11: irq_bits = 0x04; break; default: snd_printk(KERN_ERR "WSS irq # %d not valid\n", chip->irq); goto __skip_resources; } switch (chip->dma1) { case 0: dma_bits = 0x01; break; case 1: dma_bits = 0x02; break; case 3: dma_bits = 0x03; break; default: snd_printk(KERN_ERR "WSS dma1 # %d not valid\n", chip->dma1); goto __skip_resources; } if (chip->dma1 == chip->dma2) { snd_printk(KERN_ERR "don't want to share dmas\n"); return -EBUSY; } switch (chip->dma2) { case 0: case 1: break; default: snd_printk(KERN_ERR "WSS dma2 # %d not valid\n", chip->dma2); goto __skip_resources; } dma_bits |= 0x04; spin_lock_irqsave(&chip->lock, flags); outb(irq_bits << 3 | dma_bits, chip->wss_base); spin_unlock_irqrestore(&chip->lock, flags); __skip_resources: if (chip->hardware > OPTi9XX_HW_82C928) { switch (chip->mpu_port) { case 0: case -1: break; case 0x300: mpu_port_bits = 0x03; break; case 0x310: mpu_port_bits = 0x02; break; case 0x320: mpu_port_bits = 0x01; break; case 0x330: mpu_port_bits = 0x00; break; default: snd_printk(KERN_ERR "MPU-401 port 0x%lx not valid\n", chip->mpu_port); goto __skip_mpu; } switch (chip->mpu_irq) { case 5: mpu_irq_bits = 0x02; break; case 7: mpu_irq_bits = 0x03; break; case 9: mpu_irq_bits = 0x00; break; case 10: mpu_irq_bits = 0x01; break; default: snd_printk(KERN_ERR "MPU-401 irq # %d not valid\n", chip->mpu_irq); goto __skip_mpu; } snd_miro_write_mask(chip, OPTi9XX_MC_REG(6), (chip->mpu_port <= 0) ? 0x00 : 0x80 | mpu_port_bits << 5 | mpu_irq_bits << 3, 0xf8); } __skip_mpu: return 0; } static int snd_miro_opti_check(struct snd_miro *chip) { unsigned char value; chip->res_mc_base = request_region(chip->mc_base, chip->mc_base_size, "OPTi9xx MC"); if (chip->res_mc_base == NULL) return -ENOMEM; value = snd_miro_read(chip, OPTi9XX_MC_REG(1)); if (value != 0xff && value != inb(chip->mc_base + OPTi9XX_MC_REG(1))) if (value == snd_miro_read(chip, OPTi9XX_MC_REG(1))) return 0; release_and_free_resource(chip->res_mc_base); chip->res_mc_base = NULL; return -ENODEV; } static int snd_card_miro_detect(struct snd_card *card, struct snd_miro *chip) { int i, err; for (i = OPTi9XX_HW_82C929; i <= OPTi9XX_HW_82C924; i++) { if ((err = snd_miro_init(chip, i)) < 0) return err; err = snd_miro_opti_check(chip); if (err == 0) return 1; } return -ENODEV; } static int snd_card_miro_aci_detect(struct snd_card *card, struct snd_miro *miro) { unsigned char regval; int i; struct snd_miro_aci *aci = &aci_device; miro->aci = aci; mutex_init(&aci->aci_mutex); /* get ACI port from OPTi9xx MC 4 */ regval=inb(miro->mc_base + 4); aci->aci_port = (regval & 0x10) ? 0x344 : 0x354; miro->res_aci_port = request_region(aci->aci_port, 3, "miro aci"); if (miro->res_aci_port == NULL) { snd_printk(KERN_ERR "aci i/o area 0x%lx-0x%lx already used.\n", aci->aci_port, aci->aci_port+2); return -ENOMEM; } /* force ACI into a known state */ for (i = 0; i < 3; i++) if (snd_aci_cmd(aci, ACI_ERROR_OP, -1, -1) < 0) { snd_printk(KERN_ERR "can't force aci into known state.\n"); return -ENXIO; } aci->aci_vendor = snd_aci_cmd(aci, ACI_READ_IDCODE, -1, -1); aci->aci_product = snd_aci_cmd(aci, ACI_READ_IDCODE, -1, -1); if (aci->aci_vendor < 0 || aci->aci_product < 0) { snd_printk(KERN_ERR "can't read aci id on 0x%lx.\n", aci->aci_port); return -ENXIO; } aci->aci_version = snd_aci_cmd(aci, ACI_READ_VERSION, -1, -1); if (aci->aci_version < 0) { snd_printk(KERN_ERR "can't read aci version on 0x%lx.\n", aci->aci_port); return -ENXIO; } if (snd_aci_cmd(aci, ACI_INIT, -1, -1) < 0 || snd_aci_cmd(aci, ACI_ERROR_OP, ACI_ERROR_OP, ACI_ERROR_OP) < 0 || snd_aci_cmd(aci, ACI_ERROR_OP, ACI_ERROR_OP, ACI_ERROR_OP) < 0) { snd_printk(KERN_ERR "can't initialize aci.\n"); return -ENXIO; } return 0; } static void snd_card_miro_free(struct snd_card *card) { struct snd_miro *miro = card->private_data; release_and_free_resource(miro->res_aci_port); if (miro->aci) miro->aci->aci_port = 0; release_and_free_resource(miro->res_mc_base); } static int snd_miro_probe(struct snd_card *card) { int error; struct snd_miro *miro = card->private_data; struct snd_wss *codec; struct snd_rawmidi *rmidi; if (!miro->res_mc_base) { miro->res_mc_base = request_region(miro->mc_base, miro->mc_base_size, "miro (OPTi9xx MC)"); if (miro->res_mc_base == NULL) { snd_printk(KERN_ERR "request for OPTI9xx MC failed\n"); return -ENOMEM; } } error = snd_card_miro_aci_detect(card, miro); if (error < 0) { snd_printk(KERN_ERR "unable to detect aci chip\n"); return -ENODEV; } miro->wss_base = port; miro->mpu_port = mpu_port; miro->irq = irq; miro->mpu_irq = mpu_irq; miro->dma1 = dma1; miro->dma2 = dma2; /* init proc interface */ snd_miro_proc_init(card, miro); error = snd_miro_configure(miro); if (error) return error; error = snd_wss_create(card, miro->wss_base + 4, -1, miro->irq, miro->dma1, miro->dma2, WSS_HW_DETECT, 0, &codec); if (error < 0) return error; error = snd_wss_pcm(codec, 0); if (error < 0) return error; error = snd_wss_mixer(codec); if (error < 0) return error; error = snd_wss_timer(codec, 0); if (error < 0) return error; miro->pcm = codec->pcm; error = snd_miro_mixer(card, miro); if (error < 0) return error; if (miro->aci->aci_vendor == 'm') { /* It looks like a miro sound card. */ switch (miro->aci->aci_product) { case 'A': sprintf(card->shortname, "miroSOUND PCM1 pro / PCM12"); break; case 'B': sprintf(card->shortname, "miroSOUND PCM12"); break; case 'C': sprintf(card->shortname, "miroSOUND PCM20 radio"); break; default: sprintf(card->shortname, "unknown miro"); snd_printk(KERN_INFO "unknown miro aci id\n"); break; } } else { snd_printk(KERN_INFO "found unsupported aci card\n"); sprintf(card->shortname, "unknown Cardinal Technologies"); } strcpy(card->driver, "miro"); sprintf(card->longname, "%s: OPTi%s, %s at 0x%lx, irq %d, dma %d&%d", card->shortname, miro->name, codec->pcm->name, miro->wss_base + 4, miro->irq, miro->dma1, miro->dma2); if (mpu_port <= 0 || mpu_port == SNDRV_AUTO_PORT) rmidi = NULL; else { error = snd_mpu401_uart_new(card, 0, MPU401_HW_MPU401, mpu_port, 0, miro->mpu_irq, &rmidi); if (error < 0) snd_printk(KERN_WARNING "no MPU-401 device at 0x%lx?\n", mpu_port); } if (fm_port > 0 && fm_port != SNDRV_AUTO_PORT) { struct snd_opl3 *opl3 = NULL; struct snd_opl4 *opl4; if (snd_opl4_create(card, fm_port, fm_port - 8, 2, &opl3, &opl4) < 0) snd_printk(KERN_WARNING "no OPL4 device at 0x%lx\n", fm_port); } error = snd_set_aci_init_values(miro); if (error < 0) return error; return snd_card_register(card); } static int snd_miro_isa_match(struct device *devptr, unsigned int n) { #ifdef CONFIG_PNP if (snd_miro_pnp_is_probed) return 0; if (isapnp) return 0; #endif return 1; } static int snd_miro_isa_probe(struct device *devptr, unsigned int n) { static long possible_ports[] = {0x530, 0xe80, 0xf40, 0x604, -1}; static long possible_mpu_ports[] = {0x330, 0x300, 0x310, 0x320, -1}; static int possible_irqs[] = {11, 9, 10, 7, -1}; static int possible_mpu_irqs[] = {10, 5, 9, 7, -1}; static int possible_dma1s[] = {3, 1, 0, -1}; static int possible_dma2s[][2] = { {1, -1}, {0, -1}, {-1, -1}, {0, -1} }; int error; struct snd_miro *miro; struct snd_card *card; error = snd_card_new(devptr, index, id, THIS_MODULE, sizeof(struct snd_miro), &card); if (error < 0) return error; card->private_free = snd_card_miro_free; miro = card->private_data; error = snd_card_miro_detect(card, miro); if (error < 0) { snd_card_free(card); snd_printk(KERN_ERR "unable to detect OPTi9xx chip\n"); return -ENODEV; } if (port == SNDRV_AUTO_PORT) { port = snd_legacy_find_free_ioport(possible_ports, 4); if (port < 0) { snd_card_free(card); snd_printk(KERN_ERR "unable to find a free WSS port\n"); return -EBUSY; } } if (mpu_port == SNDRV_AUTO_PORT) { mpu_port = snd_legacy_find_free_ioport(possible_mpu_ports, 2); if (mpu_port < 0) { snd_card_free(card); snd_printk(KERN_ERR "unable to find a free MPU401 port\n"); return -EBUSY; } } if (irq == SNDRV_AUTO_IRQ) { irq = snd_legacy_find_free_irq(possible_irqs); if (irq < 0) { snd_card_free(card); snd_printk(KERN_ERR "unable to find a free IRQ\n"); return -EBUSY; } } if (mpu_irq == SNDRV_AUTO_IRQ) { mpu_irq = snd_legacy_find_free_irq(possible_mpu_irqs); if (mpu_irq < 0) { snd_card_free(card); snd_printk(KERN_ERR "unable to find a free MPU401 IRQ\n"); return -EBUSY; } } if (dma1 == SNDRV_AUTO_DMA) { dma1 = snd_legacy_find_free_dma(possible_dma1s); if (dma1 < 0) { snd_card_free(card); snd_printk(KERN_ERR "unable to find a free DMA1\n"); return -EBUSY; } } if (dma2 == SNDRV_AUTO_DMA) { dma2 = snd_legacy_find_free_dma(possible_dma2s[dma1 % 4]); if (dma2 < 0) { snd_card_free(card); snd_printk(KERN_ERR "unable to find a free DMA2\n"); return -EBUSY; } } error = snd_miro_probe(card); if (error < 0) { snd_card_free(card); return error; } dev_set_drvdata(devptr, card); return 0; } static int snd_miro_isa_remove(struct device *devptr, unsigned int dev) { snd_card_free(dev_get_drvdata(devptr)); return 0; } #define DEV_NAME "miro" static struct isa_driver snd_miro_driver = { .match = snd_miro_isa_match, .probe = snd_miro_isa_probe, .remove = snd_miro_isa_remove, /* FIXME: suspend/resume */ .driver = { .name = DEV_NAME }, }; #ifdef CONFIG_PNP static int snd_card_miro_pnp(struct snd_miro *chip, struct pnp_card_link *card, const struct pnp_card_device_id *pid) { struct pnp_dev *pdev; int err; struct pnp_dev *devmpu; struct pnp_dev *devmc; pdev = pnp_request_card_device(card, pid->devs[0].id, NULL); if (pdev == NULL) return -EBUSY; devmpu = pnp_request_card_device(card, pid->devs[1].id, NULL); if (devmpu == NULL) return -EBUSY; devmc = pnp_request_card_device(card, pid->devs[2].id, NULL); if (devmc == NULL) return -EBUSY; err = pnp_activate_dev(pdev); if (err < 0) { snd_printk(KERN_ERR "AUDIO pnp configure failure: %d\n", err); return err; } err = pnp_activate_dev(devmc); if (err < 0) { snd_printk(KERN_ERR "MC pnp configure failure: %d\n", err); return err; } port = pnp_port_start(pdev, 1); fm_port = pnp_port_start(pdev, 2) + 8; /* * The MC(0) is never accessed and the miroSOUND PCM20 card does not * include it in the PnP resource range. OPTI93x include it. */ chip->mc_base = pnp_port_start(devmc, 0) - 1; chip->mc_base_size = pnp_port_len(devmc, 0) + 1; irq = pnp_irq(pdev, 0); dma1 = pnp_dma(pdev, 0); dma2 = pnp_dma(pdev, 1); if (mpu_port > 0) { err = pnp_activate_dev(devmpu); if (err < 0) { snd_printk(KERN_ERR "MPU401 pnp configure failure\n"); mpu_port = -1; return err; } mpu_port = pnp_port_start(devmpu, 0); mpu_irq = pnp_irq(devmpu, 0); } return 0; } static int snd_miro_pnp_probe(struct pnp_card_link *pcard, const struct pnp_card_device_id *pid) { struct snd_card *card; int err; struct snd_miro *miro; if (snd_miro_pnp_is_probed) return -EBUSY; if (!isapnp) return -ENODEV; err = snd_card_new(&pcard->card->dev, index, id, THIS_MODULE, sizeof(struct snd_miro), &card); if (err < 0) return err; card->private_free = snd_card_miro_free; miro = card->private_data; err = snd_card_miro_pnp(miro, pcard, pid); if (err) { snd_card_free(card); return err; } /* only miroSOUND PCM20 and PCM12 == OPTi924 */ err = snd_miro_init(miro, OPTi9XX_HW_82C924); if (err) { snd_card_free(card); return err; } err = snd_miro_opti_check(miro); if (err) { snd_printk(KERN_ERR "OPTI chip not found\n"); snd_card_free(card); return err; } err = snd_miro_probe(card); if (err < 0) { snd_card_free(card); return err; } pnp_set_card_drvdata(pcard, card); snd_miro_pnp_is_probed = 1; return 0; } static void snd_miro_pnp_remove(struct pnp_card_link *pcard) { snd_card_free(pnp_get_card_drvdata(pcard)); pnp_set_card_drvdata(pcard, NULL); snd_miro_pnp_is_probed = 0; } static struct pnp_card_driver miro_pnpc_driver = { .flags = PNP_DRIVER_RES_DISABLE, .name = "miro", .id_table = snd_miro_pnpids, .probe = snd_miro_pnp_probe, .remove = snd_miro_pnp_remove, }; #endif static int __init alsa_card_miro_init(void) { #ifdef CONFIG_PNP pnp_register_card_driver(&miro_pnpc_driver); if (snd_miro_pnp_is_probed) return 0; pnp_unregister_card_driver(&miro_pnpc_driver); #endif return isa_register_driver(&snd_miro_driver, 1); } static void __exit alsa_card_miro_exit(void) { if (!snd_miro_pnp_is_probed) { isa_unregister_driver(&snd_miro_driver); return; } #ifdef CONFIG_PNP pnp_unregister_card_driver(&miro_pnpc_driver); #endif } module_init(alsa_card_miro_init) module_exit(alsa_card_miro_exit)