Merge branch 'master' into upstream-fixes
[linux-2.6] / drivers / media / video / cx25840 / cx25840-vbi.c
1 /* cx25840 VBI functions
2  *
3  * This program is free software; you can redistribute it and/or
4  * modify it under the terms of the GNU General Public License
5  * as published by the Free Software Foundation; either version 2
6  * of the License, or (at your option) any later version.
7  *
8  * This program is distributed in the hope that it will be useful,
9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11  * GNU General Public License for more details.
12  *
13  * You should have received a copy of the GNU General Public License
14  * along with this program; if not, write to the Free Software
15  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
16  */
17
18
19 #include <linux/videodev2.h>
20 #include <linux/i2c.h>
21 #include <media/v4l2-common.h>
22 #include <media/cx25840.h>
23
24 #include "cx25840-core.h"
25
26 static int odd_parity(u8 c)
27 {
28         c ^= (c >> 4);
29         c ^= (c >> 2);
30         c ^= (c >> 1);
31
32         return c & 1;
33 }
34
35 static int decode_vps(u8 * dst, u8 * p)
36 {
37         static const u8 biphase_tbl[] = {
38                 0xf0, 0x78, 0x70, 0xf0, 0xb4, 0x3c, 0x34, 0xb4,
39                 0xb0, 0x38, 0x30, 0xb0, 0xf0, 0x78, 0x70, 0xf0,
40                 0xd2, 0x5a, 0x52, 0xd2, 0x96, 0x1e, 0x16, 0x96,
41                 0x92, 0x1a, 0x12, 0x92, 0xd2, 0x5a, 0x52, 0xd2,
42                 0xd0, 0x58, 0x50, 0xd0, 0x94, 0x1c, 0x14, 0x94,
43                 0x90, 0x18, 0x10, 0x90, 0xd0, 0x58, 0x50, 0xd0,
44                 0xf0, 0x78, 0x70, 0xf0, 0xb4, 0x3c, 0x34, 0xb4,
45                 0xb0, 0x38, 0x30, 0xb0, 0xf0, 0x78, 0x70, 0xf0,
46                 0xe1, 0x69, 0x61, 0xe1, 0xa5, 0x2d, 0x25, 0xa5,
47                 0xa1, 0x29, 0x21, 0xa1, 0xe1, 0x69, 0x61, 0xe1,
48                 0xc3, 0x4b, 0x43, 0xc3, 0x87, 0x0f, 0x07, 0x87,
49                 0x83, 0x0b, 0x03, 0x83, 0xc3, 0x4b, 0x43, 0xc3,
50                 0xc1, 0x49, 0x41, 0xc1, 0x85, 0x0d, 0x05, 0x85,
51                 0x81, 0x09, 0x01, 0x81, 0xc1, 0x49, 0x41, 0xc1,
52                 0xe1, 0x69, 0x61, 0xe1, 0xa5, 0x2d, 0x25, 0xa5,
53                 0xa1, 0x29, 0x21, 0xa1, 0xe1, 0x69, 0x61, 0xe1,
54                 0xe0, 0x68, 0x60, 0xe0, 0xa4, 0x2c, 0x24, 0xa4,
55                 0xa0, 0x28, 0x20, 0xa0, 0xe0, 0x68, 0x60, 0xe0,
56                 0xc2, 0x4a, 0x42, 0xc2, 0x86, 0x0e, 0x06, 0x86,
57                 0x82, 0x0a, 0x02, 0x82, 0xc2, 0x4a, 0x42, 0xc2,
58                 0xc0, 0x48, 0x40, 0xc0, 0x84, 0x0c, 0x04, 0x84,
59                 0x80, 0x08, 0x00, 0x80, 0xc0, 0x48, 0x40, 0xc0,
60                 0xe0, 0x68, 0x60, 0xe0, 0xa4, 0x2c, 0x24, 0xa4,
61                 0xa0, 0x28, 0x20, 0xa0, 0xe0, 0x68, 0x60, 0xe0,
62                 0xf0, 0x78, 0x70, 0xf0, 0xb4, 0x3c, 0x34, 0xb4,
63                 0xb0, 0x38, 0x30, 0xb0, 0xf0, 0x78, 0x70, 0xf0,
64                 0xd2, 0x5a, 0x52, 0xd2, 0x96, 0x1e, 0x16, 0x96,
65                 0x92, 0x1a, 0x12, 0x92, 0xd2, 0x5a, 0x52, 0xd2,
66                 0xd0, 0x58, 0x50, 0xd0, 0x94, 0x1c, 0x14, 0x94,
67                 0x90, 0x18, 0x10, 0x90, 0xd0, 0x58, 0x50, 0xd0,
68                 0xf0, 0x78, 0x70, 0xf0, 0xb4, 0x3c, 0x34, 0xb4,
69                 0xb0, 0x38, 0x30, 0xb0, 0xf0, 0x78, 0x70, 0xf0,
70         };
71
72         u8 c, err = 0;
73         int i;
74
75         for (i = 0; i < 2 * 13; i += 2) {
76                 err |= biphase_tbl[p[i]] | biphase_tbl[p[i + 1]];
77                 c = (biphase_tbl[p[i + 1]] & 0xf) |
78                     ((biphase_tbl[p[i]] & 0xf) << 4);
79                 dst[i / 2] = c;
80         }
81
82         return err & 0xf0;
83 }
84
85 void cx25840_vbi_setup(struct i2c_client *client)
86 {
87         struct cx25840_state *state = i2c_get_clientdata(client);
88         v4l2_std_id std = cx25840_get_v4lstd(client);
89         int hblank,hactive,burst,vblank,vactive,sc,vblank656,src_decimation;
90         int luma_lpf,uv_lpf, comb;
91         u32 pll_int,pll_frac,pll_post;
92
93         /* datasheet startup, step 8d */
94         if (std & ~V4L2_STD_NTSC) {
95                 cx25840_write(client, 0x49f, 0x11);
96         } else {
97                 cx25840_write(client, 0x49f, 0x14);
98         }
99
100         if (std & V4L2_STD_625_50) {
101                 hblank=0x084;
102                 hactive=0x2d0;
103                 burst=0x5d;
104                 vblank=0x024;
105                 vactive=0x244;
106                 vblank656=0x28;
107                 src_decimation=0x21f;
108
109                 luma_lpf=2;
110                 if (std & V4L2_STD_SECAM) {
111                         uv_lpf=0;
112                         comb=0;
113                         sc=0x0a425f;
114                 } else {
115                         uv_lpf=1;
116                         comb=0x20;
117                         sc=0x0a8263;
118                 }
119         } else {
120                 hactive=720;
121                 hblank=122;
122                 vactive=487;
123                 luma_lpf=1;
124                 uv_lpf=1;
125
126                 src_decimation=0x21f;
127                 if (std == V4L2_STD_PAL_M) {
128                         vblank=20;
129                         vblank656=24;
130                         burst=0x61;
131                         comb=0x20;
132
133                         sc=555452;
134                 } else {
135                         vblank=26;
136                         vblank656=26;
137                         burst=0x5b;
138                         comb=0x66;
139                         sc=556063;
140                 }
141         }
142
143         /* DEBUG: Displays configured PLL frequency */
144         pll_int=cx25840_read(client, 0x108);
145         pll_frac=cx25840_read4(client, 0x10c)&0x1ffffff;
146         pll_post=cx25840_read(client, 0x109);
147         v4l_dbg(1, cx25840_debug, client,
148                                 "PLL regs = int: %u, frac: %u, post: %u\n",
149                                 pll_int,pll_frac,pll_post);
150
151         if (pll_post) {
152                 int fin, fsc;
153                 int pll= (28636363L*((((u64)pll_int)<<25L)+pll_frac)) >>25L;
154
155                 pll/=pll_post;
156                 v4l_dbg(1, cx25840_debug, client, "PLL = %d.%06d MHz\n",
157                                                 pll/1000000, pll%1000000);
158                 v4l_dbg(1, cx25840_debug, client, "PLL/8 = %d.%06d MHz\n",
159                                                 pll/8000000, (pll/8)%1000000);
160
161                 fin=((u64)src_decimation*pll)>>12;
162                 v4l_dbg(1, cx25840_debug, client, "ADC Sampling freq = "
163                                                 "%d.%06d MHz\n",
164                                                 fin/1000000,fin%1000000);
165
166                 fsc= (((u64)sc)*pll) >> 24L;
167                 v4l_dbg(1, cx25840_debug, client, "Chroma sub-carrier freq = "
168                                                 "%d.%06d MHz\n",
169                                                 fsc/1000000,fsc%1000000);
170
171                 v4l_dbg(1, cx25840_debug, client, "hblank %i, hactive %i, "
172                         "vblank %i , vactive %i, vblank656 %i, src_dec %i,"
173                         "burst 0x%02x, luma_lpf %i, uv_lpf %i, comb 0x%02x,"
174                         " sc 0x%06x\n",
175                         hblank, hactive, vblank, vactive, vblank656,
176                         src_decimation, burst, luma_lpf, uv_lpf, comb, sc);
177         }
178
179         /* Sets horizontal blanking delay and active lines */
180         cx25840_write(client, 0x470, hblank);
181         cx25840_write(client, 0x471, 0xff&(((hblank>>8)&0x3)|(hactive <<4)));
182         cx25840_write(client, 0x472, hactive>>4);
183
184         /* Sets burst gate delay */
185         cx25840_write(client, 0x473, burst);
186
187         /* Sets vertical blanking delay and active duration */
188         cx25840_write(client, 0x474, vblank);
189         cx25840_write(client, 0x475, 0xff&(((vblank>>8)&0x3)|(vactive <<4)));
190         cx25840_write(client, 0x476, vactive>>4);
191         cx25840_write(client, 0x477, vblank656);
192
193         /* Sets src decimation rate */
194         cx25840_write(client, 0x478, 0xff&src_decimation);
195         cx25840_write(client, 0x479, 0xff&(src_decimation>>8));
196
197         /* Sets Luma and UV Low pass filters */
198         cx25840_write(client, 0x47a, luma_lpf<<6|((uv_lpf<<4)&0x30));
199
200         /* Enables comb filters */
201         cx25840_write(client, 0x47b, comb);
202
203         /* Sets SC Step*/
204         cx25840_write(client, 0x47c, sc);
205         cx25840_write(client, 0x47d, 0xff&sc>>8);
206         cx25840_write(client, 0x47e, 0xff&sc>>16);
207
208         /* Sets VBI parameters */
209         if (std & V4L2_STD_625_50) {
210                 cx25840_write(client, 0x47f, 0x01);
211                 state->vbi_line_offset = 5;
212         } else {
213                 cx25840_write(client, 0x47f, 0x00);
214                 state->vbi_line_offset = 8;
215         }
216 }
217
218 int cx25840_vbi(struct i2c_client *client, unsigned int cmd, void *arg)
219 {
220         struct cx25840_state *state = i2c_get_clientdata(client);
221         struct v4l2_format *fmt;
222         struct v4l2_sliced_vbi_format *svbi;
223
224         switch (cmd) {
225         case VIDIOC_G_FMT:
226         {
227                 static u16 lcr2vbi[] = {
228                         0, V4L2_SLICED_TELETEXT_B, 0,   /* 1 */
229                         0, V4L2_SLICED_WSS_625, 0,      /* 4 */
230                         V4L2_SLICED_CAPTION_525,        /* 6 */
231                         0, 0, V4L2_SLICED_VPS, 0, 0,    /* 9 */
232                         0, 0, 0, 0
233                 };
234                 int i;
235
236                 fmt = arg;
237                 if (fmt->type != V4L2_BUF_TYPE_SLICED_VBI_CAPTURE)
238                         return -EINVAL;
239                 svbi = &fmt->fmt.sliced;
240                 memset(svbi, 0, sizeof(*svbi));
241                 /* we're done if raw VBI is active */
242                 if ((cx25840_read(client, 0x404) & 0x10) == 0)
243                         break;
244
245                 for (i = 7; i <= 23; i++) {
246                         u8 v = cx25840_read(client, 0x424 + i - 7);
247
248                         svbi->service_lines[0][i] = lcr2vbi[v >> 4];
249                         svbi->service_lines[1][i] = lcr2vbi[v & 0xf];
250                         svbi->service_set |=
251                                  svbi->service_lines[0][i] | svbi->service_lines[1][i];
252                 }
253                 break;
254         }
255
256         case VIDIOC_S_FMT:
257         {
258                 int is_pal = !(cx25840_get_v4lstd(client) & V4L2_STD_525_60);
259                 int vbi_offset = is_pal ? 1 : 0;
260                 int i, x;
261                 u8 lcr[24];
262
263                 fmt = arg;
264                 if (fmt->type != V4L2_BUF_TYPE_SLICED_VBI_CAPTURE)
265                         return -EINVAL;
266                 svbi = &fmt->fmt.sliced;
267                 if (svbi->service_set == 0) {
268                         /* raw VBI */
269                         memset(svbi, 0, sizeof(*svbi));
270
271                         /* Setup VBI */
272                         cx25840_vbi_setup(client);
273
274                         /* VBI Offset */
275                         cx25840_write(client, 0x47f, vbi_offset);
276                         cx25840_write(client, 0x404, 0x2e);
277                         break;
278                 }
279
280                 for (x = 0; x <= 23; x++)
281                         lcr[x] = 0x00;
282
283                 /* Setup VBI */
284                 cx25840_vbi_setup(client);
285
286                 /* Sliced VBI */
287                 cx25840_write(client, 0x404, 0x32);     /* Ancillary data */
288                 cx25840_write(client, 0x406, 0x13);
289                 cx25840_write(client, 0x47f, vbi_offset);
290
291                 if (is_pal) {
292                         for (i = 0; i <= 6; i++)
293                                 svbi->service_lines[0][i] =
294                                         svbi->service_lines[1][i] = 0;
295                 } else {
296                         for (i = 0; i <= 9; i++)
297                                 svbi->service_lines[0][i] =
298                                         svbi->service_lines[1][i] = 0;
299
300                         for (i = 22; i <= 23; i++)
301                                 svbi->service_lines[0][i] =
302                                         svbi->service_lines[1][i] = 0;
303                 }
304
305                 for (i = 7; i <= 23; i++) {
306                         for (x = 0; x <= 1; x++) {
307                                 switch (svbi->service_lines[1-x][i]) {
308                                 case V4L2_SLICED_TELETEXT_B:
309                                         lcr[i] |= 1 << (4 * x);
310                                         break;
311                                 case V4L2_SLICED_WSS_625:
312                                         lcr[i] |= 4 << (4 * x);
313                                         break;
314                                 case V4L2_SLICED_CAPTION_525:
315                                         lcr[i] |= 6 << (4 * x);
316                                         break;
317                                 case V4L2_SLICED_VPS:
318                                         lcr[i] |= 9 << (4 * x);
319                                         break;
320                                 }
321                         }
322                 }
323
324                 if (is_pal) {
325                         for (x = 1, i = 0x424; i <= 0x434; i++, x++) {
326                                 cx25840_write(client, i, lcr[6 + x]);
327                         }
328                 }
329                 else {
330                         for (x = 1, i = 0x424; i <= 0x430; i++, x++) {
331                                 cx25840_write(client, i, lcr[9 + x]);
332                         }
333                         for (i = 0x431; i <= 0x434; i++) {
334                                 cx25840_write(client, i, 0);
335                         }
336                 }
337
338                 cx25840_write(client, 0x43c, 0x16);
339
340                 if (is_pal) {
341                         cx25840_write(client, 0x474, 0x2a);
342                 } else {
343                         cx25840_write(client, 0x474, 0x22);
344                 }
345                 break;
346         }
347
348         case VIDIOC_INT_DECODE_VBI_LINE:
349         {
350                 struct v4l2_decode_vbi_line *vbi = arg;
351                 u8 *p = vbi->p;
352                 int id1, id2, l, err = 0;
353
354                 if (p[0] || p[1] != 0xff || p[2] != 0xff ||
355                     (p[3] != 0x55 && p[3] != 0x91)) {
356                         vbi->line = vbi->type = 0;
357                         break;
358                 }
359
360                 p += 4;
361                 id1 = p[-1];
362                 id2 = p[0] & 0xf;
363                 l = p[2] & 0x3f;
364                 l += state->vbi_line_offset;
365                 p += 4;
366
367                 switch (id2) {
368                 case 1:
369                         id2 = V4L2_SLICED_TELETEXT_B;
370                         break;
371                 case 4:
372                         id2 = V4L2_SLICED_WSS_625;
373                         break;
374                 case 6:
375                         id2 = V4L2_SLICED_CAPTION_525;
376                         err = !odd_parity(p[0]) || !odd_parity(p[1]);
377                         break;
378                 case 9:
379                         id2 = V4L2_SLICED_VPS;
380                         if (decode_vps(p, p) != 0) {
381                                 err = 1;
382                         }
383                         break;
384                 default:
385                         id2 = 0;
386                         err = 1;
387                         break;
388                 }
389
390                 vbi->type = err ? 0 : id2;
391                 vbi->line = err ? 0 : l;
392                 vbi->is_second_field = err ? 0 : (id1 == 0x55);
393                 vbi->p = p;
394                 break;
395         }
396         }
397
398         return 0;
399 }