sound/isa/cmi8328.c

   1 /*
   2  * Driver for C-Media CMI8328-based soundcards, such as AudioExcel AV500
   3  * Copyright (c) 2012 Ondrej Zary
   4  *
   5  * AudioExcel AV500 card consists of:
   6  *  - CMI8328 - main chip (SB Pro emulation, gameport, OPL3, MPU401, CD-ROM)
   7  *  - CS4231A - WSS codec
   8  *  - Dream SAM9233+GMS950400+RAM+ROM: Wavetable MIDI, connected to MPU401
   9  */
  10
  11 #include <linux/init.h>
  12 #include <linux/isa.h>
  13 #include <linux/module.h>
  14 #include <linux/gameport.h>
  15 #include <asm/dma.h>
  16 #include <sound/core.h>
  17 #include <sound/wss.h>
  18 #include <sound/opl3.h>
  19 #include <sound/mpu401.h>
  20 #define SNDRV_LEGACY_FIND_FREE_IOPORT
  21 #define SNDRV_LEGACY_FIND_FREE_IRQ
  22 #define SNDRV_LEGACY_FIND_FREE_DMA
  23 #include <sound/initval.h>
  24
  25 MODULE_AUTHOR("Ondrej Zary <linux@rainbow-software.org>");
  26 MODULE_DESCRIPTION("C-Media CMI8328");
  27 MODULE_LICENSE("GPL");
  28
  29 #if defined(CONFIG_GAMEPORT) || defined(CONFIG_GAMEPORT_MODULE)
  30 #define SUPPORT_JOYSTICK 1
  31 #endif
  32
  33 /* I/O port is configured by jumpers on the card to one of these */
  34 static int cmi8328_ports[] = { 0x530, 0xe80, 0xf40, 0x604 };
  35 #define CMI8328_MAX     ARRAY_SIZE(cmi8328_ports)
  36
  37 static int index[CMI8328_MAX] =     {[0 ... (CMI8328_MAX-1)] = -1};
  38 static char *id[CMI8328_MAX] =      {[0 ... (CMI8328_MAX-1)] = NULL};
  39 static long port[CMI8328_MAX] =     {[0 ... (CMI8328_MAX-1)] = SNDRV_AUTO_PORT};
  40 static int irq[CMI8328_MAX] =       {[0 ... (CMI8328_MAX-1)] = SNDRV_AUTO_IRQ};
  41 static int dma1[CMI8328_MAX] =      {[0 ... (CMI8328_MAX-1)] = SNDRV_AUTO_DMA};
  42 static int dma2[CMI8328_MAX] =      {[0 ... (CMI8328_MAX-1)] = SNDRV_AUTO_DMA};
  43 static long mpuport[CMI8328_MAX] =  {[0 ... (CMI8328_MAX-1)] = SNDRV_AUTO_PORT};
  44 static int mpuirq[CMI8328_MAX] =    {[0 ... (CMI8328_MAX-1)] = SNDRV_AUTO_IRQ};
  45 #ifdef SUPPORT_JOYSTICK
  46 static bool gameport[CMI8328_MAX] = {[0 ... (CMI8328_MAX-1)] = true};
  47 #endif
  48
  49 module_param_array(index, int, NULL, 0444);
  50 MODULE_PARM_DESC(index, "Index value for CMI8328 soundcard.");
  51 module_param_array(id, charp, NULL, 0444);
  52 MODULE_PARM_DESC(id, "ID string for CMI8328 soundcard.");
  53
  54 module_param_array(port, long, NULL, 0444);
  55 MODULE_PARM_DESC(port, "Port # for CMI8328 driver.");
  56 module_param_array(irq, int, NULL, 0444);
  57 MODULE_PARM_DESC(irq, "IRQ # for CMI8328 driver.");
  58 module_param_array(dma1, int, NULL, 0444);
  59 MODULE_PARM_DESC(dma1, "DMA1 for CMI8328 driver.");
  60 module_param_array(dma2, int, NULL, 0444);
  61 MODULE_PARM_DESC(dma2, "DMA2 for CMI8328 driver.");
  62
  63 module_param_array(mpuport, long, NULL, 0444);
  64 MODULE_PARM_DESC(mpuport, "MPU-401 port # for CMI8328 driver.");
  65 module_param_array(mpuirq, int, NULL, 0444);
  66 MODULE_PARM_DESC(mpuirq, "IRQ # for CMI8328 MPU-401 port.");
  67 #ifdef SUPPORT_JOYSTICK
  68 module_param_array(gameport, bool, NULL, 0444);
  69 MODULE_PARM_DESC(gameport, "Enable gameport.");
  70 #endif
  71
  72 struct snd_cmi8328 {
  73         u16 port;
  74         u8 cfg[3];
  75         u8 wss_cfg;
  76         struct snd_card *card;
  77         struct snd_wss *wss;
  78 #ifdef SUPPORT_JOYSTICK
  79         struct gameport *gameport;
  80 #endif
  81 };
  82
  83 /* CMI8328 configuration registers */
  84 #define CFG1 0x61
  85 #define CFG1_SB_DISABLE (1 << 0)
  86 #define CFG1_GAMEPORT   (1 << 1)
  87 /*
  88  * bit 0:    SB: 0=enabled, 1=disabled
  89  * bit 1:    gameport: 0=disabled, 1=enabled
  90  * bits 2-4: SB IRQ: 001=3, 010=5, 011=7, 100=9, 101=10, 110=11
  91  * bits 5-6: SB DMA: 00=disabled (when SB disabled), 01=DMA0, 10=DMA1, 11=DMA3
  92  * bit 7:    SB port: 0=0x220, 1=0x240
  93  */
  94 #define CFG2 0x62
  95 #define CFG2_MPU_ENABLE (1 << 2)
  96 /*
  97  * bits 0-1: CD-ROM mode: 00=disabled, 01=Panasonic, 10=Sony/Mitsumi/Wearnes,
  98                           11=IDE
  99  * bit 2:    MPU401: 0=disabled, 1=enabled
 100  * bits 3-4: MPU401 IRQ: 00=3, 01=5, 10=7, 11=9,
 101  * bits 5-7: MPU401 port: 000=0x300, 001=0x310, 010=0x320, 011=0x330, 100=0x332,
 102                           101=0x334, 110=0x336
 103  */
 104 #define CFG3 0x63
 105 /*
 106  * bits 0-2: CD-ROM IRQ: 000=disabled, 001=3, 010=5, 011=7, 100=9, 101=10,
 107                          110=11
 108  * bits 3-4: CD-ROM DMA: 00=disabled, 01=DMA0, 10=DMA1, 11=DMA3
 109  * bits 5-7: CD-ROM port: 000=0x300, 001=0x310, 010=0x320, 011=0x330, 100=0x340,
 110                           101=0x350, 110=0x360, 111=0x370
 111  */
 112
 113 static u8 snd_cmi8328_cfg_read(u16 port, u8 reg)
 114 {
 115         outb(0x43, port + 3);
 116         outb(0x21, port + 3);
 117         outb(reg, port + 3);
 118         return inb(port);
 119 }
 120
 121 static void snd_cmi8328_cfg_write(u16 port, u8 reg, u8 val)
 122 {
 123         outb(0x43, port + 3);
 124         outb(0x21, port + 3);
 125         outb(reg, port + 3);
 126         outb(val, port + 3);    /* yes, value goes to the same port as index */
 127 }
 128
 129 static void snd_cmi8328_cfg_save(u16 port, u8 cfg[])
 130 {
 131         cfg[0] = snd_cmi8328_cfg_read(port, CFG1);
 132         cfg[1] = snd_cmi8328_cfg_read(port, CFG2);
 133         cfg[2] = snd_cmi8328_cfg_read(port, CFG3);
 134 }
 135
 136 static void snd_cmi8328_cfg_restore(u16 port, u8 cfg[])
 137 {
 138         snd_cmi8328_cfg_write(port, CFG1, cfg[0]);
 139         snd_cmi8328_cfg_write(port, CFG2, cfg[1]);
 140         snd_cmi8328_cfg_write(port, CFG3, cfg[2]);
 141 }
 142
 143 static int snd_cmi8328_mixer(struct snd_wss *chip)
 144 {
 145         struct snd_card *card;
 146         struct snd_ctl_elem_id id1, id2;
 147         int err;
 148
 149         card = chip->card;
 150
 151         memset(&id1, 0, sizeof(id1));
 152         memset(&id2, 0, sizeof(id2));
 153         id1.iface = id2.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
 154         /* rename AUX0 switch to CD */
 155         strcpy(id1.name, "Aux Playback Switch");
 156         strcpy(id2.name, "CD Playback Switch");
 157         err = snd_ctl_rename_id(card, &id1, &id2);
 158         if (err < 0) {
 159                 snd_printk(KERN_ERR "error renaming control\n");
 160                 return err;
 161         }
 162         /* rename AUX0 volume to CD */
 163         strcpy(id1.name, "Aux Playback Volume");
 164         strcpy(id2.name, "CD Playback Volume");
 165         err = snd_ctl_rename_id(card, &id1, &id2);
 166         if (err < 0) {
 167                 snd_printk(KERN_ERR "error renaming control\n");
 168                 return err;
 169         }
 170         /* rename AUX1 switch to Synth */
 171         strcpy(id1.name, "Aux Playback Switch");
 172         id1.index = 1;
 173         strcpy(id2.name, "Synth Playback Switch");
 174         err = snd_ctl_rename_id(card, &id1, &id2);
 175         if (err < 0) {
 176                 snd_printk(KERN_ERR "error renaming control\n");
 177                 return err;
 178         }
 179         /* rename AUX1 volume to Synth */
 180         strcpy(id1.name, "Aux Playback Volume");
 181         id1.index = 1;
 182         strcpy(id2.name, "Synth Playback Volume");
 183         err = snd_ctl_rename_id(card, &id1, &id2);
 184         if (err < 0) {
 185                 snd_printk(KERN_ERR "error renaming control\n");
 186                 return err;
 187         }
 188
 189         return 0;
 190 }
 191
 192 /* find index of an item in "-1"-ended array */
 193 int array_find(int array[], int item)
 194 {
 195         int i;
 196
 197         for (i = 0; array[i] != -1; i++)
 198                 if (array[i] == item)
 199                         return i;
 200
 201         return -1;
 202 }
 203 /* the same for long */
 204 int array_find_l(long array[], long item)
 205 {
 206         int i;
 207
 208         for (i = 0; array[i] != -1; i++)
 209                 if (array[i] == item)
 210                         return i;
 211
 212         return -1;
 213 }
 214
 215 static int snd_cmi8328_probe(struct device *pdev, unsigned int ndev)
 216 {
 217         struct snd_card *card;
 218         struct snd_opl3 *opl3;
 219         struct snd_cmi8328 *cmi;
 220 #ifdef SUPPORT_JOYSTICK
 221         struct resource *res;
 222 #endif
 223         int err, pos;
 224         static long mpu_ports[] = { 0x330, 0x300, 0x310, 0x320, 0x332, 0x334,
 225                                    0x336, -1 };
 226         static u8 mpu_port_bits[] = { 3, 0, 1, 2, 4, 5, 6 };
 227         static int mpu_irqs[] = { 9, 7, 5, 3, -1 };
 228         static u8 mpu_irq_bits[] = { 3, 2, 1, 0 };
 229         static int irqs[] = { 9, 10, 11, 7, -1 };
 230         static u8 irq_bits[] = { 2, 3, 4, 1 };
 231         static int dma1s[] = { 3, 1, 0, -1 };
 232         static u8 dma_bits[] = { 3, 2, 1 };
 233         static int dma2s[][2] = { {1, -1}, {0, -1}, {-1, -1}, {0, -1} };
 234         u16 port = cmi8328_ports[ndev];
 235         u8 val;
 236
 237         /* 0xff is invalid configuration (but settable - hope it isn't set) */
 238         if (snd_cmi8328_cfg_read(port, CFG1) == 0xff)
 239                 return -ENODEV;
 240         /* the SB disable bit must NEVER EVER be cleared or the WSS dies */
 241         snd_cmi8328_cfg_write(port, CFG1, CFG1_SB_DISABLE);
 242         if (snd_cmi8328_cfg_read(port, CFG1) != CFG1_SB_DISABLE)
 243                 return -ENODEV;
 244         /* disable everything first */
 245         snd_cmi8328_cfg_write(port, CFG2, 0);   /* disable CDROM and MPU401 */
 246         snd_cmi8328_cfg_write(port, CFG3, 0);   /* disable CDROM IRQ and DMA */
 247
 248         if (irq[ndev] == SNDRV_AUTO_IRQ) {
 249                 irq[ndev] = snd_legacy_find_free_irq(irqs);
 250                 if (irq[ndev] < 0) {
 251                         snd_printk(KERN_ERR "unable to find a free IRQ\n");
 252                         return -EBUSY;
 253                 }
 254         }
 255         if (dma1[ndev] == SNDRV_AUTO_DMA) {
 256                 dma1[ndev] = snd_legacy_find_free_dma(dma1s);
 257                 if (dma1[ndev] < 0) {
 258                         snd_printk(KERN_ERR "unable to find a free DMA1\n");
 259                         return -EBUSY;
 260                 }
 261         }
 262         if (dma2[ndev] == SNDRV_AUTO_DMA) {
 263                 dma2[ndev] = snd_legacy_find_free_dma(dma2s[dma1[ndev] % 4]);
 264                 if (dma2[ndev] < 0) {
 265                         snd_printk(KERN_WARNING "unable to find a free DMA2, full-duplex will not work\n");
 266                         dma2[ndev] = -1;
 267                 }
 268         }
 269         /* configure WSS IRQ... */
 270         pos = array_find(irqs, irq[ndev]);
 271         if (pos < 0) {
 272                 snd_printk(KERN_ERR "invalid IRQ %d\n", irq[ndev]);
 273                 return -EINVAL;
 274         }
 275         val = irq_bits[pos] << 3;
 276         /* ...and DMA... */
 277         pos = array_find(dma1s, dma1[ndev]);
 278         if (pos < 0) {
 279                 snd_printk(KERN_ERR "invalid DMA1 %d\n", dma1[ndev]);
 280                 return -EINVAL;
 281         }
 282         val |= dma_bits[pos];
 283         /* ...and DMA2 */
 284         if (dma2[ndev] >= 0 && dma1[ndev] != dma2[ndev]) {
 285                 pos = array_find(dma2s[dma1[ndev]], dma2[ndev]);
 286                 if (pos < 0) {
 287                         snd_printk(KERN_ERR "invalid DMA2 %d\n", dma2[ndev]);
 288                         return -EINVAL;
 289                 }
 290                 val |= 0x04; /* enable separate capture DMA */
 291         }
 292         outb(val, port);
 293
 294         err = snd_card_create(index[ndev], id[ndev], THIS_MODULE,
 295                                 sizeof(struct snd_cmi8328), &card);
 296         if (err < 0)
 297                 return err;
 298         cmi = card->private_data;
 299         cmi->card = card;
 300         cmi->port = port;
 301         cmi->wss_cfg = val;
 302         snd_card_set_dev(card, pdev);
 303
 304         err = snd_wss_create(card, port + 4, -1, irq[ndev], dma1[ndev],
 305                         dma2[ndev], WSS_HW_DETECT, 0, &cmi->wss);
 306         if (err < 0)
 307                 goto error;
 308
 309         err = snd_wss_pcm(cmi->wss, 0, NULL);
 310         if (err < 0)
 311                 goto error;
 312
 313         err = snd_wss_mixer(cmi->wss);
 314         if (err < 0)
 315                 goto error;
 316         err = snd_cmi8328_mixer(cmi->wss);
 317         if (err < 0)
 318                 goto error;
 319
 320         if (snd_wss_timer(cmi->wss, 0, NULL) < 0)
 321                 snd_printk(KERN_WARNING "error initializing WSS timer\n");
 322
 323         if (mpuport[ndev] == SNDRV_AUTO_PORT) {
 324                 mpuport[ndev] = snd_legacy_find_free_ioport(mpu_ports, 2);
 325                 if (mpuport[ndev] < 0)
 326                         snd_printk(KERN_ERR "unable to find a free MPU401 port\n");
 327         }
 328         if (mpuirq[ndev] == SNDRV_AUTO_IRQ) {
 329                 mpuirq[ndev] = snd_legacy_find_free_irq(mpu_irqs);
 330                 if (mpuirq[ndev] < 0)
 331                         snd_printk(KERN_ERR "unable to find a free MPU401 IRQ\n");
 332         }
 333         /* enable and configure MPU401 */
 334         if (mpuport[ndev] > 0 && mpuirq[ndev] > 0) {
 335                 val = CFG2_MPU_ENABLE;
 336                 pos = array_find_l(mpu_ports, mpuport[ndev]);
 337                 if (pos < 0)
 338                         snd_printk(KERN_WARNING "invalid MPU401 port 0x%lx\n",
 339                                                                 mpuport[ndev]);
 340                 else {
 341                         val |= mpu_port_bits[pos] << 5;
 342                         pos = array_find(mpu_irqs, mpuirq[ndev]);
 343                         if (pos < 0)
 344                                 snd_printk(KERN_WARNING "invalid MPU401 IRQ %d\n",
 345                                                                 mpuirq[ndev]);
 346                         else {
 347                                 val |= mpu_irq_bits[pos] << 3;
 348                                 snd_cmi8328_cfg_write(port, CFG2, val);
 349                                 if (snd_mpu401_uart_new(card, 0,
 350                                                 MPU401_HW_MPU401, mpuport[ndev],
 351                                                 0, mpuirq[ndev], NULL) < 0)
 352                                         snd_printk(KERN_ERR "error initializing MPU401\n");
 353                         }
 354                 }
 355         }
 356         /* OPL3 is hardwired to 0x388 and cannot be disabled */
 357         if (snd_opl3_create(card, 0x388, 0x38a, OPL3_HW_AUTO, 0, &opl3) < 0)
 358                 snd_printk(KERN_ERR "error initializing OPL3\n");
 359         else
 360                 if (snd_opl3_hwdep_new(opl3, 0, 1, NULL) < 0)
 361                         snd_printk(KERN_WARNING "error initializing OPL3 hwdep\n");
 362
 363         strcpy(card->driver, "CMI8328");
 364         strcpy(card->shortname, "C-Media CMI8328");
 365         sprintf(card->longname, "%s at 0x%lx, irq %d, dma %d,%d",
 366                 card->shortname, cmi->wss->port, irq[ndev], dma1[ndev],
 367                 (dma2[ndev] >= 0) ? dma2[ndev] : dma1[ndev]);
 368
 369         dev_set_drvdata(pdev, card);
 370         err = snd_card_register(card);
 371         if (err < 0)
 372                 goto error;
 373 #ifdef SUPPORT_JOYSTICK
 374         if (!gameport[ndev])
 375                 return 0;
 376         /* gameport is hardwired to 0x200 */
 377         res = request_region(0x200, 8, "CMI8328 gameport");
 378         if (!res)
 379                 snd_printk(KERN_WARNING "unable to allocate gameport I/O port\n");
 380         else {
 381                 struct gameport *gp = cmi->gameport = gameport_allocate_port();
 382                 if (!cmi->gameport)
 383                         release_and_free_resource(res);
 384                 else {
 385                         gameport_set_name(gp, "CMI8328 Gameport");
 386                         gameport_set_phys(gp, "%s/gameport0", dev_name(pdev));
 387                         gameport_set_dev_parent(gp, pdev);
 388                         gp->io = 0x200;
 389                         gameport_set_port_data(gp, res);
 390                         /* Enable gameport */
 391                         snd_cmi8328_cfg_write(port, CFG1,
 392                                         CFG1_SB_DISABLE | CFG1_GAMEPORT);
 393                         gameport_register_port(gp);
 394                 }
 395         }
 396 #endif
 397         return 0;
 398 error:
 399         snd_card_free(card);
 400
 401         return err;
 402 }
 403
 404 static int snd_cmi8328_remove(struct device *pdev, unsigned int dev)
 405 {
 406         struct snd_card *card = dev_get_drvdata(pdev);
 407         struct snd_cmi8328 *cmi = card->private_data;
 408
 409 #ifdef SUPPORT_JOYSTICK
 410         if (cmi->gameport) {
 411                 struct resource *res = gameport_get_port_data(cmi->gameport);
 412                 gameport_unregister_port(cmi->gameport);
 413                 release_and_free_resource(res);
 414         }
 415 #endif
 416         /* disable everything */
 417         snd_cmi8328_cfg_write(cmi->port, CFG1, CFG1_SB_DISABLE);
 418         snd_cmi8328_cfg_write(cmi->port, CFG2, 0);
 419         snd_cmi8328_cfg_write(cmi->port, CFG3, 0);
 420         snd_card_free(card);
 421         dev_set_drvdata(pdev, NULL);
 422         return 0;
 423 }
 424
 425 #ifdef CONFIG_PM
 426 static int snd_cmi8328_suspend(struct device *pdev, unsigned int n,
 427                                 pm_message_t state)
 428 {
 429         struct snd_card *card = dev_get_drvdata(pdev);
 430         struct snd_cmi8328 *cmi;
 431
 432         if (!card)      /* ignore absent devices */
 433                 return 0;
 434         cmi = card->private_data;
 435         snd_cmi8328_cfg_save(cmi->port, cmi->cfg);
 436         snd_power_change_state(card, SNDRV_CTL_POWER_D3hot);
 437         snd_pcm_suspend_all(cmi->wss->pcm);
 438         cmi->wss->suspend(cmi->wss);
 439
 440         return 0;
 441 }
 442
 443 static int snd_cmi8328_resume(struct device *pdev, unsigned int n)
 444 {
 445         struct snd_card *card = dev_get_drvdata(pdev);
 446         struct snd_cmi8328 *cmi;
 447
 448         if (!card)      /* ignore absent devices */
 449                 return 0;
 450         cmi = card->private_data;
 451         snd_cmi8328_cfg_restore(cmi->port, cmi->cfg);
 452         outb(cmi->wss_cfg, cmi->port);
 453         cmi->wss->resume(cmi->wss);
 454         snd_power_change_state(card, SNDRV_CTL_POWER_D0);
 455
 456         return 0;
 457 }
 458 #endif
 459
 460 static struct isa_driver snd_cmi8328_driver = {
 461         .probe          = snd_cmi8328_probe,
 462         .remove         = snd_cmi8328_remove,
 463 #ifdef CONFIG_PM
 464         .suspend        = snd_cmi8328_suspend,
 465         .resume         = snd_cmi8328_resume,
 466 #endif
 467         .driver         = {
 468                 .name   = "cmi8328"
 469         },
 470 };
 471
 472 static int __init alsa_card_cmi8328_init(void)
 473 {
 474         return isa_register_driver(&snd_cmi8328_driver, CMI8328_MAX);
 475 }
 476
 477 static void __exit alsa_card_cmi8328_exit(void)
 478 {
 479         isa_unregister_driver(&snd_cmi8328_driver);
 480 }
 481
 482 module_init(alsa_card_cmi8328_init)
 483 module_exit(alsa_card_cmi8328_exit)