xref: /freebsd/sys/dev/sound/pci/spicds.c (revision 577fedb6)
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$
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 
38 MALLOC_DEFINE(M_SPICDS, "spicds", "SPI codec");
39 
40 #define SPICDS_NAMELEN	16
41 struct 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 
55 static void
56 spicds_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 
75 static void
76 spicds_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 
139 struct spicds_info *
140 spicds_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 
165 void
166 spicds_destroy(struct spicds_info *codec)
167 {
168 	snd_mtxfree(codec->lock);
169 	free(codec, M_SPICDS);
170 }
171 
172 void
173 spicds_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 
180 void
181 spicds_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 
188 void
189 spicds_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 
196 void
197 spicds_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 
204 void
205 spicds_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, AK452X_POWER_PWDA | AK452X_POWER_PWAD | AK452X_POWER_PWVR);
220 	/* free reset register */
221 	spicds_wrcd(codec, AK4524_RESET, AK452X_RESET_RSDA | AK452X_RESET_RSAD);
222 	}
223 	if (codec->type == SPICDS_TYPE_WM8770) {
224 	/* WM8770 init values are taken from ALSA */
225         /* These come first to reduce init pop noise */
226 	spicds_wrcd(codec, 0x1b, 0x044);	/* ADC Mux (AC'97 source) */
227 	spicds_wrcd(codec, 0x1c, 0x00B);	/* Out Mux1 (VOUT1 = DAC+AUX, VOUT2 = DAC) */
228 	spicds_wrcd(codec, 0x1d, 0x009);	/* Out Mux2 (VOUT2 = DAC, VOUT3 = DAC) */
229 
230 	spicds_wrcd(codec, 0x18, 0x000);	/* All power-up */
231 
232 	spicds_wrcd(codec, 0x16, 0x122);	/* I2S, normal polarity, 24bit */
233 	spicds_wrcd(codec, 0x17, 0x022);	/* 256fs, slave mode */
234 
235 	spicds_wrcd(codec, 0x19, 0x000);	/* -12dB ADC/L */
236 	spicds_wrcd(codec, 0x1a, 0x000);	/* -12dB ADC/R */
237 	}
238 	if (codec->type == SPICDS_TYPE_AK4358)
239 	spicds_wrcd(codec, 0x00, 0x07);		/* I2S, 24bit, power-up */
240 	if (codec->type == SPICDS_TYPE_AK4381)
241 	spicds_wrcd(codec, 0x00, 0x8f);		/* I2S, 24bit, power-up */
242 	if (codec->type == SPICDS_TYPE_AK4396)
243 	spicds_wrcd(codec, 0x00, 0x07);		/* I2S, 24bit, power-up */
244 	snd_mtxunlock(codec->lock);
245 }
246 
247 void
248 spicds_reinit(struct spicds_info *codec)
249 {
250 	snd_mtxlock(codec->lock);
251 	if (codec->type != SPICDS_TYPE_WM8770) {
252 	/* reset */
253 	spicds_wrcd(codec, AK4524_RESET, 0);
254 	/* set parameter */
255 	spicds_wrcd(codec, AK4524_FORMAT, codec->format);
256 	spicds_wrcd(codec, AK4524_DVC, codec->dvc);
257 	/* free reset register */
258 	spicds_wrcd(codec, AK4524_RESET, AK452X_RESET_RSDA | AK452X_RESET_RSAD);
259 	}
260 	else {
261 	/* WM8770 reinit */
262 	/* AK4358 reinit */
263 	/* AK4381 reinit */
264 	}
265 	snd_mtxunlock(codec->lock);
266 }
267 
268 void
269 spicds_set(struct spicds_info *codec, int dir, unsigned int left, unsigned int right)
270 {
271 #if(0)
272 	device_printf(codec->dev, "spicds_set(codec, %d, %d, %d)\n", dir, left, right);
273 #endif
274 	snd_mtxlock(codec->lock);
275 	if (left >= 100)
276 		if ((codec->type == SPICDS_TYPE_AK4381) || \
277 		(codec->type == SPICDS_TYPE_AK4396))
278 			left = 255;
279 		else
280 			left = 127;
281 	else
282 		switch (codec->type) {
283 		case SPICDS_TYPE_WM8770:
284 			left = left + 27;
285 			break;
286 		case SPICDS_TYPE_AK4381:
287 		case SPICDS_TYPE_AK4396:
288 			left = left * 255 / 100;
289 			break;
290 		default:
291 			left = left * 127 / 100;
292 		}
293 	if (right >= 100)
294 		if ((codec->type == SPICDS_TYPE_AK4381) || \
295 		(codec->type == SPICDS_TYPE_AK4396))
296                         right = 255;
297                 else
298 			right  = 127;
299 	else
300 		switch (codec->type) {
301 		case SPICDS_TYPE_WM8770:
302                         right = right + 27;
303 			break;
304 		case SPICDS_TYPE_AK4381:
305 		case SPICDS_TYPE_AK4396:
306 			right = right * 255 / 100;
307 			break;
308                 default:
309                         right = right * 127 / 100;
310 		}
311 	if (dir == PCMDIR_REC && codec->type == SPICDS_TYPE_AK4524) {
312 #if(0)
313 		device_printf(codec->dev, "spicds_set(): AK4524(REC) %d/%d\n", left, right);
314 #endif
315 		spicds_wrcd(codec, AK4524_LIPGA, left);
316 		spicds_wrcd(codec, AK4524_RIPGA, right);
317 	}
318 	if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4524) {
319 #if(0)
320 		device_printf(codec->dev, "spicds_set(): AK4524(PLAY) %d/%d\n", left, right);
321 #endif
322 		spicds_wrcd(codec, AK4524_LOATT, left);
323 		spicds_wrcd(codec, AK4524_ROATT, right);
324 	}
325 	if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4528) {
326 #if(0)
327 		device_printf(codec->dev, "spicds_set(): AK4528(PLAY) %d/%d\n", left, right);
328 #endif
329 		spicds_wrcd(codec, AK4528_LOATT, left);
330 		spicds_wrcd(codec, AK4528_ROATT, right);
331 	}
332         if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_WM8770) {
333 #if(0)
334                 device_printf(codec->dev, "spicds_set(): WM8770(PLAY) %d/%d\n", left, right);
335 #endif
336                 spicds_wrcd(codec, WM8770_AOATT_L1, left | WM8770_AOATT_UPDATE);
337                 spicds_wrcd(codec, WM8770_AOATT_R1, right | WM8770_AOATT_UPDATE);
338         }
339         if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4358) {
340 #if(0)
341                 device_printf(codec->dev, "spicds_set(): AK4358(PLAY) %d/%d\n", left, right);
342 #endif
343                 spicds_wrcd(codec, AK4358_LO1ATT, left | AK4358_OATT_ENABLE);
344                 spicds_wrcd(codec, AK4358_RO1ATT, right | AK4358_OATT_ENABLE);
345         }
346         if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4381) {
347 #if(0)
348                 device_printf(codec->dev, "spicds_set(): AK4381(PLAY) %d/%d\n", left, right);
349 #endif
350                 spicds_wrcd(codec, AK4381_LOATT, left);
351                 spicds_wrcd(codec, AK4381_ROATT, right);
352         }
353 
354         if (dir == PCMDIR_PLAY && codec->type == SPICDS_TYPE_AK4396) {
355 #if(0)
356                 device_printf(codec->dev, "spicds_set(): AK4396(PLAY) %d/%d\n", left, right);
357 #endif
358                 spicds_wrcd(codec, AK4396_LOATT, left);
359                 spicds_wrcd(codec, AK4396_ROATT, right);
360         }
361 
362 	snd_mtxunlock(codec->lock);
363 }
364 
365 MODULE_DEPEND(snd_spicds, sound, SOUND_MINVER, SOUND_PREFVER, SOUND_MAXVER);
366 MODULE_VERSION(snd_spicds, 1);
367