sys/dev/video/bktr/bktr_audio.c

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