xref: /freebsd-12.1/sys/dev/bktr/bktr_tuner.c (revision 4c9d19e8)
1 /*-
2  * SPDX-License-Identifier: BSD-4-Clause
3  *
4  * 1. Redistributions of source code must retain the
5  * Copyright (c) 1997 Amancio Hasty, 1999 Roger Hardiman
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. All advertising materials mentioning features or use of this software
17  *    must display the following acknowledgement:
18  *      This product includes software developed by Amancio Hasty and
19  *      Roger Hardiman
20  * 4. The name of the author may not be used to endorse or promote products
21  *    derived from this software without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
24  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
25  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
26  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
27  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
28  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
29  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
31  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
32  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33  * POSSIBILITY OF SUCH DAMAGE.
34  */
35 
36 #include <sys/cdefs.h>
37 __FBSDID("$FreeBSD$");
38 
39 /*
40  * This is part of the Driver for Video Capture Cards (Frame grabbers)
41  * and TV Tuner cards using the Brooktree Bt848, Bt848A, Bt849A, Bt878, Bt879
42  * chipset.
43  * Copyright Roger Hardiman and Amancio Hasty.
44  *
45  * bktr_tuner : This deals with controlling the tuner fitted to TV cards.
46  */
47 
48 #include <sys/param.h>
49 #include <sys/systm.h>
50 #include <sys/kernel.h>
51 #ifdef __NetBSD__
52 #include <sys/proc.h>
53 #endif
54 
55 #ifdef __FreeBSD__
56 #if (__FreeBSD_version < 500000)
57 #include <machine/clock.h>              /* for DELAY */
58 #include <pci/pcivar.h>
59 #else
60 #include <sys/lock.h>
61 #include <sys/mutex.h>
62 #include <sys/selinfo.h>
63 #include <dev/pci/pcivar.h>
64 #endif
65 
66 #include <machine/bus.h>
67 #include <sys/bus.h>
68 #endif
69 
70 #ifdef __NetBSD__
71 #include <dev/ic/bt8xx.h>	/* NetBSD .h file location */
72 #include <dev/pci/bktr/bktr_reg.h>
73 #include <dev/pci/bktr/bktr_tuner.h>
74 #include <dev/pci/bktr/bktr_card.h>
75 #include <dev/pci/bktr/bktr_core.h>
76 #else
77 #include <dev/bktr/ioctl_meteor.h>
78 #include <dev/bktr/ioctl_bt848.h>	/* extensions to ioctl_meteor.h */
79 #include <dev/bktr/bktr_reg.h>
80 #include <dev/bktr/bktr_tuner.h>
81 #include <dev/bktr/bktr_card.h>
82 #include <dev/bktr/bktr_core.h>
83 #endif
84 
85 
86 
87 #if defined( TUNER_AFC )
88 #define AFC_DELAY               10000   /* 10 millisend delay */
89 #define AFC_BITS                0x07
90 #define AFC_FREQ_MINUS_125      0x00
91 #define AFC_FREQ_MINUS_62       0x01
92 #define AFC_FREQ_CENTERED       0x02
93 #define AFC_FREQ_PLUS_62        0x03
94 #define AFC_FREQ_PLUS_125       0x04
95 #define AFC_MAX_STEP            (5 * FREQFACTOR) /* no more than 5 MHz */
96 #endif /* TUNER_AFC */
97 
98 
99 #define TTYPE_XXX               0
100 #define TTYPE_NTSC              1
101 #define TTYPE_NTSC_J            2
102 #define TTYPE_PAL               3
103 #define TTYPE_PAL_M             4
104 #define TTYPE_PAL_N             5
105 #define TTYPE_SECAM             6
106 
107 #define TSA552x_CB_MSB          (0x80)
108 #define TSA552x_CB_CP           (1<<6)	/* set this for fast tuning */
109 #define TSA552x_CB_T2           (1<<5)	/* test mode - Normally set to 0 */
110 #define TSA552x_CB_T1           (1<<4)	/* test mode - Normally set to 0 */
111 #define TSA552x_CB_T0           (1<<3)	/* test mode - Normally set to 1 */
112 #define TSA552x_CB_RSA          (1<<2)	/* 0 for 31.25 khz, 1 for 62.5 kHz */
113 #define TSA552x_CB_RSB          (1<<1)	/* 0 for FM 50kHz steps, 1 = Use RSA*/
114 #define TSA552x_CB_OS           (1<<0)	/* Set to 0 for normal operation */
115 
116 #define TSA552x_RADIO           (TSA552x_CB_MSB |       \
117                                  TSA552x_CB_T0)
118 
119 /* raise the charge pump voltage for fast tuning */
120 #define TSA552x_FCONTROL        (TSA552x_CB_MSB |       \
121                                  TSA552x_CB_CP  |       \
122                                  TSA552x_CB_T0  |       \
123                                  TSA552x_CB_RSA |       \
124                                  TSA552x_CB_RSB)
125 
126 /* lower the charge pump voltage for better residual oscillator FM */
127 #define TSA552x_SCONTROL        (TSA552x_CB_MSB |       \
128                                  TSA552x_CB_T0  |       \
129                                  TSA552x_CB_RSA |       \
130                                  TSA552x_CB_RSB)
131 
132 /* The control value for the ALPS TSCH5 Tuner */
133 #define TSCH5_FCONTROL          0x82
134 #define TSCH5_RADIO             0x86
135 
136 /* The control value for the ALPS TSBH1 Tuner */
137 #define TSBH1_FCONTROL		0xce
138 
139 
140 static void mt2032_set_tv_freq(bktr_ptr_t bktr, unsigned int freq);
141 
142 
143 static const struct TUNER tuners[] = {
144 /* XXX FIXME: fill in the band-switch crosspoints */
145 	/* NO_TUNER */
146 	{ "<no>",				/* the 'name' */
147 	   TTYPE_XXX,				/* input type */
148  	   { 0x00,				/* control byte for Tuner PLL */
149  	     0x00,
150  	     0x00,
151  	     0x00 },
152 	   { 0x00, 0x00 },			/* band-switch crosspoints */
153 	   { 0x00, 0x00, 0x00,0x00} },		/* the band-switch values */
154 
155 	/* TEMIC_NTSC */
156 	{ "Temic NTSC",				/* the 'name' */
157 	   TTYPE_NTSC,				/* input type */
158 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
159 	     TSA552x_SCONTROL,
160 	     TSA552x_SCONTROL,
161 	     0x00 },
162 	   { 0x00, 0x00},			/* band-switch crosspoints */
163 	   { 0x02, 0x04, 0x01, 0x00 } },	/* the band-switch values */
164 
165 	/* TEMIC_PAL */
166 	{ "Temic PAL",				/* the 'name' */
167 	   TTYPE_PAL,				/* input type */
168 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
169 	     TSA552x_SCONTROL,
170 	     TSA552x_SCONTROL,
171 	     0x00 },
172 	   { 0x00, 0x00 },			/* band-switch crosspoints */
173 	   { 0x02, 0x04, 0x01, 0x00 } },	/* the band-switch values */
174 
175 	/* TEMIC_SECAM */
176 	{ "Temic SECAM",			/* the 'name' */
177 	   TTYPE_SECAM,				/* input type */
178 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
179 	     TSA552x_SCONTROL,
180 	     TSA552x_SCONTROL,
181 	     0x00 },
182 	   { 0x00, 0x00 },			/* band-switch crosspoints */
183 	   { 0x02, 0x04, 0x01,0x00 } },		/* the band-switch values */
184 
185 	/* PHILIPS_NTSC */
186 	{ "Philips NTSC",			/* the 'name' */
187 	   TTYPE_NTSC,				/* input type */
188 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
189 	     TSA552x_SCONTROL,
190 	     TSA552x_SCONTROL,
191 	     0x00 },
192 	   { 0x00, 0x00 },			/* band-switch crosspoints */
193 	   { 0xa0, 0x90, 0x30, 0x00 } },	/* the band-switch values */
194 
195 	/* PHILIPS_PAL */
196 	{ "Philips PAL",			/* the 'name' */
197 	   TTYPE_PAL,				/* input type */
198 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
199 	     TSA552x_SCONTROL,
200 	     TSA552x_SCONTROL,
201 	     0x00 },
202 	   { 0x00, 0x00 },			/* band-switch crosspoints */
203 	   { 0xa0, 0x90, 0x30, 0x00 } },	/* the band-switch values */
204 
205 	/* PHILIPS_SECAM */
206 	{ "Philips SECAM",			/* the 'name' */
207 	   TTYPE_SECAM,				/* input type */
208 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
209 	     TSA552x_SCONTROL,
210 	     TSA552x_SCONTROL,
211 	     0x00 },
212 	   { 0x00, 0x00 },			/* band-switch crosspoints */
213 	   { 0xa7, 0x97, 0x37, 0x00 } },	/* the band-switch values */
214 
215 	/* TEMIC_PAL I */
216 	{ "Temic PAL I",			/* the 'name' */
217 	   TTYPE_PAL,				/* input type */
218 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
219 	     TSA552x_SCONTROL,
220 	     TSA552x_SCONTROL,
221 	     0x00 },
222 	   { 0x00, 0x00 },			/* band-switch crosspoints */
223 	   { 0x02, 0x04, 0x01,0x00 } },		/* the band-switch values */
224 
225 	/* PHILIPS_PALI */
226 	{ "Philips PAL I",			/* the 'name' */
227 	   TTYPE_PAL,				/* input type */
228 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
229 	     TSA552x_SCONTROL,
230 	     TSA552x_SCONTROL,
231 	     0x00 },
232           { 0x00, 0x00 },                      /* band-switch crosspoints */
233           { 0xa0, 0x90, 0x30,0x00 } },         /* the band-switch values */
234 
235        /* PHILIPS_FR1236_NTSC */
236        { "Philips FR1236 NTSC FM",             /* the 'name' */
237           TTYPE_NTSC,                          /* input type */
238 	  { TSA552x_FCONTROL,			/* control byte for Tuner PLL */
239 	    TSA552x_FCONTROL,
240 	    TSA552x_FCONTROL,
241 	    TSA552x_RADIO  },
242           { 0x00, 0x00 },			/* band-switch crosspoints */
243 	  { 0xa0, 0x90, 0x30,0xa4 } },		/* the band-switch values */
244 
245 	/* PHILIPS_FR1216_PAL */
246 	{ "Philips FR1216 PAL FM" ,		/* the 'name' */
247 	   TTYPE_PAL,				/* input type */
248 	   { TSA552x_FCONTROL,			/* control byte for Tuner PLL */
249 	     TSA552x_FCONTROL,
250 	     TSA552x_FCONTROL,
251 	     TSA552x_RADIO },
252 	   { 0x00, 0x00 },			/* band-switch crosspoints */
253 	   { 0xa0, 0x90, 0x30, 0xa4 } },	/* the band-switch values */
254 
255 	/* PHILIPS_FR1236_SECAM */
256 	{ "Philips FR1236 SECAM FM",		/* the 'name' */
257 	   TTYPE_SECAM,				/* input type */
258 	   { TSA552x_FCONTROL,			/* control byte for Tuner PLL */
259 	     TSA552x_FCONTROL,
260 	     TSA552x_FCONTROL,
261 	     TSA552x_RADIO },
262 	   { 0x00, 0x00 },			/* band-switch crosspoints */
263 	   { 0xa7, 0x97, 0x37, 0xa4 } },	/* the band-switch values */
264 
265         /* ALPS TSCH5 NTSC */
266         { "ALPS TSCH5 NTSC FM",                 /* the 'name' */
267            TTYPE_NTSC,                          /* input type */
268            { TSCH5_FCONTROL,                    /* control byte for Tuner PLL */
269              TSCH5_FCONTROL,
270              TSCH5_FCONTROL,
271              TSCH5_RADIO },
272            { 0x00, 0x00 },                      /* band-switch crosspoints */
273            { 0x14, 0x12, 0x11, 0x04 } },        /* the band-switch values */
274 
275         /* ALPS TSBH1 NTSC */
276         { "ALPS TSBH1 NTSC",                    /* the 'name' */
277            TTYPE_NTSC,                          /* input type */
278            { TSBH1_FCONTROL,                    /* control byte for Tuner PLL */
279              TSBH1_FCONTROL,
280              TSBH1_FCONTROL,
281              0x00 },
282            { 0x00, 0x00 },                      /* band-switch crosspoints */
283            { 0x01, 0x02, 0x08, 0x00 } },        /* the band-switch values */
284 
285 	/* MT2032 Microtune */
286 	{ "MT2032",				/* the 'name' */
287 	   TTYPE_PAL,				/* input type */
288 	   { TSA552x_SCONTROL,			/* control byte for Tuner PLL */
289 	     TSA552x_SCONTROL,
290 	     TSA552x_SCONTROL,
291 	     0x00 },
292 	   { 0x00, 0x00 },			/* band-switch crosspoints */
293 	   { 0xa0, 0x90, 0x30, 0x00 } },	/* the band-switch values */
294 
295 	 /* LG TPI8PSB12P PAL */
296 	 { "LG TPI8PSB12P PAL",                 /* the 'name' */
297 	   TTYPE_PAL,                           /* input type */
298 	   { TSA552x_SCONTROL,                  /* control byte for Tuner PLL */
299 	     TSA552x_SCONTROL,
300 	     TSA552x_SCONTROL,
301 	     0x00 },
302 	   { 0x00, 0x00 },                      /* band-switch crosspoints */
303 	   { 0xa0, 0x90, 0x30, 0x8e } },        /* the band-switch values */
304 
305 	 /* PHILIPS FI1216 */
306 	 { "PHILIPS_FI1216",                    /* the 'name' */
307 	   TTYPE_PAL,                           /* input type */
308 	   { TSBH1_FCONTROL,                    /* control byte for Tuner PLL */
309 	     TSBH1_FCONTROL,
310 	     TSBH1_FCONTROL,
311 	     0x00 },
312 	   { 0x00, 0x00 },                      /* band-switch crosspoints */
313 	   { 0x01, 0x02, 0x04, 0x00 } },        /* the band-switch values */
314 };
315 
316 
317 /* scaling factor for frequencies expressed as ints */
318 #define FREQFACTOR		16
319 
320 /*
321  * Format:
322  *	entry 0:         MAX legal channel
323  *	entry 1:         IF frequency
324  *			 expressed as fi{mHz} * 16,
325  *			 eg 45.75mHz == 45.75 * 16 = 732
326  *	entry 2:         [place holder/future]
327  *	entry 3:         base of channel record 0
328  *	entry 3 + (x*3): base of channel record 'x'
329  *	entry LAST:      NULL channel entry marking end of records
330  *
331  * Record:
332  *	int 0:		base channel
333  *	int 1:		frequency of base channel,
334  *			 expressed as fb{mHz} * 16,
335  *	int 2:		offset frequency between channels,
336  *			 expressed as fo{mHz} * 16,
337  */
338 
339 /*
340  * North American Broadcast Channels:
341  *
342  *  2:  55.25 mHz -  4:  67.25 mHz
343  *  5:  77.25 mHz -  6:	 83.25 mHz
344  *  7: 175.25 mHz - 13:	211.25 mHz
345  * 14: 471.25 mHz - 83:	885.25 mHz
346  *
347  * IF freq: 45.75 mHz
348  */
349 #define OFFSET	6.00
350 static int nabcst[] = {
351 	83,	(int)( 45.75 * FREQFACTOR),	0,
352 	14,	(int)(471.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
353 	 7,	(int)(175.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
354 	 5,	(int)( 77.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
355 	 2,	(int)( 55.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
356 	 0
357 };
358 #undef OFFSET
359 
360 /*
361  * North American Cable Channels, IRC:
362  *
363  *  2:  55.25 mHz -  4:  67.25 mHz
364  *  5:  77.25 mHz -  6:  83.25 mHz
365  *  7: 175.25 mHz - 13: 211.25 mHz
366  * 14: 121.25 mHz - 22: 169.25 mHz
367  * 23: 217.25 mHz - 94: 643.25 mHz
368  * 95:  91.25 mHz - 99: 115.25 mHz
369  *
370  * IF freq: 45.75 mHz
371  */
372 #define OFFSET	6.00
373 static int irccable[] = {
374 	116,    (int)( 45.75 * FREQFACTOR),     0,
375 	100,    (int)(649.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
376 	95,	(int)( 91.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
377 	23,	(int)(217.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
378 	14,	(int)(121.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
379 	 7,	(int)(175.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
380 	 5,	(int)( 77.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
381 	 2,	(int)( 55.25 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
382 	 0
383 };
384 #undef OFFSET
385 
386 /*
387  * North American Cable Channels, HRC:
388  *
389  * 2:   54 mHz  - 4:    66 mHz
390  * 5:   78 mHz  - 6:    84 mHz
391  * 7:  174 mHz  - 13:  210 mHz
392  * 14: 120 mHz  - 22:  168 mHz
393  * 23: 216 mHz  - 94:  642 mHz
394  * 95:  90 mHz  - 99:  114 mHz
395  *
396  * IF freq: 45.75 mHz
397  */
398 #define OFFSET  6.00
399 static int hrccable[] = {
400 	116,    (int)( 45.75 * FREQFACTOR),     0,
401 	100,    (int)(648.00 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
402 	95,	(int)( 90.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
403 	23,	(int)(216.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
404 	14,	(int)(120.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
405 	7,	(int)(174.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
406 	5,	(int)( 78.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
407 	2,	(int)( 54.00 * FREQFACTOR),	(int)(OFFSET * FREQFACTOR),
408 	0
409 };
410 #undef OFFSET
411 
412 /*
413  * Western European broadcast channels:
414  *
415  * (there are others that appear to vary between countries - rmt)
416  *
417  * here's the table Philips provides:
418  * caution, some of the offsets don't compute...
419  *
420  *  1	 4525	700	N21
421  *
422  *  2	 4825	700	E2
423  *  3	 5525	700	E3
424  *  4	 6225	700	E4
425  *
426  *  5	17525	700	E5
427  *  6	18225	700	E6
428  *  7	18925	700	E7
429  *  8	19625	700	E8
430  *  9	20325	700	E9
431  * 10	21025	700	E10
432  * 11	21725	700	E11
433  * 12	22425	700	E12
434  *
435  * 13	 5375	700	ITA
436  * 14	 6225	700	ITB
437  *
438  * 15	 8225	700	ITC
439  *
440  * 16	17525	700	ITD
441  * 17	18325	700	ITE
442  *
443  * 18	19225	700	ITF
444  * 19	20125	700	ITG
445  * 20	21025	700	ITH
446  *
447  * 21	47125	800	E21
448  * 22	47925	800	E22
449  * 23	48725	800	E23
450  * 24	49525	800	E24
451  * 25	50325	800	E25
452  * 26	51125	800	E26
453  * 27	51925	800	E27
454  * 28	52725	800	E28
455  * 29	53525	800	E29
456  * 30	54325	800	E30
457  * 31	55125	800	E31
458  * 32	55925	800	E32
459  * 33	56725	800	E33
460  * 34	57525	800	E34
461  * 35	58325	800	E35
462  * 36	59125	800	E36
463  * 37	59925	800	E37
464  * 38	60725	800	E38
465  * 39	61525	800	E39
466  * 40	62325	800	E40
467  * 41	63125	800	E41
468  * 42	63925	800	E42
469  * 43	64725	800	E43
470  * 44	65525	800	E44
471  * 45	66325	800	E45
472  * 46	67125	800	E46
473  * 47	67925	800	E47
474  * 48	68725	800	E48
475  * 49	69525	800	E49
476  * 50	70325	800	E50
477  * 51	71125	800	E51
478  * 52	71925	800	E52
479  * 53	72725	800	E53
480  * 54	73525	800	E54
481  * 55	74325	800	E55
482  * 56	75125	800	E56
483  * 57	75925	800	E57
484  * 58	76725	800	E58
485  * 59	77525	800	E59
486  * 60	78325	800	E60
487  * 61	79125	800	E61
488  * 62	79925	800	E62
489  * 63	80725	800	E63
490  * 64	81525	800	E64
491  * 65	82325	800	E65
492  * 66	83125	800	E66
493  * 67	83925	800	E67
494  * 68	84725	800	E68
495  * 69	85525	800	E69
496  *
497  * 70	 4575	800	IA
498  * 71	 5375	800	IB
499  * 72	 6175	800	IC
500  *
501  * 74	 6925	700	S01
502  * 75	 7625	700	S02
503  * 76	 8325	700	S03
504  *
505  * 80	10525	700	S1
506  * 81	11225	700	S2
507  * 82	11925	700	S3
508  * 83	12625	700	S4
509  * 84	13325	700	S5
510  * 85	14025	700	S6
511  * 86	14725	700	S7
512  * 87	15425	700	S8
513  * 88	16125	700	S9
514  * 89	16825	700	S10
515  * 90	23125	700	S11
516  * 91	23825	700	S12
517  * 92	24525	700	S13
518  * 93	25225	700	S14
519  * 94	25925	700	S15
520  * 95	26625	700	S16
521  * 96	27325	700	S17
522  * 97	28025	700	S18
523  * 98	28725	700	S19
524  * 99	29425	700	S20
525  *
526  *
527  * Channels S21 - S41 are taken from
528  * http://gemma.apple.com:80/dev/technotes/tn/tn1012.html
529  *
530  * 100	30325	800	S21
531  * 101	31125	800	S22
532  * 102	31925	800	S23
533  * 103	32725	800	S24
534  * 104	33525	800	S25
535  * 105	34325	800	S26
536  * 106	35125	800	S27
537  * 107	35925	800	S28
538  * 108	36725	800	S29
539  * 109	37525	800	S30
540  * 110	38325	800	S31
541  * 111	39125	800	S32
542  * 112	39925	800	S33
543  * 113	40725	800	S34
544  * 114	41525	800	S35
545  * 115	42325	800	S36
546  * 116	43125	800	S37
547  * 117	43925	800	S38
548  * 118	44725	800	S39
549  * 119	45525	800	S40
550  * 120	46325	800	S41
551  *
552  * 121	 3890	000	IFFREQ
553  *
554  */
555 static int weurope[] = {
556        121,     (int)( 38.90 * FREQFACTOR),     0,
557        100,     (int)(303.25 * FREQFACTOR),     (int)(8.00 * FREQFACTOR),
558         90,     (int)(231.25 * FREQFACTOR),     (int)(7.00 * FREQFACTOR),
559         80,     (int)(105.25 * FREQFACTOR),     (int)(7.00 * FREQFACTOR),
560         74,     (int)( 69.25 * FREQFACTOR),     (int)(7.00 * FREQFACTOR),
561         21,     (int)(471.25 * FREQFACTOR),     (int)(8.00 * FREQFACTOR),
562         17,     (int)(183.25 * FREQFACTOR),     (int)(9.00 * FREQFACTOR),
563         16,     (int)(175.25 * FREQFACTOR),     (int)(9.00 * FREQFACTOR),
564         15,     (int)(82.25 * FREQFACTOR),      (int)(8.50 * FREQFACTOR),
565         13,     (int)(53.75 * FREQFACTOR),      (int)(8.50 * FREQFACTOR),
566          5,     (int)(175.25 * FREQFACTOR),     (int)(7.00 * FREQFACTOR),
567          2,     (int)(48.25 * FREQFACTOR),      (int)(7.00 * FREQFACTOR),
568 	 0
569 };
570 
571 /*
572  * Japanese Broadcast Channels:
573  *
574  *  1:  91.25MHz -  3: 103.25MHz
575  *  4: 171.25MHz -  7: 189.25MHz
576  *  8: 193.25MHz - 12: 217.25MHz  (VHF)
577  * 13: 471.25MHz - 62: 765.25MHz  (UHF)
578  *
579  * IF freq: 58.75 mHz
580  */
581 #define OFFSET  6.00
582 #define IF_FREQ 58.75
583 static int jpnbcst[] = {
584 	62,     (int)(IF_FREQ * FREQFACTOR),    0,
585 	13,     (int)(471.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  * Japanese Cable Channels:
596  *
597  *  1:  91.25MHz -  3: 103.25MHz
598  *  4: 171.25MHz -  7: 189.25MHz
599  *  8: 193.25MHz - 12: 217.25MHz
600  * 13: 109.25MHz - 21: 157.25MHz
601  * 22: 165.25MHz
602  * 23: 223.25MHz - 63: 463.25MHz
603  *
604  * IF freq: 58.75 mHz
605  */
606 #define OFFSET  6.00
607 #define IF_FREQ 58.75
608 static int jpncable[] = {
609 	63,     (int)(IF_FREQ * FREQFACTOR),    0,
610 	23,     (int)(223.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
611 	22,     (int)(165.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
612 	13,     (int)(109.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
613 	 8,     (int)(193.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
614 	 4,     (int)(171.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
615 	 1,     (int)( 91.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
616 	 0
617 };
618 #undef IF_FREQ
619 #undef OFFSET
620 
621 /*
622  * xUSSR Broadcast Channels:
623  *
624  *  1:  49.75MHz -  2:  59.25MHz
625  *  3:  77.25MHz -  5:  93.25MHz
626  *  6: 175.25MHz - 12: 223.25MHz
627  * 13-20 - not exist
628  * 21: 471.25MHz - 34: 575.25MHz
629  * 35: 583.25MHz - 69: 855.25MHz
630  *
631  * Cable channels
632  *
633  * 70: 111.25MHz - 77: 167.25MHz
634  * 78: 231.25MHz -107: 463.25MHz
635  *
636  * IF freq: 38.90 MHz
637  */
638 #define IF_FREQ 38.90
639 static int xussr[] = {
640       107,     (int)(IF_FREQ * FREQFACTOR),    0,
641        78,     (int)(231.25 * FREQFACTOR),     (int)(8.00 * FREQFACTOR),
642        70,     (int)(111.25 * FREQFACTOR),     (int)(8.00 * FREQFACTOR),
643        35,     (int)(583.25 * FREQFACTOR),     (int)(8.00 * FREQFACTOR),
644        21,     (int)(471.25 * FREQFACTOR),     (int)(8.00 * FREQFACTOR),
645         6,     (int)(175.25 * FREQFACTOR),     (int)(8.00 * FREQFACTOR),
646         3,     (int)( 77.25 * FREQFACTOR),     (int)(8.00 * FREQFACTOR),
647         1,     (int)( 49.75 * FREQFACTOR),     (int)(9.50 * FREQFACTOR),
648         0
649 };
650 #undef IF_FREQ
651 
652 /*
653  * Australian broadcast channels
654  */
655 #define OFFSET	7.00
656 #define IF_FREQ 38.90
657 static int australia[] = {
658        83,     (int)(IF_FREQ * FREQFACTOR),    0,
659        28,     (int)(527.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
660        10,     (int)(209.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
661         6,     (int)(175.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
662         4,     (int)( 95.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
663         3,     (int)( 86.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
664         1,     (int)( 57.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR),
665         0
666 };
667 #undef OFFSET
668 #undef IF_FREQ
669 
670 /*
671  * France broadcast channels
672  */
673 #define OFFSET 8.00
674 #define IF_FREQ 38.90
675 static int france[] = {
676         69,     (int)(IF_FREQ * FREQFACTOR),     0,
677         21,     (int)(471.25 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR), /* 21 -> 69 */
678          5,     (int)(176.00 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR), /* 5 -> 10 */
679          4,     (int)( 63.75 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR), /* 4    */
680          3,     (int)( 60.50 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR), /* 3    */
681          1,     (int)( 47.75 * FREQFACTOR),     (int)(OFFSET * FREQFACTOR), /* 1  2 */
682          0
683 };
684 #undef OFFSET
685 #undef IF_FREQ
686 
687 static struct {
688         int     *ptr;
689         char    name[BT848_MAX_CHNLSET_NAME_LEN];
690 } freqTable[] = {
691         {NULL,          ""},
692         {nabcst,        "nabcst"},
693         {irccable,      "cableirc"},
694         {hrccable,      "cablehrc"},
695         {weurope,       "weurope"},
696         {jpnbcst,       "jpnbcst"},
697         {jpncable,      "jpncable"},
698         {xussr,         "xussr"},
699         {australia,     "australia"},
700         {france,        "france"},
701 
702 };
703 
704 #define TBL_CHNL	freqTable[ bktr->tuner.chnlset ].ptr[ x ]
705 #define TBL_BASE_FREQ	freqTable[ bktr->tuner.chnlset ].ptr[ x + 1 ]
706 #define TBL_OFFSET	freqTable[ bktr->tuner.chnlset ].ptr[ x + 2 ]
707 static int
frequency_lookup(bktr_ptr_t bktr,int channel)708 frequency_lookup( bktr_ptr_t bktr, int channel )
709 {
710 	int	x;
711 
712 	/* check for "> MAX channel" */
713 	x = 0;
714 	if ( channel > TBL_CHNL )
715 		return( -1 );
716 
717 	/* search the table for data */
718 	for ( x = 3; TBL_CHNL; x += 3 ) {
719 		if ( channel >= TBL_CHNL ) {
720 			return( TBL_BASE_FREQ +
721 				 ((channel - TBL_CHNL) * TBL_OFFSET) );
722 		}
723 	}
724 
725 	/* not found, must be below the MIN channel */
726 	return( -1 );
727 }
728 #undef TBL_OFFSET
729 #undef TBL_BASE_FREQ
730 #undef TBL_CHNL
731 
732 
733 #define	TBL_IF	(bktr->format_params == BT848_IFORM_F_NTSCJ || \
734                  bktr->format_params == BT848_IFORM_F_NTSCM ? \
735                  nabcst[1] : weurope[1])
736 
737 
738 /* Initialise the tuner structures in the bktr_softc */
739 /* This is needed as the tuner details are no longer globally declared */
740 
select_tuner(bktr_ptr_t bktr,int tuner_type)741 void    select_tuner( bktr_ptr_t bktr, int tuner_type ) {
742 	if (tuner_type < Bt848_MAX_TUNER) {
743 		bktr->card.tuner = &tuners[ tuner_type ];
744 	} else {
745 		bktr->card.tuner = NULL;
746 	}
747 }
748 
749 /*
750  * Tuner Notes:
751  * Programming the tuner properly is quite complicated.
752  * Here are some notes, based on a FM1246 data sheet for a PAL-I tuner.
753  * The tuner (front end) covers 45.75 Mhz - 855.25 Mhz and an FM band of
754  * 87.5 Mhz to 108.0 Mhz.
755  *
756  * RF and IF.  RF = radio frequencies, it is the transmitted signal.
757  *             IF is the Intermediate Frequency (the offset from the base
758  *             signal where the video, color,  audio and NICAM signals are.
759  *
760  * Eg, Picture at 38.9 Mhz, Colour at 34.47 MHz, sound at 32.9 MHz
761  * NICAM at 32.348 Mhz.
762  * Strangely enough, there is an IF (intermediate frequency) for
763  * FM Radio which is 10.7 Mhz.
764  *
765  * The tuner also works in Bands. Philips bands are
766  * FM radio band 87.50 to 108.00 MHz
767  * Low band 45.75 to 170.00 MHz
768  * Mid band 170.00 to 450.00 MHz
769  * High band 450.00 to 855.25 MHz
770  *
771  *
772  * Now we need to set the PLL on the tuner to the required freuqncy.
773  * It has a programmable divisor.
774  * For TV we want
775  *  N = 16 (freq RF(pc) + freq IF(pc))  pc is picture carrier and RF and IF
776  *  are in MHz.
777 
778  * For RADIO we want a different equation.
779  *  freq IF is 10.70 MHz (so the data sheet tells me)
780  * N = (freq RF + freq IF) / step size
781  * The step size must be set to 50 khz (so the data sheet tells me)
782  * (note this is 50 kHz, the other things are in MHz)
783  * so we end up with N = 20x(freq RF + 10.7)
784  *
785  */
786 
787 #define LOW_BAND 0
788 #define MID_BAND 1
789 #define HIGH_BAND 2
790 #define FM_RADIO_BAND 3
791 
792 
793 /* Check if these are correct for other than Philips PAL */
794 #define STATUSBIT_COLD   0x80
795 #define STATUSBIT_LOCK   0x40
796 #define STATUSBIT_TV     0x20
797 #define STATUSBIT_STEREO 0x10 /* valid if FM (aka not TV) */
798 #define STATUSBIT_ADC    0x07
799 
800 /*
801  * set the frequency of the tuner
802  * If 'type' is TV_FREQUENCY, the frequency is freq MHz*16
803  * If 'type' is FM_RADIO_FREQUENCY, the frequency is freq MHz * 100
804  * (note *16 gives is 4 bits of fraction, eg steps of nnn.0625)
805  *
806  */
807 int
tv_freq(bktr_ptr_t bktr,int frequency,int type)808 tv_freq( bktr_ptr_t bktr, int frequency, int type )
809 {
810 	const struct TUNER*	tuner;
811 	u_char			addr;
812 	u_char			control;
813 	u_char			band;
814 	int			N;
815 	int			band_select = 0;
816 #if defined( TEST_TUNER_AFC )
817 	int			oldFrequency, afcDelta;
818 #endif
819 
820 	tuner = bktr->card.tuner;
821 	if ( tuner == NULL )
822 		return( -1 );
823 
824 	if (tuner == &tuners[TUNER_MT2032]) {
825 		mt2032_set_tv_freq(bktr, frequency);
826 		return 0;
827 	}
828 	if (type == TV_FREQUENCY) {
829 		/*
830 		 * select the band based on frequency
831 		 * XXX FIXME: get the cross-over points from the tuner struct
832 		 */
833 		if ( frequency < (160 * FREQFACTOR  ) )
834 		    band_select = LOW_BAND;
835 		else if ( frequency < (454 * FREQFACTOR ) )
836 		    band_select = MID_BAND;
837 		else
838 		    band_select = HIGH_BAND;
839 
840 #if defined( TEST_TUNER_AFC )
841 		if ( bktr->tuner.afc )
842 			frequency -= 4;
843 #endif
844 		/*
845 		 * N = 16 * { fRF(pc) + fIF(pc) }
846 		 * or N = 16* fRF(pc) + 16*fIF(pc) }
847 		 * where:
848 		 *  pc is picture carrier, fRF & fIF are in MHz
849 		 *
850 		 * fortunatly, frequency is passed in as MHz * 16
851 		 * and the TBL_IF frequency is also stored in MHz * 16
852 		 */
853 		N = frequency + TBL_IF;
854 
855 		/* set the address of the PLL */
856 		addr    = bktr->card.tuner_pllAddr;
857 		control = tuner->pllControl[ band_select ];
858 		band    = tuner->bandAddrs[ band_select ];
859 
860 		if(!(band && control))		/* Don't try to set un-	*/
861 		  return(-1);			/* supported modes.	*/
862 
863 		if ( frequency > bktr->tuner.frequency ) {
864 			i2cWrite( bktr, addr, (N>>8) & 0x7f, N & 0xff );
865 			i2cWrite( bktr, addr, control, band );
866 	        }
867 	        else {
868 			i2cWrite( bktr, addr, control, band );
869 			i2cWrite( bktr, addr, (N>>8) & 0x7f, N & 0xff );
870        		}
871 
872 #if defined( TUNER_AFC )
873 		if ( bktr->tuner.afc == TRUE ) {
874 #if defined( TEST_TUNER_AFC )
875 			oldFrequency = frequency;
876 #endif
877 			if ( (N = do_afc( bktr, addr, N )) < 0 ) {
878 			    /* AFC failed, restore requested frequency */
879 			    N = frequency + TBL_IF;
880 #if defined( TEST_TUNER_AFC )
881 			    printf("%s: do_afc: failed to lock\n",
882 				   bktr_name(bktr));
883 #endif
884 			    i2cWrite( bktr, addr, (N>>8) & 0x7f, N & 0xff );
885 			}
886 			else
887 			    frequency = N - TBL_IF;
888 #if defined( TEST_TUNER_AFC )
889  printf("%s: do_afc: returned freq %d (%d %% %d)\n", bktr_name(bktr), frequency, frequency / 16, frequency % 16);
890 			    afcDelta = frequency - oldFrequency;
891  printf("%s: changed by: %d clicks (%d mod %d)\n", bktr_name(bktr), afcDelta, afcDelta / 16, afcDelta % 16);
892 #endif
893 			}
894 #endif /* TUNER_AFC */
895 
896 		bktr->tuner.frequency = frequency;
897 	}
898 
899 	if ( type == FM_RADIO_FREQUENCY ) {
900 		band_select = FM_RADIO_BAND;
901 
902 		/*
903 		 * N = { fRF(pc) + fIF(pc) }/step_size
904                  * The step size is 50kHz for FM radio.
905 		 * (eg after 102.35MHz comes 102.40 MHz)
906 		 * fIF is 10.7 MHz (as detailed in the specs)
907 		 *
908 		 * frequency is passed in as MHz * 100
909 		 *
910 		 * So, we have N = (frequency/100 + 10.70)  /(50/1000)
911 		 */
912 		N = (frequency + 1070)/5;
913 
914 		/* set the address of the PLL */
915 		addr    = bktr->card.tuner_pllAddr;
916 		control = tuner->pllControl[ band_select ];
917 		band    = tuner->bandAddrs[ band_select ];
918 
919 		if(!(band && control))		/* Don't try to set un-	*/
920 		  return(-1);			/* supported modes.	*/
921 
922 		band |= bktr->tuner.radio_mode; /* tuner.radio_mode is set in
923 						 * the ioctls RADIO_SETMODE
924 						 * and RADIO_GETMODE */
925 
926 		i2cWrite( bktr, addr, control, band );
927 		i2cWrite( bktr, addr, (N>>8) & 0x7f, N & 0xff );
928 
929 		bktr->tuner.frequency = (N * 5) - 1070;
930 
931 
932 	}
933 
934 
935 	return( 0 );
936 }
937 
938 
939 
940 #if defined( TUNER_AFC )
941 /*
942  *
943  */
944 int
do_afc(bktr_ptr_t bktr,int addr,int frequency)945 do_afc( bktr_ptr_t bktr, int addr, int frequency )
946 {
947 	int step;
948 	int status;
949 	int origFrequency;
950 
951 	origFrequency = frequency;
952 
953 	/* wait for first setting to take effect */
954 	tsleep( BKTR_SLEEP, PZERO, "tuning", hz/8 );
955 
956 	if ( (status = i2cRead( bktr, addr + 1 )) < 0 )
957 		return( -1 );
958 
959 #if defined( TEST_TUNER_AFC )
960  printf( "%s: Original freq: %d, status: 0x%02x\n", bktr_name(bktr), frequency, status );
961 #endif
962 	for ( step = 0; step < AFC_MAX_STEP; ++step ) {
963 		if ( (status = i2cRead( bktr, addr + 1 )) < 0 )
964 			goto fubar;
965 		if ( !(status & 0x40) ) {
966 #if defined( TEST_TUNER_AFC )
967  printf( "%s: no lock!\n", bktr_name(bktr) );
968 #endif
969 			goto fubar;
970 		}
971 
972 		switch( status & AFC_BITS ) {
973 		case AFC_FREQ_CENTERED:
974 #if defined( TEST_TUNER_AFC )
975  printf( "%s: Centered, freq: %d, status: 0x%02x\n", bktr_name(bktr), frequency, status );
976 #endif
977 			return( frequency );
978 
979 		case AFC_FREQ_MINUS_125:
980 		case AFC_FREQ_MINUS_62:
981 #if defined( TEST_TUNER_AFC )
982  printf( "%s: Low, freq: %d, status: 0x%02x\n", bktr_name(bktr), frequency, status );
983 #endif
984 			--frequency;
985 			break;
986 
987 		case AFC_FREQ_PLUS_62:
988 		case AFC_FREQ_PLUS_125:
989 #if defined( TEST_TUNER_AFC )
990  printf( "%s: Hi, freq: %d, status: 0x%02x\n", bktr_name(bktr), frequency, status );
991 #endif
992 			++frequency;
993 			break;
994 		}
995 
996 		i2cWrite( bktr, addr,
997 			  (frequency>>8) & 0x7f, frequency & 0xff );
998 		DELAY( AFC_DELAY );
999 	}
1000 
1001  fubar:
1002 	i2cWrite( bktr, addr,
1003 		  (origFrequency>>8) & 0x7f, origFrequency & 0xff );
1004 
1005 	return( -1 );
1006 }
1007 #endif /* TUNER_AFC */
1008 #undef TBL_IF
1009 
1010 
1011 /*
1012  * Get the Tuner status and signal strength
1013  */
get_tuner_status(bktr_ptr_t bktr)1014 int     get_tuner_status( bktr_ptr_t bktr ) {
1015 	if (bktr->card.tuner == &tuners[TUNER_MT2032])
1016 		return 0;
1017 	return i2cRead( bktr, bktr->card.tuner_pllAddr + 1 );
1018 }
1019 
1020 /*
1021  * set the channel of the tuner
1022  */
1023 int
tv_channel(bktr_ptr_t bktr,int channel)1024 tv_channel( bktr_ptr_t bktr, int channel )
1025 {
1026 	int frequency;
1027 
1028 	/* calculate the frequency according to tuner type */
1029 	if ( (frequency = frequency_lookup( bktr, channel )) < 0 )
1030 		return( -1 );
1031 
1032 	/* set the new frequency */
1033 	if ( tv_freq( bktr, frequency, TV_FREQUENCY ) < 0 )
1034 		return( -1 );
1035 
1036 	/* OK to update records */
1037 	return( (bktr->tuner.channel = channel) );
1038 }
1039 
1040 /*
1041  * get channelset name
1042  */
1043 int
tuner_getchnlset(struct bktr_chnlset * chnlset)1044 tuner_getchnlset(struct bktr_chnlset *chnlset)
1045 {
1046        if (( chnlset->index < CHNLSET_MIN ) ||
1047                ( chnlset->index > CHNLSET_MAX ))
1048                        return( EINVAL );
1049 
1050        memcpy(&chnlset->name, &freqTable[chnlset->index].name,
1051                BT848_MAX_CHNLSET_NAME_LEN);
1052 
1053        chnlset->max_channel=freqTable[chnlset->index].ptr[0];
1054        return( 0 );
1055 }
1056 
1057 
1058 
1059 
1060 #define	TDA9887_ADDR	0x86
1061 
1062 static int
TDA9887_init(bktr_ptr_t bktr,int output2_enable)1063 TDA9887_init(bktr_ptr_t bktr, int output2_enable)
1064 {
1065 	u_char addr = TDA9887_ADDR;
1066 
1067 	i2cWrite(bktr, addr, 0, output2_enable ? 0x50 : 0xd0);
1068 	i2cWrite(bktr, addr, 1, 0x6e); /* takeover point / de-emphasis */
1069 
1070 	/* PAL BG: 0x09  PAL I: 0x0a  NTSC: 0x04 */
1071 #ifdef MT2032_NTSC
1072 	i2cWrite(bktr, addr, 2, 0x04);
1073 #else
1074 	i2cWrite(bktr, addr, 2, 0x09);
1075 #endif
1076 	return 0;
1077 }
1078 
1079 
1080 
1081 #define MT2032_OPTIMIZE_VCO	 1
1082 
1083 /* holds the value of XOGC register after init */
1084 static int      MT2032_XOGC = 4;
1085 
1086 /* card.tuner_pllAddr not set during init */
1087 #define	MT2032_ADDR		0xc0
1088 
1089 #ifndef MT2032_ADDR
1090 #define	MT2032_ADDR		(bktr->card.tuner_pllAddr)
1091 #endif
1092 
1093 static int
_MT2032_GetRegister(bktr_ptr_t bktr,u_char regNum)1094 _MT2032_GetRegister(bktr_ptr_t bktr, u_char regNum)
1095 {
1096 	int		ch;
1097 
1098 	if (i2cWrite(bktr, MT2032_ADDR, regNum, -1) == -1) {
1099 		if (bootverbose)
1100 			printf("%s: MT2032 write failed (i2c addr %#x)\n",
1101 				bktr_name(bktr), MT2032_ADDR);
1102 		return -1;
1103 	}
1104 	if ((ch = i2cRead(bktr, MT2032_ADDR + 1)) == -1) {
1105 		if (bootverbose)
1106 			printf("%s: MT2032 get register %d failed\n",
1107 				bktr_name(bktr), regNum);
1108 		return -1;
1109 	}
1110 	return ch;
1111 }
1112 
1113 static void
_MT2032_SetRegister(bktr_ptr_t bktr,u_char regNum,u_char data)1114 _MT2032_SetRegister(bktr_ptr_t bktr, u_char regNum, u_char data)
1115 {
1116 	i2cWrite(bktr, MT2032_ADDR, regNum, data);
1117 }
1118 
1119 #define	MT2032_GetRegister(r)		_MT2032_GetRegister(bktr,r)
1120 #define	MT2032_SetRegister(r,d)		_MT2032_SetRegister(bktr,r,d)
1121 
1122 
1123 int
mt2032_init(bktr_ptr_t bktr)1124 mt2032_init(bktr_ptr_t bktr)
1125 {
1126 	u_char            rdbuf[22];
1127 	int             xogc, xok = 0;
1128 	int             i;
1129 	int		x;
1130 
1131 	TDA9887_init(bktr, 0);
1132 
1133 	for (i = 0; i < 21; i++) {
1134 		if ((x = MT2032_GetRegister(i)) == -1)
1135 			break;
1136 		rdbuf[i] = x;
1137 	}
1138 	if (i < 21)
1139 		return -1;
1140 
1141 	printf("%s: MT2032: Companycode=%02x%02x Part=%02x Revision=%02x\n",
1142 		bktr_name(bktr),
1143 		rdbuf[0x11], rdbuf[0x12], rdbuf[0x13], rdbuf[0x14]);
1144 	if (rdbuf[0x13] != 4) {
1145 		printf("%s: MT2032 not found or unknown type\n", bktr_name(bktr));
1146 		return -1;
1147 	}
1148 
1149 	/* Initialize Registers per spec. */
1150 	MT2032_SetRegister(2, 0xff);
1151 	MT2032_SetRegister(3, 0x0f);
1152 	MT2032_SetRegister(4, 0x1f);
1153 	MT2032_SetRegister(6, 0xe4);
1154 	MT2032_SetRegister(7, 0x8f);
1155 	MT2032_SetRegister(8, 0xc3);
1156 	MT2032_SetRegister(9, 0x4e);
1157 	MT2032_SetRegister(10, 0xec);
1158 	MT2032_SetRegister(13, 0x32);
1159 
1160 	/* Adjust XOGC (register 7), wait for XOK */
1161 	xogc = 7;
1162 	do {
1163 		DELAY(10000);
1164 		xok = MT2032_GetRegister(0x0e) & 0x01;
1165 		if (xok == 1) {
1166 			break;
1167 		}
1168 		xogc--;
1169 		if (xogc == 3) {
1170 			xogc = 4;	/* min. 4 per spec */
1171 			break;
1172 		}
1173 		MT2032_SetRegister(7, 0x88 + xogc);
1174 	} while (xok != 1);
1175 
1176 	TDA9887_init(bktr, 1);
1177 
1178 	MT2032_XOGC = xogc;
1179 
1180 	return 0;
1181 }
1182 
1183 static int
MT2032_SpurCheck(int f1,int f2,int spectrum_from,int spectrum_to)1184 MT2032_SpurCheck(int f1, int f2, int spectrum_from, int spectrum_to)
1185 {
1186 	int             n1 = 1, n2, f;
1187 
1188 	f1 = f1 / 1000;		/* scale to kHz to avoid 32bit overflows */
1189 	f2 = f2 / 1000;
1190 	spectrum_from /= 1000;
1191 	spectrum_to /= 1000;
1192 
1193 	do {
1194 		n2 = -n1;
1195 		f = n1 * (f1 - f2);
1196 		do {
1197 			n2--;
1198 			f = f - f2;
1199 			if ((f > spectrum_from) && (f < spectrum_to)) {
1200 				return 1;
1201 			}
1202 		} while ((f > (f2 - spectrum_to)) || (n2 > -5));
1203 		n1++;
1204 	} while (n1 < 5);
1205 
1206 	return 0;
1207 }
1208 
1209 static int
MT2032_ComputeFreq(int rfin,int if1,int if2,int spectrum_from,int spectrum_to,unsigned char * buf,int * ret_sel,int xogc)1210 MT2032_ComputeFreq(
1211 		   int rfin,
1212 		   int if1,
1213 		   int if2,
1214 		   int spectrum_from,
1215 		   int spectrum_to,
1216 		   unsigned char *buf,
1217 		   int *ret_sel,
1218 		   int xogc
1219 )
1220 {				/* all in Hz */
1221 	int             fref, lo1, lo1n, lo1a, s, sel;
1222 	int             lo1freq, desired_lo1, desired_lo2, lo2, lo2n, lo2a,
1223 	                lo2num, lo2freq;
1224 	int             nLO1adjust;
1225 
1226 	fref = 5250 * 1000;	/* 5.25MHz */
1227 
1228 	/* per spec 2.3.1 */
1229 	desired_lo1 = rfin + if1;
1230 	lo1 = (2 * (desired_lo1 / 1000) + (fref / 1000)) / (2 * fref / 1000);
1231 	lo1freq = lo1 * fref;
1232 	desired_lo2 = lo1freq - rfin - if2;
1233 
1234 	/* per spec 2.3.2 */
1235 	for (nLO1adjust = 1; nLO1adjust < 3; nLO1adjust++) {
1236 		if (!MT2032_SpurCheck(lo1freq, desired_lo2, spectrum_from, spectrum_to)) {
1237 			break;
1238 		}
1239 		if (lo1freq < desired_lo1) {
1240 			lo1 += nLO1adjust;
1241 		} else {
1242 			lo1 -= nLO1adjust;
1243 		}
1244 
1245 		lo1freq = lo1 * fref;
1246 		desired_lo2 = lo1freq - rfin - if2;
1247 	}
1248 
1249 	/* per spec 2.3.3 */
1250 	s = lo1freq / 1000 / 1000;
1251 
1252 	if (MT2032_OPTIMIZE_VCO) {
1253 		if (s > 1890) {
1254 			sel = 0;
1255 		} else if (s > 1720) {
1256 			sel = 1;
1257 		} else if (s > 1530) {
1258 			sel = 2;
1259 		} else if (s > 1370) {
1260 			sel = 3;
1261 		} else {
1262 			sel = 4;/* >1090 */
1263 		}
1264 	} else {
1265 		if (s > 1790) {
1266 			sel = 0;/* <1958 */
1267 		} else if (s > 1617) {
1268 			sel = 1;
1269 		} else if (s > 1449) {
1270 			sel = 2;
1271 		} else if (s > 1291) {
1272 			sel = 3;
1273 		} else {
1274 			sel = 4;/* >1090 */
1275 		}
1276 	}
1277 
1278 	*ret_sel = sel;
1279 
1280 	/* per spec 2.3.4 */
1281 	lo1n = lo1 / 8;
1282 	lo1a = lo1 - (lo1n * 8);
1283 	lo2 = desired_lo2 / fref;
1284 	lo2n = lo2 / 8;
1285 	lo2a = lo2 - (lo2n * 8);
1286 	/* scale to fit in 32bit arith */
1287 	lo2num = ((desired_lo2 / 1000) % (fref / 1000)) * 3780 / (fref / 1000);
1288 	lo2freq = (lo2a + 8 * lo2n) * fref + lo2num * (fref / 1000) / 3780 * 1000;
1289 
1290 	if (lo1a < 0 || lo1a > 7 || lo1n < 17 || lo1n > 48 || lo2a < 0 ||
1291 	    lo2a > 7 || lo2n < 17 || lo2n > 30) {
1292 		printf("MT2032: parameter out of range\n");
1293 		return -1;
1294 	}
1295 	/* set up MT2032 register map for transfer over i2c */
1296 	buf[0] = lo1n - 1;
1297 	buf[1] = lo1a | (sel << 4);
1298 	buf[2] = 0x86;		/* LOGC */
1299 	buf[3] = 0x0f;		/* reserved */
1300 	buf[4] = 0x1f;
1301 	buf[5] = (lo2n - 1) | (lo2a << 5);
1302 	if (rfin < 400 * 1000 * 1000) {
1303 		buf[6] = 0xe4;
1304 	} else {
1305 		buf[6] = 0xf4;	/* set PKEN per rev 1.2 */
1306 	}
1307 
1308 	buf[7] = 8 + xogc;
1309 	buf[8] = 0xc3;		/* reserved */
1310 	buf[9] = 0x4e;		/* reserved */
1311 	buf[10] = 0xec;		/* reserved */
1312 	buf[11] = (lo2num & 0xff);
1313 	buf[12] = (lo2num >> 8) | 0x80;	/* Lo2RST */
1314 
1315 	return 0;
1316 }
1317 
1318 static int
MT2032_CheckLOLock(bktr_ptr_t bktr)1319 MT2032_CheckLOLock(bktr_ptr_t bktr)
1320 {
1321 	int             t, lock = 0;
1322 	for (t = 0; t < 10; t++) {
1323 		lock = MT2032_GetRegister(0x0e) & 0x06;
1324 		if (lock == 6) {
1325 			break;
1326 		}
1327 		DELAY(1000);
1328 	}
1329 	return lock;
1330 }
1331 
1332 static int
MT2032_OptimizeVCO(bktr_ptr_t bktr,int sel,int lock)1333 MT2032_OptimizeVCO(bktr_ptr_t bktr, int sel, int lock)
1334 {
1335 	int             tad1, lo1a;
1336 
1337 	tad1 = MT2032_GetRegister(0x0f) & 0x07;
1338 
1339 	if (tad1 == 0) {
1340 		return lock;
1341 	}
1342 	if (tad1 == 1) {
1343 		return lock;
1344 	}
1345 	if (tad1 == 2) {
1346 		if (sel == 0) {
1347 			return lock;
1348 		} else {
1349 			sel--;
1350 		}
1351 	} else {
1352 		if (sel < 4) {
1353 			sel++;
1354 		} else {
1355 			return lock;
1356 		}
1357 	}
1358 	lo1a = MT2032_GetRegister(0x01) & 0x07;
1359 	MT2032_SetRegister(0x01, lo1a | (sel << 4));
1360 	lock = MT2032_CheckLOLock(bktr);
1361 	return lock;
1362 }
1363 
1364 static int
MT2032_SetIFFreq(bktr_ptr_t bktr,int rfin,int if1,int if2,int from,int to)1365 MT2032_SetIFFreq(bktr_ptr_t bktr, int rfin, int if1, int if2, int from, int to)
1366 {
1367 	u_char          buf[21];
1368 	int             lint_try, sel, lock = 0;
1369 
1370 	if (MT2032_ComputeFreq(rfin, if1, if2, from, to, &buf[0], &sel, MT2032_XOGC) == -1)
1371 		return -1;
1372 
1373 	TDA9887_init(bktr, 0);
1374 
1375 	/* send only the relevant registers per Rev. 1.2 */
1376 	MT2032_SetRegister(0, buf[0x00]);
1377 	MT2032_SetRegister(1, buf[0x01]);
1378 	MT2032_SetRegister(2, buf[0x02]);
1379 
1380 	MT2032_SetRegister(5, buf[0x05]);
1381 	MT2032_SetRegister(6, buf[0x06]);
1382 	MT2032_SetRegister(7, buf[0x07]);
1383 
1384 	MT2032_SetRegister(11, buf[0x0B]);
1385 	MT2032_SetRegister(12, buf[0x0C]);
1386 
1387 	/* wait for PLLs to lock (per manual), retry LINT if not. */
1388 	for (lint_try = 0; lint_try < 2; lint_try++) {
1389 		lock = MT2032_CheckLOLock(bktr);
1390 
1391 		if (MT2032_OPTIMIZE_VCO) {
1392 			lock = MT2032_OptimizeVCO(bktr, sel, lock);
1393 		}
1394 		if (lock == 6) {
1395 			break;
1396 		}
1397 		/* set LINT to re-init PLLs */
1398 		MT2032_SetRegister(7, 0x80 + 8 + MT2032_XOGC);
1399 		DELAY(10000);
1400 		MT2032_SetRegister(7, 8 + MT2032_XOGC);
1401 	}
1402 	if (lock != 6)
1403 		printf("%s: PLL didn't lock\n", bktr_name(bktr));
1404 
1405 	MT2032_SetRegister(2, 0x20);
1406 
1407 	TDA9887_init(bktr, 1);
1408 	return 0;
1409 }
1410 
1411 static void
mt2032_set_tv_freq(bktr_ptr_t bktr,unsigned int freq)1412 mt2032_set_tv_freq(bktr_ptr_t bktr, unsigned int freq)
1413 {
1414 	int if2,from,to;
1415 	int stat, tad;
1416 
1417 #ifdef MT2032_NTSC
1418 	from=40750*1000;
1419 	to=46750*1000;
1420 	if2=45750*1000;
1421 #else
1422 	from=32900*1000;
1423 	to=39900*1000;
1424 	if2=38900*1000;
1425 #endif
1426 
1427 	if (MT2032_SetIFFreq(bktr, freq*62500 /* freq*1000*1000/16 */,
1428 			1090*1000*1000, if2, from, to) == 0) {
1429 		bktr->tuner.frequency = freq;
1430 		stat = MT2032_GetRegister(0x0e);
1431 		tad = MT2032_GetRegister(0x0f);
1432 		if (bootverbose)
1433 			printf("%s: frequency set to %d, st = %#x, tad = %#x\n",
1434 				bktr_name(bktr), freq*62500, stat, tad);
1435 	}
1436 }
1437