[ALSA] at73c213: monaural support
[pandora-kernel.git] / sound / spi / at73c213.c
1 /*
2  * Driver for AT73C213 16-bit stereo DAC connected to Atmel SSC
3  *
4  * Copyright (C) 2006-2007 Atmel Norway
5  *
6  * This program is free software; you can redistribute it and/or modify it
7  * under the terms of the GNU General Public License version 2 as published by
8  * the Free Software Foundation.
9  */
10
11 /*#define DEBUG*/
12
13 #include <linux/clk.h>
14 #include <linux/err.h>
15 #include <linux/delay.h>
16 #include <linux/device.h>
17 #include <linux/dma-mapping.h>
18 #include <linux/init.h>
19 #include <linux/interrupt.h>
20 #include <linux/module.h>
21 #include <linux/mutex.h>
22 #include <linux/platform_device.h>
23 #include <linux/io.h>
24
25 #include <sound/initval.h>
26 #include <sound/control.h>
27 #include <sound/core.h>
28 #include <sound/pcm.h>
29
30 #include <linux/atmel-ssc.h>
31
32 #include <linux/spi/spi.h>
33 #include <linux/spi/at73c213.h>
34
35 #include "at73c213.h"
36
37 #define BITRATE_MIN      8000 /* Hardware limit? */
38 #define BITRATE_TARGET  CONFIG_SND_AT73C213_TARGET_BITRATE
39 #define BITRATE_MAX     50000 /* Hardware limit. */
40
41 /* Initial (hardware reset) AT73C213 register values. */
42 static u8 snd_at73c213_original_image[18] =
43 {
44         0x00,   /* 00 - CTRL    */
45         0x05,   /* 01 - LLIG    */
46         0x05,   /* 02 - RLIG    */
47         0x08,   /* 03 - LPMG    */
48         0x08,   /* 04 - RPMG    */
49         0x00,   /* 05 - LLOG    */
50         0x00,   /* 06 - RLOG    */
51         0x22,   /* 07 - OLC     */
52         0x09,   /* 08 - MC      */
53         0x00,   /* 09 - CSFC    */
54         0x00,   /* 0A - MISC    */
55         0x00,   /* 0B -         */
56         0x00,   /* 0C - PRECH   */
57         0x05,   /* 0D - AUXG    */
58         0x00,   /* 0E -         */
59         0x00,   /* 0F -         */
60         0x00,   /* 10 - RST     */
61         0x00,   /* 11 - PA_CTRL */
62 };
63
64 struct snd_at73c213 {
65         struct snd_card                 *card;
66         struct snd_pcm                  *pcm;
67         struct snd_pcm_substream        *substream;
68         struct at73c213_board_info      *board;
69         int                             irq;
70         int                             period;
71         unsigned long                   bitrate;
72         struct clk                      *bitclk;
73         struct ssc_device               *ssc;
74         struct spi_device               *spi;
75         u8                              spi_wbuffer[2];
76         u8                              spi_rbuffer[2];
77         /* Image of the SPI registers in AT73C213. */
78         u8                              reg_image[18];
79         /* Protect SSC registers against concurrent access. */
80         spinlock_t                      lock;
81         /* Protect mixer registers against concurrent access. */
82         struct mutex                    mixer_lock;
83 };
84
85 #define get_chip(card) ((struct snd_at73c213 *)card->private_data)
86
87 static int
88 snd_at73c213_write_reg(struct snd_at73c213 *chip, u8 reg, u8 val)
89 {
90         struct spi_message msg;
91         struct spi_transfer msg_xfer = {
92                 .len            = 2,
93                 .cs_change      = 0,
94         };
95         int retval;
96
97         spi_message_init(&msg);
98
99         chip->spi_wbuffer[0] = reg;
100         chip->spi_wbuffer[1] = val;
101
102         msg_xfer.tx_buf = chip->spi_wbuffer;
103         msg_xfer.rx_buf = chip->spi_rbuffer;
104         spi_message_add_tail(&msg_xfer, &msg);
105
106         retval = spi_sync(chip->spi, &msg);
107
108         if (!retval)
109                 chip->reg_image[reg] = val;
110
111         return retval;
112 }
113
114 static struct snd_pcm_hardware snd_at73c213_playback_hw = {
115         .info           = SNDRV_PCM_INFO_INTERLEAVED |
116                           SNDRV_PCM_INFO_BLOCK_TRANSFER,
117         .formats        = SNDRV_PCM_FMTBIT_S16_BE,
118         .rates          = SNDRV_PCM_RATE_CONTINUOUS,
119         .rate_min       = 8000,  /* Replaced by chip->bitrate later. */
120         .rate_max       = 50000, /* Replaced by chip->bitrate later. */
121         .channels_min   = 1,
122         .channels_max   = 2,
123         .buffer_bytes_max = 64 * 1024 - 1,
124         .period_bytes_min = 512,
125         .period_bytes_max = 64 * 1024 - 1,
126         .periods_min    = 4,
127         .periods_max    = 1024,
128 };
129
130 /*
131  * Calculate and set bitrate and divisions.
132  */
133 static int snd_at73c213_set_bitrate(struct snd_at73c213 *chip)
134 {
135         unsigned long ssc_rate = clk_get_rate(chip->ssc->clk);
136         unsigned long dac_rate_new, ssc_div;
137         int status;
138         unsigned long ssc_div_max, ssc_div_min;
139         int max_tries;
140
141         /*
142          * We connect two clocks here, picking divisors so the I2S clocks
143          * out data at the same rate the DAC clocks it in ... and as close
144          * as practical to the desired target rate.
145          *
146          * The DAC master clock (MCLK) is programmable, and is either 256
147          * or (not here) 384 times the I2S output clock (BCLK).
148          */
149
150         /* SSC clock / (bitrate * stereo * 16-bit). */
151         ssc_div = ssc_rate / (BITRATE_TARGET * 2 * 16);
152         ssc_div_min = ssc_rate / (BITRATE_MAX * 2 * 16);
153         ssc_div_max = ssc_rate / (BITRATE_MIN * 2 * 16);
154         max_tries = (ssc_div_max - ssc_div_min) / 2;
155
156         if (max_tries < 1)
157                 max_tries = 1;
158
159         /* ssc_div must be a power of 2. */
160         ssc_div = (ssc_div + 1) & ~1UL;
161
162         if ((ssc_rate / (ssc_div * 2 * 16)) < BITRATE_MIN) {
163                 ssc_div -= 2;
164                 if ((ssc_rate / (ssc_div * 2 * 16)) > BITRATE_MAX)
165                         return -ENXIO;
166         }
167
168         /* Search for a possible bitrate. */
169         do {
170                 /* SSC clock / (ssc divider * 16-bit * stereo). */
171                 if ((ssc_rate / (ssc_div * 2 * 16)) < BITRATE_MIN)
172                         return -ENXIO;
173
174                 /* 256 / (2 * 16) = 8 */
175                 dac_rate_new = 8 * (ssc_rate / ssc_div);
176
177                 status = clk_round_rate(chip->board->dac_clk, dac_rate_new);
178                 if (status < 0)
179                         return status;
180
181                 /* Ignore difference smaller than 256 Hz. */
182                 if ((status/256) == (dac_rate_new/256))
183                         goto set_rate;
184
185                 ssc_div += 2;
186         } while (--max_tries);
187
188         /* Not able to find a valid bitrate. */
189         return -ENXIO;
190
191 set_rate:
192         status = clk_set_rate(chip->board->dac_clk, status);
193         if (status < 0)
194                 return status;
195
196         /* Set divider in SSC device. */
197         ssc_writel(chip->ssc->regs, CMR, ssc_div/2);
198
199         /* SSC clock / (ssc divider * 16-bit * stereo). */
200         chip->bitrate = ssc_rate / (ssc_div * 16 * 2);
201
202         dev_info(&chip->spi->dev,
203                         "at73c213: supported bitrate is %lu (%lu divider)\n",
204                         chip->bitrate, ssc_div);
205
206         return 0;
207 }
208
209 static int snd_at73c213_pcm_open(struct snd_pcm_substream *substream)
210 {
211         struct snd_at73c213 *chip = snd_pcm_substream_chip(substream);
212         struct snd_pcm_runtime *runtime = substream->runtime;
213
214         snd_at73c213_playback_hw.rate_min = chip->bitrate;
215         snd_at73c213_playback_hw.rate_max = chip->bitrate;
216         runtime->hw = snd_at73c213_playback_hw;
217         chip->substream = substream;
218
219         return 0;
220 }
221
222 static int snd_at73c213_pcm_close(struct snd_pcm_substream *substream)
223 {
224         struct snd_at73c213 *chip = snd_pcm_substream_chip(substream);
225         chip->substream = NULL;
226         return 0;
227 }
228
229 static int snd_at73c213_pcm_hw_params(struct snd_pcm_substream *substream,
230                                  struct snd_pcm_hw_params *hw_params)
231 {
232         struct snd_at73c213 *chip = snd_pcm_substream_chip(substream);
233         int channels = params_channels(hw_params);
234         int val;
235
236         val = ssc_readl(chip->ssc->regs, TFMR);
237         val = SSC_BFINS(TFMR_DATNB, channels - 1, val);
238         ssc_writel(chip->ssc->regs, TFMR, val);
239
240         return snd_pcm_lib_malloc_pages(substream,
241                                         params_buffer_bytes(hw_params));
242 }
243
244 static int snd_at73c213_pcm_hw_free(struct snd_pcm_substream *substream)
245 {
246         return snd_pcm_lib_free_pages(substream);
247 }
248
249 static int snd_at73c213_pcm_prepare(struct snd_pcm_substream *substream)
250 {
251         struct snd_at73c213 *chip = snd_pcm_substream_chip(substream);
252         struct snd_pcm_runtime *runtime = substream->runtime;
253         int block_size;
254
255         block_size = frames_to_bytes(runtime, runtime->period_size);
256
257         chip->period = 0;
258
259         ssc_writel(chip->ssc->regs, PDC_TPR,
260                         (long)runtime->dma_addr);
261         ssc_writel(chip->ssc->regs, PDC_TCR,
262                         runtime->period_size * runtime->channels);
263         ssc_writel(chip->ssc->regs, PDC_TNPR,
264                         (long)runtime->dma_addr + block_size);
265         ssc_writel(chip->ssc->regs, PDC_TNCR,
266                         runtime->period_size * runtime->channels);
267
268         return 0;
269 }
270
271 static int snd_at73c213_pcm_trigger(struct snd_pcm_substream *substream,
272                                    int cmd)
273 {
274         struct snd_at73c213 *chip = snd_pcm_substream_chip(substream);
275         int retval = 0;
276
277         spin_lock(&chip->lock);
278
279         switch (cmd) {
280         case SNDRV_PCM_TRIGGER_START:
281                 ssc_writel(chip->ssc->regs, IER, SSC_BIT(IER_ENDTX));
282                 ssc_writel(chip->ssc->regs, PDC_PTCR, SSC_BIT(PDC_PTCR_TXTEN));
283                 break;
284         case SNDRV_PCM_TRIGGER_STOP:
285                 ssc_writel(chip->ssc->regs, PDC_PTCR, SSC_BIT(PDC_PTCR_TXTDIS));
286                 ssc_writel(chip->ssc->regs, IDR, SSC_BIT(IDR_ENDTX));
287                 break;
288         default:
289                 dev_dbg(&chip->spi->dev, "spurious command %x\n", cmd);
290                 retval = -EINVAL;
291                 break;
292         }
293
294         spin_unlock(&chip->lock);
295
296         return retval;
297 }
298
299 static snd_pcm_uframes_t
300 snd_at73c213_pcm_pointer(struct snd_pcm_substream *substream)
301 {
302         struct snd_at73c213 *chip = snd_pcm_substream_chip(substream);
303         struct snd_pcm_runtime *runtime = substream->runtime;
304         snd_pcm_uframes_t pos;
305         unsigned long bytes;
306
307         bytes = ssc_readl(chip->ssc->regs, PDC_TPR)
308                 - (unsigned long)runtime->dma_addr;
309
310         pos = bytes_to_frames(runtime, bytes);
311         if (pos >= runtime->buffer_size)
312                 pos -= runtime->buffer_size;
313
314         return pos;
315 }
316
317 static struct snd_pcm_ops at73c213_playback_ops = {
318         .open           = snd_at73c213_pcm_open,
319         .close          = snd_at73c213_pcm_close,
320         .ioctl          = snd_pcm_lib_ioctl,
321         .hw_params      = snd_at73c213_pcm_hw_params,
322         .hw_free        = snd_at73c213_pcm_hw_free,
323         .prepare        = snd_at73c213_pcm_prepare,
324         .trigger        = snd_at73c213_pcm_trigger,
325         .pointer        = snd_at73c213_pcm_pointer,
326 };
327
328 static void snd_at73c213_pcm_free(struct snd_pcm *pcm)
329 {
330         struct snd_at73c213 *chip = snd_pcm_chip(pcm);
331         if (chip->pcm) {
332                 snd_pcm_lib_preallocate_free_for_all(chip->pcm);
333                 chip->pcm = NULL;
334         }
335 }
336
337 static int __devinit snd_at73c213_pcm_new(struct snd_at73c213 *chip, int device)
338 {
339         struct snd_pcm *pcm;
340         int retval;
341
342         retval = snd_pcm_new(chip->card, chip->card->shortname,
343                         device, 1, 0, &pcm);
344         if (retval < 0)
345                 goto out;
346
347         pcm->private_data = chip;
348         pcm->private_free = snd_at73c213_pcm_free;
349         pcm->info_flags = SNDRV_PCM_INFO_BLOCK_TRANSFER;
350         strcpy(pcm->name, "at73c213");
351         chip->pcm = pcm;
352
353         snd_pcm_set_ops(pcm, SNDRV_PCM_STREAM_PLAYBACK, &at73c213_playback_ops);
354
355         retval = snd_pcm_lib_preallocate_pages_for_all(chip->pcm,
356                         SNDRV_DMA_TYPE_DEV, &chip->ssc->pdev->dev,
357                         64 * 1024, 64 * 1024);
358 out:
359         return retval;
360 }
361
362 static irqreturn_t snd_at73c213_interrupt(int irq, void *dev_id)
363 {
364         struct snd_at73c213 *chip = dev_id;
365         struct snd_pcm_runtime *runtime = chip->substream->runtime;
366         u32 status;
367         int offset;
368         int block_size;
369         int next_period;
370         int retval = IRQ_NONE;
371
372         spin_lock(&chip->lock);
373
374         block_size = frames_to_bytes(runtime, runtime->period_size);
375         status = ssc_readl(chip->ssc->regs, IMR);
376
377         if (status & SSC_BIT(IMR_ENDTX)) {
378                 chip->period++;
379                 if (chip->period == runtime->periods)
380                         chip->period = 0;
381                 next_period = chip->period + 1;
382                 if (next_period == runtime->periods)
383                         next_period = 0;
384
385                 offset = block_size * next_period;
386
387                 ssc_writel(chip->ssc->regs, PDC_TNPR,
388                                 (long)runtime->dma_addr + offset);
389                 ssc_writel(chip->ssc->regs, PDC_TNCR,
390                                 runtime->period_size * runtime->channels);
391                 retval = IRQ_HANDLED;
392         }
393
394         ssc_readl(chip->ssc->regs, IMR);
395         spin_unlock(&chip->lock);
396
397         if (status & SSC_BIT(IMR_ENDTX))
398                 snd_pcm_period_elapsed(chip->substream);
399
400         return retval;
401 }
402
403 /*
404  * Mixer functions.
405  */
406 static int snd_at73c213_mono_get(struct snd_kcontrol *kcontrol,
407                                  struct snd_ctl_elem_value *ucontrol)
408 {
409         struct snd_at73c213 *chip = snd_kcontrol_chip(kcontrol);
410         int reg = kcontrol->private_value & 0xff;
411         int shift = (kcontrol->private_value >> 8) & 0xff;
412         int mask = (kcontrol->private_value >> 16) & 0xff;
413         int invert = (kcontrol->private_value >> 24) & 0xff;
414
415         mutex_lock(&chip->mixer_lock);
416
417         ucontrol->value.integer.value[0] =
418                 (chip->reg_image[reg] >> shift) & mask;
419
420         if (invert)
421                 ucontrol->value.integer.value[0] =
422                         mask - ucontrol->value.integer.value[0];
423
424         mutex_unlock(&chip->mixer_lock);
425
426         return 0;
427 }
428
429 static int snd_at73c213_mono_put(struct snd_kcontrol *kcontrol,
430                                  struct snd_ctl_elem_value *ucontrol)
431 {
432         struct snd_at73c213 *chip = snd_kcontrol_chip(kcontrol);
433         int reg = kcontrol->private_value & 0xff;
434         int shift = (kcontrol->private_value >> 8) & 0xff;
435         int mask = (kcontrol->private_value >> 16) & 0xff;
436         int invert = (kcontrol->private_value >> 24) & 0xff;
437         int change, retval;
438         unsigned short val;
439
440         val = (ucontrol->value.integer.value[0] & mask);
441         if (invert)
442                 val = mask - val;
443         val <<= shift;
444
445         mutex_lock(&chip->mixer_lock);
446
447         val = (chip->reg_image[reg] & ~(mask << shift)) | val;
448         change = val != chip->reg_image[reg];
449         retval = snd_at73c213_write_reg(chip, reg, val);
450
451         mutex_unlock(&chip->mixer_lock);
452
453         if (retval)
454                 return retval;
455
456         return change;
457 }
458
459 static int snd_at73c213_stereo_info(struct snd_kcontrol *kcontrol,
460                                   struct snd_ctl_elem_info *uinfo)
461 {
462         int mask = (kcontrol->private_value >> 24) & 0xff;
463
464         if (mask == 1)
465                 uinfo->type = SNDRV_CTL_ELEM_TYPE_BOOLEAN;
466         else
467                 uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
468
469         uinfo->count = 2;
470         uinfo->value.integer.min = 0;
471         uinfo->value.integer.max = mask;
472
473         return 0;
474 }
475
476 static int snd_at73c213_stereo_get(struct snd_kcontrol *kcontrol,
477                                  struct snd_ctl_elem_value *ucontrol)
478 {
479         struct snd_at73c213 *chip = snd_kcontrol_chip(kcontrol);
480         int left_reg = kcontrol->private_value & 0xff;
481         int right_reg = (kcontrol->private_value >> 8) & 0xff;
482         int shift_left = (kcontrol->private_value >> 16) & 0x07;
483         int shift_right = (kcontrol->private_value >> 19) & 0x07;
484         int mask = (kcontrol->private_value >> 24) & 0xff;
485         int invert = (kcontrol->private_value >> 22) & 1;
486
487         mutex_lock(&chip->mixer_lock);
488
489         ucontrol->value.integer.value[0] =
490                 (chip->reg_image[left_reg] >> shift_left) & mask;
491         ucontrol->value.integer.value[1] =
492                 (chip->reg_image[right_reg] >> shift_right) & mask;
493
494         if (invert) {
495                 ucontrol->value.integer.value[0] =
496                         mask - ucontrol->value.integer.value[0];
497                 ucontrol->value.integer.value[1] =
498                         mask - ucontrol->value.integer.value[1];
499         }
500
501         mutex_unlock(&chip->mixer_lock);
502
503         return 0;
504 }
505
506 static int snd_at73c213_stereo_put(struct snd_kcontrol *kcontrol,
507                                  struct snd_ctl_elem_value *ucontrol)
508 {
509         struct snd_at73c213 *chip = snd_kcontrol_chip(kcontrol);
510         int left_reg = kcontrol->private_value & 0xff;
511         int right_reg = (kcontrol->private_value >> 8) & 0xff;
512         int shift_left = (kcontrol->private_value >> 16) & 0x07;
513         int shift_right = (kcontrol->private_value >> 19) & 0x07;
514         int mask = (kcontrol->private_value >> 24) & 0xff;
515         int invert = (kcontrol->private_value >> 22) & 1;
516         int change, retval;
517         unsigned short val1, val2;
518
519         val1 = ucontrol->value.integer.value[0] & mask;
520         val2 = ucontrol->value.integer.value[1] & mask;
521         if (invert) {
522                 val1 = mask - val1;
523                 val2 = mask - val2;
524         }
525         val1 <<= shift_left;
526         val2 <<= shift_right;
527
528         mutex_lock(&chip->mixer_lock);
529
530         val1 = (chip->reg_image[left_reg] & ~(mask << shift_left)) | val1;
531         val2 = (chip->reg_image[right_reg] & ~(mask << shift_right)) | val2;
532         change = val1 != chip->reg_image[left_reg]
533                 || val2 != chip->reg_image[right_reg];
534         retval = snd_at73c213_write_reg(chip, left_reg, val1);
535         if (retval) {
536                 mutex_unlock(&chip->mixer_lock);
537                 goto out;
538         }
539         retval = snd_at73c213_write_reg(chip, right_reg, val2);
540         if (retval) {
541                 mutex_unlock(&chip->mixer_lock);
542                 goto out;
543         }
544
545         mutex_unlock(&chip->mixer_lock);
546
547         return change;
548
549 out:
550         return retval;
551 }
552
553 #define snd_at73c213_mono_switch_info   snd_ctl_boolean_mono_info
554
555 static int snd_at73c213_mono_switch_get(struct snd_kcontrol *kcontrol,
556                                  struct snd_ctl_elem_value *ucontrol)
557 {
558         struct snd_at73c213 *chip = snd_kcontrol_chip(kcontrol);
559         int reg = kcontrol->private_value & 0xff;
560         int shift = (kcontrol->private_value >> 8) & 0xff;
561         int invert = (kcontrol->private_value >> 24) & 0xff;
562
563         mutex_lock(&chip->mixer_lock);
564
565         ucontrol->value.integer.value[0] =
566                 (chip->reg_image[reg] >> shift) & 0x01;
567
568         if (invert)
569                 ucontrol->value.integer.value[0] =
570                         0x01 - ucontrol->value.integer.value[0];
571
572         mutex_unlock(&chip->mixer_lock);
573
574         return 0;
575 }
576
577 static int snd_at73c213_mono_switch_put(struct snd_kcontrol *kcontrol,
578                                  struct snd_ctl_elem_value *ucontrol)
579 {
580         struct snd_at73c213 *chip = snd_kcontrol_chip(kcontrol);
581         int reg = kcontrol->private_value & 0xff;
582         int shift = (kcontrol->private_value >> 8) & 0xff;
583         int mask = (kcontrol->private_value >> 16) & 0xff;
584         int invert = (kcontrol->private_value >> 24) & 0xff;
585         int change, retval;
586         unsigned short val;
587
588         if (ucontrol->value.integer.value[0])
589                 val = mask;
590         else
591                 val = 0;
592
593         if (invert)
594                 val = mask - val;
595         val <<= shift;
596
597         mutex_lock(&chip->mixer_lock);
598
599         val |= (chip->reg_image[reg] & ~(mask << shift));
600         change = val != chip->reg_image[reg];
601
602         retval = snd_at73c213_write_reg(chip, reg, val);
603
604         mutex_unlock(&chip->mixer_lock);
605
606         if (retval)
607                 return retval;
608
609         return change;
610 }
611
612 static int snd_at73c213_pa_volume_info(struct snd_kcontrol *kcontrol,
613                                   struct snd_ctl_elem_info *uinfo)
614 {
615         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
616         uinfo->count = 1;
617         uinfo->value.integer.min = 0;
618         uinfo->value.integer.max = ((kcontrol->private_value >> 16) & 0xff) - 1;
619
620         return 0;
621 }
622
623 static int snd_at73c213_line_capture_volume_info(
624                 struct snd_kcontrol *kcontrol,
625                 struct snd_ctl_elem_info *uinfo)
626 {
627         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
628         uinfo->count = 2;
629         /* When inverted will give values 0x10001 => 0. */
630         uinfo->value.integer.min = 14;
631         uinfo->value.integer.max = 31;
632
633         return 0;
634 }
635
636 static int snd_at73c213_aux_capture_volume_info(
637                 struct snd_kcontrol *kcontrol,
638                 struct snd_ctl_elem_info *uinfo)
639 {
640         uinfo->type = SNDRV_CTL_ELEM_TYPE_INTEGER;
641         uinfo->count = 1;
642         /* When inverted will give values 0x10001 => 0. */
643         uinfo->value.integer.min = 14;
644         uinfo->value.integer.max = 31;
645
646         return 0;
647 }
648
649 #define AT73C213_MONO_SWITCH(xname, xindex, reg, shift, mask, invert)   \
650 {                                                                       \
651         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,                            \
652         .name = xname,                                                  \
653         .index = xindex,                                                \
654         .info = snd_at73c213_mono_switch_info,                          \
655         .get = snd_at73c213_mono_switch_get,                            \
656         .put = snd_at73c213_mono_switch_put,                            \
657         .private_value = (reg | (shift << 8) | (mask << 16) | (invert << 24)) \
658 }
659
660 #define AT73C213_STEREO(xname, xindex, left_reg, right_reg, shift_left, shift_right, mask, invert) \
661 {                                                                       \
662         .iface = SNDRV_CTL_ELEM_IFACE_MIXER,                            \
663         .name = xname,                                                  \
664         .index = xindex,                                                \
665         .info = snd_at73c213_stereo_info,                               \
666         .get = snd_at73c213_stereo_get,                                 \
667         .put = snd_at73c213_stereo_put,                                 \
668         .private_value = (left_reg | (right_reg << 8)                   \
669                         | (shift_left << 16) | (shift_right << 19)      \
670                         | (mask << 24) | (invert << 22))                \
671 }
672
673 static struct snd_kcontrol_new snd_at73c213_controls[] __devinitdata = {
674 AT73C213_STEREO("Master Playback Volume", 0, DAC_LMPG, DAC_RMPG, 0, 0, 0x1f, 1),
675 AT73C213_STEREO("Master Playback Switch", 0, DAC_LMPG, DAC_RMPG, 5, 5, 1, 1),
676 AT73C213_STEREO("PCM Playback Volume", 0, DAC_LLOG, DAC_RLOG, 0, 0, 0x1f, 1),
677 AT73C213_STEREO("PCM Playback Switch", 0, DAC_LLOG, DAC_RLOG, 5, 5, 1, 1),
678 AT73C213_MONO_SWITCH("Mono PA Playback Switch", 0, DAC_CTRL, DAC_CTRL_ONPADRV,
679                      0x01, 0),
680 {
681         .iface  = SNDRV_CTL_ELEM_IFACE_MIXER,
682         .name   = "PA Playback Volume",
683         .index  = 0,
684         .info   = snd_at73c213_pa_volume_info,
685         .get    = snd_at73c213_mono_get,
686         .put    = snd_at73c213_mono_put,
687         .private_value  = PA_CTRL | (PA_CTRL_APAGAIN << 8) | \
688                 (0x0f << 16) | (1 << 24),
689 },
690 AT73C213_MONO_SWITCH("PA High Gain Playback Switch", 0, PA_CTRL, PA_CTRL_APALP,
691                      0x01, 1),
692 AT73C213_MONO_SWITCH("PA Playback Switch", 0, PA_CTRL, PA_CTRL_APAON, 0x01, 0),
693 {
694         .iface  = SNDRV_CTL_ELEM_IFACE_MIXER,
695         .name   = "Aux Capture Volume",
696         .index  = 0,
697         .info   = snd_at73c213_aux_capture_volume_info,
698         .get    = snd_at73c213_mono_get,
699         .put    = snd_at73c213_mono_put,
700         .private_value  = DAC_AUXG | (0 << 8) | (0x1f << 16) | (1 << 24),
701 },
702 AT73C213_MONO_SWITCH("Aux Capture Switch", 0, DAC_CTRL, DAC_CTRL_ONAUXIN,
703                      0x01, 0),
704 {
705         .iface  = SNDRV_CTL_ELEM_IFACE_MIXER,
706         .name   = "Line Capture Volume",
707         .index  = 0,
708         .info   = snd_at73c213_line_capture_volume_info,
709         .get    = snd_at73c213_stereo_get,
710         .put    = snd_at73c213_stereo_put,
711         .private_value  = DAC_LLIG | (DAC_RLIG << 8) | (0 << 16) | (0 << 19)
712                 | (0x1f << 24) | (1 << 22),
713 },
714 AT73C213_MONO_SWITCH("Line Capture Switch", 0, DAC_CTRL, 0, 0x03, 0),
715 };
716
717 static int __devinit snd_at73c213_mixer(struct snd_at73c213 *chip)
718 {
719         struct snd_card *card;
720         int errval, idx;
721
722         if (chip == NULL || chip->pcm == NULL)
723                 return -EINVAL;
724
725         card = chip->card;
726
727         strcpy(card->mixername, chip->pcm->name);
728
729         for (idx = 0; idx < ARRAY_SIZE(snd_at73c213_controls); idx++) {
730                 errval = snd_ctl_add(card,
731                                 snd_ctl_new1(&snd_at73c213_controls[idx],
732                                         chip));
733                 if (errval < 0)
734                         goto cleanup;
735         }
736
737         return 0;
738
739 cleanup:
740         for (idx = 1; idx < ARRAY_SIZE(snd_at73c213_controls) + 1; idx++) {
741                 struct snd_kcontrol *kctl;
742                 kctl = snd_ctl_find_numid(card, idx);
743                 if (kctl)
744                         snd_ctl_remove(card, kctl);
745         }
746         return errval;
747 }
748
749 /*
750  * Device functions
751  */
752 static int __devinit snd_at73c213_ssc_init(struct snd_at73c213 *chip)
753 {
754         /*
755          * Continuous clock output.
756          * Starts on falling TF.
757          * Delay 1 cycle (1 bit).
758          * Periode is 16 bit (16 - 1).
759          */
760         ssc_writel(chip->ssc->regs, TCMR,
761                         SSC_BF(TCMR_CKO, 1)
762                         | SSC_BF(TCMR_START, 4)
763                         | SSC_BF(TCMR_STTDLY, 1)
764                         | SSC_BF(TCMR_PERIOD, 16 - 1));
765         /*
766          * Data length is 16 bit (16 - 1).
767          * Transmit MSB first.
768          * Transmit 2 words each transfer.
769          * Frame sync length is 16 bit (16 - 1).
770          * Frame starts on negative pulse.
771          */
772         ssc_writel(chip->ssc->regs, TFMR,
773                         SSC_BF(TFMR_DATLEN, 16 - 1)
774                         | SSC_BIT(TFMR_MSBF)
775                         | SSC_BF(TFMR_DATNB, 1)
776                         | SSC_BF(TFMR_FSLEN, 16 - 1)
777                         | SSC_BF(TFMR_FSOS, 1));
778
779         return 0;
780 }
781
782 static int __devinit snd_at73c213_chip_init(struct snd_at73c213 *chip)
783 {
784         int retval;
785         unsigned char dac_ctrl = 0;
786
787         retval = snd_at73c213_set_bitrate(chip);
788         if (retval)
789                 goto out;
790
791         /* Enable DAC master clock. */
792         clk_enable(chip->board->dac_clk);
793
794         /* Initialize at73c213 on SPI bus. */
795         retval = snd_at73c213_write_reg(chip, DAC_RST, 0x04);
796         if (retval)
797                 goto out_clk;
798         msleep(1);
799         retval = snd_at73c213_write_reg(chip, DAC_RST, 0x03);
800         if (retval)
801                 goto out_clk;
802
803         /* Precharge everything. */
804         retval = snd_at73c213_write_reg(chip, DAC_PRECH, 0xff);
805         if (retval)
806                 goto out_clk;
807         retval = snd_at73c213_write_reg(chip, PA_CTRL, (1<<PA_CTRL_APAPRECH));
808         if (retval)
809                 goto out_clk;
810         retval = snd_at73c213_write_reg(chip, DAC_CTRL,
811                         (1<<DAC_CTRL_ONLNOL) | (1<<DAC_CTRL_ONLNOR));
812         if (retval)
813                 goto out_clk;
814
815         msleep(50);
816
817         /* Stop precharging PA. */
818         retval = snd_at73c213_write_reg(chip, PA_CTRL,
819                         (1<<PA_CTRL_APALP) | 0x0f);
820         if (retval)
821                 goto out_clk;
822
823         msleep(450);
824
825         /* Stop precharging DAC, turn on master power. */
826         retval = snd_at73c213_write_reg(chip, DAC_PRECH, (1<<DAC_PRECH_ONMSTR));
827         if (retval)
828                 goto out_clk;
829
830         msleep(1);
831
832         /* Turn on DAC. */
833         dac_ctrl = (1<<DAC_CTRL_ONDACL) | (1<<DAC_CTRL_ONDACR)
834                 | (1<<DAC_CTRL_ONLNOL) | (1<<DAC_CTRL_ONLNOR);
835
836         retval = snd_at73c213_write_reg(chip, DAC_CTRL, dac_ctrl);
837         if (retval)
838                 goto out_clk;
839
840         /* Mute sound. */
841         retval = snd_at73c213_write_reg(chip, DAC_LMPG, 0x3f);
842         if (retval)
843                 goto out_clk;
844         retval = snd_at73c213_write_reg(chip, DAC_RMPG, 0x3f);
845         if (retval)
846                 goto out_clk;
847         retval = snd_at73c213_write_reg(chip, DAC_LLOG, 0x3f);
848         if (retval)
849                 goto out_clk;
850         retval = snd_at73c213_write_reg(chip, DAC_RLOG, 0x3f);
851         if (retval)
852                 goto out_clk;
853         retval = snd_at73c213_write_reg(chip, DAC_LLIG, 0x11);
854         if (retval)
855                 goto out_clk;
856         retval = snd_at73c213_write_reg(chip, DAC_RLIG, 0x11);
857         if (retval)
858                 goto out_clk;
859         retval = snd_at73c213_write_reg(chip, DAC_AUXG, 0x11);
860         if (retval)
861                 goto out_clk;
862
863         /* Enable I2S device, i.e. clock output. */
864         ssc_writel(chip->ssc->regs, CR, SSC_BIT(CR_TXEN));
865
866         goto out;
867
868 out_clk:
869         clk_disable(chip->board->dac_clk);
870 out:
871         return retval;
872 }
873
874 static int snd_at73c213_dev_free(struct snd_device *device)
875 {
876         struct snd_at73c213 *chip = device->device_data;
877
878         ssc_writel(chip->ssc->regs, CR, SSC_BIT(CR_TXDIS));
879         if (chip->irq >= 0) {
880                 free_irq(chip->irq, chip);
881                 chip->irq = -1;
882         }
883
884         return 0;
885 }
886
887 static int __devinit snd_at73c213_dev_init(struct snd_card *card,
888                                          struct spi_device *spi)
889 {
890         static struct snd_device_ops ops = {
891                 .dev_free       = snd_at73c213_dev_free,
892         };
893         struct snd_at73c213 *chip = get_chip(card);
894         int irq, retval;
895
896         irq = chip->ssc->irq;
897         if (irq < 0)
898                 return irq;
899
900         spin_lock_init(&chip->lock);
901         mutex_init(&chip->mixer_lock);
902         chip->card = card;
903         chip->irq = -1;
904
905         retval = request_irq(irq, snd_at73c213_interrupt, 0, "at73c213", chip);
906         if (retval) {
907                 dev_dbg(&chip->spi->dev, "unable to request irq %d\n", irq);
908                 goto out;
909         }
910         chip->irq = irq;
911
912         memcpy(&chip->reg_image, &snd_at73c213_original_image,
913                         sizeof(snd_at73c213_original_image));
914
915         retval = snd_at73c213_ssc_init(chip);
916         if (retval)
917                 goto out_irq;
918
919         retval = snd_at73c213_chip_init(chip);
920         if (retval)
921                 goto out_irq;
922
923         retval = snd_at73c213_pcm_new(chip, 0);
924         if (retval)
925                 goto out_irq;
926
927         retval = snd_device_new(card, SNDRV_DEV_LOWLEVEL, chip, &ops);
928         if (retval)
929                 goto out_irq;
930
931         retval = snd_at73c213_mixer(chip);
932         if (retval)
933                 goto out_snd_dev;
934
935         snd_card_set_dev(card, &spi->dev);
936
937         goto out;
938
939 out_snd_dev:
940         snd_device_free(card, chip);
941 out_irq:
942         free_irq(chip->irq, chip);
943         chip->irq = -1;
944 out:
945         return retval;
946 }
947
948 static int __devinit snd_at73c213_probe(struct spi_device *spi)
949 {
950         struct snd_card                 *card;
951         struct snd_at73c213             *chip;
952         struct at73c213_board_info      *board;
953         int                             retval;
954         char                            id[16];
955
956         board = spi->dev.platform_data;
957         if (!board) {
958                 dev_dbg(&spi->dev, "no platform_data\n");
959                 return -ENXIO;
960         }
961
962         if (!board->dac_clk) {
963                 dev_dbg(&spi->dev, "no DAC clk\n");
964                 return -ENXIO;
965         }
966
967         if (IS_ERR(board->dac_clk)) {
968                 dev_dbg(&spi->dev, "no DAC clk\n");
969                 return PTR_ERR(board->dac_clk);
970         }
971
972         retval = -ENOMEM;
973
974         /* Allocate "card" using some unused identifiers. */
975         snprintf(id, sizeof id, "at73c213_%d", board->ssc_id);
976         card = snd_card_new(-1, id, THIS_MODULE, sizeof(struct snd_at73c213));
977         if (!card)
978                 goto out;
979
980         chip = card->private_data;
981         chip->spi = spi;
982         chip->board = board;
983
984         chip->ssc = ssc_request(board->ssc_id);
985         if (IS_ERR(chip->ssc)) {
986                 dev_dbg(&spi->dev, "could not get ssc%d device\n",
987                                 board->ssc_id);
988                 retval = PTR_ERR(chip->ssc);
989                 goto out_card;
990         }
991
992         retval = snd_at73c213_dev_init(card, spi);
993         if (retval)
994                 goto out_ssc;
995
996         strcpy(card->driver, "at73c213");
997         strcpy(card->shortname, board->shortname);
998         sprintf(card->longname, "%s on irq %d", card->shortname, chip->irq);
999
1000         retval = snd_card_register(card);
1001         if (retval)
1002                 goto out_ssc;
1003
1004         dev_set_drvdata(&spi->dev, card);
1005
1006         goto out;
1007
1008 out_ssc:
1009         ssc_free(chip->ssc);
1010 out_card:
1011         snd_card_free(card);
1012 out:
1013         return retval;
1014 }
1015
1016 static int __devexit snd_at73c213_remove(struct spi_device *spi)
1017 {
1018         struct snd_card *card = dev_get_drvdata(&spi->dev);
1019         struct snd_at73c213 *chip = card->private_data;
1020         int retval;
1021
1022         /* Stop playback. */
1023         ssc_writel(chip->ssc->regs, CR, SSC_BIT(CR_TXDIS));
1024
1025         /* Mute sound. */
1026         retval = snd_at73c213_write_reg(chip, DAC_LMPG, 0x3f);
1027         if (retval)
1028                 goto out;
1029         retval = snd_at73c213_write_reg(chip, DAC_RMPG, 0x3f);
1030         if (retval)
1031                 goto out;
1032         retval = snd_at73c213_write_reg(chip, DAC_LLOG, 0x3f);
1033         if (retval)
1034                 goto out;
1035         retval = snd_at73c213_write_reg(chip, DAC_RLOG, 0x3f);
1036         if (retval)
1037                 goto out;
1038         retval = snd_at73c213_write_reg(chip, DAC_LLIG, 0x11);
1039         if (retval)
1040                 goto out;
1041         retval = snd_at73c213_write_reg(chip, DAC_RLIG, 0x11);
1042         if (retval)
1043                 goto out;
1044         retval = snd_at73c213_write_reg(chip, DAC_AUXG, 0x11);
1045         if (retval)
1046                 goto out;
1047
1048         /* Turn off PA. */
1049         retval = snd_at73c213_write_reg(chip, PA_CTRL,
1050                                         chip->reg_image[PA_CTRL] | 0x0f);
1051         if (retval)
1052                 goto out;
1053         msleep(10);
1054         retval = snd_at73c213_write_reg(chip, PA_CTRL,
1055                                         (1 << PA_CTRL_APALP) | 0x0f);
1056         if (retval)
1057                 goto out;
1058
1059         /* Turn off external DAC. */
1060         retval = snd_at73c213_write_reg(chip, DAC_CTRL, 0x0c);
1061         if (retval)
1062                 goto out;
1063         msleep(2);
1064         retval = snd_at73c213_write_reg(chip, DAC_CTRL, 0x00);
1065         if (retval)
1066                 goto out;
1067
1068         /* Turn off master power. */
1069         retval = snd_at73c213_write_reg(chip, DAC_PRECH, 0x00);
1070         if (retval)
1071                 goto out;
1072
1073 out:
1074         /* Stop DAC master clock. */
1075         clk_disable(chip->board->dac_clk);
1076
1077         ssc_free(chip->ssc);
1078         snd_card_free(card);
1079         dev_set_drvdata(&spi->dev, NULL);
1080
1081         return 0;
1082 }
1083
1084 #ifdef CONFIG_PM
1085 static int snd_at73c213_suspend(struct spi_device *spi, pm_message_t msg)
1086 {
1087         struct snd_card *card = dev_get_drvdata(&spi->dev);
1088         struct snd_at73c213 *chip = card->private_data;
1089
1090         ssc_writel(chip->ssc->regs, CR, SSC_BIT(CR_TXDIS));
1091         clk_disable(chip->board->dac_clk);
1092
1093         return 0;
1094 }
1095
1096 static int snd_at73c213_resume(struct spi_device *spi)
1097 {
1098         struct snd_card *card = dev_get_drvdata(&spi->dev);
1099         struct snd_at73c213 *chip = card->private_data;
1100
1101         clk_enable(chip->board->dac_clk);
1102         ssc_writel(chip->ssc->regs, CR, SSC_BIT(CR_TXEN));
1103
1104         return 0;
1105 }
1106 #else
1107 #define snd_at73c213_suspend NULL
1108 #define snd_at73c213_resume NULL
1109 #endif
1110
1111 static struct spi_driver at73c213_driver = {
1112         .driver         = {
1113                 .name   = "at73c213",
1114         },
1115         .probe          = snd_at73c213_probe,
1116         .suspend        = snd_at73c213_suspend,
1117         .resume         = snd_at73c213_resume,
1118         .remove         = __devexit_p(snd_at73c213_remove),
1119 };
1120
1121 static int __init at73c213_init(void)
1122 {
1123         return spi_register_driver(&at73c213_driver);
1124 }
1125 module_init(at73c213_init);
1126
1127 static void __exit at73c213_exit(void)
1128 {
1129         spi_unregister_driver(&at73c213_driver);
1130 }
1131 module_exit(at73c213_exit);
1132
1133 MODULE_AUTHOR("Hans-Christian Egtvedt <hcegtvedt@atmel.com>");
1134 MODULE_DESCRIPTION("Sound driver for AT73C213 with Atmel SSC");
1135 MODULE_LICENSE("GPL");