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