546452888aed4c61f7e909231a70c5f932d22caa
[sfrench/cifs-2.6.git] / sound / isa / opti9xx / miro.c
1 /*
2  *   ALSA soundcard driver for Miro miroSOUND PCM1 pro
3  *                                  miroSOUND PCM12
4  *                                  miroSOUND PCM20 Radio
5  *
6  *   Copyright (C) 2004-2005 Martin Langer <martin-langer@gmx.de>
7  *
8  *   Based on OSS ACI and ALSA OPTi9xx drivers
9  *
10  *   This program is free software; you can redistribute it and/or modify
11  *   it under the terms of the GNU General Public License as published by
12  *   the Free Software Foundation; either version 2 of the License, or
13  *   (at your option) any later version.
14  *
15  *   This program is distributed in the hope that it will be useful,
16  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
17  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  *   GNU General Public License for more details.
19  *
20  *   You should have received a copy of the GNU General Public License
21  *   along with this program; if not, write to the Free Software
22  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
23  */
24
25 #include <linux/init.h>
26 #include <linux/err.h>
27 #include <linux/isa.h>
28 #include <linux/pnp.h>
29 #include <linux/delay.h>
30 #include <linux/ioport.h>
31 #include <linux/module.h>
32 #include <asm/io.h>
33 #include <asm/dma.h>
34 #include <sound/core.h>
35 #include <sound/wss.h>
36 #include <sound/mpu401.h>
37 #include <sound/opl4.h>
38 #include <sound/control.h>
39 #include <sound/info.h>
40 #define SNDRV_LEGACY_FIND_FREE_IOPORT
41 #define SNDRV_LEGACY_FIND_FREE_IRQ
42 #define SNDRV_LEGACY_FIND_FREE_DMA
43 #include <sound/initval.h>
44 #include <sound/aci.h>
45
46 MODULE_AUTHOR("Martin Langer <martin-langer@gmx.de>");
47 MODULE_LICENSE("GPL");
48 MODULE_DESCRIPTION("Miro miroSOUND PCM1 pro, PCM12, PCM20 Radio");
49 MODULE_SUPPORTED_DEVICE("{{Miro,miroSOUND PCM1 pro}, "
50                         "{Miro,miroSOUND PCM12}, "
51                         "{Miro,miroSOUND PCM20 Radio}}");
52
53 static int index = SNDRV_DEFAULT_IDX1;          /* Index 0-MAX */
54 static char *id = SNDRV_DEFAULT_STR1;           /* ID for this card */
55 static long port = SNDRV_DEFAULT_PORT1;         /* 0x530,0xe80,0xf40,0x604 */
56 static long mpu_port = SNDRV_DEFAULT_PORT1;     /* 0x300,0x310,0x320,0x330 */
57 static long fm_port = SNDRV_DEFAULT_PORT1;      /* 0x388 */
58 static int irq = SNDRV_DEFAULT_IRQ1;            /* 5,7,9,10,11 */
59 static int mpu_irq = SNDRV_DEFAULT_IRQ1;        /* 5,7,9,10 */
60 static int dma1 = SNDRV_DEFAULT_DMA1;           /* 0,1,3 */
61 static int dma2 = SNDRV_DEFAULT_DMA1;           /* 0,1,3 */
62 static int wss;
63 static int ide;
64 #ifdef CONFIG_PNP
65 static bool isapnp = 1;                         /* Enable ISA PnP detection */
66 #endif
67
68 module_param(index, int, 0444);
69 MODULE_PARM_DESC(index, "Index value for miro soundcard.");
70 module_param(id, charp, 0444);
71 MODULE_PARM_DESC(id, "ID string for miro soundcard.");
72 module_param(port, long, 0444);
73 MODULE_PARM_DESC(port, "WSS port # for miro driver.");
74 module_param(mpu_port, long, 0444);
75 MODULE_PARM_DESC(mpu_port, "MPU-401 port # for miro driver.");
76 module_param(fm_port, long, 0444);
77 MODULE_PARM_DESC(fm_port, "FM Port # for miro driver.");
78 module_param(irq, int, 0444);
79 MODULE_PARM_DESC(irq, "WSS irq # for miro driver.");
80 module_param(mpu_irq, int, 0444);
81 MODULE_PARM_DESC(mpu_irq, "MPU-401 irq # for miro driver.");
82 module_param(dma1, int, 0444);
83 MODULE_PARM_DESC(dma1, "1st dma # for miro driver.");
84 module_param(dma2, int, 0444);
85 MODULE_PARM_DESC(dma2, "2nd dma # for miro driver.");
86 module_param(wss, int, 0444);
87 MODULE_PARM_DESC(wss, "wss mode");
88 module_param(ide, int, 0444);
89 MODULE_PARM_DESC(ide, "enable ide port");
90 #ifdef CONFIG_PNP
91 module_param(isapnp, bool, 0444);
92 MODULE_PARM_DESC(isapnp, "Enable ISA PnP detection for specified soundcard.");
93 #endif
94
95 #define OPTi9XX_HW_DETECT       0
96 #define OPTi9XX_HW_82C928       1
97 #define OPTi9XX_HW_82C929       2
98 #define OPTi9XX_HW_82C924       3
99 #define OPTi9XX_HW_82C925       4
100 #define OPTi9XX_HW_82C930       5
101 #define OPTi9XX_HW_82C931       6
102 #define OPTi9XX_HW_82C933       7
103 #define OPTi9XX_HW_LAST         OPTi9XX_HW_82C933
104
105 #define OPTi9XX_MC_REG(n)       n
106
107 struct snd_miro {
108         unsigned short hardware;
109         unsigned char password;
110         char name[7];
111
112         struct resource *res_mc_base;
113         struct resource *res_aci_port;
114
115         unsigned long mc_base;
116         unsigned long mc_base_size;
117         unsigned long pwd_reg;
118
119         spinlock_t lock;
120         struct snd_pcm *pcm;
121
122         long wss_base;
123         int irq;
124         int dma1;
125         int dma2;
126
127         long mpu_port;
128         int mpu_irq;
129
130         struct snd_miro_aci *aci;
131 };
132
133 static struct snd_miro_aci aci_device;
134
135 static char * snd_opti9xx_names[] = {
136         "unknown",
137         "82C928", "82C929",
138         "82C924", "82C925",
139         "82C930", "82C931", "82C933"
140 };
141
142 static int snd_miro_pnp_is_probed;
143
144 #ifdef CONFIG_PNP
145
146 static struct pnp_card_device_id snd_miro_pnpids[] = {
147         /* PCM20 and PCM12 in PnP mode */
148         { .id = "MIR0924",
149           .devs = { { "MIR0000" }, { "MIR0002" }, { "MIR0005" } }, },
150         { .id = "" }
151 };
152
153 MODULE_DEVICE_TABLE(pnp_card, snd_miro_pnpids);
154
155 #endif  /* CONFIG_PNP */
156
157 /* 
158  *  ACI control
159  */
160
161 static int aci_busy_wait(struct snd_miro_aci *aci)
162 {
163         long timeout;
164         unsigned char byte;
165
166         for (timeout = 1; timeout <= ACI_MINTIME + 30; timeout++) {
167                 byte = inb(aci->aci_port + ACI_REG_BUSY);
168                 if ((byte & 1) == 0) {
169                         if (timeout >= ACI_MINTIME)
170                                 snd_printd("aci ready in round %ld.\n",
171                                            timeout-ACI_MINTIME);
172                         return byte;
173                 }
174                 if (timeout >= ACI_MINTIME) {
175                         long out=10*HZ;
176                         switch (timeout-ACI_MINTIME) {
177                         case 0 ... 9:
178                                 out /= 10;
179                         case 10 ... 19:
180                                 out /= 10;
181                         case 20 ... 30:
182                                 out /= 10;
183                         default:
184                                 set_current_state(TASK_UNINTERRUPTIBLE);
185                                 schedule_timeout(out);
186                                 break;
187                         }
188                 }
189         }
190         snd_printk(KERN_ERR "aci_busy_wait() time out\n");
191         return -EBUSY;
192 }
193
194 static inline int aci_write(struct snd_miro_aci *aci, unsigned char byte)
195 {
196         if (aci_busy_wait(aci) >= 0) {
197                 outb(byte, aci->aci_port + ACI_REG_COMMAND);
198                 return 0;
199         } else {
200                 snd_printk(KERN_ERR "aci busy, aci_write(0x%x) stopped.\n", byte);
201                 return -EBUSY;
202         }
203 }
204
205 static inline int aci_read(struct snd_miro_aci *aci)
206 {
207         unsigned char byte;
208
209         if (aci_busy_wait(aci) >= 0) {
210                 byte = inb(aci->aci_port + ACI_REG_STATUS);
211                 return byte;
212         } else {
213                 snd_printk(KERN_ERR "aci busy, aci_read() stopped.\n");
214                 return -EBUSY;
215         }
216 }
217
218 int snd_aci_cmd(struct snd_miro_aci *aci, int write1, int write2, int write3)
219 {
220         int write[] = {write1, write2, write3};
221         int value, i;
222
223         if (mutex_lock_interruptible(&aci->aci_mutex))
224                 return -EINTR;
225
226         for (i=0; i<3; i++) {
227                 if (write[i]< 0 || write[i] > 255)
228                         break;
229                 else {
230                         value = aci_write(aci, write[i]);
231                         if (value < 0)
232                                 goto out;
233                 }
234         }
235
236         value = aci_read(aci);
237
238 out:    mutex_unlock(&aci->aci_mutex);
239         return value;
240 }
241 EXPORT_SYMBOL(snd_aci_cmd);
242
243 static int aci_getvalue(struct snd_miro_aci *aci, unsigned char index)
244 {
245         return snd_aci_cmd(aci, ACI_STATUS, index, -1);
246 }
247
248 static int aci_setvalue(struct snd_miro_aci *aci, unsigned char index,
249                         int value)
250 {
251         return snd_aci_cmd(aci, index, value, -1);
252 }
253
254 struct snd_miro_aci *snd_aci_get_aci(void)
255 {
256         if (aci_device.aci_port == 0)
257                 return NULL;
258         return &aci_device;
259 }
260 EXPORT_SYMBOL(snd_aci_get_aci);
261
262 /*
263  *  MIXER part
264  */
265
266 #define snd_miro_info_capture   snd_ctl_boolean_mono_info
267
268 static int snd_miro_get_capture(struct snd_kcontrol *kcontrol,
269                                 struct snd_ctl_elem_value *ucontrol)
270 {
271         struct snd_miro *miro = snd_kcontrol_chip(kcontrol);
272         int value;
273
274         value = aci_getvalue(miro->aci, ACI_S_GENERAL);
275         if (value < 0) {
276                 snd_printk(KERN_ERR "snd_miro_get_capture() failed: %d\n",
277                            value);
278                 return value;
279         }
280
281         ucontrol->value.integer.value[0] = value & 0x20;
282
283         return 0;
284 }
285
286 static int snd_miro_put_capture(struct snd_kcontrol *kcontrol,
287                                 struct snd_ctl_elem_value *ucontrol)
288 {
289         struct snd_miro *miro = snd_kcontrol_chip(kcontrol);
290         int change, value, error;
291
292         value = !(ucontrol->value.integer.value[0]);
293
294         error = aci_setvalue(miro->aci, ACI_SET_SOLOMODE, value);
295         if (error < 0) {
296                 snd_printk(KERN_ERR "snd_miro_put_capture() failed: %d\n",
297                            error);
298                 return error;
299         }
300
301         change = (value != miro->aci->aci_solomode);
302         miro->aci->aci_solomode = value;
303         
304         return change;
305 }
306
307 static int snd_miro_info_preamp(struct snd_kcontrol *kcontrol,
308                                 struct snd_ctl_elem_info *uinfo)
309 {
310         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
311         uinfo->count = 1;
312         uinfo->value.integer.min = 0;
313         uinfo->value.integer.max = 3;
314
315         return 0;
316 }
317
318 static int snd_miro_get_preamp(struct snd_kcontrol *kcontrol,
319                                struct snd_ctl_elem_value *ucontrol)
320 {
321         struct snd_miro *miro = snd_kcontrol_chip(kcontrol);
322         int value;
323
324         if (miro->aci->aci_version <= 176) {
325
326                 /* 
327                    OSS says it's not readable with versions < 176.
328                    But it doesn't work on my card,
329                    which is a PCM12 with aci_version = 176.
330                 */
331
332                 ucontrol->value.integer.value[0] = miro->aci->aci_preamp;
333                 return 0;
334         }
335
336         value = aci_getvalue(miro->aci, ACI_GET_PREAMP);
337         if (value < 0) {
338                 snd_printk(KERN_ERR "snd_miro_get_preamp() failed: %d\n",
339                            value);
340                 return value;
341         }
342         
343         ucontrol->value.integer.value[0] = value;
344
345         return 0;
346 }
347
348 static int snd_miro_put_preamp(struct snd_kcontrol *kcontrol,
349                                struct snd_ctl_elem_value *ucontrol)
350 {
351         struct snd_miro *miro = snd_kcontrol_chip(kcontrol);
352         int error, value, change;
353
354         value = ucontrol->value.integer.value[0];
355
356         error = aci_setvalue(miro->aci, ACI_SET_PREAMP, value);
357         if (error < 0) {
358                 snd_printk(KERN_ERR "snd_miro_put_preamp() failed: %d\n",
359                            error);
360                 return error;
361         }
362
363         change = (value != miro->aci->aci_preamp);
364         miro->aci->aci_preamp = value;
365
366         return change;
367 }
368
369 #define snd_miro_info_amp       snd_ctl_boolean_mono_info
370
371 static int snd_miro_get_amp(struct snd_kcontrol *kcontrol,
372                             struct snd_ctl_elem_value *ucontrol)
373 {
374         struct snd_miro *miro = snd_kcontrol_chip(kcontrol);
375         ucontrol->value.integer.value[0] = miro->aci->aci_amp;
376
377         return 0;
378 }
379
380 static int snd_miro_put_amp(struct snd_kcontrol *kcontrol,
381                             struct snd_ctl_elem_value *ucontrol)
382 {
383         struct snd_miro *miro = snd_kcontrol_chip(kcontrol);
384         int error, value, change;
385
386         value = ucontrol->value.integer.value[0];
387
388         error = aci_setvalue(miro->aci, ACI_SET_POWERAMP, value);
389         if (error < 0) {
390                 snd_printk(KERN_ERR "snd_miro_put_amp() to %d failed: %d\n", value, error);
391                 return error;
392         }
393
394         change = (value != miro->aci->aci_amp);
395         miro->aci->aci_amp = value;
396
397         return change;
398 }
399
400 #define MIRO_DOUBLE(ctl_name, ctl_index, get_right_reg, set_right_reg) \
401 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, \
402   .name = ctl_name, \
403   .index = ctl_index, \
404   .info = snd_miro_info_double, \
405   .get = snd_miro_get_double, \
406   .put = snd_miro_put_double, \
407   .private_value = get_right_reg | (set_right_reg << 8) \
408 }
409
410 static int snd_miro_info_double(struct snd_kcontrol *kcontrol, 
411                                 struct snd_ctl_elem_info *uinfo)
412 {
413         int reg = kcontrol->private_value & 0xff;
414
415         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
416         uinfo->count = 2;
417
418         if ((reg >= ACI_GET_EQ1) && (reg <= ACI_GET_EQ7)) {
419
420                 /* equalizer elements */
421
422                 uinfo->value.integer.min = - 0x7f;
423                 uinfo->value.integer.max = 0x7f;
424         } else {
425
426                 /* non-equalizer elements */
427
428                 uinfo->value.integer.min = 0;
429                 uinfo->value.integer.max = 0x20;
430         }
431
432         return 0;
433 }
434
435 static int snd_miro_get_double(struct snd_kcontrol *kcontrol, 
436                                struct snd_ctl_elem_value *uinfo)
437 {
438         struct snd_miro *miro = snd_kcontrol_chip(kcontrol);
439         int left_val, right_val;
440
441         int right_reg = kcontrol->private_value & 0xff;
442         int left_reg = right_reg + 1;
443
444         right_val = aci_getvalue(miro->aci, right_reg);
445         if (right_val < 0) {
446                 snd_printk(KERN_ERR "aci_getvalue(%d) failed: %d\n", right_reg, right_val);
447                 return right_val;
448         }
449
450         left_val = aci_getvalue(miro->aci, left_reg);
451         if (left_val < 0) {
452                 snd_printk(KERN_ERR "aci_getvalue(%d) failed: %d\n", left_reg, left_val);
453                 return left_val;
454         }
455
456         if ((right_reg >= ACI_GET_EQ1) && (right_reg <= ACI_GET_EQ7)) {
457
458                 /* equalizer elements */
459
460                 if (left_val < 0x80) {
461                         uinfo->value.integer.value[0] = left_val;
462                 } else {
463                         uinfo->value.integer.value[0] = 0x80 - left_val;
464                 }
465
466                 if (right_val < 0x80) {
467                         uinfo->value.integer.value[1] = right_val;
468                 } else {
469                         uinfo->value.integer.value[1] = 0x80 - right_val;
470                 }
471
472         } else {
473
474                 /* non-equalizer elements */
475
476                 uinfo->value.integer.value[0] = 0x20 - left_val;
477                 uinfo->value.integer.value[1] = 0x20 - right_val;
478         }
479
480         return 0;
481 }
482
483 static int snd_miro_put_double(struct snd_kcontrol *kcontrol, 
484                                struct snd_ctl_elem_value *ucontrol)
485 {
486         struct snd_miro *miro = snd_kcontrol_chip(kcontrol);
487         struct snd_miro_aci *aci = miro->aci;
488         int left, right, left_old, right_old;
489         int setreg_left, setreg_right, getreg_left, getreg_right;
490         int change, error;
491
492         left = ucontrol->value.integer.value[0];
493         right = ucontrol->value.integer.value[1];
494
495         setreg_right = (kcontrol->private_value >> 8) & 0xff;
496         setreg_left = setreg_right + 8;
497         if (setreg_right == ACI_SET_MASTER)
498                 setreg_left -= 7;
499
500         getreg_right = kcontrol->private_value & 0xff;
501         getreg_left = getreg_right + 1;
502
503         left_old = aci_getvalue(aci, getreg_left);
504         if (left_old < 0) {
505                 snd_printk(KERN_ERR "aci_getvalue(%d) failed: %d\n", getreg_left, left_old);
506                 return left_old;
507         }
508
509         right_old = aci_getvalue(aci, getreg_right);
510         if (right_old < 0) {
511                 snd_printk(KERN_ERR "aci_getvalue(%d) failed: %d\n", getreg_right, right_old);
512                 return right_old;
513         }
514
515         if ((getreg_right >= ACI_GET_EQ1) && (getreg_right <= ACI_GET_EQ7)) {
516
517                 /* equalizer elements */
518
519                 if (left < -0x7f || left > 0x7f ||
520                     right < -0x7f || right > 0x7f)
521                         return -EINVAL;
522
523                 if (left_old > 0x80) 
524                         left_old = 0x80 - left_old;
525                 if (right_old > 0x80) 
526                         right_old = 0x80 - right_old;
527
528                 if (left >= 0) {
529                         error = aci_setvalue(aci, setreg_left, left);
530                         if (error < 0) {
531                                 snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n",
532                                            left, error);
533                                 return error;
534                         }
535                 } else {
536                         error = aci_setvalue(aci, setreg_left, 0x80 - left);
537                         if (error < 0) {
538                                 snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n",
539                                            0x80 - left, error);
540                                 return error;
541                         }
542                 }
543
544                 if (right >= 0) {
545                         error = aci_setvalue(aci, setreg_right, right);
546                         if (error < 0) {
547                                 snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n",
548                                            right, error);
549                                 return error;
550                         }
551                 } else {
552                         error = aci_setvalue(aci, setreg_right, 0x80 - right);
553                         if (error < 0) {
554                                 snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n",
555                                            0x80 - right, error);
556                                 return error;
557                         }
558                 }
559
560         } else {
561
562                 /* non-equalizer elements */
563
564                 if (left < 0 || left > 0x20 ||
565                     right < 0 || right > 0x20)
566                         return -EINVAL;
567
568                 left_old = 0x20 - left_old;
569                 right_old = 0x20 - right_old;
570
571                 error = aci_setvalue(aci, setreg_left, 0x20 - left);
572                 if (error < 0) {
573                         snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n",
574                                    0x20 - left, error);
575                         return error;
576                 }
577                 error = aci_setvalue(aci, setreg_right, 0x20 - right);
578                 if (error < 0) {
579                         snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n",
580                                    0x20 - right, error);
581                         return error;
582                 }
583         }
584
585         change = (left != left_old) || (right != right_old);
586
587         return change;
588 }
589
590 static struct snd_kcontrol_new snd_miro_controls[] = {
591 MIRO_DOUBLE("Master Playback Volume", 0, ACI_GET_MASTER, ACI_SET_MASTER),
592 MIRO_DOUBLE("Mic Playback Volume", 1, ACI_GET_MIC, ACI_SET_MIC),
593 MIRO_DOUBLE("Line Playback Volume", 1, ACI_GET_LINE, ACI_SET_LINE),
594 MIRO_DOUBLE("CD Playback Volume", 0, ACI_GET_CD, ACI_SET_CD),
595 MIRO_DOUBLE("Synth Playback Volume", 0, ACI_GET_SYNTH, ACI_SET_SYNTH),
596 MIRO_DOUBLE("PCM Playback Volume", 1, ACI_GET_PCM, ACI_SET_PCM),
597 MIRO_DOUBLE("Aux Playback Volume", 2, ACI_GET_LINE2, ACI_SET_LINE2),
598 };
599
600 /* Equalizer with seven bands (only PCM20) 
601    from -12dB up to +12dB on each band */
602 static struct snd_kcontrol_new snd_miro_eq_controls[] = {
603 MIRO_DOUBLE("Tone Control - 28 Hz", 0, ACI_GET_EQ1, ACI_SET_EQ1),
604 MIRO_DOUBLE("Tone Control - 160 Hz", 0, ACI_GET_EQ2, ACI_SET_EQ2),
605 MIRO_DOUBLE("Tone Control - 400 Hz", 0, ACI_GET_EQ3, ACI_SET_EQ3),
606 MIRO_DOUBLE("Tone Control - 1 kHz", 0, ACI_GET_EQ4, ACI_SET_EQ4),
607 MIRO_DOUBLE("Tone Control - 2.5 kHz", 0, ACI_GET_EQ5, ACI_SET_EQ5),
608 MIRO_DOUBLE("Tone Control - 6.3 kHz", 0, ACI_GET_EQ6, ACI_SET_EQ6),
609 MIRO_DOUBLE("Tone Control - 16 kHz", 0, ACI_GET_EQ7, ACI_SET_EQ7),
610 };
611
612 static struct snd_kcontrol_new snd_miro_radio_control[] = {
613 MIRO_DOUBLE("Radio Playback Volume", 0, ACI_GET_LINE1, ACI_SET_LINE1),
614 };
615
616 static struct snd_kcontrol_new snd_miro_line_control[] = {
617 MIRO_DOUBLE("Line Playback Volume", 2, ACI_GET_LINE1, ACI_SET_LINE1),
618 };
619
620 static struct snd_kcontrol_new snd_miro_preamp_control[] = {
621 {
622         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
623         .name = "Mic Boost",
624         .index = 1,
625         .info = snd_miro_info_preamp,
626         .get = snd_miro_get_preamp,
627         .put = snd_miro_put_preamp,
628 }};
629
630 static struct snd_kcontrol_new snd_miro_amp_control[] = {
631 {
632         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
633         .name = "Line Boost",
634         .index = 0,
635         .info = snd_miro_info_amp,
636         .get = snd_miro_get_amp,
637         .put = snd_miro_put_amp,
638 }};
639
640 static struct snd_kcontrol_new snd_miro_capture_control[] = {
641 {
642         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
643         .name = "PCM Capture Switch",
644         .index = 0,
645         .info = snd_miro_info_capture,
646         .get = snd_miro_get_capture,
647         .put = snd_miro_put_capture,
648 }};
649
650 static unsigned char aci_init_values[][2] = {
651         { ACI_SET_MUTE, 0x00 },
652         { ACI_SET_POWERAMP, 0x00 },
653         { ACI_SET_PREAMP, 0x00 },
654         { ACI_SET_SOLOMODE, 0x00 },
655         { ACI_SET_MIC + 0, 0x20 },
656         { ACI_SET_MIC + 8, 0x20 },
657         { ACI_SET_LINE + 0, 0x20 },
658         { ACI_SET_LINE + 8, 0x20 },
659         { ACI_SET_CD + 0, 0x20 },
660         { ACI_SET_CD + 8, 0x20 },
661         { ACI_SET_PCM + 0, 0x20 },
662         { ACI_SET_PCM + 8, 0x20 },
663         { ACI_SET_LINE1 + 0, 0x20 },
664         { ACI_SET_LINE1 + 8, 0x20 },
665         { ACI_SET_LINE2 + 0, 0x20 },
666         { ACI_SET_LINE2 + 8, 0x20 },
667         { ACI_SET_SYNTH + 0, 0x20 },
668         { ACI_SET_SYNTH + 8, 0x20 },
669         { ACI_SET_MASTER + 0, 0x20 },
670         { ACI_SET_MASTER + 1, 0x20 },
671 };
672
673 static int snd_set_aci_init_values(struct snd_miro *miro)
674 {
675         int idx, error;
676         struct snd_miro_aci *aci = miro->aci;
677
678         /* enable WSS on PCM1 */
679
680         if ((aci->aci_product == 'A') && wss) {
681                 error = aci_setvalue(aci, ACI_SET_WSS, wss);
682                 if (error < 0) {
683                         snd_printk(KERN_ERR "enabling WSS mode failed\n");
684                         return error;
685                 }
686         }
687
688         /* enable IDE port */
689
690         if (ide) {
691                 error = aci_setvalue(aci, ACI_SET_IDE, ide);
692                 if (error < 0) {
693                         snd_printk(KERN_ERR "enabling IDE port failed\n");
694                         return error;
695                 }
696         }
697
698         /* set common aci values */
699
700         for (idx = 0; idx < ARRAY_SIZE(aci_init_values); idx++) {
701                 error = aci_setvalue(aci, aci_init_values[idx][0],
702                                      aci_init_values[idx][1]);
703                 if (error < 0) {
704                         snd_printk(KERN_ERR "aci_setvalue(%d) failed: %d\n", 
705                                    aci_init_values[idx][0], error);
706                         return error;
707                 }
708         }
709         aci->aci_amp = 0;
710         aci->aci_preamp = 0;
711         aci->aci_solomode = 1;
712
713         return 0;
714 }
715
716 static int snd_miro_mixer(struct snd_card *card,
717                           struct snd_miro *miro)
718 {
719         unsigned int idx;
720         int err;
721
722         if (snd_BUG_ON(!miro || !card))
723                 return -EINVAL;
724
725         switch (miro->hardware) {
726         case OPTi9XX_HW_82C924:
727                 strcpy(card->mixername, "ACI & OPTi924");
728                 break;
729         case OPTi9XX_HW_82C929:
730                 strcpy(card->mixername, "ACI & OPTi929");
731                 break;
732         default:
733                 snd_BUG();
734                 break;
735         }
736
737         for (idx = 0; idx < ARRAY_SIZE(snd_miro_controls); idx++) {
738                 if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_controls[idx], miro))) < 0)
739                         return err;
740         }
741
742         if ((miro->aci->aci_product == 'A') ||
743             (miro->aci->aci_product == 'B')) {
744                 /* PCM1/PCM12 with power-amp and Line 2 */
745                 if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_line_control[0], miro))) < 0)
746                         return err;
747                 if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_amp_control[0], miro))) < 0)
748                         return err;
749         }
750
751         if ((miro->aci->aci_product == 'B') ||
752             (miro->aci->aci_product == 'C')) {
753                 /* PCM12/PCM20 with mic-preamp */
754                 if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_preamp_control[0], miro))) < 0)
755                         return err;
756                 if (miro->aci->aci_version >= 176)
757                         if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_capture_control[0], miro))) < 0)
758                                 return err;
759         }
760
761         if (miro->aci->aci_product == 'C') {
762                 /* PCM20 with radio and 7 band equalizer */
763                 if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_radio_control[0], miro))) < 0)
764                         return err;
765                 for (idx = 0; idx < ARRAY_SIZE(snd_miro_eq_controls); idx++) {
766                         if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_miro_eq_controls[idx], miro))) < 0)
767                                 return err;
768                 }
769         }
770
771         return 0;
772 }
773
774 static int snd_miro_init(struct snd_miro *chip,
775                          unsigned short hardware)
776 {
777         static int opti9xx_mc_size[] = {7, 7, 10, 10, 2, 2, 2};
778
779         chip->hardware = hardware;
780         strcpy(chip->name, snd_opti9xx_names[hardware]);
781
782         chip->mc_base_size = opti9xx_mc_size[hardware];  
783
784         spin_lock_init(&chip->lock);
785
786         chip->wss_base = -1;
787         chip->irq = -1;
788         chip->dma1 = -1;
789         chip->dma2 = -1;
790         chip->mpu_port = -1;
791         chip->mpu_irq = -1;
792
793         chip->pwd_reg = 3;
794
795 #ifdef CONFIG_PNP
796         if (isapnp && chip->mc_base)
797                 /* PnP resource gives the least 10 bits */
798                 chip->mc_base |= 0xc00;
799         else
800 #endif
801                 chip->mc_base = 0xf8c;
802
803         switch (hardware) {
804         case OPTi9XX_HW_82C929:
805                 chip->password = 0xe3;
806                 break;
807
808         case OPTi9XX_HW_82C924:
809                 chip->password = 0xe5;
810                 break;
811
812         default:
813                 snd_printk(KERN_ERR "sorry, no support for %d\n", hardware);
814                 return -ENODEV;
815         }
816
817         return 0;
818 }
819
820 static unsigned char snd_miro_read(struct snd_miro *chip,
821                                    unsigned char reg)
822 {
823         unsigned long flags;
824         unsigned char retval = 0xff;
825
826         spin_lock_irqsave(&chip->lock, flags);
827         outb(chip->password, chip->mc_base + chip->pwd_reg);
828
829         switch (chip->hardware) {
830         case OPTi9XX_HW_82C924:
831                 if (reg > 7) {
832                         outb(reg, chip->mc_base + 8);
833                         outb(chip->password, chip->mc_base + chip->pwd_reg);
834                         retval = inb(chip->mc_base + 9);
835                         break;
836                 }
837
838         case OPTi9XX_HW_82C929:
839                 retval = inb(chip->mc_base + reg);
840                 break;
841
842         default:
843                 snd_printk(KERN_ERR "sorry, no support for %d\n", chip->hardware);
844         }
845
846         spin_unlock_irqrestore(&chip->lock, flags);
847         return retval;
848 }
849
850 static void snd_miro_write(struct snd_miro *chip, unsigned char reg,
851                            unsigned char value)
852 {
853         unsigned long flags;
854
855         spin_lock_irqsave(&chip->lock, flags);
856         outb(chip->password, chip->mc_base + chip->pwd_reg);
857
858         switch (chip->hardware) {
859         case OPTi9XX_HW_82C924:
860                 if (reg > 7) {
861                         outb(reg, chip->mc_base + 8);
862                         outb(chip->password, chip->mc_base + chip->pwd_reg);
863                         outb(value, chip->mc_base + 9);
864                         break;
865                 }
866
867         case OPTi9XX_HW_82C929:
868                 outb(value, chip->mc_base + reg);
869                 break;
870
871         default:
872                 snd_printk(KERN_ERR "sorry, no support for %d\n", chip->hardware);
873         }
874
875         spin_unlock_irqrestore(&chip->lock, flags);
876 }
877
878
879 #define snd_miro_write_mask(chip, reg, value, mask)     \
880         snd_miro_write(chip, reg,                       \
881                 (snd_miro_read(chip, reg) & ~(mask)) | ((value) & (mask)))
882
883 /*
884  *  Proc Interface
885  */
886
887 static void snd_miro_proc_read(struct snd_info_entry * entry, 
888                                struct snd_info_buffer *buffer)
889 {
890         struct snd_miro *miro = (struct snd_miro *) entry->private_data;
891         struct snd_miro_aci *aci = miro->aci;
892         char* model = "unknown";
893
894         /* miroSOUND PCM1 pro, early PCM12 */
895
896         if ((miro->hardware == OPTi9XX_HW_82C929) &&
897             (aci->aci_vendor == 'm') &&
898             (aci->aci_product == 'A')) {
899                 switch (aci->aci_version) {
900                 case 3:
901                         model = "miroSOUND PCM1 pro";
902                         break;
903                 default:
904                         model = "miroSOUND PCM1 pro / (early) PCM12";
905                         break;
906                 }
907         }
908
909         /* miroSOUND PCM12, PCM12 (Rev. E), PCM12 pnp */
910
911         if ((miro->hardware == OPTi9XX_HW_82C924) &&
912             (aci->aci_vendor == 'm') &&
913             (aci->aci_product == 'B')) {
914                 switch (aci->aci_version) {
915                 case 4:
916                         model = "miroSOUND PCM12";
917                         break;
918                 case 176:
919                         model = "miroSOUND PCM12 (Rev. E)";
920                         break;
921                 default:
922                         model = "miroSOUND PCM12 / PCM12 pnp";
923                         break;
924                 }
925         }
926
927         /* miroSOUND PCM20 radio */
928
929         if ((miro->hardware == OPTi9XX_HW_82C924) &&
930             (aci->aci_vendor == 'm') &&
931             (aci->aci_product == 'C')) {
932                 switch (aci->aci_version) {
933                 case 7:
934                         model = "miroSOUND PCM20 radio (Rev. E)";
935                         break;
936                 default:
937                         model = "miroSOUND PCM20 radio";
938                         break;
939                 }
940         }
941
942         snd_iprintf(buffer, "\nGeneral information:\n");
943         snd_iprintf(buffer, "  model   : %s\n", model);
944         snd_iprintf(buffer, "  opti    : %s\n", miro->name);
945         snd_iprintf(buffer, "  codec   : %s\n", miro->pcm->name);
946         snd_iprintf(buffer, "  port    : 0x%lx\n", miro->wss_base);
947         snd_iprintf(buffer, "  irq     : %d\n", miro->irq);
948         snd_iprintf(buffer, "  dma     : %d,%d\n\n", miro->dma1, miro->dma2);
949
950         snd_iprintf(buffer, "MPU-401:\n");
951         snd_iprintf(buffer, "  port    : 0x%lx\n", miro->mpu_port);
952         snd_iprintf(buffer, "  irq     : %d\n\n", miro->mpu_irq);
953
954         snd_iprintf(buffer, "ACI information:\n");
955         snd_iprintf(buffer, "  vendor  : ");
956         switch (aci->aci_vendor) {
957         case 'm':
958                 snd_iprintf(buffer, "Miro\n");
959                 break;
960         default:
961                 snd_iprintf(buffer, "unknown (0x%x)\n", aci->aci_vendor);
962                 break;
963         }
964
965         snd_iprintf(buffer, "  product : ");
966         switch (aci->aci_product) {
967         case 'A':
968                 snd_iprintf(buffer, "miroSOUND PCM1 pro / (early) PCM12\n");
969                 break;
970         case 'B':
971                 snd_iprintf(buffer, "miroSOUND PCM12\n");
972                 break;
973         case 'C':
974                 snd_iprintf(buffer, "miroSOUND PCM20 radio\n");
975                 break;
976         default:
977                 snd_iprintf(buffer, "unknown (0x%x)\n", aci->aci_product);
978                 break;
979         }
980
981         snd_iprintf(buffer, "  firmware: %d (0x%x)\n",
982                     aci->aci_version, aci->aci_version);
983         snd_iprintf(buffer, "  port    : 0x%lx-0x%lx\n", 
984                     aci->aci_port, aci->aci_port+2);
985         snd_iprintf(buffer, "  wss     : 0x%x\n", wss);
986         snd_iprintf(buffer, "  ide     : 0x%x\n", ide);
987         snd_iprintf(buffer, "  solomode: 0x%x\n", aci->aci_solomode);
988         snd_iprintf(buffer, "  amp     : 0x%x\n", aci->aci_amp);
989         snd_iprintf(buffer, "  preamp  : 0x%x\n", aci->aci_preamp);
990 }
991
992 static void snd_miro_proc_init(struct snd_card *card,
993                                struct snd_miro *miro)
994 {
995         struct snd_info_entry *entry;
996
997         if (!snd_card_proc_new(card, "miro", &entry))
998                 snd_info_set_text_ops(entry, miro, snd_miro_proc_read);
999 }
1000
1001 /*
1002  *  Init
1003  */
1004
1005 static int snd_miro_configure(struct snd_miro *chip)
1006 {
1007         unsigned char wss_base_bits;
1008         unsigned char irq_bits;
1009         unsigned char dma_bits;
1010         unsigned char mpu_port_bits = 0;
1011         unsigned char mpu_irq_bits;
1012         unsigned long flags;
1013
1014         snd_miro_write_mask(chip, OPTi9XX_MC_REG(1), 0x80, 0x80);
1015         snd_miro_write_mask(chip, OPTi9XX_MC_REG(2), 0x20, 0x20); /* OPL4 */
1016         snd_miro_write_mask(chip, OPTi9XX_MC_REG(5), 0x02, 0x02);
1017
1018         switch (chip->hardware) {
1019         case OPTi9XX_HW_82C924:
1020                 snd_miro_write_mask(chip, OPTi9XX_MC_REG(6), 0x02, 0x02);
1021                 snd_miro_write_mask(chip, OPTi9XX_MC_REG(3), 0xf0, 0xff);
1022                 break;
1023         case OPTi9XX_HW_82C929:
1024                 /* untested init commands for OPTi929 */
1025                 snd_miro_write_mask(chip, OPTi9XX_MC_REG(4), 0x00, 0x0c);
1026                 break;
1027         default:
1028                 snd_printk(KERN_ERR "chip %d not supported\n", chip->hardware);
1029                 return -EINVAL;
1030         }
1031
1032         /* PnP resource says it decodes only 10 bits of address */
1033         switch (chip->wss_base & 0x3ff) {
1034         case 0x130:
1035                 chip->wss_base = 0x530;
1036                 wss_base_bits = 0x00;
1037                 break;
1038         case 0x204:
1039                 chip->wss_base = 0x604;
1040                 wss_base_bits = 0x03;
1041                 break;
1042         case 0x280:
1043                 chip->wss_base = 0xe80;
1044                 wss_base_bits = 0x01;
1045                 break;
1046         case 0x340:
1047                 chip->wss_base = 0xf40;
1048                 wss_base_bits = 0x02;
1049                 break;
1050         default:
1051                 snd_printk(KERN_ERR "WSS port 0x%lx not valid\n", chip->wss_base);
1052                 goto __skip_base;
1053         }
1054         snd_miro_write_mask(chip, OPTi9XX_MC_REG(1), wss_base_bits << 4, 0x30);
1055
1056 __skip_base:
1057         switch (chip->irq) {
1058         case 5:
1059                 irq_bits = 0x05;
1060                 break;
1061         case 7:
1062                 irq_bits = 0x01;
1063                 break;
1064         case 9:
1065                 irq_bits = 0x02;
1066                 break;
1067         case 10:
1068                 irq_bits = 0x03;
1069                 break;
1070         case 11:
1071                 irq_bits = 0x04;
1072                 break;
1073         default:
1074                 snd_printk(KERN_ERR "WSS irq # %d not valid\n", chip->irq);
1075                 goto __skip_resources;
1076         }
1077
1078         switch (chip->dma1) {
1079         case 0:
1080                 dma_bits = 0x01;
1081                 break;
1082         case 1:
1083                 dma_bits = 0x02;
1084                 break;
1085         case 3:
1086                 dma_bits = 0x03;
1087                 break;
1088         default:
1089                 snd_printk(KERN_ERR "WSS dma1 # %d not valid\n", chip->dma1);
1090                 goto __skip_resources;
1091         }
1092
1093         if (chip->dma1 == chip->dma2) {
1094                 snd_printk(KERN_ERR "don't want to share dmas\n");
1095                 return -EBUSY;
1096         }
1097
1098         switch (chip->dma2) {
1099         case 0:
1100         case 1:
1101                 break;
1102         default:
1103                 snd_printk(KERN_ERR "WSS dma2 # %d not valid\n", chip->dma2);
1104                 goto __skip_resources;
1105         }
1106         dma_bits |= 0x04;
1107
1108         spin_lock_irqsave(&chip->lock, flags);
1109         outb(irq_bits << 3 | dma_bits, chip->wss_base);
1110         spin_unlock_irqrestore(&chip->lock, flags);
1111
1112 __skip_resources:
1113         if (chip->hardware > OPTi9XX_HW_82C928) {
1114                 switch (chip->mpu_port) {
1115                 case 0:
1116                 case -1:
1117                         break;
1118                 case 0x300:
1119                         mpu_port_bits = 0x03;
1120                         break;
1121                 case 0x310:
1122                         mpu_port_bits = 0x02;
1123                         break;
1124                 case 0x320:
1125                         mpu_port_bits = 0x01;
1126                         break;
1127                 case 0x330:
1128                         mpu_port_bits = 0x00;
1129                         break;
1130                 default:
1131                         snd_printk(KERN_ERR "MPU-401 port 0x%lx not valid\n",
1132                                    chip->mpu_port);
1133                         goto __skip_mpu;
1134                 }
1135
1136                 switch (chip->mpu_irq) {
1137                 case 5:
1138                         mpu_irq_bits = 0x02;
1139                         break;
1140                 case 7:
1141                         mpu_irq_bits = 0x03;
1142                         break;
1143                 case 9:
1144                         mpu_irq_bits = 0x00;
1145                         break;
1146                 case 10:
1147                         mpu_irq_bits = 0x01;
1148                         break;
1149                 default:
1150                         snd_printk(KERN_ERR "MPU-401 irq # %d not valid\n",
1151                                    chip->mpu_irq);
1152                         goto __skip_mpu;
1153                 }
1154
1155                 snd_miro_write_mask(chip, OPTi9XX_MC_REG(6),
1156                         (chip->mpu_port <= 0) ? 0x00 :
1157                                 0x80 | mpu_port_bits << 5 | mpu_irq_bits << 3,
1158                         0xf8);
1159         }
1160 __skip_mpu:
1161
1162         return 0;
1163 }
1164
1165 static int snd_miro_opti_check(struct snd_miro *chip)
1166 {
1167         unsigned char value;
1168
1169         chip->res_mc_base = request_region(chip->mc_base, chip->mc_base_size,
1170                                            "OPTi9xx MC");
1171         if (chip->res_mc_base == NULL)
1172                 return -ENOMEM;
1173
1174         value = snd_miro_read(chip, OPTi9XX_MC_REG(1));
1175         if (value != 0xff && value != inb(chip->mc_base + OPTi9XX_MC_REG(1)))
1176                 if (value == snd_miro_read(chip, OPTi9XX_MC_REG(1)))
1177                         return 0;
1178
1179         release_and_free_resource(chip->res_mc_base);
1180         chip->res_mc_base = NULL;
1181
1182         return -ENODEV;
1183 }
1184
1185 static int snd_card_miro_detect(struct snd_card *card,
1186                                 struct snd_miro *chip)
1187 {
1188         int i, err;
1189
1190         for (i = OPTi9XX_HW_82C929; i <= OPTi9XX_HW_82C924; i++) {
1191
1192                 if ((err = snd_miro_init(chip, i)) < 0)
1193                         return err;
1194
1195                 err = snd_miro_opti_check(chip);
1196                 if (err == 0)
1197                         return 1;
1198         }
1199
1200         return -ENODEV;
1201 }
1202
1203 static int snd_card_miro_aci_detect(struct snd_card *card,
1204                                     struct snd_miro *miro)
1205 {
1206         unsigned char regval;
1207         int i;
1208         struct snd_miro_aci *aci = &aci_device;
1209
1210         miro->aci = aci;
1211
1212         mutex_init(&aci->aci_mutex);
1213
1214         /* get ACI port from OPTi9xx MC 4 */
1215
1216         regval=inb(miro->mc_base + 4);
1217         aci->aci_port = (regval & 0x10) ? 0x344 : 0x354;
1218
1219         miro->res_aci_port = request_region(aci->aci_port, 3, "miro aci");
1220         if (miro->res_aci_port == NULL) {
1221                 snd_printk(KERN_ERR "aci i/o area 0x%lx-0x%lx already used.\n", 
1222                            aci->aci_port, aci->aci_port+2);
1223                 return -ENOMEM;
1224         }
1225
1226         /* force ACI into a known state */
1227         for (i = 0; i < 3; i++)
1228                 if (snd_aci_cmd(aci, ACI_ERROR_OP, -1, -1) < 0) {
1229                         snd_printk(KERN_ERR "can't force aci into known state.\n");
1230                         return -ENXIO;
1231                 }
1232
1233         aci->aci_vendor = snd_aci_cmd(aci, ACI_READ_IDCODE, -1, -1);
1234         aci->aci_product = snd_aci_cmd(aci, ACI_READ_IDCODE, -1, -1);
1235         if (aci->aci_vendor < 0 || aci->aci_product < 0) {
1236                 snd_printk(KERN_ERR "can't read aci id on 0x%lx.\n",
1237                            aci->aci_port);
1238                 return -ENXIO;
1239         }
1240
1241         aci->aci_version = snd_aci_cmd(aci, ACI_READ_VERSION, -1, -1);
1242         if (aci->aci_version < 0) {
1243                 snd_printk(KERN_ERR "can't read aci version on 0x%lx.\n", 
1244                            aci->aci_port);
1245                 return -ENXIO;
1246         }
1247
1248         if (snd_aci_cmd(aci, ACI_INIT, -1, -1) < 0 ||
1249             snd_aci_cmd(aci, ACI_ERROR_OP, ACI_ERROR_OP, ACI_ERROR_OP) < 0 ||
1250             snd_aci_cmd(aci, ACI_ERROR_OP, ACI_ERROR_OP, ACI_ERROR_OP) < 0) {
1251                 snd_printk(KERN_ERR "can't initialize aci.\n"); 
1252                 return -ENXIO;
1253         }
1254
1255         return 0;
1256 }
1257
1258 static void snd_card_miro_free(struct snd_card *card)
1259 {
1260         struct snd_miro *miro = card->private_data;
1261
1262         release_and_free_resource(miro->res_aci_port);
1263         if (miro->aci)
1264                 miro->aci->aci_port = 0;
1265         release_and_free_resource(miro->res_mc_base);
1266 }
1267
1268 static int snd_miro_probe(struct snd_card *card)
1269 {
1270         int error;
1271         struct snd_miro *miro = card->private_data;
1272         struct snd_wss *codec;
1273         struct snd_rawmidi *rmidi;
1274
1275         if (!miro->res_mc_base) {
1276                 miro->res_mc_base = request_region(miro->mc_base,
1277                                                 miro->mc_base_size,
1278                                                 "miro (OPTi9xx MC)");
1279                 if (miro->res_mc_base == NULL) {
1280                         snd_printk(KERN_ERR "request for OPTI9xx MC failed\n");
1281                         return -ENOMEM;
1282                 }
1283         }
1284
1285         error = snd_card_miro_aci_detect(card, miro);
1286         if (error < 0) {
1287                 snd_printk(KERN_ERR "unable to detect aci chip\n");
1288                 return -ENODEV;
1289         }
1290
1291         miro->wss_base = port;
1292         miro->mpu_port = mpu_port;
1293         miro->irq = irq;
1294         miro->mpu_irq = mpu_irq;
1295         miro->dma1 = dma1;
1296         miro->dma2 = dma2;
1297
1298         /* init proc interface */
1299         snd_miro_proc_init(card, miro);
1300
1301         error = snd_miro_configure(miro);
1302         if (error)
1303                 return error;
1304
1305         error = snd_wss_create(card, miro->wss_base + 4, -1,
1306                                miro->irq, miro->dma1, miro->dma2,
1307                                WSS_HW_DETECT, 0, &codec);
1308         if (error < 0)
1309                 return error;
1310
1311         error = snd_wss_pcm(codec, 0);
1312         if (error < 0)
1313                 return error;
1314
1315         error = snd_wss_mixer(codec);
1316         if (error < 0)
1317                 return error;
1318
1319         error = snd_wss_timer(codec, 0);
1320         if (error < 0)
1321                 return error;
1322
1323         miro->pcm = codec->pcm;
1324
1325         error = snd_miro_mixer(card, miro);
1326         if (error < 0)
1327                 return error;
1328
1329         if (miro->aci->aci_vendor == 'm') {
1330                 /* It looks like a miro sound card. */
1331                 switch (miro->aci->aci_product) {
1332                 case 'A':
1333                         sprintf(card->shortname, 
1334                                 "miroSOUND PCM1 pro / PCM12");
1335                         break;
1336                 case 'B':
1337                         sprintf(card->shortname, 
1338                                 "miroSOUND PCM12");
1339                         break;
1340                 case 'C':
1341                         sprintf(card->shortname, 
1342                                 "miroSOUND PCM20 radio");
1343                         break;
1344                 default:
1345                         sprintf(card->shortname, 
1346                                 "unknown miro");
1347                         snd_printk(KERN_INFO "unknown miro aci id\n");
1348                         break;
1349                 }
1350         } else {
1351                 snd_printk(KERN_INFO "found unsupported aci card\n");
1352                 sprintf(card->shortname, "unknown Cardinal Technologies");
1353         }
1354
1355         strcpy(card->driver, "miro");
1356         sprintf(card->longname, "%s: OPTi%s, %s at 0x%lx, irq %d, dma %d&%d",
1357                 card->shortname, miro->name, codec->pcm->name,
1358                 miro->wss_base + 4, miro->irq, miro->dma1, miro->dma2);
1359
1360         if (mpu_port <= 0 || mpu_port == SNDRV_AUTO_PORT)
1361                 rmidi = NULL;
1362         else {
1363                 error = snd_mpu401_uart_new(card, 0, MPU401_HW_MPU401,
1364                                 mpu_port, 0, miro->mpu_irq, &rmidi);
1365                 if (error < 0)
1366                         snd_printk(KERN_WARNING "no MPU-401 device at 0x%lx?\n",
1367                                    mpu_port);
1368         }
1369
1370         if (fm_port > 0 && fm_port != SNDRV_AUTO_PORT) {
1371                 struct snd_opl3 *opl3 = NULL;
1372                 struct snd_opl4 *opl4;
1373
1374                 if (snd_opl4_create(card, fm_port, fm_port - 8,
1375                                     2, &opl3, &opl4) < 0)
1376                         snd_printk(KERN_WARNING "no OPL4 device at 0x%lx\n",
1377                                    fm_port);
1378         }
1379
1380         error = snd_set_aci_init_values(miro);
1381         if (error < 0)
1382                 return error;
1383
1384         return snd_card_register(card);
1385 }
1386
1387 static int snd_miro_isa_match(struct device *devptr, unsigned int n)
1388 {
1389 #ifdef CONFIG_PNP
1390         if (snd_miro_pnp_is_probed)
1391                 return 0;
1392         if (isapnp)
1393                 return 0;
1394 #endif
1395         return 1;
1396 }
1397
1398 static int snd_miro_isa_probe(struct device *devptr, unsigned int n)
1399 {
1400         static long possible_ports[] = {0x530, 0xe80, 0xf40, 0x604, -1};
1401         static long possible_mpu_ports[] = {0x330, 0x300, 0x310, 0x320, -1};
1402         static int possible_irqs[] = {11, 9, 10, 7, -1};
1403         static int possible_mpu_irqs[] = {10, 5, 9, 7, -1};
1404         static int possible_dma1s[] = {3, 1, 0, -1};
1405         static int possible_dma2s[][2] = { {1, -1}, {0, -1}, {-1, -1},
1406                                            {0, -1} };
1407
1408         int error;
1409         struct snd_miro *miro;
1410         struct snd_card *card;
1411
1412         error = snd_card_new(devptr, index, id, THIS_MODULE,
1413                              sizeof(struct snd_miro), &card);
1414         if (error < 0)
1415                 return error;
1416
1417         card->private_free = snd_card_miro_free;
1418         miro = card->private_data;
1419
1420         error = snd_card_miro_detect(card, miro);
1421         if (error < 0) {
1422                 snd_card_free(card);
1423                 snd_printk(KERN_ERR "unable to detect OPTi9xx chip\n");
1424                 return -ENODEV;
1425         }
1426
1427         if (port == SNDRV_AUTO_PORT) {
1428                 port = snd_legacy_find_free_ioport(possible_ports, 4);
1429                 if (port < 0) {
1430                         snd_card_free(card);
1431                         snd_printk(KERN_ERR "unable to find a free WSS port\n");
1432                         return -EBUSY;
1433                 }
1434         }
1435
1436         if (mpu_port == SNDRV_AUTO_PORT) {
1437                 mpu_port = snd_legacy_find_free_ioport(possible_mpu_ports, 2);
1438                 if (mpu_port < 0) {
1439                         snd_card_free(card);
1440                         snd_printk(KERN_ERR
1441                                    "unable to find a free MPU401 port\n");
1442                         return -EBUSY;
1443                 }
1444         }
1445
1446         if (irq == SNDRV_AUTO_IRQ) {
1447                 irq = snd_legacy_find_free_irq(possible_irqs);
1448                 if (irq < 0) {
1449                         snd_card_free(card);
1450                         snd_printk(KERN_ERR "unable to find a free IRQ\n");
1451                         return -EBUSY;
1452                 }
1453         }
1454         if (mpu_irq == SNDRV_AUTO_IRQ) {
1455                 mpu_irq = snd_legacy_find_free_irq(possible_mpu_irqs);
1456                 if (mpu_irq < 0) {
1457                         snd_card_free(card);
1458                         snd_printk(KERN_ERR
1459                                    "unable to find a free MPU401 IRQ\n");
1460                         return -EBUSY;
1461                 }
1462         }
1463         if (dma1 == SNDRV_AUTO_DMA) {
1464                 dma1 = snd_legacy_find_free_dma(possible_dma1s);
1465                 if (dma1 < 0) {
1466                         snd_card_free(card);
1467                         snd_printk(KERN_ERR "unable to find a free DMA1\n");
1468                         return -EBUSY;
1469                 }
1470         }
1471         if (dma2 == SNDRV_AUTO_DMA) {
1472                 dma2 = snd_legacy_find_free_dma(possible_dma2s[dma1 % 4]);
1473                 if (dma2 < 0) {
1474                         snd_card_free(card);
1475                         snd_printk(KERN_ERR "unable to find a free DMA2\n");
1476                         return -EBUSY;
1477                 }
1478         }
1479
1480         error = snd_miro_probe(card);
1481         if (error < 0) {
1482                 snd_card_free(card);
1483                 return error;
1484         }
1485
1486         dev_set_drvdata(devptr, card);
1487         return 0;
1488 }
1489
1490 static int snd_miro_isa_remove(struct device *devptr,
1491                                unsigned int dev)
1492 {
1493         snd_card_free(dev_get_drvdata(devptr));
1494         return 0;
1495 }
1496
1497 #define DEV_NAME "miro"
1498
1499 static struct isa_driver snd_miro_driver = {
1500         .match          = snd_miro_isa_match,
1501         .probe          = snd_miro_isa_probe,
1502         .remove         = snd_miro_isa_remove,
1503         /* FIXME: suspend/resume */
1504         .driver         = {
1505                 .name   = DEV_NAME
1506         },
1507 };
1508
1509 #ifdef CONFIG_PNP
1510
1511 static int snd_card_miro_pnp(struct snd_miro *chip,
1512                              struct pnp_card_link *card,
1513                              const struct pnp_card_device_id *pid)
1514 {
1515         struct pnp_dev *pdev;
1516         int err;
1517         struct pnp_dev *devmpu;
1518         struct pnp_dev *devmc;
1519
1520         pdev = pnp_request_card_device(card, pid->devs[0].id, NULL);
1521         if (pdev == NULL)
1522                 return -EBUSY;
1523
1524         devmpu = pnp_request_card_device(card, pid->devs[1].id, NULL);
1525         if (devmpu == NULL)
1526                 return -EBUSY;
1527
1528         devmc = pnp_request_card_device(card, pid->devs[2].id, NULL);
1529         if (devmc == NULL)
1530                 return -EBUSY;
1531
1532         err = pnp_activate_dev(pdev);
1533         if (err < 0) {
1534                 snd_printk(KERN_ERR "AUDIO pnp configure failure: %d\n", err);
1535                 return err;
1536         }
1537
1538         err = pnp_activate_dev(devmc);
1539         if (err < 0) {
1540                 snd_printk(KERN_ERR "MC pnp configure failure: %d\n",
1541                                     err);
1542                 return err;
1543         }
1544
1545         port = pnp_port_start(pdev, 1);
1546         fm_port = pnp_port_start(pdev, 2) + 8;
1547
1548         /*
1549          * The MC(0) is never accessed and the miroSOUND PCM20 card does not
1550          * include it in the PnP resource range. OPTI93x include it.
1551          */
1552         chip->mc_base = pnp_port_start(devmc, 0) - 1;
1553         chip->mc_base_size = pnp_port_len(devmc, 0) + 1;
1554
1555         irq = pnp_irq(pdev, 0);
1556         dma1 = pnp_dma(pdev, 0);
1557         dma2 = pnp_dma(pdev, 1);
1558
1559         if (mpu_port > 0) {
1560                 err = pnp_activate_dev(devmpu);
1561                 if (err < 0) {
1562                         snd_printk(KERN_ERR "MPU401 pnp configure failure\n");
1563                         mpu_port = -1;
1564                         return err;
1565                 }
1566                 mpu_port = pnp_port_start(devmpu, 0);
1567                 mpu_irq = pnp_irq(devmpu, 0);
1568         }
1569         return 0;
1570 }
1571
1572 static int snd_miro_pnp_probe(struct pnp_card_link *pcard,
1573                               const struct pnp_card_device_id *pid)
1574 {
1575         struct snd_card *card;
1576         int err;
1577         struct snd_miro *miro;
1578
1579         if (snd_miro_pnp_is_probed)
1580                 return -EBUSY;
1581         if (!isapnp)
1582                 return -ENODEV;
1583         err = snd_card_new(&pcard->card->dev, index, id, THIS_MODULE,
1584                            sizeof(struct snd_miro), &card);
1585         if (err < 0)
1586                 return err;
1587
1588         card->private_free = snd_card_miro_free;
1589         miro = card->private_data;
1590
1591         err = snd_card_miro_pnp(miro, pcard, pid);
1592         if (err) {
1593                 snd_card_free(card);
1594                 return err;
1595         }
1596
1597         /* only miroSOUND PCM20 and PCM12 == OPTi924 */
1598         err = snd_miro_init(miro, OPTi9XX_HW_82C924);
1599         if (err) {
1600                 snd_card_free(card);
1601                 return err;
1602         }
1603
1604         err = snd_miro_opti_check(miro);
1605         if (err) {
1606                 snd_printk(KERN_ERR "OPTI chip not found\n");
1607                 snd_card_free(card);
1608                 return err;
1609         }
1610
1611         err = snd_miro_probe(card);
1612         if (err < 0) {
1613                 snd_card_free(card);
1614                 return err;
1615         }
1616         pnp_set_card_drvdata(pcard, card);
1617         snd_miro_pnp_is_probed = 1;
1618         return 0;
1619 }
1620
1621 static void snd_miro_pnp_remove(struct pnp_card_link *pcard)
1622 {
1623         snd_card_free(pnp_get_card_drvdata(pcard));
1624         pnp_set_card_drvdata(pcard, NULL);
1625         snd_miro_pnp_is_probed = 0;
1626 }
1627
1628 static struct pnp_card_driver miro_pnpc_driver = {
1629         .flags          = PNP_DRIVER_RES_DISABLE,
1630         .name           = "miro",
1631         .id_table       = snd_miro_pnpids,
1632         .probe          = snd_miro_pnp_probe,
1633         .remove         = snd_miro_pnp_remove,
1634 };
1635 #endif
1636
1637 static int __init alsa_card_miro_init(void)
1638 {
1639 #ifdef CONFIG_PNP
1640         pnp_register_card_driver(&miro_pnpc_driver);
1641         if (snd_miro_pnp_is_probed)
1642                 return 0;
1643         pnp_unregister_card_driver(&miro_pnpc_driver);
1644 #endif
1645         return isa_register_driver(&snd_miro_driver, 1);
1646 }
1647
1648 static void __exit alsa_card_miro_exit(void)
1649 {
1650         if (!snd_miro_pnp_is_probed) {
1651                 isa_unregister_driver(&snd_miro_driver);
1652                 return;
1653         }
1654 #ifdef CONFIG_PNP
1655         pnp_unregister_card_driver(&miro_pnpc_driver);
1656 #endif
1657 }
1658
1659 module_init(alsa_card_miro_init)
1660 module_exit(alsa_card_miro_exit)