d/freebsd-nq
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
1fa24a09c7
freebsd-nq/sys/i386/isa/sound/ad1848.c
Mark Murray 1fa24a09c7 Upgrade the sound sources to Amancio Hasty's latest-and-greatest. 
This is based on Voxware 3.5, and corresponds to Amancio's `guspnp21'.

Bug reports to Amancio, please!
1997-10-31 06:30:22 +00:00

1862 lines
46 KiB
C
Raw Blame History

/*
* 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.
*
* 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
* notice, this list of conditions and the following disclaimer. 2.
* 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
* DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
* ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
* SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
* CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* 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.
*/
#define DEB(x)
#define DEB1(x)
#include <i386/isa/sound/sound_config.h>
#if defined(CONFIG_AD1848)
#include <i386/isa/sound/ad1848_mixer.h>
#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 volatile char irq2dev[17] =
{-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1};
static int timer_installed = -1;
static int mute_flag = 0;
static char mixer2codec[MAX_MIXER_DEV] = {0};
static int ad_format_mask[MD_MAXMODE /* devc->mode */ ] =
{
/* 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];
#define io_Index_Addr(d) ((d)->base)
#define io_Indexed_Data(d) ((d)->base+1)
#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, 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);
/*
* 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)
{
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]);
}
}
}
static int
ad_read(ad1848_info * devc, int reg)
{
u_long flags;
int x;
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;
}
static void
ad_write(ad1848_info * devc, int reg, u_char data)
{
u_long flags;
AD_WAIT_INIT(90000);
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)
{
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.
*/
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)
{
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);
}
}
static void
ad_unmute(ad1848_info * devc)
{
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);
}
static void
ad_enter_MCE(ad1848_info * devc)
{
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)
{
u_long flags;
u_char prev;
AD_WAIT_INIT(1000);
flags = splhigh();
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 */
splx(flags);
return;
}
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)
{
u_char recdev;
int i, n;
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 */
if (mask & (1 << i))
n++;
if (n != 1)
mask = SOUND_MASK_MIC;
}
switch (mask) {
case SOUND_MASK_MIC:
recdev = 2;
break;
case SOUND_MASK_LINE:
case SOUND_MASK_LINE3:
recdev = 0;
break;
case SOUND_MASK_CD:
case SOUND_MASK_LINE1:
recdev = 1;
break;
case SOUND_MASK_IMIX:
recdev = 3;
break;
default:
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);
devc->recmask = mask;
return mask;
}
static void
change_bits(u_char *regval, int dev, int chn, int newval)
{
u_char mask;
int shift;
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 */
*regval &= ~(mask << shift); /* Clear bits */
*regval |= (newval & mask) << shift; /* Set new value */
}
static int
ad1848_mixer_get(ad1848_info * devc, int dev)
{
if (!((1 << dev) & devc->supported_devices))
return -(EINVAL);
return devc->levels[dev];
}
#define CLMICI 0x00781601
#define CRMICI 0x00791701
static int
ad1848_mixer_set(ad1848_info * devc, int dev, int value)
{
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;
if (mix_devices[dev][RIGHT_CHN].nbits == 0) /* Mono control */
right = left;
retvol = left | (left << 8);
/* Scale volumes */
left = mix_cvt[left];
right = mix_cvt[right];
/* Scale it again */
left = mix_cvt[left];
right = mix_cvt[right];
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
*/
/* 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)
{
int i;
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;
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, u_int cmd, ioctl_arg arg)
{
ad1848_info *devc;
int codec_dev = mixer2codec[dev];
if (!codec_dev)
return -(ENXIO);
codec_dev--;
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;
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 | 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
};
static int
ad1848_open(int dev, int mode)
{
ad1848_info *devc = NULL;
u_long flags;
int otherside = audio_devs[dev]->otherside;
if (dev < 0 || dev >= num_audiodevs)
return -(ENXIO);
if (otherside != -1) {
if (audio_devs[otherside]->busy)
return -(EBUSY);
}
if (audio_devs[dev]->busy)
return -(EBUSY);
devc = (ad1848_info *) audio_devs[dev]->devc;
flags = splhigh();
if (audio_devs[dev]->busy) {
splx(flags);
return -(EBUSY);
}
devc->dual_dma = 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)
{
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();
ad_mute(devc);
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;
ad1848_reset(dev);
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)
{
/*
* 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;
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;
}
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)
{
if (arg != 1 && arg != 2)
return devc->channels;
devc->channels = arg;
return arg;
}
static int
set_format(ad1848_info * devc, int arg)
{
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, u_int cmd, ioctl_arg arg, int local)
{
ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
switch (cmd) {
case SOUND_PCM_WRITE_RATE:
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 *(int *) arg = devc->speed;
case SNDCTL_DSP_STEREO:
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, (int) arg);
return *(int *) arg = set_channels(devc, (*(int *) arg));
case SOUND_PCM_READ_CHANNELS:
if (local)
return devc->channels;
return *(int *) arg = devc->channels;
case SNDCTL_DSP_SAMPLESIZE:
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 *(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 -(EINVAL);
}
static void
ad1848_output_block(int dev, u_long buf, int count, int intrflag, int dma_restart)
{
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;
}
if (devc->channels > 1)
cnt >>= 1;
cnt--;
if (mute_flag)
ad_unmute(devc);
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;
}
flags = splhigh();
if (dma_restart) {
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 |= PCM_ENABLE_OUTPUT;
devc->intr_active = 1;
splx(flags);
}
static void
ad1848_start_input(int dev, u_long buf, int count,
int intrflag, int dma_restart)
{
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;
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 */
}
flags = splhigh();
if (dma_restart) {
/* ad1848_halt (dev); */
DMAbuf_start_dma(dev, buf, count, 0);
}
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_write (devc, 9, ad_read (devc, 9) | 0x02); *//* Capture enable */
ad_unmute(devc);
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)
{
int timeout;
u_char fs, old_fs;
u_long flags;
ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
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 */
}
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);
}
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
return 0;
}
static void
ad1848_reset(int dev)
{
ad1848_halt(dev);
}
static void
ad1848_halt(int dev)
{
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_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);
/* DMAbuf_reset_dma (dev); */
splx(flags);
}
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;
flags = splhigh();
ad_mute(devc);
ad_write(devc, 9, playing & ~0x02); /* Stop capture */
outb(io_Status(devc), 0); /* Clear interrupt status */
outb(io_Status(devc), 0); /* Clear interrupt status */
devc->irq_mode &= ~PCM_ENABLE_INPUT;
splx(flags);
}
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); */
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;
splx(flags);
}
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);
splx(flags);
}
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 ;
}
if (ad_flags)
*ad_flags = 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.
*/
DDB(printf("ad1848_detect() - step A\n"));
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) ;
if (tmp1 != 0x45 || tmp2 != 0xaa) {
DDB(printf("ad1848 detect error - step C (%x/%x)\n", tmp1, tmp2));
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;
}
/*
* NOTE! Last 4 bits of the reg I12 tell the chip revision.
* 0x01=RevB
* 0x0A=RevC. also CS4231/CS4231A and OPTi931
*/
/*
* 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.
*/
DDB(printf("ad1848_detect() - step G\n"));
ad_write(devc, 12, 0x40); /* Set mode2, clear 0x80 */
tmp1 = ad_read(devc, 12);
if (tmp1 & 0x80) {
if (ad_flags)
*ad_flags |= AD_F_CS4248;
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.
*/
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 */
DDB(printf("ad1848_detect() - step K\n"));
}
}
DDB(printf("ad1848_detect() - step L\n"));
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, 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).
*/
/*
* Initial values for the indirect registers of CS4248/AD1848.
*/
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;
}
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_4231A) {
/* Enable full * calibration */
ad_write(devc, 9, init_values[9] | 0x18);
}
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(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 */
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 (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
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
/*
* 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
printf("AD1848: Too many PCM devices available\n");
}
void
ad1848_interrupt(int irq)
{
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
}
}
outb(io_Status(devc), 0); /* Clear interrupt status */
if (audio_devs[dev]->busy) {
if (devc->irq_mode & PCM_ENABLE_OUTPUT && alt_stat & 0x10)
DMAbuf_outputintr(dev, 1);
if (devc->irq_mode & PCM_ENABLE_INPUT && alt_stat & 0x20)
DMAbuf_inputintr(dev);
}
}
}
/*
* Some extra code for the MS Sound System
*/
#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
/*
* 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
probe_mss(struct address_info * hw_config)
{
u_char tmp;
DDB(printf("Entered probe_mss(io 0x%x, type %d)\n",
hw_config->io_base, hw_config->card_subtype));
if (hw_config->card_subtype == 1) { /* Has no IRQ/DMA registers */
/* check_opl3(0x388, hw_config); */
goto probe_ms_end;
}
#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
/*
* 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 ((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;
}
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.
*/
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;
}
probe_ms_end:
return ad1848_detect(hw_config->io_base + 4, NULL, hw_config->osp);
}
void
attach_mss(struct address_info * hw_config)
{
#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 ;
}
/*
* WSS compatible PnP codec support.
* XXX I doubt it works now - lr970712
*/
int
probe_pnp_ad1848(struct address_info * hw_config)
{
return ad1848_detect(hw_config->io_base, NULL, hw_config->osp);
}
void
attach_pnp_ad1848(struct address_info * hw_config)
{
ad1848_init(hw_config->name, hw_config->io_base,
hw_config->irq,
hw_config->dma,
hw_config->dma2, 0, hw_config->osp);
}
#ifdef CONFIG_SEQUENCER
/*
* Timer stuff (for /dev/music).
*/
static u_int current_interval = 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;
}
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.
*/
ad1848_tmr_start(dev, current_interval);
sound_timer_syncinterval(current_interval);
}
static void
ad1848_tmr_disable(int dev)
{
u_long flags;
ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
flags = splhigh();
ad_write(devc, 16, ad_read(devc, 16) & ~0x40);
devc->timer_running = 0;
splx(flags);
}
static void
ad1848_tmr_restart(int dev)
{
u_long flags;
ad1848_info *devc = (ad1848_info *) audio_devs[dev]->devc;
if (current_interval == 0)
return;
flags = splhigh();
ad_write(devc, 16, ad_read(devc, 16) | 0x40);
devc->timer_running = 1;
splx(flags);
}
static struct sound_lowlev_timer ad1848_tmr = {
0,
ad1848_tmr_start,
ad1848_tmr_disable,
ad1848_tmr_restart
};
static int
ad1848_tmr_install(int dev)
{
if (timer_installed != -1)
return 0; /* Don't install another timer */
timer_installed = ad1848_tmr.dev = dev;
sound_timer_init(&ad1848_tmr, audio_devs[dev]->name);
return 1;
}
#endif
#endif
Reference in New Issue View Git Blame Copy Permalink