3 * Copyright (c) 2007 Mauro Carvalho Chehab (mchehab@infradead.org)
5 * Copyright (c) 2007 Michel Ludwig (michel.ludwig@gmail.com)
8 * This code is placed under the terms of the GNU General Public License v2
11 #include <linux/i2c.h>
12 #include <asm/div64.h>
13 #include <linux/firmware.h>
14 #include <linux/videodev2.h>
15 #include <linux/delay.h>
16 #include <media/tuner.h>
17 #include <linux/mutex.h>
18 #include "tuner-i2c.h"
19 #include "tuner-xc2028.h"
20 #include "tuner-xc2028-types.h"
22 #include <linux/dvb/frontend.h>
23 #include "dvb_frontend.h"
26 #define PREFIX "xc2028"
29 module_param(debug, int, 0644);
30 MODULE_PARM_DESC(debug, "enable verbose debug messages");
32 static char audio_std[8];
33 module_param_string(audio_std, audio_std, sizeof(audio_std), 0);
34 MODULE_PARM_DESC(audio_std,
35 "Audio standard. XC3028 audio decoder explicitly "
36 "needs to know what audio\n"
37 "standard is needed for some video standards with audio A2 or NICAM.\n"
38 "The valid values are:\n"
46 static LIST_HEAD(xc2028_list);
47 static DEFINE_MUTEX(xc2028_list_mutex);
49 /* struct for storing firmware table */
50 struct firmware_description {
57 struct firmware_properties {
61 unsigned int scode_table;
66 struct list_head xc2028_list;
67 struct tuner_i2c_props i2c_props;
68 int (*tuner_callback) (void *dev,
69 int command, int arg);
74 struct firmware_description *firm;
81 struct xc2028_ctrl ctrl;
83 struct firmware_properties cur_fw;
88 #define i2c_send(priv, buf, size) ({ \
90 _rc = tuner_i2c_xfer_send(&priv->i2c_props, buf, size); \
92 tuner_info("i2c output error: rc = %d (should be %d)\n",\
97 #define i2c_rcv(priv, buf, size) ({ \
99 _rc = tuner_i2c_xfer_recv(&priv->i2c_props, buf, size); \
101 tuner_err("i2c input error: rc = %d (should be %d)\n", \
106 #define i2c_send_recv(priv, obuf, osize, ibuf, isize) ({ \
108 _rc = tuner_i2c_xfer_send_recv(&priv->i2c_props, obuf, osize, \
111 tuner_err("i2c input error: rc = %d (should be %d)\n", \
116 #define send_seq(priv, data...) ({ \
117 static u8 _val[] = data; \
119 if (sizeof(_val) != \
120 (_rc = tuner_i2c_xfer_send(&priv->i2c_props, \
121 _val, sizeof(_val)))) { \
122 tuner_err("Error on line %d: %d\n", __LINE__, _rc); \
128 static unsigned int xc2028_get_reg(struct xc2028_data *priv, u16 reg, u16 *val)
130 unsigned char buf[2];
131 unsigned char ibuf[2];
133 tuner_dbg("%s %04x called\n", __FUNCTION__, reg);
136 buf[1] = (unsigned char) reg;
138 if (i2c_send_recv(priv, buf, 2, ibuf, 2) != 2)
141 *val = (ibuf[1]) | (ibuf[0] << 8);
145 void dump_firm_type(unsigned int type)
191 if (type & TOYOTA388)
192 printk("TOYOTA388 ");
193 if (type & TOYOTA794)
194 printk("TOYOTA794 ");
197 if (type & ZARLINK456)
198 printk("ZARLINK456 ");
209 static v4l2_std_id parse_audio_std_option(void)
211 if (strcasecmp(audio_std, "A2") == 0)
213 if (strcasecmp(audio_std, "A2/A") == 0)
214 return V4L2_STD_A2_A;
215 if (strcasecmp(audio_std, "A2/B") == 0)
216 return V4L2_STD_A2_B;
217 if (strcasecmp(audio_std, "NICAM") == 0)
218 return V4L2_STD_NICAM;
219 if (strcasecmp(audio_std, "NICAM/A") == 0)
220 return V4L2_STD_NICAM_A;
221 if (strcasecmp(audio_std, "NICAM/B") == 0)
222 return V4L2_STD_NICAM_B;
227 static void free_firmware(struct xc2028_data *priv)
234 for (i = 0; i < priv->firm_size; i++)
235 kfree(priv->firm[i].ptr);
242 memset(&priv->cur_fw, 0, sizeof(priv->cur_fw));
245 static int load_all_firmwares(struct dvb_frontend *fe)
247 struct xc2028_data *priv = fe->tuner_priv;
248 const struct firmware *fw = NULL;
249 unsigned char *p, *endp;
254 tuner_dbg("%s called\n", __FUNCTION__);
256 tuner_dbg("Reading firmware %s\n", priv->ctrl.fname);
257 rc = request_firmware(&fw, priv->ctrl.fname,
258 &priv->i2c_props.adap->dev);
261 tuner_err("Error: firmware %s not found.\n",
264 tuner_err("Error %d while requesting firmware %s \n",
265 rc, priv->ctrl.fname);
272 if (fw->size < sizeof(name) - 1 + 2 + 2) {
273 tuner_err("Error: firmware file %s has invalid size!\n",
278 memcpy(name, p, sizeof(name) - 1);
279 name[sizeof(name) - 1] = 0;
280 p += sizeof(name) - 1;
282 priv->firm_version = le16_to_cpu(*(__u16 *) p);
285 n_array = le16_to_cpu(*(__u16 *) p);
288 tuner_info("Loading %d firmware images from %s, type: %s, ver %d.%d\n",
289 n_array, priv->ctrl.fname, name,
290 priv->firm_version >> 8, priv->firm_version & 0xff);
292 priv->firm = kzalloc(sizeof(*priv->firm) * n_array, GFP_KERNEL);
293 if (priv->firm == NULL) {
294 tuner_err("Not enough memory to load firmware file.\n");
298 priv->firm_size = n_array;
307 tuner_err("More firmware images in file than "
312 /* Checks if there's enough bytes to read */
313 if (p + sizeof(type) + sizeof(id) + sizeof(size) > endp) {
314 tuner_err("Firmware header is incomplete!\n");
318 type = le32_to_cpu(*(__u32 *) p);
321 id = le64_to_cpu(*(v4l2_std_id *) p);
324 size = le32_to_cpu(*(__u32 *) p);
327 if ((!size) || (size + p > endp)) {
328 tuner_err("Firmware type ");
329 dump_firm_type(type);
330 printk("(%x), id %llx is corrupted "
331 "(size=%d, expected %d)\n",
332 type, (unsigned long long)id,
333 (unsigned)(endp - p), size);
337 priv->firm[n].ptr = kzalloc(size, GFP_KERNEL);
338 if (priv->firm[n].ptr == NULL) {
339 tuner_err("Not enough memory to load firmware file.\n");
343 tuner_dbg("Reading firmware type ");
345 dump_firm_type(type);
346 printk("(%x), id %llx, size=%d.\n",
347 type, (unsigned long long)id, size);
350 memcpy(priv->firm[n].ptr, p, size);
351 priv->firm[n].type = type;
352 priv->firm[n].id = id;
353 priv->firm[n].size = size;
358 if (n + 1 != priv->firm_size) {
359 tuner_err("Firmware file is incomplete!\n");
367 tuner_err("Error: firmware file is corrupted!\n");
370 tuner_info("Releasing partially loaded firmware file.\n");
374 release_firmware(fw);
376 tuner_dbg("Firmware files loaded.\n");
381 static int seek_firmware(struct dvb_frontend *fe, unsigned int type,
384 struct xc2028_data *priv = fe->tuner_priv;
385 int i, best_i = -1, best_nr_matches = 0;
387 tuner_dbg("%s called, want type=", __FUNCTION__);
389 dump_firm_type(type);
390 printk("(%x), id %016llx.\n", type, (unsigned long long)*id);
394 tuner_err("Error! firmware not loaded\n");
398 if (((type & ~SCODE) == 0) && (*id == 0))
403 else if (type & SCODE)
405 else if (type & DTV_TYPES)
406 type = type & DTV_TYPES;
408 /* Seek for exact match */
409 for (i = 0; i < priv->firm_size; i++) {
410 if ((type == priv->firm[i].type) && (*id == priv->firm[i].id))
414 /* Seek for generic video standard match */
415 for (i = 0; i < priv->firm_size; i++) {
416 v4l2_std_id match_mask;
419 if (type != priv->firm[i].type)
422 match_mask = *id & priv->firm[i].id;
426 if ((*id & match_mask) == *id)
427 goto found; /* Supports all the requested standards */
429 nr_matches = hweight64(match_mask);
430 if (nr_matches > best_nr_matches) {
431 best_nr_matches = nr_matches;
436 if (best_nr_matches > 0) {
437 tuner_dbg("Selecting best matching firmware (%d bits) for "
438 "type=", best_nr_matches);
439 dump_firm_type(type);
440 printk("(%x), id %016llx:\n", type, (unsigned long long)*id);
445 /*FIXME: Would make sense to seek for type "hint" match ? */
451 *id = priv->firm[i].id;
454 tuner_dbg("%s firmware for type=", (i < 0) ? "Can't find" : "Found");
456 dump_firm_type(type);
457 printk("(%x), id %016llx.\n", type, (unsigned long long)*id);
462 static int load_firmware(struct dvb_frontend *fe, unsigned int type,
465 struct xc2028_data *priv = fe->tuner_priv;
467 unsigned char *p, *endp, buf[priv->ctrl.max_len];
469 tuner_dbg("%s called\n", __FUNCTION__);
471 pos = seek_firmware(fe, type, id);
475 tuner_info("Loading firmware for type=");
476 dump_firm_type(priv->firm[pos].type);
477 printk("(%x), id %016llx.\n", priv->firm[pos].type,
478 (unsigned long long)*id);
480 p = priv->firm[pos].ptr;
481 endp = p + priv->firm[pos].size;
486 /* Checks if there's enough bytes to read */
487 if (p + sizeof(size) > endp) {
488 tuner_err("Firmware chunk size is wrong\n");
492 size = le16_to_cpu(*(__u16 *) p);
499 /* Special callback command received */
500 rc = priv->tuner_callback(priv->video_dev,
501 XC2028_TUNER_RESET, 0);
503 tuner_err("Error at RESET code %d\n",
509 if (size >= 0xff00) {
512 rc = priv->tuner_callback(priv->video_dev,
513 XC2028_RESET_CLK, 0);
515 tuner_err("Error at RESET code %d\n",
521 tuner_info("Invalid RESET code %d\n",
529 /* Checks for a sleep command */
531 msleep(size & 0x7fff);
535 if ((size + p > endp)) {
536 tuner_err("missing bytes: need %d, have %d\n",
537 size, (int)(endp - p));
545 /* Sends message chunks */
547 int len = (size < priv->ctrl.max_len - 1) ?
548 size : priv->ctrl.max_len - 1;
550 memcpy(buf + 1, p, len);
552 rc = i2c_send(priv, buf, len + 1);
554 tuner_err("%d returned from send\n", rc);
565 static int load_scode(struct dvb_frontend *fe, unsigned int type,
566 v4l2_std_id *id, int scode)
568 struct xc2028_data *priv = fe->tuner_priv;
572 tuner_dbg("%s called\n", __FUNCTION__);
574 pos = seek_firmware(fe, type, id);
578 p = priv->firm[pos].ptr;
580 /* 16 SCODE entries per file; each SCODE entry is 12 bytes and
581 * has a 2-byte size header in the firmware format. */
582 if (priv->firm[pos].size != 14 * 16 || scode >= 16 ||
583 le16_to_cpu(*(__u16 *)(p + 14 * scode)) != 12)
586 tuner_info("Loading SCODE for type=");
587 dump_firm_type(priv->firm[pos].type);
588 printk("(%x), id %016llx.\n", priv->firm[pos].type,
589 (unsigned long long)*id);
591 if (priv->firm_version < 0x0202)
592 rc = send_seq(priv, {0x20, 0x00, 0x00, 0x00});
594 rc = send_seq(priv, {0xa0, 0x00, 0x00, 0x00});
598 rc = i2c_send(priv, p + 14 * scode + 2, 12);
602 rc = send_seq(priv, {0x00, 0x8c});
609 static int check_firmware(struct dvb_frontend *fe, enum tuner_mode new_mode,
610 v4l2_std_id std, fe_bandwidth_t bandwidth)
612 struct xc2028_data *priv = fe->tuner_priv;
613 int rc = 0, is_retry = 0;
614 unsigned int type = 0;
615 struct firmware_properties new_fw;
616 u16 version, hwmodel;
618 tuner_dbg("%s called\n", __FUNCTION__);
621 if (!priv->ctrl.fname) {
622 tuner_info("xc2028/3028 firmware name not set!\n");
626 rc = load_all_firmwares(fe);
631 if (priv->ctrl.type == XC2028_FIRM_MTS)
633 if (bandwidth == BANDWIDTH_7_MHZ || bandwidth == BANDWIDTH_8_MHZ)
636 /* FIXME: How to load FM and FM|INPUT1 firmwares? */
638 if (new_mode == T_DIGITAL_TV) {
639 if (priv->ctrl.d2633)
645 case BANDWIDTH_8_MHZ:
648 case BANDWIDTH_7_MHZ:
651 case BANDWIDTH_6_MHZ:
652 /* FIXME: Should allow select also ATSC */
656 tuner_err("error: bandwidth not supported.\n");
663 new_fw.std_req = std;
664 new_fw.scode_table = SCODE | priv->ctrl.scode_table;
667 tuner_dbg("checking firmware, user requested type=");
669 dump_firm_type(new_fw.type);
670 printk("(%x), id %016llx, scode_tbl ", new_fw.type,
671 (unsigned long long)new_fw.std_req);
672 dump_firm_type(priv->ctrl.scode_table);
673 printk("(%x), scode_nr %d\n", priv->ctrl.scode_table,
677 /* No need to reload base firmware if it matches */
678 if (((BASE | new_fw.type) & BASE_TYPES) ==
679 (priv->cur_fw.type & BASE_TYPES)) {
680 tuner_dbg("BASE firmware not changed.\n");
684 /* Updating BASE - forget about all currently loaded firmware */
685 memset(&priv->cur_fw, 0, sizeof(priv->cur_fw));
687 /* Reset is needed before loading firmware */
688 rc = priv->tuner_callback(priv->video_dev,
689 XC2028_TUNER_RESET, 0);
693 rc = load_firmware(fe, BASE | new_fw.type, &new_fw.id);
695 tuner_err("Error %d while loading base firmware\n",
700 /* Load INIT1, if needed */
701 tuner_dbg("Load init1 firmware, if exists\n");
703 rc = load_firmware(fe, BASE | INIT1 | new_fw.type, &new_fw.id);
704 if (rc < 0 && rc != -ENOENT) {
705 tuner_err("Error %d while loading init1 firmware\n",
712 * No need to reload standard specific firmware if base firmware
713 * was not reloaded and requested video standards have not changed.
715 if (priv->cur_fw.type == (BASE | new_fw.type) &&
716 priv->cur_fw.std_req == std) {
717 tuner_dbg("Std-specific firmware already loaded.\n");
718 goto skip_std_specific;
721 /* Reloading std-specific firmware forces a SCODE update */
722 priv->cur_fw.scode_table = 0;
724 /* Add audio hack to std mask */
725 if (new_mode == T_ANALOG_TV)
726 new_fw.id |= parse_audio_std_option();
728 rc = load_firmware(fe, new_fw.type, &new_fw.id);
733 if (priv->cur_fw.scode_table == new_fw.scode_table &&
734 priv->cur_fw.scode_nr == new_fw.scode_nr) {
735 tuner_dbg("SCODE firmware already loaded.\n");
739 /* Load SCODE firmware, if exists */
740 tuner_dbg("Trying to load scode %d\n", new_fw.scode_nr);
742 rc = load_scode(fe, new_fw.type | new_fw.scode_table,
743 &new_fw.id, new_fw.scode_nr);
746 if (xc2028_get_reg(priv, 0x0004, &version) < 0 ||
747 xc2028_get_reg(priv, 0x0008, &hwmodel) < 0) {
748 tuner_err("Unable to read tuner registers.\n");
752 tuner_info("Device is Xceive %d version %d.%d, "
753 "firmware version %d.%d\n",
754 hwmodel, (version & 0xf000) >> 12, (version & 0xf00) >> 8,
755 (version & 0xf0) >> 4, version & 0xf);
757 /* Check firmware version against what we downloaded. */
758 if (priv->firm_version != ((version & 0xf0) << 4 | (version & 0x0f))) {
759 tuner_err("Incorrect readback of firmware version.\n");
763 /* Check that the tuner hardware model remains consistent over time. */
764 if (priv->hwmodel == 0 && (hwmodel == 2028 || hwmodel == 3028)) {
765 priv->hwmodel = hwmodel;
766 priv->hwvers = version & 0xff00;
767 } else if (priv->hwmodel == 0 || priv->hwmodel != hwmodel ||
768 priv->hwvers != (version & 0xff00)) {
769 tuner_err("Read invalid device hardware information - tuner "
774 memcpy(&priv->cur_fw, &new_fw, sizeof(priv->cur_fw));
777 * By setting BASE in cur_fw.type only after successfully loading all
779 * 1. Identify that BASE firmware with type=0 has been loaded;
780 * 2. Tell whether BASE firmware was just changed the next time through.
782 priv->cur_fw.type |= BASE;
787 memset(&priv->cur_fw, 0, sizeof(priv->cur_fw));
791 tuner_dbg("Retrying firmware load\n");
800 static int xc2028_signal(struct dvb_frontend *fe, u16 *strength)
802 struct xc2028_data *priv = fe->tuner_priv;
803 u16 frq_lock, signal = 0;
806 tuner_dbg("%s called\n", __FUNCTION__);
808 mutex_lock(&priv->lock);
810 /* Sync Lock Indicator */
811 rc = xc2028_get_reg(priv, 0x0002, &frq_lock);
812 if (rc < 0 || frq_lock == 0)
815 /* Frequency is locked. Return signal quality */
817 /* Get SNR of the video signal */
818 rc = xc2028_get_reg(priv, 0x0040, &signal);
823 mutex_unlock(&priv->lock);
832 static int generic_set_tv_freq(struct dvb_frontend *fe, u32 freq /* in Hz */ ,
833 enum tuner_mode new_mode,
834 v4l2_std_id std, fe_bandwidth_t bandwidth)
836 struct xc2028_data *priv = fe->tuner_priv;
838 unsigned char buf[4];
841 tuner_dbg("%s called\n", __FUNCTION__);
843 mutex_lock(&priv->lock);
845 /* HACK: It seems that specific firmware need to be reloaded
846 when watching analog TV and freq is changed */
847 if (new_mode != T_DIGITAL_TV)
848 priv->cur_fw.type = 0;
850 tuner_dbg("should set frequency %d kHz\n", freq / 1000);
852 if (check_firmware(fe, new_mode, std, bandwidth) < 0)
855 if (new_mode == T_DIGITAL_TV) {
857 if (priv->cur_fw.type & DTV7)
861 div = (freq - offset + DIV / 2) / DIV;
863 /* CMD= Set frequency */
864 if (priv->firm_version < 0x0202)
865 rc = send_seq(priv, {0x00, 0x02, 0x00, 0x00});
867 rc = send_seq(priv, {0x80, 0x02, 0x00, 0x00});
871 rc = priv->tuner_callback(priv->video_dev, XC2028_RESET_CLK, 1);
877 buf[0] = 0xff & (div >> 24);
878 buf[1] = 0xff & (div >> 16);
879 buf[2] = 0xff & (div >> 8);
880 buf[3] = 0xff & (div);
882 rc = i2c_send(priv, buf, sizeof(buf));
887 priv->frequency = freq;
889 tuner_dbg("divisor= %02x %02x %02x %02x (freq=%d.%03d)\n",
890 buf[0], buf[1], buf[2], buf[3],
891 freq / 1000000, (freq % 1000000) / 1000);
896 mutex_unlock(&priv->lock);
901 static int xc2028_set_tv_freq(struct dvb_frontend *fe,
902 struct analog_parameters *p)
904 struct xc2028_data *priv = fe->tuner_priv;
906 tuner_dbg("%s called\n", __FUNCTION__);
908 return generic_set_tv_freq(fe, 62500l * p->frequency, T_ANALOG_TV,
909 p->std, BANDWIDTH_8_MHZ);
910 /* XXX Are some analog standards 6MHz? */
913 static int xc2028_set_params(struct dvb_frontend *fe,
914 struct dvb_frontend_parameters *p)
916 struct xc2028_data *priv = fe->tuner_priv;
918 tuner_dbg("%s called\n", __FUNCTION__);
920 /* FIXME: Only OFDM implemented */
921 if (fe->ops.info.type != FE_OFDM) {
922 tuner_err("DTV type not implemented.\n");
926 return generic_set_tv_freq(fe, p->frequency, T_DIGITAL_TV,
928 p->u.ofdm.bandwidth);
932 static int xc2028_dvb_release(struct dvb_frontend *fe)
934 struct xc2028_data *priv = fe->tuner_priv;
936 tuner_dbg("%s called\n", __FUNCTION__);
938 mutex_lock(&xc2028_list_mutex);
943 list_del(&priv->xc2028_list);
945 kfree(priv->ctrl.fname);
949 fe->tuner_priv = NULL;
952 mutex_unlock(&xc2028_list_mutex);
957 static int xc2028_get_frequency(struct dvb_frontend *fe, u32 *frequency)
959 struct xc2028_data *priv = fe->tuner_priv;
961 tuner_dbg("%s called\n", __FUNCTION__);
963 *frequency = priv->frequency;
968 static int xc2028_set_config(struct dvb_frontend *fe, void *priv_cfg)
970 struct xc2028_data *priv = fe->tuner_priv;
971 struct xc2028_ctrl *p = priv_cfg;
974 tuner_dbg("%s called\n", __FUNCTION__);
976 mutex_lock(&priv->lock);
978 kfree(priv->ctrl.fname);
981 memcpy(&priv->ctrl, p, sizeof(priv->ctrl));
982 priv->ctrl.fname = NULL;
985 priv->ctrl.fname = kstrdup(p->fname, GFP_KERNEL);
986 if (priv->ctrl.fname == NULL)
990 if (priv->ctrl.max_len < 9)
991 priv->ctrl.max_len = 13;
993 mutex_unlock(&priv->lock);
998 static const struct dvb_tuner_ops xc2028_dvb_tuner_ops = {
1000 .name = "Xceive XC3028",
1001 .frequency_min = 42000000,
1002 .frequency_max = 864000000,
1003 .frequency_step = 50000,
1006 .set_config = xc2028_set_config,
1007 .set_analog_params = xc2028_set_tv_freq,
1008 .release = xc2028_dvb_release,
1009 .get_frequency = xc2028_get_frequency,
1010 .get_rf_strength = xc2028_signal,
1011 .set_params = xc2028_set_params,
1015 void *xc2028_attach(struct dvb_frontend *fe, struct xc2028_config *cfg)
1017 struct xc2028_data *priv;
1021 printk(KERN_DEBUG PREFIX ": Xcv2028/3028 init called!\n");
1023 if (NULL == cfg->video_dev)
1027 printk(KERN_ERR PREFIX ": No frontend!\n");
1031 video_dev = cfg->video_dev;
1033 mutex_lock(&xc2028_list_mutex);
1035 list_for_each_entry(priv, &xc2028_list, xc2028_list) {
1036 if (priv->video_dev == cfg->video_dev) {
1043 priv = kzalloc(sizeof(*priv), GFP_KERNEL);
1045 mutex_unlock(&xc2028_list_mutex);
1049 priv->i2c_props.addr = cfg->i2c_addr;
1050 priv->i2c_props.adap = cfg->i2c_adap;
1051 priv->video_dev = video_dev;
1052 priv->tuner_callback = cfg->callback;
1053 priv->ctrl.max_len = 13;
1055 mutex_init(&priv->lock);
1057 list_add_tail(&priv->xc2028_list, &xc2028_list);
1060 fe->tuner_priv = priv;
1063 memcpy(&fe->ops.tuner_ops, &xc2028_dvb_tuner_ops,
1064 sizeof(xc2028_dvb_tuner_ops));
1066 tuner_info("type set to %s\n", "XCeive xc2028/xc3028 tuner");
1068 mutex_unlock(&xc2028_list_mutex);
1073 EXPORT_SYMBOL(xc2028_attach);
1075 MODULE_DESCRIPTION("Xceive xc2028/xc3028 tuner driver");
1076 MODULE_AUTHOR("Michel Ludwig <michel.ludwig@gmail.com>");
1077 MODULE_AUTHOR("Mauro Carvalho Chehab <mchehab@infradead.org>");
1078 MODULE_LICENSE("GPL");