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