diff options
Diffstat (limited to 'sys/i386/isa/sound/ad1848.c')
| -rw-r--r-- | sys/i386/isa/sound/ad1848.c | 2638 |
1 files changed, 1487 insertions, 1151 deletions
diff --git a/sys/i386/isa/sound/ad1848.c b/sys/i386/isa/sound/ad1848.c index 73e0edc..39a0e55 100644 --- a/sys/i386/isa/sound/ad1848.c +++ b/sys/i386/isa/sound/ad1848.c @@ -1,14 +1,29 @@ /* * sound/ad1848.c + * + * Modified by Luigi Rizzo (luigi@iet.unipi.it) * - * The low level driver for the AD1848/CS4248 codec chip which - * is used for example in the MS Sound System. - * - * The CS4231 which is used in the GUS MAX and some other cards is - * upwards compatible with AD1848 and this driver is able to drive it. + * The low level driver for the AD1848/CS4248 codec chip which is used for + * example in the MS Sound System. + * + * The CS4231 which is used in the GUS MAX and some other cards is upwards + * compatible with AD1848 and this driver is able to drive it. + * + * CS4231A and AD1845 are upward compatible with CS4231. However the new + * features of these chips are different. + * + * CS4232 is a PnP audio chip which contains a CS4231A (and SB, MPU). CS4232A is + * an improved version of CS4232. + * + * CS4236 is also a PnP audio chip similar to the 4232 * + * OPTi931 is another high-end 1848-type chip. It differs in the use + * of the high 16 registers and configuration stuff. Luckily, being a + * PnP device, we can avoid black magic to identify the chip and be + * sure of its identity. + * * Copyright by Hannu Savolainen 1994, 1995 - * + * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions are * met: 1. Redistributions of source code must retain the above copyright @@ -16,7 +31,7 @@ * Redistributions in binary form must reproduce the above copyright notice, * this list of conditions and the following disclaimer in the documentation * and/or other materials provided with the distribution. - * + * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND ANY * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE @@ -28,69 +43,88 @@ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. - * - * Modified: - * Riccardo Facchetti 24 Mar 1995 - * - Added the Audio Excel DSP 16 initialization routine. + * + * Modified: Riccardo Facchetti 24 Mar 1995 - Added the Audio Excel DSP 16 + * initialization routine. */ #define DEB(x) #define DEB1(x) #include <i386/isa/sound/sound_config.h> -#if defined(CONFIGURE_SOUNDCARD) && !defined(EXCLUDE_AD1848) +#if defined(CONFIG_AD1848) #include <i386/isa/sound/ad1848_mixer.h> - -#define IMODE_NONE 0 -#define IMODE_OUTPUT 1 -#define IMODE_INPUT 2 -#define IMODE_INIT 3 -#define IMODE_MIDI 4 - -typedef struct - { - int base; - int irq; - int dma_capture, dma_playback; - unsigned char MCE_bit; - unsigned char saved_regs[16]; - - int speed; - unsigned char speed_bits; - int channels; - int audio_format; - unsigned char format_bits; - - int xfer_count; - int irq_mode; - int intr_active; - int opened; - char *chip_name; - int mode; - - /* Mixer parameters */ - int recmask; - int supported_devices; - int supported_rec_devices; - unsigned short levels[32]; - } - -ad1848_info; +#include <i386/isa/sound/iwdefs.h> + +extern struct isa_driver mssdriver; + +extern void IwaveStopDma(BYTE path); + +typedef struct { + int base; + int irq; + int dual_dma; /* 1, when two DMA channels allocated */ + u_char MCE_bit; + u_char saved_regs[16]; + + int speed; + u_char speed_bits; + int channels; + int audio_format; + u_char format_bits; + + u_long xfer_count; + int irq_mode; + int intr_active; + int opened; + char *chip_name; + int mode; +#define MD_1848 1 +#define MD_4231 2 +#define MD_4231A 3 +#define MD_1845 4 +#define MD_MAXMODE 5 + + /* Mixer parameters */ + int recmask; + int supported_devices; + int supported_rec_devices; + u_short levels[32]; + int dev_no; + volatile u_long timer_ticks; + int timer_running; + int irq_ok; + sound_os_info *osp; +} ad1848_info; static int nr_ad1848_devs = 0; -static char irq2dev[16] = -{-1, -1, -1, -1, -1, -1, -1, -1, - -1, -1, -1, -1, -1, -1, -1, -1}; +static volatile char irq2dev[17] = + {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1}; -static char mixer2codec[MAX_MIXER_DEV] = -{0}; +static int timer_installed = -1; +static int mute_flag = 0; +static char mixer2codec[MAX_MIXER_DEV] = {0}; -static int ad_format_mask[3 /*devc->mode */ ] = +static int ad_format_mask[MD_MAXMODE /* devc->mode */ ] = { - 0, - AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW, - AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_U16_LE | AFMT_IMA_ADPCM + /* 0 - none */ 0, + /* 1 - AD1848 */ AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW, + + /* + * AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_U16_LE | + * AFMT_IMA_ADPCM, + */ + + /* 2 - CS4231 */ AFMT_U8 | AFMT_S16_LE | AFMT_U16_LE, + + /* + * AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW | AFMT_U16_LE | + * AFMT_IMA_ADPCM, + */ + + /* 3 - CS4231A */ AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW, + /* 4 - AD1845 */ AFMT_U8 | AFMT_S16_LE | AFMT_MU_LAW | AFMT_A_LAW }; static ad1848_info dev_info[MAX_AUDIO_DEV]; @@ -100,1426 +134,1728 @@ static ad1848_info dev_info[MAX_AUDIO_DEV]; #define io_Status(d) ((d)->base+2) #define io_Polled_IO(d) ((d)->base+3) -static int ad1848_open (int dev, int mode); -static void ad1848_close (int dev); -static int ad1848_ioctl (int dev, unsigned int cmd, unsigned int arg, int local); -static void ad1848_output_block (int dev, unsigned long buf, int count, int intrflag, int dma_restart); -static void ad1848_start_input (int dev, unsigned long buf, int count, int intrflag, int dma_restart); -static int ad1848_prepare_for_IO (int dev, int bsize, int bcount); -static void ad1848_reset (int dev); -static void ad1848_halt (int dev); +static int ad1848_open(int dev, int mode); +static void ad1848_close(int dev); +static int ad1848_ioctl(int dev, u_int cmd, ioctl_arg arg, int local); +static void ad1848_output_block(int dev, u_long buf, int count, int intrflag, int dma_restart); +static void ad1848_start_input(int dev, u_long buf, int count, int intrflag, int dma_restart); +static int ad1848_prepare_for_IO(int dev, int bsize, int bcount); +static void ad1848_reset(int dev); +static void ad1848_halt(int dev); +static void ad1848_halt_input(int dev); +static void ad1848_halt_output(int dev); +static void ad1848_trigger(int dev, int bits); +static int ad1848_tmr_install(int dev); +static void ad1848_tmr_reprogram(int dev); +void adintr(int); -static int -ad_read (ad1848_info * devc, int reg) +/* + * AD_WAIT_INIT waits if we are initializing the board and we cannot modify + * its settings + */ +#define AD_WAIT_INIT(x) {int t=x; while(t>0 && inb(devc->base) == 0x80) t-- ; } + +short ipri_to_irq(u_short ipri); + +void +adintr(unit) { - unsigned long flags; - int x; - int timeout = 100; + static short unit_to_irq[4] = {9, -1, -1, -1}; + struct isa_device *dev; + + if (unit_to_irq[unit] > 0) + ad1848_interrupt(unit_to_irq[unit]); + else { + dev = find_isadev(isa_devtab_null, &mssdriver, unit); + if (!dev) + printf("ad1848: Couldn't determine unit\n"); + else { + unit_to_irq[unit] = ipri_to_irq(dev->id_irq); + ad1848_interrupt(unit_to_irq[unit]); + } + } +} - while (timeout > 0 && INB (devc->base) == 0x80) /*Are we initializing */ - timeout--; +static int +ad_read(ad1848_info * devc, int reg) +{ + u_long flags; + int x; - DISABLE_INTR (flags); - OUTB ((unsigned char) (reg & 0xff) | devc->MCE_bit, io_Index_Addr (devc)); - x = INB (io_Indexed_Data (devc)); - /* printk("(%02x<-%02x) ", reg|devc->MCE_bit, x); */ - RESTORE_INTR (flags); + AD_WAIT_INIT(900000); + flags = splhigh(); + outb(io_Index_Addr(devc), (u_char) (reg & 0xff) | devc->MCE_bit); + x = inb(io_Indexed_Data(devc)); + splx(flags); - return x; + return x; } static void -ad_write (ad1848_info * devc, int reg, int data) +ad_write(ad1848_info * devc, int reg, u_char data) { - unsigned long flags; - int timeout = 100; + u_long flags; - while (timeout > 0 && INB (devc->base) == 0x80) /*Are we initializing */ - timeout--; + AD_WAIT_INIT(90000); - DISABLE_INTR (flags); - OUTB ((unsigned char) (reg & 0xff) | devc->MCE_bit, io_Index_Addr (devc)); - OUTB ((unsigned char) (data & 0xff), io_Indexed_Data (devc)); - /* printk("(%02x->%02x) ", reg|devc->MCE_bit, data); */ - RESTORE_INTR (flags); + flags = splhigh(); + outb(io_Index_Addr(devc), (u_char) (reg & 0xff) | devc->MCE_bit); + outb(io_Indexed_Data(devc), (u_char) (data & 0xff)); + splx(flags); } static void -wait_for_calibration (ad1848_info * devc) +wait_for_calibration(ad1848_info * devc) { - int timeout = 0; + int timeout = 0; - /* + /* * Wait until the auto calibration process has finished. - * + * * 1) Wait until the chip becomes ready (reads don't return 0x80). * 2) Wait until the ACI bit of I11 gets on and then off. - */ + */ - timeout = 100000; -#ifdef PC98 - while (timeout > 0 && (INB (devc->base) & 0x80) == 0x80) - timeout--; - if ((INB (devc->base) & 0x80) == 0x80) -#else - while (timeout > 0 && INB (devc->base) & 0x80) - timeout--; - if (INB (devc->base) & 0x80) -#endif - printk ("ad1848: Auto calibration timed out(1).\n"); - - timeout = 100; - while (timeout > 0 && !(ad_read (devc, 11) & 0x20)) - timeout--; - if (!(ad_read (devc, 11) & 0x20)) - return; - - timeout = 10000; - while (timeout > 0 && ad_read (devc, 11) & 0x20) - timeout--; - if (ad_read (devc, 11) & 0x20) - printk ("ad1848: Auto calibration timed out(3).\n"); + AD_WAIT_INIT(100000); + if (inb(devc->base) & 0x80) + printf("ad1848: Auto calibration timed out(1).\n"); + + timeout = 100; + while (timeout > 0 && !(ad_read(devc, 11) & 0x20)) + timeout--; + if (!(ad_read(devc, 11) & 0x20)) + return; + + timeout = 20000; + while (timeout > 0 && ad_read(devc, 11) & 0x20) + timeout--; + if (ad_read(devc, 11) & 0x20) + printf("ad1848: Auto calibration timed out(3).\n"); } static void -ad_mute (ad1848_info * devc) +ad_mute(ad1848_info * devc) { - int i; - unsigned char prev; + int i; + u_char prev; + + mute_flag = 1; - /* + /* * Save old register settings and mute output channels - */ - for (i = 6; i < 8; i++) - { - prev = devc->saved_regs[i] = ad_read (devc, i); - ad_write (devc, i, prev | 0x80); + */ + for (i = 6; i < 8; i++) { + prev = devc->saved_regs[i] = ad_read(devc, i); + ad_write(devc, i, prev | 0x80); } } static void -ad_unmute (ad1848_info * devc) +ad_unmute(ad1848_info * devc) { - int i; + int i; - /* + mute_flag = 0; + /* * Restore back old volume registers (unmute) - */ - for (i = 6; i < 8; i++) - { - ad_write (devc, i, devc->saved_regs[i] & ~0x80); + */ + for (i = 6; i < 8; i++) + ad_write(devc, i, devc->saved_regs[i] & ~0x80); } -} static void -ad_enter_MCE (ad1848_info * devc) +ad_enter_MCE(ad1848_info * devc) { - unsigned long flags; - int timeout = 1000; - unsigned short prev; - - while (timeout > 0 && INB (devc->base) == 0x80) /*Are we initializing */ - timeout--; - - DISABLE_INTR (flags); - - devc->MCE_bit = 0x40; - prev = INB (io_Index_Addr (devc)); - if (prev & 0x40) - { - RESTORE_INTR (flags); - return; - } - - OUTB (devc->MCE_bit, io_Index_Addr (devc)); - RESTORE_INTR (flags); + u_long flags; + + AD_WAIT_INIT(1000); + devc->MCE_bit = 0x40; + flags = splhigh(); + if ( ( inb(io_Index_Addr(devc)) & 0x40) == 0 ) + outb(io_Index_Addr(devc), devc->MCE_bit); + splx(flags); } static void -ad_leave_MCE (ad1848_info * devc) +ad_leave_MCE(ad1848_info * devc) { - unsigned long flags; - unsigned char prev; - int timeout = 1000; + u_long flags; + u_char prev; - while (timeout > 0 && INB (devc->base) == 0x80) /*Are we initializing */ - timeout--; + AD_WAIT_INIT(1000); - DISABLE_INTR (flags); + flags = splhigh(); - devc->MCE_bit = 0x00; - prev = INB (io_Index_Addr (devc)); - OUTB (0x00, io_Index_Addr (devc)); /* Clear the MCE bit */ + devc->MCE_bit = 0x00; + prev = inb(io_Index_Addr(devc)); + /* XXX the next call is redundant ? */ + outb(io_Index_Addr(devc), 0x00); /* Clear the MCE bit */ - if (prev & 0x40 == 0) /* Not in MCE mode */ - { - RESTORE_INTR (flags); - return; + if ((prev & 0x40) == 0) { /* Not in MCE mode */ + splx(flags); + return; } - - OUTB (0x00, io_Index_Addr (devc)); /* Clear the MCE bit */ - wait_for_calibration (devc); - RESTORE_INTR (flags); + outb(io_Index_Addr(devc), 0x00); /* Clear the MCE bit */ + wait_for_calibration(devc); + splx(flags); } static int -ad1848_set_recmask (ad1848_info * devc, int mask) +ad1848_set_recmask(ad1848_info * devc, int mask) { - unsigned char recdev; - int i, n; + u_char recdev; + int i, n; - mask &= devc->supported_rec_devices; + mask &= devc->supported_rec_devices; - n = 0; - for (i = 0; i < 32; i++) /* Count selected device bits */ - if (mask & (1 << i)) - n++; - - if (n == 0) - mask = SOUND_MASK_MIC; - else if (n != 1) /* Too many devices selected */ - { - mask &= ~devc->recmask; /* Filter out active settings */ - - n = 0; - for (i = 0; i < 32; i++) /* Count selected device bits */ + n = 0; + for (i = 0; i < 32; i++)/* Count selected device bits */ if (mask & (1 << i)) - n++; + n++; - if (n != 1) + if (n == 0) mask = SOUND_MASK_MIC; - } + else if (n != 1) { /* Too many devices selected */ + mask &= ~devc->recmask; /* Filter out active settings */ - switch (mask) - { + n = 0; + for (i = 0; i < 32; i++) /* Count selected device bits */ + if (mask & (1 << i)) + n++; + + if (n != 1) + mask = SOUND_MASK_MIC; + } + switch (mask) { case SOUND_MASK_MIC: - recdev = 2; - break; + recdev = 2; + break; case SOUND_MASK_LINE: case SOUND_MASK_LINE3: - recdev = 0; - break; + recdev = 0; + break; case SOUND_MASK_CD: case SOUND_MASK_LINE1: - recdev = 1; - break; + recdev = 1; + break; + + case SOUND_MASK_IMIX: + recdev = 3; + break; default: - mask = SOUND_MASK_MIC; - recdev = 2; + mask = SOUND_MASK_MIC; + recdev = 2; } - recdev <<= 6; - ad_write (devc, 0, (ad_read (devc, 0) & 0x3f) | recdev); - ad_write (devc, 1, (ad_read (devc, 1) & 0x3f) | recdev); + recdev <<= 6; + ad_write(devc, 0, (ad_read(devc, 0) & 0x3f) | recdev); + ad_write(devc, 1, (ad_read(devc, 1) & 0x3f) | recdev); - devc->recmask = mask; - return mask; + devc->recmask = mask; + return mask; } static void -change_bits (unsigned char *regval, int dev, int chn, int newval) +change_bits(u_char *regval, int dev, int chn, int newval) { - unsigned char mask; - int shift; + u_char mask; + int shift; - if (mix_devices[dev][chn].polarity == 1) /* Reverse */ - newval = 100 - newval; + if (mix_devices[dev][chn].polarity == 1) /* Reverse */ + newval = 100 - newval; - mask = (1 << mix_devices[dev][chn].nbits) - 1; - shift = mix_devices[dev][chn].bitpos; - newval = (int) ((newval * mask) + 50) / 100; /* Scale it */ + mask = (1 << mix_devices[dev][chn].nbits) - 1; + shift = mix_devices[dev][chn].bitpos; + newval = (int) ((newval * mask) + 50) / 100; /* Scale it */ - *regval &= ~(mask << shift); /* Clear bits */ - *regval |= (newval & mask) << shift; /* Set new value */ + *regval &= ~(mask << shift); /* Clear bits */ + *regval |= (newval & mask) << shift; /* Set new value */ } static int -ad1848_mixer_get (ad1848_info * devc, int dev) +ad1848_mixer_get(ad1848_info * devc, int dev) { - if (!((1 << dev) & devc->supported_devices)) - return RET_ERROR (EINVAL); + if (!((1 << dev) & devc->supported_devices)) + return -(EINVAL); - return devc->levels[dev]; + return devc->levels[dev]; } +#define CLMICI 0x00781601 +#define CRMICI 0x00791701 + static int -ad1848_mixer_set (ad1848_info * devc, int dev, int value) +ad1848_mixer_set(ad1848_info * devc, int dev, int value) { - int left = value & 0x000000ff; - int right = (value & 0x0000ff00) >> 8; + int left = value & 0x000000ff; + int right = (value & 0x0000ff00) >> 8; + int retvol; + + int regoffs; + u_char val; + /* u_char clci, crmici, clmici, clici, crici; */ + + if (left > 100) + left = 100; + if (right > 100) + right = 100; - int regoffs; - unsigned char val; + if (mix_devices[dev][RIGHT_CHN].nbits == 0) /* Mono control */ + right = left; - if (left > 100) - left = 100; - if (right > 100) - right = 100; + retvol = left | (left << 8); - if (dev > 31) - return RET_ERROR (EINVAL); + /* Scale volumes */ + left = mix_cvt[left]; + right = mix_cvt[right]; - if (!(devc->supported_devices & (1 << dev))) - return RET_ERROR (EINVAL); + /* Scale it again */ + left = mix_cvt[left]; + right = mix_cvt[right]; - if (mix_devices[dev][LEFT_CHN].nbits == 0) - return RET_ERROR (EINVAL); + if (dev > 31) + return -(EINVAL); - /* + if (!(devc->supported_devices & (1 << dev))) + return -(EINVAL); + + if (mix_devices[dev][LEFT_CHN].nbits == 0) + return -(EINVAL); + + devc->levels[dev] = retvol; + + /* * Set the left channel - */ - - regoffs = mix_devices[dev][LEFT_CHN].regno; - val = ad_read (devc, regoffs); - change_bits (&val, dev, LEFT_CHN, left); - devc->levels[dev] = left | (left << 8); - ad_write (devc, regoffs, val); - devc->saved_regs[regoffs] = val; - - /* - * Set the left right - */ - - if (mix_devices[dev][RIGHT_CHN].nbits == 0) - return left | (left << 8); /* Was just a mono channel */ - - regoffs = mix_devices[dev][RIGHT_CHN].regno; - val = ad_read (devc, regoffs); - change_bits (&val, dev, RIGHT_CHN, right); - ad_write (devc, regoffs, val); - devc->saved_regs[regoffs] = val; - - devc->levels[dev] = left | (right << 8); - return left | (right << 8); + */ + /* IwaveCodecMode(CODEC_MODE3); Default codec mode */ + + regoffs = mix_devices[dev][LEFT_CHN].regno; + val = ad_read(devc, regoffs); + + change_bits(&val, dev, LEFT_CHN, left); + ad_write(devc, regoffs, val); + devc->saved_regs[regoffs] = val; + + /* + * Set the right channel + */ + + if (mix_devices[dev][RIGHT_CHN].nbits == 0) + return retvol; /* Was just a mono channel */ + + regoffs = mix_devices[dev][RIGHT_CHN].regno; + val = ad_read(devc, regoffs); + change_bits(&val, dev, RIGHT_CHN, right); + ad_write(devc, regoffs, val); + devc->saved_regs[regoffs] = val; + + return retvol; } static void -ad1848_mixer_reset (ad1848_info * devc) +ad1848_mixer_reset(ad1848_info * devc) { - int i; + int i; - devc->recmask = 0; - if (devc->mode == 2) - devc->supported_devices = MODE2_MIXER_DEVICES; - else - devc->supported_devices = MODE1_MIXER_DEVICES; + devc->recmask = 0; + if (devc->mode != MD_1848) + devc->supported_devices = MODE2_MIXER_DEVICES; + else + devc->supported_devices = MODE1_MIXER_DEVICES; - devc->supported_rec_devices = MODE1_REC_DEVICES; + devc->supported_rec_devices = MODE1_REC_DEVICES; - for (i = 0; i < SOUND_MIXER_NRDEVICES; i++) - ad1848_mixer_set (devc, i, devc->levels[i] = default_mixer_levels[i]); - ad1848_set_recmask (devc, SOUND_MASK_MIC); + for (i = 0; i < SOUND_MIXER_NRDEVICES; i++) + if (devc->supported_devices & (1 << i)) + ad1848_mixer_set(devc, i, default_mixer_levels[i]); + ad1848_set_recmask(devc, SOUND_MASK_MIC); } static int -ad1848_mixer_ioctl (int dev, unsigned int cmd, unsigned int arg) +ad1848_mixer_ioctl(int dev, u_int cmd, ioctl_arg arg) { - ad1848_info *devc; + ad1848_info *devc; + int codec_dev = mixer2codec[dev]; - int codec_dev = mixer2codec[dev]; + if (!codec_dev) + return -(ENXIO); - if (!codec_dev) - return RET_ERROR (ENXIO); + codec_dev--; - codec_dev--; + devc = (ad1848_info *) audio_devs[codec_dev]->devc; - devc = (ad1848_info *) audio_devs[codec_dev]->devc; + if (((cmd >> 8) & 0xff) == 'M') { + if (cmd & IOC_IN) + switch (cmd & 0xff) { + case SOUND_MIXER_RECSRC: + return *(int *) arg = ad1848_set_recmask(devc, (*(int *) arg)); + break; - if (((cmd >> 8) & 0xff) == 'M') - { - if (cmd & IOC_IN) - switch (cmd & 0xff) - { - case SOUND_MIXER_RECSRC: - return IOCTL_OUT (arg, ad1848_set_recmask (devc, IOCTL_IN (arg))); - break; - - default: - return IOCTL_OUT (arg, ad1848_mixer_set (devc, cmd & 0xff, IOCTL_IN (arg))); - } - else - switch (cmd & 0xff) /* - * Return parameters - */ - { - - case SOUND_MIXER_RECSRC: - return IOCTL_OUT (arg, devc->recmask); - break; - - case SOUND_MIXER_DEVMASK: - return IOCTL_OUT (arg, devc->supported_devices); - break; - - case SOUND_MIXER_STEREODEVS: - return IOCTL_OUT (arg, devc->supported_devices & - ~(SOUND_MASK_SPEAKER | SOUND_MASK_IMIX)); - break; - - case SOUND_MIXER_RECMASK: - return IOCTL_OUT (arg, devc->supported_rec_devices); - break; - - case SOUND_MIXER_CAPS: - return IOCTL_OUT (arg, SOUND_CAP_EXCL_INPUT); - break; - - default: - return IOCTL_OUT (arg, ad1848_mixer_get (devc, cmd & 0xff)); - } - } - else - return RET_ERROR (EINVAL); + default: + return *(int *) arg = ad1848_mixer_set(devc, cmd & 0xff, (*(int *) arg)); + } + else + switch (cmd & 0xff) { /* Return parameters */ + + case SOUND_MIXER_RECSRC: + return *(int *) arg = devc->recmask; + break; + + case SOUND_MIXER_DEVMASK: + return *(int *) arg = devc->supported_devices; + break; + + case SOUND_MIXER_STEREODEVS: + return *(int *) arg = devc->supported_devices & ~(SOUND_MASK_SPEAKER | SOUND_MASK_IMIX); + break; + + case SOUND_MIXER_RECMASK: + return *(int *) arg = devc->supported_rec_devices; + break; + + case SOUND_MIXER_CAPS: + return *(int *) arg = SOUND_CAP_EXCL_INPUT; + break; + + default: + return *(int *) arg = ad1848_mixer_get(devc, cmd & 0xff); + } + } else + return -(EINVAL); } static struct audio_operations ad1848_pcm_operations[MAX_AUDIO_DEV] = { - { - "Generic AD1848 codec", - DMA_AUTOMODE, - AFMT_U8, /* Will be set later */ - NULL, - ad1848_open, - ad1848_close, - ad1848_output_block, - ad1848_start_input, - ad1848_ioctl, - ad1848_prepare_for_IO, - ad1848_prepare_for_IO, - ad1848_reset, - ad1848_halt, - NULL, - NULL - }}; + { + "Generic AD1848 codec", + /* DMA_AUTOMODE | DMA_DUPLEX, */ + DMA_AUTOMODE, + AFMT_U8, /* Will be set later */ + NULL, + ad1848_open, + ad1848_close, + ad1848_output_block, + ad1848_start_input, + ad1848_ioctl, + ad1848_prepare_for_IO, + ad1848_prepare_for_IO, + ad1848_reset, + ad1848_halt, + NULL, + NULL, + ad1848_halt_input, + ad1848_halt_output, + ad1848_trigger + } +}; static struct mixer_operations ad1848_mixer_operations = { - "AD1848/CS4248/CS4231", - ad1848_mixer_ioctl + "AD1848/CS4248/CS4231", + ad1848_mixer_ioctl }; static int -ad1848_open (int dev, int mode) +ad1848_open(int dev, int mode) { - int err; - ad1848_info *devc = NULL; - unsigned long flags; - - DEB (printk ("ad1848_open(int mode = %X)\n", mode)); - - if (dev < 0 || dev >= num_audiodevs) - return RET_ERROR (ENXIO); + ad1848_info *devc = NULL; + u_long flags; + int otherside = audio_devs[dev]->otherside; - devc = (ad1848_info *) audio_devs[dev]->devc; + if (dev < 0 || dev >= num_audiodevs) + return -(ENXIO); - DISABLE_INTR (flags); - if (devc->opened) - { - RESTORE_INTR (flags); - printk ("ad1848: Already opened\n"); - return RET_ERROR (EBUSY); + if (otherside != -1) { + if (audio_devs[otherside]->busy) + return -(EBUSY); } + if (audio_devs[dev]->busy) + return -(EBUSY); - if (devc->irq) /* Not managed by another driver */ - if ((err = snd_set_irq_handler (devc->irq, ad1848_interrupt, - audio_devs[dev]->name)) < 0) - { - printk ("ad1848: IRQ in use\n"); - RESTORE_INTR (flags); - return err; - } + devc = (ad1848_info *) audio_devs[dev]->devc; - if (DMAbuf_open_dma (dev) < 0) - { - RESTORE_INTR (flags); - printk ("ad1848: DMA in use\n"); - return RET_ERROR (EBUSY); + flags = splhigh(); + if (audio_devs[dev]->busy) { + splx(flags); + return -(EBUSY); } + devc->dual_dma = 0; - devc->intr_active = 0; - devc->opened = 1; - RESTORE_INTR (flags); - - return 0; + if (audio_devs[dev]->flags & DMA_DUPLEX) { + devc->dual_dma = 1; + } + devc->intr_active = 0; + audio_devs[dev]->busy = 1; + devc->irq_mode = 0; + ad1848_trigger(dev, 0); + splx(flags); + /* + * Mute output until the playback really starts. This decreases + * clicking. + */ + ad_mute(devc); + + return 0; } static void -ad1848_close (int dev) +ad1848_close(int dev) { - unsigned long flags; - ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + u_long flags; + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + int otherside = audio_devs[dev]->otherside; + + if (otherside != -1) { + if (audio_devs[otherside]->busy) + return; + } + DEB(printf("ad1848_close(void)\n")); + + flags = splhigh(); - DEB (printk ("ad1848_close(void)\n")); + ad_mute(devc); - DISABLE_INTR (flags); + ad_write(devc, 9, ad_read(devc, 9) & ~0x1); + outb(io_Status(devc), 0); /* Clear interrupt status */ + /* + * ad_write (devc, 15,0); ad_write (devc, 14,0); + */ + devc->irq_mode &= ~PCM_ENABLE_OUTPUT; - devc->intr_active = 0; - if (devc->irq) /* Not managed by another driver */ - snd_release_irq (devc->irq); - ad1848_reset (dev); - DMAbuf_close_dma (dev); - devc->opened = 0; + devc->intr_active = 0; + ad1848_reset(dev); - RESTORE_INTR (flags); + devc->opened = 0; + devc->irq_mode = 0; + audio_devs[dev]->busy = 0; + ad_unmute(devc); + splx(flags); } static int -set_speed (ad1848_info * devc, int arg) +set_speed(ad1848_info * devc, int arg) { - /* - * The sampling speed is encoded in the least significant nible of I8. The - * LSB selects the clock source (0=24.576 MHz, 1=16.9344 Mhz) and other - * three bits select the divisor (indirectly): - * + /* + * The sampling speed is encoded in the least significant nible of + * I8. The LSB selects the clock source (0=24.576 MHz, 1=16.9344 Mhz) + * and other three bits select the divisor (indirectly): + * * The available speeds are in the following table. Keep the speeds in * the increasing order. - */ - typedef struct - { - int speed; - unsigned char bits; - } - speed_struct; - - static speed_struct speed_table[] = - { - {5510, (0 << 1) | 1}, - {5510, (0 << 1) | 1}, - {6620, (7 << 1) | 1}, - {8000, (0 << 1) | 0}, - {9600, (7 << 1) | 0}, - {11025, (1 << 1) | 1}, - {16000, (1 << 1) | 0}, - {18900, (2 << 1) | 1}, - {22050, (3 << 1) | 1}, - {27420, (2 << 1) | 0}, - {32000, (3 << 1) | 0}, - {33075, (6 << 1) | 1}, - {37800, (4 << 1) | 1}, - {44100, (5 << 1) | 1}, - {48000, (6 << 1) | 0} - }; - - int i, n, selected = -1; - - n = sizeof (speed_table) / sizeof (speed_struct); - - if (arg < speed_table[0].speed) - selected = 0; - if (arg > speed_table[n - 1].speed) - selected = n - 1; - - for (i = 1 /*really */ ; selected == -1 && i < n; i++) - if (speed_table[i].speed == arg) - selected = i; - else if (speed_table[i].speed > arg) - { - int diff1, diff2; - - diff1 = arg - speed_table[i - 1].speed; - diff2 = speed_table[i].speed - arg; - - if (diff1 < diff2) - selected = i - 1; - else - selected = i; - } - - if (selected == -1) - { - printk ("ad1848: Can't find speed???\n"); - selected = 3; + */ + typedef struct { + int speed; + u_char bits; + } speed_struct; + + static speed_struct speed_table[] = { + {5510, (0 << 1) | 1}, + {5510, (0 << 1) | 1}, + {6620, (7 << 1) | 1}, + {8000, (0 << 1) | 0}, + {9600, (7 << 1) | 0}, + {11025, (1 << 1) | 1}, + {16000, (1 << 1) | 0}, + {18900, (2 << 1) | 1}, + {22050, (3 << 1) | 1}, + {27420, (2 << 1) | 0}, + {32000, (3 << 1) | 0}, + {33075, (6 << 1) | 1}, + {37800, (4 << 1) | 1}, + {44100, (5 << 1) | 1}, + {48000, (6 << 1) | 0} + }; + + int i, n, selected = -1; + + n = sizeof(speed_table) / sizeof(speed_struct); + + if (devc->mode == MD_1845) { /* AD1845 has different timer than others */ + RANGE (arg, 4000, 50000) ; + + devc->speed = arg; + devc->speed_bits = speed_table[selected].bits; + return devc->speed; } - - devc->speed = speed_table[selected].speed; - devc->speed_bits = speed_table[selected].bits; - return devc->speed; + if (arg < speed_table[0].speed) + selected = 0; + if (arg > speed_table[n - 1].speed) + selected = n - 1; + + for (i = 1 /* really */ ; selected == -1 && i < n; i++) + if (speed_table[i].speed == arg) + selected = i; + else if (speed_table[i].speed > arg) { + int diff1, diff2; + + diff1 = arg - speed_table[i - 1].speed; + diff2 = speed_table[i].speed - arg; + + if (diff1 < diff2) + selected = i - 1; + else + selected = i; + } + if (selected == -1) { + printf("ad1848: Can't find speed???\n"); + selected = 3; + } + devc->speed = speed_table[selected].speed; + devc->speed_bits = speed_table[selected].bits; + return devc->speed; } static int -set_channels (ad1848_info * devc, int arg) +set_channels(ad1848_info * devc, int arg) { - if (arg != 1 && arg != 2) - return devc->channels; + if (arg != 1 && arg != 2) + return devc->channels; - devc->channels = arg; - return arg; + devc->channels = arg; + return arg; } static int -set_format (ad1848_info * devc, int arg) +set_format(ad1848_info * devc, int arg) { - - static struct format_tbl - { - int format; - unsigned char bits; - } - format2bits[] = - { - { - 0, 0 - } - , - { - AFMT_MU_LAW, 1 - } - , - { - AFMT_A_LAW, 3 - } - , - { - AFMT_IMA_ADPCM, 5 - } - , - { - AFMT_U8, 0 - } - , - { - AFMT_S16_LE, 2 - } - , - { - AFMT_S16_BE, 6 - } - , - { - AFMT_S8, 0 - } - , - { - AFMT_U16_LE, 0 - } - , - { - AFMT_U16_BE, 0 - } - }; - int i, n = sizeof (format2bits) / sizeof (struct format_tbl); - - if (!(arg & ad_format_mask[devc->mode])) - arg = AFMT_U8; - - devc->audio_format = arg; - - for (i = 0; i < n; i++) - if (format2bits[i].format == arg) - { - if ((devc->format_bits = format2bits[i].bits) == 0) - return devc->audio_format = AFMT_U8; /* Was not supported */ - - return arg; - } - - /* Still hanging here. Something must be terribly wrong */ - devc->format_bits = 0; - return devc->audio_format = AFMT_U8; + static struct format_tbl { + int format; + u_char bits; + } format2bits[] = { + { 0, 0 } , + { AFMT_MU_LAW, 1 } , + { AFMT_A_LAW, 3 } , + { AFMT_IMA_ADPCM, 5 } , + { AFMT_U8, 0 } , + { AFMT_S16_LE, 2 } , + { AFMT_S16_BE, 6 } , + { AFMT_S8, 0 } , + { AFMT_U16_LE, 0 } , + { AFMT_U16_BE, 0 } + }; + int i, n = sizeof(format2bits) / sizeof(struct format_tbl); + + + if (!(arg & ad_format_mask[devc->mode])) + arg = AFMT_U8; + + devc->audio_format = arg; + + for (i = 0; i < n; i++) + if (format2bits[i].format == arg) { + if ((devc->format_bits = format2bits[i].bits) == 0) + return devc->audio_format = AFMT_U8; /* Was not supported */ + return arg; + } + /* Still hanging here. Something must be terribly wrong */ + devc->format_bits = 0; + return devc->audio_format = AFMT_U8; } +/* XXX check what is arg, (int) or *(int *) lr970705 */ static int -ad1848_ioctl (int dev, unsigned int cmd, unsigned int arg, int local) +ad1848_ioctl(int dev, u_int cmd, ioctl_arg arg, int local) { - ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; - switch (cmd) - { + switch (cmd) { case SOUND_PCM_WRITE_RATE: - if (local) - return set_speed (devc, arg); - return IOCTL_OUT (arg, set_speed (devc, IOCTL_IN (arg))); + if (local) + return set_speed(devc, (int) arg); + return *(int *) arg = set_speed(devc, (*(int *) arg)); case SOUND_PCM_READ_RATE: - if (local) - return devc->speed; - return IOCTL_OUT (arg, devc->speed); + if (local) + return devc->speed; + return *(int *) arg = devc->speed; case SNDCTL_DSP_STEREO: - if (local) - return set_channels (devc, arg + 1) - 1; - return IOCTL_OUT (arg, set_channels (devc, IOCTL_IN (arg) + 1) - 1); + if (local) + return set_channels(devc, (int) arg + 1) - 1; + return *(int *) arg = set_channels(devc, (*(int *) arg) + 1) - 1; case SOUND_PCM_WRITE_CHANNELS: - if (local) - return set_channels (devc, arg); - return IOCTL_OUT (arg, set_channels (devc, IOCTL_IN (arg))); + if (local) + return set_channels(devc, (int) arg); + return *(int *) arg = set_channels(devc, (*(int *) arg)); case SOUND_PCM_READ_CHANNELS: - if (local) - return devc->channels; - return IOCTL_OUT (arg, devc->channels); + if (local) + return devc->channels; + return *(int *) arg = devc->channels; case SNDCTL_DSP_SAMPLESIZE: - if (local) - return set_format (devc, arg); - return IOCTL_OUT (arg, set_format (devc, IOCTL_IN (arg))); + if (local) + return set_format(devc, (int) arg); + return *(int *) arg = set_format(devc, (*(int *) arg)); case SOUND_PCM_READ_BITS: - if (local) - return devc->audio_format; - return IOCTL_OUT (arg, devc->audio_format); + if (local) + return devc->audio_format; + return *(int *) arg = devc->audio_format; + + + case FIOASYNC: + if (local) + return 1; + return *(int *) arg = 1; + + case FIONBIO: + if (local) + return 1; + return *(int *) arg = 1; + default:; } - return RET_ERROR (EINVAL); + return -(EINVAL); } static void -ad1848_output_block (int dev, unsigned long buf, int count, int intrflag, int dma_restart) +ad1848_output_block(int dev, u_long buf, int count, int intrflag, int dma_restart) { - unsigned long flags, cnt; - ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; - - cnt = count; - - if (devc->audio_format == AFMT_IMA_ADPCM) - { - cnt /= 4; + u_long flags, cnt; + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + + cnt = count; + if (devc->audio_format == AFMT_IMA_ADPCM) { + cnt /= 4; + } else { + if (devc->audio_format & (AFMT_S16_LE | AFMT_S16_BE)) /* 16 bit data */ + cnt >>= 1; } - else - { - if (devc->audio_format & (AFMT_S16_LE | AFMT_S16_BE)) /* 16 bit data */ + if (devc->channels > 1) cnt >>= 1; - } - if (devc->channels > 1) - cnt >>= 1; - cnt--; + cnt--; + if (mute_flag) + ad_unmute(devc); - if (audio_devs[dev]->flags & DMA_AUTOMODE && - intrflag && - cnt == devc->xfer_count) - { - devc->irq_mode = IMODE_OUTPUT; - devc->intr_active = 1; - return; /* - * Auto DMA mode on. No need to react - */ - } - DISABLE_INTR (flags); + if ( devc->irq_mode & PCM_ENABLE_OUTPUT && + audio_devs[dev]->flags & DMA_AUTOMODE && intrflag && + cnt == devc->xfer_count) { + devc->irq_mode |= PCM_ENABLE_OUTPUT; + devc->intr_active = 1; - if (dma_restart) - { - /* ad1848_halt (dev); */ - DMAbuf_start_dma (dev, buf, count, DMA_MODE_WRITE); } + flags = splhigh(); - ad_enter_MCE (devc); - - ad_write (devc, 15, (unsigned char) (cnt & 0xff)); - ad_write (devc, 14, (unsigned char) ((cnt >> 8) & 0xff)); + if (dma_restart) { - ad_write (devc, 9, 0x0d); /* - * Playback enable, single DMA channel mode, - * auto calibration on. - */ - - ad_leave_MCE (devc); /* - * Starts the calibration process and - * enters playback mode after it. - */ - ad_unmute (devc); + DMAbuf_start_dma(dev, buf, count, 1); + } + ad_write(devc, 15, (u_char) (cnt & 0xff)); + ad_write(devc, 14, (u_char) ((cnt >> 8) & 0xff)); - devc->xfer_count = cnt; - devc->irq_mode = IMODE_OUTPUT; - devc->intr_active = 1; - INB (io_Status (devc)); - OUTB (0, io_Status (devc)); /* Clear pending interrupts */ - RESTORE_INTR (flags); + devc->xfer_count = cnt; + devc->irq_mode |= PCM_ENABLE_OUTPUT; + devc->intr_active = 1; + splx(flags); } static void -ad1848_start_input (int dev, unsigned long buf, int count, int intrflag, int dma_restart) +ad1848_start_input(int dev, u_long buf, int count, + int intrflag, int dma_restart) { - unsigned long flags, cnt; - ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + u_long flags, cnt; + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; - int count_reg = 14; /* (devc->mode == 1) ? 14 : 30; */ - - cnt = count; - if (devc->audio_format == AFMT_IMA_ADPCM) - { - cnt /= 4; - } - else - { - if (devc->audio_format & (AFMT_S16_LE | AFMT_S16_BE)) /* 16 bit data */ + cnt = count; + if (devc->audio_format == AFMT_IMA_ADPCM) + cnt /= 4; + else if (devc->audio_format & (AFMT_S16_LE | AFMT_S16_BE)) /* 16 bit data */ + cnt >>= 1; + if (devc->channels > 1) cnt >>= 1; + cnt--; + + if ( devc->irq_mode & PCM_ENABLE_INPUT && + audio_devs[dev]->flags & DMA_AUTOMODE && intrflag && + cnt == devc->xfer_count) { + devc->irq_mode |= PCM_ENABLE_INPUT; + devc->intr_active = 1; + return; /* Auto DMA mode on. No need to react */ } - if (devc->channels > 1) - cnt >>= 1; - cnt--; + flags = splhigh(); - if (audio_devs[dev]->flags & DMA_AUTOMODE && - intrflag && - cnt == devc->xfer_count) - { - devc->irq_mode = IMODE_INPUT; - devc->intr_active = 1; - return; /* - * Auto DMA mode on. No need to react - */ + if (dma_restart) { + /* ad1848_halt (dev); */ + DMAbuf_start_dma(dev, buf, count, 0); } - DISABLE_INTR (flags); - - if (dma_restart) - { - /* ad1848_halt (dev); */ - DMAbuf_start_dma (dev, buf, count, DMA_MODE_READ); + if (devc->mode == MD_1848 || !devc->dual_dma) {/* Single DMA chan. mode */ + ad_write(devc, 15, (u_char) (cnt & 0xff)); + ad_write(devc, 14, (u_char) ((cnt >> 8) & 0xff)); + } else { /* Dual DMA channel mode */ + ad_write(devc, 31, (u_char) (cnt & 0xff)); + ad_write(devc, 30, (u_char) ((cnt >> 8) & 0xff)); } - ad_enter_MCE (devc); - - ad_write (devc, count_reg + 1, (unsigned char) (cnt & 0xff)); - ad_write (devc, count_reg, (unsigned char) ((cnt >> 8) & 0xff)); - - ad_write (devc, 9, 0x0e); /* - * Capture enable, single DMA channel mode, - * auto calibration on. - */ + /* ad_write (devc, 9, ad_read (devc, 9) | 0x02); *//* Capture enable */ + ad_unmute(devc); - ad_leave_MCE (devc); /* - * Starts the calibration process and - * enters playback mode after it. - */ - ad_unmute (devc); - - devc->xfer_count = cnt; - devc->irq_mode = IMODE_INPUT; - devc->intr_active = 1; - INB (io_Status (devc)); - OUTB (0, io_Status (devc)); /* Clear interrupt status */ - RESTORE_INTR (flags); + devc->xfer_count = cnt; + devc->irq_mode |= PCM_ENABLE_INPUT; + devc->intr_active = 1; + splx(flags); } static int -ad1848_prepare_for_IO (int dev, int bsize, int bcount) +ad1848_prepare_for_IO(int dev, int bsize, int bcount) { - int timeout; - unsigned char fs; - unsigned long flags; - ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; - - DISABLE_INTR (flags); - ad_enter_MCE (devc); /* Enables changes to the format select reg */ - fs = devc->speed_bits | (devc->format_bits << 5); - - if (devc->channels > 1) - fs |= 0x10; - - ad_write (devc, 8, fs); - /* - * Write to I8 starts resyncronization. Wait until it completes. - */ - timeout = 10000; -#ifdef PC98 - while (timeout > 0 && (INB (devc->base) & 0x80) == 0x80) -#else - while (timeout > 0 && INB (devc->base) == 0x80) -#endif - timeout--; - -#ifdef PC98 - ad_write (devc, 8, fs); - /* - * Write to I8 starts resyncronization. Wait until it completes. - */ - timeout = 10000; - while (timeout > 0 && (INB (devc->base) & 0x80) == 0x80) - timeout--; -#endif + int timeout; + u_char fs, old_fs; + u_long flags; + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; - /* - * If mode == 2 (CS4231), set I28 also. It's the capture format register. - */ - if (devc->mode == 2) - { - ad_write (devc, 28, fs); - - /* - * Write to I28 starts resyncronization. Wait until it completes. - */ - timeout = 10000; -#ifdef PC98 - while (timeout > 0 && (INB (devc->base) & 0x80) == 0x80) -#else - while (timeout > 0 && INB (devc->base) == 0x80) -#endif - timeout--; + if (devc->irq_mode) + return 0; + + flags = splhigh(); + fs = devc->speed_bits | (devc->format_bits << 5); + if (devc->channels > 1) + fs |= 0x10; + old_fs = fs; + if (devc->mode == MD_1845) { /* Use alternate speed select regs */ + fs &= 0xf0; /* Mask off the rate select bits */ + + ad_write(devc, 22, (devc->speed >> 8) & 0xff); /* Speed MSB */ + ad_write(devc, 23, devc->speed & 0xff); /* Speed LSB */ } -#ifdef PC98 - ad_write (devc, 28, fs); + ad_enter_MCE(devc); /* Enables changes to the format select reg */ + ad_write(devc, 8, fs); + + /* + * Write to I8 starts resyncronization. Wait until it completes. + */ + AD_WAIT_INIT(10000); + + /* + * If mode == 2 (CS4231), set I28 also. It's the capture format + * register. + */ + if (devc->mode != MD_1848) { + ad_write(devc, 28, fs); + + /* + * Write to I28 starts resyncronization. Wait until it completes. + */ + AD_WAIT_INIT(10000); + } + ad_leave_MCE(devc); /* Starts the calibration process. */ + + /* amancio */ + ad_enter_MCE(devc); /* Enables changes to the format select reg */ + + ad_write(devc, 8, fs); + /* + * Write to I8 starts resyncronization. Wait until it completes. + */ + AD_WAIT_INIT(10000); + ad_write(devc, 9, ad_read(devc, 9) & ~0x08); + /* ad_write (devc, 9, ad_read (devc, 9) | 0x08); */ + + /* + * If mode == 2 (CS4231), set I28 also. It's the capture format + * register. + */ + if (devc->mode != MD_1848) { + ad_write(devc, 28, fs); + + /* + * Write to I28 starts resyncronization. Wait until it + * completes. + */ + AD_WAIT_INIT(10000); + } - /* - * Write to I28 starts resyncronization. Wait until it completes. - */ - timeout = 10000; - while (timeout > 0 && (INB (devc->base) & 0x80) == 0x80) - timeout--; + ad_leave_MCE(devc); /* Starts the calibration process. */ + /* amancio */ + splx(flags); + devc->xfer_count = 0; +#ifdef CONFIG_SEQUENCER + if (dev == timer_installed && devc->timer_running) + if ((fs & 0x01) != (old_fs & 0x01)) { + ad1848_tmr_reprogram(dev); + } #endif - - ad_leave_MCE (devc); /* - * Starts the calibration process and - * enters playback mode after it. - */ - RESTORE_INTR (flags); - devc->xfer_count = 0; - return 0; + return 0; } static void -ad1848_reset (int dev) +ad1848_reset(int dev) { - ad1848_halt (dev); + ad1848_halt(dev); } static void -ad1848_halt (int dev) +ad1848_halt(int dev) { - ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + u_long flags; + int timeout; + flags = splhigh(); + + ad_mute(devc); + ad_enter_MCE(devc); + ad_write(devc, 9, ad_read(devc, 9) & ~0x03); /* Stop DMA */ + ad_write(devc, 9, ad_read(devc, 9) | 0x8); + + ad_write(devc, 9, ad_read(devc, 9) & ~0x03); /* Stop DMA */ + /* + * ad_write (devc, 15, 0); Clear DMA counter ad_write (devc, + * 14, 0); Clear DMA counter + */ + + if (devc->mode != MD_1848) { + ad_write(devc, 30, 0); /* Clear DMA counter */ + ad_write(devc, 31, 0); /* Clear DMA counter */ + } + for (timeout = 0; timeout < 1000 && !(inb(io_Status(devc)) & 0x80); + timeout++); /* Wait for interrupt */ - ad_mute (devc); -#ifdef PC98 - ad_enter_MCE (devc); -#endif - ad_write (devc, 9, ad_read (devc, 9) & ~0x03); /* Stop DMA */ -#ifdef PC98 - ad_leave_MCE (devc); -#endif - OUTB (0, io_Status (devc)); /* Clear interrupt status */ + ad_write(devc, 9, ad_read(devc, 9) & ~0x03); /* Stop DMA */ + outb(io_Status(devc), 0); /* Clear interrupt status */ + outb(io_Status(devc), 0); /* Clear interrupt status */ + devc->irq_mode = 0; + ad_leave_MCE(devc); - ad_enter_MCE (devc); - OUTB (0, io_Status (devc)); /* Clear interrupt status */ - ad_write (devc, 15, 0); /* Clear DMA counter */ - ad_write (devc, 14, 0); /* Clear DMA counter */ + /* DMAbuf_reset_dma (dev); */ + splx(flags); +} - if (devc->mode == 2) - { - ad_write (devc, 30, 0); /* Clear DMA counter */ - ad_write (devc, 31, 0); /* Clear DMA counter */ +static void +ad1848_halt_input(int dev) +{ + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + u_long flags; + u_char playing; + if (devc->mode == MD_1848) { + ad1848_halt(dev); + return; } + playing = ad_read(devc, 9); + if (!(playing & 0x2)) + return; - ad_write (devc, 9, ad_read (devc, 9) & ~0x03); /* Stop DMA */ + flags = splhigh(); - OUTB (0, io_Status (devc)); /* Clear interrupt status */ - OUTB (0, io_Status (devc)); /* Clear interrupt status */ - ad_leave_MCE (devc); + ad_mute(devc); + ad_write(devc, 9, playing & ~0x02); /* Stop capture */ - DMAbuf_reset_dma (dev); -} + outb(io_Status(devc), 0); /* Clear interrupt status */ + outb(io_Status(devc), 0); /* Clear interrupt status */ -int -ad1848_detect (int io_base) -{ + devc->irq_mode &= ~PCM_ENABLE_INPUT; - unsigned char tmp; - int i; - ad1848_info *devc = &dev_info[nr_ad1848_devs]; - unsigned char tmp1 = 0xff, tmp2 = 0xff; + splx(flags); +} - if (nr_ad1848_devs >= MAX_AUDIO_DEV) - { - AUDIO_DDB (printk ("ad1848 detect error - step 0\n")); - return 0; +static void +ad1848_halt_output(int dev) +{ + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + u_long flags; + u_char playing; + + playing = ad_read(devc, 9); + if (!(playing & 0x1)) { + devc->irq_mode &= ~PCM_ENABLE_OUTPUT; + return; + } + /* IwaveStopDma(PLAYBACK); */ + if (devc->mode == MD_1848) { + ad1848_halt(dev); + return; } + flags = splhigh(); + /* ad_mute (devc); */ - devc->base = io_base; - devc->MCE_bit = 0x40; - devc->irq = 0; - devc->dma_capture = 0; - devc->dma_playback = 0; - devc->opened = 0; - devc->chip_name = "AD1848"; - devc->mode = 1; /* MODE1 = original AD1848 */ + ad_write(devc, 9, playing & ~0x1); + outb(io_Status(devc), 0); /* Clear interrupt status */ + /* + * ad_write (devc, 15,0); ad_write (devc, 14,0); + */ + devc->irq_mode &= ~PCM_ENABLE_OUTPUT; - /* - * Check that the I/O address is in use. - * - * The bit 0x80 of the base I/O port is known to be 0 after the - * chip has performed it's power on initialization. Just assume - * this has happened before the OS is starting. - * - * If the I/O address is unused, it typically returns 0xff. - */ + splx(flags); +} - if ((INB (devc->base) & 0x80) != 0x00) /* Not a AD1884 */ - { - AUDIO_DDB (printk ("ad1848 detect error - step A\n")); - return 0; +static void +ad1848_trigger(int dev, int state) +{ + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + u_long flags; + u_char tmp; + + flags = splhigh(); + state &= devc->irq_mode; + + tmp = ad_read(devc, 9) & ~0x03; + if (state & PCM_ENABLE_INPUT) + tmp |= 0x02; + if (state & PCM_ENABLE_OUTPUT) { + tmp |= 0x01; } + ad_write(devc, 9, tmp); - /* - * Test if it's possible to change contents of the indirect registers. - * Registers 0 and 1 are ADC volume registers. The bit 0x10 is read only - * so try to avoid using it. - */ + splx(flags); +} - ad_write (devc, 0, 0xaa); - ad_write (devc, 1, 0x45); /* 0x55 with bit 0x10 clear */ - if ((tmp1 = ad_read (devc, 0)) != 0xaa || (tmp2 = ad_read (devc, 1)) != 0x45) - { - AUDIO_DDB (printk ("ad1848 detect error - step B (%x/%x)\n", tmp1, tmp2)); - return 0; +int +ad1848_detect(int io_base, int *ad_flags, sound_os_info * osp) +{ + static int last_probe_addr=0, last_result=0; /* to avoid multiple probes*/ + int i; + ad1848_info *devc = &dev_info[nr_ad1848_devs]; + u_char tmp, tmp1, tmp2 ; + + DDB(printf("ad1848_detect(%x)\n", io_base)); + if (io_base == last_probe_addr) + return last_result; + else { + last_result = 0; /* default value for detect */ + last_probe_addr = io_base ; } - ad_write (devc, 0, 0x45); - ad_write (devc, 1, 0xaa); + if (ad_flags) + *ad_flags = 0; - if ((tmp1 = ad_read (devc, 0)) != 0x45 || (tmp2 = ad_read (devc, 1)) != 0xaa) - { - AUDIO_DDB (printk ("ad1848 detect error - step C (%x/%x)\n", tmp1, tmp2)); - return 0; + if (nr_ad1848_devs >= MAX_AUDIO_DEV) { + DDB(printf("ad1848 detect error - step 0\n")); + return 0 ; } + devc->base = io_base; + devc->irq_ok = 0; + devc->timer_running = 0; + devc->MCE_bit = 0x40; + devc->irq = 0; + devc->opened = 0; + devc->chip_name = "AD1848"; + devc->mode = MD_1848; /* AD1848 or CS4248 */ + devc->osp = osp; + + /* + * Check that the I/O address is in use. + * + * The bit 0x80 of the base I/O port is known to be 0 after the chip has + * performed it's power on initialization. Just assume this has + * happened before the OS is starting. + * + * If the I/O address is unused, it typically returns 0xff. + */ - /* - * The indirect register I12 has some read only bits. Lets - * try to change them. - */ - - tmp = ad_read (devc, 12); - ad_write (devc, 12, (~tmp) & 0x0f); + DDB(printf("ad1848_detect() - step A\n")); - if ((tmp & 0x0f) != ((tmp1 = ad_read (devc, 12)) & 0x0f)) - { - AUDIO_DDB (printk ("ad1848 detect error - step D (%x)\n", tmp1)); - return 0; + if ((inb(devc->base) & 0x80) != 0x00) { /* Not a AD1848 */ + DDB(printf("ad1848 detect error - step A," + " inb(base) = 0x%02x, want 0XXX.XXXX\n", + inb(devc->base))); + return 0; } + /* + * Test if it's possible to change contents of the indirect + * registers. Registers 0 and 1 are ADC volume registers. The bit + * 0x10 is read only so try to avoid using it. + */ + + DDB(printf("ad1848_detect() - step B, test indirect register\n")); + + ad_write(devc, 0, 0xaa); + ad_write(devc, 1, 0x45);/* 0x55 with bit 0x10 clear */ + tmp1 = ad_read(devc, 0) ; + tmp2 = ad_read(devc, 1) ; + if ( tmp1 != 0xaa || tmp2 != 0x45) { + DDB(printf("ad1848 detect error - step B (0x%02x/0x%02x) want 0xaa/0x45\n", tmp1, tmp2)); + return 0; + } + DDB(printf("ad1848_detect() - step C\n")); + ad_write(devc, 0, 0x45); + ad_write(devc, 1, 0xaa); + tmp1 = ad_read(devc, 0) ; + tmp2 = ad_read(devc, 1) ; - /* - * NOTE! Last 4 bits of the reg I12 tell the chip revision. - * 0x01=RevB and 0x0A=RevC. - */ + if (tmp1 != 0x45 || tmp2 != 0xaa) { + DDB(printf("ad1848 detect error - step C (%x/%x)\n", tmp1, tmp2)); - /* - * The original AD1848/CS4248 has just 15 indirect registers. This means - * that I0 and I16 should return the same value (etc.). - * Ensure that the Mode2 enable bit of I12 is 0. Otherwise this test fails - * with CS4231. - */ + return 0; + } + /* + * The indirect register I12 has some read only bits. Lets try to + * change them. + */ + + DDB(printf("ad1848_detect() - step D, last 4 bits of I12 readonly\n")); + tmp = ad_read(devc, 12); + ad_write(devc, 12, (~tmp) & 0x0f); + tmp1 = ad_read(devc, 12); + + if ((tmp & 0x0f) != (tmp1 & 0x0f)) { + DDB(printf("ad1848 detect error - step D, I12 (0x%02x was 0x%02x)\n", + tmp1, tmp)); + return 0; + } - ad_write (devc, 12, 0); /* Mode2=disabled */ + /* + * NOTE! Last 4 bits of the reg I12 tell the chip revision. + * 0x01=RevB + * 0x0A=RevC. also CS4231/CS4231A and OPTi931 + */ - for (i = 0; i < 16; i++) - if ((tmp1 = ad_read (devc, i)) != (tmp2 = ad_read (devc, i + 16))) - { - AUDIO_DDB (printk ("ad1848 detect error - step F(%d/%x/%x)\n", i, tmp1, tmp2)); - return 0; - } - /* - * Try to switch the chip to mode2 (CS4231) by setting the MODE2 bit (0x40). - * The bit 0x80 is always 1 in CS4248 and CS4231. - */ + /* + * The original AD1848/CS4248 has just 15 indirect registers. This + * means that I0 and I16 should return the same value (etc.). Ensure + * that the Mode2 enable bit of I12 is 0. Otherwise this test fails + * with CS4231. + */ + + DDB(printf("ad1848_detect() - step F\n")); + ad_write(devc, 12, 0); /* Mode2=disabled */ + + for (i = 0; i < 16; i++) + if ((tmp1 = ad_read(devc, i)) != (tmp2 = ad_read(devc, i + 16))) { + DDB(printf("ad1848 detect warning - step F(I%d/0x%02x/0x%02x)\n", + i, tmp1, tmp2)); + /* + * note - this seems to fail on the 4232 on I11. So we just break + * rather than fail. + */ + break ; /* return 0; */ + } + /* + * Try to switch the chip to mode2 (CS4231) by setting the MODE2 bit + * (0x40). The bit 0x80 is always 1 in CS4248 and CS4231. + * + * On the OPTi931, however, I12 is readonly and only contains the + * chip revision ID (as in the CS4231A). The upper bits return 0. + */ - ad_write (devc, 12, 0x40); /* Set mode2, clear 0x80 */ + DDB(printf("ad1848_detect() - step G\n")); + ad_write(devc, 12, 0x40); /* Set mode2, clear 0x80 */ - tmp1 = ad_read (devc, 12); - if (tmp1 & 0x80) - devc->chip_name = "CS4248"; /* Our best knowledge just now */ + tmp1 = ad_read(devc, 12); + if (tmp1 & 0x80) { + if (ad_flags) + *ad_flags |= AD_F_CS4248; - if ((tmp1 & 0xc0) == (0x80 | 0x40)) - { - /* - * CS4231 detected - is it? - * - * Verify that setting I0 doesn't change I16. - */ - ad_write (devc, 16, 0); /* Set I16 to known value */ - - ad_write (devc, 0, 0x45); - if ((tmp1 = ad_read (devc, 16)) != 0x45) /* No change -> CS4231? */ - { - - ad_write (devc, 0, 0xaa); - if ((tmp1 = ad_read (devc, 16)) == 0xaa) /* Rotten bits? */ - { - AUDIO_DDB (printk ("ad1848 detect error - step H(%x)\n", tmp1)); - return 0; + devc->chip_name = "CS4248"; /* Our best knowledge just now */ + } + if ((tmp1 & 0xf0) == 0x00) { + printf("this should be an OPTi931\n"); + } else if ((tmp1 & 0xc0) == 0xC0) { + /* + * The 4231 has bit7=1 always, and bit6 we just set to 1. + * We want to check that this is really a CS4231 + * Verify that setting I0 doesn't change I16. + */ + DDB(printf("ad1848_detect() - step H\n")); + ad_write(devc, 16, 0); /* Set I16 to known value */ + + ad_write(devc, 0, 0x45); + if ((tmp1 = ad_read(devc, 16)) != 0x45) { /* No change -> CS4231? */ + + ad_write(devc, 0, 0xaa); + if ((tmp1 = ad_read(devc, 16)) == 0xaa) { /* Rotten bits? */ + DDB(printf("ad1848 detect error - step H(%x)\n", tmp1)); + return 0; } - - /* + /* * Verify that some bits of I25 are read only. - */ - - tmp1 = ad_read (devc, 25); /* Original bits */ - ad_write (devc, 25, ~tmp1); /* Invert all bits */ - if ((ad_read (devc, 25) & 0xe7) == (tmp1 & 0xe7)) - { - /* - * It's a CS4231 - */ - devc->chip_name = "CS4231"; - - -#ifdef MOZART_PORT - if (devc->base != MOZART_PORT) -#endif - devc->mode = 2; - - + */ + + DDB(printf("ad1848_detect() - step I\n")); + tmp1 = ad_read(devc, 25); /* Original bits */ + ad_write(devc, 25, ~tmp1); /* Invert all bits */ + if ((ad_read(devc, 25) & 0xe7) == (tmp1 & 0xe7)) { + int id; + + /* + * It's at least CS4231 + */ + devc->chip_name = "CS4231"; + devc->mode = MD_4231; + + /* + * It could be an AD1845 or CS4231A as well. + * CS4231 and AD1845 report the same revision info in I25 + * while the CS4231A reports different. + */ + + DDB(printf("ad1848_detect() - step I\n")); + id = ad_read(devc, 25) & 0xe7; + /* + * b7-b5 = version number; + * 100 : all CS4231 + * 101 : CS4231A + * + * b2-b0 = chip id; + */ + switch (id) { + + case 0xa0: + devc->chip_name = "CS4231A"; + devc->mode = MD_4231A; + break; + + case 0xa2: + devc->chip_name = "CS4232"; + devc->mode = MD_4231A; + break; + + case 0xb2: + /* strange: the 4231 data sheet says b4-b3 are XX + * so this should be the same as 0xa2 + */ + devc->chip_name = "CS4232A"; + devc->mode = MD_4231A; + break; + + case 0x80: + /* + * It must be a CS4231 or AD1845. The register I23 + * of CS4231 is undefined and it appears to be read + * only. AD1845 uses I23 for setting sample rate. + * Assume the chip is AD1845 if I23 is changeable. + */ + + tmp = ad_read(devc, 23); + + ad_write(devc, 23, ~tmp); + if (ad_read(devc, 23) != tmp) { /* AD1845 ? */ + devc->chip_name = "AD1845"; + devc->mode = MD_1845; + } + ad_write(devc, 23, tmp); /* Restore */ + break; + + case 0x83: /* CS4236 */ + default: /* Assume CS4231 */ + printf("unknown id 0x%02x, assuming CS4231\n", id); + devc->mode = MD_4231; + + } } - ad_write (devc, 25, tmp1); /* Restore bits */ + ad_write(devc, 25, tmp1); /* Restore bits */ + + DDB(printf("ad1848_detect() - step K\n")); } } + DDB(printf("ad1848_detect() - step L\n")); - return 1; + if (ad_flags) { + if (devc->mode != MD_1848) + *ad_flags |= AD_F_CS4231; + } + DDB(printf("ad1848_detect() - Detected OK\n")); + return (last_result = 1); } void -ad1848_init (char *name, int io_base, int irq, int dma_playback, int dma_capture) +ad1848_init(char *name, int io_base, int irq, + int dma_playback, int dma_capture, int share_dma, sound_os_info * osp) { - /* - * NOTE! If irq < 0, there is another driver which has allocated the IRQ - * so that this driver doesn't need to allocate/deallocate it. - * The actually used IRQ is ABS(irq). - */ - /* + /* + * NOTE! If irq < 0, there is another driver which has allocated the + * IRQ so that this driver doesn't need to allocate/deallocate it. + * The actually used IRQ is ABS(irq). + */ + + /* * Initial values for the indirect registers of CS4248/AD1848. - */ - static int init_values[] = - { - 0xa8, 0xa8, 0x08, 0x08, 0x08, 0x08, 0x80, 0x80, - 0x00, 0x08, 0x02, 0x00, 0x8a, 0x01, 0x00, 0x00, - - /* Positions 16 to 31 just for CS4231 */ - 0x80, 0x00, 0x10, 0x10, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 - }; - int i, my_dev; - ad1848_info *devc = &dev_info[nr_ad1848_devs]; - - if (!ad1848_detect (io_base)) - return; - - devc->irq = (irq > 0) ? irq : 0; - devc->dma_capture = dma_playback; - devc->dma_playback = dma_capture; - devc->opened = 0; - - if (nr_ad1848_devs != 0) - { - memcpy ((char *) &ad1848_pcm_operations[nr_ad1848_devs], - (char *) &ad1848_pcm_operations[0], - sizeof (struct audio_operations)); + */ + static int init_values[] = { + 0xa8, /* MIXOUTL: src:mic, +20dB, gain +12dB */ + 0xa8, /* MIXOUTR: src:mic, +20dB, gain +12dB */ + 0x08, /* CDL Input: mute, +6dB */ + 0x08, /* CDR Input: mute, +6dB */ + 0x08, /* FML Input: mute, +6dB */ + 0x08, /* FMR Input: mute, +6dB */ + 0x80, /* DAC-L Input: enable, 0dB */ + 0x80, /* DAC-R Input: enable, 0dB */ + /* 0xa8, 0xa8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, */ + 0x00, /* 8bit, lin, uns, mono, 8KHz */ + 0x0c, /* dma-cap, dma-pb, autocal, single dma, disable cap/pb */ + 0x02, /* int enable */ + 0x00, /* clear error status */ + 0x8a, /* rev. id (low bytes readonly) */ + 0x00, + 0x00, /* playback upper base count */ + 0x00, /* playback lower base count */ + + /* Positions 16 to 31 just for CS4231 and newer devices */ + /* I16-I17: alt. feature enable on the 4231, but AUXL Input + * on the OPTi931 (where the features are set elsewhere + */ + 0x81, 0x00, 0x10, 0x10, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 + }; + int i, my_dev; + + ad1848_info *devc = &dev_info[nr_ad1848_devs]; + + if (!ad1848_detect(io_base, NULL, osp)) + return; + + devc->irq = (irq > 0) ? irq : 0; + devc->opened = 0; + devc->timer_ticks = 0; + devc->osp = osp; + + if (nr_ad1848_devs != 0) { + bcopy((char *) &ad1848_pcm_operations[0], + (char *) &ad1848_pcm_operations[nr_ad1848_devs], + sizeof(struct audio_operations)); } + for (i = 0; i < 16; i++) + ad_write(devc, i, init_values[i]); + + ad_mute(devc); /* Initialize some variables */ + ad_unmute(devc); /* Leave it unmuted now */ + + if (devc->mode > MD_1848) { + if (dma_capture == dma_playback || + dma_capture == -1 || dma_playback == -1) { + ad_write(devc, 9, ad_read(devc, 9) | 0x04); /* Single DMA mode */ + ad1848_pcm_operations[nr_ad1848_devs].flags &= ~DMA_DUPLEX; + } else { + ad_write(devc, 9, ad_read(devc, 9) & ~0x04); /* Dual DMA mode */ + ad1848_pcm_operations[nr_ad1848_devs].flags |= DMA_DUPLEX; + } - for (i = 0; i < 16; i++) - ad_write (devc, i, init_values[i]); + ad_write(devc, 12, ad_read(devc, 12) | 0x40); /* Mode2 = enabled */ + for (i = 16; i < 32; i++) + ad_write(devc, i, init_values[i]); - ad_mute (devc); + if (devc->mode == MD_4231A) { + /* Enable full * calibration */ + ad_write(devc, 9, init_values[9] | 0x18); + } - if (devc->mode == 2) - { - ad_write (devc, 12, ad_read (devc, 12) | 0x40); /* Mode2 = enabled */ - for (i = 16; i < 32; i++) - ad_write (devc, i, init_values[i]); + if (devc->mode == MD_1845) { + /* Alternate freq select enabled */ + ad_write(devc, 27, init_values[27] | 0x08); + } + } else { + ad1848_pcm_operations[nr_ad1848_devs].flags &= ~DMA_DUPLEX; + ad_write(devc, 9, ad_read(devc, 9) | 0x04); /* Single DMA mode */ } - OUTB (0, io_Status (devc)); /* Clear pending interrupts */ + outb(io_Status(devc), 0); /* Clear pending interrupts */ + + if (name != NULL && name[0] != 0) + sprintf(ad1848_pcm_operations[nr_ad1848_devs].name, + "%s (%s)", name, devc->chip_name); + else + sprintf(ad1848_pcm_operations[nr_ad1848_devs].name, + "Generic audio codec (%s)", devc->chip_name); + + conf_printf2(ad1848_pcm_operations[nr_ad1848_devs].name, + devc->base, devc->irq, dma_playback, dma_capture); + + + /* ad1848_pcm_operations[nr_ad1848_devs].flags |= DMA_AUTOMODE ; */ + + if (num_audiodevs < MAX_AUDIO_DEV) { + audio_devs[my_dev = num_audiodevs++] = + &ad1848_pcm_operations[nr_ad1848_devs]; + if (irq > 0) { + audio_devs[my_dev]->devc = devc; + irq2dev[irq] = my_dev; + if (snd_set_irq_handler(devc->irq, ad1848_interrupt, devc->osp)<0) { + printf("ad1848: IRQ in use\n"); + } +#ifdef NO_IRQ_TEST + if (devc->mode != MD_1848) { + int x; + u_char tmp = ad_read(devc, 16); + + devc->timer_ticks = 0; + + ad_write(devc, 21, 0x00); /* Timer msb */ + ad_write(devc, 20, 0x10); /* Timer lsb */ - if (name[0] != 0) - sprintf (ad1848_pcm_operations[nr_ad1848_devs].name, - "%s (%s)", name, devc->chip_name); - else - sprintf (ad1848_pcm_operations[nr_ad1848_devs].name, - "Generic audio codec (%s)", devc->chip_name); + ad_write(devc, 16, tmp | 0x40); /* Enable timer */ + for (x = 0; x < 100000 && devc->timer_ticks == 0; x++); + ad_write(devc, 16, tmp & ~0x40); /* Disable timer */ -#if defined(__FreeBSD__) - if (strcmp(name, "MS Sound System")) /* *sigh* */ - printk ("\ngus0: <%s>", ad1848_pcm_operations[nr_ad1848_devs].name); - else - printk ("mss0: <%s>", ad1848_pcm_operations[nr_ad1848_devs].name); + if (devc->timer_ticks == 0) + printf("[IRQ conflict???]"); + else + devc->irq_ok = 1; + + } else + devc->irq_ok = 1; /* Couldn't test. assume it's OK */ #else - printk (" <%s>", ad1848_pcm_operations[nr_ad1848_devs].name); + devc->irq_ok = 1; +#endif + } else if (irq < 0) + irq2dev[-irq] = devc->dev_no = my_dev; + + audio_devs[my_dev]->otherside = -1 ; + audio_devs[my_dev]->flags = DMA_AUTOMODE | DMA_DUPLEX; + audio_devs[my_dev]->dmachan1 = dma_playback; + audio_devs[my_dev]->dmachan2 = dma_capture; + audio_devs[my_dev]->buffsize = DSP_BUFFSIZE; + audio_devs[my_dev]->devc = devc; + audio_devs[my_dev]->format_mask = ad_format_mask[devc->mode]; + nr_ad1848_devs++; + +#ifdef CONFIG_SEQUENCER + if (devc->mode != MD_1848 && devc->irq_ok) + ad1848_tmr_install(my_dev); #endif - if (num_audiodevs < MAX_AUDIO_DEV) - { - audio_devs[my_dev = num_audiodevs++] = &ad1848_pcm_operations[nr_ad1848_devs]; - if (irq > 0) - irq2dev[irq] = my_dev; - else if (irq < 0) - irq2dev[-irq] = my_dev; - - audio_devs[my_dev]->dmachan = dma_playback; - audio_devs[my_dev]->buffcount = 1; - audio_devs[my_dev]->buffsize = DSP_BUFFSIZE; - audio_devs[my_dev]->devc = devc; - audio_devs[my_dev]->format_mask = ad_format_mask[devc->mode]; - nr_ad1848_devs++; - - /* - * Toggle the MCE bit. It completes the initialization phase. - */ - - ad_enter_MCE (devc); /* In case the bit was off */ - ad_leave_MCE (devc); - - if (num_mixers < MAX_MIXER_DEV) - { - mixer2codec[num_mixers] = my_dev + 1; - audio_devs[my_dev]->mixer_dev = num_mixers; - mixer_devs[num_mixers++] = &ad1848_mixer_operations; - ad1848_mixer_reset (devc); + /* + * Toggle the MCE bit. It completes the initialization phase. + */ + + ad_enter_MCE(devc); /* In case the bit was off */ + ad_leave_MCE(devc); + + if (num_mixers < MAX_MIXER_DEV) { + mixer2codec[num_mixers] = my_dev + 1; + audio_devs[my_dev]->mixer_dev = num_mixers; + mixer_devs[num_mixers++] = &ad1848_mixer_operations; + ad1848_mixer_reset(devc); } - } - else - printk ("AD1848: Too many PCM devices available\n"); + } else + printf("AD1848: Too many PCM devices available\n"); } void -ad1848_interrupt (INT_HANDLER_PARMS (irq, dummy)) +ad1848_interrupt(int irq) { - unsigned char status; - ad1848_info *devc; - int dev; + u_char status; + ad1848_info *devc; + int dev; + + if (irq < 0 || irq > 15) + dev = -1; + else + dev = irq2dev[irq]; + + if (dev < 0 || dev >= num_audiodevs) { + for (irq = 0; irq < 17; irq++) + if (irq2dev[irq] != -1) + break; + + if (irq > 15) { + printf("ad1848.c: Bogus interrupt %d\n", irq); + return; + } + dev = irq2dev[irq]; + } + devc = (ad1848_info *) audio_devs[dev]->devc; + + status = inb(io_Status(devc)); + + if (status & 0x01) { /* we have an interrupt */ + int alt_stat = 0xff ; + + if (devc->mode != MD_1848) { + /* + * high-end devices have full-duplex dma and timer. + * the exact reason for the interrupt is in reg. I24. + * For old devices, we fake the interrupt bits, and + * determine the real reason basing on the device mode. + */ + alt_stat = ad_read(devc, 24); + if (alt_stat & 0x40) { /* Timer interrupt */ + devc->timer_ticks++; +#ifdef CONFIG_SEQUENCER + if (timer_installed == dev && devc->timer_running) + sound_timer_interrupt(); +#endif + } + } - if (irq < 0 || irq > 15) - return; /* Bogus irq */ - dev = irq2dev[irq]; - if (dev < 0 || dev >= num_audiodevs) - return; /* Bogus dev */ + outb(io_Status(devc), 0); /* Clear interrupt status */ - devc = (ad1848_info *) audio_devs[dev]->devc; - status = INB (io_Status (devc)); + if (audio_devs[dev]->busy) { - if (status == 0x80) - printk ("ad1848_interrupt: Why?\n"); + if (devc->irq_mode & PCM_ENABLE_OUTPUT && alt_stat & 0x10) + DMAbuf_outputintr(dev, 1); - if (status & 0x01) - { - if (devc->opened && devc->irq_mode == IMODE_OUTPUT) - { - DMAbuf_outputintr (dev, 1); + if (devc->irq_mode & PCM_ENABLE_INPUT && alt_stat & 0x20) + DMAbuf_inputintr(dev); } - - if (devc->opened && devc->irq_mode == IMODE_INPUT) - DMAbuf_inputintr (dev); } +} - OUTB (0, io_Status (devc)); /* Clear interrupt status */ +/* + * Some extra code for the MS Sound System + */ - status = INB (io_Status (devc)); - if (status == 0x80 || status & 0x01) - { - printk ("ad1848: Problems when clearing interrupt, status=%x\n", status); - OUTB (0, io_Status (devc)); /* Try again */ - } +#ifdef amancio +void +check_opl3(int base, struct address_info * hw_config) +{ + + if (!opl3_detect(base, hw_config->osp)) + return; + + opl3_init(0, base, hw_config->osp); } +#endif -#ifdef MOZART_PORT /* - * Experimental initialization sequence for Mozart soundcard - * (OAK OTI-601 sound chip). - * by Gregor Hoffleit <flight@mathi.uni-heidelberg.de> - * Some comments by Hannu Savolainen. + * this is the probe routine. Note, it is not necessary to + * go through this for PnP devices, since they are already + * indentified precisely using their PnP id. + * */ int -mozart_init (int io_base) +probe_mss(struct address_info * hw_config) { - int i; - unsigned char byte; - static int mozart_detected_here = 0; + u_char tmp; - /* - * Valid ports are 0x530 and 0xf40. The DOS based software doesn't allow - * other ports. The OTI-601 preliminary specification says that - * 0xe80 and 0x604 are also possible but it's safest to ignore them. - */ + DDB(printf("Entered probe_mss(io 0x%x, type %d)\n", + hw_config->io_base, hw_config->card_subtype)); - if ((io_base != 0x530) && (io_base != 0xf40)) - { - printk ("Mozart: invalid io_base(%x)\n", io_base); - return 0; + if (hw_config->card_subtype == 1) { /* Has no IRQ/DMA registers */ + /* check_opl3(0x388, hw_config); */ + goto probe_ms_end; } - if (mozart_detected_here == io_base) /* Already detected this card */ - return 1; - - if (mozart_detected_here != 0) - return 0; /* Don't allow detecting another Mozart card. */ +#if defined(CONFIG_AEDSP16) && defined(AEDSP16_MSS) + /* + * Initialize Audio Excel DSP 16 to MSS: before any operation we must + * enable MSS I/O ports. + */ + InitAEDSP16_MSS(hw_config); +#endif - /* - * The Mozart chip (OAK OTI-601) must be enabled before _each_ write - * by writing a secret password (0xE2) to the password register (0xf8f). - * Any I/O cycle after writing the password closes the gate and disbles - * further access. - */ + /* + * Check if the IO port returns valid signature. The original MS + * Sound system returns 0x04 while some cards (AudioTriX Pro for + * example) return 0x00 or 0x0f. + */ - if (INB (0xf88) != 0) /* Appears to return 0 while the gate is closed */ - { - AUDIO_DDB (printk ("No Mozart signature detected on port 0xf88\n")); - return 0; + if ((tmp = inb(hw_config->io_base + 3)) == 0xff) { /* Bus float */ + DDB(printf("I/O address inactive (%x), force type 1\n", tmp)); + hw_config->card_subtype = 1 ; + goto probe_ms_end; } - OUTB (0xe2, 0xf8f); /* A secret password which opens the gate */ - OUTB (0x10, 0xf91); /* Enable access to codec registers during SB mode */ - for (i = 0; i < 100; i++) /* Delay */ - tenmicrosec (); - OUTB (0xe2, 0xf8f); /* Sesam */ - byte = INB (0xf8d); /* Read MC1 (Mode control register) */ + if ((tmp & 0x3f) != 0x04 && + (tmp & 0x3f) != 0x0f && + (tmp & 0x3f) != 0x00) { + DDB(printf("No MSS signature detected on port 0x%x (0x%x)\n", + hw_config->io_base, inb(hw_config->io_base + 3))); + return 0; + } + if (hw_config->irq > 11) { + printf("MSS: Bad IRQ %d\n", hw_config->irq); + return 0; + } + if (hw_config->dma != 0 && hw_config->dma != 1 && hw_config->dma != 3) { + printf("MSS: Bad DMA %d\n", hw_config->dma); + return 0; + } + /* + * Check that DMA0 is not in use with a 8 bit board. + */ - /* Read the same register again but with gate closed at this time. */ - if (INB (0xf8d) == 0xff) /* Bus float. Should be 0 if Mozart present */ - { - AUDIO_DDB (printk ("Seems to be no Mozart chip set\n")); - return 0; + if (hw_config->dma == 0 && inb(hw_config->io_base + 3) & 0x80) { + printf("MSS: Can't use DMA0 with a 8 bit card/slot\n"); + return 0; + } + if (hw_config->irq > 7 && hw_config->irq != 9 && + inb(hw_config->io_base + 3) & 0x80) { + printf("MSS: Can't use IRQ%d with a 8 bit card/slot\n", hw_config->irq); + return 0; } - AUDIO_DDB (printk ("mozart_init: read 0x%x on 0xf8d\n", byte)); - byte = byte | 0x80; /* Switch to WSS mode (disables SB) */ - byte = byte & 0xcf; /* Clear sound base, disable CD, enable joystick */ - - if (io_base == 0xf40) - byte = byte | 0x20; - for (i = 0; i < 100; i++) - tenmicrosec (); - OUTB (0xe2, 0xf8f); /* Open the gate again */ - OUTB (byte, 0xf8d); /* Write the modified value back to MC1 */ - AUDIO_DDB (printk ("mozart_init: wrote 0x%x on 0xf8d\n", byte)); - OUTB (0xe2, 0xf8f); /* Here we come again */ - OUTB (0x20, 0xf91); /* Protect WSS shadow registers against write */ - - for (i = 0; i < 1000; i++) - tenmicrosec (); - - return 1; +probe_ms_end: + return ad1848_detect(hw_config->io_base + 4, NULL, hw_config->osp); } -#endif /* MOZART_PORT */ +void +attach_mss(struct address_info * hw_config) +{ -#ifdef OPTI_MAD16_PORT -#include <i386/isa/sound/mad16.h> +#if 0 + /* + * XXX do we really need to detect it again ? - lr970712 + */ + if (!ad1848_detect(hw_config->io_base + 4, NULL, hw_config->osp)) + return ; #endif + if (hw_config->card_subtype == 1) { /* Has no IRQ/DMA registers */ + ad1848_init("MS Sound System1", hw_config->io_base + 4, + hw_config->irq, + hw_config->dma, + hw_config->dma2, 0, hw_config->osp); + } else { + /* + * Set the IRQ and DMA addresses. + */ + static char interrupt_bits[12] = { + -1, -1, -1, -1, -1, -1, -1, 0x08, -1, 0x10, 0x18, 0x20 + }; + static char dma_bits[4] = { + 1, 2, 0, 3 + }; + + int config_port = hw_config->io_base + 0; + int version_port = hw_config->io_base + 3; + char bits = interrupt_bits[hw_config->irq]; + + if (bits == -1) + return ; + + outb(config_port, bits | 0x40); + if ((inb(version_port) & 0x40) == 0) + printf("[IRQ Conflict?]"); + + /* Write IRQ+DMA setup */ + outb(config_port, bits | dma_bits[hw_config->dma]); + + ad1848_init("MS Sound System0", hw_config->io_base + 4, + hw_config->irq, + hw_config->dma, + hw_config->dma, 0, hw_config->osp); + } + return ; +} + /* - * Some extra code for the MS Sound System + * WSS compatible PnP codec support. + * XXX I doubt it works now - lr970712 */ int -probe_ms_sound (struct address_info *hw_config) +probe_pnp_ad1848(struct address_info * hw_config) { -#if !defined(EXCLUDE_AEDSP16) && defined(AEDSP16_MSS) - /* - * Initialize Audio Excel DSP 16 to MSS: before any operation - * we must enable MSS I/O ports. - */ - - InitAEDSP16_MSS (hw_config); -#endif - - /* - * Check if the IO port returns valid signature. The original MS Sound - * system returns 0x04 while some cards (AudioTriX Pro for example) - * return 0x00. - */ - -#ifdef MOZART_PORT - if (hw_config->io_base == MOZART_PORT) - mozart_init (hw_config->io_base); -#endif - -#ifdef OPTI_MAD16_PORT - if (hw_config->io_base == OPTI_MAD16_PORT) - mad16init (hw_config->io_base); -#endif + return ad1848_detect(hw_config->io_base, NULL, hw_config->osp); +} - if ((INB (hw_config->io_base + 3) & 0x3f) != 0x04 && - (INB (hw_config->io_base + 3) & 0x3f) != 0x00) - { - AUDIO_DDB (printk ("No MSS signature detected on port 0x%x (0x%x)\n", - hw_config->io_base, INB (hw_config->io_base + 3))); - return 0; - } +void +attach_pnp_ad1848(struct address_info * hw_config) +{ -#ifdef PC98 - if (hw_config->irq > 12) -#else - if (hw_config->irq > 11) -#endif - { - printk ("MSS: Bad IRQ %d\n", hw_config->irq); - return 0; - } + ad1848_init(hw_config->name, hw_config->io_base, + hw_config->irq, + hw_config->dma, + hw_config->dma2, 0, hw_config->osp); +} - if (hw_config->dma != 0 && hw_config->dma != 1 && hw_config->dma != 3) - { - printk ("MSS: Bad DMA %d\n", hw_config->dma); - return 0; - } +#ifdef CONFIG_SEQUENCER +/* + * Timer stuff (for /dev/music). + */ - /* - * Check that DMA0 is not in use with a 8 bit board. - */ +static u_int current_interval = 0; - if (hw_config->dma == 0 && INB (hw_config->io_base + 3) & 0x80) - { - printk ("MSS: Can't use DMA0 with a 8 bit card/slot\n"); - return 0; - } +static u_int +ad1848_tmr_start(int dev, u_int usecs) +{ + u_long flags; + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; + u_long xtal_nsecs; /* nanoseconds per xtal oscillaror tick */ + u_long divider; + + flags = splhigh(); + + /* + * Length of the timer interval (in nanoseconds) depends on the + * selected crystal oscillator. Check this from bit 0x01 of I8. + * + * AD1845 has just one oscillator which has cycle time of 10.050 us + * (when a 24.576 MHz xtal oscillator is used). + * + * Convert requested interval to nanoseconds before computing the timer + * divider. + */ + + if (devc->mode == MD_1845) + xtal_nsecs = 10050; + else if (ad_read(devc, 8) & 0x01) + xtal_nsecs = 9920; + else + xtal_nsecs = 9969; + + divider = (usecs * 1000 + xtal_nsecs / 2) / xtal_nsecs; + + if (divider < 100) /* Don't allow shorter intervals than about 1ms */ + divider = 100; + + if (divider > 65535) /* Overflow check */ + divider = 65535; + + ad_write(devc, 21, (divider >> 8) & 0xff); /* Set upper bits */ + ad_write(devc, 20, divider & 0xff); /* Set lower bits */ + ad_write(devc, 16, ad_read(devc, 16) | 0x40); /* Start the timer */ + devc->timer_running = 1; + splx(flags); + + return current_interval = (divider * xtal_nsecs + 500) / 1000; +} - if (hw_config->irq > 7 && hw_config->irq != 9 && INB (hw_config->io_base + 3) & 0x80) - { - printk ("MSS: Can't use IRQ%d with a 8 bit card/slot\n", hw_config->irq); - return 0; - } +static void +ad1848_tmr_reprogram(int dev) +{ + /* + * Audio driver has changed sampling rate so that a different xtal + * oscillator was selected. We have to reprogram the timer rate. + */ - return ad1848_detect (hw_config->io_base + 4); + ad1848_tmr_start(dev, current_interval); + sound_timer_syncinterval(current_interval); } -long -attach_ms_sound (long mem_start, struct address_info *hw_config) +static void +ad1848_tmr_disable(int dev) { -#ifdef PC98 - static char interrupt_bits[13] = - { - -1, -1, -1, 0x08, -1, 0x10, -1, -1, -1, -1, 0x18, -1, 0x20 - }; -#else - static char interrupt_bits[12] = - { - -1, -1, -1, -1, -1, -1, -1, 0x08, -1, 0x10, 0x18, 0x20 - }; -#endif - char bits; + u_long flags; + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; - static char dma_bits[4] = - { - 1, 2, 0, 3 - }; + flags = splhigh(); + ad_write(devc, 16, ad_read(devc, 16) & ~0x40); + devc->timer_running = 0; + splx(flags); +} - int config_port = hw_config->io_base + 0, version_port = hw_config->io_base + 3; +static void +ad1848_tmr_restart(int dev) +{ + u_long flags; + ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc; - if (!ad1848_detect (hw_config->io_base + 4)) - return mem_start; + if (current_interval == 0) + return; - /* - * Set the IRQ and DMA addresses. - */ + flags = splhigh(); + ad_write(devc, 16, ad_read(devc, 16) | 0x40); + devc->timer_running = 1; + splx(flags); +} - bits = interrupt_bits[hw_config->irq]; - if (bits == -1) - return mem_start; +static struct sound_lowlev_timer ad1848_tmr = { + 0, + ad1848_tmr_start, + ad1848_tmr_disable, + ad1848_tmr_restart +}; - OUTB (bits | 0x40, config_port); - if ((INB (version_port) & 0x40) == 0) - printk ("[IRQ Conflict?]"); +static int +ad1848_tmr_install(int dev) +{ + if (timer_installed != -1) + return 0; /* Don't install another timer */ - OUTB (bits | dma_bits[hw_config->dma], config_port); /* Write IRQ+DMA setup */ + timer_installed = ad1848_tmr.dev = dev; + sound_timer_init(&ad1848_tmr, audio_devs[dev]->name); - ad1848_init ("MS Sound System", hw_config->io_base + 4, - hw_config->irq, - hw_config->dma, - hw_config->dma); - return mem_start; + return 1; } - +#endif #endif |
