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