1 // SPDX-License-Identifier: GPL-2.0-or-later 2 /* 3 * Driver for AMD InterWave soundcard 4 * Copyright (c) by Jaroslav Kysela <perex@perex.cz> 5 * 6 * 1999/07/22 Erik Inge Bolso <knan@mo.himolde.no> 7 * * mixer group handlers 8 */ 9 10 #include <linux/init.h> 11 #include <linux/err.h> 12 #include <linux/isa.h> 13 #include <linux/delay.h> 14 #include <linux/pnp.h> 15 #include <linux/module.h> 16 #include <asm/dma.h> 17 #include <sound/core.h> 18 #include <sound/gus.h> 19 #include <sound/wss.h> 20 #ifdef SNDRV_STB 21 #include <sound/tea6330t.h> 22 #endif 23 #define SNDRV_LEGACY_FIND_FREE_IRQ 24 #define SNDRV_LEGACY_FIND_FREE_DMA 25 #include <sound/initval.h> 26 27 MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>"); 28 MODULE_LICENSE("GPL"); 29 #ifndef SNDRV_STB 30 MODULE_DESCRIPTION("AMD InterWave"); 31 #else 32 MODULE_DESCRIPTION("AMD InterWave STB with TEA6330T"); 33 #endif 34 35 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; /* Index 0-MAX */ 36 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; /* ID for this card */ 37 static bool enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_ISAPNP; /* Enable this card */ 38 #ifdef CONFIG_PNP 39 static bool isapnp[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 1}; 40 #endif 41 static long port[SNDRV_CARDS] = SNDRV_DEFAULT_PORT; /* 0x210,0x220,0x230,0x240,0x250,0x260 */ 42 #ifdef SNDRV_STB 43 static long port_tc[SNDRV_CARDS] = SNDRV_DEFAULT_PORT; /* 0x350,0x360,0x370,0x380 */ 44 #endif 45 static int irq[SNDRV_CARDS] = SNDRV_DEFAULT_IRQ; /* 2,3,5,9,11,12,15 */ 46 static int dma1[SNDRV_CARDS] = SNDRV_DEFAULT_DMA; /* 0,1,3,5,6,7 */ 47 static int dma2[SNDRV_CARDS] = SNDRV_DEFAULT_DMA; /* 0,1,3,5,6,7 */ 48 static int joystick_dac[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 29}; 49 /* 0 to 31, (0.59V-4.52V or 0.389V-2.98V) */ 50 static int midi[SNDRV_CARDS]; 51 static int pcm_channels[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2}; 52 static int effect[SNDRV_CARDS]; 53 54 #ifdef SNDRV_STB 55 #define INTERWAVE_DRIVER "snd_interwave_stb" 56 #define INTERWAVE_PNP_DRIVER "interwave-stb" 57 #else 58 #define INTERWAVE_DRIVER "snd_interwave" 59 #define INTERWAVE_PNP_DRIVER "interwave" 60 #endif 61 62 module_param_array(index, int, NULL, 0444); 63 MODULE_PARM_DESC(index, "Index value for InterWave soundcard."); 64 module_param_array(id, charp, NULL, 0444); 65 MODULE_PARM_DESC(id, "ID string for InterWave soundcard."); 66 module_param_array(enable, bool, NULL, 0444); 67 MODULE_PARM_DESC(enable, "Enable InterWave soundcard."); 68 #ifdef CONFIG_PNP 69 module_param_array(isapnp, bool, NULL, 0444); 70 MODULE_PARM_DESC(isapnp, "ISA PnP detection for specified soundcard."); 71 #endif 72 module_param_hw_array(port, long, ioport, NULL, 0444); 73 MODULE_PARM_DESC(port, "Port # for InterWave driver."); 74 #ifdef SNDRV_STB 75 module_param_hw_array(port_tc, long, ioport, NULL, 0444); 76 MODULE_PARM_DESC(port_tc, "Tone control (TEA6330T - i2c bus) port # for InterWave driver."); 77 #endif 78 module_param_hw_array(irq, int, irq, NULL, 0444); 79 MODULE_PARM_DESC(irq, "IRQ # for InterWave driver."); 80 module_param_hw_array(dma1, int, dma, NULL, 0444); 81 MODULE_PARM_DESC(dma1, "DMA1 # for InterWave driver."); 82 module_param_hw_array(dma2, int, dma, NULL, 0444); 83 MODULE_PARM_DESC(dma2, "DMA2 # for InterWave driver."); 84 module_param_array(joystick_dac, int, NULL, 0444); 85 MODULE_PARM_DESC(joystick_dac, "Joystick DAC level 0.59V-4.52V or 0.389V-2.98V for InterWave driver."); 86 module_param_array(midi, int, NULL, 0444); 87 MODULE_PARM_DESC(midi, "MIDI UART enable for InterWave driver."); 88 module_param_array(pcm_channels, int, NULL, 0444); 89 MODULE_PARM_DESC(pcm_channels, "Reserved PCM channels for InterWave driver."); 90 module_param_array(effect, int, NULL, 0444); 91 MODULE_PARM_DESC(effect, "Effects enable for InterWave driver."); 92 93 struct snd_interwave { 94 int irq; 95 struct snd_card *card; 96 struct snd_gus_card *gus; 97 struct snd_wss *wss; 98 #ifdef SNDRV_STB 99 struct snd_i2c_bus *i2c_bus; 100 struct resource *i2c_res; 101 #endif 102 unsigned short gus_status_reg; 103 unsigned short pcm_status_reg; 104 #ifdef CONFIG_PNP 105 struct pnp_dev *dev; 106 #ifdef SNDRV_STB 107 struct pnp_dev *devtc; 108 #endif 109 #endif 110 }; 111 112 113 #ifdef CONFIG_PNP 114 static int isa_registered; 115 static int pnp_registered; 116 117 static const struct pnp_card_device_id snd_interwave_pnpids[] = { 118 #ifndef SNDRV_STB 119 /* Gravis UltraSound Plug & Play */ 120 { .id = "GRV0001", .devs = { { .id = "GRV0000" } } }, 121 /* STB SoundRage32 */ 122 { .id = "STB011a", .devs = { { .id = "STB0010" } } }, 123 /* MED3210 */ 124 { .id = "DXP3201", .devs = { { .id = "DXP0010" } } }, 125 /* Dynasonic Pro */ 126 /* This device also have CDC1117:DynaSonix Pro Audio Effects Processor */ 127 { .id = "CDC1111", .devs = { { .id = "CDC1112" } } }, 128 /* Panasonic PCA761AW Audio Card */ 129 { .id = "ADV55ff", .devs = { { .id = "ADV0010" } } }, 130 /* InterWave STB without TEA6330T */ 131 { .id = "ADV550a", .devs = { { .id = "ADV0010" } } }, 132 #else 133 /* InterWave STB with TEA6330T */ 134 { .id = "ADV550a", .devs = { { .id = "ADV0010" }, { .id = "ADV0015" } } }, 135 #endif 136 { .id = "" } 137 }; 138 139 MODULE_DEVICE_TABLE(pnp_card, snd_interwave_pnpids); 140 141 #endif /* CONFIG_PNP */ 142 143 144 #ifdef SNDRV_STB 145 static void snd_interwave_i2c_setlines(struct snd_i2c_bus *bus, int ctrl, int data) 146 { 147 unsigned long port = bus->private_value; 148 149 #if 0 150 dev_dbg(bus->card->dev, "i2c_setlines - 0x%lx <- %i,%i\n", port, ctrl, data); 151 #endif 152 outb((data << 1) | ctrl, port); 153 udelay(10); 154 } 155 156 static int snd_interwave_i2c_getclockline(struct snd_i2c_bus *bus) 157 { 158 unsigned long port = bus->private_value; 159 unsigned char res; 160 161 res = inb(port) & 1; 162 #if 0 163 dev_dbg(bus->card->dev, "i2c_getclockline - 0x%lx -> %i\n", port, res); 164 #endif 165 return res; 166 } 167 168 static int snd_interwave_i2c_getdataline(struct snd_i2c_bus *bus, int ack) 169 { 170 unsigned long port = bus->private_value; 171 unsigned char res; 172 173 if (ack) 174 udelay(10); 175 res = (inb(port) & 2) >> 1; 176 #if 0 177 dev_dbg(bus->card->dev, "i2c_getdataline - 0x%lx -> %i\n", port, res); 178 #endif 179 return res; 180 } 181 182 static struct snd_i2c_bit_ops snd_interwave_i2c_bit_ops = { 183 .setlines = snd_interwave_i2c_setlines, 184 .getclock = snd_interwave_i2c_getclockline, 185 .getdata = snd_interwave_i2c_getdataline, 186 }; 187 188 static int snd_interwave_detect_stb(struct snd_interwave *iwcard, 189 struct snd_gus_card *gus, int dev, 190 struct snd_i2c_bus **rbus) 191 { 192 unsigned long port; 193 struct snd_i2c_bus *bus; 194 struct snd_card *card = iwcard->card; 195 char name[32]; 196 int err; 197 198 *rbus = NULL; 199 port = port_tc[dev]; 200 if (port == SNDRV_AUTO_PORT) { 201 port = 0x350; 202 if (gus->gf1.port == 0x250) { 203 port = 0x360; 204 } 205 while (port <= 0x380) { 206 iwcard->i2c_res = devm_request_region(card->dev, port, 1, 207 "InterWave (I2C bus)"); 208 if (iwcard->i2c_res) 209 break; 210 port += 0x10; 211 } 212 } else { 213 iwcard->i2c_res = devm_request_region(card->dev, port, 1, 214 "InterWave (I2C bus)"); 215 } 216 if (iwcard->i2c_res == NULL) { 217 dev_err(card->dev, "interwave: can't grab i2c bus port\n"); 218 return -ENODEV; 219 } 220 221 sprintf(name, "InterWave-%i", card->number); 222 err = snd_i2c_bus_create(card, name, NULL, &bus); 223 if (err < 0) 224 return err; 225 bus->private_value = port; 226 bus->hw_ops.bit = &snd_interwave_i2c_bit_ops; 227 err = snd_tea6330t_detect(bus, 0); 228 if (err < 0) 229 return err; 230 *rbus = bus; 231 return 0; 232 } 233 #endif 234 235 static int snd_interwave_detect(struct snd_interwave *iwcard, 236 struct snd_gus_card *gus, 237 int dev 238 #ifdef SNDRV_STB 239 , struct snd_i2c_bus **rbus 240 #endif 241 ) 242 { 243 unsigned char rev1, rev2; 244 int d; 245 246 snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 0); /* reset GF1 */ 247 d = snd_gf1_i_look8(gus, SNDRV_GF1_GB_RESET); 248 if ((d & 0x07) != 0) { 249 dev_dbg(gus->card->dev, "[0x%lx] check 1 failed - 0x%x\n", gus->gf1.port, d); 250 return -ENODEV; 251 } 252 udelay(160); 253 snd_gf1_i_write8(gus, SNDRV_GF1_GB_RESET, 1); /* release reset */ 254 udelay(160); 255 d = snd_gf1_i_look8(gus, SNDRV_GF1_GB_RESET); 256 if ((d & 0x07) != 1) { 257 dev_dbg(gus->card->dev, "[0x%lx] check 2 failed - 0x%x\n", gus->gf1.port, d); 258 return -ENODEV; 259 } 260 scoped_guard(spinlock_irqsave, &gus->reg_lock) { 261 rev1 = snd_gf1_look8(gus, SNDRV_GF1_GB_VERSION_NUMBER); 262 snd_gf1_write8(gus, SNDRV_GF1_GB_VERSION_NUMBER, ~rev1); 263 rev2 = snd_gf1_look8(gus, SNDRV_GF1_GB_VERSION_NUMBER); 264 snd_gf1_write8(gus, SNDRV_GF1_GB_VERSION_NUMBER, rev1); 265 } 266 dev_dbg(gus->card->dev, 267 "[0x%lx] InterWave check - rev1=0x%x, rev2=0x%x\n", 268 gus->gf1.port, rev1, rev2); 269 if ((rev1 & 0xf0) == (rev2 & 0xf0) && 270 (rev1 & 0x0f) != (rev2 & 0x0f)) { 271 dev_dbg(gus->card->dev, 272 "[0x%lx] InterWave check - passed\n", gus->gf1.port); 273 gus->interwave = 1; 274 strscpy(gus->card->shortname, "AMD InterWave"); 275 gus->revision = rev1 >> 4; 276 #ifndef SNDRV_STB 277 return 0; /* ok.. We have an InterWave board */ 278 #else 279 return snd_interwave_detect_stb(iwcard, gus, dev, rbus); 280 #endif 281 } 282 dev_dbg(gus->card->dev, "[0x%lx] InterWave check - failed\n", gus->gf1.port); 283 return -ENODEV; 284 } 285 286 static irqreturn_t snd_interwave_interrupt(int irq, void *dev_id) 287 { 288 struct snd_interwave *iwcard = dev_id; 289 int loop, max = 5; 290 int handled = 0; 291 292 do { 293 loop = 0; 294 if (inb(iwcard->gus_status_reg)) { 295 handled = 1; 296 snd_gus_interrupt(irq, iwcard->gus); 297 loop++; 298 } 299 if (inb(iwcard->pcm_status_reg) & 0x01) { /* IRQ bit is set? */ 300 handled = 1; 301 snd_wss_interrupt(irq, iwcard->wss); 302 loop++; 303 } 304 } while (loop && --max > 0); 305 return IRQ_RETVAL(handled); 306 } 307 308 static void snd_interwave_reset(struct snd_gus_card *gus) 309 { 310 snd_gf1_write8(gus, SNDRV_GF1_GB_RESET, 0x00); 311 udelay(160); 312 snd_gf1_write8(gus, SNDRV_GF1_GB_RESET, 0x01); 313 udelay(160); 314 } 315 316 static void snd_interwave_bank_sizes(struct snd_gus_card *gus, int *sizes) 317 { 318 unsigned int idx; 319 unsigned int local; 320 unsigned char d; 321 322 for (idx = 0; idx < 4; idx++) { 323 sizes[idx] = 0; 324 d = 0x55; 325 for (local = idx << 22; 326 local < (idx << 22) + 0x400000; 327 local += 0x40000, d++) { 328 snd_gf1_poke(gus, local, d); 329 snd_gf1_poke(gus, local + 1, d + 1); 330 #if 0 331 dev_dbg(gus->card->dev, "d = 0x%x, local = 0x%x, " 332 "local + 1 = 0x%x, idx << 22 = 0x%x\n", 333 d, 334 snd_gf1_peek(gus, local), 335 snd_gf1_peek(gus, local + 1), 336 snd_gf1_peek(gus, idx << 22)); 337 #endif 338 if (snd_gf1_peek(gus, local) != d || 339 snd_gf1_peek(gus, local + 1) != d + 1 || 340 snd_gf1_peek(gus, idx << 22) != 0x55) 341 break; 342 sizes[idx]++; 343 } 344 } 345 #if 0 346 dev_dbg(gus->card->dev, "sizes: %i %i %i %i\n", 347 sizes[0], sizes[1], sizes[2], sizes[3]); 348 #endif 349 } 350 351 struct rom_hdr { 352 /* 000 */ unsigned char iwave[8]; 353 /* 008 */ unsigned char rom_hdr_revision; 354 /* 009 */ unsigned char series_number; 355 /* 010 */ unsigned char series_name[16]; 356 /* 026 */ unsigned char date[10]; 357 /* 036 */ unsigned short vendor_revision_major; 358 /* 038 */ unsigned short vendor_revision_minor; 359 /* 040 */ unsigned int rom_size; 360 /* 044 */ unsigned char copyright[128]; 361 /* 172 */ unsigned char vendor_name[64]; 362 /* 236 */ unsigned char rom_description[128]; 363 /* 364 */ unsigned char pad[147]; 364 /* 511 */ unsigned char csum; 365 }; 366 367 static const unsigned int snd_interwave_memory_configs[] = { 368 0x00000001, 0x00000101, 0x01010101, 0x00000401, 369 0x04040401, 0x00040101, 0x04040101, 0x00000004, 370 0x00000404, 0x04040404, 0x00000010, 0x00001010, 371 0x10101010 372 }; 373 374 static int snd_interwave_find_memory_config(unsigned int lmct) 375 { 376 unsigned int i; 377 378 for (i = 0; i < ARRAY_SIZE(snd_interwave_memory_configs); i++) { 379 if (lmct == snd_interwave_memory_configs[i]) 380 return i; 381 } 382 383 return -EINVAL; 384 } 385 386 static void snd_interwave_detect_memory(struct snd_gus_card *gus) 387 { 388 int bank_pos, pages; 389 unsigned int i, lmct; 390 int lmc_cfg; 391 int psizes[4]; 392 unsigned char iwave[8]; 393 unsigned char csum; 394 395 snd_interwave_reset(gus); 396 snd_gf1_write8(gus, SNDRV_GF1_GB_GLOBAL_MODE, snd_gf1_read8(gus, SNDRV_GF1_GB_GLOBAL_MODE) | 0x01); /* enhanced mode */ 397 snd_gf1_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x01); /* DRAM I/O cycles selected */ 398 snd_gf1_write16(gus, SNDRV_GF1_GW_MEMORY_CONFIG, (snd_gf1_look16(gus, SNDRV_GF1_GW_MEMORY_CONFIG) & 0xff10) | 0x004c); 399 /* ok.. simple test of memory size */ 400 pages = 0; 401 snd_gf1_poke(gus, 0, 0x55); 402 snd_gf1_poke(gus, 1, 0xaa); 403 #if 1 404 if (snd_gf1_peek(gus, 0) == 0x55 && snd_gf1_peek(gus, 1) == 0xaa) 405 #else 406 if (0) /* ok.. for testing of 0k RAM */ 407 #endif 408 { 409 snd_interwave_bank_sizes(gus, psizes); 410 lmct = (psizes[3] << 24) | (psizes[2] << 16) | 411 (psizes[1] << 8) | psizes[0]; 412 #if 0 413 dev_dbg(gus->card->dev, "lmct = 0x%08x\n", lmct); 414 #endif 415 lmc_cfg = snd_interwave_find_memory_config(lmct); 416 if (lmc_cfg >= 0) { 417 #if 0 418 dev_dbg(gus->card->dev, "found !!! %i\n", lmc_cfg); 419 #endif 420 snd_gf1_write16(gus, SNDRV_GF1_GW_MEMORY_CONFIG, 421 (snd_gf1_look16(gus, SNDRV_GF1_GW_MEMORY_CONFIG) & 0xfff0) | 422 lmc_cfg); 423 snd_interwave_bank_sizes(gus, psizes); 424 } else if (!gus->gf1.enh_mode) { 425 snd_gf1_write16(gus, SNDRV_GF1_GW_MEMORY_CONFIG, 426 (snd_gf1_look16(gus, SNDRV_GF1_GW_MEMORY_CONFIG) & 0xfff0) | 427 2); 428 } 429 for (i = 0; i < 4; i++) { 430 gus->gf1.mem_alloc.banks_8[i].address = 431 gus->gf1.mem_alloc.banks_16[i].address = i << 22; 432 gus->gf1.mem_alloc.banks_8[i].size = 433 gus->gf1.mem_alloc.banks_16[i].size = psizes[i] << 18; 434 pages += psizes[i]; 435 } 436 } 437 pages <<= 18; 438 gus->gf1.memory = pages; 439 440 snd_gf1_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x03); /* select ROM */ 441 snd_gf1_write16(gus, SNDRV_GF1_GW_MEMORY_CONFIG, (snd_gf1_look16(gus, SNDRV_GF1_GW_MEMORY_CONFIG) & 0xff1f) | (4 << 5)); 442 gus->gf1.rom_banks = 0; 443 gus->gf1.rom_memory = 0; 444 for (bank_pos = 0; bank_pos < 16L * 1024L * 1024L; bank_pos += 4L * 1024L * 1024L) { 445 for (i = 0; i < 8; ++i) 446 iwave[i] = snd_gf1_peek(gus, bank_pos + i); 447 if (strncmp(iwave, "INTRWAVE", 8)) 448 continue; /* first check */ 449 csum = 0; 450 for (i = 0; i < sizeof(struct rom_hdr); i++) 451 csum += snd_gf1_peek(gus, bank_pos + i); 452 if (csum != 0) 453 continue; /* not valid rom */ 454 gus->gf1.rom_banks++; 455 gus->gf1.rom_present |= 1 << (bank_pos >> 22); 456 gus->gf1.rom_memory = snd_gf1_peek(gus, bank_pos + 40) | 457 (snd_gf1_peek(gus, bank_pos + 41) << 8) | 458 (snd_gf1_peek(gus, bank_pos + 42) << 16) | 459 (snd_gf1_peek(gus, bank_pos + 43) << 24); 460 } 461 #if 0 462 if (gus->gf1.rom_memory > 0) { 463 if (gus->gf1.rom_banks == 1 && gus->gf1.rom_present == 8) 464 gus->card->type = SNDRV_CARD_TYPE_IW_DYNASONIC; 465 } 466 #endif 467 snd_gf1_write8(gus, SNDRV_GF1_GB_MEMORY_CONTROL, 0x00); /* select RAM */ 468 469 if (!gus->gf1.enh_mode) 470 snd_interwave_reset(gus); 471 } 472 473 static void __snd_interwave_restore_regs(struct snd_gus_card *gus) 474 { 475 snd_gf1_write8(gus, SNDRV_GF1_GB_COMPATIBILITY, 0x1f); 476 snd_gf1_write8(gus, SNDRV_GF1_GB_DECODE_CONTROL, 0x49); 477 snd_gf1_write8(gus, SNDRV_GF1_GB_VERSION_NUMBER, 0x11); 478 snd_gf1_write8(gus, SNDRV_GF1_GB_MPU401_CONTROL_A, 0x00); 479 snd_gf1_write8(gus, SNDRV_GF1_GB_MPU401_CONTROL_B, 0x30); 480 snd_gf1_write8(gus, SNDRV_GF1_GB_EMULATION_IRQ, 0x00); 481 } 482 483 static void snd_interwave_init(int dev, struct snd_gus_card *gus) 484 { 485 /* Probe-time setup also clears the timer control register. */ 486 scoped_guard(spinlock_irqsave, &gus->reg_lock) { 487 snd_gf1_write8(gus, SNDRV_GF1_GB_SOUND_BLASTER_CONTROL, 0x00); 488 __snd_interwave_restore_regs(gus); 489 } 490 gus->equal_irq = 1; 491 gus->codec_flag = 1; 492 gus->interwave = 1; 493 gus->max_flag = 1; 494 gus->joystick_dac = joystick_dac[dev]; 495 } 496 497 static const struct snd_kcontrol_new snd_interwave_controls[] = { 498 WSS_DOUBLE("Master Playback Switch", 0, 499 CS4231_LINE_LEFT_OUTPUT, CS4231_LINE_RIGHT_OUTPUT, 7, 7, 1, 1), 500 WSS_DOUBLE("Master Playback Volume", 0, 501 CS4231_LINE_LEFT_OUTPUT, CS4231_LINE_RIGHT_OUTPUT, 0, 0, 31, 1), 502 WSS_DOUBLE("Mic Playback Switch", 0, 503 CS4231_LEFT_MIC_INPUT, CS4231_RIGHT_MIC_INPUT, 7, 7, 1, 1), 504 WSS_DOUBLE("Mic Playback Volume", 0, 505 CS4231_LEFT_MIC_INPUT, CS4231_RIGHT_MIC_INPUT, 0, 0, 31, 1) 506 }; 507 508 static int snd_interwave_mixer(struct snd_wss *chip) 509 { 510 struct snd_card *card = chip->card; 511 struct snd_ctl_elem_id id1, id2; 512 unsigned int idx; 513 int err; 514 515 memset(&id1, 0, sizeof(id1)); 516 memset(&id2, 0, sizeof(id2)); 517 id1.iface = id2.iface = SNDRV_CTL_ELEM_IFACE_MIXER; 518 #if 0 519 /* remove mono microphone controls */ 520 strscpy(id1.name, "Mic Playback Switch"); 521 err = snd_ctl_remove_id(card, &id1); 522 if (err < 0) 523 return err; 524 strscpy(id1.name, "Mic Playback Volume"); 525 err = snd_ctl_remove_id(card, &id1); 526 if (err < 0) 527 return err; 528 #endif 529 /* add new master and mic controls */ 530 for (idx = 0; idx < ARRAY_SIZE(snd_interwave_controls); idx++) { 531 err = snd_ctl_add(card, snd_ctl_new1(&snd_interwave_controls[idx], chip)); 532 if (err < 0) 533 return err; 534 } 535 snd_wss_out(chip, CS4231_LINE_LEFT_OUTPUT, 0x9f); 536 snd_wss_out(chip, CS4231_LINE_RIGHT_OUTPUT, 0x9f); 537 snd_wss_out(chip, CS4231_LEFT_MIC_INPUT, 0x9f); 538 snd_wss_out(chip, CS4231_RIGHT_MIC_INPUT, 0x9f); 539 /* reassign AUXA to SYNTHESIZER */ 540 strscpy(id1.name, "Aux Playback Switch"); 541 strscpy(id2.name, "Synth Playback Switch"); 542 err = snd_ctl_rename_id(card, &id1, &id2); 543 if (err < 0) 544 return err; 545 strscpy(id1.name, "Aux Playback Volume"); 546 strscpy(id2.name, "Synth Playback Volume"); 547 err = snd_ctl_rename_id(card, &id1, &id2); 548 if (err < 0) 549 return err; 550 /* reassign AUXB to CD */ 551 strscpy(id1.name, "Aux Playback Switch"); id1.index = 1; 552 strscpy(id2.name, "CD Playback Switch"); 553 err = snd_ctl_rename_id(card, &id1, &id2); 554 if (err < 0) 555 return err; 556 strscpy(id1.name, "Aux Playback Volume"); 557 strscpy(id2.name, "CD Playback Volume"); 558 err = snd_ctl_rename_id(card, &id1, &id2); 559 if (err < 0) 560 return err; 561 return 0; 562 } 563 564 #ifdef CONFIG_PNP 565 566 static int snd_interwave_pnp(int dev, struct snd_interwave *iwcard, 567 struct pnp_card_link *card, 568 const struct pnp_card_device_id *id) 569 { 570 struct pnp_dev *pdev; 571 int err; 572 573 iwcard->dev = pnp_request_card_device(card, id->devs[0].id, NULL); 574 if (iwcard->dev == NULL) 575 return -EBUSY; 576 577 #ifdef SNDRV_STB 578 iwcard->devtc = pnp_request_card_device(card, id->devs[1].id, NULL); 579 if (iwcard->devtc == NULL) 580 return -EBUSY; 581 #endif 582 /* Synth & Codec initialization */ 583 pdev = iwcard->dev; 584 585 err = pnp_activate_dev(pdev); 586 if (err < 0) { 587 dev_err(&pdev->dev, "InterWave PnP configure failure (out of resources?)\n"); 588 return err; 589 } 590 if (pnp_port_start(pdev, 0) + 0x100 != pnp_port_start(pdev, 1) || 591 pnp_port_start(pdev, 0) + 0x10c != pnp_port_start(pdev, 2)) { 592 dev_err(&pdev->dev, "PnP configure failure (wrong ports)\n"); 593 return -ENOENT; 594 } 595 port[dev] = pnp_port_start(pdev, 0); 596 dma1[dev] = pnp_dma(pdev, 0); 597 if (dma2[dev] >= 0) 598 dma2[dev] = pnp_dma(pdev, 1); 599 irq[dev] = pnp_irq(pdev, 0); 600 dev_dbg(&pdev->dev, 601 "isapnp IW: sb port=0x%llx, gf1 port=0x%llx, codec port=0x%llx\n", 602 (unsigned long long)pnp_port_start(pdev, 0), 603 (unsigned long long)pnp_port_start(pdev, 1), 604 (unsigned long long)pnp_port_start(pdev, 2)); 605 dev_dbg(&pdev->dev, 606 "isapnp IW: dma1=%i, dma2=%i, irq=%i\n", 607 dma1[dev], dma2[dev], irq[dev]); 608 #ifdef SNDRV_STB 609 /* Tone Control initialization */ 610 pdev = iwcard->devtc; 611 612 err = pnp_activate_dev(pdev); 613 if (err < 0) { 614 dev_err(&pdev->dev, 615 "InterWave ToneControl PnP configure failure (out of resources?)\n"); 616 return err; 617 } 618 port_tc[dev] = pnp_port_start(pdev, 0); 619 dev_dbg(&pdev->dev, "isapnp IW: tone control port=0x%lx\n", port_tc[dev]); 620 #endif 621 return 0; 622 } 623 #endif /* CONFIG_PNP */ 624 625 static int snd_interwave_card_new(struct device *pdev, int dev, 626 struct snd_card **cardp) 627 { 628 struct snd_card *card; 629 struct snd_interwave *iwcard; 630 int err; 631 632 err = snd_devm_card_new(pdev, index[dev], id[dev], THIS_MODULE, 633 sizeof(struct snd_interwave), &card); 634 if (err < 0) 635 return err; 636 iwcard = card->private_data; 637 iwcard->card = card; 638 iwcard->irq = -1; 639 *cardp = card; 640 return 0; 641 } 642 643 static int snd_interwave_probe_gus(struct snd_card *card, int dev, 644 struct snd_gus_card **gusp) 645 { 646 return snd_gus_create(card, port[dev], -irq[dev], dma1[dev], dma2[dev], 647 0, 32, pcm_channels[dev], effect[dev], gusp); 648 } 649 650 static int snd_interwave_probe(struct snd_card *card, int dev, 651 struct snd_gus_card *gus) 652 { 653 int xirq, xdma1, xdma2; 654 struct snd_interwave *iwcard = card->private_data; 655 struct snd_wss *wss; 656 #ifdef SNDRV_STB 657 struct snd_i2c_bus *i2c_bus; 658 #endif 659 char *str; 660 int err; 661 662 xirq = irq[dev]; 663 xdma1 = dma1[dev]; 664 xdma2 = dma2[dev]; 665 666 err = snd_interwave_detect(iwcard, gus, dev 667 #ifdef SNDRV_STB 668 , &i2c_bus 669 #endif 670 ); 671 if (err < 0) 672 return err; 673 674 iwcard->gus_status_reg = gus->gf1.reg_irqstat; 675 iwcard->pcm_status_reg = gus->gf1.port + 0x10c + 2; 676 677 snd_interwave_init(dev, gus); 678 snd_interwave_detect_memory(gus); 679 err = snd_gus_initialize(gus); 680 if (err < 0) 681 return err; 682 683 if (devm_request_irq(card->dev, xirq, snd_interwave_interrupt, 0, 684 "InterWave", iwcard)) { 685 dev_err(card->dev, "unable to grab IRQ %d\n", xirq); 686 return -EBUSY; 687 } 688 iwcard->irq = xirq; 689 card->sync_irq = iwcard->irq; 690 691 err = snd_wss_create(card, 692 gus->gf1.port + 0x10c, -1, xirq, 693 xdma2 < 0 ? xdma1 : xdma2, xdma1, 694 WSS_HW_INTERWAVE, 695 WSS_HWSHARE_IRQ | 696 WSS_HWSHARE_DMA1 | 697 WSS_HWSHARE_DMA2, 698 &wss); 699 if (err < 0) 700 return err; 701 702 err = snd_wss_pcm(wss, 0); 703 if (err < 0) 704 return err; 705 706 sprintf(wss->pcm->name + strlen(wss->pcm->name), " rev %c", 707 gus->revision + 'A'); 708 strcat(wss->pcm->name, " (codec)"); 709 710 err = snd_wss_timer(wss, 2); 711 if (err < 0) 712 return err; 713 714 err = snd_wss_mixer(wss); 715 if (err < 0) 716 return err; 717 718 if (pcm_channels[dev] > 0) { 719 err = snd_gf1_pcm_new(gus, 1, 1); 720 if (err < 0) 721 return err; 722 } 723 err = snd_interwave_mixer(wss); 724 if (err < 0) 725 return err; 726 727 #ifdef SNDRV_STB 728 { 729 struct snd_ctl_elem_id id1, id2; 730 memset(&id1, 0, sizeof(id1)); 731 memset(&id2, 0, sizeof(id2)); 732 id1.iface = id2.iface = SNDRV_CTL_ELEM_IFACE_MIXER; 733 strscpy(id1.name, "Master Playback Switch"); 734 strscpy(id2.name, id1.name); 735 id2.index = 1; 736 err = snd_ctl_rename_id(card, &id1, &id2); 737 if (err < 0) 738 return err; 739 strscpy(id1.name, "Master Playback Volume"); 740 strscpy(id2.name, id1.name); 741 err = snd_ctl_rename_id(card, &id1, &id2); 742 if (err < 0) 743 return err; 744 err = snd_tea6330t_update_mixer(card, i2c_bus, 0, 1); 745 if (err < 0) 746 return err; 747 iwcard->i2c_bus = i2c_bus; 748 } 749 #endif 750 751 gus->uart_enable = midi[dev]; 752 err = snd_gf1_rawmidi_new(gus, 0); 753 if (err < 0) 754 return err; 755 756 #ifndef SNDRV_STB 757 str = "AMD InterWave"; 758 if (gus->gf1.rom_banks == 1 && gus->gf1.rom_present == 8) 759 str = "Dynasonic 3-D"; 760 #else 761 str = "InterWave STB"; 762 #endif 763 strscpy(card->driver, str); 764 strscpy(card->shortname, str); 765 sprintf(card->longname, "%s at 0x%lx, irq %i, dma %d", 766 str, 767 gus->gf1.port, 768 xirq, 769 xdma1); 770 if (xdma2 >= 0) 771 sprintf(card->longname + strlen(card->longname), "&%d", xdma2); 772 773 err = snd_card_register(card); 774 if (err < 0) 775 return err; 776 777 iwcard->wss = wss; 778 iwcard->gus = gus; 779 return 0; 780 } 781 782 static int snd_interwave_isa_match(struct device *pdev, 783 unsigned int dev) 784 { 785 if (!enable[dev]) 786 return 0; 787 #ifdef CONFIG_PNP 788 if (isapnp[dev]) 789 return 0; 790 #endif 791 return 1; 792 } 793 794 static int snd_interwave_isa_probe(struct device *pdev, 795 unsigned int dev) 796 { 797 struct snd_card *card; 798 struct snd_gus_card *gus; 799 int err; 800 static const int possible_irqs[] = {5, 11, 12, 9, 7, 15, 3, -1}; 801 static const int possible_dmas[] = {0, 1, 3, 5, 6, 7, -1}; 802 803 if (irq[dev] == SNDRV_AUTO_IRQ) { 804 irq[dev] = snd_legacy_find_free_irq(possible_irqs); 805 if (irq[dev] < 0) { 806 dev_err(pdev, "unable to find a free IRQ\n"); 807 return -EBUSY; 808 } 809 } 810 if (dma1[dev] == SNDRV_AUTO_DMA) { 811 dma1[dev] = snd_legacy_find_free_dma(possible_dmas); 812 if (dma1[dev] < 0) { 813 dev_err(pdev, "unable to find a free DMA1\n"); 814 return -EBUSY; 815 } 816 } 817 if (dma2[dev] == SNDRV_AUTO_DMA) { 818 dma2[dev] = snd_legacy_find_free_dma(possible_dmas); 819 if (dma2[dev] < 0) { 820 dev_err(pdev, "unable to find a free DMA2\n"); 821 return -EBUSY; 822 } 823 } 824 825 err = snd_interwave_card_new(pdev, dev, &card); 826 if (err < 0) 827 return err; 828 829 if (port[dev] != SNDRV_AUTO_PORT) 830 err = snd_interwave_probe_gus(card, dev, &gus); 831 else { 832 static const long possible_ports[] = {0x210, 0x220, 0x230, 0x240, 0x250, 0x260}; 833 int i; 834 for (i = 0; i < ARRAY_SIZE(possible_ports); i++) { 835 port[dev] = possible_ports[i]; 836 err = snd_interwave_probe_gus(card, dev, &gus); 837 if (! err) 838 return 0; 839 } 840 } 841 if (err < 0) 842 return err; 843 844 err = snd_interwave_probe(card, dev, gus); 845 if (err < 0) 846 return err; 847 848 dev_set_drvdata(pdev, card); 849 return 0; 850 } 851 852 #ifdef CONFIG_PM 853 static void snd_interwave_restore_regs(struct snd_gus_card *gus) 854 { 855 scoped_guard(spinlock_irqsave, &gus->reg_lock) 856 __snd_interwave_restore_regs(gus); 857 } 858 859 static void snd_interwave_restore_memory(struct snd_gus_card *gus) 860 { 861 unsigned short mem_cfg; 862 unsigned int lmct = 0; 863 int i, lmc_cfg; 864 865 if (!gus->gf1.memory) 866 return; 867 868 for (i = 0; i < 4; i++) 869 lmct |= (gus->gf1.mem_alloc.banks_16[i].size >> 18) << (i * 8); 870 871 lmc_cfg = snd_interwave_find_memory_config(lmct); 872 if (lmc_cfg < 0) { 873 if (!gus->gf1.enh_mode) { 874 lmc_cfg = 2; 875 } else { 876 dev_warn(gus->card->dev, 877 "cannot restore InterWave memory layout 0x%08x\n", 878 lmct); 879 return; 880 } 881 } 882 883 scoped_guard(spinlock_irqsave, &gus->reg_lock) { 884 mem_cfg = snd_gf1_look16(gus, SNDRV_GF1_GW_MEMORY_CONFIG); 885 mem_cfg = (mem_cfg & 0xfff0) | lmc_cfg; 886 mem_cfg = (mem_cfg & 0xff1f) | (4 << 5); 887 snd_gf1_write16(gus, SNDRV_GF1_GW_MEMORY_CONFIG, mem_cfg); 888 } 889 } 890 891 static int snd_interwave_card_suspend(struct snd_card *card) 892 { 893 struct snd_interwave *iwcard = card->private_data; 894 895 iwcard->wss->suspend(iwcard->wss); 896 return snd_gus_suspend(iwcard->gus); 897 } 898 899 static int snd_interwave_card_resume(struct snd_card *card) 900 { 901 struct snd_interwave *iwcard = card->private_data; 902 int err; 903 904 err = snd_gus_resume(iwcard->gus); 905 if (err < 0) 906 return err; 907 908 snd_interwave_restore_regs(iwcard->gus); 909 snd_interwave_restore_memory(iwcard->gus); 910 iwcard->wss->resume(iwcard->wss); 911 #ifdef SNDRV_STB 912 if (iwcard->i2c_bus) { 913 err = snd_tea6330t_restore_mixer(iwcard->i2c_bus); 914 if (err < 0) 915 dev_warn(card->dev, 916 "failed to restore TEA6330T mixer state: %d\n", 917 err); 918 } 919 #endif 920 921 return 0; 922 } 923 924 static int snd_interwave_isa_suspend(struct device *pdev, unsigned int dev, 925 pm_message_t state) 926 { 927 return snd_interwave_card_suspend(dev_get_drvdata(pdev)); 928 } 929 930 static int snd_interwave_isa_resume(struct device *pdev, unsigned int dev) 931 { 932 return snd_interwave_card_resume(dev_get_drvdata(pdev)); 933 } 934 #endif 935 936 static struct isa_driver snd_interwave_driver = { 937 .match = snd_interwave_isa_match, 938 .probe = snd_interwave_isa_probe, 939 #ifdef CONFIG_PM 940 .suspend = snd_interwave_isa_suspend, 941 .resume = snd_interwave_isa_resume, 942 #endif 943 .driver = { 944 .name = INTERWAVE_DRIVER 945 }, 946 }; 947 948 #ifdef CONFIG_PNP 949 static int snd_interwave_pnp_detect(struct pnp_card_link *pcard, 950 const struct pnp_card_device_id *pid) 951 { 952 static int dev; 953 struct snd_card *card; 954 struct snd_gus_card *gus; 955 int res; 956 957 for ( ; dev < SNDRV_CARDS; dev++) { 958 if (enable[dev] && isapnp[dev]) 959 break; 960 } 961 if (dev >= SNDRV_CARDS) 962 return -ENODEV; 963 964 res = snd_interwave_card_new(&pcard->card->dev, dev, &card); 965 if (res < 0) 966 return res; 967 968 res = snd_interwave_pnp(dev, card->private_data, pcard, pid); 969 if (res < 0) 970 return res; 971 res = snd_interwave_probe_gus(card, dev, &gus); 972 if (res < 0) 973 return res; 974 res = snd_interwave_probe(card, dev, gus); 975 if (res < 0) 976 return res; 977 pnp_set_card_drvdata(pcard, card); 978 dev++; 979 return 0; 980 } 981 982 #ifdef CONFIG_PM 983 static int snd_interwave_pnpc_suspend(struct pnp_card_link *pcard, 984 pm_message_t state) 985 { 986 return snd_interwave_card_suspend(pnp_get_card_drvdata(pcard)); 987 } 988 989 static int snd_interwave_pnpc_resume(struct pnp_card_link *pcard) 990 { 991 return snd_interwave_card_resume(pnp_get_card_drvdata(pcard)); 992 } 993 #endif 994 995 static struct pnp_card_driver interwave_pnpc_driver = { 996 .flags = PNP_DRIVER_RES_DISABLE, 997 .name = INTERWAVE_PNP_DRIVER, 998 .id_table = snd_interwave_pnpids, 999 .probe = snd_interwave_pnp_detect, 1000 #ifdef CONFIG_PM 1001 .suspend = snd_interwave_pnpc_suspend, 1002 .resume = snd_interwave_pnpc_resume, 1003 #endif 1004 }; 1005 1006 #endif /* CONFIG_PNP */ 1007 1008 static int __init alsa_card_interwave_init(void) 1009 { 1010 int err; 1011 1012 err = isa_register_driver(&snd_interwave_driver, SNDRV_CARDS); 1013 #ifdef CONFIG_PNP 1014 if (!err) 1015 isa_registered = 1; 1016 1017 err = pnp_register_card_driver(&interwave_pnpc_driver); 1018 if (!err) 1019 pnp_registered = 1; 1020 1021 if (isa_registered) 1022 err = 0; 1023 #endif 1024 return err; 1025 } 1026 1027 static void __exit alsa_card_interwave_exit(void) 1028 { 1029 #ifdef CONFIG_PNP 1030 if (pnp_registered) 1031 pnp_unregister_card_driver(&interwave_pnpc_driver); 1032 if (isa_registered) 1033 #endif 1034 isa_unregister_driver(&snd_interwave_driver); 1035 } 1036 1037 module_init(alsa_card_interwave_init) 1038 module_exit(alsa_card_interwave_exit) 1039