sound/isa/sb/sb_common.c

   1 /*
   2  *  Copyright (c) by Jaroslav Kysela <perex@suse.cz>
   3  *                   Uros Bizjak <uros@kss-loka.si>
   4  *
   5  *  Lowlevel routines for control of Sound Blaster cards
   6  *
   7  *   This program is free software; you can redistribute it and/or modify
   8  *   it under the terms of the GNU General Public License as published by
   9  *   the Free Software Foundation; either version 2 of the License, or
  10  *   (at your option) any later version.
  11  *
  12  *   This program is distributed in the hope that it will be useful,
  13  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *   GNU General Public License for more details.
  16  *
  17  *   You should have received a copy of the GNU General Public License
  18  *   along with this program; if not, write to the Free Software
  19  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
  20  *
  21  */
  22
  23 #include <sound/driver.h>
  24 #include <linux/delay.h>
  25 #include <linux/init.h>
  26 #include <linux/interrupt.h>
  27 #include <linux/slab.h>
  28 #include <linux/ioport.h>
  29 #include <sound/core.h>
  30 #include <sound/sb.h>
  31 #include <sound/initval.h>
  32
  33 #include <asm/io.h>
  34 #include <asm/dma.h>
  35
  36 MODULE_AUTHOR("Jaroslav Kysela <perex@suse.cz>");
  37 MODULE_DESCRIPTION("ALSA lowlevel driver for Sound Blaster cards");
  38 MODULE_LICENSE("GPL");
  39
  40 #define BUSY_LOOPS 100000
  41
  42 #undef IO_DEBUG
  43
  44 int snd_sbdsp_command(struct snd_sb *chip, unsigned char val)
  45 {
  46         int i;
  47 #ifdef IO_DEBUG
  48         snd_printk(KERN_DEBUG "command 0x%x\n", val);
  49 #endif
  50         for (i = BUSY_LOOPS; i; i--)
  51                 if ((inb(SBP(chip, STATUS)) & 0x80) == 0) {
  52                         outb(val, SBP(chip, COMMAND));
  53                         return 1;
  54                 }
  55         snd_printd("%s [0x%lx]: timeout (0x%x)\n", __FUNCTION__, chip->port, val);
  56         return 0;
  57 }
  58
  59 int snd_sbdsp_get_byte(struct snd_sb *chip)
  60 {
  61         int val;
  62         int i;
  63         for (i = BUSY_LOOPS; i; i--) {
  64                 if (inb(SBP(chip, DATA_AVAIL)) & 0x80) {
  65                         val = inb(SBP(chip, READ));
  66 #ifdef IO_DEBUG
  67                         snd_printk(KERN_DEBUG "get_byte 0x%x\n", val);
  68 #endif
  69                         return val;
  70                 }
  71         }
  72         snd_printd("%s [0x%lx]: timeout\n", __FUNCTION__, chip->port);
  73         return -ENODEV;
  74 }
  75
  76 int snd_sbdsp_reset(struct snd_sb *chip)
  77 {
  78         int i;
  79
  80         outb(1, SBP(chip, RESET));
  81         udelay(10);
  82         outb(0, SBP(chip, RESET));
  83         udelay(30);
  84         for (i = BUSY_LOOPS; i; i--)
  85                 if (inb(SBP(chip, DATA_AVAIL)) & 0x80) {
  86                         if (inb(SBP(chip, READ)) == 0xaa)
  87                                 return 0;
  88                         else
  89                                 break;
  90                 }
  91         snd_printdd("%s [0x%lx] failed...\n", __FUNCTION__, chip->port);
  92         return -ENODEV;
  93 }
  94
  95 static int snd_sbdsp_version(struct snd_sb * chip)
  96 {
  97         unsigned int result = -ENODEV;
  98
  99         snd_sbdsp_command(chip, SB_DSP_GET_VERSION);
 100         result = (short) snd_sbdsp_get_byte(chip) << 8;
 101         result |= (short) snd_sbdsp_get_byte(chip);
 102         return result;
 103 }
 104
 105 static int snd_sbdsp_probe(struct snd_sb * chip)
 106 {
 107         int version;
 108         int major, minor;
 109         char *str;
 110         unsigned long flags;
 111
 112         /*
 113          *  initialization sequence
 114          */
 115
 116         spin_lock_irqsave(&chip->reg_lock, flags);
 117         if (snd_sbdsp_reset(chip) < 0) {
 118                 spin_unlock_irqrestore(&chip->reg_lock, flags);
 119                 return -ENODEV;
 120         }
 121         version = snd_sbdsp_version(chip);
 122         if (version < 0) {
 123                 spin_unlock_irqrestore(&chip->reg_lock, flags);
 124                 return -ENODEV;
 125         }
 126         spin_unlock_irqrestore(&chip->reg_lock, flags);
 127         major = version >> 8;
 128         minor = version & 0xff;
 129         snd_printdd("SB [0x%lx]: DSP chip found, version = %i.%i\n",
 130                     chip->port, major, minor);
 131
 132         switch (chip->hardware) {
 133         case SB_HW_AUTO:
 134                 switch (major) {
 135                 case 1:
 136                         chip->hardware = SB_HW_10;
 137                         str = "1.0";
 138                         break;
 139                 case 2:
 140                         if (minor) {
 141                                 chip->hardware = SB_HW_201;
 142                                 str = "2.01+";
 143                         } else {
 144                                 chip->hardware = SB_HW_20;
 145                                 str = "2.0";
 146                         }
 147                         break;
 148                 case 3:
 149                         chip->hardware = SB_HW_PRO;
 150                         str = "Pro";
 151                         break;
 152                 case 4:
 153                         chip->hardware = SB_HW_16;
 154                         str = "16";
 155                         break;
 156                 default:
 157                         snd_printk(KERN_INFO "SB [0x%lx]: unknown DSP chip version %i.%i\n",
 158                                    chip->port, major, minor);
 159                         return -ENODEV;
 160                 }
 161                 break;
 162         case SB_HW_ALS100:
 163                 str = "16 (ALS-100)";
 164                 break;
 165         case SB_HW_ALS4000:
 166                 str = "16 (ALS-4000)";
 167                 break;
 168         case SB_HW_DT019X:
 169                 str = "(DT019X/ALS007)";
 170                 break;
 171         default:
 172                 return -ENODEV;
 173         }
 174         sprintf(chip->name, "Sound Blaster %s", str);
 175         chip->version = (major << 8) | minor;
 176         return 0;
 177 }
 178
 179 static int snd_sbdsp_free(struct snd_sb *chip)
 180 {
 181         if (chip->res_port)
 182                 release_and_free_resource(chip->res_port);
 183         if (chip->irq >= 0)
 184                 free_irq(chip->irq, (void *) chip);
 185 #ifdef CONFIG_ISA
 186         if (chip->dma8 >= 0) {
 187                 disable_dma(chip->dma8);
 188                 free_dma(chip->dma8);
 189         }
 190         if (chip->dma16 >= 0 && chip->dma16 != chip->dma8) {
 191                 disable_dma(chip->dma16);
 192                 free_dma(chip->dma16);
 193         }
 194 #endif
 195         kfree(chip);
 196         return 0;
 197 }
 198
 199 static int snd_sbdsp_dev_free(struct snd_device *device)
 200 {
 201         struct snd_sb *chip = device->device_data;
 202         return snd_sbdsp_free(chip);
 203 }
 204
 205 int snd_sbdsp_create(struct snd_card *card,
 206                      unsigned long port,
 207                      int irq,
 208                      irqreturn_t (*irq_handler)(int, void *, struct pt_regs *),
 209                      int dma8,
 210                      int dma16,
 211                      unsigned short hardware,
 212                      struct snd_sb **r_chip)
 213 {
 214         struct snd_sb *chip;
 215         int err;
 216         static struct snd_device_ops ops = {
 217                 .dev_free =     snd_sbdsp_dev_free,
 218         };
 219
 220         snd_assert(r_chip != NULL, return -EINVAL);
 221         *r_chip = NULL;
 222         chip = kzalloc(sizeof(*chip), GFP_KERNEL);
 223         if (chip == NULL)
 224                 return -ENOMEM;
 225         spin_lock_init(&chip->reg_lock);
 226         spin_lock_init(&chip->open_lock);
 227         spin_lock_init(&chip->midi_input_lock);
 228         spin_lock_init(&chip->mixer_lock);
 229         chip->irq = -1;
 230         chip->dma8 = -1;
 231         chip->dma16 = -1;
 232         chip->port = port;
 233
 234         if (request_irq(irq, irq_handler, hardware == SB_HW_ALS4000 ?
 235                         IRQF_DISABLED | IRQF_SHARED : IRQF_DISABLED,
 236                         "SoundBlaster", (void *) chip)) {
 237                 snd_printk(KERN_ERR "sb: can't grab irq %d\n", irq);
 238                 snd_sbdsp_free(chip);
 239                 return -EBUSY;
 240         }
 241         chip->irq = irq;
 242
 243         if (hardware == SB_HW_ALS4000)
 244                 goto __skip_allocation;
 245
 246         if ((chip->res_port = request_region(port, 16, "SoundBlaster")) == NULL) {
 247                 snd_printk(KERN_ERR "sb: can't grab port 0x%lx\n", port);
 248                 snd_sbdsp_free(chip);
 249                 return -EBUSY;
 250         }
 251
 252 #ifdef CONFIG_ISA
 253         if (dma8 >= 0 && request_dma(dma8, "SoundBlaster - 8bit")) {
 254                 snd_printk(KERN_ERR "sb: can't grab DMA8 %d\n", dma8);
 255                 snd_sbdsp_free(chip);
 256                 return -EBUSY;
 257         }
 258         chip->dma8 = dma8;
 259         if (dma16 >= 0) {
 260                 if (hardware != SB_HW_ALS100 && (dma16 < 5 || dma16 > 7)) {
 261                         /* no duplex */
 262                         dma16 = -1;
 263                 } else if (request_dma(dma16, "SoundBlaster - 16bit")) {
 264                         snd_printk(KERN_ERR "sb: can't grab DMA16 %d\n", dma16);
 265                         snd_sbdsp_free(chip);
 266                         return -EBUSY;
 267                 }
 268         }
 269         chip->dma16 = dma16;
 270 #endif
 271
 272       __skip_allocation:
 273         chip->card = card;
 274         chip->hardware = hardware;
 275         if ((err = snd_sbdsp_probe(chip)) < 0) {
 276                 snd_sbdsp_free(chip);
 277                 return err;
 278         }
 279         if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
 280                 snd_sbdsp_free(chip);
 281                 return err;
 282         }
 283         *r_chip = chip;
 284         return 0;
 285 }
 286
 287 EXPORT_SYMBOL(snd_sbdsp_command);
 288 EXPORT_SYMBOL(snd_sbdsp_get_byte);
 289 EXPORT_SYMBOL(snd_sbdsp_reset);
 290 EXPORT_SYMBOL(snd_sbdsp_create);
 291 /* sb_mixer.c */
 292 EXPORT_SYMBOL(snd_sbmixer_write);
 293 EXPORT_SYMBOL(snd_sbmixer_read);
 294 EXPORT_SYMBOL(snd_sbmixer_new);
 295 EXPORT_SYMBOL(snd_sbmixer_add_ctl);
 296 #ifdef CONFIG_PM
 297 EXPORT_SYMBOL(snd_sbmixer_suspend);
 298 EXPORT_SYMBOL(snd_sbmixer_resume);
 299 #endif
 300
 301 /*
 302  *  INIT part
 303  */
 304
 305 static int __init alsa_sb_common_init(void)
 306 {
 307         return 0;
 308 }
 309
 310 static void __exit alsa_sb_common_exit(void)
 311 {
 312 }
 313
 314 module_init(alsa_sb_common_init)
 315 module_exit(alsa_sb_common_exit)