xref: /linux/drivers/media/pci/saa7134/saa7134-tvaudio.c (revision 72503791edffe516848d0f01d377fa9cd0711970)
1 /*
2  *
3  * device driver for philips saa7134 based TV cards
4  * tv audio decoder (fm stereo, nicam, ...)
5  *
6  * (c) 2001-03 Gerd Knorr <kraxel@bytesex.org> [SuSE Labs]
7  *
8  *  This program is free software; you can redistribute it and/or modify
9  *  it under the terms of the GNU General Public License as published by
10  *  the Free Software Foundation; either version 2 of the License, or
11  *  (at your option) any later version.
12  *
13  *  This program is distributed in the hope that it will be useful,
14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  *  GNU General Public License for more details.
17  *
18  *  You should have received a copy of the GNU General Public License
19  *  along with this program; if not, write to the Free Software
20  *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21  */
22 
23 #include <linux/init.h>
24 #include <linux/list.h>
25 #include <linux/module.h>
26 #include <linux/kernel.h>
27 #include <linux/kthread.h>
28 #include <linux/delay.h>
29 #include <linux/freezer.h>
30 #include <asm/div64.h>
31 
32 #include "saa7134-reg.h"
33 #include "saa7134.h"
34 
35 /* ------------------------------------------------------------------ */
36 
37 static unsigned int audio_debug;
38 module_param(audio_debug, int, 0644);
39 MODULE_PARM_DESC(audio_debug,"enable debug messages [tv audio]");
40 
41 static unsigned int audio_ddep;
42 module_param(audio_ddep, int, 0644);
43 MODULE_PARM_DESC(audio_ddep,"audio ddep overwrite");
44 
45 static int audio_clock_override = UNSET;
46 module_param(audio_clock_override, int, 0644);
47 
48 static int audio_clock_tweak;
49 module_param(audio_clock_tweak, int, 0644);
50 MODULE_PARM_DESC(audio_clock_tweak, "Audio clock tick fine tuning for cards with audio crystal that's slightly off (range [-1024 .. 1024])");
51 
52 #define dprintk(fmt, arg...)	if (audio_debug) \
53 	printk(KERN_DEBUG "%s/audio: " fmt, dev->name , ## arg)
54 #define d2printk(fmt, arg...)	if (audio_debug > 1) \
55 	printk(KERN_DEBUG "%s/audio: " fmt, dev->name, ## arg)
56 
57 #define print_regb(reg) printk("%s:   reg 0x%03x [%-16s]: 0x%02x\n", \
58 		dev->name,(SAA7134_##reg),(#reg),saa_readb((SAA7134_##reg)))
59 
60 /* msecs */
61 #define SCAN_INITIAL_DELAY     1000
62 #define SCAN_SAMPLE_DELAY       200
63 #define SCAN_SUBCARRIER_DELAY  2000
64 
65 /* ------------------------------------------------------------------ */
66 /* saa7134 code                                                       */
67 
68 static struct mainscan {
69 	char         *name;
70 	v4l2_std_id  std;
71 	int          carr;
72 } mainscan[] = {
73 	{
74 		.name = "MN",
75 		.std  = V4L2_STD_MN,
76 		.carr = 4500,
77 	},{
78 		.name = "BGH",
79 		.std  = V4L2_STD_B | V4L2_STD_GH,
80 		.carr = 5500,
81 	},{
82 		.name = "I",
83 		.std  = V4L2_STD_PAL_I,
84 		.carr = 6000,
85 	},{
86 		.name = "DKL",
87 		.std  = V4L2_STD_DK | V4L2_STD_SECAM_L | V4L2_STD_SECAM_LC,
88 		.carr = 6500,
89 	}
90 };
91 
92 static struct saa7134_tvaudio tvaudio[] = {
93 	{
94 		.name          = "PAL-B/G FM-stereo",
95 		.std           = V4L2_STD_PAL_BG,
96 		.mode          = TVAUDIO_FM_BG_STEREO,
97 		.carr1         = 5500,
98 		.carr2         = 5742,
99 	},{
100 		.name          = "PAL-D/K1 FM-stereo",
101 		.std           = V4L2_STD_PAL_DK,
102 		.carr1         = 6500,
103 		.carr2         = 6258,
104 		.mode          = TVAUDIO_FM_BG_STEREO,
105 	},{
106 		.name          = "PAL-D/K2 FM-stereo",
107 		.std           = V4L2_STD_PAL_DK,
108 		.carr1         = 6500,
109 		.carr2         = 6742,
110 		.mode          = TVAUDIO_FM_BG_STEREO,
111 	},{
112 		.name          = "PAL-D/K3 FM-stereo",
113 		.std           = V4L2_STD_PAL_DK,
114 		.carr1         = 6500,
115 		.carr2         = 5742,
116 		.mode          = TVAUDIO_FM_BG_STEREO,
117 	},{
118 		.name          = "PAL-B/G NICAM",
119 		.std           = V4L2_STD_PAL_BG,
120 		.carr1         = 5500,
121 		.carr2         = 5850,
122 		.mode          = TVAUDIO_NICAM_FM,
123 	},{
124 		.name          = "PAL-I NICAM",
125 		.std           = V4L2_STD_PAL_I,
126 		.carr1         = 6000,
127 		.carr2         = 6552,
128 		.mode          = TVAUDIO_NICAM_FM,
129 	},{
130 		.name          = "PAL-D/K NICAM",
131 		.std           = V4L2_STD_PAL_DK,
132 		.carr1         = 6500,
133 		.carr2         = 5850,
134 		.mode          = TVAUDIO_NICAM_FM,
135 	},{
136 		.name          = "SECAM-L NICAM",
137 		.std           = V4L2_STD_SECAM_L,
138 		.carr1         = 6500,
139 		.carr2         = 5850,
140 		.mode          = TVAUDIO_NICAM_AM,
141 	},{
142 		.name          = "SECAM-D/K NICAM",
143 		.std           = V4L2_STD_SECAM_DK,
144 		.carr1         = 6500,
145 		.carr2         = 5850,
146 		.mode          = TVAUDIO_NICAM_FM,
147 	},{
148 		.name          = "NTSC-A2 FM-stereo",
149 		.std           = V4L2_STD_NTSC,
150 		.carr1         = 4500,
151 		.carr2         = 4724,
152 		.mode          = TVAUDIO_FM_K_STEREO,
153 	},{
154 		.name          = "NTSC-M",
155 		.std           = V4L2_STD_NTSC,
156 		.carr1         = 4500,
157 		.carr2         = -1,
158 		.mode          = TVAUDIO_FM_MONO,
159 	}
160 };
161 #define TVAUDIO ARRAY_SIZE(tvaudio)
162 
163 /* ------------------------------------------------------------------ */
164 
165 static u32 tvaudio_carr2reg(u32 carrier)
166 {
167 	u64 a = carrier;
168 
169 	a <<= 24;
170 	do_div(a,12288);
171 	return a;
172 }
173 
174 static void tvaudio_setcarrier(struct saa7134_dev *dev,
175 			       int primary, int secondary)
176 {
177 	if (-1 == secondary)
178 		secondary = primary;
179 	saa_writel(SAA7134_CARRIER1_FREQ0 >> 2, tvaudio_carr2reg(primary));
180 	saa_writel(SAA7134_CARRIER2_FREQ0 >> 2, tvaudio_carr2reg(secondary));
181 }
182 
183 #define SAA7134_MUTE_MASK 0xbb
184 #define SAA7134_MUTE_ANALOG 0x04
185 #define SAA7134_MUTE_I2S 0x40
186 
187 static void mute_input_7134(struct saa7134_dev *dev)
188 {
189 	unsigned int mute;
190 	struct saa7134_input *in;
191 	int ausel=0, ics=0, ocs=0;
192 	int mask;
193 
194 	/* look what is to do ... */
195 	in   = dev->input;
196 	mute = (dev->ctl_mute ||
197 		(dev->automute  &&  (&card(dev).radio) != in));
198 	if (card(dev).mute.name) {
199 		/*
200 		 * 7130 - we'll mute using some unconnected audio input
201 		 * 7134 - we'll probably should switch external mux with gpio
202 		 */
203 		if (mute)
204 			in = &card(dev).mute;
205 	}
206 
207 	if (dev->hw_mute  == mute &&
208 		dev->hw_input == in && !dev->insuspend) {
209 		dprintk("mute/input: nothing to do [mute=%d,input=%s]\n",
210 			mute,in->name);
211 		return;
212 	}
213 
214 	dprintk("ctl_mute=%d automute=%d input=%s  =>  mute=%d input=%s\n",
215 		dev->ctl_mute,dev->automute,dev->input->name,mute,in->name);
216 	dev->hw_mute  = mute;
217 	dev->hw_input = in;
218 
219 	if (PCI_DEVICE_ID_PHILIPS_SAA7134 == dev->pci->device)
220 		/* 7134 mute */
221 		saa_writeb(SAA7134_AUDIO_MUTE_CTRL, mute ?
222 						    SAA7134_MUTE_MASK |
223 						    SAA7134_MUTE_ANALOG |
224 						    SAA7134_MUTE_I2S :
225 						    SAA7134_MUTE_MASK);
226 
227 	/* switch internal audio mux */
228 	switch (in->amux) {
229 	case TV:         ausel=0xc0; ics=0x00; ocs=0x02; break;
230 	case LINE1:      ausel=0x80; ics=0x00; ocs=0x00; break;
231 	case LINE2:      ausel=0x80; ics=0x08; ocs=0x01; break;
232 	case LINE2_LEFT: ausel=0x80; ics=0x08; ocs=0x05; break;
233 	}
234 	saa_andorb(SAA7134_AUDIO_FORMAT_CTRL, 0xc0, ausel);
235 	saa_andorb(SAA7134_ANALOG_IO_SELECT, 0x08, ics);
236 	saa_andorb(SAA7134_ANALOG_IO_SELECT, 0x07, ocs);
237 	// for oss, we need to change the clock configuration
238 	if (in->amux == TV)
239 		saa_andorb(SAA7134_SIF_SAMPLE_FREQ,   0x03, 0x00);
240 	else
241 		saa_andorb(SAA7134_SIF_SAMPLE_FREQ,   0x03, 0x01);
242 
243 	/* switch gpio-connected external audio mux */
244 	if (0 == card(dev).gpiomask)
245 		return;
246 
247 	mask = card(dev).gpiomask;
248 	saa_andorl(SAA7134_GPIO_GPMODE0 >> 2,   mask, mask);
249 	saa_andorl(SAA7134_GPIO_GPSTATUS0 >> 2, mask, in->gpio);
250 	saa7134_track_gpio(dev,in->name);
251 }
252 
253 static void tvaudio_setmode(struct saa7134_dev *dev,
254 			    struct saa7134_tvaudio *audio,
255 			    char *note)
256 {
257 	int acpf, tweak = 0;
258 
259 	if (dev->tvnorm->id == V4L2_STD_NTSC) {
260 		acpf = 0x19066;
261 	} else {
262 		acpf = 0x1e000;
263 	}
264 	if (audio_clock_tweak > -1024 && audio_clock_tweak < 1024)
265 		tweak = audio_clock_tweak;
266 
267 	if (note)
268 		dprintk("tvaudio_setmode: %s %s [%d.%03d/%d.%03d MHz] acpf=%d%+d\n",
269 			note,audio->name,
270 			audio->carr1 / 1000, audio->carr1 % 1000,
271 			audio->carr2 / 1000, audio->carr2 % 1000,
272 			acpf, tweak);
273 
274 	acpf += tweak;
275 	saa_writeb(SAA7134_AUDIO_CLOCKS_PER_FIELD0, (acpf & 0x0000ff) >> 0);
276 	saa_writeb(SAA7134_AUDIO_CLOCKS_PER_FIELD1, (acpf & 0x00ff00) >> 8);
277 	saa_writeb(SAA7134_AUDIO_CLOCKS_PER_FIELD2, (acpf & 0x030000) >> 16);
278 	tvaudio_setcarrier(dev,audio->carr1,audio->carr2);
279 
280 	switch (audio->mode) {
281 	case TVAUDIO_FM_MONO:
282 	case TVAUDIO_FM_BG_STEREO:
283 		saa_writeb(SAA7134_DEMODULATOR,               0x00);
284 		saa_writeb(SAA7134_DCXO_IDENT_CTRL,           0x00);
285 		saa_writeb(SAA7134_FM_DEEMPHASIS,             0x22);
286 		saa_writeb(SAA7134_FM_DEMATRIX,               0x80);
287 		saa_writeb(SAA7134_STEREO_DAC_OUTPUT_SELECT,  0xa0);
288 		break;
289 	case TVAUDIO_FM_K_STEREO:
290 		saa_writeb(SAA7134_DEMODULATOR,               0x00);
291 		saa_writeb(SAA7134_DCXO_IDENT_CTRL,           0x01);
292 		saa_writeb(SAA7134_FM_DEEMPHASIS,             0x22);
293 		saa_writeb(SAA7134_FM_DEMATRIX,               0x80);
294 		saa_writeb(SAA7134_STEREO_DAC_OUTPUT_SELECT,  0xa0);
295 		break;
296 	case TVAUDIO_NICAM_FM:
297 		saa_writeb(SAA7134_DEMODULATOR,               0x10);
298 		saa_writeb(SAA7134_DCXO_IDENT_CTRL,           0x00);
299 		saa_writeb(SAA7134_FM_DEEMPHASIS,             0x44);
300 		saa_writeb(SAA7134_STEREO_DAC_OUTPUT_SELECT,  0xa1);
301 		saa_writeb(SAA7134_NICAM_CONFIG,              0x00);
302 		break;
303 	case TVAUDIO_NICAM_AM:
304 		saa_writeb(SAA7134_DEMODULATOR,               0x12);
305 		saa_writeb(SAA7134_DCXO_IDENT_CTRL,           0x00);
306 		saa_writeb(SAA7134_FM_DEEMPHASIS,             0x44);
307 		saa_writeb(SAA7134_STEREO_DAC_OUTPUT_SELECT,  0xa1);
308 		saa_writeb(SAA7134_NICAM_CONFIG,              0x00);
309 		break;
310 	case TVAUDIO_FM_SAT_STEREO:
311 		/* not implemented (yet) */
312 		break;
313 	}
314 }
315 
316 static int tvaudio_sleep(struct saa7134_dev *dev, int timeout)
317 {
318 	if (dev->thread.scan1 == dev->thread.scan2 &&
319 	    !kthread_should_stop()) {
320 		if (timeout < 0) {
321 			set_current_state(TASK_INTERRUPTIBLE);
322 			schedule();
323 		} else {
324 			schedule_timeout_interruptible
325 						(msecs_to_jiffies(timeout));
326 		}
327 	}
328 	return dev->thread.scan1 != dev->thread.scan2;
329 }
330 
331 static int tvaudio_checkcarrier(struct saa7134_dev *dev, struct mainscan *scan)
332 {
333 	__s32 left,right,value;
334 
335 	if (!(dev->tvnorm->id & scan->std)) {
336 		value = 0;
337 		dprintk("skipping %d.%03d MHz [%4s]\n",
338 			scan->carr / 1000, scan->carr % 1000, scan->name);
339 		return 0;
340 	}
341 
342 	if (audio_debug > 1) {
343 		int i;
344 		dprintk("debug %d:",scan->carr);
345 		for (i = -150; i <= 150; i += 30) {
346 			tvaudio_setcarrier(dev,scan->carr+i,scan->carr+i);
347 			saa_readl(SAA7134_LEVEL_READOUT1 >> 2);
348 			if (tvaudio_sleep(dev,SCAN_SAMPLE_DELAY))
349 				return -1;
350 			value = saa_readl(SAA7134_LEVEL_READOUT1 >> 2);
351 			if (0 == i)
352 				printk("  #  %6d  # ",value >> 16);
353 			else
354 				printk(" %6d",value >> 16);
355 		}
356 		printk("\n");
357 	}
358 
359 	tvaudio_setcarrier(dev,scan->carr-90,scan->carr-90);
360 	saa_readl(SAA7134_LEVEL_READOUT1 >> 2);
361 	if (tvaudio_sleep(dev,SCAN_SAMPLE_DELAY))
362 		return -1;
363 	left = saa_readl(SAA7134_LEVEL_READOUT1 >> 2);
364 
365 	tvaudio_setcarrier(dev,scan->carr+90,scan->carr+90);
366 	saa_readl(SAA7134_LEVEL_READOUT1 >> 2);
367 	if (tvaudio_sleep(dev,SCAN_SAMPLE_DELAY))
368 		return -1;
369 	right = saa_readl(SAA7134_LEVEL_READOUT1 >> 2);
370 
371 	left >>= 16;
372 	right >>= 16;
373 	value = left > right ? left - right : right - left;
374 	dprintk("scanning %d.%03d MHz [%4s] =>  dc is %5d [%d/%d]\n",
375 		scan->carr / 1000, scan->carr % 1000,
376 		scan->name, value, left, right);
377 	return value;
378 }
379 
380 
381 static int tvaudio_getstereo(struct saa7134_dev *dev, struct saa7134_tvaudio *audio)
382 {
383 	__u32 idp, nicam, nicam_status;
384 	int retval = -1;
385 
386 	switch (audio->mode) {
387 	case TVAUDIO_FM_MONO:
388 		return V4L2_TUNER_SUB_MONO;
389 	case TVAUDIO_FM_K_STEREO:
390 	case TVAUDIO_FM_BG_STEREO:
391 		idp = (saa_readb(SAA7134_IDENT_SIF) & 0xe0) >> 5;
392 		dprintk("getstereo: fm/stereo: idp=0x%x\n",idp);
393 		if (0x03 == (idp & 0x03))
394 			retval = V4L2_TUNER_SUB_LANG1 | V4L2_TUNER_SUB_LANG2;
395 		else if (0x05 == (idp & 0x05))
396 			retval = V4L2_TUNER_SUB_MONO | V4L2_TUNER_SUB_STEREO;
397 		else if (0x01 == (idp & 0x01))
398 			retval = V4L2_TUNER_SUB_MONO;
399 		break;
400 	case TVAUDIO_FM_SAT_STEREO:
401 		/* not implemented (yet) */
402 		break;
403 	case TVAUDIO_NICAM_FM:
404 	case TVAUDIO_NICAM_AM:
405 		nicam = saa_readb(SAA7134_AUDIO_STATUS);
406 		dprintk("getstereo: nicam=0x%x\n",nicam);
407 		if (nicam & 0x1) {
408 			nicam_status = saa_readb(SAA7134_NICAM_STATUS);
409 			dprintk("getstereo: nicam_status=0x%x\n", nicam_status);
410 
411 			switch (nicam_status & 0x03) {
412 			    case 0x01:
413 				retval = V4L2_TUNER_SUB_LANG1 | V4L2_TUNER_SUB_LANG2;
414 				break;
415 			    case 0x02:
416 				retval = V4L2_TUNER_SUB_MONO | V4L2_TUNER_SUB_STEREO;
417 				break;
418 			    default:
419 				retval = V4L2_TUNER_SUB_MONO;
420 			}
421 		} else {
422 			/* No nicam detected */
423 		}
424 		break;
425 	}
426 	if (retval != -1)
427 		dprintk("found audio subchannels:%s%s%s%s\n",
428 			(retval & V4L2_TUNER_SUB_MONO)   ? " mono"   : "",
429 			(retval & V4L2_TUNER_SUB_STEREO) ? " stereo" : "",
430 			(retval & V4L2_TUNER_SUB_LANG1)  ? " lang1"  : "",
431 			(retval & V4L2_TUNER_SUB_LANG2)  ? " lang2"  : "");
432 	return retval;
433 }
434 
435 static int tvaudio_setstereo(struct saa7134_dev *dev, struct saa7134_tvaudio *audio,
436 			     u32 mode)
437 {
438 	static char *name[] = {
439 		[ V4L2_TUNER_MODE_MONO   ] = "mono",
440 		[ V4L2_TUNER_MODE_STEREO ] = "stereo",
441 		[ V4L2_TUNER_MODE_LANG1  ] = "lang1",
442 		[ V4L2_TUNER_MODE_LANG2  ] = "lang2",
443 		[ V4L2_TUNER_MODE_LANG1_LANG2  ] = "lang1+lang2",
444 	};
445 	static u32 fm[] = {
446 		[ V4L2_TUNER_MODE_MONO   ] = 0x00,  /* ch1  */
447 		[ V4L2_TUNER_MODE_STEREO ] = 0x80,  /* auto */
448 		[ V4L2_TUNER_MODE_LANG1  ] = 0x00,  /* ch1  */
449 		[ V4L2_TUNER_MODE_LANG2  ] = 0x01,  /* ch2  */
450 		[ V4L2_TUNER_MODE_LANG1_LANG2 ] = 0x80,  /* auto */
451 	};
452 	u32 reg;
453 
454 	switch (audio->mode) {
455 	case TVAUDIO_FM_MONO:
456 		/* nothing to do ... */
457 		break;
458 	case TVAUDIO_FM_K_STEREO:
459 	case TVAUDIO_FM_BG_STEREO:
460 	case TVAUDIO_NICAM_AM:
461 	case TVAUDIO_NICAM_FM:
462 		dprintk("setstereo [fm] => %s\n",
463 			name[ mode % ARRAY_SIZE(name) ]);
464 		reg = fm[ mode % ARRAY_SIZE(fm) ];
465 		saa_writeb(SAA7134_FM_DEMATRIX, reg);
466 		break;
467 	case TVAUDIO_FM_SAT_STEREO:
468 		/* Not implemented */
469 		break;
470 	}
471 	return 0;
472 }
473 
474 static int tvaudio_thread(void *data)
475 {
476 	struct saa7134_dev *dev = data;
477 	int carr_vals[ARRAY_SIZE(mainscan)];
478 	unsigned int i, audio, nscan;
479 	int max1,max2,carrier,rx,mode,lastmode,default_carrier;
480 
481 	set_freezable();
482 
483 	for (;;) {
484 		tvaudio_sleep(dev,-1);
485 		if (kthread_should_stop())
486 			goto done;
487 
488 	restart:
489 		try_to_freeze();
490 
491 		dev->thread.scan1 = dev->thread.scan2;
492 		dprintk("tvaudio thread scan start [%d]\n",dev->thread.scan1);
493 		dev->tvaudio  = NULL;
494 
495 		saa_writeb(SAA7134_MONITOR_SELECT,   0xa0);
496 		saa_writeb(SAA7134_FM_DEMATRIX,      0x80);
497 
498 		if (dev->ctl_automute)
499 			dev->automute = 1;
500 
501 		mute_input_7134(dev);
502 
503 		/* give the tuner some time */
504 		if (tvaudio_sleep(dev,SCAN_INITIAL_DELAY))
505 			goto restart;
506 
507 		max1 = 0;
508 		max2 = 0;
509 		nscan = 0;
510 		carrier = 0;
511 		default_carrier = 0;
512 		for (i = 0; i < ARRAY_SIZE(mainscan); i++) {
513 			if (!(dev->tvnorm->id & mainscan[i].std))
514 				continue;
515 			if (!default_carrier)
516 				default_carrier = mainscan[i].carr;
517 			nscan++;
518 		}
519 
520 		if (1 == nscan) {
521 			/* only one candidate -- skip scan ;) */
522 			dprintk("only one main carrier candidate - skipping scan\n");
523 			max1 = 12345;
524 			carrier = default_carrier;
525 		} else {
526 			/* scan for the main carrier */
527 			saa_writeb(SAA7134_MONITOR_SELECT,0x00);
528 			tvaudio_setmode(dev,&tvaudio[0],NULL);
529 			for (i = 0; i < ARRAY_SIZE(mainscan); i++) {
530 				carr_vals[i] = tvaudio_checkcarrier(dev, mainscan+i);
531 				if (dev->thread.scan1 != dev->thread.scan2)
532 					goto restart;
533 			}
534 			for (max1 = 0, max2 = 0, i = 0; i < ARRAY_SIZE(mainscan); i++) {
535 				if (max1 < carr_vals[i]) {
536 					max2 = max1;
537 					max1 = carr_vals[i];
538 					carrier = mainscan[i].carr;
539 				} else if (max2 < carr_vals[i]) {
540 					max2 = carr_vals[i];
541 				}
542 			}
543 		}
544 
545 		if (0 != carrier && max1 > 2000 && max1 > max2*3) {
546 			/* found good carrier */
547 			dprintk("found %s main sound carrier @ %d.%03d MHz [%d/%d]\n",
548 				dev->tvnorm->name, carrier/1000, carrier%1000,
549 				max1, max2);
550 			dev->last_carrier = carrier;
551 			dev->automute = 0;
552 
553 		} else if (0 != dev->last_carrier) {
554 			/* no carrier -- try last detected one as fallback */
555 			carrier = dev->last_carrier;
556 			dprintk("audio carrier scan failed, "
557 				"using %d.%03d MHz [last detected]\n",
558 				carrier/1000, carrier%1000);
559 			dev->automute = 1;
560 
561 		} else {
562 			/* no carrier + no fallback -- use default */
563 			carrier = default_carrier;
564 			dprintk("audio carrier scan failed, "
565 				"using %d.%03d MHz [default]\n",
566 				carrier/1000, carrier%1000);
567 			dev->automute = 1;
568 		}
569 		tvaudio_setcarrier(dev,carrier,carrier);
570 		saa_andorb(SAA7134_STEREO_DAC_OUTPUT_SELECT, 0x30, 0x00);
571 		saa7134_tvaudio_setmute(dev);
572 		/* find the exact tv audio norm */
573 		for (audio = UNSET, i = 0; i < TVAUDIO; i++) {
574 			if (dev->tvnorm->id != UNSET &&
575 				!(dev->tvnorm->id & tvaudio[i].std))
576 				continue;
577 			if (tvaudio[i].carr1 != carrier)
578 				continue;
579 			/* Note: at least the primary carrier is right here */
580 			if (UNSET == audio)
581 				audio = i;
582 			tvaudio_setmode(dev,&tvaudio[i],"trying");
583 			if (tvaudio_sleep(dev,SCAN_SUBCARRIER_DELAY))
584 				goto restart;
585 			if (-1 != tvaudio_getstereo(dev,&tvaudio[i])) {
586 				audio = i;
587 				break;
588 			}
589 		}
590 		saa_andorb(SAA7134_STEREO_DAC_OUTPUT_SELECT, 0x30, 0x30);
591 		if (UNSET == audio)
592 			continue;
593 		tvaudio_setmode(dev,&tvaudio[audio],"using");
594 
595 		tvaudio_setstereo(dev,&tvaudio[audio],V4L2_TUNER_MODE_MONO);
596 		dev->tvaudio = &tvaudio[audio];
597 
598 		lastmode = 42;
599 		for (;;) {
600 
601 			try_to_freeze();
602 
603 			if (tvaudio_sleep(dev,5000))
604 				goto restart;
605 			if (kthread_should_stop())
606 				break;
607 			if (UNSET == dev->thread.mode) {
608 				rx = tvaudio_getstereo(dev, &tvaudio[audio]);
609 				mode = saa7134_tvaudio_rx2mode(rx);
610 			} else {
611 				mode = dev->thread.mode;
612 			}
613 			if (lastmode != mode) {
614 				tvaudio_setstereo(dev,&tvaudio[audio],mode);
615 				lastmode = mode;
616 			}
617 		}
618 	}
619 
620  done:
621 	dev->thread.stopped = 1;
622 	return 0;
623 }
624 
625 /* ------------------------------------------------------------------ */
626 /* saa7133 / saa7135 code                                             */
627 
628 static char *stdres[0x20] = {
629 	[0x00] = "no standard detected",
630 	[0x01] = "B/G (in progress)",
631 	[0x02] = "D/K (in progress)",
632 	[0x03] = "M (in progress)",
633 
634 	[0x04] = "B/G A2",
635 	[0x05] = "B/G NICAM",
636 	[0x06] = "D/K A2 (1)",
637 	[0x07] = "D/K A2 (2)",
638 	[0x08] = "D/K A2 (3)",
639 	[0x09] = "D/K NICAM",
640 	[0x0a] = "L NICAM",
641 	[0x0b] = "I NICAM",
642 
643 	[0x0c] = "M Korea",
644 	[0x0d] = "M BTSC ",
645 	[0x0e] = "M EIAJ",
646 
647 	[0x0f] = "FM radio / IF 10.7 / 50 deemp",
648 	[0x10] = "FM radio / IF 10.7 / 75 deemp",
649 	[0x11] = "FM radio / IF sel / 50 deemp",
650 	[0x12] = "FM radio / IF sel / 75 deemp",
651 
652 	[0x13 ... 0x1e ] = "unknown",
653 	[0x1f] = "??? [in progress]",
654 };
655 
656 #define DSP_RETRY 32
657 #define DSP_DELAY 16
658 #define SAA7135_DSP_RWCLEAR_RERR 1
659 
660 static inline int saa_dsp_reset_error_bit(struct saa7134_dev *dev)
661 {
662 	int state = saa_readb(SAA7135_DSP_RWSTATE);
663 	if (unlikely(state & SAA7135_DSP_RWSTATE_ERR)) {
664 		d2printk("%s: resetting error bit\n", dev->name);
665 		saa_writeb(SAA7135_DSP_RWCLEAR, SAA7135_DSP_RWCLEAR_RERR);
666 	}
667 	return 0;
668 }
669 
670 static inline int saa_dsp_wait_bit(struct saa7134_dev *dev, int bit)
671 {
672 	int state, count = DSP_RETRY;
673 
674 	state = saa_readb(SAA7135_DSP_RWSTATE);
675 	if (unlikely(state & SAA7135_DSP_RWSTATE_ERR)) {
676 		printk(KERN_WARNING "%s: dsp access error\n", dev->name);
677 		saa_dsp_reset_error_bit(dev);
678 		return -EIO;
679 	}
680 	while (0 == (state & bit)) {
681 		if (unlikely(0 == count)) {
682 			printk("%s: dsp access wait timeout [bit=%s]\n",
683 			       dev->name,
684 			       (bit & SAA7135_DSP_RWSTATE_WRR) ? "WRR" :
685 			       (bit & SAA7135_DSP_RWSTATE_RDB) ? "RDB" :
686 			       (bit & SAA7135_DSP_RWSTATE_IDA) ? "IDA" :
687 			       "???");
688 			return -EIO;
689 		}
690 		saa_wait(DSP_DELAY);
691 		state = saa_readb(SAA7135_DSP_RWSTATE);
692 		count--;
693 	}
694 	return 0;
695 }
696 
697 
698 int saa_dsp_writel(struct saa7134_dev *dev, int reg, u32 value)
699 {
700 	int err;
701 
702 	d2printk("dsp write reg 0x%x = 0x%06x\n",reg<<2,value);
703 	err = saa_dsp_wait_bit(dev,SAA7135_DSP_RWSTATE_WRR);
704 	if (err < 0)
705 		return err;
706 	saa_writel(reg,value);
707 	err = saa_dsp_wait_bit(dev,SAA7135_DSP_RWSTATE_WRR);
708 	if (err < 0)
709 		return err;
710 	return 0;
711 }
712 
713 static int getstereo_7133(struct saa7134_dev *dev)
714 {
715 	int retval = V4L2_TUNER_SUB_MONO;
716 	u32 value;
717 
718 	value = saa_readl(0x528 >> 2);
719 	if (value & 0x20)
720 		retval = V4L2_TUNER_SUB_MONO | V4L2_TUNER_SUB_STEREO;
721 	if (value & 0x40)
722 		retval = V4L2_TUNER_SUB_LANG1 | V4L2_TUNER_SUB_LANG2;
723 	return retval;
724 }
725 
726 static int mute_input_7133(struct saa7134_dev *dev)
727 {
728 	u32 reg = 0;
729 	u32 xbarin, xbarout;
730 	int mask;
731 	struct saa7134_input *in;
732 
733 	xbarin = 0x03;
734 	switch (dev->input->amux) {
735 	case TV:
736 		reg = 0x02;
737 		xbarin = 0;
738 		break;
739 	case LINE1:
740 		reg = 0x00;
741 		break;
742 	case LINE2:
743 	case LINE2_LEFT:
744 		reg = 0x09;
745 		break;
746 	}
747 	saa_dsp_writel(dev, 0x464 >> 2, xbarin);
748 	if (dev->ctl_mute) {
749 		reg = 0x07;
750 		xbarout = 0xbbbbbb;
751 	} else
752 		xbarout = 0xbbbb10;
753 	saa_dsp_writel(dev, 0x46c >> 2, xbarout);
754 
755 	saa_writel(0x594 >> 2, reg);
756 
757 
758 	/* switch gpio-connected external audio mux */
759 	if (0 != card(dev).gpiomask) {
760 		mask = card(dev).gpiomask;
761 
762 		if (card(dev).mute.name && dev->ctl_mute)
763 			in = &card(dev).mute;
764 		else
765 			in = dev->input;
766 
767 		saa_andorl(SAA7134_GPIO_GPMODE0 >> 2,   mask, mask);
768 		saa_andorl(SAA7134_GPIO_GPSTATUS0 >> 2, mask, in->gpio);
769 		saa7134_track_gpio(dev,in->name);
770 	}
771 
772 	return 0;
773 }
774 
775 static int tvaudio_thread_ddep(void *data)
776 {
777 	struct saa7134_dev *dev = data;
778 	u32 value, norms;
779 
780 	set_freezable();
781 	for (;;) {
782 		tvaudio_sleep(dev,-1);
783 		if (kthread_should_stop())
784 			goto done;
785 	restart:
786 		try_to_freeze();
787 
788 		dev->thread.scan1 = dev->thread.scan2;
789 		dprintk("tvaudio thread scan start [%d]\n",dev->thread.scan1);
790 
791 		if (audio_ddep >= 0x04 && audio_ddep <= 0x0e) {
792 			/* insmod option override */
793 			norms = (audio_ddep << 2) | 0x01;
794 			dprintk("ddep override: %s\n",stdres[audio_ddep]);
795 		} else if (&card(dev).radio == dev->input) {
796 			dprintk("FM Radio\n");
797 			if (dev->tuner_type == TUNER_PHILIPS_TDA8290) {
798 				norms = (0x11 << 2) | 0x01;
799 				saa_dsp_writel(dev, 0x42c >> 2, 0x729555);
800 			} else {
801 				norms = (0x0f << 2) | 0x01;
802 			}
803 		} else {
804 			/* (let chip) scan for sound carrier */
805 			norms = 0;
806 			if (dev->tvnorm->id & (V4L2_STD_B | V4L2_STD_GH))
807 				norms |= 0x04;
808 			if (dev->tvnorm->id & V4L2_STD_PAL_I)
809 				norms |= 0x20;
810 			if (dev->tvnorm->id & V4L2_STD_DK)
811 				norms |= 0x08;
812 			if (dev->tvnorm->id & V4L2_STD_MN)
813 				norms |= 0x40;
814 			if (dev->tvnorm->id & (V4L2_STD_SECAM_L | V4L2_STD_SECAM_LC))
815 				norms |= 0x10;
816 			if (0 == norms)
817 				norms = 0x7c; /* all */
818 			dprintk("scanning:%s%s%s%s%s\n",
819 				(norms & 0x04) ? " B/G"  : "",
820 				(norms & 0x08) ? " D/K"  : "",
821 				(norms & 0x10) ? " L/L'" : "",
822 				(norms & 0x20) ? " I"    : "",
823 				(norms & 0x40) ? " M"    : "");
824 		}
825 
826 		/* kick automatic standard detection */
827 		saa_dsp_writel(dev, 0x454 >> 2, 0);
828 		saa_dsp_writel(dev, 0x454 >> 2, norms | 0x80);
829 
830 		/* setup crossbars */
831 		saa_dsp_writel(dev, 0x464 >> 2, 0x000000);
832 		saa_dsp_writel(dev, 0x470 >> 2, 0x101010);
833 
834 		if (tvaudio_sleep(dev,3000))
835 			goto restart;
836 		value = saa_readl(0x528 >> 2) & 0xffffff;
837 
838 		dprintk("tvaudio thread status: 0x%x [%s%s%s]\n",
839 			value, stdres[value & 0x1f],
840 			(value & 0x000020) ? ",stereo" : "",
841 			(value & 0x000040) ? ",dual"   : "");
842 		dprintk("detailed status: "
843 			"%s#%s#%s#%s#%s#%s#%s#%s#%s#%s#%s#%s#%s#%s\n",
844 			(value & 0x000080) ? " A2/EIAJ pilot tone "     : "",
845 			(value & 0x000100) ? " A2/EIAJ dual "           : "",
846 			(value & 0x000200) ? " A2/EIAJ stereo "         : "",
847 			(value & 0x000400) ? " A2/EIAJ noise mute "     : "",
848 
849 			(value & 0x000800) ? " BTSC/FM radio pilot "    : "",
850 			(value & 0x001000) ? " SAP carrier "            : "",
851 			(value & 0x002000) ? " BTSC stereo noise mute " : "",
852 			(value & 0x004000) ? " SAP noise mute "         : "",
853 			(value & 0x008000) ? " VDSP "                   : "",
854 
855 			(value & 0x010000) ? " NICST "                  : "",
856 			(value & 0x020000) ? " NICDU "                  : "",
857 			(value & 0x040000) ? " NICAM muted "            : "",
858 			(value & 0x080000) ? " NICAM reserve sound "    : "",
859 
860 			(value & 0x100000) ? " init done "              : "");
861 	}
862 
863  done:
864 	dev->thread.stopped = 1;
865 	return 0;
866 }
867 
868 /* ------------------------------------------------------------------ */
869 /* common stuff + external entry points                               */
870 
871 void saa7134_enable_i2s(struct saa7134_dev *dev)
872 {
873 	int i2s_format;
874 
875 	if (!card_is_empress(dev))
876 		return;
877 
878 	if (dev->pci->device == PCI_DEVICE_ID_PHILIPS_SAA7130)
879 		return;
880 
881 	/* configure GPIO for out */
882 	saa_andorl(SAA7134_GPIO_GPMODE0 >> 2, 0x0E000000, 0x00000000);
883 
884 	switch (dev->pci->device) {
885 	case PCI_DEVICE_ID_PHILIPS_SAA7133:
886 	case PCI_DEVICE_ID_PHILIPS_SAA7135:
887 	    /* Set I2S format (SONY)  */
888 	    saa_writeb(SAA7133_I2S_AUDIO_CONTROL, 0x00);
889 	    /* Start I2S */
890 	    saa_writeb(SAA7134_I2S_AUDIO_OUTPUT, 0x11);
891 	    break;
892 
893 	case PCI_DEVICE_ID_PHILIPS_SAA7134:
894 	    i2s_format = (dev->input->amux == TV) ? 0x00 : 0x01;
895 
896 	    /* enable I2S audio output for the mpeg encoder */
897 	    saa_writeb(SAA7134_I2S_OUTPUT_SELECT, 0x80);
898 	    saa_writeb(SAA7134_I2S_OUTPUT_FORMAT, i2s_format);
899 	    saa_writeb(SAA7134_I2S_OUTPUT_LEVEL,  0x0F);
900 	    saa_writeb(SAA7134_I2S_AUDIO_OUTPUT,  0x01);
901 
902 	default:
903 	    break;
904 	}
905 }
906 
907 int saa7134_tvaudio_rx2mode(u32 rx)
908 {
909 	u32 mode;
910 
911 	mode = V4L2_TUNER_MODE_MONO;
912 	if (rx & V4L2_TUNER_SUB_STEREO)
913 		mode = V4L2_TUNER_MODE_STEREO;
914 	else if (rx & V4L2_TUNER_SUB_LANG1)
915 		mode = V4L2_TUNER_MODE_LANG1;
916 	else if (rx & V4L2_TUNER_SUB_LANG2)
917 		mode = V4L2_TUNER_MODE_LANG2;
918 	return mode;
919 }
920 
921 void saa7134_tvaudio_setmute(struct saa7134_dev *dev)
922 {
923 	switch (dev->pci->device) {
924 	case PCI_DEVICE_ID_PHILIPS_SAA7130:
925 	case PCI_DEVICE_ID_PHILIPS_SAA7134:
926 		mute_input_7134(dev);
927 		break;
928 	case PCI_DEVICE_ID_PHILIPS_SAA7133:
929 	case PCI_DEVICE_ID_PHILIPS_SAA7135:
930 		mute_input_7133(dev);
931 		break;
932 	}
933 }
934 
935 void saa7134_tvaudio_setinput(struct saa7134_dev *dev,
936 			      struct saa7134_input *in)
937 {
938 	dev->input = in;
939 	switch (dev->pci->device) {
940 	case PCI_DEVICE_ID_PHILIPS_SAA7130:
941 	case PCI_DEVICE_ID_PHILIPS_SAA7134:
942 		mute_input_7134(dev);
943 		break;
944 	case PCI_DEVICE_ID_PHILIPS_SAA7133:
945 	case PCI_DEVICE_ID_PHILIPS_SAA7135:
946 		mute_input_7133(dev);
947 		break;
948 	}
949 	saa7134_enable_i2s(dev);
950 }
951 
952 void saa7134_tvaudio_setvolume(struct saa7134_dev *dev, int level)
953 {
954 	switch (dev->pci->device) {
955 	case PCI_DEVICE_ID_PHILIPS_SAA7134:
956 		saa_writeb(SAA7134_CHANNEL1_LEVEL,     level & 0x1f);
957 		saa_writeb(SAA7134_CHANNEL2_LEVEL,     level & 0x1f);
958 		saa_writeb(SAA7134_NICAM_LEVEL_ADJUST, level & 0x1f);
959 		break;
960 	}
961 }
962 
963 int saa7134_tvaudio_getstereo(struct saa7134_dev *dev)
964 {
965 	int retval = V4L2_TUNER_SUB_MONO;
966 
967 	switch (dev->pci->device) {
968 	case PCI_DEVICE_ID_PHILIPS_SAA7134:
969 		if (dev->tvaudio)
970 			retval = tvaudio_getstereo(dev,dev->tvaudio);
971 		break;
972 	case PCI_DEVICE_ID_PHILIPS_SAA7133:
973 	case PCI_DEVICE_ID_PHILIPS_SAA7135:
974 		retval = getstereo_7133(dev);
975 		break;
976 	}
977 	return retval;
978 }
979 
980 void saa7134_tvaudio_init(struct saa7134_dev *dev)
981 {
982 	int clock = saa7134_boards[dev->board].audio_clock;
983 
984 	if (UNSET != audio_clock_override)
985 		clock = audio_clock_override;
986 
987 	switch (dev->pci->device) {
988 	case PCI_DEVICE_ID_PHILIPS_SAA7134:
989 		/* init all audio registers */
990 		saa_writeb(SAA7134_AUDIO_PLL_CTRL,   0x00);
991 		if (need_resched())
992 			schedule();
993 		else
994 			udelay(10);
995 
996 		saa_writeb(SAA7134_AUDIO_CLOCK0,      clock        & 0xff);
997 		saa_writeb(SAA7134_AUDIO_CLOCK1,     (clock >>  8) & 0xff);
998 		saa_writeb(SAA7134_AUDIO_CLOCK2,     (clock >> 16) & 0xff);
999 		/* frame locked audio is mandatory for NICAM */
1000 		saa_writeb(SAA7134_AUDIO_PLL_CTRL,   0x01);
1001 		saa_writeb(SAA7134_NICAM_ERROR_LOW,  0x14);
1002 		saa_writeb(SAA7134_NICAM_ERROR_HIGH, 0x50);
1003 		break;
1004 	case PCI_DEVICE_ID_PHILIPS_SAA7133:
1005 	case PCI_DEVICE_ID_PHILIPS_SAA7135:
1006 		saa_writel(0x598 >> 2, clock);
1007 		saa_dsp_writel(dev, 0x474 >> 2, 0x00);
1008 		saa_dsp_writel(dev, 0x450 >> 2, 0x00);
1009 	}
1010 }
1011 
1012 int saa7134_tvaudio_init2(struct saa7134_dev *dev)
1013 {
1014 	int (*my_thread)(void *data) = NULL;
1015 
1016 	switch (dev->pci->device) {
1017 	case PCI_DEVICE_ID_PHILIPS_SAA7134:
1018 		my_thread = tvaudio_thread;
1019 		break;
1020 	case PCI_DEVICE_ID_PHILIPS_SAA7133:
1021 	case PCI_DEVICE_ID_PHILIPS_SAA7135:
1022 		my_thread = tvaudio_thread_ddep;
1023 		break;
1024 	}
1025 
1026 	dev->thread.thread = NULL;
1027 	dev->thread.scan1 = dev->thread.scan2 = 0;
1028 	if (my_thread) {
1029 		saa7134_tvaudio_init(dev);
1030 		/* start tvaudio thread */
1031 		dev->thread.thread = kthread_run(my_thread, dev, "%s", dev->name);
1032 		if (IS_ERR(dev->thread.thread)) {
1033 			printk(KERN_WARNING "%s: kernel_thread() failed\n",
1034 			       dev->name);
1035 			/* XXX: missing error handling here */
1036 		}
1037 	}
1038 
1039 	saa7134_enable_i2s(dev);
1040 	return 0;
1041 }
1042 
1043 int saa7134_tvaudio_close(struct saa7134_dev *dev)
1044 {
1045 	dev->automute = 1;
1046 	/* anything else to undo? */
1047 	return 0;
1048 }
1049 
1050 int saa7134_tvaudio_fini(struct saa7134_dev *dev)
1051 {
1052 	/* shutdown tvaudio thread */
1053 	if (dev->thread.thread && !dev->thread.stopped)
1054 		kthread_stop(dev->thread.thread);
1055 
1056 	saa_andorb(SAA7134_ANALOG_IO_SELECT, 0x07, 0x00); /* LINE1 */
1057 	return 0;
1058 }
1059 
1060 int saa7134_tvaudio_do_scan(struct saa7134_dev *dev)
1061 {
1062 	if (dev->input->amux != TV) {
1063 		dprintk("sound IF not in use, skipping scan\n");
1064 		dev->automute = 0;
1065 		saa7134_tvaudio_setmute(dev);
1066 	} else if (dev->thread.thread) {
1067 		dev->thread.mode = UNSET;
1068 		dev->thread.scan2++;
1069 
1070 		if (!dev->insuspend && !dev->thread.stopped)
1071 			wake_up_process(dev->thread.thread);
1072 	} else {
1073 		dev->automute = 0;
1074 		saa7134_tvaudio_setmute(dev);
1075 	}
1076 	return 0;
1077 }
1078 
1079 EXPORT_SYMBOL(saa_dsp_writel);
1080 EXPORT_SYMBOL(saa7134_tvaudio_setmute);
1081 
1082 /* ----------------------------------------------------------- */
1083 /*
1084  * Local variables:
1085  * c-basic-offset: 8
1086  * End:
1087  */
1088