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