sys/dev/video/bktr/bktr_audio.c

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