Home | History | Annotate | Line # | Download | only in bktr
      1 /* $Sourceforge: bktr_tuner.c,v 1.5 2003/03/13 22:21:04 emsi Exp $ */
      2 
      3 /*	$NetBSD: bktr_tuner.c,v 1.13 2021/12/19 22:03:41 andvar Exp $	*/
      4 /* $FreeBSD: src/sys/dev/bktr/bktr_tuner.c,v 1.9 2000/10/19 07:33:28 roger Exp$ */
      5 
      6 /*
      7  * This is part of the Driver for Video Capture Cards (Frame grabbers)
      8  * and TV Tuner cards using the Brooktree Bt848, Bt848A, Bt849A, Bt878, Bt879
      9  * chipset.
     10  * Copyright Roger Hardiman and Amancio Hasty.
     11  *
     12  * bktr_tuner : This deals with controlling the tuner fitted to TV cards.
     13  *
     14  */
     15 
     16 /*
     17  * 1. Redistributions of source code must retain the
     18  * Copyright (c) 1997 Amancio Hasty, 1999 Roger Hardiman
     19  * All rights reserved.
     20  *
     21  * Redistribution and use in source and binary forms, with or without
     22  * modification, are permitted provided that the following conditions
     23  * are met:
     24  * 1. Redistributions of source code must retain the above copyright
     25  *    notice, this list of conditions and the following disclaimer.
     26  * 2. Redistributions in binary form must reproduce the above copyright
     27  *    notice, this list of conditions and the following disclaimer in the
     28  *    documentation and/or other materials provided with the distribution.
     29  * 3. All advertising materials mentioning features or use of this software
     30  *    must display the following acknowledgement:
     31  *      This product includes software developed by Amancio Hasty and
     32  *      Roger Hardiman
     33  * 4. The name of the author may not be used to endorse or promote products
     34  *    derived from this software without specific prior written permission.
     35  *
     36  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     37  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
     38  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
     39  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
     40  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
     41  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
     42  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     43  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
     44  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
     45  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     46  * POSSIBILITY OF SUCH DAMAGE.
     47  */
     48 
     49 #include <sys/cdefs.h>
     50 __KERNEL_RCSID(0, "$NetBSD: bktr_tuner.c,v 1.13 2021/12/19 22:03:41 andvar Exp $");
     51 
     52 #include <sys/param.h>
     53 #include <sys/systm.h>
     54 #include <sys/kernel.h>
     55 #include <sys/vnode.h>
     56 #ifdef __NetBSD__
     57 #include <sys/proc.h>
     58 #endif
     59 
     60 #ifdef __FreeBSD__
     61 #include <pci/pcivar.h>
     62 
     63 #if (__FreeBSD_version < 500000)
     64 #include <machine/clock.h>              /* for DELAY */
     65 #endif
     66 
     67 #if (__FreeBSD_version >=300000)
     68 #include <machine/bus_memio.h>          /* for bus space */
     69 #include <sys/bus.h>
     70 #include <sys/bus.h>
     71 #endif
     72 #endif
     73 
     74 #ifdef __NetBSD__
     75 #include <dev/ic/bt8xx.h>	/* NetBSD .h file location */
     76 #include <dev/pci/bktr/bktr_reg.h>
     77 #include <dev/pci/bktr/bktr_tuner.h>
     78 #include <dev/pci/bktr/bktr_card.h>
     79 #include <dev/pci/bktr/bktr_core.h>
     80 #else
     81 #include <machine/ioctl_meteor.h>	/* Traditional .h file location */
     82 #include <machine/ioctl_bt848.h>        /* extensions to ioctl_meteor.h */
     83 #include <dev/bktr/bktr_reg.h>
     84 #include <dev/bktr/bktr_tuner.h>
     85 #include <dev/bktr/bktr_card.h>
     86 #include <dev/bktr/bktr_core.h>
     87 #endif
     88 
     89 
     90 
     91 #if defined(TUNER_AFC)
     92 #define AFC_DELAY               10000   /* 10 milliseconds delay */
     93 #define AFC_BITS                0x07
     94 #define AFC_FREQ_MINUS_125      0x00
     95 #define AFC_FREQ_MINUS_62       0x01
     96 #define AFC_FREQ_CENTERED       0x02
     97 #define AFC_FREQ_PLUS_62        0x03
     98 #define AFC_FREQ_PLUS_125       0x04
     99 #define AFC_MAX_STEP            (5 * FREQFACTOR) /* no more than 5 MHz */
    100 #endif /* TUNER_AFC */
    101 
    102 
    103 #define TTYPE_XXX               0
    104 #define TTYPE_NTSC              1
    105 #define TTYPE_NTSC_J            2
    106 #define TTYPE_PAL               3
    107 #define TTYPE_PAL_M             4
    108 #define TTYPE_PAL_N             5
    109 #define TTYPE_SECAM             6
    110 
    111 #define TSA552x_CB_MSB          (0x80)
    112 #define TSA552x_CB_CP           (1<<6)	/* set this for fast tuning */
    113 #define TSA552x_CB_T2           (1<<5)	/* test mode - Normally set to 0 */
    114 #define TSA552x_CB_T1           (1<<4)	/* test mode - Normally set to 0 */
    115 #define TSA552x_CB_T0           (1<<3)	/* test mode - Normally set to 1 */
    116 #define TSA552x_CB_RSA          (1<<2)	/* 0 for 31.25 kHz, 1 for 62.5 kHz */
    117 #define TSA552x_CB_RSB          (1<<1)	/* 0 for FM 50kHz steps, 1 = Use RSA*/
    118 #define TSA552x_CB_OS           (1<<0)	/* Set to 0 for normal operation */
    119 
    120 #define TSA552x_RADIO           (TSA552x_CB_MSB |       \
    121                                  TSA552x_CB_T0)
    122 
    123 /* raise the charge pump voltage for fast tuning */
    124 #define TSA552x_FCONTROL        (TSA552x_CB_MSB |       \
    125                                  TSA552x_CB_CP  |       \
    126                                  TSA552x_CB_T0  |       \
    127                                  TSA552x_CB_RSA |       \
    128                                  TSA552x_CB_RSB)
    129 
    130 /* lower the charge pump voltage for better residual oscillator FM */
    131 #define TSA552x_SCONTROL        (TSA552x_CB_MSB |       \
    132                                  TSA552x_CB_T0  |       \
    133                                  TSA552x_CB_RSA |       \
    134                                  TSA552x_CB_RSB)
    135 
    136 /* The control value for the ALPS TSCH5 Tuner */
    137 #define TSCH5_FCONTROL          0x82
    138 #define TSCH5_RADIO             0x86
    139 
    140 /* The control value for the ALPS TSBH1 Tuner */
    141 #define TSBH1_FCONTROL		0xce
    142 
    143 
    144 static const struct TUNER tuners[] = {
    145 /* XXX FIXME: fill in the band-switch crosspoints */
    146 	/* NO_TUNER */
    147 	{ "<no>",				/* the 'name' */
    148 	   TTYPE_XXX,				/* input type */
    149  	   { 0x00,				/* control byte for Tuner PLL */
    150  	     0x00,
    151  	     0x00,
    152  	     0x00 },
    153 	   { 160, 454 },			/* band-switch crosspoints */
    154 	   { 0x00, 0x00, 0x00,0x00} },		/* the band-switch values */
    155 
    156 	/* TEMIC_NTSC */
    157 	{ "Temic NTSC",				/* the 'name' */
    158 	   TTYPE_NTSC,				/* input type */
    159 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
    160 	     TSA552x_SCONTROL,
    161 	     TSA552x_SCONTROL,
    162 	     0x00 },
    163 	   { 160, 454 },			/* band-switch crosspoints */
    164 	   { 0x02, 0x04, 0x01, 0x00 } },	/* the band-switch values */
    165 
    166 	/* TEMIC_PAL */
    167 	{ "Temic PAL",				/* the 'name' */
    168 	   TTYPE_PAL,				/* input type */
    169 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
    170 	     TSA552x_SCONTROL,
    171 	     TSA552x_SCONTROL,
    172 	     0x00 },
    173 	   { 160, 454 },			/* band-switch crosspoints */
    174 	   { 0x02, 0x04, 0x01, 0x00 } },	/* the band-switch values */
    175 
    176 	/* TEMIC_SECAM */
    177 	{ "Temic SECAM",			/* the 'name' */
    178 	   TTYPE_SECAM,				/* input type */
    179 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
    180 	     TSA552x_SCONTROL,
    181 	     TSA552x_SCONTROL,
    182 	     0x00 },
    183 	   { 160, 454 },			/* band-switch crosspoints */
    184 	   { 0x02, 0x04, 0x01,0x00 } },		/* the band-switch values */
    185 
    186 	/* PHILIPS_NTSC */
    187 	{ "Philips NTSC",			/* the 'name' */
    188 	   TTYPE_NTSC,				/* input type */
    189 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
    190 	     TSA552x_SCONTROL,
    191 	     TSA552x_SCONTROL,
    192 	     0x00 },
    193 	   { 160, 454 },			/* band-switch crosspoints */
    194 	   { 0xa0, 0x90, 0x30, 0x00 } },	/* the band-switch values */
    195 
    196 	/* PHILIPS_PAL */
    197 	{ "Philips PAL",			/* the 'name' */
    198 	   TTYPE_PAL,				/* input type */
    199 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
    200 	     TSA552x_SCONTROL,
    201 	     TSA552x_SCONTROL,
    202 	     0x00 },
    203 	   { 160, 454 },			/* band-switch crosspoints */
    204 	   { 0xa0, 0x90, 0x30, 0x00 } },	/* the band-switch values */
    205 
    206 	/* PHILIPS_SECAM */
    207 	{ "Philips SECAM",			/* the 'name' */
    208 	   TTYPE_SECAM,				/* input type */
    209 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
    210 	     TSA552x_SCONTROL,
    211 	     TSA552x_SCONTROL,
    212 	     0x00 },
    213 	   { 160, 454 },			/* band-switch crosspoints */
    214 	   { 0xa7, 0x97, 0x37, 0x00 } },	/* the band-switch values */
    215 
    216 	/* TEMIC_PAL I */
    217 	{ "Temic PAL I",			/* the 'name' */
    218 	   TTYPE_PAL,				/* input type */
    219 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
    220 	     TSA552x_SCONTROL,
    221 	     TSA552x_SCONTROL,
    222 	     0x00 },
    223 	   { 160, 454 },			/* band-switch crosspoints */
    224 	   { 0x02, 0x04, 0x01,0x00 } },		/* the band-switch values */
    225 
    226 	/* PHILIPS_PALI */
    227 	{ "Philips PAL I",			/* the 'name' */
    228 	   TTYPE_PAL,				/* input type */
    229 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
    230 	     TSA552x_SCONTROL,
    231 	     TSA552x_SCONTROL,
    232 	     0x00 },
    233 	   { 160, 454 },			/* band-switch crosspoints */
    234           { 0xa0, 0x90, 0x30,0x00 } },         /* the band-switch values */
    235 
    236        /* PHILIPS_FR1236_NTSC */
    237        { "Philips FR1236 NTSC FM",             /* the 'name' */
    238           TTYPE_NTSC,                          /* input type */
    239 	  { TSA552x_FCONTROL,			/* control byte for Tuner PLL */
    240 	    TSA552x_FCONTROL,
    241 	    TSA552x_FCONTROL,
    242 	    TSA552x_RADIO  },
    243 	   { 160, 454 },			/* band-switch crosspoints */
    244 	  { 0xa0, 0x90, 0x30,0xa4 } },		/* the band-switch values */
    245 
    246 	/* PHILIPS_FR1216_PAL */
    247 	{ "Philips FR1216 PAL FM" ,		/* the 'name' */
    248 	   TTYPE_PAL,				/* input type */
    249 	   { TSA552x_FCONTROL,			/* control byte for Tuner PLL */
    250 	     TSA552x_FCONTROL,
    251 	     TSA552x_FCONTROL,
    252 	     TSA552x_RADIO },
    253 	   { 160, 454 },			/* band-switch crosspoints */
    254 	   { 0xa0, 0x90, 0x30, 0xa4 } },	/* the band-switch values */
    255 
    256 	/* PHILIPS_FR1236_SECAM */
    257 	{ "Philips FR1236 SECAM FM",		/* the 'name' */
    258 	   TTYPE_SECAM,				/* input type */
    259 	   { TSA552x_FCONTROL,			/* control byte for Tuner PLL */
    260 	     TSA552x_FCONTROL,
    261 	     TSA552x_FCONTROL,
    262 	     TSA552x_RADIO },
    263 	   { 160, 454 },			/* band-switch crosspoints */
    264 	   { 0xa7, 0x97, 0x37, 0xa4 } },	/* the band-switch values */
    265 
    266         /* ALPS TSCH5 NTSC */
    267         { "ALPS TSCH5 NTSC FM",                 /* the 'name' */
    268            TTYPE_NTSC,                          /* input type */
    269            { TSCH5_FCONTROL,                    /* control byte for Tuner PLL */
    270              TSCH5_FCONTROL,
    271              TSCH5_FCONTROL,
    272              TSCH5_RADIO },
    273 	   { 160, 454 },			/* band-switch crosspoints */
    274            { 0x14, 0x12, 0x11, 0x04 } },        /* the band-switch values */
    275 
    276         /* ALPS TSBH1 NTSC */
    277         { "ALPS TSBH1 NTSC",                    /* the 'name' */
    278            TTYPE_NTSC,                          /* input type */
    279            { TSBH1_FCONTROL,                    /* control byte for Tuner PLL */
    280              TSBH1_FCONTROL,
    281              TSBH1_FCONTROL,
    282              0x00 },
    283 	   { 160, 454 },			/* band-switch crosspoints */
    284            { 0x01, 0x02, 0x08, 0x00 } }         /* the band-switch values */
    285 };
    286 
    287 
    288 /* scaling factor for frequencies expressed as ints */
    289 #define FREQFACTOR		16
    290 
    291 /*
    292  * Format:
    293  *	entry 0:         MAX legal channel
    294  *	entry 1:         IF frequency
    295  *			 expressed as fi{MHz} * 16,
    296  *			 eg 45.75MHz == 45.75 * 16 = 732
    297  *	entry 2:         [place holder/future]
    298  *	entry 3:         base of channel record 0
    299  *	entry 3 + (x*3): base of channel record 'x'
    300  *	entry LAST:      NULL channel entry marking end of records
    301  *
    302  * Record:
    303  *	int 0:		base channel
    304  *	int 1:		frequency of base channel,
    305  *			 expressed as fb{MHz} * 16,
    306  *	int 2:		offset frequency between channels,
    307  *			 expressed as fo{MHz} * 16,
    308  */
    309 
    310 /*
    311  * North American Broadcast Channels:
    312  *
    313  *  2:  55.25 MHz -  4:  67.25 MHz
    314  *  5:  77.25 MHz -  6:	 83.25 MHz
    315  *  7: 175.25 MHz - 13:	211.25 MHz
    316  * 14: 471.25 MHz - 83:	885.25 MHz
    317  *
    318  * IF freq: 45.75 MHz
    319  */
    320 #define OFFSET	6.00
    321 static const int nabcst[] = {
    322 	83,	(int)( 45.75 * FREQFACTOR),	0,
    323 	14,	(int)(471.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    324 	 7,	(int)(175.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    325 	 5,	(int)( 77.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    326 	 2,	(int)( 55.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    327 	 0
    328 };
    329 #undef OFFSET
    330 
    331 /*
    332  * North American Cable Channels, IRC:
    333  *
    334  *  2:  55.25 MHz -  4:  67.25 MHz
    335  *  5:  77.25 MHz -  6:  83.25 MHz
    336  *  7: 175.25 MHz - 13: 211.25 MHz
    337  * 14: 121.25 MHz - 22: 169.25 MHz
    338  * 23: 217.25 MHz - 94: 643.25 MHz
    339  * 95:  91.25 MHz - 99: 115.25 MHz
    340  *
    341  * IF freq: 45.75 MHz
    342  */
    343 #define OFFSET	6.00
    344 static const int irccable[] = {
    345 	116,	(int)( 45.75 * FREQFACTOR),	0,
    346 	100,	(int)(649.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    347 	 95,	(int)( 91.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    348 	 23,	(int)(217.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    349 	 14,	(int)(121.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    350 	  7,	(int)(175.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    351 	  5,	(int)( 77.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    352 	  2,	(int)( 55.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    353 	  0
    354 };
    355 #undef OFFSET
    356 
    357 /*
    358  * North American Cable Channels, HRC:
    359  *
    360  * 2:   54 MHz  - 4:    66 MMz
    361  * 5:   78 MHz  - 6:    84 MHz
    362  * 7:  174 MHz  - 13:  210 MHz
    363  * 14: 120 MHz  - 22:  168 MHz
    364  * 23: 216 MHz  - 94:  642 MHz
    365  * 95:  90 MHz  - 99:  114 MHz
    366  *
    367  * IF freq: 45.75 MHz
    368  */
    369 #define OFFSET  6.00
    370 static const int hrccable[] = {
    371 	116,	(int)( 45.75 * FREQFACTOR),	0,
    372 	100,	(int)(648.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    373 	 95,	(int)( 90.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    374 	 23,	(int)(216.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    375 	 14,	(int)(120.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    376 	  7,	(int)(174.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    377 	  5,	(int)( 78.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    378 	  2,	(int)( 54.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    379 	  0
    380 };
    381 #undef OFFSET
    382 
    383 /*
    384  * Western European broadcast channels:
    385  *
    386  * (there are others that appear to vary between countries - rmt)
    387  *
    388  * here's the table Philips provides:
    389  * caution, some of the offsets don't compute...
    390  *
    391  *  1	 4525	700	N21
    392  *
    393  *  2	 4825	700	E2
    394  *  3	 5525	700	E3
    395  *  4	 6225	700	E4
    396  *
    397  *  5	17525	700	E5
    398  *  6	18225	700	E6
    399  *  7	18925	700	E7
    400  *  8	19625	700	E8
    401  *  9	20325	700	E9
    402  * 10	21025	700	E10
    403  * 11	21725	700	E11
    404  * 12	22425	700	E12
    405  *
    406  * 13	 5375	700	ITA
    407  * 14	 6225	700	ITB
    408  *
    409  * 15	 8225	700	ITC
    410  *
    411  * 16	17525	700	ITD
    412  * 17	18325	700	ITE
    413  *
    414  * 18	19225	700	ITF
    415  * 19	20125	700	ITG
    416  * 20	21025	700	ITH
    417  *
    418  * 21	47125	800	E21
    419  * 22	47925	800	E22
    420  * 23	48725	800	E23
    421  * 24	49525	800	E24
    422  * 25	50325	800	E25
    423  * 26	51125	800	E26
    424  * 27	51925	800	E27
    425  * 28	52725	800	E28
    426  * 29	53525	800	E29
    427  * 30	54325	800	E30
    428  * 31	55125	800	E31
    429  * 32	55925	800	E32
    430  * 33	56725	800	E33
    431  * 34	57525	800	E34
    432  * 35	58325	800	E35
    433  * 36	59125	800	E36
    434  * 37	59925	800	E37
    435  * 38	60725	800	E38
    436  * 39	61525	800	E39
    437  * 40	62325	800	E40
    438  * 41	63125	800	E41
    439  * 42	63925	800	E42
    440  * 43	64725	800	E43
    441  * 44	65525	800	E44
    442  * 45	66325	800	E45
    443  * 46	67125	800	E46
    444  * 47	67925	800	E47
    445  * 48	68725	800	E48
    446  * 49	69525	800	E49
    447  * 50	70325	800	E50
    448  * 51	71125	800	E51
    449  * 52	71925	800	E52
    450  * 53	72725	800	E53
    451  * 54	73525	800	E54
    452  * 55	74325	800	E55
    453  * 56	75125	800	E56
    454  * 57	75925	800	E57
    455  * 58	76725	800	E58
    456  * 59	77525	800	E59
    457  * 60	78325	800	E60
    458  * 61	79125	800	E61
    459  * 62	79925	800	E62
    460  * 63	80725	800	E63
    461  * 64	81525	800	E64
    462  * 65	82325	800	E65
    463  * 66	83125	800	E66
    464  * 67	83925	800	E67
    465  * 68	84725	800	E68
    466  * 69	85525	800	E69
    467  *
    468  * 70	 4575	800	IA
    469  * 71	 5375	800	IB
    470  * 72	 6175	800	IC
    471  *
    472  * 74	 6925	700	S01
    473  * 75	 7625	700	S02
    474  * 76	 8325	700	S03
    475  *
    476  * 80	10525	700	S1
    477  * 81	11225	700	S2
    478  * 82	11925	700	S3
    479  * 83	12625	700	S4
    480  * 84	13325	700	S5
    481  * 85	14025	700	S6
    482  * 86	14725	700	S7
    483  * 87	15425	700	S8
    484  * 88	16125	700	S9
    485  * 89	16825	700	S10
    486  * 90	23125	700	S11
    487  * 91	23825	700	S12
    488  * 92	24525	700	S13
    489  * 93	25225	700	S14
    490  * 94	25925	700	S15
    491  * 95	26625	700	S16
    492  * 96	27325	700	S17
    493  * 97	28025	700	S18
    494  * 98	28725	700	S19
    495  * 99	29425	700	S20
    496  *
    497  *
    498  * Channels S21 - S41 are taken from
    499  * http://gemma.apple.com:80/dev/technotes/tn/tn1012.html
    500  *
    501  * 100	30325	800	S21
    502  * 101	31125	800	S22
    503  * 102	31925	800	S23
    504  * 103	32725	800	S24
    505  * 104	33525	800	S25
    506  * 105	34325	800	S26
    507  * 106	35125	800	S27
    508  * 107	35925	800	S28
    509  * 108	36725	800	S29
    510  * 109	37525	800	S30
    511  * 110	38325	800	S31
    512  * 111	39125	800	S32
    513  * 112	39925	800	S33
    514  * 113	40725	800	S34
    515  * 114	41525	800	S35
    516  * 115	42325	800	S36
    517  * 116	43125	800	S37
    518  * 117	43925	800	S38
    519  * 118	44725	800	S39
    520  * 119	45525	800	S40
    521  * 120	46325	800	S41
    522  *
    523  * 121	 3890	000	IFFREQ
    524  *
    525  */
    526 static const int weurope[] = {
    527 	121,	(int)( 38.90 * FREQFACTOR),	0,
    528 	100,	(int)(303.25 * FREQFACTOR),	(int)(8.00 * FREQFACTOR),
    529 	 90,	(int)(231.25 * FREQFACTOR),	(int)(7.00 * FREQFACTOR),
    530 	 80,	(int)(105.25 * FREQFACTOR),	(int)(7.00 * FREQFACTOR),
    531 	 74,	(int)( 69.25 * FREQFACTOR),	(int)(7.00 * FREQFACTOR),
    532 	 21,	(int)(471.25 * FREQFACTOR),	(int)(8.00 * FREQFACTOR),
    533 	 17,	(int)(183.25 * FREQFACTOR),	(int)(9.00 * FREQFACTOR),
    534 	 16,	(int)(175.25 * FREQFACTOR),	(int)(9.00 * FREQFACTOR),
    535 	 15,	(int)( 82.25 * FREQFACTOR),	(int)(8.50 * FREQFACTOR),
    536 	 13,	(int)( 53.75 * FREQFACTOR),	(int)(8.50 * FREQFACTOR),
    537 	  5,	(int)(175.25 * FREQFACTOR),	(int)(7.00 * FREQFACTOR),
    538 	  2,	(int)( 48.25 * FREQFACTOR),	(int)(7.00 * FREQFACTOR),
    539 	  0
    540 };
    541 
    542 /*
    543  * Japanese Broadcast Channels:
    544  *
    545  *  1:  91.25MHz -  3: 103.25MHz
    546  *  4: 171.25MHz -  7: 189.25MHz
    547  *  8: 193.25MHz - 12: 217.25MHz  (VHF)
    548  * 13: 471.25MHz - 62: 765.25MHz  (UHF)
    549  *
    550  * IF freq: 45.75 MHz
    551  *  OR
    552  * IF freq: 58.75 MHz
    553  */
    554 #define OFFSET  6.00
    555 #define IF_FREQ 45.75
    556 static const int jpnbcst[] = {
    557 	62,	(int)(IF_FREQ * FREQFACTOR),	0,
    558 	13,	(int)(471.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    559 	 8,	(int)(193.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    560 	 4,	(int)(171.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    561 	 1,	(int)( 91.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    562 	 0
    563 };
    564 #undef IF_FREQ
    565 #undef OFFSET
    566 
    567 /*
    568  * Japanese Cable Channels:
    569  *
    570  *  1:  91.25MHz -  3: 103.25MHz
    571  *  4: 171.25MHz -  7: 189.25MHz
    572  *  8: 193.25MHz - 12: 217.25MHz
    573  * 13: 109.25MHz - 21: 157.25MHz
    574  * 22: 165.25MHz
    575  * 23: 223.25MHz - 63: 463.25MHz
    576  *
    577  * IF freq: 45.75 MHz
    578  */
    579 #define OFFSET  6.00
    580 #define IF_FREQ 45.75
    581 static const int jpncable[] = {
    582 	63,	(int)(IF_FREQ * FREQFACTOR),	0,
    583 	23,	(int)(223.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    584 	22,	(int)(165.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    585 	13,	(int)(109.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    586 	 8,	(int)(193.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    587 	 4,	(int)(171.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    588 	 1,	(int)( 91.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    589 	 0
    590 };
    591 #undef IF_FREQ
    592 #undef OFFSET
    593 
    594 /*
    595  * xUSSR Broadcast Channels:
    596  *
    597  *  1:  49.75MHz -  2:  59.25MHz
    598  *  3:  77.25MHz -  5:  93.25MHz
    599  *  6: 175.25MHz - 12: 223.25MHz
    600  * 13-20 - not exist
    601  * 21: 471.25MHz - 34: 575.25MHz
    602  * 35: 583.25MHz - 69: 855.25MHz
    603  *
    604  * Cable channels
    605  *
    606  * 70: 111.25MHz - 77: 167.25MHz
    607  * 78: 231.25MHz -107: 463.25MHz
    608  *
    609  * IF freq: 38.90 MHz
    610  */
    611 #define IF_FREQ 38.90
    612 static const int xussr[] = {
    613 	107,	(int)(IF_FREQ * FREQFACTOR),	0,
    614 	 78,	(int)(231.25 * FREQFACTOR),	(int)(8.00 * FREQFACTOR),
    615 	 70,	(int)(111.25 * FREQFACTOR),	(int)(8.00 * FREQFACTOR),
    616 	 35,	(int)(583.25 * FREQFACTOR),	(int)(8.00 * FREQFACTOR),
    617 	 21,	(int)(471.25 * FREQFACTOR),	(int)(8.00 * FREQFACTOR),
    618 	  6,	(int)(175.25 * FREQFACTOR),	(int)(8.00 * FREQFACTOR),
    619 	  3,	(int)( 77.25 * FREQFACTOR),	(int)(8.00 * FREQFACTOR),
    620 	  1,	(int)( 49.75 * FREQFACTOR),	(int)(9.50 * FREQFACTOR),
    621 	  0
    622 };
    623 #undef IF_FREQ
    624 
    625 /*
    626  * Australian broadcast channels
    627  */
    628 #define OFFSET	7.00
    629 #define IF_FREQ 38.90
    630 static const int australia[] = {
    631 	83,	(int)(IF_FREQ * FREQFACTOR),	0,
    632 	28,	(int)(527.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    633 	10,	(int)(209.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    634 	 6,	(int)(175.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    635 	 4,	(int)( 95.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    636 	 3,	(int)( 86.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    637 	 1,	(int)( 57.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
    638 	 0
    639 };
    640 #undef OFFSET
    641 #undef IF_FREQ
    642 
    643 /*
    644  * France broadcast channels
    645  */
    646 #define OFFSET 8.00
    647 #define IF_FREQ 38.90
    648 static const int france[] = {
    649 	69,	(int)(IF_FREQ * FREQFACTOR),	0,
    650 	21,	(int)(471.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR), /* 21 -> 69 */
    651 	 5,	(int)(176.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR), /* 5 -> 10 */
    652 	 4,	(int)( 63.75 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR), /* 4    */
    653 	 3,	(int)( 60.50 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR), /* 3    */
    654 	 1,	(int)( 47.75 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR), /* 1  2 */
    655 	 0
    656 };
    657 #undef OFFSET
    658 #undef IF_FREQ
    659 
    660 static const struct {
    661         const int     *ptr;
    662         const char    name[BT848_MAX_CHNLSET_NAME_LEN];
    663 } freqTable[] = {
    664         {NULL,          ""},
    665         {nabcst,        "nabcst"},
    666         {irccable,      "cableirc"},
    667         {hrccable,      "cablehrc"},
    668         {weurope,       "weurope"},
    669         {jpnbcst,       "jpnbcst"},
    670         {jpncable,      "jpncable"},
    671         {xussr,         "xussr"},
    672         {australia,     "australia"},
    673         {france,        "france"},
    674 
    675 };
    676 
    677 #define TBL_CHNL	freqTable[bktr->tuner.chnlset].ptr[x]
    678 #define TBL_BASE_FREQ	freqTable[bktr->tuner.chnlset].ptr[x + 1]
    679 #define TBL_OFFSET	freqTable[bktr->tuner.chnlset].ptr[x + 2]
    680 static int
    681 frequency_lookup(bktr_ptr_t bktr, int channel)
    682 {
    683 	int	x;
    684 
    685 	/* check for "> MAX channel" */
    686 	x = 0;
    687 	if (channel > TBL_CHNL)
    688 		return(-1);
    689 
    690 	/* search the table for data */
    691 	for (x = 3; TBL_CHNL; x += 3) {
    692 		if (channel >= TBL_CHNL) {
    693 			return(TBL_BASE_FREQ +
    694 				 ((channel - TBL_CHNL) * TBL_OFFSET));
    695 		}
    696 	}
    697 
    698 	/* not found, must be below the MIN channel */
    699 	return(-1);
    700 }
    701 #undef TBL_OFFSET
    702 #undef TBL_BASE_FREQ
    703 #undef TBL_CHNL
    704 
    705 
    706 #define TBL_IF	freqTable[bktr->tuner.chnlset].ptr[1]
    707 
    708 
    709 /* Initialise the tuner structures in the bktr_softc */
    710 /* This is needed as the tuner details are no longer globally declared */
    711 
    712 void    select_tuner(bktr_ptr_t bktr, int tuner_type) {
    713 	if (tuner_type < Bt848_MAX_TUNER) {
    714 		bktr->card.tuner = &tuners[tuner_type];
    715 	} else {
    716 		bktr->card.tuner = NULL;
    717 	}
    718 }
    719 
    720 /*
    721  * Tuner Notes:
    722  * Programming the tuner properly is quite complicated.
    723  * Here are some notes, based on a FM1246 data sheet for a PAL-I tuner.
    724  * The tuner (front end) covers 45.75 MHz - 855.25 MHz and an FM band of
    725  * 87.5 MHz to 108.0 MHz.
    726  *
    727  * RF and IF.  RF = radio frequencies, it is the transmitted signal.
    728  *             IF is the Intermediate Frequency (the offset from the base
    729  *             signal where the video, color,  audio and NICAM signals are.
    730  *
    731  * Eg, Picture at 38.9 MHz, Colour at 34.47 MHz, sound at 32.9 MHz
    732  * NICAM at 32.348 MHz.
    733  * Strangely enough, there is an IF (intermediate frequency) for
    734  * FM Radio which is 10.7 MHz.
    735  *
    736  * The tuner also works in Bands. Philips bands are
    737  * FM radio band 87.50 to 108.00 MHz
    738  * Low band 45.75 to 170.00 MHz
    739  * Mid band 170.00 to 450.00 MHz
    740  * High band 450.00 to 855.25 MHz
    741  *
    742  *
    743  * Now we need to set the PLL on the tuner to the required frequency.
    744  * It has a programmable divisor.
    745  * For TV we want
    746  *  N = 16 (freq RF(pc) + freq IF(pc))  pc is picture carrier and RF and IF
    747  *  are in MHz.
    748 
    749  * For RADIO we want a different equation.
    750  *  freq IF is 10.70 MHz (so the data sheet tells me)
    751  * N = (freq RF + freq IF) / step size
    752  * The step size must be set to 50 kHz (so the data sheet tells me)
    753  * (note this is 50 kHz, the other things are in MHz)
    754  * so we end up with N = 20x(freq RF + 10.7)
    755  *
    756  */
    757 
    758 #define LOW_BAND 0
    759 #define MID_BAND 1
    760 #define HIGH_BAND 2
    761 #define FM_RADIO_BAND 3
    762 
    763 
    764 /* Check if these are correct for other than Philips PAL */
    765 #define STATUSBIT_COLD   0x80
    766 #define STATUSBIT_LOCK   0x40
    767 #define STATUSBIT_TV     0x20
    768 #define STATUSBIT_STEREO 0x10 /* valid if FM (aka not TV) */
    769 #define STATUSBIT_ADC    0x07
    770 
    771 /*
    772  * set the frequency of the tuner
    773  * If 'type' is TV_FREQUENCY, the frequency is freq MHz*16
    774  * If 'type' is FM_RADIO_FREQUENCY, the frequency is freq MHz * 100
    775  * (note *16 gives is 4 bits of fraction, eg steps of nnn.0625)
    776  *
    777  */
    778 int
    779 tv_freq(bktr_ptr_t bktr, int frequency, int type)
    780 {
    781 	const struct TUNER*	tuner;
    782 	u_char			addr;
    783 	u_char			control;
    784 	u_char			band;
    785 	int			N;
    786 	int			band_select = 0;
    787 #if defined(TEST_TUNER_AFC)
    788 	int			oldFrequency, afcDelta;
    789 #endif
    790 
    791 	tuner = bktr->card.tuner;
    792 	if (tuner == NULL)
    793 		return(-1);
    794 
    795 	if (type == TV_FREQUENCY) {
    796 		/*
    797 		 * select the band based on frequency
    798 		 */
    799 		if (frequency < (tuner->bandLimits[0] * FREQFACTOR))
    800 		    band_select = LOW_BAND;
    801 		else if (frequency < (tuner->bandLimits[1] * FREQFACTOR))
    802 		    band_select = MID_BAND;
    803 		else
    804 		    band_select = HIGH_BAND;
    805 
    806 #if defined(TEST_TUNER_AFC)
    807 		if (bktr->tuner.afc)
    808 			frequency -= 4;
    809 #endif
    810 		/*
    811 		 * N = 16 * { fRF(pc) + fIF(pc) }
    812 		 * or N = 16* fRF(pc) + 16*fIF(pc) }
    813 		 * where:
    814 		 *  pc is picture carrier, fRF & fIF are in MHz
    815 		 *
    816 		 * fortunately, frequency is passed in as MHz * 16
    817 		 * and the TBL_IF frequency is also stored in MHz * 16
    818 		 */
    819 		N = frequency + TBL_IF;
    820 
    821 		/* set the address of the PLL */
    822 		addr    = bktr->card.tuner_pllAddr;
    823 		control = tuner->pllControl[band_select];
    824 		band    = tuner->bandAddrs[band_select];
    825 
    826 		if(!(band && control))		/* Don't try to set un-	*/
    827 		  return(-1);			/* supported modes.	*/
    828 
    829 		if (frequency > bktr->tuner.frequency) {
    830 			i2cWrite(bktr, addr, (N>>8) & 0x7f, N & 0xff);
    831 			i2cWrite(bktr, addr, control, band);
    832 	        }
    833 	        else {
    834 			i2cWrite(bktr, addr, control, band);
    835 			i2cWrite(bktr, addr, (N>>8) & 0x7f, N & 0xff);
    836        		}
    837 
    838 #if defined(TUNER_AFC)
    839 		if (bktr->tuner.afc == TRUE) {
    840 #if defined(TEST_TUNER_AFC)
    841 			oldFrequency = frequency;
    842 #endif
    843 			if ((N = do_afc(bktr, addr, N)) < 0) {
    844 			    /* AFC failed, restore requested frequency */
    845 			    N = frequency + TBL_IF;
    846 #if defined(TEST_TUNER_AFC)
    847 			    printf("%s: do_afc: failed to lock\n",
    848 				   bktr_name(bktr));
    849 #endif
    850 			    i2cWrite(bktr, addr, (N>>8) & 0x7f, N & 0xff);
    851 			}
    852 			else
    853 			    frequency = N - TBL_IF;
    854 #if defined(TEST_TUNER_AFC)
    855  printf("%s: do_afc: returned freq %d (%d %% %d)\n", bktr_name(bktr), frequency, frequency / 16, frequency % 16);
    856 			    afcDelta = frequency - oldFrequency;
    857  printf("%s: changed by: %d clicks (%d mod %d)\n", bktr_name(bktr), afcDelta, afcDelta / 16, afcDelta % 16);
    858 #endif
    859 			}
    860 #endif /* TUNER_AFC */
    861 
    862 		bktr->tuner.frequency = frequency;
    863 	}
    864 
    865 	if (type == FM_RADIO_FREQUENCY) {
    866 		band_select = FM_RADIO_BAND;
    867 
    868 		/*
    869 		 * N = { fRF(pc) + fIF(pc) }/step_size
    870                  * The step size is 50kHz for FM radio.
    871 		 * (eg after 102.35MHz comes 102.40 MHz)
    872 		 * fIF is 10.7 MHz (as detailed in the specs)
    873 		 *
    874 		 * frequency is passed in as MHz * 100
    875 		 *
    876 		 * So, we have N = (frequency/100 + 10.70)  /(50/1000)
    877 		 */
    878 		N = (frequency + 1070)/5;
    879 
    880 		/* set the address of the PLL */
    881 		addr    = bktr->card.tuner_pllAddr;
    882 		control = tuner->pllControl[band_select];
    883 		band    = tuner->bandAddrs[band_select];
    884 
    885 		if(!(band && control))		/* Don't try to set un-	*/
    886 		  return(-1);			/* supported modes.	*/
    887 
    888 		band |= bktr->tuner.radio_mode; /* tuner.radio_mode is set in
    889 						 * the ioctls RADIO_SETMODE
    890 						 * and RADIO_GETMODE */
    891 
    892 		i2cWrite(bktr, addr, control, band);
    893 		i2cWrite(bktr, addr, (N>>8) & 0x7f, N & 0xff);
    894 
    895 		bktr->tuner.frequency = (N * 5) - 1070;
    896 
    897 
    898 	}
    899 
    900 
    901 	return(0);
    902 }
    903 
    904 
    905 
    906 #if defined(TUNER_AFC)
    907 /*
    908  *
    909  */
    910 int
    911 do_afc(bktr_ptr_t bktr, int addr, int frequency)
    912 {
    913 	int step;
    914 	int status;
    915 	int origFrequency;
    916 
    917 	origFrequency = frequency;
    918 
    919 	/* wait for first setting to take effect */
    920 	tsleep(BKTR_SLEEP, PZERO, "tuning", hz/8);
    921 
    922 	if ((status = i2cRead(bktr, addr + 1)) < 0)
    923 		return(-1);
    924 
    925 #if defined(TEST_TUNER_AFC)
    926  printf("%s: Original freq: %d, status: 0x%02x\n", bktr_name(bktr), frequency, status);
    927 #endif
    928 	for (step = 0; step < AFC_MAX_STEP; ++step) {
    929 		if ((status = i2cRead(bktr, addr + 1)) < 0)
    930 			goto fubar;
    931 		if (!(status & 0x40)) {
    932 #if defined(TEST_TUNER_AFC)
    933  printf("%s: no lock!\n", bktr_name(bktr));
    934 #endif
    935 			goto fubar;
    936 		}
    937 
    938 		switch(status & AFC_BITS) {
    939 		case AFC_FREQ_CENTERED:
    940 #if defined(TEST_TUNER_AFC)
    941  printf("%s: Centered, freq: %d, status: 0x%02x\n", bktr_name(bktr), frequency, status);
    942 #endif
    943 			return(frequency);
    944 
    945 		case AFC_FREQ_MINUS_125:
    946 		case AFC_FREQ_MINUS_62:
    947 #if defined(TEST_TUNER_AFC)
    948  printf("%s: Low, freq: %d, status: 0x%02x\n", bktr_name(bktr), frequency, status);
    949 #endif
    950 			--frequency;
    951 			break;
    952 
    953 		case AFC_FREQ_PLUS_62:
    954 		case AFC_FREQ_PLUS_125:
    955 #if defined(TEST_TUNER_AFC)
    956  printf("%s: Hi, freq: %d, status: 0x%02x\n", bktr_name(bktr), frequency, status);
    957 #endif
    958 			++frequency;
    959 			break;
    960 		}
    961 
    962 		i2cWrite(bktr, addr,
    963 			  (frequency>>8) & 0x7f, frequency & 0xff);
    964 		DELAY(AFC_DELAY);
    965 	}
    966 
    967  fubar:
    968 	i2cWrite(bktr, addr,
    969 		  (origFrequency>>8) & 0x7f, origFrequency & 0xff);
    970 
    971 	return(-1);
    972 }
    973 #endif /* TUNER_AFC */
    974 #undef TBL_IF
    975 
    976 
    977 /*
    978  * Get the Tuner status and signal strength
    979  */
    980 int     get_tuner_status(bktr_ptr_t bktr) {
    981 	return i2cRead(bktr, bktr->card.tuner_pllAddr + 1);
    982 }
    983 
    984 /*
    985  * set the channel of the tuner
    986  */
    987 int
    988 tv_channel(bktr_ptr_t bktr, int channel)
    989 {
    990 	int frequency;
    991 
    992 	/* calculate the frequency according to tuner type */
    993 	if ((frequency = frequency_lookup(bktr, channel)) < 0)
    994 		return(-1);
    995 
    996 	/* set the new frequency */
    997 	if (tv_freq(bktr, frequency, TV_FREQUENCY) < 0)
    998 		return(-1);
    999 
   1000 	/* OK to update records */
   1001 	return((bktr->tuner.channel = channel));
   1002 }
   1003 
   1004 /*
   1005  * get channelset name
   1006  */
   1007 int
   1008 tuner_getchnlset(struct bktr_chnlset *chnlset)
   1009 {
   1010        if ((chnlset->index < CHNLSET_MIN) ||
   1011                (chnlset->index > CHNLSET_MAX))
   1012                        return(EINVAL);
   1013 
   1014        memcpy(&chnlset->name, &freqTable[chnlset->index].name,
   1015                BT848_MAX_CHNLSET_NAME_LEN);
   1016 
   1017        chnlset->max_channel=freqTable[chnlset->index].ptr[0];
   1018        return(0);
   1019 }
   1020