drivers/media/dvb-frontends/stb0899_drv.c

   1 /*
   2         STB0899 Multistandard Frontend driver
   3         Copyright (C) Manu Abraham (abraham.manu@gmail.com)
   4
   5         Copyright (C) ST Microelectronics
   6
   7         This program is free software; you can redistribute it and/or modify
   8         it under the terms of the GNU General Public License as published by
   9         the Free Software Foundation; either version 2 of the License, or
  10         (at your option) any later version.
  11
  12         This program is distributed in the hope that it will be useful,
  13         but WITHOUT ANY WARRANTY; without even the implied warranty of
  14         MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15         GNU General Public License for more details.
  16
  17         You should have received a copy of the GNU General Public License
  18         along with this program; if not, write to the Free Software
  19         Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20 */
  21
  22 #include <linux/init.h>
  23 #include <linux/kernel.h>
  24 #include <linux/module.h>
  25 #include <linux/slab.h>
  26 #include <linux/string.h>
  27
  28 #include <linux/dvb/frontend.h>
  29 #include "dvb_frontend.h"
  30
  31 #include "stb0899_drv.h"
  32 #include "stb0899_priv.h"
  33 #include "stb0899_reg.h"
  34
  35 /* Max transfer size done by I2C transfer functions */
  36 #define MAX_XFER_SIZE  64
  37
  38 static unsigned int verbose = 0;//1;
  39 module_param(verbose, int, 0644);
  40
  41 /* C/N in dB/10, NIRM/NIRL */
  42 static const struct stb0899_tab stb0899_cn_tab[] = {
  43         { 200,  2600 },
  44         { 190,  2700 },
  45         { 180,  2860 },
  46         { 170,  3020 },
  47         { 160,  3210 },
  48         { 150,  3440 },
  49         { 140,  3710 },
  50         { 130,  4010 },
  51         { 120,  4360 },
  52         { 110,  4740 },
  53         { 100,  5190 },
  54         { 90,   5670 },
  55         { 80,   6200 },
  56         { 70,   6770 },
  57         { 60,   7360 },
  58         { 50,   7970 },
  59         { 40,   8250 },
  60         { 30,   9000 },
  61         { 20,   9450 },
  62         { 15,   9600 },
  63 };
  64
  65 /* DVB-S AGCIQ_VALUE vs. signal level in dBm/10.
  66  * As measured, connected to a modulator.
  67  * -8.0 to -50.0 dBm directly connected,
  68  * -52.0 to -74.8 with extra attenuation.
  69  * Cut-off to AGCIQ_VALUE = 0x80 below -74.8dBm.
  70  * Crude linear extrapolation below -84.8dBm and above -8.0dBm.
  71  */
  72 static const struct stb0899_tab stb0899_dvbsrf_tab[] = {
  73         { -750, -128 },
  74         { -748,  -94 },
  75         { -745,  -92 },
  76         { -735,  -90 },
  77         { -720,  -87 },
  78         { -670,  -77 },
  79         { -640,  -70 },
  80         { -610,  -62 },
  81         { -600,  -60 },
  82         { -590,  -56 },
  83         { -560,  -41 },
  84         { -540,  -25 },
  85         { -530,  -17 },
  86         { -520,  -11 },
  87         { -500,    1 },
  88         { -490,    6 },
  89         { -480,   10 },
  90         { -440,   22 },
  91         { -420,   27 },
  92         { -400,   31 },
  93         { -380,   34 },
  94         { -340,   40 },
  95         { -320,   43 },
  96         { -280,   48 },
  97         { -250,   52 },
  98         { -230,   55 },
  99         { -180,   61 },
 100         { -140,   66 },
 101         {  -90,   73 },
 102         {  -80,   74 },
 103         {  500,  127 }
 104 };
 105
 106 /* DVB-S2 IF_AGC_GAIN vs. signal level in dBm/10.
 107  * As measured, connected to a modulator.
 108  * -8.0 to -50.1 dBm directly connected,
 109  * -53.0 to -76.6 with extra attenuation.
 110  * Cut-off to IF_AGC_GAIN = 0x3fff below -76.6dBm.
 111  * Crude linear extrapolation below -76.6dBm and above -8.0dBm.
 112  */
 113 static const struct stb0899_tab stb0899_dvbs2rf_tab[] = {
 114         {  700,     0 },
 115         {  -80,  3217 },
 116         { -150,  3893 },
 117         { -190,  4217 },
 118         { -240,  4621 },
 119         { -280,  4945 },
 120         { -320,  5273 },
 121         { -350,  5545 },
 122         { -370,  5741 },
 123         { -410,  6147 },
 124         { -450,  6671 },
 125         { -490,  7413 },
 126         { -501,  7665 },
 127         { -530,  8767 },
 128         { -560, 10219 },
 129         { -580, 10939 },
 130         { -590, 11518 },
 131         { -600, 11723 },
 132         { -650, 12659 },
 133         { -690, 13219 },
 134         { -730, 13645 },
 135         { -750, 13909 },
 136         { -766, 14153 },
 137         { -950, 16383 }
 138 };
 139
 140 /* DVB-S2 Es/N0 quant in dB/100 vs read value * 100*/
 141 static struct stb0899_tab stb0899_quant_tab[] = {
 142         {    0,     0 },
 143         {    0,   100 },
 144         {  600,   200 },
 145         {  950,   299 },
 146         { 1200,   398 },
 147         { 1400,   501 },
 148         { 1560,   603 },
 149         { 1690,   700 },
 150         { 1810,   804 },
 151         { 1910,   902 },
 152         { 2000,  1000 },
 153         { 2080,  1096 },
 154         { 2160,  1202 },
 155         { 2230,  1303 },
 156         { 2350,  1496 },
 157         { 2410,  1603 },
 158         { 2460,  1698 },
 159         { 2510,  1799 },
 160         { 2600,  1995 },
 161         { 2650,  2113 },
 162         { 2690,  2213 },
 163         { 2720,  2291 },
 164         { 2760,  2399 },
 165         { 2800,  2512 },
 166         { 2860,  2692 },
 167         { 2930,  2917 },
 168         { 2960,  3020 },
 169         { 3010,  3199 },
 170         { 3040,  3311 },
 171         { 3060,  3388 },
 172         { 3120,  3631 },
 173         { 3190,  3936 },
 174         { 3400,  5012 },
 175         { 3610,  6383 },
 176         { 3800,  7943 },
 177         { 4210, 12735 },
 178         { 4500, 17783 },
 179         { 4690, 22131 },
 180         { 4810, 25410 }
 181 };
 182
 183 /* DVB-S2 Es/N0 estimate in dB/100 vs read value */
 184 static struct stb0899_tab stb0899_est_tab[] = {
 185         {    0,      0 },
 186         {    0,      1 },
 187         {  301,      2 },
 188         { 1204,     16 },
 189         { 1806,     64 },
 190         { 2408,    256 },
 191         { 2709,    512 },
 192         { 3010,   1023 },
 193         { 3311,   2046 },
 194         { 3612,   4093 },
 195         { 3823,   6653 },
 196         { 3913,   8185 },
 197         { 4010,  10233 },
 198         { 4107,  12794 },
 199         { 4214,  16368 },
 200         { 4266,  18450 },
 201         { 4311,  20464 },
 202         { 4353,  22542 },
 203         { 4391,  24604 },
 204         { 4425,  26607 },
 205         { 4457,  28642 },
 206         { 4487,  30690 },
 207         { 4515,  32734 },
 208         { 4612,  40926 },
 209         { 4692,  49204 },
 210         { 4816,  65464 },
 211         { 4913,  81846 },
 212         { 4993,  98401 },
 213         { 5060, 114815 },
 214         { 5118, 131220 },
 215         { 5200, 158489 },
 216         { 5300, 199526 },
 217         { 5400, 251189 },
 218         { 5500, 316228 },
 219         { 5600, 398107 },
 220         { 5720, 524807 },
 221         { 5721, 526017 },
 222 };
 223
 224 static int _stb0899_read_reg(struct stb0899_state *state, unsigned int reg)
 225 {
 226         int ret;
 227
 228         u8 b0[] = { reg >> 8, reg & 0xff };
 229         u8 buf;
 230
 231         struct i2c_msg msg[] = {
 232                 {
 233                         .addr   = state->config->demod_address,
 234                         .flags  = 0,
 235                         .buf    = b0,
 236                         .len    = 2
 237                 },{
 238                         .addr   = state->config->demod_address,
 239                         .flags  = I2C_M_RD,
 240                         .buf    = &buf,
 241                         .len    = 1
 242                 }
 243         };
 244
 245         ret = i2c_transfer(state->i2c, msg, 2);
 246         if (ret != 2) {
 247                 if (ret != -ERESTARTSYS)
 248                         dprintk(state->verbose, FE_ERROR, 1,
 249                                 "Read error, Reg=[0x%02x], Status=%d",
 250                                 reg, ret);
 251
 252                 return ret < 0 ? ret : -EREMOTEIO;
 253         }
 254         if (unlikely(*state->verbose >= FE_DEBUGREG))
 255                 dprintk(state->verbose, FE_ERROR, 1, "Reg=[0x%02x], data=%02x",
 256                         reg, buf);
 257
 258         return (unsigned int)buf;
 259 }
 260
 261 int stb0899_read_reg(struct stb0899_state *state, unsigned int reg)
 262 {
 263         int result;
 264
 265         result = _stb0899_read_reg(state, reg);
 266         /*
 267          * Bug ID 9:
 268          * access to 0xf2xx/0xf6xx
 269          * must be followed by read from 0xf2ff/0xf6ff.
 270          */
 271         if ((reg != 0xf2ff) && (reg != 0xf6ff) &&
 272             (((reg & 0xff00) == 0xf200) || ((reg & 0xff00) == 0xf600)))
 273                 _stb0899_read_reg(state, (reg | 0x00ff));
 274
 275         return result;
 276 }
 277
 278 u32 _stb0899_read_s2reg(struct stb0899_state *state,
 279                         u32 stb0899_i2cdev,
 280                         u32 stb0899_base_addr,
 281                         u16 stb0899_reg_offset)
 282 {
 283         int status;
 284         u32 data;
 285         u8 buf[7] = { 0 };
 286         u16 tmpaddr;
 287
 288         u8 buf_0[] = {
 289                 GETBYTE(stb0899_i2cdev, BYTE1),         /* 0xf3 S2 Base Address (MSB)   */
 290                 GETBYTE(stb0899_i2cdev, BYTE0),         /* 0xfc S2 Base Address (LSB)   */
 291                 GETBYTE(stb0899_base_addr, BYTE0),      /* 0x00 Base Address (LSB)      */
 292                 GETBYTE(stb0899_base_addr, BYTE1),      /* 0x04 Base Address (LSB)      */
 293                 GETBYTE(stb0899_base_addr, BYTE2),      /* 0x00 Base Address (MSB)      */
 294                 GETBYTE(stb0899_base_addr, BYTE3),      /* 0x00 Base Address (MSB)      */
 295         };
 296         u8 buf_1[] = {
 297                 0x00,   /* 0xf3 Reg Offset      */
 298                 0x00,   /* 0x44 Reg Offset      */
 299         };
 300
 301         struct i2c_msg msg_0 = {
 302                 .addr   = state->config->demod_address,
 303                 .flags  = 0,
 304                 .buf    = buf_0,
 305                 .len    = 6
 306         };
 307
 308         struct i2c_msg msg_1 = {
 309                 .addr   = state->config->demod_address,
 310                 .flags  = 0,
 311                 .buf    = buf_1,
 312                 .len    = 2
 313         };
 314
 315         struct i2c_msg msg_r = {
 316                 .addr   = state->config->demod_address,
 317                 .flags  = I2C_M_RD,
 318                 .buf    = buf,
 319                 .len    = 4
 320         };
 321
 322         tmpaddr = stb0899_reg_offset & 0xff00;
 323         if (!(stb0899_reg_offset & 0x8))
 324                 tmpaddr = stb0899_reg_offset | 0x20;
 325
 326         buf_1[0] = GETBYTE(tmpaddr, BYTE1);
 327         buf_1[1] = GETBYTE(tmpaddr, BYTE0);
 328
 329         status = i2c_transfer(state->i2c, &msg_0, 1);
 330         if (status < 1) {
 331                 if (status != -ERESTARTSYS)
 332                         printk(KERN_ERR "%s ERR(1), Device=[0x%04x], Base address=[0x%08x], Offset=[0x%04x], Status=%d\n",
 333                                __func__, stb0899_i2cdev, stb0899_base_addr, stb0899_reg_offset, status);
 334
 335                 goto err;
 336         }
 337
 338         /* Dummy        */
 339         status = i2c_transfer(state->i2c, &msg_1, 1);
 340         if (status < 1)
 341                 goto err;
 342
 343         status = i2c_transfer(state->i2c, &msg_r, 1);
 344         if (status < 1)
 345                 goto err;
 346
 347         buf_1[0] = GETBYTE(stb0899_reg_offset, BYTE1);
 348         buf_1[1] = GETBYTE(stb0899_reg_offset, BYTE0);
 349
 350         /* Actual       */
 351         status = i2c_transfer(state->i2c, &msg_1, 1);
 352         if (status < 1) {
 353                 if (status != -ERESTARTSYS)
 354                         printk(KERN_ERR "%s ERR(2), Device=[0x%04x], Base address=[0x%08x], Offset=[0x%04x], Status=%d\n",
 355                                __func__, stb0899_i2cdev, stb0899_base_addr, stb0899_reg_offset, status);
 356                 goto err;
 357         }
 358
 359         status = i2c_transfer(state->i2c, &msg_r, 1);
 360         if (status < 1) {
 361                 if (status != -ERESTARTSYS)
 362                         printk(KERN_ERR "%s ERR(3), Device=[0x%04x], Base address=[0x%08x], Offset=[0x%04x], Status=%d\n",
 363                                __func__, stb0899_i2cdev, stb0899_base_addr, stb0899_reg_offset, status);
 364                 return status < 0 ? status : -EREMOTEIO;
 365         }
 366
 367         data = MAKEWORD32(buf[3], buf[2], buf[1], buf[0]);
 368         if (unlikely(*state->verbose >= FE_DEBUGREG))
 369                 printk(KERN_DEBUG "%s Device=[0x%04x], Base address=[0x%08x], Offset=[0x%04x], Data=[0x%08x]\n",
 370                        __func__, stb0899_i2cdev, stb0899_base_addr, stb0899_reg_offset, data);
 371
 372         return data;
 373
 374 err:
 375         return status < 0 ? status : -EREMOTEIO;
 376 }
 377
 378 int stb0899_write_s2reg(struct stb0899_state *state,
 379                         u32 stb0899_i2cdev,
 380                         u32 stb0899_base_addr,
 381                         u16 stb0899_reg_offset,
 382                         u32 stb0899_data)
 383 {
 384         int status;
 385
 386         /* Base Address Setup   */
 387         u8 buf_0[] = {
 388                 GETBYTE(stb0899_i2cdev, BYTE1),         /* 0xf3 S2 Base Address (MSB)   */
 389                 GETBYTE(stb0899_i2cdev, BYTE0),         /* 0xfc S2 Base Address (LSB)   */
 390                 GETBYTE(stb0899_base_addr, BYTE0),      /* 0x00 Base Address (LSB)      */
 391                 GETBYTE(stb0899_base_addr, BYTE1),      /* 0x04 Base Address (LSB)      */
 392                 GETBYTE(stb0899_base_addr, BYTE2),      /* 0x00 Base Address (MSB)      */
 393                 GETBYTE(stb0899_base_addr, BYTE3),      /* 0x00 Base Address (MSB)      */
 394         };
 395         u8 buf_1[] = {
 396                 0x00,   /* 0xf3 Reg Offset      */
 397                 0x00,   /* 0x44 Reg Offset      */
 398                 0x00,   /* data                 */
 399                 0x00,   /* data                 */
 400                 0x00,   /* data                 */
 401                 0x00,   /* data                 */
 402         };
 403
 404         struct i2c_msg msg_0 = {
 405                 .addr   = state->config->demod_address,
 406                 .flags  = 0,
 407                 .buf    = buf_0,
 408                 .len    = 6
 409         };
 410
 411         struct i2c_msg msg_1 = {
 412                 .addr   = state->config->demod_address,
 413                 .flags  = 0,
 414                 .buf    = buf_1,
 415                 .len    = 6
 416         };
 417
 418         buf_1[0] = GETBYTE(stb0899_reg_offset, BYTE1);
 419         buf_1[1] = GETBYTE(stb0899_reg_offset, BYTE0);
 420         buf_1[2] = GETBYTE(stb0899_data, BYTE0);
 421         buf_1[3] = GETBYTE(stb0899_data, BYTE1);
 422         buf_1[4] = GETBYTE(stb0899_data, BYTE2);
 423         buf_1[5] = GETBYTE(stb0899_data, BYTE3);
 424
 425         if (unlikely(*state->verbose >= FE_DEBUGREG))
 426                 printk(KERN_DEBUG "%s Device=[0x%04x], Base Address=[0x%08x], Offset=[0x%04x], Data=[0x%08x]\n",
 427                        __func__, stb0899_i2cdev, stb0899_base_addr, stb0899_reg_offset, stb0899_data);
 428
 429         status = i2c_transfer(state->i2c, &msg_0, 1);
 430         if (unlikely(status < 1)) {
 431                 if (status != -ERESTARTSYS)
 432                         printk(KERN_ERR "%s ERR (1), Device=[0x%04x], Base Address=[0x%08x], Offset=[0x%04x], Data=[0x%08x], status=%d\n",
 433                                __func__, stb0899_i2cdev, stb0899_base_addr, stb0899_reg_offset, stb0899_data, status);
 434                 goto err;
 435         }
 436         status = i2c_transfer(state->i2c, &msg_1, 1);
 437         if (unlikely(status < 1)) {
 438                 if (status != -ERESTARTSYS)
 439                         printk(KERN_ERR "%s ERR (2), Device=[0x%04x], Base Address=[0x%08x], Offset=[0x%04x], Data=[0x%08x], status=%d\n",
 440                                __func__, stb0899_i2cdev, stb0899_base_addr, stb0899_reg_offset, stb0899_data, status);
 441
 442                 return status < 0 ? status : -EREMOTEIO;
 443         }
 444
 445         return 0;
 446
 447 err:
 448         return status < 0 ? status : -EREMOTEIO;
 449 }
 450
 451 int stb0899_read_regs(struct stb0899_state *state, unsigned int reg, u8 *buf, u32 count)
 452 {
 453         int status;
 454
 455         u8 b0[] = { reg >> 8, reg & 0xff };
 456
 457         struct i2c_msg msg[] = {
 458                 {
 459                         .addr   = state->config->demod_address,
 460                         .flags  = 0,
 461                         .buf    = b0,
 462                         .len    = 2
 463                 },{
 464                         .addr   = state->config->demod_address,
 465                         .flags  = I2C_M_RD,
 466                         .buf    = buf,
 467                         .len    = count
 468                 }
 469         };
 470
 471         status = i2c_transfer(state->i2c, msg, 2);
 472         if (status != 2) {
 473                 if (status != -ERESTARTSYS)
 474                         printk(KERN_ERR "%s Read error, Reg=[0x%04x], Count=%u, Status=%d\n",
 475                                __func__, reg, count, status);
 476                 goto err;
 477         }
 478         /*
 479          * Bug ID 9:
 480          * access to 0xf2xx/0xf6xx
 481          * must be followed by read from 0xf2ff/0xf6ff.
 482          */
 483         if ((reg != 0xf2ff) && (reg != 0xf6ff) &&
 484             (((reg & 0xff00) == 0xf200) || ((reg & 0xff00) == 0xf600)))
 485                 _stb0899_read_reg(state, (reg | 0x00ff));
 486
 487         if (unlikely(*state->verbose >= FE_DEBUGREG)) {
 488                 int i;
 489
 490                 printk(KERN_DEBUG "%s [0x%04x]:", __func__, reg);
 491                 for (i = 0; i < count; i++) {
 492                         printk(" %02x", buf[i]);
 493                 }
 494                 printk("\n");
 495         }
 496
 497         return 0;
 498 err:
 499         return status < 0 ? status : -EREMOTEIO;
 500 }
 501
 502 int stb0899_write_regs(struct stb0899_state *state, unsigned int reg, u8 *data, u32 count)
 503 {
 504         int ret;
 505         u8 buf[MAX_XFER_SIZE];
 506         struct i2c_msg i2c_msg = {
 507                 .addr   = state->config->demod_address,
 508                 .flags  = 0,
 509                 .buf    = buf,
 510                 .len    = 2 + count
 511         };
 512
 513         if (2 + count > sizeof(buf)) {
 514                 printk(KERN_WARNING
 515                        "%s: i2c wr reg=%04x: len=%d is too big!\n",
 516                        KBUILD_MODNAME, reg, count);
 517                 return -EINVAL;
 518         }
 519
 520         buf[0] = reg >> 8;
 521         buf[1] = reg & 0xff;
 522         memcpy(&buf[2], data, count);
 523
 524         if (unlikely(*state->verbose >= FE_DEBUGREG)) {
 525                 int i;
 526
 527                 printk(KERN_DEBUG "%s [0x%04x]:", __func__, reg);
 528                 for (i = 0; i < count; i++)
 529                         printk(" %02x", data[i]);
 530                 printk("\n");
 531         }
 532         ret = i2c_transfer(state->i2c, &i2c_msg, 1);
 533
 534         /*
 535          * Bug ID 9:
 536          * access to 0xf2xx/0xf6xx
 537          * must be followed by read from 0xf2ff/0xf6ff.
 538          */
 539         if ((((reg & 0xff00) == 0xf200) || ((reg & 0xff00) == 0xf600)))
 540                 stb0899_read_reg(state, (reg | 0x00ff));
 541
 542         if (ret != 1) {
 543                 if (ret != -ERESTARTSYS)
 544                         dprintk(state->verbose, FE_ERROR, 1, "Reg=[0x%04x], Data=[0x%02x ...], Count=%u, Status=%d",
 545                                 reg, data[0], count, ret);
 546                 return ret < 0 ? ret : -EREMOTEIO;
 547         }
 548
 549         return 0;
 550 }
 551
 552 int stb0899_write_reg(struct stb0899_state *state, unsigned int reg, u8 data)
 553 {
 554         return stb0899_write_regs(state, reg, &data, 1);
 555 }
 556
 557 /*
 558  * stb0899_get_mclk
 559  * Get STB0899 master clock frequency
 560  * ExtClk: external clock frequency (Hz)
 561  */
 562 static u32 stb0899_get_mclk(struct stb0899_state *state)
 563 {
 564         u32 mclk = 0, div = 0;
 565
 566         div = stb0899_read_reg(state, STB0899_NCOARSE);
 567         mclk = (div + 1) * state->config->xtal_freq / 6;
 568         dprintk(state->verbose, FE_DEBUG, 1, "div=%d, mclk=%d", div, mclk);
 569
 570         return mclk;
 571 }
 572
 573 /*
 574  * stb0899_set_mclk
 575  * Set STB0899 master Clock frequency
 576  * Mclk: demodulator master clock
 577  * ExtClk: external clock frequency (Hz)
 578  */
 579 static void stb0899_set_mclk(struct stb0899_state *state, u32 Mclk)
 580 {
 581         struct stb0899_internal *internal = &state->internal;
 582         u8 mdiv = 0;
 583
 584         dprintk(state->verbose, FE_DEBUG, 1, "state->config=%p", state->config);
 585         mdiv = ((6 * Mclk) / state->config->xtal_freq) - 1;
 586         dprintk(state->verbose, FE_DEBUG, 1, "mdiv=%d", mdiv);
 587
 588         stb0899_write_reg(state, STB0899_NCOARSE, mdiv);
 589         internal->master_clk = stb0899_get_mclk(state);
 590
 591         dprintk(state->verbose, FE_DEBUG, 1, "MasterCLOCK=%d", internal->master_clk);
 592 }
 593
 594 static int stb0899_postproc(struct stb0899_state *state, u8 ctl, int enable)
 595 {
 596         struct stb0899_config *config           = state->config;
 597         const struct stb0899_postproc *postproc = config->postproc;
 598
 599         /* post process event */
 600         if (postproc) {
 601                 if (enable) {
 602                         if (postproc[ctl].level == STB0899_GPIOPULLUP)
 603                                 stb0899_write_reg(state, postproc[ctl].gpio, 0x02);
 604                         else
 605                                 stb0899_write_reg(state, postproc[ctl].gpio, 0x82);
 606                 } else {
 607                         if (postproc[ctl].level == STB0899_GPIOPULLUP)
 608                                 stb0899_write_reg(state, postproc[ctl].gpio, 0x82);
 609                         else
 610                                 stb0899_write_reg(state, postproc[ctl].gpio, 0x02);
 611                 }
 612         }
 613         return 0;
 614 }
 615
 616 static void stb0899_release(struct dvb_frontend *fe)
 617 {
 618         struct stb0899_state *state = fe->demodulator_priv;
 619
 620         dprintk(state->verbose, FE_DEBUG, 1, "Release Frontend");
 621         /* post process event */
 622         stb0899_postproc(state, STB0899_POSTPROC_GPIO_POWER, 0);
 623         kfree(state);
 624 }
 625
 626 /*
 627  * stb0899_get_alpha
 628  * return: rolloff
 629  */
 630 static int stb0899_get_alpha(struct stb0899_state *state)
 631 {
 632         u8 mode_coeff;
 633
 634         mode_coeff = stb0899_read_reg(state, STB0899_DEMOD);
 635
 636         if (STB0899_GETFIELD(MODECOEFF, mode_coeff) == 1)
 637                 return 20;
 638         else
 639                 return 35;
 640 }
 641
 642 /*
 643  * stb0899_init_calc
 644  */
 645 static void stb0899_init_calc(struct stb0899_state *state)
 646 {
 647         struct stb0899_internal *internal = &state->internal;
 648         int master_clk;
 649         u8 agc[2];
 650         u32 reg;
 651
 652         /* Read registers (in burst mode)       */
 653         stb0899_read_regs(state, STB0899_AGC1REF, agc, 2); /* AGC1R and AGC2O   */
 654
 655         /* Initial calculations */
 656         master_clk                      = stb0899_get_mclk(state);
 657         internal->t_agc1                = 0;
 658         internal->t_agc2                = 0;
 659         internal->master_clk            = master_clk;
 660         internal->mclk                  = master_clk / 65536L;
 661         internal->rolloff               = stb0899_get_alpha(state);
 662
 663         /* DVBS2 Initial calculations   */
 664         /* Set AGC value to the middle  */
 665         internal->agc_gain              = 8154;
 666         reg = STB0899_READ_S2REG(STB0899_S2DEMOD, IF_AGC_CNTRL);
 667         STB0899_SETFIELD_VAL(IF_GAIN_INIT, reg, internal->agc_gain);
 668         stb0899_write_s2reg(state, STB0899_S2DEMOD, STB0899_BASE_IF_AGC_CNTRL, STB0899_OFF0_IF_AGC_CNTRL, reg);
 669
 670         reg = STB0899_READ_S2REG(STB0899_S2DEMOD, RRC_ALPHA);
 671         internal->rrc_alpha             = STB0899_GETFIELD(RRC_ALPHA, reg);
 672
 673         internal->center_freq           = 0;
 674         internal->av_frame_coarse       = 10;
 675         internal->av_frame_fine         = 20;
 676         internal->step_size             = 2;
 677 /*
 678         if ((pParams->SpectralInv == FE_IQ_NORMAL) || (pParams->SpectralInv == FE_IQ_AUTO))
 679                 pParams->IQLocked = 0;
 680         else
 681                 pParams->IQLocked = 1;
 682 */
 683 }
 684
 685 static int stb0899_wait_diseqc_fifo_empty(struct stb0899_state *state, int timeout)
 686 {
 687         u8 reg = 0;
 688         unsigned long start = jiffies;
 689
 690         while (1) {
 691                 reg = stb0899_read_reg(state, STB0899_DISSTATUS);
 692                 if (!STB0899_GETFIELD(FIFOFULL, reg))
 693                         break;
 694                 if ((jiffies - start) > timeout) {
 695                         dprintk(state->verbose, FE_ERROR, 1, "timed out !!");
 696                         return -ETIMEDOUT;
 697                 }
 698         }
 699
 700         return 0;
 701 }
 702
 703 static int stb0899_send_diseqc_msg(struct dvb_frontend *fe, struct dvb_diseqc_master_cmd *cmd)
 704 {
 705         struct stb0899_state *state = fe->demodulator_priv;
 706         u8 reg, i;
 707
 708         if (cmd->msg_len > 8)
 709                 return -EINVAL;
 710
 711         /* enable FIFO precharge        */
 712         reg = stb0899_read_reg(state, STB0899_DISCNTRL1);
 713         STB0899_SETFIELD_VAL(DISPRECHARGE, reg, 1);
 714         stb0899_write_reg(state, STB0899_DISCNTRL1, reg);
 715         for (i = 0; i < cmd->msg_len; i++) {
 716                 /* wait for FIFO empty  */
 717                 if (stb0899_wait_diseqc_fifo_empty(state, 100) < 0)
 718                         return -ETIMEDOUT;
 719
 720                 stb0899_write_reg(state, STB0899_DISFIFO, cmd->msg[i]);
 721         }
 722         reg = stb0899_read_reg(state, STB0899_DISCNTRL1);
 723         STB0899_SETFIELD_VAL(DISPRECHARGE, reg, 0);
 724         stb0899_write_reg(state, STB0899_DISCNTRL1, reg);
 725         msleep(100);
 726         return 0;
 727 }
 728
 729 static int stb0899_wait_diseqc_rxidle(struct stb0899_state *state, int timeout)
 730 {
 731         u8 reg = 0;
 732         unsigned long start = jiffies;
 733
 734         while (!STB0899_GETFIELD(RXEND, reg)) {
 735                 reg = stb0899_read_reg(state, STB0899_DISRX_ST0);
 736                 if (jiffies - start > timeout) {
 737                         dprintk(state->verbose, FE_ERROR, 1, "timed out!!");
 738                         return -ETIMEDOUT;
 739                 }
 740                 msleep(10);
 741         }
 742
 743         return 0;
 744 }
 745
 746 static int stb0899_recv_slave_reply(struct dvb_frontend *fe, struct dvb_diseqc_slave_reply *reply)
 747 {
 748         struct stb0899_state *state = fe->demodulator_priv;
 749         u8 reg, length = 0, i;
 750         int result;
 751
 752         if (stb0899_wait_diseqc_rxidle(state, 100) < 0)
 753                 return -ETIMEDOUT;
 754
 755         reg = stb0899_read_reg(state, STB0899_DISRX_ST0);
 756         if (STB0899_GETFIELD(RXEND, reg)) {
 757
 758                 reg = stb0899_read_reg(state, STB0899_DISRX_ST1);
 759                 length = STB0899_GETFIELD(FIFOBYTENBR, reg);
 760
 761                 if (length > sizeof (reply->msg)) {
 762                         result = -EOVERFLOW;
 763                         goto exit;
 764                 }
 765                 reply->msg_len = length;
 766
 767                 /* extract data */
 768                 for (i = 0; i < length; i++)
 769                         reply->msg[i] = stb0899_read_reg(state, STB0899_DISFIFO);
 770         }
 771
 772         return 0;
 773 exit:
 774
 775         return result;
 776 }
 777
 778 static int stb0899_wait_diseqc_txidle(struct stb0899_state *state, int timeout)
 779 {
 780         u8 reg = 0;
 781         unsigned long start = jiffies;
 782
 783         while (!STB0899_GETFIELD(TXIDLE, reg)) {
 784                 reg = stb0899_read_reg(state, STB0899_DISSTATUS);
 785                 if (jiffies - start > timeout) {
 786                         dprintk(state->verbose, FE_ERROR, 1, "timed out!!");
 787                         return -ETIMEDOUT;
 788                 }
 789                 msleep(10);
 790         }
 791         return 0;
 792 }
 793
 794 static int stb0899_send_diseqc_burst(struct dvb_frontend *fe, fe_sec_mini_cmd_t burst)
 795 {
 796         struct stb0899_state *state = fe->demodulator_priv;
 797         u8 reg, old_state;
 798
 799         /* wait for diseqc idle */
 800         if (stb0899_wait_diseqc_txidle(state, 100) < 0)
 801                 return -ETIMEDOUT;
 802
 803         reg = stb0899_read_reg(state, STB0899_DISCNTRL1);
 804         old_state = reg;
 805         /* set to burst mode    */
 806         STB0899_SETFIELD_VAL(DISEQCMODE, reg, 0x03);
 807         STB0899_SETFIELD_VAL(DISPRECHARGE, reg, 0x01);
 808         stb0899_write_reg(state, STB0899_DISCNTRL1, reg);
 809         switch (burst) {
 810         case SEC_MINI_A:
 811                 /* unmodulated  */
 812                 stb0899_write_reg(state, STB0899_DISFIFO, 0x00);
 813                 break;
 814         case SEC_MINI_B:
 815                 /* modulated    */
 816                 stb0899_write_reg(state, STB0899_DISFIFO, 0xff);
 817                 break;
 818         }
 819         reg = stb0899_read_reg(state, STB0899_DISCNTRL1);
 820         STB0899_SETFIELD_VAL(DISPRECHARGE, reg, 0x00);
 821         stb0899_write_reg(state, STB0899_DISCNTRL1, reg);
 822         /* wait for diseqc idle */
 823         if (stb0899_wait_diseqc_txidle(state, 100) < 0)
 824                 return -ETIMEDOUT;
 825
 826         /* restore state        */
 827         stb0899_write_reg(state, STB0899_DISCNTRL1, old_state);
 828
 829         return 0;
 830 }
 831
 832 static int stb0899_diseqc_init(struct stb0899_state *state)
 833 {
 834 /*
 835         struct dvb_diseqc_slave_reply rx_data;
 836 */
 837         u8 f22_tx, reg;
 838
 839         u32 mclk, tx_freq = 22000;/* count = 0, i; */
 840         reg = stb0899_read_reg(state, STB0899_DISCNTRL2);
 841         STB0899_SETFIELD_VAL(ONECHIP_TRX, reg, 0);
 842         stb0899_write_reg(state, STB0899_DISCNTRL2, reg);
 843
 844         /* disable Tx spy       */
 845         reg = stb0899_read_reg(state, STB0899_DISCNTRL1);
 846         STB0899_SETFIELD_VAL(DISEQCRESET, reg, 1);
 847         stb0899_write_reg(state, STB0899_DISCNTRL1, reg);
 848
 849         reg = stb0899_read_reg(state, STB0899_DISCNTRL1);
 850         STB0899_SETFIELD_VAL(DISEQCRESET, reg, 0);
 851         stb0899_write_reg(state, STB0899_DISCNTRL1, reg);
 852
 853         mclk = stb0899_get_mclk(state);
 854         f22_tx = mclk / (tx_freq * 32);
 855         stb0899_write_reg(state, STB0899_DISF22, f22_tx); /* DiSEqC Tx freq     */
 856         state->rx_freq = 20000;
 857
 858         return 0;
 859 }
 860
 861 static int stb0899_sleep(struct dvb_frontend *fe)
 862 {
 863         struct stb0899_state *state = fe->demodulator_priv;
 864 /*
 865         u8 reg;
 866 */
 867         dprintk(state->verbose, FE_DEBUG, 1, "Going to Sleep .. (Really tired .. :-))");
 868         /* post process event */
 869         stb0899_postproc(state, STB0899_POSTPROC_GPIO_POWER, 0);
 870
 871         return 0;
 872 }
 873
 874 static int stb0899_wakeup(struct dvb_frontend *fe)
 875 {
 876         int rc;
 877         struct stb0899_state *state = fe->demodulator_priv;
 878
 879         if ((rc = stb0899_write_reg(state, STB0899_SYNTCTRL, STB0899_SELOSCI)))
 880                 return rc;
 881         /* Activate all clocks; DVB-S2 registers are inaccessible otherwise. */
 882         if ((rc = stb0899_write_reg(state, STB0899_STOPCLK1, 0x00)))
 883                 return rc;
 884         if ((rc = stb0899_write_reg(state, STB0899_STOPCLK2, 0x00)))
 885                 return rc;
 886
 887         /* post process event */
 888         stb0899_postproc(state, STB0899_POSTPROC_GPIO_POWER, 1);
 889
 890         return 0;
 891 }
 892
 893 static int stb0899_init(struct dvb_frontend *fe)
 894 {
 895         int i;
 896         struct stb0899_state *state = fe->demodulator_priv;
 897         struct stb0899_config *config = state->config;
 898
 899         dprintk(state->verbose, FE_DEBUG, 1, "Initializing STB0899 ... ");
 900
 901         /* init device          */
 902         dprintk(state->verbose, FE_DEBUG, 1, "init device");
 903         for (i = 0; config->init_dev[i].address != 0xffff; i++)
 904                 stb0899_write_reg(state, config->init_dev[i].address, config->init_dev[i].data);
 905
 906         dprintk(state->verbose, FE_DEBUG, 1, "init S2 demod");
 907         /* init S2 demod        */
 908         for (i = 0; config->init_s2_demod[i].offset != 0xffff; i++)
 909                 stb0899_write_s2reg(state, STB0899_S2DEMOD,
 910                                     config->init_s2_demod[i].base_address,
 911                                     config->init_s2_demod[i].offset,
 912                                     config->init_s2_demod[i].data);
 913
 914         dprintk(state->verbose, FE_DEBUG, 1, "init S1 demod");
 915         /* init S1 demod        */
 916         for (i = 0; config->init_s1_demod[i].address != 0xffff; i++)
 917                 stb0899_write_reg(state, config->init_s1_demod[i].address, config->init_s1_demod[i].data);
 918
 919         dprintk(state->verbose, FE_DEBUG, 1, "init S2 FEC");
 920         /* init S2 fec          */
 921         for (i = 0; config->init_s2_fec[i].offset != 0xffff; i++)
 922                 stb0899_write_s2reg(state, STB0899_S2FEC,
 923                                     config->init_s2_fec[i].base_address,
 924                                     config->init_s2_fec[i].offset,
 925                                     config->init_s2_fec[i].data);
 926
 927         dprintk(state->verbose, FE_DEBUG, 1, "init TST");
 928         /* init test            */
 929         for (i = 0; config->init_tst[i].address != 0xffff; i++)
 930                 stb0899_write_reg(state, config->init_tst[i].address, config->init_tst[i].data);
 931
 932         stb0899_init_calc(state);
 933         stb0899_diseqc_init(state);
 934
 935         return 0;
 936 }
 937
 938 static int stb0899_table_lookup(const struct stb0899_tab *tab, int max, int val)
 939 {
 940         int res = 0;
 941         int min = 0, med;
 942
 943         if (val < tab[min].read)
 944                 res = tab[min].real;
 945         else if (val >= tab[max].read)
 946                 res = tab[max].real;
 947         else {
 948                 while ((max - min) > 1) {
 949                         med = (max + min) / 2;
 950                         if (val >= tab[min].read && val < tab[med].read)
 951                                 max = med;
 952                         else
 953                                 min = med;
 954                 }
 955                 res = ((val - tab[min].read) *
 956                        (tab[max].real - tab[min].real) /
 957                        (tab[max].read - tab[min].read)) +
 958                         tab[min].real;
 959         }
 960
 961         return res;
 962 }
 963
 964 static int stb0899_read_signal_strength(struct dvb_frontend *fe, u16 *strength)
 965 {
 966         struct stb0899_state *state             = fe->demodulator_priv;
 967         struct stb0899_internal *internal       = &state->internal;
 968
 969         int val;
 970         u32 reg;
 971         *strength = 0;
 972         switch (state->delsys) {
 973         case SYS_DVBS:
 974         case SYS_DSS:
 975                 if (internal->lock) {
 976                         reg  = stb0899_read_reg(state, STB0899_VSTATUS);
 977                         if (STB0899_GETFIELD(VSTATUS_LOCKEDVIT, reg)) {
 978
 979                                 reg = stb0899_read_reg(state, STB0899_AGCIQIN);
 980                                 val = (s32)(s8)STB0899_GETFIELD(AGCIQVALUE, reg);
 981
 982                                 *strength = stb0899_table_lookup(stb0899_dvbsrf_tab, ARRAY_SIZE(stb0899_dvbsrf_tab) - 1, val);
 983                                 *strength += 750;
 984                                 dprintk(state->verbose, FE_DEBUG, 1, "AGCIQVALUE = 0x%02x, C = %d * 0.1 dBm",
 985                                         val & 0xff, *strength);
 986                         }
 987                 }
 988                 break;
 989         case SYS_DVBS2:
 990                 if (internal->lock) {
 991                         reg = STB0899_READ_S2REG(STB0899_S2DEMOD, IF_AGC_GAIN);
 992                         val = STB0899_GETFIELD(IF_AGC_GAIN, reg);
 993
 994                         *strength = stb0899_table_lookup(stb0899_dvbs2rf_tab, ARRAY_SIZE(stb0899_dvbs2rf_tab) - 1, val);
 995                         *strength += 950;
 996                         dprintk(state->verbose, FE_DEBUG, 1, "IF_AGC_GAIN = 0x%04x, C = %d * 0.1 dBm",
 997                                 val & 0x3fff, *strength);
 998                 }
 999                 break;
1000         default:
1001                 dprintk(state->verbose, FE_DEBUG, 1, "Unsupported delivery system");
1002                 return -EINVAL;
1003         }
1004
1005         return 0;
1006 }
1007
1008 static int stb0899_read_snr(struct dvb_frontend *fe, u16 *snr)
1009 {
1010         struct stb0899_state *state             = fe->demodulator_priv;
1011         struct stb0899_internal *internal       = &state->internal;
1012
1013         unsigned int val, quant, quantn = -1, est, estn = -1;
1014         u8 buf[2];
1015         u32 reg;
1016
1017         *snr = 0;
1018         reg  = stb0899_read_reg(state, STB0899_VSTATUS);
1019         switch (state->delsys) {
1020         case SYS_DVBS:
1021         case SYS_DSS:
1022                 if (internal->lock) {
1023                         if (STB0899_GETFIELD(VSTATUS_LOCKEDVIT, reg)) {
1024
1025                                 stb0899_read_regs(state, STB0899_NIRM, buf, 2);
1026                                 val = MAKEWORD16(buf[0], buf[1]);
1027
1028                                 *snr = stb0899_table_lookup(stb0899_cn_tab, ARRAY_SIZE(stb0899_cn_tab) - 1, val);
1029                                 dprintk(state->verbose, FE_DEBUG, 1, "NIR = 0x%02x%02x = %u, C/N = %d * 0.1 dBm\n",
1030                                         buf[0], buf[1], val, *snr);
1031                         }
1032                 }
1033                 break;
1034         case SYS_DVBS2:
1035                 if (internal->lock) {
1036                         reg = STB0899_READ_S2REG(STB0899_S2DEMOD, UWP_CNTRL1);
1037                         quant = STB0899_GETFIELD(UWP_ESN0_QUANT, reg);
1038                         reg = STB0899_READ_S2REG(STB0899_S2DEMOD, UWP_STAT2);
1039                         est = STB0899_GETFIELD(ESN0_EST, reg);
1040                         if (est == 1)
1041                                 val = 301; /* C/N = 30.1 dB */
1042                         else if (est == 2)
1043                                 val = 270; /* C/N = 27.0 dB */
1044                         else {
1045                                 /* quantn = 100 * log(quant^2) */
1046                                 quantn = stb0899_table_lookup(stb0899_quant_tab, ARRAY_SIZE(stb0899_quant_tab) - 1, quant * 100);
1047                                 /* estn = 100 * log(est) */
1048                                 estn = stb0899_table_lookup(stb0899_est_tab, ARRAY_SIZE(stb0899_est_tab) - 1, est);
1049                                 /* snr(dBm/10) = -10*(log(est)-log(quant^2)) => snr(dBm/10) = (100*log(quant^2)-100*log(est))/10 */
1050                                 val = (quantn - estn) / 10;
1051                         }
1052                         *snr = val;
1053                         dprintk(state->verbose, FE_DEBUG, 1, "Es/N0 quant = %d (%d) estimate = %u (%d), C/N = %d * 0.1 dBm",
1054                                 quant, quantn, est, estn, val);
1055                 }
1056                 break;
1057         default:
1058                 dprintk(state->verbose, FE_DEBUG, 1, "Unsupported delivery system");
1059                 return -EINVAL;
1060         }
1061
1062         return 0;
1063 }
1064
1065 static int stb0899_read_status(struct dvb_frontend *fe, enum fe_status *status)
1066 {
1067         struct stb0899_state *state             = fe->demodulator_priv;
1068         struct stb0899_internal *internal       = &state->internal;
1069         u8 reg;
1070         *status = 0;
1071
1072         switch (state->delsys) {
1073         case SYS_DVBS:
1074         case SYS_DSS:
1075                 dprintk(state->verbose, FE_DEBUG, 1, "Delivery system DVB-S/DSS");
1076                 if (internal->lock) {
1077                         reg  = stb0899_read_reg(state, STB0899_VSTATUS);
1078                         if (STB0899_GETFIELD(VSTATUS_LOCKEDVIT, reg)) {
1079                                 dprintk(state->verbose, FE_DEBUG, 1, "--------> FE_HAS_CARRIER | FE_HAS_LOCK");
1080                                 *status |= FE_HAS_SIGNAL | FE_HAS_CARRIER | FE_HAS_LOCK;
1081
1082                                 reg = stb0899_read_reg(state, STB0899_PLPARM);
1083                                 if (STB0899_GETFIELD(VITCURPUN, reg)) {
1084                                         dprintk(state->verbose, FE_DEBUG, 1, "--------> FE_HAS_VITERBI | FE_HAS_SYNC");
1085                                         *status |= FE_HAS_VITERBI | FE_HAS_SYNC;
1086                                         /* post process event */
1087                                         stb0899_postproc(state, STB0899_POSTPROC_GPIO_LOCK, 1);
1088                                 }
1089                         }
1090                 }
1091                 break;
1092         case SYS_DVBS2:
1093                 dprintk(state->verbose, FE_DEBUG, 1, "Delivery system DVB-S2");
1094                 if (internal->lock) {
1095                         reg = STB0899_READ_S2REG(STB0899_S2DEMOD, DMD_STAT2);
1096                         if (STB0899_GETFIELD(UWP_LOCK, reg) && STB0899_GETFIELD(CSM_LOCK, reg)) {
1097                                 *status |= FE_HAS_CARRIER;
1098                                 dprintk(state->verbose, FE_DEBUG, 1,
1099                                         "UWP & CSM Lock ! ---> DVB-S2 FE_HAS_CARRIER");
1100
1101                                 reg = stb0899_read_reg(state, STB0899_CFGPDELSTATUS1);
1102                                 if (STB0899_GETFIELD(CFGPDELSTATUS_LOCK, reg)) {
1103                                         *status |= FE_HAS_LOCK;
1104                                         dprintk(state->verbose, FE_DEBUG, 1,
1105                                                 "Packet Delineator Locked ! -----> DVB-S2 FE_HAS_LOCK");
1106
1107                                 }
1108                                 if (STB0899_GETFIELD(CONTINUOUS_STREAM, reg)) {
1109                                         *status |= FE_HAS_VITERBI;
1110                                         dprintk(state->verbose, FE_DEBUG, 1,
1111                                                 "Packet Delineator found VITERBI ! -----> DVB-S2 FE_HAS_VITERBI");
1112                                 }
1113                                 if (STB0899_GETFIELD(ACCEPTED_STREAM, reg)) {
1114                                         *status |= FE_HAS_SYNC;
1115                                         dprintk(state->verbose, FE_DEBUG, 1,
1116                                                 "Packet Delineator found SYNC ! -----> DVB-S2 FE_HAS_SYNC");
1117                                         /* post process event */
1118                                         stb0899_postproc(state, STB0899_POSTPROC_GPIO_LOCK, 1);
1119                                 }
1120                         }
1121                 }
1122                 break;
1123         default:
1124                 dprintk(state->verbose, FE_DEBUG, 1, "Unsupported delivery system");
1125                 return -EINVAL;
1126         }
1127         return 0;
1128 }
1129
1130 /*
1131  * stb0899_get_error
1132  * viterbi error for DVB-S/DSS
1133  * packet error for DVB-S2
1134  * Bit Error Rate or Packet Error Rate * 10 ^ 7
1135  */
1136 static int stb0899_read_ber(struct dvb_frontend *fe, u32 *ber)
1137 {
1138         struct stb0899_state *state             = fe->demodulator_priv;
1139         struct stb0899_internal *internal       = &state->internal;
1140
1141         u8  lsb, msb;
1142
1143         *ber = 0;
1144
1145         switch (state->delsys) {
1146         case SYS_DVBS:
1147         case SYS_DSS:
1148                 if (internal->lock) {
1149                         lsb = stb0899_read_reg(state, STB0899_ECNT1L);
1150                         msb = stb0899_read_reg(state, STB0899_ECNT1M);
1151                         *ber = MAKEWORD16(msb, lsb);
1152                         /* Viterbi Check        */
1153                         if (STB0899_GETFIELD(VSTATUS_PRFVIT, internal->v_status)) {
1154                                 /* Error Rate           */
1155                                 *ber *= 9766;
1156                                 /* ber = ber * 10 ^ 7   */
1157                                 *ber /= (-1 + (1 << (2 * STB0899_GETFIELD(NOE, internal->err_ctrl))));
1158                                 *ber /= 8;
1159                         }
1160                 }
1161                 break;
1162         case SYS_DVBS2:
1163                 if (internal->lock) {
1164                         lsb = stb0899_read_reg(state, STB0899_ECNT1L);
1165                         msb = stb0899_read_reg(state, STB0899_ECNT1M);
1166                         *ber = MAKEWORD16(msb, lsb);
1167                         /* ber = ber * 10 ^ 7   */
1168                         *ber *= 10000000;
1169                         *ber /= (-1 + (1 << (4 + 2 * STB0899_GETFIELD(NOE, internal->err_ctrl))));
1170                 }
1171                 break;
1172         default:
1173                 dprintk(state->verbose, FE_DEBUG, 1, "Unsupported delivery system");
1174                 return -EINVAL;
1175         }
1176
1177         return 0;
1178 }
1179
1180 static int stb0899_set_voltage(struct dvb_frontend *fe, fe_sec_voltage_t voltage)
1181 {
1182         struct stb0899_state *state = fe->demodulator_priv;
1183
1184         switch (voltage) {
1185         case SEC_VOLTAGE_13:
1186                 stb0899_write_reg(state, STB0899_GPIO00CFG, 0x82);
1187                 stb0899_write_reg(state, STB0899_GPIO01CFG, 0x02);
1188                 stb0899_write_reg(state, STB0899_GPIO02CFG, 0x00);
1189                 break;
1190         case SEC_VOLTAGE_18:
1191                 stb0899_write_reg(state, STB0899_GPIO00CFG, 0x02);
1192                 stb0899_write_reg(state, STB0899_GPIO01CFG, 0x02);
1193                 stb0899_write_reg(state, STB0899_GPIO02CFG, 0x82);
1194                 break;
1195         case SEC_VOLTAGE_OFF:
1196                 stb0899_write_reg(state, STB0899_GPIO00CFG, 0x82);
1197                 stb0899_write_reg(state, STB0899_GPIO01CFG, 0x82);
1198                 stb0899_write_reg(state, STB0899_GPIO02CFG, 0x82);
1199                 break;
1200         default:
1201                 return -EINVAL;
1202         }
1203
1204         return 0;
1205 }
1206
1207 static int stb0899_set_tone(struct dvb_frontend *fe, fe_sec_tone_mode_t tone)
1208 {
1209         struct stb0899_state *state = fe->demodulator_priv;
1210         struct stb0899_internal *internal = &state->internal;
1211
1212         u8 div, reg;
1213
1214         /* wait for diseqc idle */
1215         if (stb0899_wait_diseqc_txidle(state, 100) < 0)
1216                 return -ETIMEDOUT;
1217
1218         switch (tone) {
1219         case SEC_TONE_ON:
1220                 div = (internal->master_clk / 100) / 5632;
1221                 div = (div + 5) / 10;
1222                 stb0899_write_reg(state, STB0899_DISEQCOCFG, 0x66);
1223                 reg = stb0899_read_reg(state, STB0899_ACRPRESC);
1224                 STB0899_SETFIELD_VAL(ACRPRESC, reg, 0x03);
1225                 stb0899_write_reg(state, STB0899_ACRPRESC, reg);
1226                 stb0899_write_reg(state, STB0899_ACRDIV1, div);
1227                 break;
1228         case SEC_TONE_OFF:
1229                 stb0899_write_reg(state, STB0899_DISEQCOCFG, 0x20);
1230                 break;
1231         default:
1232                 return -EINVAL;
1233         }
1234         return 0;
1235 }
1236
1237 int stb0899_i2c_gate_ctrl(struct dvb_frontend *fe, int enable)
1238 {
1239         int i2c_stat;
1240         struct stb0899_state *state = fe->demodulator_priv;
1241
1242         i2c_stat = stb0899_read_reg(state, STB0899_I2CRPT);
1243         if (i2c_stat < 0)
1244                 goto err;
1245
1246         if (enable) {
1247                 dprintk(state->verbose, FE_DEBUG, 1, "Enabling I2C Repeater ...");
1248                 i2c_stat |=  STB0899_I2CTON;
1249                 if (stb0899_write_reg(state, STB0899_I2CRPT, i2c_stat) < 0)
1250                         goto err;
1251         } else {
1252                 dprintk(state->verbose, FE_DEBUG, 1, "Disabling I2C Repeater ...");
1253                 i2c_stat &= ~STB0899_I2CTON;
1254                 if (stb0899_write_reg(state, STB0899_I2CRPT, i2c_stat) < 0)
1255                         goto err;
1256         }
1257         return 0;
1258 err:
1259         dprintk(state->verbose, FE_ERROR, 1, "I2C Repeater control failed");
1260         return -EREMOTEIO;
1261 }
1262
1263
1264 static inline void CONVERT32(u32 x, char *str)
1265 {
1266         *str++  = (x >> 24) & 0xff;
1267         *str++  = (x >> 16) & 0xff;
1268         *str++  = (x >>  8) & 0xff;
1269         *str++  = (x >>  0) & 0xff;
1270         *str    = '\0';
1271 }
1272
1273 static int stb0899_get_dev_id(struct stb0899_state *state)
1274 {
1275         u8 chip_id, release;
1276         u16 id;
1277         u32 demod_ver = 0, fec_ver = 0;
1278         char demod_str[5] = { 0 };
1279         char fec_str[5] = { 0 };
1280
1281         id = stb0899_read_reg(state, STB0899_DEV_ID);
1282         dprintk(state->verbose, FE_DEBUG, 1, "ID reg=[0x%02x]", id);
1283         chip_id = STB0899_GETFIELD(CHIP_ID, id);
1284         release = STB0899_GETFIELD(CHIP_REL, id);
1285
1286         dprintk(state->verbose, FE_ERROR, 1, "Device ID=[%d], Release=[%d]",
1287                 chip_id, release);
1288
1289         CONVERT32(STB0899_READ_S2REG(STB0899_S2DEMOD, DMD_CORE_ID), (char *)&demod_str);
1290
1291         demod_ver = STB0899_READ_S2REG(STB0899_S2DEMOD, DMD_VERSION_ID);
1292         dprintk(state->verbose, FE_ERROR, 1, "Demodulator Core ID=[%s], Version=[%d]", (char *) &demod_str, demod_ver);
1293         CONVERT32(STB0899_READ_S2REG(STB0899_S2FEC, FEC_CORE_ID_REG), (char *)&fec_str);
1294         fec_ver = STB0899_READ_S2REG(STB0899_S2FEC, FEC_VER_ID_REG);
1295         if (! (chip_id > 0)) {
1296                 dprintk(state->verbose, FE_ERROR, 1, "couldn't find a STB 0899");
1297
1298                 return -ENODEV;
1299         }
1300         dprintk(state->verbose, FE_ERROR, 1, "FEC Core ID=[%s], Version=[%d]", (char*) &fec_str, fec_ver);
1301
1302         return 0;
1303 }
1304
1305 static void stb0899_set_delivery(struct stb0899_state *state)
1306 {
1307         u8 reg;
1308         u8 stop_clk[2];
1309
1310         stop_clk[0] = stb0899_read_reg(state, STB0899_STOPCLK1);
1311         stop_clk[1] = stb0899_read_reg(state, STB0899_STOPCLK2);
1312
1313         switch (state->delsys) {
1314         case SYS_DVBS:
1315                 dprintk(state->verbose, FE_DEBUG, 1, "Delivery System -- DVB-S");
1316                 /* FECM/Viterbi ON      */
1317                 reg = stb0899_read_reg(state, STB0899_FECM);
1318                 STB0899_SETFIELD_VAL(FECM_RSVD0, reg, 0);
1319                 STB0899_SETFIELD_VAL(FECM_VITERBI_ON, reg, 1);
1320                 stb0899_write_reg(state, STB0899_FECM, reg);
1321
1322                 stb0899_write_reg(state, STB0899_RSULC, 0xb1);
1323                 stb0899_write_reg(state, STB0899_TSULC, 0x40);
1324                 stb0899_write_reg(state, STB0899_RSLLC, 0x42);
1325                 stb0899_write_reg(state, STB0899_TSLPL, 0x12);
1326
1327                 reg = stb0899_read_reg(state, STB0899_TSTRES);
1328                 STB0899_SETFIELD_VAL(FRESLDPC, reg, 1);
1329                 stb0899_write_reg(state, STB0899_TSTRES, reg);
1330
1331                 STB0899_SETFIELD_VAL(STOP_CHK8PSK, stop_clk[0], 1);
1332                 STB0899_SETFIELD_VAL(STOP_CKFEC108, stop_clk[0], 1);
1333                 STB0899_SETFIELD_VAL(STOP_CKFEC216, stop_clk[0], 1);
1334
1335                 STB0899_SETFIELD_VAL(STOP_CKPKDLIN108, stop_clk[1], 1);
1336                 STB0899_SETFIELD_VAL(STOP_CKPKDLIN216, stop_clk[1], 1);
1337
1338                 STB0899_SETFIELD_VAL(STOP_CKINTBUF216, stop_clk[0], 1);
1339                 STB0899_SETFIELD_VAL(STOP_CKCORE216, stop_clk[0], 0);
1340
1341                 STB0899_SETFIELD_VAL(STOP_CKS2DMD108, stop_clk[1], 1);
1342                 break;
1343         case SYS_DVBS2:
1344                 /* FECM/Viterbi OFF     */
1345                 reg = stb0899_read_reg(state, STB0899_FECM);
1346                 STB0899_SETFIELD_VAL(FECM_RSVD0, reg, 0);
1347                 STB0899_SETFIELD_VAL(FECM_VITERBI_ON, reg, 0);
1348                 stb0899_write_reg(state, STB0899_FECM, reg);
1349
1350                 stb0899_write_reg(state, STB0899_RSULC, 0xb1);
1351                 stb0899_write_reg(state, STB0899_TSULC, 0x42);
1352                 stb0899_write_reg(state, STB0899_RSLLC, 0x40);
1353                 stb0899_write_reg(state, STB0899_TSLPL, 0x02);
1354
1355                 reg = stb0899_read_reg(state, STB0899_TSTRES);
1356                 STB0899_SETFIELD_VAL(FRESLDPC, reg, 0);
1357                 stb0899_write_reg(state, STB0899_TSTRES, reg);
1358
1359                 STB0899_SETFIELD_VAL(STOP_CHK8PSK, stop_clk[0], 1);
1360                 STB0899_SETFIELD_VAL(STOP_CKFEC108, stop_clk[0], 0);
1361                 STB0899_SETFIELD_VAL(STOP_CKFEC216, stop_clk[0], 0);
1362
1363                 STB0899_SETFIELD_VAL(STOP_CKPKDLIN108, stop_clk[1], 0);
1364                 STB0899_SETFIELD_VAL(STOP_CKPKDLIN216, stop_clk[1], 0);
1365
1366                 STB0899_SETFIELD_VAL(STOP_CKINTBUF216, stop_clk[0], 0);
1367                 STB0899_SETFIELD_VAL(STOP_CKCORE216, stop_clk[0], 0);
1368
1369                 STB0899_SETFIELD_VAL(STOP_CKS2DMD108, stop_clk[1], 0);
1370                 break;
1371         case SYS_DSS:
1372                 /* FECM/Viterbi ON      */
1373                 reg = stb0899_read_reg(state, STB0899_FECM);
1374                 STB0899_SETFIELD_VAL(FECM_RSVD0, reg, 1);
1375                 STB0899_SETFIELD_VAL(FECM_VITERBI_ON, reg, 1);
1376                 stb0899_write_reg(state, STB0899_FECM, reg);
1377
1378                 stb0899_write_reg(state, STB0899_RSULC, 0xa1);
1379                 stb0899_write_reg(state, STB0899_TSULC, 0x61);
1380                 stb0899_write_reg(state, STB0899_RSLLC, 0x42);
1381
1382                 reg = stb0899_read_reg(state, STB0899_TSTRES);
1383                 STB0899_SETFIELD_VAL(FRESLDPC, reg, 1);
1384                 stb0899_write_reg(state, STB0899_TSTRES, reg);
1385
1386                 STB0899_SETFIELD_VAL(STOP_CHK8PSK, stop_clk[0], 1);
1387                 STB0899_SETFIELD_VAL(STOP_CKFEC108, stop_clk[0], 1);
1388                 STB0899_SETFIELD_VAL(STOP_CKFEC216, stop_clk[0], 1);
1389
1390                 STB0899_SETFIELD_VAL(STOP_CKPKDLIN108, stop_clk[1], 1);
1391                 STB0899_SETFIELD_VAL(STOP_CKPKDLIN216, stop_clk[1], 1);
1392
1393                 STB0899_SETFIELD_VAL(STOP_CKCORE216, stop_clk[0], 0);
1394
1395                 STB0899_SETFIELD_VAL(STOP_CKS2DMD108, stop_clk[1], 1);
1396                 break;
1397         default:
1398                 dprintk(state->verbose, FE_ERROR, 1, "Unsupported delivery system");
1399                 break;
1400         }
1401         STB0899_SETFIELD_VAL(STOP_CKADCI108, stop_clk[0], 0);
1402         stb0899_write_regs(state, STB0899_STOPCLK1, stop_clk, 2);
1403 }
1404
1405 /*
1406  * stb0899_set_iterations
1407  * set the LDPC iteration scale function
1408  */
1409 static void stb0899_set_iterations(struct stb0899_state *state)
1410 {
1411         struct stb0899_internal *internal = &state->internal;
1412         struct stb0899_config *config = state->config;
1413
1414         s32 iter_scale;
1415         u32 reg;
1416
1417         iter_scale = 17 * (internal->master_clk / 1000);
1418         iter_scale += 410000;
1419         iter_scale /= (internal->srate / 1000000);
1420         iter_scale /= 1000;
1421
1422         if (iter_scale > config->ldpc_max_iter)
1423                 iter_scale = config->ldpc_max_iter;
1424
1425         reg = STB0899_READ_S2REG(STB0899_S2FEC, MAX_ITER);
1426         STB0899_SETFIELD_VAL(MAX_ITERATIONS, reg, iter_scale);
1427         stb0899_write_s2reg(state, STB0899_S2FEC, STB0899_BASE_MAX_ITER, STB0899_OFF0_MAX_ITER, reg);
1428 }
1429
1430 static enum dvbfe_search stb0899_search(struct dvb_frontend *fe)
1431 {
1432         struct stb0899_state *state = fe->demodulator_priv;
1433         struct stb0899_params *i_params = &state->params;
1434         struct stb0899_internal *internal = &state->internal;
1435         struct stb0899_config *config = state->config;
1436         struct dtv_frontend_properties *props = &fe->dtv_property_cache;
1437
1438         u32 SearchRange, gain;
1439
1440         i_params->freq  = props->frequency;
1441         i_params->srate = props->symbol_rate;
1442         state->delsys = props->delivery_system;
1443         dprintk(state->verbose, FE_DEBUG, 1, "delivery system=%d", state->delsys);
1444
1445         SearchRange = 10000000;
1446         dprintk(state->verbose, FE_DEBUG, 1, "Frequency=%d, Srate=%d", i_params->freq, i_params->srate);
1447         /* checking Search Range is meaningless for a fixed 3 Mhz                       */
1448         if (INRANGE(i_params->srate, 1000000, 45000000)) {
1449                 dprintk(state->verbose, FE_DEBUG, 1, "Parameters IN RANGE");
1450                 stb0899_set_delivery(state);
1451
1452                 if (state->config->tuner_set_rfsiggain) {
1453                         if (internal->srate > 15000000)
1454                                 gain =  8; /* 15Mb < srate < 45Mb, gain = 8dB   */
1455                         else if (internal->srate > 5000000)
1456                                 gain = 12; /*  5Mb < srate < 15Mb, gain = 12dB  */
1457                         else
1458                                 gain = 14; /*  1Mb < srate <  5Mb, gain = 14db  */
1459                         state->config->tuner_set_rfsiggain(fe, gain);
1460                 }
1461
1462                 if (i_params->srate <= 5000000)
1463                         stb0899_set_mclk(state, config->lo_clk);
1464                 else
1465                         stb0899_set_mclk(state, config->hi_clk);
1466
1467                 switch (state->delsys) {
1468                 case SYS_DVBS:
1469                 case SYS_DSS:
1470                         dprintk(state->verbose, FE_DEBUG, 1, "DVB-S delivery system");
1471                         internal->freq  = i_params->freq;
1472                         internal->srate = i_params->srate;
1473                         /*
1474                          * search = user search range +
1475                          *          500Khz +
1476                          *          2 * Tuner_step_size +
1477                          *          10% of the symbol rate
1478                          */
1479                         internal->srch_range    = SearchRange + 1500000 + (i_params->srate / 5);
1480                         internal->derot_percent = 30;
1481
1482                         /* What to do for tuners having no bandwidth setup ?    */
1483                         /* enable tuner I/O */
1484                         stb0899_i2c_gate_ctrl(&state->frontend, 1);
1485
1486                         if (state->config->tuner_set_bandwidth)
1487                                 state->config->tuner_set_bandwidth(fe, (13 * (stb0899_carr_width(state) + SearchRange)) / 10);
1488                         if (state->config->tuner_get_bandwidth)
1489                                 state->config->tuner_get_bandwidth(fe, &internal->tuner_bw);
1490
1491                         /* disable tuner I/O */
1492                         stb0899_i2c_gate_ctrl(&state->frontend, 0);
1493
1494                         /* Set DVB-S1 AGC               */
1495                         stb0899_write_reg(state, STB0899_AGCRFCFG, 0x11);
1496
1497                         /* Run the search algorithm     */
1498                         dprintk(state->verbose, FE_DEBUG, 1, "running DVB-S search algo ..");
1499                         if (stb0899_dvbs_algo(state)    == RANGEOK) {
1500                                 internal->lock          = 1;
1501                                 dprintk(state->verbose, FE_DEBUG, 1,
1502                                         "-------------------------------------> DVB-S LOCK !");
1503
1504 //                              stb0899_write_reg(state, STB0899_ERRCTRL1, 0x3d); /* Viterbi Errors     */
1505 //                              internal->v_status = stb0899_read_reg(state, STB0899_VSTATUS);
1506 //                              internal->err_ctrl = stb0899_read_reg(state, STB0899_ERRCTRL1);
1507 //                              dprintk(state->verbose, FE_DEBUG, 1, "VSTATUS=0x%02x", internal->v_status);
1508 //                              dprintk(state->verbose, FE_DEBUG, 1, "ERR_CTRL=0x%02x", internal->err_ctrl);
1509
1510                                 return DVBFE_ALGO_SEARCH_SUCCESS;
1511                         } else {
1512                                 internal->lock          = 0;
1513
1514                                 return DVBFE_ALGO_SEARCH_FAILED;
1515                         }
1516                         break;
1517                 case SYS_DVBS2:
1518                         internal->freq                  = i_params->freq;
1519                         internal->srate                 = i_params->srate;
1520                         internal->srch_range            = SearchRange;
1521
1522                         /* enable tuner I/O */
1523                         stb0899_i2c_gate_ctrl(&state->frontend, 1);
1524
1525                         if (state->config->tuner_set_bandwidth)
1526                                 state->config->tuner_set_bandwidth(fe, (stb0899_carr_width(state) + SearchRange));
1527                         if (state->config->tuner_get_bandwidth)
1528                                 state->config->tuner_get_bandwidth(fe, &internal->tuner_bw);
1529
1530                         /* disable tuner I/O */
1531                         stb0899_i2c_gate_ctrl(&state->frontend, 0);
1532
1533 //                      pParams->SpectralInv            = pSearch->IQ_Inversion;
1534
1535                         /* Set DVB-S2 AGC               */
1536                         stb0899_write_reg(state, STB0899_AGCRFCFG, 0x1c);
1537
1538                         /* Set IterScale =f(MCLK,SYMB)  */
1539                         stb0899_set_iterations(state);
1540
1541                         /* Run the search algorithm     */
1542                         dprintk(state->verbose, FE_DEBUG, 1, "running DVB-S2 search algo ..");
1543                         if (stb0899_dvbs2_algo(state)   == DVBS2_FEC_LOCK) {
1544                                 internal->lock          = 1;
1545                                 dprintk(state->verbose, FE_DEBUG, 1,
1546                                         "-------------------------------------> DVB-S2 LOCK !");
1547
1548 //                              stb0899_write_reg(state, STB0899_ERRCTRL1, 0xb6); /* Packet Errors      */
1549 //                              internal->v_status = stb0899_read_reg(state, STB0899_VSTATUS);
1550 //                              internal->err_ctrl = stb0899_read_reg(state, STB0899_ERRCTRL1);
1551
1552                                 return DVBFE_ALGO_SEARCH_SUCCESS;
1553                         } else {
1554                                 internal->lock          = 0;
1555
1556                                 return DVBFE_ALGO_SEARCH_FAILED;
1557                         }
1558                         break;
1559                 default:
1560                         dprintk(state->verbose, FE_ERROR, 1, "Unsupported delivery system");
1561                         return DVBFE_ALGO_SEARCH_INVALID;
1562                 }
1563         }
1564
1565         return DVBFE_ALGO_SEARCH_ERROR;
1566 }
1567
1568 static int stb0899_get_frontend(struct dvb_frontend *fe)
1569 {
1570         struct dtv_frontend_properties *p = &fe->dtv_property_cache;
1571         struct stb0899_state *state             = fe->demodulator_priv;
1572         struct stb0899_internal *internal       = &state->internal;
1573
1574         dprintk(state->verbose, FE_DEBUG, 1, "Get params");
1575         p->symbol_rate = internal->srate;
1576         p->frequency = internal->freq;
1577
1578         return 0;
1579 }
1580
1581 static enum dvbfe_algo stb0899_frontend_algo(struct dvb_frontend *fe)
1582 {
1583         return DVBFE_ALGO_CUSTOM;
1584 }
1585
1586 static struct dvb_frontend_ops stb0899_ops = {
1587         .delsys = { SYS_DVBS, SYS_DVBS2, SYS_DSS },
1588         .info = {
1589                 .name                   = "STB0899 Multistandard",
1590                 .frequency_min          = 950000,
1591                 .frequency_max          = 2150000,
1592                 .frequency_stepsize     = 0,
1593                 .frequency_tolerance    = 0,
1594                 .symbol_rate_min        =  5000000,
1595                 .symbol_rate_max        = 45000000,
1596
1597                 .caps                   = FE_CAN_INVERSION_AUTO |
1598                                           FE_CAN_FEC_AUTO       |
1599                                           FE_CAN_2G_MODULATION  |
1600                                           FE_CAN_QPSK
1601         },
1602
1603         .release                        = stb0899_release,
1604         .init                           = stb0899_init,
1605         .sleep                          = stb0899_sleep,
1606 //      .wakeup                         = stb0899_wakeup,
1607
1608         .i2c_gate_ctrl                  = stb0899_i2c_gate_ctrl,
1609
1610         .get_frontend_algo              = stb0899_frontend_algo,
1611         .search                         = stb0899_search,
1612         .get_frontend                   = stb0899_get_frontend,
1613
1614
1615         .read_status                    = stb0899_read_status,
1616         .read_snr                       = stb0899_read_snr,
1617         .read_signal_strength           = stb0899_read_signal_strength,
1618         .read_ber                       = stb0899_read_ber,
1619
1620         .set_voltage                    = stb0899_set_voltage,
1621         .set_tone                       = stb0899_set_tone,
1622
1623         .diseqc_send_master_cmd         = stb0899_send_diseqc_msg,
1624         .diseqc_recv_slave_reply        = stb0899_recv_slave_reply,
1625         .diseqc_send_burst              = stb0899_send_diseqc_burst,
1626 };
1627
1628 struct dvb_frontend *stb0899_attach(struct stb0899_config *config, struct i2c_adapter *i2c)
1629 {
1630         struct stb0899_state *state = NULL;
1631
1632         state = kzalloc(sizeof (struct stb0899_state), GFP_KERNEL);
1633         if (state == NULL)
1634                 goto error;
1635
1636         state->verbose                          = &verbose;
1637         state->config                           = config;
1638         state->i2c                              = i2c;
1639         state->frontend.ops                     = stb0899_ops;
1640         state->frontend.demodulator_priv        = state;
1641         /* use configured inversion as default -- we'll later autodetect inversion */
1642         state->internal.inversion               = config->inversion;
1643
1644         stb0899_wakeup(&state->frontend);
1645         if (stb0899_get_dev_id(state) == -ENODEV) {
1646                 printk("%s: Exiting .. !\n", __func__);
1647                 goto error;
1648         }
1649
1650         printk("%s: Attaching STB0899 \n", __func__);
1651         return &state->frontend;
1652
1653 error:
1654         kfree(state);
1655         return NULL;
1656 }
1657 EXPORT_SYMBOL(stb0899_attach);
1658 MODULE_PARM_DESC(verbose, "Set Verbosity level");
1659 MODULE_AUTHOR("Manu Abraham");
1660 MODULE_DESCRIPTION("STB0899 Multi-Std frontend");
1661 MODULE_LICENSE("GPL");