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