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 <linux/io.h>
30#include <sound/core.h>
31#include <sound/sb.h>
32#include <sound/initval.h>
33
34#include <asm/dma.h>
35
36MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>");
37MODULE_DESCRIPTION("ALSA lowlevel driver for Sound Blaster cards");
38MODULE_LICENSE("GPL");
39
40#define BUSY_LOOPS 100000
41
42#undef IO_DEBUG
43
44int 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
59int 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
76int 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
95static 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
105static 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
185static int snd_sbdsp_free(struct snd_sb *chip)
186{
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
204static 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
210int 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 : 0,
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
295EXPORT_SYMBOL(snd_sbdsp_command);
296EXPORT_SYMBOL(snd_sbdsp_get_byte);
297EXPORT_SYMBOL(snd_sbdsp_reset);
298EXPORT_SYMBOL(snd_sbdsp_create);
299/* sb_mixer.c */
300EXPORT_SYMBOL(snd_sbmixer_write);
301EXPORT_SYMBOL(snd_sbmixer_read);
302EXPORT_SYMBOL(snd_sbmixer_new);
303EXPORT_SYMBOL(snd_sbmixer_add_ctl);
304#ifdef CONFIG_PM
305EXPORT_SYMBOL(snd_sbmixer_suspend);
306EXPORT_SYMBOL(snd_sbmixer_resume);
307#endif
308
309/*
310 *  INIT part
311 */
312
313static int __init alsa_sb_common_init(void)
314{
315	return 0;
316}
317
318static void __exit alsa_sb_common_exit(void)
319{
320}
321
322module_init(alsa_sb_common_init)
323module_exit(alsa_sb_common_exit)
324