Add the rt linux 4.1.3-rt3 as base
[kvmfornfv.git] / kernel / sound / pci / ice1712 / quartet.c
1 /*
2  *   ALSA driver for ICEnsemble VT1724 (Envy24HT)
3  *
4  *   Lowlevel functions for Infrasonic Quartet
5  *
6  *      Copyright (c) 2009 Pavel Hofman <pavel.hofman@ivitera.com>
7  *
8  *
9  *   This program is free software; you can redistribute it and/or modify
10  *   it under the terms of the GNU General Public License as published by
11  *   the Free Software Foundation; either version 2 of the License, or
12  *   (at your option) any later version.
13  *
14  *   This program is distributed in the hope that it will be useful,
15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  *   GNU General Public License for more details.
18  *
19  *   You should have received a copy of the GNU General Public License
20  *   along with this program; if not, write to the Free Software
21  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
22  *
23  */
24
25 #include <linux/delay.h>
26 #include <linux/interrupt.h>
27 #include <linux/init.h>
28 #include <linux/slab.h>
29 #include <sound/core.h>
30 #include <sound/tlv.h>
31 #include <sound/info.h>
32
33 #include "ice1712.h"
34 #include "envy24ht.h"
35 #include <sound/ak4113.h>
36 #include "quartet.h"
37
38 struct qtet_spec {
39         struct ak4113 *ak4113;
40         unsigned int scr;       /* system control register */
41         unsigned int mcr;       /* monitoring control register */
42         unsigned int cpld;      /* cpld register */
43 };
44
45 struct qtet_kcontrol_private {
46         unsigned int bit;
47         void (*set_register)(struct snd_ice1712 *ice, unsigned int val);
48         unsigned int (*get_register)(struct snd_ice1712 *ice);
49         const char * const texts[2];
50 };
51
52 enum {
53         IN12_SEL = 0,
54         IN34_SEL,
55         AIN34_SEL,
56         COAX_OUT,
57         IN12_MON12,
58         IN12_MON34,
59         IN34_MON12,
60         IN34_MON34,
61         OUT12_MON34,
62         OUT34_MON12,
63 };
64
65 static const char * const ext_clock_names[3] = {"IEC958 In", "Word Clock 1xFS",
66         "Word Clock 256xFS"};
67
68 /* chip address on I2C bus */
69 #define AK4113_ADDR             0x26    /* S/PDIF receiver */
70
71 /* chip address on SPI bus */
72 #define AK4620_ADDR             0x02    /* ADC/DAC */
73
74
75 /*
76  * GPIO pins
77  */
78
79 /* GPIO0 - O - DATA0, def. 0 */
80 #define GPIO_D0                 (1<<0)
81 /* GPIO1 - I/O - DATA1, Jack Detect Input0 (0:present, 1:missing), def. 1 */
82 #define GPIO_D1_JACKDTC0        (1<<1)
83 /* GPIO2 - I/O - DATA2, Jack Detect Input1 (0:present, 1:missing), def. 1 */
84 #define GPIO_D2_JACKDTC1        (1<<2)
85 /* GPIO3 - I/O - DATA3, def. 1 */
86 #define GPIO_D3                 (1<<3)
87 /* GPIO4 - I/O - DATA4, SPI CDTO, def. 1 */
88 #define GPIO_D4_SPI_CDTO        (1<<4)
89 /* GPIO5 - I/O - DATA5, SPI CCLK, def. 1 */
90 #define GPIO_D5_SPI_CCLK        (1<<5)
91 /* GPIO6 - I/O - DATA6, Cable Detect Input (0:detected, 1:not detected */
92 #define GPIO_D6_CD              (1<<6)
93 /* GPIO7 - I/O - DATA7, Device Detect Input (0:detected, 1:not detected */
94 #define GPIO_D7_DD              (1<<7)
95 /* GPIO8 - O - CPLD Chip Select, def. 1 */
96 #define GPIO_CPLD_CSN           (1<<8)
97 /* GPIO9 - O - CPLD register read/write (0:write, 1:read), def. 0 */
98 #define GPIO_CPLD_RW            (1<<9)
99 /* GPIO10 - O - SPI Chip Select for CODEC#0, def. 1 */
100 #define GPIO_SPI_CSN0           (1<<10)
101 /* GPIO11 - O - SPI Chip Select for CODEC#1, def. 1 */
102 #define GPIO_SPI_CSN1           (1<<11)
103 /* GPIO12 - O - Ex. Register Output Enable (0:enable, 1:disable), def. 1,
104  * init 0 */
105 #define GPIO_EX_GPIOE           (1<<12)
106 /* GPIO13 - O - Ex. Register0 Chip Select for System Control Register,
107  * def. 1 */
108 #define GPIO_SCR                (1<<13)
109 /* GPIO14 - O - Ex. Register1 Chip Select for Monitor Control Register,
110  * def. 1 */
111 #define GPIO_MCR                (1<<14)
112
113 #define GPIO_SPI_ALL            (GPIO_D4_SPI_CDTO | GPIO_D5_SPI_CCLK |\
114                 GPIO_SPI_CSN0 | GPIO_SPI_CSN1)
115
116 #define GPIO_DATA_MASK          (GPIO_D0 | GPIO_D1_JACKDTC0 | \
117                 GPIO_D2_JACKDTC1 | GPIO_D3 | \
118                 GPIO_D4_SPI_CDTO | GPIO_D5_SPI_CCLK | \
119                 GPIO_D6_CD | GPIO_D7_DD)
120
121 /* System Control Register GPIO_SCR data bits */
122 /* Mic/Line select relay (0:line, 1:mic) */
123 #define SCR_RELAY               GPIO_D0
124 /* Phantom power drive control (0:5V, 1:48V) */
125 #define SCR_PHP_V               GPIO_D1_JACKDTC0
126 /* H/W mute control (0:Normal, 1:Mute) */
127 #define SCR_MUTE                GPIO_D2_JACKDTC1
128 /* Phantom power control (0:Phantom on, 1:off) */
129 #define SCR_PHP                 GPIO_D3
130 /* Analog input 1/2 Source Select */
131 #define SCR_AIN12_SEL0          GPIO_D4_SPI_CDTO
132 #define SCR_AIN12_SEL1          GPIO_D5_SPI_CCLK
133 /* Analog input 3/4 Source Select (0:line, 1:hi-z) */
134 #define SCR_AIN34_SEL           GPIO_D6_CD
135 /* Codec Power Down (0:power down, 1:normal) */
136 #define SCR_CODEC_PDN           GPIO_D7_DD
137
138 #define SCR_AIN12_LINE          (0)
139 #define SCR_AIN12_MIC           (SCR_AIN12_SEL0)
140 #define SCR_AIN12_LOWCUT        (SCR_AIN12_SEL1 | SCR_AIN12_SEL0)
141
142 /* Monitor Control Register GPIO_MCR data bits */
143 /* Input 1/2 to Monitor 1/2 (0:off, 1:on) */
144 #define MCR_IN12_MON12          GPIO_D0
145 /* Input 1/2 to Monitor 3/4 (0:off, 1:on) */
146 #define MCR_IN12_MON34          GPIO_D1_JACKDTC0
147 /* Input 3/4 to Monitor 1/2 (0:off, 1:on) */
148 #define MCR_IN34_MON12          GPIO_D2_JACKDTC1
149 /* Input 3/4 to Monitor 3/4 (0:off, 1:on) */
150 #define MCR_IN34_MON34          GPIO_D3
151 /* Output to Monitor 1/2 (0:off, 1:on) */
152 #define MCR_OUT34_MON12         GPIO_D4_SPI_CDTO
153 /* Output to Monitor 3/4 (0:off, 1:on) */
154 #define MCR_OUT12_MON34         GPIO_D5_SPI_CCLK
155
156 /* CPLD Register DATA bits */
157 /* Clock Rate Select */
158 #define CPLD_CKS0               GPIO_D0
159 #define CPLD_CKS1               GPIO_D1_JACKDTC0
160 #define CPLD_CKS2               GPIO_D2_JACKDTC1
161 /* Sync Source Select (0:Internal, 1:External) */
162 #define CPLD_SYNC_SEL           GPIO_D3
163 /* Word Clock FS Select (0:FS, 1:256FS) */
164 #define CPLD_WORD_SEL           GPIO_D4_SPI_CDTO
165 /* Coaxial Output Source (IS-Link) (0:SPDIF, 1:I2S) */
166 #define CPLD_COAX_OUT           GPIO_D5_SPI_CCLK
167 /* Input 1/2 Source Select (0:Analog12, 1:An34) */
168 #define CPLD_IN12_SEL           GPIO_D6_CD
169 /* Input 3/4 Source Select (0:Analog34, 1:Digital In) */
170 #define CPLD_IN34_SEL           GPIO_D7_DD
171
172 /* internal clock (CPLD_SYNC_SEL = 0) options */
173 #define CPLD_CKS_44100HZ        (0)
174 #define CPLD_CKS_48000HZ        (CPLD_CKS0)
175 #define CPLD_CKS_88200HZ        (CPLD_CKS1)
176 #define CPLD_CKS_96000HZ        (CPLD_CKS1 | CPLD_CKS0)
177 #define CPLD_CKS_176400HZ       (CPLD_CKS2)
178 #define CPLD_CKS_192000HZ       (CPLD_CKS2 | CPLD_CKS0)
179
180 #define CPLD_CKS_MASK           (CPLD_CKS0 | CPLD_CKS1 | CPLD_CKS2)
181
182 /* external clock (CPLD_SYNC_SEL = 1) options */
183 /* external clock - SPDIF */
184 #define CPLD_EXT_SPDIF  (0 | CPLD_SYNC_SEL)
185 /* external clock - WordClock 1xfs */
186 #define CPLD_EXT_WORDCLOCK_1FS  (CPLD_CKS1 | CPLD_SYNC_SEL)
187 /* external clock - WordClock 256xfs */
188 #define CPLD_EXT_WORDCLOCK_256FS        (CPLD_CKS1 | CPLD_WORD_SEL |\
189                 CPLD_SYNC_SEL)
190
191 #define EXT_SPDIF_TYPE                  0
192 #define EXT_WORDCLOCK_1FS_TYPE          1
193 #define EXT_WORDCLOCK_256FS_TYPE        2
194
195 #define AK4620_DFS0             (1<<0)
196 #define AK4620_DFS1             (1<<1)
197 #define AK4620_CKS0             (1<<2)
198 #define AK4620_CKS1             (1<<3)
199 /* Clock and Format Control register */
200 #define AK4620_DFS_REG          0x02
201
202 /* Deem and Volume Control register */
203 #define AK4620_DEEMVOL_REG      0x03
204 #define AK4620_SMUTE            (1<<7)
205
206 #ifdef CONFIG_PROC_FS
207 /*
208  * Conversion from int value to its binary form. Used for debugging.
209  * The output buffer must be allocated prior to calling the function.
210  */
211 static char *get_binary(char *buffer, int value)
212 {
213         int i, j, pos;
214         pos = 0;
215         for (i = 0; i < 4; ++i) {
216                 for (j = 0; j < 8; ++j) {
217                         if (value & (1 << (31-(i*8 + j))))
218                                 buffer[pos] = '1';
219                         else
220                                 buffer[pos] = '0';
221                         pos++;
222                 }
223                 if (i < 3) {
224                         buffer[pos] = ' ';
225                         pos++;
226                 }
227         }
228         buffer[pos] = '\0';
229         return buffer;
230 }
231 #endif /* CONFIG_PROC_FS */
232
233 /*
234  * Initial setup of the conversion array GPIO <-> rate
235  */
236 static unsigned int qtet_rates[] = {
237         44100, 48000, 88200,
238         96000, 176400, 192000,
239 };
240
241 static unsigned int cks_vals[] = {
242         CPLD_CKS_44100HZ, CPLD_CKS_48000HZ, CPLD_CKS_88200HZ,
243         CPLD_CKS_96000HZ, CPLD_CKS_176400HZ, CPLD_CKS_192000HZ,
244 };
245
246 static struct snd_pcm_hw_constraint_list qtet_rates_info = {
247         .count = ARRAY_SIZE(qtet_rates),
248         .list = qtet_rates,
249         .mask = 0,
250 };
251
252 static void qtet_ak4113_write(void *private_data, unsigned char reg,
253                 unsigned char val)
254 {
255         snd_vt1724_write_i2c((struct snd_ice1712 *)private_data, AK4113_ADDR,
256                         reg, val);
257 }
258
259 static unsigned char qtet_ak4113_read(void *private_data, unsigned char reg)
260 {
261         return snd_vt1724_read_i2c((struct snd_ice1712 *)private_data,
262                         AK4113_ADDR, reg);
263 }
264
265
266 /*
267  * AK4620 section
268  */
269
270 /*
271  * Write data to addr register of ak4620
272  */
273 static void qtet_akm_write(struct snd_akm4xxx *ak, int chip,
274                 unsigned char addr, unsigned char data)
275 {
276         unsigned int tmp, orig_dir;
277         int idx;
278         unsigned int addrdata;
279         struct snd_ice1712 *ice = ak->private_data[0];
280
281         if (snd_BUG_ON(chip < 0 || chip >= 4))
282                 return;
283         /*dev_dbg(ice->card->dev, "Writing to AK4620: chip=%d, addr=0x%x,
284           data=0x%x\n", chip, addr, data);*/
285         orig_dir = ice->gpio.get_dir(ice);
286         ice->gpio.set_dir(ice, orig_dir | GPIO_SPI_ALL);
287         /* set mask - only SPI bits */
288         ice->gpio.set_mask(ice, ~GPIO_SPI_ALL);
289
290         tmp = ice->gpio.get_data(ice);
291         /* high all */
292         tmp |= GPIO_SPI_ALL;
293         ice->gpio.set_data(ice, tmp);
294         udelay(100);
295         /* drop chip select */
296         if (chip)
297                 /* CODEC 1 */
298                 tmp &= ~GPIO_SPI_CSN1;
299         else
300                 tmp &= ~GPIO_SPI_CSN0;
301         ice->gpio.set_data(ice, tmp);
302         udelay(100);
303
304         /* build I2C address + data byte */
305         addrdata = (AK4620_ADDR << 6) | 0x20 | (addr & 0x1f);
306         addrdata = (addrdata << 8) | data;
307         for (idx = 15; idx >= 0; idx--) {
308                 /* drop clock */
309                 tmp &= ~GPIO_D5_SPI_CCLK;
310                 ice->gpio.set_data(ice, tmp);
311                 udelay(100);
312                 /* set data */
313                 if (addrdata & (1 << idx))
314                         tmp |= GPIO_D4_SPI_CDTO;
315                 else
316                         tmp &= ~GPIO_D4_SPI_CDTO;
317                 ice->gpio.set_data(ice, tmp);
318                 udelay(100);
319                 /* raise clock */
320                 tmp |= GPIO_D5_SPI_CCLK;
321                 ice->gpio.set_data(ice, tmp);
322                 udelay(100);
323         }
324         /* all back to 1 */
325         tmp |= GPIO_SPI_ALL;
326         ice->gpio.set_data(ice, tmp);
327         udelay(100);
328
329         /* return all gpios to non-writable */
330         ice->gpio.set_mask(ice, 0xffffff);
331         /* restore GPIOs direction */
332         ice->gpio.set_dir(ice, orig_dir);
333 }
334
335 static void qtet_akm_set_regs(struct snd_akm4xxx *ak, unsigned char addr,
336                 unsigned char mask, unsigned char value)
337 {
338         unsigned char tmp;
339         int chip;
340         for (chip = 0; chip < ak->num_chips; chip++) {
341                 tmp = snd_akm4xxx_get(ak, chip, addr);
342                 /* clear the bits */
343                 tmp &= ~mask;
344                 /* set the new bits */
345                 tmp |= value;
346                 snd_akm4xxx_write(ak, chip, addr, tmp);
347         }
348 }
349
350 /*
351  * change the rate of AK4620
352  */
353 static void qtet_akm_set_rate_val(struct snd_akm4xxx *ak, unsigned int rate)
354 {
355         unsigned char ak4620_dfs;
356
357         if (rate == 0)  /* no hint - S/PDIF input is master or the new spdif
358                            input rate undetected, simply return */
359                 return;
360
361         /* adjust DFS on codecs - see datasheet */
362         if (rate > 108000)
363                 ak4620_dfs = AK4620_DFS1 | AK4620_CKS1;
364         else if (rate > 54000)
365                 ak4620_dfs = AK4620_DFS0 | AK4620_CKS0;
366         else
367                 ak4620_dfs = 0;
368
369         /* set new value */
370         qtet_akm_set_regs(ak, AK4620_DFS_REG, AK4620_DFS0 | AK4620_DFS1 |
371                         AK4620_CKS0 | AK4620_CKS1, ak4620_dfs);
372 }
373
374 #define AK_CONTROL(xname, xch)  { .name = xname, .num_channels = xch }
375
376 #define PCM_12_PLAYBACK_VOLUME  "PCM 1/2 Playback Volume"
377 #define PCM_34_PLAYBACK_VOLUME  "PCM 3/4 Playback Volume"
378 #define PCM_12_CAPTURE_VOLUME   "PCM 1/2 Capture Volume"
379 #define PCM_34_CAPTURE_VOLUME   "PCM 3/4 Capture Volume"
380
381 static const struct snd_akm4xxx_dac_channel qtet_dac[] = {
382         AK_CONTROL(PCM_12_PLAYBACK_VOLUME, 2),
383         AK_CONTROL(PCM_34_PLAYBACK_VOLUME, 2),
384 };
385
386 static const struct snd_akm4xxx_adc_channel qtet_adc[] = {
387         AK_CONTROL(PCM_12_CAPTURE_VOLUME, 2),
388         AK_CONTROL(PCM_34_CAPTURE_VOLUME, 2),
389 };
390
391 static struct snd_akm4xxx akm_qtet_dac = {
392         .type = SND_AK4620,
393         .num_dacs = 4,  /* DAC1 - Output 12
394         */
395         .num_adcs = 4,  /* ADC1 - Input 12
396         */
397         .ops = {
398                 .write = qtet_akm_write,
399                 .set_rate_val = qtet_akm_set_rate_val,
400         },
401         .dac_info = qtet_dac,
402         .adc_info = qtet_adc,
403 };
404
405 /* Communication routines with the CPLD */
406
407
408 /* Writes data to external register reg, both reg and data are
409  * GPIO representations */
410 static void reg_write(struct snd_ice1712 *ice, unsigned int reg,
411                 unsigned int data)
412 {
413         unsigned int tmp;
414
415         mutex_lock(&ice->gpio_mutex);
416         /* set direction of used GPIOs*/
417         /* all outputs */
418         tmp = 0x00ffff;
419         ice->gpio.set_dir(ice, tmp);
420         /* mask - writable bits */
421         ice->gpio.set_mask(ice, ~(tmp));
422         /* write the data */
423         tmp = ice->gpio.get_data(ice);
424         tmp &= ~GPIO_DATA_MASK;
425         tmp |= data;
426         ice->gpio.set_data(ice, tmp);
427         udelay(100);
428         /* drop output enable */
429         tmp &=  ~GPIO_EX_GPIOE;
430         ice->gpio.set_data(ice, tmp);
431         udelay(100);
432         /* drop the register gpio */
433         tmp &= ~reg;
434         ice->gpio.set_data(ice, tmp);
435         udelay(100);
436         /* raise the register GPIO */
437         tmp |= reg;
438         ice->gpio.set_data(ice, tmp);
439         udelay(100);
440
441         /* raise all data gpios */
442         tmp |= GPIO_DATA_MASK;
443         ice->gpio.set_data(ice, tmp);
444         /* mask - immutable bits */
445         ice->gpio.set_mask(ice, 0xffffff);
446         /* outputs only 8-15 */
447         ice->gpio.set_dir(ice, 0x00ff00);
448         mutex_unlock(&ice->gpio_mutex);
449 }
450
451 static unsigned int get_scr(struct snd_ice1712 *ice)
452 {
453         struct qtet_spec *spec = ice->spec;
454         return spec->scr;
455 }
456
457 static unsigned int get_mcr(struct snd_ice1712 *ice)
458 {
459         struct qtet_spec *spec = ice->spec;
460         return spec->mcr;
461 }
462
463 static unsigned int get_cpld(struct snd_ice1712 *ice)
464 {
465         struct qtet_spec *spec = ice->spec;
466         return spec->cpld;
467 }
468
469 static void set_scr(struct snd_ice1712 *ice, unsigned int val)
470 {
471         struct qtet_spec *spec = ice->spec;
472         reg_write(ice, GPIO_SCR, val);
473         spec->scr = val;
474 }
475
476 static void set_mcr(struct snd_ice1712 *ice, unsigned int val)
477 {
478         struct qtet_spec *spec = ice->spec;
479         reg_write(ice, GPIO_MCR, val);
480         spec->mcr = val;
481 }
482
483 static void set_cpld(struct snd_ice1712 *ice, unsigned int val)
484 {
485         struct qtet_spec *spec = ice->spec;
486         reg_write(ice, GPIO_CPLD_CSN, val);
487         spec->cpld = val;
488 }
489 #ifdef CONFIG_PROC_FS
490 static void proc_regs_read(struct snd_info_entry *entry,
491                 struct snd_info_buffer *buffer)
492 {
493         struct snd_ice1712 *ice = entry->private_data;
494         char bin_buffer[36];
495
496         snd_iprintf(buffer, "SCR:       %s\n", get_binary(bin_buffer,
497                                 get_scr(ice)));
498         snd_iprintf(buffer, "MCR:       %s\n", get_binary(bin_buffer,
499                                 get_mcr(ice)));
500         snd_iprintf(buffer, "CPLD:      %s\n", get_binary(bin_buffer,
501                                 get_cpld(ice)));
502 }
503
504 static void proc_init(struct snd_ice1712 *ice)
505 {
506         struct snd_info_entry *entry;
507         if (!snd_card_proc_new(ice->card, "quartet", &entry))
508                 snd_info_set_text_ops(entry, ice, proc_regs_read);
509 }
510 #else /* !CONFIG_PROC_FS */
511 static void proc_init(struct snd_ice1712 *ice) {}
512 #endif
513
514 static int qtet_mute_get(struct snd_kcontrol *kcontrol,
515                 struct snd_ctl_elem_value *ucontrol)
516 {
517         struct snd_ice1712 *ice = snd_kcontrol_chip(kcontrol);
518         unsigned int val;
519         val = get_scr(ice) & SCR_MUTE;
520         ucontrol->value.integer.value[0] = (val) ? 0 : 1;
521         return 0;
522 }
523
524 static int qtet_mute_put(struct snd_kcontrol *kcontrol,
525                 struct snd_ctl_elem_value *ucontrol)
526 {
527         struct snd_ice1712 *ice = snd_kcontrol_chip(kcontrol);
528         unsigned int old, new, smute;
529         old = get_scr(ice) & SCR_MUTE;
530         if (ucontrol->value.integer.value[0]) {
531                 /* unmute */
532                 new = 0;
533                 /* un-smuting DAC */
534                 smute = 0;
535         } else {
536                 /* mute */
537                 new = SCR_MUTE;
538                 /* smuting DAC */
539                 smute = AK4620_SMUTE;
540         }
541         if (old != new) {
542                 struct snd_akm4xxx *ak = ice->akm;
543                 set_scr(ice, (get_scr(ice) & ~SCR_MUTE) | new);
544                 /* set smute */
545                 qtet_akm_set_regs(ak, AK4620_DEEMVOL_REG, AK4620_SMUTE, smute);
546                 return 1;
547         }
548         /* no change */
549         return 0;
550 }
551
552 static int qtet_ain12_enum_info(struct snd_kcontrol *kcontrol,
553                 struct snd_ctl_elem_info *uinfo)
554 {
555         static const char * const texts[3] =
556                 {"Line In 1/2", "Mic", "Mic + Low-cut"};
557         return snd_ctl_enum_info(uinfo, 1, ARRAY_SIZE(texts), texts);
558 }
559
560 static int qtet_ain12_sw_get(struct snd_kcontrol *kcontrol,
561                 struct snd_ctl_elem_value *ucontrol)
562 {
563         struct snd_ice1712 *ice = snd_kcontrol_chip(kcontrol);
564         unsigned int val, result;
565         val = get_scr(ice) & (SCR_AIN12_SEL1 | SCR_AIN12_SEL0);
566         switch (val) {
567         case SCR_AIN12_LINE:
568                 result = 0;
569                 break;
570         case SCR_AIN12_MIC:
571                 result = 1;
572                 break;
573         case SCR_AIN12_LOWCUT:
574                 result = 2;
575                 break;
576         default:
577                 /* BUG - no other combinations allowed */
578                 snd_BUG();
579                 result = 0;
580         }
581         ucontrol->value.integer.value[0] = result;
582         return 0;
583 }
584
585 static int qtet_ain12_sw_put(struct snd_kcontrol *kcontrol,
586                 struct snd_ctl_elem_value *ucontrol)
587 {
588         struct snd_ice1712 *ice = snd_kcontrol_chip(kcontrol);
589         unsigned int old, new, tmp, masked_old;
590         old = new = get_scr(ice);
591         masked_old = old & (SCR_AIN12_SEL1 | SCR_AIN12_SEL0);
592         tmp = ucontrol->value.integer.value[0];
593         if (tmp == 2)
594                 tmp = 3;        /* binary 10 is not supported */
595         tmp <<= 4;      /* shifting to SCR_AIN12_SEL0 */
596         if (tmp != masked_old) {
597                 /* change requested */
598                 switch (tmp) {
599                 case SCR_AIN12_LINE:
600                         new = old & ~(SCR_AIN12_SEL1 | SCR_AIN12_SEL0);
601                         set_scr(ice, new);
602                         /* turn off relay */
603                         new &= ~SCR_RELAY;
604                         set_scr(ice, new);
605                         break;
606                 case SCR_AIN12_MIC:
607                         /* turn on relay */
608                         new = old | SCR_RELAY;
609                         set_scr(ice, new);
610                         new = (new & ~SCR_AIN12_SEL1) | SCR_AIN12_SEL0;
611                         set_scr(ice, new);
612                         break;
613                 case SCR_AIN12_LOWCUT:
614                         /* turn on relay */
615                         new = old | SCR_RELAY;
616                         set_scr(ice, new);
617                         new |= SCR_AIN12_SEL1 | SCR_AIN12_SEL0;
618                         set_scr(ice, new);
619                         break;
620                 default:
621                         snd_BUG();
622                 }
623                 return 1;
624         }
625         /* no change */
626         return 0;
627 }
628
629 static int qtet_php_get(struct snd_kcontrol *kcontrol,
630                 struct snd_ctl_elem_value *ucontrol)
631 {
632         struct snd_ice1712 *ice = snd_kcontrol_chip(kcontrol);
633         unsigned int val;
634         /* if phantom voltage =48V, phantom on */
635         val = get_scr(ice) & SCR_PHP_V;
636         ucontrol->value.integer.value[0] = val ? 1 : 0;
637         return 0;
638 }
639
640 static int qtet_php_put(struct snd_kcontrol *kcontrol,
641                 struct snd_ctl_elem_value *ucontrol)
642 {
643         struct snd_ice1712 *ice = snd_kcontrol_chip(kcontrol);
644         unsigned int old, new;
645         old = new = get_scr(ice);
646         if (ucontrol->value.integer.value[0] /* phantom on requested */
647                         && (~old & SCR_PHP_V)) /* 0 = voltage 5V */ {
648                 /* is off, turn on */
649                 /* turn voltage on first, = 1 */
650                 new = old | SCR_PHP_V;
651                 set_scr(ice, new);
652                 /* turn phantom on, = 0 */
653                 new &= ~SCR_PHP;
654                 set_scr(ice, new);
655         } else if (!ucontrol->value.integer.value[0] && (old & SCR_PHP_V)) {
656                 /* phantom off requested and 1 = voltage 48V */
657                 /* is on, turn off */
658                 /* turn voltage off first, = 0 */
659                 new = old & ~SCR_PHP_V;
660                 set_scr(ice, new);
661                 /* turn phantom off, = 1 */
662                 new |= SCR_PHP;
663                 set_scr(ice, new);
664         }
665         if (old != new)
666                 return 1;
667         /* no change */
668         return 0;
669 }
670
671 #define PRIV_SW(xid, xbit, xreg)        [xid] = {.bit = xbit,\
672         .set_register = set_##xreg,\
673         .get_register = get_##xreg, }
674
675
676 #define PRIV_ENUM2(xid, xbit, xreg, xtext1, xtext2)     [xid] = {.bit = xbit,\
677         .set_register = set_##xreg,\
678         .get_register = get_##xreg,\
679         .texts = {xtext1, xtext2} }
680
681 static struct qtet_kcontrol_private qtet_privates[] = {
682         PRIV_ENUM2(IN12_SEL, CPLD_IN12_SEL, cpld, "An In 1/2", "An In 3/4"),
683         PRIV_ENUM2(IN34_SEL, CPLD_IN34_SEL, cpld, "An In 3/4", "IEC958 In"),
684         PRIV_ENUM2(AIN34_SEL, SCR_AIN34_SEL, scr, "Line In 3/4", "Hi-Z"),
685         PRIV_ENUM2(COAX_OUT, CPLD_COAX_OUT, cpld, "IEC958", "I2S"),
686         PRIV_SW(IN12_MON12, MCR_IN12_MON12, mcr),
687         PRIV_SW(IN12_MON34, MCR_IN12_MON34, mcr),
688         PRIV_SW(IN34_MON12, MCR_IN34_MON12, mcr),
689         PRIV_SW(IN34_MON34, MCR_IN34_MON34, mcr),
690         PRIV_SW(OUT12_MON34, MCR_OUT12_MON34, mcr),
691         PRIV_SW(OUT34_MON12, MCR_OUT34_MON12, mcr),
692 };
693
694 static int qtet_enum_info(struct snd_kcontrol *kcontrol,
695                 struct snd_ctl_elem_info *uinfo)
696 {
697         struct qtet_kcontrol_private private =
698                 qtet_privates[kcontrol->private_value];
699         return snd_ctl_enum_info(uinfo, 1, ARRAY_SIZE(private.texts),
700                                  private.texts);
701 }
702
703 static int qtet_sw_get(struct snd_kcontrol *kcontrol,
704                 struct snd_ctl_elem_value *ucontrol)
705 {
706         struct qtet_kcontrol_private private =
707                 qtet_privates[kcontrol->private_value];
708         struct snd_ice1712 *ice = snd_kcontrol_chip(kcontrol);
709         ucontrol->value.integer.value[0] =
710                 (private.get_register(ice) & private.bit) ? 1 : 0;
711         return 0;
712 }
713
714 static int qtet_sw_put(struct snd_kcontrol *kcontrol,
715                 struct snd_ctl_elem_value *ucontrol)
716 {
717         struct qtet_kcontrol_private private =
718                 qtet_privates[kcontrol->private_value];
719         struct snd_ice1712 *ice = snd_kcontrol_chip(kcontrol);
720         unsigned int old, new;
721         old = private.get_register(ice);
722         if (ucontrol->value.integer.value[0])
723                 new = old | private.bit;
724         else
725                 new = old & ~private.bit;
726         if (old != new) {
727                 private.set_register(ice, new);
728                 return 1;
729         }
730         /* no change */
731         return 0;
732 }
733
734 #define qtet_sw_info    snd_ctl_boolean_mono_info
735
736 #define QTET_CONTROL(xname, xtype, xpriv)       \
737         {.iface = SNDRV_CTL_ELEM_IFACE_MIXER,\
738         .name = xname,\
739         .info = qtet_##xtype##_info,\
740         .get = qtet_sw_get,\
741         .put = qtet_sw_put,\
742         .private_value = xpriv }
743
744 static struct snd_kcontrol_new qtet_controls[] = {
745         {
746                 .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
747                 .name = "Master Playback Switch",
748                 .info = qtet_sw_info,
749                 .get = qtet_mute_get,
750                 .put = qtet_mute_put,
751                 .private_value = 0
752         },
753         {
754                 .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
755                 .name = "Phantom Power",
756                 .info = qtet_sw_info,
757                 .get = qtet_php_get,
758                 .put = qtet_php_put,
759                 .private_value = 0
760         },
761         {
762                 .iface = SNDRV_CTL_ELEM_IFACE_MIXER,
763                 .name = "Analog In 1/2 Capture Switch",
764                 .info = qtet_ain12_enum_info,
765                 .get = qtet_ain12_sw_get,
766                 .put = qtet_ain12_sw_put,
767                 .private_value = 0
768         },
769         QTET_CONTROL("Analog In 3/4 Capture Switch", enum, AIN34_SEL),
770         QTET_CONTROL("PCM In 1/2 Capture Switch", enum, IN12_SEL),
771         QTET_CONTROL("PCM In 3/4 Capture Switch", enum, IN34_SEL),
772         QTET_CONTROL("Coax Output Source", enum, COAX_OUT),
773         QTET_CONTROL("Analog In 1/2 to Monitor 1/2", sw, IN12_MON12),
774         QTET_CONTROL("Analog In 1/2 to Monitor 3/4", sw, IN12_MON34),
775         QTET_CONTROL("Analog In 3/4 to Monitor 1/2", sw, IN34_MON12),
776         QTET_CONTROL("Analog In 3/4 to Monitor 3/4", sw, IN34_MON34),
777         QTET_CONTROL("Output 1/2 to Monitor 3/4", sw, OUT12_MON34),
778         QTET_CONTROL("Output 3/4 to Monitor 1/2", sw, OUT34_MON12),
779 };
780
781 static char *slave_vols[] = {
782         PCM_12_PLAYBACK_VOLUME,
783         PCM_34_PLAYBACK_VOLUME,
784         NULL
785 };
786
787 static
788 DECLARE_TLV_DB_SCALE(qtet_master_db_scale, -6350, 50, 1);
789
790 static struct snd_kcontrol *ctl_find(struct snd_card *card,
791                                      const char *name)
792 {
793         struct snd_ctl_elem_id sid;
794         memset(&sid, 0, sizeof(sid));
795         /* FIXME: strcpy is bad. */
796         strcpy(sid.name, name);
797         sid.iface = SNDRV_CTL_ELEM_IFACE_MIXER;
798         return snd_ctl_find_id(card, &sid);
799 }
800
801 static void add_slaves(struct snd_card *card,
802                        struct snd_kcontrol *master, char * const *list)
803 {
804         for (; *list; list++) {
805                 struct snd_kcontrol *slave = ctl_find(card, *list);
806                 if (slave)
807                         snd_ctl_add_slave(master, slave);
808         }
809 }
810
811 static int qtet_add_controls(struct snd_ice1712 *ice)
812 {
813         struct qtet_spec *spec = ice->spec;
814         int err, i;
815         struct snd_kcontrol *vmaster;
816         err = snd_ice1712_akm4xxx_build_controls(ice);
817         if (err < 0)
818                 return err;
819         for (i = 0; i < ARRAY_SIZE(qtet_controls); i++) {
820                 err = snd_ctl_add(ice->card,
821                                 snd_ctl_new1(&qtet_controls[i], ice));
822                 if (err < 0)
823                         return err;
824         }
825
826         /* Create virtual master control */
827         vmaster = snd_ctl_make_virtual_master("Master Playback Volume",
828                         qtet_master_db_scale);
829         if (!vmaster)
830                 return -ENOMEM;
831         add_slaves(ice->card, vmaster, slave_vols);
832         err = snd_ctl_add(ice->card, vmaster);
833         if (err < 0)
834                 return err;
835         /* only capture SPDIF over AK4113 */
836         return snd_ak4113_build(spec->ak4113,
837                         ice->pcm->streams[SNDRV_PCM_STREAM_CAPTURE].substream);
838 }
839
840 static inline int qtet_is_spdif_master(struct snd_ice1712 *ice)
841 {
842         /* CPLD_SYNC_SEL: 0 = internal, 1 = external (i.e. spdif master) */
843         return (get_cpld(ice) & CPLD_SYNC_SEL) ? 1 : 0;
844 }
845
846 static unsigned int qtet_get_rate(struct snd_ice1712 *ice)
847 {
848         int i;
849         unsigned char result;
850
851         result =  get_cpld(ice) & CPLD_CKS_MASK;
852         for (i = 0; i < ARRAY_SIZE(cks_vals); i++)
853                 if (cks_vals[i] == result)
854                         return qtet_rates[i];
855         return 0;
856 }
857
858 static int get_cks_val(int rate)
859 {
860         int i;
861         for (i = 0; i < ARRAY_SIZE(qtet_rates); i++)
862                 if (qtet_rates[i] == rate)
863                         return cks_vals[i];
864         return 0;
865 }
866
867 /* setting new rate */
868 static void qtet_set_rate(struct snd_ice1712 *ice, unsigned int rate)
869 {
870         unsigned int new;
871         unsigned char val;
872         /* switching ice1724 to external clock - supplied by ext. circuits */
873         val = inb(ICEMT1724(ice, RATE));
874         outb(val | VT1724_SPDIF_MASTER, ICEMT1724(ice, RATE));
875
876         new =  (get_cpld(ice) & ~CPLD_CKS_MASK) | get_cks_val(rate);
877         /* switch to internal clock, drop CPLD_SYNC_SEL */
878         new &= ~CPLD_SYNC_SEL;
879         /* dev_dbg(ice->card->dev, "QT - set_rate: old %x, new %x\n",
880            get_cpld(ice), new); */
881         set_cpld(ice, new);
882 }
883
884 static inline unsigned char qtet_set_mclk(struct snd_ice1712 *ice,
885                 unsigned int rate)
886 {
887         /* no change in master clock */
888         return 0;
889 }
890
891 /* setting clock to external - SPDIF */
892 static int qtet_set_spdif_clock(struct snd_ice1712 *ice, int type)
893 {
894         unsigned int old, new;
895
896         old = new = get_cpld(ice);
897         new &= ~(CPLD_CKS_MASK | CPLD_WORD_SEL);
898         switch (type) {
899         case EXT_SPDIF_TYPE:
900                 new |= CPLD_EXT_SPDIF;
901                 break;
902         case EXT_WORDCLOCK_1FS_TYPE:
903                 new |= CPLD_EXT_WORDCLOCK_1FS;
904                 break;
905         case EXT_WORDCLOCK_256FS_TYPE:
906                 new |= CPLD_EXT_WORDCLOCK_256FS;
907                 break;
908         default:
909                 snd_BUG();
910         }
911         if (old != new) {
912                 set_cpld(ice, new);
913                 /* changed */
914                 return 1;
915         }
916         return 0;
917 }
918
919 static int qtet_get_spdif_master_type(struct snd_ice1712 *ice)
920 {
921         unsigned int val;
922         int result;
923         val = get_cpld(ice);
924         /* checking only rate/clock-related bits */
925         val &= (CPLD_CKS_MASK | CPLD_WORD_SEL | CPLD_SYNC_SEL);
926         if (!(val & CPLD_SYNC_SEL)) {
927                 /* switched to internal clock, is not any external type */
928                 result = -1;
929         } else {
930                 switch (val) {
931                 case (CPLD_EXT_SPDIF):
932                         result = EXT_SPDIF_TYPE;
933                         break;
934                 case (CPLD_EXT_WORDCLOCK_1FS):
935                         result = EXT_WORDCLOCK_1FS_TYPE;
936                         break;
937                 case (CPLD_EXT_WORDCLOCK_256FS):
938                         result = EXT_WORDCLOCK_256FS_TYPE;
939                         break;
940                 default:
941                         /* undefined combination of external clock setup */
942                         snd_BUG();
943                         result = 0;
944                 }
945         }
946         return result;
947 }
948
949 /* Called when ak4113 detects change in the input SPDIF stream */
950 static void qtet_ak4113_change(struct ak4113 *ak4113, unsigned char c0,
951                 unsigned char c1)
952 {
953         struct snd_ice1712 *ice = ak4113->change_callback_private;
954         int rate;
955         if ((qtet_get_spdif_master_type(ice) == EXT_SPDIF_TYPE) &&
956                         c1) {
957                 /* only for SPDIF master mode, rate was changed */
958                 rate = snd_ak4113_external_rate(ak4113);
959                 /* dev_dbg(ice->card->dev, "ak4113 - input rate changed to %d\n",
960                    rate); */
961                 qtet_akm_set_rate_val(ice->akm, rate);
962         }
963 }
964
965 /*
966  * If clock slaved to SPDIF-IN, setting runtime rate
967  * to the detected external rate
968  */
969 static void qtet_spdif_in_open(struct snd_ice1712 *ice,
970                 struct snd_pcm_substream *substream)
971 {
972         struct qtet_spec *spec = ice->spec;
973         struct snd_pcm_runtime *runtime = substream->runtime;
974         int rate;
975
976         if (qtet_get_spdif_master_type(ice) != EXT_SPDIF_TYPE)
977                 /* not external SPDIF, no rate limitation */
978                 return;
979         /* only external SPDIF can detect incoming sample rate */
980         rate = snd_ak4113_external_rate(spec->ak4113);
981         if (rate >= runtime->hw.rate_min && rate <= runtime->hw.rate_max) {
982                 runtime->hw.rate_min = rate;
983                 runtime->hw.rate_max = rate;
984         }
985 }
986
987 /*
988  * initialize the chip
989  */
990 static int qtet_init(struct snd_ice1712 *ice)
991 {
992         static const unsigned char ak4113_init_vals[] = {
993                 /* AK4113_REG_PWRDN */  AK4113_RST | AK4113_PWN |
994                         AK4113_OCKS0 | AK4113_OCKS1,
995                 /* AK4113_REQ_FORMAT */ AK4113_DIF_I24I2S | AK4113_VTX |
996                         AK4113_DEM_OFF | AK4113_DEAU,
997                 /* AK4113_REG_IO0 */    AK4113_OPS2 | AK4113_TXE |
998                         AK4113_XTL_24_576M,
999                 /* AK4113_REG_IO1 */    AK4113_EFH_1024LRCLK | AK4113_IPS(0),
1000                 /* AK4113_REG_INT0_MASK */      0,
1001                 /* AK4113_REG_INT1_MASK */      0,
1002                 /* AK4113_REG_DATDTS */         0,
1003         };
1004         int err;
1005         struct qtet_spec *spec;
1006         struct snd_akm4xxx *ak;
1007         unsigned char val;
1008
1009         /* switching ice1724 to external clock - supplied by ext. circuits */
1010         val = inb(ICEMT1724(ice, RATE));
1011         outb(val | VT1724_SPDIF_MASTER, ICEMT1724(ice, RATE));
1012
1013         spec = kzalloc(sizeof(*spec), GFP_KERNEL);
1014         if (!spec)
1015                 return -ENOMEM;
1016         /* qtet is clocked by Xilinx array */
1017         ice->hw_rates = &qtet_rates_info;
1018         ice->is_spdif_master = qtet_is_spdif_master;
1019         ice->get_rate = qtet_get_rate;
1020         ice->set_rate = qtet_set_rate;
1021         ice->set_mclk = qtet_set_mclk;
1022         ice->set_spdif_clock = qtet_set_spdif_clock;
1023         ice->get_spdif_master_type = qtet_get_spdif_master_type;
1024         ice->ext_clock_names = ext_clock_names;
1025         ice->ext_clock_count = ARRAY_SIZE(ext_clock_names);
1026         /* since Qtet can detect correct SPDIF-in rate, all streams can be
1027          * limited to this specific rate */
1028         ice->spdif.ops.open = ice->pro_open = qtet_spdif_in_open;
1029         ice->spec = spec;
1030
1031         /* Mute Off */
1032         /* SCR Initialize*/
1033         /* keep codec power down first */
1034         set_scr(ice, SCR_PHP);
1035         udelay(1);
1036         /* codec power up */
1037         set_scr(ice, SCR_PHP | SCR_CODEC_PDN);
1038
1039         /* MCR Initialize */
1040         set_mcr(ice, 0);
1041
1042         /* CPLD Initialize */
1043         set_cpld(ice, 0);
1044
1045
1046         ice->num_total_dacs = 2;
1047         ice->num_total_adcs = 2;
1048
1049         ice->akm = kcalloc(2, sizeof(struct snd_akm4xxx), GFP_KERNEL);
1050         ak = ice->akm;
1051         if (!ak)
1052                 return -ENOMEM;
1053         /* only one codec with two chips */
1054         ice->akm_codecs = 1;
1055         err = snd_ice1712_akm4xxx_init(ak, &akm_qtet_dac, NULL, ice);
1056         if (err < 0)
1057                 return err;
1058         err = snd_ak4113_create(ice->card,
1059                         qtet_ak4113_read,
1060                         qtet_ak4113_write,
1061                         ak4113_init_vals,
1062                         ice, &spec->ak4113);
1063         if (err < 0)
1064                 return err;
1065         /* callback for codecs rate setting */
1066         spec->ak4113->change_callback = qtet_ak4113_change;
1067         spec->ak4113->change_callback_private = ice;
1068         /* AK41143 in Quartet can detect external rate correctly
1069          * (i.e. check_flags = 0) */
1070         spec->ak4113->check_flags = 0;
1071
1072         proc_init(ice);
1073
1074         qtet_set_rate(ice, 44100);
1075         return 0;
1076 }
1077
1078 static unsigned char qtet_eeprom[] = {
1079         [ICE_EEP2_SYSCONF]     = 0x28,  /* clock 256(24MHz), mpu401, 1xADC,
1080                                            1xDACs, SPDIF in */
1081         [ICE_EEP2_ACLINK]      = 0x80,  /* I2S */
1082         [ICE_EEP2_I2S]         = 0x78,  /* 96k, 24bit, 192k */
1083         [ICE_EEP2_SPDIF]       = 0xc3,  /* out-en, out-int, in, out-ext */
1084         [ICE_EEP2_GPIO_DIR]    = 0x00,  /* 0-7 inputs, switched to output
1085                                            only during output operations */
1086         [ICE_EEP2_GPIO_DIR1]   = 0xff,  /* 8-15 outputs */
1087         [ICE_EEP2_GPIO_DIR2]   = 0x00,
1088         [ICE_EEP2_GPIO_MASK]   = 0xff,  /* changed only for OUT operations */
1089         [ICE_EEP2_GPIO_MASK1]  = 0x00,
1090         [ICE_EEP2_GPIO_MASK2]  = 0xff,
1091
1092         [ICE_EEP2_GPIO_STATE]  = 0x00, /* inputs */
1093         [ICE_EEP2_GPIO_STATE1] = 0x7d, /* all 1, but GPIO_CPLD_RW
1094                                           and GPIO15 always zero */
1095         [ICE_EEP2_GPIO_STATE2] = 0x00, /* inputs */
1096 };
1097
1098 /* entry point */
1099 struct snd_ice1712_card_info snd_vt1724_qtet_cards[] = {
1100         {
1101                 .subvendor = VT1724_SUBDEVICE_QTET,
1102                 .name = "Infrasonic Quartet",
1103                 .model = "quartet",
1104                 .chip_init = qtet_init,
1105                 .build_controls = qtet_add_controls,
1106                 .eeprom_size = sizeof(qtet_eeprom),
1107                 .eeprom_data = qtet_eeprom,
1108         },
1109         { } /* terminator */
1110 };