av_log() patch by (Michel Bardiaux <mbardiaux at peaktime dot be>)
[libav.git] / libavformat / grab.c
1 /*
2 * Linux video grab interface
3 * Copyright (c) 2000,2001 Fabrice Bellard.
4 *
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2 of the License, or (at your option) any later version.
9 *
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
14 *
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18 */
19 #include "avformat.h"
20 #include <unistd.h>
21 #include <fcntl.h>
22 #include <sys/ioctl.h>
23 #include <sys/mman.h>
24 #include <sys/time.h>
25 #define _LINUX_TIME_H 1
26 #include <linux/videodev.h>
27 #include <time.h>
28
29 typedef struct {
30 int fd;
31 int frame_format; /* see VIDEO_PALETTE_xxx */
32 int use_mmap;
33 int width, height;
34 int frame_rate;
35 int frame_rate_base;
36 int64_t time_frame;
37 int frame_size;
38 struct video_capability video_cap;
39 struct video_audio audio_saved;
40 uint8_t *video_buf;
41 struct video_mbuf gb_buffers;
42 struct video_mmap gb_buf;
43 int gb_frame;
44
45 /* ATI All In Wonder specific stuff */
46 /* XXX: remove and merge in libavcodec/imgconvert.c */
47 int aiw_enabled;
48 int deint;
49 int halfw;
50 uint8_t *src_mem;
51 uint8_t *lum_m4_mem;
52 } VideoData;
53
54 static int aiw_init(VideoData *s);
55 static int aiw_read_picture(VideoData *s, uint8_t *data);
56 static int aiw_close(VideoData *s);
57
58 static int grab_read_header(AVFormatContext *s1, AVFormatParameters *ap)
59 {
60 VideoData *s = s1->priv_data;
61 AVStream *st;
62 int width, height;
63 int video_fd, frame_size;
64 int ret, frame_rate, frame_rate_base;
65 int desired_palette;
66 struct video_tuner tuner;
67 struct video_audio audio;
68 const char *video_device;
69
70 if (!ap || ap->width <= 0 || ap->height <= 0 || ap->frame_rate <= 0)
71 return -1;
72
73 width = ap->width;
74 height = ap->height;
75 frame_rate = ap->frame_rate;
76 frame_rate_base = ap->frame_rate_base;
77
78 st = av_new_stream(s1, 0);
79 if (!st)
80 return -ENOMEM;
81
82 s->width = width;
83 s->height = height;
84 s->frame_rate = frame_rate;
85 s->frame_rate_base = frame_rate_base;
86
87 video_device = ap->device;
88 if (!video_device)
89 video_device = "/dev/video";
90 video_fd = open(video_device, O_RDWR);
91 if (video_fd < 0) {
92 perror(video_device);
93 goto fail;
94 }
95
96 if (ioctl(video_fd,VIDIOCGCAP, &s->video_cap) < 0) {
97 perror("VIDIOCGCAP");
98 goto fail;
99 }
100
101 if (!(s->video_cap.type & VID_TYPE_CAPTURE)) {
102 av_log(s1, AV_LOG_ERROR, "Fatal: grab device does not handle capture\n");
103 goto fail;
104 }
105
106 desired_palette = -1;
107 if (st->codec.pix_fmt == PIX_FMT_YUV420P) {
108 desired_palette = VIDEO_PALETTE_YUV420P;
109 } else if (st->codec.pix_fmt == PIX_FMT_YUV422) {
110 desired_palette = VIDEO_PALETTE_YUV422;
111 } else if (st->codec.pix_fmt == PIX_FMT_BGR24) {
112 desired_palette = VIDEO_PALETTE_RGB24;
113 }
114
115 /* set tv standard */
116 if (ap->standard && !ioctl(video_fd, VIDIOCGTUNER, &tuner)) {
117 if (!strcasecmp(ap->standard, "pal"))
118 tuner.mode = VIDEO_MODE_PAL;
119 else if (!strcasecmp(ap->standard, "secam"))
120 tuner.mode = VIDEO_MODE_SECAM;
121 else
122 tuner.mode = VIDEO_MODE_NTSC;
123 ioctl(video_fd, VIDIOCSTUNER, &tuner);
124 }
125
126 /* unmute audio */
127 audio.audio = 0;
128 ioctl(video_fd, VIDIOCGAUDIO, &audio);
129 memcpy(&s->audio_saved, &audio, sizeof(audio));
130 audio.flags &= ~VIDEO_AUDIO_MUTE;
131 ioctl(video_fd, VIDIOCSAUDIO, &audio);
132
133 ret = ioctl(video_fd,VIDIOCGMBUF,&s->gb_buffers);
134 if (ret < 0) {
135 /* try to use read based access */
136 struct video_window win;
137 struct video_picture pict;
138 int val;
139
140 win.x = 0;
141 win.y = 0;
142 win.width = width;
143 win.height = height;
144 win.chromakey = -1;
145 win.flags = 0;
146
147 ioctl(video_fd, VIDIOCSWIN, &win);
148
149 ioctl(video_fd, VIDIOCGPICT, &pict);
150 #if 0
151 printf("v4l: colour=%d hue=%d brightness=%d constrast=%d whiteness=%d\n",
152 pict.colour,
153 pict.hue,
154 pict.brightness,
155 pict.contrast,
156 pict.whiteness);
157 #endif
158 /* try to choose a suitable video format */
159 pict.palette = desired_palette;
160 if (desired_palette == -1 || (ret = ioctl(video_fd, VIDIOCSPICT, &pict)) < 0) {
161 pict.palette=VIDEO_PALETTE_YUV420P;
162 ret = ioctl(video_fd, VIDIOCSPICT, &pict);
163 if (ret < 0) {
164 pict.palette=VIDEO_PALETTE_YUV422;
165 ret = ioctl(video_fd, VIDIOCSPICT, &pict);
166 if (ret < 0) {
167 pict.palette=VIDEO_PALETTE_RGB24;
168 ret = ioctl(video_fd, VIDIOCSPICT, &pict);
169 if (ret < 0)
170 goto fail1;
171 }
172 }
173 }
174
175 s->frame_format = pict.palette;
176
177 val = 1;
178 ioctl(video_fd, VIDIOCCAPTURE, &val);
179
180 s->time_frame = av_gettime();
181 s->use_mmap = 0;
182
183 /* ATI All In Wonder automatic activation */
184 if (!strcmp(s->video_cap.name, "Km")) {
185 if (aiw_init(s) < 0)
186 goto fail;
187 s->aiw_enabled = 1;
188 /* force 420P format because convertion from YUV422 to YUV420P
189 is done in this driver (ugly) */
190 s->frame_format = VIDEO_PALETTE_YUV420P;
191 }
192 } else {
193 s->video_buf = mmap(0,s->gb_buffers.size,PROT_READ|PROT_WRITE,MAP_SHARED,video_fd,0);
194 if ((unsigned char*)-1 == s->video_buf) {
195 perror("mmap");
196 goto fail;
197 }
198 s->gb_frame = 0;
199 s->time_frame = av_gettime();
200
201 /* start to grab the first frame */
202 s->gb_buf.frame = s->gb_frame % s->gb_buffers.frames;
203 s->gb_buf.height = height;
204 s->gb_buf.width = width;
205 s->gb_buf.format = desired_palette;
206
207 if (desired_palette == -1 || (ret = ioctl(video_fd, VIDIOCMCAPTURE, &s->gb_buf)) < 0) {
208 s->gb_buf.format = VIDEO_PALETTE_YUV420P;
209
210 ret = ioctl(video_fd, VIDIOCMCAPTURE, &s->gb_buf);
211 if (ret < 0 && errno != EAGAIN) {
212 /* try YUV422 */
213 s->gb_buf.format = VIDEO_PALETTE_YUV422;
214
215 ret = ioctl(video_fd, VIDIOCMCAPTURE, &s->gb_buf);
216 if (ret < 0 && errno != EAGAIN) {
217 /* try RGB24 */
218 s->gb_buf.format = VIDEO_PALETTE_RGB24;
219 ret = ioctl(video_fd, VIDIOCMCAPTURE, &s->gb_buf);
220 }
221 }
222 }
223 if (ret < 0) {
224 if (errno != EAGAIN) {
225 fail1:
226 av_log(s1, AV_LOG_ERROR, "Fatal: grab device does not support suitable format\n");
227 } else {
228 av_log(s1, AV_LOG_ERROR,"Fatal: grab device does not receive any video signal\n");
229 }
230 goto fail;
231 }
232 s->frame_format = s->gb_buf.format;
233 s->use_mmap = 1;
234 }
235
236 switch(s->frame_format) {
237 case VIDEO_PALETTE_YUV420P:
238 frame_size = (width * height * 3) / 2;
239 st->codec.pix_fmt = PIX_FMT_YUV420P;
240 break;
241 case VIDEO_PALETTE_YUV422:
242 frame_size = width * height * 2;
243 st->codec.pix_fmt = PIX_FMT_YUV422;
244 break;
245 case VIDEO_PALETTE_RGB24:
246 frame_size = width * height * 3;
247 st->codec.pix_fmt = PIX_FMT_BGR24; /* NOTE: v4l uses BGR24, not RGB24 ! */
248 break;
249 default:
250 goto fail;
251 }
252 s->fd = video_fd;
253 s->frame_size = frame_size;
254
255 st->codec.codec_type = CODEC_TYPE_VIDEO;
256 st->codec.codec_id = CODEC_ID_RAWVIDEO;
257 st->codec.width = width;
258 st->codec.height = height;
259 st->codec.frame_rate = frame_rate;
260 st->codec.frame_rate_base = frame_rate_base;
261
262 av_set_pts_info(s1, 48, 1, 1000000); /* 48 bits pts in us */
263
264 return 0;
265 fail:
266 if (video_fd >= 0)
267 close(video_fd);
268 av_free(st);
269 return -EIO;
270 }
271
272 static int v4l_mm_read_picture(VideoData *s, uint8_t *buf)
273 {
274 uint8_t *ptr;
275
276 /* Setup to capture the next frame */
277 s->gb_buf.frame = (s->gb_frame + 1) % s->gb_buffers.frames;
278 if (ioctl(s->fd, VIDIOCMCAPTURE, &s->gb_buf) < 0) {
279 if (errno == EAGAIN)
280 av_log(NULL, AV_LOG_ERROR, "Cannot Sync\n");
281 else
282 perror("VIDIOCMCAPTURE");
283 return -EIO;
284 }
285
286 while (ioctl(s->fd, VIDIOCSYNC, &s->gb_frame) < 0 &&
287 (errno == EAGAIN || errno == EINTR));
288
289 ptr = s->video_buf + s->gb_buffers.offsets[s->gb_frame];
290 memcpy(buf, ptr, s->frame_size);
291
292 /* This is now the grabbing frame */
293 s->gb_frame = s->gb_buf.frame;
294
295 return s->frame_size;
296 }
297
298 static int grab_read_packet(AVFormatContext *s1, AVPacket *pkt)
299 {
300 VideoData *s = s1->priv_data;
301 int64_t curtime, delay;
302 struct timespec ts;
303 int64_t per_frame = (int64_t_C(1000000) * s->frame_rate_base) / s->frame_rate;
304
305 /* Calculate the time of the next frame */
306 s->time_frame += per_frame;
307
308 /* wait based on the frame rate */
309 for(;;) {
310 curtime = av_gettime();
311 delay = s->time_frame - curtime;
312 if (delay <= 0) {
313 if (delay < -per_frame) {
314 /* printf("grabbing is %d frames late (dropping)\n", (int) -(delay / 16666)); */
315 s->time_frame += per_frame;
316 }
317 break;
318 }
319 ts.tv_sec = delay / 1000000;
320 ts.tv_nsec = (delay % 1000000) * 1000;
321 nanosleep(&ts, NULL);
322 }
323
324 if (av_new_packet(pkt, s->frame_size) < 0)
325 return -EIO;
326
327 pkt->pts = curtime & ((1LL << 48) - 1);
328
329 /* read one frame */
330 if (s->aiw_enabled) {
331 return aiw_read_picture(s, pkt->data);
332 } else if (s->use_mmap) {
333 return v4l_mm_read_picture(s, pkt->data);
334 } else {
335 if (read(s->fd, pkt->data, pkt->size) != pkt->size)
336 return -EIO;
337 return s->frame_size;
338 }
339 }
340
341 static int grab_read_close(AVFormatContext *s1)
342 {
343 VideoData *s = s1->priv_data;
344
345 if (s->aiw_enabled)
346 aiw_close(s);
347
348 if (s->use_mmap)
349 munmap(s->video_buf, s->gb_buffers.size);
350
351 /* mute audio. we must force it because the BTTV driver does not
352 return its state correctly */
353 s->audio_saved.flags |= VIDEO_AUDIO_MUTE;
354 ioctl(s->fd, VIDIOCSAUDIO, &s->audio_saved);
355
356 close(s->fd);
357 return 0;
358 }
359
360 static AVInputFormat video_grab_device_format = {
361 "video4linux",
362 "video grab",
363 sizeof(VideoData),
364 NULL,
365 grab_read_header,
366 grab_read_packet,
367 grab_read_close,
368 .flags = AVFMT_NOFILE,
369 };
370
371 /* All in Wonder specific stuff */
372 /* XXX: remove and merge in libavcodec/imgconvert.c */
373
374 static int aiw_init(VideoData *s)
375 {
376 int width, height;
377
378 width = s->width;
379 height = s->height;
380
381 if ((width == s->video_cap.maxwidth && height == s->video_cap.maxheight) ||
382 (width == s->video_cap.maxwidth && height == s->video_cap.maxheight*2) ||
383 (width == s->video_cap.maxwidth/2 && height == s->video_cap.maxheight)) {
384
385 s->deint=0;
386 s->halfw=0;
387 if (height == s->video_cap.maxheight*2) s->deint=1;
388 if (width == s->video_cap.maxwidth/2) s->halfw=1;
389 } else {
390 av_log(NULL, AV_LOG_ERROR, "\nIncorrect Grab Size Supplied - Supported Sizes Are:\n");
391 av_log(NULL, AV_LOG_ERROR, " %dx%d %dx%d %dx%d\n\n",
392 s->video_cap.maxwidth,s->video_cap.maxheight,
393 s->video_cap.maxwidth,s->video_cap.maxheight*2,
394 s->video_cap.maxwidth/2,s->video_cap.maxheight);
395 goto fail;
396 }
397
398 if (s->halfw == 0) {
399 s->src_mem = av_malloc(s->width*2);
400 } else {
401 s->src_mem = av_malloc(s->width*4);
402 }
403 if (!s->src_mem) goto fail;
404
405 s->lum_m4_mem = av_malloc(s->width);
406 if (!s->lum_m4_mem)
407 goto fail;
408 return 0;
409 fail:
410 av_freep(&s->src_mem);
411 av_freep(&s->lum_m4_mem);
412 return -1;
413 }
414
415 #ifdef HAVE_MMX
416 #include "../libavcodec/i386/mmx.h"
417
418 #define LINE_WITH_UV \
419 movq_m2r(ptr[0],mm0); \
420 movq_m2r(ptr[8],mm1); \
421 movq_r2r(mm0, mm4); \
422 punpcklbw_r2r(mm1,mm0); \
423 punpckhbw_r2r(mm1,mm4); \
424 movq_r2r(mm0,mm5); \
425 punpcklbw_r2r(mm4,mm0); \
426 punpckhbw_r2r(mm4,mm5); \
427 movq_r2r(mm0,mm1); \
428 punpcklbw_r2r(mm5,mm1); \
429 movq_r2m(mm1,lum[0]); \
430 movq_m2r(ptr[16],mm2); \
431 movq_m2r(ptr[24],mm1); \
432 movq_r2r(mm2,mm4); \
433 punpcklbw_r2r(mm1,mm2); \
434 punpckhbw_r2r(mm1,mm4); \
435 movq_r2r(mm2,mm3); \
436 punpcklbw_r2r(mm4,mm2); \
437 punpckhbw_r2r(mm4,mm3); \
438 movq_r2r(mm2,mm1); \
439 punpcklbw_r2r(mm3,mm1); \
440 movq_r2m(mm1,lum[8]); \
441 punpckhdq_r2r(mm2,mm0); \
442 punpckhdq_r2r(mm3,mm5); \
443 movq_r2m(mm0,cb[0]); \
444 movq_r2m(mm5,cr[0]);
445
446 #define LINE_NO_UV \
447 movq_m2r(ptr[0],mm0);\
448 movq_m2r(ptr[8],mm1);\
449 movq_r2r(mm0, mm4);\
450 punpcklbw_r2r(mm1,mm0); \
451 punpckhbw_r2r(mm1,mm4);\
452 movq_r2r(mm0,mm5);\
453 punpcklbw_r2r(mm4,mm0);\
454 punpckhbw_r2r(mm4,mm5);\
455 movq_r2r(mm0,mm1);\
456 punpcklbw_r2r(mm5,mm1);\
457 movq_r2m(mm1,lum[0]);\
458 movq_m2r(ptr[16],mm2);\
459 movq_m2r(ptr[24],mm1);\
460 movq_r2r(mm2,mm4);\
461 punpcklbw_r2r(mm1,mm2);\
462 punpckhbw_r2r(mm1,mm4);\
463 movq_r2r(mm2,mm3);\
464 punpcklbw_r2r(mm4,mm2);\
465 punpckhbw_r2r(mm4,mm3);\
466 movq_r2r(mm2,mm1);\
467 punpcklbw_r2r(mm3,mm1);\
468 movq_r2m(mm1,lum[8]);
469
470 #define LINE_WITHUV_AVG \
471 movq_m2r(ptr[0], mm0);\
472 movq_m2r(ptr[8], mm1);\
473 movq_r2r(mm0, mm4);\
474 punpcklbw_r2r(mm1,mm0);\
475 punpckhbw_r2r(mm1,mm4);\
476 movq_r2r(mm0,mm5);\
477 punpcklbw_r2r(mm4,mm0);\
478 punpckhbw_r2r(mm4,mm5);\
479 movq_r2r(mm0,mm1);\
480 movq_r2r(mm5,mm2);\
481 punpcklbw_r2r(mm7,mm1);\
482 punpcklbw_r2r(mm7,mm2);\
483 paddw_r2r(mm6,mm1);\
484 paddw_r2r(mm2,mm1);\
485 psraw_i2r(1,mm1);\
486 packuswb_r2r(mm7,mm1);\
487 movd_r2m(mm1,lum[0]);\
488 movq_m2r(ptr[16],mm2);\
489 movq_m2r(ptr[24],mm1);\
490 movq_r2r(mm2,mm4);\
491 punpcklbw_r2r(mm1,mm2);\
492 punpckhbw_r2r(mm1,mm4);\
493 movq_r2r(mm2,mm3);\
494 punpcklbw_r2r(mm4,mm2);\
495 punpckhbw_r2r(mm4,mm3);\
496 movq_r2r(mm2,mm1);\
497 movq_r2r(mm3,mm4);\
498 punpcklbw_r2r(mm7,mm1);\
499 punpcklbw_r2r(mm7,mm4);\
500 paddw_r2r(mm6,mm1);\
501 paddw_r2r(mm4,mm1);\
502 psraw_i2r(1,mm1);\
503 packuswb_r2r(mm7,mm1);\
504 movd_r2m(mm1,lum[4]);\
505 punpckhbw_r2r(mm7,mm0);\
506 punpckhbw_r2r(mm7,mm2);\
507 paddw_r2r(mm6,mm0);\
508 paddw_r2r(mm2,mm0);\
509 psraw_i2r(1,mm0);\
510 packuswb_r2r(mm7,mm0);\
511 punpckhbw_r2r(mm7,mm5);\
512 punpckhbw_r2r(mm7,mm3);\
513 paddw_r2r(mm6,mm5);\
514 paddw_r2r(mm3,mm5);\
515 psraw_i2r(1,mm5);\
516 packuswb_r2r(mm7,mm5);\
517 movd_r2m(mm0,cb[0]);\
518 movd_r2m(mm5,cr[0]);
519
520 #define LINE_NOUV_AVG \
521 movq_m2r(ptr[0],mm0);\
522 movq_m2r(ptr[8],mm1);\
523 pand_r2r(mm5,mm0);\
524 pand_r2r(mm5,mm1);\
525 pmaddwd_r2r(mm6,mm0);\
526 pmaddwd_r2r(mm6,mm1);\
527 packssdw_r2r(mm1,mm0);\
528 paddw_r2r(mm6,mm0);\
529 psraw_i2r(1,mm0);\
530 movq_m2r(ptr[16],mm2);\
531 movq_m2r(ptr[24],mm3);\
532 pand_r2r(mm5,mm2);\
533 pand_r2r(mm5,mm3);\
534 pmaddwd_r2r(mm6,mm2);\
535 pmaddwd_r2r(mm6,mm3);\
536 packssdw_r2r(mm3,mm2);\
537 paddw_r2r(mm6,mm2);\
538 psraw_i2r(1,mm2);\
539 packuswb_r2r(mm2,mm0);\
540 movq_r2m(mm0,lum[0]);
541
542 #define DEINT_LINE_LUM(ptroff) \
543 movd_m2r(lum_m4[(ptroff)],mm0);\
544 movd_m2r(lum_m3[(ptroff)],mm1);\
545 movd_m2r(lum_m2[(ptroff)],mm2);\
546 movd_m2r(lum_m1[(ptroff)],mm3);\
547 movd_m2r(lum[(ptroff)],mm4);\
548 punpcklbw_r2r(mm7,mm0);\
549 movd_r2m(mm2,lum_m4[(ptroff)]);\
550 punpcklbw_r2r(mm7,mm1);\
551 punpcklbw_r2r(mm7,mm2);\
552 punpcklbw_r2r(mm7,mm3);\
553 punpcklbw_r2r(mm7,mm4);\
554 psllw_i2r(2,mm1);\
555 psllw_i2r(1,mm2);\
556 paddw_r2r(mm6,mm1);\
557 psllw_i2r(2,mm3);\
558 paddw_r2r(mm2,mm1);\
559 paddw_r2r(mm4,mm0);\
560 paddw_r2r(mm3,mm1);\
561 psubusw_r2r(mm0,mm1);\
562 psrlw_i2r(3,mm1);\
563 packuswb_r2r(mm7,mm1);\
564 movd_r2m(mm1,lum_m2[(ptroff)]);
565
566 #else
567 #include "../libavcodec/dsputil.h"
568
569 #define LINE_WITH_UV \
570 lum[0]=ptr[0];lum[1]=ptr[2];lum[2]=ptr[4];lum[3]=ptr[6];\
571 cb[0]=ptr[1];cb[1]=ptr[5];\
572 cr[0]=ptr[3];cr[1]=ptr[7];\
573 lum[4]=ptr[8];lum[5]=ptr[10];lum[6]=ptr[12];lum[7]=ptr[14];\
574 cb[2]=ptr[9];cb[3]=ptr[13];\
575 cr[2]=ptr[11];cr[3]=ptr[15];\
576 lum[8]=ptr[16];lum[9]=ptr[18];lum[10]=ptr[20];lum[11]=ptr[22];\
577 cb[4]=ptr[17];cb[5]=ptr[21];\
578 cr[4]=ptr[19];cr[5]=ptr[23];\
579 lum[12]=ptr[24];lum[13]=ptr[26];lum[14]=ptr[28];lum[15]=ptr[30];\
580 cb[6]=ptr[25];cb[7]=ptr[29];\
581 cr[6]=ptr[27];cr[7]=ptr[31];
582
583 #define LINE_NO_UV \
584 lum[0]=ptr[0];lum[1]=ptr[2];lum[2]=ptr[4];lum[3]=ptr[6];\
585 lum[4]=ptr[8];lum[5]=ptr[10];lum[6]=ptr[12];lum[7]=ptr[14];\
586 lum[8]=ptr[16];lum[9]=ptr[18];lum[10]=ptr[20];lum[11]=ptr[22];\
587 lum[12]=ptr[24];lum[13]=ptr[26];lum[14]=ptr[28];lum[15]=ptr[30];
588
589 #define LINE_WITHUV_AVG \
590 sum=(ptr[0]+ptr[2]+1) >> 1;lum[0]=sum; \
591 sum=(ptr[4]+ptr[6]+1) >> 1;lum[1]=sum; \
592 sum=(ptr[1]+ptr[5]+1) >> 1;cb[0]=sum; \
593 sum=(ptr[3]+ptr[7]+1) >> 1;cr[0]=sum; \
594 sum=(ptr[8]+ptr[10]+1) >> 1;lum[2]=sum; \
595 sum=(ptr[12]+ptr[14]+1) >> 1;lum[3]=sum; \
596 sum=(ptr[9]+ptr[13]+1) >> 1;cb[1]=sum; \
597 sum=(ptr[11]+ptr[15]+1) >> 1;cr[1]=sum; \
598 sum=(ptr[16]+ptr[18]+1) >> 1;lum[4]=sum; \
599 sum=(ptr[20]+ptr[22]+1) >> 1;lum[5]=sum; \
600 sum=(ptr[17]+ptr[21]+1) >> 1;cb[2]=sum; \
601 sum=(ptr[19]+ptr[23]+1) >> 1;cr[2]=sum; \
602 sum=(ptr[24]+ptr[26]+1) >> 1;lum[6]=sum; \
603 sum=(ptr[28]+ptr[30]+1) >> 1;lum[7]=sum; \
604 sum=(ptr[25]+ptr[29]+1) >> 1;cb[3]=sum; \
605 sum=(ptr[27]+ptr[31]+1) >> 1;cr[3]=sum;
606
607 #define LINE_NOUV_AVG \
608 sum=(ptr[0]+ptr[2]+1) >> 1;lum[0]=sum; \
609 sum=(ptr[4]+ptr[6]+1) >> 1;lum[1]=sum; \
610 sum=(ptr[8]+ptr[10]+1) >> 1;lum[2]=sum; \
611 sum=(ptr[12]+ptr[14]+1) >> 1;lum[3]=sum; \
612 sum=(ptr[16]+ptr[18]+1) >> 1;lum[4]=sum; \
613 sum=(ptr[20]+ptr[22]+1) >> 1;lum[5]=sum; \
614 sum=(ptr[24]+ptr[26]+1) >> 1;lum[6]=sum; \
615 sum=(ptr[28]+ptr[30]+1) >> 1;lum[7]=sum;
616
617 #define DEINT_LINE_LUM(ptroff) \
618 sum=(-lum_m4[(ptroff)]+(lum_m3[(ptroff)]<<2)+(lum_m2[(ptroff)]<<1)+(lum_m1[(ptroff)]<<2)-lum[(ptroff)]); \
619 lum_m4[(ptroff)]=lum_m2[(ptroff)];\
620 lum_m2[(ptroff)]=cm[(sum+4)>>3];\
621 sum=(-lum_m4[(ptroff)+1]+(lum_m3[(ptroff)+1]<<2)+(lum_m2[(ptroff)+1]<<1)+(lum_m1[(ptroff)+1]<<2)-lum[(ptroff)+1]); \
622 lum_m4[(ptroff)+1]=lum_m2[(ptroff)+1];\
623 lum_m2[(ptroff)+1]=cm[(sum+4)>>3];\
624 sum=(-lum_m4[(ptroff)+2]+(lum_m3[(ptroff)+2]<<2)+(lum_m2[(ptroff)+2]<<1)+(lum_m1[(ptroff)+2]<<2)-lum[(ptroff)+2]); \
625 lum_m4[(ptroff)+2]=lum_m2[(ptroff)+2];\
626 lum_m2[(ptroff)+2]=cm[(sum+4)>>3];\
627 sum=(-lum_m4[(ptroff)+3]+(lum_m3[(ptroff)+3]<<2)+(lum_m2[(ptroff)+3]<<1)+(lum_m1[(ptroff)+3]<<2)-lum[(ptroff)+3]); \
628 lum_m4[(ptroff)+3]=lum_m2[(ptroff)+3];\
629 lum_m2[(ptroff)+3]=cm[(sum+4)>>3];
630
631 #endif
632
633
634 /* Read two fields separately. */
635 static int aiw_read_picture(VideoData *s, uint8_t *data)
636 {
637 uint8_t *ptr, *lum, *cb, *cr;
638 int h;
639 #ifndef HAVE_MMX
640 int sum;
641 #endif
642 uint8_t* src = s->src_mem;
643 uint8_t *ptrend = &src[s->width*2];
644 lum=data;
645 cb=&lum[s->width*s->height];
646 cr=&cb[(s->width*s->height)/4];
647 if (s->deint == 0 && s->halfw == 0) {
648 while (read(s->fd,src,s->width*2) < 0) {
649 usleep(100);
650 }
651 for (h = 0; h < s->height-2; h+=2) {
652 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16, cb+=8, cr+=8) {
653 LINE_WITH_UV
654 }
655 read(s->fd,src,s->width*2);
656 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16) {
657 LINE_NO_UV
658 }
659 read(s->fd,src,s->width*2);
660 }
661 /*
662 * Do last two lines
663 */
664 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16, cb+=8, cr+=8) {
665 LINE_WITH_UV
666 }
667 read(s->fd,src,s->width*2);
668 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16) {
669 LINE_NO_UV
670 }
671 /* drop second field */
672 while (read(s->fd,src,s->width*2) < 0) {
673 usleep(100);
674 }
675 for (h = 0; h < s->height - 1; h++) {
676 read(s->fd,src,s->width*2);
677 }
678 } else if (s->halfw == 1) {
679 #ifdef HAVE_MMX
680 mmx_t rounder;
681 mmx_t masker;
682 rounder.uw[0]=1;
683 rounder.uw[1]=1;
684 rounder.uw[2]=1;
685 rounder.uw[3]=1;
686 masker.ub[0]=0xff;
687 masker.ub[1]=0;
688 masker.ub[2]=0xff;
689 masker.ub[3]=0;
690 masker.ub[4]=0xff;
691 masker.ub[5]=0;
692 masker.ub[6]=0xff;
693 masker.ub[7]=0;
694 pxor_r2r(mm7,mm7);
695 movq_m2r(rounder,mm6);
696 #endif
697 while (read(s->fd,src,s->width*4) < 0) {
698 usleep(100);
699 }
700 ptrend = &src[s->width*4];
701 for (h = 0; h < s->height-2; h+=2) {
702 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=8, cb+=4, cr+=4) {
703 LINE_WITHUV_AVG
704 }
705 read(s->fd,src,s->width*4);
706 #ifdef HAVE_MMX
707 movq_m2r(masker,mm5);
708 #endif
709 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=8) {
710 LINE_NOUV_AVG
711 }
712 read(s->fd,src,s->width*4);
713 }
714 /*
715 * Do last two lines
716 */
717 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=8, cb+=4, cr+=4) {
718 LINE_WITHUV_AVG
719 }
720 read(s->fd,src,s->width*4);
721 #ifdef HAVE_MMX
722 movq_m2r(masker,mm5);
723 #endif
724 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=8) {
725 LINE_NOUV_AVG
726 }
727 /* drop second field */
728 while (read(s->fd,src,s->width*4) < 0) {
729 usleep(100);
730 }
731 for (h = 0; h < s->height - 1; h++) {
732 read(s->fd,src,s->width*4);
733 }
734 } else {
735 uint8_t *lum_m1, *lum_m2, *lum_m3, *lum_m4;
736 #ifdef HAVE_MMX
737 mmx_t rounder;
738 rounder.uw[0]=4;
739 rounder.uw[1]=4;
740 rounder.uw[2]=4;
741 rounder.uw[3]=4;
742 movq_m2r(rounder,mm6);
743 pxor_r2r(mm7,mm7);
744 #else
745 uint8_t *cm = cropTbl + MAX_NEG_CROP;
746 #endif
747
748 /* read two fields and deinterlace them */
749 while (read(s->fd,src,s->width*2) < 0) {
750 usleep(100);
751 }
752 for (h = 0; h < (s->height/2)-2; h+=2) {
753 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16, cb+=8, cr+=8) {
754 LINE_WITH_UV
755 }
756 read(s->fd,src,s->width*2);
757 /* skip a luminance line - will be filled in later */
758 lum += s->width;
759 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16, cb+=8, cr+=8) {
760 LINE_WITH_UV
761 }
762 /* skip a luminance line - will be filled in later */
763 lum += s->width;
764 read(s->fd,src,s->width*2);
765 }
766 /*
767 * Do last two lines
768 */
769 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16, cb+=8, cr+=8) {
770 LINE_WITH_UV
771 }
772 /* skip a luminance line - will be filled in later */
773 lum += s->width;
774 read(s->fd,src,s->width*2);
775 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16, cb+=8, cr+=8) {
776 LINE_WITH_UV
777 }
778 /*
779 *
780 * SECOND FIELD
781 *
782 */
783 lum=&data[s->width];
784 while (read(s->fd,src,s->width*2) < 0) {
785 usleep(10);
786 }
787 /* First (and last) two lines not interlaced */
788 for (h = 0; h < 2; h++) {
789 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16) {
790 LINE_NO_UV
791 }
792 read(s->fd,src,s->width*2);
793 /* skip a luminance line */
794 lum += s->width;
795 }
796 lum_m1=&lum[-s->width];
797 lum_m2=&lum_m1[-s->width];
798 lum_m3=&lum_m2[-s->width];
799 memmove(s->lum_m4_mem,&lum_m3[-s->width],s->width);
800 for (; h < (s->height/2)-1; h++) {
801 lum_m4=s->lum_m4_mem;
802 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16,lum_m1+=16,lum_m2+=16,lum_m3+=16,lum_m4+=16) {
803 LINE_NO_UV
804
805 DEINT_LINE_LUM(0)
806 DEINT_LINE_LUM(4)
807 DEINT_LINE_LUM(8)
808 DEINT_LINE_LUM(12)
809 }
810 read(s->fd,src,s->width*2);
811 /* skip a luminance line */
812 lum += s->width;
813 lum_m1 += s->width;
814 lum_m2 += s->width;
815 lum_m3 += s->width;
816 // lum_m4 += s->width;
817 }
818 /*
819 * Do last line
820 */
821 lum_m4=s->lum_m4_mem;
822 for (ptr = &src[0]; ptr < ptrend; ptr+=32, lum+=16, lum_m1+=16, lum_m2+=16, lum_m3+=16, lum_m4+=16) {
823 LINE_NO_UV
824
825 DEINT_LINE_LUM(0)
826 DEINT_LINE_LUM(4)
827 DEINT_LINE_LUM(8)
828 DEINT_LINE_LUM(12)
829 }
830 }
831 #ifdef HAVE_MMX
832 emms();
833 #endif
834 return s->frame_size;
835 }
836
837 static int aiw_close(VideoData *s)
838 {
839 av_freep(&s->lum_m4_mem);
840 av_freep(&s->src_mem);
841 return 0;
842 }
843
844 int video_grab_init(void)
845 {
846 av_register_input_format(&video_grab_device_format);
847 return 0;
848 }