sound/isa/opti9xx/miro.c

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