1 /* 2 * Driver for ESS Maestro 1/2/2E Sound Card (started 21.8.99) 3 * Copyright (c) by Matze Braun <MatzeBraun@gmx.de>. 4 * Takashi Iwai <tiwai@suse.de> 5 * 6 * Most of the driver code comes from Zach Brown(zab@redhat.com) 7 * Alan Cox OSS Driver 8 * Rewritted from card-es1938.c source. 9 * 10 * TODO: 11 * Perhaps Synth 12 * 13 * This program is free software; you can redistribute it and/or modify 14 * it under the terms of the GNU General Public License as published by 15 * the Free Software Foundation; either version 2 of the License, or 16 * (at your option) any later version. 17 * 18 * This program is distributed in the hope that it will be useful, 19 * but WITHOUT ANY WARRANTY; without even the implied warranty of 20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 21 * GNU General Public License for more details. 22 * 23 * You should have received a copy of the GNU General Public License 24 * along with this program; if not, write to the Free Software 25 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 26 * 27 * 28 * Notes from Zach Brown about the driver code 29 * 30 * Hardware Description 31 * 32 * A working Maestro setup contains the Maestro chip wired to a 33 * codec or 2. In the Maestro we have the APUs, the ASSP, and the 34 * Wavecache. The APUs can be though of as virtual audio routing 35 * channels. They can take data from a number of sources and perform 36 * basic encodings of the data. The wavecache is a storehouse for 37 * PCM data. Typically it deals with PCI and interracts with the 38 * APUs. The ASSP is a wacky DSP like device that ESS is loth 39 * to release docs on. Thankfully it isn't required on the Maestro 40 * until you start doing insane things like FM emulation and surround 41 * encoding. The codecs are almost always AC-97 compliant codecs, 42 * but it appears that early Maestros may have had PT101 (an ESS 43 * part?) wired to them. The only real difference in the Maestro 44 * families is external goop like docking capability, memory for 45 * the ASSP, and initialization differences. 46 * 47 * Driver Operation 48 * 49 * We only drive the APU/Wavecache as typical DACs and drive the 50 * mixers in the codecs. There are 64 APUs. We assign 6 to each 51 * /dev/dsp? device. 2 channels for output, and 4 channels for 52 * input. 53 * 54 * Each APU can do a number of things, but we only really use 55 * 3 basic functions. For playback we use them to convert PCM 56 * data fetched over PCI by the wavecahche into analog data that 57 * is handed to the codec. One APU for mono, and a pair for stereo. 58 * When in stereo, the combination of smarts in the APU and Wavecache 59 * decide which wavecache gets the left or right channel. 60 * 61 * For record we still use the old overly mono system. For each in 62 * coming channel the data comes in from the codec, through a 'input' 63 * APU, through another rate converter APU, and then into memory via 64 * the wavecache and PCI. If its stereo, we mash it back into LRLR in 65 * software. The pass between the 2 APUs is supposedly what requires us 66 * to have a 512 byte buffer sitting around in wavecache/memory. 67 * 68 * The wavecache makes our life even more fun. First off, it can 69 * only address the first 28 bits of PCI address space, making it 70 * useless on quite a few architectures. Secondly, its insane. 71 * It claims to fetch from 4 regions of PCI space, each 4 meg in length. 72 * But that doesn't really work. You can only use 1 region. So all our 73 * allocations have to be in 4meg of each other. Booo. Hiss. 74 * So we have a module parameter, dsps_order, that is the order of 75 * the number of dsps to provide. All their buffer space is allocated 76 * on open time. The sonicvibes OSS routines we inherited really want 77 * power of 2 buffers, so we have all those next to each other, then 78 * 512 byte regions for the recording wavecaches. This ends up 79 * wasting quite a bit of memory. The only fixes I can see would be 80 * getting a kernel allocator that could work in zones, or figuring out 81 * just how to coerce the WP into doing what we want. 82 * 83 * The indirection of the various registers means we have to spinlock 84 * nearly all register accesses. We have the main register indirection 85 * like the wave cache, maestro registers, etc. Then we have beasts 86 * like the APU interface that is indirect registers gotten at through 87 * the main maestro indirection. Ouch. We spinlock around the actual 88 * ports on a per card basis. This means spinlock activity at each IO 89 * operation, but the only IO operation clusters are in non critical 90 * paths and it makes the code far easier to follow. Interrupts are 91 * blocked while holding the locks because the int handler has to 92 * get at some of them :(. The mixer interface doesn't, however. 93 * We also have an OSS state lock that is thrown around in a few 94 * places. 95 */ 96 97 #include <asm/io.h> 98 #include <linux/delay.h> 99 #include <linux/interrupt.h> 100 #include <linux/init.h> 101 #include <linux/pci.h> 102 #include <linux/dma-mapping.h> 103 #include <linux/slab.h> 104 #include <linux/gameport.h> 105 #include <linux/module.h> 106 #include <linux/mutex.h> 107 #include <linux/input.h> 108 109 #include <sound/core.h> 110 #include <sound/pcm.h> 111 #include <sound/mpu401.h> 112 #include <sound/ac97_codec.h> 113 #include <sound/initval.h> 114 115 #ifdef CONFIG_SND_ES1968_RADIO 116 #include <sound/tea575x-tuner.h> 117 #endif 118 119 #define CARD_NAME "ESS Maestro1/2" 120 #define DRIVER_NAME "ES1968" 121 122 MODULE_DESCRIPTION("ESS Maestro"); 123 MODULE_LICENSE("GPL"); 124 MODULE_SUPPORTED_DEVICE("{{ESS,Maestro 2e}," 125 "{ESS,Maestro 2}," 126 "{ESS,Maestro 1}," 127 "{TerraTec,DMX}}"); 128 129 #if defined(CONFIG_GAMEPORT) || (defined(MODULE) && defined(CONFIG_GAMEPORT_MODULE)) 130 #define SUPPORT_JOYSTICK 1 131 #endif 132 133 static int index[SNDRV_CARDS] = SNDRV_DEFAULT_IDX; /* Index 1-MAX */ 134 static char *id[SNDRV_CARDS] = SNDRV_DEFAULT_STR; /* ID for this card */ 135 static int enable[SNDRV_CARDS] = SNDRV_DEFAULT_ENABLE_PNP; /* Enable this card */ 136 static int total_bufsize[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 1024 }; 137 static int pcm_substreams_p[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 4 }; 138 static int pcm_substreams_c[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 1 }; 139 static int clock[SNDRV_CARDS]; 140 static int use_pm[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2}; 141 static int enable_mpu[SNDRV_CARDS] = {[0 ... (SNDRV_CARDS - 1)] = 2}; 142 #ifdef SUPPORT_JOYSTICK 143 static int joystick[SNDRV_CARDS]; 144 #endif 145 146 module_param_array(index, int, NULL, 0444); 147 MODULE_PARM_DESC(index, "Index value for " CARD_NAME " soundcard."); 148 module_param_array(id, charp, NULL, 0444); 149 MODULE_PARM_DESC(id, "ID string for " CARD_NAME " soundcard."); 150 module_param_array(enable, bool, NULL, 0444); 151 MODULE_PARM_DESC(enable, "Enable " CARD_NAME " soundcard."); 152 module_param_array(total_bufsize, int, NULL, 0444); 153 MODULE_PARM_DESC(total_bufsize, "Total buffer size in kB."); 154 module_param_array(pcm_substreams_p, int, NULL, 0444); 155 MODULE_PARM_DESC(pcm_substreams_p, "PCM Playback substreams for " CARD_NAME " soundcard."); 156 module_param_array(pcm_substreams_c, int, NULL, 0444); 157 MODULE_PARM_DESC(pcm_substreams_c, "PCM Capture substreams for " CARD_NAME " soundcard."); 158 module_param_array(clock, int, NULL, 0444); 159 MODULE_PARM_DESC(clock, "Clock on " CARD_NAME " soundcard. (0 = auto-detect)"); 160 module_param_array(use_pm, int, NULL, 0444); 161 MODULE_PARM_DESC(use_pm, "Toggle power-management. (0 = off, 1 = on, 2 = auto)"); 162 module_param_array(enable_mpu, int, NULL, 0444); 163 MODULE_PARM_DESC(enable_mpu, "Enable MPU401. (0 = off, 1 = on, 2 = auto)"); 164 #ifdef SUPPORT_JOYSTICK 165 module_param_array(joystick, bool, NULL, 0444); 166 MODULE_PARM_DESC(joystick, "Enable joystick."); 167 #endif 168 169 170 #define NR_APUS 64 171 #define NR_APU_REGS 16 172 173 /* NEC Versas ? */ 174 #define NEC_VERSA_SUBID1 0x80581033 175 #define NEC_VERSA_SUBID2 0x803c1033 176 177 /* Mode Flags */ 178 #define ESS_FMT_STEREO 0x01 179 #define ESS_FMT_16BIT 0x02 180 181 #define DAC_RUNNING 1 182 #define ADC_RUNNING 2 183 184 /* Values for the ESM_LEGACY_AUDIO_CONTROL */ 185 186 #define ESS_DISABLE_AUDIO 0x8000 187 #define ESS_ENABLE_SERIAL_IRQ 0x4000 188 #define IO_ADRESS_ALIAS 0x0020 189 #define MPU401_IRQ_ENABLE 0x0010 190 #define MPU401_IO_ENABLE 0x0008 191 #define GAME_IO_ENABLE 0x0004 192 #define FM_IO_ENABLE 0x0002 193 #define SB_IO_ENABLE 0x0001 194 195 /* Values for the ESM_CONFIG_A */ 196 197 #define PIC_SNOOP1 0x4000 198 #define PIC_SNOOP2 0x2000 199 #define SAFEGUARD 0x0800 200 #define DMA_CLEAR 0x0700 201 #define DMA_DDMA 0x0000 202 #define DMA_TDMA 0x0100 203 #define DMA_PCPCI 0x0200 204 #define POST_WRITE 0x0080 205 #define PCI_TIMING 0x0040 206 #define SWAP_LR 0x0020 207 #define SUBTR_DECODE 0x0002 208 209 /* Values for the ESM_CONFIG_B */ 210 211 #define SPDIF_CONFB 0x0100 212 #define HWV_CONFB 0x0080 213 #define DEBOUNCE 0x0040 214 #define GPIO_CONFB 0x0020 215 #define CHI_CONFB 0x0010 216 #define IDMA_CONFB 0x0008 /*undoc */ 217 #define MIDI_FIX 0x0004 /*undoc */ 218 #define IRQ_TO_ISA 0x0001 /*undoc */ 219 220 /* Values for Ring Bus Control B */ 221 #define RINGB_2CODEC_ID_MASK 0x0003 222 #define RINGB_DIS_VALIDATION 0x0008 223 #define RINGB_EN_SPDIF 0x0010 224 #define RINGB_EN_2CODEC 0x0020 225 #define RINGB_SING_BIT_DUAL 0x0040 226 227 /* ****Port Addresses**** */ 228 229 /* Write & Read */ 230 #define ESM_INDEX 0x02 231 #define ESM_DATA 0x00 232 233 /* AC97 + RingBus */ 234 #define ESM_AC97_INDEX 0x30 235 #define ESM_AC97_DATA 0x32 236 #define ESM_RING_BUS_DEST 0x34 237 #define ESM_RING_BUS_CONTR_A 0x36 238 #define ESM_RING_BUS_CONTR_B 0x38 239 #define ESM_RING_BUS_SDO 0x3A 240 241 /* WaveCache*/ 242 #define WC_INDEX 0x10 243 #define WC_DATA 0x12 244 #define WC_CONTROL 0x14 245 246 /* ASSP*/ 247 #define ASSP_INDEX 0x80 248 #define ASSP_MEMORY 0x82 249 #define ASSP_DATA 0x84 250 #define ASSP_CONTROL_A 0xA2 251 #define ASSP_CONTROL_B 0xA4 252 #define ASSP_CONTROL_C 0xA6 253 #define ASSP_HOSTW_INDEX 0xA8 254 #define ASSP_HOSTW_DATA 0xAA 255 #define ASSP_HOSTW_IRQ 0xAC 256 /* Midi */ 257 #define ESM_MPU401_PORT 0x98 258 /* Others */ 259 #define ESM_PORT_HOST_IRQ 0x18 260 261 #define IDR0_DATA_PORT 0x00 262 #define IDR1_CRAM_POINTER 0x01 263 #define IDR2_CRAM_DATA 0x02 264 #define IDR3_WAVE_DATA 0x03 265 #define IDR4_WAVE_PTR_LOW 0x04 266 #define IDR5_WAVE_PTR_HI 0x05 267 #define IDR6_TIMER_CTRL 0x06 268 #define IDR7_WAVE_ROMRAM 0x07 269 270 #define WRITEABLE_MAP 0xEFFFFF 271 #define READABLE_MAP 0x64003F 272 273 /* PCI Register */ 274 275 #define ESM_LEGACY_AUDIO_CONTROL 0x40 276 #define ESM_ACPI_COMMAND 0x54 277 #define ESM_CONFIG_A 0x50 278 #define ESM_CONFIG_B 0x52 279 #define ESM_DDMA 0x60 280 281 /* Bob Bits */ 282 #define ESM_BOB_ENABLE 0x0001 283 #define ESM_BOB_START 0x0001 284 285 /* Host IRQ Control Bits */ 286 #define ESM_RESET_MAESTRO 0x8000 287 #define ESM_RESET_DIRECTSOUND 0x4000 288 #define ESM_HIRQ_ClkRun 0x0100 289 #define ESM_HIRQ_HW_VOLUME 0x0040 290 #define ESM_HIRQ_HARPO 0x0030 /* What's that? */ 291 #define ESM_HIRQ_ASSP 0x0010 292 #define ESM_HIRQ_DSIE 0x0004 293 #define ESM_HIRQ_MPU401 0x0002 294 #define ESM_HIRQ_SB 0x0001 295 296 /* Host IRQ Status Bits */ 297 #define ESM_MPU401_IRQ 0x02 298 #define ESM_SB_IRQ 0x01 299 #define ESM_SOUND_IRQ 0x04 300 #define ESM_ASSP_IRQ 0x10 301 #define ESM_HWVOL_IRQ 0x40 302 303 #define ESS_SYSCLK 50000000 304 #define ESM_BOB_FREQ 200 305 #define ESM_BOB_FREQ_MAX 800 306 307 #define ESM_FREQ_ESM1 (49152000L / 1024L) /* default rate 48000 */ 308 #define ESM_FREQ_ESM2 (50000000L / 1024L) 309 310 /* APU Modes: reg 0x00, bit 4-7 */ 311 #define ESM_APU_MODE_SHIFT 4 312 #define ESM_APU_MODE_MASK (0xf << 4) 313 #define ESM_APU_OFF 0x00 314 #define ESM_APU_16BITLINEAR 0x01 /* 16-Bit Linear Sample Player */ 315 #define ESM_APU_16BITSTEREO 0x02 /* 16-Bit Stereo Sample Player */ 316 #define ESM_APU_8BITLINEAR 0x03 /* 8-Bit Linear Sample Player */ 317 #define ESM_APU_8BITSTEREO 0x04 /* 8-Bit Stereo Sample Player */ 318 #define ESM_APU_8BITDIFF 0x05 /* 8-Bit Differential Sample Playrer */ 319 #define ESM_APU_DIGITALDELAY 0x06 /* Digital Delay Line */ 320 #define ESM_APU_DUALTAP 0x07 /* Dual Tap Reader */ 321 #define ESM_APU_CORRELATOR 0x08 /* Correlator */ 322 #define ESM_APU_INPUTMIXER 0x09 /* Input Mixer */ 323 #define ESM_APU_WAVETABLE 0x0A /* Wave Table Mode */ 324 #define ESM_APU_SRCONVERTOR 0x0B /* Sample Rate Convertor */ 325 #define ESM_APU_16BITPINGPONG 0x0C /* 16-Bit Ping-Pong Sample Player */ 326 #define ESM_APU_RESERVED1 0x0D /* Reserved 1 */ 327 #define ESM_APU_RESERVED2 0x0E /* Reserved 2 */ 328 #define ESM_APU_RESERVED3 0x0F /* Reserved 3 */ 329 330 /* reg 0x00 */ 331 #define ESM_APU_FILTER_Q_SHIFT 0 332 #define ESM_APU_FILTER_Q_MASK (3 << 0) 333 /* APU Filtey Q Control */ 334 #define ESM_APU_FILTER_LESSQ 0x00 335 #define ESM_APU_FILTER_MOREQ 0x03 336 337 #define ESM_APU_FILTER_TYPE_SHIFT 2 338 #define ESM_APU_FILTER_TYPE_MASK (3 << 2) 339 #define ESM_APU_ENV_TYPE_SHIFT 8 340 #define ESM_APU_ENV_TYPE_MASK (3 << 8) 341 #define ESM_APU_ENV_STATE_SHIFT 10 342 #define ESM_APU_ENV_STATE_MASK (3 << 10) 343 #define ESM_APU_END_CURVE (1 << 12) 344 #define ESM_APU_INT_ON_LOOP (1 << 13) 345 #define ESM_APU_DMA_ENABLE (1 << 14) 346 347 /* reg 0x02 */ 348 #define ESM_APU_SUBMIX_GROUP_SHIRT 0 349 #define ESM_APU_SUBMIX_GROUP_MASK (7 << 0) 350 #define ESM_APU_SUBMIX_MODE (1 << 3) 351 #define ESM_APU_6dB (1 << 4) 352 #define ESM_APU_DUAL_EFFECT (1 << 5) 353 #define ESM_APU_EFFECT_CHANNELS_SHIFT 6 354 #define ESM_APU_EFFECT_CHANNELS_MASK (3 << 6) 355 356 /* reg 0x03 */ 357 #define ESM_APU_STEP_SIZE_MASK 0x0fff 358 359 /* reg 0x04 */ 360 #define ESM_APU_PHASE_SHIFT 0 361 #define ESM_APU_PHASE_MASK (0xff << 0) 362 #define ESM_APU_WAVE64K_PAGE_SHIFT 8 /* most 8bit of wave start offset */ 363 #define ESM_APU_WAVE64K_PAGE_MASK (0xff << 8) 364 365 /* reg 0x05 - wave start offset */ 366 /* reg 0x06 - wave end offset */ 367 /* reg 0x07 - wave loop length */ 368 369 /* reg 0x08 */ 370 #define ESM_APU_EFFECT_GAIN_SHIFT 0 371 #define ESM_APU_EFFECT_GAIN_MASK (0xff << 0) 372 #define ESM_APU_TREMOLO_DEPTH_SHIFT 8 373 #define ESM_APU_TREMOLO_DEPTH_MASK (0xf << 8) 374 #define ESM_APU_TREMOLO_RATE_SHIFT 12 375 #define ESM_APU_TREMOLO_RATE_MASK (0xf << 12) 376 377 /* reg 0x09 */ 378 /* bit 0-7 amplitude dest? */ 379 #define ESM_APU_AMPLITUDE_NOW_SHIFT 8 380 #define ESM_APU_AMPLITUDE_NOW_MASK (0xff << 8) 381 382 /* reg 0x0a */ 383 #define ESM_APU_POLAR_PAN_SHIFT 0 384 #define ESM_APU_POLAR_PAN_MASK (0x3f << 0) 385 /* Polar Pan Control */ 386 #define ESM_APU_PAN_CENTER_CIRCLE 0x00 387 #define ESM_APU_PAN_MIDDLE_RADIUS 0x01 388 #define ESM_APU_PAN_OUTSIDE_RADIUS 0x02 389 390 #define ESM_APU_FILTER_TUNING_SHIFT 8 391 #define ESM_APU_FILTER_TUNING_MASK (0xff << 8) 392 393 /* reg 0x0b */ 394 #define ESM_APU_DATA_SRC_A_SHIFT 0 395 #define ESM_APU_DATA_SRC_A_MASK (0x7f << 0) 396 #define ESM_APU_INV_POL_A (1 << 7) 397 #define ESM_APU_DATA_SRC_B_SHIFT 8 398 #define ESM_APU_DATA_SRC_B_MASK (0x7f << 8) 399 #define ESM_APU_INV_POL_B (1 << 15) 400 401 #define ESM_APU_VIBRATO_RATE_SHIFT 0 402 #define ESM_APU_VIBRATO_RATE_MASK (0xf << 0) 403 #define ESM_APU_VIBRATO_DEPTH_SHIFT 4 404 #define ESM_APU_VIBRATO_DEPTH_MASK (0xf << 4) 405 #define ESM_APU_VIBRATO_PHASE_SHIFT 8 406 #define ESM_APU_VIBRATO_PHASE_MASK (0xff << 8) 407 408 /* reg 0x0c */ 409 #define ESM_APU_RADIUS_SELECT (1 << 6) 410 411 /* APU Filter Control */ 412 #define ESM_APU_FILTER_2POLE_LOPASS 0x00 413 #define ESM_APU_FILTER_2POLE_BANDPASS 0x01 414 #define ESM_APU_FILTER_2POLE_HIPASS 0x02 415 #define ESM_APU_FILTER_1POLE_LOPASS 0x03 416 #define ESM_APU_FILTER_1POLE_HIPASS 0x04 417 #define ESM_APU_FILTER_OFF 0x05 418 419 /* APU ATFP Type */ 420 #define ESM_APU_ATFP_AMPLITUDE 0x00 421 #define ESM_APU_ATFP_TREMELO 0x01 422 #define ESM_APU_ATFP_FILTER 0x02 423 #define ESM_APU_ATFP_PAN 0x03 424 425 /* APU ATFP Flags */ 426 #define ESM_APU_ATFP_FLG_OFF 0x00 427 #define ESM_APU_ATFP_FLG_WAIT 0x01 428 #define ESM_APU_ATFP_FLG_DONE 0x02 429 #define ESM_APU_ATFP_FLG_INPROCESS 0x03 430 431 432 /* capture mixing buffer size */ 433 #define ESM_MEM_ALIGN 0x1000 434 #define ESM_MIXBUF_SIZE 0x400 435 436 #define ESM_MODE_PLAY 0 437 #define ESM_MODE_CAPTURE 1 438 439 440 /* APU use in the driver */ 441 enum snd_enum_apu_type { 442 ESM_APU_PCM_PLAY, 443 ESM_APU_PCM_CAPTURE, 444 ESM_APU_PCM_RATECONV, 445 ESM_APU_FREE 446 }; 447 448 /* chip type */ 449 enum { 450 TYPE_MAESTRO, TYPE_MAESTRO2, TYPE_MAESTRO2E 451 }; 452 453 /* DMA Hack! */ 454 struct esm_memory { 455 struct snd_dma_buffer buf; 456 int empty; /* status */ 457 struct list_head list; 458 }; 459 460 /* Playback Channel */ 461 struct esschan { 462 int running; 463 464 u8 apu[4]; 465 u8 apu_mode[4]; 466 467 /* playback/capture pcm buffer */ 468 struct esm_memory *memory; 469 /* capture mixer buffer */ 470 struct esm_memory *mixbuf; 471 472 unsigned int hwptr; /* current hw pointer in bytes */ 473 unsigned int count; /* sample counter in bytes */ 474 unsigned int dma_size; /* total buffer size in bytes */ 475 unsigned int frag_size; /* period size in bytes */ 476 unsigned int wav_shift; 477 u16 base[4]; /* offset for ptr */ 478 479 /* stereo/16bit flag */ 480 unsigned char fmt; 481 int mode; /* playback / capture */ 482 483 int bob_freq; /* required timer frequency */ 484 485 struct snd_pcm_substream *substream; 486 487 /* linked list */ 488 struct list_head list; 489 490 #ifdef CONFIG_PM 491 u16 wc_map[4]; 492 #endif 493 }; 494 495 struct es1968 { 496 /* Module Config */ 497 int total_bufsize; /* in bytes */ 498 499 int playback_streams, capture_streams; 500 501 unsigned int clock; /* clock */ 502 /* for clock measurement */ 503 unsigned int in_measurement: 1; 504 unsigned int measure_apu; 505 unsigned int measure_lastpos; 506 unsigned int measure_count; 507 508 /* buffer */ 509 struct snd_dma_buffer dma; 510 511 /* Resources... */ 512 int irq; 513 unsigned long io_port; 514 int type; 515 struct pci_dev *pci; 516 struct snd_card *card; 517 struct snd_pcm *pcm; 518 int do_pm; /* power-management enabled */ 519 520 /* DMA memory block */ 521 struct list_head buf_list; 522 523 /* ALSA Stuff */ 524 struct snd_ac97 *ac97; 525 struct snd_rawmidi *rmidi; 526 527 spinlock_t reg_lock; 528 unsigned int in_suspend; 529 530 /* Maestro Stuff */ 531 u16 maestro_map[32]; 532 int bobclient; /* active timer instancs */ 533 int bob_freq; /* timer frequency */ 534 struct mutex memory_mutex; /* memory lock */ 535 536 /* APU states */ 537 unsigned char apu[NR_APUS]; 538 539 /* active substreams */ 540 struct list_head substream_list; 541 spinlock_t substream_lock; 542 543 #ifdef CONFIG_PM 544 u16 apu_map[NR_APUS][NR_APU_REGS]; 545 #endif 546 547 #ifdef SUPPORT_JOYSTICK 548 struct gameport *gameport; 549 #endif 550 551 #ifdef CONFIG_SND_ES1968_INPUT 552 struct input_dev *input_dev; 553 char phys[64]; /* physical device path */ 554 #else 555 struct snd_kcontrol *master_switch; /* for h/w volume control */ 556 struct snd_kcontrol *master_volume; 557 #endif 558 struct work_struct hwvol_work; 559 560 #ifdef CONFIG_SND_ES1968_RADIO 561 struct snd_tea575x tea; 562 #endif 563 }; 564 565 static irqreturn_t snd_es1968_interrupt(int irq, void *dev_id); 566 567 static DEFINE_PCI_DEVICE_TABLE(snd_es1968_ids) = { 568 /* Maestro 1 */ 569 { 0x1285, 0x0100, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO }, 570 /* Maestro 2 */ 571 { 0x125d, 0x1968, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO2 }, 572 /* Maestro 2E */ 573 { 0x125d, 0x1978, PCI_ANY_ID, PCI_ANY_ID, PCI_CLASS_MULTIMEDIA_AUDIO << 8, 0xffff00, TYPE_MAESTRO2E }, 574 { 0, } 575 }; 576 577 MODULE_DEVICE_TABLE(pci, snd_es1968_ids); 578 579 /* ********************* 580 * Low Level Funcs! * 581 *********************/ 582 583 /* no spinlock */ 584 static void __maestro_write(struct es1968 *chip, u16 reg, u16 data) 585 { 586 outw(reg, chip->io_port + ESM_INDEX); 587 outw(data, chip->io_port + ESM_DATA); 588 chip->maestro_map[reg] = data; 589 } 590 591 static inline void maestro_write(struct es1968 *chip, u16 reg, u16 data) 592 { 593 unsigned long flags; 594 spin_lock_irqsave(&chip->reg_lock, flags); 595 __maestro_write(chip, reg, data); 596 spin_unlock_irqrestore(&chip->reg_lock, flags); 597 } 598 599 /* no spinlock */ 600 static u16 __maestro_read(struct es1968 *chip, u16 reg) 601 { 602 if (READABLE_MAP & (1 << reg)) { 603 outw(reg, chip->io_port + ESM_INDEX); 604 chip->maestro_map[reg] = inw(chip->io_port + ESM_DATA); 605 } 606 return chip->maestro_map[reg]; 607 } 608 609 static inline u16 maestro_read(struct es1968 *chip, u16 reg) 610 { 611 unsigned long flags; 612 u16 result; 613 spin_lock_irqsave(&chip->reg_lock, flags); 614 result = __maestro_read(chip, reg); 615 spin_unlock_irqrestore(&chip->reg_lock, flags); 616 return result; 617 } 618 619 /* Wait for the codec bus to be free */ 620 static int snd_es1968_ac97_wait(struct es1968 *chip) 621 { 622 int timeout = 100000; 623 624 while (timeout-- > 0) { 625 if (!(inb(chip->io_port + ESM_AC97_INDEX) & 1)) 626 return 0; 627 cond_resched(); 628 } 629 snd_printd("es1968: ac97 timeout\n"); 630 return 1; /* timeout */ 631 } 632 633 static int snd_es1968_ac97_wait_poll(struct es1968 *chip) 634 { 635 int timeout = 100000; 636 637 while (timeout-- > 0) { 638 if (!(inb(chip->io_port + ESM_AC97_INDEX) & 1)) 639 return 0; 640 } 641 snd_printd("es1968: ac97 timeout\n"); 642 return 1; /* timeout */ 643 } 644 645 static void snd_es1968_ac97_write(struct snd_ac97 *ac97, unsigned short reg, unsigned short val) 646 { 647 struct es1968 *chip = ac97->private_data; 648 649 snd_es1968_ac97_wait(chip); 650 651 /* Write the bus */ 652 outw(val, chip->io_port + ESM_AC97_DATA); 653 /*msleep(1);*/ 654 outb(reg, chip->io_port + ESM_AC97_INDEX); 655 /*msleep(1);*/ 656 } 657 658 static unsigned short snd_es1968_ac97_read(struct snd_ac97 *ac97, unsigned short reg) 659 { 660 u16 data = 0; 661 struct es1968 *chip = ac97->private_data; 662 663 snd_es1968_ac97_wait(chip); 664 665 outb(reg | 0x80, chip->io_port + ESM_AC97_INDEX); 666 /*msleep(1);*/ 667 668 if (!snd_es1968_ac97_wait_poll(chip)) { 669 data = inw(chip->io_port + ESM_AC97_DATA); 670 /*msleep(1);*/ 671 } 672 673 return data; 674 } 675 676 /* no spinlock */ 677 static void apu_index_set(struct es1968 *chip, u16 index) 678 { 679 int i; 680 __maestro_write(chip, IDR1_CRAM_POINTER, index); 681 for (i = 0; i < 1000; i++) 682 if (__maestro_read(chip, IDR1_CRAM_POINTER) == index) 683 return; 684 snd_printd("es1968: APU register select failed. (Timeout)\n"); 685 } 686 687 /* no spinlock */ 688 static void apu_data_set(struct es1968 *chip, u16 data) 689 { 690 int i; 691 for (i = 0; i < 1000; i++) { 692 if (__maestro_read(chip, IDR0_DATA_PORT) == data) 693 return; 694 __maestro_write(chip, IDR0_DATA_PORT, data); 695 } 696 snd_printd("es1968: APU register set probably failed (Timeout)!\n"); 697 } 698 699 /* no spinlock */ 700 static void __apu_set_register(struct es1968 *chip, u16 channel, u8 reg, u16 data) 701 { 702 if (snd_BUG_ON(channel >= NR_APUS)) 703 return; 704 #ifdef CONFIG_PM 705 chip->apu_map[channel][reg] = data; 706 #endif 707 reg |= (channel << 4); 708 apu_index_set(chip, reg); 709 apu_data_set(chip, data); 710 } 711 712 static void apu_set_register(struct es1968 *chip, u16 channel, u8 reg, u16 data) 713 { 714 unsigned long flags; 715 spin_lock_irqsave(&chip->reg_lock, flags); 716 __apu_set_register(chip, channel, reg, data); 717 spin_unlock_irqrestore(&chip->reg_lock, flags); 718 } 719 720 static u16 __apu_get_register(struct es1968 *chip, u16 channel, u8 reg) 721 { 722 if (snd_BUG_ON(channel >= NR_APUS)) 723 return 0; 724 reg |= (channel << 4); 725 apu_index_set(chip, reg); 726 return __maestro_read(chip, IDR0_DATA_PORT); 727 } 728 729 static u16 apu_get_register(struct es1968 *chip, u16 channel, u8 reg) 730 { 731 unsigned long flags; 732 u16 v; 733 spin_lock_irqsave(&chip->reg_lock, flags); 734 v = __apu_get_register(chip, channel, reg); 735 spin_unlock_irqrestore(&chip->reg_lock, flags); 736 return v; 737 } 738 739 #if 0 /* ASSP is not supported */ 740 741 static void assp_set_register(struct es1968 *chip, u32 reg, u32 value) 742 { 743 unsigned long flags; 744 745 spin_lock_irqsave(&chip->reg_lock, flags); 746 outl(reg, chip->io_port + ASSP_INDEX); 747 outl(value, chip->io_port + ASSP_DATA); 748 spin_unlock_irqrestore(&chip->reg_lock, flags); 749 } 750 751 static u32 assp_get_register(struct es1968 *chip, u32 reg) 752 { 753 unsigned long flags; 754 u32 value; 755 756 spin_lock_irqsave(&chip->reg_lock, flags); 757 outl(reg, chip->io_port + ASSP_INDEX); 758 value = inl(chip->io_port + ASSP_DATA); 759 spin_unlock_irqrestore(&chip->reg_lock, flags); 760 761 return value; 762 } 763 764 #endif 765 766 static void wave_set_register(struct es1968 *chip, u16 reg, u16 value) 767 { 768 unsigned long flags; 769 770 spin_lock_irqsave(&chip->reg_lock, flags); 771 outw(reg, chip->io_port + WC_INDEX); 772 outw(value, chip->io_port + WC_DATA); 773 spin_unlock_irqrestore(&chip->reg_lock, flags); 774 } 775 776 static u16 wave_get_register(struct es1968 *chip, u16 reg) 777 { 778 unsigned long flags; 779 u16 value; 780 781 spin_lock_irqsave(&chip->reg_lock, flags); 782 outw(reg, chip->io_port + WC_INDEX); 783 value = inw(chip->io_port + WC_DATA); 784 spin_unlock_irqrestore(&chip->reg_lock, flags); 785 786 return value; 787 } 788 789 /* ******************* 790 * Bob the Timer! * 791 *******************/ 792 793 static void snd_es1968_bob_stop(struct es1968 *chip) 794 { 795 u16 reg; 796 797 reg = __maestro_read(chip, 0x11); 798 reg &= ~ESM_BOB_ENABLE; 799 __maestro_write(chip, 0x11, reg); 800 reg = __maestro_read(chip, 0x17); 801 reg &= ~ESM_BOB_START; 802 __maestro_write(chip, 0x17, reg); 803 } 804 805 static void snd_es1968_bob_start(struct es1968 *chip) 806 { 807 int prescale; 808 int divide; 809 810 /* compute ideal interrupt frequency for buffer size & play rate */ 811 /* first, find best prescaler value to match freq */ 812 for (prescale = 5; prescale < 12; prescale++) 813 if (chip->bob_freq > (ESS_SYSCLK >> (prescale + 9))) 814 break; 815 816 /* next, back off prescaler whilst getting divider into optimum range */ 817 divide = 1; 818 while ((prescale > 5) && (divide < 32)) { 819 prescale--; 820 divide <<= 1; 821 } 822 divide >>= 1; 823 824 /* now fine-tune the divider for best match */ 825 for (; divide < 31; divide++) 826 if (chip->bob_freq > 827 ((ESS_SYSCLK >> (prescale + 9)) / (divide + 1))) break; 828 829 /* divide = 0 is illegal, but don't let prescale = 4! */ 830 if (divide == 0) { 831 divide++; 832 if (prescale > 5) 833 prescale--; 834 } else if (divide > 1) 835 divide--; 836 837 __maestro_write(chip, 6, 0x9000 | (prescale << 5) | divide); /* set reg */ 838 839 /* Now set IDR 11/17 */ 840 __maestro_write(chip, 0x11, __maestro_read(chip, 0x11) | 1); 841 __maestro_write(chip, 0x17, __maestro_read(chip, 0x17) | 1); 842 } 843 844 /* call with substream spinlock */ 845 static void snd_es1968_bob_inc(struct es1968 *chip, int freq) 846 { 847 chip->bobclient++; 848 if (chip->bobclient == 1) { 849 chip->bob_freq = freq; 850 snd_es1968_bob_start(chip); 851 } else if (chip->bob_freq < freq) { 852 snd_es1968_bob_stop(chip); 853 chip->bob_freq = freq; 854 snd_es1968_bob_start(chip); 855 } 856 } 857 858 /* call with substream spinlock */ 859 static void snd_es1968_bob_dec(struct es1968 *chip) 860 { 861 chip->bobclient--; 862 if (chip->bobclient <= 0) 863 snd_es1968_bob_stop(chip); 864 else if (chip->bob_freq > ESM_BOB_FREQ) { 865 /* check reduction of timer frequency */ 866 int max_freq = ESM_BOB_FREQ; 867 struct esschan *es; 868 list_for_each_entry(es, &chip->substream_list, list) { 869 if (max_freq < es->bob_freq) 870 max_freq = es->bob_freq; 871 } 872 if (max_freq != chip->bob_freq) { 873 snd_es1968_bob_stop(chip); 874 chip->bob_freq = max_freq; 875 snd_es1968_bob_start(chip); 876 } 877 } 878 } 879 880 static int 881 snd_es1968_calc_bob_rate(struct es1968 *chip, struct esschan *es, 882 struct snd_pcm_runtime *runtime) 883 { 884 /* we acquire 4 interrupts per period for precise control.. */ 885 int freq = runtime->rate * 4; 886 if (es->fmt & ESS_FMT_STEREO) 887 freq <<= 1; 888 if (es->fmt & ESS_FMT_16BIT) 889 freq <<= 1; 890 freq /= es->frag_size; 891 if (freq < ESM_BOB_FREQ) 892 freq = ESM_BOB_FREQ; 893 else if (freq > ESM_BOB_FREQ_MAX) 894 freq = ESM_BOB_FREQ_MAX; 895 return freq; 896 } 897 898 899 /************* 900 * PCM Part * 901 *************/ 902 903 static u32 snd_es1968_compute_rate(struct es1968 *chip, u32 freq) 904 { 905 u32 rate = (freq << 16) / chip->clock; 906 #if 0 /* XXX: do we need this? */ 907 if (rate > 0x10000) 908 rate = 0x10000; 909 #endif 910 return rate; 911 } 912 913 /* get current pointer */ 914 static inline unsigned int 915 snd_es1968_get_dma_ptr(struct es1968 *chip, struct esschan *es) 916 { 917 unsigned int offset; 918 919 offset = apu_get_register(chip, es->apu[0], 5); 920 921 offset -= es->base[0]; 922 923 return (offset & 0xFFFE); /* hardware is in words */ 924 } 925 926 static void snd_es1968_apu_set_freq(struct es1968 *chip, int apu, int freq) 927 { 928 apu_set_register(chip, apu, 2, 929 (apu_get_register(chip, apu, 2) & 0x00FF) | 930 ((freq & 0xff) << 8) | 0x10); 931 apu_set_register(chip, apu, 3, freq >> 8); 932 } 933 934 /* spin lock held */ 935 static inline void snd_es1968_trigger_apu(struct es1968 *esm, int apu, int mode) 936 { 937 /* set the APU mode */ 938 __apu_set_register(esm, apu, 0, 939 (__apu_get_register(esm, apu, 0) & 0xff0f) | 940 (mode << 4)); 941 } 942 943 static void snd_es1968_pcm_start(struct es1968 *chip, struct esschan *es) 944 { 945 spin_lock(&chip->reg_lock); 946 __apu_set_register(chip, es->apu[0], 5, es->base[0]); 947 snd_es1968_trigger_apu(chip, es->apu[0], es->apu_mode[0]); 948 if (es->mode == ESM_MODE_CAPTURE) { 949 __apu_set_register(chip, es->apu[2], 5, es->base[2]); 950 snd_es1968_trigger_apu(chip, es->apu[2], es->apu_mode[2]); 951 } 952 if (es->fmt & ESS_FMT_STEREO) { 953 __apu_set_register(chip, es->apu[1], 5, es->base[1]); 954 snd_es1968_trigger_apu(chip, es->apu[1], es->apu_mode[1]); 955 if (es->mode == ESM_MODE_CAPTURE) { 956 __apu_set_register(chip, es->apu[3], 5, es->base[3]); 957 snd_es1968_trigger_apu(chip, es->apu[3], es->apu_mode[3]); 958 } 959 } 960 spin_unlock(&chip->reg_lock); 961 } 962 963 static void snd_es1968_pcm_stop(struct es1968 *chip, struct esschan *es) 964 { 965 spin_lock(&chip->reg_lock); 966 snd_es1968_trigger_apu(chip, es->apu[0], 0); 967 snd_es1968_trigger_apu(chip, es->apu[1], 0); 968 if (es->mode == ESM_MODE_CAPTURE) { 969 snd_es1968_trigger_apu(chip, es->apu[2], 0); 970 snd_es1968_trigger_apu(chip, es->apu[3], 0); 971 } 972 spin_unlock(&chip->reg_lock); 973 } 974 975 /* set the wavecache control reg */ 976 static void snd_es1968_program_wavecache(struct es1968 *chip, struct esschan *es, 977 int channel, u32 addr, int capture) 978 { 979 u32 tmpval = (addr - 0x10) & 0xFFF8; 980 981 if (! capture) { 982 if (!(es->fmt & ESS_FMT_16BIT)) 983 tmpval |= 4; /* 8bit */ 984 if (es->fmt & ESS_FMT_STEREO) 985 tmpval |= 2; /* stereo */ 986 } 987 988 /* set the wavecache control reg */ 989 wave_set_register(chip, es->apu[channel] << 3, tmpval); 990 991 #ifdef CONFIG_PM 992 es->wc_map[channel] = tmpval; 993 #endif 994 } 995 996 997 static void snd_es1968_playback_setup(struct es1968 *chip, struct esschan *es, 998 struct snd_pcm_runtime *runtime) 999 { 1000 u32 pa; 1001 int high_apu = 0; 1002 int channel, apu; 1003 int i, size; 1004 unsigned long flags; 1005 u32 freq; 1006 1007 size = es->dma_size >> es->wav_shift; 1008 1009 if (es->fmt & ESS_FMT_STEREO) 1010 high_apu++; 1011 1012 for (channel = 0; channel <= high_apu; channel++) { 1013 apu = es->apu[channel]; 1014 1015 snd_es1968_program_wavecache(chip, es, channel, es->memory->buf.addr, 0); 1016 1017 /* Offset to PCMBAR */ 1018 pa = es->memory->buf.addr; 1019 pa -= chip->dma.addr; 1020 pa >>= 1; /* words */ 1021 1022 pa |= 0x00400000; /* System RAM (Bit 22) */ 1023 1024 if (es->fmt & ESS_FMT_STEREO) { 1025 /* Enable stereo */ 1026 if (channel) 1027 pa |= 0x00800000; /* (Bit 23) */ 1028 if (es->fmt & ESS_FMT_16BIT) 1029 pa >>= 1; 1030 } 1031 1032 /* base offset of dma calcs when reading the pointer 1033 on this left one */ 1034 es->base[channel] = pa & 0xFFFF; 1035 1036 for (i = 0; i < 16; i++) 1037 apu_set_register(chip, apu, i, 0x0000); 1038 1039 /* Load the buffer into the wave engine */ 1040 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xFF) << 8); 1041 apu_set_register(chip, apu, 5, pa & 0xFFFF); 1042 apu_set_register(chip, apu, 6, (pa + size) & 0xFFFF); 1043 /* setting loop == sample len */ 1044 apu_set_register(chip, apu, 7, size); 1045 1046 /* clear effects/env.. */ 1047 apu_set_register(chip, apu, 8, 0x0000); 1048 /* set amp now to 0xd0 (?), low byte is 'amplitude dest'? */ 1049 apu_set_register(chip, apu, 9, 0xD000); 1050 1051 /* clear routing stuff */ 1052 apu_set_register(chip, apu, 11, 0x0000); 1053 /* dma on, no envelopes, filter to all 1s) */ 1054 apu_set_register(chip, apu, 0, 0x400F); 1055 1056 if (es->fmt & ESS_FMT_16BIT) 1057 es->apu_mode[channel] = ESM_APU_16BITLINEAR; 1058 else 1059 es->apu_mode[channel] = ESM_APU_8BITLINEAR; 1060 1061 if (es->fmt & ESS_FMT_STEREO) { 1062 /* set panning: left or right */ 1063 /* Check: different panning. On my Canyon 3D Chipset the 1064 Channels are swapped. I don't know, about the output 1065 to the SPDif Link. Perhaps you have to change this 1066 and not the APU Regs 4-5. */ 1067 apu_set_register(chip, apu, 10, 1068 0x8F00 | (channel ? 0 : 0x10)); 1069 es->apu_mode[channel] += 1; /* stereo */ 1070 } else 1071 apu_set_register(chip, apu, 10, 0x8F08); 1072 } 1073 1074 spin_lock_irqsave(&chip->reg_lock, flags); 1075 /* clear WP interrupts */ 1076 outw(1, chip->io_port + 0x04); 1077 /* enable WP ints */ 1078 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ); 1079 spin_unlock_irqrestore(&chip->reg_lock, flags); 1080 1081 freq = runtime->rate; 1082 /* set frequency */ 1083 if (freq > 48000) 1084 freq = 48000; 1085 if (freq < 4000) 1086 freq = 4000; 1087 1088 /* hmmm.. */ 1089 if (!(es->fmt & ESS_FMT_16BIT) && !(es->fmt & ESS_FMT_STEREO)) 1090 freq >>= 1; 1091 1092 freq = snd_es1968_compute_rate(chip, freq); 1093 1094 /* Load the frequency, turn on 6dB */ 1095 snd_es1968_apu_set_freq(chip, es->apu[0], freq); 1096 snd_es1968_apu_set_freq(chip, es->apu[1], freq); 1097 } 1098 1099 1100 static void init_capture_apu(struct es1968 *chip, struct esschan *es, int channel, 1101 unsigned int pa, unsigned int bsize, 1102 int mode, int route) 1103 { 1104 int i, apu = es->apu[channel]; 1105 1106 es->apu_mode[channel] = mode; 1107 1108 /* set the wavecache control reg */ 1109 snd_es1968_program_wavecache(chip, es, channel, pa, 1); 1110 1111 /* Offset to PCMBAR */ 1112 pa -= chip->dma.addr; 1113 pa >>= 1; /* words */ 1114 1115 /* base offset of dma calcs when reading the pointer 1116 on this left one */ 1117 es->base[channel] = pa & 0xFFFF; 1118 pa |= 0x00400000; /* bit 22 -> System RAM */ 1119 1120 /* Begin loading the APU */ 1121 for (i = 0; i < 16; i++) 1122 apu_set_register(chip, apu, i, 0x0000); 1123 1124 /* need to enable subgroups.. and we should probably 1125 have different groups for different /dev/dsps.. */ 1126 apu_set_register(chip, apu, 2, 0x8); 1127 1128 /* Load the buffer into the wave engine */ 1129 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xFF) << 8); 1130 apu_set_register(chip, apu, 5, pa & 0xFFFF); 1131 apu_set_register(chip, apu, 6, (pa + bsize) & 0xFFFF); 1132 apu_set_register(chip, apu, 7, bsize); 1133 /* clear effects/env.. */ 1134 apu_set_register(chip, apu, 8, 0x00F0); 1135 /* amplitude now? sure. why not. */ 1136 apu_set_register(chip, apu, 9, 0x0000); 1137 /* set filter tune, radius, polar pan */ 1138 apu_set_register(chip, apu, 10, 0x8F08); 1139 /* route input */ 1140 apu_set_register(chip, apu, 11, route); 1141 /* dma on, no envelopes, filter to all 1s) */ 1142 apu_set_register(chip, apu, 0, 0x400F); 1143 } 1144 1145 static void snd_es1968_capture_setup(struct es1968 *chip, struct esschan *es, 1146 struct snd_pcm_runtime *runtime) 1147 { 1148 int size; 1149 u32 freq; 1150 unsigned long flags; 1151 1152 size = es->dma_size >> es->wav_shift; 1153 1154 /* APU assignments: 1155 0 = mono/left SRC 1156 1 = right SRC 1157 2 = mono/left Input Mixer 1158 3 = right Input Mixer 1159 */ 1160 /* data seems to flow from the codec, through an apu into 1161 the 'mixbuf' bit of page, then through the SRC apu 1162 and out to the real 'buffer'. ok. sure. */ 1163 1164 /* input mixer (left/mono) */ 1165 /* parallel in crap, see maestro reg 0xC [8-11] */ 1166 init_capture_apu(chip, es, 2, 1167 es->mixbuf->buf.addr, ESM_MIXBUF_SIZE/4, /* in words */ 1168 ESM_APU_INPUTMIXER, 0x14); 1169 /* SRC (left/mono); get input from inputing apu */ 1170 init_capture_apu(chip, es, 0, es->memory->buf.addr, size, 1171 ESM_APU_SRCONVERTOR, es->apu[2]); 1172 if (es->fmt & ESS_FMT_STEREO) { 1173 /* input mixer (right) */ 1174 init_capture_apu(chip, es, 3, 1175 es->mixbuf->buf.addr + ESM_MIXBUF_SIZE/2, 1176 ESM_MIXBUF_SIZE/4, /* in words */ 1177 ESM_APU_INPUTMIXER, 0x15); 1178 /* SRC (right) */ 1179 init_capture_apu(chip, es, 1, 1180 es->memory->buf.addr + size*2, size, 1181 ESM_APU_SRCONVERTOR, es->apu[3]); 1182 } 1183 1184 freq = runtime->rate; 1185 /* Sample Rate conversion APUs don't like 0x10000 for their rate */ 1186 if (freq > 47999) 1187 freq = 47999; 1188 if (freq < 4000) 1189 freq = 4000; 1190 1191 freq = snd_es1968_compute_rate(chip, freq); 1192 1193 /* Load the frequency, turn on 6dB */ 1194 snd_es1968_apu_set_freq(chip, es->apu[0], freq); 1195 snd_es1968_apu_set_freq(chip, es->apu[1], freq); 1196 1197 /* fix mixer rate at 48khz. and its _must_ be 0x10000. */ 1198 freq = 0x10000; 1199 snd_es1968_apu_set_freq(chip, es->apu[2], freq); 1200 snd_es1968_apu_set_freq(chip, es->apu[3], freq); 1201 1202 spin_lock_irqsave(&chip->reg_lock, flags); 1203 /* clear WP interrupts */ 1204 outw(1, chip->io_port + 0x04); 1205 /* enable WP ints */ 1206 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ); 1207 spin_unlock_irqrestore(&chip->reg_lock, flags); 1208 } 1209 1210 /******************* 1211 * ALSA Interface * 1212 *******************/ 1213 1214 static int snd_es1968_pcm_prepare(struct snd_pcm_substream *substream) 1215 { 1216 struct es1968 *chip = snd_pcm_substream_chip(substream); 1217 struct snd_pcm_runtime *runtime = substream->runtime; 1218 struct esschan *es = runtime->private_data; 1219 1220 es->dma_size = snd_pcm_lib_buffer_bytes(substream); 1221 es->frag_size = snd_pcm_lib_period_bytes(substream); 1222 1223 es->wav_shift = 1; /* maestro handles always 16bit */ 1224 es->fmt = 0; 1225 if (snd_pcm_format_width(runtime->format) == 16) 1226 es->fmt |= ESS_FMT_16BIT; 1227 if (runtime->channels > 1) { 1228 es->fmt |= ESS_FMT_STEREO; 1229 if (es->fmt & ESS_FMT_16BIT) /* 8bit is already word shifted */ 1230 es->wav_shift++; 1231 } 1232 es->bob_freq = snd_es1968_calc_bob_rate(chip, es, runtime); 1233 1234 switch (es->mode) { 1235 case ESM_MODE_PLAY: 1236 snd_es1968_playback_setup(chip, es, runtime); 1237 break; 1238 case ESM_MODE_CAPTURE: 1239 snd_es1968_capture_setup(chip, es, runtime); 1240 break; 1241 } 1242 1243 return 0; 1244 } 1245 1246 static int snd_es1968_pcm_trigger(struct snd_pcm_substream *substream, int cmd) 1247 { 1248 struct es1968 *chip = snd_pcm_substream_chip(substream); 1249 struct esschan *es = substream->runtime->private_data; 1250 1251 spin_lock(&chip->substream_lock); 1252 switch (cmd) { 1253 case SNDRV_PCM_TRIGGER_START: 1254 case SNDRV_PCM_TRIGGER_RESUME: 1255 if (es->running) 1256 break; 1257 snd_es1968_bob_inc(chip, es->bob_freq); 1258 es->count = 0; 1259 es->hwptr = 0; 1260 snd_es1968_pcm_start(chip, es); 1261 es->running = 1; 1262 break; 1263 case SNDRV_PCM_TRIGGER_STOP: 1264 case SNDRV_PCM_TRIGGER_SUSPEND: 1265 if (! es->running) 1266 break; 1267 snd_es1968_pcm_stop(chip, es); 1268 es->running = 0; 1269 snd_es1968_bob_dec(chip); 1270 break; 1271 } 1272 spin_unlock(&chip->substream_lock); 1273 return 0; 1274 } 1275 1276 static snd_pcm_uframes_t snd_es1968_pcm_pointer(struct snd_pcm_substream *substream) 1277 { 1278 struct es1968 *chip = snd_pcm_substream_chip(substream); 1279 struct esschan *es = substream->runtime->private_data; 1280 unsigned int ptr; 1281 1282 ptr = snd_es1968_get_dma_ptr(chip, es) << es->wav_shift; 1283 1284 return bytes_to_frames(substream->runtime, ptr % es->dma_size); 1285 } 1286 1287 static struct snd_pcm_hardware snd_es1968_playback = { 1288 .info = (SNDRV_PCM_INFO_MMAP | 1289 SNDRV_PCM_INFO_MMAP_VALID | 1290 SNDRV_PCM_INFO_INTERLEAVED | 1291 SNDRV_PCM_INFO_BLOCK_TRANSFER | 1292 /*SNDRV_PCM_INFO_PAUSE |*/ 1293 SNDRV_PCM_INFO_RESUME), 1294 .formats = SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE, 1295 .rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000, 1296 .rate_min = 4000, 1297 .rate_max = 48000, 1298 .channels_min = 1, 1299 .channels_max = 2, 1300 .buffer_bytes_max = 65536, 1301 .period_bytes_min = 256, 1302 .period_bytes_max = 65536, 1303 .periods_min = 1, 1304 .periods_max = 1024, 1305 .fifo_size = 0, 1306 }; 1307 1308 static struct snd_pcm_hardware snd_es1968_capture = { 1309 .info = (SNDRV_PCM_INFO_NONINTERLEAVED | 1310 SNDRV_PCM_INFO_MMAP | 1311 SNDRV_PCM_INFO_MMAP_VALID | 1312 SNDRV_PCM_INFO_BLOCK_TRANSFER | 1313 /*SNDRV_PCM_INFO_PAUSE |*/ 1314 SNDRV_PCM_INFO_RESUME), 1315 .formats = /*SNDRV_PCM_FMTBIT_U8 |*/ SNDRV_PCM_FMTBIT_S16_LE, 1316 .rates = SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000, 1317 .rate_min = 4000, 1318 .rate_max = 48000, 1319 .channels_min = 1, 1320 .channels_max = 2, 1321 .buffer_bytes_max = 65536, 1322 .period_bytes_min = 256, 1323 .period_bytes_max = 65536, 1324 .periods_min = 1, 1325 .periods_max = 1024, 1326 .fifo_size = 0, 1327 }; 1328 1329 /* ************************* 1330 * DMA memory management * 1331 *************************/ 1332 1333 /* Because the Maestro can only take addresses relative to the PCM base address 1334 register :( */ 1335 1336 static int calc_available_memory_size(struct es1968 *chip) 1337 { 1338 int max_size = 0; 1339 struct esm_memory *buf; 1340 1341 mutex_lock(&chip->memory_mutex); 1342 list_for_each_entry(buf, &chip->buf_list, list) { 1343 if (buf->empty && buf->buf.bytes > max_size) 1344 max_size = buf->buf.bytes; 1345 } 1346 mutex_unlock(&chip->memory_mutex); 1347 if (max_size >= 128*1024) 1348 max_size = 127*1024; 1349 return max_size; 1350 } 1351 1352 /* allocate a new memory chunk with the specified size */ 1353 static struct esm_memory *snd_es1968_new_memory(struct es1968 *chip, int size) 1354 { 1355 struct esm_memory *buf; 1356 1357 size = ALIGN(size, ESM_MEM_ALIGN); 1358 mutex_lock(&chip->memory_mutex); 1359 list_for_each_entry(buf, &chip->buf_list, list) { 1360 if (buf->empty && buf->buf.bytes >= size) 1361 goto __found; 1362 } 1363 mutex_unlock(&chip->memory_mutex); 1364 return NULL; 1365 1366 __found: 1367 if (buf->buf.bytes > size) { 1368 struct esm_memory *chunk = kmalloc(sizeof(*chunk), GFP_KERNEL); 1369 if (chunk == NULL) { 1370 mutex_unlock(&chip->memory_mutex); 1371 return NULL; 1372 } 1373 chunk->buf = buf->buf; 1374 chunk->buf.bytes -= size; 1375 chunk->buf.area += size; 1376 chunk->buf.addr += size; 1377 chunk->empty = 1; 1378 buf->buf.bytes = size; 1379 list_add(&chunk->list, &buf->list); 1380 } 1381 buf->empty = 0; 1382 mutex_unlock(&chip->memory_mutex); 1383 return buf; 1384 } 1385 1386 /* free a memory chunk */ 1387 static void snd_es1968_free_memory(struct es1968 *chip, struct esm_memory *buf) 1388 { 1389 struct esm_memory *chunk; 1390 1391 mutex_lock(&chip->memory_mutex); 1392 buf->empty = 1; 1393 if (buf->list.prev != &chip->buf_list) { 1394 chunk = list_entry(buf->list.prev, struct esm_memory, list); 1395 if (chunk->empty) { 1396 chunk->buf.bytes += buf->buf.bytes; 1397 list_del(&buf->list); 1398 kfree(buf); 1399 buf = chunk; 1400 } 1401 } 1402 if (buf->list.next != &chip->buf_list) { 1403 chunk = list_entry(buf->list.next, struct esm_memory, list); 1404 if (chunk->empty) { 1405 buf->buf.bytes += chunk->buf.bytes; 1406 list_del(&chunk->list); 1407 kfree(chunk); 1408 } 1409 } 1410 mutex_unlock(&chip->memory_mutex); 1411 } 1412 1413 static void snd_es1968_free_dmabuf(struct es1968 *chip) 1414 { 1415 struct list_head *p; 1416 1417 if (! chip->dma.area) 1418 return; 1419 snd_dma_reserve_buf(&chip->dma, snd_dma_pci_buf_id(chip->pci)); 1420 while ((p = chip->buf_list.next) != &chip->buf_list) { 1421 struct esm_memory *chunk = list_entry(p, struct esm_memory, list); 1422 list_del(p); 1423 kfree(chunk); 1424 } 1425 } 1426 1427 static int __devinit 1428 snd_es1968_init_dmabuf(struct es1968 *chip) 1429 { 1430 int err; 1431 struct esm_memory *chunk; 1432 1433 chip->dma.dev.type = SNDRV_DMA_TYPE_DEV; 1434 chip->dma.dev.dev = snd_dma_pci_data(chip->pci); 1435 if (! snd_dma_get_reserved_buf(&chip->dma, snd_dma_pci_buf_id(chip->pci))) { 1436 err = snd_dma_alloc_pages_fallback(SNDRV_DMA_TYPE_DEV, 1437 snd_dma_pci_data(chip->pci), 1438 chip->total_bufsize, &chip->dma); 1439 if (err < 0 || ! chip->dma.area) { 1440 snd_printk(KERN_ERR "es1968: can't allocate dma pages for size %d\n", 1441 chip->total_bufsize); 1442 return -ENOMEM; 1443 } 1444 if ((chip->dma.addr + chip->dma.bytes - 1) & ~((1 << 28) - 1)) { 1445 snd_dma_free_pages(&chip->dma); 1446 snd_printk(KERN_ERR "es1968: DMA buffer beyond 256MB.\n"); 1447 return -ENOMEM; 1448 } 1449 } 1450 1451 INIT_LIST_HEAD(&chip->buf_list); 1452 /* allocate an empty chunk */ 1453 chunk = kmalloc(sizeof(*chunk), GFP_KERNEL); 1454 if (chunk == NULL) { 1455 snd_es1968_free_dmabuf(chip); 1456 return -ENOMEM; 1457 } 1458 memset(chip->dma.area, 0, ESM_MEM_ALIGN); 1459 chunk->buf = chip->dma; 1460 chunk->buf.area += ESM_MEM_ALIGN; 1461 chunk->buf.addr += ESM_MEM_ALIGN; 1462 chunk->buf.bytes -= ESM_MEM_ALIGN; 1463 chunk->empty = 1; 1464 list_add(&chunk->list, &chip->buf_list); 1465 1466 return 0; 1467 } 1468 1469 /* setup the dma_areas */ 1470 /* buffer is extracted from the pre-allocated memory chunk */ 1471 static int snd_es1968_hw_params(struct snd_pcm_substream *substream, 1472 struct snd_pcm_hw_params *hw_params) 1473 { 1474 struct es1968 *chip = snd_pcm_substream_chip(substream); 1475 struct snd_pcm_runtime *runtime = substream->runtime; 1476 struct esschan *chan = runtime->private_data; 1477 int size = params_buffer_bytes(hw_params); 1478 1479 if (chan->memory) { 1480 if (chan->memory->buf.bytes >= size) { 1481 runtime->dma_bytes = size; 1482 return 0; 1483 } 1484 snd_es1968_free_memory(chip, chan->memory); 1485 } 1486 chan->memory = snd_es1968_new_memory(chip, size); 1487 if (chan->memory == NULL) { 1488 // snd_printd("cannot allocate dma buffer: size = %d\n", size); 1489 return -ENOMEM; 1490 } 1491 snd_pcm_set_runtime_buffer(substream, &chan->memory->buf); 1492 return 1; /* area was changed */ 1493 } 1494 1495 /* remove dma areas if allocated */ 1496 static int snd_es1968_hw_free(struct snd_pcm_substream *substream) 1497 { 1498 struct es1968 *chip = snd_pcm_substream_chip(substream); 1499 struct snd_pcm_runtime *runtime = substream->runtime; 1500 struct esschan *chan; 1501 1502 if (runtime->private_data == NULL) 1503 return 0; 1504 chan = runtime->private_data; 1505 if (chan->memory) { 1506 snd_es1968_free_memory(chip, chan->memory); 1507 chan->memory = NULL; 1508 } 1509 return 0; 1510 } 1511 1512 1513 /* 1514 * allocate APU pair 1515 */ 1516 static int snd_es1968_alloc_apu_pair(struct es1968 *chip, int type) 1517 { 1518 int apu; 1519 1520 for (apu = 0; apu < NR_APUS; apu += 2) { 1521 if (chip->apu[apu] == ESM_APU_FREE && 1522 chip->apu[apu + 1] == ESM_APU_FREE) { 1523 chip->apu[apu] = chip->apu[apu + 1] = type; 1524 return apu; 1525 } 1526 } 1527 return -EBUSY; 1528 } 1529 1530 /* 1531 * release APU pair 1532 */ 1533 static void snd_es1968_free_apu_pair(struct es1968 *chip, int apu) 1534 { 1535 chip->apu[apu] = chip->apu[apu + 1] = ESM_APU_FREE; 1536 } 1537 1538 1539 /****************** 1540 * PCM open/close * 1541 ******************/ 1542 1543 static int snd_es1968_playback_open(struct snd_pcm_substream *substream) 1544 { 1545 struct es1968 *chip = snd_pcm_substream_chip(substream); 1546 struct snd_pcm_runtime *runtime = substream->runtime; 1547 struct esschan *es; 1548 int apu1; 1549 1550 /* search 2 APUs */ 1551 apu1 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_PLAY); 1552 if (apu1 < 0) 1553 return apu1; 1554 1555 es = kzalloc(sizeof(*es), GFP_KERNEL); 1556 if (!es) { 1557 snd_es1968_free_apu_pair(chip, apu1); 1558 return -ENOMEM; 1559 } 1560 1561 es->apu[0] = apu1; 1562 es->apu[1] = apu1 + 1; 1563 es->apu_mode[0] = 0; 1564 es->apu_mode[1] = 0; 1565 es->running = 0; 1566 es->substream = substream; 1567 es->mode = ESM_MODE_PLAY; 1568 1569 runtime->private_data = es; 1570 runtime->hw = snd_es1968_playback; 1571 runtime->hw.buffer_bytes_max = runtime->hw.period_bytes_max = 1572 calc_available_memory_size(chip); 1573 1574 spin_lock_irq(&chip->substream_lock); 1575 list_add(&es->list, &chip->substream_list); 1576 spin_unlock_irq(&chip->substream_lock); 1577 1578 return 0; 1579 } 1580 1581 static int snd_es1968_capture_open(struct snd_pcm_substream *substream) 1582 { 1583 struct snd_pcm_runtime *runtime = substream->runtime; 1584 struct es1968 *chip = snd_pcm_substream_chip(substream); 1585 struct esschan *es; 1586 int apu1, apu2; 1587 1588 apu1 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_CAPTURE); 1589 if (apu1 < 0) 1590 return apu1; 1591 apu2 = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_RATECONV); 1592 if (apu2 < 0) { 1593 snd_es1968_free_apu_pair(chip, apu1); 1594 return apu2; 1595 } 1596 1597 es = kzalloc(sizeof(*es), GFP_KERNEL); 1598 if (!es) { 1599 snd_es1968_free_apu_pair(chip, apu1); 1600 snd_es1968_free_apu_pair(chip, apu2); 1601 return -ENOMEM; 1602 } 1603 1604 es->apu[0] = apu1; 1605 es->apu[1] = apu1 + 1; 1606 es->apu[2] = apu2; 1607 es->apu[3] = apu2 + 1; 1608 es->apu_mode[0] = 0; 1609 es->apu_mode[1] = 0; 1610 es->apu_mode[2] = 0; 1611 es->apu_mode[3] = 0; 1612 es->running = 0; 1613 es->substream = substream; 1614 es->mode = ESM_MODE_CAPTURE; 1615 1616 /* get mixbuffer */ 1617 if ((es->mixbuf = snd_es1968_new_memory(chip, ESM_MIXBUF_SIZE)) == NULL) { 1618 snd_es1968_free_apu_pair(chip, apu1); 1619 snd_es1968_free_apu_pair(chip, apu2); 1620 kfree(es); 1621 return -ENOMEM; 1622 } 1623 memset(es->mixbuf->buf.area, 0, ESM_MIXBUF_SIZE); 1624 1625 runtime->private_data = es; 1626 runtime->hw = snd_es1968_capture; 1627 runtime->hw.buffer_bytes_max = runtime->hw.period_bytes_max = 1628 calc_available_memory_size(chip) - 1024; /* keep MIXBUF size */ 1629 snd_pcm_hw_constraint_pow2(runtime, 0, SNDRV_PCM_HW_PARAM_BUFFER_BYTES); 1630 1631 spin_lock_irq(&chip->substream_lock); 1632 list_add(&es->list, &chip->substream_list); 1633 spin_unlock_irq(&chip->substream_lock); 1634 1635 return 0; 1636 } 1637 1638 static int snd_es1968_playback_close(struct snd_pcm_substream *substream) 1639 { 1640 struct es1968 *chip = snd_pcm_substream_chip(substream); 1641 struct esschan *es; 1642 1643 if (substream->runtime->private_data == NULL) 1644 return 0; 1645 es = substream->runtime->private_data; 1646 spin_lock_irq(&chip->substream_lock); 1647 list_del(&es->list); 1648 spin_unlock_irq(&chip->substream_lock); 1649 snd_es1968_free_apu_pair(chip, es->apu[0]); 1650 kfree(es); 1651 1652 return 0; 1653 } 1654 1655 static int snd_es1968_capture_close(struct snd_pcm_substream *substream) 1656 { 1657 struct es1968 *chip = snd_pcm_substream_chip(substream); 1658 struct esschan *es; 1659 1660 if (substream->runtime->private_data == NULL) 1661 return 0; 1662 es = substream->runtime->private_data; 1663 spin_lock_irq(&chip->substream_lock); 1664 list_del(&es->list); 1665 spin_unlock_irq(&chip->substream_lock); 1666 snd_es1968_free_memory(chip, es->mixbuf); 1667 snd_es1968_free_apu_pair(chip, es->apu[0]); 1668 snd_es1968_free_apu_pair(chip, es->apu[2]); 1669 kfree(es); 1670 1671 return 0; 1672 } 1673 1674 static struct snd_pcm_ops snd_es1968_playback_ops = { 1675 .open = snd_es1968_playback_open, 1676 .close = snd_es1968_playback_close, 1677 .ioctl = snd_pcm_lib_ioctl, 1678 .hw_params = snd_es1968_hw_params, 1679 .hw_free = snd_es1968_hw_free, 1680 .prepare = snd_es1968_pcm_prepare, 1681 .trigger = snd_es1968_pcm_trigger, 1682 .pointer = snd_es1968_pcm_pointer, 1683 }; 1684 1685 static struct snd_pcm_ops snd_es1968_capture_ops = { 1686 .open = snd_es1968_capture_open, 1687 .close = snd_es1968_capture_close, 1688 .ioctl = snd_pcm_lib_ioctl, 1689 .hw_params = snd_es1968_hw_params, 1690 .hw_free = snd_es1968_hw_free, 1691 .prepare = snd_es1968_pcm_prepare, 1692 .trigger = snd_es1968_pcm_trigger, 1693 .pointer = snd_es1968_pcm_pointer, 1694 }; 1695 1696 1697 /* 1698 * measure clock 1699 */ 1700 #define CLOCK_MEASURE_BUFSIZE 16768 /* enough large for a single shot */ 1701 1702 static void __devinit es1968_measure_clock(struct es1968 *chip) 1703 { 1704 int i, apu; 1705 unsigned int pa, offset, t; 1706 struct esm_memory *memory; 1707 struct timeval start_time, stop_time; 1708 1709 if (chip->clock == 0) 1710 chip->clock = 48000; /* default clock value */ 1711 1712 /* search 2 APUs (although one apu is enough) */ 1713 if ((apu = snd_es1968_alloc_apu_pair(chip, ESM_APU_PCM_PLAY)) < 0) { 1714 snd_printk(KERN_ERR "Hmm, cannot find empty APU pair!?\n"); 1715 return; 1716 } 1717 if ((memory = snd_es1968_new_memory(chip, CLOCK_MEASURE_BUFSIZE)) == NULL) { 1718 snd_printk(KERN_ERR "cannot allocate dma buffer - using default clock %d\n", chip->clock); 1719 snd_es1968_free_apu_pair(chip, apu); 1720 return; 1721 } 1722 1723 memset(memory->buf.area, 0, CLOCK_MEASURE_BUFSIZE); 1724 1725 wave_set_register(chip, apu << 3, (memory->buf.addr - 0x10) & 0xfff8); 1726 1727 pa = (unsigned int)((memory->buf.addr - chip->dma.addr) >> 1); 1728 pa |= 0x00400000; /* System RAM (Bit 22) */ 1729 1730 /* initialize apu */ 1731 for (i = 0; i < 16; i++) 1732 apu_set_register(chip, apu, i, 0x0000); 1733 1734 apu_set_register(chip, apu, 0, 0x400f); 1735 apu_set_register(chip, apu, 4, ((pa >> 16) & 0xff) << 8); 1736 apu_set_register(chip, apu, 5, pa & 0xffff); 1737 apu_set_register(chip, apu, 6, (pa + CLOCK_MEASURE_BUFSIZE/2) & 0xffff); 1738 apu_set_register(chip, apu, 7, CLOCK_MEASURE_BUFSIZE/2); 1739 apu_set_register(chip, apu, 8, 0x0000); 1740 apu_set_register(chip, apu, 9, 0xD000); 1741 apu_set_register(chip, apu, 10, 0x8F08); 1742 apu_set_register(chip, apu, 11, 0x0000); 1743 spin_lock_irq(&chip->reg_lock); 1744 outw(1, chip->io_port + 0x04); /* clear WP interrupts */ 1745 outw(inw(chip->io_port + ESM_PORT_HOST_IRQ) | ESM_HIRQ_DSIE, chip->io_port + ESM_PORT_HOST_IRQ); /* enable WP ints */ 1746 spin_unlock_irq(&chip->reg_lock); 1747 1748 snd_es1968_apu_set_freq(chip, apu, ((unsigned int)48000 << 16) / chip->clock); /* 48000 Hz */ 1749 1750 chip->in_measurement = 1; 1751 chip->measure_apu = apu; 1752 spin_lock_irq(&chip->reg_lock); 1753 snd_es1968_bob_inc(chip, ESM_BOB_FREQ); 1754 __apu_set_register(chip, apu, 5, pa & 0xffff); 1755 snd_es1968_trigger_apu(chip, apu, ESM_APU_16BITLINEAR); 1756 do_gettimeofday(&start_time); 1757 spin_unlock_irq(&chip->reg_lock); 1758 msleep(50); 1759 spin_lock_irq(&chip->reg_lock); 1760 offset = __apu_get_register(chip, apu, 5); 1761 do_gettimeofday(&stop_time); 1762 snd_es1968_trigger_apu(chip, apu, 0); /* stop */ 1763 snd_es1968_bob_dec(chip); 1764 chip->in_measurement = 0; 1765 spin_unlock_irq(&chip->reg_lock); 1766 1767 /* check the current position */ 1768 offset -= (pa & 0xffff); 1769 offset &= 0xfffe; 1770 offset += chip->measure_count * (CLOCK_MEASURE_BUFSIZE/2); 1771 1772 t = stop_time.tv_sec - start_time.tv_sec; 1773 t *= 1000000; 1774 if (stop_time.tv_usec < start_time.tv_usec) 1775 t -= start_time.tv_usec - stop_time.tv_usec; 1776 else 1777 t += stop_time.tv_usec - start_time.tv_usec; 1778 if (t == 0) { 1779 snd_printk(KERN_ERR "?? calculation error..\n"); 1780 } else { 1781 offset *= 1000; 1782 offset = (offset / t) * 1000 + ((offset % t) * 1000) / t; 1783 if (offset < 47500 || offset > 48500) { 1784 if (offset >= 40000 && offset <= 50000) 1785 chip->clock = (chip->clock * offset) / 48000; 1786 } 1787 printk(KERN_INFO "es1968: clocking to %d\n", chip->clock); 1788 } 1789 snd_es1968_free_memory(chip, memory); 1790 snd_es1968_free_apu_pair(chip, apu); 1791 } 1792 1793 1794 /* 1795 */ 1796 1797 static void snd_es1968_pcm_free(struct snd_pcm *pcm) 1798 { 1799 struct es1968 *esm = pcm->private_data; 1800 snd_es1968_free_dmabuf(esm); 1801 esm->pcm = NULL; 1802 } 1803 1804 static int __devinit 1805 snd_es1968_pcm(struct es1968 *chip, int device) 1806 { 1807 struct snd_pcm *pcm; 1808 int err; 1809 1810 /* get DMA buffer */ 1811 if ((err = snd_es1968_init_dmabuf(chip)) < 0) 1812 return err; 1813 1814 /* set PCMBAR */ 1815 wave_set_register(chip, 0x01FC, chip->dma.addr >> 12); 1816 wave_set_register(chip, 0x01FD, chip->dma.addr >> 12); 1817 wave_set_register(chip, 0x01FE, chip->dma.addr >> 12); 1818 wave_set_register(chip, 0x01FF, chip->dma.addr >> 12); 1819 1820 if ((err = snd_pcm_new(chip->card, "ESS Maestro", device, 1821 chip->playback_streams, 1822 chip->capture_streams, &pcm)) < 0) 1823 return err; 1824 1825 pcm->private_data = chip; 1826 pcm->private_free = snd_es1968_pcm_free; 1827 1828 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_es1968_playback_ops); 1829 snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_es1968_capture_ops); 1830 1831 pcm->info_flags = 0; 1832 1833 strcpy(pcm->name, "ESS Maestro"); 1834 1835 chip->pcm = pcm; 1836 1837 return 0; 1838 } 1839 /* 1840 * suppress jitter on some maestros when playing stereo 1841 */ 1842 static void snd_es1968_suppress_jitter(struct es1968 *chip, struct esschan *es) 1843 { 1844 unsigned int cp1; 1845 unsigned int cp2; 1846 unsigned int diff; 1847 1848 cp1 = __apu_get_register(chip, 0, 5); 1849 cp2 = __apu_get_register(chip, 1, 5); 1850 diff = (cp1 > cp2 ? cp1 - cp2 : cp2 - cp1); 1851 1852 if (diff > 1) 1853 __maestro_write(chip, IDR0_DATA_PORT, cp1); 1854 } 1855 1856 /* 1857 * update pointer 1858 */ 1859 static void snd_es1968_update_pcm(struct es1968 *chip, struct esschan *es) 1860 { 1861 unsigned int hwptr; 1862 unsigned int diff; 1863 struct snd_pcm_substream *subs = es->substream; 1864 1865 if (subs == NULL || !es->running) 1866 return; 1867 1868 hwptr = snd_es1968_get_dma_ptr(chip, es) << es->wav_shift; 1869 hwptr %= es->dma_size; 1870 1871 diff = (es->dma_size + hwptr - es->hwptr) % es->dma_size; 1872 1873 es->hwptr = hwptr; 1874 es->count += diff; 1875 1876 if (es->count > es->frag_size) { 1877 spin_unlock(&chip->substream_lock); 1878 snd_pcm_period_elapsed(subs); 1879 spin_lock(&chip->substream_lock); 1880 es->count %= es->frag_size; 1881 } 1882 } 1883 1884 /* The hardware volume works by incrementing / decrementing 2 counters 1885 (without wrap around) in response to volume button presses and then 1886 generating an interrupt. The pair of counters is stored in bits 1-3 and 5-7 1887 of a byte wide register. The meaning of bits 0 and 4 is unknown. */ 1888 static void es1968_update_hw_volume(struct work_struct *work) 1889 { 1890 struct es1968 *chip = container_of(work, struct es1968, hwvol_work); 1891 int x, val; 1892 1893 /* Figure out which volume control button was pushed, 1894 based on differences from the default register 1895 values. */ 1896 x = inb(chip->io_port + 0x1c) & 0xee; 1897 /* Reset the volume control registers. */ 1898 outb(0x88, chip->io_port + 0x1c); 1899 outb(0x88, chip->io_port + 0x1d); 1900 outb(0x88, chip->io_port + 0x1e); 1901 outb(0x88, chip->io_port + 0x1f); 1902 1903 if (chip->in_suspend) 1904 return; 1905 1906 #ifndef CONFIG_SND_ES1968_INPUT 1907 if (! chip->master_switch || ! chip->master_volume) 1908 return; 1909 1910 val = snd_ac97_read(chip->ac97, AC97_MASTER); 1911 switch (x) { 1912 case 0x88: 1913 /* mute */ 1914 val ^= 0x8000; 1915 break; 1916 case 0xaa: 1917 /* volume up */ 1918 if ((val & 0x7f) > 0) 1919 val--; 1920 if ((val & 0x7f00) > 0) 1921 val -= 0x0100; 1922 break; 1923 case 0x66: 1924 /* volume down */ 1925 if ((val & 0x7f) < 0x1f) 1926 val++; 1927 if ((val & 0x7f00) < 0x1f00) 1928 val += 0x0100; 1929 break; 1930 } 1931 if (snd_ac97_update(chip->ac97, AC97_MASTER, val)) 1932 snd_ctl_notify(chip->card, SNDRV_CTL_EVENT_MASK_VALUE, 1933 &chip->master_volume->id); 1934 #else 1935 if (!chip->input_dev) 1936 return; 1937 1938 val = 0; 1939 switch (x) { 1940 case 0x88: 1941 /* The counters have not changed, yet we've received a HV 1942 interrupt. According to tests run by various people this 1943 happens when pressing the mute button. */ 1944 val = KEY_MUTE; 1945 break; 1946 case 0xaa: 1947 /* counters increased by 1 -> volume up */ 1948 val = KEY_VOLUMEUP; 1949 break; 1950 case 0x66: 1951 /* counters decreased by 1 -> volume down */ 1952 val = KEY_VOLUMEDOWN; 1953 break; 1954 } 1955 1956 if (val) { 1957 input_report_key(chip->input_dev, val, 1); 1958 input_sync(chip->input_dev); 1959 input_report_key(chip->input_dev, val, 0); 1960 input_sync(chip->input_dev); 1961 } 1962 #endif 1963 } 1964 1965 /* 1966 * interrupt handler 1967 */ 1968 static irqreturn_t snd_es1968_interrupt(int irq, void *dev_id) 1969 { 1970 struct es1968 *chip = dev_id; 1971 u32 event; 1972 1973 if (!(event = inb(chip->io_port + 0x1A))) 1974 return IRQ_NONE; 1975 1976 outw(inw(chip->io_port + 4) & 1, chip->io_port + 4); 1977 1978 if (event & ESM_HWVOL_IRQ) 1979 schedule_work(&chip->hwvol_work); 1980 1981 /* else ack 'em all, i imagine */ 1982 outb(0xFF, chip->io_port + 0x1A); 1983 1984 if ((event & ESM_MPU401_IRQ) && chip->rmidi) { 1985 snd_mpu401_uart_interrupt(irq, chip->rmidi->private_data); 1986 } 1987 1988 if (event & ESM_SOUND_IRQ) { 1989 struct esschan *es; 1990 spin_lock(&chip->substream_lock); 1991 list_for_each_entry(es, &chip->substream_list, list) { 1992 if (es->running) { 1993 snd_es1968_update_pcm(chip, es); 1994 if (es->fmt & ESS_FMT_STEREO) 1995 snd_es1968_suppress_jitter(chip, es); 1996 } 1997 } 1998 spin_unlock(&chip->substream_lock); 1999 if (chip->in_measurement) { 2000 unsigned int curp = __apu_get_register(chip, chip->measure_apu, 5); 2001 if (curp < chip->measure_lastpos) 2002 chip->measure_count++; 2003 chip->measure_lastpos = curp; 2004 } 2005 } 2006 2007 return IRQ_HANDLED; 2008 } 2009 2010 /* 2011 * Mixer stuff 2012 */ 2013 2014 static int __devinit 2015 snd_es1968_mixer(struct es1968 *chip) 2016 { 2017 struct snd_ac97_bus *pbus; 2018 struct snd_ac97_template ac97; 2019 #ifndef CONFIG_SND_ES1968_INPUT 2020 struct snd_ctl_elem_id elem_id; 2021 #endif 2022 int err; 2023 static struct snd_ac97_bus_ops ops = { 2024 .write = snd_es1968_ac97_write, 2025 .read = snd_es1968_ac97_read, 2026 }; 2027 2028 if ((err = snd_ac97_bus(chip->card, 0, &ops, NULL, &pbus)) < 0) 2029 return err; 2030 pbus->no_vra = 1; /* ES1968 doesn't need VRA */ 2031 2032 memset(&ac97, 0, sizeof(ac97)); 2033 ac97.private_data = chip; 2034 if ((err = snd_ac97_mixer(pbus, &ac97, &chip->ac97)) < 0) 2035 return err; 2036 2037 #ifndef CONFIG_SND_ES1968_INPUT 2038 /* attach master switch / volumes for h/w volume control */ 2039 memset(&elem_id, 0, sizeof(elem_id)); 2040 elem_id.iface = SNDRV_CTL_ELEM_IFACE_MIXER; 2041 strcpy(elem_id.name, "Master Playback Switch"); 2042 chip->master_switch = snd_ctl_find_id(chip->card, &elem_id); 2043 memset(&elem_id, 0, sizeof(elem_id)); 2044 elem_id.iface = SNDRV_CTL_ELEM_IFACE_MIXER; 2045 strcpy(elem_id.name, "Master Playback Volume"); 2046 chip->master_volume = snd_ctl_find_id(chip->card, &elem_id); 2047 #endif 2048 2049 return 0; 2050 } 2051 2052 /* 2053 * reset ac97 codec 2054 */ 2055 2056 static void snd_es1968_ac97_reset(struct es1968 *chip) 2057 { 2058 unsigned long ioaddr = chip->io_port; 2059 2060 unsigned short save_ringbus_a; 2061 unsigned short save_68; 2062 unsigned short w; 2063 unsigned int vend; 2064 2065 /* save configuration */ 2066 save_ringbus_a = inw(ioaddr + 0x36); 2067 2068 //outw(inw(ioaddr + 0x38) & 0xfffc, ioaddr + 0x38); /* clear second codec id? */ 2069 /* set command/status address i/o to 1st codec */ 2070 outw(inw(ioaddr + 0x3a) & 0xfffc, ioaddr + 0x3a); 2071 outw(inw(ioaddr + 0x3c) & 0xfffc, ioaddr + 0x3c); 2072 2073 /* disable ac link */ 2074 outw(0x0000, ioaddr + 0x36); 2075 save_68 = inw(ioaddr + 0x68); 2076 pci_read_config_word(chip->pci, 0x58, &w); /* something magical with gpio and bus arb. */ 2077 pci_read_config_dword(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend); 2078 if (w & 1) 2079 save_68 |= 0x10; 2080 outw(0xfffe, ioaddr + 0x64); /* unmask gpio 0 */ 2081 outw(0x0001, ioaddr + 0x68); /* gpio write */ 2082 outw(0x0000, ioaddr + 0x60); /* write 0 to gpio 0 */ 2083 udelay(20); 2084 outw(0x0001, ioaddr + 0x60); /* write 1 to gpio 1 */ 2085 msleep(20); 2086 2087 outw(save_68 | 0x1, ioaddr + 0x68); /* now restore .. */ 2088 outw((inw(ioaddr + 0x38) & 0xfffc) | 0x1, ioaddr + 0x38); 2089 outw((inw(ioaddr + 0x3a) & 0xfffc) | 0x1, ioaddr + 0x3a); 2090 outw((inw(ioaddr + 0x3c) & 0xfffc) | 0x1, ioaddr + 0x3c); 2091 2092 /* now the second codec */ 2093 /* disable ac link */ 2094 outw(0x0000, ioaddr + 0x36); 2095 outw(0xfff7, ioaddr + 0x64); /* unmask gpio 3 */ 2096 save_68 = inw(ioaddr + 0x68); 2097 outw(0x0009, ioaddr + 0x68); /* gpio write 0 & 3 ?? */ 2098 outw(0x0001, ioaddr + 0x60); /* write 1 to gpio */ 2099 udelay(20); 2100 outw(0x0009, ioaddr + 0x60); /* write 9 to gpio */ 2101 msleep(500); 2102 //outw(inw(ioaddr + 0x38) & 0xfffc, ioaddr + 0x38); 2103 outw(inw(ioaddr + 0x3a) & 0xfffc, ioaddr + 0x3a); 2104 outw(inw(ioaddr + 0x3c) & 0xfffc, ioaddr + 0x3c); 2105 2106 #if 0 /* the loop here needs to be much better if we want it.. */ 2107 snd_printk(KERN_INFO "trying software reset\n"); 2108 /* try and do a software reset */ 2109 outb(0x80 | 0x7c, ioaddr + 0x30); 2110 for (w = 0;; w++) { 2111 if ((inw(ioaddr + 0x30) & 1) == 0) { 2112 if (inb(ioaddr + 0x32) != 0) 2113 break; 2114 2115 outb(0x80 | 0x7d, ioaddr + 0x30); 2116 if (((inw(ioaddr + 0x30) & 1) == 0) 2117 && (inb(ioaddr + 0x32) != 0)) 2118 break; 2119 outb(0x80 | 0x7f, ioaddr + 0x30); 2120 if (((inw(ioaddr + 0x30) & 1) == 0) 2121 && (inb(ioaddr + 0x32) != 0)) 2122 break; 2123 } 2124 2125 if (w > 10000) { 2126 outb(inb(ioaddr + 0x37) | 0x08, ioaddr + 0x37); /* do a software reset */ 2127 msleep(500); /* oh my.. */ 2128 outb(inb(ioaddr + 0x37) & ~0x08, 2129 ioaddr + 0x37); 2130 udelay(1); 2131 outw(0x80, ioaddr + 0x30); 2132 for (w = 0; w < 10000; w++) { 2133 if ((inw(ioaddr + 0x30) & 1) == 0) 2134 break; 2135 } 2136 } 2137 } 2138 #endif 2139 if (vend == NEC_VERSA_SUBID1 || vend == NEC_VERSA_SUBID2) { 2140 /* turn on external amp? */ 2141 outw(0xf9ff, ioaddr + 0x64); 2142 outw(inw(ioaddr + 0x68) | 0x600, ioaddr + 0x68); 2143 outw(0x0209, ioaddr + 0x60); 2144 } 2145 2146 /* restore.. */ 2147 outw(save_ringbus_a, ioaddr + 0x36); 2148 2149 /* Turn on the 978 docking chip. 2150 First frob the "master output enable" bit, 2151 then set most of the playback volume control registers to max. */ 2152 outb(inb(ioaddr+0xc0)|(1<<5), ioaddr+0xc0); 2153 outb(0xff, ioaddr+0xc3); 2154 outb(0xff, ioaddr+0xc4); 2155 outb(0xff, ioaddr+0xc6); 2156 outb(0xff, ioaddr+0xc8); 2157 outb(0x3f, ioaddr+0xcf); 2158 outb(0x3f, ioaddr+0xd0); 2159 } 2160 2161 static void snd_es1968_reset(struct es1968 *chip) 2162 { 2163 /* Reset */ 2164 outw(ESM_RESET_MAESTRO | ESM_RESET_DIRECTSOUND, 2165 chip->io_port + ESM_PORT_HOST_IRQ); 2166 udelay(10); 2167 outw(0x0000, chip->io_port + ESM_PORT_HOST_IRQ); 2168 udelay(10); 2169 } 2170 2171 /* 2172 * initialize maestro chip 2173 */ 2174 static void snd_es1968_chip_init(struct es1968 *chip) 2175 { 2176 struct pci_dev *pci = chip->pci; 2177 int i; 2178 unsigned long iobase = chip->io_port; 2179 u16 w; 2180 u32 n; 2181 2182 /* We used to muck around with pci config space that 2183 * we had no business messing with. We don't know enough 2184 * about the machine to know which DMA mode is appropriate, 2185 * etc. We were guessing wrong on some machines and making 2186 * them unhappy. We now trust in the BIOS to do things right, 2187 * which almost certainly means a new host of problems will 2188 * arise with broken BIOS implementations. screw 'em. 2189 * We're already intolerant of machines that don't assign 2190 * IRQs. 2191 */ 2192 2193 /* Config Reg A */ 2194 pci_read_config_word(pci, ESM_CONFIG_A, &w); 2195 2196 w &= ~DMA_CLEAR; /* Clear DMA bits */ 2197 w &= ~(PIC_SNOOP1 | PIC_SNOOP2); /* Clear Pic Snoop Mode Bits */ 2198 w &= ~SAFEGUARD; /* Safeguard off */ 2199 w |= POST_WRITE; /* Posted write */ 2200 w |= PCI_TIMING; /* PCI timing on */ 2201 /* XXX huh? claims to be reserved.. */ 2202 w &= ~SWAP_LR; /* swap left/right 2203 seems to only have effect on SB 2204 Emulation */ 2205 w &= ~SUBTR_DECODE; /* Subtractive decode off */ 2206 2207 pci_write_config_word(pci, ESM_CONFIG_A, w); 2208 2209 /* Config Reg B */ 2210 2211 pci_read_config_word(pci, ESM_CONFIG_B, &w); 2212 2213 w &= ~(1 << 15); /* Turn off internal clock multiplier */ 2214 /* XXX how do we know which to use? */ 2215 w &= ~(1 << 14); /* External clock */ 2216 2217 w &= ~SPDIF_CONFB; /* disable S/PDIF output */ 2218 w |= HWV_CONFB; /* HWV on */ 2219 w |= DEBOUNCE; /* Debounce off: easier to push the HW buttons */ 2220 w &= ~GPIO_CONFB; /* GPIO 4:5 */ 2221 w |= CHI_CONFB; /* Disconnect from the CHI. Enabling this made a dell 7500 work. */ 2222 w &= ~IDMA_CONFB; /* IDMA off (undocumented) */ 2223 w &= ~MIDI_FIX; /* MIDI fix off (undoc) */ 2224 w &= ~(1 << 1); /* reserved, always write 0 */ 2225 w &= ~IRQ_TO_ISA; /* IRQ to ISA off (undoc) */ 2226 2227 pci_write_config_word(pci, ESM_CONFIG_B, w); 2228 2229 /* DDMA off */ 2230 2231 pci_read_config_word(pci, ESM_DDMA, &w); 2232 w &= ~(1 << 0); 2233 pci_write_config_word(pci, ESM_DDMA, w); 2234 2235 /* 2236 * Legacy mode 2237 */ 2238 2239 pci_read_config_word(pci, ESM_LEGACY_AUDIO_CONTROL, &w); 2240 2241 w |= ESS_DISABLE_AUDIO; /* Disable Legacy Audio */ 2242 w &= ~ESS_ENABLE_SERIAL_IRQ; /* Disable SIRQ */ 2243 w &= ~(0x1f); /* disable mpu irq/io, game port, fm, SB */ 2244 2245 pci_write_config_word(pci, ESM_LEGACY_AUDIO_CONTROL, w); 2246 2247 /* Set up 978 docking control chip. */ 2248 pci_read_config_word(pci, 0x58, &w); 2249 w|=1<<2; /* Enable 978. */ 2250 w|=1<<3; /* Turn on 978 hardware volume control. */ 2251 w&=~(1<<11); /* Turn on 978 mixer volume control. */ 2252 pci_write_config_word(pci, 0x58, w); 2253 2254 /* Sound Reset */ 2255 2256 snd_es1968_reset(chip); 2257 2258 /* 2259 * Ring Bus Setup 2260 */ 2261 2262 /* setup usual 0x34 stuff.. 0x36 may be chip specific */ 2263 outw(0xC090, iobase + ESM_RING_BUS_DEST); /* direct sound, stereo */ 2264 udelay(20); 2265 outw(0x3000, iobase + ESM_RING_BUS_CONTR_A); /* enable ringbus/serial */ 2266 udelay(20); 2267 2268 /* 2269 * Reset the CODEC 2270 */ 2271 2272 snd_es1968_ac97_reset(chip); 2273 2274 /* Ring Bus Control B */ 2275 2276 n = inl(iobase + ESM_RING_BUS_CONTR_B); 2277 n &= ~RINGB_EN_SPDIF; /* SPDIF off */ 2278 //w |= RINGB_EN_2CODEC; /* enable 2nd codec */ 2279 outl(n, iobase + ESM_RING_BUS_CONTR_B); 2280 2281 /* Set hardware volume control registers to midpoints. 2282 We can tell which button was pushed based on how they change. */ 2283 outb(0x88, iobase+0x1c); 2284 outb(0x88, iobase+0x1d); 2285 outb(0x88, iobase+0x1e); 2286 outb(0x88, iobase+0x1f); 2287 2288 /* it appears some maestros (dell 7500) only work if these are set, 2289 regardless of wether we use the assp or not. */ 2290 2291 outb(0, iobase + ASSP_CONTROL_B); 2292 outb(3, iobase + ASSP_CONTROL_A); /* M: Reserved bits... */ 2293 outb(0, iobase + ASSP_CONTROL_C); /* M: Disable ASSP, ASSP IRQ's and FM Port */ 2294 2295 /* 2296 * set up wavecache 2297 */ 2298 for (i = 0; i < 16; i++) { 2299 /* Write 0 into the buffer area 0x1E0->1EF */ 2300 outw(0x01E0 + i, iobase + WC_INDEX); 2301 outw(0x0000, iobase + WC_DATA); 2302 2303 /* The 1.10 test program seem to write 0 into the buffer area 2304 * 0x1D0-0x1DF too.*/ 2305 outw(0x01D0 + i, iobase + WC_INDEX); 2306 outw(0x0000, iobase + WC_DATA); 2307 } 2308 wave_set_register(chip, IDR7_WAVE_ROMRAM, 2309 (wave_get_register(chip, IDR7_WAVE_ROMRAM) & 0xFF00)); 2310 wave_set_register(chip, IDR7_WAVE_ROMRAM, 2311 wave_get_register(chip, IDR7_WAVE_ROMRAM) | 0x100); 2312 wave_set_register(chip, IDR7_WAVE_ROMRAM, 2313 wave_get_register(chip, IDR7_WAVE_ROMRAM) & ~0x200); 2314 wave_set_register(chip, IDR7_WAVE_ROMRAM, 2315 wave_get_register(chip, IDR7_WAVE_ROMRAM) | ~0x400); 2316 2317 2318 maestro_write(chip, IDR2_CRAM_DATA, 0x0000); 2319 /* Now back to the DirectSound stuff */ 2320 /* audio serial configuration.. ? */ 2321 maestro_write(chip, 0x08, 0xB004); 2322 maestro_write(chip, 0x09, 0x001B); 2323 maestro_write(chip, 0x0A, 0x8000); 2324 maestro_write(chip, 0x0B, 0x3F37); 2325 maestro_write(chip, 0x0C, 0x0098); 2326 2327 /* parallel in, has something to do with recording :) */ 2328 maestro_write(chip, 0x0C, 2329 (maestro_read(chip, 0x0C) & ~0xF000) | 0x8000); 2330 /* parallel out */ 2331 maestro_write(chip, 0x0C, 2332 (maestro_read(chip, 0x0C) & ~0x0F00) | 0x0500); 2333 2334 maestro_write(chip, 0x0D, 0x7632); 2335 2336 /* Wave cache control on - test off, sg off, 2337 enable, enable extra chans 1Mb */ 2338 2339 w = inw(iobase + WC_CONTROL); 2340 2341 w &= ~0xFA00; /* Seems to be reserved? I don't know */ 2342 w |= 0xA000; /* reserved... I don't know */ 2343 w &= ~0x0200; /* Channels 56,57,58,59 as Extra Play,Rec Channel enable 2344 Seems to crash the Computer if enabled... */ 2345 w |= 0x0100; /* Wave Cache Operation Enabled */ 2346 w |= 0x0080; /* Channels 60/61 as Placback/Record enabled */ 2347 w &= ~0x0060; /* Clear Wavtable Size */ 2348 w |= 0x0020; /* Wavetable Size : 1MB */ 2349 /* Bit 4 is reserved */ 2350 w &= ~0x000C; /* DMA Stuff? I don't understand what the datasheet means */ 2351 /* Bit 1 is reserved */ 2352 w &= ~0x0001; /* Test Mode off */ 2353 2354 outw(w, iobase + WC_CONTROL); 2355 2356 /* Now clear the APU control ram */ 2357 for (i = 0; i < NR_APUS; i++) { 2358 for (w = 0; w < NR_APU_REGS; w++) 2359 apu_set_register(chip, i, w, 0); 2360 2361 } 2362 } 2363 2364 /* Enable IRQ's */ 2365 static void snd_es1968_start_irq(struct es1968 *chip) 2366 { 2367 unsigned short w; 2368 w = ESM_HIRQ_DSIE | ESM_HIRQ_HW_VOLUME; 2369 if (chip->rmidi) 2370 w |= ESM_HIRQ_MPU401; 2371 outb(w, chip->io_port + 0x1A); 2372 outw(w, chip->io_port + ESM_PORT_HOST_IRQ); 2373 } 2374 2375 #ifdef CONFIG_PM 2376 /* 2377 * PM support 2378 */ 2379 static int es1968_suspend(struct pci_dev *pci, pm_message_t state) 2380 { 2381 struct snd_card *card = pci_get_drvdata(pci); 2382 struct es1968 *chip = card->private_data; 2383 2384 if (! chip->do_pm) 2385 return 0; 2386 2387 chip->in_suspend = 1; 2388 cancel_work_sync(&chip->hwvol_work); 2389 snd_power_change_state(card, SNDRV_CTL_POWER_D3hot); 2390 snd_pcm_suspend_all(chip->pcm); 2391 snd_ac97_suspend(chip->ac97); 2392 snd_es1968_bob_stop(chip); 2393 2394 pci_disable_device(pci); 2395 pci_save_state(pci); 2396 pci_set_power_state(pci, pci_choose_state(pci, state)); 2397 return 0; 2398 } 2399 2400 static int es1968_resume(struct pci_dev *pci) 2401 { 2402 struct snd_card *card = pci_get_drvdata(pci); 2403 struct es1968 *chip = card->private_data; 2404 struct esschan *es; 2405 2406 if (! chip->do_pm) 2407 return 0; 2408 2409 /* restore all our config */ 2410 pci_set_power_state(pci, PCI_D0); 2411 pci_restore_state(pci); 2412 if (pci_enable_device(pci) < 0) { 2413 printk(KERN_ERR "es1968: pci_enable_device failed, " 2414 "disabling device\n"); 2415 snd_card_disconnect(card); 2416 return -EIO; 2417 } 2418 pci_set_master(pci); 2419 2420 snd_es1968_chip_init(chip); 2421 2422 /* need to restore the base pointers.. */ 2423 if (chip->dma.addr) { 2424 /* set PCMBAR */ 2425 wave_set_register(chip, 0x01FC, chip->dma.addr >> 12); 2426 } 2427 2428 snd_es1968_start_irq(chip); 2429 2430 /* restore ac97 state */ 2431 snd_ac97_resume(chip->ac97); 2432 2433 list_for_each_entry(es, &chip->substream_list, list) { 2434 switch (es->mode) { 2435 case ESM_MODE_PLAY: 2436 snd_es1968_playback_setup(chip, es, es->substream->runtime); 2437 break; 2438 case ESM_MODE_CAPTURE: 2439 snd_es1968_capture_setup(chip, es, es->substream->runtime); 2440 break; 2441 } 2442 } 2443 2444 /* start timer again */ 2445 if (chip->bobclient) 2446 snd_es1968_bob_start(chip); 2447 2448 snd_power_change_state(card, SNDRV_CTL_POWER_D0); 2449 chip->in_suspend = 0; 2450 return 0; 2451 } 2452 #endif /* CONFIG_PM */ 2453 2454 #ifdef SUPPORT_JOYSTICK 2455 #define JOYSTICK_ADDR 0x200 2456 static int __devinit snd_es1968_create_gameport(struct es1968 *chip, int dev) 2457 { 2458 struct gameport *gp; 2459 struct resource *r; 2460 u16 val; 2461 2462 if (!joystick[dev]) 2463 return -ENODEV; 2464 2465 r = request_region(JOYSTICK_ADDR, 8, "ES1968 gameport"); 2466 if (!r) 2467 return -EBUSY; 2468 2469 chip->gameport = gp = gameport_allocate_port(); 2470 if (!gp) { 2471 printk(KERN_ERR "es1968: cannot allocate memory for gameport\n"); 2472 release_and_free_resource(r); 2473 return -ENOMEM; 2474 } 2475 2476 pci_read_config_word(chip->pci, ESM_LEGACY_AUDIO_CONTROL, &val); 2477 pci_write_config_word(chip->pci, ESM_LEGACY_AUDIO_CONTROL, val | 0x04); 2478 2479 gameport_set_name(gp, "ES1968 Gameport"); 2480 gameport_set_phys(gp, "pci%s/gameport0", pci_name(chip->pci)); 2481 gameport_set_dev_parent(gp, &chip->pci->dev); 2482 gp->io = JOYSTICK_ADDR; 2483 gameport_set_port_data(gp, r); 2484 2485 gameport_register_port(gp); 2486 2487 return 0; 2488 } 2489 2490 static void snd_es1968_free_gameport(struct es1968 *chip) 2491 { 2492 if (chip->gameport) { 2493 struct resource *r = gameport_get_port_data(chip->gameport); 2494 2495 gameport_unregister_port(chip->gameport); 2496 chip->gameport = NULL; 2497 2498 release_and_free_resource(r); 2499 } 2500 } 2501 #else 2502 static inline int snd_es1968_create_gameport(struct es1968 *chip, int dev) { return -ENOSYS; } 2503 static inline void snd_es1968_free_gameport(struct es1968 *chip) { } 2504 #endif 2505 2506 #ifdef CONFIG_SND_ES1968_INPUT 2507 static int __devinit snd_es1968_input_register(struct es1968 *chip) 2508 { 2509 struct input_dev *input_dev; 2510 int err; 2511 2512 input_dev = input_allocate_device(); 2513 if (!input_dev) 2514 return -ENOMEM; 2515 2516 snprintf(chip->phys, sizeof(chip->phys), "pci-%s/input0", 2517 pci_name(chip->pci)); 2518 2519 input_dev->name = chip->card->driver; 2520 input_dev->phys = chip->phys; 2521 input_dev->id.bustype = BUS_PCI; 2522 input_dev->id.vendor = chip->pci->vendor; 2523 input_dev->id.product = chip->pci->device; 2524 input_dev->dev.parent = &chip->pci->dev; 2525 2526 __set_bit(EV_KEY, input_dev->evbit); 2527 __set_bit(KEY_MUTE, input_dev->keybit); 2528 __set_bit(KEY_VOLUMEDOWN, input_dev->keybit); 2529 __set_bit(KEY_VOLUMEUP, input_dev->keybit); 2530 2531 err = input_register_device(input_dev); 2532 if (err) { 2533 input_free_device(input_dev); 2534 return err; 2535 } 2536 2537 chip->input_dev = input_dev; 2538 return 0; 2539 } 2540 #endif /* CONFIG_SND_ES1968_INPUT */ 2541 2542 #ifdef CONFIG_SND_ES1968_RADIO 2543 #define GPIO_DATA 0x60 2544 #define IO_MASK 4 /* mask register offset from GPIO_DATA 2545 bits 1=unmask write to given bit */ 2546 #define IO_DIR 8 /* direction register offset from GPIO_DATA 2547 bits 0/1=read/write direction */ 2548 /* mask bits for GPIO lines */ 2549 #define STR_DATA 0x0040 /* GPIO6 */ 2550 #define STR_CLK 0x0080 /* GPIO7 */ 2551 #define STR_WREN 0x0100 /* GPIO8 */ 2552 #define STR_MOST 0x0200 /* GPIO9 */ 2553 2554 static void snd_es1968_tea575x_set_pins(struct snd_tea575x *tea, u8 pins) 2555 { 2556 struct es1968 *chip = tea->private_data; 2557 unsigned long io = chip->io_port + GPIO_DATA; 2558 u16 val = 0; 2559 2560 val |= (pins & TEA575X_DATA) ? STR_DATA : 0; 2561 val |= (pins & TEA575X_CLK) ? STR_CLK : 0; 2562 val |= (pins & TEA575X_WREN) ? STR_WREN : 0; 2563 2564 outw(val, io); 2565 } 2566 2567 static u8 snd_es1968_tea575x_get_pins(struct snd_tea575x *tea) 2568 { 2569 struct es1968 *chip = tea->private_data; 2570 unsigned long io = chip->io_port + GPIO_DATA; 2571 u16 val = inw(io); 2572 2573 return (val & STR_DATA) ? TEA575X_DATA : 0 | 2574 (val & STR_MOST) ? TEA575X_MOST : 0; 2575 } 2576 2577 static void snd_es1968_tea575x_set_direction(struct snd_tea575x *tea, bool output) 2578 { 2579 struct es1968 *chip = tea->private_data; 2580 unsigned long io = chip->io_port + GPIO_DATA; 2581 u16 odir = inw(io + IO_DIR); 2582 2583 if (output) { 2584 outw(~(STR_DATA | STR_CLK | STR_WREN), io + IO_MASK); 2585 outw(odir | STR_DATA | STR_CLK | STR_WREN, io + IO_DIR); 2586 } else { 2587 outw(~(STR_CLK | STR_WREN | STR_DATA | STR_MOST), io + IO_MASK); 2588 outw((odir & ~(STR_DATA | STR_MOST)) | STR_CLK | STR_WREN, io + IO_DIR); 2589 } 2590 } 2591 2592 static struct snd_tea575x_ops snd_es1968_tea_ops = { 2593 .set_pins = snd_es1968_tea575x_set_pins, 2594 .get_pins = snd_es1968_tea575x_get_pins, 2595 .set_direction = snd_es1968_tea575x_set_direction, 2596 }; 2597 #endif 2598 2599 static int snd_es1968_free(struct es1968 *chip) 2600 { 2601 cancel_work_sync(&chip->hwvol_work); 2602 #ifdef CONFIG_SND_ES1968_INPUT 2603 if (chip->input_dev) 2604 input_unregister_device(chip->input_dev); 2605 #endif 2606 2607 if (chip->io_port) { 2608 if (chip->irq >= 0) 2609 synchronize_irq(chip->irq); 2610 outw(1, chip->io_port + 0x04); /* clear WP interrupts */ 2611 outw(0, chip->io_port + ESM_PORT_HOST_IRQ); /* disable IRQ */ 2612 } 2613 2614 #ifdef CONFIG_SND_ES1968_RADIO 2615 snd_tea575x_exit(&chip->tea); 2616 #endif 2617 2618 if (chip->irq >= 0) 2619 free_irq(chip->irq, chip); 2620 snd_es1968_free_gameport(chip); 2621 pci_release_regions(chip->pci); 2622 pci_disable_device(chip->pci); 2623 kfree(chip); 2624 return 0; 2625 } 2626 2627 static int snd_es1968_dev_free(struct snd_device *device) 2628 { 2629 struct es1968 *chip = device->device_data; 2630 return snd_es1968_free(chip); 2631 } 2632 2633 struct ess_device_list { 2634 unsigned short type; /* chip type */ 2635 unsigned short vendor; /* subsystem vendor id */ 2636 }; 2637 2638 static struct ess_device_list pm_whitelist[] __devinitdata = { 2639 { TYPE_MAESTRO2E, 0x0e11 }, /* Compaq Armada */ 2640 { TYPE_MAESTRO2E, 0x1028 }, 2641 { TYPE_MAESTRO2E, 0x103c }, 2642 { TYPE_MAESTRO2E, 0x1179 }, 2643 { TYPE_MAESTRO2E, 0x14c0 }, /* HP omnibook 4150 */ 2644 { TYPE_MAESTRO2E, 0x1558 }, 2645 }; 2646 2647 static struct ess_device_list mpu_blacklist[] __devinitdata = { 2648 { TYPE_MAESTRO2, 0x125d }, 2649 }; 2650 2651 static int __devinit snd_es1968_create(struct snd_card *card, 2652 struct pci_dev *pci, 2653 int total_bufsize, 2654 int play_streams, 2655 int capt_streams, 2656 int chip_type, 2657 int do_pm, 2658 struct es1968 **chip_ret) 2659 { 2660 static struct snd_device_ops ops = { 2661 .dev_free = snd_es1968_dev_free, 2662 }; 2663 struct es1968 *chip; 2664 int i, err; 2665 2666 *chip_ret = NULL; 2667 2668 /* enable PCI device */ 2669 if ((err = pci_enable_device(pci)) < 0) 2670 return err; 2671 /* check, if we can restrict PCI DMA transfers to 28 bits */ 2672 if (pci_set_dma_mask(pci, DMA_BIT_MASK(28)) < 0 || 2673 pci_set_consistent_dma_mask(pci, DMA_BIT_MASK(28)) < 0) { 2674 snd_printk(KERN_ERR "architecture does not support 28bit PCI busmaster DMA\n"); 2675 pci_disable_device(pci); 2676 return -ENXIO; 2677 } 2678 2679 chip = kzalloc(sizeof(*chip), GFP_KERNEL); 2680 if (! chip) { 2681 pci_disable_device(pci); 2682 return -ENOMEM; 2683 } 2684 2685 /* Set Vars */ 2686 chip->type = chip_type; 2687 spin_lock_init(&chip->reg_lock); 2688 spin_lock_init(&chip->substream_lock); 2689 INIT_LIST_HEAD(&chip->buf_list); 2690 INIT_LIST_HEAD(&chip->substream_list); 2691 mutex_init(&chip->memory_mutex); 2692 INIT_WORK(&chip->hwvol_work, es1968_update_hw_volume); 2693 chip->card = card; 2694 chip->pci = pci; 2695 chip->irq = -1; 2696 chip->total_bufsize = total_bufsize; /* in bytes */ 2697 chip->playback_streams = play_streams; 2698 chip->capture_streams = capt_streams; 2699 2700 if ((err = pci_request_regions(pci, "ESS Maestro")) < 0) { 2701 kfree(chip); 2702 pci_disable_device(pci); 2703 return err; 2704 } 2705 chip->io_port = pci_resource_start(pci, 0); 2706 if (request_irq(pci->irq, snd_es1968_interrupt, IRQF_SHARED, 2707 KBUILD_MODNAME, chip)) { 2708 snd_printk(KERN_ERR "unable to grab IRQ %d\n", pci->irq); 2709 snd_es1968_free(chip); 2710 return -EBUSY; 2711 } 2712 chip->irq = pci->irq; 2713 2714 /* Clear Maestro_map */ 2715 for (i = 0; i < 32; i++) 2716 chip->maestro_map[i] = 0; 2717 2718 /* Clear Apu Map */ 2719 for (i = 0; i < NR_APUS; i++) 2720 chip->apu[i] = ESM_APU_FREE; 2721 2722 /* just to be sure */ 2723 pci_set_master(pci); 2724 2725 if (do_pm > 1) { 2726 /* disable power-management if not on the whitelist */ 2727 unsigned short vend; 2728 pci_read_config_word(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend); 2729 for (i = 0; i < (int)ARRAY_SIZE(pm_whitelist); i++) { 2730 if (chip->type == pm_whitelist[i].type && 2731 vend == pm_whitelist[i].vendor) { 2732 do_pm = 1; 2733 break; 2734 } 2735 } 2736 if (do_pm > 1) { 2737 /* not matched; disabling pm */ 2738 printk(KERN_INFO "es1968: not attempting power management.\n"); 2739 do_pm = 0; 2740 } 2741 } 2742 chip->do_pm = do_pm; 2743 2744 snd_es1968_chip_init(chip); 2745 2746 if ((err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) { 2747 snd_es1968_free(chip); 2748 return err; 2749 } 2750 2751 snd_card_set_dev(card, &pci->dev); 2752 2753 #ifdef CONFIG_SND_ES1968_RADIO 2754 chip->tea.private_data = chip; 2755 chip->tea.ops = &snd_es1968_tea_ops; 2756 strlcpy(chip->tea.card, "SF64-PCE2", sizeof(chip->tea.card)); 2757 sprintf(chip->tea.bus_info, "PCI:%s", pci_name(pci)); 2758 if (!snd_tea575x_init(&chip->tea)) 2759 printk(KERN_INFO "es1968: detected TEA575x radio\n"); 2760 #endif 2761 2762 *chip_ret = chip; 2763 2764 return 0; 2765 } 2766 2767 2768 /* 2769 */ 2770 static int __devinit snd_es1968_probe(struct pci_dev *pci, 2771 const struct pci_device_id *pci_id) 2772 { 2773 static int dev; 2774 struct snd_card *card; 2775 struct es1968 *chip; 2776 unsigned int i; 2777 int err; 2778 2779 if (dev >= SNDRV_CARDS) 2780 return -ENODEV; 2781 if (!enable[dev]) { 2782 dev++; 2783 return -ENOENT; 2784 } 2785 2786 err = snd_card_create(index[dev], id[dev], THIS_MODULE, 0, &card); 2787 if (err < 0) 2788 return err; 2789 2790 if (total_bufsize[dev] < 128) 2791 total_bufsize[dev] = 128; 2792 if (total_bufsize[dev] > 4096) 2793 total_bufsize[dev] = 4096; 2794 if ((err = snd_es1968_create(card, pci, 2795 total_bufsize[dev] * 1024, /* in bytes */ 2796 pcm_substreams_p[dev], 2797 pcm_substreams_c[dev], 2798 pci_id->driver_data, 2799 use_pm[dev], 2800 &chip)) < 0) { 2801 snd_card_free(card); 2802 return err; 2803 } 2804 card->private_data = chip; 2805 2806 switch (chip->type) { 2807 case TYPE_MAESTRO2E: 2808 strcpy(card->driver, "ES1978"); 2809 strcpy(card->shortname, "ESS ES1978 (Maestro 2E)"); 2810 break; 2811 case TYPE_MAESTRO2: 2812 strcpy(card->driver, "ES1968"); 2813 strcpy(card->shortname, "ESS ES1968 (Maestro 2)"); 2814 break; 2815 case TYPE_MAESTRO: 2816 strcpy(card->driver, "ESM1"); 2817 strcpy(card->shortname, "ESS Maestro 1"); 2818 break; 2819 } 2820 2821 if ((err = snd_es1968_pcm(chip, 0)) < 0) { 2822 snd_card_free(card); 2823 return err; 2824 } 2825 2826 if ((err = snd_es1968_mixer(chip)) < 0) { 2827 snd_card_free(card); 2828 return err; 2829 } 2830 2831 if (enable_mpu[dev] == 2) { 2832 /* check the black list */ 2833 unsigned short vend; 2834 pci_read_config_word(chip->pci, PCI_SUBSYSTEM_VENDOR_ID, &vend); 2835 for (i = 0; i < ARRAY_SIZE(mpu_blacklist); i++) { 2836 if (chip->type == mpu_blacklist[i].type && 2837 vend == mpu_blacklist[i].vendor) { 2838 enable_mpu[dev] = 0; 2839 break; 2840 } 2841 } 2842 } 2843 if (enable_mpu[dev]) { 2844 if ((err = snd_mpu401_uart_new(card, 0, MPU401_HW_MPU401, 2845 chip->io_port + ESM_MPU401_PORT, 2846 MPU401_INFO_INTEGRATED | 2847 MPU401_INFO_IRQ_HOOK, 2848 -1, &chip->rmidi)) < 0) { 2849 printk(KERN_WARNING "es1968: skipping MPU-401 MIDI support..\n"); 2850 } 2851 } 2852 2853 snd_es1968_create_gameport(chip, dev); 2854 2855 #ifdef CONFIG_SND_ES1968_INPUT 2856 err = snd_es1968_input_register(chip); 2857 if (err) 2858 snd_printk(KERN_WARNING "Input device registration " 2859 "failed with error %i", err); 2860 #endif 2861 2862 snd_es1968_start_irq(chip); 2863 2864 chip->clock = clock[dev]; 2865 if (! chip->clock) 2866 es1968_measure_clock(chip); 2867 2868 sprintf(card->longname, "%s at 0x%lx, irq %i", 2869 card->shortname, chip->io_port, chip->irq); 2870 2871 if ((err = snd_card_register(card)) < 0) { 2872 snd_card_free(card); 2873 return err; 2874 } 2875 pci_set_drvdata(pci, card); 2876 dev++; 2877 return 0; 2878 } 2879 2880 static void __devexit snd_es1968_remove(struct pci_dev *pci) 2881 { 2882 snd_card_free(pci_get_drvdata(pci)); 2883 pci_set_drvdata(pci, NULL); 2884 } 2885 2886 static struct pci_driver driver = { 2887 .name = KBUILD_MODNAME, 2888 .id_table = snd_es1968_ids, 2889 .probe = snd_es1968_probe, 2890 .remove = __devexit_p(snd_es1968_remove), 2891 #ifdef CONFIG_PM 2892 .suspend = es1968_suspend, 2893 .resume = es1968_resume, 2894 #endif 2895 }; 2896 2897 static int __init alsa_card_es1968_init(void) 2898 { 2899 return pci_register_driver(&driver); 2900 } 2901 2902 static void __exit alsa_card_es1968_exit(void) 2903 { 2904 pci_unregister_driver(&driver); 2905 } 2906 2907 module_init(alsa_card_es1968_init) 2908 module_exit(alsa_card_es1968_exit) 2909