maui.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:10k
- /*
- * sound/maui.c
- *
- * The low level driver for Turtle Beach Maui and Tropez.
- *
- *
- * Copyright (C) by Hannu Savolainen 1993-1997
- *
- * OSS/Free for Linux 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:
- * Alan Cox General clean up, use kernel IRQ
- * system
- * Christoph Hellwig Adapted to module_init/module_exit
- * Bartlomiej Zolnierkiewicz
- * Added __init to download_code()
- *
- * Status:
- * Andrew J. Kroll Tested 06/01/1999 with:
- * * OSWF.MOT File Version: 1.15
- * * OSWF.MOT File Dated: 09/12/94
- * * Older versions will cause problems.
- */
- #include <linux/config.h>
- #include <linux/module.h>
- #include <linux/init.h>
- #define USE_SEQ_MACROS
- #define USE_SIMPLE_MACROS
- #include "sound_config.h"
- #include "sound_firmware.h"
- #include "mpu401.h"
- static int maui_base = 0x330;
- static volatile int irq_ok = 0;
- static int *maui_osp;
- #define HOST_DATA_PORT (maui_base + 2)
- #define HOST_STAT_PORT (maui_base + 3)
- #define HOST_CTRL_PORT (maui_base + 3)
- #define STAT_TX_INTR 0x40
- #define STAT_TX_AVAIL 0x20
- #define STAT_TX_IENA 0x10
- #define STAT_RX_INTR 0x04
- #define STAT_RX_AVAIL 0x02
- #define STAT_RX_IENA 0x01
- static int (*orig_load_patch) (int dev, int format, const char *addr,
- int offs, int count, int pmgr_flag) = NULL;
- #include "maui_boot.h"
- static int maui_wait(int mask)
- {
- int i;
- /*
- * Perform a short initial wait without sleeping
- */
- for (i = 0; i < 100; i++)
- if (inb(HOST_STAT_PORT) & mask)
- return 1;
- /*
- * Wait up to 15 seconds with sleeping
- */
- for (i = 0; i < 150; i++) {
- if (inb(HOST_STAT_PORT) & mask)
- return 1;
- current->state = TASK_INTERRUPTIBLE;
- schedule_timeout(HZ / 10);
- if (signal_pending(current))
- return 0;
- }
- return 0;
- }
- static int maui_read(void)
- {
- if (maui_wait(STAT_RX_AVAIL))
- return inb(HOST_DATA_PORT);
- return -1;
- }
- static int maui_write(unsigned char data)
- {
- if (maui_wait(STAT_TX_AVAIL)) {
- outb((data), HOST_DATA_PORT);
- return 1;
- }
- printk(KERN_WARNING "Maui: Write timeoutn");
- return 0;
- }
- static void mauiintr(int irq, void *dev_id, struct pt_regs *dummy)
- {
- irq_ok = 1;
- }
- static int __init download_code(void)
- {
- int i, lines = 0;
- int eol_seen = 0, done = 0;
- int skip = 1;
- printk(KERN_INFO "Code download (%d bytes): ", maui_osLen);
- for (i = 0; i < maui_osLen; i++) {
- if (maui_os[i] != 'r') {
- if (!skip || (maui_os[i] == 'S' && (i == 0 || maui_os[i - 1] == 'n'))) {
- skip = 0;
- if (maui_os[i] == 'n')
- eol_seen = skip = 1;
- else if (maui_os[i] == 'S') {
- if (maui_os[i + 1] == '8')
- done = 1;
- if (!maui_write(0xF1))
- goto failure;
- if (!maui_write('S'))
- goto failure;
- } else {
- if (!maui_write(maui_os[i]))
- goto failure;
- }
- if (eol_seen) {
- int c = 0;
- int n;
- eol_seen = 0;
- for (n = 0; n < 2; n++) {
- if (maui_wait(STAT_RX_AVAIL)) {
- c = inb(HOST_DATA_PORT);
- break;
- }
- }
- if (c != 0x80) {
- printk("Download not acknowledgedn");
- return 0;
- }
- else if (!(lines++ % 10))
- printk(".");
- if (done) {
- printk("n");
- printk(KERN_INFO "Download completen");
- return 1;
- }
- }
- }
- }
- }
- failure:
- printk("n");
- printk(KERN_ERR "Download failed!!!n");
- return 0;
- }
- static int __init maui_init(int irq)
- {
- unsigned char 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_ERR "Maui: Invalid IRQ %dn", irq);
- return 0;
- }
- outb((0x00), HOST_CTRL_PORT); /* Reset */
- outb((bits), HOST_DATA_PORT); /* Set the IRQ bits */
- outb((bits | 0x80), HOST_DATA_PORT); /* Set the IRQ bits again? */
- outb((0x80), HOST_CTRL_PORT); /* Leave reset */
- outb((0x80), HOST_CTRL_PORT); /* Leave reset */
- outb((0xD0), HOST_CTRL_PORT); /* Cause interrupt */
- #ifdef CONFIG_SMP
- {
- int i;
- for (i = 0; i < 1000000 && !irq_ok; i++)
- ;
- if (!irq_ok)
- return 0;
- }
- #endif
- outb((0x80), HOST_CTRL_PORT); /* Leave reset */
- printk(KERN_INFO "Turtle Beach Maui initializationn");
- if (!download_code())
- return 0;
- outb((0xE0), HOST_CTRL_PORT); /* Normal operation */
- /* Select mpu401 mode */
- maui_write(0xf0);
- maui_write(1);
- if (maui_read() != 0x80) {
- maui_write(0xf0);
- maui_write(1);
- if (maui_read() != 0x80)
- printk(KERN_ERR "Maui didn't acknowledge set HW mode commandn");
- }
- printk(KERN_INFO "Maui initialized OKn");
- return 1;
- }
- static int maui_short_wait(int mask) {
- int i;
- for (i = 0; i < 1000; i++) {
- if (inb(HOST_STAT_PORT) & mask) {
- return 1;
- }
- }
- return 0;
- }
- static int maui_load_patch(int dev, int format, const char *addr,
- int offs, int count, int pmgr_flag)
- {
- struct sysex_info header;
- unsigned long left, src_offs;
- int hdr_size = (unsigned long) &header.data[0] - (unsigned long) &header;
- int i;
- if (format == SYSEX_PATCH) /* Handled by midi_synth.c */
- return orig_load_patch(dev, format, addr, offs, count, pmgr_flag);
- if (format != MAUI_PATCH)
- {
- printk(KERN_WARNING "Maui: Unknown patch formatn");
- }
- if (count < hdr_size) {
- /* printk("Maui error: Patch header too shortn");*/
- return -EINVAL;
- }
- count -= hdr_size;
- /*
- * Copy the header from user space but ignore the first bytes which have
- * been transferred already.
- */
- if(copy_from_user(&((char *) &header)[offs], &(addr)[offs], hdr_size - offs))
- return -EFAULT;
- if (count < header.len) {
- printk(KERN_ERR "Maui warning: Host command record too short (%d<%d)n", count, (int) header.len);
- header.len = count;
- }
- left = header.len;
- src_offs = 0;
- for (i = 0; i < left; i++) {
- unsigned char data;
- if(get_user(*(unsigned char *) &data, (unsigned char *) &((addr)[hdr_size + i])))
- return -EFAULT;
- if (i == 0 && !(data & 0x80))
- return -EINVAL;
- if (maui_write(data) == -1)
- return -EIO;
- }
- if ((i = maui_read()) != 0x80) {
- if (i != -1)
- printk("Maui: Error status %02xn", i);
- return -EIO;
- }
- return 0;
- }
- static int __init probe_maui(struct address_info *hw_config)
- {
- int i;
- int tmp1, tmp2, ret;
- if (check_region(hw_config->io_base, 8))
- return 0;
- maui_base = hw_config->io_base;
- maui_osp = hw_config->osp;
- if (request_irq(hw_config->irq, mauiintr, 0, "Maui", NULL) < 0)
- return 0;
- /*
- * Initialize the processor if necessary
- */
- if (maui_osLen > 0) {
- if (!(inb(HOST_STAT_PORT) & STAT_TX_AVAIL) ||
- !maui_write(0x9F) || /* Report firmware version */
- !maui_short_wait(STAT_RX_AVAIL) ||
- maui_read() == -1 || maui_read() == -1)
- if (!maui_init(hw_config->irq)) {
- free_irq(hw_config->irq, NULL);
- return 0;
- }
- }
- if (!maui_write(0xCF)) /* Report hardware version */ {
- printk(KERN_ERR "No WaveFront firmware detected (card uninitialized?)n");
- free_irq(hw_config->irq, NULL);
- return 0;
- }
- if ((tmp1 = maui_read()) == -1 || (tmp2 = maui_read()) == -1) {
- printk(KERN_ERR "No WaveFront firmware detected (card uninitialized?)n");
- free_irq(hw_config->irq, NULL);
- return 0;
- }
- if (tmp1 == 0xff || tmp2 == 0xff) {
- free_irq(hw_config->irq, NULL);
- return 0;
- }
- printk(KERN_DEBUG "WaveFront hardware version %d.%dn", tmp1, tmp2);
- if (!maui_write(0x9F)) /* Report firmware version */
- return 0;
- if ((tmp1 = maui_read()) == -1 || (tmp2 = maui_read()) == -1)
- return 0;
- printk(KERN_DEBUG "WaveFront firmware version %d.%dn", tmp1, tmp2);
- if (!maui_write(0x85)) /* Report free DRAM */
- return 0;
- tmp1 = 0;
- for (i = 0; i < 4; i++) {
- tmp1 |= maui_read() << (7 * i);
- }
- printk(KERN_DEBUG "Available DRAM %dkn", tmp1 / 1024);
- for (i = 0; i < 1000; i++)
- if (probe_mpu401(hw_config))
- break;
- ret = probe_mpu401(hw_config);
- if (ret)
- request_region(hw_config->io_base + 2, 6, "Maui");
- return ret;
- }
- static void __init attach_maui(struct address_info *hw_config)
- {
- int this_dev;
- conf_printf("Maui", hw_config);
- hw_config->irq *= -1;
- hw_config->name = "Maui";
- attach_mpu401(hw_config, THIS_MODULE);
- if (hw_config->slots[1] != -1) /* The MPU401 driver installed itself */ {
- struct synth_operations *synth;
- this_dev = hw_config->slots[1];
- /*
- * Intercept patch loading calls so that they can be handled
- * by the Maui driver.
- */
- synth = midi_devs[this_dev]->converter;
- synth->id = "MAUI";
- if (synth != NULL) {
- orig_load_patch = synth->load_patch;
- synth->load_patch = &maui_load_patch;
- } else
- printk(KERN_ERR "Maui: Can't install patch loadern");
- }
- }
- static void __exit unload_maui(struct address_info *hw_config)
- {
- int irq = hw_config->irq;
- release_region(hw_config->io_base + 2, 6);
- unload_mpu401(hw_config);
- if (irq < 0)
- irq = -irq;
- if (irq > 0)
- free_irq(irq, NULL);
- }
- static int fw_load = 0;
- static struct address_info cfg;
- static int __initdata io = -1;
- static int __initdata irq = -1;
- MODULE_PARM(io,"i");
- MODULE_PARM(irq,"i");
- /*
- * Install a Maui card. Needs mpu401 loaded already.
- */
- static int __init init_maui(void)
- {
- printk(KERN_INFO "Turtle beach Maui and Tropez driver, Copyright (C) by Hannu Savolainen 1993-1996n");
- cfg.io_base = io;
- cfg.irq = irq;
- if (cfg.io_base == -1 || cfg.irq == -1) {
- printk(KERN_INFO "maui: irq and io must be set.n");
- return -EINVAL;
- }
- if (maui_os == NULL) {
- fw_load = 1;
- maui_osLen = mod_firmware_load("/etc/sound/oswf.mot", (char **) &maui_os);
- }
- if (probe_maui(&cfg) == 0)
- return -ENODEV;
- attach_maui(&cfg);
- return 0;
- }
- static void __exit cleanup_maui(void)
- {
- if (fw_load && maui_os)
- vfree(maui_os);
- unload_maui(&cfg);
- }
- module_init(init_maui);
- module_exit(cleanup_maui);
- #ifndef MODULE
- static int __init setup_maui(char *str)
- {
- /* io, irq */
- int ints[3];
-
- str = get_options(str, ARRAY_SIZE(ints), ints);
-
- io = ints[1];
- irq = ints[2];
- return 1;
- }
- __setup("maui=", setup_maui);
- #endif
- MODULE_LICENSE("GPL");