xref: /openbmc/linux/drivers/media/i2c/saa7185.c (revision 8c749ce9)
1 /*
2  * saa7185 - Philips SAA7185B video encoder driver version 0.0.3
3  *
4  * Copyright (C) 1998 Dave Perks <dperks@ibm.net>
5  *
6  * Slight changes for video timing and attachment output by
7  * Wolfgang Scherr <scherr@net4you.net>
8  *
9  * Changes by Ronald Bultje <rbultje@ronald.bitfreak.net>
10  *    - moved over to linux>=2.4.x i2c protocol (1/1/2003)
11  *
12  * This program is free software; you can redistribute it and/or modify
13  * it under the terms of the GNU General Public License as published by
14  * the Free Software Foundation; either version 2 of the License, or
15  * (at your option) any later version.
16  *
17  * This program is distributed in the hope that it will be useful,
18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  * GNU General Public License for more details.
21  *
22  * You should have received a copy of the GNU General Public License
23  * along with this program; if not, write to the Free Software
24  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25  */
26 
27 #include <linux/module.h>
28 #include <linux/types.h>
29 #include <linux/slab.h>
30 #include <linux/ioctl.h>
31 #include <asm/uaccess.h>
32 #include <linux/i2c.h>
33 #include <linux/videodev2.h>
34 #include <media/v4l2-device.h>
35 
36 MODULE_DESCRIPTION("Philips SAA7185 video encoder driver");
37 MODULE_AUTHOR("Dave Perks");
38 MODULE_LICENSE("GPL");
39 
40 static int debug;
41 module_param(debug, int, 0);
42 MODULE_PARM_DESC(debug, "Debug level (0-1)");
43 
44 
45 /* ----------------------------------------------------------------------- */
46 
47 struct saa7185 {
48 	struct v4l2_subdev sd;
49 	unsigned char reg[128];
50 
51 	v4l2_std_id norm;
52 };
53 
54 static inline struct saa7185 *to_saa7185(struct v4l2_subdev *sd)
55 {
56 	return container_of(sd, struct saa7185, sd);
57 }
58 
59 /* ----------------------------------------------------------------------- */
60 
61 static inline int saa7185_read(struct v4l2_subdev *sd)
62 {
63 	struct i2c_client *client = v4l2_get_subdevdata(sd);
64 
65 	return i2c_smbus_read_byte(client);
66 }
67 
68 static int saa7185_write(struct v4l2_subdev *sd, u8 reg, u8 value)
69 {
70 	struct i2c_client *client = v4l2_get_subdevdata(sd);
71 	struct saa7185 *encoder = to_saa7185(sd);
72 
73 	v4l2_dbg(1, debug, sd, "%02x set to %02x\n", reg, value);
74 	encoder->reg[reg] = value;
75 	return i2c_smbus_write_byte_data(client, reg, value);
76 }
77 
78 static int saa7185_write_block(struct v4l2_subdev *sd,
79 		const u8 *data, unsigned int len)
80 {
81 	struct i2c_client *client = v4l2_get_subdevdata(sd);
82 	struct saa7185 *encoder = to_saa7185(sd);
83 	int ret = -1;
84 	u8 reg;
85 
86 	/* the adv7175 has an autoincrement function, use it if
87 	 * the adapter understands raw I2C */
88 	if (i2c_check_functionality(client->adapter, I2C_FUNC_I2C)) {
89 		/* do raw I2C, not smbus compatible */
90 		u8 block_data[32];
91 		int block_len;
92 
93 		while (len >= 2) {
94 			block_len = 0;
95 			block_data[block_len++] = reg = data[0];
96 			do {
97 				block_data[block_len++] =
98 				    encoder->reg[reg++] = data[1];
99 				len -= 2;
100 				data += 2;
101 			} while (len >= 2 && data[0] == reg && block_len < 32);
102 			ret = i2c_master_send(client, block_data, block_len);
103 			if (ret < 0)
104 				break;
105 		}
106 	} else {
107 		/* do some slow I2C emulation kind of thing */
108 		while (len >= 2) {
109 			reg = *data++;
110 			ret = saa7185_write(sd, reg, *data++);
111 			if (ret < 0)
112 				break;
113 			len -= 2;
114 		}
115 	}
116 
117 	return ret;
118 }
119 
120 /* ----------------------------------------------------------------------- */
121 
122 static const unsigned char init_common[] = {
123 	0x3a, 0x0f,		/* CBENB=0, V656=0, VY2C=1,
124 				 * YUV2C=1, MY2C=1, MUV2C=1 */
125 
126 	0x42, 0x6b,		/* OVLY0=107 */
127 	0x43, 0x00,		/* OVLU0=0     white */
128 	0x44, 0x00,		/* OVLV0=0   */
129 	0x45, 0x22,		/* OVLY1=34  */
130 	0x46, 0xac,		/* OVLU1=172   yellow */
131 	0x47, 0x0e,		/* OVLV1=14  */
132 	0x48, 0x03,		/* OVLY2=3   */
133 	0x49, 0x1d,		/* OVLU2=29    cyan */
134 	0x4a, 0xac,		/* OVLV2=172 */
135 	0x4b, 0xf0,		/* OVLY3=240 */
136 	0x4c, 0xc8,		/* OVLU3=200   green */
137 	0x4d, 0xb9,		/* OVLV3=185 */
138 	0x4e, 0xd4,		/* OVLY4=212 */
139 	0x4f, 0x38,		/* OVLU4=56    magenta */
140 	0x50, 0x47,		/* OVLV4=71  */
141 	0x51, 0xc1,		/* OVLY5=193 */
142 	0x52, 0xe3,		/* OVLU5=227   red */
143 	0x53, 0x54,		/* OVLV5=84  */
144 	0x54, 0xa3,		/* OVLY6=163 */
145 	0x55, 0x54,		/* OVLU6=84    blue */
146 	0x56, 0xf2,		/* OVLV6=242 */
147 	0x57, 0x90,		/* OVLY7=144 */
148 	0x58, 0x00,		/* OVLU7=0     black */
149 	0x59, 0x00,		/* OVLV7=0   */
150 
151 	0x5a, 0x00,		/* CHPS=0    */
152 	0x5b, 0x76,		/* GAINU=118 */
153 	0x5c, 0xa5,		/* GAINV=165 */
154 	0x5d, 0x3c,		/* BLCKL=60  */
155 	0x5e, 0x3a,		/* BLNNL=58  */
156 	0x5f, 0x3a,		/* CCRS=0, BLNVB=58 */
157 	0x60, 0x00,		/* NULL      */
158 
159 	/* 0x61 - 0x66 set according to norm */
160 
161 	0x67, 0x00,		/* 0 : caption 1st byte odd  field */
162 	0x68, 0x00,		/* 0 : caption 2nd byte odd  field */
163 	0x69, 0x00,		/* 0 : caption 1st byte even field */
164 	0x6a, 0x00,		/* 0 : caption 2nd byte even field */
165 
166 	0x6b, 0x91,		/* MODIN=2, PCREF=0, SCCLN=17 */
167 	0x6c, 0x20,		/* SRCV1=0, TRCV2=1, ORCV1=0, PRCV1=0,
168 				 * CBLF=0, ORCV2=0, PRCV2=0 */
169 	0x6d, 0x00,		/* SRCM1=0, CCEN=0 */
170 
171 	0x6e, 0x0e,		/* HTRIG=0x005, approx. centered, at
172 				 * least for PAL */
173 	0x6f, 0x00,		/* HTRIG upper bits */
174 	0x70, 0x20,		/* PHRES=0, SBLN=1, VTRIG=0 */
175 
176 	/* The following should not be needed */
177 
178 	0x71, 0x15,		/* BMRQ=0x115 */
179 	0x72, 0x90,		/* EMRQ=0x690 */
180 	0x73, 0x61,		/* EMRQ=0x690, BMRQ=0x115 */
181 	0x74, 0x00,		/* NULL       */
182 	0x75, 0x00,		/* NULL       */
183 	0x76, 0x00,		/* NULL       */
184 	0x77, 0x15,		/* BRCV=0x115 */
185 	0x78, 0x90,		/* ERCV=0x690 */
186 	0x79, 0x61,		/* ERCV=0x690, BRCV=0x115 */
187 
188 	/* Field length controls */
189 
190 	0x7a, 0x70,		/* FLC=0 */
191 
192 	/* The following should not be needed if SBLN = 1 */
193 
194 	0x7b, 0x16,		/* FAL=22 */
195 	0x7c, 0x35,		/* LAL=244 */
196 	0x7d, 0x20,		/* LAL=244, FAL=22 */
197 };
198 
199 static const unsigned char init_pal[] = {
200 	0x61, 0x1e,		/* FISE=0, PAL=1, SCBW=1, RTCE=1,
201 				 * YGS=1, INPI=0, DOWN=0 */
202 	0x62, 0xc8,		/* DECTYP=1, BSTA=72 */
203 	0x63, 0xcb,		/* FSC0 */
204 	0x64, 0x8a,		/* FSC1 */
205 	0x65, 0x09,		/* FSC2 */
206 	0x66, 0x2a,		/* FSC3 */
207 };
208 
209 static const unsigned char init_ntsc[] = {
210 	0x61, 0x1d,		/* FISE=1, PAL=0, SCBW=1, RTCE=1,
211 				 * YGS=1, INPI=0, DOWN=0 */
212 	0x62, 0xe6,		/* DECTYP=1, BSTA=102 */
213 	0x63, 0x1f,		/* FSC0 */
214 	0x64, 0x7c,		/* FSC1 */
215 	0x65, 0xf0,		/* FSC2 */
216 	0x66, 0x21,		/* FSC3 */
217 };
218 
219 
220 static int saa7185_init(struct v4l2_subdev *sd, u32 val)
221 {
222 	struct saa7185 *encoder = to_saa7185(sd);
223 
224 	saa7185_write_block(sd, init_common, sizeof(init_common));
225 	if (encoder->norm & V4L2_STD_NTSC)
226 		saa7185_write_block(sd, init_ntsc, sizeof(init_ntsc));
227 	else
228 		saa7185_write_block(sd, init_pal, sizeof(init_pal));
229 	return 0;
230 }
231 
232 static int saa7185_s_std_output(struct v4l2_subdev *sd, v4l2_std_id std)
233 {
234 	struct saa7185 *encoder = to_saa7185(sd);
235 
236 	if (std & V4L2_STD_NTSC)
237 		saa7185_write_block(sd, init_ntsc, sizeof(init_ntsc));
238 	else if (std & V4L2_STD_PAL)
239 		saa7185_write_block(sd, init_pal, sizeof(init_pal));
240 	else
241 		return -EINVAL;
242 	encoder->norm = std;
243 	return 0;
244 }
245 
246 static int saa7185_s_routing(struct v4l2_subdev *sd,
247 			     u32 input, u32 output, u32 config)
248 {
249 	struct saa7185 *encoder = to_saa7185(sd);
250 
251 	/* RJ: input = 0: input is from SA7111
252 	 input = 1: input is from ZR36060 */
253 
254 	switch (input) {
255 	case 0:
256 		/* turn off colorbar */
257 		saa7185_write(sd, 0x3a, 0x0f);
258 		/* Switch RTCE to 1 */
259 		saa7185_write(sd, 0x61, (encoder->reg[0x61] & 0xf7) | 0x08);
260 		saa7185_write(sd, 0x6e, 0x01);
261 		break;
262 
263 	case 1:
264 		/* turn off colorbar */
265 		saa7185_write(sd, 0x3a, 0x0f);
266 		/* Switch RTCE to 0 */
267 		saa7185_write(sd, 0x61, (encoder->reg[0x61] & 0xf7) | 0x00);
268 		/* SW: a slight sync problem... */
269 		saa7185_write(sd, 0x6e, 0x00);
270 		break;
271 
272 	case 2:
273 		/* turn on colorbar */
274 		saa7185_write(sd, 0x3a, 0x8f);
275 		/* Switch RTCE to 0 */
276 		saa7185_write(sd, 0x61, (encoder->reg[0x61] & 0xf7) | 0x08);
277 		/* SW: a slight sync problem... */
278 		saa7185_write(sd, 0x6e, 0x01);
279 		break;
280 
281 	default:
282 		return -EINVAL;
283 	}
284 	return 0;
285 }
286 
287 /* ----------------------------------------------------------------------- */
288 
289 static const struct v4l2_subdev_core_ops saa7185_core_ops = {
290 	.init = saa7185_init,
291 };
292 
293 static const struct v4l2_subdev_video_ops saa7185_video_ops = {
294 	.s_std_output = saa7185_s_std_output,
295 	.s_routing = saa7185_s_routing,
296 };
297 
298 static const struct v4l2_subdev_ops saa7185_ops = {
299 	.core = &saa7185_core_ops,
300 	.video = &saa7185_video_ops,
301 };
302 
303 
304 /* ----------------------------------------------------------------------- */
305 
306 static int saa7185_probe(struct i2c_client *client,
307 			const struct i2c_device_id *id)
308 {
309 	int i;
310 	struct saa7185 *encoder;
311 	struct v4l2_subdev *sd;
312 
313 	/* Check if the adapter supports the needed features */
314 	if (!i2c_check_functionality(client->adapter, I2C_FUNC_SMBUS_BYTE_DATA))
315 		return -ENODEV;
316 
317 	v4l_info(client, "chip found @ 0x%x (%s)\n",
318 			client->addr << 1, client->adapter->name);
319 
320 	encoder = devm_kzalloc(&client->dev, sizeof(*encoder), GFP_KERNEL);
321 	if (encoder == NULL)
322 		return -ENOMEM;
323 	encoder->norm = V4L2_STD_NTSC;
324 	sd = &encoder->sd;
325 	v4l2_i2c_subdev_init(sd, client, &saa7185_ops);
326 
327 	i = saa7185_write_block(sd, init_common, sizeof(init_common));
328 	if (i >= 0)
329 		i = saa7185_write_block(sd, init_ntsc, sizeof(init_ntsc));
330 	if (i < 0)
331 		v4l2_dbg(1, debug, sd, "init error %d\n", i);
332 	else
333 		v4l2_dbg(1, debug, sd, "revision 0x%x\n",
334 				saa7185_read(sd) >> 5);
335 	return 0;
336 }
337 
338 static int saa7185_remove(struct i2c_client *client)
339 {
340 	struct v4l2_subdev *sd = i2c_get_clientdata(client);
341 	struct saa7185 *encoder = to_saa7185(sd);
342 
343 	v4l2_device_unregister_subdev(sd);
344 	/* SW: output off is active */
345 	saa7185_write(sd, 0x61, (encoder->reg[0x61]) | 0x40);
346 	return 0;
347 }
348 
349 /* ----------------------------------------------------------------------- */
350 
351 static const struct i2c_device_id saa7185_id[] = {
352 	{ "saa7185", 0 },
353 	{ }
354 };
355 MODULE_DEVICE_TABLE(i2c, saa7185_id);
356 
357 static struct i2c_driver saa7185_driver = {
358 	.driver = {
359 		.name	= "saa7185",
360 	},
361 	.probe		= saa7185_probe,
362 	.remove		= saa7185_remove,
363 	.id_table	= saa7185_id,
364 };
365 
366 module_i2c_driver(saa7185_driver);
367