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 <linux/module.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@perex.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", __func__, 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", __func__, 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", __func__, 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 case SB_HW_CS5530: 172 str = "16 (CS5530)"; 173 break; 174 case SB_HW_JAZZ16: 175 str = "Pro (Jazz16)"; 176 break; 177 default: 178 return -ENODEV; 179 } 180 sprintf(chip->name, "Sound Blaster %s", str); 181 chip->version = (major << 8) | minor; 182 return 0; 183 } 184 185 static int snd_sbdsp_free(struct snd_sb *chip) 186 { 187 if (chip->res_port) 188 release_and_free_resource(chip->res_port); 189 if (chip->irq >= 0) 190 free_irq(chip->irq, (void *) chip); 191 #ifdef CONFIG_ISA 192 if (chip->dma8 >= 0) { 193 disable_dma(chip->dma8); 194 free_dma(chip->dma8); 195 } 196 if (chip->dma16 >= 0 && chip->dma16 != chip->dma8) { 197 disable_dma(chip->dma16); 198 free_dma(chip->dma16); 199 } 200 #endif 201 kfree(chip); 202 return 0; 203 } 204 205 static int snd_sbdsp_dev_free(struct snd_device *device) 206 { 207 struct snd_sb *chip = device->device_data; 208 return snd_sbdsp_free(chip); 209 } 210 211 int snd_sbdsp_create(struct snd_card *card, 212 unsigned long port, 213 int irq, 214 irq_handler_t irq_handler, 215 int dma8, 216 int dma16, 217 unsigned short hardware, 218 struct snd_sb **r_chip) 219 { 220 struct snd_sb *chip; 221 int err; 222 static struct snd_device_ops ops = { 223 .dev_free = snd_sbdsp_dev_free, 224 }; 225 226 if (snd_BUG_ON(!r_chip)) 227 return -EINVAL; 228 *r_chip = NULL; 229 chip = kzalloc(sizeof(*chip), GFP_KERNEL); 230 if (chip == NULL) 231 return -ENOMEM; 232 spin_lock_init(&chip->reg_lock); 233 spin_lock_init(&chip->open_lock); 234 spin_lock_init(&chip->midi_input_lock); 235 spin_lock_init(&chip->mixer_lock); 236 chip->irq = -1; 237 chip->dma8 = -1; 238 chip->dma16 = -1; 239 chip->port = port; 240 241 if (request_irq(irq, irq_handler, 242 (hardware == SB_HW_ALS4000 || 243 hardware == SB_HW_CS5530) ? 244 IRQF_SHARED : 0, 245 "SoundBlaster", (void *) chip)) { 246 snd_printk(KERN_ERR "sb: can't grab irq %d\n", irq); 247 snd_sbdsp_free(chip); 248 return -EBUSY; 249 } 250 chip->irq = irq; 251 252 if (hardware == SB_HW_ALS4000) 253 goto __skip_allocation; 254 255 if ((chip->res_port = request_region(port, 16, "SoundBlaster")) == NULL) { 256 snd_printk(KERN_ERR "sb: can't grab port 0x%lx\n", port); 257 snd_sbdsp_free(chip); 258 return -EBUSY; 259 } 260 261 #ifdef CONFIG_ISA 262 if (dma8 >= 0 && request_dma(dma8, "SoundBlaster - 8bit")) { 263 snd_printk(KERN_ERR "sb: can't grab DMA8 %d\n", dma8); 264 snd_sbdsp_free(chip); 265 return -EBUSY; 266 } 267 chip->dma8 = dma8; 268 if (dma16 >= 0) { 269 if (hardware != SB_HW_ALS100 && (dma16 < 5 || dma16 > 7)) { 270 /* no duplex */ 271 dma16 = -1; 272 } else if (request_dma(dma16, "SoundBlaster - 16bit")) { 273 snd_printk(KERN_ERR "sb: can't grab DMA16 %d\n", dma16); 274 snd_sbdsp_free(chip); 275 return -EBUSY; 276 } 277 } 278 chip->dma16 = dma16; 279 #endif 280 281 __skip_allocation: 282 chip->card = card; 283 chip->hardware = hardware; 284 if ((err = snd_sbdsp_probe(chip)) < 0) { 285 snd_sbdsp_free(chip); 286 return err; 287 } 288 if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) { 289 snd_sbdsp_free(chip); 290 return err; 291 } 292 *r_chip = chip; 293 return 0; 294 } 295 296 EXPORT_SYMBOL(snd_sbdsp_command); 297 EXPORT_SYMBOL(snd_sbdsp_get_byte); 298 EXPORT_SYMBOL(snd_sbdsp_reset); 299 EXPORT_SYMBOL(snd_sbdsp_create); 300 /* sb_mixer.c */ 301 EXPORT_SYMBOL(snd_sbmixer_write); 302 EXPORT_SYMBOL(snd_sbmixer_read); 303 EXPORT_SYMBOL(snd_sbmixer_new); 304 EXPORT_SYMBOL(snd_sbmixer_add_ctl); 305 #ifdef CONFIG_PM 306 EXPORT_SYMBOL(snd_sbmixer_suspend); 307 EXPORT_SYMBOL(snd_sbmixer_resume); 308 #endif 309 310 /* 311 * INIT part 312 */ 313 314 static int __init alsa_sb_common_init(void) 315 { 316 return 0; 317 } 318 319 static void __exit alsa_sb_common_exit(void) 320 { 321 } 322 323 module_init(alsa_sb_common_init) 324 module_exit(alsa_sb_common_exit) 325