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