sound/isa/opti9xx/miro.c

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