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