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
39static unsigned int verbose = 0;//1;
40module_param(verbose, int, 0644);
41
42/* C/N in dB/10, NIRM/NIRL */
43static 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 */
73static 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 */
114static 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*/
142static 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 */
185static 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
225static 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
262int 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
279u32 _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
375err:
376	return status < 0 ? status : -EREMOTEIO;
377}
378
379int 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
448err:
449	return status < 0 ? status : -EREMOTEIO;
450}
451
452int 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;
499err:
500	return status < 0 ? status : -EREMOTEIO;
501}
502
503int 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
553int 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 */
563static 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 */
580static 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
595static 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
617static 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 */
631static 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 */
646static 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
686static 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
704static 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
730static 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
747static 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;
774exit:
775
776	return result;
777}
778
779static 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
795static 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
833static 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
862static 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
875static 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
894static 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
939static 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
965static 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
1009static 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
1066static 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 */
1137static 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
1181static 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
1208static 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
1238int 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;
1259err:
1260	dprintk(state->verbose, FE_ERROR, 1, "I2C Repeater control failed");
1261	return -EREMOTEIO;
1262}
1263
1264
1265static 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
1274static 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
1306static 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 */
1410static 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
1431static 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
1569static 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
1582static enum dvbfe_algo stb0899_frontend_algo(struct dvb_frontend *fe)
1583{
1584	return DVBFE_ALGO_CUSTOM;
1585}
1586
1587static 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
1629struct 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
1654error:
1655	kfree(state);
1656	return NULL;
1657}
1658EXPORT_SYMBOL(stb0899_attach);
1659MODULE_PARM_DESC(verbose, "Set Verbosity level");
1660MODULE_AUTHOR("Manu Abraham");
1661MODULE_DESCRIPTION("STB0899 Multi-Std frontend");
1662MODULE_LICENSE("GPL");
1663