use packet dts as correct media field number and use av_interleave_pkt_per_dts
[ffmpeg.git] / libavformat / grab_bktr.c
1 /*
2  * *BSD video grab interface
3  * Copyright (c) 2002 Steve O'Hara-Smith
4  * based on
5  *           Linux video grab interface
6  *           Copyright (c) 2000,2001 Gerard Lantau.
7  * and
8  *           simple_grab.c Copyright (c) 1999 Roger Hardiman
9  *
10  * This library is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU Lesser General Public
12  * License as published by the Free Software Foundation; either
13  * version 2 of the License, or (at your option) any later version.
14  *
15  * This library is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18  * Lesser General Public License for more details.
19  *
20  * You should have received a copy of the GNU Lesser General Public
21  * License along with this library; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
23  */
24 #include "avformat.h"
25 #if defined(__FreeBSD__)
26 # if __FreeBSD__ >= 502100
27 #  include <dev/bktr/ioctl_meteor.h>
28 #  include <dev/bktr/ioctl_bt848.h>
29 # else
30 #  include <machine/ioctl_meteor.h>
31 #  include <machine/ioctl_bt848.h>
32 # endif
33 #elif defined(__FreeBSD_kernel__)
34 # include <dev/bktr/ioctl_meteor.h>
35 # include <dev/bktr/ioctl_bt848.h>
36 #elif defined(__DragonFly__)
37 # include <dev/video/meteor/ioctl_meteor.h>
38 # include <dev/video/bktr/ioctl_bt848.h>
39 #else
40 # include <dev/ic/bt8xx.h>
41 #endif
42 #include <unistd.h>
43 #include <fcntl.h>
44 #include <sys/ioctl.h>
45 #include <sys/mman.h>
46 #include <sys/time.h>
47 #include <signal.h>
48
49 typedef struct {
50     int video_fd;
51     int tuner_fd;
52     int width, height;
53     int frame_rate;
54     int frame_rate_base;
55     u_int64_t per_frame;
56 } VideoData;
57
58
59 #define PAL 1
60 #define PALBDGHI 1
61 #define NTSC 2
62 #define NTSCM 2
63 #define SECAM 3
64 #define PALN 4
65 #define PALM 5
66 #define NTSCJ 6
67
68 /* PAL is 768 x 576. NTSC is 640 x 480 */
69 #define PAL_HEIGHT 576
70 #define SECAM_HEIGHT 576
71 #define NTSC_HEIGHT 480
72
73 #ifndef VIDEO_FORMAT
74 #define VIDEO_FORMAT NTSC
75 #endif
76
77 static int bktr_dev[] = { METEOR_DEV0, METEOR_DEV1, METEOR_DEV2,
78     METEOR_DEV3, METEOR_DEV_SVIDEO };
79
80 uint8_t *video_buf;
81 size_t video_buf_size;
82 u_int64_t last_frame_time;
83 volatile sig_atomic_t nsignals;
84
85
86 static void catchsignal(int signal)
87 {
88     nsignals++;
89     return;
90 }
91
92 static int bktr_init(const char *video_device, int width, int height,
93     int format, int *video_fd, int *tuner_fd, int idev, double frequency)
94 {
95     struct meteor_geomet geo;
96     int h_max;
97     long ioctl_frequency;
98     char *arg;
99     int c;
100     struct sigaction act, old;
101
102     if (idev < 0 || idev > 4)
103     {
104         arg = getenv ("BKTR_DEV");
105         if (arg)
106             idev = atoi (arg);
107         if (idev < 0 || idev > 4)
108             idev = 1;
109     }
110
111     if (format < 1 || format > 6)
112     {
113         arg = getenv ("BKTR_FORMAT");
114         if (arg)
115             format = atoi (arg);
116         if (format < 1 || format > 6)
117             format = VIDEO_FORMAT;
118     }
119
120     if (frequency <= 0)
121     {
122         arg = getenv ("BKTR_FREQUENCY");
123         if (arg)
124             frequency = atof (arg);
125         if (frequency <= 0)
126             frequency = 0.0;
127     }
128
129     memset(&act, 0, sizeof(act));
130     sigemptyset(&act.sa_mask);
131     act.sa_handler = catchsignal;
132     sigaction(SIGUSR1, &act, &old);
133
134     *tuner_fd = open("/dev/tuner0", O_RDONLY);
135     if (*tuner_fd < 0)
136         perror("Warning: Tuner not opened, continuing");
137
138     *video_fd = open(video_device, O_RDONLY);
139     if (*video_fd < 0) {
140         perror(video_device);
141         return -1;
142     }
143
144     geo.rows = height;
145     geo.columns = width;
146     geo.frames = 1;
147     geo.oformat = METEOR_GEO_YUV_422 | METEOR_GEO_YUV_12;
148
149     switch (format) {
150     case PAL:   h_max = PAL_HEIGHT;   c = BT848_IFORM_F_PALBDGHI; break;
151     case PALN:  h_max = PAL_HEIGHT;   c = BT848_IFORM_F_PALN;     break;
152     case PALM:  h_max = PAL_HEIGHT;   c = BT848_IFORM_F_PALM;     break;
153     case SECAM: h_max = SECAM_HEIGHT; c = BT848_IFORM_F_SECAM;    break;
154     case NTSC:  h_max = NTSC_HEIGHT;  c = BT848_IFORM_F_NTSCM;    break;
155     case NTSCJ: h_max = NTSC_HEIGHT;  c = BT848_IFORM_F_NTSCJ;    break;
156     default:    h_max = PAL_HEIGHT;   c = BT848_IFORM_F_PALBDGHI; break;
157     }
158
159     if (height <= h_max / 2)
160         geo.oformat |= METEOR_GEO_EVEN_ONLY;
161
162     if (ioctl(*video_fd, METEORSETGEO, &geo) < 0) {
163         perror("METEORSETGEO");
164         return -1;
165     }
166
167     if (ioctl(*video_fd, BT848SFMT, &c) < 0) {
168         perror("BT848SFMT");
169         return -1;
170     }
171
172     c = bktr_dev[idev];
173     if (ioctl(*video_fd, METEORSINPUT, &c) < 0) {
174         perror("METEORSINPUT");
175         return -1;
176     }
177
178     video_buf_size = width * height * 12 / 8;
179
180     video_buf = (uint8_t *)mmap((caddr_t)0, video_buf_size,
181         PROT_READ, MAP_SHARED, *video_fd, (off_t)0);
182     if (video_buf == MAP_FAILED) {
183         perror("mmap");
184         return -1;
185     }
186
187     if (frequency != 0.0) {
188         ioctl_frequency  = (unsigned long)(frequency*16);
189         if (ioctl(*tuner_fd, TVTUNER_SETFREQ, &ioctl_frequency) < 0)
190             perror("TVTUNER_SETFREQ");
191     }
192
193     c = AUDIO_UNMUTE;
194     if (ioctl(*tuner_fd, BT848_SAUDIO, &c) < 0)
195         perror("TVTUNER_SAUDIO");
196
197     c = METEOR_CAP_CONTINOUS;
198     ioctl(*video_fd, METEORCAPTUR, &c);
199
200     c = SIGUSR1;
201     ioctl(*video_fd, METEORSSIGNAL, &c);
202
203     return 0;
204 }
205
206 static void bktr_getframe(u_int64_t per_frame)
207 {
208     u_int64_t curtime;
209
210     curtime = av_gettime();
211     if (!last_frame_time
212         || ((last_frame_time + per_frame) > curtime)) {
213         if (!usleep(last_frame_time + per_frame + per_frame / 8 - curtime)) {
214             if (!nsignals)
215                 av_log(NULL, AV_LOG_INFO,
216                        "SLEPT NO signals - %d microseconds late\n",
217                        (int)(av_gettime() - last_frame_time - per_frame));
218         }
219     }
220     nsignals = 0;
221     last_frame_time = curtime;
222 }
223
224
225 /* note: we support only one picture read at a time */
226 static int grab_read_packet(AVFormatContext *s1, AVPacket *pkt)
227 {
228     VideoData *s = s1->priv_data;
229
230     if (av_new_packet(pkt, video_buf_size) < 0)
231         return -EIO;
232
233     bktr_getframe(s->per_frame);
234
235     pkt->pts = av_gettime();
236     memcpy(pkt->data, video_buf, video_buf_size);
237
238     return video_buf_size;
239 }
240
241 static int grab_read_header(AVFormatContext *s1, AVFormatParameters *ap)
242 {
243     VideoData *s = s1->priv_data;
244     AVStream *st;
245     int width, height;
246     int frame_rate;
247     int frame_rate_base;
248     int format = -1;
249     const char *video_device;
250
251     if (ap->width <= 0 || ap->height <= 0 || ap->time_base.den <= 0)
252         return -1;
253
254     width = ap->width;
255     height = ap->height;
256     frame_rate = ap->time_base.den;
257     frame_rate_base = ap->time_base.num;
258
259     video_device = ap->device;
260     if (!video_device)
261         video_device = "/dev/bktr0";
262
263     st = av_new_stream(s1, 0);
264     if (!st)
265         return -ENOMEM;
266     av_set_pts_info(st, 64, 1, 1000000); /* 64 bits pts in use */
267
268     s->width = width;
269     s->height = height;
270     s->frame_rate = frame_rate;
271     s->frame_rate_base = frame_rate_base;
272     s->per_frame = ((u_int64_t)1000000 * s->frame_rate_base) / s->frame_rate;
273
274     st->codec->codec_type = CODEC_TYPE_VIDEO;
275     st->codec->pix_fmt = PIX_FMT_YUV420P;
276     st->codec->codec_id = CODEC_ID_RAWVIDEO;
277     st->codec->width = width;
278     st->codec->height = height;
279     st->codec->time_base.den = frame_rate;
280     st->codec->time_base.num = frame_rate_base;
281
282     if (ap->standard) {
283         if (!strcasecmp(ap->standard, "pal"))
284             format = PAL;
285         else if (!strcasecmp(ap->standard, "secam"))
286             format = SECAM;
287         else if (!strcasecmp(ap->standard, "ntsc"))
288             format = NTSC;
289     }
290
291     if (bktr_init(video_device, width, height, format,
292             &(s->video_fd), &(s->tuner_fd), -1, 0.0) < 0)
293         return -EIO;
294
295     nsignals = 0;
296     last_frame_time = 0;
297
298     return 0;
299 }
300
301 static int grab_read_close(AVFormatContext *s1)
302 {
303     VideoData *s = s1->priv_data;
304     int c;
305
306     c = METEOR_CAP_STOP_CONT;
307     ioctl(s->video_fd, METEORCAPTUR, &c);
308     close(s->video_fd);
309
310     c = AUDIO_MUTE;
311     ioctl(s->tuner_fd, BT848_SAUDIO, &c);
312     close(s->tuner_fd);
313
314     munmap((caddr_t)video_buf, video_buf_size);
315
316     return 0;
317 }
318
319 AVInputFormat video_grab_device_demuxer = {
320     "bktr",
321     "video grab",
322      sizeof(VideoData),
323      NULL,
324     grab_read_header,
325     grab_read_packet,
326     grab_read_close,
327     .flags = AVFMT_NOFILE,
328 };