Merge branch 'topic/emu10k1' into for-linus
[linux-2.6] / drivers / media / common / tuners / tuner-simple.c
1 /*
2  * i2c tv tuner chip device driver
3  * controls all those simple 4-control-bytes style tuners.
4  *
5  * This "tuner-simple" module was split apart from the original "tuner" module.
6  */
7 #include <linux/delay.h>
8 #include <linux/i2c.h>
9 #include <linux/videodev2.h>
10 #include <media/tuner.h>
11 #include <media/v4l2-common.h>
12 #include <media/tuner-types.h>
13 #include "tuner-i2c.h"
14 #include "tuner-simple.h"
15
16 static int debug;
17 module_param(debug, int, 0644);
18 MODULE_PARM_DESC(debug, "enable verbose debug messages");
19
20 #define TUNER_SIMPLE_MAX 64
21 static unsigned int simple_devcount;
22
23 static int offset;
24 module_param(offset, int, 0664);
25 MODULE_PARM_DESC(offset, "Allows to specify an offset for tuner");
26
27 static unsigned int atv_input[TUNER_SIMPLE_MAX] = \
28                         { [0 ... (TUNER_SIMPLE_MAX-1)] = 0 };
29 static unsigned int dtv_input[TUNER_SIMPLE_MAX] = \
30                         { [0 ... (TUNER_SIMPLE_MAX-1)] = 0 };
31 module_param_array(atv_input, int, NULL, 0644);
32 module_param_array(dtv_input, int, NULL, 0644);
33 MODULE_PARM_DESC(atv_input, "specify atv rf input, 0 for autoselect");
34 MODULE_PARM_DESC(dtv_input, "specify dtv rf input, 0 for autoselect");
35
36 /* ---------------------------------------------------------------------- */
37
38 /* tv standard selection for Temic 4046 FM5
39    this value takes the low bits of control byte 2
40    from datasheet Rev.01, Feb.00
41      standard     BG      I       L       L2      D
42      picture IF   38.9    38.9    38.9    33.95   38.9
43      sound 1      33.4    32.9    32.4    40.45   32.4
44      sound 2      33.16
45      NICAM        33.05   32.348  33.05           33.05
46  */
47 #define TEMIC_SET_PAL_I         0x05
48 #define TEMIC_SET_PAL_DK        0x09
49 #define TEMIC_SET_PAL_L         0x0a /* SECAM ? */
50 #define TEMIC_SET_PAL_L2        0x0b /* change IF ! */
51 #define TEMIC_SET_PAL_BG        0x0c
52
53 /* tv tuner system standard selection for Philips FQ1216ME
54    this value takes the low bits of control byte 2
55    from datasheet "1999 Nov 16" (supersedes "1999 Mar 23")
56      standard           BG      DK      I       L       L`
57      picture carrier    38.90   38.90   38.90   38.90   33.95
58      colour             34.47   34.47   34.47   34.47   38.38
59      sound 1            33.40   32.40   32.90   32.40   40.45
60      sound 2            33.16   -       -       -       -
61      NICAM              33.05   33.05   32.35   33.05   39.80
62  */
63 #define PHILIPS_SET_PAL_I       0x01 /* Bit 2 always zero !*/
64 #define PHILIPS_SET_PAL_BGDK    0x09
65 #define PHILIPS_SET_PAL_L2      0x0a
66 #define PHILIPS_SET_PAL_L       0x0b
67
68 /* system switching for Philips FI1216MF MK2
69    from datasheet "1996 Jul 09",
70     standard         BG     L      L'
71     picture carrier  38.90  38.90  33.95
72     colour           34.47  34.37  38.38
73     sound 1          33.40  32.40  40.45
74     sound 2          33.16  -      -
75     NICAM            33.05  33.05  39.80
76  */
77 #define PHILIPS_MF_SET_STD_BG   0x01 /* Bit 2 must be zero, Bit 3 is system output */
78 #define PHILIPS_MF_SET_STD_L    0x03 /* Used on Secam France */
79 #define PHILIPS_MF_SET_STD_LC   0x02 /* Used on SECAM L' */
80
81 /* Control byte */
82
83 #define TUNER_RATIO_MASK        0x06 /* Bit cb1:cb2 */
84 #define TUNER_RATIO_SELECT_50   0x00
85 #define TUNER_RATIO_SELECT_32   0x02
86 #define TUNER_RATIO_SELECT_166  0x04
87 #define TUNER_RATIO_SELECT_62   0x06
88
89 #define TUNER_CHARGE_PUMP       0x40  /* Bit cb6 */
90
91 /* Status byte */
92
93 #define TUNER_POR         0x80
94 #define TUNER_FL          0x40
95 #define TUNER_MODE        0x38
96 #define TUNER_AFC         0x07
97 #define TUNER_SIGNAL      0x07
98 #define TUNER_STEREO      0x10
99
100 #define TUNER_PLL_LOCKED   0x40
101 #define TUNER_STEREO_MK3   0x04
102
103 static DEFINE_MUTEX(tuner_simple_list_mutex);
104 static LIST_HEAD(hybrid_tuner_instance_list);
105
106 struct tuner_simple_priv {
107         unsigned int nr;
108         u16 last_div;
109
110         struct tuner_i2c_props i2c_props;
111         struct list_head hybrid_tuner_instance_list;
112
113         unsigned int type;
114         struct tunertype *tun;
115
116         u32 frequency;
117         u32 bandwidth;
118 };
119
120 /* ---------------------------------------------------------------------- */
121
122 static int tuner_read_status(struct dvb_frontend *fe)
123 {
124         struct tuner_simple_priv *priv = fe->tuner_priv;
125         unsigned char byte;
126
127         if (1 != tuner_i2c_xfer_recv(&priv->i2c_props, &byte, 1))
128                 return 0;
129
130         return byte;
131 }
132
133 static inline int tuner_signal(const int status)
134 {
135         return (status & TUNER_SIGNAL) << 13;
136 }
137
138 static inline int tuner_stereo(const int type, const int status)
139 {
140         switch (type) {
141         case TUNER_PHILIPS_FM1216ME_MK3:
142         case TUNER_PHILIPS_FM1236_MK3:
143         case TUNER_PHILIPS_FM1256_IH3:
144         case TUNER_LG_NTSC_TAPE:
145         case TUNER_TCL_MF02GIP_5N:
146                 return ((status & TUNER_SIGNAL) == TUNER_STEREO_MK3);
147         default:
148                 return status & TUNER_STEREO;
149         }
150 }
151
152 static inline int tuner_islocked(const int status)
153 {
154         return (status & TUNER_FL);
155 }
156
157 static inline int tuner_afcstatus(const int status)
158 {
159         return (status & TUNER_AFC) - 2;
160 }
161
162
163 static int simple_get_status(struct dvb_frontend *fe, u32 *status)
164 {
165         struct tuner_simple_priv *priv = fe->tuner_priv;
166         int tuner_status;
167
168         if (priv->i2c_props.adap == NULL)
169                 return -EINVAL;
170
171         tuner_status = tuner_read_status(fe);
172
173         *status = 0;
174
175         if (tuner_islocked(tuner_status))
176                 *status = TUNER_STATUS_LOCKED;
177         if (tuner_stereo(priv->type, tuner_status))
178                 *status |= TUNER_STATUS_STEREO;
179
180         tuner_dbg("AFC Status: %d\n", tuner_afcstatus(tuner_status));
181
182         return 0;
183 }
184
185 static int simple_get_rf_strength(struct dvb_frontend *fe, u16 *strength)
186 {
187         struct tuner_simple_priv *priv = fe->tuner_priv;
188         int signal;
189
190         if (priv->i2c_props.adap == NULL)
191                 return -EINVAL;
192
193         signal = tuner_signal(tuner_read_status(fe));
194
195         *strength = signal;
196
197         tuner_dbg("Signal strength: %d\n", signal);
198
199         return 0;
200 }
201
202 /* ---------------------------------------------------------------------- */
203
204 static inline char *tuner_param_name(enum param_type type)
205 {
206         char *name;
207
208         switch (type) {
209         case TUNER_PARAM_TYPE_RADIO:
210                 name = "radio";
211                 break;
212         case TUNER_PARAM_TYPE_PAL:
213                 name = "pal";
214                 break;
215         case TUNER_PARAM_TYPE_SECAM:
216                 name = "secam";
217                 break;
218         case TUNER_PARAM_TYPE_NTSC:
219                 name = "ntsc";
220                 break;
221         case TUNER_PARAM_TYPE_DIGITAL:
222                 name = "digital";
223                 break;
224         default:
225                 name = "unknown";
226                 break;
227         }
228         return name;
229 }
230
231 static struct tuner_params *simple_tuner_params(struct dvb_frontend *fe,
232                                                 enum param_type desired_type)
233 {
234         struct tuner_simple_priv *priv = fe->tuner_priv;
235         struct tunertype *tun = priv->tun;
236         int i;
237
238         for (i = 0; i < tun->count; i++)
239                 if (desired_type == tun->params[i].type)
240                         break;
241
242         /* use default tuner params if desired_type not available */
243         if (i == tun->count) {
244                 tuner_dbg("desired params (%s) undefined for tuner %d\n",
245                           tuner_param_name(desired_type), priv->type);
246                 i = 0;
247         }
248
249         tuner_dbg("using tuner params #%d (%s)\n", i,
250                   tuner_param_name(tun->params[i].type));
251
252         return &tun->params[i];
253 }
254
255 static int simple_config_lookup(struct dvb_frontend *fe,
256                                 struct tuner_params *t_params,
257                                 unsigned *frequency, u8 *config, u8 *cb)
258 {
259         struct tuner_simple_priv *priv = fe->tuner_priv;
260         int i;
261
262         for (i = 0; i < t_params->count; i++) {
263                 if (*frequency > t_params->ranges[i].limit)
264                         continue;
265                 break;
266         }
267         if (i == t_params->count) {
268                 tuner_dbg("frequency out of range (%d > %d)\n",
269                           *frequency, t_params->ranges[i - 1].limit);
270                 *frequency = t_params->ranges[--i].limit;
271         }
272         *config = t_params->ranges[i].config;
273         *cb     = t_params->ranges[i].cb;
274
275         tuner_dbg("freq = %d.%02d (%d), range = %d, "
276                   "config = 0x%02x, cb = 0x%02x\n",
277                   *frequency / 16, *frequency % 16 * 100 / 16, *frequency,
278                   i, *config, *cb);
279
280         return i;
281 }
282
283 /* ---------------------------------------------------------------------- */
284
285 static void simple_set_rf_input(struct dvb_frontend *fe,
286                                 u8 *config, u8 *cb, unsigned int rf)
287 {
288         struct tuner_simple_priv *priv = fe->tuner_priv;
289
290         switch (priv->type) {
291         case TUNER_PHILIPS_TUV1236D:
292                 switch (rf) {
293                 case 1:
294                         *cb |= 0x08;
295                         break;
296                 default:
297                         *cb &= ~0x08;
298                         break;
299                 }
300                 break;
301         case TUNER_PHILIPS_FCV1236D:
302                 switch (rf) {
303                 case 1:
304                         *cb |= 0x01;
305                         break;
306                 default:
307                         *cb &= ~0x01;
308                         break;
309                 }
310                 break;
311         default:
312                 break;
313         }
314 }
315
316 static int simple_std_setup(struct dvb_frontend *fe,
317                             struct analog_parameters *params,
318                             u8 *config, u8 *cb)
319 {
320         struct tuner_simple_priv *priv = fe->tuner_priv;
321         int rc;
322
323         /* tv norm specific stuff for multi-norm tuners */
324         switch (priv->type) {
325         case TUNER_PHILIPS_SECAM: /* FI1216MF */
326                 /* 0x01 -> ??? no change ??? */
327                 /* 0x02 -> PAL BDGHI / SECAM L */
328                 /* 0x04 -> ??? PAL others / SECAM others ??? */
329                 *cb &= ~0x03;
330                 if (params->std & V4L2_STD_SECAM_L)
331                         /* also valid for V4L2_STD_SECAM */
332                         *cb |= PHILIPS_MF_SET_STD_L;
333                 else if (params->std & V4L2_STD_SECAM_LC)
334                         *cb |= PHILIPS_MF_SET_STD_LC;
335                 else /* V4L2_STD_B|V4L2_STD_GH */
336                         *cb |= PHILIPS_MF_SET_STD_BG;
337                 break;
338
339         case TUNER_TEMIC_4046FM5:
340                 *cb &= ~0x0f;
341
342                 if (params->std & V4L2_STD_PAL_BG) {
343                         *cb |= TEMIC_SET_PAL_BG;
344
345                 } else if (params->std & V4L2_STD_PAL_I) {
346                         *cb |= TEMIC_SET_PAL_I;
347
348                 } else if (params->std & V4L2_STD_PAL_DK) {
349                         *cb |= TEMIC_SET_PAL_DK;
350
351                 } else if (params->std & V4L2_STD_SECAM_L) {
352                         *cb |= TEMIC_SET_PAL_L;
353
354                 }
355                 break;
356
357         case TUNER_PHILIPS_FQ1216ME:
358                 *cb &= ~0x0f;
359
360                 if (params->std & (V4L2_STD_PAL_BG|V4L2_STD_PAL_DK)) {
361                         *cb |= PHILIPS_SET_PAL_BGDK;
362
363                 } else if (params->std & V4L2_STD_PAL_I) {
364                         *cb |= PHILIPS_SET_PAL_I;
365
366                 } else if (params->std & V4L2_STD_SECAM_L) {
367                         *cb |= PHILIPS_SET_PAL_L;
368
369                 }
370                 break;
371
372         case TUNER_PHILIPS_FCV1236D:
373                 /* 0x00 -> ATSC antenna input 1 */
374                 /* 0x01 -> ATSC antenna input 2 */
375                 /* 0x02 -> NTSC antenna input 1 */
376                 /* 0x03 -> NTSC antenna input 2 */
377                 *cb &= ~0x03;
378                 if (!(params->std & V4L2_STD_ATSC))
379                         *cb |= 2;
380                 break;
381
382         case TUNER_MICROTUNE_4042FI5:
383                 /* Set the charge pump for fast tuning */
384                 *config |= TUNER_CHARGE_PUMP;
385                 break;
386
387         case TUNER_PHILIPS_TUV1236D:
388         {
389                 struct tuner_i2c_props i2c = priv->i2c_props;
390                 /* 0x40 -> ATSC antenna input 1 */
391                 /* 0x48 -> ATSC antenna input 2 */
392                 /* 0x00 -> NTSC antenna input 1 */
393                 /* 0x08 -> NTSC antenna input 2 */
394                 u8 buffer[4] = { 0x14, 0x00, 0x17, 0x00};
395                 *cb &= ~0x40;
396                 if (params->std & V4L2_STD_ATSC) {
397                         *cb |= 0x40;
398                         buffer[1] = 0x04;
399                 }
400                 /* set to the correct mode (analog or digital) */
401                 i2c.addr = 0x0a;
402                 rc = tuner_i2c_xfer_send(&i2c, &buffer[0], 2);
403                 if (2 != rc)
404                         tuner_warn("i2c i/o error: rc == %d "
405                                    "(should be 2)\n", rc);
406                 rc = tuner_i2c_xfer_send(&i2c, &buffer[2], 2);
407                 if (2 != rc)
408                         tuner_warn("i2c i/o error: rc == %d "
409                                    "(should be 2)\n", rc);
410                 break;
411         }
412         }
413         if (atv_input[priv->nr])
414                 simple_set_rf_input(fe, config, cb, atv_input[priv->nr]);
415
416         return 0;
417 }
418
419 static int simple_post_tune(struct dvb_frontend *fe, u8 *buffer,
420                             u16 div, u8 config, u8 cb)
421 {
422         struct tuner_simple_priv *priv = fe->tuner_priv;
423         int rc;
424
425         switch (priv->type) {
426         case TUNER_LG_TDVS_H06XF:
427                 /* Set the Auxiliary Byte. */
428                 buffer[0] = buffer[2];
429                 buffer[0] &= ~0x20;
430                 buffer[0] |= 0x18;
431                 buffer[1] = 0x20;
432                 tuner_dbg("tv 0x%02x 0x%02x\n", buffer[0], buffer[1]);
433
434                 rc = tuner_i2c_xfer_send(&priv->i2c_props, buffer, 2);
435                 if (2 != rc)
436                         tuner_warn("i2c i/o error: rc == %d "
437                                    "(should be 2)\n", rc);
438                 break;
439         case TUNER_MICROTUNE_4042FI5:
440         {
441                 /* FIXME - this may also work for other tuners */
442                 unsigned long timeout = jiffies + msecs_to_jiffies(1);
443                 u8 status_byte = 0;
444
445                 /* Wait until the PLL locks */
446                 for (;;) {
447                         if (time_after(jiffies, timeout))
448                                 return 0;
449                         rc = tuner_i2c_xfer_recv(&priv->i2c_props,
450                                                  &status_byte, 1);
451                         if (1 != rc) {
452                                 tuner_warn("i2c i/o read error: rc == %d "
453                                            "(should be 1)\n", rc);
454                                 break;
455                         }
456                         if (status_byte & TUNER_PLL_LOCKED)
457                                 break;
458                         udelay(10);
459                 }
460
461                 /* Set the charge pump for optimized phase noise figure */
462                 config &= ~TUNER_CHARGE_PUMP;
463                 buffer[0] = (div>>8) & 0x7f;
464                 buffer[1] = div      & 0xff;
465                 buffer[2] = config;
466                 buffer[3] = cb;
467                 tuner_dbg("tv 0x%02x 0x%02x 0x%02x 0x%02x\n",
468                           buffer[0], buffer[1], buffer[2], buffer[3]);
469
470                 rc = tuner_i2c_xfer_send(&priv->i2c_props, buffer, 4);
471                 if (4 != rc)
472                         tuner_warn("i2c i/o error: rc == %d "
473                                    "(should be 4)\n", rc);
474                 break;
475         }
476         }
477
478         return 0;
479 }
480
481 static int simple_radio_bandswitch(struct dvb_frontend *fe, u8 *buffer)
482 {
483         struct tuner_simple_priv *priv = fe->tuner_priv;
484
485         switch (priv->type) {
486         case TUNER_TENA_9533_DI:
487         case TUNER_YMEC_TVF_5533MF:
488                 tuner_dbg("This tuner doesn't have FM. "
489                           "Most cards have a TEA5767 for FM\n");
490                 return 0;
491         case TUNER_PHILIPS_FM1216ME_MK3:
492         case TUNER_PHILIPS_FM1236_MK3:
493         case TUNER_PHILIPS_FMD1216ME_MK3:
494         case TUNER_PHILIPS_FMD1216MEX_MK3:
495         case TUNER_LG_NTSC_TAPE:
496         case TUNER_PHILIPS_FM1256_IH3:
497         case TUNER_TCL_MF02GIP_5N:
498                 buffer[3] = 0x19;
499                 break;
500         case TUNER_TNF_5335MF:
501                 buffer[3] = 0x11;
502                 break;
503         case TUNER_LG_PAL_FM:
504                 buffer[3] = 0xa5;
505                 break;
506         case TUNER_THOMSON_DTT761X:
507                 buffer[3] = 0x39;
508                 break;
509         case TUNER_MICROTUNE_4049FM5:
510         default:
511                 buffer[3] = 0xa4;
512                 break;
513         }
514
515         return 0;
516 }
517
518 /* ---------------------------------------------------------------------- */
519
520 static int simple_set_tv_freq(struct dvb_frontend *fe,
521                               struct analog_parameters *params)
522 {
523         struct tuner_simple_priv *priv = fe->tuner_priv;
524         u8 config, cb;
525         u16 div;
526         struct tunertype *tun;
527         u8 buffer[4];
528         int rc, IFPCoff, i;
529         enum param_type desired_type;
530         struct tuner_params *t_params;
531
532         tun = priv->tun;
533
534         /* IFPCoff = Video Intermediate Frequency - Vif:
535                 940  =16*58.75  NTSC/J (Japan)
536                 732  =16*45.75  M/N STD
537                 704  =16*44     ATSC (at DVB code)
538                 632  =16*39.50  I U.K.
539                 622.4=16*38.90  B/G D/K I, L STD
540                 592  =16*37.00  D China
541                 590  =16.36.875 B Australia
542                 543.2=16*33.95  L' STD
543                 171.2=16*10.70  FM Radio (at set_radio_freq)
544         */
545
546         if (params->std == V4L2_STD_NTSC_M_JP) {
547                 IFPCoff      = 940;
548                 desired_type = TUNER_PARAM_TYPE_NTSC;
549         } else if ((params->std & V4L2_STD_MN) &&
550                   !(params->std & ~V4L2_STD_MN)) {
551                 IFPCoff      = 732;
552                 desired_type = TUNER_PARAM_TYPE_NTSC;
553         } else if (params->std == V4L2_STD_SECAM_LC) {
554                 IFPCoff      = 543;
555                 desired_type = TUNER_PARAM_TYPE_SECAM;
556         } else {
557                 IFPCoff      = 623;
558                 desired_type = TUNER_PARAM_TYPE_PAL;
559         }
560
561         t_params = simple_tuner_params(fe, desired_type);
562
563         i = simple_config_lookup(fe, t_params, &params->frequency,
564                                  &config, &cb);
565
566         div = params->frequency + IFPCoff + offset;
567
568         tuner_dbg("Freq= %d.%02d MHz, V_IF=%d.%02d MHz, "
569                   "Offset=%d.%02d MHz, div=%0d\n",
570                   params->frequency / 16, params->frequency % 16 * 100 / 16,
571                   IFPCoff / 16, IFPCoff % 16 * 100 / 16,
572                   offset / 16, offset % 16 * 100 / 16, div);
573
574         /* tv norm specific stuff for multi-norm tuners */
575         simple_std_setup(fe, params, &config, &cb);
576
577         if (t_params->cb_first_if_lower_freq && div < priv->last_div) {
578                 buffer[0] = config;
579                 buffer[1] = cb;
580                 buffer[2] = (div>>8) & 0x7f;
581                 buffer[3] = div      & 0xff;
582         } else {
583                 buffer[0] = (div>>8) & 0x7f;
584                 buffer[1] = div      & 0xff;
585                 buffer[2] = config;
586                 buffer[3] = cb;
587         }
588         priv->last_div = div;
589         if (t_params->has_tda9887) {
590                 struct v4l2_priv_tun_config tda9887_cfg;
591                 int tda_config = 0;
592                 int is_secam_l = (params->std & (V4L2_STD_SECAM_L |
593                                                  V4L2_STD_SECAM_LC)) &&
594                         !(params->std & ~(V4L2_STD_SECAM_L |
595                                           V4L2_STD_SECAM_LC));
596
597                 tda9887_cfg.tuner = TUNER_TDA9887;
598                 tda9887_cfg.priv  = &tda_config;
599
600                 if (params->std == V4L2_STD_SECAM_LC) {
601                         if (t_params->port1_active ^ t_params->port1_invert_for_secam_lc)
602                                 tda_config |= TDA9887_PORT1_ACTIVE;
603                         if (t_params->port2_active ^ t_params->port2_invert_for_secam_lc)
604                                 tda_config |= TDA9887_PORT2_ACTIVE;
605                 } else {
606                         if (t_params->port1_active)
607                                 tda_config |= TDA9887_PORT1_ACTIVE;
608                         if (t_params->port2_active)
609                                 tda_config |= TDA9887_PORT2_ACTIVE;
610                 }
611                 if (t_params->intercarrier_mode)
612                         tda_config |= TDA9887_INTERCARRIER;
613                 if (is_secam_l) {
614                         if (i == 0 && t_params->default_top_secam_low)
615                                 tda_config |= TDA9887_TOP(t_params->default_top_secam_low);
616                         else if (i == 1 && t_params->default_top_secam_mid)
617                                 tda_config |= TDA9887_TOP(t_params->default_top_secam_mid);
618                         else if (t_params->default_top_secam_high)
619                                 tda_config |= TDA9887_TOP(t_params->default_top_secam_high);
620                 } else {
621                         if (i == 0 && t_params->default_top_low)
622                                 tda_config |= TDA9887_TOP(t_params->default_top_low);
623                         else if (i == 1 && t_params->default_top_mid)
624                                 tda_config |= TDA9887_TOP(t_params->default_top_mid);
625                         else if (t_params->default_top_high)
626                                 tda_config |= TDA9887_TOP(t_params->default_top_high);
627                 }
628                 if (t_params->default_pll_gating_18)
629                         tda_config |= TDA9887_GATING_18;
630                 i2c_clients_command(priv->i2c_props.adap, TUNER_SET_CONFIG,
631                                     &tda9887_cfg);
632         }
633         tuner_dbg("tv 0x%02x 0x%02x 0x%02x 0x%02x\n",
634                   buffer[0], buffer[1], buffer[2], buffer[3]);
635
636         rc = tuner_i2c_xfer_send(&priv->i2c_props, buffer, 4);
637         if (4 != rc)
638                 tuner_warn("i2c i/o error: rc == %d (should be 4)\n", rc);
639
640         simple_post_tune(fe, &buffer[0], div, config, cb);
641
642         return 0;
643 }
644
645 static int simple_set_radio_freq(struct dvb_frontend *fe,
646                                  struct analog_parameters *params)
647 {
648         struct tunertype *tun;
649         struct tuner_simple_priv *priv = fe->tuner_priv;
650         u8 buffer[4];
651         u16 div;
652         int rc, j;
653         struct tuner_params *t_params;
654         unsigned int freq = params->frequency;
655
656         tun = priv->tun;
657
658         for (j = tun->count-1; j > 0; j--)
659                 if (tun->params[j].type == TUNER_PARAM_TYPE_RADIO)
660                         break;
661         /* default t_params (j=0) will be used if desired type wasn't found */
662         t_params = &tun->params[j];
663
664         /* Select Radio 1st IF used */
665         switch (t_params->radio_if) {
666         case 0: /* 10.7 MHz */
667                 freq += (unsigned int)(10.7*16000);
668                 break;
669         case 1: /* 33.3 MHz */
670                 freq += (unsigned int)(33.3*16000);
671                 break;
672         case 2: /* 41.3 MHz */
673                 freq += (unsigned int)(41.3*16000);
674                 break;
675         default:
676                 tuner_warn("Unsupported radio_if value %d\n",
677                            t_params->radio_if);
678                 return 0;
679         }
680
681         /* Bandswitch byte */
682         simple_radio_bandswitch(fe, &buffer[0]);
683
684         buffer[2] = (t_params->ranges[0].config & ~TUNER_RATIO_MASK) |
685                     TUNER_RATIO_SELECT_50; /* 50 kHz step */
686
687         /* Convert from 1/16 kHz V4L steps to 1/20 MHz (=50 kHz) PLL steps
688            freq * (1 Mhz / 16000 V4L steps) * (20 PLL steps / 1 MHz) =
689            freq * (1/800) */
690         div = (freq + 400) / 800;
691
692         if (t_params->cb_first_if_lower_freq && div < priv->last_div) {
693                 buffer[0] = buffer[2];
694                 buffer[1] = buffer[3];
695                 buffer[2] = (div>>8) & 0x7f;
696                 buffer[3] = div      & 0xff;
697         } else {
698                 buffer[0] = (div>>8) & 0x7f;
699                 buffer[1] = div      & 0xff;
700         }
701
702         tuner_dbg("radio 0x%02x 0x%02x 0x%02x 0x%02x\n",
703                buffer[0], buffer[1], buffer[2], buffer[3]);
704         priv->last_div = div;
705
706         if (t_params->has_tda9887) {
707                 int config = 0;
708                 struct v4l2_priv_tun_config tda9887_cfg;
709
710                 tda9887_cfg.tuner = TUNER_TDA9887;
711                 tda9887_cfg.priv = &config;
712
713                 if (t_params->port1_active &&
714                     !t_params->port1_fm_high_sensitivity)
715                         config |= TDA9887_PORT1_ACTIVE;
716                 if (t_params->port2_active &&
717                     !t_params->port2_fm_high_sensitivity)
718                         config |= TDA9887_PORT2_ACTIVE;
719                 if (t_params->intercarrier_mode)
720                         config |= TDA9887_INTERCARRIER;
721 /*              if (t_params->port1_set_for_fm_mono)
722                         config &= ~TDA9887_PORT1_ACTIVE;*/
723                 if (t_params->fm_gain_normal)
724                         config |= TDA9887_GAIN_NORMAL;
725                 if (t_params->radio_if == 2)
726                         config |= TDA9887_RIF_41_3;
727                 i2c_clients_command(priv->i2c_props.adap, TUNER_SET_CONFIG,
728                                     &tda9887_cfg);
729         }
730         rc = tuner_i2c_xfer_send(&priv->i2c_props, buffer, 4);
731         if (4 != rc)
732                 tuner_warn("i2c i/o error: rc == %d (should be 4)\n", rc);
733
734         return 0;
735 }
736
737 static int simple_set_params(struct dvb_frontend *fe,
738                              struct analog_parameters *params)
739 {
740         struct tuner_simple_priv *priv = fe->tuner_priv;
741         int ret = -EINVAL;
742
743         if (priv->i2c_props.adap == NULL)
744                 return -EINVAL;
745
746         switch (params->mode) {
747         case V4L2_TUNER_RADIO:
748                 ret = simple_set_radio_freq(fe, params);
749                 priv->frequency = params->frequency * 125 / 2;
750                 break;
751         case V4L2_TUNER_ANALOG_TV:
752         case V4L2_TUNER_DIGITAL_TV:
753                 ret = simple_set_tv_freq(fe, params);
754                 priv->frequency = params->frequency * 62500;
755                 break;
756         }
757         priv->bandwidth = 0;
758
759         return ret;
760 }
761
762 static void simple_set_dvb(struct dvb_frontend *fe, u8 *buf,
763                            const struct dvb_frontend_parameters *params)
764 {
765         struct tuner_simple_priv *priv = fe->tuner_priv;
766
767         switch (priv->type) {
768         case TUNER_PHILIPS_FMD1216ME_MK3:
769         case TUNER_PHILIPS_FMD1216MEX_MK3:
770                 if (params->u.ofdm.bandwidth == BANDWIDTH_8_MHZ &&
771                     params->frequency >= 158870000)
772                         buf[3] |= 0x08;
773                 break;
774         case TUNER_PHILIPS_TD1316:
775                 /* determine band */
776                 buf[3] |= (params->frequency < 161000000) ? 1 :
777                           (params->frequency < 444000000) ? 2 : 4;
778
779                 /* setup PLL filter */
780                 if (params->u.ofdm.bandwidth == BANDWIDTH_8_MHZ)
781                         buf[3] |= 1 << 3;
782                 break;
783         case TUNER_PHILIPS_TUV1236D:
784         case TUNER_PHILIPS_FCV1236D:
785         {
786                 unsigned int new_rf;
787
788                 if (dtv_input[priv->nr])
789                         new_rf = dtv_input[priv->nr];
790                 else
791                         switch (params->u.vsb.modulation) {
792                         case QAM_64:
793                         case QAM_256:
794                                 new_rf = 1;
795                                 break;
796                         case VSB_8:
797                         default:
798                                 new_rf = 0;
799                                 break;
800                         }
801                 simple_set_rf_input(fe, &buf[2], &buf[3], new_rf);
802                 break;
803         }
804         default:
805                 break;
806         }
807 }
808
809 static u32 simple_dvb_configure(struct dvb_frontend *fe, u8 *buf,
810                                 const struct dvb_frontend_parameters *params)
811 {
812         /* This function returns the tuned frequency on success, 0 on error */
813         struct tuner_simple_priv *priv = fe->tuner_priv;
814         struct tunertype *tun = priv->tun;
815         static struct tuner_params *t_params;
816         u8 config, cb;
817         u32 div;
818         int ret;
819         unsigned frequency = params->frequency / 62500;
820
821         if (!tun->stepsize) {
822                 /* tuner-core was loaded before the digital tuner was
823                  * configured and somehow picked the wrong tuner type */
824                 tuner_err("attempt to treat tuner %d (%s) as digital tuner "
825                           "without stepsize defined.\n",
826                           priv->type, priv->tun->name);
827                 return 0; /* failure */
828         }
829
830         t_params = simple_tuner_params(fe, TUNER_PARAM_TYPE_DIGITAL);
831         ret = simple_config_lookup(fe, t_params, &frequency, &config, &cb);
832         if (ret < 0)
833                 return 0; /* failure */
834
835         div = ((frequency + t_params->iffreq) * 62500 + offset +
836                tun->stepsize/2) / tun->stepsize;
837
838         buf[0] = div >> 8;
839         buf[1] = div & 0xff;
840         buf[2] = config;
841         buf[3] = cb;
842
843         simple_set_dvb(fe, buf, params);
844
845         tuner_dbg("%s: div=%d | buf=0x%02x,0x%02x,0x%02x,0x%02x\n",
846                   tun->name, div, buf[0], buf[1], buf[2], buf[3]);
847
848         /* calculate the frequency we set it to */
849         return (div * tun->stepsize) - t_params->iffreq;
850 }
851
852 static int simple_dvb_calc_regs(struct dvb_frontend *fe,
853                                 struct dvb_frontend_parameters *params,
854                                 u8 *buf, int buf_len)
855 {
856         struct tuner_simple_priv *priv = fe->tuner_priv;
857         u32 frequency;
858
859         if (buf_len < 5)
860                 return -EINVAL;
861
862         frequency = simple_dvb_configure(fe, buf+1, params);
863         if (frequency == 0)
864                 return -EINVAL;
865
866         buf[0] = priv->i2c_props.addr;
867
868         priv->frequency = frequency;
869         priv->bandwidth = (fe->ops.info.type == FE_OFDM) ?
870                 params->u.ofdm.bandwidth : 0;
871
872         return 5;
873 }
874
875 static int simple_dvb_set_params(struct dvb_frontend *fe,
876                                  struct dvb_frontend_parameters *params)
877 {
878         struct tuner_simple_priv *priv = fe->tuner_priv;
879         u32 prev_freq, prev_bw;
880         int ret;
881         u8 buf[5];
882
883         if (priv->i2c_props.adap == NULL)
884                 return -EINVAL;
885
886         prev_freq = priv->frequency;
887         prev_bw   = priv->bandwidth;
888
889         ret = simple_dvb_calc_regs(fe, params, buf, 5);
890         if (ret != 5)
891                 goto fail;
892
893         /* put analog demod in standby when tuning digital */
894         if (fe->ops.analog_ops.standby)
895                 fe->ops.analog_ops.standby(fe);
896
897         if (fe->ops.i2c_gate_ctrl)
898                 fe->ops.i2c_gate_ctrl(fe, 1);
899
900         /* buf[0] contains the i2c address, but *
901          * we already have it in i2c_props.addr */
902         ret = tuner_i2c_xfer_send(&priv->i2c_props, buf+1, 4);
903         if (ret != 4)
904                 goto fail;
905
906         return 0;
907 fail:
908         /* calc_regs sets frequency and bandwidth. if we failed, unset them */
909         priv->frequency = prev_freq;
910         priv->bandwidth = prev_bw;
911
912         return ret;
913 }
914
915 static int simple_init(struct dvb_frontend *fe)
916 {
917         struct tuner_simple_priv *priv = fe->tuner_priv;
918
919         if (priv->i2c_props.adap == NULL)
920                 return -EINVAL;
921
922         if (priv->tun->initdata) {
923                 int ret;
924
925                 if (fe->ops.i2c_gate_ctrl)
926                         fe->ops.i2c_gate_ctrl(fe, 1);
927
928                 ret = tuner_i2c_xfer_send(&priv->i2c_props,
929                                           priv->tun->initdata + 1,
930                                           priv->tun->initdata[0]);
931                 if (ret != priv->tun->initdata[0])
932                         return ret;
933         }
934
935         return 0;
936 }
937
938 static int simple_sleep(struct dvb_frontend *fe)
939 {
940         struct tuner_simple_priv *priv = fe->tuner_priv;
941
942         if (priv->i2c_props.adap == NULL)
943                 return -EINVAL;
944
945         if (priv->tun->sleepdata) {
946                 int ret;
947
948                 if (fe->ops.i2c_gate_ctrl)
949                         fe->ops.i2c_gate_ctrl(fe, 1);
950
951                 ret = tuner_i2c_xfer_send(&priv->i2c_props,
952                                           priv->tun->sleepdata + 1,
953                                           priv->tun->sleepdata[0]);
954                 if (ret != priv->tun->sleepdata[0])
955                         return ret;
956         }
957
958         return 0;
959 }
960
961 static int simple_release(struct dvb_frontend *fe)
962 {
963         struct tuner_simple_priv *priv = fe->tuner_priv;
964
965         mutex_lock(&tuner_simple_list_mutex);
966
967         if (priv)
968                 hybrid_tuner_release_state(priv);
969
970         mutex_unlock(&tuner_simple_list_mutex);
971
972         fe->tuner_priv = NULL;
973
974         return 0;
975 }
976
977 static int simple_get_frequency(struct dvb_frontend *fe, u32 *frequency)
978 {
979         struct tuner_simple_priv *priv = fe->tuner_priv;
980         *frequency = priv->frequency;
981         return 0;
982 }
983
984 static int simple_get_bandwidth(struct dvb_frontend *fe, u32 *bandwidth)
985 {
986         struct tuner_simple_priv *priv = fe->tuner_priv;
987         *bandwidth = priv->bandwidth;
988         return 0;
989 }
990
991 static struct dvb_tuner_ops simple_tuner_ops = {
992         .init              = simple_init,
993         .sleep             = simple_sleep,
994         .set_analog_params = simple_set_params,
995         .set_params        = simple_dvb_set_params,
996         .calc_regs         = simple_dvb_calc_regs,
997         .release           = simple_release,
998         .get_frequency     = simple_get_frequency,
999         .get_bandwidth     = simple_get_bandwidth,
1000         .get_status        = simple_get_status,
1001         .get_rf_strength   = simple_get_rf_strength,
1002 };
1003
1004 struct dvb_frontend *simple_tuner_attach(struct dvb_frontend *fe,
1005                                          struct i2c_adapter *i2c_adap,
1006                                          u8 i2c_addr,
1007                                          unsigned int type)
1008 {
1009         struct tuner_simple_priv *priv = NULL;
1010         int instance;
1011
1012         if (type >= tuner_count) {
1013                 printk(KERN_WARNING "%s: invalid tuner type: %d (max: %d)\n",
1014                        __func__, type, tuner_count-1);
1015                 return NULL;
1016         }
1017
1018         /* If i2c_adap is set, check that the tuner is at the correct address.
1019          * Otherwise, if i2c_adap is NULL, the tuner will be programmed directly
1020          * by the digital demod via calc_regs.
1021          */
1022         if (i2c_adap != NULL) {
1023                 u8 b[1];
1024                 struct i2c_msg msg = {
1025                         .addr = i2c_addr, .flags = I2C_M_RD,
1026                         .buf = b, .len = 1,
1027                 };
1028
1029                 if (fe->ops.i2c_gate_ctrl)
1030                         fe->ops.i2c_gate_ctrl(fe, 1);
1031
1032                 if (1 != i2c_transfer(i2c_adap, &msg, 1))
1033                         printk(KERN_WARNING "tuner-simple %d-%04x: "
1034                                "unable to probe %s, proceeding anyway.",
1035                                i2c_adapter_id(i2c_adap), i2c_addr,
1036                                tuners[type].name);
1037
1038                 if (fe->ops.i2c_gate_ctrl)
1039                         fe->ops.i2c_gate_ctrl(fe, 0);
1040         }
1041
1042         mutex_lock(&tuner_simple_list_mutex);
1043
1044         instance = hybrid_tuner_request_state(struct tuner_simple_priv, priv,
1045                                               hybrid_tuner_instance_list,
1046                                               i2c_adap, i2c_addr,
1047                                               "tuner-simple");
1048         switch (instance) {
1049         case 0:
1050                 mutex_unlock(&tuner_simple_list_mutex);
1051                 return NULL;
1052         case 1:
1053                 fe->tuner_priv = priv;
1054
1055                 priv->type = type;
1056                 priv->tun  = &tuners[type];
1057                 priv->nr   = simple_devcount++;
1058                 break;
1059         default:
1060                 fe->tuner_priv = priv;
1061                 break;
1062         }
1063
1064         mutex_unlock(&tuner_simple_list_mutex);
1065
1066         memcpy(&fe->ops.tuner_ops, &simple_tuner_ops,
1067                sizeof(struct dvb_tuner_ops));
1068
1069         if (type != priv->type)
1070                 tuner_warn("couldn't set type to %d. Using %d (%s) instead\n",
1071                             type, priv->type, priv->tun->name);
1072         else
1073                 tuner_info("type set to %d (%s)\n",
1074                            priv->type, priv->tun->name);
1075
1076         if ((debug) || ((atv_input[priv->nr] > 0) ||
1077                         (dtv_input[priv->nr] > 0))) {
1078                 if (0 == atv_input[priv->nr])
1079                         tuner_info("tuner %d atv rf input will be "
1080                                    "autoselected\n", priv->nr);
1081                 else
1082                         tuner_info("tuner %d atv rf input will be "
1083                                    "set to input %d (insmod option)\n",
1084                                    priv->nr, atv_input[priv->nr]);
1085                 if (0 == dtv_input[priv->nr])
1086                         tuner_info("tuner %d dtv rf input will be "
1087                                    "autoselected\n", priv->nr);
1088                 else
1089                         tuner_info("tuner %d dtv rf input will be "
1090                                    "set to input %d (insmod option)\n",
1091                                    priv->nr, dtv_input[priv->nr]);
1092         }
1093
1094         strlcpy(fe->ops.tuner_ops.info.name, priv->tun->name,
1095                 sizeof(fe->ops.tuner_ops.info.name));
1096
1097         return fe;
1098 }
1099 EXPORT_SYMBOL_GPL(simple_tuner_attach);
1100
1101 MODULE_DESCRIPTION("Simple 4-control-bytes style tuner driver");
1102 MODULE_AUTHOR("Ralph Metzler, Gerd Knorr, Gunther Mayer");
1103 MODULE_LICENSE("GPL");
1104
1105 /*
1106  * Overrides for Emacs so that we follow Linus's tabbing style.
1107  * ---------------------------------------------------------------------------
1108  * Local variables:
1109  * c-basic-offset: 8
1110  * End:
1111  */