V4L/DVB (6678): tda18271: define init callback
[linux-2.6] / drivers / media / dvb / frontends / or51132.c
1 /*
2  *    Support for OR51132 (pcHDTV HD-3000) - VSB/QAM
3  *
4  *
5  *    Copyright (C) 2007 Trent Piepho <xyzzy@speakeasy.org>
6  *
7  *    Copyright (C) 2005 Kirk Lapray <kirk_lapray@bigfoot.com>
8  *
9  *    Based on code from Jack Kelliher (kelliher@xmission.com)
10  *                           Copyright (C) 2002 & pcHDTV, inc.
11  *
12  *    This program is free software; you can redistribute it and/or modify
13  *    it under the terms of the GNU General Public License as published by
14  *    the Free Software Foundation; either version 2 of the License, or
15  *    (at your option) any later version.
16  *
17  *    This program is distributed in the hope that it will be useful,
18  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
19  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  *    GNU General Public License for more details.
21  *
22  *    You should have received a copy of the GNU General Public License
23  *    along with this program; if not, write to the Free Software
24  *    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25  *
26 */
27
28 /*
29  * This driver needs two external firmware files. Please copy
30  * "dvb-fe-or51132-vsb.fw" and "dvb-fe-or51132-qam.fw" to
31  * /usr/lib/hotplug/firmware/ or /lib/firmware/
32  * (depending on configuration of firmware hotplug).
33  */
34 #define OR51132_VSB_FIRMWARE "dvb-fe-or51132-vsb.fw"
35 #define OR51132_QAM_FIRMWARE "dvb-fe-or51132-qam.fw"
36
37 #include <linux/kernel.h>
38 #include <linux/module.h>
39 #include <linux/init.h>
40 #include <linux/delay.h>
41 #include <linux/string.h>
42 #include <linux/slab.h>
43 #include <asm/byteorder.h>
44
45 #include "dvb_math.h"
46 #include "dvb_frontend.h"
47 #include "or51132.h"
48
49 static int debug;
50 #define dprintk(args...) \
51         do { \
52                 if (debug) printk(KERN_DEBUG "or51132: " args); \
53         } while (0)
54
55
56 struct or51132_state
57 {
58         struct i2c_adapter* i2c;
59
60         /* Configuration settings */
61         const struct or51132_config* config;
62
63         struct dvb_frontend frontend;
64
65         /* Demodulator private data */
66         fe_modulation_t current_modulation;
67         u32 snr; /* Result of last SNR calculation */
68
69         /* Tuner private data */
70         u32 current_frequency;
71 };
72
73
74 /* Write buffer to demod */
75 static int or51132_writebuf(struct or51132_state *state, const u8 *buf, int len)
76 {
77         int err;
78         struct i2c_msg msg = { .addr = state->config->demod_address,
79                                .flags = 0, .buf = (u8*)buf, .len = len };
80
81         /* msleep(20); */ /* doesn't appear to be necessary */
82         if ((err = i2c_transfer(state->i2c, &msg, 1)) != 1) {
83                 printk(KERN_WARNING "or51132: I2C write (addr 0x%02x len %d) error: %d\n",
84                        msg.addr, msg.len, err);
85                 return -EREMOTEIO;
86         }
87         return 0;
88 }
89
90 /* Write constant bytes, e.g. or51132_writebytes(state, 0x04, 0x42, 0x00);
91    Less code and more efficient that loading a buffer on the stack with
92    the bytes to send and then calling or51132_writebuf() on that. */
93 #define or51132_writebytes(state, data...)  \
94         ({ const static u8 _data[] = {data}; \
95         or51132_writebuf(state, _data, sizeof(_data)); })
96
97 /* Read data from demod into buffer.  Returns 0 on success. */
98 static int or51132_readbuf(struct or51132_state *state, u8 *buf, int len)
99 {
100         int err;
101         struct i2c_msg msg = { .addr = state->config->demod_address,
102                                .flags = I2C_M_RD, .buf = buf, .len = len };
103
104         /* msleep(20); */ /* doesn't appear to be necessary */
105         if ((err = i2c_transfer(state->i2c, &msg, 1)) != 1) {
106                 printk(KERN_WARNING "or51132: I2C read (addr 0x%02x len %d) error: %d\n",
107                        msg.addr, msg.len, err);
108                 return -EREMOTEIO;
109         }
110         return 0;
111 }
112
113 /* Reads a 16-bit demod register.  Returns <0 on error. */
114 static int or51132_readreg(struct or51132_state *state, u8 reg)
115 {
116         u8 buf[2] = { 0x04, reg };
117         struct i2c_msg msg[2] = {
118                 {.addr = state->config->demod_address, .flags = 0,
119                  .buf = buf, .len = 2 },
120                 {.addr = state->config->demod_address, .flags = I2C_M_RD,
121                  .buf = buf, .len = 2 }};
122         int err;
123
124         if ((err = i2c_transfer(state->i2c, msg, 2)) != 2) {
125                 printk(KERN_WARNING "or51132: I2C error reading register %d: %d\n",
126                        reg, err);
127                 return -EREMOTEIO;
128         }
129         return le16_to_cpup((u16*)buf);
130 }
131
132 static int or51132_load_firmware (struct dvb_frontend* fe, const struct firmware *fw)
133 {
134         struct or51132_state* state = fe->demodulator_priv;
135         const static u8 run_buf[] = {0x7F,0x01};
136         u8 rec_buf[8];
137         u32 firmwareAsize, firmwareBsize;
138         int i,ret;
139
140         dprintk("Firmware is %Zd bytes\n",fw->size);
141
142         /* Get size of firmware A and B */
143         firmwareAsize = le32_to_cpu(*((u32*)fw->data));
144         dprintk("FirmwareA is %i bytes\n",firmwareAsize);
145         firmwareBsize = le32_to_cpu(*((u32*)(fw->data+4)));
146         dprintk("FirmwareB is %i bytes\n",firmwareBsize);
147
148         /* Upload firmware */
149         if ((ret = or51132_writebuf(state, &fw->data[8], firmwareAsize))) {
150                 printk(KERN_WARNING "or51132: load_firmware error 1\n");
151                 return ret;
152         }
153         if ((ret = or51132_writebuf(state, &fw->data[8+firmwareAsize],
154                                     firmwareBsize))) {
155                 printk(KERN_WARNING "or51132: load_firmware error 2\n");
156                 return ret;
157         }
158
159         if ((ret = or51132_writebuf(state, run_buf, 2))) {
160                 printk(KERN_WARNING "or51132: load_firmware error 3\n");
161                 return ret;
162         }
163         if ((ret = or51132_writebuf(state, run_buf, 2))) {
164                 printk(KERN_WARNING "or51132: load_firmware error 4\n");
165                 return ret;
166         }
167
168         /* 50ms for operation to begin */
169         msleep(50);
170
171         /* Read back ucode version to besure we loaded correctly and are really up and running */
172         /* Get uCode version */
173         if ((ret = or51132_writebytes(state, 0x10, 0x10, 0x00))) {
174                 printk(KERN_WARNING "or51132: load_firmware error a\n");
175                 return ret;
176         }
177         if ((ret = or51132_writebytes(state, 0x04, 0x17))) {
178                 printk(KERN_WARNING "or51132: load_firmware error b\n");
179                 return ret;
180         }
181         if ((ret = or51132_writebytes(state, 0x00, 0x00))) {
182                 printk(KERN_WARNING "or51132: load_firmware error c\n");
183                 return ret;
184         }
185         for (i=0;i<4;i++) {
186                 /* Once upon a time, this command might have had something
187                    to do with getting the firmware version, but it's
188                    not used anymore:
189                    {0x04,0x00,0x30,0x00,i+1} */
190                 /* Read 8 bytes, two bytes at a time */
191                 if ((ret = or51132_readbuf(state, &rec_buf[i*2], 2))) {
192                         printk(KERN_WARNING
193                                "or51132: load_firmware error d - %d\n",i);
194                         return ret;
195                 }
196         }
197
198         printk(KERN_WARNING
199                "or51132: Version: %02X%02X%02X%02X-%02X%02X%02X%02X (%02X%01X-%01X-%02X%01X-%01X)\n",
200                rec_buf[1],rec_buf[0],rec_buf[3],rec_buf[2],
201                rec_buf[5],rec_buf[4],rec_buf[7],rec_buf[6],
202                rec_buf[3],rec_buf[2]>>4,rec_buf[2]&0x0f,
203                rec_buf[5],rec_buf[4]>>4,rec_buf[4]&0x0f);
204
205         if ((ret = or51132_writebytes(state, 0x10, 0x00, 0x00))) {
206                 printk(KERN_WARNING "or51132: load_firmware error e\n");
207                 return ret;
208         }
209         return 0;
210 };
211
212 static int or51132_init(struct dvb_frontend* fe)
213 {
214         return 0;
215 }
216
217 static int or51132_read_ber(struct dvb_frontend* fe, u32* ber)
218 {
219         *ber = 0;
220         return 0;
221 }
222
223 static int or51132_read_ucblocks(struct dvb_frontend* fe, u32* ucblocks)
224 {
225         *ucblocks = 0;
226         return 0;
227 }
228
229 static int or51132_sleep(struct dvb_frontend* fe)
230 {
231         return 0;
232 }
233
234 static int or51132_setmode(struct dvb_frontend* fe)
235 {
236         struct or51132_state* state = fe->demodulator_priv;
237         u8 cmd_buf1[3] = {0x04, 0x01, 0x5f};
238         u8 cmd_buf2[3] = {0x1c, 0x00, 0 };
239
240         dprintk("setmode %d\n",(int)state->current_modulation);
241
242         switch (state->current_modulation) {
243         case VSB_8:
244                 /* Auto CH, Auto NTSC rej, MPEGser, MPEG2tr, phase noise-high */
245                 cmd_buf1[2] = 0x50;
246                 /* REC MODE inv IF spectrum, Normal */
247                 cmd_buf2[1] = 0x03;
248                 /* Channel MODE ATSC/VSB8 */
249                 cmd_buf2[2] = 0x06;
250                 break;
251         /* All QAM modes are:
252            Auto-deinterleave; MPEGser, MPEG2tr, phase noise-high
253            REC MODE Normal Carrier Lock */
254         case QAM_AUTO:
255                 /* Channel MODE Auto QAM64/256 */
256                 cmd_buf2[2] = 0x4f;
257                 break;
258         case QAM_256:
259                 /* Channel MODE QAM256 */
260                 cmd_buf2[2] = 0x45;
261                 break;
262         case QAM_64:
263                 /* Channel MODE QAM64 */
264                 cmd_buf2[2] = 0x43;
265                 break;
266         default:
267                 printk(KERN_WARNING
268                        "or51132: setmode: Modulation set to unsupported value (%d)\n",
269                        state->current_modulation);
270                 return -EINVAL;
271         }
272
273         /* Set Receiver 1 register */
274         if (or51132_writebuf(state, cmd_buf1, 3)) {
275                 printk(KERN_WARNING "or51132: set_mode error 1\n");
276                 return -EREMOTEIO;
277         }
278         dprintk("set #1 to %02x\n", cmd_buf1[2]);
279
280         /* Set operation mode in Receiver 6 register */
281         if (or51132_writebuf(state, cmd_buf2, 3)) {
282                 printk(KERN_WARNING "or51132: set_mode error 2\n");
283                 return -EREMOTEIO;
284         }
285         dprintk("set #6 to 0x%02x%02x\n", cmd_buf2[1], cmd_buf2[2]);
286
287         return 0;
288 }
289
290 /* Some modulations use the same firmware.  This classifies modulations
291    by the firmware they use. */
292 #define MOD_FWCLASS_UNKNOWN     0
293 #define MOD_FWCLASS_VSB         1
294 #define MOD_FWCLASS_QAM         2
295 static int modulation_fw_class(fe_modulation_t modulation)
296 {
297         switch(modulation) {
298         case VSB_8:
299                 return MOD_FWCLASS_VSB;
300         case QAM_AUTO:
301         case QAM_64:
302         case QAM_256:
303                 return MOD_FWCLASS_QAM;
304         default:
305                 return MOD_FWCLASS_UNKNOWN;
306         }
307 }
308
309 static int or51132_set_parameters(struct dvb_frontend* fe,
310                                   struct dvb_frontend_parameters *param)
311 {
312         int ret;
313         struct or51132_state* state = fe->demodulator_priv;
314         const struct firmware *fw;
315         const char *fwname;
316         int clock_mode;
317
318         /* Upload new firmware only if we need a different one */
319         if (modulation_fw_class(state->current_modulation) !=
320             modulation_fw_class(param->u.vsb.modulation)) {
321                 switch(modulation_fw_class(param->u.vsb.modulation)) {
322                 case MOD_FWCLASS_VSB:
323                         dprintk("set_parameters VSB MODE\n");
324                         fwname = OR51132_VSB_FIRMWARE;
325
326                         /* Set non-punctured clock for VSB */
327                         clock_mode = 0;
328                         break;
329                 case MOD_FWCLASS_QAM:
330                         dprintk("set_parameters QAM MODE\n");
331                         fwname = OR51132_QAM_FIRMWARE;
332
333                         /* Set punctured clock for QAM */
334                         clock_mode = 1;
335                         break;
336                 default:
337                         printk("or51132: Modulation type(%d) UNSUPPORTED\n",
338                                param->u.vsb.modulation);
339                         return -1;
340                 }
341                 printk("or51132: Waiting for firmware upload(%s)...\n",
342                        fwname);
343                 ret = request_firmware(&fw, fwname, &state->i2c->dev);
344                 if (ret) {
345                         printk(KERN_WARNING "or51132: No firmware up"
346                                "loaded(timeout or file not found?)\n");
347                         return ret;
348                 }
349                 ret = or51132_load_firmware(fe, fw);
350                 release_firmware(fw);
351                 if (ret) {
352                         printk(KERN_WARNING "or51132: Writing firmware to "
353                                "device failed!\n");
354                         return ret;
355                 }
356                 printk("or51132: Firmware upload complete.\n");
357                 state->config->set_ts_params(fe, clock_mode);
358         }
359         /* Change only if we are actually changing the modulation */
360         if (state->current_modulation != param->u.vsb.modulation) {
361                 state->current_modulation = param->u.vsb.modulation;
362                 or51132_setmode(fe);
363         }
364
365         if (fe->ops.tuner_ops.set_params) {
366                 fe->ops.tuner_ops.set_params(fe, param);
367                 if (fe->ops.i2c_gate_ctrl) fe->ops.i2c_gate_ctrl(fe, 0);
368         }
369
370         /* Set to current mode */
371         or51132_setmode(fe);
372
373         /* Update current frequency */
374         state->current_frequency = param->frequency;
375         return 0;
376 }
377
378 static int or51132_get_parameters(struct dvb_frontend* fe,
379                                   struct dvb_frontend_parameters *param)
380 {
381         struct or51132_state* state = fe->demodulator_priv;
382         int status;
383         int retry = 1;
384
385 start:
386         /* Receiver Status */
387         if ((status = or51132_readreg(state, 0x00)) < 0) {
388                 printk(KERN_WARNING "or51132: get_parameters: error reading receiver status\n");
389                 return -EREMOTEIO;
390         }
391         switch(status&0xff) {
392                 case 0x06: param->u.vsb.modulation = VSB_8; break;
393                 case 0x43: param->u.vsb.modulation = QAM_64; break;
394                 case 0x45: param->u.vsb.modulation = QAM_256; break;
395                 default:
396                         if (retry--) goto start;
397                         printk(KERN_WARNING "or51132: unknown status 0x%02x\n",
398                                status&0xff);
399                         return -EREMOTEIO;
400         }
401
402         /* FIXME: Read frequency from frontend, take AFC into account */
403         param->frequency = state->current_frequency;
404
405         /* FIXME: How to read inversion setting? Receiver 6 register? */
406         param->inversion = INVERSION_AUTO;
407
408         return 0;
409 }
410
411 static int or51132_read_status(struct dvb_frontend* fe, fe_status_t* status)
412 {
413         struct or51132_state* state = fe->demodulator_priv;
414         int reg;
415
416         /* Receiver Status */
417         if ((reg = or51132_readreg(state, 0x00)) < 0) {
418                 printk(KERN_WARNING "or51132: read_status: error reading receiver status: %d\n", reg);
419                 *status = 0;
420                 return -EREMOTEIO;
421         }
422         dprintk("%s: read_status %04x\n", __FUNCTION__, reg);
423
424         if (reg & 0x0100) /* Receiver Lock */
425                 *status = FE_HAS_SIGNAL|FE_HAS_CARRIER|FE_HAS_VITERBI|
426                           FE_HAS_SYNC|FE_HAS_LOCK;
427         else
428                 *status = 0;
429         return 0;
430 }
431
432 /* Calculate SNR estimation (scaled by 2^24)
433
434    8-VSB SNR and QAM equations from Oren datasheets
435
436    For 8-VSB:
437      SNR[dB] = 10 * log10(897152044.8282 / MSE^2 ) - K
438
439      Where K = 0 if NTSC rejection filter is OFF; and
440            K = 3 if NTSC rejection filter is ON
441
442    For QAM64:
443      SNR[dB] = 10 * log10(897152044.8282 / MSE^2 )
444
445    For QAM256:
446      SNR[dB] = 10 * log10(907832426.314266  / MSE^2 )
447
448    We re-write the snr equation as:
449      SNR * 2^24 = 10*(c - 2*intlog10(MSE))
450    Where for QAM256, c = log10(907832426.314266) * 2^24
451    and for 8-VSB and QAM64, c = log10(897152044.8282) * 2^24 */
452
453 static u32 calculate_snr(u32 mse, u32 c)
454 {
455         if (mse == 0) /* No signal */
456                 return 0;
457
458         mse = 2*intlog10(mse);
459         if (mse > c) {
460                 /* Negative SNR, which is possible, but realisticly the
461                 demod will lose lock before the signal gets this bad.  The
462                 API only allows for unsigned values, so just return 0 */
463                 return 0;
464         }
465         return 10*(c - mse);
466 }
467
468 static int or51132_read_snr(struct dvb_frontend* fe, u16* snr)
469 {
470         struct or51132_state* state = fe->demodulator_priv;
471         int noise, reg;
472         u32 c, usK = 0;
473         int retry = 1;
474
475 start:
476         /* SNR after Equalizer */
477         noise = or51132_readreg(state, 0x02);
478         if (noise < 0) {
479                 printk(KERN_WARNING "or51132: read_snr: error reading equalizer\n");
480                 return -EREMOTEIO;
481         }
482         dprintk("read_snr noise (%d)\n", noise);
483
484         /* Read status, contains modulation type for QAM_AUTO and
485            NTSC filter for VSB */
486         reg = or51132_readreg(state, 0x00);
487         if (reg < 0) {
488                 printk(KERN_WARNING "or51132: read_snr: error reading receiver status\n");
489                 return -EREMOTEIO;
490         }
491
492         switch (reg&0xff) {
493         case 0x06:
494                 if (reg & 0x1000) usK = 3 << 24;
495                 /* Fall through to QAM64 case */
496         case 0x43:
497                 c = 150204167;
498                 break;
499         case 0x45:
500                 c = 150290396;
501                 break;
502         default:
503                 printk(KERN_WARNING "or51132: unknown status 0x%02x\n", reg&0xff);
504                 if (retry--) goto start;
505                 return -EREMOTEIO;
506         }
507         dprintk("%s: modulation %02x, NTSC rej O%s\n", __FUNCTION__,
508                 reg&0xff, reg&0x1000?"n":"ff");
509
510         /* Calculate SNR using noise, c, and NTSC rejection correction */
511         state->snr = calculate_snr(noise, c) - usK;
512         *snr = (state->snr) >> 16;
513
514         dprintk("%s: noise = 0x%08x, snr = %d.%02d dB\n", __FUNCTION__, noise,
515                 state->snr >> 24, (((state->snr>>8) & 0xffff) * 100) >> 16);
516
517         return 0;
518 }
519
520 static int or51132_read_signal_strength(struct dvb_frontend* fe, u16* strength)
521 {
522         /* Calculate Strength from SNR up to 35dB */
523         /* Even though the SNR can go higher than 35dB, there is some comfort */
524         /* factor in having a range of strong signals that can show at 100%   */
525         struct or51132_state* state = (struct or51132_state*) fe->demodulator_priv;
526         u16 snr;
527         int ret;
528
529         ret = fe->ops.read_snr(fe, &snr);
530         if (ret != 0)
531                 return ret;
532         /* Rather than use the 8.8 value snr, use state->snr which is 8.24 */
533         /* scale the range 0 - 35*2^24 into 0 - 65535 */
534         if (state->snr >= 8960 * 0x10000)
535                 *strength = 0xffff;
536         else
537                 *strength = state->snr / 8960;
538
539         return 0;
540 }
541
542 static int or51132_get_tune_settings(struct dvb_frontend* fe, struct dvb_frontend_tune_settings* fe_tune_settings)
543 {
544         fe_tune_settings->min_delay_ms = 500;
545         fe_tune_settings->step_size = 0;
546         fe_tune_settings->max_drift = 0;
547
548         return 0;
549 }
550
551 static void or51132_release(struct dvb_frontend* fe)
552 {
553         struct or51132_state* state = fe->demodulator_priv;
554         kfree(state);
555 }
556
557 static struct dvb_frontend_ops or51132_ops;
558
559 struct dvb_frontend* or51132_attach(const struct or51132_config* config,
560                                     struct i2c_adapter* i2c)
561 {
562         struct or51132_state* state = NULL;
563
564         /* Allocate memory for the internal state */
565         state = kmalloc(sizeof(struct or51132_state), GFP_KERNEL);
566         if (state == NULL)
567                 goto error;
568
569         /* Setup the state */
570         state->config = config;
571         state->i2c = i2c;
572         state->current_frequency = -1;
573         state->current_modulation = -1;
574
575         /* Create dvb_frontend */
576         memcpy(&state->frontend.ops, &or51132_ops, sizeof(struct dvb_frontend_ops));
577         state->frontend.demodulator_priv = state;
578         return &state->frontend;
579
580 error:
581         kfree(state);
582         return NULL;
583 }
584
585 static struct dvb_frontend_ops or51132_ops = {
586
587         .info = {
588                 .name                   = "Oren OR51132 VSB/QAM Frontend",
589                 .type                   = FE_ATSC,
590                 .frequency_min          = 44000000,
591                 .frequency_max          = 958000000,
592                 .frequency_stepsize     = 166666,
593                 .caps = FE_CAN_FEC_1_2 | FE_CAN_FEC_2_3 | FE_CAN_FEC_3_4 |
594                         FE_CAN_FEC_5_6 | FE_CAN_FEC_7_8 | FE_CAN_FEC_AUTO |
595                         FE_CAN_QAM_64 | FE_CAN_QAM_256 | FE_CAN_QAM_AUTO |
596                         FE_CAN_8VSB
597         },
598
599         .release = or51132_release,
600
601         .init = or51132_init,
602         .sleep = or51132_sleep,
603
604         .set_frontend = or51132_set_parameters,
605         .get_frontend = or51132_get_parameters,
606         .get_tune_settings = or51132_get_tune_settings,
607
608         .read_status = or51132_read_status,
609         .read_ber = or51132_read_ber,
610         .read_signal_strength = or51132_read_signal_strength,
611         .read_snr = or51132_read_snr,
612         .read_ucblocks = or51132_read_ucblocks,
613 };
614
615 module_param(debug, int, 0644);
616 MODULE_PARM_DESC(debug, "Turn on/off frontend debugging (default:off).");
617
618 MODULE_DESCRIPTION("OR51132 ATSC [pcHDTV HD-3000] (8VSB & ITU J83 AnnexB FEC QAM64/256) Demodulator Driver");
619 MODULE_AUTHOR("Kirk Lapray");
620 MODULE_AUTHOR("Trent Piepho");
621 MODULE_LICENSE("GPL");
622
623 EXPORT_SYMBOL(or51132_attach);
624
625 /*
626  * Local variables:
627  * c-basic-offset: 8
628  * End:
629  */