Tanguy / Windev, WDScript et Linux

/* ------------ TUNER_INFINEON_TUA6030 - PAL/SECAM/FM ------------ */
/*
Name          Byte  Bits 
                    MSB bit6 bit5 bit4 bit3 bit2 bit1 LSB
Write Data
Address Byte   ADB  1   1    0    0    0    MA1  MA0  R/W=0  >> I²C addr = 0xC0 (AS gnd) or 0xC2 (AS open)
Divider Byte 1 DB1  0   N14  N13  N12  N11  N10  N9   N8
Divider Byte 2 DB2  N7  N6   N5   N4   N3   N2   N1   N0
Control byte    CB  1   CP   T2   T1   T0   RSA  RSB  OS
Bandswitch byte BB  P7  P6   P5   P4   P3   P2   P1   P0
Auxiliary byte  AB* ATC AL2  AL1  AL0  0    0    0    0
* AB replaces BB when T2,T1,T0=0,1,1
 
Read data
Address byte   ADB  1   1    0    0    0    MA1  MA0  R/W=1
Status byte     SB  POR FL   1    1    AGC  A2   A1   A0
        ex:0x78 --> 0   1    1    1    1    0    0    0
                                ex:0x31 --> 0   0    1    1    0    0    0    1
                                
 *CB ******************
  * 0x80 CB: Control Byte
  * 0x40 CP: 280 uA charge pump (TV) / 0x00 60 uA charge pump (FM)
  * 0x20 T2: Set P4=fdiv output, P5=fref output
      or
    0x18 T1/T0: Auxiliary Byte will follow (otherwise byte BB will follow)
      or
    0x10 T1/T0: CP inactive (is in high-impedance state)
  * 0x06 RSA/B: Divider Ratio=64  : 62.5KHz  (fast picture search)
    0x04        Divider Ratio=24  : 166.7KHz
    0x02        Divider Ratio=128 : 31.25KHz (slow picture search)
    0x00        Divider Ratio=80  : 50KHz
  * 0x01 OS Disable tuning amplifier Vt (aka sleep)
 *BB ******************
    (only P01234 seem's to be connected to my tuner) - On philips P6=FM Mono ?
    0xF0 P4-7: NPN ports control bits  1: Port is active, VOUT= VCESAT 
    0x0F P0-3: PNP ports control bits  1: Port is active, VOUT= VCC-VCESAT, 0: inactive, high impedance state (default)
 *AB ******************
    0x80 ATC: AGC time constant bit 1: IAGC=9µA; dt=50ms
              default 0: IAGC=220nA; dt=2s
    AL2,1,0 0x40,0x20,0x10 AGC take-over point bits, 0x30 recommended by philips, but get flickers (0x20 too), 0x10 get less
 
 *Result SB ******************
  * 0x80 POR 1 at power on
  * 0x40 FL  1 PLL is locked
  * 0x08 AGC 1 Active
    0x04, 0x02, 0x01  Digital output of 5-level AGC (A2 A1 A0) 
    
  Recommended Bands limits
  PAL   RF input        Oscillator
  Band  min     max     min     max
  LOW   44.25   154.25  83.15   193.15
  MID   161.25  439.25  200.15  478.15
  HIGH  447.25  863.25  486.15  902.15
        
  NTSC
  LOW    55.25  127.25  101     173
  MID   133.25  361.25  179     407
  HIGH  367.25  801.25  413     847
 */
 
//static u8 tua6030_agc109[] = { 2, 0x80|0x00|0x18|0x06|0x01, 0x80|0x30 }; //bad for most of channels
//static u8 tua6030_agc106[] = { 2, 0x80|0x00|0x18|0x06|0x01, 0x80|0x40 };
//static u8 tua6030_noagc[]  = { 2, 0x80|0x00|0x18|0x06|0x01, 0x80|0x70 }; //good for most of channels
static u8 tua6030_extagc[]  = { 2, 0x80|0x00|0x18|0x06|0x01, 0x80|0x60 }; //good for all channels
 
//to check : if 0xc0 (or 0x80) here frequency ranges need to be changed (about +200Mhz for same canals),
static struct tuner_range tuner_infineon_tua6030_secam_ranges[] = {
        { 16 * 154.00 /*MHz*/, 0xc6, 0x01, },
        { 16 * 439.00 /*MHz*/, 0xc6, 0x02, },
        { 16 * 999.99        , 0xc6, 0x04, },
};
 
static struct tuner_range tuner_infineon_tua6030_pal_ranges[] = {
        { 16 * 158.00 /*MHz*/, 0xc6, 0x01, }, // LOW  ? not tested but working for FM
        { 16 * 443.00 /*MHz*/, 0xc6, 0x02, }, // MID  0x02/0x52 ok ! 17 chaines 176-435
        { 16 * 999.99        , 0xc6, 0x04, }, // HIGH 0x04 ok tf1 a m6 - verifier vers 670 - 800 830 850-860
};
 
static struct tuner_range tuner_infineon_tua6030_fm_ranges[] = {
        { 16 * 120.00 /*MHz*/, 0x80, 0x08, }, // 0x08 or 0x01
};
 
static struct tuner_params tuner_infineon_tua6030_params[] = {
  {
    .type   = TUNER_PARAM_TYPE_SECAM, //not used ?? (PAL) even with secam=L saa7134 module option,
    .ranges = tuner_infineon_tua6030_secam_ranges,
    .count  = ARRAY_SIZE(tuner_infineon_tua6030_secam_ranges),
    .has_tda9887 = 0,
    .port1_active = 1,
    .port2_active = 1,
    .port2_invert_for_secam_lc = 0,
  },
  {
    .type   = TUNER_PARAM_TYPE_PAL,
    .ranges = tuner_infineon_tua6030_pal_ranges,
    .count  = ARRAY_SIZE(tuner_infineon_tua6030_pal_ranges),
    .has_tda9887 = 0,
    .port1_active = 1,
    .port2_active = 1, //sinon pas de son
    .port2_invert_for_secam_lc = 0,
  },
  {
    .type   = TUNER_PARAM_TYPE_RADIO,
    .ranges = tuner_infineon_tua6030_fm_ranges,
    .count  = ARRAY_SIZE(tuner_infineon_tua6030_fm_ranges),
    .has_tda9887 = 1,
    .port1_active = 0,
    .port2_active = 1,
    .fm_gain_normal=1,
    .port1_set_for_fm_mono = 1,
    .port2_fm_high_sensitivity = 0, //needed
    .radio_if = 1,
  },
};

        [TUNER_INFINEON_TUA6030] = { /* Infineon PAL/SECAM/FM */
                .name   = "Infineon TUA6030",
                .params = tuner_infineon_tua6030_params,
                .count  = ARRAY_SIZE(tuner_infineon_tua6030_params),
                .initdata = tua6030_extagc,
                .sleepdata = tua6030_extagc,
        },      
        //Dummy tuner, bug <= tuner_count-1
        [TUNER_INFINEON_TUA6030] = { /* Infineon PAL/SECAM/FM */
                .name   = "Infineon TUA6030",
                .params = tuner_infineon_tua6030_params,
                .count  = ARRAY_SIZE(tuner_infineon_tua6030_params),
                .initdata = tua6030_extagc,
                .sleepdata = tua6030_extagc,
        },
};
EXPORT_SYMBOL(tuners);

static int simple_radio_bandswitch(struct dvb_frontend *fe, u8 *buffer)
{
        struct tuner_simple_priv *priv = fe->tuner_priv;
 
        switch (priv->type) {
        ...
        case TUNER_INFINEON_TUA6030:
                //keep tuner-types config !
                buffer[3] = 0x01;
                break;
        }
        ...
        return 0;
}

[SAA7134_BOARD_PCBASIC_TV_FM] = {
/* Tanguy Pruvot (fr) <tanguy.pruvot on gmail.com> */
 .name           = "PC-Basic TVBasic-FM (saa7130)",
 .audio_clock    = 0x00187de7,
 .tuner_type     = TUNER_INFINEON_TUA6030, //TUNER_PHILIPS_FM1216ME_MK3,
 .radio_type     = TUNER_INFINEON_TUA6030, //TUNER_PHILIPS_FM1216ME_MK3,
 .tuner_addr     = 0x60, // i2c = 0xC0
 .radio_addr     = 0x60, // i2c = 0xC0
 .gpiomask       = 0x0108000,
 .inputs = {{
  .name = name_tv,
  .vmux = 3,
  .amux = LINE2,
  .tv   = 1,
 },{
  .name = name_comp1,
  .vmux = 1,
  .amux = LINE1,
 },{
  .name = name_svideo,
  .vmux = 8,
  .amux = LINE1,
 }},
 .radio = {
  .name = name_radio,
  .amux = LINE2,
 },
 .mute = {
  .name = name_mute,
  .amux = LINE1,
  .gpio = 0, //enable remote
 },
},
 
//... and at the end of the file... weird but needed
 
  case SAA7134_BOARD_PCBASIC_TV_FM:
    if (dev->i2c_client.addr != 0x60) {
      printk("%s: SAA7134_BOARD_PCBASIC_TV_FM tuner i2c client address set from 0x%x to 0x60\n", 
                  dev->name, dev->i2c_client.addr);
      dev->i2c_client.addr = 0x60; //0xC0
    }
    break;
  } /* switch() */

        case SAA7134_BOARD_PCBASIC_TV_FM:
                ir_codes     = ir_codes_manli;
                mask_keycode = 0x003f00;
                mask_keyup   = 0x004000;
                polling      = 50; // ms
                break;
        }