opl3sa.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:7k
- /*
- * sound/opl3sa.c
- *
- * Low level driver for Yamaha YMF701B aka OPL3-SA chip
- *
- *
- *
- * 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 Modularisation
- * Christoph Hellwig Adapted to module_init/module_exit
- * Arnaldo C. de Melo got rid of attach_uart401
- *
- * FIXME:
- * Check for install of mpu etc is wrong, should check result of the mss stuff
- */
- #include <linux/init.h>
- #include <linux/module.h>
- #undef SB_OK
- #include "sound_config.h"
- #include "ad1848.h"
- #include "mpu401.h"
- #ifdef SB_OK
- #include "sb.h"
- static int sb_initialized = 0;
- #endif
- static int kilroy_was_here = 0; /* Don't detect twice */
- static int mpu_initialized = 0;
- static int *opl3sa_osp = NULL;
- static unsigned char opl3sa_read(int addr)
- {
- unsigned long flags;
- unsigned char tmp;
- save_flags(flags);
- cli();
- outb((0x1d), 0xf86); /* password */
- outb(((unsigned char) addr), 0xf86); /* address */
- tmp = inb(0xf87); /* data */
- restore_flags(flags);
- return tmp;
- }
- static void opl3sa_write(int addr, int data)
- {
- unsigned long flags;
- save_flags(flags);
- cli();
- outb((0x1d), 0xf86); /* password */
- outb(((unsigned char) addr), 0xf86); /* address */
- outb(((unsigned char) data), 0xf87); /* data */
- restore_flags(flags);
- }
- static int __init opl3sa_detect(void)
- {
- int tmp;
- if (((tmp = opl3sa_read(0x01)) & 0xc4) != 0x04)
- {
- DDB(printk("OPL3-SA detect error 1 (%x)n", opl3sa_read(0x01)));
- /* return 0; */
- }
- /*
- * Check that the password feature has any effect
- */
-
- if (inb(0xf87) == tmp)
- {
- DDB(printk("OPL3-SA detect failed 2 (%x/%x)n", tmp, inb(0xf87)));
- return 0;
- }
- tmp = (opl3sa_read(0x04) & 0xe0) >> 5;
- if (tmp != 0 && tmp != 1)
- {
- DDB(printk("OPL3-SA detect failed 3 (%d)n", tmp));
- return 0;
- }
- DDB(printk("OPL3-SA mode %x detectedn", tmp));
- opl3sa_write(0x01, 0x00); /* Disable MSS */
- opl3sa_write(0x02, 0x00); /* Disable SB */
- opl3sa_write(0x03, 0x00); /* Disable MPU */
- return 1;
- }
- /*
- * Probe and attach routines for the Windows Sound System mode of
- * OPL3-SA
- */
- static int __init probe_opl3sa_wss(struct address_info *hw_config)
- {
- int ret;
- unsigned char tmp = 0x24; /* WSS enable */
- if (check_region(0xf86, 2)) /* Control port is busy */
- return 0;
- /*
- * Check if the IO port returns valid signature. The original MS Sound
- * system returns 0x04 while some cards (OPL3-SA for example)
- * return 0x00.
- */
- if (check_region(hw_config->io_base, 8))
- {
- printk(KERN_ERR "OPL3-SA: MSS I/O port conflict (%x)n", hw_config->io_base);
- return 0;
- }
- opl3sa_osp = hw_config->osp;
- if (!opl3sa_detect())
- {
- printk(KERN_ERR "OSS: OPL3-SA chip not foundn");
- return 0;
- }
-
- switch (hw_config->io_base)
- {
- case 0x530:
- tmp |= 0x00;
- break;
- case 0xe80:
- tmp |= 0x08;
- break;
- case 0xf40:
- tmp |= 0x10;
- break;
- case 0x604:
- tmp |= 0x18;
- break;
- default:
- printk(KERN_ERR "OSS: Unsupported OPL3-SA/WSS base %xn", hw_config->io_base);
- return 0;
- }
- opl3sa_write(0x01, tmp); /* WSS setup register */
- kilroy_was_here = 1;
- ret = probe_ms_sound(hw_config);
- if (ret)
- request_region(0xf86, 2, "OPL3-SA");
- return ret;
- }
- static void __init attach_opl3sa_wss(struct address_info *hw_config)
- {
- int nm = num_mixers;
- /* FIXME */
- attach_ms_sound(hw_config, THIS_MODULE);
- if (num_mixers > nm) /* A mixer was installed */
- {
- AD1848_REROUTE(SOUND_MIXER_LINE1, SOUND_MIXER_CD);
- AD1848_REROUTE(SOUND_MIXER_LINE2, SOUND_MIXER_SYNTH);
- AD1848_REROUTE(SOUND_MIXER_LINE3, SOUND_MIXER_LINE);
- }
- }
- static int __init probe_opl3sa_mpu(struct address_info *hw_config)
- {
- unsigned char conf;
- static signed char irq_bits[] = {
- -1, -1, -1, -1, -1, 1, -1, 2, -1, 3, 4
- };
- if (!kilroy_was_here)
- return 0; /* OPL3-SA has not been detected earlier */
- if (mpu_initialized)
- {
- DDB(printk("OPL3-SA: MPU mode already initializedn"));
- return 0;
- }
- if (hw_config->irq > 10)
- {
- printk(KERN_ERR "OPL3-SA: Bad MPU IRQ %dn", hw_config->irq);
- return 0;
- }
- if (irq_bits[hw_config->irq] == -1)
- {
- printk(KERN_ERR "OPL3-SA: Bad MPU IRQ %dn", hw_config->irq);
- return 0;
- }
- switch (hw_config->io_base)
- {
- case 0x330:
- conf = 0x00;
- break;
- case 0x332:
- conf = 0x20;
- break;
- case 0x334:
- conf = 0x40;
- break;
- case 0x300:
- conf = 0x60;
- break;
- default:
- return 0; /* Invalid port */
- }
- conf |= 0x83; /* MPU & OPL3 (synth) & game port enable */
- conf |= irq_bits[hw_config->irq] << 2;
- opl3sa_write(0x03, conf);
- mpu_initialized = 1;
- hw_config->name = "OPL3-SA (MPU401)";
- return probe_uart401(hw_config, THIS_MODULE);
- }
- static void __exit unload_opl3sa_wss(struct address_info *hw_config)
- {
- int dma2 = hw_config->dma2;
- if (dma2 == -1)
- dma2 = hw_config->dma;
- release_region(0xf86, 2);
- release_region(hw_config->io_base, 4);
- ad1848_unload(hw_config->io_base + 4,
- hw_config->irq,
- hw_config->dma,
- dma2,
- 0);
- sound_unload_audiodev(hw_config->slots[0]);
- }
- static inline void __exit unload_opl3sa_mpu(struct address_info *hw_config)
- {
- unload_uart401(hw_config);
- }
- #ifdef SB_OK
- static inline void __exit unload_opl3sa_sb(struct address_info *hw_config)
- {
- sb_dsp_unload(hw_config);
- }
- #endif
- static int found_mpu;
- static struct address_info cfg;
- static struct address_info cfg_mpu;
- static int __initdata io = -1;
- static int __initdata irq = -1;
- static int __initdata dma = -1;
- static int __initdata dma2 = -1;
- static int __initdata mpu_io = -1;
- static int __initdata mpu_irq = -1;
- MODULE_PARM(io,"i");
- MODULE_PARM(irq,"i");
- MODULE_PARM(dma,"i");
- MODULE_PARM(dma2,"i");
- MODULE_PARM(mpu_io,"i");
- MODULE_PARM(mpu_irq,"i");
- static int __init init_opl3sa(void)
- {
- if (io == -1 || irq == -1 || dma == -1) {
- printk(KERN_ERR "opl3sa: dma, irq and io must be set.n");
- return -EINVAL;
- }
- cfg.io_base = io;
- cfg.irq = irq;
- cfg.dma = dma;
- cfg.dma2 = dma2;
-
- cfg_mpu.io_base = mpu_io;
- cfg_mpu.irq = mpu_irq;
- if (probe_opl3sa_wss(&cfg) == 0)
- return -ENODEV;
- found_mpu=probe_opl3sa_mpu(&cfg_mpu);
- attach_opl3sa_wss(&cfg);
- return 0;
- }
- static void __exit cleanup_opl3sa(void)
- {
- if(found_mpu)
- unload_opl3sa_mpu(&cfg_mpu);
- unload_opl3sa_wss(&cfg);
- }
- module_init(init_opl3sa);
- module_exit(cleanup_opl3sa);
- #ifndef MODULE
- static int __init setup_opl3sa(char *str)
- {
- /* io, irq, dma, dma2, mpu_io, mpu_irq */
- int ints[7];
-
- str = get_options(str, ARRAY_SIZE(ints), ints);
-
- io = ints[1];
- irq = ints[2];
- dma = ints[3];
- dma2 = ints[4];
- mpu_io = ints[5];
- mpu_irq = ints[6];
- return 1;
- }
- __setup("opl3sa=", setup_opl3sa);
- #endif
- MODULE_LICENSE("GPL");