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