drivers/media/dvb/frontends/sp887x.c

   1 /*
   2    Driver for the Spase sp887x demodulator
   3 */
   4
   5 /*
   6  * This driver needs external firmware. Please use the command
   7  * "<kerneldir>/Documentation/dvb/get_dvb_firmware sp887x" to
   8  * download/extract it, and then copy it to /usr/lib/hotplug/firmware
   9  * or /lib/firmware (depending on configuration of firmware hotplug).
  10  */
  11 #define SP887X_DEFAULT_FIRMWARE "dvb-fe-sp887x.fw"
  12
  13 #include <linux/init.h>
  14 #include <linux/module.h>
  15 #include <linux/device.h>
  16 #include <linux/firmware.h>
  17 #include <linux/string.h>
  18 #include <linux/slab.h>
  19
  20 #include "dvb_frontend.h"
  21 #include "sp887x.h"
  22
  23
  24 struct sp887x_state {
  25         struct i2c_adapter* i2c;
  26         const struct sp887x_config* config;
  27         struct dvb_frontend frontend;
  28
  29         /* demodulator private data */
  30         u8 initialised:1;
  31 };
  32
  33 static int debug;
  34 #define dprintk(args...) \
  35         do { \
  36                 if (debug) printk(KERN_DEBUG "sp887x: " args); \
  37         } while (0)
  38
  39 static int i2c_writebytes (struct sp887x_state* state, u8 *buf, u8 len)
  40 {
  41         struct i2c_msg msg = { .addr = state->config->demod_address, .flags = 0, .buf = buf, .len = len };
  42         int err;
  43
  44         if ((err = i2c_transfer (state->i2c, &msg, 1)) != 1) {
  45                 printk ("%s: i2c write error (addr %02x, err == %i)\n",
  46                         __FUNCTION__, state->config->demod_address, err);
  47                 return -EREMOTEIO;
  48         }
  49
  50         return 0;
  51 }
  52
  53 static int sp887x_writereg (struct sp887x_state* state, u16 reg, u16 data)
  54 {
  55         u8 b0 [] = { reg >> 8 , reg & 0xff, data >> 8, data & 0xff };
  56         struct i2c_msg msg = { .addr = state->config->demod_address, .flags = 0, .buf = b0, .len = 4 };
  57         int ret;
  58
  59         if ((ret = i2c_transfer(state->i2c, &msg, 1)) != 1) {
  60                 /**
  61                  *  in case of soft reset we ignore ACK errors...
  62                  */
  63                 if (!(reg == 0xf1a && data == 0x000 &&
  64                         (ret == -EREMOTEIO || ret == -EFAULT)))
  65                 {
  66                         printk("%s: writereg error "
  67                                "(reg %03x, data %03x, ret == %i)\n",
  68                                __FUNCTION__, reg & 0xffff, data & 0xffff, ret);
  69                         return ret;
  70                 }
  71         }
  72
  73         return 0;
  74 }
  75
  76 static int sp887x_readreg (struct sp887x_state* state, u16 reg)
  77 {
  78         u8 b0 [] = { reg >> 8 , reg & 0xff };
  79         u8 b1 [2];
  80         int ret;
  81         struct i2c_msg msg[] = {{ .addr = state->config->demod_address, .flags = 0, .buf = b0, .len = 2 },
  82                          { .addr = state->config->demod_address, .flags = I2C_M_RD, .buf = b1, .len = 2 }};
  83
  84         if ((ret = i2c_transfer(state->i2c, msg, 2)) != 2) {
  85                 printk("%s: readreg error (ret == %i)\n", __FUNCTION__, ret);
  86                 return -1;
  87         }
  88
  89         return (((b1[0] << 8) | b1[1]) & 0xfff);
  90 }
  91
  92 static void sp887x_microcontroller_stop (struct sp887x_state* state)
  93 {
  94         dprintk("%s\n", __FUNCTION__);
  95         sp887x_writereg(state, 0xf08, 0x000);
  96         sp887x_writereg(state, 0xf09, 0x000);
  97
  98         /* microcontroller STOP */
  99         sp887x_writereg(state, 0xf00, 0x000);
 100 }
 101
 102 static void sp887x_microcontroller_start (struct sp887x_state* state)
 103 {
 104         dprintk("%s\n", __FUNCTION__);
 105         sp887x_writereg(state, 0xf08, 0x000);
 106         sp887x_writereg(state, 0xf09, 0x000);
 107
 108         /* microcontroller START */
 109         sp887x_writereg(state, 0xf00, 0x001);
 110 }
 111
 112 static void sp887x_setup_agc (struct sp887x_state* state)
 113 {
 114         /* setup AGC parameters */
 115         dprintk("%s\n", __FUNCTION__);
 116         sp887x_writereg(state, 0x33c, 0x054);
 117         sp887x_writereg(state, 0x33b, 0x04c);
 118         sp887x_writereg(state, 0x328, 0x000);
 119         sp887x_writereg(state, 0x327, 0x005);
 120         sp887x_writereg(state, 0x326, 0x001);
 121         sp887x_writereg(state, 0x325, 0x001);
 122         sp887x_writereg(state, 0x324, 0x001);
 123         sp887x_writereg(state, 0x318, 0x050);
 124         sp887x_writereg(state, 0x317, 0x3fe);
 125         sp887x_writereg(state, 0x316, 0x001);
 126         sp887x_writereg(state, 0x313, 0x005);
 127         sp887x_writereg(state, 0x312, 0x002);
 128         sp887x_writereg(state, 0x306, 0x000);
 129         sp887x_writereg(state, 0x303, 0x000);
 130 }
 131
 132 #define BLOCKSIZE 30
 133 #define FW_SIZE 0x4000
 134 /**
 135  *  load firmware and setup MPEG interface...
 136  */
 137 static int sp887x_initial_setup (struct dvb_frontend* fe, const struct firmware *fw)
 138 {
 139         struct sp887x_state* state = fe->demodulator_priv;
 140         u8 buf [BLOCKSIZE+2];
 141         int i;
 142         int fw_size = fw->size;
 143         unsigned char *mem = fw->data;
 144
 145         dprintk("%s\n", __FUNCTION__);
 146
 147         /* ignore the first 10 bytes, then we expect 0x4000 bytes of firmware */
 148         if (fw_size < FW_SIZE+10)
 149                 return -ENODEV;
 150
 151         mem = fw->data + 10;
 152
 153         /* soft reset */
 154         sp887x_writereg(state, 0xf1a, 0x000);
 155
 156         sp887x_microcontroller_stop (state);
 157
 158         printk ("%s: firmware upload... ", __FUNCTION__);
 159
 160         /* setup write pointer to -1 (end of memory) */
 161         /* bit 0x8000 in address is set to enable 13bit mode */
 162         sp887x_writereg(state, 0x8f08, 0x1fff);
 163
 164         /* dummy write (wrap around to start of memory) */
 165         sp887x_writereg(state, 0x8f0a, 0x0000);
 166
 167         for (i = 0; i < FW_SIZE; i += BLOCKSIZE) {
 168                 int c = BLOCKSIZE;
 169                 int err;
 170
 171                 if (i+c > FW_SIZE)
 172                         c = FW_SIZE - i;
 173
 174                 /* bit 0x8000 in address is set to enable 13bit mode */
 175                 /* bit 0x4000 enables multibyte read/write transfers */
 176                 /* write register is 0xf0a */
 177                 buf[0] = 0xcf;
 178                 buf[1] = 0x0a;
 179
 180                 memcpy(&buf[2], mem + i, c);
 181
 182                 if ((err = i2c_writebytes (state, buf, c+2)) < 0) {
 183                         printk ("failed.\n");
 184                         printk ("%s: i2c error (err == %i)\n", __FUNCTION__, err);
 185                         return err;
 186                 }
 187         }
 188
 189         /* don't write RS bytes between packets */
 190         sp887x_writereg(state, 0xc13, 0x001);
 191
 192         /* suppress clock if (!data_valid) */
 193         sp887x_writereg(state, 0xc14, 0x000);
 194
 195         /* setup MPEG interface... */
 196         sp887x_writereg(state, 0xc1a, 0x872);
 197         sp887x_writereg(state, 0xc1b, 0x001);
 198         sp887x_writereg(state, 0xc1c, 0x000); /* parallel mode (serial mode == 1) */
 199         sp887x_writereg(state, 0xc1a, 0x871);
 200
 201         /* ADC mode, 2 for MT8872, 3 for SP8870/SP8871 */
 202         sp887x_writereg(state, 0x301, 0x002);
 203
 204         sp887x_setup_agc(state);
 205
 206         /* bit 0x010: enable data valid signal */
 207         sp887x_writereg(state, 0xd00, 0x010);
 208         sp887x_writereg(state, 0x0d1, 0x000);
 209         return 0;
 210 };
 211
 212 static int configure_reg0xc05 (struct dvb_frontend_parameters *p, u16 *reg0xc05)
 213 {
 214         int known_parameters = 1;
 215
 216         *reg0xc05 = 0x000;
 217
 218         switch (p->u.ofdm.constellation) {
 219         case QPSK:
 220                 break;
 221         case QAM_16:
 222                 *reg0xc05 |= (1 << 10);
 223                 break;
 224         case QAM_64:
 225                 *reg0xc05 |= (2 << 10);
 226                 break;
 227         case QAM_AUTO:
 228                 known_parameters = 0;
 229                 break;
 230         default:
 231                 return -EINVAL;
 232         };
 233
 234         switch (p->u.ofdm.hierarchy_information) {
 235         case HIERARCHY_NONE:
 236                 break;
 237         case HIERARCHY_1:
 238                 *reg0xc05 |= (1 << 7);
 239                 break;
 240         case HIERARCHY_2:
 241                 *reg0xc05 |= (2 << 7);
 242                 break;
 243         case HIERARCHY_4:
 244                 *reg0xc05 |= (3 << 7);
 245                 break;
 246         case HIERARCHY_AUTO:
 247                 known_parameters = 0;
 248                 break;
 249         default:
 250                 return -EINVAL;
 251         };
 252
 253         switch (p->u.ofdm.code_rate_HP) {
 254         case FEC_1_2:
 255                 break;
 256         case FEC_2_3:
 257                 *reg0xc05 |= (1 << 3);
 258                 break;
 259         case FEC_3_4:
 260                 *reg0xc05 |= (2 << 3);
 261                 break;
 262         case FEC_5_6:
 263                 *reg0xc05 |= (3 << 3);
 264                 break;
 265         case FEC_7_8:
 266                 *reg0xc05 |= (4 << 3);
 267                 break;
 268         case FEC_AUTO:
 269                 known_parameters = 0;
 270                 break;
 271         default:
 272                 return -EINVAL;
 273         };
 274
 275         if (known_parameters)
 276                 *reg0xc05 |= (2 << 1);  /* use specified parameters */
 277         else
 278                 *reg0xc05 |= (1 << 1);  /* enable autoprobing */
 279
 280         return 0;
 281 }
 282
 283 /**
 284  *  estimates division of two 24bit numbers,
 285  *  derived from the ves1820/stv0299 driver code
 286  */
 287 static void divide (int n, int d, int *quotient_i, int *quotient_f)
 288 {
 289         unsigned int q, r;
 290
 291         r = (n % d) << 8;
 292         q = (r / d);
 293
 294         if (quotient_i)
 295                 *quotient_i = q;
 296
 297         if (quotient_f) {
 298                 r = (r % d) << 8;
 299                 q = (q << 8) | (r / d);
 300                 r = (r % d) << 8;
 301                 *quotient_f = (q << 8) | (r / d);
 302         }
 303 }
 304
 305 static void sp887x_correct_offsets (struct sp887x_state* state,
 306                                     struct dvb_frontend_parameters *p,
 307                                     int actual_freq)
 308 {
 309         static const u32 srate_correction [] = { 1879617, 4544878, 8098561 };
 310         int bw_index = p->u.ofdm.bandwidth - BANDWIDTH_8_MHZ;
 311         int freq_offset = actual_freq - p->frequency;
 312         int sysclock = 61003; //[kHz]
 313         int ifreq = 36000000;
 314         int freq;
 315         int frequency_shift;
 316
 317         if (p->inversion == INVERSION_ON)
 318                 freq = ifreq - freq_offset;
 319         else
 320                 freq = ifreq + freq_offset;
 321
 322         divide(freq / 333, sysclock, NULL, &frequency_shift);
 323
 324         if (p->inversion == INVERSION_ON)
 325                 frequency_shift = -frequency_shift;
 326
 327         /* sample rate correction */
 328         sp887x_writereg(state, 0x319, srate_correction[bw_index] >> 12);
 329         sp887x_writereg(state, 0x31a, srate_correction[bw_index] & 0xfff);
 330
 331         /* carrier offset correction */
 332         sp887x_writereg(state, 0x309, frequency_shift >> 12);
 333         sp887x_writereg(state, 0x30a, frequency_shift & 0xfff);
 334 }
 335
 336 static int sp887x_setup_frontend_parameters (struct dvb_frontend* fe,
 337                                              struct dvb_frontend_parameters *p)
 338 {
 339         struct sp887x_state* state = fe->demodulator_priv;
 340         int actual_freq, err;
 341         u16 val, reg0xc05;
 342
 343         if (p->u.ofdm.bandwidth != BANDWIDTH_8_MHZ &&
 344             p->u.ofdm.bandwidth != BANDWIDTH_7_MHZ &&
 345             p->u.ofdm.bandwidth != BANDWIDTH_6_MHZ)
 346                 return -EINVAL;
 347
 348         if ((err = configure_reg0xc05(p, &reg0xc05)))
 349                 return err;
 350
 351         sp887x_microcontroller_stop(state);
 352
 353         /* setup the PLL */
 354         if (fe->ops.tuner_ops.set_params) {
 355                 fe->ops.tuner_ops.set_params(fe, p);
 356                 if (fe->ops.i2c_gate_ctrl) fe->ops.i2c_gate_ctrl(fe, 0);
 357         }
 358         if (fe->ops.tuner_ops.get_frequency) {
 359                 fe->ops.tuner_ops.get_frequency(fe, &actual_freq);
 360                 if (fe->ops.i2c_gate_ctrl) fe->ops.i2c_gate_ctrl(fe, 0);
 361         } else {
 362                 actual_freq = p->frequency;
 363         }
 364
 365         /* read status reg in order to clear <pending irqs */
 366         sp887x_readreg(state, 0x200);
 367
 368         sp887x_correct_offsets(state, p, actual_freq);
 369
 370         /* filter for 6/7/8 Mhz channel */
 371         if (p->u.ofdm.bandwidth == BANDWIDTH_6_MHZ)
 372                 val = 2;
 373         else if (p->u.ofdm.bandwidth == BANDWIDTH_7_MHZ)
 374                 val = 1;
 375         else
 376                 val = 0;
 377
 378         sp887x_writereg(state, 0x311, val);
 379
 380         /* scan order: 2k first = 0, 8k first = 1 */
 381         if (p->u.ofdm.transmission_mode == TRANSMISSION_MODE_2K)
 382                 sp887x_writereg(state, 0x338, 0x000);
 383         else
 384                 sp887x_writereg(state, 0x338, 0x001);
 385
 386         sp887x_writereg(state, 0xc05, reg0xc05);
 387
 388         if (p->u.ofdm.bandwidth == BANDWIDTH_6_MHZ)
 389                 val = 2 << 3;
 390         else if (p->u.ofdm.bandwidth == BANDWIDTH_7_MHZ)
 391                 val = 3 << 3;
 392         else
 393                 val = 0 << 3;
 394
 395         /* enable OFDM and SAW bits as lock indicators in sync register 0xf17,
 396          * optimize algorithm for given bandwidth...
 397          */
 398         sp887x_writereg(state, 0xf14, 0x160 | val);
 399         sp887x_writereg(state, 0xf15, 0x000);
 400
 401         sp887x_microcontroller_start(state);
 402         return 0;
 403 }
 404
 405 static int sp887x_read_status(struct dvb_frontend* fe, fe_status_t* status)
 406 {
 407         struct sp887x_state* state = fe->demodulator_priv;
 408         u16 snr12 = sp887x_readreg(state, 0xf16);
 409         u16 sync0x200 = sp887x_readreg(state, 0x200);
 410         u16 sync0xf17 = sp887x_readreg(state, 0xf17);
 411
 412         *status = 0;
 413
 414         if (snr12 > 0x00f)
 415                 *status |= FE_HAS_SIGNAL;
 416
 417         //if (sync0x200 & 0x004)
 418         //      *status |= FE_HAS_SYNC | FE_HAS_CARRIER;
 419
 420         //if (sync0x200 & 0x008)
 421         //      *status |= FE_HAS_VITERBI;
 422
 423         if ((sync0xf17 & 0x00f) == 0x002) {
 424                 *status |= FE_HAS_LOCK;
 425                 *status |= FE_HAS_VITERBI | FE_HAS_SYNC | FE_HAS_CARRIER;
 426         }
 427
 428         if (sync0x200 & 0x001) {        /* tuner adjustment requested...*/
 429                 int steps = (sync0x200 >> 4) & 0x00f;
 430                 if (steps & 0x008)
 431                         steps = -steps;
 432                 dprintk("sp887x: implement tuner adjustment (%+i steps)!!\n",
 433                        steps);
 434         }
 435
 436         return 0;
 437 }
 438
 439 static int sp887x_read_ber(struct dvb_frontend* fe, u32* ber)
 440 {
 441         struct sp887x_state* state = fe->demodulator_priv;
 442
 443         *ber = (sp887x_readreg(state, 0xc08) & 0x3f) |
 444                (sp887x_readreg(state, 0xc07) << 6);
 445         sp887x_writereg(state, 0xc08, 0x000);
 446         sp887x_writereg(state, 0xc07, 0x000);
 447         if (*ber >= 0x3fff0)
 448                 *ber = ~0;
 449
 450         return 0;
 451 }
 452
 453 static int sp887x_read_signal_strength(struct dvb_frontend* fe, u16* strength)
 454 {
 455         struct sp887x_state* state = fe->demodulator_priv;
 456
 457         u16 snr12 = sp887x_readreg(state, 0xf16);
 458         u32 signal = 3 * (snr12 << 4);
 459         *strength = (signal < 0xffff) ? signal : 0xffff;
 460
 461         return 0;
 462 }
 463
 464 static int sp887x_read_snr(struct dvb_frontend* fe, u16* snr)
 465 {
 466         struct sp887x_state* state = fe->demodulator_priv;
 467
 468         u16 snr12 = sp887x_readreg(state, 0xf16);
 469         *snr = (snr12 << 4) | (snr12 >> 8);
 470
 471         return 0;
 472 }
 473
 474 static int sp887x_read_ucblocks(struct dvb_frontend* fe, u32* ucblocks)
 475 {
 476         struct sp887x_state* state = fe->demodulator_priv;
 477
 478         *ucblocks = sp887x_readreg(state, 0xc0c);
 479         if (*ucblocks == 0xfff)
 480                 *ucblocks = ~0;
 481
 482         return 0;
 483 }
 484
 485 static int sp887x_i2c_gate_ctrl(struct dvb_frontend* fe, int enable)
 486 {
 487         struct sp887x_state* state = fe->demodulator_priv;
 488
 489         if (enable) {
 490                 return sp887x_writereg(state, 0x206, 0x001);
 491         } else {
 492                 return sp887x_writereg(state, 0x206, 0x000);
 493         }
 494 }
 495
 496 static int sp887x_sleep(struct dvb_frontend* fe)
 497 {
 498         struct sp887x_state* state = fe->demodulator_priv;
 499
 500         /* tristate TS output and disable interface pins */
 501         sp887x_writereg(state, 0xc18, 0x000);
 502
 503         return 0;
 504 }
 505
 506 static int sp887x_init(struct dvb_frontend* fe)
 507 {
 508         struct sp887x_state* state = fe->demodulator_priv;
 509         const struct firmware *fw = NULL;
 510         int ret;
 511
 512         if (!state->initialised) {
 513                 /* request the firmware, this will block until someone uploads it */
 514                 printk("sp887x: waiting for firmware upload (%s)...\n", SP887X_DEFAULT_FIRMWARE);
 515                 ret = state->config->request_firmware(fe, &fw, SP887X_DEFAULT_FIRMWARE);
 516                 if (ret) {
 517                         printk("sp887x: no firmware upload (timeout or file not found?)\n");
 518                         return ret;
 519                 }
 520
 521                 ret = sp887x_initial_setup(fe, fw);
 522                 release_firmware(fw);
 523                 if (ret) {
 524                         printk("sp887x: writing firmware to device failed\n");
 525                         return ret;
 526                 }
 527                 printk("sp887x: firmware upload complete\n");
 528                 state->initialised = 1;
 529         }
 530
 531         /* enable TS output and interface pins */
 532         sp887x_writereg(state, 0xc18, 0x00d);
 533
 534         return 0;
 535 }
 536
 537 static int sp887x_get_tune_settings(struct dvb_frontend* fe, struct dvb_frontend_tune_settings* fesettings)
 538 {
 539         fesettings->min_delay_ms = 350;
 540         fesettings->step_size = 166666*2;
 541         fesettings->max_drift = (166666*2)+1;
 542         return 0;
 543 }
 544
 545 static void sp887x_release(struct dvb_frontend* fe)
 546 {
 547         struct sp887x_state* state = fe->demodulator_priv;
 548         kfree(state);
 549 }
 550
 551 static struct dvb_frontend_ops sp887x_ops;
 552
 553 struct dvb_frontend* sp887x_attach(const struct sp887x_config* config,
 554                                    struct i2c_adapter* i2c)
 555 {
 556         struct sp887x_state* state = NULL;
 557
 558         /* allocate memory for the internal state */
 559         state = kmalloc(sizeof(struct sp887x_state), GFP_KERNEL);
 560         if (state == NULL) goto error;
 561
 562         /* setup the state */
 563         state->config = config;
 564         state->i2c = i2c;
 565         state->initialised = 0;
 566
 567         /* check if the demod is there */
 568         if (sp887x_readreg(state, 0x0200) < 0) goto error;
 569
 570         /* create dvb_frontend */
 571         memcpy(&state->frontend.ops, &sp887x_ops, sizeof(struct dvb_frontend_ops));
 572         state->frontend.demodulator_priv = state;
 573         return &state->frontend;
 574
 575 error:
 576         kfree(state);
 577         return NULL;
 578 }
 579
 580 static struct dvb_frontend_ops sp887x_ops = {
 581
 582         .info = {
 583                 .name = "Spase SP887x DVB-T",
 584                 .type = FE_OFDM,
 585                 .frequency_min =  50500000,
 586                 .frequency_max = 858000000,
 587                 .frequency_stepsize = 166666,
 588                 .caps = FE_CAN_FEC_1_2 | FE_CAN_FEC_2_3 | FE_CAN_FEC_3_4 |
 589                         FE_CAN_FEC_5_6 | FE_CAN_FEC_7_8 | FE_CAN_FEC_AUTO |
 590                         FE_CAN_QPSK | FE_CAN_QAM_16 | FE_CAN_QAM_64 |
 591                         FE_CAN_RECOVER
 592         },
 593
 594         .release = sp887x_release,
 595
 596         .init = sp887x_init,
 597         .sleep = sp887x_sleep,
 598         .i2c_gate_ctrl = sp887x_i2c_gate_ctrl,
 599
 600         .set_frontend = sp887x_setup_frontend_parameters,
 601         .get_tune_settings = sp887x_get_tune_settings,
 602
 603         .read_status = sp887x_read_status,
 604         .read_ber = sp887x_read_ber,
 605         .read_signal_strength = sp887x_read_signal_strength,
 606         .read_snr = sp887x_read_snr,
 607         .read_ucblocks = sp887x_read_ucblocks,
 608 };
 609
 610 module_param(debug, int, 0644);
 611 MODULE_PARM_DESC(debug, "Turn on/off frontend debugging (default:off).");
 612
 613 MODULE_DESCRIPTION("Spase sp887x DVB-T demodulator driver");
 614 MODULE_LICENSE("GPL");
 615
 616 EXPORT_SYMBOL(sp887x_attach);