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