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