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