wss_lib.c 59.6 KB
Newer Older
L
Linus Torvalds 已提交
1
/*
2
 *  Copyright (c) by Jaroslav Kysela <perex@perex.cz>
L
Linus Torvalds 已提交
3 4 5
 *  Routines for control of CS4231(A)/CS4232/InterWave & compatible chips
 *
 *  Bugs:
6
 *     - sometimes record brokes playback with WSS portion of
L
Linus Torvalds 已提交
7 8
 *       Yamaha OPL3-SA3 chip
 *     - CS4231 (GUS MAX) - still trouble with occasional noises
9
 *			  - broken initialization?
L
Linus Torvalds 已提交
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33
 *
 *   This program is free software; you can redistribute it and/or modify
 *   it under the terms of the GNU General Public License as published by
 *   the Free Software Foundation; either version 2 of the License, or
 *   (at your option) any later version.
 *
 *   This program is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *   GNU General Public License for more details.
 *
 *   You should have received a copy of the GNU General Public License
 *   along with this program; if not, write to the Free Software
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
 *
 */

#include <linux/delay.h>
#include <linux/pm.h>
#include <linux/init.h>
#include <linux/interrupt.h>
#include <linux/slab.h>
#include <linux/ioport.h>
#include <sound/core.h>
34
#include <sound/wss.h>
L
Linus Torvalds 已提交
35 36 37 38 39 40
#include <sound/pcm_params.h>

#include <asm/io.h>
#include <asm/dma.h>
#include <asm/irq.h>

41
MODULE_AUTHOR("Jaroslav Kysela <perex@perex.cz>");
L
Linus Torvalds 已提交
42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74
MODULE_DESCRIPTION("Routines for control of CS4231(A)/CS4232/InterWave & compatible chips");
MODULE_LICENSE("GPL");

#if 0
#define SNDRV_DEBUG_MCE
#endif

/*
 *  Some variables
 */

static unsigned char freq_bits[14] = {
	/* 5510 */	0x00 | CS4231_XTAL2,
	/* 6620 */	0x0E | CS4231_XTAL2,
	/* 8000 */	0x00 | CS4231_XTAL1,
	/* 9600 */	0x0E | CS4231_XTAL1,
	/* 11025 */	0x02 | CS4231_XTAL2,
	/* 16000 */	0x02 | CS4231_XTAL1,
	/* 18900 */	0x04 | CS4231_XTAL2,
	/* 22050 */	0x06 | CS4231_XTAL2,
	/* 27042 */	0x04 | CS4231_XTAL1,
	/* 32000 */	0x06 | CS4231_XTAL1,
	/* 33075 */	0x0C | CS4231_XTAL2,
	/* 37800 */	0x08 | CS4231_XTAL2,
	/* 44100 */	0x0A | CS4231_XTAL2,
	/* 48000 */	0x0C | CS4231_XTAL1
};

static unsigned int rates[14] = {
	5510, 6620, 8000, 9600, 11025, 16000, 18900, 22050,
	27042, 32000, 33075, 37800, 44100, 48000
};

75
static struct snd_pcm_hw_constraint_list hw_constraints_rates = {
76
	.count = ARRAY_SIZE(rates),
L
Linus Torvalds 已提交
77 78 79 80
	.list = rates,
	.mask = 0,
};

81
static int snd_wss_xrate(struct snd_pcm_runtime *runtime)
L
Linus Torvalds 已提交
82
{
83 84
	return snd_pcm_hw_constraint_list(runtime, 0, SNDRV_PCM_HW_PARAM_RATE,
					  &hw_constraints_rates);
L
Linus Torvalds 已提交
85 86
}

87
static unsigned char snd_wss_original_image[32] =
L
Linus Torvalds 已提交
88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122
{
	0x00,			/* 00/00 - lic */
	0x00,			/* 01/01 - ric */
	0x9f,			/* 02/02 - la1ic */
	0x9f,			/* 03/03 - ra1ic */
	0x9f,			/* 04/04 - la2ic */
	0x9f,			/* 05/05 - ra2ic */
	0xbf,			/* 06/06 - loc */
	0xbf,			/* 07/07 - roc */
	0x20,			/* 08/08 - pdfr */
	CS4231_AUTOCALIB,	/* 09/09 - ic */
	0x00,			/* 0a/10 - pc */
	0x00,			/* 0b/11 - ti */
	CS4231_MODE2,		/* 0c/12 - mi */
	0xfc,			/* 0d/13 - lbc */
	0x00,			/* 0e/14 - pbru */
	0x00,			/* 0f/15 - pbrl */
	0x80,			/* 10/16 - afei */
	0x01,			/* 11/17 - afeii */
	0x9f,			/* 12/18 - llic */
	0x9f,			/* 13/19 - rlic */
	0x00,			/* 14/20 - tlb */
	0x00,			/* 15/21 - thb */
	0x00,			/* 16/22 - la3mic/reserved */
	0x00,			/* 17/23 - ra3mic/reserved */
	0x00,			/* 18/24 - afs */
	0x00,			/* 19/25 - lamoc/version */
	0xcf,			/* 1a/26 - mioc */
	0x00,			/* 1b/27 - ramoc/reserved */
	0x20,			/* 1c/28 - cdfr */
	0x00,			/* 1d/29 - res4 */
	0x00,			/* 1e/30 - cbru */
	0x00,			/* 1f/31 - cbrl */
};

123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158
static unsigned char snd_opti93x_original_image[32] =
{
	0x00,		/* 00/00 - l_mixout_outctrl */
	0x00,		/* 01/01 - r_mixout_outctrl */
	0x88,		/* 02/02 - l_cd_inctrl */
	0x88,		/* 03/03 - r_cd_inctrl */
	0x88,		/* 04/04 - l_a1/fm_inctrl */
	0x88,		/* 05/05 - r_a1/fm_inctrl */
	0x80,		/* 06/06 - l_dac_inctrl */
	0x80,		/* 07/07 - r_dac_inctrl */
	0x00,		/* 08/08 - ply_dataform_reg */
	0x00,		/* 09/09 - if_conf */
	0x00,		/* 0a/10 - pin_ctrl */
	0x00,		/* 0b/11 - err_init_reg */
	0x0a,		/* 0c/12 - id_reg */
	0x00,		/* 0d/13 - reserved */
	0x00,		/* 0e/14 - ply_upcount_reg */
	0x00,		/* 0f/15 - ply_lowcount_reg */
	0x88,		/* 10/16 - reserved/l_a1_inctrl */
	0x88,		/* 11/17 - reserved/r_a1_inctrl */
	0x88,		/* 12/18 - l_line_inctrl */
	0x88,		/* 13/19 - r_line_inctrl */
	0x88,		/* 14/20 - l_mic_inctrl */
	0x88,		/* 15/21 - r_mic_inctrl */
	0x80,		/* 16/22 - l_out_outctrl */
	0x80,		/* 17/23 - r_out_outctrl */
	0x00,		/* 18/24 - reserved */
	0x00,		/* 19/25 - reserved */
	0x00,		/* 1a/26 - reserved */
	0x00,		/* 1b/27 - reserved */
	0x00,		/* 1c/28 - cap_dataform_reg */
	0x00,		/* 1d/29 - reserved */
	0x00,		/* 1e/30 - cap_upcount_reg */
	0x00		/* 1f/31 - cap_lowcount_reg */
};

L
Linus Torvalds 已提交
159 160 161 162
/*
 *  Basic I/O functions
 */

163
static inline void wss_outb(struct snd_wss *chip, u8 offset, u8 val)
L
Linus Torvalds 已提交
164 165 166 167
{
	outb(val, chip->port + offset);
}

168
static inline u8 wss_inb(struct snd_wss *chip, u8 offset)
L
Linus Torvalds 已提交
169 170 171 172
{
	return inb(chip->port + offset);
}

173
static void snd_wss_wait(struct snd_wss *chip)
L
Linus Torvalds 已提交
174 175 176 177
{
	int timeout;

	for (timeout = 250;
178
	     timeout > 0 && (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT);
L
Linus Torvalds 已提交
179
	     timeout--)
180
		udelay(100);
181 182
}

183
static void snd_wss_outm(struct snd_wss *chip, unsigned char reg,
184 185 186 187
			    unsigned char mask, unsigned char value)
{
	unsigned char tmp = (chip->image[reg] & mask) | value;

188
	snd_wss_wait(chip);
L
Linus Torvalds 已提交
189
#ifdef CONFIG_SND_DEBUG
190
	if (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT)
L
Linus Torvalds 已提交
191 192
		snd_printk("outm: auto calibration time out - reg = 0x%x, value = 0x%x\n", reg, value);
#endif
193 194
	chip->image[reg] = tmp;
	if (!chip->calibrate_mute) {
195
		wss_outb(chip, CS4231P(REGSEL), chip->mce_bit | reg);
196
		wmb();
197
		wss_outb(chip, CS4231P(REG), tmp);
L
Linus Torvalds 已提交
198 199 200 201
		mb();
	}
}

202 203
static void snd_wss_dout(struct snd_wss *chip, unsigned char reg,
			 unsigned char value)
L
Linus Torvalds 已提交
204 205 206 207
{
	int timeout;

	for (timeout = 250;
208
	     timeout > 0 && (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT);
L
Linus Torvalds 已提交
209
	     timeout--)
210
		udelay(10);
211 212
	wss_outb(chip, CS4231P(REGSEL), chip->mce_bit | reg);
	wss_outb(chip, CS4231P(REG), value);
L
Linus Torvalds 已提交
213 214 215
	mb();
}

216
void snd_wss_out(struct snd_wss *chip, unsigned char reg, unsigned char value)
L
Linus Torvalds 已提交
217
{
218
	snd_wss_wait(chip);
L
Linus Torvalds 已提交
219
#ifdef CONFIG_SND_DEBUG
220
	if (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT)
L
Linus Torvalds 已提交
221 222
		snd_printk("out: auto calibration time out - reg = 0x%x, value = 0x%x\n", reg, value);
#endif
223 224
	wss_outb(chip, CS4231P(REGSEL), chip->mce_bit | reg);
	wss_outb(chip, CS4231P(REG), value);
L
Linus Torvalds 已提交
225 226
	chip->image[reg] = value;
	mb();
227 228
	snd_printdd("codec out - reg 0x%x = 0x%x\n",
			chip->mce_bit | reg, value);
L
Linus Torvalds 已提交
229
}
230
EXPORT_SYMBOL(snd_wss_out);
L
Linus Torvalds 已提交
231

232
unsigned char snd_wss_in(struct snd_wss *chip, unsigned char reg)
L
Linus Torvalds 已提交
233
{
234
	snd_wss_wait(chip);
L
Linus Torvalds 已提交
235
#ifdef CONFIG_SND_DEBUG
236
	if (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT)
L
Linus Torvalds 已提交
237 238
		snd_printk("in: auto calibration time out - reg = 0x%x\n", reg);
#endif
239
	wss_outb(chip, CS4231P(REGSEL), chip->mce_bit | reg);
L
Linus Torvalds 已提交
240
	mb();
241
	return wss_inb(chip, CS4231P(REG));
L
Linus Torvalds 已提交
242
}
243
EXPORT_SYMBOL(snd_wss_in);
L
Linus Torvalds 已提交
244

245 246
void snd_cs4236_ext_out(struct snd_wss *chip, unsigned char reg,
			unsigned char val)
L
Linus Torvalds 已提交
247
{
248 249 250 251
	wss_outb(chip, CS4231P(REGSEL), chip->mce_bit | 0x17);
	wss_outb(chip, CS4231P(REG),
		 reg | (chip->image[CS4236_EXT_REG] & 0x01));
	wss_outb(chip, CS4231P(REG), val);
L
Linus Torvalds 已提交
252 253 254 255 256
	chip->eimage[CS4236_REG(reg)] = val;
#if 0
	printk("ext out : reg = 0x%x, val = 0x%x\n", reg, val);
#endif
}
257
EXPORT_SYMBOL(snd_cs4236_ext_out);
L
Linus Torvalds 已提交
258

259
unsigned char snd_cs4236_ext_in(struct snd_wss *chip, unsigned char reg)
L
Linus Torvalds 已提交
260
{
261 262 263
	wss_outb(chip, CS4231P(REGSEL), chip->mce_bit | 0x17);
	wss_outb(chip, CS4231P(REG),
		 reg | (chip->image[CS4236_EXT_REG] & 0x01));
L
Linus Torvalds 已提交
264
#if 1
265
	return wss_inb(chip, CS4231P(REG));
L
Linus Torvalds 已提交
266 267 268
#else
	{
		unsigned char res;
269
		res = wss_inb(chip, CS4231P(REG));
L
Linus Torvalds 已提交
270 271 272 273 274
		printk("ext in : reg = 0x%x, val = 0x%x\n", reg, res);
		return res;
	}
#endif
}
275
EXPORT_SYMBOL(snd_cs4236_ext_in);
L
Linus Torvalds 已提交
276 277 278

#if 0

279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365
static void snd_wss_debug(struct snd_wss *chip)
{
	printk(KERN_DEBUG
		"CS4231 REGS:      INDEX = 0x%02x  "
		"                 STATUS = 0x%02x\n",
					wss_inb(chip, CS4231P(REGSEL),
					wss_inb(chip, CS4231P(STATUS)));
	printk(KERN_DEBUG
		"  0x00: left input      = 0x%02x  "
		"  0x10: alt 1 (CFIG 2)  = 0x%02x\n",
					snd_wss_in(chip, 0x00),
					snd_wss_in(chip, 0x10));
	printk(KERN_DEBUG
		"  0x01: right input     = 0x%02x  "
		"  0x11: alt 2 (CFIG 3)  = 0x%02x\n",
					snd_wss_in(chip, 0x01),
					snd_wss_in(chip, 0x11));
	printk(KERN_DEBUG
		"  0x02: GF1 left input  = 0x%02x  "
		"  0x12: left line in    = 0x%02x\n",
					snd_wss_in(chip, 0x02),
					snd_wss_in(chip, 0x12));
	printk(KERN_DEBUG
		"  0x03: GF1 right input = 0x%02x  "
		"  0x13: right line in   = 0x%02x\n",
					snd_wss_in(chip, 0x03),
					snd_wss_in(chip, 0x13));
	printk(KERN_DEBUG
		"  0x04: CD left input   = 0x%02x  "
		"  0x14: timer low       = 0x%02x\n",
					snd_wss_in(chip, 0x04),
					snd_wss_in(chip, 0x14));
	printk(KERN_DEBUG
		"  0x05: CD right input  = 0x%02x  "
		"  0x15: timer high      = 0x%02x\n",
					snd_wss_in(chip, 0x05),
					snd_wss_in(chip, 0x15));
	printk(KERN_DEBUG
		"  0x06: left output     = 0x%02x  "
		"  0x16: left MIC (PnP)  = 0x%02x\n",
					snd_wss_in(chip, 0x06),
					snd_wss_in(chip, 0x16));
	printk(KERN_DEBUG
		"  0x07: right output    = 0x%02x  "
		"  0x17: right MIC (PnP) = 0x%02x\n",
					snd_wss_in(chip, 0x07),
					snd_wss_in(chip, 0x17));
	printk(KERN_DEBUG
		"  0x08: playback format = 0x%02x  "
		"  0x18: IRQ status      = 0x%02x\n",
					snd_wss_in(chip, 0x08),
					snd_wss_in(chip, 0x18));
	printk(KERN_DEBUG
		"  0x09: iface (CFIG 1)  = 0x%02x  "
		"  0x19: left line out   = 0x%02x\n",
					snd_wss_in(chip, 0x09),
					snd_wss_in(chip, 0x19));
	printk(KERN_DEBUG
		"  0x0a: pin control     = 0x%02x  "
		"  0x1a: mono control    = 0x%02x\n",
					snd_wss_in(chip, 0x0a),
					snd_wss_in(chip, 0x1a));
	printk(KERN_DEBUG
		"  0x0b: init & status   = 0x%02x  "
		"  0x1b: right line out  = 0x%02x\n",
					snd_wss_in(chip, 0x0b),
					snd_wss_in(chip, 0x1b));
	printk(KERN_DEBUG
		"  0x0c: revision & mode = 0x%02x  "
		"  0x1c: record format   = 0x%02x\n",
					snd_wss_in(chip, 0x0c),
					snd_wss_in(chip, 0x1c));
	printk(KERN_DEBUG
		"  0x0d: loopback        = 0x%02x  "
		"  0x1d: var freq (PnP)  = 0x%02x\n",
					snd_wss_in(chip, 0x0d),
					snd_wss_in(chip, 0x1d));
	printk(KERN_DEBUG
		"  0x0e: ply upr count   = 0x%02x  "
		"  0x1e: ply lwr count   = 0x%02x\n",
					snd_wss_in(chip, 0x0e),
					snd_wss_in(chip, 0x1e));
	printk(KERN_DEBUG
		"  0x0f: rec upr count   = 0x%02x  "
		"  0x1f: rec lwr count   = 0x%02x\n",
					snd_wss_in(chip, 0x0f),
					snd_wss_in(chip, 0x1f));
L
Linus Torvalds 已提交
366 367 368 369 370 371 372 373
}

#endif

/*
 *  CS4231 detection / MCE routines
 */

374
static void snd_wss_busy_wait(struct snd_wss *chip)
L
Linus Torvalds 已提交
375 376 377 378 379
{
	int timeout;

	/* huh.. looks like this sequence is proper for CS4231A chip (GUS MAX) */
	for (timeout = 5; timeout > 0; timeout--)
380
		wss_inb(chip, CS4231P(REGSEL));
L
Linus Torvalds 已提交
381 382
	/* end of cleanup sequence */
	for (timeout = 250;
383
	     timeout > 0 && (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT);
L
Linus Torvalds 已提交
384
	     timeout--)
385
		udelay(10);
L
Linus Torvalds 已提交
386 387
}

388
void snd_wss_mce_up(struct snd_wss *chip)
L
Linus Torvalds 已提交
389 390 391 392
{
	unsigned long flags;
	int timeout;

393
	snd_wss_wait(chip);
L
Linus Torvalds 已提交
394
#ifdef CONFIG_SND_DEBUG
395
	if (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT)
L
Linus Torvalds 已提交
396 397 398 399
		snd_printk("mce_up - auto calibration time out (0)\n");
#endif
	spin_lock_irqsave(&chip->reg_lock, flags);
	chip->mce_bit |= CS4231_MCE;
400
	timeout = wss_inb(chip, CS4231P(REGSEL));
L
Linus Torvalds 已提交
401 402 403
	if (timeout == 0x80)
		snd_printk("mce_up [0x%lx]: serious init problem - codec still busy\n", chip->port);
	if (!(timeout & CS4231_MCE))
404 405
		wss_outb(chip, CS4231P(REGSEL),
			 chip->mce_bit | (timeout & 0x1f));
L
Linus Torvalds 已提交
406 407
	spin_unlock_irqrestore(&chip->reg_lock, flags);
}
408
EXPORT_SYMBOL(snd_wss_mce_up);
L
Linus Torvalds 已提交
409

410
void snd_wss_mce_down(struct snd_wss *chip)
L
Linus Torvalds 已提交
411 412
{
	unsigned long flags;
413
	unsigned long end_time;
L
Linus Torvalds 已提交
414 415
	int timeout;

416
	snd_wss_busy_wait(chip);
417

L
Linus Torvalds 已提交
418
#ifdef CONFIG_SND_DEBUG
419
	if (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT)
L
Linus Torvalds 已提交
420 421 422 423
		snd_printk("mce_down [0x%lx] - auto calibration time out (0)\n", (long)CS4231P(REGSEL));
#endif
	spin_lock_irqsave(&chip->reg_lock, flags);
	chip->mce_bit &= ~CS4231_MCE;
424 425
	timeout = wss_inb(chip, CS4231P(REGSEL));
	wss_outb(chip, CS4231P(REGSEL), chip->mce_bit | (timeout & 0x1f));
L
Linus Torvalds 已提交
426 427 428 429
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	if (timeout == 0x80)
		snd_printk("mce_down [0x%lx]: serious init problem - codec still busy\n", chip->port);
	if ((timeout & CS4231_MCE) == 0 ||
430
	    !(chip->hardware & (WSS_HW_CS4231_MASK | WSS_HW_CS4232_MASK))) {
L
Linus Torvalds 已提交
431 432 433
		return;
	}

434 435 436 437 438 439
	/*
	 * Wait for (possible -- during init auto-calibration may not be set)
	 * calibration process to start. Needs upto 5 sample periods on AD1848
	 * which at the slowest possible rate of 5.5125 kHz means 907 us.
	 */
	msleep(1);
440 441 442

	snd_printdd("(1) jiffies = %lu\n", jiffies);

443
	/* check condition up to 250 ms */
444
	end_time = jiffies + msecs_to_jiffies(250);
445
	while (snd_wss_in(chip, CS4231_TEST_INIT) &
446 447
		CS4231_CALIB_IN_PROGRESS) {

448
		if (time_after(jiffies, end_time)) {
449 450
			snd_printk(KERN_ERR "mce_down - "
					"auto calibration time out (2)\n");
L
Linus Torvalds 已提交
451 452
			return;
		}
453
		msleep(1);
L
Linus Torvalds 已提交
454
	}
455 456 457

	snd_printdd("(2) jiffies = %lu\n", jiffies);

458
	/* check condition up to 100 ms */
459
	end_time = jiffies + msecs_to_jiffies(100);
460
	while (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT) {
461
		if (time_after(jiffies, end_time)) {
L
Linus Torvalds 已提交
462 463 464
			snd_printk(KERN_ERR "mce_down - auto calibration time out (3)\n");
			return;
		}
465
		msleep(1);
L
Linus Torvalds 已提交
466
	}
467 468

	snd_printdd("(3) jiffies = %lu\n", jiffies);
469
	snd_printd("mce_down - exit = 0x%x\n", wss_inb(chip, CS4231P(REGSEL)));
L
Linus Torvalds 已提交
470
}
471
EXPORT_SYMBOL(snd_wss_mce_down);
L
Linus Torvalds 已提交
472

473
static unsigned int snd_wss_get_count(unsigned char format, unsigned int size)
L
Linus Torvalds 已提交
474 475 476 477 478 479 480 481 482 483 484 485 486 487
{
	switch (format & 0xe0) {
	case CS4231_LINEAR_16:
	case CS4231_LINEAR_16_BIG:
		size >>= 1;
		break;
	case CS4231_ADPCM_16:
		return size >> 2;
	}
	if (format & CS4231_STEREO)
		size >>= 1;
	return size;
}

488 489
static int snd_wss_trigger(struct snd_pcm_substream *substream,
			   int cmd)
L
Linus Torvalds 已提交
490
{
491
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
L
Linus Torvalds 已提交
492 493
	int result = 0;
	unsigned int what;
494
	struct snd_pcm_substream *s;
L
Linus Torvalds 已提交
495 496 497 498 499 500 501 502 503 504 505 506 507 508
	int do_start;

	switch (cmd) {
	case SNDRV_PCM_TRIGGER_START:
	case SNDRV_PCM_TRIGGER_RESUME:
		do_start = 1; break;
	case SNDRV_PCM_TRIGGER_STOP:
	case SNDRV_PCM_TRIGGER_SUSPEND:
		do_start = 0; break;
	default:
		return -EINVAL;
	}

	what = 0;
509
	snd_pcm_group_for_each_entry(s, substream) {
L
Linus Torvalds 已提交
510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527
		if (s == chip->playback_substream) {
			what |= CS4231_PLAYBACK_ENABLE;
			snd_pcm_trigger_done(s, substream);
		} else if (s == chip->capture_substream) {
			what |= CS4231_RECORD_ENABLE;
			snd_pcm_trigger_done(s, substream);
		}
	}
	spin_lock(&chip->reg_lock);
	if (do_start) {
		chip->image[CS4231_IFACE_CTRL] |= what;
		if (chip->trigger)
			chip->trigger(chip, what, 1);
	} else {
		chip->image[CS4231_IFACE_CTRL] &= ~what;
		if (chip->trigger)
			chip->trigger(chip, what, 0);
	}
528
	snd_wss_out(chip, CS4231_IFACE_CTRL, chip->image[CS4231_IFACE_CTRL]);
L
Linus Torvalds 已提交
529 530
	spin_unlock(&chip->reg_lock);
#if 0
531
	snd_wss_debug(chip);
L
Linus Torvalds 已提交
532 533 534 535 536 537 538 539
#endif
	return result;
}

/*
 *  CODEC I/O
 */

540
static unsigned char snd_wss_get_rate(unsigned int rate)
L
Linus Torvalds 已提交
541 542 543
{
	int i;

544
	for (i = 0; i < ARRAY_SIZE(rates); i++)
L
Linus Torvalds 已提交
545 546 547
		if (rate == rates[i])
			return freq_bits[i];
	// snd_BUG();
548
	return freq_bits[ARRAY_SIZE(rates) - 1];
L
Linus Torvalds 已提交
549 550
}

551 552 553
static unsigned char snd_wss_get_format(struct snd_wss *chip,
					int format,
					int channels)
L
Linus Torvalds 已提交
554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572
{
	unsigned char rformat;

	rformat = CS4231_LINEAR_8;
	switch (format) {
	case SNDRV_PCM_FORMAT_MU_LAW:	rformat = CS4231_ULAW_8; break;
	case SNDRV_PCM_FORMAT_A_LAW:	rformat = CS4231_ALAW_8; break;
	case SNDRV_PCM_FORMAT_S16_LE:	rformat = CS4231_LINEAR_16; break;
	case SNDRV_PCM_FORMAT_S16_BE:	rformat = CS4231_LINEAR_16_BIG; break;
	case SNDRV_PCM_FORMAT_IMA_ADPCM:	rformat = CS4231_ADPCM_16; break;
	}
	if (channels > 1)
		rformat |= CS4231_STEREO;
#if 0
	snd_printk("get_format: 0x%x (mode=0x%x)\n", format, mode);
#endif
	return rformat;
}

573
static void snd_wss_calibrate_mute(struct snd_wss *chip, int mute)
L
Linus Torvalds 已提交
574 575 576 577 578 579 580 581 582 583
{
	unsigned long flags;

	mute = mute ? 1 : 0;
	spin_lock_irqsave(&chip->reg_lock, flags);
	if (chip->calibrate_mute == mute) {
		spin_unlock_irqrestore(&chip->reg_lock, flags);
		return;
	}
	if (!mute) {
584 585 586 587 588 589
		snd_wss_dout(chip, CS4231_LEFT_INPUT,
			     chip->image[CS4231_LEFT_INPUT]);
		snd_wss_dout(chip, CS4231_RIGHT_INPUT,
			     chip->image[CS4231_RIGHT_INPUT]);
		snd_wss_dout(chip, CS4231_LOOPBACK,
			     chip->image[CS4231_LOOPBACK]);
L
Linus Torvalds 已提交
590
	}
591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617
	snd_wss_dout(chip, CS4231_AUX1_LEFT_INPUT,
		     mute ? 0x80 : chip->image[CS4231_AUX1_LEFT_INPUT]);
	snd_wss_dout(chip, CS4231_AUX1_RIGHT_INPUT,
		     mute ? 0x80 : chip->image[CS4231_AUX1_RIGHT_INPUT]);
	snd_wss_dout(chip, CS4231_AUX2_LEFT_INPUT,
		     mute ? 0x80 : chip->image[CS4231_AUX2_LEFT_INPUT]);
	snd_wss_dout(chip, CS4231_AUX2_RIGHT_INPUT,
		     mute ? 0x80 : chip->image[CS4231_AUX2_RIGHT_INPUT]);
	snd_wss_dout(chip, CS4231_LEFT_OUTPUT,
		     mute ? 0x80 : chip->image[CS4231_LEFT_OUTPUT]);
	snd_wss_dout(chip, CS4231_RIGHT_OUTPUT,
		     mute ? 0x80 : chip->image[CS4231_RIGHT_OUTPUT]);
	snd_wss_dout(chip, CS4231_LEFT_LINE_IN,
		     mute ? 0x80 : chip->image[CS4231_LEFT_LINE_IN]);
	snd_wss_dout(chip, CS4231_RIGHT_LINE_IN,
		     mute ? 0x80 : chip->image[CS4231_RIGHT_LINE_IN]);
	snd_wss_dout(chip, CS4231_MONO_CTRL,
		     mute ? 0xc0 : chip->image[CS4231_MONO_CTRL]);
	if (chip->hardware == WSS_HW_INTERWAVE) {
		snd_wss_dout(chip, CS4231_LEFT_MIC_INPUT,
			     mute ? 0x80 : chip->image[CS4231_LEFT_MIC_INPUT]);
		snd_wss_dout(chip, CS4231_RIGHT_MIC_INPUT,
			     mute ? 0x80 : chip->image[CS4231_RIGHT_MIC_INPUT]);
		snd_wss_dout(chip, CS4231_LINE_LEFT_OUTPUT,
			mute ? 0x80 : chip->image[CS4231_LINE_LEFT_OUTPUT]);
		snd_wss_dout(chip, CS4231_LINE_RIGHT_OUTPUT,
			mute ? 0x80 : chip->image[CS4231_LINE_RIGHT_OUTPUT]);
L
Linus Torvalds 已提交
618 619 620 621 622
	}
	chip->calibrate_mute = mute;
	spin_unlock_irqrestore(&chip->reg_lock, flags);
}

623
static void snd_wss_playback_format(struct snd_wss *chip,
624
				       struct snd_pcm_hw_params *params,
L
Linus Torvalds 已提交
625 626 627 628 629
				       unsigned char pdfr)
{
	unsigned long flags;
	int full_calib = 1;

630
	mutex_lock(&chip->mce_mutex);
631 632 633
	snd_wss_calibrate_mute(chip, 1);
	if (chip->hardware == WSS_HW_CS4231A ||
	    (chip->hardware & WSS_HW_CS4232_MASK)) {
L
Linus Torvalds 已提交
634 635
		spin_lock_irqsave(&chip->reg_lock, flags);
		if ((chip->image[CS4231_PLAYBK_FORMAT] & 0x0f) == (pdfr & 0x0f)) {	/* rate is same? */
636 637 638 639 640 641 642
			snd_wss_out(chip, CS4231_ALT_FEATURE_1,
				    chip->image[CS4231_ALT_FEATURE_1] | 0x10);
			chip->image[CS4231_PLAYBK_FORMAT] = pdfr;
			snd_wss_out(chip, CS4231_PLAYBK_FORMAT,
				    chip->image[CS4231_PLAYBK_FORMAT]);
			snd_wss_out(chip, CS4231_ALT_FEATURE_1,
				    chip->image[CS4231_ALT_FEATURE_1] &= ~0x10);
L
Linus Torvalds 已提交
643 644 645 646 647 648
			udelay(100); /* Fixes audible clicks at least on GUS MAX */
			full_calib = 0;
		}
		spin_unlock_irqrestore(&chip->reg_lock, flags);
	}
	if (full_calib) {
649
		snd_wss_mce_up(chip);
L
Linus Torvalds 已提交
650
		spin_lock_irqsave(&chip->reg_lock, flags);
651 652 653 654
		if (chip->hardware != WSS_HW_INTERWAVE && !chip->single_dma) {
			if (chip->image[CS4231_IFACE_CTRL] & CS4231_RECORD_ENABLE)
				pdfr = (pdfr & 0xf0) |
				       (chip->image[CS4231_REC_FORMAT] & 0x0f);
L
Linus Torvalds 已提交
655
		} else {
656
			chip->image[CS4231_PLAYBK_FORMAT] = pdfr;
L
Linus Torvalds 已提交
657
		}
658
		snd_wss_out(chip, CS4231_PLAYBK_FORMAT, pdfr);
L
Linus Torvalds 已提交
659
		spin_unlock_irqrestore(&chip->reg_lock, flags);
660
		if (chip->hardware == WSS_HW_OPL3SA2)
661
			udelay(100);	/* this seems to help */
662
		snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
663
	}
664
	snd_wss_calibrate_mute(chip, 0);
665
	mutex_unlock(&chip->mce_mutex);
L
Linus Torvalds 已提交
666 667
}

668 669 670
static void snd_wss_capture_format(struct snd_wss *chip,
				   struct snd_pcm_hw_params *params,
				   unsigned char cdfr)
L
Linus Torvalds 已提交
671 672 673 674
{
	unsigned long flags;
	int full_calib = 1;

675
	mutex_lock(&chip->mce_mutex);
676 677 678
	snd_wss_calibrate_mute(chip, 1);
	if (chip->hardware == WSS_HW_CS4231A ||
	    (chip->hardware & WSS_HW_CS4232_MASK)) {
L
Linus Torvalds 已提交
679 680 681
		spin_lock_irqsave(&chip->reg_lock, flags);
		if ((chip->image[CS4231_PLAYBK_FORMAT] & 0x0f) == (cdfr & 0x0f) ||	/* rate is same? */
		    (chip->image[CS4231_IFACE_CTRL] & CS4231_PLAYBACK_ENABLE)) {
682 683 684 685 686 687
			snd_wss_out(chip, CS4231_ALT_FEATURE_1,
				chip->image[CS4231_ALT_FEATURE_1] | 0x20);
			snd_wss_out(chip, CS4231_REC_FORMAT,
				chip->image[CS4231_REC_FORMAT] = cdfr);
			snd_wss_out(chip, CS4231_ALT_FEATURE_1,
				chip->image[CS4231_ALT_FEATURE_1] &= ~0x20);
L
Linus Torvalds 已提交
688 689 690 691 692
			full_calib = 0;
		}
		spin_unlock_irqrestore(&chip->reg_lock, flags);
	}
	if (full_calib) {
693
		snd_wss_mce_up(chip);
L
Linus Torvalds 已提交
694
		spin_lock_irqsave(&chip->reg_lock, flags);
695 696 697 698 699 700 701 702 703 704 705 706
		if (chip->hardware != WSS_HW_INTERWAVE &&
		    !(chip->image[CS4231_IFACE_CTRL] & CS4231_PLAYBACK_ENABLE)) {
			if (chip->single_dma)
				snd_wss_out(chip, CS4231_PLAYBK_FORMAT, cdfr);
			else
				snd_wss_out(chip, CS4231_PLAYBK_FORMAT,
				   (chip->image[CS4231_PLAYBK_FORMAT] & 0xf0) |
				   (cdfr & 0x0f));
			spin_unlock_irqrestore(&chip->reg_lock, flags);
			snd_wss_mce_down(chip);
			snd_wss_mce_up(chip);
			spin_lock_irqsave(&chip->reg_lock, flags);
L
Linus Torvalds 已提交
707
		}
708
		snd_wss_out(chip, CS4231_REC_FORMAT, cdfr);
L
Linus Torvalds 已提交
709
		spin_unlock_irqrestore(&chip->reg_lock, flags);
710
		snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
711
	}
712
	snd_wss_calibrate_mute(chip, 0);
713
	mutex_unlock(&chip->mce_mutex);
L
Linus Torvalds 已提交
714 715 716 717 718 719
}

/*
 *  Timer interface
 */

720
static unsigned long snd_wss_timer_resolution(struct snd_timer *timer)
L
Linus Torvalds 已提交
721
{
722 723
	struct snd_wss *chip = snd_timer_chip(timer);
	if (chip->hardware & WSS_HW_CS4236B_MASK)
L
Linus Torvalds 已提交
724 725 726 727 728
		return 14467;
	else
		return chip->image[CS4231_PLAYBK_FORMAT] & 1 ? 9969 : 9920;
}

729
static int snd_wss_timer_start(struct snd_timer *timer)
L
Linus Torvalds 已提交
730 731 732
{
	unsigned long flags;
	unsigned int ticks;
733
	struct snd_wss *chip = snd_timer_chip(timer);
L
Linus Torvalds 已提交
734 735 736 737 738
	spin_lock_irqsave(&chip->reg_lock, flags);
	ticks = timer->sticks;
	if ((chip->image[CS4231_ALT_FEATURE_1] & CS4231_TIMER_ENABLE) == 0 ||
	    (unsigned char)(ticks >> 8) != chip->image[CS4231_TIMER_HIGH] ||
	    (unsigned char)ticks != chip->image[CS4231_TIMER_LOW]) {
739 740 741 742 743 744 745 746 747
		chip->image[CS4231_TIMER_HIGH] = (unsigned char) (ticks >> 8);
		snd_wss_out(chip, CS4231_TIMER_HIGH,
			    chip->image[CS4231_TIMER_HIGH]);
		chip->image[CS4231_TIMER_LOW] = (unsigned char) ticks;
		snd_wss_out(chip, CS4231_TIMER_LOW,
			    chip->image[CS4231_TIMER_LOW]);
		snd_wss_out(chip, CS4231_ALT_FEATURE_1,
			    chip->image[CS4231_ALT_FEATURE_1] |
			    CS4231_TIMER_ENABLE);
L
Linus Torvalds 已提交
748 749 750 751 752
	}
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	return 0;
}

753
static int snd_wss_timer_stop(struct snd_timer *timer)
L
Linus Torvalds 已提交
754 755
{
	unsigned long flags;
756
	struct snd_wss *chip = snd_timer_chip(timer);
L
Linus Torvalds 已提交
757
	spin_lock_irqsave(&chip->reg_lock, flags);
758 759 760
	chip->image[CS4231_ALT_FEATURE_1] &= ~CS4231_TIMER_ENABLE;
	snd_wss_out(chip, CS4231_ALT_FEATURE_1,
		    chip->image[CS4231_ALT_FEATURE_1]);
L
Linus Torvalds 已提交
761 762 763 764
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	return 0;
}

765
static void snd_wss_init(struct snd_wss *chip)
L
Linus Torvalds 已提交
766 767 768
{
	unsigned long flags;

769
	snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
770 771 772 773

#ifdef SNDRV_DEBUG_MCE
	snd_printk("init: (1)\n");
#endif
774
	snd_wss_mce_up(chip);
L
Linus Torvalds 已提交
775
	spin_lock_irqsave(&chip->reg_lock, flags);
776 777 778 779 780
	chip->image[CS4231_IFACE_CTRL] &= ~(CS4231_PLAYBACK_ENABLE |
					    CS4231_PLAYBACK_PIO |
					    CS4231_RECORD_ENABLE |
					    CS4231_RECORD_PIO |
					    CS4231_CALIB_MODE);
L
Linus Torvalds 已提交
781
	chip->image[CS4231_IFACE_CTRL] |= CS4231_AUTOCALIB;
782
	snd_wss_out(chip, CS4231_IFACE_CTRL, chip->image[CS4231_IFACE_CTRL]);
L
Linus Torvalds 已提交
783
	spin_unlock_irqrestore(&chip->reg_lock, flags);
784
	snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
785 786 787 788 789

#ifdef SNDRV_DEBUG_MCE
	snd_printk("init: (2)\n");
#endif

790
	snd_wss_mce_up(chip);
L
Linus Torvalds 已提交
791
	spin_lock_irqsave(&chip->reg_lock, flags);
792 793
	snd_wss_out(chip,
		    CS4231_ALT_FEATURE_1, chip->image[CS4231_ALT_FEATURE_1]);
L
Linus Torvalds 已提交
794
	spin_unlock_irqrestore(&chip->reg_lock, flags);
795
	snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
796 797

#ifdef SNDRV_DEBUG_MCE
798 799
	snd_printk("init: (3) - afei = 0x%x\n",
		   chip->image[CS4231_ALT_FEATURE_1]);
L
Linus Torvalds 已提交
800 801 802
#endif

	spin_lock_irqsave(&chip->reg_lock, flags);
803 804
	snd_wss_out(chip, CS4231_ALT_FEATURE_2,
		    chip->image[CS4231_ALT_FEATURE_2]);
L
Linus Torvalds 已提交
805 806
	spin_unlock_irqrestore(&chip->reg_lock, flags);

807
	snd_wss_mce_up(chip);
L
Linus Torvalds 已提交
808
	spin_lock_irqsave(&chip->reg_lock, flags);
809 810
	snd_wss_out(chip, CS4231_PLAYBK_FORMAT,
		    chip->image[CS4231_PLAYBK_FORMAT]);
L
Linus Torvalds 已提交
811
	spin_unlock_irqrestore(&chip->reg_lock, flags);
812
	snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
813 814 815 816 817

#ifdef SNDRV_DEBUG_MCE
	snd_printk("init: (4)\n");
#endif

818
	snd_wss_mce_up(chip);
L
Linus Torvalds 已提交
819
	spin_lock_irqsave(&chip->reg_lock, flags);
820
	snd_wss_out(chip, CS4231_REC_FORMAT, chip->image[CS4231_REC_FORMAT]);
L
Linus Torvalds 已提交
821
	spin_unlock_irqrestore(&chip->reg_lock, flags);
822
	snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
823 824 825 826 827 828

#ifdef SNDRV_DEBUG_MCE
	snd_printk("init: (5)\n");
#endif
}

829
static int snd_wss_open(struct snd_wss *chip, unsigned int mode)
L
Linus Torvalds 已提交
830 831 832
{
	unsigned long flags;

833
	mutex_lock(&chip->open_mutex);
L
Linus Torvalds 已提交
834
	if ((chip->mode & mode) ||
835
	    ((chip->mode & WSS_MODE_OPEN) && chip->single_dma)) {
836
		mutex_unlock(&chip->open_mutex);
L
Linus Torvalds 已提交
837 838
		return -EAGAIN;
	}
839
	if (chip->mode & WSS_MODE_OPEN) {
L
Linus Torvalds 已提交
840
		chip->mode |= mode;
841
		mutex_unlock(&chip->open_mutex);
L
Linus Torvalds 已提交
842 843 844 845
		return 0;
	}
	/* ok. now enable and ack CODEC IRQ */
	spin_lock_irqsave(&chip->reg_lock, flags);
846 847 848 849 850 851 852
	snd_wss_out(chip, CS4231_IRQ_STATUS,
		    CS4231_PLAYBACK_IRQ |
		    CS4231_RECORD_IRQ |
		    CS4231_TIMER_IRQ);
	snd_wss_out(chip, CS4231_IRQ_STATUS, 0);
	wss_outb(chip, CS4231P(STATUS), 0);	/* clear IRQ */
	wss_outb(chip, CS4231P(STATUS), 0);	/* clear IRQ */
L
Linus Torvalds 已提交
853
	chip->image[CS4231_PIN_CTRL] |= CS4231_IRQ_ENABLE;
854 855 856 857 858 859
	snd_wss_out(chip, CS4231_PIN_CTRL, chip->image[CS4231_PIN_CTRL]);
	snd_wss_out(chip, CS4231_IRQ_STATUS,
		    CS4231_PLAYBACK_IRQ |
		    CS4231_RECORD_IRQ |
		    CS4231_TIMER_IRQ);
	snd_wss_out(chip, CS4231_IRQ_STATUS, 0);
L
Linus Torvalds 已提交
860 861 862
	spin_unlock_irqrestore(&chip->reg_lock, flags);

	chip->mode = mode;
863
	mutex_unlock(&chip->open_mutex);
L
Linus Torvalds 已提交
864 865 866
	return 0;
}

867
static void snd_wss_close(struct snd_wss *chip, unsigned int mode)
L
Linus Torvalds 已提交
868 869 870
{
	unsigned long flags;

871
	mutex_lock(&chip->open_mutex);
L
Linus Torvalds 已提交
872
	chip->mode &= ~mode;
873
	if (chip->mode & WSS_MODE_OPEN) {
874
		mutex_unlock(&chip->open_mutex);
L
Linus Torvalds 已提交
875 876
		return;
	}
877
	snd_wss_calibrate_mute(chip, 1);
L
Linus Torvalds 已提交
878 879 880

	/* disable IRQ */
	spin_lock_irqsave(&chip->reg_lock, flags);
881 882 883
	snd_wss_out(chip, CS4231_IRQ_STATUS, 0);
	wss_outb(chip, CS4231P(STATUS), 0);	/* clear IRQ */
	wss_outb(chip, CS4231P(STATUS), 0);	/* clear IRQ */
L
Linus Torvalds 已提交
884
	chip->image[CS4231_PIN_CTRL] &= ~CS4231_IRQ_ENABLE;
885
	snd_wss_out(chip, CS4231_PIN_CTRL, chip->image[CS4231_PIN_CTRL]);
L
Linus Torvalds 已提交
886 887 888 889 890 891

	/* now disable record & playback */

	if (chip->image[CS4231_IFACE_CTRL] & (CS4231_PLAYBACK_ENABLE | CS4231_PLAYBACK_PIO |
					       CS4231_RECORD_ENABLE | CS4231_RECORD_PIO)) {
		spin_unlock_irqrestore(&chip->reg_lock, flags);
892
		snd_wss_mce_up(chip);
L
Linus Torvalds 已提交
893 894 895
		spin_lock_irqsave(&chip->reg_lock, flags);
		chip->image[CS4231_IFACE_CTRL] &= ~(CS4231_PLAYBACK_ENABLE | CS4231_PLAYBACK_PIO |
						     CS4231_RECORD_ENABLE | CS4231_RECORD_PIO);
896 897
		snd_wss_out(chip, CS4231_IFACE_CTRL,
			    chip->image[CS4231_IFACE_CTRL]);
L
Linus Torvalds 已提交
898
		spin_unlock_irqrestore(&chip->reg_lock, flags);
899
		snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
900 901 902 903
		spin_lock_irqsave(&chip->reg_lock, flags);
	}

	/* clear IRQ again */
904 905 906
	snd_wss_out(chip, CS4231_IRQ_STATUS, 0);
	wss_outb(chip, CS4231P(STATUS), 0);	/* clear IRQ */
	wss_outb(chip, CS4231P(STATUS), 0);	/* clear IRQ */
L
Linus Torvalds 已提交
907 908
	spin_unlock_irqrestore(&chip->reg_lock, flags);

909
	snd_wss_calibrate_mute(chip, 0);
L
Linus Torvalds 已提交
910 911

	chip->mode = 0;
912
	mutex_unlock(&chip->open_mutex);
L
Linus Torvalds 已提交
913 914 915 916 917 918
}

/*
 *  timer open/close
 */

919
static int snd_wss_timer_open(struct snd_timer *timer)
L
Linus Torvalds 已提交
920
{
921 922
	struct snd_wss *chip = snd_timer_chip(timer);
	snd_wss_open(chip, WSS_MODE_TIMER);
L
Linus Torvalds 已提交
923 924 925
	return 0;
}

926
static int snd_wss_timer_close(struct snd_timer *timer)
L
Linus Torvalds 已提交
927
{
928 929
	struct snd_wss *chip = snd_timer_chip(timer);
	snd_wss_close(chip, WSS_MODE_TIMER);
L
Linus Torvalds 已提交
930 931 932
	return 0;
}

933
static struct snd_timer_hardware snd_wss_timer_table =
L
Linus Torvalds 已提交
934 935 936 937
{
	.flags =	SNDRV_TIMER_HW_AUTO,
	.resolution =	9945,
	.ticks =	65535,
938 939 940 941 942
	.open =		snd_wss_timer_open,
	.close =	snd_wss_timer_close,
	.c_resolution = snd_wss_timer_resolution,
	.start =	snd_wss_timer_start,
	.stop =		snd_wss_timer_stop,
L
Linus Torvalds 已提交
943 944 945 946 947 948
};

/*
 *  ok.. exported functions..
 */

949
static int snd_wss_playback_hw_params(struct snd_pcm_substream *substream,
950
					 struct snd_pcm_hw_params *hw_params)
L
Linus Torvalds 已提交
951
{
952
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
L
Linus Torvalds 已提交
953 954 955 956 957
	unsigned char new_pdfr;
	int err;

	if ((err = snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params))) < 0)
		return err;
958 959 960
	new_pdfr = snd_wss_get_format(chip, params_format(hw_params),
				params_channels(hw_params)) |
				snd_wss_get_rate(params_rate(hw_params));
L
Linus Torvalds 已提交
961 962 963 964
	chip->set_playback_format(chip, hw_params, new_pdfr);
	return 0;
}

965
static int snd_wss_playback_hw_free(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
966 967 968 969
{
	return snd_pcm_lib_free_pages(substream);
}

970
static int snd_wss_playback_prepare(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
971
{
972
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
973
	struct snd_pcm_runtime *runtime = substream->runtime;
L
Linus Torvalds 已提交
974 975 976 977 978 979 980 981
	unsigned long flags;
	unsigned int size = snd_pcm_lib_buffer_bytes(substream);
	unsigned int count = snd_pcm_lib_period_bytes(substream);

	spin_lock_irqsave(&chip->reg_lock, flags);
	chip->p_dma_size = size;
	chip->image[CS4231_IFACE_CTRL] &= ~(CS4231_PLAYBACK_ENABLE | CS4231_PLAYBACK_PIO);
	snd_dma_program(chip->dma1, runtime->dma_addr, size, DMA_MODE_WRITE | DMA_AUTOINIT);
982 983 984
	count = snd_wss_get_count(chip->image[CS4231_PLAYBK_FORMAT], count) - 1;
	snd_wss_out(chip, CS4231_PLY_LWR_CNT, (unsigned char) count);
	snd_wss_out(chip, CS4231_PLY_UPR_CNT, (unsigned char) (count >> 8));
L
Linus Torvalds 已提交
985 986
	spin_unlock_irqrestore(&chip->reg_lock, flags);
#if 0
987
	snd_wss_debug(chip);
L
Linus Torvalds 已提交
988 989 990 991
#endif
	return 0;
}

992
static int snd_wss_capture_hw_params(struct snd_pcm_substream *substream,
993
					struct snd_pcm_hw_params *hw_params)
L
Linus Torvalds 已提交
994
{
995
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
L
Linus Torvalds 已提交
996 997 998 999 1000
	unsigned char new_cdfr;
	int err;

	if ((err = snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params))) < 0)
		return err;
1001 1002 1003
	new_cdfr = snd_wss_get_format(chip, params_format(hw_params),
			   params_channels(hw_params)) |
			   snd_wss_get_rate(params_rate(hw_params));
L
Linus Torvalds 已提交
1004 1005 1006 1007
	chip->set_capture_format(chip, hw_params, new_cdfr);
	return 0;
}

1008
static int snd_wss_capture_hw_free(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
1009 1010 1011 1012
{
	return snd_pcm_lib_free_pages(substream);
}

1013
static int snd_wss_capture_prepare(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
1014
{
1015
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
1016
	struct snd_pcm_runtime *runtime = substream->runtime;
L
Linus Torvalds 已提交
1017 1018 1019 1020 1021 1022 1023 1024
	unsigned long flags;
	unsigned int size = snd_pcm_lib_buffer_bytes(substream);
	unsigned int count = snd_pcm_lib_period_bytes(substream);

	spin_lock_irqsave(&chip->reg_lock, flags);
	chip->c_dma_size = size;
	chip->image[CS4231_IFACE_CTRL] &= ~(CS4231_RECORD_ENABLE | CS4231_RECORD_PIO);
	snd_dma_program(chip->dma2, runtime->dma_addr, size, DMA_MODE_READ | DMA_AUTOINIT);
1025 1026 1027 1028 1029
	count = snd_wss_get_count(chip->image[CS4231_REC_FORMAT], count) - 1;
	if (chip->single_dma && chip->hardware != WSS_HW_INTERWAVE) {
		snd_wss_out(chip, CS4231_PLY_LWR_CNT, (unsigned char) count);
		snd_wss_out(chip, CS4231_PLY_UPR_CNT,
			    (unsigned char) (count >> 8));
L
Linus Torvalds 已提交
1030
	} else {
1031 1032 1033
		snd_wss_out(chip, CS4231_REC_LWR_CNT, (unsigned char) count);
		snd_wss_out(chip, CS4231_REC_UPR_CNT,
			    (unsigned char) (count >> 8));
L
Linus Torvalds 已提交
1034 1035 1036 1037 1038
	}
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	return 0;
}

1039
void snd_wss_overrange(struct snd_wss *chip)
L
Linus Torvalds 已提交
1040 1041 1042 1043 1044
{
	unsigned long flags;
	unsigned char res;

	spin_lock_irqsave(&chip->reg_lock, flags);
1045
	res = snd_wss_in(chip, CS4231_TEST_INIT);
L
Linus Torvalds 已提交
1046 1047 1048 1049
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	if (res & (0x08 | 0x02))	/* detect overrange only above 0dB; may be user selectable? */
		chip->capture_substream->runtime->overrange++;
}
1050
EXPORT_SYMBOL(snd_wss_overrange);
L
Linus Torvalds 已提交
1051

1052
irqreturn_t snd_wss_interrupt(int irq, void *dev_id)
L
Linus Torvalds 已提交
1053
{
1054
	struct snd_wss *chip = dev_id;
L
Linus Torvalds 已提交
1055 1056
	unsigned char status;

1057
	status = snd_wss_in(chip, CS4231_IRQ_STATUS);
L
Linus Torvalds 已提交
1058 1059 1060
	if (status & CS4231_TIMER_IRQ) {
		if (chip->timer)
			snd_timer_interrupt(chip->timer, chip->timer->sticks);
1061
	}
1062
	if (chip->single_dma && chip->hardware != WSS_HW_INTERWAVE) {
L
Linus Torvalds 已提交
1063
		if (status & CS4231_PLAYBACK_IRQ) {
1064
			if (chip->mode & WSS_MODE_PLAY) {
L
Linus Torvalds 已提交
1065 1066 1067
				if (chip->playback_substream)
					snd_pcm_period_elapsed(chip->playback_substream);
			}
1068
			if (chip->mode & WSS_MODE_RECORD) {
L
Linus Torvalds 已提交
1069
				if (chip->capture_substream) {
1070
					snd_wss_overrange(chip);
L
Linus Torvalds 已提交
1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081
					snd_pcm_period_elapsed(chip->capture_substream);
				}
			}
		}
	} else {
		if (status & CS4231_PLAYBACK_IRQ) {
			if (chip->playback_substream)
				snd_pcm_period_elapsed(chip->playback_substream);
		}
		if (status & CS4231_RECORD_IRQ) {
			if (chip->capture_substream) {
1082
				snd_wss_overrange(chip);
L
Linus Torvalds 已提交
1083 1084 1085 1086 1087 1088
				snd_pcm_period_elapsed(chip->capture_substream);
			}
		}
	}

	spin_lock(&chip->reg_lock);
1089
	snd_wss_outm(chip, CS4231_IRQ_STATUS, ~CS4231_ALL_IRQS | ~status, 0);
L
Linus Torvalds 已提交
1090 1091 1092
	spin_unlock(&chip->reg_lock);
	return IRQ_HANDLED;
}
1093
EXPORT_SYMBOL(snd_wss_interrupt);
L
Linus Torvalds 已提交
1094

1095
static snd_pcm_uframes_t snd_wss_playback_pointer(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
1096
{
1097
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
L
Linus Torvalds 已提交
1098 1099 1100 1101 1102 1103 1104 1105
	size_t ptr;

	if (!(chip->image[CS4231_IFACE_CTRL] & CS4231_PLAYBACK_ENABLE))
		return 0;
	ptr = snd_dma_pointer(chip->dma1, chip->p_dma_size);
	return bytes_to_frames(substream->runtime, ptr);
}

1106
static snd_pcm_uframes_t snd_wss_capture_pointer(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
1107
{
1108
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
L
Linus Torvalds 已提交
1109
	size_t ptr;
1110

L
Linus Torvalds 已提交
1111 1112 1113 1114 1115 1116 1117 1118 1119 1120
	if (!(chip->image[CS4231_IFACE_CTRL] & CS4231_RECORD_ENABLE))
		return 0;
	ptr = snd_dma_pointer(chip->dma2, chip->c_dma_size);
	return bytes_to_frames(substream->runtime, ptr);
}

/*

 */

1121
static int snd_wss_probe(struct snd_wss *chip)
L
Linus Torvalds 已提交
1122 1123 1124 1125 1126 1127 1128
{
	unsigned long flags;
	int i, id, rev;
	unsigned char *ptr;
	unsigned int hw;

#if 0
1129
	snd_wss_debug(chip);
L
Linus Torvalds 已提交
1130 1131 1132 1133
#endif
	id = 0;
	for (i = 0; i < 50; i++) {
		mb();
1134
		if (wss_inb(chip, CS4231P(REGSEL)) & CS4231_INIT)
L
Linus Torvalds 已提交
1135 1136 1137
			udelay(2000);
		else {
			spin_lock_irqsave(&chip->reg_lock, flags);
1138 1139
			snd_wss_out(chip, CS4231_MISC_INFO, CS4231_MODE2);
			id = snd_wss_in(chip, CS4231_MISC_INFO) & 0x0f;
L
Linus Torvalds 已提交
1140 1141 1142 1143 1144
			spin_unlock_irqrestore(&chip->reg_lock, flags);
			if (id == 0x0a)
				break;	/* this is valid value */
		}
	}
1145
	snd_printdd("wss: port = 0x%lx, id = 0x%x\n", chip->port, id);
L
Linus Torvalds 已提交
1146 1147 1148
	if (id != 0x0a)
		return -ENODEV;	/* no valid device found */

1149 1150 1151
	hw = chip->hardware;
	if ((hw & WSS_HW_TYPE_MASK) == WSS_HW_DETECT) {
		rev = snd_wss_in(chip, CS4231_VERSION) & 0xe7;
L
Linus Torvalds 已提交
1152 1153
		snd_printdd("CS4231: VERSION (I25) = 0x%x\n", rev);
		if (rev == 0x80) {
1154 1155 1156 1157
			unsigned char tmp = snd_wss_in(chip, 23);
			snd_wss_out(chip, 23, ~tmp);
			if (snd_wss_in(chip, 23) != tmp)
				chip->hardware = WSS_HW_AD1845;
L
Linus Torvalds 已提交
1158
			else
1159
				chip->hardware = WSS_HW_CS4231;
L
Linus Torvalds 已提交
1160
		} else if (rev == 0xa0) {
1161
			chip->hardware = WSS_HW_CS4231A;
L
Linus Torvalds 已提交
1162
		} else if (rev == 0xa2) {
1163
			chip->hardware = WSS_HW_CS4232;
L
Linus Torvalds 已提交
1164
		} else if (rev == 0xb2) {
1165
			chip->hardware = WSS_HW_CS4232A;
L
Linus Torvalds 已提交
1166
		} else if (rev == 0x83) {
1167
			chip->hardware = WSS_HW_CS4236;
L
Linus Torvalds 已提交
1168
		} else if (rev == 0x03) {
1169
			chip->hardware = WSS_HW_CS4236B;
L
Linus Torvalds 已提交
1170 1171 1172 1173 1174 1175
		} else {
			snd_printk("unknown CS chip with version 0x%x\n", rev);
			return -ENODEV;		/* unknown CS4231 chip? */
		}
	}
	spin_lock_irqsave(&chip->reg_lock, flags);
1176 1177
	wss_inb(chip, CS4231P(STATUS));	/* clear any pendings IRQ */
	wss_outb(chip, CS4231P(STATUS), 0);
L
Linus Torvalds 已提交
1178 1179 1180 1181 1182
	mb();
	spin_unlock_irqrestore(&chip->reg_lock, flags);

	chip->image[CS4231_MISC_INFO] = CS4231_MODE2;
	switch (chip->hardware) {
1183
	case WSS_HW_INTERWAVE:
L
Linus Torvalds 已提交
1184 1185
		chip->image[CS4231_MISC_INFO] = CS4231_IW_MODE3;
		break;
1186 1187 1188 1189 1190 1191
	case WSS_HW_CS4235:
	case WSS_HW_CS4236B:
	case WSS_HW_CS4237B:
	case WSS_HW_CS4238B:
	case WSS_HW_CS4239:
		if (hw == WSS_HW_DETECT3)
L
Linus Torvalds 已提交
1192 1193
			chip->image[CS4231_MISC_INFO] = CS4231_4236_MODE3;
		else
1194
			chip->hardware = WSS_HW_CS4236;
L
Linus Torvalds 已提交
1195 1196 1197 1198 1199 1200
		break;
	}

	chip->image[CS4231_IFACE_CTRL] =
	    (chip->image[CS4231_IFACE_CTRL] & ~CS4231_SINGLE_DMA) |
	    (chip->single_dma ? CS4231_SINGLE_DMA : 0);
1201
	if (chip->hardware != WSS_HW_OPTI93X) {
1202 1203
		chip->image[CS4231_ALT_FEATURE_1] = 0x80;
		chip->image[CS4231_ALT_FEATURE_2] =
1204
			chip->hardware == WSS_HW_INTERWAVE ? 0xc2 : 0x01;
1205
	}
L
Linus Torvalds 已提交
1206
	ptr = (unsigned char *) &chip->image;
1207
	snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
1208 1209
	spin_lock_irqsave(&chip->reg_lock, flags);
	for (i = 0; i < 32; i++)	/* ok.. fill all CS4231 registers */
1210
		snd_wss_out(chip, i, *ptr++);
L
Linus Torvalds 已提交
1211
	spin_unlock_irqrestore(&chip->reg_lock, flags);
1212 1213
	snd_wss_mce_up(chip);
	snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
1214 1215 1216 1217

	mdelay(2);

	/* ok.. try check hardware version for CS4236+ chips */
1218 1219
	if ((hw & WSS_HW_TYPE_MASK) == WSS_HW_DETECT) {
		if (chip->hardware == WSS_HW_CS4236B) {
L
Linus Torvalds 已提交
1220 1221 1222 1223 1224 1225
			rev = snd_cs4236_ext_in(chip, CS4236_VERSION);
			snd_cs4236_ext_out(chip, CS4236_VERSION, 0xff);
			id = snd_cs4236_ext_in(chip, CS4236_VERSION);
			snd_cs4236_ext_out(chip, CS4236_VERSION, rev);
			snd_printdd("CS4231: ext version; rev = 0x%x, id = 0x%x\n", rev, id);
			if ((id & 0x1f) == 0x1d) {	/* CS4235 */
1226
				chip->hardware = WSS_HW_CS4235;
L
Linus Torvalds 已提交
1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240
				switch (id >> 5) {
				case 4:
				case 5:
				case 6:
					break;
				default:
					snd_printk("unknown CS4235 chip (enhanced version = 0x%x)\n", id);
				}
			} else if ((id & 0x1f) == 0x0b) {	/* CS4236/B */
				switch (id >> 5) {
				case 4:
				case 5:
				case 6:
				case 7:
1241
					chip->hardware = WSS_HW_CS4236B;
L
Linus Torvalds 已提交
1242 1243 1244 1245 1246
					break;
				default:
					snd_printk("unknown CS4236 chip (enhanced version = 0x%x)\n", id);
				}
			} else if ((id & 0x1f) == 0x08) {	/* CS4237B */
1247
				chip->hardware = WSS_HW_CS4237B;
L
Linus Torvalds 已提交
1248 1249 1250 1251 1252 1253 1254 1255 1256 1257
				switch (id >> 5) {
				case 4:
				case 5:
				case 6:
				case 7:
					break;
				default:
					snd_printk("unknown CS4237B chip (enhanced version = 0x%x)\n", id);
				}
			} else if ((id & 0x1f) == 0x09) {	/* CS4238B */
1258
				chip->hardware = WSS_HW_CS4238B;
L
Linus Torvalds 已提交
1259 1260 1261 1262 1263 1264 1265 1266 1267
				switch (id >> 5) {
				case 5:
				case 6:
				case 7:
					break;
				default:
					snd_printk("unknown CS4238B chip (enhanced version = 0x%x)\n", id);
				}
			} else if ((id & 0x1f) == 0x1e) {	/* CS4239 */
1268
				chip->hardware = WSS_HW_CS4239;
L
Linus Torvalds 已提交
1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288
				switch (id >> 5) {
				case 4:
				case 5:
				case 6:
					break;
				default:
					snd_printk("unknown CS4239 chip (enhanced version = 0x%x)\n", id);
				}
			} else {
				snd_printk("unknown CS4236/CS423xB chip (enhanced version = 0x%x)\n", id);
			}
		}
	}
	return 0;		/* all things are ok.. */
}

/*

 */

1289
static struct snd_pcm_hardware snd_wss_playback =
L
Linus Torvalds 已提交
1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309
{
	.info =			(SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
				 SNDRV_PCM_INFO_MMAP_VALID |
				 SNDRV_PCM_INFO_RESUME |
				 SNDRV_PCM_INFO_SYNC_START),
	.formats =		(SNDRV_PCM_FMTBIT_MU_LAW | SNDRV_PCM_FMTBIT_A_LAW | SNDRV_PCM_FMTBIT_IMA_ADPCM |
				 SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S16_BE),
	.rates =		SNDRV_PCM_RATE_KNOT | SNDRV_PCM_RATE_8000_48000,
	.rate_min =		5510,
	.rate_max =		48000,
	.channels_min =		1,
	.channels_max =		2,
	.buffer_bytes_max =	(128*1024),
	.period_bytes_min =	64,
	.period_bytes_max =	(128*1024),
	.periods_min =		1,
	.periods_max =		1024,
	.fifo_size =		0,
};

1310
static struct snd_pcm_hardware snd_wss_capture =
L
Linus Torvalds 已提交
1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334
{
	.info =			(SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
				 SNDRV_PCM_INFO_MMAP_VALID |
				 SNDRV_PCM_INFO_RESUME |
				 SNDRV_PCM_INFO_SYNC_START),
	.formats =		(SNDRV_PCM_FMTBIT_MU_LAW | SNDRV_PCM_FMTBIT_A_LAW | SNDRV_PCM_FMTBIT_IMA_ADPCM |
				 SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE | SNDRV_PCM_FMTBIT_S16_BE),
	.rates =		SNDRV_PCM_RATE_KNOT | SNDRV_PCM_RATE_8000_48000,
	.rate_min =		5510,
	.rate_max =		48000,
	.channels_min =		1,
	.channels_max =		2,
	.buffer_bytes_max =	(128*1024),
	.period_bytes_min =	64,
	.period_bytes_max =	(128*1024),
	.periods_min =		1,
	.periods_max =		1024,
	.fifo_size =		0,
};

/*

 */

1335
static int snd_wss_playback_open(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
1336
{
1337
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
1338
	struct snd_pcm_runtime *runtime = substream->runtime;
L
Linus Torvalds 已提交
1339 1340
	int err;

1341
	runtime->hw = snd_wss_playback;
L
Linus Torvalds 已提交
1342 1343

	/* hardware bug in InterWave chipset */
1344
	if (chip->hardware == WSS_HW_INTERWAVE && chip->dma1 > 3)
1345 1346
		runtime->hw.formats &= ~SNDRV_PCM_FMTBIT_MU_LAW;

L
Linus Torvalds 已提交
1347
	/* hardware limitation of cheap chips */
1348 1349
	if (chip->hardware == WSS_HW_CS4235 ||
	    chip->hardware == WSS_HW_CS4239)
L
Linus Torvalds 已提交
1350 1351 1352 1353 1354 1355 1356 1357 1358 1359
		runtime->hw.formats = SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE;

	snd_pcm_limit_isa_dma_size(chip->dma1, &runtime->hw.buffer_bytes_max);
	snd_pcm_limit_isa_dma_size(chip->dma1, &runtime->hw.period_bytes_max);

	if (chip->claim_dma) {
		if ((err = chip->claim_dma(chip, chip->dma_private_data, chip->dma1)) < 0)
			return err;
	}

1360 1361
	err = snd_wss_open(chip, WSS_MODE_PLAY);
	if (err < 0) {
L
Linus Torvalds 已提交
1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372
		if (chip->release_dma)
			chip->release_dma(chip, chip->dma_private_data, chip->dma1);
		snd_free_pages(runtime->dma_area, runtime->dma_bytes);
		return err;
	}
	chip->playback_substream = substream;
	snd_pcm_set_sync(substream);
	chip->rate_constraint(runtime);
	return 0;
}

1373
static int snd_wss_capture_open(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
1374
{
1375
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
1376
	struct snd_pcm_runtime *runtime = substream->runtime;
L
Linus Torvalds 已提交
1377 1378
	int err;

1379
	runtime->hw = snd_wss_capture;
L
Linus Torvalds 已提交
1380 1381

	/* hardware limitation of cheap chips */
1382 1383
	if (chip->hardware == WSS_HW_CS4235 ||
	    chip->hardware == WSS_HW_CS4239)
L
Linus Torvalds 已提交
1384 1385 1386 1387 1388 1389 1390 1391 1392 1393
		runtime->hw.formats = SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE;

	snd_pcm_limit_isa_dma_size(chip->dma2, &runtime->hw.buffer_bytes_max);
	snd_pcm_limit_isa_dma_size(chip->dma2, &runtime->hw.period_bytes_max);

	if (chip->claim_dma) {
		if ((err = chip->claim_dma(chip, chip->dma_private_data, chip->dma2)) < 0)
			return err;
	}

1394 1395
	err = snd_wss_open(chip, WSS_MODE_RECORD);
	if (err < 0) {
L
Linus Torvalds 已提交
1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406
		if (chip->release_dma)
			chip->release_dma(chip, chip->dma_private_data, chip->dma2);
		snd_free_pages(runtime->dma_area, runtime->dma_bytes);
		return err;
	}
	chip->capture_substream = substream;
	snd_pcm_set_sync(substream);
	chip->rate_constraint(runtime);
	return 0;
}

1407
static int snd_wss_playback_close(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
1408
{
1409
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
L
Linus Torvalds 已提交
1410 1411

	chip->playback_substream = NULL;
1412
	snd_wss_close(chip, WSS_MODE_PLAY);
L
Linus Torvalds 已提交
1413 1414 1415
	return 0;
}

1416
static int snd_wss_capture_close(struct snd_pcm_substream *substream)
L
Linus Torvalds 已提交
1417
{
1418
	struct snd_wss *chip = snd_pcm_substream_chip(substream);
L
Linus Torvalds 已提交
1419 1420

	chip->capture_substream = NULL;
1421
	snd_wss_close(chip, WSS_MODE_RECORD);
L
Linus Torvalds 已提交
1422 1423 1424 1425 1426 1427
	return 0;
}

#ifdef CONFIG_PM

/* lowlevel suspend callback for CS4231 */
1428
static void snd_wss_suspend(struct snd_wss *chip)
L
Linus Torvalds 已提交
1429 1430 1431
{
	int reg;
	unsigned long flags;
1432

T
Takashi Iwai 已提交
1433
	snd_pcm_suspend_all(chip->pcm);
L
Linus Torvalds 已提交
1434 1435
	spin_lock_irqsave(&chip->reg_lock, flags);
	for (reg = 0; reg < 32; reg++)
1436
		chip->image[reg] = snd_wss_in(chip, reg);
L
Linus Torvalds 已提交
1437 1438 1439 1440
	spin_unlock_irqrestore(&chip->reg_lock, flags);
}

/* lowlevel resume callback for CS4231 */
1441
static void snd_wss_resume(struct snd_wss *chip)
L
Linus Torvalds 已提交
1442 1443 1444
{
	int reg;
	unsigned long flags;
T
Takashi Iwai 已提交
1445
	/* int timeout; */
1446

1447
	snd_wss_mce_up(chip);
L
Linus Torvalds 已提交
1448 1449 1450 1451 1452 1453
	spin_lock_irqsave(&chip->reg_lock, flags);
	for (reg = 0; reg < 32; reg++) {
		switch (reg) {
		case CS4231_VERSION:
			break;
		default:
1454
			snd_wss_out(chip, reg, chip->image[reg]);
L
Linus Torvalds 已提交
1455 1456 1457 1458
			break;
		}
	}
	spin_unlock_irqrestore(&chip->reg_lock, flags);
T
Takashi Iwai 已提交
1459
#if 1
1460
	snd_wss_mce_down(chip);
L
Linus Torvalds 已提交
1461 1462
#else
	/* The following is a workaround to avoid freeze after resume on TP600E.
1463
	   This is the first half of copy of snd_wss_mce_down(), but doesn't
L
Linus Torvalds 已提交
1464 1465
	   include rescheduling.  -- iwai
	   */
1466
	snd_wss_busy_wait(chip);
L
Linus Torvalds 已提交
1467 1468
	spin_lock_irqsave(&chip->reg_lock, flags);
	chip->mce_bit &= ~CS4231_MCE;
1469 1470
	timeout = wss_inb(chip, CS4231P(REGSEL));
	wss_outb(chip, CS4231P(REGSEL), chip->mce_bit | (timeout & 0x1f));
L
Linus Torvalds 已提交
1471 1472 1473 1474
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	if (timeout == 0x80)
		snd_printk("down [0x%lx]: serious init problem - codec still busy\n", chip->port);
	if ((timeout & CS4231_MCE) == 0 ||
1475
	    !(chip->hardware & (WSS_HW_CS4231_MASK | WSS_HW_CS4232_MASK))) {
L
Linus Torvalds 已提交
1476 1477
		return;
	}
1478
	snd_wss_busy_wait(chip);
L
Linus Torvalds 已提交
1479 1480 1481 1482
#endif
}
#endif /* CONFIG_PM */

1483
static int snd_wss_free(struct snd_wss *chip)
L
Linus Torvalds 已提交
1484
{
1485 1486
	release_and_free_resource(chip->res_port);
	release_and_free_resource(chip->res_cport);
L
Linus Torvalds 已提交
1487 1488
	if (chip->irq >= 0) {
		disable_irq(chip->irq);
1489
		if (!(chip->hwshare & WSS_HWSHARE_IRQ))
L
Linus Torvalds 已提交
1490 1491
			free_irq(chip->irq, (void *) chip);
	}
1492
	if (!(chip->hwshare & WSS_HWSHARE_DMA1) && chip->dma1 >= 0) {
L
Linus Torvalds 已提交
1493 1494 1495
		snd_dma_disable(chip->dma1);
		free_dma(chip->dma1);
	}
1496 1497
	if (!(chip->hwshare & WSS_HWSHARE_DMA2) &&
	    chip->dma2 >= 0 && chip->dma2 != chip->dma1) {
L
Linus Torvalds 已提交
1498 1499 1500 1501 1502 1503 1504 1505 1506
		snd_dma_disable(chip->dma2);
		free_dma(chip->dma2);
	}
	if (chip->timer)
		snd_device_free(chip->card, chip->timer);
	kfree(chip);
	return 0;
}

1507
static int snd_wss_dev_free(struct snd_device *device)
L
Linus Torvalds 已提交
1508
{
1509 1510
	struct snd_wss *chip = device->device_data;
	return snd_wss_free(chip);
L
Linus Torvalds 已提交
1511 1512
}

1513
const char *snd_wss_chip_id(struct snd_wss *chip)
L
Linus Torvalds 已提交
1514 1515
{
	switch (chip->hardware) {
1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545
	case WSS_HW_CS4231:
		return "CS4231";
	case WSS_HW_CS4231A:
		return "CS4231A";
	case WSS_HW_CS4232:
		return "CS4232";
	case WSS_HW_CS4232A:
		return "CS4232A";
	case WSS_HW_CS4235:
		return "CS4235";
	case WSS_HW_CS4236:
		return "CS4236";
	case WSS_HW_CS4236B:
		return "CS4236B";
	case WSS_HW_CS4237B:
		return "CS4237B";
	case WSS_HW_CS4238B:
		return "CS4238B";
	case WSS_HW_CS4239:
		return "CS4239";
	case WSS_HW_INTERWAVE:
		return "AMD InterWave";
	case WSS_HW_OPL3SA2:
		return chip->card->shortname;
	case WSS_HW_AD1845:
		return "AD1845";
	case WSS_HW_OPTI93X:
		return "OPTi 93x";
	default:
		return "???";
L
Linus Torvalds 已提交
1546 1547
	}
}
1548
EXPORT_SYMBOL(snd_wss_chip_id);
L
Linus Torvalds 已提交
1549

1550
static int snd_wss_new(struct snd_card *card,
L
Linus Torvalds 已提交
1551 1552
			  unsigned short hardware,
			  unsigned short hwshare,
1553
			  struct snd_wss **rchip)
L
Linus Torvalds 已提交
1554
{
1555
	struct snd_wss *chip;
L
Linus Torvalds 已提交
1556 1557

	*rchip = NULL;
1558
	chip = kzalloc(sizeof(*chip), GFP_KERNEL);
L
Linus Torvalds 已提交
1559 1560 1561 1562 1563 1564
	if (chip == NULL)
		return -ENOMEM;
	chip->hardware = hardware;
	chip->hwshare = hwshare;

	spin_lock_init(&chip->reg_lock);
1565 1566
	mutex_init(&chip->mce_mutex);
	mutex_init(&chip->open_mutex);
L
Linus Torvalds 已提交
1567
	chip->card = card;
1568 1569 1570 1571
	chip->rate_constraint = snd_wss_xrate;
	chip->set_playback_format = snd_wss_playback_format;
	chip->set_capture_format = snd_wss_capture_format;
	if (chip->hardware == WSS_HW_OPTI93X)
1572 1573 1574
		memcpy(&chip->image, &snd_opti93x_original_image,
		       sizeof(snd_opti93x_original_image));
	else
1575 1576
		memcpy(&chip->image, &snd_wss_original_image,
		       sizeof(snd_wss_original_image));
1577

1578 1579
	*rchip = chip;
	return 0;
L
Linus Torvalds 已提交
1580 1581
}

1582 1583 1584
int snd_wss_create(struct snd_card *card,
		      unsigned long port,
		      unsigned long cport,
L
Linus Torvalds 已提交
1585 1586 1587
		      int irq, int dma1, int dma2,
		      unsigned short hardware,
		      unsigned short hwshare,
1588
		      struct snd_wss **rchip)
L
Linus Torvalds 已提交
1589
{
1590
	static struct snd_device_ops ops = {
1591
		.dev_free =	snd_wss_dev_free,
L
Linus Torvalds 已提交
1592
	};
1593
	struct snd_wss *chip;
L
Linus Torvalds 已提交
1594 1595
	int err;

1596
	err = snd_wss_new(card, hardware, hwshare, &chip);
L
Linus Torvalds 已提交
1597 1598
	if (err < 0)
		return err;
1599

L
Linus Torvalds 已提交
1600 1601 1602 1603
	chip->irq = -1;
	chip->dma1 = -1;
	chip->dma2 = -1;

1604 1605 1606 1607
	chip->res_port = request_region(port, 4, "CS4231");
	if (!chip->res_port) {
		snd_printk(KERN_ERR "wss: can't grab port 0x%lx\n", port);
		snd_wss_free(chip);
L
Linus Torvalds 已提交
1608 1609 1610
		return -EBUSY;
	}
	chip->port = port;
1611 1612 1613 1614 1615 1616 1617 1618
	if ((long)cport >= 0) {
		chip->res_cport = request_region(cport, 8, "CS4232 Control");
		if (!chip->res_cport) {
			snd_printk(KERN_ERR
				"wss: can't grab control port 0x%lx\n", cport);
			snd_wss_free(chip);
			return -ENODEV;
		}
L
Linus Torvalds 已提交
1619 1620
	}
	chip->cport = cport;
1621 1622 1623 1624 1625 1626 1627
	if (!(hwshare & WSS_HWSHARE_IRQ))
		if (request_irq(irq, snd_wss_interrupt, IRQF_DISABLED,
				"CS4231", (void *) chip)) {
			snd_printk(KERN_ERR "wss: can't grab IRQ %d\n", irq);
			snd_wss_free(chip);
			return -EBUSY;
		}
L
Linus Torvalds 已提交
1628
	chip->irq = irq;
1629 1630 1631
	if (!(hwshare & WSS_HWSHARE_DMA1) && request_dma(dma1, "CS4231 - 1")) {
		snd_printk(KERN_ERR "wss: can't grab DMA1 %d\n", dma1);
		snd_wss_free(chip);
L
Linus Torvalds 已提交
1632 1633 1634
		return -EBUSY;
	}
	chip->dma1 = dma1;
1635 1636 1637 1638
	if (!(hwshare & WSS_HWSHARE_DMA2) && dma1 != dma2 &&
	      dma2 >= 0 && request_dma(dma2, "CS4231 - 2")) {
		snd_printk(KERN_ERR "wss: can't grab DMA2 %d\n", dma2);
		snd_wss_free(chip);
L
Linus Torvalds 已提交
1639 1640 1641 1642 1643 1644 1645 1646 1647
		return -EBUSY;
	}
	if (dma1 == dma2 || dma2 < 0) {
		chip->single_dma = 1;
		chip->dma2 = chip->dma1;
	} else
		chip->dma2 = dma2;

	/* global setup */
1648 1649
	if (snd_wss_probe(chip) < 0) {
		snd_wss_free(chip);
L
Linus Torvalds 已提交
1650 1651
		return -ENODEV;
	}
1652
	snd_wss_init(chip);
L
Linus Torvalds 已提交
1653

1654
#if 0
1655
	if (chip->hardware & WSS_HW_CS4232_MASK) {
L
Linus Torvalds 已提交
1656 1657 1658
		if (chip->res_cport == NULL)
			snd_printk("CS4232 control port features are not accessible\n");
	}
1659
#endif
L
Linus Torvalds 已提交
1660 1661

	/* Register device */
1662 1663 1664
	err = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops);
	if (err < 0) {
		snd_wss_free(chip);
L
Linus Torvalds 已提交
1665 1666 1667 1668 1669
		return err;
	}

#ifdef CONFIG_PM
	/* Power Management */
1670 1671
	chip->suspend = snd_wss_suspend;
	chip->resume = snd_wss_resume;
L
Linus Torvalds 已提交
1672 1673 1674 1675 1676
#endif

	*rchip = chip;
	return 0;
}
1677
EXPORT_SYMBOL(snd_wss_create);
L
Linus Torvalds 已提交
1678

1679 1680 1681
static struct snd_pcm_ops snd_wss_playback_ops = {
	.open =		snd_wss_playback_open,
	.close =	snd_wss_playback_close,
L
Linus Torvalds 已提交
1682
	.ioctl =	snd_pcm_lib_ioctl,
1683 1684 1685 1686 1687
	.hw_params =	snd_wss_playback_hw_params,
	.hw_free =	snd_wss_playback_hw_free,
	.prepare =	snd_wss_playback_prepare,
	.trigger =	snd_wss_trigger,
	.pointer =	snd_wss_playback_pointer,
L
Linus Torvalds 已提交
1688 1689
};

1690 1691 1692
static struct snd_pcm_ops snd_wss_capture_ops = {
	.open =		snd_wss_capture_open,
	.close =	snd_wss_capture_close,
L
Linus Torvalds 已提交
1693
	.ioctl =	snd_pcm_lib_ioctl,
1694 1695 1696 1697 1698
	.hw_params =	snd_wss_capture_hw_params,
	.hw_free =	snd_wss_capture_hw_free,
	.prepare =	snd_wss_capture_prepare,
	.trigger =	snd_wss_trigger,
	.pointer =	snd_wss_capture_pointer,
L
Linus Torvalds 已提交
1699 1700
};

1701
int snd_wss_pcm(struct snd_wss *chip, int device, struct snd_pcm **rpcm)
L
Linus Torvalds 已提交
1702
{
1703
	struct snd_pcm *pcm;
L
Linus Torvalds 已提交
1704 1705 1706 1707 1708 1709
	int err;

	if ((err = snd_pcm_new(chip->card, "CS4231", device, 1, 1, &pcm)) < 0)
		return err;

	spin_lock_init(&chip->reg_lock);
1710 1711
	mutex_init(&chip->mce_mutex);
	mutex_init(&chip->open_mutex);
L
Linus Torvalds 已提交
1712

1713 1714
	snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_wss_playback_ops);
	snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_wss_capture_ops);
1715

L
Linus Torvalds 已提交
1716 1717 1718 1719 1720
	/* global setup */
	pcm->private_data = chip;
	pcm->info_flags = 0;
	if (chip->single_dma)
		pcm->info_flags |= SNDRV_PCM_INFO_HALF_DUPLEX;
1721
	if (chip->hardware != WSS_HW_INTERWAVE)
L
Linus Torvalds 已提交
1722
		pcm->info_flags |= SNDRV_PCM_INFO_JOINT_DUPLEX;
1723
	strcpy(pcm->name, snd_wss_chip_id(chip));
L
Linus Torvalds 已提交
1724 1725 1726 1727 1728 1729 1730 1731 1732 1733

	snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV,
					      snd_dma_isa_data(),
					      64*1024, chip->dma1 > 3 || chip->dma2 > 3 ? 128*1024 : 64*1024);

	chip->pcm = pcm;
	if (rpcm)
		*rpcm = pcm;
	return 0;
}
1734
EXPORT_SYMBOL(snd_wss_pcm);
L
Linus Torvalds 已提交
1735

1736
static void snd_wss_timer_free(struct snd_timer *timer)
L
Linus Torvalds 已提交
1737
{
1738
	struct snd_wss *chip = timer->private_data;
L
Linus Torvalds 已提交
1739 1740 1741
	chip->timer = NULL;
}

1742
int snd_wss_timer(struct snd_wss *chip, int device, struct snd_timer **rtimer)
L
Linus Torvalds 已提交
1743
{
1744 1745
	struct snd_timer *timer;
	struct snd_timer_id tid;
L
Linus Torvalds 已提交
1746 1747 1748 1749 1750 1751 1752 1753 1754 1755
	int err;

	/* Timer initialization */
	tid.dev_class = SNDRV_TIMER_CLASS_CARD;
	tid.dev_sclass = SNDRV_TIMER_SCLASS_NONE;
	tid.card = chip->card->number;
	tid.device = device;
	tid.subdevice = 0;
	if ((err = snd_timer_new(chip->card, "CS4231", &tid, &timer)) < 0)
		return err;
1756
	strcpy(timer->name, snd_wss_chip_id(chip));
L
Linus Torvalds 已提交
1757
	timer->private_data = chip;
1758 1759
	timer->private_free = snd_wss_timer_free;
	timer->hw = snd_wss_timer_table;
L
Linus Torvalds 已提交
1760 1761 1762 1763 1764
	chip->timer = timer;
	if (rtimer)
		*rtimer = timer;
	return 0;
}
1765
EXPORT_SYMBOL(snd_wss_timer);
1766

L
Linus Torvalds 已提交
1767 1768 1769 1770
/*
 *  MIXER part
 */

1771 1772
static int snd_wss_info_mux(struct snd_kcontrol *kcontrol,
			    struct snd_ctl_elem_info *uinfo)
L
Linus Torvalds 已提交
1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783
{
	static char *texts[4] = {
		"Line", "Aux", "Mic", "Mix"
	};
	static char *opl3sa_texts[4] = {
		"Line", "CD", "Mic", "Mix"
	};
	static char *gusmax_texts[4] = {
		"Line", "Synth", "Mic", "Mix"
	};
	char **ptexts = texts;
1784
	struct snd_wss *chip = snd_kcontrol_chip(kcontrol);
L
Linus Torvalds 已提交
1785 1786 1787 1788 1789 1790 1791 1792 1793 1794

	snd_assert(chip->card != NULL, return -EINVAL);
	uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
	uinfo->count = 2;
	uinfo->value.enumerated.items = 4;
	if (uinfo->value.enumerated.item > 3)
		uinfo->value.enumerated.item = 3;
	if (!strcmp(chip->card->driver, "GUS MAX"))
		ptexts = gusmax_texts;
	switch (chip->hardware) {
1795 1796 1797 1798 1799 1800
	case WSS_HW_INTERWAVE:
		ptexts = gusmax_texts;
		break;
	case WSS_HW_OPL3SA2:
		ptexts = opl3sa_texts;
		break;
L
Linus Torvalds 已提交
1801 1802 1803 1804 1805
	}
	strcpy(uinfo->value.enumerated.name, ptexts[uinfo->value.enumerated.item]);
	return 0;
}

1806 1807
static int snd_wss_get_mux(struct snd_kcontrol *kcontrol,
			   struct snd_ctl_elem_value *ucontrol)
L
Linus Torvalds 已提交
1808
{
1809
	struct snd_wss *chip = snd_kcontrol_chip(kcontrol);
L
Linus Torvalds 已提交
1810
	unsigned long flags;
1811

L
Linus Torvalds 已提交
1812 1813 1814 1815 1816 1817 1818
	spin_lock_irqsave(&chip->reg_lock, flags);
	ucontrol->value.enumerated.item[0] = (chip->image[CS4231_LEFT_INPUT] & CS4231_MIXS_ALL) >> 6;
	ucontrol->value.enumerated.item[1] = (chip->image[CS4231_RIGHT_INPUT] & CS4231_MIXS_ALL) >> 6;
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	return 0;
}

1819 1820
static int snd_wss_put_mux(struct snd_kcontrol *kcontrol,
			   struct snd_ctl_elem_value *ucontrol)
L
Linus Torvalds 已提交
1821
{
1822
	struct snd_wss *chip = snd_kcontrol_chip(kcontrol);
L
Linus Torvalds 已提交
1823 1824 1825
	unsigned long flags;
	unsigned short left, right;
	int change;
1826

L
Linus Torvalds 已提交
1827 1828 1829 1830 1831 1832 1833 1834 1835
	if (ucontrol->value.enumerated.item[0] > 3 ||
	    ucontrol->value.enumerated.item[1] > 3)
		return -EINVAL;
	left = ucontrol->value.enumerated.item[0] << 6;
	right = ucontrol->value.enumerated.item[1] << 6;
	spin_lock_irqsave(&chip->reg_lock, flags);
	left = (chip->image[CS4231_LEFT_INPUT] & ~CS4231_MIXS_ALL) | left;
	right = (chip->image[CS4231_RIGHT_INPUT] & ~CS4231_MIXS_ALL) | right;
	change = left != chip->image[CS4231_LEFT_INPUT] ||
1836 1837 1838
		 right != chip->image[CS4231_RIGHT_INPUT];
	snd_wss_out(chip, CS4231_LEFT_INPUT, left);
	snd_wss_out(chip, CS4231_RIGHT_INPUT, right);
L
Linus Torvalds 已提交
1839 1840 1841 1842
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	return change;
}

1843 1844
int snd_wss_info_single(struct snd_kcontrol *kcontrol,
			struct snd_ctl_elem_info *uinfo)
L
Linus Torvalds 已提交
1845 1846 1847 1848 1849 1850 1851 1852 1853
{
	int mask = (kcontrol->private_value >> 16) & 0xff;

	uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
	uinfo->count = 1;
	uinfo->value.integer.min = 0;
	uinfo->value.integer.max = mask;
	return 0;
}
1854
EXPORT_SYMBOL(snd_wss_info_single);
L
Linus Torvalds 已提交
1855

1856 1857
int snd_wss_get_single(struct snd_kcontrol *kcontrol,
		       struct snd_ctl_elem_value *ucontrol)
L
Linus Torvalds 已提交
1858
{
1859
	struct snd_wss *chip = snd_kcontrol_chip(kcontrol);
L
Linus Torvalds 已提交
1860 1861 1862 1863 1864
	unsigned long flags;
	int reg = kcontrol->private_value & 0xff;
	int shift = (kcontrol->private_value >> 8) & 0xff;
	int mask = (kcontrol->private_value >> 16) & 0xff;
	int invert = (kcontrol->private_value >> 24) & 0xff;
1865

L
Linus Torvalds 已提交
1866 1867 1868 1869 1870 1871 1872
	spin_lock_irqsave(&chip->reg_lock, flags);
	ucontrol->value.integer.value[0] = (chip->image[reg] >> shift) & mask;
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	if (invert)
		ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
	return 0;
}
1873
EXPORT_SYMBOL(snd_wss_get_single);
L
Linus Torvalds 已提交
1874

1875 1876
int snd_wss_put_single(struct snd_kcontrol *kcontrol,
		       struct snd_ctl_elem_value *ucontrol)
L
Linus Torvalds 已提交
1877
{
1878
	struct snd_wss *chip = snd_kcontrol_chip(kcontrol);
L
Linus Torvalds 已提交
1879 1880 1881 1882 1883 1884 1885
	unsigned long flags;
	int reg = kcontrol->private_value & 0xff;
	int shift = (kcontrol->private_value >> 8) & 0xff;
	int mask = (kcontrol->private_value >> 16) & 0xff;
	int invert = (kcontrol->private_value >> 24) & 0xff;
	int change;
	unsigned short val;
1886

L
Linus Torvalds 已提交
1887 1888 1889 1890 1891 1892 1893
	val = (ucontrol->value.integer.value[0] & mask);
	if (invert)
		val = mask - val;
	val <<= shift;
	spin_lock_irqsave(&chip->reg_lock, flags);
	val = (chip->image[reg] & ~(mask << shift)) | val;
	change = val != chip->image[reg];
1894
	snd_wss_out(chip, reg, val);
L
Linus Torvalds 已提交
1895 1896 1897
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	return change;
}
1898
EXPORT_SYMBOL(snd_wss_put_single);
L
Linus Torvalds 已提交
1899

1900 1901
int snd_wss_info_double(struct snd_kcontrol *kcontrol,
			struct snd_ctl_elem_info *uinfo)
L
Linus Torvalds 已提交
1902 1903 1904 1905 1906 1907 1908 1909 1910
{
	int mask = (kcontrol->private_value >> 24) & 0xff;

	uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
	uinfo->count = 2;
	uinfo->value.integer.min = 0;
	uinfo->value.integer.max = mask;
	return 0;
}
1911
EXPORT_SYMBOL(snd_wss_info_double);
L
Linus Torvalds 已提交
1912

1913 1914
int snd_wss_get_double(struct snd_kcontrol *kcontrol,
		       struct snd_ctl_elem_value *ucontrol)
L
Linus Torvalds 已提交
1915
{
1916
	struct snd_wss *chip = snd_kcontrol_chip(kcontrol);
L
Linus Torvalds 已提交
1917 1918 1919 1920 1921 1922 1923
	unsigned long flags;
	int left_reg = kcontrol->private_value & 0xff;
	int right_reg = (kcontrol->private_value >> 8) & 0xff;
	int shift_left = (kcontrol->private_value >> 16) & 0x07;
	int shift_right = (kcontrol->private_value >> 19) & 0x07;
	int mask = (kcontrol->private_value >> 24) & 0xff;
	int invert = (kcontrol->private_value >> 22) & 1;
1924

L
Linus Torvalds 已提交
1925 1926 1927 1928 1929 1930 1931 1932 1933 1934
	spin_lock_irqsave(&chip->reg_lock, flags);
	ucontrol->value.integer.value[0] = (chip->image[left_reg] >> shift_left) & mask;
	ucontrol->value.integer.value[1] = (chip->image[right_reg] >> shift_right) & mask;
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	if (invert) {
		ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
		ucontrol->value.integer.value[1] = mask - ucontrol->value.integer.value[1];
	}
	return 0;
}
1935
EXPORT_SYMBOL(snd_wss_get_double);
L
Linus Torvalds 已提交
1936

1937 1938
int snd_wss_put_double(struct snd_kcontrol *kcontrol,
		       struct snd_ctl_elem_value *ucontrol)
L
Linus Torvalds 已提交
1939
{
1940
	struct snd_wss *chip = snd_kcontrol_chip(kcontrol);
L
Linus Torvalds 已提交
1941 1942 1943 1944 1945 1946 1947 1948 1949
	unsigned long flags;
	int left_reg = kcontrol->private_value & 0xff;
	int right_reg = (kcontrol->private_value >> 8) & 0xff;
	int shift_left = (kcontrol->private_value >> 16) & 0x07;
	int shift_right = (kcontrol->private_value >> 19) & 0x07;
	int mask = (kcontrol->private_value >> 24) & 0xff;
	int invert = (kcontrol->private_value >> 22) & 1;
	int change;
	unsigned short val1, val2;
1950

L
Linus Torvalds 已提交
1951 1952 1953 1954 1955 1956 1957 1958 1959 1960 1961 1962
	val1 = ucontrol->value.integer.value[0] & mask;
	val2 = ucontrol->value.integer.value[1] & mask;
	if (invert) {
		val1 = mask - val1;
		val2 = mask - val2;
	}
	val1 <<= shift_left;
	val2 <<= shift_right;
	spin_lock_irqsave(&chip->reg_lock, flags);
	val1 = (chip->image[left_reg] & ~(mask << shift_left)) | val1;
	val2 = (chip->image[right_reg] & ~(mask << shift_right)) | val2;
	change = val1 != chip->image[left_reg] || val2 != chip->image[right_reg];
1963 1964
	snd_wss_out(chip, left_reg, val1);
	snd_wss_out(chip, right_reg, val2);
L
Linus Torvalds 已提交
1965 1966 1967
	spin_unlock_irqrestore(&chip->reg_lock, flags);
	return change;
}
1968 1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996
EXPORT_SYMBOL(snd_wss_put_double);

static struct snd_kcontrol_new snd_wss_controls[] = {
WSS_DOUBLE("PCM Playback Switch", 0,
		CS4231_LEFT_OUTPUT, CS4231_RIGHT_OUTPUT, 7, 7, 1, 1),
WSS_DOUBLE("PCM Playback Volume", 0,
		CS4231_LEFT_OUTPUT, CS4231_RIGHT_OUTPUT, 0, 0, 63, 1),
WSS_DOUBLE("Line Playback Switch", 0,
		CS4231_LEFT_LINE_IN, CS4231_RIGHT_LINE_IN, 7, 7, 1, 1),
WSS_DOUBLE("Line Playback Volume", 0,
		CS4231_LEFT_LINE_IN, CS4231_RIGHT_LINE_IN, 0, 0, 31, 1),
WSS_DOUBLE("Aux Playback Switch", 0,
		CS4231_AUX1_LEFT_INPUT, CS4231_AUX1_RIGHT_INPUT, 7, 7, 1, 1),
WSS_DOUBLE("Aux Playback Volume", 0,
		CS4231_AUX1_LEFT_INPUT, CS4231_AUX1_RIGHT_INPUT, 0, 0, 31, 1),
WSS_DOUBLE("Aux Playback Switch", 1,
		CS4231_AUX2_LEFT_INPUT, CS4231_AUX2_RIGHT_INPUT, 7, 7, 1, 1),
WSS_DOUBLE("Aux Playback Volume", 1,
		CS4231_AUX2_LEFT_INPUT, CS4231_AUX2_RIGHT_INPUT, 0, 0, 31, 1),
WSS_SINGLE("Mono Playback Switch", 0,
		CS4231_MONO_CTRL, 7, 1, 1),
WSS_SINGLE("Mono Playback Volume", 0,
		CS4231_MONO_CTRL, 0, 15, 1),
WSS_SINGLE("Mono Output Playback Switch", 0,
		CS4231_MONO_CTRL, 6, 1, 1),
WSS_SINGLE("Mono Output Playback Bypass", 0,
		CS4231_MONO_CTRL, 5, 1, 0),
WSS_DOUBLE("Capture Volume", 0,
		CS4231_LEFT_INPUT, CS4231_RIGHT_INPUT, 0, 0, 15, 0),
L
Linus Torvalds 已提交
1997 1998 1999
{
	.iface = SNDRV_CTL_ELEM_IFACE_MIXER,
	.name = "Capture Source",
2000 2001 2002
	.info = snd_wss_info_mux,
	.get = snd_wss_get_mux,
	.put = snd_wss_put_mux,
L
Linus Torvalds 已提交
2003
},
2004 2005 2006 2007 2008 2009
WSS_DOUBLE("Mic Boost", 0,
		CS4231_LEFT_INPUT, CS4231_RIGHT_INPUT, 5, 5, 1, 0),
WSS_SINGLE("Loopback Capture Switch", 0,
		CS4231_LOOPBACK, 0, 1, 0),
WSS_SINGLE("Loopback Capture Volume", 0,
		CS4231_LOOPBACK, 2, 63, 1)
L
Linus Torvalds 已提交
2010
};
2011

2012
static struct snd_kcontrol_new snd_opti93x_controls[] = {
2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044
WSS_DOUBLE("Master Playback Switch", 0,
		OPTi93X_OUT_LEFT, OPTi93X_OUT_RIGHT, 7, 7, 1, 1),
WSS_DOUBLE("Master Playback Volume", 0,
		OPTi93X_OUT_LEFT, OPTi93X_OUT_RIGHT, 1, 1, 31, 1),
WSS_DOUBLE("PCM Playback Switch", 0,
		CS4231_LEFT_OUTPUT, CS4231_RIGHT_OUTPUT, 7, 7, 1, 1),
WSS_DOUBLE("PCM Playback Volume", 0,
		CS4231_LEFT_OUTPUT, CS4231_RIGHT_OUTPUT, 0, 0, 31, 1),
WSS_DOUBLE("FM Playback Switch", 0,
		CS4231_AUX2_LEFT_INPUT, CS4231_AUX2_RIGHT_INPUT, 7, 7, 1, 1),
WSS_DOUBLE("FM Playback Volume", 0,
		CS4231_AUX2_LEFT_INPUT, CS4231_AUX2_RIGHT_INPUT, 1, 1, 15, 1),
WSS_DOUBLE("Line Playback Switch", 0,
		CS4231_LEFT_LINE_IN, CS4231_RIGHT_LINE_IN, 7, 7, 1, 1),
WSS_DOUBLE("Line Playback Volume", 0,
		CS4231_LEFT_LINE_IN, CS4231_RIGHT_LINE_IN, 0, 0, 15, 1),
WSS_DOUBLE("Mic Playback Switch", 0,
		OPTi93X_MIC_LEFT_INPUT, OPTi93X_MIC_RIGHT_INPUT, 7, 7, 1, 1),
WSS_DOUBLE("Mic Playback Volume", 0,
		OPTi93X_MIC_LEFT_INPUT, OPTi93X_MIC_RIGHT_INPUT, 1, 1, 15, 1),
WSS_DOUBLE("Mic Boost", 0,
		CS4231_LEFT_INPUT, CS4231_RIGHT_INPUT, 5, 5, 1, 0),
WSS_DOUBLE("CD Playback Switch", 0,
		CS4231_AUX1_LEFT_INPUT, CS4231_AUX1_RIGHT_INPUT, 7, 7, 1, 1),
WSS_DOUBLE("CD Playback Volume", 0,
		CS4231_AUX1_LEFT_INPUT, CS4231_AUX1_RIGHT_INPUT, 1, 1, 15, 1),
WSS_DOUBLE("Aux Playback Switch", 0,
		OPTi931_AUX_LEFT_INPUT, OPTi931_AUX_RIGHT_INPUT, 7, 7, 1, 1),
WSS_DOUBLE("Aux Playback Volume", 0,
		OPTi931_AUX_LEFT_INPUT, OPTi931_AUX_RIGHT_INPUT, 1, 1, 15, 1),
WSS_DOUBLE("Capture Volume", 0,
		CS4231_LEFT_INPUT, CS4231_RIGHT_INPUT, 0, 0, 15, 0),
2045 2046 2047
{
	.iface = SNDRV_CTL_ELEM_IFACE_MIXER,
	.name = "Capture Source",
2048 2049 2050
	.info = snd_wss_info_mux,
	.get = snd_wss_get_mux,
	.put = snd_wss_put_mux,
2051 2052 2053
}
};

2054
int snd_wss_mixer(struct snd_wss *chip)
L
Linus Torvalds 已提交
2055
{
2056
	struct snd_card *card;
L
Linus Torvalds 已提交
2057 2058 2059 2060 2061 2062 2063 2064 2065
	unsigned int idx;
	int err;

	snd_assert(chip != NULL && chip->pcm != NULL, return -EINVAL);

	card = chip->card;

	strcpy(card->mixername, chip->pcm->name);

2066
	if (chip->hardware == WSS_HW_OPTI93X)
2067 2068 2069 2070 2071 2072 2073 2074
		for (idx = 0; idx < ARRAY_SIZE(snd_opti93x_controls); idx++) {
			err = snd_ctl_add(card,
					snd_ctl_new1(&snd_opti93x_controls[idx],
						     chip));
			if (err < 0)
				return err;
		}
	else
2075
		for (idx = 0; idx < ARRAY_SIZE(snd_wss_controls); idx++) {
2076
			err = snd_ctl_add(card,
2077
					snd_ctl_new1(&snd_wss_controls[idx],
2078 2079 2080 2081
						     chip));
			if (err < 0)
				return err;
		}
L
Linus Torvalds 已提交
2082 2083
	return 0;
}
2084
EXPORT_SYMBOL(snd_wss_mixer);
L
Linus Torvalds 已提交
2085 2086 2087 2088 2089

/*
 *  INIT part
 */

2090
static int __init alsa_wss_init(void)
L
Linus Torvalds 已提交
2091 2092 2093 2094
{
	return 0;
}

2095
static void __exit alsa_wss_exit(void)
L
Linus Torvalds 已提交
2096 2097 2098
{
}

2099 2100
module_init(alsa_wss_init);
module_exit(alsa_wss_exit);