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