xref: /openbmc/linux/sound/isa/ad1816a/ad1816a_lib.c (revision 37185b33)
1 /*
2     ad1816a.c - lowlevel code for Analog Devices AD1816A chip.
3     Copyright (C) 1999-2000 by Massimo Piccioni <dafastidio@libero.it>
4 
5     This program is free software; you can redistribute it and/or modify
6     it under the terms of the GNU General Public License as published by
7     the Free Software Foundation; either version 2 of the License, or
8     (at your option) any later version.
9 
10     This program is distributed in the hope that it will be useful,
11     but WITHOUT ANY WARRANTY; without even the implied warranty of
12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13     GNU General Public License for more details.
14 
15     You should have received a copy of the GNU General Public License
16     along with this program; if not, write to the Free Software
17     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
18 */
19 
20 #include <linux/delay.h>
21 #include <linux/init.h>
22 #include <linux/interrupt.h>
23 #include <linux/slab.h>
24 #include <linux/ioport.h>
25 #include <sound/core.h>
26 #include <sound/tlv.h>
27 #include <sound/ad1816a.h>
28 
29 #include <asm/io.h>
30 #include <asm/dma.h>
31 
32 static inline int snd_ad1816a_busy_wait(struct snd_ad1816a *chip)
33 {
34 	int timeout;
35 
36 	for (timeout = 1000; timeout-- > 0; udelay(10))
37 		if (inb(AD1816A_REG(AD1816A_CHIP_STATUS)) & AD1816A_READY)
38 			return 0;
39 
40 	snd_printk(KERN_WARNING "chip busy.\n");
41 	return -EBUSY;
42 }
43 
44 static inline unsigned char snd_ad1816a_in(struct snd_ad1816a *chip, unsigned char reg)
45 {
46 	snd_ad1816a_busy_wait(chip);
47 	return inb(AD1816A_REG(reg));
48 }
49 
50 static inline void snd_ad1816a_out(struct snd_ad1816a *chip, unsigned char reg,
51 			    unsigned char value)
52 {
53 	snd_ad1816a_busy_wait(chip);
54 	outb(value, AD1816A_REG(reg));
55 }
56 
57 static inline void snd_ad1816a_out_mask(struct snd_ad1816a *chip, unsigned char reg,
58 				 unsigned char mask, unsigned char value)
59 {
60 	snd_ad1816a_out(chip, reg,
61 		(value & mask) | (snd_ad1816a_in(chip, reg) & ~mask));
62 }
63 
64 static unsigned short snd_ad1816a_read(struct snd_ad1816a *chip, unsigned char reg)
65 {
66 	snd_ad1816a_out(chip, AD1816A_INDIR_ADDR, reg & 0x3f);
67 	return snd_ad1816a_in(chip, AD1816A_INDIR_DATA_LOW) |
68 		(snd_ad1816a_in(chip, AD1816A_INDIR_DATA_HIGH) << 8);
69 }
70 
71 static void snd_ad1816a_write(struct snd_ad1816a *chip, unsigned char reg,
72 			      unsigned short value)
73 {
74 	snd_ad1816a_out(chip, AD1816A_INDIR_ADDR, reg & 0x3f);
75 	snd_ad1816a_out(chip, AD1816A_INDIR_DATA_LOW, value & 0xff);
76 	snd_ad1816a_out(chip, AD1816A_INDIR_DATA_HIGH, (value >> 8) & 0xff);
77 }
78 
79 static void snd_ad1816a_write_mask(struct snd_ad1816a *chip, unsigned char reg,
80 				   unsigned short mask, unsigned short value)
81 {
82 	snd_ad1816a_write(chip, reg,
83 		(value & mask) | (snd_ad1816a_read(chip, reg) & ~mask));
84 }
85 
86 
87 static unsigned char snd_ad1816a_get_format(struct snd_ad1816a *chip,
88 					    unsigned int format, int channels)
89 {
90 	unsigned char retval = AD1816A_FMT_LINEAR_8;
91 
92 	switch (format) {
93 	case SNDRV_PCM_FORMAT_MU_LAW:
94 		retval = AD1816A_FMT_ULAW_8;
95 		break;
96 	case SNDRV_PCM_FORMAT_A_LAW:
97 		retval = AD1816A_FMT_ALAW_8;
98 		break;
99 	case SNDRV_PCM_FORMAT_S16_LE:
100 		retval = AD1816A_FMT_LINEAR_16_LIT;
101 		break;
102 	case SNDRV_PCM_FORMAT_S16_BE:
103 		retval = AD1816A_FMT_LINEAR_16_BIG;
104 	}
105 	return (channels > 1) ? (retval | AD1816A_FMT_STEREO) : retval;
106 }
107 
108 static int snd_ad1816a_open(struct snd_ad1816a *chip, unsigned int mode)
109 {
110 	unsigned long flags;
111 
112 	spin_lock_irqsave(&chip->lock, flags);
113 
114 	if (chip->mode & mode) {
115 		spin_unlock_irqrestore(&chip->lock, flags);
116 		return -EAGAIN;
117 	}
118 
119 	switch ((mode &= AD1816A_MODE_OPEN)) {
120 	case AD1816A_MODE_PLAYBACK:
121 		snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
122 			AD1816A_PLAYBACK_IRQ_PENDING, 0x00);
123 		snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
124 			AD1816A_PLAYBACK_IRQ_ENABLE, 0xffff);
125 		break;
126 	case AD1816A_MODE_CAPTURE:
127 		snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
128 			AD1816A_CAPTURE_IRQ_PENDING, 0x00);
129 		snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
130 			AD1816A_CAPTURE_IRQ_ENABLE, 0xffff);
131 		break;
132 	case AD1816A_MODE_TIMER:
133 		snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
134 			AD1816A_TIMER_IRQ_PENDING, 0x00);
135 		snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
136 			AD1816A_TIMER_IRQ_ENABLE, 0xffff);
137 	}
138 	chip->mode |= mode;
139 
140 	spin_unlock_irqrestore(&chip->lock, flags);
141 	return 0;
142 }
143 
144 static void snd_ad1816a_close(struct snd_ad1816a *chip, unsigned int mode)
145 {
146 	unsigned long flags;
147 
148 	spin_lock_irqsave(&chip->lock, flags);
149 
150 	switch ((mode &= AD1816A_MODE_OPEN)) {
151 	case AD1816A_MODE_PLAYBACK:
152 		snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
153 			AD1816A_PLAYBACK_IRQ_PENDING, 0x00);
154 		snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
155 			AD1816A_PLAYBACK_IRQ_ENABLE, 0x0000);
156 		break;
157 	case AD1816A_MODE_CAPTURE:
158 		snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
159 			AD1816A_CAPTURE_IRQ_PENDING, 0x00);
160 		snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
161 			AD1816A_CAPTURE_IRQ_ENABLE, 0x0000);
162 		break;
163 	case AD1816A_MODE_TIMER:
164 		snd_ad1816a_out_mask(chip, AD1816A_INTERRUPT_STATUS,
165 			AD1816A_TIMER_IRQ_PENDING, 0x00);
166 		snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
167 			AD1816A_TIMER_IRQ_ENABLE, 0x0000);
168 	}
169 	if (!((chip->mode &= ~mode) & AD1816A_MODE_OPEN))
170 		chip->mode = 0;
171 
172 	spin_unlock_irqrestore(&chip->lock, flags);
173 }
174 
175 
176 static int snd_ad1816a_trigger(struct snd_ad1816a *chip, unsigned char what,
177 			       int channel, int cmd, int iscapture)
178 {
179 	int error = 0;
180 
181 	switch (cmd) {
182 	case SNDRV_PCM_TRIGGER_START:
183 	case SNDRV_PCM_TRIGGER_STOP:
184 		spin_lock(&chip->lock);
185 		cmd = (cmd == SNDRV_PCM_TRIGGER_START) ? 0xff: 0x00;
186 		/* if (what & AD1816A_PLAYBACK_ENABLE) */
187 		/* That is not valid, because playback and capture enable
188 		 * are the same bit pattern, just to different addresses
189 		 */
190 		if (! iscapture)
191 			snd_ad1816a_out_mask(chip, AD1816A_PLAYBACK_CONFIG,
192 				AD1816A_PLAYBACK_ENABLE, cmd);
193 		else
194 			snd_ad1816a_out_mask(chip, AD1816A_CAPTURE_CONFIG,
195 				AD1816A_CAPTURE_ENABLE, cmd);
196 		spin_unlock(&chip->lock);
197 		break;
198 	default:
199 		snd_printk(KERN_WARNING "invalid trigger mode 0x%x.\n", what);
200 		error = -EINVAL;
201 	}
202 
203 	return error;
204 }
205 
206 static int snd_ad1816a_playback_trigger(struct snd_pcm_substream *substream, int cmd)
207 {
208 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
209 	return snd_ad1816a_trigger(chip, AD1816A_PLAYBACK_ENABLE,
210 				   SNDRV_PCM_STREAM_PLAYBACK, cmd, 0);
211 }
212 
213 static int snd_ad1816a_capture_trigger(struct snd_pcm_substream *substream, int cmd)
214 {
215 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
216 	return snd_ad1816a_trigger(chip, AD1816A_CAPTURE_ENABLE,
217 				   SNDRV_PCM_STREAM_CAPTURE, cmd, 1);
218 }
219 
220 static int snd_ad1816a_hw_params(struct snd_pcm_substream *substream,
221 				 struct snd_pcm_hw_params *hw_params)
222 {
223 	return snd_pcm_lib_malloc_pages(substream, params_buffer_bytes(hw_params));
224 }
225 
226 static int snd_ad1816a_hw_free(struct snd_pcm_substream *substream)
227 {
228 	return snd_pcm_lib_free_pages(substream);
229 }
230 
231 static int snd_ad1816a_playback_prepare(struct snd_pcm_substream *substream)
232 {
233 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
234 	unsigned long flags;
235 	struct snd_pcm_runtime *runtime = substream->runtime;
236 	unsigned int size, rate;
237 
238 	spin_lock_irqsave(&chip->lock, flags);
239 
240 	chip->p_dma_size = size = snd_pcm_lib_buffer_bytes(substream);
241 	snd_ad1816a_out_mask(chip, AD1816A_PLAYBACK_CONFIG,
242 		AD1816A_PLAYBACK_ENABLE | AD1816A_PLAYBACK_PIO, 0x00);
243 
244 	snd_dma_program(chip->dma1, runtime->dma_addr, size,
245 			DMA_MODE_WRITE | DMA_AUTOINIT);
246 
247 	rate = runtime->rate;
248 	if (chip->clock_freq)
249 		rate = (rate * 33000) / chip->clock_freq;
250 	snd_ad1816a_write(chip, AD1816A_PLAYBACK_SAMPLE_RATE, rate);
251 	snd_ad1816a_out_mask(chip, AD1816A_PLAYBACK_CONFIG,
252 		AD1816A_FMT_ALL | AD1816A_FMT_STEREO,
253 		snd_ad1816a_get_format(chip, runtime->format,
254 			runtime->channels));
255 
256 	snd_ad1816a_write(chip, AD1816A_PLAYBACK_BASE_COUNT,
257 		snd_pcm_lib_period_bytes(substream) / 4 - 1);
258 
259 	spin_unlock_irqrestore(&chip->lock, flags);
260 	return 0;
261 }
262 
263 static int snd_ad1816a_capture_prepare(struct snd_pcm_substream *substream)
264 {
265 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
266 	unsigned long flags;
267 	struct snd_pcm_runtime *runtime = substream->runtime;
268 	unsigned int size, rate;
269 
270 	spin_lock_irqsave(&chip->lock, flags);
271 
272 	chip->c_dma_size = size = snd_pcm_lib_buffer_bytes(substream);
273 	snd_ad1816a_out_mask(chip, AD1816A_CAPTURE_CONFIG,
274 		AD1816A_CAPTURE_ENABLE | AD1816A_CAPTURE_PIO, 0x00);
275 
276 	snd_dma_program(chip->dma2, runtime->dma_addr, size,
277 			DMA_MODE_READ | DMA_AUTOINIT);
278 
279 	rate = runtime->rate;
280 	if (chip->clock_freq)
281 		rate = (rate * 33000) / chip->clock_freq;
282 	snd_ad1816a_write(chip, AD1816A_CAPTURE_SAMPLE_RATE, rate);
283 	snd_ad1816a_out_mask(chip, AD1816A_CAPTURE_CONFIG,
284 		AD1816A_FMT_ALL | AD1816A_FMT_STEREO,
285 		snd_ad1816a_get_format(chip, runtime->format,
286 			runtime->channels));
287 
288 	snd_ad1816a_write(chip, AD1816A_CAPTURE_BASE_COUNT,
289 		snd_pcm_lib_period_bytes(substream) / 4 - 1);
290 
291 	spin_unlock_irqrestore(&chip->lock, flags);
292 	return 0;
293 }
294 
295 
296 static snd_pcm_uframes_t snd_ad1816a_playback_pointer(struct snd_pcm_substream *substream)
297 {
298 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
299 	size_t ptr;
300 	if (!(chip->mode & AD1816A_MODE_PLAYBACK))
301 		return 0;
302 	ptr = snd_dma_pointer(chip->dma1, chip->p_dma_size);
303 	return bytes_to_frames(substream->runtime, ptr);
304 }
305 
306 static snd_pcm_uframes_t snd_ad1816a_capture_pointer(struct snd_pcm_substream *substream)
307 {
308 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
309 	size_t ptr;
310 	if (!(chip->mode & AD1816A_MODE_CAPTURE))
311 		return 0;
312 	ptr = snd_dma_pointer(chip->dma2, chip->c_dma_size);
313 	return bytes_to_frames(substream->runtime, ptr);
314 }
315 
316 
317 static irqreturn_t snd_ad1816a_interrupt(int irq, void *dev_id)
318 {
319 	struct snd_ad1816a *chip = dev_id;
320 	unsigned char status;
321 
322 	spin_lock(&chip->lock);
323 	status = snd_ad1816a_in(chip, AD1816A_INTERRUPT_STATUS);
324 	spin_unlock(&chip->lock);
325 
326 	if ((status & AD1816A_PLAYBACK_IRQ_PENDING) && chip->playback_substream)
327 		snd_pcm_period_elapsed(chip->playback_substream);
328 
329 	if ((status & AD1816A_CAPTURE_IRQ_PENDING) && chip->capture_substream)
330 		snd_pcm_period_elapsed(chip->capture_substream);
331 
332 	if ((status & AD1816A_TIMER_IRQ_PENDING) && chip->timer)
333 		snd_timer_interrupt(chip->timer, chip->timer->sticks);
334 
335 	spin_lock(&chip->lock);
336 	snd_ad1816a_out(chip, AD1816A_INTERRUPT_STATUS, 0x00);
337 	spin_unlock(&chip->lock);
338 	return IRQ_HANDLED;
339 }
340 
341 
342 static struct snd_pcm_hardware snd_ad1816a_playback = {
343 	.info =			(SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
344 				 SNDRV_PCM_INFO_MMAP_VALID),
345 	.formats =		(SNDRV_PCM_FMTBIT_MU_LAW | SNDRV_PCM_FMTBIT_A_LAW |
346 				 SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE |
347 				 SNDRV_PCM_FMTBIT_S16_BE),
348 	.rates =		SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
349 	.rate_min =		4000,
350 	.rate_max =		55200,
351 	.channels_min =		1,
352 	.channels_max =		2,
353 	.buffer_bytes_max =	(128*1024),
354 	.period_bytes_min =	64,
355 	.period_bytes_max =	(128*1024),
356 	.periods_min =		1,
357 	.periods_max =		1024,
358 	.fifo_size =		0,
359 };
360 
361 static struct snd_pcm_hardware snd_ad1816a_capture = {
362 	.info =			(SNDRV_PCM_INFO_MMAP | SNDRV_PCM_INFO_INTERLEAVED |
363 				 SNDRV_PCM_INFO_MMAP_VALID),
364 	.formats =		(SNDRV_PCM_FMTBIT_MU_LAW | SNDRV_PCM_FMTBIT_A_LAW |
365 				 SNDRV_PCM_FMTBIT_U8 | SNDRV_PCM_FMTBIT_S16_LE |
366 				 SNDRV_PCM_FMTBIT_S16_BE),
367 	.rates =		SNDRV_PCM_RATE_CONTINUOUS | SNDRV_PCM_RATE_8000_48000,
368 	.rate_min =		4000,
369 	.rate_max =		55200,
370 	.channels_min =		1,
371 	.channels_max =		2,
372 	.buffer_bytes_max =	(128*1024),
373 	.period_bytes_min =	64,
374 	.period_bytes_max =	(128*1024),
375 	.periods_min =		1,
376 	.periods_max =		1024,
377 	.fifo_size =		0,
378 };
379 
380 static int snd_ad1816a_timer_close(struct snd_timer *timer)
381 {
382 	struct snd_ad1816a *chip = snd_timer_chip(timer);
383 	snd_ad1816a_close(chip, AD1816A_MODE_TIMER);
384 	return 0;
385 }
386 
387 static int snd_ad1816a_timer_open(struct snd_timer *timer)
388 {
389 	struct snd_ad1816a *chip = snd_timer_chip(timer);
390 	snd_ad1816a_open(chip, AD1816A_MODE_TIMER);
391 	return 0;
392 }
393 
394 static unsigned long snd_ad1816a_timer_resolution(struct snd_timer *timer)
395 {
396 	if (snd_BUG_ON(!timer))
397 		return 0;
398 
399 	return 10000;
400 }
401 
402 static int snd_ad1816a_timer_start(struct snd_timer *timer)
403 {
404 	unsigned short bits;
405 	unsigned long flags;
406 	struct snd_ad1816a *chip = snd_timer_chip(timer);
407 	spin_lock_irqsave(&chip->lock, flags);
408 	bits = snd_ad1816a_read(chip, AD1816A_INTERRUPT_ENABLE);
409 
410 	if (!(bits & AD1816A_TIMER_ENABLE)) {
411 		snd_ad1816a_write(chip, AD1816A_TIMER_BASE_COUNT,
412 			timer->sticks & 0xffff);
413 
414 		snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
415 			AD1816A_TIMER_ENABLE, 0xffff);
416 	}
417 	spin_unlock_irqrestore(&chip->lock, flags);
418 	return 0;
419 }
420 
421 static int snd_ad1816a_timer_stop(struct snd_timer *timer)
422 {
423 	unsigned long flags;
424 	struct snd_ad1816a *chip = snd_timer_chip(timer);
425 	spin_lock_irqsave(&chip->lock, flags);
426 
427 	snd_ad1816a_write_mask(chip, AD1816A_INTERRUPT_ENABLE,
428 		AD1816A_TIMER_ENABLE, 0x0000);
429 
430 	spin_unlock_irqrestore(&chip->lock, flags);
431 	return 0;
432 }
433 
434 static struct snd_timer_hardware snd_ad1816a_timer_table = {
435 	.flags =	SNDRV_TIMER_HW_AUTO,
436 	.resolution =	10000,
437 	.ticks =	65535,
438 	.open =		snd_ad1816a_timer_open,
439 	.close =	snd_ad1816a_timer_close,
440 	.c_resolution =	snd_ad1816a_timer_resolution,
441 	.start =	snd_ad1816a_timer_start,
442 	.stop =		snd_ad1816a_timer_stop,
443 };
444 
445 static int snd_ad1816a_playback_open(struct snd_pcm_substream *substream)
446 {
447 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
448 	struct snd_pcm_runtime *runtime = substream->runtime;
449 	int error;
450 
451 	if ((error = snd_ad1816a_open(chip, AD1816A_MODE_PLAYBACK)) < 0)
452 		return error;
453 	runtime->hw = snd_ad1816a_playback;
454 	snd_pcm_limit_isa_dma_size(chip->dma1, &runtime->hw.buffer_bytes_max);
455 	snd_pcm_limit_isa_dma_size(chip->dma1, &runtime->hw.period_bytes_max);
456 	chip->playback_substream = substream;
457 	return 0;
458 }
459 
460 static int snd_ad1816a_capture_open(struct snd_pcm_substream *substream)
461 {
462 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
463 	struct snd_pcm_runtime *runtime = substream->runtime;
464 	int error;
465 
466 	if ((error = snd_ad1816a_open(chip, AD1816A_MODE_CAPTURE)) < 0)
467 		return error;
468 	runtime->hw = snd_ad1816a_capture;
469 	snd_pcm_limit_isa_dma_size(chip->dma2, &runtime->hw.buffer_bytes_max);
470 	snd_pcm_limit_isa_dma_size(chip->dma2, &runtime->hw.period_bytes_max);
471 	chip->capture_substream = substream;
472 	return 0;
473 }
474 
475 static int snd_ad1816a_playback_close(struct snd_pcm_substream *substream)
476 {
477 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
478 
479 	chip->playback_substream = NULL;
480 	snd_ad1816a_close(chip, AD1816A_MODE_PLAYBACK);
481 	return 0;
482 }
483 
484 static int snd_ad1816a_capture_close(struct snd_pcm_substream *substream)
485 {
486 	struct snd_ad1816a *chip = snd_pcm_substream_chip(substream);
487 
488 	chip->capture_substream = NULL;
489 	snd_ad1816a_close(chip, AD1816A_MODE_CAPTURE);
490 	return 0;
491 }
492 
493 
494 static void __devinit snd_ad1816a_init(struct snd_ad1816a *chip)
495 {
496 	unsigned long flags;
497 
498 	spin_lock_irqsave(&chip->lock, flags);
499 
500 	snd_ad1816a_out(chip, AD1816A_INTERRUPT_STATUS, 0x00);
501 	snd_ad1816a_out_mask(chip, AD1816A_PLAYBACK_CONFIG,
502 		AD1816A_PLAYBACK_ENABLE | AD1816A_PLAYBACK_PIO, 0x00);
503 	snd_ad1816a_out_mask(chip, AD1816A_CAPTURE_CONFIG,
504 		AD1816A_CAPTURE_ENABLE | AD1816A_CAPTURE_PIO, 0x00);
505 	snd_ad1816a_write(chip, AD1816A_INTERRUPT_ENABLE, 0x0000);
506 	snd_ad1816a_write_mask(chip, AD1816A_CHIP_CONFIG,
507 		AD1816A_CAPTURE_NOT_EQUAL | AD1816A_WSS_ENABLE, 0xffff);
508 	snd_ad1816a_write(chip, AD1816A_DSP_CONFIG, 0x0000);
509 	snd_ad1816a_write(chip, AD1816A_POWERDOWN_CTRL, 0x0000);
510 
511 	spin_unlock_irqrestore(&chip->lock, flags);
512 }
513 
514 static int __devinit snd_ad1816a_probe(struct snd_ad1816a *chip)
515 {
516 	unsigned long flags;
517 
518 	spin_lock_irqsave(&chip->lock, flags);
519 
520 	switch (chip->version = snd_ad1816a_read(chip, AD1816A_VERSION_ID)) {
521 	case 0:
522 		chip->hardware = AD1816A_HW_AD1815;
523 		break;
524 	case 1:
525 		chip->hardware = AD1816A_HW_AD18MAX10;
526 		break;
527 	case 3:
528 		chip->hardware = AD1816A_HW_AD1816A;
529 		break;
530 	default:
531 		chip->hardware = AD1816A_HW_AUTO;
532 	}
533 
534 	spin_unlock_irqrestore(&chip->lock, flags);
535 	return 0;
536 }
537 
538 static int snd_ad1816a_free(struct snd_ad1816a *chip)
539 {
540 	release_and_free_resource(chip->res_port);
541 	if (chip->irq >= 0)
542 		free_irq(chip->irq, (void *) chip);
543 	if (chip->dma1 >= 0) {
544 		snd_dma_disable(chip->dma1);
545 		free_dma(chip->dma1);
546 	}
547 	if (chip->dma2 >= 0) {
548 		snd_dma_disable(chip->dma2);
549 		free_dma(chip->dma2);
550 	}
551 	kfree(chip);
552 	return 0;
553 }
554 
555 static int snd_ad1816a_dev_free(struct snd_device *device)
556 {
557 	struct snd_ad1816a *chip = device->device_data;
558 	return snd_ad1816a_free(chip);
559 }
560 
561 static const char __devinit *snd_ad1816a_chip_id(struct snd_ad1816a *chip)
562 {
563 	switch (chip->hardware) {
564 	case AD1816A_HW_AD1816A: return "AD1816A";
565 	case AD1816A_HW_AD1815:	return "AD1815";
566 	case AD1816A_HW_AD18MAX10: return "AD18max10";
567 	default:
568 		snd_printk(KERN_WARNING "Unknown chip version %d:%d.\n",
569 			chip->version, chip->hardware);
570 		return "AD1816A - unknown";
571 	}
572 }
573 
574 int __devinit snd_ad1816a_create(struct snd_card *card,
575 				 unsigned long port, int irq, int dma1, int dma2,
576 				 struct snd_ad1816a **rchip)
577 {
578         static struct snd_device_ops ops = {
579 		.dev_free =	snd_ad1816a_dev_free,
580 	};
581 	int error;
582 	struct snd_ad1816a *chip;
583 
584 	*rchip = NULL;
585 
586 	chip = kzalloc(sizeof(*chip), GFP_KERNEL);
587 	if (chip == NULL)
588 		return -ENOMEM;
589 	chip->irq = -1;
590 	chip->dma1 = -1;
591 	chip->dma2 = -1;
592 
593 	if ((chip->res_port = request_region(port, 16, "AD1816A")) == NULL) {
594 		snd_printk(KERN_ERR "ad1816a: can't grab port 0x%lx\n", port);
595 		snd_ad1816a_free(chip);
596 		return -EBUSY;
597 	}
598 	if (request_irq(irq, snd_ad1816a_interrupt, 0, "AD1816A", (void *) chip)) {
599 		snd_printk(KERN_ERR "ad1816a: can't grab IRQ %d\n", irq);
600 		snd_ad1816a_free(chip);
601 		return -EBUSY;
602 	}
603 	chip->irq = irq;
604 	if (request_dma(dma1, "AD1816A - 1")) {
605 		snd_printk(KERN_ERR "ad1816a: can't grab DMA1 %d\n", dma1);
606 		snd_ad1816a_free(chip);
607 		return -EBUSY;
608 	}
609 	chip->dma1 = dma1;
610 	if (request_dma(dma2, "AD1816A - 2")) {
611 		snd_printk(KERN_ERR "ad1816a: can't grab DMA2 %d\n", dma2);
612 		snd_ad1816a_free(chip);
613 		return -EBUSY;
614 	}
615 	chip->dma2 = dma2;
616 
617 	chip->card = card;
618 	chip->port = port;
619 	spin_lock_init(&chip->lock);
620 
621 	if ((error = snd_ad1816a_probe(chip))) {
622 		snd_ad1816a_free(chip);
623 		return error;
624 	}
625 
626 	snd_ad1816a_init(chip);
627 
628 	/* Register device */
629 	if ((error = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops)) < 0) {
630 		snd_ad1816a_free(chip);
631 		return error;
632 	}
633 
634 	*rchip = chip;
635 	return 0;
636 }
637 
638 static struct snd_pcm_ops snd_ad1816a_playback_ops = {
639 	.open =		snd_ad1816a_playback_open,
640 	.close =	snd_ad1816a_playback_close,
641 	.ioctl =	snd_pcm_lib_ioctl,
642 	.hw_params =	snd_ad1816a_hw_params,
643 	.hw_free =	snd_ad1816a_hw_free,
644 	.prepare =	snd_ad1816a_playback_prepare,
645 	.trigger =	snd_ad1816a_playback_trigger,
646 	.pointer =	snd_ad1816a_playback_pointer,
647 };
648 
649 static struct snd_pcm_ops snd_ad1816a_capture_ops = {
650 	.open =		snd_ad1816a_capture_open,
651 	.close =	snd_ad1816a_capture_close,
652 	.ioctl =	snd_pcm_lib_ioctl,
653 	.hw_params =	snd_ad1816a_hw_params,
654 	.hw_free =	snd_ad1816a_hw_free,
655 	.prepare =	snd_ad1816a_capture_prepare,
656 	.trigger =	snd_ad1816a_capture_trigger,
657 	.pointer =	snd_ad1816a_capture_pointer,
658 };
659 
660 int __devinit snd_ad1816a_pcm(struct snd_ad1816a *chip, int device, struct snd_pcm **rpcm)
661 {
662 	int error;
663 	struct snd_pcm *pcm;
664 
665 	if ((error = snd_pcm_new(chip->card, "AD1816A", device, 1, 1, &pcm)))
666 		return error;
667 
668 	snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &snd_ad1816a_playback_ops);
669 	snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_CAPTURE, &snd_ad1816a_capture_ops);
670 
671 	pcm->private_data = chip;
672 	pcm->info_flags = (chip->dma1 == chip->dma2 ) ? SNDRV_PCM_INFO_JOINT_DUPLEX : 0;
673 
674 	strcpy(pcm->name, snd_ad1816a_chip_id(chip));
675 	snd_ad1816a_init(chip);
676 
677 	snd_pcm_lib_preallocate_pages_for_all(pcm, SNDRV_DMA_TYPE_DEV,
678 					      snd_dma_isa_data(),
679 					      64*1024, chip->dma1 > 3 || chip->dma2 > 3 ? 128*1024 : 64*1024);
680 
681 	chip->pcm = pcm;
682 	if (rpcm)
683 		*rpcm = pcm;
684 	return 0;
685 }
686 
687 int __devinit snd_ad1816a_timer(struct snd_ad1816a *chip, int device, struct snd_timer **rtimer)
688 {
689 	struct snd_timer *timer;
690 	struct snd_timer_id tid;
691 	int error;
692 
693 	tid.dev_class = SNDRV_TIMER_CLASS_CARD;
694 	tid.dev_sclass = SNDRV_TIMER_SCLASS_NONE;
695 	tid.card = chip->card->number;
696 	tid.device = device;
697 	tid.subdevice = 0;
698 	if ((error = snd_timer_new(chip->card, "AD1816A", &tid, &timer)) < 0)
699 		return error;
700 	strcpy(timer->name, snd_ad1816a_chip_id(chip));
701 	timer->private_data = chip;
702 	chip->timer = timer;
703 	timer->hw = snd_ad1816a_timer_table;
704 	if (rtimer)
705 		*rtimer = timer;
706 	return 0;
707 }
708 
709 /*
710  *
711  */
712 
713 static int snd_ad1816a_info_mux(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
714 {
715 	static char *texts[8] = {
716 		"Line", "Mix", "CD", "Synth", "Video",
717 		"Mic", "Phone",
718 	};
719 
720 	uinfo->type = SNDRV_CTL_ELEM_TYPE_ENUMERATED;
721 	uinfo->count = 2;
722 	uinfo->value.enumerated.items = 7;
723 	if (uinfo->value.enumerated.item > 6)
724 		uinfo->value.enumerated.item = 6;
725 	strcpy(uinfo->value.enumerated.name, texts[uinfo->value.enumerated.item]);
726 	return 0;
727 }
728 
729 static int snd_ad1816a_get_mux(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
730 {
731 	struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
732 	unsigned long flags;
733 	unsigned short val;
734 
735 	spin_lock_irqsave(&chip->lock, flags);
736 	val = snd_ad1816a_read(chip, AD1816A_ADC_SOURCE_SEL);
737 	spin_unlock_irqrestore(&chip->lock, flags);
738 	ucontrol->value.enumerated.item[0] = (val >> 12) & 7;
739 	ucontrol->value.enumerated.item[1] = (val >> 4) & 7;
740 	return 0;
741 }
742 
743 static int snd_ad1816a_put_mux(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
744 {
745 	struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
746 	unsigned long flags;
747 	unsigned short val;
748 	int change;
749 
750 	if (ucontrol->value.enumerated.item[0] > 6 ||
751 	    ucontrol->value.enumerated.item[1] > 6)
752 		return -EINVAL;
753 	val = (ucontrol->value.enumerated.item[0] << 12) |
754 	      (ucontrol->value.enumerated.item[1] << 4);
755 	spin_lock_irqsave(&chip->lock, flags);
756 	change = snd_ad1816a_read(chip, AD1816A_ADC_SOURCE_SEL) != val;
757 	snd_ad1816a_write(chip, AD1816A_ADC_SOURCE_SEL, val);
758 	spin_unlock_irqrestore(&chip->lock, flags);
759 	return change;
760 }
761 
762 #define AD1816A_SINGLE_TLV(xname, reg, shift, mask, invert, xtlv)	\
763 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, \
764   .access = SNDRV_CTL_ELEM_ACCESS_READWRITE | SNDRV_CTL_ELEM_ACCESS_TLV_READ, \
765   .name = xname, .info = snd_ad1816a_info_single, \
766   .get = snd_ad1816a_get_single, .put = snd_ad1816a_put_single, \
767   .private_value = reg | (shift << 8) | (mask << 16) | (invert << 24), \
768   .tlv = { .p = (xtlv) } }
769 #define AD1816A_SINGLE(xname, reg, shift, mask, invert) \
770 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .info = snd_ad1816a_info_single, \
771   .get = snd_ad1816a_get_single, .put = snd_ad1816a_put_single, \
772   .private_value = reg | (shift << 8) | (mask << 16) | (invert << 24) }
773 
774 static int snd_ad1816a_info_single(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
775 {
776 	int mask = (kcontrol->private_value >> 16) & 0xff;
777 
778 	uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
779 	uinfo->count = 1;
780 	uinfo->value.integer.min = 0;
781 	uinfo->value.integer.max = mask;
782 	return 0;
783 }
784 
785 static int snd_ad1816a_get_single(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
786 {
787 	struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
788 	unsigned long flags;
789 	int reg = kcontrol->private_value & 0xff;
790 	int shift = (kcontrol->private_value >> 8) & 0xff;
791 	int mask = (kcontrol->private_value >> 16) & 0xff;
792 	int invert = (kcontrol->private_value >> 24) & 0xff;
793 
794 	spin_lock_irqsave(&chip->lock, flags);
795 	ucontrol->value.integer.value[0] = (snd_ad1816a_read(chip, reg) >> shift) & mask;
796 	spin_unlock_irqrestore(&chip->lock, flags);
797 	if (invert)
798 		ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
799 	return 0;
800 }
801 
802 static int snd_ad1816a_put_single(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
803 {
804 	struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
805 	unsigned long flags;
806 	int reg = kcontrol->private_value & 0xff;
807 	int shift = (kcontrol->private_value >> 8) & 0xff;
808 	int mask = (kcontrol->private_value >> 16) & 0xff;
809 	int invert = (kcontrol->private_value >> 24) & 0xff;
810 	int change;
811 	unsigned short old_val, val;
812 
813 	val = (ucontrol->value.integer.value[0] & mask);
814 	if (invert)
815 		val = mask - val;
816 	val <<= shift;
817 	spin_lock_irqsave(&chip->lock, flags);
818 	old_val = snd_ad1816a_read(chip, reg);
819 	val = (old_val & ~(mask << shift)) | val;
820 	change = val != old_val;
821 	snd_ad1816a_write(chip, reg, val);
822 	spin_unlock_irqrestore(&chip->lock, flags);
823 	return change;
824 }
825 
826 #define AD1816A_DOUBLE_TLV(xname, reg, shift_left, shift_right, mask, invert, xtlv) \
827 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, \
828   .access = SNDRV_CTL_ELEM_ACCESS_READWRITE | SNDRV_CTL_ELEM_ACCESS_TLV_READ, \
829   .name = xname, .info = snd_ad1816a_info_double,		\
830   .get = snd_ad1816a_get_double, .put = snd_ad1816a_put_double, \
831   .private_value = reg | (shift_left << 8) | (shift_right << 12) | (mask << 16) | (invert << 24), \
832   .tlv = { .p = (xtlv) } }
833 
834 #define AD1816A_DOUBLE(xname, reg, shift_left, shift_right, mask, invert) \
835 { .iface = SNDRV_CTL_ELEM_IFACE_MIXER, .name = xname, .info = snd_ad1816a_info_double, \
836   .get = snd_ad1816a_get_double, .put = snd_ad1816a_put_double, \
837   .private_value = reg | (shift_left << 8) | (shift_right << 12) | (mask << 16) | (invert << 24) }
838 
839 static int snd_ad1816a_info_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_info *uinfo)
840 {
841 	int mask = (kcontrol->private_value >> 16) & 0xff;
842 
843 	uinfo->type = mask == 1 ? SNDRV_CTL_ELEM_TYPE_BOOLEAN : SNDRV_CTL_ELEM_TYPE_INTEGER;
844 	uinfo->count = 2;
845 	uinfo->value.integer.min = 0;
846 	uinfo->value.integer.max = mask;
847 	return 0;
848 }
849 
850 static int snd_ad1816a_get_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
851 {
852 	struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
853 	unsigned long flags;
854 	int reg = kcontrol->private_value & 0xff;
855 	int shift_left = (kcontrol->private_value >> 8) & 0x0f;
856 	int shift_right = (kcontrol->private_value >> 12) & 0x0f;
857 	int mask = (kcontrol->private_value >> 16) & 0xff;
858 	int invert = (kcontrol->private_value >> 24) & 0xff;
859 	unsigned short val;
860 
861 	spin_lock_irqsave(&chip->lock, flags);
862 	val = snd_ad1816a_read(chip, reg);
863 	ucontrol->value.integer.value[0] = (val >> shift_left) & mask;
864 	ucontrol->value.integer.value[1] = (val >> shift_right) & mask;
865 	spin_unlock_irqrestore(&chip->lock, flags);
866 	if (invert) {
867 		ucontrol->value.integer.value[0] = mask - ucontrol->value.integer.value[0];
868 		ucontrol->value.integer.value[1] = mask - ucontrol->value.integer.value[1];
869 	}
870 	return 0;
871 }
872 
873 static int snd_ad1816a_put_double(struct snd_kcontrol *kcontrol, struct snd_ctl_elem_value *ucontrol)
874 {
875 	struct snd_ad1816a *chip = snd_kcontrol_chip(kcontrol);
876 	unsigned long flags;
877 	int reg = kcontrol->private_value & 0xff;
878 	int shift_left = (kcontrol->private_value >> 8) & 0x0f;
879 	int shift_right = (kcontrol->private_value >> 12) & 0x0f;
880 	int mask = (kcontrol->private_value >> 16) & 0xff;
881 	int invert = (kcontrol->private_value >> 24) & 0xff;
882 	int change;
883 	unsigned short old_val, val1, val2;
884 
885 	val1 = ucontrol->value.integer.value[0] & mask;
886 	val2 = ucontrol->value.integer.value[1] & mask;
887 	if (invert) {
888 		val1 = mask - val1;
889 		val2 = mask - val2;
890 	}
891 	val1 <<= shift_left;
892 	val2 <<= shift_right;
893 	spin_lock_irqsave(&chip->lock, flags);
894 	old_val = snd_ad1816a_read(chip, reg);
895 	val1 = (old_val & ~((mask << shift_left) | (mask << shift_right))) | val1 | val2;
896 	change = val1 != old_val;
897 	snd_ad1816a_write(chip, reg, val1);
898 	spin_unlock_irqrestore(&chip->lock, flags);
899 	return change;
900 }
901 
902 static const DECLARE_TLV_DB_SCALE(db_scale_4bit, -4500, 300, 0);
903 static const DECLARE_TLV_DB_SCALE(db_scale_5bit, -4650, 150, 0);
904 static const DECLARE_TLV_DB_SCALE(db_scale_6bit, -9450, 150, 0);
905 static const DECLARE_TLV_DB_SCALE(db_scale_5bit_12db_max, -3450, 150, 0);
906 static const DECLARE_TLV_DB_SCALE(db_scale_rec_gain, 0, 150, 0);
907 
908 static struct snd_kcontrol_new snd_ad1816a_controls[] __devinitdata = {
909 AD1816A_DOUBLE("Master Playback Switch", AD1816A_MASTER_ATT, 15, 7, 1, 1),
910 AD1816A_DOUBLE_TLV("Master Playback Volume", AD1816A_MASTER_ATT, 8, 0, 31, 1,
911 		   db_scale_5bit),
912 AD1816A_DOUBLE("PCM Playback Switch", AD1816A_VOICE_ATT, 15, 7, 1, 1),
913 AD1816A_DOUBLE_TLV("PCM Playback Volume", AD1816A_VOICE_ATT, 8, 0, 63, 1,
914 		   db_scale_6bit),
915 AD1816A_DOUBLE("Line Playback Switch", AD1816A_LINE_GAIN_ATT, 15, 7, 1, 1),
916 AD1816A_DOUBLE_TLV("Line Playback Volume", AD1816A_LINE_GAIN_ATT, 8, 0, 31, 1,
917 		   db_scale_5bit_12db_max),
918 AD1816A_DOUBLE("CD Playback Switch", AD1816A_CD_GAIN_ATT, 15, 7, 1, 1),
919 AD1816A_DOUBLE_TLV("CD Playback Volume", AD1816A_CD_GAIN_ATT, 8, 0, 31, 1,
920 		   db_scale_5bit_12db_max),
921 AD1816A_DOUBLE("Synth Playback Switch", AD1816A_SYNTH_GAIN_ATT, 15, 7, 1, 1),
922 AD1816A_DOUBLE_TLV("Synth Playback Volume", AD1816A_SYNTH_GAIN_ATT, 8, 0, 31, 1,
923 		   db_scale_5bit_12db_max),
924 AD1816A_DOUBLE("FM Playback Switch", AD1816A_FM_ATT, 15, 7, 1, 1),
925 AD1816A_DOUBLE_TLV("FM Playback Volume", AD1816A_FM_ATT, 8, 0, 63, 1,
926 		   db_scale_6bit),
927 AD1816A_SINGLE("Mic Playback Switch", AD1816A_MIC_GAIN_ATT, 15, 1, 1),
928 AD1816A_SINGLE_TLV("Mic Playback Volume", AD1816A_MIC_GAIN_ATT, 8, 31, 1,
929 		   db_scale_5bit_12db_max),
930 AD1816A_SINGLE("Mic Boost", AD1816A_MIC_GAIN_ATT, 14, 1, 0),
931 AD1816A_DOUBLE("Video Playback Switch", AD1816A_VID_GAIN_ATT, 15, 7, 1, 1),
932 AD1816A_DOUBLE_TLV("Video Playback Volume", AD1816A_VID_GAIN_ATT, 8, 0, 31, 1,
933 		   db_scale_5bit_12db_max),
934 AD1816A_SINGLE("Phone Capture Switch", AD1816A_PHONE_IN_GAIN_ATT, 15, 1, 1),
935 AD1816A_SINGLE_TLV("Phone Capture Volume", AD1816A_PHONE_IN_GAIN_ATT, 0, 15, 1,
936 		   db_scale_4bit),
937 AD1816A_SINGLE("Phone Playback Switch", AD1816A_PHONE_OUT_ATT, 7, 1, 1),
938 AD1816A_SINGLE_TLV("Phone Playback Volume", AD1816A_PHONE_OUT_ATT, 0, 31, 1,
939 		   db_scale_5bit),
940 {
941 	.iface = SNDRV_CTL_ELEM_IFACE_MIXER,
942 	.name = "Capture Source",
943 	.info = snd_ad1816a_info_mux,
944 	.get = snd_ad1816a_get_mux,
945 	.put = snd_ad1816a_put_mux,
946 },
947 AD1816A_DOUBLE("Capture Switch", AD1816A_ADC_PGA, 15, 7, 1, 1),
948 AD1816A_DOUBLE_TLV("Capture Volume", AD1816A_ADC_PGA, 8, 0, 15, 0,
949 		   db_scale_rec_gain),
950 AD1816A_SINGLE("3D Control - Switch", AD1816A_3D_PHAT_CTRL, 15, 1, 1),
951 AD1816A_SINGLE("3D Control - Level", AD1816A_3D_PHAT_CTRL, 0, 15, 0),
952 };
953 
954 int __devinit snd_ad1816a_mixer(struct snd_ad1816a *chip)
955 {
956 	struct snd_card *card;
957 	unsigned int idx;
958 	int err;
959 
960 	if (snd_BUG_ON(!chip || !chip->card))
961 		return -EINVAL;
962 
963 	card = chip->card;
964 
965 	strcpy(card->mixername, snd_ad1816a_chip_id(chip));
966 
967 	for (idx = 0; idx < ARRAY_SIZE(snd_ad1816a_controls); idx++) {
968 		if ((err = snd_ctl_add(card, snd_ctl_new1(&snd_ad1816a_controls[idx], chip))) < 0)
969 			return err;
970 	}
971 	return 0;
972 }
973