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 };