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
26static 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
35static 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
85int cx25840_g_sliced_fmt(struct v4l2_subdev *sd, struct v4l2_sliced_vbi_format *svbi)
86{
87	struct i2c_client *client = v4l2_get_subdevdata(sd);
88	struct cx25840_state *state = to_state(sd);
89	static const u16 lcr2vbi[] = {
90		0, V4L2_SLICED_TELETEXT_B, 0,	/* 1 */
91		0, V4L2_SLICED_WSS_625, 0,	/* 4 */
92		V4L2_SLICED_CAPTION_525,	/* 6 */
93		0, 0, V4L2_SLICED_VPS, 0, 0,	/* 9 */
94		0, 0, 0, 0
95	};
96	int is_pal = !(state->std & V4L2_STD_525_60);
97	int i;
98
99	memset(svbi->service_lines, 0, sizeof(svbi->service_lines));
100	svbi->service_set = 0;
101	/* we're done if raw VBI is active */
102	if ((cx25840_read(client, 0x404) & 0x10) == 0)
103		return 0;
104
105	if (is_pal) {
106		for (i = 7; i <= 23; i++) {
107			u8 v = cx25840_read(client, 0x424 + i - 7);
108
109			svbi->service_lines[0][i] = lcr2vbi[v >> 4];
110			svbi->service_lines[1][i] = lcr2vbi[v & 0xf];
111			svbi->service_set |= svbi->service_lines[0][i] |
112					     svbi->service_lines[1][i];
113		}
114	} else {
115		for (i = 10; i <= 21; i++) {
116			u8 v = cx25840_read(client, 0x424 + i - 10);
117
118			svbi->service_lines[0][i] = lcr2vbi[v >> 4];
119			svbi->service_lines[1][i] = lcr2vbi[v & 0xf];
120			svbi->service_set |= svbi->service_lines[0][i] |
121					     svbi->service_lines[1][i];
122		}
123	}
124	return 0;
125}
126
127int cx25840_s_raw_fmt(struct v4l2_subdev *sd, struct v4l2_vbi_format *fmt)
128{
129	struct i2c_client *client = v4l2_get_subdevdata(sd);
130	struct cx25840_state *state = to_state(sd);
131	int is_pal = !(state->std & V4L2_STD_525_60);
132	int vbi_offset = is_pal ? 1 : 0;
133
134	/* Setup standard */
135	cx25840_std_setup(client);
136
137	/* VBI Offset */
138	cx25840_write(client, 0x47f, vbi_offset);
139	cx25840_write(client, 0x404, 0x2e);
140	return 0;
141}
142
143int cx25840_s_sliced_fmt(struct v4l2_subdev *sd, struct v4l2_sliced_vbi_format *svbi)
144{
145	struct i2c_client *client = v4l2_get_subdevdata(sd);
146	struct cx25840_state *state = to_state(sd);
147	int is_pal = !(state->std & V4L2_STD_525_60);
148	int vbi_offset = is_pal ? 1 : 0;
149	int i, x;
150	u8 lcr[24];
151
152	for (x = 0; x <= 23; x++)
153		lcr[x] = 0x00;
154
155	/* Setup standard */
156	cx25840_std_setup(client);
157
158	/* Sliced VBI */
159	cx25840_write(client, 0x404, 0x32);	/* Ancillary data */
160	cx25840_write(client, 0x406, 0x13);
161	cx25840_write(client, 0x47f, vbi_offset);
162
163	if (is_pal) {
164		for (i = 0; i <= 6; i++)
165			svbi->service_lines[0][i] =
166				svbi->service_lines[1][i] = 0;
167	} else {
168		for (i = 0; i <= 9; i++)
169			svbi->service_lines[0][i] =
170				svbi->service_lines[1][i] = 0;
171
172		for (i = 22; i <= 23; i++)
173			svbi->service_lines[0][i] =
174				svbi->service_lines[1][i] = 0;
175	}
176
177	for (i = 7; i <= 23; i++) {
178		for (x = 0; x <= 1; x++) {
179			switch (svbi->service_lines[1-x][i]) {
180			case V4L2_SLICED_TELETEXT_B:
181				lcr[i] |= 1 << (4 * x);
182				break;
183			case V4L2_SLICED_WSS_625:
184				lcr[i] |= 4 << (4 * x);
185				break;
186			case V4L2_SLICED_CAPTION_525:
187				lcr[i] |= 6 << (4 * x);
188				break;
189			case V4L2_SLICED_VPS:
190				lcr[i] |= 9 << (4 * x);
191				break;
192			}
193		}
194	}
195
196	if (is_pal) {
197		for (x = 1, i = 0x424; i <= 0x434; i++, x++)
198			cx25840_write(client, i, lcr[6 + x]);
199	} else {
200		for (x = 1, i = 0x424; i <= 0x430; i++, x++)
201			cx25840_write(client, i, lcr[9 + x]);
202		for (i = 0x431; i <= 0x434; i++)
203			cx25840_write(client, i, 0);
204	}
205
206	cx25840_write(client, 0x43c, 0x16);
207	cx25840_write(client, 0x474, is_pal ? 0x2a : 0x22);
208	return 0;
209}
210
211int cx25840_decode_vbi_line(struct v4l2_subdev *sd, struct v4l2_decode_vbi_line *vbi)
212{
213	struct cx25840_state *state = to_state(sd);
214	u8 *p = vbi->p;
215	int id1, id2, l, err = 0;
216
217	if (p[0] || p[1] != 0xff || p[2] != 0xff ||
218			(p[3] != 0x55 && p[3] != 0x91)) {
219		vbi->line = vbi->type = 0;
220		return 0;
221	}
222
223	p += 4;
224	id1 = p[-1];
225	id2 = p[0] & 0xf;
226	l = p[2] & 0x3f;
227	l += state->vbi_line_offset;
228	p += 4;
229
230	switch (id2) {
231	case 1:
232		id2 = V4L2_SLICED_TELETEXT_B;
233		break;
234	case 4:
235		id2 = V4L2_SLICED_WSS_625;
236		break;
237	case 6:
238		id2 = V4L2_SLICED_CAPTION_525;
239		err = !odd_parity(p[0]) || !odd_parity(p[1]);
240		break;
241	case 9:
242		id2 = V4L2_SLICED_VPS;
243		if (decode_vps(p, p) != 0)
244			err = 1;
245		break;
246	default:
247		id2 = 0;
248		err = 1;
249		break;
250	}
251
252	vbi->type = err ? 0 : id2;
253	vbi->line = err ? 0 : l;
254	vbi->is_second_field = err ? 0 : (id1 == 0x55);
255	vbi->p = p;
256	return 0;
257}
258