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