diff options
Diffstat (limited to 'sys')
| -rw-r--r-- | sys/conf/files.i386 | 4 | ||||
| -rw-r--r-- | sys/gnu/i386/isa/sound/awe_compat.h | 28 | ||||
| -rw-r--r-- | sys/gnu/i386/isa/sound/awe_config.h | 18 | ||||
| -rw-r--r-- | sys/gnu/i386/isa/sound/awe_version.h | 23 | ||||
| -rw-r--r-- | sys/gnu/i386/isa/sound/awe_wave.c | 55 | ||||
| -rw-r--r-- | sys/i386/conf/files.i386 | 4 | ||||
| -rw-r--r-- | sys/i386/include/soundcard.h | 1 | ||||
| -rw-r--r-- | sys/i386/isa/sound/awe_hw.h | 116 | ||||
| -rw-r--r-- | sys/i386/isa/sound/awe_voice.h | 268 | ||||
| -rw-r--r-- | sys/i386/isa/sound/awe_wave.c | 3367 | ||||
| -rw-r--r-- | sys/i386/isa/sound/dev_table.h | 2 | ||||
| -rw-r--r-- | sys/i386/isa/sound/sound_calls.h | 4 | ||||
| -rw-r--r-- | sys/sys/soundcard.h | 1 |
13 files changed, 109 insertions, 3782 deletions
diff --git a/sys/conf/files.i386 b/sys/conf/files.i386 index e9e493f..e478b03 100644 --- a/sys/conf/files.i386 +++ b/sys/conf/files.i386 @@ -1,7 +1,7 @@ # This file tells config what files go into building a kernel, # files marked standard are always included. # -# $Id: files.i386,v 1.182 1997/12/12 14:08:45 peter Exp $ +# $Id: files.i386,v 1.183 1998/01/06 05:13:50 dyson Exp $ # # The long compile-with and dependency lines are required because of # limitations in config: backslash-newline doesn't work in strings, and @@ -226,7 +226,6 @@ i386/isa/sound/sound_timer.c optional sscape device-driver i386/isa/sound/mpu401.c optional sscape device-driver i386/isa/sound/midi_synth.c optional sscape device-driver i386/isa/sound/midibuf.c optional sscape device-driver -i386/isa/sound/awe_wave.c optional awe device-driver i386/isa/sound/cs4232.c optional css device-driver i386/isa/spigot.c optional spigot device-driver i386/isa/spkr.c optional speaker device-driver @@ -310,4 +309,5 @@ gnu/i386/fpemul/reg_u_sub.s optional gpl_math_emulate gnu/i386/fpemul/wm_shrx.s optional gpl_math_emulate gnu/i386/fpemul/wm_sqrt.s optional gpl_math_emulate gnu/i386/isa/dgb.c optional dgb device-driver +gnu/i386/isa/sound/awe_wave.c optional awe device-driver pci/ide_pci.c optional wd device-driver diff --git a/sys/gnu/i386/isa/sound/awe_compat.h b/sys/gnu/i386/isa/sound/awe_compat.h index d0c34a1..c2b0ee5 100644 --- a/sys/gnu/i386/isa/sound/awe_compat.h +++ b/sys/gnu/i386/isa/sound/awe_compat.h @@ -1,3 +1,26 @@ +/* + * sound/awe_compat.h + * + * Compat defines for the AWE32/Sound Blaster 32 wave table synth. driver + * version 0.4.2c; Oct. 7, 1997 + * + * Copyright (C) 1996,1997 Takashi Iwai + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + */ + /*---------------------------------------------------------------- * compatibility macros for AWE32 driver *----------------------------------------------------------------*/ @@ -186,5 +209,10 @@ static void *my_realloc(void *buf, int oldsize, int size) #define BZERO(target,len) bzero((caddr_t)target, len) #define MEMCPY(dst,src,len) bcopy((caddr_t)src, (caddr_t)dst, len) +#ifndef AWE_OBSOLETE_VOXWARE +# define printk printf +# define RET_ERROR(err) -err +#endif + #endif diff --git a/sys/gnu/i386/isa/sound/awe_config.h b/sys/gnu/i386/isa/sound/awe_config.h index 48dc8f8..70efaac 100644 --- a/sys/gnu/i386/isa/sound/awe_config.h +++ b/sys/gnu/i386/isa/sound/awe_config.h @@ -28,15 +28,11 @@ * system configuration *----------------------------------------------------------------*/ -/* if you're using obsolete VoxWare 3.0.x on Linux 1.2.x (or FreeBSD), - * define the following line. +/* if you're using obsolete VoxWare 3.0.x on Linux 1.2.x (or pre-Voxware 3.5 + * versions of FreeBSD), define the following line. */ #undef AWE_OBSOLETE_VOXWARE -#ifdef __FreeBSD__ -# define AWE_OBSOLETE_VOXWARE -#endif - /* if you're using OSS-Lite on Linux 2.1.6 or later, define the * following line. */ @@ -137,7 +133,15 @@ #include "lowlevel.h" #endif -#include "../sound_config.h" +#ifdef __FreeBSD__ +# include <i386/isa/sound/sound_config.h> +# if defined(CONFIGURE_SOUNDCARD) && defined(CONFIG_AWE32) +# define CONFIG_AWE32_SYNTH +# endif +#else +# include "../sound_config.h" +#endif + #endif /* AWE_OBSOLETE_VOXWARE */ diff --git a/sys/gnu/i386/isa/sound/awe_version.h b/sys/gnu/i386/isa/sound/awe_version.h index 40d10df..42013bb 100644 --- a/sys/gnu/i386/isa/sound/awe_version.h +++ b/sys/gnu/i386/isa/sound/awe_version.h @@ -1,3 +1,26 @@ +/* + * sound/awe_version.h + * + * Version defines for the AWE32/Sound Blaster 32 wave table synth driver. + * version 0.4.2c; Oct. 7, 1997 + * + * Copyright (C) 1996,1997 Takashi Iwai + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + */ + /* AWE32 driver version number */ #ifndef AWE_VERSION_H_DEF diff --git a/sys/gnu/i386/isa/sound/awe_wave.c b/sys/gnu/i386/isa/sound/awe_wave.c index 7480311..1f3269e 100644 --- a/sys/gnu/i386/isa/sound/awe_wave.c +++ b/sys/gnu/i386/isa/sound/awe_wave.c @@ -22,7 +22,7 @@ */ #ifdef __FreeBSD__ -# include <i386/isa/sound/awe_config.h> +# include <gnu/i386/isa/sound/awe_config.h> #else # include "awe_config.h" #endif @@ -32,9 +32,9 @@ #ifdef CONFIG_AWE32_SYNTH #ifdef __FreeBSD__ -# include <i386/isa/sound/awe_hw.h> -# include <i386/isa/sound/awe_version.h> -# include <i386/isa/sound/awe_voice.h> +# include <gnu/i386/isa/sound/awe_hw.h> +# include <gnu/i386/isa/sound/awe_version.h> +# include <gnu/i386/isa/sound/awe_voice.h> #else # include "awe_hw.h" # include "awe_version.h" @@ -43,15 +43,18 @@ #ifdef AWE_HAS_GUS_COMPATIBILITY /* include finetune table */ -#ifdef AWE_OBSOLETE_VOXWARE -# ifdef __FreeBSD__ + +#ifdef __FreeBSD__ +# ifdef AWE_OBSOLETE_VOXWARE # define SEQUENCER_C -# include <i386/isa/sound/tuning.h> -# else -# include "tuning.h" # endif +# include <i386/isa/sound/tuning.h> #else -# include "../tuning.h" +# ifdef AWE_OBSOLETE_VOXWARE +# include "tuning.h" +# else +# include "../tuning.h" +# endif #endif #ifdef linux @@ -299,7 +302,7 @@ static struct voice_alloc_info *voice_alloc; /* set at initialization */ * function prototypes *----------------------------------------------------------------*/ -#ifndef AWE_OBSOLETE_VOXWARE +#if defined(linux) && !defined(AWE_OBSOLETE_VOXWARE) static int awe_check_port(void); static void awe_request_region(void); static void awe_release_region(void); @@ -444,7 +447,7 @@ static int awe_mixer_ioctl(int dev, unsigned int cmd, caddr_t arg); /* define macros for compatibility */ #ifdef __FreeBSD__ -# include <i386/isa/sound/awe_compat.h> +# include <gnu/i386/isa/sound/awe_compat.h> #else # include "awe_compat.h" #endif @@ -504,19 +507,27 @@ static struct mixer_operations awe_mixer_operations = { #define ATTACH_DECL /**/ #endif +#if defined(__FreeBSD__) && !defined(AWE_OBSOLETE_VOXWARE) +# define ATTACH_RET +void attach_awe(struct address_info *hw_config) +#else +# define ATTACH_RET ret ATTACH_DECL int attach_awe(void) +#endif { + int ret = 0; + /* check presence of AWE32 card */ if (! awe_detect()) { printk("AWE32: not detected\n"); - return 0; + return ATTACH_RET; } /* check AWE32 ports are available */ if (awe_check_port()) { printk("AWE32: I/O area already used.\n"); - return 0; + return ATTACH_RET; } /* set buffers to NULL */ @@ -534,7 +545,7 @@ int attach_awe(void) my_free(voices); my_free(channels); printk("AWE32: can't allocate sample tables\n"); - return 0; + return ATTACH_RET; } /* allocate sample tables */ @@ -582,7 +593,8 @@ int attach_awe(void) awe_present = TRUE; - return 1; + ret = 1; + return ATTACH_RET; } @@ -601,6 +613,7 @@ static void free_tables(void) #endif +#ifdef linux ATTACH_DECL void unload_awe(void) { @@ -613,6 +626,7 @@ void unload_awe(void) awe_present = FALSE; } } +#endif /*---------------------------------------------------------------- @@ -639,7 +653,14 @@ int probe_awe_obsolete(struct address_info *hw_config) /*return awe_detect();*/ } +#else +#if defined(__FreeBSD__ ) +int probe_awe(struct address_info *hw_config) +{ + return 1; +} #endif +#endif /* AWE_OBSOLETE_VOXWARE */ /*================================================================ @@ -743,7 +764,7 @@ awe_write_dram(unsigned short c) } -#ifndef AWE_OBSOLETE_VOXWARE +#if defined(linux) && !defined(AWE_OBSOLETE_VOXWARE) /*================================================================ * port check / request diff --git a/sys/i386/conf/files.i386 b/sys/i386/conf/files.i386 index e9e493f..e478b03 100644 --- a/sys/i386/conf/files.i386 +++ b/sys/i386/conf/files.i386 @@ -1,7 +1,7 @@ # This file tells config what files go into building a kernel, # files marked standard are always included. # -# $Id: files.i386,v 1.182 1997/12/12 14:08:45 peter Exp $ +# $Id: files.i386,v 1.183 1998/01/06 05:13:50 dyson Exp $ # # The long compile-with and dependency lines are required because of # limitations in config: backslash-newline doesn't work in strings, and @@ -226,7 +226,6 @@ i386/isa/sound/sound_timer.c optional sscape device-driver i386/isa/sound/mpu401.c optional sscape device-driver i386/isa/sound/midi_synth.c optional sscape device-driver i386/isa/sound/midibuf.c optional sscape device-driver -i386/isa/sound/awe_wave.c optional awe device-driver i386/isa/sound/cs4232.c optional css device-driver i386/isa/spigot.c optional spigot device-driver i386/isa/spkr.c optional speaker device-driver @@ -310,4 +309,5 @@ gnu/i386/fpemul/reg_u_sub.s optional gpl_math_emulate gnu/i386/fpemul/wm_shrx.s optional gpl_math_emulate gnu/i386/fpemul/wm_sqrt.s optional gpl_math_emulate gnu/i386/isa/dgb.c optional dgb device-driver +gnu/i386/isa/sound/awe_wave.c optional awe device-driver pci/ide_pci.c optional wd device-driver diff --git a/sys/i386/include/soundcard.h b/sys/i386/include/soundcard.h index b10cccf..9898174 100644 --- a/sys/i386/include/soundcard.h +++ b/sys/i386/include/soundcard.h @@ -502,6 +502,7 @@ struct synth_info { /* Read only */ #define FM_TYPE_OPL3 0x01 #define SAMPLE_TYPE_GUS 0x10 +#define SAMPLE_TYPE_AWE32 0x20 int perc_mode; /* No longer supported */ int nr_voices; diff --git a/sys/i386/isa/sound/awe_hw.h b/sys/i386/isa/sound/awe_hw.h deleted file mode 100644 index 8b6be67..0000000 --- a/sys/i386/isa/sound/awe_hw.h +++ /dev/null @@ -1,116 +0,0 @@ -/* - * sound/awe_hw.h - * - * Access routines and definitions for the low level driver for the - * AWE32/Sound Blaster 32 wave table synth. - * version 0.2.0a; Oct. 30, 1996 - * - * (C) 1996 Takashi Iwai - * - * 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. - * - */ - -#ifndef AWE_HW_H_DEF -#define AWE_HW_H_DEF - -/* - * user configuration: - * if auto detection can't work properly, define the following values - * for your machine. - */ -/*#define AWE_DEFAULT_BASE_ADDR 0x620*/ /* base port address */ -/*#define AWE_DEFAULT_MEM_SIZE 512*/ /* kbytes */ - - -/* - * maximum size of sample table: - * if your data overflow, increase the following values. - */ -#define AWE_MAX_SAMPLES 400 -#define AWE_MAX_INFOS 900 /* GS presets has 801 infos! */ - - -/* - * Emu-8000 control registers - * name(channel) reg, port - */ - -#define awe_cmd_idx(reg,ch) (((reg)<< 5) | (ch)) - -#define Data0 0x620 /* doubleword r/w */ -#define Data1 0xA20 /* doubleword r/w */ -#define Data2 0xA22 /* word r/w */ -#define Data3 0xE20 /* word r/w */ -#define Pointer 0xE22 /* register pointer r/w */ - -#define AWE_CPF(ch) awe_cmd_idx(0,ch), Data0 /* DW: current pitch and fractional address */ -#define AWE_PTRX(ch) awe_cmd_idx(1,ch), Data0 /* DW: pitch target and reverb send */ -#define AWE_CVCF(ch) awe_cmd_idx(2,ch), Data0 /* DW: current volume and filter cutoff */ -#define AWE_VTFT(ch) awe_cmd_idx(3,ch), Data0 /* DW: volume and filter cutoff targets */ -#define AWE_PSST(ch) awe_cmd_idx(6,ch), Data0 /* DW: pan send and loop start address */ -#define AWE_CSL(ch) awe_cmd_idx(7,ch), Data0 /* DW: chorus send and loop end address */ -#define AWE_CCCA(ch) awe_cmd_idx(0,ch), Data1 /* DW: Q, control bits, and current address */ -#define AWE_HWCF4 awe_cmd_idx(1,9), Data1 /* DW: config dw 4 */ -#define AWE_HWCF5 awe_cmd_idx(1,10), Data1 /* DW: config dw 5 */ -#define AWE_HWCF6 awe_cmd_idx(1,13), Data1 /* DW: config dw 6 */ -#define AWE_SMALR awe_cmd_idx(1,20), Data1 /* DW: sound memory address for left read */ -#define AWE_SMARR awe_cmd_idx(1,21), Data1 /* DW: for right read */ -#define AWE_SMALW awe_cmd_idx(1,22), Data1 /* DW: sound memory address for left write */ -#define AWE_SMARW awe_cmd_idx(1,23), Data1 /* DW: for right write */ -#define AWE_SMLD awe_cmd_idx(1,26), Data1 /* W: sound memory left data */ -#define AWE_SMRD awe_cmd_idx(1,26), Data2 /* W: right data */ -#define AWE_WC awe_cmd_idx(1,27), Data2 /* W: sample counter */ -#define AWE_WC_Cmd awe_cmd_idx(1,27) -#define AWE_WC_Port Data2 -#define AWE_HWCF1 awe_cmd_idx(1,29), Data1 /* W: config w 1 */ -#define AWE_HWCF2 awe_cmd_idx(1,30), Data1 /* W: config w 2 */ -#define AWE_HWCF3 awe_cmd_idx(1,31), Data1 /* W: config w 3 */ -#define AWE_INIT1(ch) awe_cmd_idx(2,ch), Data1 /* W: init array 1 */ -#define AWE_INIT2(ch) awe_cmd_idx(2,ch), Data2 /* W: init array 2 */ -#define AWE_INIT3(ch) awe_cmd_idx(3,ch), Data1 /* W: init array 3 */ -#define AWE_INIT4(ch) awe_cmd_idx(3,ch), Data2 /* W: init array 4 */ -#define AWE_ENVVOL(ch) awe_cmd_idx(4,ch), Data1 /* W: volume envelope delay */ -#define AWE_DCYSUSV(ch) awe_cmd_idx(5,ch), Data1 /* W: volume envelope sustain and decay */ -#define AWE_ENVVAL(ch) awe_cmd_idx(6,ch), Data1 /* W: modulation envelope delay */ -#define AWE_DCYSUS(ch) awe_cmd_idx(7,ch), Data1 /* W: modulation envelope sustain and decay */ -#define AWE_ATKHLDV(ch) awe_cmd_idx(4,ch), Data2 /* W: volume envelope attack and hold */ -#define AWE_LFO1VAL(ch) awe_cmd_idx(5,ch), Data2 /* W: LFO#1 Delay */ -#define AWE_ATKHLD(ch) awe_cmd_idx(6,ch), Data2 /* W: modulation envelope attack and hold */ -#define AWE_LFO2VAL(ch) awe_cmd_idx(7,ch), Data2 /* W: LFO#2 Delay */ -#define AWE_IP(ch) awe_cmd_idx(0,ch), Data3 /* W: initial pitch */ -#define AWE_IFATN(ch) awe_cmd_idx(1,ch), Data3 /* W: initial filter cutoff and attenuation */ -#define AWE_PEFE(ch) awe_cmd_idx(2,ch), Data3 /* W: pitch and filter envelope heights */ -#define AWE_FMMOD(ch) awe_cmd_idx(3,ch), Data3 /* W: vibrato and filter modulation freq */ -#define AWE_TREMFRQ(ch) awe_cmd_idx(4,ch), Data3 /* W: LFO#1 tremolo amount and freq */ -#define AWE_FM2FRQ2(ch) awe_cmd_idx(5,ch), Data3 /* W: LFO#2 vibrato amount and freq */ - -/* used during detection (returns ROM version ?) */ -#define AWE_U1 0xE0, Data3 /* (R)(W) used in initialization */ -#define AWE_U2(ch) 0xC0+(ch), Data3 /* (W)(W) used in init envelope */ - - -#define AWE_MAX_VOICES 32 -#define AWE_NORMAL_VOICES 30 /*30&31 are reserved for DRAM refresh*/ - -#define AWE_DRAM_OFFSET 0x200000 - -#endif diff --git a/sys/i386/isa/sound/awe_voice.h b/sys/i386/isa/sound/awe_voice.h deleted file mode 100644 index 934aaa8..0000000 --- a/sys/i386/isa/sound/awe_voice.h +++ /dev/null @@ -1,268 +0,0 @@ -/* - * sound/awe_voice.h - * - * Voice information definitions for the low level driver for the - * AWE32/Sound Blaster 32 wave table synth. - * version 0.2.0a; Oct. 30, 1996 - * - * (C) 1996 Takashi Iwai - * - * 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. - * - */ - -#ifndef AWE_VOICE_H -#define AWE_VOICE_H - -#ifndef SAMPLE_TYPE_AWE32 -#define SAMPLE_TYPE_AWE32 0x20 -#endif - -#ifndef _PATCHKEY -#define _PATCHKEY(id) ((id<<8)|0xfd) -#endif - -/*---------------------------------------------------------------- - * patch information record - *----------------------------------------------------------------*/ - -/* patch interface header: 16 bytes */ -typedef struct awe_patch_info { - short key; /* use AWE_PATCH here */ -#define AWE_PATCH _PATCHKEY(0x07) - - short device_no; /* synthesizer number */ - unsigned short sf_id; /* file id (should be zero) */ - short sf_version; /* patch version (not referred) */ - long len; /* data length (without this header) */ - - short type; /* following data type */ -#define AWE_LOAD_INFO 0 -#define AWE_LOAD_DATA 1 - - short reserved; /* word alignment data */ - char data[0]; /* patch data follows here */ -} awe_patch_info; - - -/*---------------------------------------------------------------- - * raw voice information record - *----------------------------------------------------------------*/ - -/* wave table envelope & effect parameters to control EMU8000 */ -typedef struct _awe_voice_parm { - unsigned short moddelay; /* modulation delay (0x8000) */ - unsigned short modatkhld; /* modulation attack & hold time (0x7f7f) */ - unsigned short moddcysus; /* modulation decay & sustain (0x7f7f) */ - unsigned short modrelease; /* modulation release time (0x807f) */ - short modkeyhold, modkeydecay; /* envelope change per key (not used) */ - unsigned short voldelay; /* volume delay (0x8000) */ - unsigned short volatkhld; /* volume attack & hold time (0x7f7f) */ - unsigned short voldcysus; /* volume decay & sustain (0x7f7f) */ - unsigned short volrelease; /* volume release time (0x807f) */ - short volkeyhold, volkeydecay; /* envelope change per key (not used) */ - unsigned short lfo1delay; /* LFO1 delay (0x8000) */ - unsigned short lfo2delay; /* LFO2 delay (0x8000) */ - unsigned short pefe; /* modulation pitch & cutoff (0x0000) */ - unsigned short fmmod; /* LFO1 pitch & cutoff (0x0000) */ - unsigned short tremfrq; /* LFO1 volume & freq (0x0000) */ - unsigned short fm2frq2; /* LFO2 pitch & freq (0x0000) */ - unsigned char cutoff; /* initial cutoff (0xff) */ - unsigned char filterQ; /* initial filter Q [0-15] (0x0) */ - unsigned char chorus; /* chorus send (0x00) */ - unsigned char reverb; /* reverb send (0x00) */ - unsigned short reserved[4]; /* not used */ -} awe_voice_parm; - -/* wave table parameters: 92 bytes */ -typedef struct _awe_voice_info { - unsigned short sf_id; /* file id (should be zero) */ - unsigned short sample; /* sample id */ - long start, end; /* sample offset correction */ - long loopstart, loopend; /* loop offset correction */ - short rate_offset; /* sample rate pitch offset */ - unsigned short mode; /* sample mode */ -#define AWE_MODE_ROMSOUND 0x8000 -#define AWE_MODE_STEREO 1 -#define AWE_MODE_LOOPING 2 -#define AWE_MODE_NORELEASE 4 /* obsolete */ -#define AWE_MODE_INIT_PARM 8 - - short root; /* midi root key */ - short tune; /* pitch tuning (in cents) */ - char low, high; /* key note range */ - char vellow, velhigh; /* velocity range */ - char fixkey, fixvel; /* fixed key, velocity */ - char pan, fixpan; /* panning, fixed panning */ - short exclusiveClass; /* exclusive class (0 = none) */ - unsigned char amplitude; /* sample volume (127 max) */ - unsigned char attenuation; /* attenuation (0.375dB) */ - short scaleTuning; /* pitch scale tuning(%), normally 100 */ - awe_voice_parm parm; /* voice envelope parameters */ - short index; /* internal index (set by driver) */ -} awe_voice_info; - -/* instrument info header: 4 bytes */ -typedef struct _awe_voice_rec { - unsigned char bank; /* midi bank number */ - unsigned char instr; /* midi preset number */ - short nvoices; /* number of voices */ - awe_voice_info info[0]; /* voice information follows here */ -} awe_voice_rec; - - -/*---------------------------------------------------------------- - * sample wave information - *----------------------------------------------------------------*/ - -/* wave table sample header: 32 bytes */ -typedef struct awe_sample_info { - unsigned short sf_id; /* file id (should be zero) */ - unsigned short sample; /* sample id */ - long start, end; /* start & end offset */ - long loopstart, loopend; /* loop start & end offset */ - long size; /* size (0 = ROM) */ - short checksum_flag; /* use check sum = 1 */ - unsigned short mode_flags; /* mode flags */ -#define AWE_SAMPLE_8BITS 1 /* wave data is 8bits */ -#define AWE_SAMPLE_UNSIGNED 2 /* wave data is unsigned */ -#define AWE_SAMPLE_NO_BLANK 4 /* no blank loop is attached */ -#define AWE_SAMPLE_SINGLESHOT 8 /* single-shot w/o loop */ -#define AWE_SAMPLE_BIDIR_LOOP 16 /* bidirectional looping */ -#define AWE_SAMPLE_STEREO_LEFT 32 /* stereo left sound */ -#define AWE_SAMPLE_STEREO_RIGHT 64 /* stereo right sound */ - unsigned long checksum; /* check sum */ - unsigned short data[0]; /* sample data follows here */ -} awe_sample_info; - - -/*---------------------------------------------------------------- - * awe hardware controls - *----------------------------------------------------------------*/ - -#define _AWE_DEBUG_MODE 0x00 -#define _AWE_REVERB_MODE 0x01 -#define _AWE_CHORUS_MODE 0x02 -#define _AWE_REMOVE_LAST_SAMPLES 0x03 -#define _AWE_INITIALIZE_CHIP 0x04 -#define _AWE_SEND_EFFECT 0x05 -#define _AWE_TERMINATE_CHANNEL 0x06 -#define _AWE_TERMINATE_ALL 0x07 -#define _AWE_INITIAL_VOLUME 0x08 -#define _AWE_SET_GUS_BANK 0x09 - -#define _AWE_MODE_FLAG 0x80 -#define _AWE_COOKED_FLAG 0x40 /* not supported */ -#define _AWE_MODE_VALUE_MASK 0x3F - -#define _AWE_CMD(chn, voice, cmd, p1, p2) \ -{_SEQ_NEEDBUF(8); _seqbuf[_seqbufptr] = SEQ_PRIVATE;\ - _seqbuf[_seqbufptr+1] = chn;\ - _seqbuf[_seqbufptr+2] = _AWE_MODE_FLAG|(cmd);\ - _seqbuf[_seqbufptr+3] = voice;\ - *(unsigned short*)&_seqbuf[_seqbufptr+4] = p1;\ - *(unsigned short*)&_seqbuf[_seqbufptr+6] = p2;\ - _SEQ_ADVBUF(8);} - -#define AWE_DEBUG_MODE(dev,p1) _AWE_CMD(dev, 0, _AWE_DEBUG_MODE, p1, 0) -#define AWE_REVERB_MODE(dev,p1) _AWE_CMD(dev, 0, _AWE_REVERB_MODE, p1, 0) -#define AWE_CHORUS_MODE(dev,p1) _AWE_CMD(dev, 0, _AWE_CHORUS_MODE, p1, 0) -#define AWE_REMOVE_LAST_SAMPLES(dev) _AWE_CMD(dev, 0, _AWE_REMOVE_LAST_SAMPLES, 0, 0) -#define AWE_INITIALIZE_CHIP(dev) _AWE_CMD(dev, 0, _AWE_INITIALIZE_CHIP, 0, 0) -#define AWE_SEND_EFFECT(dev,voice,type,value) _AWE_CMD(dev,voice,_AWE_SEND_EFFECT,type,value) -#define AWE_TERMINATE_CHANNEL(dev,voice) _AWE_CMD(dev,voice,_AWE_TERMINATE_CHANNEL,0,0) -#define AWE_TERMINATE_ALL(dev) _AWE_CMD(dev, 0, _AWE_TERMINATE_ALL, 0, 0) -#define AWE_INITIAL_VOLUME(dev,atten) _AWE_CMD(dev, 0, _AWE_INITIAL_VOLUME, atten, 0) -#define AWE_SET_GUS_BANK(dev,bank) _AWE_CMD(dev, 0, _AWE_SET_GUS_BANK, bank, 0) - -/* reverb mode */ -#define AWE_REVERB_ROOM1 0 -#define AWE_REVERB_ROOM2 1 -#define AWE_REVERB_ROOM3 2 -#define AWE_REVERB_HALL1 3 -#define AWE_REVERB_HALL2 4 -#define AWE_REVERB_PLATE 5 -#define AWE_REVERB_DELAY 6 -#define AWE_REVERB_PANNINGDELAY 7 - -/* chorus mode */ -#define AWE_CHORUS_1 0 -#define AWE_CHORUS_2 1 -#define AWE_CHORUS_3 2 -#define AWE_CHORUS_4 3 -#define AWE_CHORUS_FEEDBACK 4 -#define AWE_CHORUS_FLANGER 5 -#define AWE_CHORUS_SHORTDELAY 6 -#define AWE_CHORUS_SHORTDELAY2 7 - -/* effects */ -enum { - -/* modulation envelope parameters */ -/* 0*/ AWE_FX_ENV1_DELAY, /* WORD: ENVVAL */ -/* 1*/ AWE_FX_ENV1_ATTACK, /* BYTE: up ATKHLD */ -/* 2*/ AWE_FX_ENV1_HOLD, /* BYTE: lw ATKHLD */ -/* 3*/ AWE_FX_ENV1_DECAY, /* BYTE: lw DCYSUS */ -/* 4*/ AWE_FX_ENV1_RELEASE, /* BYTE: lw DCYSUS */ -/* 5*/ AWE_FX_ENV1_SUSTAIN, /* BYTE: up DCYSUS */ -/* 6*/ AWE_FX_ENV1_PITCH, /* BYTE: up PEFE */ -/* 7*/ AWE_FX_ENV1_CUTOFF, /* BYTE: lw PEFE */ - -/* volume envelope parameters */ -/* 8*/ AWE_FX_ENV2_DELAY, /* WORD: ENVVOL */ -/* 9*/ AWE_FX_ENV2_ATTACK, /* BYTE: up ATKHLDV */ -/*10*/ AWE_FX_ENV2_HOLD, /* BYTE: lw ATKHLDV */ -/*11*/ AWE_FX_ENV2_DECAY, /* BYTE: lw DCYSUSV */ -/*12*/ AWE_FX_ENV2_RELEASE, /* BYTE: lw DCYSUSV */ -/*13*/ AWE_FX_ENV2_SUSTAIN, /* BYTE: up DCYSUSV */ - -/* LFO1 (tremolo & vibrato) parameters */ -/*14*/ AWE_FX_LFO1_DELAY, /* WORD: LFO1VAL */ -/*15*/ AWE_FX_LFO1_FREQ, /* BYTE: lo TREMFRQ */ -/*16*/ AWE_FX_LFO1_VOLUME, /* BYTE: up TREMFRQ */ -/*17*/ AWE_FX_LFO1_PITCH, /* BYTE: up FMMOD */ -/*18*/ AWE_FX_LFO1_CUTOFF, /* BYTE: lo FMMOD */ - -/* LFO2 (vibrato) parameters */ -/*19*/ AWE_FX_LFO2_DELAY, /* WORD: LFO2VAL */ -/*20*/ AWE_FX_LFO2_FREQ, /* BYTE: lo FM2FRQ2 */ -/*21*/ AWE_FX_LFO2_PITCH, /* BYTE: up FM2FRQ2 */ - -/* Other overall effect parameters */ -/*22*/ AWE_FX_INIT_PITCH, /* SHORT: pitch offset */ -/*23*/ AWE_FX_CHORUS, /* BYTE: chorus effects send (0-255) */ -/*24*/ AWE_FX_REVERB, /* BYTE: reverb effects send (0-255) */ -/*25*/ AWE_FX_CUTOFF, /* BYTE: up IFATN */ -/*26*/ AWE_FX_FILTERQ, /* BYTE: up CCCA */ - -/* Sample / loop offset changes */ -/*27*/ AWE_FX_SAMPLE_START, /* SHORT: offset */ -/*28*/ AWE_FX_LOOP_START, /* SHORT: offset */ -/*29*/ AWE_FX_LOOP_END, /* SHORT: offset */ -/*30*/ AWE_FX_COARSE_SAMPLE_START, /* SHORT: upper word offset */ -/*31*/ AWE_FX_COARSE_LOOP_START, /* SHORT: upper word offset */ -/*32*/ AWE_FX_COARSE_LOOP_END, /* SHORT: upper word offset */ - - AWE_FX_END, -}; - - -#endif /* AWE_VOICE_H */ diff --git a/sys/i386/isa/sound/awe_wave.c b/sys/i386/isa/sound/awe_wave.c deleted file mode 100644 index b4ee8c9..0000000 --- a/sys/i386/isa/sound/awe_wave.c +++ /dev/null @@ -1,3367 +0,0 @@ -/* - * sound/awe_wave.c - * - * The low level driver for the AWE32/Sound Blaster 32 wave table synth. - * version 0.2.0a; Oct. 30, 1996 - * - * (C) 1996 Takashi Iwai - * - * 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. - * - */ - -/* if you're using obsolete VoxWare 3.0.x on Linux 1.2.x (or FreeBSD), - * uncomment the following line - */ - -#define AWE_OBSOLETE_VOXWARE - -#ifdef AWE_OBSOLETE_VOXWARE - -#ifdef __FreeBSD__ -# include <i386/isa/sound/sound_config.h> -#else -# include "sound_config.h" -#endif - -#if defined(CONFIGURE_SOUNDCARD) && !defined(EXCLUDE_AWE32) -#define CONFIG_AWE32_SYNTH -#endif - -#else /* AWE_OBSOLETE_VOXWARE */ - -#include "../sound_config.h" - -#endif /* AWE_OBSOLETE_VOXWARE */ - - -/*----------------------------------------------------------------* - * compile condition - *----------------------------------------------------------------*/ - -/* initialize FM passthrough even without extended RAM */ -/*#define AWE_ALWAYS_INIT_FM*/ - -/* debug on */ -#define AWE_DEBUG_ON - -/* verify checksum for uploading samples */ -#define AWE_CHECKSUM_DATA -#define AWE_CHECKSUM_MEMORY - -/* disable interruption during sequencer operation */ -/*#define AWE_NEED_DISABLE_INTR*/ - -/* use buffered access to user wave data */ -#define AWE_USE_BUFFERED_IO - -#ifdef linux -/* i tested this only on my linux */ -#define INLINE __inline__ -#else -#define INLINE /**/ -#endif - -/*----------------------------------------------------------------*/ - -#ifdef CONFIG_AWE32_SYNTH - -#include <i386/isa/sound/awe_hw.h> -#include <i386/isa/sound/awe_voice.h> - -#ifdef AWE_OBSOLETE_VOXWARE -#include <i386/isa/sound/tuning.h> -#else -#include "../tuning.h" -#endif - -#ifdef linux -# include <linux/ultrasound.h> -#elif defined(__FreeBSD__) -# include <machine/ultrasound.h> -#endif - - -/*---------------------------------------------------------------- - * debug message - *----------------------------------------------------------------*/ - -#ifdef AWE_DEBUG_ON -static int debug_mode = 0; -#define DEBUG(LVL,XXX) {if (debug_mode > LVL) { XXX; }} -#define ERRMSG(XXX) {if (debug_mode) { XXX; }} -#define FATALERR(XXX) XXX -#else -#define DEBUG(LVL,XXX) /**/ -#define ERRMSG(XXX) XXX -#define FATALERR(XXX) XXX -#endif - -/*---------------------------------------------------------------- - * bank and voice record - *----------------------------------------------------------------*/ - -/* bank record */ -typedef struct _awe_voice_list { - unsigned char bank, instr; - awe_voice_info v; - struct _awe_voice_list *next_instr; - struct _awe_voice_list *next_bank; -} awe_voice_list; - -/* sample and information table */ -static awe_sample_info *samples; -static awe_voice_list *infos; - -#define AWE_MAX_PRESETS 256 -#define AWE_DEFAULT_BANK 0 - -/* preset table index */ -static awe_voice_list *preset_table[AWE_MAX_PRESETS]; - -/*---------------------------------------------------------------- - * voice table - *----------------------------------------------------------------*/ - -#define AWE_FX_BYTES ((AWE_FX_END+7)/8) - -typedef struct _voice_info { - int state; /* status (on = 1, off = 0) */ - int note; /* midi key (0-127) */ - int velocity; /* midi velocity (0-127) */ - int bender; /* midi pitchbend (-8192 - 8192) */ - int bender_range; /* midi bender range (x100) */ - int panning; /* panning (0-127) */ - int main_vol; /* channel volume (0-127) */ - int expression_vol; /* midi expression (0-127) */ - - /* EMU8000 parameters */ - int apitch; /* pitch parameter */ - int avol; /* volume parameter */ - - /* instrument parameters */ - int bank; /* current tone bank */ - int instr; /* current program */ - awe_voice_list *vrec; - awe_voice_info *sample; - - /* channel effects */ - unsigned char fx_flags[AWE_FX_BYTES]; - short fx[AWE_FX_END]; -} voice_info; - -static voice_info voices[AWE_MAX_VOICES]; - - -/*---------------------------------------------------------------- - * global variables - *----------------------------------------------------------------*/ - -/* awe32 base address (overwritten at initialization) */ -static int awe_base = 0; -/* memory byte size (overwritten at initialization) */ -static long awe_mem_size = 0; - -/* maximum channels for playing */ -static int awe_max_voices = AWE_MAX_VOICES; - -static long free_mem_ptr = 0; /* free word byte size */ -static int free_info = 0; /* free info tables */ -static int last_info = 0; /* last loaded info index */ -static int free_sample = 0; /* free sample tables */ -static int last_sample = 0; /* last loaded sample index */ -static int loaded_once = 0; /* samples are loaded after init? */ -static unsigned short current_sf_id = 0; /* internal id */ - -static int reverb_mode = 0; /* reverb mode */ -static int chorus_mode = 0; /* chorus mode */ -static unsigned short init_atten = 32; /* 12dB */ - -static int awe_present = 0; /* awe device present? */ -static int awe_busy = 0; /* awe device opened? */ - -static int awe_gus_bank = AWE_DEFAULT_BANK; /* GUS default bank number */ - - -static struct synth_info awe_info = { - "AWE32 Synth", /* name */ - 0, /* device */ - SYNTH_TYPE_SAMPLE, /* synth_type */ - SAMPLE_TYPE_AWE32, /* synth_subtype */ - 0, /* perc_mode (obsolete) */ - AWE_MAX_VOICES, /* nr_voices */ - 0, /* nr_drums (obsolete) */ - AWE_MAX_INFOS /* instr_bank_size */ -}; - - -static struct voice_alloc_info *voice_alloc; /* set at initialization */ - - -/*---------------------------------------------------------------- - * function prototypes - *----------------------------------------------------------------*/ - -#ifndef AWE_OBSOLETE_VOXWARE -static int awe_check_port(void); -static void awe_request_region(void); -static void awe_release_region(void); -#endif - -static void awe_reset_samples(void); -/* emu8000 chip i/o access */ -static void awe_poke(unsigned short cmd, unsigned short port, unsigned short data); -static void awe_poke_dw(unsigned short cmd, unsigned short port, unsigned long data); -static unsigned short awe_peek(unsigned short cmd, unsigned short port); -static unsigned long awe_peek_dw(unsigned short cmd, unsigned short port); -static void awe_wait(unsigned short delay); - -/* initialize emu8000 chip */ -static void awe_initialize(void); - -/* set voice parameters */ -static void awe_init_voice_info(awe_voice_info *vp); -static void awe_init_voice_parm(awe_voice_parm *pp); -static int freq_to_note(int freq); -static int calc_rate_offset(int Hz); -/*static int calc_parm_delay(int msec);*/ -static int calc_parm_hold(int msec); -static int calc_parm_attack(int msec); -static int calc_parm_decay(int msec); -static int calc_parm_search(int msec, short *table); - -/* turn on/off note */ -static void awe_note_on(int voice); -static void awe_note_off(int voice); -static void awe_terminate(int voice); -static void awe_exclusive_off(int voice); - -/* calculate voice parameters */ -static void awe_set_pitch(int voice); -static void awe_set_volume(int voice); -static void awe_set_pan(int voice, int forced); -static void awe_fx_fmmod(int voice); -static void awe_fx_tremfrq(int voice); -static void awe_fx_fm2frq2(int voice); -static void awe_fx_cutoff(int voice); -static void awe_fx_initpitch(int voice); -static void awe_calc_pitch(int voice); -static void awe_calc_pitch_from_freq(int voice, int freq); -static void awe_calc_volume(int voice); -static void awe_voice_init(int voice, int inst_only); - -/* sequencer interface */ -static int awe_open(int dev, int mode); -static void awe_close(int dev); -static int awe_ioctl(int dev, unsigned int cmd, caddr_t arg); -static int awe_kill_note(int dev, int voice, int note, int velocity); -static int awe_start_note(int dev, int v, int note_num, int volume); -static int awe_set_instr(int dev, int voice, int instr_no); -static void awe_reset(int dev); -static void awe_hw_control(int dev, unsigned char *event); -static int awe_load_patch(int dev, int format, const char *addr, - int offs, int count, int pmgr_flag); -static void awe_aftertouch(int dev, int voice, int pressure); -static void awe_controller(int dev, int voice, int ctrl_num, int value); -static void awe_panning(int dev, int voice, int value); -static void awe_volume_method(int dev, int mode); -static int awe_patchmgr(int dev, struct patmgr_info *rec); -static void awe_bender(int dev, int voice, int value); -static int awe_alloc(int dev, int chn, int note, struct voice_alloc_info *alloc); -static void awe_setup_voice(int dev, int voice, int chn); - -/* hardware controls */ -static void awe_hw_gus_control(int dev, int cmd, unsigned char *event); -static void awe_hw_awe_control(int dev, int cmd, unsigned char *event); - -/* voice search */ -static awe_voice_info *awe_search_voice(int voice, int note); -static awe_voice_list *awe_search_instr(int bank, int preset); - -/* load / remove patches */ -static void awe_check_loaded(void); -static int awe_load_info(awe_patch_info *patch, const char *addr); -static int awe_load_data(awe_patch_info *patch, const char *addr); -static int awe_load_guspatch(const char *addr, int offs, int size, int pmgr_flag); -static int awe_write_wave_data(const char *addr, long offset, int size); -static awe_voice_list *awe_get_removed_list(awe_voice_list *curp); -static void awe_remove_samples(void); -static short awe_set_sample(awe_voice_info *vp); - -/* lowlevel functions */ -static void awe_init_audio(void); -static void awe_init_dma(void); -static void awe_init_array(void); -static void awe_send_array(unsigned short *data); -static void awe_tweak(void); -static void awe_init_fm(void); -static int awe_open_dram_for_write(int offset); -static int awe_open_dram_for_read(int offset); -static void awe_open_dram_for_check(void); -static void awe_close_dram(void); -static void awe_close_dram_for_read(void); -static void awe_write_dram(unsigned short c); -static int awe_detect(void); -static int awe_check_dram(void); -static void awe_set_chorus_mode(int mode); -static void awe_set_reverb_mode(int mode); - -#ifdef AWE_OBSOLETE_VOXWARE - -#define awe_check_port() 0 /* always false */ -#define awe_request_region() /* nothing */ -#define awe_release_region() /* nothing */ - -#ifdef __FreeBSD__ -# ifndef PERMANENT_MALLOC -# define PERMANENT_MALLOC(typecast, mem_ptr, size) \ - {mem_ptr = (typecast)malloc(size, M_DEVBUF, M_NOWAIT); \ - if (!mem_ptr)panic("SOUND: Cannot allocate memory\n");} -# endif -# ifndef printk -# define printk printf -# endif -# ifndef RET_ERROR -# define RET_ERROR(err) -(err) -# endif -#endif - -#else /* AWE_OBSOLETE_VOXWARE */ - -/* the following macros are osbolete */ - -#define PERMANENT_MALLOC(type,var,size) \ - var = (type)(sound_mem_blocks[sound_nblocks++] = vmalloc(size)) -#define RET_ERROR(err) -err - -#endif /* AWE_OBSOLETE_VOXWARE */ - - -#ifdef AWE_NEED_DISABLE_INTR -#define DECL_INTR_FLAGS(x) unsigned long x -#else -#undef DISABLE_INTR -#undef RESTORE_INTR -#define DECL_INTR_FLAGS(x) /**/ -#define DISABLE_INTR(x) /**/ -#define RESTORE_INTR(x) /**/ -#endif - - -/* macros for Linux and FreeBSD compatibility */ - -#undef OUTW -#undef COPY_FROM_USER -#undef GET_BYTE_FROM_USER -#undef GET_SHORT_FROM_USER -#undef IOCTL_TO_USER - -#ifdef linux -# define NO_DATA_ERR ENODATA -# define OUTW(data, addr) outw(data, addr) -# define COPY_FROM_USER(target, source, offs, count) \ - memcpy_fromfs( ((caddr_t)(target)),(source)+(offs),(count) ) -# define GET_BYTE_FROM_USER(target, addr, offs) \ - *((char *)&(target)) = get_fs_byte( (addr)+(offs) ) -# define GET_SHORT_FROM_USER(target, addr, offs) \ - *((short *)&(target)) = get_fs_word( (addr)+(offs) ) -# define IOCTL_TO_USER(target, offs, source, count) \ - memcpy_tofs ( ((caddr_t)(target)),(source)+(offs),(count) ) -# define BZERO(target,len) \ - memset( (caddr_t)target, '\0', len ) -# define MEMCPY(dst,src,len) \ - memcpy((caddr_t)dst, (caddr_t)src, len) -#elif defined(__FreeBSD__) -# define NO_DATA_ERR EINVAL -# define OUTW(data, addr) outw(addr, data) -# define COPY_FROM_USER(target, source, offs, count) \ - uiomove( ((caddr_t)(target)),(count),((struct uio *)(source)) ) -# define GET_BYTE_FROM_USER(target, addr, offs) \ - uiomove( ((char*)&(target)), 1, ((struct uio *)(addr)) ) -# define GET_SHORT_FROM_USER(target, addr, offs) \ - uiomove( ((char*)&(target)), 2, ((struct uio *)(addr)) ) -# define IOCTL_TO_USER(target, offs, source, count) \ - memcpy( &((target)[offs]), (source), (count) ) -# define BZERO(target,len) \ - bzero( (caddr_t)target, len ) -# define MEMCPY(dst,src,len) \ - bcopy((caddr_t)src, (caddr_t)dst, len) -#endif - - -/*---------------------------------------------------------------- - * synth operation table - *----------------------------------------------------------------*/ - -static struct synth_operations awe_operations = -{ - &awe_info, - 0, - SYNTH_TYPE_SAMPLE, - SAMPLE_TYPE_AWE32, - awe_open, - awe_close, - awe_ioctl, - awe_kill_note, - awe_start_note, - awe_set_instr, - awe_reset, - awe_hw_control, - awe_load_patch, - awe_aftertouch, - awe_controller, - awe_panning, - awe_volume_method, - awe_patchmgr, - awe_bender, - awe_alloc, - awe_setup_voice -}; - - - -/*================================================================ - * attach / unload interface - *================================================================*/ - -#if defined(AWE_OBSOLETE_VOXWARE) || defined(__FreeBSD__) -void attach_awe_obsolete(struct address_info *hw_config) -#else -int attach_awe(void) -#endif -{ - /* check presence of AWE32 card */ - if (! awe_detect()) { - printk("AWE32: not detected"); - return ; - } - - /* check AWE32 ports are available */ - if (awe_check_port()) { - printk("AWE32: I/O area already used."); - return ; - } - - /* allocate sample tables */ - PERMANENT_MALLOC(awe_sample_info *, samples, - AWE_MAX_SAMPLES * sizeof(awe_sample_info) ); - PERMANENT_MALLOC(awe_voice_list *, infos, - AWE_MAX_INFOS * sizeof(awe_voice_list) ); - if (samples == NULL || infos == NULL) { - printk("AWE32: can't allocate sample tables"); - return ; - } - - if (num_synths >= MAX_SYNTH_DEV) - printk("AWE32 Error: too many synthesizers\n"); - else { - voice_alloc = &awe_operations.alloc; - voice_alloc->max_voice = awe_max_voices; - synth_devs[num_synths++] = &awe_operations; - } - - /* reserve I/O ports for awedrv */ - awe_request_region(); - - /* clear all samples */ - awe_reset_samples(); - - /* intialize AWE32 hardware */ - awe_initialize(); - - sprintf(awe_info.name, "AWE32 Synth (%dk)", (int)awe_mem_size/1024); - - conf_printf(awe_info.name, hw_config); - - /* set reverb & chorus modes */ - awe_set_reverb_mode(reverb_mode); - awe_set_chorus_mode(chorus_mode); - - awe_present = 1; - -#ifdef AWE_OBSOLETE_VOXWARE - return ; -#else - return 1; -#endif -} - -#ifdef AWE_OBSOLETE_VOXWARE -int -probe_awe_obsolete(struct address_info *hw_config) -{ - return 1; - /*return awe_detect();*/ -} -#endif - -/*================================================================ - * clear sample tables - *================================================================*/ - -static void -awe_reset_samples(void) -{ - int i; - - /* free all bank tables */ - for (i = 0; i < AWE_MAX_PRESETS; i++) { - preset_table[i] = NULL; - } - - free_mem_ptr = 0; - last_sample = free_sample = 0; - last_info = free_info = 0; - current_sf_id = 0; - loaded_once = 0; -} - - -/*================================================================ - * EMU register access - *================================================================*/ - -/* select a given AWE32 pointer */ -static int awe_cur_cmd = -1; -#define awe_set_cmd(cmd) \ -if (awe_cur_cmd != cmd) { OUTW(cmd, awe_base + 0x802); awe_cur_cmd = cmd; } -#define awe_port(port) (awe_base - 0x620 + port) - -/* write 16bit data */ -INLINE static void -awe_poke(unsigned short cmd, unsigned short port, unsigned short data) -{ - awe_set_cmd(cmd); - OUTW(data, awe_port(port)); -} - -/* write 32bit data */ -INLINE static void -awe_poke_dw(unsigned short cmd, unsigned short port, unsigned long data) -{ - awe_set_cmd(cmd); - OUTW(data, awe_port(port)); /* write lower 16 bits */ - OUTW(data >> 16, awe_port(port)+2); /* write higher 16 bits */ -} - -/* read 16bit data */ -INLINE static unsigned short -awe_peek(unsigned short cmd, unsigned short port) -{ - unsigned short k; - awe_set_cmd(cmd); - k = inw(awe_port(port)); - return k; -} - -/* read 32bit data */ -INLINE static unsigned long -awe_peek_dw(unsigned short cmd, unsigned short port) -{ - unsigned long k1, k2; - awe_set_cmd(cmd); - k1 = inw(awe_port(port)); - k2 = inw(awe_port(port)+2); - k1 |= k2 << 16; - return k1; -} - -/* wait delay number of AWE32 44100Hz clocks */ -static void -awe_wait(unsigned short delay) -{ - unsigned short clock, target; - unsigned short port = awe_port(AWE_WC_Port); - int counter; - - /* sample counter */ - awe_set_cmd(AWE_WC_Cmd); - clock = (unsigned short)inw(port); - target = clock + delay; - counter = 0; - if (target < clock) { - for (; (unsigned short)inw(port) > target; counter++) - if (counter > 65536) - break; - } - for (; (unsigned short)inw(port) < target; counter++) - if (counter > 65536) - break; -} - - -#ifndef AWE_OBSOLETE_VOXWARE - -/*================================================================ - * port check / request - * 0x620-622, 0xA20-A22, 0xE20-E22 - *================================================================*/ - -static int -awe_check_port(void) -{ - return (check_region(awe_port(Data0), 3) || - check_region(awe_port(Data1), 3) || - check_region(awe_port(Data3), 3)); -} - -static void -awe_request_region(void) -{ - request_region(awe_port(Data0), 3, "sound driver (AWE32)"); - request_region(awe_port(Data1), 3, "sound driver (AWE32)"); - request_region(awe_port(Data3), 3, "sound driver (AWE32)"); -} - -static void -awe_release_region(void) -{ - release_region(awe_port(Data0), 3); - release_region(awe_port(Data1), 3); - release_region(awe_port(Data3), 3); -} - -#endif /* !AWE_OBSOLETE_VOXWARE */ - - -/*================================================================ - * AWE32 initialization - *================================================================*/ -static void -awe_initialize(void) -{ - unsigned short data; - DECL_INTR_FLAGS(flags); - - DEBUG(0,printk("AWE32: initializing..\n")); - DISABLE_INTR(flags); - - /* check for an error condition */ - data = awe_peek(AWE_U1); - if (!(data & 0x000F) == 0x000C) { - FATALERR(printk("AWE32: can't initialize AWE32\n")); - } - - /* initialize hardware configuration */ - awe_poke(AWE_HWCF1, 0x0059); - awe_poke(AWE_HWCF2, 0x0020); - - /* disable audio output */ - awe_poke(AWE_HWCF3, 0x0000); - - /* initialize audio channels */ - awe_init_audio(); - - /* initialize init array */ - awe_init_dma(); - awe_init_array(); - - /* check DRAM memory size */ - awe_mem_size = awe_check_dram(); - - /* initialize the FM section of the AWE32 */ - awe_init_fm(); - - /* set up voice envelopes */ - awe_tweak(); - - /* enable audio */ - awe_poke(AWE_HWCF3, 0x0004); - - data = awe_peek(AWE_HWCF2); - if (~data & 0x40) { - FATALERR(printk("AWE32: Unable to initialize AWE32.\n")); - } - - RESTORE_INTR(flags); -} - - -/*================================================================ - * AWE32 voice parameters - *================================================================*/ - -/* initialize voice_info record */ -static void -awe_init_voice_info(awe_voice_info *vp) -{ - vp->sf_id = 0; - vp->sample = 0; - vp->rate_offset = 0; - - vp->start = 0; - vp->end = 0; - vp->loopstart = 0; - vp->loopend = 0; - vp->mode = 0; - vp->root = 60; - vp->tune = 0; - vp->low = 0; - vp->high = 127; - vp->vellow = 0; - vp->velhigh = 127; - - vp->fixkey = -1; - vp->fixvel = -1; - vp->fixpan = -1; - vp->pan = -1; - - vp->exclusiveClass = 0; - vp->amplitude = 127; - vp->attenuation = 0; - vp->scaleTuning = 100; - - awe_init_voice_parm(&vp->parm); -} - -/* initialize voice_parm record: - * Env1/2: delay=0, attack=0, hold=0, sustain=0, decay=0, release=0. - * Vibrato and Tremolo effects are zero. - * Cutoff is maximum. - * Chorus and Reverb effects are zero. - */ -static void -awe_init_voice_parm(awe_voice_parm *pp) -{ - pp->moddelay = 0x8000; - pp->modatkhld = 0x7f7f; - pp->moddcysus = 0x7f7f; - pp->modrelease = 0x807f; - pp->modkeyhold = 0; - pp->modkeydecay = 0; - - pp->voldelay = 0x8000; - pp->volatkhld = 0x7f7f; - pp->voldcysus = 0x7f7f; - pp->volrelease = 0x807f; - pp->volkeyhold = 0; - pp->volkeydecay = 0; - - pp->lfo1delay = 0x8000; - pp->lfo2delay = 0x8000; - pp->pefe = 0; - - pp->fmmod = 0; - pp->tremfrq = 0; - pp->fm2frq2 = 0; - - pp->cutoff = 0xff; - pp->filterQ = 0; - - pp->chorus = 0; - pp->reverb = 0; -} - - -/* convert frequency mHz to abstract cents (= midi key * 100) */ -static int -freq_to_note(int mHz) -{ - /* abscents = log(mHz/8176) / log(2) * 1200 */ - unsigned long max_val = (unsigned long)0xffffffff / 10000; - int i, times; - unsigned long base; - unsigned long freq; - int note, tune; - - if (mHz == 0) - return 0; - if (mHz < 0) - return 12799; /* maximum */ - - freq = mHz; - note = 0; - for (base = 8176 * 2; freq >= base; base *= 2) { - note += 12; - if (note >= 128) /* over maximum */ - return 12799; - } - base /= 2; - - /* to avoid overflow... */ - times = 10000; - while (freq > max_val) { - max_val *= 10; - times /= 10; - base /= 10; - } - - freq = freq * times / base; - for (i = 0; i < 12; i++) { - if (freq < semitone_tuning[i+1]) - break; - note++; - } - - tune = 0; - freq = freq * 10000 / semitone_tuning[i]; - for (i = 0; i < 100; i++) { - if (freq < cent_tuning[i+1]) - break; - tune++; - } - - return note * 100 + tune; -} - - -/* convert Hz to AWE32 rate offset: - * sample pitch offset for the specified sample rate - * rate=44100 is no offset, each 4096 is 1 octave (twice). - * eg, when rate is 22050, this offset becomes -4096. - */ -static int -calc_rate_offset(int Hz) -{ - /* offset = log(Hz / 44100) / log(2) * 4096 */ - int freq, base, i; - - /* maybe smaller than max (44100Hz) */ - if (Hz <= 0 || Hz >= 44100) return 0; - - base = 0; - for (freq = Hz * 2; freq < 44100; freq *= 2) - base++; - base *= 1200; - - freq = 44100 * 10000 / (freq/2); - for (i = 0; i < 12; i++) { - if (freq < semitone_tuning[i+1]) - break; - base += 100; - } - freq = freq * 10000 / semitone_tuning[i]; - for (i = 0; i < 100; i++) { - if (freq < cent_tuning[i+1]) - break; - base++; - } - return -base * 4096 / 1200; -} - - -/*---------------------------------------------------------------- - * convert envelope time parameter to AWE32 raw parameter - *----------------------------------------------------------------*/ - -/* attack & decay/release time table (mHz) */ -static short attack_time_tbl[128] = { -32767, 5939, 3959, 2969, 2375, 1979, 1696, 1484, 1319, 1187, 1079, 989, 913, 848, 791, 742, - 698, 659, 625, 593, 565, 539, 516, 494, 475, 456, 439, 424, 409, 395, 383, 371, - 359, 344, 330, 316, 302, 290, 277, 266, 255, 244, 233, 224, 214, 205, 196, 188, - 180, 173, 165, 158, 152, 145, 139, 133, 127, 122, 117, 112, 107, 103, 98, 94, - 90, 86, 83, 79, 76, 73, 69, 67, 64, 61, 58, 56, 54, 51, 49, 47, - 45, 43, 41, 39, 38, 36, 35, 33, 32, 30, 29, 28, 27, 25, 24, 23, - 22, 21, 20, 20, 19, 18, 17, 16, 16, 15, 14, 14, 13, 13, 12, 11, - 11, 10, 10, 10, 9, 9, 8, 8, 8, 7, 7, 7, 6, 6, 6, 0, -}; - -static short decay_time_tbl[128] = { -32767, 3651, 3508, 3371, 3239, 3113, 2991, 2874, 2761, 2653, 2550, 2450, 2354, 2262, 2174, 2089, - 2007, 1928, 1853, 1781, 1711, 1644, 1580, 1518, 1459, 1401, 1347, 1294, 1243, 1195, 1148, 1103, - 1060, 1018, 979, 940, 904, 868, 834, 802, 770, 740, 711, 683, 657, 631, 606, 582, - 560, 538, 517, 496, 477, 458, 440, 423, 407, 391, 375, 361, 347, 333, 320, 307, - 295, 284, 273, 262, 252, 242, 232, 223, 215, 206, 198, 190, 183, 176, 169, 162, - 156, 150, 144, 138, 133, 128, 123, 118, 113, 109, 104, 100, 96, 93, 89, 85, - 82, 79, 76, 73, 70, 67, 64, 62, 60, 57, 55, 53, 51, 49, 47, 45, - 43, 41, 40, 38, 37, 35, 34, 32, 31, 30, 29, 28, 27, 25, 24, 0, -}; - -/* -static int -calc_parm_delay(int msec) -{ - return (0x8000 - msec * 1000 / 725); -} -*/ - -static int -calc_parm_hold(int msec) -{ - int val = 0x7f - (unsigned char)(msec / 92); - if (val < 1) val = 1; - if (val > 127) val = 127; - return val; -} - -static int -calc_parm_attack(int msec) -{ - return calc_parm_search(msec, attack_time_tbl); -} - -static int -calc_parm_decay(int msec) -{ - return calc_parm_search(msec, decay_time_tbl); -} - -static int -calc_parm_search(int msec, short *table) -{ - int left = 0, right = 127, mid; - while (left < right) { - mid = (left + right) / 2; - if (msec < (int)table[mid]) - left = mid + 1; - else - right = mid; - } - return left; -} - - -/*================================================================ - * effects table - *================================================================*/ - -/* set an effect value */ -#define FX_SET(v,type,value) \ -(voices[v].fx_flags[(type)/8] |= (1<<((type)%8)),\ - voices[v].fx[type] = (value)) -/* check the effect value is set */ -#define FX_ON(v,type) (voices[v].fx_flags[(type)/8] & (1<<((type)%8))) - -#if 0 -#define FX_BYTE(v,type,value)\ - (FX_ON(v,type) ? (unsigned char)voices[v].fx[type] :\ - (unsigned char)(value)) -#define FX_WORD(v,type,value)\ - (FX_ON(v,type) ? (unsigned short)voices[v].fx[type] :\ - (unsigned short)(value)) - -#else - -/* get byte effect value */ -static unsigned char FX_BYTE(int v, int type, unsigned char value) -{ - unsigned char tmp; - if (FX_ON(v,type)) - tmp = (unsigned char)voices[v].fx[type]; - else - tmp = value; - DEBUG(4,printk("AWE32: [-- byte(%d) = %x]\n", type, tmp)); - return tmp; -} - -/* get word effect value */ -static unsigned short FX_WORD(int v, int type, unsigned short value) -{ - unsigned short tmp; - if (FX_ON(v,type)) - tmp = (unsigned short)voices[v].fx[type]; - else - tmp = value; - DEBUG(4,printk("AWE32: [-- word(%d) = %x]\n", type, tmp)); - return tmp; -} - -#endif - -/* get word (upper=type1/lower=type2) effect value */ -static unsigned short FX_COMB(int v, int type1, int type2, unsigned short value) -{ - unsigned short tmp; - if (FX_ON(v, type1)) - tmp = (unsigned short)(voices[v].fx[type1]) << 8; - else - tmp = value & 0xff00; - if (FX_ON(v, type2)) - tmp |= (unsigned short)(voices[v].fx[type2]) & 0xff; - else - tmp |= value & 0xff; - DEBUG(4,printk("AWE32: [-- comb(%d/%d) = %x]\n", type1, type2, tmp)); - return tmp; -} - -/* address offset */ -static long -FX_OFFSET(int voice, int lo, int hi) -{ - awe_voice_info *vp; - long addr; - if ((vp = voices[voice].sample) == NULL || vp->index < 0) - return 0; - - addr = 0; - if (FX_ON(voice, hi)) { - addr = (short)voices[voice].fx[hi]; - addr = addr << 15; - } - if (FX_ON(voice, lo)) - addr += (short)voices[voice].fx[lo]; - if (!(vp->mode & (AWE_SAMPLE_8BITS<<6))) - addr /= 2; - return addr; -} - -/* converter function table for realtime paramter change */ - -typedef void (*fx_affect_func)(int voice); -static fx_affect_func fx_realtime[] = { - /* env1: delay, attack, hold, decay, release, sustain, pitch, cutoff*/ - NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, - /* env2: delay, attack, hold, decay, release, sustain */ - NULL, NULL, NULL, NULL, NULL, NULL, - /* lfo1: delay, freq, volume, pitch, cutoff */ - NULL, awe_fx_tremfrq, awe_fx_tremfrq, awe_fx_fmmod, awe_fx_fmmod, - /* lfo2: delay, freq, pitch */ - NULL, awe_fx_fm2frq2, awe_fx_fm2frq2, - /* global: initpitch, chorus, reverb, cutoff, filterQ */ - awe_fx_initpitch, NULL, NULL, awe_fx_cutoff, NULL, - /* sample: start, loopstart, loopend */ - NULL, NULL, NULL, -}; - - -/*================================================================ - * turn on/off sample - *================================================================*/ - -static void -awe_note_on(int voice) -{ - unsigned long temp; - long addr; - unsigned short tmp2; - awe_voice_info *vp; - - /* A voice sample must assigned before calling */ - if ((vp = voices[voice].sample) == NULL || vp->index < 0) - return; - - /* channel to be silent and idle */ - awe_poke(AWE_DCYSUSV(voice), 0x0080); - awe_poke(AWE_VTFT(voice), 0); - awe_poke(AWE_CVCF(voice), 0); - awe_poke(AWE_PTRX(voice), 0); - awe_poke(AWE_CPF(voice), 0); - - /* modulation & volume envelope */ - awe_poke(AWE_ENVVAL(voice), - FX_WORD(voice, AWE_FX_ENV1_DELAY, vp->parm.moddelay)); - awe_poke(AWE_ATKHLD(voice), - FX_COMB(voice, AWE_FX_ENV1_ATTACK, AWE_FX_ENV1_HOLD, - vp->parm.modatkhld)); - awe_poke(AWE_DCYSUS(voice), - FX_COMB(voice, AWE_FX_ENV1_SUSTAIN, AWE_FX_ENV1_DECAY, - vp->parm.moddcysus)); - awe_poke(AWE_ENVVOL(voice), - FX_WORD(voice, AWE_FX_ENV2_DELAY, vp->parm.voldelay)); - awe_poke(AWE_ATKHLDV(voice), - FX_COMB(voice, AWE_FX_ENV2_ATTACK, AWE_FX_ENV2_HOLD, - vp->parm.volatkhld)); - /* decay/sustain parameter for volume envelope must be set at last */ - - /* pitch offset */ - awe_poke(AWE_IP(voice), voices[voice].apitch); - DEBUG(3,printk("AWE32: [-- pitch=%x]\n", voices[voice].apitch)); - - /* cutoff and volume */ - tmp2 = FX_BYTE(voice, AWE_FX_CUTOFF, vp->parm.cutoff); - tmp2 = (tmp2 << 8) | voices[voice].avol; - awe_poke(AWE_IFATN(voice), tmp2); - - /* modulation envelope heights */ - awe_poke(AWE_PEFE(voice), - FX_COMB(voice, AWE_FX_ENV1_PITCH, AWE_FX_ENV1_CUTOFF, - vp->parm.pefe)); - - /* lfo1/2 delay */ - awe_poke(AWE_LFO1VAL(voice), - FX_WORD(voice, AWE_FX_LFO1_DELAY, vp->parm.lfo1delay)); - awe_poke(AWE_LFO2VAL(voice), - FX_WORD(voice, AWE_FX_LFO2_DELAY, vp->parm.lfo2delay)); - - /* lfo1 pitch & cutoff shift */ - awe_poke(AWE_FMMOD(voice), - FX_COMB(voice, AWE_FX_LFO1_PITCH, AWE_FX_LFO1_CUTOFF, - vp->parm.fmmod)); - /* lfo1 volume & freq */ - awe_poke(AWE_TREMFRQ(voice), - FX_COMB(voice, AWE_FX_LFO1_VOLUME, AWE_FX_LFO1_FREQ, - vp->parm.tremfrq)); - /* lfo2 pitch & freq */ - awe_poke(AWE_FM2FRQ2(voice), - FX_COMB(voice, AWE_FX_LFO2_PITCH, AWE_FX_LFO2_FREQ, - vp->parm.fm2frq2)); - - /* pan & loop start */ - awe_set_pan(voice, 1); - - /* chorus & loop end (chorus 8bit, MSB) */ - addr = vp->loopend - 1; - addr += FX_OFFSET(voice, AWE_FX_LOOP_END, - AWE_FX_COARSE_LOOP_END); - temp = FX_BYTE(voice, AWE_FX_CHORUS, vp->parm.chorus); - temp = (temp <<24) | (unsigned long)addr; - awe_poke_dw(AWE_CSL(voice), temp); - - /* Q & current address (Q 4bit value, MSB) */ - addr = vp->start - 1; - addr += FX_OFFSET(voice, AWE_FX_SAMPLE_START, - AWE_FX_COARSE_SAMPLE_START); - temp = FX_BYTE(voice, AWE_FX_FILTERQ, vp->parm.filterQ); - temp = (temp<<28) | (unsigned long)addr; - awe_poke_dw(AWE_CCCA(voice), temp); - - /* reset volume */ - awe_poke_dw(AWE_VTFT(voice), 0x0000FFFF); - awe_poke_dw(AWE_CVCF(voice), 0x0000FFFF); - - /* turn on envelope */ - awe_poke(AWE_DCYSUSV(voice), - FX_COMB(voice, AWE_FX_ENV2_SUSTAIN, AWE_FX_ENV2_DECAY, - vp->parm.voldcysus)); - /* set chorus */ - temp = FX_BYTE(voice, AWE_FX_REVERB, vp->parm.reverb); - temp = (awe_peek_dw(AWE_PTRX(voice)) & 0xffff0000) | (temp<<8); - awe_poke_dw(AWE_PTRX(voice), temp); - awe_poke_dw(AWE_CPF(voice), 0x40000000); - - DEBUG(3,printk("AWE32: [-- start=%x loop=%x]\n", - (int)vp->start, (int)vp->loopstart)); -} - -/* turn off the voice */ -static void -awe_note_off(int voice) -{ - awe_voice_info *vp; - unsigned short tmp; - if ((vp = voices[voice].sample) == NULL || !voices[voice].state) - return; - if (FX_ON(voice, AWE_FX_ENV1_RELEASE)) - tmp = 0x8000 | voices[voice].fx[AWE_FX_ENV1_RELEASE]; - else - tmp = vp->parm.modrelease; - awe_poke(AWE_DCYSUS(voice), tmp); - if (FX_ON(voice, AWE_FX_ENV2_RELEASE)) - tmp = 0x8000 | voices[voice].fx[AWE_FX_ENV2_RELEASE]; - else - tmp = vp->parm.volrelease; - awe_poke(AWE_DCYSUSV(voice), tmp); -} - -/* force to terminate the voice (no releasing echo) */ -static void -awe_terminate(int voice) -{ - awe_poke(AWE_DCYSUSV(voice), 0x807F); -} - - -/* turn off other voices with the same exclusive class (for drums) */ -static void -awe_exclusive_off(int voice) -{ - int i, excls; - - if (voices[voice].sample == NULL) /* no sample */ - return; - excls = voices[voice].sample->exclusiveClass; - if (excls == 0) /* not exclusive */ - return; - - /* turn off voices with the same class */ - for (i = 0; i < awe_max_voices; i++) { - if (i != voice && voices[voice].state && - voices[i].sample && - voices[i].sample->exclusiveClass == excls) { - DEBUG(4,printk("AWE32: [exoff(%d)]\n", i)); - awe_note_off(i); - awe_voice_init(i, 1); - } - } -} - - -/*================================================================ - * change the parameters of an audible voice - *================================================================*/ - -/* change pitch */ -static void -awe_set_pitch(int voice) -{ - if (!voices[voice].state) return; - awe_poke(AWE_IP(voice), voices[voice].apitch); -} - -/* change volume */ -static void -awe_set_volume(int voice) -{ - awe_voice_info *vp; - unsigned short tmp2; - if (!voices[voice].state) return; - if ((vp = voices[voice].sample) == NULL || vp->index < 0) - return; - tmp2 = FX_BYTE(voice, AWE_FX_CUTOFF, vp->parm.cutoff); - tmp2 = (tmp2 << 8) | voices[voice].avol; - awe_poke(AWE_IFATN(voice), tmp2); -} - -/* change pan; this could make a click noise.. */ -static void -awe_set_pan(int voice, int forced) -{ - unsigned long temp; - long addr; - awe_voice_info *vp; - - if (!voices[voice].state && !forced) return; - if ((vp = voices[voice].sample) == NULL || vp->index < 0) - return; - - /* pan & loop start (pan 8bit, MSB, 0:right, 0xff:left) */ - if (vp->fixpan > 0) /* 0-127 */ - temp = 255 - (int)vp->fixpan * 2; - else { - int pos = 0; - if (vp->pan >= 0) /* 0-127 */ - pos = (int)vp->pan * 2 - 128; - pos += voices[voice].panning; /* -128 - 127 */ - pos = 127 - pos; - if (pos < 0) - temp = 0; - else if (pos > 255) - temp = 255; - else - temp = pos; - } - addr = vp->loopstart - 1; - addr += FX_OFFSET(voice, AWE_FX_LOOP_START, - AWE_FX_COARSE_LOOP_START); - temp = (temp<<24) | (unsigned long)addr; - awe_poke_dw(AWE_PSST(voice), temp); -} - -/* effects change during playing */ -static void -awe_fx_fmmod(int voice) -{ - awe_voice_info *vp; - if (!voices[voice].state) return; - if ((vp = voices[voice].sample) == NULL || vp->index < 0) - return; - awe_poke(AWE_FMMOD(voice), - FX_COMB(voice, AWE_FX_LFO1_PITCH, AWE_FX_LFO1_CUTOFF, - vp->parm.fmmod)); -} - -static void -awe_fx_tremfrq(int voice) -{ - awe_voice_info *vp; - if (!voices[voice].state) return; - if ((vp = voices[voice].sample) == NULL || vp->index < 0) - return; - awe_poke(AWE_TREMFRQ(voice), - FX_COMB(voice, AWE_FX_LFO1_VOLUME, AWE_FX_LFO1_FREQ, - vp->parm.tremfrq)); -} - -static void -awe_fx_fm2frq2(int voice) -{ - awe_voice_info *vp; - if (!voices[voice].state) return; - if ((vp = voices[voice].sample) == NULL || vp->index < 0) - return; - awe_poke(AWE_FM2FRQ2(voice), - FX_COMB(voice, AWE_FX_LFO2_PITCH, AWE_FX_LFO2_FREQ, - vp->parm.fm2frq2)); -} - -static void -awe_fx_cutoff(int voice) -{ - unsigned short tmp2; - awe_voice_info *vp; - if (!voices[voice].state) return; - if ((vp = voices[voice].sample) == NULL || vp->index < 0) - return; - tmp2 = FX_BYTE(voice, AWE_FX_CUTOFF, vp->parm.cutoff); - tmp2 = (tmp2 << 8) | voices[voice].avol; - awe_poke(AWE_IFATN(voice), tmp2); -} - -static void -awe_fx_initpitch(int voice) -{ - if (!voices[voice].state) return; - if (FX_ON(voice, AWE_FX_INIT_PITCH)) { - DEBUG(3,printk("AWE32: initpitch ok\n")); - } else { - DEBUG(3,printk("AWE32: BAD initpitch %d\n", AWE_FX_INIT_PITCH)); - } - awe_calc_pitch(voice); - awe_poke(AWE_IP(voice), voices[voice].apitch); -} - - -/*================================================================ - * calculate pitch offset - *---------------------------------------------------------------- - * 0xE000 is no pitch offset at 44100Hz sample. - * Every 4096 is one octave. - *================================================================*/ - -static void -awe_calc_pitch(int voice) -{ - voice_info *vp = &voices[voice]; - awe_voice_info *ap; - int offset; - - /* search voice information */ - if ((ap = vp->sample) == NULL) - return; - if (ap->index < 0) { - if (awe_set_sample(ap) < 0) - return; - } - - /* calculate offset */ - if (ap->fixkey >= 0) { - DEBUG(3,printk("AWE32: p-> fixkey(%d) tune(%d)\n", ap->fixkey, ap->tune)); - offset = (ap->fixkey - ap->root) * 4096 / 12; - } else { - DEBUG(3,printk("AWE32: p(%d)-> root(%d) tune(%d)\n", vp->note, ap->root, ap->tune)); - offset = (vp->note - ap->root) * 4096 / 12; - DEBUG(4,printk("AWE32: p-> ofs=%d\n", offset)); - } - offset += ap->tune * 4096 / 1200; - DEBUG(4,printk("AWE32: p-> tune+ ofs=%d\n", offset)); - if (vp->bender != 0) { - DEBUG(3,printk("AWE32: p-> bend(%d) %d\n", voice, vp->bender)); - /* (819200: 1 semitone) ==> (4096: 12 semitones) */ - offset += vp->bender * vp->bender_range / 2400; - } - offset = (offset * ap->scaleTuning) / 100; - DEBUG(4,printk("AWE32: p-> scale* ofs=%d\n", offset)); - - /* add initial pitch correction */ - if (FX_ON(voice, AWE_FX_INIT_PITCH)) { - DEBUG(3,printk("AWE32: fx_pitch(%d) %d\n", voice, vp->fx[AWE_FX_INIT_PITCH])); - offset += vp->fx[AWE_FX_INIT_PITCH]; - } - - /* 0xe000: root pitch */ - vp->apitch = 0xe000 + ap->rate_offset + offset; - DEBUG(4,printk("AWE32: p-> sum aofs=%x, rate_ofs=%d\n", vp->apitch, ap->rate_offset)); - if (vp->apitch > 0xffff) - vp->apitch = 0xffff; - if (vp->apitch < 0) - vp->apitch = 0; -} - - -static void -awe_calc_pitch_from_freq(int voice, int freq) -{ - voice_info *vp = &voices[voice]; - awe_voice_info *ap; - int offset; - int note; - - /* search voice information */ - if ((ap = vp->sample) == NULL) - return; - if (ap->index < 0) { - if (awe_set_sample(ap) < 0) - return; - } - note = freq_to_note(freq); - offset = (note - ap->root * 100 + ap->tune) * 4096 / 1200; - offset = (offset * ap->scaleTuning) / 100; - if (FX_ON(voice, AWE_FX_INIT_PITCH)) - offset += vp->fx[AWE_FX_INIT_PITCH]; - vp->apitch = 0xe000 + ap->rate_offset + offset; - if (vp->apitch > 0xffff) - vp->apitch = 0xffff; - if (vp->apitch < 0) - vp->apitch = 0; -} - -/*================================================================ - * calculate volume attenuation - *---------------------------------------------------------------- - * Voice volume is controlled by volume attenuation parameter. - * So volume becomes maximum when avol is 0 (no attenuation), and - * minimum when 255 (-96dB or silence). - *================================================================*/ - -static int vol_table[128] = { - 255,111,95,86,79,74,70,66,63,61,58,56,54,52,50,49, - 47,46,45,43,42,41,40,39,38,37,36,35,34,34,33,32, - 31,31,30,29,29,28,27,27,26,26,25,24,24,23,23,22, - 22,21,21,21,20,20,19,19,18,18,18,17,17,16,16,16, - 15,15,15,14,14,14,13,13,13,12,12,12,11,11,11,10, - 10,10,10,9,9,9,8,8,8,8,7,7,7,7,6,6, - 6,6,5,5,5,5,5,4,4,4,4,3,3,3,3,3, - 2,2,2,2,2,1,1,1,1,1,0,0,0,0,0,0, -}; - -static void -awe_calc_volume(int voice) -{ - voice_info *vp = &voices[voice]; - awe_voice_info *ap; - int vol; - - /* search voice information */ - if ((ap = vp->sample) == NULL) - return; - - ap = vp->sample; - if (ap->index < 0) { - if (awe_set_sample(ap) < 0) - return; - } - - if (vp->velocity < ap->vellow) - vp->velocity = ap->vellow; - else if (vp->velocity > ap->velhigh) - vp->velocity = ap->velhigh; - - /* 0 - 127 */ - vol = (vp->velocity * vp->main_vol * vp->expression_vol) / (127*127); - vol = vol * ap->amplitude / 127; - if (vol < 0) vol = 0; - if (vol > 127) vol = 127; - - /* calc to attenuation */ - vol = vol_table[vol]; - vol = vol + (int)ap->attenuation + init_atten; - if (vol > 255) vol = 255; - - vp->avol = vol; - DEBUG(3,printk("AWE32: [-- voice(%d) vol=%x]\n", voice, vol)); -} - - -/*================================================================ - * synth operation routines - *================================================================*/ - -/* initialize the voice */ -static void -awe_voice_init(int voice, int inst_only) -{ - if (! inst_only) { - /* clear voice parameters */ - voices[voice].note = -1; - voices[voice].velocity = 0; - voices[voice].panning = 0; /* zero center */ - voices[voice].bender = 0; /* zero tune skew */ - voices[voice].bender_range = 200; /* sense * 100 */ - voices[voice].main_vol = 127; - voices[voice].expression_vol = 127; - voices[voice].bank = AWE_DEFAULT_BANK; - voices[voice].instr = -1; - voices[voice].vrec = NULL; - voices[voice].sample = NULL; - } - - /* clear voice mapping */ - voices[voice].state = 0; - voice_alloc->map[voice] = 0; - - /* emu8000 parameters */ - voices[voice].apitch = 0; - voices[voice].avol = 255; - - /* clear effects */ - BZERO(voices[voice].fx_flags, sizeof(voices[voice].fx_flags)); -} - - -/*---------------------------------------------------------------- - * device open / close - *----------------------------------------------------------------*/ - -/* open device: - * reset status of all voices, and clear sample position flag - */ -static int -awe_open(int dev, int mode) -{ - if (awe_busy) - return RET_ERROR(EBUSY); - - awe_busy = 1; - awe_reset(dev); - - /* clear sample position flag */ - loaded_once = 0; - - /* set GUS bank to default */ - awe_gus_bank = AWE_DEFAULT_BANK; - return 0; -} - - -/* close device: - * reset all voices again (terminate sounds) - */ -static void -awe_close(int dev) -{ - awe_reset(dev); - awe_busy = 0; -} - - -/* sequencer I/O control: - */ -static int -awe_ioctl(int dev, unsigned int cmd, caddr_t arg) -{ - switch (cmd) { - case SNDCTL_SYNTH_INFO: - awe_info.nr_voices = awe_max_voices; - IOCTL_TO_USER((char*)arg, 0, &awe_info, sizeof(awe_info)); - return 0; - break; - - case SNDCTL_SEQ_RESETSAMPLES: - awe_reset_samples(); - awe_reset(dev); /* better to reset emu8k chip... */ - return 0; - break; - - case SNDCTL_SEQ_PERCMODE: - /* what's this? */ - return 0; - break; - - case SNDCTL_SYNTH_MEMAVL: - DEBUG(0,printk("AWE32: [ioctl memavl = %d]\n", (int)free_mem_ptr)); - return awe_mem_size - free_mem_ptr*2; - - default: - ERRMSG(printk("AWE32: unsupported ioctl %d\n", cmd)); - return RET_ERROR(EINVAL); - } -} - - -/* kill a voice: - * not terminate, just release the voice. - */ -static int -awe_kill_note(int dev, int voice, int note, int velocity) -{ - awe_voice_info *vp; - DECL_INTR_FLAGS(flags); - - DEBUG(2,printk("AWE32: [off(%d)]\n", voice)); - if (voice < 0 || voice >= awe_max_voices) - return RET_ERROR(EINVAL); - if ((vp = voices[voice].sample) == NULL) - return 0; - - if (!(vp->mode & AWE_MODE_NORELEASE)) { - DISABLE_INTR(flags); - awe_note_off(voice); - RESTORE_INTR(flags); - } - awe_voice_init(voice, 1); - return 0; -} - - -/* search the note with the specified key range */ -static awe_voice_info * -awe_search_voice(int voice, int note) -{ - awe_voice_list *rec; - int maxc; - - for (rec = voices[voice].vrec, maxc = AWE_MAX_INFOS; - rec && maxc; rec = rec->next_instr, maxc--) { - if (rec->v.low <= note && note <= rec->v.high) - return &rec->v; - } - return NULL; -} - -/* start a voice: - * if note is 255, identical with aftertouch function. - * Otherwise, start a voice with specified not and volume. - */ -static int -awe_start_note(int dev, int v, int note_num, int volume) -{ - DECL_INTR_FLAGS(flags); - - DEBUG(2,printk("AWE32: [on(%d) nt=%d vl=%d]\n", v, note_num, volume)); - if (v < 0 || v >= awe_max_voices) - return RET_ERROR(EINVAL); - /* an instrument must be set before starting a note */ - if (voices[v].vrec == NULL) { - DEBUG(1,printk("AWE32: [-- vrec is null]\n")); - return 0; - } - - if (note_num == 255) { - /* dynamic volume change; sample is already assigned */ - if (! voices[v].state || voices[v].sample == NULL) - return 0; - /* calculate volume parameter */ - voices[v].velocity = volume; - awe_calc_volume(v); - DISABLE_INTR(flags); - awe_set_volume(v); - RESTORE_INTR(flags); - return 0; - } - /* assign a sample with the corresponding note */ - if ((voices[v].sample = awe_search_voice(v, note_num)) == NULL) { - DEBUG(1,printk("AWE32: [-- sample is null]\n")); - return 0; - } - /* calculate pitch & volume parameters */ - voices[v].note = note_num; - voices[v].velocity = volume; - awe_calc_pitch(v); - awe_calc_volume(v); - - DISABLE_INTR(flags); - /* turn off other voices (for drums) */ - awe_exclusive_off(v); - /* turn on the voice */ - awe_note_on(v); - voices[v].state = 1; /* flag up */ - RESTORE_INTR(flags); - - return 0; -} - - -/* search instrument from preset table with the specified bank */ -static awe_voice_list * -awe_search_instr(int bank, int preset) -{ - awe_voice_list *p; - int maxc; - - for (maxc = AWE_MAX_INFOS, p = preset_table[preset]; - p && maxc; p = p->next_bank, maxc--) { - if (p->bank == bank) - return p; - } - return NULL; -} - - -/* assign the instrument to a voice */ -static int -awe_set_instr(int dev, int voice, int instr_no) -{ - awe_voice_list *rec; - - if (voice < 0 || voice >= awe_max_voices) - return RET_ERROR(EINVAL); - - if (instr_no < 0 || instr_no >= AWE_MAX_PRESETS) - return RET_ERROR(EINVAL); - - if ((rec = awe_search_instr(voices[voice].bank, instr_no)) == NULL) { - /* if bank is not defined, use the default bank 0 */ - if (voices[voice].bank != AWE_DEFAULT_BANK && - (rec = awe_search_instr(AWE_DEFAULT_BANK, instr_no)) == NULL) { - DEBUG(1,printk("AWE32 Warning: can't find instrument %d\n", instr_no)); - return 0; - } - } - - voices[voice].instr = instr_no; - voices[voice].vrec = rec; - voices[voice].sample = NULL; /* not set yet */ - - return 0; -} - - -/* reset all voices; terminate sounds and initialize parameters */ -static void -awe_reset(int dev) -{ - int i; - /* don't turn off voice 31 and 32. they are used also for FM voices */ - for (i = 0; i < AWE_NORMAL_VOICES; i++) { - awe_terminate(i); - awe_voice_init(i, 0); - } - awe_init_fm(); - awe_tweak(); -} - - -/* hardware specific control: - * GUS specific and AWE32 specific controls are available. - */ -static void -awe_hw_control(int dev, unsigned char *event) -{ - int cmd = event[2]; - if (cmd & _AWE_MODE_FLAG) - awe_hw_awe_control(dev, cmd & _AWE_MODE_VALUE_MASK, event); - else - awe_hw_gus_control(dev, cmd & _AWE_MODE_VALUE_MASK, event); -} - -/* GUS compatible controls */ -static void -awe_hw_gus_control(int dev, int cmd, unsigned char *event) -{ - int voice; - unsigned short p1; - short p2; - int plong; - DECL_INTR_FLAGS(flags); - - voice = event[3]; - p1 = *(unsigned short *) &event[4]; - p2 = *(short *) &event[6]; - plong = *(int*) &event[4]; - - switch (cmd) { - case _GUS_NUMVOICES: - if (p1 >= awe_max_voices) - printk("AWE32: num_voices: voices out of range %d\n", p1); - break; - case _GUS_VOICESAMPLE: - if (voice < awe_max_voices) - awe_set_instr(dev, voice, p1); - break; - - case _GUS_VOICEON: - if (voice < awe_max_voices) { - DISABLE_INTR(flags); - awe_note_on(voice); - RESTORE_INTR(flags); - } - break; - - case _GUS_VOICEOFF: - if (voice < awe_max_voices) { - DISABLE_INTR(flags); - awe_note_off(voice); - RESTORE_INTR(flags); - } - break; - - case _GUS_VOICEMODE: - /* not supported */ - break; - - case _GUS_VOICEBALA: - /* -128 to 127 */ - if (voice < awe_max_voices) - awe_panning(dev, voice, (short)p1); - break; - - case _GUS_VOICEFREQ: - if (voice < awe_max_voices) - awe_calc_pitch_from_freq(voice, plong); - break; - - case _GUS_VOICEVOL: - case _GUS_VOICEVOL2: - /* not supported yet */ - break; - - case _GUS_RAMPRANGE: - case _GUS_RAMPRATE: - case _GUS_RAMPMODE: - case _GUS_RAMPON: - case _GUS_RAMPOFF: - /* volume ramping not supported */ - break; - - case _GUS_VOLUME_SCALE: - break; - - case _GUS_VOICE_POS: - if (voice < awe_max_voices) { - FX_SET(voice, AWE_FX_SAMPLE_START, (short)(plong & 0x7fff)); - FX_SET(voice, AWE_FX_COARSE_SAMPLE_START, (plong >> 15) & 0xffff); - } - break; - } -} - - -/* AWE32 specific controls */ -static void -awe_hw_awe_control(int dev, int cmd, unsigned char *event) -{ - int voice; - unsigned short p1; - short p2; - int chn; - - chn = event[1]; - voice = event[3]; - p1 = *(unsigned short *) &event[4]; - p2 = *(short *) &event[6]; - - -#ifdef AWE_DEBUG_ON - switch (cmd) { - case _AWE_DEBUG_MODE: - debug_mode = p1; - printk("AWE32: debug mode = %d\n", debug_mode); - break; -#endif - case _AWE_REVERB_MODE: - if (p1 <= 7) { - reverb_mode = p1; - DEBUG(0,printk("AWE32: reverb mode %d\n", reverb_mode)); - awe_set_reverb_mode(reverb_mode); - } - break; - - case _AWE_CHORUS_MODE: - if (p1 <= 7) { - chorus_mode = p1; - DEBUG(0,printk("AWE32: chorus mode %d\n", chorus_mode)); - awe_set_chorus_mode(chorus_mode); - } - break; - - case _AWE_REMOVE_LAST_SAMPLES: - DEBUG(0,printk("AWE32: remove last samples\n")); - awe_remove_samples(); - break; - - case _AWE_INITIALIZE_CHIP: - awe_initialize(); - break; - - case _AWE_SEND_EFFECT: - if (voice < awe_max_voices && p1 < AWE_FX_END) { - FX_SET(voice, p1, p2); - DEBUG(0,printk("AWE32: effects (%d) %d %d\n", voice, p1, voices[voice].fx[p1])); - if (fx_realtime[p1]) { - DEBUG(0,printk("AWE32: fx_realtime (%d)\n", voice)); - fx_realtime[p1](voice); - } - } - break; - - case _AWE_TERMINATE_CHANNEL: - if (voice < awe_max_voices) { - DEBUG(0,printk("AWE32: terminate (%d)\n", voice)); - awe_terminate(voice); - awe_voice_init(voice, 1); - } - break; - - case _AWE_TERMINATE_ALL: - DEBUG(0,printk("AWE32: terminate all\n")); - awe_reset(0); - break; - - case _AWE_INITIAL_VOLUME: - DEBUG(0,printk("AWE32: init attenuation %d\n", p1)); - init_atten = p1; - break; - - case _AWE_SET_GUS_BANK: - DEBUG(0,printk("AWE32: set gus bank %d\n", p1)); - awe_gus_bank = p1; - break; - - default: - DEBUG(0,printk("AWE32: hw control cmd=%d voice=%d\n", cmd, voice)); - break; - } -} - - -/*---------------------------------------------------------------- - * load a sound patch: - * three types of patches are accepted: AWE, GUS, and SYSEX. - *----------------------------------------------------------------*/ - -static int -awe_load_patch(int dev, int format, const char *addr, - int offs, int count, int pmgr_flag) -{ - awe_patch_info patch; - int rc = 0; - - if (format == GUS_PATCH) { - return awe_load_guspatch(addr, offs, count, pmgr_flag); - } else if (format == SYSEX_PATCH) { - /* no system exclusive message supported yet */ - return 0; - } else if (format != AWE_PATCH) { - FATALERR(printk("AWE32 Error: Invalid patch format (key) 0x%x\n", format)); - return RET_ERROR(EINVAL); - } - - if (count < sizeof(awe_patch_info)) { - FATALERR(printk("AWE32 Error: Patch header too short\n")); - return RET_ERROR(EINVAL); - } - COPY_FROM_USER(((char*)&patch) + offs, addr, offs, - sizeof(awe_patch_info) - offs); - - count -= sizeof(awe_patch_info); - if (count < patch.len) { - FATALERR(printk("AWE32 Warning: Patch record too short (%d<%d)\n", - count, (int)patch.len)); - patch.len = count; - } - - switch (patch.type) { - case AWE_LOAD_INFO: - rc = awe_load_info(&patch, addr); - break; - - case AWE_LOAD_DATA: - rc = awe_load_data(&patch, addr); - /* - if (!pmgr_flag && rc == 0) - pmgr_inform(dev, PM_E_PATCH_LOADED, instr, free_sample, 0, 0); - */ - break; - - default: - FATALERR(printk("AWE32 Error: unknown patch format type %d\n", - patch.type)); - rc = RET_ERROR(EINVAL); - } - - return rc; -} - - -/* load voice information data */ -static int -awe_load_info(awe_patch_info *patch, const char *addr) -{ - awe_voice_list *rec, *curp; - long offset; - short i, nvoices; - unsigned char bank, instr; - int total_size; - - if (patch->len < sizeof(awe_voice_rec)) { - FATALERR(printk("AWE32 Error: invalid patch info length\n")); - return RET_ERROR(EINVAL); - } - - offset = sizeof(awe_patch_info); - GET_BYTE_FROM_USER(bank, addr, offset); offset++; - GET_BYTE_FROM_USER(instr, addr, offset); offset++; - GET_SHORT_FROM_USER(nvoices, addr, offset); offset+=2; - - if (nvoices <= 0 || nvoices >= 100) { - FATALERR(printk("AWE32 Error: Illegal voice number %d\n", nvoices)); - return RET_ERROR(EINVAL); - } - if (free_info + nvoices > AWE_MAX_INFOS) { - ERRMSG(printk("AWE32 Error: Too many voice informations\n")); - return RET_ERROR(ENOSPC); - } - - total_size = sizeof(awe_voice_rec) + sizeof(awe_voice_info) * nvoices; - if (patch->len < total_size) { - ERRMSG(printk("AWE32 Error: patch length(%d) is smaller than nvoices(%d)\n", - (int)patch->len, nvoices)); - return RET_ERROR(EINVAL); - } - - curp = awe_search_instr(bank, instr); - for (i = 0; i < nvoices; i++) { - rec = &infos[free_info + i]; - - rec->bank = bank; - rec->instr = instr; - if (i < nvoices - 1) - rec->next_instr = rec + 1; - else - rec->next_instr = curp; - rec->next_bank = NULL; - - /* copy awe_voice_info parameters */ - COPY_FROM_USER(&rec->v, addr, offset, sizeof(awe_voice_info)); - offset += sizeof(awe_voice_info); - rec->v.sf_id = current_sf_id; - if (rec->v.mode & AWE_MODE_INIT_PARM) - awe_init_voice_parm(&rec->v.parm); - awe_set_sample(&rec->v); - } - - /* prepend to top of the list */ - infos[free_info].next_bank = preset_table[instr]; - preset_table[instr] = &infos[free_info]; - free_info += nvoices; - - return 0; -} - - -/* load wave sample data */ -static int -awe_load_data(awe_patch_info *patch, const char *addr) -{ - long offset; - int size; - int rc; - - if (free_sample >= AWE_MAX_SAMPLES) { - ERRMSG(printk("AWE32 Error: Sample table full\n")); - return RET_ERROR(ENOSPC); - } - - size = (patch->len - sizeof(awe_sample_info)) / 2; - offset = sizeof(awe_patch_info); - COPY_FROM_USER(&samples[free_sample], addr, offset, - sizeof(awe_sample_info)); - offset += sizeof(awe_sample_info); - if (size != samples[free_sample].size) { - ERRMSG(printk("AWE32 Warning: sample size differed (%d != %d)\n", - (int)samples[free_sample].size, (int)size)); - samples[free_sample].size = size; - } - if (samples[free_sample].size > 0) - if ((rc = awe_write_wave_data(addr, offset, size)) != 0) - return rc; - - awe_check_loaded(); - samples[free_sample].sf_id = current_sf_id; - - free_sample++; - return 0; -} - -/* check the other samples are already loaded */ -static void -awe_check_loaded(void) -{ - if (!loaded_once) { - /* it's the first time */ - last_sample = free_sample; - last_info = free_info; - current_sf_id++; - loaded_once = 1; - } -} - - -/*----------------------------------------------------------------*/ - -static const char *readbuf_addr; -static long readbuf_offs; -static int readbuf_flags; - -#ifdef AWE_USE_BUFFERED_IO - -#define TMP_WAVBUF_SIZE 4096 -static unsigned short readbuf[TMP_WAVBUF_SIZE]; -static int readbuf_size, readbuf_cur, readbuf_left; - -/* read through temporary buffer */ -static unsigned short -awe_readbuf_word(int pos) -{ - if (readbuf_left <= 0) { - int i; - if (readbuf_size - pos < TMP_WAVBUF_SIZE) - readbuf_left = readbuf_size - pos; - else - readbuf_left = TMP_WAVBUF_SIZE; - /* read from user buffer */ - if (readbuf_flags & AWE_SAMPLE_8BITS) { - unsigned char *pbuf = (unsigned char *)readbuf; - COPY_FROM_USER(pbuf, readbuf_addr, - readbuf_offs + pos, readbuf_left); - /* convert 8bit -> 16bit */ - for (i = readbuf_left - 1; i >= 0; i--) - readbuf[i] = pbuf[i] << 8; - } else { - COPY_FROM_USER(readbuf, readbuf_addr, - readbuf_offs + pos * 2, readbuf_left*2); - } - - if (readbuf_flags & AWE_SAMPLE_UNSIGNED) { - /* unsigned -> signed */ - for (i = 0; i < readbuf_left; i++) - readbuf[i] ^= 0x8000; - } - readbuf_cur = 0; - } - - readbuf_left--; - return readbuf[readbuf_cur++]; -} - -#else /* AWE_USE_BUFFERED_IO */ - -#define awe_readbuf_word(pos) awe_read_word(pos) - -#endif /* AWE_USE_BUFFERED_IO */ - - -/* initialize read buffer */ -static void -awe_init_readbuf(const char *addr, long offset, int size, int mode_flags) -{ - readbuf_addr = addr; - readbuf_offs = offset; - readbuf_flags = mode_flags; -#ifdef AWE_USE_BUFFERED_IO - readbuf_size = size; - readbuf_left = 0; - readbuf_cur = 0; -#endif -} - -/* read directly from user buffer */ -static unsigned short -awe_read_word(int pos) -{ - unsigned short c; - /* read from user buffer */ - if (readbuf_flags & AWE_SAMPLE_8BITS) { - unsigned char cc; - GET_BYTE_FROM_USER(cc, readbuf_addr, readbuf_offs + pos); - c = cc << 8; /* convert 8bit -> 16bit */ - } else { - GET_SHORT_FROM_USER(c, readbuf_addr, readbuf_offs + pos * 2); - } - if (readbuf_flags & AWE_SAMPLE_UNSIGNED) - c ^= 0x8000; /* unsigned -> signed */ - return c; -} - - - -#define BLANK_LOOP_START 8 -#define BLANK_LOOP_END 40 -#define BLANK_LOOP_SIZE 48 - -/* loading onto memory */ -static int -awe_write_wave_data(const char *addr, long offset, int size) -{ - awe_sample_info *sp = &samples[free_sample]; - int i, truesize; - int rc; - unsigned long csum1, csum2; - DECL_INTR_FLAGS(flags); - - /* be sure loop points start < end */ - if (sp->loopstart > sp->loopend) { - long tmp = sp->loopstart; - sp->loopstart = sp->loopend; - sp->loopend = tmp; - } - - /* compute true data size to be loaded */ - truesize = size; - if (sp->mode_flags & AWE_SAMPLE_BIDIR_LOOP) - truesize += sp->loopend - sp->loopstart; - if (sp->mode_flags & AWE_SAMPLE_NO_BLANK) - truesize += BLANK_LOOP_SIZE; - if (size > 0 && free_mem_ptr + truesize >= awe_mem_size/2) { - ERRMSG(printk("AWE32 Error: Sample memory full\n")); - return RET_ERROR(ENOSPC); - } - - /* recalculate address offset */ - sp->end -= sp->start; - sp->loopstart -= sp->start; - sp->loopend -= sp->start; - sp->size = truesize; - - sp->start = free_mem_ptr + AWE_DRAM_OFFSET; - sp->end += free_mem_ptr + AWE_DRAM_OFFSET; - sp->loopstart += free_mem_ptr + AWE_DRAM_OFFSET; - sp->loopend += free_mem_ptr + AWE_DRAM_OFFSET; - - DISABLE_INTR(flags); - if ((rc = awe_open_dram_for_write(free_mem_ptr)) != 0) { - RESTORE_INTR(flags); - return rc; - } - - awe_init_readbuf(addr, offset, size, sp->mode_flags); - csum1 = 0; - for (i = 0; i < size; i++) { - unsigned short c; - c = awe_readbuf_word(i); - csum1 += c; - awe_write_dram(c); - if (i == sp->loopend && - (sp->mode_flags & AWE_SAMPLE_BIDIR_LOOP)) { - int looplen = sp->loopend - sp->loopstart; - /* copy reverse loop */ - int k; - for (k = 0; k < looplen; k++) { - /* non-buffered data */ - c = awe_read_word(i - k); - awe_write_dram(c); - } - } - } - - /* if no blank loop is attached in the sample, add it */ - if (sp->mode_flags & AWE_SAMPLE_NO_BLANK) { - for (i = 0; i < BLANK_LOOP_SIZE; i++) - awe_write_dram(0); - if (sp->mode_flags & AWE_SAMPLE_SINGLESHOT) { - sp->loopstart = sp->end + BLANK_LOOP_START; - sp->loopend = sp->end + BLANK_LOOP_END; - } - sp->size += BLANK_LOOP_SIZE; - } - - awe_close_dram(); - RESTORE_INTR(flags); - if (sp->checksum_flag) { -#ifdef AWE_CHECKSUM_DATA - if (sp->checksum_flag != 2 && csum1 != sp->checksum) { - ERRMSG(printk("AWE32: [%d] checksum mismatch on data %x:%x\n", - free_sample, - (int)samples[free_sample].checksum, - (int)csum1)); - return RET_ERROR(NO_DATA_ERR); - } -#endif /* AWE_CHECKSUM_DATA */ -#ifdef AWE_CHECKSUM_MEMORY - DISABLE_INTR(flags); - if (awe_open_dram_for_read(free_mem_ptr) == 0) { - csum2 = 0; - for (i = 0; i < size; i++) { - unsigned short c; - c = awe_peek(AWE_SMLD); - csum2 += c; - } - awe_close_dram_for_read(); - if (csum2 != samples[free_sample].checksum) { - RESTORE_INTR(flags); - ERRMSG(printk("AWE32: [%d] checksum mismatch on DRAM %x:%x\n", - free_sample, - (int)samples[free_sample].checksum, - (int)csum2)); - return RET_ERROR(NO_DATA_ERR); - } - } - RESTORE_INTR(flags); -#endif /* AWE_CHECKSUM_MEMORY */ - } - free_mem_ptr += sp->size; - - /* re-initialize FM passthrough */ - DISABLE_INTR(flags); - awe_init_fm(); - awe_tweak(); - RESTORE_INTR(flags); - - return 0; -} - - -/* calculate GUS envelope time: - * is this correct? i have no idea.. - */ -static int -calc_gus_envelope_time(int rate, int start, int end) -{ - int r, p, t; - r = (3 - ((rate >> 6) & 3)) * 3; - p = rate & 0x3f; - t = end - start; - if (t < 0) t = -t; - if (13 > r) - t = t << (13 - r); - else - t = t >> (r - 13); - return (t * 10) / (p * 441); -} - -#define calc_gus_sustain(val) (0x7f - vol_table[(val)/2]) -#define calc_gus_attenuation(val) vol_table[(val)/2] - -/* load GUS patch */ -static int -awe_load_guspatch(const char *addr, int offs, int size, int pmgr_flag) -{ - struct patch_info patch; - awe_voice_list *rec, *curp; - long sizeof_patch; - int note; - int rc; - - sizeof_patch = (long)&patch.data[0] - (long)&patch; /* header size */ - if (free_sample >= AWE_MAX_SAMPLES) { - ERRMSG(printk("AWE32 Error: Sample table full\n")); - return RET_ERROR(ENOSPC); - } - if (free_info >= AWE_MAX_INFOS) { - ERRMSG(printk("AWE32 Error: Too many voice informations\n")); - return RET_ERROR(ENOSPC); - } - if (size < sizeof_patch) { - ERRMSG(printk("AWE32 Error: Patch header too short\n")); - return RET_ERROR(EINVAL); - } - COPY_FROM_USER(((char*)&patch) + offs, addr, offs, sizeof_patch - offs); - size -= sizeof_patch; - if (size < patch.len) { - FATALERR(printk("AWE32 Warning: Patch record too short (%d<%d)\n", - size, (int)patch.len)); - patch.len = size; - } - - samples[free_sample].sf_id = 0; - samples[free_sample].sample = free_sample; - samples[free_sample].start = 0; - samples[free_sample].end = patch.len; - samples[free_sample].loopstart = patch.loop_start; - samples[free_sample].loopend = patch.loop_end; - samples[free_sample].size = patch.len; - - /* set up mode flags */ - samples[free_sample].mode_flags = 0; - if (!(patch.mode & WAVE_16_BITS)) - samples[free_sample].mode_flags |= AWE_SAMPLE_8BITS; - if (patch.mode & WAVE_UNSIGNED) - samples[free_sample].mode_flags |= AWE_SAMPLE_UNSIGNED; - samples[free_sample].mode_flags |= AWE_SAMPLE_NO_BLANK; - if (!(patch.mode & (WAVE_LOOPING|WAVE_BIDIR_LOOP))) - samples[free_sample].mode_flags |= AWE_SAMPLE_SINGLESHOT; - if (patch.mode & WAVE_BIDIR_LOOP) - samples[free_sample].mode_flags |= AWE_SAMPLE_BIDIR_LOOP; - - DEBUG(0,printk("AWE32: [sample %d mode %x]\n", patch.instr_no, - samples[free_sample].mode_flags)); - if (patch.mode & WAVE_16_BITS) { - /* convert to word offsets */ - samples[free_sample].size /= 2; - samples[free_sample].end /= 2; - samples[free_sample].loopstart /= 2; - samples[free_sample].loopend /= 2; - } - samples[free_sample].checksum_flag = 0; - samples[free_sample].checksum = 0; - - if ((rc = awe_write_wave_data(addr, sizeof_patch, - samples[free_sample].size)) != 0) - return rc; - - awe_check_loaded(); - samples[free_sample].sf_id = current_sf_id; - free_sample++; - - /* set up voice info */ - rec = &infos[free_info]; - awe_init_voice_info(&rec->v); - rec->v.sf_id = current_sf_id; - rec->v.sample = free_sample - 1; /* the last sample */ - rec->v.rate_offset = calc_rate_offset(patch.base_freq); - note = freq_to_note(patch.base_note); - rec->v.root = note / 100; - rec->v.tune = -(note % 100); - rec->v.low = freq_to_note(patch.low_note) / 100; - rec->v.high = freq_to_note(patch.high_note) / 100; - DEBUG(1,printk("AWE32: [gus base offset=%d, note=%d, range=%d-%d(%d-%d)]\n", - rec->v.rate_offset, note, - rec->v.low, rec->v.high, - patch.low_note, patch.high_note)); - /* panning position; -128 - 127 => 0-127 */ - rec->v.pan = (patch.panning + 128) / 2; - - /* detuning is ignored */ - /* 6points volume envelope */ - if (patch.mode & WAVE_ENVELOPES) { - int attack, hold, decay, release; - attack = calc_gus_envelope_time - (patch.env_rate[0], 0, patch.env_offset[0]); - hold = calc_gus_envelope_time - (patch.env_rate[1], patch.env_offset[0], - patch.env_offset[1]); - decay = calc_gus_envelope_time - (patch.env_rate[2], patch.env_offset[1], - patch.env_offset[2]); - release = calc_gus_envelope_time - (patch.env_rate[3], patch.env_offset[1], - patch.env_offset[4]); - release += calc_gus_envelope_time - (patch.env_rate[4], patch.env_offset[3], - patch.env_offset[4]); - release += calc_gus_envelope_time - (patch.env_rate[5], patch.env_offset[4], - patch.env_offset[5]); - rec->v.parm.volatkhld = (calc_parm_attack(attack) << 8) | - calc_parm_hold(hold); - rec->v.parm.voldcysus = (calc_gus_sustain(patch.env_offset[2]) << 8) | - calc_parm_decay(decay); - rec->v.parm.volrelease = 0x8000 | calc_parm_decay(release); - DEBUG(2,printk("AWE32: [gusenv atk=%d, hld=%d, dcy=%d, rel=%d]\n", attack, hold, decay, release)); - rec->v.attenuation = calc_gus_attenuation(patch.env_offset[0]); - } - - /* tremolo effect */ - if (patch.mode & WAVE_TREMOLO) { - int rate = (patch.tremolo_rate * 1000 / 38) / 42; - rec->v.parm.tremfrq = ((patch.tremolo_depth / 2) << 8) | rate; - DEBUG(2,printk("AWE32: [gusenv tremolo rate=%d, dep=%d, tremfrq=%x]\n", - patch.tremolo_rate, patch.tremolo_depth, - rec->v.parm.tremfrq)); - } - /* vibrato effect */ - if (patch.mode & WAVE_VIBRATO) { - int rate = (patch.vibrato_rate * 1000 / 38) / 42; - rec->v.parm.fm2frq2 = ((patch.vibrato_depth / 6) << 8) | rate; - DEBUG(2,printk("AWE32: [gusenv vibrato rate=%d, dep=%d, tremfrq=%x]\n", - patch.tremolo_rate, patch.tremolo_depth, - rec->v.parm.tremfrq)); - } - - /* scale_freq, scale_factor, volume, and fractions not implemented */ - - /* set the voice index */ - awe_set_sample(&rec->v); - - /* prepend to top of the list */ - curp = awe_search_instr(awe_gus_bank, patch.instr_no); - rec->bank = awe_gus_bank; - rec->instr = patch.instr_no; - rec->next_instr = curp; - rec->next_bank = preset_table[rec->instr]; - preset_table[rec->instr] = rec; - free_info++; - - return 0; -} - - -/* remove samples with current sf_id from instrument list */ -static awe_voice_list * -awe_get_removed_list(awe_voice_list *curp) -{ - awe_voice_list *lastp, **prevp; - int maxc; - lastp = curp; - prevp = &lastp; - for (maxc = AWE_MAX_INFOS; - curp && maxc; curp = curp->next_instr, maxc--) { - if (curp->v.sf_id == current_sf_id) - *prevp = curp->next_instr; - else - prevp = &curp->next_instr; - } - return lastp; -} - - -/* remove last loaded samples */ -static void -awe_remove_samples(void) -{ - awe_voice_list **prevp, *p, *nextp; - int maxc; - int i; - - if (last_sample == free_sample && last_info == free_info) - return; - - /* remove the records from preset table */ - for (i = 0; i < AWE_MAX_PRESETS; i++) { - prevp = &preset_table[i]; - for (maxc = AWE_MAX_INFOS, p = preset_table[i]; - p && maxc; p = nextp, maxc--) { - nextp = p->next_bank; - p = awe_get_removed_list(p); - if (p == NULL) - *prevp = nextp; - else { - *prevp = p; - prevp = &p->next_bank; - } - } - } - - for (i = last_sample; i < free_sample; i++) - free_mem_ptr -= samples[i].size; - - free_sample = last_sample; - free_info = last_info; - current_sf_id--; - loaded_once = 0; -} - - -/* search the specified sample */ -static short -awe_set_sample(awe_voice_info *vp) -{ - int i; - for (i = 0; i < free_sample; i++) { - if (samples[i].sf_id == vp->sf_id && - samples[i].sample == vp->sample) { - /* set the actual sample offsets */ - vp->start += samples[i].start; - vp->end += samples[i].end; - vp->loopstart += samples[i].loopstart; - vp->loopend += samples[i].loopend; - /* copy mode flags */ - vp->mode |= (samples[i].mode_flags << 6); - /* set index */ - vp->index = i; - return i; - } - } - return -1; -} - - -/* voice pressure change */ -static void -awe_aftertouch(int dev, int voice, int pressure) -{ - DECL_INTR_FLAGS(flags); - - DEBUG(2,printk("AWE32: [after(%d) %d]\n", voice, pressure)); - if (voice < 0 || voice >= awe_max_voices) - return; - voices[voice].velocity = pressure; - awe_calc_volume(voice); - DISABLE_INTR(flags); - awe_set_volume(voice); - RESTORE_INTR(flags); -} - - -/* voice control change */ -static void -awe_controller(int dev, int voice, int ctrl_num, int value) -{ - DECL_INTR_FLAGS(flags); - - if (voice < 0 || voice >= awe_max_voices) - return; - - switch (ctrl_num) { - case CTL_BANK_SELECT: - DEBUG(2,printk("AWE32: [bank(%d) %d]\n", voice, value)); - voices[voice].bank = value; - break; - - case CTRL_PITCH_BENDER: - DEBUG(2,printk("AWE32: [bend(%d) %d]\n", voice, value)); - /* zero centered */ - voices[voice].bender = value; - awe_calc_pitch(voice); - DISABLE_INTR(flags); - awe_set_pitch(voice); - RESTORE_INTR(flags); - break; - - case CTRL_PITCH_BENDER_RANGE: - DEBUG(2,printk("AWE32: [range(%d) %d]\n", voice, value)); - /* sense x 100 */ - voices[voice].bender_range = value; - /* no audible pitch change yet.. */ - break; - - case CTL_EXPRESSION: - value /= 128; - case CTRL_EXPRESSION: - DEBUG(2,printk("AWE32: [expr(%d) %d]\n", voice, value)); - /* 0 - 127 */ - voices[voice].expression_vol = value; - awe_calc_volume(voice); - DISABLE_INTR(flags); - awe_set_volume(voice); - RESTORE_INTR(flags); - break; - - case CTL_PAN: - DEBUG(2,printk("AWE32: [pan(%d) %d]\n", voice, value)); - /* (0-127) -> signed 8bit */ - voices[voice].panning = value * 2 - 128; - DISABLE_INTR(flags); - awe_set_pan(voice, 0); - RESTORE_INTR(flags); - break; - - case CTL_MAIN_VOLUME: - value = (value * 127) / 16383; - case CTRL_MAIN_VOLUME: - DEBUG(2,printk("AWE32: [mainvol(%d) %d]\n", voice, value)); - /* 0 - 127 */ - voices[voice].main_vol = value; - awe_calc_volume(voice); - DISABLE_INTR(flags); - awe_set_volume(voice); - RESTORE_INTR(flags); - break; - - case CTL_EXT_EFF_DEPTH: /* reverb effects: 0-127 */ - DEBUG(2,printk("AWE32: [reverb(%d) %d]\n", voice, value)); - FX_SET(voice, AWE_FX_REVERB, value * 2); - break; - - case CTL_CHORUS_DEPTH: /* chorus effects: 0-127 */ - DEBUG(2,printk("AWE32: [chorus(%d) %d]\n", voice, value)); - FX_SET(voice, AWE_FX_CHORUS, value * 2); - break; - - - default: - DEBUG(0,printk("AWE32: [control(%d) ctrl=%d val=%d]\n", - voice, ctrl_num, value)); - break; - } -} - - -/* voice pan change (value = -128 - 127) */ -static void -awe_panning(int dev, int voice, int value) -{ - DECL_INTR_FLAGS(flags); - if (voice >= 0 || voice < awe_max_voices) { - voices[voice].panning = value; - DEBUG(2,printk("AWE32: [pan(%d) %d]\n", voice, voices[voice].panning)); - DISABLE_INTR(flags); - awe_set_pan(voice, 0); - RESTORE_INTR(flags); - } -} - - -/* volume mode change */ -static void -awe_volume_method(int dev, int mode) -{ - /* not impremented */ - DEBUG(0,printk("AWE32: [volmethod mode=%d]\n", mode)); -} - - -/* patch manager */ -static int -awe_patchmgr(int dev, struct patmgr_info *rec) -{ - FATALERR(printk("AWE32 Warning: patch manager control not supported\n")); - return 0; -} - - -/* pitch wheel change: 0-16384 */ -static void -awe_bender(int dev, int voice, int value) -{ - DECL_INTR_FLAGS(flags); - - if (voice < 0 || voice >= awe_max_voices) - return; - /* convert to zero centered value */ - voices[voice].bender = value - 8192; - DEBUG(2,printk("AWE32: [bend(%d) %d]\n", voice, voices[voice].bender)); - awe_calc_pitch(voice); - DISABLE_INTR(flags); - awe_set_pitch(voice); - RESTORE_INTR(flags); -} - - -/* search an empty voice; used by sequencer2 */ -static int -awe_alloc(int dev, int chn, int note, struct voice_alloc_info *alloc) -{ - int i, p, best = -1, best_time = 0x7fffffff; - - p = alloc->ptr; - /* First look for a completely stopped voice */ - - for (i = 0; i < alloc->max_voice; i++) { - if (alloc->map[p] == 0) { - alloc->ptr = p; - return p; - } - if (alloc->alloc_times[p] < best_time) { - best = p; - best_time = alloc->alloc_times[p]; - } - p = (p + 1) % alloc->max_voice; - } - - /* Then look for a releasing voice */ - for (i = 0; i < alloc->max_voice; i++) { - if (alloc->map[p] == 0xffff) { - alloc->ptr = p; - return p; - } - p = (p + 1) % alloc->max_voice; - } - - if (best >= 0) - p = best; - - /* terminate the voice */ - if (voices[p].state) - awe_terminate(p); - - alloc->ptr = p; - return p; -} - - -/* set up voice; used by sequencer2 */ -static void -awe_setup_voice(int dev, int voice, int chn) -{ - struct channel_info *info; - if (synth_devs[dev] == NULL || - (info = &synth_devs[dev]->chn_info[chn]) == NULL) - return; - if (voice < 0 || voice >= awe_max_voices) - return; - - DEBUG(2,printk("AWE32: [setup(%d) ch=%d]\n", voice, chn)); - voices[voice].expression_vol = info->controllers[CTL_EXPRESSION]; - voices[voice].main_vol = - (info->controllers[CTL_MAIN_VOLUME] * 100) / 128; /* 0 - 127 */ - voices[voice].panning = - info->controllers[CTL_PAN] * 2 - 128; /* signed 8bit */ - voices[voice].bender = info->bender_value; /* zero center */ - voices[voice].bank = info->controllers[CTL_BANK_SELECT]; - awe_set_instr(dev, voice, info->pgm_num); -} - - -/*================================================================ - * initialization of AWE32 - *================================================================*/ - -/* intiailize audio channels */ -static void -awe_init_audio(void) -{ - int ch; - - /* turn off envelope engines */ - for (ch = 0; ch < AWE_MAX_VOICES; ch++) { - awe_poke(AWE_DCYSUSV(ch), 0x0080); - } - - for (ch = 0; ch < AWE_MAX_VOICES; ch++) { - awe_poke(AWE_ENVVOL(ch), 0); - awe_poke(AWE_ENVVAL(ch), 0); - awe_poke(AWE_DCYSUS(ch), 0); - awe_poke(AWE_ATKHLDV(ch), 0); - awe_poke(AWE_LFO1VAL(ch), 0); - awe_poke(AWE_ATKHLD(ch), 0); - awe_poke(AWE_LFO2VAL(ch), 0); - awe_poke(AWE_IP(ch), 0); - awe_poke(AWE_IFATN(ch), 0); - awe_poke(AWE_PEFE(ch), 0); - awe_poke(AWE_FMMOD(ch), 0); - awe_poke(AWE_TREMFRQ(ch), 0); - awe_poke(AWE_FM2FRQ2(ch), 0); - awe_poke_dw(AWE_PTRX(ch), 0); - awe_poke_dw(AWE_VTFT(ch), 0); - awe_poke_dw(AWE_PSST(ch), 0); - awe_poke_dw(AWE_CSL(ch), 0); - awe_poke_dw(AWE_CCCA(ch), 0); - } - - for (ch = 0; ch < AWE_MAX_VOICES; ch++) { - awe_poke_dw(AWE_CPF(ch), 0); - awe_poke_dw(AWE_CVCF(ch), 0); - } -} - - -/* initialize DMA address */ -static void -awe_init_dma(void) -{ - awe_poke_dw(AWE_SMALR, 0x00000000); - awe_poke_dw(AWE_SMARR, 0x00000000); - awe_poke_dw(AWE_SMALW, 0x00000000); - awe_poke_dw(AWE_SMARW, 0x00000000); -} - - -/* initialization arrays */ - -static unsigned short init1[128] = { - 0x03ff, 0x0030, 0x07ff, 0x0130, 0x0bff, 0x0230, 0x0fff, 0x0330, - 0x13ff, 0x0430, 0x17ff, 0x0530, 0x1bff, 0x0630, 0x1fff, 0x0730, - 0x23ff, 0x0830, 0x27ff, 0x0930, 0x2bff, 0x0a30, 0x2fff, 0x0b30, - 0x33ff, 0x0c30, 0x37ff, 0x0d30, 0x3bff, 0x0e30, 0x3fff, 0x0f30, - - 0x43ff, 0x0030, 0x47ff, 0x0130, 0x4bff, 0x0230, 0x4fff, 0x0330, - 0x53ff, 0x0430, 0x57ff, 0x0530, 0x5bff, 0x0630, 0x5fff, 0x0730, - 0x63ff, 0x0830, 0x67ff, 0x0930, 0x6bff, 0x0a30, 0x6fff, 0x0b30, - 0x73ff, 0x0c30, 0x77ff, 0x0d30, 0x7bff, 0x0e30, 0x7fff, 0x0f30, - - 0x83ff, 0x0030, 0x87ff, 0x0130, 0x8bff, 0x0230, 0x8fff, 0x0330, - 0x93ff, 0x0430, 0x97ff, 0x0530, 0x9bff, 0x0630, 0x9fff, 0x0730, - 0xa3ff, 0x0830, 0xa7ff, 0x0930, 0xabff, 0x0a30, 0xafff, 0x0b30, - 0xb3ff, 0x0c30, 0xb7ff, 0x0d30, 0xbbff, 0x0e30, 0xbfff, 0x0f30, - - 0xc3ff, 0x0030, 0xc7ff, 0x0130, 0xcbff, 0x0230, 0xcfff, 0x0330, - 0xd3ff, 0x0430, 0xd7ff, 0x0530, 0xdbff, 0x0630, 0xdfff, 0x0730, - 0xe3ff, 0x0830, 0xe7ff, 0x0930, 0xebff, 0x0a30, 0xefff, 0x0b30, - 0xf3ff, 0x0c30, 0xf7ff, 0x0d30, 0xfbff, 0x0e30, 0xffff, 0x0f30, -}; - -static unsigned short init2[128] = { - 0x03ff, 0x8030, 0x07ff, 0x8130, 0x0bff, 0x8230, 0x0fff, 0x8330, - 0x13ff, 0x8430, 0x17ff, 0x8530, 0x1bff, 0x8630, 0x1fff, 0x8730, - 0x23ff, 0x8830, 0x27ff, 0x8930, 0x2bff, 0x8a30, 0x2fff, 0x8b30, - 0x33ff, 0x8c30, 0x37ff, 0x8d30, 0x3bff, 0x8e30, 0x3fff, 0x8f30, - - 0x43ff, 0x8030, 0x47ff, 0x8130, 0x4bff, 0x8230, 0x4fff, 0x8330, - 0x53ff, 0x8430, 0x57ff, 0x8530, 0x5bff, 0x8630, 0x5fff, 0x8730, - 0x63ff, 0x8830, 0x67ff, 0x8930, 0x6bff, 0x8a30, 0x6fff, 0x8b30, - 0x73ff, 0x8c30, 0x77ff, 0x8d30, 0x7bff, 0x8e30, 0x7fff, 0x8f30, - - 0x83ff, 0x8030, 0x87ff, 0x8130, 0x8bff, 0x8230, 0x8fff, 0x8330, - 0x93ff, 0x8430, 0x97ff, 0x8530, 0x9bff, 0x8630, 0x9fff, 0x8730, - 0xa3ff, 0x8830, 0xa7ff, 0x8930, 0xabff, 0x8a30, 0xafff, 0x8b30, - 0xb3ff, 0x8c30, 0xb7ff, 0x8d30, 0xbbff, 0x8e30, 0xbfff, 0x8f30, - 0xc3ff, 0x8030, 0xc7ff, 0x8130, 0xcbff, 0x8230, 0xcfff, 0x8330, - 0xd3ff, 0x8430, 0xd7ff, 0x8530, 0xdbff, 0x8630, 0xdfff, 0x8730, - 0xe3ff, 0x8830, 0xe7ff, 0x8930, 0xebff, 0x8a30, 0xefff, 0x8b30, - 0xf3ff, 0x8c30, 0xf7ff, 0x8d30, 0xfbff, 0x8e30, 0xffff, 0x8f30, -}; - -static unsigned short init3[128] = { - 0x0C10, 0x8470, 0x14FE, 0xB488, 0x167F, 0xA470, 0x18E7, 0x84B5, - 0x1B6E, 0x842A, 0x1F1D, 0x852A, 0x0DA3, 0x8F7C, 0x167E, 0xF254, - 0x0000, 0x842A, 0x0001, 0x852A, 0x18E6, 0x8BAA, 0x1B6D, 0xF234, - 0x229F, 0x8429, 0x2746, 0x8529, 0x1F1C, 0x86E7, 0x229E, 0xF224, - - 0x0DA4, 0x8429, 0x2C29, 0x8529, 0x2745, 0x87F6, 0x2C28, 0xF254, - 0x383B, 0x8428, 0x320F, 0x8528, 0x320E, 0x8F02, 0x1341, 0xF264, - 0x3EB6, 0x8428, 0x3EB9, 0x8528, 0x383A, 0x8FA9, 0x3EB5, 0xF294, - 0x3EB7, 0x8474, 0x3EBA, 0x8575, 0x3EB8, 0xC4C3, 0x3EBB, 0xC5C3, - - 0x0000, 0xA404, 0x0001, 0xA504, 0x141F, 0x8671, 0x14FD, 0x8287, - 0x3EBC, 0xE610, 0x3EC8, 0x8C7B, 0x031A, 0x87E6, 0x3EC8, 0x86F7, - 0x3EC0, 0x821E, 0x3EBE, 0xD208, 0x3EBD, 0x821F, 0x3ECA, 0x8386, - 0x3EC1, 0x8C03, 0x3EC9, 0x831E, 0x3ECA, 0x8C4C, 0x3EBF, 0x8C55, - - 0x3EC9, 0xC208, 0x3EC4, 0xBC84, 0x3EC8, 0x8EAD, 0x3EC8, 0xD308, - 0x3EC2, 0x8F7E, 0x3ECB, 0x8219, 0x3ECB, 0xD26E, 0x3EC5, 0x831F, - 0x3EC6, 0xC308, 0x3EC3, 0xB2FF, 0x3EC9, 0x8265, 0x3EC9, 0x8319, - 0x1342, 0xD36E, 0x3EC7, 0xB3FF, 0x0000, 0x8365, 0x1420, 0x9570, -}; - -static unsigned short init4[128] = { - 0x0C10, 0x8470, 0x14FE, 0xB488, 0x167F, 0xA470, 0x18E7, 0x84B5, - 0x1B6E, 0x842A, 0x1F1D, 0x852A, 0x0DA3, 0x0F7C, 0x167E, 0x7254, - 0x0000, 0x842A, 0x0001, 0x852A, 0x18E6, 0x0BAA, 0x1B6D, 0x7234, - 0x229F, 0x8429, 0x2746, 0x8529, 0x1F1C, 0x06E7, 0x229E, 0x7224, - - 0x0DA4, 0x8429, 0x2C29, 0x8529, 0x2745, 0x07F6, 0x2C28, 0x7254, - 0x383B, 0x8428, 0x320F, 0x8528, 0x320E, 0x0F02, 0x1341, 0x7264, - 0x3EB6, 0x8428, 0x3EB9, 0x8528, 0x383A, 0x0FA9, 0x3EB5, 0x7294, - 0x3EB7, 0x8474, 0x3EBA, 0x8575, 0x3EB8, 0x44C3, 0x3EBB, 0x45C3, - - 0x0000, 0xA404, 0x0001, 0xA504, 0x141F, 0x0671, 0x14FD, 0x0287, - 0x3EBC, 0xE610, 0x3EC8, 0x0C7B, 0x031A, 0x07E6, 0x3EC8, 0x86F7, - 0x3EC0, 0x821E, 0x3EBE, 0xD208, 0x3EBD, 0x021F, 0x3ECA, 0x0386, - 0x3EC1, 0x0C03, 0x3EC9, 0x031E, 0x3ECA, 0x8C4C, 0x3EBF, 0x0C55, - - 0x3EC9, 0xC208, 0x3EC4, 0xBC84, 0x3EC8, 0x0EAD, 0x3EC8, 0xD308, - 0x3EC2, 0x8F7E, 0x3ECB, 0x0219, 0x3ECB, 0xD26E, 0x3EC5, 0x031F, - 0x3EC6, 0xC308, 0x3EC3, 0x32FF, 0x3EC9, 0x0265, 0x3EC9, 0x8319, - 0x1342, 0xD36E, 0x3EC7, 0x33FF, 0x0000, 0x8365, 0x1420, 0x9570, -}; - - -/* send initialization arrays to start up */ -static void -awe_init_array(void) -{ - awe_send_array(init1); - awe_wait(1024); - awe_send_array(init2); - awe_send_array(init3); - awe_poke_dw(AWE_HWCF4, 0); - awe_poke_dw(AWE_HWCF5, 0x83); - awe_poke_dw(AWE_HWCF6, 0x8000); - awe_send_array(init4); -} - -/* send an initialization array */ -static void -awe_send_array(unsigned short *data) -{ - int i; - unsigned short *p; - - p = data; - for (i = 0; i < AWE_MAX_VOICES; i++, p++) - awe_poke(AWE_INIT1(i), *p); - for (i = 0; i < AWE_MAX_VOICES; i++, p++) - awe_poke(AWE_INIT2(i), *p); - for (i = 0; i < AWE_MAX_VOICES; i++, p++) - awe_poke(AWE_INIT3(i), *p); - for (i = 0; i < AWE_MAX_VOICES; i++, p++) - awe_poke(AWE_INIT4(i), *p); -} - - -/* - * set up awe32 channels to some known state. - */ - -static void -awe_tweak(void) -{ - int i; - - /* Set the envelope engine parameters to the "default" values for - simply playing back unarticulated audio at 44.1kHz. Set all - of the channels: */ - - for (i = 0; i < AWE_MAX_VOICES; i++) { - awe_poke(AWE_ENVVOL(i) , 0x8000); - awe_poke(AWE_ENVVAL(i) , 0x8000); - awe_poke(AWE_DCYSUS(i) , 0x7F7F); - awe_poke(AWE_ATKHLDV(i) , 0x7F7F); - awe_poke(AWE_LFO1VAL(i) , 0x8000); - awe_poke(AWE_ATKHLD(i) , 0x7F7F); - awe_poke(AWE_LFO2VAL(i) , 0x8000); - awe_poke(AWE_IP(i) , 0xE000); - awe_poke(AWE_IFATN(i) , 0xFF00); - awe_poke(AWE_PEFE(i) , 0x0000); - awe_poke(AWE_FMMOD(i) , 0x0000); - awe_poke(AWE_TREMFRQ(i) , 0x0010); - awe_poke(AWE_FM2FRQ2(i) , 0x0010); - } -} - - -/* - * initializes the FM section of AWE32 - */ - -static void -awe_init_fm(void) -{ -#ifndef AWE_ALWAYS_INIT_FM - /* if no extended memory is on board.. */ - if (awe_mem_size <= 0) - return; -#endif - DEBUG(0,printk("AWE32: initializing FM\n")); - - /* Initialize the last two channels for DRAM refresh and producing - the reverb and chorus effects for Yamaha OPL-3 synthesizer */ - - awe_poke( AWE_DCYSUSV(30) , 0x0080); - awe_poke_dw(AWE_PSST(30) , 0xFFFFFFE0); - awe_poke_dw(AWE_CSL(30) , 0xFFFFFFE8); - awe_poke_dw(AWE_PTRX(30) , 0x00FFFF00); - awe_poke_dw(AWE_CPF(30) , 0x00000000); - awe_poke_dw(AWE_CCCA(30) , 0x00FFFFE3); - - awe_poke( AWE_DCYSUSV(31) , 0x0080); - awe_poke_dw(AWE_PSST(31) , 0x00FFFFE0); - awe_poke_dw(AWE_CSL(31) , 0xFFFFFFE8); - awe_poke_dw(AWE_PTRX(31) , 0x00FFFF00); - awe_poke_dw(AWE_CPF(31) , 0x00000000); - awe_poke_dw(AWE_CCCA(31) , 0x00FFFFE3); - - /* Timing loop */ - - /* PTRX is 32 bit long but do not write to the MS byte */ - awe_poke(AWE_PTRX(30) , 0x0000); - - while(! (inw(awe_base-0x620+Pointer) & 0x1000)); - while( inw(awe_base-0x620+Pointer) & 0x1000); - - /* now write the MS byte of PTRX */ - OUTW(0x4828, awe_base-0x620+Data0+0x002); - - awe_poke( AWE_IFATN(28) , 0x0000); - awe_poke_dw(AWE_VTFT(30) , 0x8000FFFF); - awe_poke_dw(AWE_VTFT(31) , 0x8000FFFF); - - /* change maximum channels to 30 */ - awe_max_voices = AWE_NORMAL_VOICES; - awe_info.nr_voices = awe_max_voices; - voice_alloc->max_voice = awe_max_voices; -} - -/* - * AWE32 DRAM access routines - */ - -/* open DRAM write accessing mode */ -static int -awe_open_dram_for_write(int offset) -{ - int i; - - /* use all channels for DMA transfer */ - for (i = 0; i < AWE_NORMAL_VOICES; i++) { - awe_poke(AWE_DCYSUSV(i), 0x80); - awe_poke_dw(AWE_VTFT(i), 0); - awe_poke_dw(AWE_CVCF(i), 0); - awe_poke_dw(AWE_PTRX(i), 0x40000000); - awe_poke_dw(AWE_CPF(i), 0x40000000); - awe_poke_dw(AWE_PSST(i), 0); - awe_poke_dw(AWE_CSL(i), 0); - awe_poke_dw(AWE_CCCA(i), 0x06000000); - } - /* point channels 31 & 32 to ROM samples for DRAM refresh */ - awe_poke_dw(AWE_VTFT(30), 0); - awe_poke_dw(AWE_PSST(30), 0x1d8); - awe_poke_dw(AWE_CSL(30), 0x1e0); - awe_poke_dw(AWE_CCCA(30), 0x1d8); - awe_poke_dw(AWE_VTFT(31), 0); - awe_poke_dw(AWE_PSST(31), 0x1d8); - awe_poke_dw(AWE_CSL(31), 0x1e0); - awe_poke_dw(AWE_CCCA(31), 0x1d8); - - /* if full bit is on, not ready to write on */ - if (awe_peek_dw(AWE_SMALW) & 0x80000000) { - for (i = 0; i < AWE_NORMAL_VOICES; i++) - awe_poke_dw(AWE_CCCA(i), 0); - return RET_ERROR(ENOSPC); - } - - /* set address to write */ - awe_poke_dw(AWE_SMALW, offset + AWE_DRAM_OFFSET); - - return 0; -} - -/* open DRAM for RAM size detection */ -static void -awe_open_dram_for_check(void) -{ - int k; - unsigned long scratch; - - awe_poke(AWE_HWCF2 , 0x0020); - - for (k = 0; k < AWE_NORMAL_VOICES; k++) { - awe_poke(AWE_DCYSUSV(k), 0x0080); - awe_poke_dw(AWE_VTFT(k), 0x00000000); - awe_poke_dw(AWE_CVCF(k), 0x00000000); - awe_poke_dw(AWE_PTRX(k), 0x40000000); - awe_poke_dw(AWE_CPF(k), 0x40000000); - awe_poke_dw(AWE_PSST(k), 0x00000000); - awe_poke_dw(AWE_CSL(k), 0x00000000); - scratch = (((k&1) << 9) + 0x400); - scratch = scratch << 16; - awe_poke_dw(AWE_CCCA(k), scratch); - } -} - - -/* close dram access */ -static void -awe_close_dram(void) -{ - int i; - /* wait until FULL bit in SMAxW register be false */ - for (i = 0; i < 10000; i++) { - if (!(awe_peek_dw(AWE_SMALW) & 0x80000000)) - break; - awe_wait(10); - } - - for (i = 0; i < AWE_NORMAL_VOICES; i++) { - awe_poke_dw(AWE_CCCA(i), 0); - awe_poke(AWE_DCYSUSV(i), 0x807F); - } -} - - -#ifdef AWE_CHECKSUM_MEMORY -/* open DRAM read accessing mode */ -static int -awe_open_dram_for_read(int offset) -{ - int i; - - /* use all channels for DMA transfer */ - for (i = 0; i < AWE_NORMAL_VOICES; i++) { - awe_poke(AWE_DCYSUSV(i), 0x80); - awe_poke_dw(AWE_VTFT(i), 0); - awe_poke_dw(AWE_CVCF(i), 0); - awe_poke_dw(AWE_PTRX(i), 0x40000000); - awe_poke_dw(AWE_CPF(i), 0x40000000); - awe_poke_dw(AWE_PSST(i), 0); - awe_poke_dw(AWE_CSL(i), 0); - awe_poke_dw(AWE_CCCA(i), 0x04000000); - } - /* point channels 31 & 32 to ROM samples for DRAM refresh */ - awe_poke_dw(AWE_VTFT(30), 0); - awe_poke_dw(AWE_PSST(30), 0x1d8); - awe_poke_dw(AWE_CSL(30), 0x1e0); - awe_poke_dw(AWE_CCCA(30), 0x1d8); - awe_poke_dw(AWE_VTFT(31), 0); - awe_poke_dw(AWE_PSST(31), 0x1d8); - awe_poke_dw(AWE_CSL(31), 0x1e0); - awe_poke_dw(AWE_CCCA(31), 0x1d8); - - /* if empty flag is on, not ready to read */ - if (awe_peek_dw(AWE_SMALR) & 0x80000000) { - for (i = 0; i < AWE_NORMAL_VOICES; i++) - awe_poke_dw(AWE_CCCA(i), 0); - return RET_ERROR(ENOSPC); - } - - /* set address to read */ - awe_poke_dw(AWE_SMALR, offset + AWE_DRAM_OFFSET); - /* drop stale data */ - awe_peek(AWE_SMLD); - return 0; -} - -/* close dram access for read */ -static void -awe_close_dram_for_read(void) -{ - int i; - /* wait until FULL bit in SMAxW register be false */ - for (i = 0; i < 10000; i++) { - if (!(awe_peek_dw(AWE_SMALR) & 0x80000000)) - break; - awe_wait(10); - } - for (i = 0; i < AWE_NORMAL_VOICES; i++) { - awe_poke_dw(AWE_CCCA(i), 0); - awe_poke(AWE_DCYSUSV(i), 0x807F); - } -} -#endif /* AWE_CHECKSUM_MEMORY */ - - -/* write a word data */ -static void -awe_write_dram(unsigned short c) -{ - int k; - /* wait until FULL bit in SMAxW register be false */ - for (k = 0; k < 10000; k++) { - if (!(awe_peek_dw(AWE_SMALW) & 0x80000000)) - break; - awe_wait(10); - } - awe_poke(AWE_SMLD, c); -} - -/*================================================================ - * detect presence of AWE32 and check memory size - *================================================================*/ - -static int -awe_detect(void) -{ -#ifdef AWE_DEFAULT_BASE_ADDR - awe_base = AWE_DEFAULT_BASE_ADDR; - if (((awe_peek(AWE_U1) & 0x000F) == 0x000C) && - ((awe_peek(AWE_HWCF1) & 0x007E) == 0x0058) && - ((awe_peek(AWE_HWCF2) & 0x0003) == 0x0003)) - return 1; -#endif - if (awe_base == 0) { - for (awe_base = 0x620; awe_base <= 0x680; awe_base += 0x20) { - if ((awe_peek(AWE_U1) & 0x000F) != 0x000C) - continue; - if ((awe_peek(AWE_HWCF1) & 0x007E) != 0x0058) - continue; - if ((awe_peek(AWE_HWCF2) & 0x0003) != 0x0003) - continue; - DEBUG(0,printk("AWE32 found at %x\n", awe_base)); - return 1; - } - } - FATALERR(printk("AWE32 not found\n")); - awe_base = 0; - return 0; -} - - -/*================================================================ - * check dram size on AWE board - *================================================================*/ -static int -awe_check_dram(void) -{ - awe_open_dram_for_check(); - - awe_poke_dw(AWE_SMALW , 0x00200000); /* DRAM start address */ - awe_poke( AWE_SMLD , 0x1234); - awe_poke( AWE_SMLD , 0x7777); - - awe_mem_size = 0; - while (awe_mem_size < 28*1024) { /* 28 MB is max onboard memory */ - awe_wait(2); - awe_poke_dw(AWE_SMALR, 0x00200000); /* Address for reading */ - awe_peek(AWE_SMLD); /* Discard stale data */ - if (awe_peek(AWE_SMLD) != 0x1234) - break; - if (awe_peek(AWE_SMLD) != 0x7777) - break; - awe_mem_size += 32; - /* Address for writing */ - awe_poke_dw(AWE_SMALW, 0x00200000+awe_mem_size*512L); - awe_poke(AWE_SMLD, 0xFFFF); - } - awe_close_dram(); - - DEBUG(0,printk("AWE32: %d Kbytes memory detected\n", (int)awe_mem_size)); -#ifdef AWE_DEFAULT_MEM_SIZE - if (awe_mem_size == 0) - awe_mem_size = AWE_DEFAULT_MEM_SIZE; -#endif - /* convert to Kbytes */ - awe_mem_size *= 1024; - return awe_mem_size; -} - - -/*================================================================ - * chorus and reverb controls - *================================================================*/ - -static unsigned short ChorusEffects[24] = -{ - 0xE600,0x03F6,0xBC2C,0xE608,0x031A,0xBC6E,0xE610,0x031A, - 0xBC84,0xE620,0x0269,0xBC6E,0xE680,0x04D3,0xBCA6,0xE6E0, - 0x044E,0xBC37,0xE600,0x0B06,0xBC00,0xE6C0,0x0B06,0xBC00 -}; - -static unsigned long ChorusEffects2[] = -{ - 0x0000 ,0x006D,0x8000,0x0000,0x0000 ,0x017C,0x8000,0x0000, - 0x0000 ,0x0083,0x8000,0x0000,0x0000 ,0x017C,0x8000,0x0000, - 0x0000 ,0x005B,0x8000,0x0000,0x0000 ,0x0026,0x8000,0x0000, - 0x6E000,0x0083,0x8000,0x0000,0x6E000,0x0083,0x8000,0x0000 -}; - -static unsigned short ChorusCommand[14] = -{ - 0x69,0xA20,0x6C,0xA20,0x63,0xA22,0x29, - 0xA20,0x2A,0xA20,0x2D,0xA20,0x2E,0xA20 -}; - -static unsigned short ReverbEffects[224] = -{ - /* Room 1 */ - 0xB488,0xA450,0x9550,0x84B5,0x383A,0x3EB5,0x72F4, - 0x72A4,0x7254,0x7204,0x7204,0x7204,0x4416,0x4516, - 0xA490,0xA590,0x842A,0x852A,0x842A,0x852A,0x8429, - 0x8529,0x8429,0x8529,0x8428,0x8528,0x8428,0x8528, - /* Room 2 */ - 0xB488,0xA458,0x9558,0x84B5,0x383A,0x3EB5,0x7284, - 0x7254,0x7224,0x7224,0x7254,0x7284,0x4448,0x4548, - 0xA440,0xA540,0x842A,0x852A,0x842A,0x852A,0x8429, - 0x8529,0x8429,0x8529,0x8428,0x8528,0x8428,0x8528, - /* Room 3 */ - 0xB488,0xA460,0x9560,0x84B5,0x383A,0x3EB5,0x7284, - 0x7254,0x7224,0x7224,0x7254,0x7284,0x4416,0x4516, - 0xA490,0xA590,0x842C,0x852C,0x842C,0x852C,0x842B, - 0x852B,0x842B,0x852B,0x842A,0x852A,0x842A,0x852A, - /* Hall 1 */ - 0xB488,0xA470,0x9570,0x84B5,0x383A,0x3EB5,0x7284, - 0x7254,0x7224,0x7224,0x7254,0x7284,0x4448,0x4548, - 0xA440,0xA540,0x842B,0x852B,0x842B,0x852B,0x842A, - 0x852A,0x842A,0x852A,0x8429,0x8529,0x8429,0x8529, - /* Hall 2 */ - 0xB488,0xA470,0x9570,0x84B5,0x383A,0x3EB5,0x7254, - 0x7234,0x7224,0x7254,0x7264,0x7294,0x44C3,0x45C3, - 0xA404,0xA504,0x842A,0x852A,0x842A,0x852A,0x8429, - 0x8529,0x8429,0x8529,0x8428,0x8528,0x8428,0x8528, - /* Plate */ - 0xB4FF,0xA470,0x9570,0x84B5,0x383A,0x3EB5,0x7234, - 0x7234,0x7234,0x7234,0x7234,0x7234,0x4448,0x4548, - 0xA440,0xA540,0x842A,0x852A,0x842A,0x852A,0x8429, - 0x8529,0x8429,0x8529,0x8428,0x8528,0x8428,0x8528, - /* Delay */ - 0xB4FF,0xA470,0x9500,0x84B5,0x333A,0x39B5,0x7204, - 0x7204,0x7204,0x7204,0x7204,0x72F4,0x4400,0x4500, - 0xA4FF,0xA5FF,0x8420,0x8520,0x8420,0x8520,0x8420, - 0x8520,0x8420,0x8520,0x8420,0x8520,0x8420,0x8520, - /* Panning Delay */ - 0xB4FF,0xA490,0x9590,0x8474,0x333A,0x39B5,0x7204, - 0x7204,0x7204,0x7204,0x7204,0x72F4,0x4400,0x4500, - 0xA4FF,0xA5FF,0x8420,0x8520,0x8420,0x8520,0x8420, - 0x8520,0x8420,0x8520,0x8420,0x8520,0x8420,0x8520 -}; - -static unsigned short ReverbCommand[56] = -{ - 0x43,0xA20,0x45,0xA20,0x7F,0xA22,0x47,0xA20, - 0x54,0xA22,0x56,0xA22,0x4F,0xA20,0x57,0xA20, - 0x5F,0xA20,0x47,0xA22,0x4F,0xA22,0x57,0xA22, - 0x5D,0xA22,0x5F,0xA22,0x61,0xA20,0x63,0xA20, - 0x49,0xA20,0x4B,0xA20,0x51,0xA20,0x53,0xA20, - 0x59,0xA20,0x5B,0xA20,0x41,0xA22,0x43,0xA22, - 0x49,0xA22,0x4B,0xA22,0x51,0xA22,0x53,0xA22 -}; - -static void awe_set_chorus_mode(int effect) -{ - int k; - DECL_INTR_FLAGS(flags); - - DISABLE_INTR(flags); - for (k = 0; k < 3; k++) - awe_poke(ChorusCommand[k*2], - ChorusCommand[k*2+1], - ChorusEffects[k+effect*3]); - for (k = 0; k < 4; k++) - awe_poke_dw(ChorusCommand[6+k*2], - ChorusCommand[6+k*2+1], - ChorusEffects2[k+effect*4]); - RESTORE_INTR(flags); -} - -static void awe_set_reverb_mode(int effect) -{ - int k; - DECL_INTR_FLAGS(flags); - - DISABLE_INTR(flags); - for (k = 0; k < 28; k++) - awe_poke(ReverbCommand[k*2], - ReverbCommand[k*2+1], - ReverbEffects[k+effect*28]); - RESTORE_INTR(flags); -} - -#endif /* CONFIG_AWE32_SYNTH */ diff --git a/sys/i386/isa/sound/dev_table.h b/sys/i386/isa/sound/dev_table.h index ec572b6..67950a7 100644 --- a/sys/i386/isa/sound/dev_table.h +++ b/sys/i386/isa/sound/dev_table.h @@ -357,7 +357,7 @@ struct driver_info sound_drivers[] = { #endif #ifdef CONFIG_AWE32 {"AWE32", 0, SNDCARD_AWE32, "AWE32 Synth", - attach_awe_obsolete, probe_awe_obsolete}, + attach_awe, probe_awe}, #endif #ifdef CONFIG_MIDI {"SB16MIDI", 0, SNDCARD_SB16MIDI, "SB16 MIDI", diff --git a/sys/i386/isa/sound/sound_calls.h b/sys/i386/isa/sound/sound_calls.h index 5f3a067..62d9548 100644 --- a/sys/i386/isa/sound/sound_calls.h +++ b/sys/i386/isa/sound/sound_calls.h @@ -130,8 +130,8 @@ void attach_sb_card(struct address_info *hw_config); int probe_sb(struct address_info *hw_config); /* From awe_wave.c */ -void attach_awe_obsolete(struct address_info *hw_config); -int probe_awe_obsolete(struct address_info *hw_config); +void attach_awe(struct address_info *hw_config); +int probe_awe(struct address_info *hw_config); /* From adlib_card.c */ void attach_adlib_card(struct address_info *hw_config); diff --git a/sys/sys/soundcard.h b/sys/sys/soundcard.h index b10cccf..9898174 100644 --- a/sys/sys/soundcard.h +++ b/sys/sys/soundcard.h @@ -502,6 +502,7 @@ struct synth_info { /* Read only */ #define FM_TYPE_OPL3 0x01 #define SAMPLE_TYPE_GUS 0x10 +#define SAMPLE_TYPE_AWE32 0x20 int perc_mode; /* No longer supported */ int nr_voices; |
