powerpc/mm: Fix Respect _PAGE_COHERENT on classic ppc32 SW TLB load machines
[linux-2.6] / sound / isa / sb / sb_common.c
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)