1 #include <linux/module.h>
2 #include <linux/kernel.h>
3 #include <linux/sched.h>
4 #include <linux/string.h>
5 #include <linux/timer.h>
6 #include <linux/delay.h>
7 #include <linux/errno.h>
8 #include <linux/slab.h>
9 #include <linux/poll.h>
10 #include <linux/i2c.h>
11 #include <linux/types.h>
12 #include <linux/videodev.h>
13 #include <linux/init.h>
14 #include <linux/crc32.h>
17 #define MPEG_VIDEO_TARGET_BITRATE_MAX 27000
18 #define MPEG_VIDEO_MAX_BITRATE_MAX 27000
19 #define MPEG_TOTAL_TARGET_BITRATE_MAX 27000
20 #define MPEG_PID_MAX ((1 << 14) - 1)
22 /* Addresses to scan */
23 static unsigned short normal_i2c
[] = {0x20, I2C_CLIENT_END
};
26 MODULE_DESCRIPTION("device driver for saa6752hs MPEG2 encoder");
27 MODULE_AUTHOR("Andrew de Quincey");
28 MODULE_LICENSE("GPL");
30 static struct i2c_driver driver
;
31 static struct i2c_client client_template
;
33 enum saa6752hs_videoformat
{
34 SAA6752HS_VF_D1
= 0, /* standard D1 video format: 720x576 */
35 SAA6752HS_VF_2_3_D1
= 1,/* 2/3D1 video format: 480x576 */
36 SAA6752HS_VF_1_2_D1
= 2,/* 1/2D1 video format: 352x576 */
37 SAA6752HS_VF_SIF
= 3, /* SIF video format: 352x288 */
41 static const struct v4l2_format v4l2_format_table
[] =
44 { .fmt
= { .pix
= { .width
= 720, .height
= 576 }}},
45 [SAA6752HS_VF_2_3_D1
] =
46 { .fmt
= { .pix
= { .width
= 480, .height
= 576 }}},
47 [SAA6752HS_VF_1_2_D1
] =
48 { .fmt
= { .pix
= { .width
= 352, .height
= 576 }}},
50 { .fmt
= { .pix
= { .width
= 352, .height
= 288 }}},
51 [SAA6752HS_VF_UNKNOWN
] =
52 { .fmt
= { .pix
= { .width
= 0, .height
= 0}}},
55 struct saa6752hs_state
{
56 struct i2c_client client
;
57 struct v4l2_mpeg_compression params
;
58 enum saa6752hs_videoformat video_format
;
62 enum saa6752hs_command
{
63 SAA6752HS_COMMAND_RESET
= 0,
64 SAA6752HS_COMMAND_STOP
= 1,
65 SAA6752HS_COMMAND_START
= 2,
66 SAA6752HS_COMMAND_PAUSE
= 3,
67 SAA6752HS_COMMAND_RECONFIGURE
= 4,
68 SAA6752HS_COMMAND_SLEEP
= 5,
69 SAA6752HS_COMMAND_RECONFIGURE_FORCE
= 6,
74 /* ---------------------------------------------------------------------- */
77 0xc2, /* i2c register */
78 0x00, /* table number for encoder */
81 0x40, 0x00, /* transport_error_indicator(0), payload_unit_start(1), transport_priority(0), pid(0) */
82 0x10, /* transport_scrambling_control(00), adaptation_field_control(01), continuity_counter(0) */
84 0x00, /* PSI pointer to start of table */
87 0xb0, 0x0d, /* section_syntax_indicator(1), section_length(13) */
89 0x00, 0x01, /* transport_stream_id(1) */
91 0xc1, /* version_number(0), current_next_indicator(1) */
93 0x00, 0x00, /* section_number(0), last_section_number(0) */
95 0x00, 0x01, /* program_number(1) */
97 0xe0, 0x00, /* PMT PID */
99 0x00, 0x00, 0x00, 0x00 /* CRC32 */
103 0xc2, /* i2c register */
104 0x01, /* table number for encoder */
107 0x40, 0x00, /* transport_error_indicator(0), payload_unit_start(1), transport_priority(0), pid */
108 0x10, /* transport_scrambling_control(00), adaptation_field_control(01), continuity_counter(0) */
110 0x00, /* PSI pointer to start of table */
113 0xb0, 0x17, /* section_syntax_indicator(1), section_length(23) */
115 0x00, 0x01, /* program_number(1) */
117 0xc1, /* version_number(0), current_next_indicator(1) */
119 0x00, 0x00, /* section_number(0), last_section_number(0) */
121 0xe0, 0x00, /* PCR_PID */
123 0xf0, 0x00, /* program_info_length(0) */
125 0x02, 0xe0, 0x00, 0xf0, 0x00, /* video stream type(2), pid */
126 0x04, 0xe0, 0x00, 0xf0, 0x00, /* audio stream type(4), pid */
128 0x00, 0x00, 0x00, 0x00 /* CRC32 */
131 static struct v4l2_mpeg_compression param_defaults
=
133 .st_type
= V4L2_MPEG_TS_2
,
135 .mode
= V4L2_BITRATE_CBR
,
144 .vi_type
= V4L2_MPEG_VI_2
,
145 .vi_aspect_ratio
= V4L2_MPEG_ASPECT_4_3
,
147 .mode
= V4L2_BITRATE_VBR
,
152 .au_type
= V4L2_MPEG_AU_2_II
,
154 .mode
= V4L2_BITRATE_CBR
,
160 /* ---------------------------------------------------------------------- */
162 static int saa6752hs_chip_command(struct i2c_client
* client
,
163 enum saa6752hs_command command
)
165 unsigned char buf
[3];
166 unsigned long timeout
;
169 /* execute the command */
171 case SAA6752HS_COMMAND_RESET
:
175 case SAA6752HS_COMMAND_STOP
:
179 case SAA6752HS_COMMAND_START
:
183 case SAA6752HS_COMMAND_PAUSE
:
187 case SAA6752HS_COMMAND_RECONFIGURE
:
191 case SAA6752HS_COMMAND_SLEEP
:
195 case SAA6752HS_COMMAND_RECONFIGURE_FORCE
:
203 /* set it and wait for it to be so */
204 i2c_master_send(client
, buf
, 1);
205 timeout
= jiffies
+ HZ
* 3;
207 /* get the current status */
209 i2c_master_send(client
, buf
, 1);
210 i2c_master_recv(client
, buf
, 1);
212 if (!(buf
[0] & 0x20))
214 if (time_after(jiffies
,timeout
)) {
222 /* delay a bit to let encoder settle */
229 static int saa6752hs_set_bitrate(struct i2c_client
* client
,
230 struct v4l2_mpeg_compression
* params
)
234 /* set the bitrate mode */
236 buf
[1] = (params
->vi_bitrate
.mode
== V4L2_BITRATE_VBR
) ? 0 : 1;
237 i2c_master_send(client
, buf
, 2);
239 /* set the video bitrate */
240 if (params
->vi_bitrate
.mode
== V4L2_BITRATE_VBR
) {
241 /* set the target bitrate */
243 buf
[1] = params
->vi_bitrate
.target
>> 8;
244 buf
[2] = params
->vi_bitrate
.target
& 0xff;
245 i2c_master_send(client
, buf
, 3);
247 /* set the max bitrate */
249 buf
[1] = params
->vi_bitrate
.max
>> 8;
250 buf
[2] = params
->vi_bitrate
.max
& 0xff;
251 i2c_master_send(client
, buf
, 3);
253 /* set the target bitrate (no max bitrate for CBR) */
255 buf
[1] = params
->vi_bitrate
.target
>> 8;
256 buf
[2] = params
->vi_bitrate
.target
& 0xff;
257 i2c_master_send(client
, buf
, 3);
260 /* set the audio bitrate */
262 buf
[1] = (256 == params
->au_bitrate
.target
) ? 0 : 1;
263 i2c_master_send(client
, buf
, 2);
265 /* set the total bitrate */
267 buf
[1] = params
->st_bitrate
.target
>> 8;
268 buf
[2] = params
->st_bitrate
.target
& 0xff;
269 i2c_master_send(client
, buf
, 3);
274 static void saa6752hs_set_subsampling(struct i2c_client
* client
,
275 struct v4l2_format
* f
)
277 struct saa6752hs_state
*h
= i2c_get_clientdata(client
);
278 int dist_352
, dist_480
, dist_720
;
281 FIXME: translate and round width/height into EMPRESS
285 ---------------------------
286 SIF | 352x288 | 352x240
287 1/2 D1 | 352x576 | 352x480
288 2/3 D1 | 480x576 | 480x480
289 D1 | 720x576 | 720x480
292 dist_352
= abs(f
->fmt
.pix
.width
- 352);
293 dist_480
= abs(f
->fmt
.pix
.width
- 480);
294 dist_720
= abs(f
->fmt
.pix
.width
- 720);
295 if (dist_720
< dist_480
) {
296 f
->fmt
.pix
.width
= 720;
297 f
->fmt
.pix
.height
= 576;
298 h
->video_format
= SAA6752HS_VF_D1
;
300 else if (dist_480
< dist_352
) {
301 f
->fmt
.pix
.width
= 480;
302 f
->fmt
.pix
.height
= 576;
303 h
->video_format
= SAA6752HS_VF_2_3_D1
;
306 f
->fmt
.pix
.width
= 352;
307 if (abs(f
->fmt
.pix
.height
- 576) <
308 abs(f
->fmt
.pix
.height
- 288)) {
309 f
->fmt
.pix
.height
= 576;
310 h
->video_format
= SAA6752HS_VF_1_2_D1
;
313 f
->fmt
.pix
.height
= 288;
314 h
->video_format
= SAA6752HS_VF_SIF
;
320 static void saa6752hs_set_params(struct i2c_client
* client
,
321 struct v4l2_mpeg_compression
* params
)
323 struct saa6752hs_state
*h
= i2c_get_clientdata(client
);
326 if (params
->ts_pid_pmt
<= MPEG_PID_MAX
)
327 h
->params
.ts_pid_pmt
= params
->ts_pid_pmt
;
328 if (params
->ts_pid_pcr
<= MPEG_PID_MAX
)
329 h
->params
.ts_pid_pcr
= params
->ts_pid_pcr
;
330 if (params
->ts_pid_video
<= MPEG_PID_MAX
)
331 h
->params
.ts_pid_video
= params
->ts_pid_video
;
332 if (params
->ts_pid_audio
<= MPEG_PID_MAX
)
333 h
->params
.ts_pid_audio
= params
->ts_pid_audio
;
335 /* check bitrate parameters */
336 if ((params
->vi_bitrate
.mode
== V4L2_BITRATE_CBR
) ||
337 (params
->vi_bitrate
.mode
== V4L2_BITRATE_VBR
))
338 h
->params
.vi_bitrate
.mode
= params
->vi_bitrate
.mode
;
339 if (params
->vi_bitrate
.mode
!= V4L2_BITRATE_NONE
)
340 h
->params
.st_bitrate
.target
= params
->st_bitrate
.target
;
341 if (params
->vi_bitrate
.mode
!= V4L2_BITRATE_NONE
)
342 h
->params
.vi_bitrate
.target
= params
->vi_bitrate
.target
;
343 if (params
->vi_bitrate
.mode
== V4L2_BITRATE_VBR
)
344 h
->params
.vi_bitrate
.max
= params
->vi_bitrate
.max
;
345 if (params
->au_bitrate
.mode
!= V4L2_BITRATE_NONE
)
346 h
->params
.au_bitrate
.target
= params
->au_bitrate
.target
;
349 if (params
->vi_aspect_ratio
== V4L2_MPEG_ASPECT_4_3
||
350 params
->vi_aspect_ratio
== V4L2_MPEG_ASPECT_16_9
)
351 h
->params
.vi_aspect_ratio
= params
->vi_aspect_ratio
;
354 if (h
->params
.st_bitrate
.target
> MPEG_TOTAL_TARGET_BITRATE_MAX
)
355 h
->params
.st_bitrate
.target
= MPEG_TOTAL_TARGET_BITRATE_MAX
;
356 if (h
->params
.vi_bitrate
.target
> MPEG_VIDEO_TARGET_BITRATE_MAX
)
357 h
->params
.vi_bitrate
.target
= MPEG_VIDEO_TARGET_BITRATE_MAX
;
358 if (h
->params
.vi_bitrate
.max
> MPEG_VIDEO_MAX_BITRATE_MAX
)
359 h
->params
.vi_bitrate
.max
= MPEG_VIDEO_MAX_BITRATE_MAX
;
360 if (h
->params
.au_bitrate
.target
<= 256)
361 h
->params
.au_bitrate
.target
= 256;
363 h
->params
.au_bitrate
.target
= 384;
366 static int saa6752hs_init(struct i2c_client
* client
)
368 unsigned char buf
[9], buf2
[4];
369 struct saa6752hs_state
*h
;
371 unsigned char localPAT
[256];
372 unsigned char localPMT
[256];
374 h
= i2c_get_clientdata(client
);
376 /* Set video format - must be done first as it resets other settings */
378 buf
[1] = h
->video_format
;
379 i2c_master_send(client
, buf
, 2);
381 /* Set number of lines in input signal */
384 if (h
->standard
& V4L2_STD_525_60
)
386 i2c_master_send(client
, buf
, 2);
389 saa6752hs_set_bitrate(client
, &h
->params
);
391 /* Set GOP structure {3, 13} */
395 i2c_master_send(client
,buf
,3);
397 /* Set minimum Q-scale {4} */
400 i2c_master_send(client
,buf
,2);
402 /* Set maximum Q-scale {12} */
405 i2c_master_send(client
,buf
,2);
407 /* Set Output Protocol */
410 i2c_master_send(client
,buf
,2);
412 /* Set video output stream format {TS} */
415 i2c_master_send(client
,buf
,2);
418 memcpy(localPAT
, PAT
, sizeof(PAT
));
419 localPAT
[17] = 0xe0 | ((h
->params
.ts_pid_pmt
>> 8) & 0x0f);
420 localPAT
[18] = h
->params
.ts_pid_pmt
& 0xff;
421 crc
= crc32_be(~0, &localPAT
[7], sizeof(PAT
) - 7 - 4);
422 localPAT
[sizeof(PAT
) - 4] = (crc
>> 24) & 0xFF;
423 localPAT
[sizeof(PAT
) - 3] = (crc
>> 16) & 0xFF;
424 localPAT
[sizeof(PAT
) - 2] = (crc
>> 8) & 0xFF;
425 localPAT
[sizeof(PAT
) - 1] = crc
& 0xFF;
428 memcpy(localPMT
, PMT
, sizeof(PMT
));
429 localPMT
[3] = 0x40 | ((h
->params
.ts_pid_pmt
>> 8) & 0x0f);
430 localPMT
[4] = h
->params
.ts_pid_pmt
& 0xff;
431 localPMT
[15] = 0xE0 | ((h
->params
.ts_pid_pcr
>> 8) & 0x0F);
432 localPMT
[16] = h
->params
.ts_pid_pcr
& 0xFF;
433 localPMT
[20] = 0xE0 | ((h
->params
.ts_pid_video
>> 8) & 0x0F);
434 localPMT
[21] = h
->params
.ts_pid_video
& 0xFF;
435 localPMT
[25] = 0xE0 | ((h
->params
.ts_pid_audio
>> 8) & 0x0F);
436 localPMT
[26] = h
->params
.ts_pid_audio
& 0xFF;
437 crc
= crc32_be(~0, &localPMT
[7], sizeof(PMT
) - 7 - 4);
438 localPMT
[sizeof(PMT
) - 4] = (crc
>> 24) & 0xFF;
439 localPMT
[sizeof(PMT
) - 3] = (crc
>> 16) & 0xFF;
440 localPMT
[sizeof(PMT
) - 2] = (crc
>> 8) & 0xFF;
441 localPMT
[sizeof(PMT
) - 1] = crc
& 0xFF;
445 buf
[1] = (h
->params
.ts_pid_audio
>> 8) & 0xFF;
446 buf
[2] = h
->params
.ts_pid_audio
& 0xFF;
447 i2c_master_send(client
,buf
,3);
451 buf
[1] = (h
->params
.ts_pid_video
>> 8) & 0xFF;
452 buf
[2] = h
->params
.ts_pid_video
& 0xFF;
453 i2c_master_send(client
,buf
,3);
457 buf
[1] = (h
->params
.ts_pid_pcr
>> 8) & 0xFF;
458 buf
[2] = h
->params
.ts_pid_pcr
& 0xFF;
459 i2c_master_send(client
,buf
,3);
462 i2c_master_send(client
,localPAT
,sizeof(PAT
));
463 i2c_master_send(client
,localPMT
,sizeof(PMT
));
465 /* mute then unmute audio. This removes buzzing artefacts */
468 i2c_master_send(client
, buf
, 2);
470 i2c_master_send(client
, buf
, 2);
473 saa6752hs_chip_command(client
, SAA6752HS_COMMAND_START
);
475 /* readout current state */
481 i2c_master_send(client
, buf
, 5);
482 i2c_master_recv(client
, buf2
, 4);
484 /* change aspect ratio */
491 switch(h
->params
.vi_aspect_ratio
) {
492 case V4L2_MPEG_ASPECT_16_9
:
493 buf
[6] = buf2
[1] | 0x40;
495 case V4L2_MPEG_ASPECT_4_3
:
497 buf
[6] = buf2
[1] & 0xBF;
503 i2c_master_send(client
, buf
, 9);
508 static int saa6752hs_attach(struct i2c_adapter
*adap
, int addr
, int kind
)
510 struct saa6752hs_state
*h
;
512 printk("saa6752hs: chip found @ 0x%x\n", addr
<<1);
514 if (NULL
== (h
= kmalloc(sizeof(*h
), GFP_KERNEL
)))
516 memset(h
,0,sizeof(*h
));
517 h
->client
= client_template
;
518 h
->params
= param_defaults
;
519 h
->client
.adapter
= adap
;
520 h
->client
.addr
= addr
;
522 /* Assume 625 input lines */
525 i2c_set_clientdata(&h
->client
, h
);
526 i2c_attach_client(&h
->client
);
531 static int saa6752hs_probe(struct i2c_adapter
*adap
)
533 if (adap
->class & I2C_CLASS_TV_ANALOG
)
534 return i2c_probe(adap
, &addr_data
, saa6752hs_attach
);
538 static int saa6752hs_detach(struct i2c_client
*client
)
540 struct saa6752hs_state
*h
;
542 h
= i2c_get_clientdata(client
);
543 i2c_detach_client(client
);
549 saa6752hs_command(struct i2c_client
*client
, unsigned int cmd
, void *arg
)
551 struct saa6752hs_state
*h
= i2c_get_clientdata(client
);
552 struct v4l2_mpeg_compression
*params
= arg
;
556 case VIDIOC_S_MPEGCOMP
:
557 if (NULL
== params
) {
558 /* apply settings and start encoder */
559 saa6752hs_init(client
);
562 saa6752hs_set_params(client
, params
);
564 case VIDIOC_G_MPEGCOMP
:
569 struct v4l2_format
*f
= arg
;
571 if (h
->video_format
== SAA6752HS_VF_UNKNOWN
)
572 h
->video_format
= SAA6752HS_VF_D1
;
574 v4l2_format_table
[h
->video_format
].fmt
.pix
.width
;
576 v4l2_format_table
[h
->video_format
].fmt
.pix
.height
;
581 struct v4l2_format
*f
= arg
;
583 saa6752hs_set_subsampling(client
, f
);
587 h
->standard
= *((v4l2_std_id
*) arg
);
597 /* ----------------------------------------------------------------------- */
599 static struct i2c_driver driver
= {
600 .owner
= THIS_MODULE
,
601 .name
= "i2c saa6752hs MPEG encoder",
602 .id
= I2C_DRIVERID_SAA6752HS
,
603 .flags
= I2C_DF_NOTIFY
,
604 .attach_adapter
= saa6752hs_probe
,
605 .detach_client
= saa6752hs_detach
,
606 .command
= saa6752hs_command
,
609 static struct i2c_client client_template
=
612 .flags
= I2C_CLIENT_ALLOW_USE
,
616 static int __init
saa6752hs_init_module(void)
618 return i2c_add_driver(&driver
);
621 static void __exit
saa6752hs_cleanup_module(void)
623 i2c_del_driver(&driver
);
626 module_init(saa6752hs_init_module
);
627 module_exit(saa6752hs_cleanup_module
);
630 * Overrides for Emacs so that we follow Linus's tabbing style.
631 * ---------------------------------------------------------------------------