16bca4e96c08a01d5af759c95626b7bcbcc53065
[platform/adaptation/renesas_rcar/renesas_kernel.git] / sound / isa / gus / gusclassic.c
1 /*
2  *  Driver for Gravis UltraSound Classic soundcard
3  *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
4  *
5  *
6  *   This program is free software; you can redistribute it and/or modify
7  *   it under the terms of the GNU General Public License as published by
8  *   the Free Software Foundation; either version 2 of the License, or
9  *   (at your option) any later version.
10  *
11  *   This program is distributed in the hope that it will be useful,
12  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  *   GNU General Public License for more details.
15  *
16  *   You should have received a copy of the GNU General Public License
17  *   along with this program; if not, write to the Free Software
18  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
19  *
20  */
21
22 #include <linux/init.h>
23 #include <linux/err.h>
24 #include <linux/isa.h>
25 #include <linux/delay.h>
26 #include <linux/time.h>
27 #include <linux/module.h>
28 #include <asm/dma.h>
29 #include <sound/core.h>
30 #include <sound/gus.h>
31 #define SNDRV_LEGACY_FIND_FREE_IRQ
32 #define SNDRV_LEGACY_FIND_FREE_DMA
33 #include <sound/initval.h>
34
35 #define CRD_NAME "Gravis UltraSound Classic"
36 #define DEV_NAME "gusclassic"
37
38 MODULE_DESCRIPTION(CRD_NAME);
39 MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>");
40 MODULE_LICENSE("GPL");
41 MODULE_SUPPORTED_DEVICE("{{Gravis,UltraSound Classic}}");
42
43 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX;      /* Index 0-MAX */
44 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR;       /* ID for this card */
45 static bool enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE; /* Enable this card */
46 static long port[SNDRV_CARDS] = SNDRV_DEFAULT_PORT;     /* 0x220,0x230,0x240,0x250,0x260 */
47 static int irq[SNDRV_CARDS] = SNDRV_DEFAULT_IRQ;        /* 3,5,9,11,12,15 */
48 static int dma1[SNDRV_CARDS] = SNDRV_DEFAULT_DMA;       /* 1,3,5,6,7 */
49 static int dma2[SNDRV_CARDS] = SNDRV_DEFAULT_DMA;       /* 1,3,5,6,7 */
50 static int joystick_dac[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 29};
51                                 /* 0 to 31, (0.59V-4.52V or 0.389V-2.98V) */
52 static int channels[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 24};
53 static int pcm_channels[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2};
54
55 module_param_array(index, int, NULL, 0444);
56 MODULE_PARM_DESC(index, "Index value for " CRD_NAME " soundcard.");
57 module_param_array(id, charp, NULL, 0444);
58 MODULE_PARM_DESC(id, "ID string for " CRD_NAME " soundcard.");
59 module_param_array(enable, bool, NULL, 0444);
60 MODULE_PARM_DESC(enable, "Enable " CRD_NAME " soundcard.");
61 module_param_array(port, long, NULL, 0444);
62 MODULE_PARM_DESC(port, "Port # for " CRD_NAME " driver.");
63 module_param_array(irq, int, NULL, 0444);
64 MODULE_PARM_DESC(irq, "IRQ # for " CRD_NAME " driver.");
65 module_param_array(dma1, int, NULL, 0444);
66 MODULE_PARM_DESC(dma1, "DMA1 # for " CRD_NAME " driver.");
67 module_param_array(dma2, int, NULL, 0444);
68 MODULE_PARM_DESC(dma2, "DMA2 # for " CRD_NAME " driver.");
69 module_param_array(joystick_dac, int, NULL, 0444);
70 MODULE_PARM_DESC(joystick_dac, "Joystick DAC level 0.59V-4.52V or 0.389V-2.98V for " CRD_NAME " driver.");
71 module_param_array(channels, int, NULL, 0444);
72 MODULE_PARM_DESC(channels, "GF1 channels for " CRD_NAME " driver.");
73 module_param_array(pcm_channels, int, NULL, 0444);
74 MODULE_PARM_DESC(pcm_channels, "Reserved PCM channels for " CRD_NAME " driver.");
75
76 static int snd_gusclassic_match(struct device *dev, unsigned int n)
77 {
78         return enable[n];
79 }
80
81 static int snd_gusclassic_create(struct snd_card *card,
82                                  struct device *dev, unsigned int n,
83                                  struct snd_gus_card **rgus)
84 {
85         static long possible_ports[] = {0x220, 0x230, 0x240, 0x250, 0x260};
86         static int possible_irqs[] = {5, 11, 12, 9, 7, 15, 3, 4, -1};
87         static int possible_dmas[] = {5, 6, 7, 1, 3, -1};
88
89         int i, error;
90
91         if (irq[n] == SNDRV_AUTO_IRQ) {
92                 irq[n] = snd_legacy_find_free_irq(possible_irqs);
93                 if (irq[n] < 0) {
94                         dev_err(dev, "unable to find a free IRQ\n");
95                         return -EBUSY;
96                 }
97         }
98         if (dma1[n] == SNDRV_AUTO_DMA) {
99                 dma1[n] = snd_legacy_find_free_dma(possible_dmas);
100                 if (dma1[n] < 0) {
101                         dev_err(dev, "unable to find a free DMA1\n");
102                         return -EBUSY;
103                 }
104         }
105         if (dma2[n] == SNDRV_AUTO_DMA) {
106                 dma2[n] = snd_legacy_find_free_dma(possible_dmas);
107                 if (dma2[n] < 0) {
108                         dev_err(dev, "unable to find a free DMA2\n");
109                         return -EBUSY;
110                 }
111         }
112
113         if (port[n] != SNDRV_AUTO_PORT)
114                 return snd_gus_create(card, port[n], irq[n], dma1[n], dma2[n],
115                                 0, channels[n], pcm_channels[n], 0, rgus);
116
117         i = 0;
118         do {
119                 port[n] = possible_ports[i];
120                 error = snd_gus_create(card, port[n], irq[n], dma1[n], dma2[n],
121                                 0, channels[n], pcm_channels[n], 0, rgus);
122         } while (error < 0 && ++i < ARRAY_SIZE(possible_ports));
123
124         return error;
125 }
126
127 static int snd_gusclassic_detect(struct snd_gus_card *gus)
128 {
129         unsigned char d;
130
131         snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 0);   /* reset GF1 */
132         if (((d = snd_gf1_i_look8(gus, SNDRV_GF1_GB_RESET)) & 0x07) != 0) {
133                 snd_printdd("[0x%lx] check 1 failed - 0x%x\n", gus->gf1.port, d);
134                 return -ENODEV;
135         }
136         udelay(160);
137         snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 1);   /* release reset */
138         udelay(160);
139         if (((d = snd_gf1_i_look8(gus, SNDRV_GF1_GB_RESET)) & 0x07) != 1) {
140                 snd_printdd("[0x%lx] check 2 failed - 0x%x\n", gus->gf1.port, d);
141                 return -ENODEV;
142         }
143         return 0;
144 }
145
146 static int snd_gusclassic_probe(struct device *dev, unsigned int n)
147 {
148         struct snd_card *card;
149         struct snd_gus_card *gus;
150         int error;
151
152         error = snd_card_create(index[n], id[n], THIS_MODULE, 0, &card);
153         if (error < 0)
154                 return error;
155
156         if (pcm_channels[n] < 2)
157                 pcm_channels[n] = 2;
158
159         error = snd_gusclassic_create(card, dev, n, &gus);
160         if (error < 0)
161                 goto out;
162
163         error = snd_gusclassic_detect(gus);
164         if (error < 0)
165                 goto out;
166
167         gus->joystick_dac = joystick_dac[n];
168
169         error = snd_gus_initialize(gus);
170         if (error < 0)
171                 goto out;
172
173         error = -ENODEV;
174         if (gus->max_flag || gus->ess_flag) {
175                 dev_err(dev, "GUS Classic or ACE soundcard was "
176                         "not detected at 0x%lx\n", gus->gf1.port);
177                 goto out;
178         }
179
180         error = snd_gf1_new_mixer(gus);
181         if (error < 0)
182                 goto out;
183
184         error = snd_gf1_pcm_new(gus, 0, 0, NULL);
185         if (error < 0)
186                 goto out;
187
188         if (!gus->ace_flag) {
189                 error = snd_gf1_rawmidi_new(gus, 0, NULL);
190                 if (error < 0)
191                         goto out;
192         }
193
194         sprintf(card->longname + strlen(card->longname),
195                 " at 0x%lx, irq %d, dma %d",
196                 gus->gf1.port, gus->gf1.irq, gus->gf1.dma1);
197
198         if (gus->gf1.dma2 >= 0)
199                 sprintf(card->longname + strlen(card->longname),
200                         "&%d", gus->gf1.dma2);
201
202         snd_card_set_dev(card, dev);
203
204         error = snd_card_register(card);
205         if (error < 0)
206                 goto out;
207
208         dev_set_drvdata(dev, card);
209         return 0;
210
211 out:    snd_card_free(card);
212         return error;
213 }
214
215 static int snd_gusclassic_remove(struct device *dev, unsigned int n)
216 {
217         snd_card_free(dev_get_drvdata(dev));
218         dev_set_drvdata(dev, NULL);
219         return 0;
220 }
221
222 static struct isa_driver snd_gusclassic_driver = {
223         .match          = snd_gusclassic_match,
224         .probe          = snd_gusclassic_probe,
225         .remove         = snd_gusclassic_remove,
226 #if 0   /* FIXME */
227         .suspend        = snd_gusclassic_suspend,
228         .remove         = snd_gusclassic_remove,
229 #endif
230         .driver         = {
231                 .name   = DEV_NAME
232         }
233 };
234
235 static int __init alsa_card_gusclassic_init(void)
236 {
237         return isa_register_driver(&snd_gusclassic_driver, SNDRV_CARDS);
238 }
239
240 static void __exit alsa_card_gusclassic_exit(void)
241 {
242         isa_unregister_driver(&snd_gusclassic_driver);
243 }
244
245 module_init(alsa_card_gusclassic_init);
246 module_exit(alsa_card_gusclassic_exit);