xref: /dragonfly/sys/dev/video/bktr/bktr_audio.c (revision 9bb2a92d)
1 /* $FreeBSD: src/sys/dev/bktr/bktr_audio.c,v 1.2.2.5 2003/02/08 02:04:57 orion Exp $ */
2 /* $DragonFly: src/sys/dev/video/bktr/bktr_audio.c,v 1.5 2004/02/13 01:45:15 joerg Exp $ */
3 /*
4  * This is part of the Driver for Video Capture Cards (Frame grabbers)
5  * and TV Tuner cards using the Brooktree Bt848, Bt848A, Bt849A, Bt878, Bt879
6  * chipset.
7  * Copyright Roger Hardiman and Amancio Hasty.
8  *
9  * bktr_audio : This deals with controlling the audio on TV cards,
10  *                controlling the Audio Multiplexer (audio source selector).
11  *                controlling any MSP34xx stereo audio decoders.
12  *                controlling any DPL35xx dolby surroud sound audio decoders.
13  *                initialising TDA98xx audio devices.
14  *
15  */
16 
17 /*
18  * 1. Redistributions of source code must retain the
19  * Copyright (c) 1997 Amancio Hasty, 1999 Roger Hardiman
20  * All rights reserved.
21  *
22  * Redistribution and use in source and binary forms, with or without
23  * modification, are permitted provided that the following conditions
24  * are met:
25  * 1. Redistributions of source code must retain the above copyright
26  *    notice, this list of conditions and the following disclaimer.
27  * 2. Redistributions in binary form must reproduce the above copyright
28  *    notice, this list of conditions and the following disclaimer in the
29  *    documentation and/or other materials provided with the distribution.
30  * 3. All advertising materials mentioning features or use of this software
31  *    must display the following acknowledgement:
32  *      This product includes software developed by Amancio Hasty and
33  *      Roger Hardiman
34  * 4. The name of the author may not be used to endorse or promote products
35  *    derived from this software without specific prior written permission.
36  *
37  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
38  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
39  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
40  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
41  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
42  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
43  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
44  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
45  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
46  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
47  * POSSIBILITY OF SUCH DAMAGE.
48  */
49 
50 #include <sys/param.h>
51 #include <sys/systm.h>
52 #include <sys/kernel.h>
53 #include <sys/vnode.h>
54 
55 #if defined(__DragonFly__) || defined(__FreeBSD__)
56 
57 #if defined(__DragonFly__) || (__FreeBSD_version < 500000)
58 #include <machine/clock.h>              /* for DELAY */
59 #endif
60 
61 #include <bus/pci/pcivar.h>
62 
63 #if defined(__DragonFly__) || (__FreeBSD_version >=300000)
64 #include <machine/bus_memio.h>		/* for bus space */
65 #include <machine/bus.h>
66 #include <sys/bus.h>
67 #endif
68 #endif
69 
70 #ifdef __NetBSD__
71 #include <sys/proc.h>
72 #include <dev/ic/bt8xx.h>	/* NetBSD location of .h files */
73 #include <dev/pci/bktr/bktr_reg.h>
74 #include <dev/pci/bktr/bktr_core.h>
75 #include <dev/pci/bktr/bktr_tuner.h>
76 #include <dev/pci/bktr/bktr_card.h>
77 #include <dev/pci/bktr/bktr_audio.h>
78 #else
79 #include <machine/ioctl_meteor.h>	/* Traditional location of .h files */
80 #include <machine/ioctl_bt848.h>        /* extensions to ioctl_meteor.h */
81 #include "bktr_reg.h"
82 #include "bktr_core.h"
83 #include "bktr_tuner.h"
84 #include "bktr_card.h"
85 #include "bktr_audio.h"
86 #endif
87 
88 /*
89  * Prototypes for the GV_BCTV2 specific functions.
90  */
91 void    set_bctv2_audio( bktr_ptr_t bktr );
92 void    bctv2_gpio_write( bktr_ptr_t bktr, int port, int val );
93 /*int   bctv2_gpio_read( bktr_ptr_t bktr, int port );*/ /* Not used */
94 
95 /*
96  * init_audio_devices
97  * Reset any MSP34xx or TDA98xx audio devices.
98  */
99 void init_audio_devices( bktr_ptr_t bktr ) {
100 
101         /* enable stereo if appropriate on TDA audio chip */
102         if ( bktr->card.dbx )
103                 init_BTSC( bktr );
104 
105         /* reset the MSP34xx stereo audio chip */
106         if ( bktr->card.msp3400c )
107                 msp_dpl_reset( bktr, bktr->msp_addr );
108 
109         /* reset the DPL35xx dolby audio chip */
110         if ( bktr->card.dpl3518a )
111                 msp_dpl_reset( bktr, bktr->dpl_addr );
112 
113 }
114 
115 
116 /*
117  *
118  */
119 #define AUDIOMUX_DISCOVER_NOT
120 int
121 set_audio( bktr_ptr_t bktr, int cmd )
122 {
123 	u_long		temp;
124 	volatile u_char	idx;
125 
126 #if defined( AUDIOMUX_DISCOVER )
127 	if ( cmd >= 200 )
128 		cmd -= 200;
129 	else
130 #endif /* AUDIOMUX_DISCOVER */
131 
132 	/* check for existance of audio MUXes */
133 	if ( !bktr->card.audiomuxs[ 4 ] )
134 		return( -1 );
135 
136 	switch (cmd) {
137 	case AUDIO_TUNER:
138 #ifdef BKTR_REVERSEMUTE
139 		bktr->audio_mux_select = 3;
140 #else
141 		bktr->audio_mux_select = 0;
142 #endif
143 
144 		if (bktr->reverse_mute )
145 		      bktr->audio_mux_select = 0;
146 		else
147 		    bktr->audio_mux_select = 3;
148 
149 		break;
150 	case AUDIO_EXTERN:
151 		bktr->audio_mux_select = 1;
152 		break;
153 	case AUDIO_INTERN:
154 		bktr->audio_mux_select = 2;
155 		break;
156 	case AUDIO_MUTE:
157 		bktr->audio_mute_state = TRUE;	/* set mute */
158 		break;
159 	case AUDIO_UNMUTE:
160 		bktr->audio_mute_state = FALSE;	/* clear mute */
161 		break;
162 	default:
163 		printf("%s: audio cmd error %02x\n", bktr_name(bktr),
164 		       cmd);
165 		return( -1 );
166 	}
167 
168 
169 	/* Most cards have a simple audio multiplexer to select the
170 	 * audio source. The I/O_GV card has a more advanced multiplexer
171 	 * and requires special handling.
172 	 */
173         if ( bktr->bt848_card == CARD_IO_BCTV2 ) {
174                 set_bctv2_audio( bktr );
175                 return( 0 );
176 	}
177 
178 	/* Proceed with the simpler audio multiplexer code for the majority
179 	 * of Bt848 cards.
180 	 */
181 
182 	/*
183 	 * Leave the upper bits of the GPIO port alone in case they control
184 	 * something like the dbx or teletext chips.  This doesn't guarantee
185 	 * success, but follows the rule of least astonishment.
186 	 */
187 
188 	if ( bktr->audio_mute_state == TRUE ) {
189 #ifdef BKTR_REVERSEMUTE
190 		idx = 0;
191 #else
192 		idx = 3;
193 #endif
194 
195 		if (bktr->reverse_mute )
196 		  idx  = 3;
197 		else
198 		  idx  = 0;
199 
200 	}
201 	else
202 		idx = bktr->audio_mux_select;
203 
204 
205 	temp = INL(bktr, BKTR_GPIO_DATA) & ~bktr->card.gpio_mux_bits;
206 #if defined( AUDIOMUX_DISCOVER )
207 	OUTL(bktr, BKTR_GPIO_DATA, temp | (cmd & 0xff));
208 	printf("%s: cmd: %d audio mux %x temp %x \n", bktr_name(bktr),
209 	  	cmd, bktr->card.audiomuxs[ idx ], temp );
210 #else
211 	OUTL(bktr, BKTR_GPIO_DATA, temp | bktr->card.audiomuxs[ idx ]);
212 #endif /* AUDIOMUX_DISCOVER */
213 
214 
215 
216 	/* Some new Hauppauge cards do not have an audio mux */
217 	/* Instead we use the MSP34xx chip to select TV audio, Line-In */
218 	/* FM Radio and Mute */
219 	/* Examples of this are the Hauppauge 44xxx MSP34xx models */
220 	/* It is ok to drive both the mux and the MSP34xx chip. */
221 	/* If there is no mux, the MSP does the switching of the audio source */
222 	/* If there is a mux, it does the switching of the audio source */
223 
224 	if ((bktr->card.msp3400c) && (bktr->audio_mux_present == 0)) {
225 
226 	  if (bktr->audio_mute_state == TRUE ) {
227 		 msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0000, 0x0000); /* volume to MUTE */
228 	  } else {
229 		 if(bktr->audio_mux_select == 0) { /* TV Tuner */
230 		    msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0000, 0x7300); /* 0 db volume */
231 		    if (bktr->msp_source_selected != 0) msp_autodetect(bktr);  /* setup TV audio mode */
232 		    bktr->msp_source_selected = 0;
233 		 }
234 		 if(bktr->audio_mux_select == 1) { /* Line In */
235 		    msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0000, 0x7300); /* 0 db volume */
236 		    msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x000d, 0x1900); /* scart prescale */
237 		    msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0008, 0x0220); /* SCART | STEREO */
238 		    msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0013, 0x0000); /* DSP In = SC1_IN_L/R */
239 		    bktr->msp_source_selected = 1;
240 		 }
241 
242 		 if(bktr->audio_mux_select == 2) { /* FM Radio */
243 		    msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0000, 0x7300); /* 0 db volume */
244 		    msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x000d, 0x1900); /* scart prescale */
245 		    msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0008, 0x0220); /* SCART | STEREO */
246 		    msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0013, 0x0200); /* DSP In = SC2_IN_L/R */
247 		    bktr->msp_source_selected = 2;
248 		 }
249 	  }
250 	}
251 
252 
253 	return( 0 );
254 }
255 
256 
257 /*
258  *
259  */
260 void
261 temp_mute( bktr_ptr_t bktr, int flag )
262 {
263 	static int	muteState = FALSE;
264 
265 	if ( flag == TRUE ) {
266 		muteState = bktr->audio_mute_state;
267 		set_audio( bktr, AUDIO_MUTE );		/* prevent 'click' */
268 	}
269 	else {
270 		tsleep( BKTR_SLEEP, 0, "tuning", hz/8 );
271 		if ( muteState == FALSE )
272 			set_audio( bktr, AUDIO_UNMUTE );
273 	}
274 }
275 
276 /* address of BTSC/SAP decoder chip */
277 #define TDA9850_WADDR           0xb6
278 #define TDA9850_RADDR           0xb7
279 
280 
281 /* registers in the TDA9850 BTSC/dbx chip */
282 #define CON1ADDR                0x04
283 #define CON2ADDR                0x05
284 #define CON3ADDR                0x06
285 #define CON4ADDR                0x07
286 #define ALI1ADDR                0x08
287 #define ALI2ADDR                0x09
288 #define ALI3ADDR                0x0a
289 
290 /*
291  * initialise the dbx chip
292  * taken from the Linux bttv driver TDA9850 initialisation code
293  */
294 void
295 init_BTSC( bktr_ptr_t bktr )
296 {
297     i2cWrite(bktr, TDA9850_WADDR, CON1ADDR, 0x08); /* noise threshold st */
298     i2cWrite(bktr, TDA9850_WADDR, CON2ADDR, 0x08); /* noise threshold sap */
299     i2cWrite(bktr, TDA9850_WADDR, CON3ADDR, 0x40); /* stereo mode */
300     i2cWrite(bktr, TDA9850_WADDR, CON4ADDR, 0x07); /* 0 dB input gain? */
301     i2cWrite(bktr, TDA9850_WADDR, ALI1ADDR, 0x10); /* wideband alignment? */
302     i2cWrite(bktr, TDA9850_WADDR, ALI2ADDR, 0x10); /* spectral alignment? */
303     i2cWrite(bktr, TDA9850_WADDR, ALI3ADDR, 0x03);
304 }
305 
306 /*
307  * setup the dbx chip
308  * XXX FIXME: alot of work to be done here, this merely unmutes it.
309  */
310 int
311 set_BTSC( bktr_ptr_t bktr, int control )
312 {
313 	return( i2cWrite( bktr, TDA9850_WADDR, CON3ADDR, control ) );
314 }
315 
316 /*
317  * CARD_GV_BCTV2 specific functions.
318  */
319 
320 #define BCTV2_AUDIO_MAIN              0x10    /* main audio program */
321 #define BCTV2_AUDIO_SUB               0x20    /* sub audio program */
322 #define BCTV2_AUDIO_BOTH              0x30    /* main(L) + sub(R) program */
323 
324 #define BCTV2_GPIO_REG0          1
325 #define BCTV2_GPIO_REG1          3
326 
327 #define BCTV2_GR0_AUDIO_MODE     3
328 #define BCTV2_GR0_AUDIO_MAIN     0       /* main program */
329 #define BCTV2_GR0_AUDIO_SUB      3       /* sub program */
330 #define BCTV2_GR0_AUDIO_BOTH     1       /* main(L) + sub(R) */
331 #define BCTV2_GR0_AUDIO_MUTE     4       /* audio mute */
332 #define BCTV2_GR0_AUDIO_MONO     8       /* force mono */
333 
334 void
335 set_bctv2_audio( bktr_ptr_t bktr )
336 {
337         int data;
338 
339         switch (bktr->audio_mux_select) {
340         case 1:         /* external */
341         case 2:         /* internal */
342                 bctv2_gpio_write(bktr, BCTV2_GPIO_REG1, 0);
343                 break;
344         default:        /* tuner */
345                 bctv2_gpio_write(bktr, BCTV2_GPIO_REG1, 1);
346                 break;
347         }
348 /*      switch (bktr->audio_sap_select) { */
349         switch (BCTV2_AUDIO_BOTH) {
350         case BCTV2_AUDIO_SUB:
351                 data = BCTV2_GR0_AUDIO_SUB;
352                 break;
353         case BCTV2_AUDIO_BOTH:
354                 data = BCTV2_GR0_AUDIO_BOTH;
355                 break;
356         case BCTV2_AUDIO_MAIN:
357         default:
358                 data = BCTV2_GR0_AUDIO_MAIN;
359                 break;
360         }
361         if (bktr->audio_mute_state == TRUE)
362                 data |= BCTV2_GR0_AUDIO_MUTE;
363 
364         bctv2_gpio_write(bktr, BCTV2_GPIO_REG0, data);
365 
366         return;
367 }
368 
369 /* gpio_data bit assignment */
370 #define BCTV2_GPIO_ADDR_MASK     0x000300
371 #define BCTV2_GPIO_WE            0x000400
372 #define BCTV2_GPIO_OE            0x000800
373 #define BCTV2_GPIO_VAL_MASK      0x00f000
374 
375 #define BCTV2_GPIO_PORT_MASK     3
376 #define BCTV2_GPIO_ADDR_SHIFT    8
377 #define BCTV2_GPIO_VAL_SHIFT     12
378 
379 /* gpio_out_en value for read/write */
380 #define BCTV2_GPIO_OUT_RMASK     0x000f00
381 #define BCTV2_GPIO_OUT_WMASK     0x00ff00
382 
383 #define BCTV2_BITS       100
384 
385 void
386 bctv2_gpio_write( bktr_ptr_t bktr, int port, int val )
387 {
388         u_long data, outbits;
389 
390         port &= BCTV2_GPIO_PORT_MASK;
391         switch (port) {
392         case 1:
393         case 3:
394                 data = ((val << BCTV2_GPIO_VAL_SHIFT) & BCTV2_GPIO_VAL_MASK) |
395                        ((port << BCTV2_GPIO_ADDR_SHIFT) & BCTV2_GPIO_ADDR_MASK) |
396                        BCTV2_GPIO_WE | BCTV2_GPIO_OE;
397                 outbits = BCTV2_GPIO_OUT_WMASK;
398                 break;
399         default:
400                 return;
401         }
402         OUTL(bktr, BKTR_GPIO_OUT_EN, 0);
403         OUTL(bktr, BKTR_GPIO_DATA, data);
404         OUTL(bktr, BKTR_GPIO_OUT_EN, outbits);
405         DELAY(BCTV2_BITS);
406         OUTL(bktr, BKTR_GPIO_DATA, data & ~BCTV2_GPIO_WE);
407         DELAY(BCTV2_BITS);
408         OUTL(bktr, BKTR_GPIO_DATA, data);
409         DELAY(BCTV2_BITS);
410         OUTL(bktr, BKTR_GPIO_DATA, ~0);
411         OUTL(bktr, BKTR_GPIO_OUT_EN, 0);
412 }
413 
414 /* Not yet used
415 int
416 bctv2_gpio_read( bktr_ptr_t bktr, int port )
417 {
418         u_long data, outbits, ret;
419 
420         port &= BCTV2_GPIO_PORT_MASK;
421         switch (port) {
422         case 1:
423         case 3:
424                 data = ((port << BCTV2_GPIO_ADDR_SHIFT) & BCTV2_GPIO_ADDR_MASK) |
425                        BCTV2_GPIO_WE | BCTV2_GPIO_OE;
426                 outbits = BCTV2_GPIO_OUT_RMASK;
427                 break;
428         default:
429                 return( -1 );
430         }
431         OUTL(bktr, BKTR_GPIO_OUT_EN, 0);
432         OUTL(bktr, BKTR_GPIO_DATA, data);
433         OUTL(bktr, BKTR_GPIO_OUT_EN, outbits);
434         DELAY(BCTV2_BITS);
435         OUTL(bktr, BKTR_GPIO_DATA, data & ~BCTV2_GPIO_OE);
436         DELAY(BCTV2_BITS);
437         ret = INL(bktr, BKTR_GPIO_DATA);
438         DELAY(BCTV2_BITS);
439         OUTL(bktr, BKTR_GPIO_DATA, data);
440         DELAY(BCTV2_BITS);
441         OUTL(bktr, BKTR_GPIO_DATA, ~0);
442         OUTL(bktr, BKTR_GPIO_OUT_EN, 0);
443         return( (ret & BCTV2_GPIO_VAL_MASK) >> BCTV2_GPIO_VAL_SHIFT );
444 }
445 */
446 
447 /*
448  * setup the MSP34xx Stereo Audio Chip
449  * This uses the Auto Configuration Option on MSP3410D and MSP3415D chips
450  * and DBX mode selection for MSP3430G chips.
451  * For MSP3400C support, the full programming sequence is required and is
452  * not yet supported.
453  */
454 
455 /* Read the MSP version string */
456 void msp_read_id( bktr_ptr_t bktr ){
457     int rev1=0, rev2=0;
458     rev1 = msp_dpl_read(bktr, bktr->msp_addr, 0x12, 0x001e);
459     rev2 = msp_dpl_read(bktr, bktr->msp_addr, 0x12, 0x001f);
460 
461     sprintf(bktr->msp_version_string, "34%02d%c-%c%d",
462       (rev2>>8)&0xff, (rev1&0xff)+'@', ((rev1>>8)&0xff)+'@', rev2&0x1f);
463 
464 }
465 
466 
467 /* Configure the MSP chip to Auto-detect the audio format.
468  * For the MSP3430G, we use fast autodetect mode
469  * For the MSP3410/3415 there are two schemes for this
470  *  a) Fast autodetection - the chip is put into autodetect mode, and the function
471  *     returns immediatly. This works in most cases and is the Default Mode.
472  *  b) Slow mode. The function sets the MSP3410/3415 chip, then waits for feedback from
473  *     the chip and re-programs it if needed.
474  */
475 void msp_autodetect( bktr_ptr_t bktr ) {
476   int auto_detect, loops;
477   int stereo;
478 
479   /* MSP3430G - countries with mono and DBX stereo */
480   if (strncmp("3430G", bktr->msp_version_string, 5) == 0){
481 
482     msp_dpl_write(bktr, bktr->msp_addr, 0x10, 0x0030,0x2003);/* Enable Auto format detection */
483     msp_dpl_write(bktr, bktr->msp_addr, 0x10, 0x0020,0x0020);/* Standard Select Reg. = BTSC-Stereo*/
484     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x000E,0x2403);/* darned if I know */
485     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0008,0x0320);/* Source select = (St or A) */
486 					                     /* & Ch. Matrix = St */
487     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0000,0x7300);/* Set volume to 0db gain */
488   }
489 
490 
491   /* MSP3415D SPECIAL CASE Use the Tuner's Mono audio ouput for the MSP */
492   /* (for Hauppauge 44xxx card with Tuner Type 0x2a) */
493   else if (  ( (strncmp("3415D", bktr->msp_version_string, 5) == 0)
494                &&(bktr->msp_use_mono_source == 1)
495               )
496            || (bktr->slow_msp_audio == 2) ){
497     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0000, 0x7300); /* 0 db volume */
498     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x000d, 0x1900); /* scart prescale */
499     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0008, 0x0220); /* SCART | STEREO */
500     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0013, 0x0100); /* DSP In = MONO IN */
501   }
502 
503 
504   /* MSP3410/MSP3415 - countries with mono, stereo using 2 FM channels and NICAM */
505   /* FAST sound scheme */
506   else if (bktr->slow_msp_audio == 0) {
507     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0000,0x7300);/* Set volume to 0db gain */
508     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0008,0x0000);/* Spkr Source = default(FM/AM) */
509     msp_dpl_write(bktr, bktr->msp_addr, 0x10, 0x0020,0x0001);/* Enable Auto format detection */
510     msp_dpl_write(bktr, bktr->msp_addr, 0x10, 0x0021,0x0001);/* Auto selection of NICAM/MONO mode */
511   }
512 
513 
514   /* MSP3410/MSP3415 - European Countries where the fast MSP3410/3415 programming fails */
515   /* SLOW sound scheme */
516   else if ( bktr->slow_msp_audio == 1) {
517     msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0000,0x7300);/* Set volume to 0db gain */
518     msp_dpl_write(bktr, bktr->msp_addr, 0x10, 0x0020,0x0001);/* Enable Auto format detection */
519 
520     /* wait for 0.5s max for terrestrial sound autodetection */
521     loops = 10;
522     do {
523       DELAY(100000);
524       auto_detect = msp_dpl_read(bktr, bktr->msp_addr, 0x10, 0x007e);
525       loops++;
526     } while (auto_detect > 0xff && loops < 50);
527     if (bootverbose)printf ("%s: Result of autodetect after %dms: %d\n",
528 			    bktr_name(bktr), loops*10, auto_detect);
529 
530     /* Now set the audio baseband processing */
531     switch (auto_detect) {
532     case 0:                    /* no TV sound standard detected */
533       break;
534     case 2:                    /* M Dual FM */
535       break;
536     case 3:                    /* B/G Dual FM; German stereo */
537       /* Read the stereo detection value from DSP reg 0x0018 */
538       DELAY(20000);
539       stereo = msp_dpl_read(bktr, bktr->msp_addr, 0x12, 0x0018);
540       if (bootverbose)printf ("%s: Stereo reg 0x18 a: %d\n",
541 			      bktr_name(bktr), stereo);
542       DELAY(20000);
543       stereo = msp_dpl_read(bktr, bktr->msp_addr, 0x12, 0x0018);
544       if (bootverbose)printf ("%s: Stereo reg 0x18 b: %d\n",
545 			      bktr_name(bktr), stereo);
546       DELAY(20000);
547       stereo = msp_dpl_read(bktr, bktr->msp_addr, 0x12, 0x0018);
548       if (bootverbose)printf ("%s: Stereo reg 0x18 c: %d\n",
549 			      bktr_name(bktr), stereo);
550       if (stereo > 0x0100 && stereo < 0x8000) { /* Seems to be stereo */
551         msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0008,0x0020);/* Loudspeaker set stereo*/
552         /*
553           set spatial effect strength to 50% enlargement
554           set spatial effect mode b, stereo basewidth enlargment only
555         */
556         msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0005,0x3f28);
557       } else if (stereo > 0x8000) {    /* bilingual mode */
558         if (bootverbose) printf ("%s: Bilingual mode detected\n",
559 				 bktr_name(bktr));
560         msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0008,0x0000);/* Loudspeaker */
561         msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0005,0x0000);/* all spatial effects off */
562        } else {                 /* must be mono */
563         msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0008,0x0030);/* Loudspeaker */
564         /*
565           set spatial effect strength to 50% enlargement
566           set spatial effect mode a, stereo basewidth enlargment
567           and pseudo stereo effect with automatic high-pass filter
568         */
569         msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0005,0x3f08);
570       }
571 #if 0
572        /* The reset value for Channel matrix mode is FM/AM and SOUNDA/LEFT */
573        /* We would like STEREO instead val: 0x0020 */
574        msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0008,0x0020);/* Loudspeaker */
575        msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0009,0x0020);/* Headphone */
576        msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x000a,0x0020);/* SCART1 */
577        msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0041,0x0020);/* SCART2 */
578        msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x000b,0x0020);/* I2S */
579        msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x000c,0x0020);/* Quasi-Peak Detector Source */
580        msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x000e,0x0001);
581 #endif
582       break;
583     case 8:                    /* B/G FM NICAM */
584        msp_dpl_write(bktr, bktr->msp_addr, 0x10, 0x0021,0x0001);/* Auto selection of NICAM/MONO mode */
585        break;
586      case 9:                    /* L_AM NICAM or D/K*/
587      case 10:                   /* i-FM NICAM */
588        break;
589      default:
590        if (bootverbose) printf ("%s: Unknown autodetection result value: %d\n",
591 				bktr_name(bktr), auto_detect);
592      }
593 
594   }
595 
596 
597   /* uncomment the following line to enable the MSP34xx 1Khz Tone Generator */
598   /* turn your speaker volume down low before trying this */
599   /* msp_dpl_write(bktr, bktr->msp_addr, 0x12, 0x0014, 0x7f40); */
600 }
601 
602 /* Read the DPL version string */
603 void dpl_read_id( bktr_ptr_t bktr ){
604     int rev1=0, rev2=0;
605     rev1 = msp_dpl_read(bktr, bktr->dpl_addr, 0x12, 0x001e);
606     rev2 = msp_dpl_read(bktr, bktr->dpl_addr, 0x12, 0x001f);
607 
608     sprintf(bktr->dpl_version_string, "34%02d%c-%c%d",
609       ((rev2>>8)&0xff)-1, (rev1&0xff)+'@', ((rev1>>8)&0xff)+'@', rev2&0x1f);
610 }
611 
612 /* Configure the DPL chip to Auto-detect the audio format */
613 void dpl_autodetect( bktr_ptr_t bktr ) {
614 
615     /* The following are empiric values tried from the DPL35xx data sheet */
616     msp_dpl_write(bktr, bktr->dpl_addr, 0x12, 0x000c,0x0320);	/* quasi peak detector source dolby
617 								lr 0x03xx; quasi peak detector matrix
618 								stereo 0xXX20 */
619     msp_dpl_write(bktr, bktr->dpl_addr, 0x12, 0x0040,0x0060);	/* Surround decoder mode;
620 								ADAPTIVE/3D-PANORAMA, that means two
621 								speakers and no center speaker, all
622 								channels L/R/C/S mixed to L and R */
623     msp_dpl_write(bktr, bktr->dpl_addr, 0x12, 0x0041,0x0620);	/* surround source matrix;I2S2/STEREO*/
624     msp_dpl_write(bktr, bktr->dpl_addr, 0x12, 0x0042,0x1F00);	/* surround delay 31ms max */
625     msp_dpl_write(bktr, bktr->dpl_addr, 0x12, 0x0043,0x0000);	/* automatic surround input balance */
626     msp_dpl_write(bktr, bktr->dpl_addr, 0x12, 0x0044,0x4000);	/* surround spatial effect 50%
627 								recommended*/
628     msp_dpl_write(bktr, bktr->dpl_addr, 0x12, 0x0045,0x5400);	/* surround panorama effect 66%
629 								recommended with PANORAMA mode
630 								in 0x0040 set to panorama */
631 }
632 
633