Statistics
| Branch: | Revision:

ffmpeg / libav / grab.c @ 6bcafa93

History | View | Annotate | Download (27.2 KB)

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
}