|  | /*  -*- linux-c -*- | 
|  | * | 
|  | * sound/wavfront.c | 
|  | * | 
|  | * A Linux driver for Turtle Beach WaveFront Series (Maui, Tropez, Tropez Plus) | 
|  | * | 
|  | * This driver supports the onboard wavetable synthesizer (an ICS2115), | 
|  | * including patch, sample and program loading and unloading, conversion | 
|  | * of GUS patches during loading, and full user-level access to all | 
|  | * WaveFront commands. It tries to provide semi-intelligent patch and | 
|  | * sample management as well. | 
|  | * | 
|  | * It also provides support for the ICS emulation of an MPU-401.  Full | 
|  | * support for the ICS emulation's "virtual MIDI mode" is provided in | 
|  | * wf_midi.c. | 
|  | * | 
|  | * Support is also provided for the Tropez Plus' onboard FX processor, | 
|  | * a Yamaha YSS225. Currently, code exists to configure the YSS225, | 
|  | * and there is an interface allowing tweaking of any of its memory | 
|  | * addresses. However, I have been unable to decipher the logical | 
|  | * positioning of the configuration info for various effects, so for | 
|  | * now, you just get the YSS225 in the same state as Turtle Beach's | 
|  | * "SETUPSND.EXE" utility leaves it. | 
|  | * | 
|  | * The boards' DAC/ADC (a Crystal CS4232) is supported by cs4232.[co], | 
|  | * This chip also controls the configuration of the card: the wavefront | 
|  | * synth is logical unit 4. | 
|  | * | 
|  | * | 
|  | * Supported devices: | 
|  | * | 
|  | *   /dev/dsp                      - using cs4232+ad1848 modules, OSS compatible | 
|  | *   /dev/midiNN and /dev/midiNN+1 - using wf_midi code, OSS compatible | 
|  | *   /dev/synth00                  - raw synth interface | 
|  | * | 
|  | ********************************************************************** | 
|  | * | 
|  | * Copyright (C) by Paul Barton-Davis 1998 | 
|  | * | 
|  | * Some portions of this file are taken from work that is | 
|  | * copyright (C) by Hannu Savolainen 1993-1996 | 
|  | * | 
|  | * Although the relevant code here is all new, the handling of | 
|  | * sample/alias/multi- samples is entirely based on a driver by Matt | 
|  | * Martin and Rutger Nijlunsing which demonstrated how to get things | 
|  | * to work correctly. The GUS patch loading code has been almost | 
|  | * unaltered by me, except to fit formatting and function names in the | 
|  | * rest of the file. Many thanks to them. | 
|  | * | 
|  | * Appreciation and thanks to Hannu Savolainen for his early work on the Maui | 
|  | * driver, and answering a few questions while this one was developed. | 
|  | * | 
|  | * Absolutely NO thanks to Turtle Beach/Voyetra and Yamaha for their | 
|  | * complete lack of help in developing this driver, and in particular | 
|  | * for their utter silence in response to questions about undocumented | 
|  | * aspects of configuring a WaveFront soundcard, particularly the | 
|  | * effects processor. | 
|  | * | 
|  | * $Id: wavfront.c,v 0.7 1998/09/09 15:47:36 pbd Exp $ | 
|  | * | 
|  | * This program is distributed under the GNU GENERAL PUBLIC LICENSE (GPL) | 
|  | * Version 2 (June 1991). See the "COPYING" file distributed with this software | 
|  | * for more info. | 
|  | * | 
|  | * Changes: | 
|  | * 11-10-2000	Bartlomiej Zolnierkiewicz <bkz@linux-ide.org> | 
|  | *		Added some __init and __initdata to entries in yss225.c | 
|  | */ | 
|  |  | 
|  | #include <linux/module.h> | 
|  |  | 
|  | #include <linux/kernel.h> | 
|  | #include <linux/init.h> | 
|  | #include <linux/sched.h> | 
|  | #include <linux/smp_lock.h> | 
|  | #include <linux/ptrace.h> | 
|  | #include <linux/fcntl.h> | 
|  | #include <linux/syscalls.h> | 
|  | #include <linux/ioport.h> | 
|  | #include <linux/spinlock.h> | 
|  | #include <linux/interrupt.h> | 
|  | #include <linux/config.h> | 
|  |  | 
|  | #include <linux/delay.h> | 
|  |  | 
|  | #include "sound_config.h" | 
|  |  | 
|  | #include <linux/wavefront.h> | 
|  |  | 
|  | #define _MIDI_SYNTH_C_ | 
|  | #define MIDI_SYNTH_NAME	"WaveFront MIDI" | 
|  | #define MIDI_SYNTH_CAPS	SYNTH_CAP_INPUT | 
|  | #include "midi_synth.h" | 
|  |  | 
|  | /* Compile-time control of the extent to which OSS is supported. | 
|  |  | 
|  | I consider /dev/sequencer to be an anachronism, but given its | 
|  | widespread usage by various Linux MIDI software, it seems worth | 
|  | offering support to it if it's not too painful. Instead of using | 
|  | /dev/sequencer, I recommend: | 
|  |  | 
|  | for synth programming and patch loading: /dev/synthNN | 
|  | for kernel-synchronized MIDI sequencing: the ALSA sequencer | 
|  | for direct MIDI control: /dev/midiNN | 
|  |  | 
|  | I have never tried static compilation into the kernel. The #if's | 
|  | for this are really just notes to myself about what the code is | 
|  | for. | 
|  | */ | 
|  |  | 
|  | #define OSS_SUPPORT_SEQ            0x1  /* use of /dev/sequencer */ | 
|  | #define OSS_SUPPORT_STATIC_INSTALL 0x2  /* static compilation into kernel */ | 
|  |  | 
|  | #define OSS_SUPPORT_LEVEL          0x1  /* just /dev/sequencer for now */ | 
|  |  | 
|  | #if    OSS_SUPPORT_LEVEL & OSS_SUPPORT_SEQ | 
|  | static int (*midi_load_patch) (int devno, int format, const char __user *addr, | 
|  | int offs, int count, int pmgr_flag) = NULL; | 
|  | #endif /* OSS_SUPPORT_SEQ */ | 
|  |  | 
|  | /* if WF_DEBUG not defined, no run-time debugging messages will | 
|  | be available via the debug flag setting. Given the current | 
|  | beta state of the driver, this will remain set until a future | 
|  | version. | 
|  | */ | 
|  |  | 
|  | #define WF_DEBUG 1 | 
|  |  | 
|  | #ifdef WF_DEBUG | 
|  |  | 
|  | /* Thank goodness for gcc's preprocessor ... */ | 
|  |  | 
|  | #define DPRINT(cond, format, args...) \ | 
|  | if ((dev.debug & (cond)) == (cond)) { \ | 
|  | printk (KERN_DEBUG LOGNAME format, ## args); \ | 
|  | } | 
|  | #else | 
|  | #define DPRINT(cond, format, args...) | 
|  | #endif | 
|  |  | 
|  | #define LOGNAME "WaveFront: " | 
|  |  | 
|  | /* bitmasks for WaveFront status port value */ | 
|  |  | 
|  | #define STAT_RINTR_ENABLED	0x01 | 
|  | #define STAT_CAN_READ		0x02 | 
|  | #define STAT_INTR_READ		0x04 | 
|  | #define STAT_WINTR_ENABLED	0x10 | 
|  | #define STAT_CAN_WRITE		0x20 | 
|  | #define STAT_INTR_WRITE		0x40 | 
|  |  | 
|  | /*** Module-accessible parameters ***************************************/ | 
|  |  | 
|  | static int wf_raw;     /* we normally check for "raw state" to firmware | 
|  | loading. if set, then during driver loading, the | 
|  | state of the board is ignored, and we reset the | 
|  | board and load the firmware anyway. | 
|  | */ | 
|  |  | 
|  | static int fx_raw = 1; /* if this is zero, we'll leave the FX processor in | 
|  | whatever state it is when the driver is loaded. | 
|  | The default is to download the microprogram and | 
|  | associated coefficients to set it up for "default" | 
|  | operation, whatever that means. | 
|  | */ | 
|  |  | 
|  | static int debug_default;  /* you can set this to control debugging | 
|  | during driver loading. it takes any combination | 
|  | of the WF_DEBUG_* flags defined in | 
|  | wavefront.h | 
|  | */ | 
|  |  | 
|  | /* XXX this needs to be made firmware and hardware version dependent */ | 
|  |  | 
|  | static char *ospath = "/etc/sound/wavefront.os"; /* where to find a processed | 
|  | version of the WaveFront OS | 
|  | */ | 
|  |  | 
|  | static int wait_polls = 2000; /* This is a number of tries we poll the | 
|  | status register before resorting to sleeping. | 
|  | WaveFront being an ISA card each poll takes | 
|  | about 1.2us. So before going to | 
|  | sleep we wait up to 2.4ms in a loop. | 
|  | */ | 
|  |  | 
|  | static int sleep_length = HZ/100; /* This says how long we're going to | 
|  | sleep between polls. | 
|  | 10ms sounds reasonable for fast response. | 
|  | */ | 
|  |  | 
|  | static int sleep_tries = 50;       /* Wait for status 0.5 seconds total. */ | 
|  |  | 
|  | static int reset_time = 2; /* hundreths of a second we wait after a HW reset for | 
|  | the expected interrupt. | 
|  | */ | 
|  |  | 
|  | static int ramcheck_time = 20;    /* time in seconds to wait while ROM code | 
|  | checks on-board RAM. | 
|  | */ | 
|  |  | 
|  | static int osrun_time = 10;  /* time in seconds we wait for the OS to | 
|  | start running. | 
|  | */ | 
|  |  | 
|  | module_param(wf_raw, int, 0); | 
|  | module_param(fx_raw, int, 0); | 
|  | module_param(debug_default, int, 0); | 
|  | module_param(wait_polls, int, 0); | 
|  | module_param(sleep_length, int, 0); | 
|  | module_param(sleep_tries, int, 0); | 
|  | module_param(ospath, charp, 0); | 
|  | module_param(reset_time, int, 0); | 
|  | module_param(ramcheck_time, int, 0); | 
|  | module_param(osrun_time, int, 0); | 
|  |  | 
|  | /***************************************************************************/ | 
|  |  | 
|  | /* Note: because this module doesn't export any symbols, this really isn't | 
|  | a global variable, even if it looks like one. I was quite confused by | 
|  | this when I started writing this as a (newer) module -- pbd. | 
|  | */ | 
|  |  | 
|  | struct wf_config { | 
|  | int devno;            /* device number from kernel */ | 
|  | int irq;              /* "you were one, one of the few ..." */ | 
|  | int base;             /* low i/o port address */ | 
|  |  | 
|  | #define mpu_data_port    base | 
|  | #define mpu_command_port base + 1 /* write semantics */ | 
|  | #define mpu_status_port  base + 1 /* read semantics */ | 
|  | #define data_port        base + 2 | 
|  | #define status_port      base + 3 /* read semantics */ | 
|  | #define control_port     base + 3 /* write semantics  */ | 
|  | #define block_port       base + 4 /* 16 bit, writeonly */ | 
|  | #define last_block_port  base + 6 /* 16 bit, writeonly */ | 
|  |  | 
|  | /* FX ports. These are mapped through the ICS2115 to the YS225. | 
|  | The ICS2115 takes care of flipping the relevant pins on the | 
|  | YS225 so that access to each of these ports does the right | 
|  | thing. Note: these are NOT documented by Turtle Beach. | 
|  | */ | 
|  |  | 
|  | #define fx_status       base + 8 | 
|  | #define fx_op           base + 8 | 
|  | #define fx_lcr          base + 9 | 
|  | #define fx_dsp_addr     base + 0xa | 
|  | #define fx_dsp_page     base + 0xb | 
|  | #define fx_dsp_lsb      base + 0xc | 
|  | #define fx_dsp_msb      base + 0xd | 
|  | #define fx_mod_addr     base + 0xe | 
|  | #define fx_mod_data     base + 0xf | 
|  |  | 
|  | volatile int irq_ok;               /* set by interrupt handler */ | 
|  | volatile int irq_cnt;              /* ditto */ | 
|  | int opened;                        /* flag, holds open(2) mode */ | 
|  | char debug;                        /* debugging flags */ | 
|  | int freemem;                       /* installed RAM, in bytes */ | 
|  |  | 
|  | int synth_dev;                     /* devno for "raw" synth */ | 
|  | int mididev;                       /* devno for internal MIDI */ | 
|  | int ext_mididev;                   /* devno for external MIDI */ | 
|  | int fx_mididev;                    /* devno for FX MIDI interface */ | 
|  | #if OSS_SUPPORT_LEVEL & OSS_SUPPORT_SEQ | 
|  | int oss_dev;                      /* devno for OSS sequencer synth */ | 
|  | #endif /* OSS_SUPPORT_SEQ */ | 
|  |  | 
|  | char fw_version[2];                /* major = [0], minor = [1] */ | 
|  | char hw_version[2];                /* major = [0], minor = [1] */ | 
|  | char israw;                        /* needs Motorola microcode */ | 
|  | char has_fx;                       /* has FX processor (Tropez+) */ | 
|  | char prog_status[WF_MAX_PROGRAM];  /* WF_SLOT_* */ | 
|  | char patch_status[WF_MAX_PATCH];   /* WF_SLOT_* */ | 
|  | char sample_status[WF_MAX_SAMPLE]; /* WF_ST_* | WF_SLOT_* */ | 
|  | int samples_used;                  /* how many */ | 
|  | char interrupts_on;                /* h/w MPU interrupts enabled ? */ | 
|  | char rom_samples_rdonly;           /* can we write on ROM samples */ | 
|  | wait_queue_head_t interrupt_sleeper; | 
|  | } dev; | 
|  |  | 
|  | static DEFINE_SPINLOCK(lock); | 
|  | static int  detect_wffx(void); | 
|  | static int  wffx_ioctl (wavefront_fx_info *); | 
|  | static int  wffx_init (void); | 
|  |  | 
|  | static int wavefront_delete_sample (int sampnum); | 
|  | static int wavefront_find_free_sample (void); | 
|  |  | 
|  | /* From wf_midi.c */ | 
|  |  | 
|  | extern int  virtual_midi_enable  (void); | 
|  | extern int  virtual_midi_disable (void); | 
|  | extern int  detect_wf_mpu (int, int); | 
|  | extern int  install_wf_mpu (void); | 
|  | extern int  uninstall_wf_mpu (void); | 
|  |  | 
|  | typedef struct { | 
|  | int cmd; | 
|  | char *action; | 
|  | unsigned int read_cnt; | 
|  | unsigned int write_cnt; | 
|  | int need_ack; | 
|  | } wavefront_command; | 
|  |  | 
|  | static struct { | 
|  | int errno; | 
|  | const char *errstr; | 
|  | } wavefront_errors[] = { | 
|  | { 0x01, "Bad sample number" }, | 
|  | { 0x02, "Out of sample memory" }, | 
|  | { 0x03, "Bad patch number" }, | 
|  | { 0x04, "Error in number of voices" }, | 
|  | { 0x06, "Sample load already in progress" }, | 
|  | { 0x0B, "No sample load request pending" }, | 
|  | { 0x0E, "Bad MIDI channel number" }, | 
|  | { 0x10, "Download Record Error" }, | 
|  | { 0x80, "Success" }, | 
|  | { 0 } | 
|  | }; | 
|  |  | 
|  | #define NEEDS_ACK 1 | 
|  |  | 
|  | static wavefront_command wavefront_commands[] = { | 
|  | { WFC_SET_SYNTHVOL, "set synthesizer volume", 0, 1, NEEDS_ACK }, | 
|  | { WFC_GET_SYNTHVOL, "get synthesizer volume", 1, 0, 0}, | 
|  | { WFC_SET_NVOICES, "set number of voices", 0, 1, NEEDS_ACK }, | 
|  | { WFC_GET_NVOICES, "get number of voices", 1, 0, 0 }, | 
|  | { WFC_SET_TUNING, "set synthesizer tuning", 0, 2, NEEDS_ACK }, | 
|  | { WFC_GET_TUNING, "get synthesizer tuning", 2, 0, 0 }, | 
|  | { WFC_DISABLE_CHANNEL, "disable synth channel", 0, 1, NEEDS_ACK }, | 
|  | { WFC_ENABLE_CHANNEL, "enable synth channel", 0, 1, NEEDS_ACK }, | 
|  | { WFC_GET_CHANNEL_STATUS, "get synth channel status", 3, 0, 0 }, | 
|  | { WFC_MISYNTH_OFF, "disable midi-in to synth", 0, 0, NEEDS_ACK }, | 
|  | { WFC_MISYNTH_ON, "enable midi-in to synth", 0, 0, NEEDS_ACK }, | 
|  | { WFC_VMIDI_ON, "enable virtual midi mode", 0, 0, NEEDS_ACK }, | 
|  | { WFC_VMIDI_OFF, "disable virtual midi mode", 0, 0, NEEDS_ACK }, | 
|  | { WFC_MIDI_STATUS, "report midi status", 1, 0, 0 }, | 
|  | { WFC_FIRMWARE_VERSION, "report firmware version", 2, 0, 0 }, | 
|  | { WFC_HARDWARE_VERSION, "report hardware version", 2, 0, 0 }, | 
|  | { WFC_GET_NSAMPLES, "report number of samples", 2, 0, 0 }, | 
|  | { WFC_INSTOUT_LEVELS, "report instantaneous output levels", 7, 0, 0 }, | 
|  | { WFC_PEAKOUT_LEVELS, "report peak output levels", 7, 0, 0 }, | 
|  | { WFC_DOWNLOAD_SAMPLE, "download sample", | 
|  | 0, WF_SAMPLE_BYTES, NEEDS_ACK }, | 
|  | { WFC_DOWNLOAD_BLOCK, "download block", 0, 0, NEEDS_ACK}, | 
|  | { WFC_DOWNLOAD_SAMPLE_HEADER, "download sample header", | 
|  | 0, WF_SAMPLE_HDR_BYTES, NEEDS_ACK }, | 
|  | { WFC_UPLOAD_SAMPLE_HEADER, "upload sample header", 13, 2, 0 }, | 
|  |  | 
|  | /* This command requires a variable number of bytes to be written. | 
|  | There is a hack in wavefront_cmd() to support this. The actual | 
|  | count is passed in as the read buffer ptr, cast appropriately. | 
|  | Ugh. | 
|  | */ | 
|  |  | 
|  | { WFC_DOWNLOAD_MULTISAMPLE, "download multisample", 0, 0, NEEDS_ACK }, | 
|  |  | 
|  | /* This one is a hack as well. We just read the first byte of the | 
|  | response, don't fetch an ACK, and leave the rest to the | 
|  | calling function. Ugly, ugly, ugly. | 
|  | */ | 
|  |  | 
|  | { WFC_UPLOAD_MULTISAMPLE, "upload multisample", 2, 1, 0 }, | 
|  | { WFC_DOWNLOAD_SAMPLE_ALIAS, "download sample alias", | 
|  | 0, WF_ALIAS_BYTES, NEEDS_ACK }, | 
|  | { WFC_UPLOAD_SAMPLE_ALIAS, "upload sample alias", WF_ALIAS_BYTES, 2, 0}, | 
|  | { WFC_DELETE_SAMPLE, "delete sample", 0, 2, NEEDS_ACK }, | 
|  | { WFC_IDENTIFY_SAMPLE_TYPE, "identify sample type", 5, 2, 0 }, | 
|  | { WFC_UPLOAD_SAMPLE_PARAMS, "upload sample parameters" }, | 
|  | { WFC_REPORT_FREE_MEMORY, "report free memory", 4, 0, 0 }, | 
|  | { WFC_DOWNLOAD_PATCH, "download patch", 0, 134, NEEDS_ACK }, | 
|  | { WFC_UPLOAD_PATCH, "upload patch", 132, 2, 0 }, | 
|  | { WFC_DOWNLOAD_PROGRAM, "download program", 0, 33, NEEDS_ACK }, | 
|  | { WFC_UPLOAD_PROGRAM, "upload program", 32, 1, 0 }, | 
|  | { WFC_DOWNLOAD_EDRUM_PROGRAM, "download enhanced drum program", 0, 9, | 
|  | NEEDS_ACK}, | 
|  | { WFC_UPLOAD_EDRUM_PROGRAM, "upload enhanced drum program", 8, 1, 0}, | 
|  | { WFC_SET_EDRUM_CHANNEL, "set enhanced drum program channel", | 
|  | 0, 1, NEEDS_ACK }, | 
|  | { WFC_DISABLE_DRUM_PROGRAM, "disable drum program", 0, 1, NEEDS_ACK }, | 
|  | { WFC_REPORT_CHANNEL_PROGRAMS, "report channel program numbers", | 
|  | 32, 0, 0 }, | 
|  | { WFC_NOOP, "the no-op command", 0, 0, NEEDS_ACK }, | 
|  | { 0x00 } | 
|  | }; | 
|  |  | 
|  | static const char * | 
|  | wavefront_errorstr (int errnum) | 
|  |  | 
|  | { | 
|  | int i; | 
|  |  | 
|  | for (i = 0; wavefront_errors[i].errstr; i++) { | 
|  | if (wavefront_errors[i].errno == errnum) { | 
|  | return wavefront_errors[i].errstr; | 
|  | } | 
|  | } | 
|  |  | 
|  | return "Unknown WaveFront error"; | 
|  | } | 
|  |  | 
|  | static wavefront_command * | 
|  | wavefront_get_command (int cmd) | 
|  |  | 
|  | { | 
|  | int i; | 
|  |  | 
|  | for (i = 0; wavefront_commands[i].cmd != 0; i++) { | 
|  | if (cmd == wavefront_commands[i].cmd) { | 
|  | return &wavefront_commands[i]; | 
|  | } | 
|  | } | 
|  |  | 
|  | return (wavefront_command *) 0; | 
|  | } | 
|  |  | 
|  | static inline int | 
|  | wavefront_status (void) | 
|  |  | 
|  | { | 
|  | return inb (dev.status_port); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_wait (int mask) | 
|  |  | 
|  | { | 
|  | int i; | 
|  |  | 
|  | for (i = 0; i < wait_polls; i++) | 
|  | if (wavefront_status() & mask) | 
|  | return 1; | 
|  |  | 
|  | for (i = 0; i < sleep_tries; i++) { | 
|  |  | 
|  | if (wavefront_status() & mask) { | 
|  | set_current_state(TASK_RUNNING); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | set_current_state(TASK_INTERRUPTIBLE); | 
|  | schedule_timeout(sleep_length); | 
|  | if (signal_pending(current)) | 
|  | break; | 
|  | } | 
|  |  | 
|  | set_current_state(TASK_RUNNING); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_read (void) | 
|  |  | 
|  | { | 
|  | if (wavefront_wait (STAT_CAN_READ)) | 
|  | return inb (dev.data_port); | 
|  |  | 
|  | DPRINT (WF_DEBUG_DATA, "read timeout.\n"); | 
|  |  | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_write (unsigned char data) | 
|  |  | 
|  | { | 
|  | if (wavefront_wait (STAT_CAN_WRITE)) { | 
|  | outb (data, dev.data_port); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | DPRINT (WF_DEBUG_DATA, "write timeout.\n"); | 
|  |  | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_cmd (int cmd, unsigned char *rbuf, unsigned char *wbuf) | 
|  |  | 
|  | { | 
|  | int ack; | 
|  | int i; | 
|  | int c; | 
|  | wavefront_command *wfcmd; | 
|  |  | 
|  | if ((wfcmd = wavefront_get_command (cmd)) == (wavefront_command *) 0) { | 
|  | printk (KERN_WARNING LOGNAME "command 0x%x not supported.\n", | 
|  | cmd); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | /* Hack to handle the one variable-size write command. See | 
|  | wavefront_send_multisample() for the other half of this | 
|  | gross and ugly strategy. | 
|  | */ | 
|  |  | 
|  | if (cmd == WFC_DOWNLOAD_MULTISAMPLE) { | 
|  | wfcmd->write_cnt = (unsigned int) rbuf; | 
|  | rbuf = NULL; | 
|  | } | 
|  |  | 
|  | DPRINT (WF_DEBUG_CMD, "0x%x [%s] (%d,%d,%d)\n", | 
|  | cmd, wfcmd->action, wfcmd->read_cnt, | 
|  | wfcmd->write_cnt, wfcmd->need_ack); | 
|  |  | 
|  | if (wavefront_write (cmd)) { | 
|  | DPRINT ((WF_DEBUG_IO|WF_DEBUG_CMD), "cannot request " | 
|  | "0x%x [%s].\n", | 
|  | cmd, wfcmd->action); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | if (wfcmd->write_cnt > 0) { | 
|  | DPRINT (WF_DEBUG_DATA, "writing %d bytes " | 
|  | "for 0x%x\n", | 
|  | wfcmd->write_cnt, cmd); | 
|  |  | 
|  | for (i = 0; i < wfcmd->write_cnt; i++) { | 
|  | if (wavefront_write (wbuf[i])) { | 
|  | DPRINT (WF_DEBUG_IO, "bad write for byte " | 
|  | "%d of 0x%x [%s].\n", | 
|  | i, cmd, wfcmd->action); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | DPRINT (WF_DEBUG_DATA, "write[%d] = 0x%x\n", | 
|  | i, wbuf[i]); | 
|  | } | 
|  | } | 
|  |  | 
|  | if (wfcmd->read_cnt > 0) { | 
|  | DPRINT (WF_DEBUG_DATA, "reading %d ints " | 
|  | "for 0x%x\n", | 
|  | wfcmd->read_cnt, cmd); | 
|  |  | 
|  | for (i = 0; i < wfcmd->read_cnt; i++) { | 
|  |  | 
|  | if ((c = wavefront_read()) == -1) { | 
|  | DPRINT (WF_DEBUG_IO, "bad read for byte " | 
|  | "%d of 0x%x [%s].\n", | 
|  | i, cmd, wfcmd->action); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | /* Now handle errors. Lots of special cases here */ | 
|  |  | 
|  | if (c == 0xff) { | 
|  | if ((c = wavefront_read ()) == -1) { | 
|  | DPRINT (WF_DEBUG_IO, "bad read for " | 
|  | "error byte at " | 
|  | "read byte %d " | 
|  | "of 0x%x [%s].\n", | 
|  | i, cmd, | 
|  | wfcmd->action); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | /* Can you believe this madness ? */ | 
|  |  | 
|  | if (c == 1 && | 
|  | wfcmd->cmd == WFC_IDENTIFY_SAMPLE_TYPE) { | 
|  | rbuf[0] = WF_ST_EMPTY; | 
|  | return (0); | 
|  |  | 
|  | } else if (c == 3 && | 
|  | wfcmd->cmd == WFC_UPLOAD_PATCH) { | 
|  |  | 
|  | return 3; | 
|  |  | 
|  | } else if (c == 1 && | 
|  | wfcmd->cmd == WFC_UPLOAD_PROGRAM) { | 
|  |  | 
|  | return 1; | 
|  |  | 
|  | } else { | 
|  |  | 
|  | DPRINT (WF_DEBUG_IO, "error %d (%s) " | 
|  | "during " | 
|  | "read for byte " | 
|  | "%d of 0x%x " | 
|  | "[%s].\n", | 
|  | c, | 
|  | wavefront_errorstr (c), | 
|  | i, cmd, | 
|  | wfcmd->action); | 
|  | return 1; | 
|  |  | 
|  | } | 
|  |  | 
|  | } else { | 
|  | rbuf[i] = c; | 
|  | } | 
|  |  | 
|  | DPRINT (WF_DEBUG_DATA, "read[%d] = 0x%x\n",i, rbuf[i]); | 
|  | } | 
|  | } | 
|  |  | 
|  | if ((wfcmd->read_cnt == 0 && wfcmd->write_cnt == 0) || wfcmd->need_ack) { | 
|  |  | 
|  | DPRINT (WF_DEBUG_CMD, "reading ACK for 0x%x\n", cmd); | 
|  |  | 
|  | /* Some commands need an ACK, but return zero instead | 
|  | of the standard value. | 
|  | */ | 
|  |  | 
|  | if ((ack = wavefront_read()) == 0) { | 
|  | ack = WF_ACK; | 
|  | } | 
|  |  | 
|  | if (ack != WF_ACK) { | 
|  | if (ack == -1) { | 
|  | DPRINT (WF_DEBUG_IO, "cannot read ack for " | 
|  | "0x%x [%s].\n", | 
|  | cmd, wfcmd->action); | 
|  | return 1; | 
|  |  | 
|  | } else { | 
|  | int err = -1; /* something unknown */ | 
|  |  | 
|  | if (ack == 0xff) { /* explicit error */ | 
|  |  | 
|  | if ((err = wavefront_read ()) == -1) { | 
|  | DPRINT (WF_DEBUG_DATA, | 
|  | "cannot read err " | 
|  | "for 0x%x [%s].\n", | 
|  | cmd, wfcmd->action); | 
|  | } | 
|  | } | 
|  |  | 
|  | DPRINT (WF_DEBUG_IO, "0x%x [%s] " | 
|  | "failed (0x%x, 0x%x, %s)\n", | 
|  | cmd, wfcmd->action, ack, err, | 
|  | wavefront_errorstr (err)); | 
|  |  | 
|  | return -err; | 
|  | } | 
|  | } | 
|  |  | 
|  | DPRINT (WF_DEBUG_DATA, "ack received " | 
|  | "for 0x%x [%s]\n", | 
|  | cmd, wfcmd->action); | 
|  | } else { | 
|  |  | 
|  | DPRINT (WF_DEBUG_CMD, "0x%x [%s] does not need " | 
|  | "ACK (%d,%d,%d)\n", | 
|  | cmd, wfcmd->action, wfcmd->read_cnt, | 
|  | wfcmd->write_cnt, wfcmd->need_ack); | 
|  | } | 
|  |  | 
|  | return 0; | 
|  |  | 
|  | } | 
|  |  | 
|  | /*********************************************************************** | 
|  | WaveFront: data munging | 
|  |  | 
|  | Things here are weird. All data written to the board cannot | 
|  | have its most significant bit set. Any data item with values | 
|  | potentially > 0x7F (127) must be split across multiple bytes. | 
|  |  | 
|  | Sometimes, we need to munge numeric values that are represented on | 
|  | the x86 side as 8-32 bit values. Sometimes, we need to munge data | 
|  | that is represented on the x86 side as an array of bytes. The most | 
|  | efficient approach to handling both cases seems to be to use 2 | 
|  | different functions for munging and 2 for de-munging. This avoids | 
|  | weird casting and worrying about bit-level offsets. | 
|  |  | 
|  | **********************************************************************/ | 
|  |  | 
|  | static | 
|  | unsigned char * | 
|  | munge_int32 (unsigned int src, | 
|  | unsigned char *dst, | 
|  | unsigned int dst_size) | 
|  | { | 
|  | int i; | 
|  |  | 
|  | for (i = 0;i < dst_size; i++) { | 
|  | *dst = src & 0x7F;  /* Mask high bit of LSB */ | 
|  | src = src >> 7;     /* Rotate Right 7 bits  */ | 
|  | /* Note: we leave the upper bits in place */ | 
|  |  | 
|  | dst++; | 
|  | }; | 
|  | return dst; | 
|  | }; | 
|  |  | 
|  | static int | 
|  | demunge_int32 (unsigned char* src, int src_size) | 
|  |  | 
|  | { | 
|  | int i; | 
|  | int outval = 0; | 
|  |  | 
|  | for (i = src_size - 1; i >= 0; i--) { | 
|  | outval=(outval<<7)+src[i]; | 
|  | } | 
|  |  | 
|  | return outval; | 
|  | }; | 
|  |  | 
|  | static | 
|  | unsigned char * | 
|  | munge_buf (unsigned char *src, unsigned char *dst, unsigned int dst_size) | 
|  |  | 
|  | { | 
|  | int i; | 
|  | unsigned int last = dst_size / 2; | 
|  |  | 
|  | for (i = 0; i < last; i++) { | 
|  | *dst++ = src[i] & 0x7f; | 
|  | *dst++ = src[i] >> 7; | 
|  | } | 
|  | return dst; | 
|  | } | 
|  |  | 
|  | static | 
|  | unsigned char * | 
|  | demunge_buf (unsigned char *src, unsigned char *dst, unsigned int src_bytes) | 
|  |  | 
|  | { | 
|  | int i; | 
|  | unsigned char *end = src + src_bytes; | 
|  |  | 
|  | end = src + src_bytes; | 
|  |  | 
|  | /* NOTE: src and dst *CAN* point to the same address */ | 
|  |  | 
|  | for (i = 0; src != end; i++) { | 
|  | dst[i] = *src++; | 
|  | dst[i] |= (*src++)<<7; | 
|  | } | 
|  |  | 
|  | return dst; | 
|  | } | 
|  |  | 
|  | /*********************************************************************** | 
|  | WaveFront: sample, patch and program management. | 
|  | ***********************************************************************/ | 
|  |  | 
|  | static int | 
|  | wavefront_delete_sample (int sample_num) | 
|  |  | 
|  | { | 
|  | unsigned char wbuf[2]; | 
|  | int x; | 
|  |  | 
|  | wbuf[0] = sample_num & 0x7f; | 
|  | wbuf[1] = sample_num >> 7; | 
|  |  | 
|  | if ((x = wavefront_cmd (WFC_DELETE_SAMPLE, NULL, wbuf)) == 0) { | 
|  | dev.sample_status[sample_num] = WF_ST_EMPTY; | 
|  | } | 
|  |  | 
|  | return x; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_get_sample_status (int assume_rom) | 
|  |  | 
|  | { | 
|  | int i; | 
|  | unsigned char rbuf[32], wbuf[32]; | 
|  | unsigned int    sc_real, sc_alias, sc_multi; | 
|  |  | 
|  | /* check sample status */ | 
|  |  | 
|  | if (wavefront_cmd (WFC_GET_NSAMPLES, rbuf, wbuf)) { | 
|  | printk (KERN_WARNING LOGNAME "cannot request sample count.\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | sc_real = sc_alias = sc_multi = dev.samples_used = 0; | 
|  |  | 
|  | for (i = 0; i < WF_MAX_SAMPLE; i++) { | 
|  |  | 
|  | wbuf[0] = i & 0x7f; | 
|  | wbuf[1] = i >> 7; | 
|  |  | 
|  | if (wavefront_cmd (WFC_IDENTIFY_SAMPLE_TYPE, rbuf, wbuf)) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "cannot identify sample " | 
|  | "type of slot %d\n", i); | 
|  | dev.sample_status[i] = WF_ST_EMPTY; | 
|  | continue; | 
|  | } | 
|  |  | 
|  | dev.sample_status[i] = (WF_SLOT_FILLED|rbuf[0]); | 
|  |  | 
|  | if (assume_rom) { | 
|  | dev.sample_status[i] |= WF_SLOT_ROM; | 
|  | } | 
|  |  | 
|  | switch (rbuf[0] & WF_ST_MASK) { | 
|  | case WF_ST_SAMPLE: | 
|  | sc_real++; | 
|  | break; | 
|  | case WF_ST_MULTISAMPLE: | 
|  | sc_multi++; | 
|  | break; | 
|  | case WF_ST_ALIAS: | 
|  | sc_alias++; | 
|  | break; | 
|  | case WF_ST_EMPTY: | 
|  | break; | 
|  |  | 
|  | default: | 
|  | printk (KERN_WARNING LOGNAME "unknown sample type for " | 
|  | "slot %d (0x%x)\n", | 
|  | i, rbuf[0]); | 
|  | } | 
|  |  | 
|  | if (rbuf[0] != WF_ST_EMPTY) { | 
|  | dev.samples_used++; | 
|  | } | 
|  | } | 
|  |  | 
|  | printk (KERN_INFO LOGNAME | 
|  | "%d samples used (%d real, %d aliases, %d multi), " | 
|  | "%d empty\n", dev.samples_used, sc_real, sc_alias, sc_multi, | 
|  | WF_MAX_SAMPLE - dev.samples_used); | 
|  |  | 
|  |  | 
|  | return (0); | 
|  |  | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_get_patch_status (void) | 
|  |  | 
|  | { | 
|  | unsigned char patchbuf[WF_PATCH_BYTES]; | 
|  | unsigned char patchnum[2]; | 
|  | wavefront_patch *p; | 
|  | int i, x, cnt, cnt2; | 
|  |  | 
|  | for (i = 0; i < WF_MAX_PATCH; i++) { | 
|  | patchnum[0] = i & 0x7f; | 
|  | patchnum[1] = i >> 7; | 
|  |  | 
|  | if ((x = wavefront_cmd (WFC_UPLOAD_PATCH, patchbuf, | 
|  | patchnum)) == 0) { | 
|  |  | 
|  | dev.patch_status[i] |= WF_SLOT_FILLED; | 
|  | p = (wavefront_patch *) patchbuf; | 
|  | dev.sample_status | 
|  | [p->sample_number|(p->sample_msb<<7)] |= | 
|  | WF_SLOT_USED; | 
|  |  | 
|  | } else if (x == 3) { /* Bad patch number */ | 
|  | dev.patch_status[i] = 0; | 
|  | } else { | 
|  | printk (KERN_ERR LOGNAME "upload patch " | 
|  | "error 0x%x\n", x); | 
|  | dev.patch_status[i] = 0; | 
|  | return 1; | 
|  | } | 
|  | } | 
|  |  | 
|  | /* program status has already filled in slot_used bits */ | 
|  |  | 
|  | for (i = 0, cnt = 0, cnt2 = 0; i < WF_MAX_PATCH; i++) { | 
|  | if (dev.patch_status[i] & WF_SLOT_FILLED) { | 
|  | cnt++; | 
|  | } | 
|  | if (dev.patch_status[i] & WF_SLOT_USED) { | 
|  | cnt2++; | 
|  | } | 
|  |  | 
|  | } | 
|  | printk (KERN_INFO LOGNAME | 
|  | "%d patch slots filled, %d in use\n", cnt, cnt2); | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_get_program_status (void) | 
|  |  | 
|  | { | 
|  | unsigned char progbuf[WF_PROGRAM_BYTES]; | 
|  | wavefront_program prog; | 
|  | unsigned char prognum; | 
|  | int i, x, l, cnt; | 
|  |  | 
|  | for (i = 0; i < WF_MAX_PROGRAM; i++) { | 
|  | prognum = i; | 
|  |  | 
|  | if ((x = wavefront_cmd (WFC_UPLOAD_PROGRAM, progbuf, | 
|  | &prognum)) == 0) { | 
|  |  | 
|  | dev.prog_status[i] |= WF_SLOT_USED; | 
|  |  | 
|  | demunge_buf (progbuf, (unsigned char *) &prog, | 
|  | WF_PROGRAM_BYTES); | 
|  |  | 
|  | for (l = 0; l < WF_NUM_LAYERS; l++) { | 
|  | if (prog.layer[l].mute) { | 
|  | dev.patch_status | 
|  | [prog.layer[l].patch_number] |= | 
|  | WF_SLOT_USED; | 
|  | } | 
|  | } | 
|  | } else if (x == 1) { /* Bad program number */ | 
|  | dev.prog_status[i] = 0; | 
|  | } else { | 
|  | printk (KERN_ERR LOGNAME "upload program " | 
|  | "error 0x%x\n", x); | 
|  | dev.prog_status[i] = 0; | 
|  | } | 
|  | } | 
|  |  | 
|  | for (i = 0, cnt = 0; i < WF_MAX_PROGRAM; i++) { | 
|  | if (dev.prog_status[i]) { | 
|  | cnt++; | 
|  | } | 
|  | } | 
|  |  | 
|  | printk (KERN_INFO LOGNAME "%d programs slots in use\n", cnt); | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_send_patch (wavefront_patch_info *header) | 
|  |  | 
|  | { | 
|  | unsigned char buf[WF_PATCH_BYTES+2]; | 
|  | unsigned char *bptr; | 
|  |  | 
|  | DPRINT (WF_DEBUG_LOAD_PATCH, "downloading patch %d\n", | 
|  | header->number); | 
|  |  | 
|  | dev.patch_status[header->number] |= WF_SLOT_FILLED; | 
|  |  | 
|  | bptr = buf; | 
|  | bptr = munge_int32 (header->number, buf, 2); | 
|  | munge_buf ((unsigned char *)&header->hdr.p, bptr, WF_PATCH_BYTES); | 
|  |  | 
|  | if (wavefront_cmd (WFC_DOWNLOAD_PATCH, NULL, buf)) { | 
|  | printk (KERN_ERR LOGNAME "download patch failed\n"); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_send_program (wavefront_patch_info *header) | 
|  |  | 
|  | { | 
|  | unsigned char buf[WF_PROGRAM_BYTES+1]; | 
|  | int i; | 
|  |  | 
|  | DPRINT (WF_DEBUG_LOAD_PATCH, "downloading program %d\n", | 
|  | header->number); | 
|  |  | 
|  | dev.prog_status[header->number] = WF_SLOT_USED; | 
|  |  | 
|  | /* XXX need to zero existing SLOT_USED bit for program_status[i] | 
|  | where `i' is the program that's being (potentially) overwritten. | 
|  | */ | 
|  |  | 
|  | for (i = 0; i < WF_NUM_LAYERS; i++) { | 
|  | if (header->hdr.pr.layer[i].mute) { | 
|  | dev.patch_status[header->hdr.pr.layer[i].patch_number] |= | 
|  | WF_SLOT_USED; | 
|  |  | 
|  | /* XXX need to mark SLOT_USED for sample used by | 
|  | patch_number, but this means we have to load it. Ick. | 
|  | */ | 
|  | } | 
|  | } | 
|  |  | 
|  | buf[0] = header->number; | 
|  | munge_buf ((unsigned char *)&header->hdr.pr, &buf[1], WF_PROGRAM_BYTES); | 
|  |  | 
|  | if (wavefront_cmd (WFC_DOWNLOAD_PROGRAM, NULL, buf)) { | 
|  | printk (KERN_WARNING LOGNAME "download patch failed\n"); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_freemem (void) | 
|  |  | 
|  | { | 
|  | char rbuf[8]; | 
|  |  | 
|  | if (wavefront_cmd (WFC_REPORT_FREE_MEMORY, rbuf, NULL)) { | 
|  | printk (KERN_WARNING LOGNAME "can't get memory stats.\n"); | 
|  | return -1; | 
|  | } else { | 
|  | return demunge_int32 (rbuf, 4); | 
|  | } | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_send_sample (wavefront_patch_info *header, | 
|  | UINT16 __user *dataptr, | 
|  | int data_is_unsigned) | 
|  |  | 
|  | { | 
|  | /* samples are downloaded via a 16-bit wide i/o port | 
|  | (you could think of it as 2 adjacent 8-bit wide ports | 
|  | but its less efficient that way). therefore, all | 
|  | the blocksizes and so forth listed in the documentation, | 
|  | and used conventionally to refer to sample sizes, | 
|  | which are given in 8-bit units (bytes), need to be | 
|  | divided by 2. | 
|  | */ | 
|  |  | 
|  | UINT16 sample_short; | 
|  | UINT32 length; | 
|  | UINT16 __user *data_end = NULL; | 
|  | unsigned int i; | 
|  | const int max_blksize = 4096/2; | 
|  | unsigned int written; | 
|  | unsigned int blocksize; | 
|  | int dma_ack; | 
|  | int blocknum; | 
|  | unsigned char sample_hdr[WF_SAMPLE_HDR_BYTES]; | 
|  | unsigned char *shptr; | 
|  | int skip = 0; | 
|  | int initial_skip = 0; | 
|  |  | 
|  | DPRINT (WF_DEBUG_LOAD_PATCH, "sample %sdownload for slot %d, " | 
|  | "type %d, %d bytes from %p\n", | 
|  | header->size ? "" : "header ", | 
|  | header->number, header->subkey, | 
|  | header->size, | 
|  | header->dataptr); | 
|  |  | 
|  | if (header->number == WAVEFRONT_FIND_FREE_SAMPLE_SLOT) { | 
|  | int x; | 
|  |  | 
|  | if ((x = wavefront_find_free_sample ()) < 0) { | 
|  | return -ENOMEM; | 
|  | } | 
|  | printk (KERN_DEBUG LOGNAME "unspecified sample => %d\n", x); | 
|  | header->number = x; | 
|  | } | 
|  |  | 
|  | if (header->size) { | 
|  |  | 
|  | /* XXX it's a debatable point whether or not RDONLY semantics | 
|  | on the ROM samples should cover just the sample data or | 
|  | the sample header. For now, it only covers the sample data, | 
|  | so anyone is free at all times to rewrite sample headers. | 
|  |  | 
|  | My reason for this is that we have the sample headers | 
|  | available in the WFB file for General MIDI, and so these | 
|  | can always be reset if needed. The sample data, however, | 
|  | cannot be recovered without a complete reset and firmware | 
|  | reload of the ICS2115, which is a very expensive operation. | 
|  |  | 
|  | So, doing things this way allows us to honor the notion of | 
|  | "RESETSAMPLES" reasonably cheaply. Note however, that this | 
|  | is done purely at user level: there is no WFB parser in | 
|  | this driver, and so a complete reset (back to General MIDI, | 
|  | or theoretically some other configuration) is the | 
|  | responsibility of the user level library. | 
|  |  | 
|  | To try to do this in the kernel would be a little | 
|  | crazy: we'd need 158K of kernel space just to hold | 
|  | a copy of the patch/program/sample header data. | 
|  | */ | 
|  |  | 
|  | if (dev.rom_samples_rdonly) { | 
|  | if (dev.sample_status[header->number] & WF_SLOT_ROM) { | 
|  | printk (KERN_ERR LOGNAME "sample slot %d " | 
|  | "write protected\n", | 
|  | header->number); | 
|  | return -EACCES; | 
|  | } | 
|  | } | 
|  |  | 
|  | wavefront_delete_sample (header->number); | 
|  | } | 
|  |  | 
|  | if (header->size) { | 
|  | dev.freemem = wavefront_freemem (); | 
|  |  | 
|  | if (dev.freemem < header->size) { | 
|  | printk (KERN_ERR LOGNAME | 
|  | "insufficient memory to " | 
|  | "load %d byte sample.\n", | 
|  | header->size); | 
|  | return -ENOMEM; | 
|  | } | 
|  |  | 
|  | } | 
|  |  | 
|  | skip = WF_GET_CHANNEL(&header->hdr.s); | 
|  |  | 
|  | if (skip > 0 && header->hdr.s.SampleResolution != LINEAR_16BIT) { | 
|  | printk (KERN_ERR LOGNAME "channel selection only " | 
|  | "possible on 16-bit samples"); | 
|  | return -(EINVAL); | 
|  | } | 
|  |  | 
|  | switch (skip) { | 
|  | case 0: | 
|  | initial_skip = 0; | 
|  | skip = 1; | 
|  | break; | 
|  | case 1: | 
|  | initial_skip = 0; | 
|  | skip = 2; | 
|  | break; | 
|  | case 2: | 
|  | initial_skip = 1; | 
|  | skip = 2; | 
|  | break; | 
|  | case 3: | 
|  | initial_skip = 2; | 
|  | skip = 3; | 
|  | break; | 
|  | case 4: | 
|  | initial_skip = 3; | 
|  | skip = 4; | 
|  | break; | 
|  | case 5: | 
|  | initial_skip = 4; | 
|  | skip = 5; | 
|  | break; | 
|  | case 6: | 
|  | initial_skip = 5; | 
|  | skip = 6; | 
|  | break; | 
|  | } | 
|  |  | 
|  | DPRINT (WF_DEBUG_LOAD_PATCH, "channel selection: %d => " | 
|  | "initial skip = %d, skip = %d\n", | 
|  | WF_GET_CHANNEL (&header->hdr.s), | 
|  | initial_skip, skip); | 
|  |  | 
|  | /* Be safe, and zero the "Unused" bits ... */ | 
|  |  | 
|  | WF_SET_CHANNEL(&header->hdr.s, 0); | 
|  |  | 
|  | /* adjust size for 16 bit samples by dividing by two.  We always | 
|  | send 16 bits per write, even for 8 bit samples, so the length | 
|  | is always half the size of the sample data in bytes. | 
|  | */ | 
|  |  | 
|  | length = header->size / 2; | 
|  |  | 
|  | /* the data we're sent has not been munged, and in fact, the | 
|  | header we have to send isn't just a munged copy either. | 
|  | so, build the sample header right here. | 
|  | */ | 
|  |  | 
|  | shptr = &sample_hdr[0]; | 
|  |  | 
|  | shptr = munge_int32 (header->number, shptr, 2); | 
|  |  | 
|  | if (header->size) { | 
|  | shptr = munge_int32 (length, shptr, 4); | 
|  | } | 
|  |  | 
|  | /* Yes, a 4 byte result doesn't contain all of the offset bits, | 
|  | but the offset only uses 24 bits. | 
|  | */ | 
|  |  | 
|  | shptr = munge_int32 (*((UINT32 *) &header->hdr.s.sampleStartOffset), | 
|  | shptr, 4); | 
|  | shptr = munge_int32 (*((UINT32 *) &header->hdr.s.loopStartOffset), | 
|  | shptr, 4); | 
|  | shptr = munge_int32 (*((UINT32 *) &header->hdr.s.loopEndOffset), | 
|  | shptr, 4); | 
|  | shptr = munge_int32 (*((UINT32 *) &header->hdr.s.sampleEndOffset), | 
|  | shptr, 4); | 
|  |  | 
|  | /* This one is truly weird. What kind of weirdo decided that in | 
|  | a system dominated by 16 and 32 bit integers, they would use | 
|  | a just 12 bits ? | 
|  | */ | 
|  |  | 
|  | shptr = munge_int32 (header->hdr.s.FrequencyBias, shptr, 3); | 
|  |  | 
|  | /* Why is this nybblified, when the MSB is *always* zero ? | 
|  | Anyway, we can't take address of bitfield, so make a | 
|  | good-faith guess at where it starts. | 
|  | */ | 
|  |  | 
|  | shptr = munge_int32 (*(&header->hdr.s.FrequencyBias+1), | 
|  | shptr, 2); | 
|  |  | 
|  | if (wavefront_cmd (header->size ? | 
|  | WFC_DOWNLOAD_SAMPLE : WFC_DOWNLOAD_SAMPLE_HEADER, | 
|  | NULL, sample_hdr)) { | 
|  | printk (KERN_WARNING LOGNAME "sample %sdownload refused.\n", | 
|  | header->size ? "" : "header "); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | if (header->size == 0) { | 
|  | goto sent; /* Sorry. Just had to have one somewhere */ | 
|  | } | 
|  |  | 
|  | data_end = dataptr + length; | 
|  |  | 
|  | /* Do any initial skip over an unused channel's data */ | 
|  |  | 
|  | dataptr += initial_skip; | 
|  |  | 
|  | for (written = 0, blocknum = 0; | 
|  | written < length; written += max_blksize, blocknum++) { | 
|  |  | 
|  | if ((length - written) > max_blksize) { | 
|  | blocksize = max_blksize; | 
|  | } else { | 
|  | /* round to nearest 16-byte value */ | 
|  | blocksize = ((length-written+7)&~0x7); | 
|  | } | 
|  |  | 
|  | if (wavefront_cmd (WFC_DOWNLOAD_BLOCK, NULL, NULL)) { | 
|  | printk (KERN_WARNING LOGNAME "download block " | 
|  | "request refused.\n"); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | for (i = 0; i < blocksize; i++) { | 
|  |  | 
|  | if (dataptr < data_end) { | 
|  |  | 
|  | __get_user (sample_short, dataptr); | 
|  | dataptr += skip; | 
|  |  | 
|  | if (data_is_unsigned) { /* GUS ? */ | 
|  |  | 
|  | if (WF_SAMPLE_IS_8BIT(&header->hdr.s)) { | 
|  |  | 
|  | /* 8 bit sample | 
|  | resolution, sign | 
|  | extend both bytes. | 
|  | */ | 
|  |  | 
|  | ((unsigned char*) | 
|  | &sample_short)[0] += 0x7f; | 
|  | ((unsigned char*) | 
|  | &sample_short)[1] += 0x7f; | 
|  |  | 
|  | } else { | 
|  |  | 
|  | /* 16 bit sample | 
|  | resolution, sign | 
|  | extend the MSB. | 
|  | */ | 
|  |  | 
|  | sample_short += 0x7fff; | 
|  | } | 
|  | } | 
|  |  | 
|  | } else { | 
|  |  | 
|  | /* In padding section of final block: | 
|  |  | 
|  | Don't fetch unsupplied data from | 
|  | user space, just continue with | 
|  | whatever the final value was. | 
|  | */ | 
|  | } | 
|  |  | 
|  | if (i < blocksize - 1) { | 
|  | outw (sample_short, dev.block_port); | 
|  | } else { | 
|  | outw (sample_short, dev.last_block_port); | 
|  | } | 
|  | } | 
|  |  | 
|  | /* Get "DMA page acknowledge", even though its really | 
|  | nothing to do with DMA at all. | 
|  | */ | 
|  |  | 
|  | if ((dma_ack = wavefront_read ()) != WF_DMA_ACK) { | 
|  | if (dma_ack == -1) { | 
|  | printk (KERN_ERR LOGNAME "upload sample " | 
|  | "DMA ack timeout\n"); | 
|  | return -(EIO); | 
|  | } else { | 
|  | printk (KERN_ERR LOGNAME "upload sample " | 
|  | "DMA ack error 0x%x\n", | 
|  | dma_ack); | 
|  | return -(EIO); | 
|  | } | 
|  | } | 
|  | } | 
|  |  | 
|  | dev.sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_SAMPLE); | 
|  |  | 
|  | /* Note, label is here because sending the sample header shouldn't | 
|  | alter the sample_status info at all. | 
|  | */ | 
|  |  | 
|  | sent: | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_send_alias (wavefront_patch_info *header) | 
|  |  | 
|  | { | 
|  | unsigned char alias_hdr[WF_ALIAS_BYTES]; | 
|  |  | 
|  | DPRINT (WF_DEBUG_LOAD_PATCH, "download alias, %d is " | 
|  | "alias for %d\n", | 
|  | header->number, | 
|  | header->hdr.a.OriginalSample); | 
|  |  | 
|  | munge_int32 (header->number, &alias_hdr[0], 2); | 
|  | munge_int32 (header->hdr.a.OriginalSample, &alias_hdr[2], 2); | 
|  | munge_int32 (*((unsigned int *)&header->hdr.a.sampleStartOffset), | 
|  | &alias_hdr[4], 4); | 
|  | munge_int32 (*((unsigned int *)&header->hdr.a.loopStartOffset), | 
|  | &alias_hdr[8], 4); | 
|  | munge_int32 (*((unsigned int *)&header->hdr.a.loopEndOffset), | 
|  | &alias_hdr[12], 4); | 
|  | munge_int32 (*((unsigned int *)&header->hdr.a.sampleEndOffset), | 
|  | &alias_hdr[16], 4); | 
|  | munge_int32 (header->hdr.a.FrequencyBias, &alias_hdr[20], 3); | 
|  | munge_int32 (*(&header->hdr.a.FrequencyBias+1), &alias_hdr[23], 2); | 
|  |  | 
|  | if (wavefront_cmd (WFC_DOWNLOAD_SAMPLE_ALIAS, NULL, alias_hdr)) { | 
|  | printk (KERN_ERR LOGNAME "download alias failed.\n"); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | dev.sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_ALIAS); | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_send_multisample (wavefront_patch_info *header) | 
|  | { | 
|  | int i; | 
|  | int num_samples; | 
|  | unsigned char msample_hdr[WF_MSAMPLE_BYTES]; | 
|  |  | 
|  | munge_int32 (header->number, &msample_hdr[0], 2); | 
|  |  | 
|  | /* You'll recall at this point that the "number of samples" value | 
|  | in a wavefront_multisample struct is actually the log2 of the | 
|  | real number of samples. | 
|  | */ | 
|  |  | 
|  | num_samples = (1<<(header->hdr.ms.NumberOfSamples&7)); | 
|  | msample_hdr[2] = (unsigned char) header->hdr.ms.NumberOfSamples; | 
|  |  | 
|  | DPRINT (WF_DEBUG_LOAD_PATCH, "multi %d with %d=%d samples\n", | 
|  | header->number, | 
|  | header->hdr.ms.NumberOfSamples, | 
|  | num_samples); | 
|  |  | 
|  | for (i = 0; i < num_samples; i++) { | 
|  | DPRINT(WF_DEBUG_LOAD_PATCH|WF_DEBUG_DATA, "sample[%d] = %d\n", | 
|  | i, header->hdr.ms.SampleNumber[i]); | 
|  | munge_int32 (header->hdr.ms.SampleNumber[i], | 
|  | &msample_hdr[3+(i*2)], 2); | 
|  | } | 
|  |  | 
|  | /* Need a hack here to pass in the number of bytes | 
|  | to be written to the synth. This is ugly, and perhaps | 
|  | one day, I'll fix it. | 
|  | */ | 
|  |  | 
|  | if (wavefront_cmd (WFC_DOWNLOAD_MULTISAMPLE, | 
|  | (unsigned char *) ((num_samples*2)+3), | 
|  | msample_hdr)) { | 
|  | printk (KERN_ERR LOGNAME "download of multisample failed.\n"); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | dev.sample_status[header->number] = (WF_SLOT_FILLED|WF_ST_MULTISAMPLE); | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_fetch_multisample (wavefront_patch_info *header) | 
|  | { | 
|  | int i; | 
|  | unsigned char log_ns[1]; | 
|  | unsigned char number[2]; | 
|  | int num_samples; | 
|  |  | 
|  | munge_int32 (header->number, number, 2); | 
|  |  | 
|  | if (wavefront_cmd (WFC_UPLOAD_MULTISAMPLE, log_ns, number)) { | 
|  | printk (KERN_ERR LOGNAME "upload multisample failed.\n"); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | DPRINT (WF_DEBUG_DATA, "msample %d has %d samples\n", | 
|  | header->number, log_ns[0]); | 
|  |  | 
|  | header->hdr.ms.NumberOfSamples = log_ns[0]; | 
|  |  | 
|  | /* get the number of samples ... */ | 
|  |  | 
|  | num_samples = (1 << log_ns[0]); | 
|  |  | 
|  | for (i = 0; i < num_samples; i++) { | 
|  | s8 d[2]; | 
|  |  | 
|  | if ((d[0] = wavefront_read ()) == -1) { | 
|  | printk (KERN_ERR LOGNAME "upload multisample failed " | 
|  | "during sample loop.\n"); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | if ((d[1] = wavefront_read ()) == -1) { | 
|  | printk (KERN_ERR LOGNAME "upload multisample failed " | 
|  | "during sample loop.\n"); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | header->hdr.ms.SampleNumber[i] = | 
|  | demunge_int32 ((unsigned char *) d, 2); | 
|  |  | 
|  | DPRINT (WF_DEBUG_DATA, "msample sample[%d] = %d\n", | 
|  | i, header->hdr.ms.SampleNumber[i]); | 
|  | } | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  |  | 
|  | static int | 
|  | wavefront_send_drum (wavefront_patch_info *header) | 
|  |  | 
|  | { | 
|  | unsigned char drumbuf[WF_DRUM_BYTES]; | 
|  | wavefront_drum *drum = &header->hdr.d; | 
|  | int i; | 
|  |  | 
|  | DPRINT (WF_DEBUG_LOAD_PATCH, "downloading edrum for MIDI " | 
|  | "note %d, patch = %d\n", | 
|  | header->number, drum->PatchNumber); | 
|  |  | 
|  | drumbuf[0] = header->number & 0x7f; | 
|  |  | 
|  | for (i = 0; i < 4; i++) { | 
|  | munge_int32 (((unsigned char *)drum)[i], &drumbuf[1+(i*2)], 2); | 
|  | } | 
|  |  | 
|  | if (wavefront_cmd (WFC_DOWNLOAD_EDRUM_PROGRAM, NULL, drumbuf)) { | 
|  | printk (KERN_ERR LOGNAME "download drum failed.\n"); | 
|  | return -(EIO); | 
|  | } | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_find_free_sample (void) | 
|  |  | 
|  | { | 
|  | int i; | 
|  |  | 
|  | for (i = 0; i < WF_MAX_SAMPLE; i++) { | 
|  | if (!(dev.sample_status[i] & WF_SLOT_FILLED)) { | 
|  | return i; | 
|  | } | 
|  | } | 
|  | printk (KERN_WARNING LOGNAME "no free sample slots!\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_find_free_patch (void) | 
|  |  | 
|  | { | 
|  | int i; | 
|  |  | 
|  | for (i = 0; i < WF_MAX_PATCH; i++) { | 
|  | if (!(dev.patch_status[i] & WF_SLOT_FILLED)) { | 
|  | return i; | 
|  | } | 
|  | } | 
|  | printk (KERN_WARNING LOGNAME "no free patch slots!\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | static int | 
|  | log2_2048(int n) | 
|  |  | 
|  | { | 
|  | int tbl[]={0, 0, 2048, 3246, 4096, 4755, 5294, 5749, 6143, | 
|  | 6492, 6803, 7084, 7342, 7578, 7797, 8001, 8192, | 
|  | 8371, 8540, 8699, 8851, 8995, 9132, 9264, 9390, | 
|  | 9510, 9626, 9738, 9845, 9949, 10049, 10146}; | 
|  | int i; | 
|  |  | 
|  | /* Returns 2048*log2(n) */ | 
|  |  | 
|  | /* FIXME: this is like doing integer math | 
|  | on quantum particles (RuN) */ | 
|  |  | 
|  | i=0; | 
|  | while(n>=32*256) { | 
|  | n>>=8; | 
|  | i+=2048*8; | 
|  | } | 
|  | while(n>=32) { | 
|  | n>>=1; | 
|  | i+=2048; | 
|  | } | 
|  | i+=tbl[n]; | 
|  | return(i); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_load_gus_patch (int devno, int format, const char __user *addr, | 
|  | int offs, int count, int pmgr_flag) | 
|  | { | 
|  | struct patch_info guspatch; | 
|  | wavefront_patch_info *samp, *pat, *prog; | 
|  | wavefront_patch *patp; | 
|  | wavefront_sample *sampp; | 
|  | wavefront_program *progp; | 
|  |  | 
|  | int i,base_note; | 
|  | long sizeof_patch; | 
|  | int rc = -ENOMEM; | 
|  |  | 
|  | samp = kmalloc(3 * sizeof(wavefront_patch_info), GFP_KERNEL); | 
|  | if (!samp) | 
|  | goto free_fail; | 
|  | pat = samp + 1; | 
|  | prog = pat + 1; | 
|  |  | 
|  | /* Copy in the header of the GUS patch */ | 
|  |  | 
|  | sizeof_patch = (long) &guspatch.data[0] - (long) &guspatch; | 
|  | if (copy_from_user(&((char *) &guspatch)[offs], | 
|  | &(addr)[offs], sizeof_patch - offs)) { | 
|  | rc = -EFAULT; | 
|  | goto free_fail; | 
|  | } | 
|  |  | 
|  | if ((i = wavefront_find_free_patch ()) == -1) { | 
|  | rc = -EBUSY; | 
|  | goto free_fail; | 
|  | } | 
|  | pat->number = i; | 
|  | pat->subkey = WF_ST_PATCH; | 
|  | patp = &pat->hdr.p; | 
|  |  | 
|  | if ((i = wavefront_find_free_sample ()) == -1) { | 
|  | rc = -EBUSY; | 
|  | goto free_fail; | 
|  | } | 
|  | samp->number = i; | 
|  | samp->subkey = WF_ST_SAMPLE; | 
|  | samp->size = guspatch.len; | 
|  | sampp = &samp->hdr.s; | 
|  |  | 
|  | prog->number = guspatch.instr_no; | 
|  | progp = &prog->hdr.pr; | 
|  |  | 
|  | /* Setup the patch structure */ | 
|  |  | 
|  | patp->amplitude_bias=guspatch.volume; | 
|  | patp->portamento=0; | 
|  | patp->sample_number= samp->number & 0xff; | 
|  | patp->sample_msb= samp->number >> 8; | 
|  | patp->pitch_bend= /*12*/ 0; | 
|  | patp->mono=1; | 
|  | patp->retrigger=1; | 
|  | patp->nohold=(guspatch.mode & WAVE_SUSTAIN_ON) ? 0:1; | 
|  | patp->frequency_bias=0; | 
|  | patp->restart=0; | 
|  | patp->reuse=0; | 
|  | patp->reset_lfo=1; | 
|  | patp->fm_src2=0; | 
|  | patp->fm_src1=WF_MOD_MOD_WHEEL; | 
|  | patp->am_src=WF_MOD_PRESSURE; | 
|  | patp->am_amount=127; | 
|  | patp->fc1_mod_amount=0; | 
|  | patp->fc2_mod_amount=0; | 
|  | patp->fm_amount1=0; | 
|  | patp->fm_amount2=0; | 
|  | patp->envelope1.attack_level=127; | 
|  | patp->envelope1.decay1_level=127; | 
|  | patp->envelope1.decay2_level=127; | 
|  | patp->envelope1.sustain_level=127; | 
|  | patp->envelope1.release_level=0; | 
|  | patp->envelope2.attack_velocity=127; | 
|  | patp->envelope2.attack_level=127; | 
|  | patp->envelope2.decay1_level=127; | 
|  | patp->envelope2.decay2_level=127; | 
|  | patp->envelope2.sustain_level=127; | 
|  | patp->envelope2.release_level=0; | 
|  | patp->envelope2.attack_velocity=127; | 
|  | patp->randomizer=0; | 
|  |  | 
|  | /* Program for this patch */ | 
|  |  | 
|  | progp->layer[0].patch_number= pat->number; /* XXX is this right ? */ | 
|  | progp->layer[0].mute=1; | 
|  | progp->layer[0].pan_or_mod=1; | 
|  | progp->layer[0].pan=7; | 
|  | progp->layer[0].mix_level=127  /* guspatch.volume */; | 
|  | progp->layer[0].split_type=0; | 
|  | progp->layer[0].split_point=0; | 
|  | progp->layer[0].play_below=0; | 
|  |  | 
|  | for (i = 1; i < 4; i++) { | 
|  | progp->layer[i].mute=0; | 
|  | } | 
|  |  | 
|  | /* Sample data */ | 
|  |  | 
|  | sampp->SampleResolution=((~guspatch.mode & WAVE_16_BITS)<<1); | 
|  |  | 
|  | for (base_note=0; | 
|  | note_to_freq (base_note) < guspatch.base_note; | 
|  | base_note++); | 
|  |  | 
|  | if ((guspatch.base_note-note_to_freq(base_note)) | 
|  | >(note_to_freq(base_note)-guspatch.base_note)) | 
|  | base_note++; | 
|  |  | 
|  | printk(KERN_DEBUG "ref freq=%d,base note=%d\n", | 
|  | guspatch.base_freq, | 
|  | base_note); | 
|  |  | 
|  | sampp->FrequencyBias = (29550 - log2_2048(guspatch.base_freq) | 
|  | + base_note*171); | 
|  | printk(KERN_DEBUG "Freq Bias is %d\n", sampp->FrequencyBias); | 
|  | sampp->Loop=(guspatch.mode & WAVE_LOOPING) ? 1:0; | 
|  | sampp->sampleStartOffset.Fraction=0; | 
|  | sampp->sampleStartOffset.Integer=0; | 
|  | sampp->loopStartOffset.Fraction=0; | 
|  | sampp->loopStartOffset.Integer=guspatch.loop_start | 
|  | >>((guspatch.mode&WAVE_16_BITS) ? 1:0); | 
|  | sampp->loopEndOffset.Fraction=0; | 
|  | sampp->loopEndOffset.Integer=guspatch.loop_end | 
|  | >>((guspatch.mode&WAVE_16_BITS) ? 1:0); | 
|  | sampp->sampleEndOffset.Fraction=0; | 
|  | sampp->sampleEndOffset.Integer=guspatch.len >> (guspatch.mode&1); | 
|  | sampp->Bidirectional=(guspatch.mode&WAVE_BIDIR_LOOP) ? 1:0; | 
|  | sampp->Reverse=(guspatch.mode&WAVE_LOOP_BACK) ? 1:0; | 
|  |  | 
|  | /* Now ship it down */ | 
|  |  | 
|  | wavefront_send_sample (samp, | 
|  | (unsigned short __user *) &(addr)[sizeof_patch], | 
|  | (guspatch.mode & WAVE_UNSIGNED) ? 1:0); | 
|  | wavefront_send_patch (pat); | 
|  | wavefront_send_program (prog); | 
|  |  | 
|  | /* Now pan as best we can ... use the slave/internal MIDI device | 
|  | number if it exists (since it talks to the WaveFront), or the | 
|  | master otherwise. | 
|  | */ | 
|  |  | 
|  | if (dev.mididev > 0) { | 
|  | midi_synth_controller (dev.mididev, guspatch.instr_no, 10, | 
|  | ((guspatch.panning << 4) > 127) ? | 
|  | 127 : (guspatch.panning << 4)); | 
|  | } | 
|  | rc = 0; | 
|  |  | 
|  | free_fail: | 
|  | kfree(samp); | 
|  | return rc; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_load_patch (const char __user *addr) | 
|  |  | 
|  |  | 
|  | { | 
|  | wavefront_patch_info header; | 
|  |  | 
|  | if (copy_from_user (&header, addr, sizeof(wavefront_patch_info) - | 
|  | sizeof(wavefront_any))) { | 
|  | printk (KERN_WARNING LOGNAME "bad address for load patch.\n"); | 
|  | return -EFAULT; | 
|  | } | 
|  |  | 
|  | DPRINT (WF_DEBUG_LOAD_PATCH, "download " | 
|  | "Sample type: %d " | 
|  | "Sample number: %d " | 
|  | "Sample size: %d\n", | 
|  | header.subkey, | 
|  | header.number, | 
|  | header.size); | 
|  |  | 
|  | switch (header.subkey) { | 
|  | case WF_ST_SAMPLE:  /* sample or sample_header, based on patch->size */ | 
|  |  | 
|  | if (copy_from_user((unsigned char *) &header.hdr.s, | 
|  | (unsigned char __user *) header.hdrptr, | 
|  | sizeof (wavefront_sample))) | 
|  | return -EFAULT; | 
|  |  | 
|  | return wavefront_send_sample (&header, header.dataptr, 0); | 
|  |  | 
|  | case WF_ST_MULTISAMPLE: | 
|  |  | 
|  | if (copy_from_user(&header.hdr.s, header.hdrptr, | 
|  | sizeof(wavefront_multisample))) | 
|  | return -EFAULT; | 
|  |  | 
|  | return wavefront_send_multisample (&header); | 
|  |  | 
|  |  | 
|  | case WF_ST_ALIAS: | 
|  |  | 
|  | if (copy_from_user(&header.hdr.a, header.hdrptr, | 
|  | sizeof (wavefront_alias))) | 
|  | return -EFAULT; | 
|  |  | 
|  | return wavefront_send_alias (&header); | 
|  |  | 
|  | case WF_ST_DRUM: | 
|  | if (copy_from_user(&header.hdr.d, header.hdrptr, | 
|  | sizeof (wavefront_drum))) | 
|  | return -EFAULT; | 
|  |  | 
|  | return wavefront_send_drum (&header); | 
|  |  | 
|  | case WF_ST_PATCH: | 
|  | if (copy_from_user(&header.hdr.p, header.hdrptr, | 
|  | sizeof (wavefront_patch))) | 
|  | return -EFAULT; | 
|  |  | 
|  | return wavefront_send_patch (&header); | 
|  |  | 
|  | case WF_ST_PROGRAM: | 
|  | if (copy_from_user(&header.hdr.pr, header.hdrptr, | 
|  | sizeof (wavefront_program))) | 
|  | return -EFAULT; | 
|  |  | 
|  | return wavefront_send_program (&header); | 
|  |  | 
|  | default: | 
|  | printk (KERN_ERR LOGNAME "unknown patch type %d.\n", | 
|  | header.subkey); | 
|  | return -(EINVAL); | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | /*********************************************************************** | 
|  | WaveFront: /dev/sequencer{,2} and other hardware-dependent interfaces | 
|  | ***********************************************************************/ | 
|  |  | 
|  | static void | 
|  | process_sample_hdr (UCHAR8 *buf) | 
|  |  | 
|  | { | 
|  | wavefront_sample s; | 
|  | UCHAR8 *ptr; | 
|  |  | 
|  | ptr = buf; | 
|  |  | 
|  | /* The board doesn't send us an exact copy of a "wavefront_sample" | 
|  | in response to an Upload Sample Header command. Instead, we | 
|  | have to convert the data format back into our data structure, | 
|  | just as in the Download Sample command, where we have to do | 
|  | something very similar in the reverse direction. | 
|  | */ | 
|  |  | 
|  | *((UINT32 *) &s.sampleStartOffset) = demunge_int32 (ptr, 4); ptr += 4; | 
|  | *((UINT32 *) &s.loopStartOffset) = demunge_int32 (ptr, 4); ptr += 4; | 
|  | *((UINT32 *) &s.loopEndOffset) = demunge_int32 (ptr, 4); ptr += 4; | 
|  | *((UINT32 *) &s.sampleEndOffset) = demunge_int32 (ptr, 4); ptr += 4; | 
|  | *((UINT32 *) &s.FrequencyBias) = demunge_int32 (ptr, 3); ptr += 3; | 
|  |  | 
|  | s.SampleResolution = *ptr & 0x3; | 
|  | s.Loop = *ptr & 0x8; | 
|  | s.Bidirectional = *ptr & 0x10; | 
|  | s.Reverse = *ptr & 0x40; | 
|  |  | 
|  | /* Now copy it back to where it came from */ | 
|  |  | 
|  | memcpy (buf, (unsigned char *) &s, sizeof (wavefront_sample)); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_synth_control (int cmd, wavefront_control *wc) | 
|  |  | 
|  | { | 
|  | unsigned char patchnumbuf[2]; | 
|  | int i; | 
|  |  | 
|  | DPRINT (WF_DEBUG_CMD, "synth control with " | 
|  | "cmd 0x%x\n", wc->cmd); | 
|  |  | 
|  | /* Pre-handling of or for various commands */ | 
|  |  | 
|  | switch (wc->cmd) { | 
|  | case WFC_DISABLE_INTERRUPTS: | 
|  | printk (KERN_INFO LOGNAME "interrupts disabled.\n"); | 
|  | outb (0x80|0x20, dev.control_port); | 
|  | dev.interrupts_on = 0; | 
|  | return 0; | 
|  |  | 
|  | case WFC_ENABLE_INTERRUPTS: | 
|  | printk (KERN_INFO LOGNAME "interrupts enabled.\n"); | 
|  | outb (0x80|0x40|0x20, dev.control_port); | 
|  | dev.interrupts_on = 1; | 
|  | return 0; | 
|  |  | 
|  | case WFC_INTERRUPT_STATUS: | 
|  | wc->rbuf[0] = dev.interrupts_on; | 
|  | return 0; | 
|  |  | 
|  | case WFC_ROMSAMPLES_RDONLY: | 
|  | dev.rom_samples_rdonly = wc->wbuf[0]; | 
|  | wc->status = 0; | 
|  | return 0; | 
|  |  | 
|  | case WFC_IDENTIFY_SLOT_TYPE: | 
|  | i = wc->wbuf[0] | (wc->wbuf[1] << 7); | 
|  | if (i <0 || i >= WF_MAX_SAMPLE) { | 
|  | printk (KERN_WARNING LOGNAME "invalid slot ID %d\n", | 
|  | i); | 
|  | wc->status = EINVAL; | 
|  | return 0; | 
|  | } | 
|  | wc->rbuf[0] = dev.sample_status[i]; | 
|  | wc->status = 0; | 
|  | return 0; | 
|  |  | 
|  | case WFC_DEBUG_DRIVER: | 
|  | dev.debug = wc->wbuf[0]; | 
|  | printk (KERN_INFO LOGNAME "debug = 0x%x\n", dev.debug); | 
|  | return 0; | 
|  |  | 
|  | case WFC_FX_IOCTL: | 
|  | wffx_ioctl ((wavefront_fx_info *) &wc->wbuf[0]); | 
|  | return 0; | 
|  |  | 
|  | case WFC_UPLOAD_PATCH: | 
|  | munge_int32 (*((UINT32 *) wc->wbuf), patchnumbuf, 2); | 
|  | memcpy (wc->wbuf, patchnumbuf, 2); | 
|  | break; | 
|  |  | 
|  | case WFC_UPLOAD_MULTISAMPLE: | 
|  | /* multisamples have to be handled differently, and | 
|  | cannot be dealt with properly by wavefront_cmd() alone. | 
|  | */ | 
|  | wc->status = wavefront_fetch_multisample | 
|  | ((wavefront_patch_info *) wc->rbuf); | 
|  | return 0; | 
|  |  | 
|  | case WFC_UPLOAD_SAMPLE_ALIAS: | 
|  | printk (KERN_INFO LOGNAME "support for sample alias upload " | 
|  | "being considered.\n"); | 
|  | wc->status = EINVAL; | 
|  | return -EINVAL; | 
|  | } | 
|  |  | 
|  | wc->status = wavefront_cmd (wc->cmd, wc->rbuf, wc->wbuf); | 
|  |  | 
|  | /* Post-handling of certain commands. | 
|  |  | 
|  | In particular, if the command was an upload, demunge the data | 
|  | so that the user-level doesn't have to think about it. | 
|  | */ | 
|  |  | 
|  | if (wc->status == 0) { | 
|  | switch (wc->cmd) { | 
|  | /* intercept any freemem requests so that we know | 
|  | we are always current with the user-level view | 
|  | of things. | 
|  | */ | 
|  |  | 
|  | case WFC_REPORT_FREE_MEMORY: | 
|  | dev.freemem = demunge_int32 (wc->rbuf, 4); | 
|  | break; | 
|  |  | 
|  | case WFC_UPLOAD_PATCH: | 
|  | demunge_buf (wc->rbuf, wc->rbuf, WF_PATCH_BYTES); | 
|  | break; | 
|  |  | 
|  | case WFC_UPLOAD_PROGRAM: | 
|  | demunge_buf (wc->rbuf, wc->rbuf, WF_PROGRAM_BYTES); | 
|  | break; | 
|  |  | 
|  | case WFC_UPLOAD_EDRUM_PROGRAM: | 
|  | demunge_buf (wc->rbuf, wc->rbuf, WF_DRUM_BYTES - 1); | 
|  | break; | 
|  |  | 
|  | case WFC_UPLOAD_SAMPLE_HEADER: | 
|  | process_sample_hdr (wc->rbuf); | 
|  | break; | 
|  |  | 
|  | case WFC_UPLOAD_SAMPLE_ALIAS: | 
|  | printk (KERN_INFO LOGNAME "support for " | 
|  | "sample aliases still " | 
|  | "being considered.\n"); | 
|  | break; | 
|  |  | 
|  | case WFC_VMIDI_OFF: | 
|  | if (virtual_midi_disable () < 0) { | 
|  | return -(EIO); | 
|  | } | 
|  | break; | 
|  |  | 
|  | case WFC_VMIDI_ON: | 
|  | if (virtual_midi_enable () < 0) { | 
|  | return -(EIO); | 
|  | } | 
|  | break; | 
|  | } | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  |  | 
|  | /***********************************************************************/ | 
|  | /* WaveFront: Linux file system interface (for access via raw synth)    */ | 
|  | /***********************************************************************/ | 
|  |  | 
|  | static int | 
|  | wavefront_open (struct inode *inode, struct file *file) | 
|  | { | 
|  | /* XXX fix me */ | 
|  | dev.opened = file->f_flags; | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_release(struct inode *inode, struct file *file) | 
|  | { | 
|  | lock_kernel(); | 
|  | dev.opened = 0; | 
|  | dev.debug = 0; | 
|  | unlock_kernel(); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_ioctl(struct inode *inode, struct file *file, | 
|  | unsigned int cmd, unsigned long arg) | 
|  | { | 
|  | wavefront_control wc; | 
|  | int err; | 
|  |  | 
|  | switch (cmd) { | 
|  |  | 
|  | case WFCTL_WFCMD: | 
|  | if (copy_from_user(&wc, (void __user *) arg, sizeof (wc))) | 
|  | return -EFAULT; | 
|  |  | 
|  | if ((err = wavefront_synth_control (cmd, &wc)) == 0) { | 
|  | if (copy_to_user ((void __user *) arg, &wc, sizeof (wc))) | 
|  | return -EFAULT; | 
|  | } | 
|  |  | 
|  | return err; | 
|  |  | 
|  | case WFCTL_LOAD_SPP: | 
|  | return wavefront_load_patch ((const char __user *) arg); | 
|  |  | 
|  | default: | 
|  | printk (KERN_WARNING LOGNAME "invalid ioctl %#x\n", cmd); | 
|  | return -(EINVAL); | 
|  |  | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static /*const*/ struct file_operations wavefront_fops = { | 
|  | .owner		= THIS_MODULE, | 
|  | .llseek		= no_llseek, | 
|  | .ioctl		= wavefront_ioctl, | 
|  | .open		= wavefront_open, | 
|  | .release	= wavefront_release, | 
|  | }; | 
|  |  | 
|  |  | 
|  | /***********************************************************************/ | 
|  | /* WaveFront: OSS installation and support interface                   */ | 
|  | /***********************************************************************/ | 
|  |  | 
|  | #if OSS_SUPPORT_LEVEL & OSS_SUPPORT_SEQ | 
|  |  | 
|  | static struct synth_info wavefront_info = | 
|  | {"Turtle Beach WaveFront", 0, SYNTH_TYPE_SAMPLE, SAMPLE_TYPE_WAVEFRONT, | 
|  | 0, 32, 0, 0, SYNTH_CAP_INPUT}; | 
|  |  | 
|  | static int | 
|  | wavefront_oss_open (int devno, int mode) | 
|  |  | 
|  | { | 
|  | dev.opened = mode; | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static void | 
|  | wavefront_oss_close (int devno) | 
|  |  | 
|  | { | 
|  | dev.opened = 0; | 
|  | dev.debug = 0; | 
|  | return; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_oss_ioctl (int devno, unsigned int cmd, void __user * arg) | 
|  |  | 
|  | { | 
|  | wavefront_control wc; | 
|  | int err; | 
|  |  | 
|  | switch (cmd) { | 
|  | case SNDCTL_SYNTH_INFO: | 
|  | if(copy_to_user(arg, &wavefront_info, sizeof (wavefront_info))) | 
|  | return -EFAULT; | 
|  | return 0; | 
|  |  | 
|  | case SNDCTL_SEQ_RESETSAMPLES: | 
|  | //		printk (KERN_WARNING LOGNAME "driver cannot reset samples.\n"); | 
|  | return 0; /* don't force an error */ | 
|  |  | 
|  | case SNDCTL_SEQ_PERCMODE: | 
|  | return 0; /* don't force an error */ | 
|  |  | 
|  | case SNDCTL_SYNTH_MEMAVL: | 
|  | if ((dev.freemem = wavefront_freemem ()) < 0) { | 
|  | printk (KERN_ERR LOGNAME "cannot get memory size\n"); | 
|  | return -EIO; | 
|  | } else { | 
|  | return dev.freemem; | 
|  | } | 
|  | break; | 
|  |  | 
|  | case SNDCTL_SYNTH_CONTROL: | 
|  | if(copy_from_user (&wc, arg, sizeof (wc))) | 
|  | err = -EFAULT; | 
|  | else if ((err = wavefront_synth_control (cmd, &wc)) == 0) { | 
|  | if(copy_to_user (arg, &wc, sizeof (wc))) | 
|  | err = -EFAULT; | 
|  | } | 
|  |  | 
|  | return err; | 
|  |  | 
|  | default: | 
|  | return -(EINVAL); | 
|  | } | 
|  | } | 
|  |  | 
|  | static int | 
|  | wavefront_oss_load_patch (int devno, int format, const char __user *addr, | 
|  | int offs, int count, int pmgr_flag) | 
|  | { | 
|  |  | 
|  | if (format == SYSEX_PATCH) {	/* Handled by midi_synth.c */ | 
|  | if (midi_load_patch == NULL) { | 
|  | printk (KERN_ERR LOGNAME | 
|  | "SYSEX not loadable: " | 
|  | "no midi patch loader!\n"); | 
|  | return -(EINVAL); | 
|  | } | 
|  |  | 
|  | return midi_load_patch (devno, format, addr, | 
|  | offs, count, pmgr_flag); | 
|  |  | 
|  | } else if (format == GUS_PATCH) { | 
|  | return wavefront_load_gus_patch (devno, format, | 
|  | addr, offs, count, pmgr_flag); | 
|  |  | 
|  | } else if (format != WAVEFRONT_PATCH) { | 
|  | printk (KERN_ERR LOGNAME "unknown patch format %d\n", format); | 
|  | return -(EINVAL); | 
|  | } | 
|  |  | 
|  | if (count < sizeof (wavefront_patch_info)) { | 
|  | printk (KERN_ERR LOGNAME "sample header too short\n"); | 
|  | return -(EINVAL); | 
|  | } | 
|  |  | 
|  | /* "addr" points to a user-space wavefront_patch_info */ | 
|  |  | 
|  | return wavefront_load_patch (addr); | 
|  | } | 
|  |  | 
|  | static struct synth_operations wavefront_operations = | 
|  | { | 
|  | .owner		= THIS_MODULE, | 
|  | .id		= "WaveFront", | 
|  | .info		= &wavefront_info, | 
|  | .midi_dev	= 0, | 
|  | .synth_type	= SYNTH_TYPE_SAMPLE, | 
|  | .synth_subtype	= SAMPLE_TYPE_WAVEFRONT, | 
|  | .open		= wavefront_oss_open, | 
|  | .close		= wavefront_oss_close, | 
|  | .ioctl		= wavefront_oss_ioctl, | 
|  | .kill_note	= midi_synth_kill_note, | 
|  | .start_note	= midi_synth_start_note, | 
|  | .set_instr	= midi_synth_set_instr, | 
|  | .reset		= midi_synth_reset, | 
|  | .load_patch	= midi_synth_load_patch, | 
|  | .aftertouch	= midi_synth_aftertouch, | 
|  | .controller	= midi_synth_controller, | 
|  | .panning	= midi_synth_panning, | 
|  | .bender		= midi_synth_bender, | 
|  | .setup_voice	= midi_synth_setup_voice | 
|  | }; | 
|  | #endif /* OSS_SUPPORT_SEQ */ | 
|  |  | 
|  | #if OSS_SUPPORT_LEVEL & OSS_SUPPORT_STATIC_INSTALL | 
|  |  | 
|  | static void __init attach_wavefront (struct address_info *hw_config) | 
|  | { | 
|  | (void) install_wavefront (); | 
|  | } | 
|  |  | 
|  | static int __init probe_wavefront (struct address_info *hw_config) | 
|  | { | 
|  | return !detect_wavefront (hw_config->irq, hw_config->io_base); | 
|  | } | 
|  |  | 
|  | static void __exit unload_wavefront (struct address_info *hw_config) | 
|  | { | 
|  | (void) uninstall_wavefront (); | 
|  | } | 
|  |  | 
|  | #endif /* OSS_SUPPORT_STATIC_INSTALL */ | 
|  |  | 
|  | /***********************************************************************/ | 
|  | /* WaveFront: Linux modular sound kernel installation interface        */ | 
|  | /***********************************************************************/ | 
|  |  | 
|  | static irqreturn_t | 
|  | wavefrontintr(int irq, void *dev_id, struct pt_regs *dummy) | 
|  | { | 
|  | struct wf_config *hw = dev_id; | 
|  |  | 
|  | /* | 
|  | Some comments on interrupts. I attempted a version of this | 
|  | driver that used interrupts throughout the code instead of | 
|  | doing busy and/or sleep-waiting. Alas, it appears that once | 
|  | the Motorola firmware is downloaded, the card *never* | 
|  | generates an RX interrupt. These are successfully generated | 
|  | during firmware loading, and after that wavefront_status() | 
|  | reports that an interrupt is pending on the card from time | 
|  | to time, but it never seems to be delivered to this | 
|  | driver. Note also that wavefront_status() continues to | 
|  | report that RX interrupts are enabled, suggesting that I | 
|  | didn't goof up and disable them by mistake. | 
|  |  | 
|  | Thus, I stepped back to a prior version of | 
|  | wavefront_wait(), the only place where this really | 
|  | matters. Its sad, but I've looked through the code to check | 
|  | on things, and I really feel certain that the Motorola | 
|  | firmware prevents RX-ready interrupts. | 
|  | */ | 
|  |  | 
|  | if ((wavefront_status() & (STAT_INTR_READ|STAT_INTR_WRITE)) == 0) { | 
|  | return IRQ_NONE; | 
|  | } | 
|  |  | 
|  | hw->irq_ok = 1; | 
|  | hw->irq_cnt++; | 
|  | wake_up_interruptible (&hw->interrupt_sleeper); | 
|  | return IRQ_HANDLED; | 
|  | } | 
|  |  | 
|  | /* STATUS REGISTER | 
|  |  | 
|  | 0 Host Rx Interrupt Enable (1=Enabled) | 
|  | 1 Host Rx Register Full (1=Full) | 
|  | 2 Host Rx Interrupt Pending (1=Interrupt) | 
|  | 3 Unused | 
|  | 4 Host Tx Interrupt (1=Enabled) | 
|  | 5 Host Tx Register empty (1=Empty) | 
|  | 6 Host Tx Interrupt Pending (1=Interrupt) | 
|  | 7 Unused | 
|  | */ | 
|  |  | 
|  | static int | 
|  | wavefront_interrupt_bits (int irq) | 
|  |  | 
|  | { | 
|  | int bits; | 
|  |  | 
|  | switch (irq) { | 
|  | case 9: | 
|  | bits = 0x00; | 
|  | break; | 
|  | case 5: | 
|  | bits = 0x08; | 
|  | break; | 
|  | case 12: | 
|  | bits = 0x10; | 
|  | break; | 
|  | case 15: | 
|  | bits = 0x18; | 
|  | break; | 
|  |  | 
|  | default: | 
|  | printk (KERN_WARNING LOGNAME "invalid IRQ %d\n", irq); | 
|  | bits = -1; | 
|  | } | 
|  |  | 
|  | return bits; | 
|  | } | 
|  |  | 
|  | static void | 
|  | wavefront_should_cause_interrupt (int val, int port, int timeout) | 
|  |  | 
|  | { | 
|  | unsigned long flags; | 
|  |  | 
|  | /* this will not help on SMP - but at least it compiles */ | 
|  | spin_lock_irqsave(&lock, flags); | 
|  | dev.irq_ok = 0; | 
|  | outb (val,port); | 
|  | interruptible_sleep_on_timeout (&dev.interrupt_sleeper, timeout); | 
|  | spin_unlock_irqrestore(&lock,flags); | 
|  | } | 
|  |  | 
|  | static int __init wavefront_hw_reset (void) | 
|  | { | 
|  | int bits; | 
|  | int hwv[2]; | 
|  | unsigned long irq_mask; | 
|  | short reported_irq; | 
|  |  | 
|  | /* IRQ already checked in init_module() */ | 
|  |  | 
|  | bits = wavefront_interrupt_bits (dev.irq); | 
|  |  | 
|  | printk (KERN_DEBUG LOGNAME "autodetecting WaveFront IRQ\n"); | 
|  |  | 
|  | irq_mask = probe_irq_on (); | 
|  |  | 
|  | outb (0x0, dev.control_port); | 
|  | outb (0x80 | 0x40 | bits, dev.data_port); | 
|  | wavefront_should_cause_interrupt(0x80|0x40|0x10|0x1, | 
|  | dev.control_port, | 
|  | (reset_time*HZ)/100); | 
|  |  | 
|  | reported_irq = probe_irq_off (irq_mask); | 
|  |  | 
|  | if (reported_irq != dev.irq) { | 
|  | if (reported_irq == 0) { | 
|  | printk (KERN_ERR LOGNAME | 
|  | "No unassigned interrupts detected " | 
|  | "after h/w reset\n"); | 
|  | } else if (reported_irq < 0) { | 
|  | printk (KERN_ERR LOGNAME | 
|  | "Multiple unassigned interrupts detected " | 
|  | "after h/w reset\n"); | 
|  | } else { | 
|  | printk (KERN_ERR LOGNAME "autodetected IRQ %d not the " | 
|  | "value provided (%d)\n", reported_irq, | 
|  | dev.irq); | 
|  | } | 
|  | dev.irq = -1; | 
|  | return 1; | 
|  | } else { | 
|  | printk (KERN_INFO LOGNAME "autodetected IRQ at %d\n", | 
|  | reported_irq); | 
|  | } | 
|  |  | 
|  | if (request_irq (dev.irq, wavefrontintr, | 
|  | SA_INTERRUPT|SA_SHIRQ, | 
|  | "wavefront synth", &dev) < 0) { | 
|  | printk (KERN_WARNING LOGNAME "IRQ %d not available!\n", | 
|  | dev.irq); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | /* try reset of port */ | 
|  |  | 
|  | outb (0x0, dev.control_port); | 
|  |  | 
|  | /* At this point, the board is in reset, and the H/W initialization | 
|  | register is accessed at the same address as the data port. | 
|  |  | 
|  | Bit 7 - Enable IRQ Driver | 
|  | 0 - Tri-state the Wave-Board drivers for the PC Bus IRQs | 
|  | 1 - Enable IRQ selected by bits 5:3 to be driven onto the PC Bus. | 
|  |  | 
|  | Bit 6 - MIDI Interface Select | 
|  |  | 
|  | 0 - Use the MIDI Input from the 26-pin WaveBlaster | 
|  | compatible header as the serial MIDI source | 
|  | 1 - Use the MIDI Input from the 9-pin D connector as the | 
|  | serial MIDI source. | 
|  |  | 
|  | Bits 5:3 - IRQ Selection | 
|  | 0 0 0 - IRQ 2/9 | 
|  | 0 0 1 - IRQ 5 | 
|  | 0 1 0 - IRQ 12 | 
|  | 0 1 1 - IRQ 15 | 
|  | 1 0 0 - Reserved | 
|  | 1 0 1 - Reserved | 
|  | 1 1 0 - Reserved | 
|  | 1 1 1 - Reserved | 
|  |  | 
|  | Bits 2:1 - Reserved | 
|  | Bit 0 - Disable Boot ROM | 
|  | 0 - memory accesses to 03FC30-03FFFFH utilize the internal Boot ROM | 
|  | 1 - memory accesses to 03FC30-03FFFFH are directed to external | 
|  | storage. | 
|  |  | 
|  | */ | 
|  |  | 
|  | /* configure hardware: IRQ, enable interrupts, | 
|  | plus external 9-pin MIDI interface selected | 
|  | */ | 
|  |  | 
|  | outb (0x80 | 0x40 | bits, dev.data_port); | 
|  |  | 
|  | /* CONTROL REGISTER | 
|  |  | 
|  | 0 Host Rx Interrupt Enable (1=Enabled)      0x1 | 
|  | 1 Unused                                    0x2 | 
|  | 2 Unused                                    0x4 | 
|  | 3 Unused                                    0x8 | 
|  | 4 Host Tx Interrupt Enable                 0x10 | 
|  | 5 Mute (0=Mute; 1=Play)                    0x20 | 
|  | 6 Master Interrupt Enable (1=Enabled)      0x40 | 
|  | 7 Master Reset (0=Reset; 1=Run)            0x80 | 
|  |  | 
|  | Take us out of reset, mute output, master + TX + RX interrupts on. | 
|  |  | 
|  | We'll get an interrupt presumably to tell us that the TX | 
|  | register is clear. | 
|  | */ | 
|  |  | 
|  | wavefront_should_cause_interrupt(0x80|0x40|0x10|0x1, | 
|  | dev.control_port, | 
|  | (reset_time*HZ)/100); | 
|  |  | 
|  | /* Note: data port is now the data port, not the h/w initialization | 
|  | port. | 
|  | */ | 
|  |  | 
|  | if (!dev.irq_ok) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "intr not received after h/w un-reset.\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | dev.interrupts_on = 1; | 
|  |  | 
|  | /* Note: data port is now the data port, not the h/w initialization | 
|  | port. | 
|  |  | 
|  | At this point, only "HW VERSION" or "DOWNLOAD OS" commands | 
|  | will work. So, issue one of them, and wait for TX | 
|  | interrupt. This can take a *long* time after a cold boot, | 
|  | while the ISC ROM does its RAM test. The SDK says up to 4 | 
|  | seconds - with 12MB of RAM on a Tropez+, it takes a lot | 
|  | longer than that (~16secs). Note that the card understands | 
|  | the difference between a warm and a cold boot, so | 
|  | subsequent ISC2115 reboots (say, caused by module | 
|  | reloading) will get through this much faster. | 
|  |  | 
|  | XXX Interesting question: why is no RX interrupt received first ? | 
|  | */ | 
|  |  | 
|  | wavefront_should_cause_interrupt(WFC_HARDWARE_VERSION, | 
|  | dev.data_port, ramcheck_time*HZ); | 
|  |  | 
|  | if (!dev.irq_ok) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "post-RAM-check interrupt not received.\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | if (!wavefront_wait (STAT_CAN_READ)) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "no response to HW version cmd.\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | if ((hwv[0] = wavefront_read ()) == -1) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "board not responding correctly.\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | if (hwv[0] == 0xFF) { /* NAK */ | 
|  |  | 
|  | /* Board's RAM test failed. Try to read error code, | 
|  | and tell us about it either way. | 
|  | */ | 
|  |  | 
|  | if ((hwv[0] = wavefront_read ()) == -1) { | 
|  | printk (KERN_WARNING LOGNAME "on-board RAM test failed " | 
|  | "(bad error code).\n"); | 
|  | } else { | 
|  | printk (KERN_WARNING LOGNAME "on-board RAM test failed " | 
|  | "(error code: 0x%x).\n", | 
|  | hwv[0]); | 
|  | } | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | /* We're OK, just get the next byte of the HW version response */ | 
|  |  | 
|  | if ((hwv[1] = wavefront_read ()) == -1) { | 
|  | printk (KERN_WARNING LOGNAME "incorrect h/w response.\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | printk (KERN_INFO LOGNAME "hardware version %d.%d\n", | 
|  | hwv[0], hwv[1]); | 
|  |  | 
|  | return 0; | 
|  |  | 
|  |  | 
|  | gone_bad: | 
|  | if (dev.irq >= 0) { | 
|  | free_irq (dev.irq, &dev); | 
|  | dev.irq = -1; | 
|  | } | 
|  | return (1); | 
|  | } | 
|  |  | 
|  | static int __init detect_wavefront (int irq, int io_base) | 
|  | { | 
|  | unsigned char   rbuf[4], wbuf[4]; | 
|  |  | 
|  | /* TB docs say the device takes up 8 ports, but we know that | 
|  | if there is an FX device present (i.e. a Tropez+) it really | 
|  | consumes 16. | 
|  | */ | 
|  |  | 
|  | if (!request_region (io_base, 16, "wavfront")) { | 
|  | printk (KERN_ERR LOGNAME "IO address range 0x%x - 0x%x " | 
|  | "already in use - ignored\n", dev.base, | 
|  | dev.base+15); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | dev.irq = irq; | 
|  | dev.base = io_base; | 
|  | dev.israw = 0; | 
|  | dev.debug = debug_default; | 
|  | dev.interrupts_on = 0; | 
|  | dev.irq_cnt = 0; | 
|  | dev.rom_samples_rdonly = 1; /* XXX default lock on ROM sample slots */ | 
|  |  | 
|  | if (wavefront_cmd (WFC_FIRMWARE_VERSION, rbuf, wbuf) == 0) { | 
|  |  | 
|  | dev.fw_version[0] = rbuf[0]; | 
|  | dev.fw_version[1] = rbuf[1]; | 
|  | printk (KERN_INFO LOGNAME | 
|  | "firmware %d.%d already loaded.\n", | 
|  | rbuf[0], rbuf[1]); | 
|  |  | 
|  | /* check that a command actually works */ | 
|  |  | 
|  | if (wavefront_cmd (WFC_HARDWARE_VERSION, | 
|  | rbuf, wbuf) == 0) { | 
|  | dev.hw_version[0] = rbuf[0]; | 
|  | dev.hw_version[1] = rbuf[1]; | 
|  | } else { | 
|  | printk (KERN_WARNING LOGNAME "not raw, but no " | 
|  | "hardware version!\n"); | 
|  | release_region (io_base, 16); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | if (!wf_raw) { | 
|  | /* will re-acquire region in install_wavefront() */ | 
|  | release_region (io_base, 16); | 
|  | return 1; | 
|  | } else { | 
|  | printk (KERN_INFO LOGNAME | 
|  | "reloading firmware anyway.\n"); | 
|  | dev.israw = 1; | 
|  | } | 
|  |  | 
|  | } else { | 
|  |  | 
|  | dev.israw = 1; | 
|  | printk (KERN_INFO LOGNAME | 
|  | "no response to firmware probe, assume raw.\n"); | 
|  |  | 
|  | } | 
|  |  | 
|  | init_waitqueue_head (&dev.interrupt_sleeper); | 
|  |  | 
|  | if (wavefront_hw_reset ()) { | 
|  | printk (KERN_WARNING LOGNAME "hardware reset failed\n"); | 
|  | release_region (io_base, 16); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | /* Check for FX device, present only on Tropez+ */ | 
|  |  | 
|  | dev.has_fx = (detect_wffx () == 0); | 
|  |  | 
|  | /* will re-acquire region in install_wavefront() */ | 
|  | release_region (io_base, 16); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | #include "os.h" | 
|  | #include <linux/fs.h> | 
|  | #include <linux/mm.h> | 
|  | #include <linux/slab.h> | 
|  | #include <asm/uaccess.h> | 
|  |  | 
|  |  | 
|  | static int | 
|  | wavefront_download_firmware (char *path) | 
|  |  | 
|  | { | 
|  | unsigned char section[WF_SECTION_MAX]; | 
|  | char section_length; /* yes, just a char; max value is WF_SECTION_MAX */ | 
|  | int section_cnt_downloaded = 0; | 
|  | int fd; | 
|  | int c; | 
|  | int i; | 
|  | mm_segment_t fs; | 
|  |  | 
|  | /* This tries to be a bit cleverer than the stuff Alan Cox did for | 
|  | the generic sound firmware, in that it actually knows | 
|  | something about the structure of the Motorola firmware. In | 
|  | particular, it uses a version that has been stripped of the | 
|  | 20K of useless header information, and had section lengths | 
|  | added, making it possible to load the entire OS without any | 
|  | [kv]malloc() activity, since the longest entity we ever read is | 
|  | 42 bytes (well, WF_SECTION_MAX) long. | 
|  | */ | 
|  |  | 
|  | fs = get_fs(); | 
|  | set_fs (get_ds()); | 
|  |  | 
|  | if ((fd = sys_open (path, 0, 0)) < 0) { | 
|  | printk (KERN_WARNING LOGNAME "Unable to load \"%s\".\n", | 
|  | path); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | while (1) { | 
|  | int x; | 
|  |  | 
|  | if ((x = sys_read (fd, §ion_length, sizeof (section_length))) != | 
|  | sizeof (section_length)) { | 
|  | printk (KERN_ERR LOGNAME "firmware read error.\n"); | 
|  | goto failure; | 
|  | } | 
|  |  | 
|  | if (section_length == 0) { | 
|  | break; | 
|  | } | 
|  |  | 
|  | if (sys_read (fd, section, section_length) != section_length) { | 
|  | printk (KERN_ERR LOGNAME "firmware section " | 
|  | "read error.\n"); | 
|  | goto failure; | 
|  | } | 
|  |  | 
|  | /* Send command */ | 
|  |  | 
|  | if (wavefront_write (WFC_DOWNLOAD_OS)) { | 
|  | goto failure; | 
|  | } | 
|  |  | 
|  | for (i = 0; i < section_length; i++) { | 
|  | if (wavefront_write (section[i])) { | 
|  | goto failure; | 
|  | } | 
|  | } | 
|  |  | 
|  | /* get ACK */ | 
|  |  | 
|  | if (wavefront_wait (STAT_CAN_READ)) { | 
|  |  | 
|  | if ((c = inb (dev.data_port)) != WF_ACK) { | 
|  |  | 
|  | printk (KERN_ERR LOGNAME "download " | 
|  | "of section #%d not " | 
|  | "acknowledged, ack = 0x%x\n", | 
|  | section_cnt_downloaded + 1, c); | 
|  | goto failure; | 
|  |  | 
|  | } | 
|  |  | 
|  | } else { | 
|  | printk (KERN_ERR LOGNAME "time out for firmware ACK.\n"); | 
|  | goto failure; | 
|  | } | 
|  |  | 
|  | } | 
|  |  | 
|  | sys_close (fd); | 
|  | set_fs (fs); | 
|  | return 0; | 
|  |  | 
|  | failure: | 
|  | sys_close (fd); | 
|  | set_fs (fs); | 
|  | printk (KERN_ERR "\nWaveFront: firmware download failed!!!\n"); | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | static int __init wavefront_config_midi (void) | 
|  | { | 
|  | unsigned char rbuf[4], wbuf[4]; | 
|  |  | 
|  | if (detect_wf_mpu (dev.irq, dev.base) < 0) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "could not find working MIDI device\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | if ((dev.mididev = install_wf_mpu ()) < 0) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "MIDI interfaces not configured\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | /* Route external MIDI to WaveFront synth (by default) */ | 
|  |  | 
|  | if (wavefront_cmd (WFC_MISYNTH_ON, rbuf, wbuf)) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "cannot enable MIDI-IN to synth routing.\n"); | 
|  | /* XXX error ? */ | 
|  | } | 
|  |  | 
|  |  | 
|  | #if OSS_SUPPORT_LEVEL & OSS_SUPPORT_SEQ | 
|  | /* Get the regular MIDI patch loading function, so we can | 
|  | use it if we ever get handed a SYSEX patch. This is | 
|  | unlikely, because its so damn slow, but we may as well | 
|  | leave this functionality from maui.c behind, since it | 
|  | could be useful for sequencer applications that can | 
|  | only use MIDI to do patch loading. | 
|  | */ | 
|  |  | 
|  | if (midi_devs[dev.mididev]->converter != NULL) { | 
|  | midi_load_patch = midi_devs[dev.mididev]->converter->load_patch; | 
|  | midi_devs[dev.mididev]->converter->load_patch = | 
|  | &wavefront_oss_load_patch; | 
|  | } | 
|  |  | 
|  | #endif /* OSS_SUPPORT_SEQ */ | 
|  |  | 
|  | /* Turn on Virtual MIDI, but first *always* turn it off, | 
|  | since otherwise consectutive reloads of the driver will | 
|  | never cause the hardware to generate the initial "internal" or | 
|  | "external" source bytes in the MIDI data stream. This | 
|  | is pretty important, since the internal hardware generally will | 
|  | be used to generate none or very little MIDI output, and | 
|  | thus the only source of MIDI data is actually external. Without | 
|  | the switch bytes, the driver will think it all comes from | 
|  | the internal interface. Duh. | 
|  | */ | 
|  |  | 
|  | if (wavefront_cmd (WFC_VMIDI_OFF, rbuf, wbuf)) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "virtual MIDI mode not disabled\n"); | 
|  | return 0; /* We're OK, but missing the external MIDI dev */ | 
|  | } | 
|  |  | 
|  | if ((dev.ext_mididev = virtual_midi_enable ()) < 0) { | 
|  | printk (KERN_WARNING LOGNAME "no virtual MIDI access.\n"); | 
|  | } else { | 
|  | if (wavefront_cmd (WFC_VMIDI_ON, rbuf, wbuf)) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "cannot enable virtual MIDI mode.\n"); | 
|  | virtual_midi_disable (); | 
|  | } | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int __init wavefront_do_reset (int atboot) | 
|  | { | 
|  | char voices[1]; | 
|  |  | 
|  | if (!atboot && wavefront_hw_reset ()) { | 
|  | printk (KERN_WARNING LOGNAME "hw reset failed.\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | if (dev.israw) { | 
|  | if (wavefront_download_firmware (ospath)) { | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | dev.israw = 0; | 
|  |  | 
|  | /* Wait for the OS to get running. The protocol for | 
|  | this is non-obvious, and was determined by | 
|  | using port-IO tracing in DOSemu and some | 
|  | experimentation here. | 
|  |  | 
|  | Rather than using timed waits, use interrupts creatively. | 
|  | */ | 
|  |  | 
|  | wavefront_should_cause_interrupt (WFC_NOOP, | 
|  | dev.data_port, | 
|  | (osrun_time*HZ)); | 
|  |  | 
|  | if (!dev.irq_ok) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "no post-OS interrupt.\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | /* Now, do it again ! */ | 
|  |  | 
|  | wavefront_should_cause_interrupt (WFC_NOOP, | 
|  | dev.data_port, (10*HZ)); | 
|  |  | 
|  | if (!dev.irq_ok) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "no post-OS interrupt(2).\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | /* OK, no (RX/TX) interrupts any more, but leave mute | 
|  | in effect. | 
|  | */ | 
|  |  | 
|  | outb (0x80|0x40, dev.control_port); | 
|  |  | 
|  | /* No need for the IRQ anymore */ | 
|  |  | 
|  | free_irq (dev.irq, &dev); | 
|  |  | 
|  | } | 
|  |  | 
|  | if (dev.has_fx && fx_raw) { | 
|  | wffx_init (); | 
|  | } | 
|  |  | 
|  | /* SETUPSND.EXE asks for sample memory config here, but since i | 
|  | have no idea how to interpret the result, we'll forget | 
|  | about it. | 
|  | */ | 
|  |  | 
|  | if ((dev.freemem = wavefront_freemem ()) < 0) { | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | printk (KERN_INFO LOGNAME "available DRAM %dk\n", dev.freemem / 1024); | 
|  |  | 
|  | if (wavefront_write (0xf0) || | 
|  | wavefront_write (1) || | 
|  | (wavefront_read () < 0)) { | 
|  | dev.debug = 0; | 
|  | printk (KERN_WARNING LOGNAME "MPU emulation mode not set.\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  | voices[0] = 32; | 
|  |  | 
|  | if (wavefront_cmd (WFC_SET_NVOICES, NULL, voices)) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "cannot set number of voices to 32.\n"); | 
|  | goto gone_bad; | 
|  | } | 
|  |  | 
|  |  | 
|  | return 0; | 
|  |  | 
|  | gone_bad: | 
|  | /* reset that sucker so that it doesn't bother us. */ | 
|  |  | 
|  | outb (0x0, dev.control_port); | 
|  | dev.interrupts_on = 0; | 
|  | if (dev.irq >= 0) { | 
|  | free_irq (dev.irq, &dev); | 
|  | } | 
|  | return 1; | 
|  | } | 
|  |  | 
|  | static int __init wavefront_init (int atboot) | 
|  | { | 
|  | int samples_are_from_rom; | 
|  |  | 
|  | if (dev.israw) { | 
|  | samples_are_from_rom = 1; | 
|  | } else { | 
|  | /* XXX is this always true ? */ | 
|  | samples_are_from_rom = 0; | 
|  | } | 
|  |  | 
|  | if (dev.israw || fx_raw) { | 
|  | if (wavefront_do_reset (atboot)) { | 
|  | return -1; | 
|  | } | 
|  | } | 
|  |  | 
|  | wavefront_get_sample_status (samples_are_from_rom); | 
|  | wavefront_get_program_status (); | 
|  | wavefront_get_patch_status (); | 
|  |  | 
|  | /* Start normal operation: unreset, master interrupt enabled, no mute | 
|  | */ | 
|  |  | 
|  | outb (0x80|0x40|0x20, dev.control_port); | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int __init install_wavefront (void) | 
|  | { | 
|  | if (!request_region (dev.base+2, 6, "wavefront synth")) | 
|  | return -1; | 
|  |  | 
|  | if (dev.has_fx) { | 
|  | if (!request_region (dev.base+8, 8, "wavefront fx")) { | 
|  | release_region (dev.base+2, 6); | 
|  | return -1; | 
|  | } | 
|  | } | 
|  |  | 
|  | if ((dev.synth_dev = register_sound_synth (&wavefront_fops, -1)) < 0) { | 
|  | printk (KERN_ERR LOGNAME "cannot register raw synth\n"); | 
|  | goto err_out; | 
|  | } | 
|  |  | 
|  | #if OSS_SUPPORT_LEVEL & OSS_SUPPORT_SEQ | 
|  | if ((dev.oss_dev = sound_alloc_synthdev()) == -1) { | 
|  | printk (KERN_ERR LOGNAME "Too many sequencers\n"); | 
|  | /* FIXME: leak: should unregister sound synth */ | 
|  | goto err_out; | 
|  | } else { | 
|  | synth_devs[dev.oss_dev] = &wavefront_operations; | 
|  | } | 
|  | #endif /* OSS_SUPPORT_SEQ */ | 
|  |  | 
|  | if (wavefront_init (1) < 0) { | 
|  | printk (KERN_WARNING LOGNAME "initialization failed.\n"); | 
|  |  | 
|  | #if OSS_SUPPORT_LEVEL & OSS_SUPPORT_SEQ | 
|  | sound_unload_synthdev (dev.oss_dev); | 
|  | #endif /* OSS_SUPPORT_SEQ */ | 
|  |  | 
|  | goto err_out; | 
|  | } | 
|  |  | 
|  | if (wavefront_config_midi ()) { | 
|  | printk (KERN_WARNING LOGNAME "could not initialize MIDI.\n"); | 
|  | } | 
|  |  | 
|  | return dev.oss_dev; | 
|  |  | 
|  | err_out: | 
|  | release_region (dev.base+2, 6); | 
|  | if (dev.has_fx) | 
|  | release_region (dev.base+8, 8); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | static void __exit uninstall_wavefront (void) | 
|  | { | 
|  | /* the first two i/o addresses are freed by the wf_mpu code */ | 
|  | release_region (dev.base+2, 6); | 
|  |  | 
|  | if (dev.has_fx) { | 
|  | release_region (dev.base+8, 8); | 
|  | } | 
|  |  | 
|  | unregister_sound_synth (dev.synth_dev); | 
|  |  | 
|  | #if OSS_SUPPORT_LEVEL & OSS_SUPPORT_SEQ | 
|  | sound_unload_synthdev (dev.oss_dev); | 
|  | #endif /* OSS_SUPPORT_SEQ */ | 
|  | uninstall_wf_mpu (); | 
|  | } | 
|  |  | 
|  | /***********************************************************************/ | 
|  | /*   WaveFront FX control                                              */ | 
|  | /***********************************************************************/ | 
|  |  | 
|  | #include "yss225.h" | 
|  |  | 
|  | /* Control bits for the Load Control Register | 
|  | */ | 
|  |  | 
|  | #define FX_LSB_TRANSFER 0x01    /* transfer after DSP LSB byte written */ | 
|  | #define FX_MSB_TRANSFER 0x02    /* transfer after DSP MSB byte written */ | 
|  | #define FX_AUTO_INCR    0x04    /* auto-increment DSP address after transfer */ | 
|  |  | 
|  | static int | 
|  | wffx_idle (void) | 
|  |  | 
|  | { | 
|  | int i; | 
|  | unsigned int x = 0x80; | 
|  |  | 
|  | for (i = 0; i < 1000; i++) { | 
|  | x = inb (dev.fx_status); | 
|  | if ((x & 0x80) == 0) { | 
|  | break; | 
|  | } | 
|  | } | 
|  |  | 
|  | if (x & 0x80) { | 
|  | printk (KERN_ERR LOGNAME "FX device never idle.\n"); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | return (1); | 
|  | } | 
|  |  | 
|  | int __init detect_wffx (void) | 
|  | { | 
|  | /* This is a crude check, but its the best one I have for now. | 
|  | Certainly on the Maui and the Tropez, wffx_idle() will | 
|  | report "never idle", which suggests that this test should | 
|  | work OK. | 
|  | */ | 
|  |  | 
|  | if (inb (dev.fx_status) & 0x80) { | 
|  | printk (KERN_INFO LOGNAME "Hmm, probably a Maui or Tropez.\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static void | 
|  | wffx_mute (int onoff) | 
|  |  | 
|  | { | 
|  | if (!wffx_idle()) { | 
|  | return; | 
|  | } | 
|  |  | 
|  | outb (onoff ? 0x02 : 0x00, dev.fx_op); | 
|  | } | 
|  |  | 
|  | static int | 
|  | wffx_memset (int page, | 
|  | int addr, int cnt, unsigned short *data) | 
|  | { | 
|  | if (page < 0 || page > 7) { | 
|  | printk (KERN_ERR LOGNAME "FX memset: " | 
|  | "page must be >= 0 and <= 7\n"); | 
|  | return -(EINVAL); | 
|  | } | 
|  |  | 
|  | if (addr < 0 || addr > 0x7f) { | 
|  | printk (KERN_ERR LOGNAME "FX memset: " | 
|  | "addr must be >= 0 and <= 7f\n"); | 
|  | return -(EINVAL); | 
|  | } | 
|  |  | 
|  | if (cnt == 1) { | 
|  |  | 
|  | outb (FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (page, dev.fx_dsp_page); | 
|  | outb (addr, dev.fx_dsp_addr); | 
|  | outb ((data[0] >> 8), dev.fx_dsp_msb); | 
|  | outb ((data[0] & 0xff), dev.fx_dsp_lsb); | 
|  |  | 
|  | printk (KERN_INFO LOGNAME "FX: addr %d:%x set to 0x%x\n", | 
|  | page, addr, data[0]); | 
|  |  | 
|  | } else { | 
|  | int i; | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (page, dev.fx_dsp_page); | 
|  | outb (addr, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < cnt; i++) { | 
|  | outb ((data[i] >> 8), dev.fx_dsp_msb); | 
|  | outb ((data[i] & 0xff), dev.fx_dsp_lsb); | 
|  | if (!wffx_idle ()) { | 
|  | break; | 
|  | } | 
|  | } | 
|  |  | 
|  | if (i != cnt) { | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "FX memset " | 
|  | "(0x%x, 0x%x, %p, %d) incomplete\n", | 
|  | page, addr, data, cnt); | 
|  | return -(EIO); | 
|  | } | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int | 
|  | wffx_ioctl (wavefront_fx_info *r) | 
|  |  | 
|  | { | 
|  | unsigned short page_data[256]; | 
|  | unsigned short *pd; | 
|  |  | 
|  | switch (r->request) { | 
|  | case WFFX_MUTE: | 
|  | wffx_mute (r->data[0]); | 
|  | return 0; | 
|  |  | 
|  | case WFFX_MEMSET: | 
|  |  | 
|  | if (r->data[2] <= 0) { | 
|  | printk (KERN_ERR LOGNAME "cannot write " | 
|  | "<= 0 bytes to FX\n"); | 
|  | return -(EINVAL); | 
|  | } else if (r->data[2] == 1) { | 
|  | pd = (unsigned short *) &r->data[3]; | 
|  | } else { | 
|  | if (r->data[2] > sizeof (page_data)) { | 
|  | printk (KERN_ERR LOGNAME "cannot write " | 
|  | "> 255 bytes to FX\n"); | 
|  | return -(EINVAL); | 
|  | } | 
|  | if (copy_from_user(page_data, | 
|  | (unsigned char __user *)r->data[3], | 
|  | r->data[2])) | 
|  | return -EFAULT; | 
|  | pd = page_data; | 
|  | } | 
|  |  | 
|  | return wffx_memset (r->data[0], /* page */ | 
|  | r->data[1], /* addr */ | 
|  | r->data[2], /* cnt */ | 
|  | pd); | 
|  |  | 
|  | default: | 
|  | printk (KERN_WARNING LOGNAME | 
|  | "FX: ioctl %d not yet supported\n", | 
|  | r->request); | 
|  | return -(EINVAL); | 
|  | } | 
|  | } | 
|  |  | 
|  | /* YSS225 initialization. | 
|  |  | 
|  | This code was developed using DOSEMU. The Turtle Beach SETUPSND | 
|  | utility was run with I/O tracing in DOSEMU enabled, and a reconstruction | 
|  | of the port I/O done, using the Yamaha faxback document as a guide | 
|  | to add more logic to the code. Its really pretty weird. | 
|  |  | 
|  | There was an alternative approach of just dumping the whole I/O | 
|  | sequence as a series of port/value pairs and a simple loop | 
|  | that output it. However, I hope that eventually I'll get more | 
|  | control over what this code does, and so I tried to stick with | 
|  | a somewhat "algorithmic" approach. | 
|  | */ | 
|  |  | 
|  | static int __init wffx_init (void) | 
|  | { | 
|  | int i; | 
|  | int j; | 
|  |  | 
|  | /* Set all bits for all channels on the MOD unit to zero */ | 
|  | /* XXX But why do this twice ? */ | 
|  |  | 
|  | for (j = 0; j < 2; j++) { | 
|  | for (i = 0x10; i <= 0xff; i++) { | 
|  |  | 
|  | if (!wffx_idle ()) { | 
|  | return (-1); | 
|  | } | 
|  |  | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x0, dev.fx_mod_data); | 
|  | } | 
|  | } | 
|  |  | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x02, dev.fx_op);                        /* mute on */ | 
|  |  | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x44, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x42, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x43, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x7c, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x7e, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x46, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x49, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x47, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x4a, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  |  | 
|  | /* either because of stupidity by TB's programmers, or because it | 
|  | actually does something, rezero the MOD page. | 
|  | */ | 
|  | for (i = 0x10; i <= 0xff; i++) { | 
|  |  | 
|  | if (!wffx_idle ()) { | 
|  | return (-1); | 
|  | } | 
|  |  | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x0, dev.fx_mod_data); | 
|  | } | 
|  | /* load page zero */ | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x00, dev.fx_dsp_page); | 
|  | outb (0x00, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_zero); i += 2) { | 
|  | outb (page_zero[i], dev.fx_dsp_msb); | 
|  | outb (page_zero[i+1], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | /* Now load page one */ | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x01, dev.fx_dsp_page); | 
|  | outb (0x00, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_one); i += 2) { | 
|  | outb (page_one[i], dev.fx_dsp_msb); | 
|  | outb (page_one[i+1], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x02, dev.fx_dsp_page); | 
|  | outb (0x00, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_two); i++) { | 
|  | outb (page_two[i], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x03, dev.fx_dsp_page); | 
|  | outb (0x00, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_three); i++) { | 
|  | outb (page_three[i], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x04, dev.fx_dsp_page); | 
|  | outb (0x00, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_four); i++) { | 
|  | outb (page_four[i], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | /* Load memory area (page six) */ | 
|  |  | 
|  | outb (FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x06, dev.fx_dsp_page); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_six); i += 3) { | 
|  | outb (page_six[i], dev.fx_dsp_addr); | 
|  | outb (page_six[i+1], dev.fx_dsp_msb); | 
|  | outb (page_six[i+2], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x00, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_seven); i += 2) { | 
|  | outb (page_seven[i], dev.fx_dsp_msb); | 
|  | outb (page_seven[i+1], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | /* Now setup the MOD area. We do this algorithmically in order to | 
|  | save a little data space. It could be done in the same fashion | 
|  | as the "pages". | 
|  | */ | 
|  |  | 
|  | for (i = 0x00; i <= 0x0f; i++) { | 
|  | outb (0x01, dev.fx_mod_addr); | 
|  | outb (i, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x02, dev.fx_mod_addr); | 
|  | outb (0x00, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | for (i = 0xb0; i <= 0xbf; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x20, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | for (i = 0xf0; i <= 0xff; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x20, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | for (i = 0x10; i <= 0x1d; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0xff, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (0x1e, dev.fx_mod_addr); | 
|  | outb (0x40, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | for (i = 0x1f; i <= 0x2d; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0xff, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (0x2e, dev.fx_mod_addr); | 
|  | outb (0x00, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | for (i = 0x2f; i <= 0x3e; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x00, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (0x3f, dev.fx_mod_addr); | 
|  | outb (0x20, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | for (i = 0x40; i <= 0x4d; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x00, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (0x4e, dev.fx_mod_addr); | 
|  | outb (0x0e, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x4f, dev.fx_mod_addr); | 
|  | outb (0x0e, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  |  | 
|  | for (i = 0x50; i <= 0x6b; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x00, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (0x6c, dev.fx_mod_addr); | 
|  | outb (0x40, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | outb (0x6d, dev.fx_mod_addr); | 
|  | outb (0x00, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | outb (0x6e, dev.fx_mod_addr); | 
|  | outb (0x40, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | outb (0x6f, dev.fx_mod_addr); | 
|  | outb (0x40, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | for (i = 0x70; i <= 0x7f; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0xc0, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | for (i = 0x80; i <= 0xaf; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x00, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | for (i = 0xc0; i <= 0xdd; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x00, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (0xde, dev.fx_mod_addr); | 
|  | outb (0x10, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0xdf, dev.fx_mod_addr); | 
|  | outb (0x10, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | for (i = 0xe0; i <= 0xef; i++) { | 
|  | outb (i, dev.fx_mod_addr); | 
|  | outb (0x00, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | for (i = 0x00; i <= 0x0f; i++) { | 
|  | outb (0x01, dev.fx_mod_addr); | 
|  | outb (i, dev.fx_mod_data); | 
|  | outb (0x02, dev.fx_mod_addr); | 
|  | outb (0x01, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (0x02, dev.fx_op); /* mute on */ | 
|  |  | 
|  | /* Now set the coefficients and so forth for the programs above */ | 
|  |  | 
|  | for (i = 0; i < sizeof (coefficients); i += 4) { | 
|  | outb (coefficients[i], dev.fx_dsp_page); | 
|  | outb (coefficients[i+1], dev.fx_dsp_addr); | 
|  | outb (coefficients[i+2], dev.fx_dsp_msb); | 
|  | outb (coefficients[i+3], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | /* Some settings (?) that are too small to bundle into loops */ | 
|  |  | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x1e, dev.fx_mod_addr); | 
|  | outb (0x14, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0xde, dev.fx_mod_addr); | 
|  | outb (0x20, dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0xdf, dev.fx_mod_addr); | 
|  | outb (0x20, dev.fx_mod_data); | 
|  |  | 
|  | /* some more coefficients */ | 
|  |  | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x06, dev.fx_dsp_page); | 
|  | outb (0x78, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x40, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x03, dev.fx_dsp_addr); | 
|  | outb (0x0f, dev.fx_dsp_msb); | 
|  | outb (0xff, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x0b, dev.fx_dsp_addr); | 
|  | outb (0x0f, dev.fx_dsp_msb); | 
|  | outb (0xff, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x02, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x0a, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x46, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x49, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  |  | 
|  | /* Now, for some strange reason, lets reload every page | 
|  | and all the coefficients over again. I have *NO* idea | 
|  | why this is done. I do know that no sound is produced | 
|  | is this phase is omitted. | 
|  | */ | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x00, dev.fx_dsp_page); | 
|  | outb (0x10, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_zero_v2); i += 2) { | 
|  | outb (page_zero_v2[i], dev.fx_dsp_msb); | 
|  | outb (page_zero_v2[i+1], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x01, dev.fx_dsp_page); | 
|  | outb (0x10, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_one_v2); i += 2) { | 
|  | outb (page_one_v2[i], dev.fx_dsp_msb); | 
|  | outb (page_one_v2[i+1], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | if (!wffx_idle()) return (-1); | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x02, dev.fx_dsp_page); | 
|  | outb (0x10, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_two_v2); i++) { | 
|  | outb (page_two_v2[i], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x03, dev.fx_dsp_page); | 
|  | outb (0x10, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_three_v2); i++) { | 
|  | outb (page_three_v2[i], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x04, dev.fx_dsp_page); | 
|  | outb (0x10, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_four_v2); i++) { | 
|  | outb (page_four_v2[i], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x06, dev.fx_dsp_page); | 
|  |  | 
|  | /* Page six v.2 is algorithmic */ | 
|  |  | 
|  | for (i = 0x10; i <= 0x3e; i += 2) { | 
|  | outb (i, dev.fx_dsp_addr); | 
|  | outb (0x00, dev.fx_dsp_msb); | 
|  | outb (0x00, dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | outb (FX_AUTO_INCR|FX_LSB_TRANSFER, dev.fx_lcr); | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | outb (0x10, dev.fx_dsp_addr); | 
|  |  | 
|  | for (i = 0; i < sizeof (page_seven_v2); i += 2) { | 
|  | outb (page_seven_v2[i], dev.fx_dsp_msb); | 
|  | outb (page_seven_v2[i+1], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | for (i = 0x00; i < sizeof(mod_v2); i += 2) { | 
|  | outb (mod_v2[i], dev.fx_mod_addr); | 
|  | outb (mod_v2[i+1], dev.fx_mod_data); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | for (i = 0; i < sizeof (coefficients2); i += 4) { | 
|  | outb (coefficients2[i], dev.fx_dsp_page); | 
|  | outb (coefficients2[i+1], dev.fx_dsp_addr); | 
|  | outb (coefficients2[i+2], dev.fx_dsp_msb); | 
|  | outb (coefficients2[i+3], dev.fx_dsp_lsb); | 
|  | if (!wffx_idle()) return (-1); | 
|  | } | 
|  |  | 
|  | for (i = 0; i < sizeof (coefficients3); i += 2) { | 
|  | int x; | 
|  |  | 
|  | outb (0x07, dev.fx_dsp_page); | 
|  | x = (i % 4) ? 0x4e : 0x4c; | 
|  | outb (x, dev.fx_dsp_addr); | 
|  | outb (coefficients3[i], dev.fx_dsp_msb); | 
|  | outb (coefficients3[i+1], dev.fx_dsp_lsb); | 
|  | } | 
|  |  | 
|  | outb (0x00, dev.fx_op); /* mute off */ | 
|  | if (!wffx_idle()) return (-1); | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  | static int io = -1; | 
|  | static int irq = -1; | 
|  |  | 
|  | MODULE_AUTHOR      ("Paul Barton-Davis <pbd@op.net>"); | 
|  | MODULE_DESCRIPTION ("Turtle Beach WaveFront Linux Driver"); | 
|  | MODULE_LICENSE("GPL"); | 
|  | module_param       (io, int, 0); | 
|  | module_param       (irq, int, 0); | 
|  |  | 
|  | static int __init init_wavfront (void) | 
|  | { | 
|  | printk ("Turtle Beach WaveFront Driver\n" | 
|  | "Copyright (C) by Hannu Solvainen, " | 
|  | "Paul Barton-Davis 1993-1998.\n"); | 
|  |  | 
|  | /* XXX t'would be lovely to ask the CS4232 for these values, eh ? */ | 
|  |  | 
|  | if (io == -1 || irq == -1) { | 
|  | printk (KERN_INFO LOGNAME "irq and io options must be set.\n"); | 
|  | return -EINVAL; | 
|  | } | 
|  |  | 
|  | if (wavefront_interrupt_bits (irq) < 0) { | 
|  | printk (KERN_INFO LOGNAME | 
|  | "IRQ must be 9, 5, 12 or 15 (not %d)\n", irq); | 
|  | return -ENODEV; | 
|  | } | 
|  |  | 
|  | if (detect_wavefront (irq, io) < 0) { | 
|  | return -ENODEV; | 
|  | } | 
|  |  | 
|  | if (install_wavefront () < 0) { | 
|  | return -EIO; | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static void __exit cleanup_wavfront (void) | 
|  | { | 
|  | uninstall_wavefront (); | 
|  | } | 
|  |  | 
|  | module_init(init_wavfront); | 
|  | module_exit(cleanup_wavfront); |