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