574 lines
14 KiB
C
574 lines
14 KiB
C
/*
|
|
* sound/386bsd/soundcard.c
|
|
*
|
|
* Soundcard driver for FreeBSD.
|
|
*
|
|
* Copyright by Hannu Savolainen 1993
|
|
*
|
|
* 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.
|
|
*
|
|
* $Id: soundcard.c,v 1.38 1995/12/08 23:21:13 phk Exp $
|
|
*/
|
|
|
|
#include "sound_config.h"
|
|
#include <vm/vm.h>
|
|
#include <vm/vm_extern.h>
|
|
|
|
#ifdef CONFIGURE_SOUNDCARD
|
|
|
|
#include "dev_table.h"
|
|
#include <i386/isa/isa_device.h>
|
|
#include <sys/conf.h>
|
|
#include <sys/kernel.h>
|
|
#ifdef DEVFS
|
|
#include <sys/devfsext.h>
|
|
#endif /*DEVFS*/
|
|
|
|
|
|
u_int snd1_imask;
|
|
u_int snd2_imask;
|
|
u_int snd3_imask;
|
|
u_int snd4_imask;
|
|
u_int snd5_imask;
|
|
u_int snd6_imask;
|
|
u_int snd7_imask;
|
|
u_int snd8_imask;
|
|
u_int snd9_imask;
|
|
|
|
#define FIX_RETURN(ret) { \
|
|
int tmp_ret = (ret); \
|
|
if (tmp_ret<0) return -tmp_ret; else return 0; \
|
|
}
|
|
|
|
static int timer_running = 0;
|
|
|
|
static int soundcards_installed = 0; /* Number of installed
|
|
* soundcards */
|
|
static int soundcard_configured = 0;
|
|
|
|
static struct fileinfo files[SND_NDEVS];
|
|
static void * snd_devfs_token[SND_NDEVS];
|
|
static void * sndstat_devfs_token;
|
|
struct selinfo selinfo[SND_NDEVS >> 4];
|
|
|
|
int sndprobe (struct isa_device *dev);
|
|
int sndattach (struct isa_device *dev);
|
|
static void sound_mem_init(void);
|
|
|
|
static d_open_t sndopen;
|
|
static d_close_t sndclose;
|
|
static d_read_t sndread;
|
|
static d_write_t sndwrite;
|
|
static d_ioctl_t sndioctl;
|
|
static d_select_t sndselect;
|
|
|
|
#define CDEV_MAJOR 30
|
|
static struct cdevsw snd_cdevsw =
|
|
{ sndopen, sndclose, sndread, sndwrite, /*30*/
|
|
sndioctl, nostop, nullreset, nodevtotty,/* sound */
|
|
sndselect, nommap, NULL, "snd", NULL, -1 };
|
|
|
|
struct isa_driver opldriver = {sndprobe, sndattach, "opl"};
|
|
struct isa_driver sbdriver = {sndprobe, sndattach, "sb"};
|
|
struct isa_driver sbxvidriver = {sndprobe, sndattach, "sbxvi"};
|
|
struct isa_driver sbmididriver = {sndprobe, sndattach, "sbmidi"};
|
|
struct isa_driver pasdriver = {sndprobe, sndattach, "pas"};
|
|
struct isa_driver mpudriver = {sndprobe, sndattach, "mpu"};
|
|
struct isa_driver gusdriver = {sndprobe, sndattach, "gus"};
|
|
struct isa_driver gusxvidriver = {sndprobe, sndattach, "gusxvi"};
|
|
struct isa_driver gusmaxdriver = {sndprobe, sndattach, "gusmax"};
|
|
struct isa_driver uartdriver = {sndprobe, sndattach, "uart"};
|
|
struct isa_driver mssdriver = {sndprobe, sndattach, "mss"};
|
|
|
|
static unsigned short
|
|
ipri_to_irq (unsigned short ipri);
|
|
|
|
void
|
|
adintr(INT_HANDLER_PARMS(unit,dummy))
|
|
{
|
|
#ifndef EXCLUDE_AD1848
|
|
static short unit_to_irq[4] = { -1, -1, -1, -1 };
|
|
struct isa_device *dev;
|
|
|
|
if (unit_to_irq [unit] > 0)
|
|
ad1848_interrupt(INT_HANDLER_CALL (unit_to_irq [unit]));
|
|
else {
|
|
dev = find_isadev (isa_devtab_null, &mssdriver, unit);
|
|
if (!dev)
|
|
printk ("ad1848: Couldn't determine unit\n");
|
|
else {
|
|
unit_to_irq [unit] = ipri_to_irq (dev->id_irq);
|
|
ad1848_interrupt(INT_HANDLER_CALL (unit_to_irq [unit]));
|
|
}
|
|
}
|
|
#endif
|
|
}
|
|
|
|
unsigned
|
|
long
|
|
get_time(void)
|
|
{
|
|
struct timeval timecopy;
|
|
int x;
|
|
|
|
x = splclock();
|
|
timecopy = time;
|
|
splx(x);
|
|
return timecopy.tv_usec/(1000000/HZ) +
|
|
(unsigned long)timecopy.tv_sec*HZ;
|
|
}
|
|
|
|
|
|
static int
|
|
sndread (dev_t dev, struct uio *buf, int ioflag)
|
|
{
|
|
int count = buf->uio_resid;
|
|
|
|
dev = minor (dev);
|
|
|
|
FIX_RETURN (sound_read_sw (dev, &files[dev], buf, count));
|
|
}
|
|
|
|
static int
|
|
sndwrite (dev_t dev, struct uio *buf, int ioflag)
|
|
{
|
|
int count = buf->uio_resid;
|
|
|
|
dev = minor (dev);
|
|
|
|
FIX_RETURN (sound_write_sw (dev, &files[dev], buf, count));
|
|
}
|
|
|
|
static int
|
|
sndopen (dev_t dev, int flags, int fmt, struct proc *p)
|
|
{
|
|
int retval;
|
|
|
|
dev = minor (dev);
|
|
|
|
if (!soundcard_configured && dev)
|
|
{
|
|
printk ("SoundCard Error: The soundcard system has not been configured\n");
|
|
FIX_RETURN (-ENODEV);
|
|
}
|
|
|
|
files[dev].mode = 0;
|
|
|
|
if (flags & FREAD && flags & FWRITE)
|
|
files[dev].mode = OPEN_READWRITE;
|
|
else if (flags & FREAD)
|
|
files[dev].mode = OPEN_READ;
|
|
else if (flags & FWRITE)
|
|
files[dev].mode = OPEN_WRITE;
|
|
|
|
selinfo[dev >> 4].si_pid = 0;
|
|
selinfo[dev >> 4].si_flags = 0;
|
|
|
|
FIX_RETURN(sound_open_sw (dev, &files[dev]));
|
|
}
|
|
|
|
static int
|
|
sndclose (dev_t dev, int flags, int fmt, struct proc *p)
|
|
{
|
|
|
|
dev = minor (dev);
|
|
|
|
sound_release_sw(dev, &files[dev]);
|
|
FIX_RETURN (0);
|
|
}
|
|
|
|
static int
|
|
sndioctl (dev_t dev, int cmd, caddr_t arg, int flags, struct proc *p)
|
|
{
|
|
dev = minor (dev);
|
|
|
|
FIX_RETURN (sound_ioctl_sw (dev, &files[dev], cmd, (unsigned int) arg));
|
|
}
|
|
|
|
static int
|
|
sndselect (dev_t dev, int rw, struct proc *p)
|
|
{
|
|
dev = minor (dev);
|
|
|
|
DEB (printk ("snd_select(dev=%d, rw=%d, pid=%d)\n", dev, rw, p->p_pid));
|
|
#ifdef ALLOW_SELECT
|
|
switch (dev & 0x0f)
|
|
{
|
|
#ifndef EXCLUDE_SEQUENCER
|
|
case SND_DEV_SEQ:
|
|
case SND_DEV_SEQ2:
|
|
return sequencer_select (dev, &files[dev], rw, p);
|
|
break;
|
|
#endif
|
|
|
|
#ifndef EXCLUDE_MIDI
|
|
case SND_DEV_MIDIN:
|
|
return MIDIbuf_select (dev, &files[dev], rw, p);
|
|
break;
|
|
#endif
|
|
|
|
#ifndef EXCLUDE_AUDIO
|
|
case SND_DEV_DSP:
|
|
case SND_DEV_DSP16:
|
|
case SND_DEV_AUDIO:
|
|
return audio_select (dev, &files[dev], rw, p);
|
|
break;
|
|
#endif
|
|
|
|
default:
|
|
return 0;
|
|
}
|
|
|
|
#endif
|
|
|
|
return 0;
|
|
}
|
|
|
|
static unsigned short
|
|
ipri_to_irq (unsigned short ipri)
|
|
{
|
|
/*
|
|
* Converts the ipri (bitmask) to the corresponding irq number
|
|
*/
|
|
int irq;
|
|
|
|
for (irq = 0; irq < 16; irq++)
|
|
if (ipri == (1 << irq))
|
|
return irq;
|
|
|
|
return -1; /* Invalid argument */
|
|
}
|
|
|
|
static int
|
|
driver_to_voxunit(struct isa_driver *driver)
|
|
{
|
|
/* converts a sound driver pointer into the equivalent
|
|
VoxWare device unit number */
|
|
if(driver == &opldriver)
|
|
return(SNDCARD_ADLIB);
|
|
else if(driver == &sbdriver)
|
|
return(SNDCARD_SB);
|
|
else if(driver == &pasdriver)
|
|
return(SNDCARD_PAS);
|
|
else if(driver == &gusdriver)
|
|
return(SNDCARD_GUS);
|
|
else if(driver == &mpudriver)
|
|
return(SNDCARD_MPU401);
|
|
else if(driver == &sbxvidriver)
|
|
return(SNDCARD_SB16);
|
|
else if(driver == &sbmididriver)
|
|
return(SNDCARD_SB16MIDI);
|
|
else if(driver == &uartdriver)
|
|
return(SNDCARD_UART6850);
|
|
else if(driver == &gusdriver)
|
|
return(SNDCARD_GUS16);
|
|
else if(driver == &mssdriver)
|
|
return(SNDCARD_MSS);
|
|
else
|
|
return(0);
|
|
}
|
|
|
|
int
|
|
sndprobe (struct isa_device *dev)
|
|
{
|
|
struct address_info hw_config;
|
|
int unit;
|
|
|
|
unit = driver_to_voxunit(dev->id_driver);
|
|
hw_config.io_base = dev->id_iobase;
|
|
hw_config.irq = ipri_to_irq (dev->id_irq);
|
|
hw_config.dma = dev->id_drq;
|
|
hw_config.dma_read = dev->id_flags; /* misuse the flags field for read dma*/
|
|
|
|
if(unit)
|
|
return sndtable_probe (unit, &hw_config);
|
|
else
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
sndattach (struct isa_device *dev)
|
|
{
|
|
int i, unit;
|
|
static int midi_initialized = 0;
|
|
static int seq_initialized = 0;
|
|
static int generic_midi_initialized = 0;
|
|
unsigned long mem_start = 0xefffffffUL;
|
|
struct address_info hw_config;
|
|
char name[32];
|
|
|
|
unit = driver_to_voxunit(dev->id_driver);
|
|
hw_config.io_base = dev->id_iobase;
|
|
hw_config.irq = ipri_to_irq (dev->id_irq);
|
|
hw_config.dma = dev->id_drq;
|
|
hw_config.dma_read = dev->id_flags; /* misuse the flags field for read dma*/
|
|
|
|
if(!unit)
|
|
return FALSE;
|
|
if (!sndtable_init_card (unit, &hw_config))
|
|
{
|
|
printf (" <Driver not configured>");
|
|
return FALSE;
|
|
}
|
|
|
|
/*
|
|
* Init the high level sound driver
|
|
*/
|
|
|
|
if (!(soundcards_installed = sndtable_get_cardcount ()))
|
|
{
|
|
printf (" <No such hardware>");
|
|
return FALSE; /* No cards detected */
|
|
}
|
|
|
|
printf("\n");
|
|
|
|
#ifndef EXCLUDE_AUDIO
|
|
if (num_audiodevs) /* Audio devices present */
|
|
{
|
|
mem_start = DMAbuf_init (mem_start);
|
|
mem_start = audio_init (mem_start);
|
|
sound_mem_init ();
|
|
}
|
|
|
|
soundcard_configured = 1;
|
|
#endif
|
|
|
|
#ifndef EXCLUDE_MIDI
|
|
if (num_midis && !midi_initialized)
|
|
{
|
|
midi_initialized = 1;
|
|
mem_start = MIDIbuf_init (mem_start);
|
|
}
|
|
#endif
|
|
|
|
#ifndef EXCLUDE_SEQUENCER
|
|
if ((num_midis + num_synths) && !seq_initialized)
|
|
{
|
|
seq_initialized = 1;
|
|
mem_start = sequencer_init (mem_start);
|
|
}
|
|
#endif
|
|
|
|
#ifdef DEVFS
|
|
/* XXX */ /* find out where to store the tokens.. */
|
|
/* XXX */ /* should only create devices if that card has them */
|
|
#define SND_UID 0
|
|
#define SND_GID 13
|
|
|
|
|
|
sprintf(name,"mixer%d",unit);
|
|
snd_devfs_token[unit]=devfs_add_devsw(
|
|
"/", name, &snd_cdevsw, (unit << 4)+SND_DEV_CTL,
|
|
DV_CHR, SND_UID, SND_GID, 0660);
|
|
|
|
#ifndef EXCLUDE_SEQUENCER
|
|
sprintf(name,"sequencer%d",unit);
|
|
snd_devfs_token[unit]=devfs_add_devsw(
|
|
"/", name, &snd_cdevsw, (unit << 4)+SND_DEV_SEQ,
|
|
DV_CHR, SND_UID, SND_GID, 0660);
|
|
sprintf(name,"music%d",unit);
|
|
snd_devfs_token[unit]=devfs_add_devsw(
|
|
"/", name, &snd_cdevsw, (unit << 4)+SND_DEV_SEQ2,
|
|
DV_CHR, SND_UID, SND_GID, 0660);
|
|
#endif
|
|
|
|
#ifndef EXCLUDE_MIDI
|
|
sprintf(name,"midi%d",unit);
|
|
snd_devfs_token[unit]=devfs_add_devsw(
|
|
"/", name, &snd_cdevsw, (unit << 4)+SND_DEV_MIDIN,
|
|
DV_CHR, SND_UID, SND_GID, 0660);
|
|
#endif
|
|
|
|
#ifndef EXCLUDE_AUDIO
|
|
sprintf(name,"dsp%d",unit);
|
|
snd_devfs_token[unit]=devfs_add_devsw(
|
|
"/", name, &snd_cdevsw, (unit << 4)+SND_DEV_DSP,
|
|
DV_CHR, SND_UID, SND_GID, 0660);
|
|
sprintf(name,"audio%d",unit);
|
|
snd_devfs_token[unit]=devfs_add_devsw(
|
|
"/", name, &snd_cdevsw, (unit << 4)+SND_DEV_AUDIO,
|
|
DV_CHR, SND_UID, SND_GID, 0660);
|
|
sprintf(name,"dspW%d",unit);
|
|
snd_devfs_token[unit]=devfs_add_devsw(
|
|
"/", name, &snd_cdevsw, (unit << 4)+SND_DEV_DSP16,
|
|
DV_CHR, SND_UID, SND_GID, 0660);
|
|
#endif
|
|
|
|
sprintf(name,"pss%d",unit);
|
|
snd_devfs_token[unit]=devfs_add_devsw(
|
|
"/", name, &snd_cdevsw, (unit << 4)+SND_DEV_SNDPROC,
|
|
DV_CHR, SND_UID, SND_GID, 0660);
|
|
|
|
if ( ! sndstat_devfs_token) {
|
|
sndstat_devfs_token = devfs_add_devsw(
|
|
"/", "sndstat", &snd_cdevsw, 6,
|
|
DV_CHR, SND_UID, SND_GID, 0660);
|
|
}
|
|
#endif /* DEVFS */
|
|
return TRUE;
|
|
}
|
|
|
|
void
|
|
tenmicrosec (void)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < 16; i++)
|
|
inb (0x80);
|
|
}
|
|
|
|
#ifndef EXCLUDE_SEQUENCER
|
|
void
|
|
request_sound_timer (int count)
|
|
{
|
|
static int current = 0;
|
|
int tmp = count;
|
|
|
|
if (count < 0)
|
|
timeout ((timeout_func_t)sequencer_timer, 0, -count);
|
|
else
|
|
{
|
|
|
|
if (count < current)
|
|
current = 0; /* Timer restarted */
|
|
|
|
count = count - current;
|
|
|
|
current = tmp;
|
|
|
|
if (!count)
|
|
count = 1;
|
|
|
|
timeout ((timeout_func_t)sequencer_timer, 0, count);
|
|
}
|
|
timer_running = 1;
|
|
}
|
|
|
|
void
|
|
sound_stop_timer (void)
|
|
{
|
|
if (timer_running)
|
|
untimeout ((timeout_func_t)sequencer_timer, 0);
|
|
timer_running = 0;
|
|
}
|
|
#endif
|
|
|
|
#ifndef EXCLUDE_AUDIO
|
|
static void
|
|
sound_mem_init (void)
|
|
{
|
|
int i, dev;
|
|
unsigned long dma_pagesize;
|
|
struct dma_buffparms *dmap;
|
|
static unsigned long dsp_init_mask = 0;
|
|
|
|
for (dev = 0; dev < num_audiodevs; dev++) /* Enumerate devices */
|
|
if (!(dsp_init_mask & (1 << dev))) /* Not already done */
|
|
if (audio_devs[dev]->buffcount > 0 && audio_devs[dev]->dmachan > 0)
|
|
{
|
|
dsp_init_mask |= (1 << dev);
|
|
dmap = audio_devs[dev]->dmap;
|
|
|
|
if (audio_devs[dev]->flags & DMA_AUTOMODE)
|
|
audio_devs[dev]->buffcount = 1;
|
|
|
|
if (audio_devs[dev]->dmachan > 3 && audio_devs[dev]->buffsize > 65536)
|
|
dma_pagesize = 131072; /* 128k */
|
|
else
|
|
dma_pagesize = 65536;
|
|
|
|
/* More sanity checks */
|
|
|
|
if (audio_devs[dev]->buffsize > dma_pagesize)
|
|
audio_devs[dev]->buffsize = dma_pagesize;
|
|
audio_devs[dev]->buffsize &= ~0xfff; /* Truncate to n*4k */
|
|
if (audio_devs[dev]->buffsize < 4096)
|
|
audio_devs[dev]->buffsize = 4096;
|
|
|
|
/* Now allocate the buffers */
|
|
|
|
for (dmap->raw_count = 0; dmap->raw_count < audio_devs[dev]->buffcount; dmap->raw_count++)
|
|
{
|
|
char *tmpbuf = (char *)vm_page_alloc_contig(audio_devs[dev]->buffsize, 0ul, 0xfffffful, dma_pagesize);
|
|
|
|
if (tmpbuf == NULL)
|
|
{
|
|
printk ("snd: Unable to allocate %d bytes of buffer\n",
|
|
audio_devs[dev]->buffsize);
|
|
return;
|
|
}
|
|
|
|
dmap->raw_buf[dmap->raw_count] = tmpbuf;
|
|
/*
|
|
* Use virtual address as the physical address, since
|
|
* isa_dmastart performs the phys address computation.
|
|
*/
|
|
dmap->raw_buf_phys[dmap->raw_count] =
|
|
(unsigned long) dmap->raw_buf[dmap->raw_count];
|
|
}
|
|
} /* for dev */
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
int
|
|
snd_ioctl_return (int *addr, int value)
|
|
{
|
|
if (value < 0)
|
|
return value; /* Error */
|
|
suword (addr, value);
|
|
return 0;
|
|
}
|
|
|
|
int
|
|
snd_set_irq_handler (int interrupt_level, INT_HANDLER_PROTO(), char *name)
|
|
{
|
|
return 1;
|
|
}
|
|
|
|
|
|
void
|
|
snd_release_irq(int vect)
|
|
{
|
|
}
|
|
|
|
static snd_devsw_installed = 0;
|
|
|
|
static void
|
|
snd_drvinit(void *unused)
|
|
{
|
|
dev_t dev;
|
|
|
|
if( ! snd_devsw_installed ) {
|
|
dev = makedev(CDEV_MAJOR, 0);
|
|
cdevsw_add(&dev,&snd_cdevsw, NULL);
|
|
snd_devsw_installed = 1;
|
|
}
|
|
}
|
|
|
|
SYSINIT(snddev,SI_SUB_DRIVERS,SI_ORDER_MIDDLE+CDEV_MAJOR,snd_drvinit,NULL)
|
|
|
|
#endif
|
|
|