#ifdef HAVE_XORG_CONFIG_H #include #endif #include #include #include #include #include "xf86.h" #include "xf86i2c.h" #include "fi1236.h" #include "tda9885.h" #include "i2c_def.h" #define NUM_TUNERS 8 const FI1236_parameters tuner_parms[NUM_TUNERS] = { /* 0 - FI1236 */ {733, 884, 12820, 2516, 7220, 0xA2, 0x94, 0x34, 0x8e}, /* !!!based on documentation - it should be: {733, 16*55.25, 16*801.25, 16*160, 16*454, 0xA0, 0x90, 0x30, 0x8e}, */ /* 1 - FI1216 */ {623, 16 * 48.75, 16 * 855.25, 16 * 170, 16 * 450, 0xA0, 0x90, 0x30, 0x8e}, /* 2 - TEMIC FN5AL */ {623, 16 * 45.75, 16 * 855.25, 16 * 169, 16 * 454, 0xA0, 0x90, 0x30, 0x8e}, /* 3 - MT2032.. */ {733, 768, 13760, 0, 0, 0, 0, 0, 0}, /* 4 - FI1246 */ {623, 16 * 45.75, 16 * 855.25, 16 * 170, 16 * 450, 0xA0, 0x90, 0x30, 0x8e}, /* 5 - FI1256 */ {623, 16 * 49.75, 16 * 863.25, 16 * 170, 16 * 450, 0xA0, 0x90, 0x30, 0x8e}, /* 6 - FI1236W */ /*{ 733, 884, 12820, 2516, 7220, 0x1, 0x2, 0x4, 0x8e }, */ {732, 16 * 55.25, 16 * 801.25, 16 * 160, 16 * 442, 0x1, 0x2, 0x4, 0x8e}, /* 7 - FM1216ME */ {623, 16 * 48.25, 16 * 863.25, 16 * 158.00, 16 * 442.00, 0x1, 0x2, 0x4, 0x8e} }; FI1236Ptr Detect_FI1236(I2CBusPtr b, I2CSlaveAddr addr) { FI1236Ptr f; I2CByte a; f = calloc(1, sizeof(FI1236Rec)); if (f == NULL) return NULL; f->d.DevName = strdup("FI12xx Tuner"); f->d.SlaveAddr = addr; f->d.pI2CBus = b; f->d.NextDev = NULL; f->d.StartTimeout = b->StartTimeout; f->d.BitTimeout = b->BitTimeout; f->d.AcknTimeout = b->AcknTimeout; f->d.ByteTimeout = b->ByteTimeout; f->type = TUNER_TYPE_FI1236; f->afc_timer_installed = FALSE; f->last_afc_hint = TUNER_OFF; f->video_if = 45.7812; if (!I2C_WriteRead(&(f->d), NULL, 0, &a, 1)) { free(f); return NULL; } FI1236_set_tuner_type(f, TUNER_TYPE_FI1236); if (!I2CDevInit(&(f->d))) { free(f); return NULL; } return f; } static void MT2032_dump_parameters(FI1236Ptr f, MT2032_parameters * m) { xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: input f_rf=%g f_if1=%g f_if2=%g f_ref=%g f_ifbw=%g f_step=%g\n", m->f_rf, m->f_if1, m->f_if2, m->f_ref, m->f_ifbw, m->f_step); xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: computed f_lo1=%g f_lo2=%g LO1I=%d LO2I=%d SEL=%d STEP=%d NUM=%d\n", m->f_lo1, m->f_lo2, m->LO1I, m->LO2I, m->SEL, m->STEP, m->NUM); } static void MT2032_getid(FI1236Ptr f) { CARD8 out[4]; CARD8 in; in = 0x11; I2C_WriteRead(&(f->d), (I2CByte *) &in, 1, out, 4); xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: Company code 0x%02x%02x, part code 0x%02x, revision code 0x%02x\n", out[0], out[1], out[2], out[3]); } /* might be buggy */ #if 0 static void MT2032_shutdown(FI1236Ptr f) { CARD8 data[10]; data[0] = 0x00; /* start with register 0x00 */ data[1] = 0x1A; data[2] = 0x44; data[3] = 0x20; I2C_WriteRead(&(f->d), (I2CByte *) data, 4, NULL, 0); data[0] = 0x05; /* now start with register 0x05 */ data[1] = 0xD7; data[2] = 0x14; data[3] = 0x05; I2C_WriteRead(&(f->d), (I2CByte *) data, 4, NULL, 0); data[0] = 0x0B; /* now start with register 0x05 */ data[1] = 0x8F; data[2] = 0x07; data[3] = 0x43; I2C_WriteRead(&(f->d), (I2CByte *) data, 4, NULL, 0); usleep(15000); } #endif static void MT2032_dump_status(FI1236Ptr f); static void MT2032_init(FI1236Ptr f) { CARD8 data[10]; CARD8 value; CARD8 xogc = 0x00; MT2032_getid(f); data[0] = 0x02; /* start with register 0x02 */ data[1] = 0xFF; data[2] = 0x0F; data[3] = 0x1F; I2C_WriteRead(&(f->d), (I2CByte *) data, 4, NULL, 0); data[0] = 0x06; /* now start with register 0x06 */ data[1] = 0xE4; data[2] = 0x8F; data[3] = 0xC3; data[4] = 0x4E; data[5] = 0xEC; I2C_WriteRead(&(f->d), (I2CByte *) data, 6, NULL, 0); data[0] = 0x0d; /* now start with register 0x0d */ data[1] = 0x32; I2C_WriteRead(&(f->d), (I2CByte *) data, 2, NULL, 0); while (1) { usleep(15000); /* wait 15 milliseconds */ data[0] = 0x0e; /* register number 7, status */ value = 0xFF; if (!I2C_WriteRead(&(f->d), (I2CByte *) data, 1, &value, 1)) xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: failed to read XOK\n"); xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: XOK=%d\n", value & 0x01); if (value & 1) break; data[0] = 0x07; if (!I2C_WriteRead(&(f->d), (I2CByte *) data, 1, &value, 1)) xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: failed to read XOGC\n"); xogc = value & 0x7; if (xogc == 4) break; /* XOGC has reached 4.. stop */ xogc--; xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: try XOGC=%d\n", xogc); usleep(15000); data[0] = 0x07; /* register number 7, control byte 2 */ data[1] = 0x08 | xogc; I2C_WriteRead(&(f->d), (I2CByte *) data, 2, NULL, 0); } f->xogc = xogc; /* wait before continuing */ usleep(15000); /* wait 50 milliseconds */ MT2032_dump_status(f); } static int MT2032_no_spur_in_band(MT2032_parameters * m) { int n_max, n1, n2; double f_test; n_max = 5; n1 = 1; while (1) { n2 = -n1; f_test = n1 * (m->f_lo1 - m->f_lo2); while (1) { n2--; f_test = f_test - m->f_lo2; xf86DrvMsg(0, X_INFO, "testing f_test=%g n1=%d n2=%d f_lo1=%g f_lo2=%g f_if2=%g\n", f_test, n1, n2, m->f_lo1, m->f_lo2, m->f_if2); xf86DrvMsg(0, X_INFO, "d_f=%g f_ifbw=%g\n", fabs(fabs(f_test) - m->f_if2), m->f_ifbw); if ((fabs(fabs(f_test) - m->f_if2) * 2.0) <= m->f_ifbw) return 0; if (n2 <= -n_max) break; /* this line in the manual is bogus. I say it is faster and more correct to go over all harmonics.. */ #if 0 if (f_test < (m->f_lo2 - m->f_if2 - m->f_ifbw)) break; #endif } n1++; if (n1 >= n_max) return 1; } } static void MT2032_calculate_register_settings(MT2032_parameters * m, double f_rf, double f_if1, double f_if2, double f_ref, double f_ifbw, double f_step) { int n; m->f_rf = f_rf; m->f_if1 = f_if1; m->f_if2 = f_if2; m->f_ref = f_ref; m->f_ifbw = f_ifbw; m->f_step = f_step; m->f_lo1 = f_rf + f_if1; m->LO1I = lrint(m->f_lo1 / f_ref); m->f_lo1 = f_ref * m->LO1I; m->f_lo2 = m->f_lo1 - f_rf - f_if2; /* check for spurs */ n = 1; while (n < 3) { if (MT2032_no_spur_in_band(m)) break; if (m->f_lo1 < (f_rf + f_if1)) m->LO1I += n; else m->LO1I -= n; m->f_lo1 = m->LO1I * f_ref; m->f_lo2 = m->f_lo1 - f_rf - f_if2; n++; } /* xf86DrvMsg(0, X_INFO, "MT2032: n=%d\n", n); */ /* select VCO */ /* m->f_lo1>1100.0 */ if (m->f_lo1 < 1370.0) m->SEL = 4; else if (m->f_lo1 < 1530.0) m->SEL = 3; else if (m->f_lo1 < 1720.0) m->SEL = 2; else if (m->f_lo1 < 1890.0) m->SEL = 1; else /* m->f_lo1 < 1958.0 */ m->SEL = 0; /* calculate the rest of the registers */ m->LO2I = floor(m->f_lo2 / f_ref); m->STEP = floor(3780.0 * f_step / f_ref); m->NUM = floor(3780.0 * (m->f_lo2 / f_ref - m->LO2I)); m->NUM = m->STEP * lrint((1.0 * m->NUM) / (1.0 * m->STEP)); } static int MT2032_wait_for_lock(FI1236Ptr f) { int n; CARD8 data[10]; CARD8 value; n = 12; while (1) { data[0] = 0x0e; /* register number 7, status */ I2C_WriteRead(&(f->d), (I2CByte *) data, 1, &value, 1); /* xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: LO1LK=%d LO2LK=%d\n", (value & 0x04)>>2, (value & 0x02)>>1); */ if ((value & 6) == 6) break; usleep(1500); n--; if (n < 0) break; } if (n < 0) { xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: failed to set frequency\n"); return 0; } return 1; } static void MT2032_implement_settings(FI1236Ptr f, MT2032_parameters * m) { CARD8 data[10]; CARD8 value; data[0] = 0x00; /* start with register 0x00 */ data[1] = (m->LO1I >> 3) - 1; data[2] = (m->SEL << 4) | (m->LO1I & 0x7); data[3] = 0x86; I2C_WriteRead(&(f->d), (I2CByte *) data, 4, NULL, 0); data[0] = 0x05; /* start with register 0x05 */ data[1] = ((m->LO2I & 0x7) << 5) | ((m->LO2I >> 3) - 1); if (m->f_rf < 400.0) data[2] = 0xe4; else data[2] = 0xf4; I2C_WriteRead(&(f->d), (I2CByte *) data, 3, NULL, 0); data[0] = 0x07; /* register number 7, control byte 2 */ I2C_WriteRead(&(f->d), (I2CByte *) data, 1, &value, 1); xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: using XOGC=%d\n", (value & 0x07)); data[1] = 8 | (value & 0x7); I2C_WriteRead(&(f->d), (I2CByte *) data, 2, NULL, 0); data[0] = 0x0b; /* start with register 0x0b */ data[1] = m->NUM & 0xff; data[2] = (1 << 7) | ((m->NUM >> 8) & 0x0f); I2C_WriteRead(&(f->d), (I2CByte *) data, 3, NULL, 0); MT2032_wait_for_lock(f); } static void MT2032_optimize_VCO(FI1236Ptr f, MT2032_parameters * m) { CARD8 data[10]; CARD8 value; CARD8 TAD1; data[0] = 0x0f; /* register number 7, status */ I2C_WriteRead(&(f->d), (I2CByte *) data, 1, &value, 1); TAD1 = value & 0x07; xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: TAD1=%d SEL=%d\n", TAD1, m->SEL); if (TAD1 < 2) return; if (TAD1 == 2) { if (m->SEL == 0) return; m->SEL--; } else { if (m->SEL >= 4) return; m->SEL++; } data[0] = 0x01; /* start with register 1 */ data[1] = (m->SEL << 4) | (m->LO1I & 0x7); I2C_WriteRead(&(f->d), (I2CByte *) data, 2, NULL, 0); } static int FI1236_get_afc_hint(FI1236Ptr f) { CARD8 out; CARD8 AFC; if ((f->type == TUNER_TYPE_FM1216ME) || (f->type == TUNER_TYPE_FI1236W)) { TDA9885Ptr t = (TDA9885Ptr) f->afc_source; if (t == NULL) return TUNER_OFF; tda9885_getstatus(t); tda9885_dumpstatus(t); AFC = t->afc_status & 0x0f; xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "AFC: FI1236_get_afc_hint: %i\n", AFC); if (AFC == 0) return TUNER_TUNED; else if (AFC <= 0x07) return TUNER_JUST_BELOW; else if (AFC < 0x0f) return TUNER_JUST_ABOVE; else if (AFC == 0x0f) return TUNER_TUNED; } else { I2C_WriteRead(&(f->d), NULL, 0, &out, 1); AFC = out & 0x7; xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "AFC: FI1236_get_afc_hint: %i\n", AFC); if (AFC == 2) return TUNER_TUNED; if (AFC == 3) return TUNER_JUST_BELOW; if (AFC == 1) return TUNER_JUST_ABOVE; return TUNER_OFF; } return TUNER_OFF; } static int MT2032_get_afc_hint(FI1236Ptr f) { CARD8 in; CARD8 out[2]; CARD8 AFC; in = 0x0e; I2C_WriteRead(&(f->d), (I2CByte *) &in, 1, out, 2); AFC = (out[0] >> 4) & 0x7; #if 0 xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "AFC=%d TAD1=%d TAD2=%d\n", AFC, out[1] & 0x7, (out[1] >> 4) & 0x07); #endif if (AFC == 2) return TUNER_TUNED; if (AFC == 3) return TUNER_JUST_BELOW; if (AFC == 1) return TUNER_JUST_ABOVE; return TUNER_OFF; } /* this function is for external use only */ int TUNER_get_afc_hint(FI1236Ptr f) { if (f->afc_timer_installed) return TUNER_STILL_TUNING; return f->last_afc_hint; } static void MT2032_dump_status(FI1236Ptr f) { CARD8 in; CARD8 out[2]; CARD8 AFC; CARD8 LDONrb; CARD8 LO1LK, LO2LK, XOK; CARD8 TAD2, TAD1; in = 0x0e; I2C_WriteRead(&(f->d), (I2CByte *) &in, 1, out, 2); XOK = out[0] & 1; LO1LK = (out[0] >> 2) & 1; LO2LK = (out[0] >> 1) & 1; LDONrb = (out[0] >> 3) & 1; AFC = (out[0] >> 4) & 0x7; TAD1 = (out[1] & 0x7); TAD2 = (out[1] >> 4) & 0x7; xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: status: XOK=%d LO1LK=%d LO2LK=%d LDONrb=%d AFC=%d TAD1=%d TAD2=%d\n", XOK, LO1LK, LO2LK, LDONrb, AFC, TAD1, TAD2); xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: status: OSCILLATOR:%s PLL1:%s PLL2:%s\n", XOK ? "ok" : "off", LO1LK ? "locked" : "off", LO2LK ? "locked" : "off"); } static void MT2032_tune(FI1236Ptr f, double freq, double step) { MT2032_parameters m; CARD8 data[10]; int i; /* NTSC IF is 44mhz.. but 733/16=45.8125 and all TDAXXXX docs mention 45.75, 39, 58.75 and 30. */ #if 0 MT2032_calculate_register_settings(&m, freq, 1090.0, 45.125, 5.25, 6.0, step); MT2032_calculate_register_settings(&m, freq, 1090.0, 45.74, 5.25, 6.0, step); #endif MT2032_calculate_register_settings(&m, freq, 1090.0, f->video_if, 5.25, 3.0, step); MT2032_dump_parameters(f, &m); MT2032_implement_settings(f, &m); /* MT2032_dump_parameters(f, &m); */ for (i = 0; i < 3; i++) { MT2032_optimize_VCO(f, &m); if (MT2032_wait_for_lock(f)) { data[0] = 0x02; /* LO Gain control register 0x02 */ data[1] = 0x20; I2C_WriteRead(&(f->d), (I2CByte *) data, 2, NULL, 0); return; } data[0] = 0x07; data[1] = 0x88 | f->xogc; I2C_WriteRead(&(f->d), (I2CByte *) data, 2, NULL, 0); usleep(15000); data[1] = 0x08 | f->xogc; I2C_WriteRead(&(f->d), (I2CByte *) data, 2, NULL, 0); } xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "MT2032: failed to set frequency\n"); } void FI1236_set_tuner_type(FI1236Ptr f, int type) { f->type = type; if (type >= NUM_TUNERS) type = NUM_TUNERS - 1; if (type < 0) type = 0; memcpy(&(f->parm), &(tuner_parms[type]), sizeof(FI1236_parameters)); f->original_frequency = f->parm.min_freq; f->afc_delta = 0; if (type == TUNER_TYPE_MT2032) { MT2032_init(f); return; } } static CARD32 AFC_TimerCallback(OsTimerPtr timer, CARD32 time, pointer data) { FI1236Ptr f = (FI1236Ptr) data; if (FI1236_AFC(f)) return 150; else { f->afc_timer_installed = FALSE; f->afc_count = 0; return 0; } } void FI1236_tune(FI1236Ptr f, CARD32 frequency) { CARD16 divider; CARD8 data; if (frequency < f->parm.min_freq) frequency = f->parm.min_freq; if (frequency > f->parm.max_freq) frequency = f->parm.max_freq; divider = (f->parm.fcar + (CARD16) frequency) & 0x7fff; f->tuner_data.div1 = (CARD8) ((divider >> 8) & 0x7f); f->tuner_data.div2 = (CARD8) (divider & 0xff); f->tuner_data.control = f->parm.control; if (frequency < f->parm.threshold1) f->tuner_data.band = f->parm.band_low; else if (frequency < f->parm.threshold2) f->tuner_data.band = f->parm.band_mid; else f->tuner_data.band = f->parm.band_high; xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "Setting tuner band to %d\n", f->tuner_data.band); xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "Setting tuner frequency to %d\n", (int) frequency); if ((f->type == TUNER_TYPE_FM1216ME) || (f->type == TUNER_TYPE_FI1236W)) { f->tuner_data.aux = 0x20; I2C_WriteRead(&(f->d), (I2CByte *) &(f->tuner_data), 5, NULL, 0); I2C_WriteRead(&(f->d), NULL, 0, &data, 1); xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "Tuner status %x\n", data); } else I2C_WriteRead(&(f->d), (I2CByte *) &(f->tuner_data), 4, NULL, 0); } void TUNER_set_frequency(FI1236Ptr f, CARD32 frequency) { if (frequency < f->parm.min_freq) frequency = f->parm.min_freq; if (frequency > f->parm.max_freq) frequency = f->parm.max_freq; f->afc_delta = 0; f->original_frequency = frequency; if (f->type == TUNER_TYPE_MT2032) MT2032_tune(f, (1.0 * frequency) / 16.0, 0.0625); else FI1236_tune(f, frequency); if (!f->afc_timer_installed) { f->afc_timer_installed = TRUE; /* RegisterBlockAndWakeupHandlers(FI1236_BlockHandler, AFCWakeup, f); */ TimerSet(NULL, 0, 300, AFC_TimerCallback, f); } } int FI1236_AFC(FI1236Ptr f) { #if 0 xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "AFC: f=%p f->count=%d f->original_frequency=%d f->afc_delta=%d\n", f, f->afc_count, f->original_frequency, f->afc_delta); #endif f->afc_count++; if (f->type == TUNER_TYPE_MT2032) { f->last_afc_hint = MT2032_get_afc_hint(f); xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "AFC: afc_hint=%d\n", f->last_afc_hint); if (f->last_afc_hint == TUNER_TUNED) return 0; if (f->afc_count > 3) f->last_afc_hint = TUNER_OFF; if (f->last_afc_hint == TUNER_OFF) f->afc_delta = 0; else f->afc_delta += f->last_afc_hint; xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "AFC: Setting tuner frequency to %g\n", (0.5 * (2 * f->original_frequency + f->afc_delta)) / 16.0); MT2032_tune(f, (1.0 * f->original_frequency + 0.5 * f->afc_delta) / 16.0, 0.03125); if (f->last_afc_hint == TUNER_OFF) return 0; return 1; /* call me again */ } else { f->last_afc_hint = FI1236_get_afc_hint(f); if (f->last_afc_hint == TUNER_TUNED) { xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "AFC: TUNER_TUNNED\n"); return 0; } if (f->afc_count > 3) f->last_afc_hint = TUNER_OFF; if (f->last_afc_hint == TUNER_OFF) f->afc_delta = 0; else f->afc_delta += f->last_afc_hint; xf86DrvMsg(f->d.pI2CBus->scrnIndex, X_INFO, "AFC: Setting tuner frequency to %g\n", (0.5 * (2 * f->original_frequency + f->afc_delta)) / 16.0); FI1236_tune(f, f->original_frequency + f->afc_delta); if (f->last_afc_hint == TUNER_OFF) return 0; return 1; /* call me again */ } return 0; /* done */ } void fi1236_dump_status(FI1236Ptr f) { if (f->type == TUNER_TYPE_MT2032) MT2032_dump_status(f); }