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