spicds.c revision 274105 
1/*-
2 * Copyright (c) 2006 Konstantin Dimitrov <kosio.dimitrov@gmail.com>
3 * Copyright (c) 2001 Katsurajima Naoto <raven@katsurajima.seya.yokohama.jp>
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 *    notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 *    notice, this list of conditions and the following disclaimer in the
13 *    documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHERIN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THEPOSSIBILITY OF
25 * SUCH DAMAGE.
26 *
27 * $FreeBSD: head/sys/dev/sound/pci/spicds.c 274105 2014-11-04 23:10:58Z bapt $
28 */
29
30#ifdef HAVE_KERNEL_OPTION_HEADERS
31#include "opt_snd.h"
32#endif
33
34#include <dev/sound/pcm/sound.h>
35
36#include <dev/sound/pci/spicds.h>
37
38static MALLOC_DEFINE(M_SPICDS, "spicds", "SPI codec");
39
40#define SPICDS_NAMELEN	16
41struct spicds_info {
42	device_t dev;
43	spicds_ctrl ctrl;
44	void *devinfo;
45	int num; /* number of this device */
46	unsigned int type;   /* codec type */
47	unsigned int cif;    /* Controll data Interface Format (0/1) */
48	unsigned int format; /* data format and master clock frequency */
49	unsigned int dvc;    /* De-emphasis and Volume Control */
50	unsigned int left, right;
51	char name[SPICDS_NAMELEN];
52	struct mtx *lock;
53};
54
55static void
56spicds_wrbit(struct spicds_info *codec, int bit)
57{
58	unsigned int cs, cdti;
59	if (codec->cif)
60		cs = 1;
61	else
62		cs = 0;
63	if (bit)
64		cdti = 1;
65	else
66		cdti = 0;
67	codec->ctrl(codec->devinfo, cs, 0, cdti);
68	DELAY(1);
69	codec->ctrl(codec->devinfo, cs, 1, cdti);
70	DELAY(1);
71
72	return;
73}
74
75static void
76spicds_wrcd(struct spicds_info *codec, int reg, u_int16_t val)
77{
78	int mask;
79
80#if(0)
81	device_printf(codec->dev, "spicds_wrcd(codec, 0x%02x, 0x%02x)\n", reg, val);
82#endif
83	/* start */
84	if (codec->cif)
85		codec->ctrl(codec->devinfo, 1, 1, 0);
86	else
87		codec->ctrl(codec->devinfo, 0, 1, 0);
88	DELAY(1);
89	if (codec->type != SPICDS_TYPE_WM8770) {
90	if (codec->type == SPICDS_TYPE_AK4381) {
91	/* AK4381 chip address */
92        spicds_wrbit(codec, 0);
93        spicds_wrbit(codec, 1);
94	}
95	else if (codec->type == SPICDS_TYPE_AK4396)
96	{
97	/* AK4396 chip address */
98        spicds_wrbit(codec, 0);
99        spicds_wrbit(codec, 0);
100	}
101	else {
102	/* chip address */
103	spicds_wrbit(codec, 1);
104	spicds_wrbit(codec, 0);
105	}
106	/* write */
107	spicds_wrbit(codec, 1);
108	/* register address */
109	for (mask = 0x10; mask != 0; mask >>= 1)
110		spicds_wrbit(codec, reg & mask);
111	/* data */
112	for (mask = 0x80; mask != 0; mask >>= 1)
113		spicds_wrbit(codec, val & mask);
114	/* stop */
115	DELAY(1);
116	}
117	else {
118        /* register address */
119        for (mask = 0x40; mask != 0; mask >>= 1)
120                spicds_wrbit(codec, reg & mask);
121        /* data */
122        for (mask = 0x100; mask != 0; mask >>= 1)
123                spicds_wrbit(codec, val & mask);
124        /* stop */
125        DELAY(1);
126	}
127	if (codec->cif) {
128		codec->ctrl(codec->devinfo, 0, 1, 0);
129		DELAY(1);
130		codec->ctrl(codec->devinfo, 1, 1, 0);
131	}
132	else {
133		codec->ctrl(codec->devinfo, 1, 1, 0);
134	}
135
136	return;
137}
138
139struct spicds_info *
140spicds_create(device_t dev, void *devinfo, int num, spicds_ctrl ctrl)
141{
142	struct spicds_info *codec;
143
144#if(0)
145	device_printf(dev, "spicds_create(dev, devinfo, %d, ctrl)\n", num);
146#endif
147	codec = (struct spicds_info *)malloc(sizeof *codec, M_SPICDS, M_NOWAIT);
148	if (codec == NULL)
149		return NULL;
150
151	snprintf(codec->name, SPICDS_NAMELEN, "%s:spicds%d", device_get_nameunit(dev), num);
152	codec->lock = snd_mtxcreate(codec->name, codec->name);
153	codec->dev = dev;
154	codec->ctrl = ctrl;
155	codec->devinfo = devinfo;
156	codec->num = num;
157	codec->type = SPICDS_TYPE_AK4524;
158	codec->cif = 0;
159	codec->format = AK452X_FORMAT_I2S | AK452X_FORMAT_256FSN | AK452X_FORMAT_1X;
160	codec->dvc = AK452X_DVC_DEMOFF | AK452X_DVC_ZTM1024 | AK452X_DVC_ZCE;
161
162	return codec;
163}
164
165void
166spicds_destroy(struct spicds_info *codec)
167{
168	snd_mtxfree(codec->lock);
169	free(codec, M_SPICDS);
170}
171
172void
173spicds_settype(struct spicds_info *codec, unsigned int type)
174{
175	snd_mtxlock(codec->lock);
176	codec->type = type;
177	snd_mtxunlock(codec->lock);
178}
179
180void
181spicds_setcif(struct spicds_info *codec, unsigned int cif)
182{
183	snd_mtxlock(codec->lock);
184	codec->cif = cif;
185	snd_mtxunlock(codec->lock);
186}
187
188void
189spicds_setformat(struct spicds_info *codec, unsigned int format)
190{
191	snd_mtxlock(codec->lock);
192	codec->format = format;
193	snd_mtxunlock(codec->lock);
194}
195
196void
197spicds_setdvc(struct spicds_info *codec, unsigned int dvc)
198{
199	snd_mtxlock(codec->lock);
200	codec->dvc = dvc;
201	snd_mtxunlock(codec->lock);
202}
203
204void
205spicds_init(struct spicds_info *codec)
206{
207#if(0)
208	device_printf(codec->dev, "spicds_init(codec)\n");
209#endif
210	snd_mtxlock(codec->lock);
211	if (codec->type == SPICDS_TYPE_AK4524 ||\
212	    codec->type == SPICDS_TYPE_AK4528) {
213		/* power off */
214		spicds_wrcd(codec, AK4524_POWER, 0);
215		/* set parameter */
216		spicds_wrcd(codec, AK4524_FORMAT, codec->format);
217		spicds_wrcd(codec, AK4524_DVC, codec->dvc);
218		/* power on */
219		spicds_wrcd(codec, AK4524_POWER,
220		    AK452X_POWER_PWDA | AK452X_POWER_PWAD | AK452X_POWER_PWVR);
221		/* free reset register */
222		spicds_wrcd(codec, AK4524_RESET,
223		    AK452X_RESET_RSDA | AK452X_RESET_RSAD);
224	}
225	if (codec->type == SPICDS_TYPE_WM8770) {
226		/* WM8770 init values are taken from ALSA */
227
228		/* These come first to reduce init pop noise */
229		spicds_wrcd(codec, 0x1b, 0x044);	/* ADC Mux (AC'97 source) */
230		spicds_wrcd(codec, 0x1c, 0x00B);	/* Out Mux1 (VOUT1 = DAC+AUX, VOUT2 = DAC) */
231		spicds_wrcd(codec, 0x1d, 0x009);	/* Out Mux2 (VOUT2 = DAC, VOUT3 = DAC) */
232
233		spicds_wrcd(codec, 0x18, 0x000);	/* All power-up */
234
235		spicds_wrcd(codec, 0x16, 0x122);	/* I2S, normal polarity, 24bit */
236		spicds_wrcd(codec, 0x17, 0x022);	/* 256fs, slave mode */
237
238		spicds_wrcd(codec, 0x19, 0x000);	/* -12dB ADC/L */
239		spicds_wrcd(codec, 0x1a, 0x000);	/* -12dB ADC/R */
240	}
241	if (codec->type == SPICDS_TYPE_AK4358)
242		spicds_wrcd(codec, 0x00, 0x07);		/* I2S, 24bit, power-up */
243	if (codec->type == SPICDS_TYPE_AK4381)
244		spicds_wrcd(codec, 0x00, 0x8f);		/* I2S, 24bit, power-up */
245	if (codec->type == SPICDS_TYPE_AK4396)
246		spicds_wrcd(codec, 0x00, 0x07);		/* I2S, 24bit, power-up */
247	snd_mtxunlock(codec->lock);
248}
249
250void
251spicds_reinit(struct spicds_info *codec)
252{
253	snd_mtxlock(codec->lock);
254	if (codec->type != SPICDS_TYPE_WM8770) {
255		/* reset */
256		spicds_wrcd(codec, AK4524_RESET, 0);
257		/* set parameter */
258		spicds_wrcd(codec, AK4524_FORMAT, codec->format);
259		spicds_wrcd(codec, AK4524_DVC, codec->dvc);
260		/* free reset register */
261		spicds_wrcd(codec, AK4524_RESET,
262		    AK452X_RESET_RSDA | AK452X_RESET_RSAD);
263	} else {
264		/* WM8770 reinit */
265		/* AK4358 reinit */
266		/* AK4381 reinit */
267	}
268	snd_mtxunlock(codec->lock);
269}
270
271void
272spicds_set(struct spicds_info *codec, int dir, unsigned int left, unsigned int right)
273{
274#if(0)
275	device_printf(codec->dev, "spicds_set(codec, %d, %d, %d)\n", dir, left, right);
276#endif
277	snd_mtxlock(codec->lock);
278	if (left >= 100)
279		if ((codec->type == SPICDS_TYPE_AK4381) || \
280		(codec->type == SPICDS_TYPE_AK4396))
281			left = 255;
282		else
283			left = 127;
284	else
285		switch (codec->type) {
286		case SPICDS_TYPE_WM8770:
287			left = left + 27;
288			break;
289		case SPICDS_TYPE_AK4381:
290		case SPICDS_TYPE_AK4396:
291			left = left * 255 / 100;
292			break;
293		default:
294			left = left * 127 / 100;
295		}
296	if (right >= 100)
297		if ((codec->type == SPICDS_TYPE_AK4381) || \
298		(codec->type == SPICDS_TYPE_AK4396))
299                        right = 255;
300                else
301			right  = 127;
302	else
303		switch (codec->type) {
304		case SPICDS_TYPE_WM8770:
305                        right = right + 27;
306			break;
307		case SPICDS_TYPE_AK4381:
308		case SPICDS_TYPE_AK4396:
309			right = right * 255 / 100;
310			break;
311                default:
312                        right = right * 127 / 100;
313		}
314	if (dir == PCMDIR_REC && codec->type == SPICDS_TYPE_AK4524) {
315#if(0)
316		device_printf(codec->dev, "spicds_set(): AK4524(REC) %d/%d\n", left, right);
317#endif
318		spicds_wrcd(codec, AK4524_LIPGA, left);
319		spicds_wrcd(codec, AK4524_RIPGA, right);
320	}
321	if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4524) {
322#if(0)
323		device_printf(codec->dev, "spicds_set(): AK4524(PLAY) %d/%d\n", left, right);
324#endif
325		spicds_wrcd(codec, AK4524_LOATT, left);
326		spicds_wrcd(codec, AK4524_ROATT, right);
327	}
328	if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4528) {
329#if(0)
330		device_printf(codec->dev, "spicds_set(): AK4528(PLAY) %d/%d\n", left, right);
331#endif
332		spicds_wrcd(codec, AK4528_LOATT, left);
333		spicds_wrcd(codec, AK4528_ROATT, right);
334	}
335        if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_WM8770) {
336#if(0)
337                device_printf(codec->dev, "spicds_set(): WM8770(PLAY) %d/%d\n", left, right);
338#endif
339                spicds_wrcd(codec, WM8770_AOATT_L1, left | WM8770_AOATT_UPDATE);
340                spicds_wrcd(codec, WM8770_AOATT_R1, right | WM8770_AOATT_UPDATE);
341        }
342        if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4358) {
343#if(0)
344                device_printf(codec->dev, "spicds_set(): AK4358(PLAY) %d/%d\n", left, right);
345#endif
346                spicds_wrcd(codec, AK4358_LO1ATT, left | AK4358_OATT_ENABLE);
347                spicds_wrcd(codec, AK4358_RO1ATT, right | AK4358_OATT_ENABLE);
348        }
349        if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4381) {
350#if(0)
351                device_printf(codec->dev, "spicds_set(): AK4381(PLAY) %d/%d\n", left, right);
352#endif
353                spicds_wrcd(codec, AK4381_LOATT, left);
354                spicds_wrcd(codec, AK4381_ROATT, right);
355        }
356
357        if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4396) {
358#if(0)
359                device_printf(codec->dev, "spicds_set(): AK4396(PLAY) %d/%d\n", left, right);
360#endif
361                spicds_wrcd(codec, AK4396_LOATT, left);
362                spicds_wrcd(codec, AK4396_ROATT, right);
363        }
364
365	snd_mtxunlock(codec->lock);
366}
367
368MODULE_DEPEND(snd_spicds, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER);
369MODULE_VERSION(snd_spicds, 1);
370