src/third_party/ffmpeg/libavformat/format.c

   1 /*
   2  * Format register and lookup
   3  * Copyright (c) 2000, 2001, 2002 Fabrice Bellard
   4  *
   5  * This file is part of FFmpeg.
   6  *
   7  * FFmpeg is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * FFmpeg is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with FFmpeg; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21
  22 #include "libavutil/atomic.h"
  23 #include "libavutil/avstring.h"
  24 #include "libavutil/bprint.h"
  25 #include "libavutil/opt.h"
  26
  27 #include "avio_internal.h"
  28 #include "avformat.h"
  29 #include "id3v2.h"
  30 #include "internal.h"
  31
  32
  33 /**
  34  * @file
  35  * Format register and lookup
  36  */
  37 /** head of registered input format linked list */
  38 static AVInputFormat *first_iformat = NULL;
  39 /** head of registered output format linked list */
  40 static AVOutputFormat *first_oformat = NULL;
  41
  42 static AVInputFormat **last_iformat = &first_iformat;
  43 static AVOutputFormat **last_oformat = &first_oformat;
  44
  45 AVInputFormat *av_iformat_next(const AVInputFormat *f)
  46 {
  47     if (f)
  48         return f->next;
  49     else
  50         return first_iformat;
  51 }
  52
  53 AVOutputFormat *av_oformat_next(const AVOutputFormat *f)
  54 {
  55     if (f)
  56         return f->next;
  57     else
  58         return first_oformat;
  59 }
  60
  61 void av_register_input_format(AVInputFormat *format)
  62 {
  63     AVInputFormat **p = last_iformat;
  64
  65     format->next = NULL;
  66     while(*p || avpriv_atomic_ptr_cas((void * volatile *)p, NULL, format))
  67         p = &(*p)->next;
  68     last_iformat = &format->next;
  69 }
  70
  71 void av_register_output_format(AVOutputFormat *format)
  72 {
  73     AVOutputFormat **p = last_oformat;
  74
  75     format->next = NULL;
  76     while(*p || avpriv_atomic_ptr_cas((void * volatile *)p, NULL, format))
  77         p = &(*p)->next;
  78     last_oformat = &format->next;
  79 }
  80
  81 int av_match_ext(const char *filename, const char *extensions)
  82 {
  83     const char *ext, *p;
  84     char ext1[32], *q;
  85
  86     if (!filename)
  87         return 0;
  88
  89     ext = strrchr(filename, '.');
  90     if (ext) {
  91         ext++;
  92         p = extensions;
  93         for (;;) {
  94             q = ext1;
  95             while (*p != '\0' && *p != ','  && q - ext1 < sizeof(ext1) - 1)
  96                 *q++ = *p++;
  97             *q = '\0';
  98             if (!av_strcasecmp(ext1, ext))
  99                 return 1;
 100             if (*p == '\0')
 101                 break;
 102             p++;
 103         }
 104     }
 105     return 0;
 106 }
 107
 108 AVOutputFormat *av_guess_format(const char *short_name, const char *filename,
 109                                 const char *mime_type)
 110 {
 111     AVOutputFormat *fmt = NULL, *fmt_found;
 112     int score_max, score;
 113
 114     /* specific test for image sequences */
 115 #if CONFIG_IMAGE2_MUXER
 116     if (!short_name && filename &&
 117         av_filename_number_test(filename) &&
 118         ff_guess_image2_codec(filename) != AV_CODEC_ID_NONE) {
 119         return av_guess_format("image2", NULL, NULL);
 120     }
 121 #endif
 122     /* Find the proper file type. */
 123     fmt_found = NULL;
 124     score_max = 0;
 125     while ((fmt = av_oformat_next(fmt))) {
 126         score = 0;
 127         if (fmt->name && short_name && av_match_name(short_name, fmt->name))
 128             score += 100;
 129         if (fmt->mime_type && mime_type && !strcmp(fmt->mime_type, mime_type))
 130             score += 10;
 131         if (filename && fmt->extensions &&
 132             av_match_ext(filename, fmt->extensions)) {
 133             score += 5;
 134         }
 135         if (score > score_max) {
 136             score_max = score;
 137             fmt_found = fmt;
 138         }
 139     }
 140     return fmt_found;
 141 }
 142
 143 enum AVCodecID av_guess_codec(AVOutputFormat *fmt, const char *short_name,
 144                               const char *filename, const char *mime_type,
 145                               enum AVMediaType type)
 146 {
 147     if (!strcmp(fmt->name, "segment") || !strcmp(fmt->name, "ssegment")) {
 148         fmt = av_guess_format(NULL, filename, NULL);
 149     }
 150
 151     if (type == AVMEDIA_TYPE_VIDEO) {
 152         enum AVCodecID codec_id = AV_CODEC_ID_NONE;
 153
 154 #if CONFIG_IMAGE2_MUXER
 155         if (!strcmp(fmt->name, "image2") || !strcmp(fmt->name, "image2pipe")) {
 156             codec_id = ff_guess_image2_codec(filename);
 157         }
 158 #endif
 159         if (codec_id == AV_CODEC_ID_NONE)
 160             codec_id = fmt->video_codec;
 161         return codec_id;
 162     } else if (type == AVMEDIA_TYPE_AUDIO)
 163         return fmt->audio_codec;
 164     else if (type == AVMEDIA_TYPE_SUBTITLE)
 165         return fmt->subtitle_codec;
 166     else
 167         return AV_CODEC_ID_NONE;
 168 }
 169
 170 AVInputFormat *av_find_input_format(const char *short_name)
 171 {
 172     AVInputFormat *fmt = NULL;
 173     while ((fmt = av_iformat_next(fmt)))
 174         if (av_match_name(short_name, fmt->name))
 175             return fmt;
 176     return NULL;
 177 }
 178
 179 AVInputFormat *av_probe_input_format3(AVProbeData *pd, int is_opened,
 180                                       int *score_ret)
 181 {
 182     AVProbeData lpd = *pd;
 183     AVInputFormat *fmt1 = NULL, *fmt;
 184     int score, nodat = 0, score_max = 0;
 185     const static uint8_t zerobuffer[AVPROBE_PADDING_SIZE];
 186
 187     if (!lpd.buf)
 188         lpd.buf = zerobuffer;
 189
 190     if (lpd.buf_size > 10 && ff_id3v2_match(lpd.buf, ID3v2_DEFAULT_MAGIC)) {
 191         int id3len = ff_id3v2_tag_len(lpd.buf);
 192         if (lpd.buf_size > id3len + 16) {
 193             lpd.buf      += id3len;
 194             lpd.buf_size -= id3len;
 195         } else if (id3len >= PROBE_BUF_MAX) {
 196             nodat = 2;
 197         } else
 198             nodat = 1;
 199     }
 200
 201     fmt = NULL;
 202     while ((fmt1 = av_iformat_next(fmt1))) {
 203         if (!is_opened == !(fmt1->flags & AVFMT_NOFILE))
 204             continue;
 205         score = 0;
 206         if (fmt1->read_probe) {
 207             score = fmt1->read_probe(&lpd);
 208             if (fmt1->extensions && av_match_ext(lpd.filename, fmt1->extensions)) {
 209                 if      (nodat == 0) score = FFMAX(score, 1);
 210                 else if (nodat == 1) score = FFMAX(score, AVPROBE_SCORE_EXTENSION / 2 - 1);
 211                 else                 score = FFMAX(score, AVPROBE_SCORE_EXTENSION);
 212             }
 213         } else if (fmt1->extensions) {
 214             if (av_match_ext(lpd.filename, fmt1->extensions))
 215                 score = AVPROBE_SCORE_EXTENSION;
 216         }
 217 #if FF_API_PROBE_MIME
 218         if (av_match_name(lpd.mime_type, fmt1->mime_type))
 219             score = FFMAX(score, AVPROBE_SCORE_EXTENSION);
 220 #endif
 221         if (score > score_max) {
 222             score_max = score;
 223             fmt       = fmt1;
 224         } else if (score == score_max)
 225             fmt = NULL;
 226     }
 227     if (nodat == 1)
 228         score_max = FFMIN(AVPROBE_SCORE_EXTENSION / 2 - 1, score_max);
 229     *score_ret = score_max;
 230
 231     return fmt;
 232 }
 233
 234 AVInputFormat *av_probe_input_format2(AVProbeData *pd, int is_opened, int *score_max)
 235 {
 236     int score_ret;
 237     AVInputFormat *fmt = av_probe_input_format3(pd, is_opened, &score_ret);
 238     if (score_ret > *score_max) {
 239         *score_max = score_ret;
 240         return fmt;
 241     } else
 242         return NULL;
 243 }
 244
 245 AVInputFormat *av_probe_input_format(AVProbeData *pd, int is_opened)
 246 {
 247     int score = 0;
 248     return av_probe_input_format2(pd, is_opened, &score);
 249 }
 250
 251 int av_probe_input_buffer2(AVIOContext *pb, AVInputFormat **fmt,
 252                           const char *filename, void *logctx,
 253                           unsigned int offset, unsigned int max_probe_size)
 254 {
 255     AVProbeData pd = { filename ? filename : "" };
 256     uint8_t *buf = NULL;
 257     uint8_t *mime_type;
 258     int ret = 0, probe_size, buf_offset = 0;
 259     int score = 0;
 260     int ret2;
 261
 262     if (!max_probe_size)
 263         max_probe_size = PROBE_BUF_MAX;
 264     else if (max_probe_size < PROBE_BUF_MIN) {
 265         av_log(logctx, AV_LOG_ERROR,
 266                "Specified probe size value %u cannot be < %u\n", max_probe_size, PROBE_BUF_MIN);
 267         return AVERROR(EINVAL);
 268     }
 269
 270     if (offset >= max_probe_size)
 271         return AVERROR(EINVAL);
 272
 273 #if FF_API_PROBE_MIME
 274     if (pb->av_class)
 275         av_opt_get(pb, "mime_type", AV_OPT_SEARCH_CHILDREN, &pd.mime_type);
 276 #else
 277     if (!*fmt && pb->av_class && av_opt_get(pb, "mime_type", AV_OPT_SEARCH_CHILDREN, &mime_type) >= 0 && mime_type) {
 278         if (!av_strcasecmp(mime_type, "audio/aacp")) {
 279             *fmt = av_find_input_format("aac");
 280         }
 281         av_freep(&mime_type);
 282     }
 283 #endif
 284
 285     for (probe_size = PROBE_BUF_MIN; probe_size <= max_probe_size && !*fmt;
 286          probe_size = FFMIN(probe_size << 1,
 287                             FFMAX(max_probe_size, probe_size + 1))) {
 288         score = probe_size < max_probe_size ? AVPROBE_SCORE_RETRY : 0;
 289
 290         /* Read probe data. */
 291         if ((ret = av_reallocp(&buf, probe_size + AVPROBE_PADDING_SIZE)) < 0)
 292             goto fail;
 293         if ((ret = avio_read(pb, buf + buf_offset,
 294                              probe_size - buf_offset)) < 0) {
 295             /* Fail if error was not end of file, otherwise, lower score. */
 296             if (ret != AVERROR_EOF)
 297                 goto fail;
 298
 299             score = 0;
 300             ret   = 0;          /* error was end of file, nothing read */
 301         }
 302         buf_offset += ret;
 303         if (buf_offset < offset)
 304             continue;
 305         pd.buf_size = buf_offset - offset;
 306         pd.buf = &buf[offset];
 307
 308         memset(pd.buf + pd.buf_size, 0, AVPROBE_PADDING_SIZE);
 309
 310         /* Guess file format. */
 311         *fmt = av_probe_input_format2(&pd, 1, &score);
 312         if (*fmt) {
 313             /* This can only be true in the last iteration. */
 314             if (score <= AVPROBE_SCORE_RETRY) {
 315                 av_log(logctx, AV_LOG_WARNING,
 316                        "Format %s detected only with low score of %d, "
 317                        "misdetection possible!\n", (*fmt)->name, score);
 318             } else
 319                 av_log(logctx, AV_LOG_DEBUG,
 320                        "Format %s probed with size=%d and score=%d\n",
 321                        (*fmt)->name, probe_size, score);
 322 #if 0
 323             FILE *f = fopen("probestat.tmp", "ab");
 324             fprintf(f, "probe_size:%d format:%s score:%d filename:%s\n", probe_size, (*fmt)->name, score, filename);
 325             fclose(f);
 326 #endif
 327         }
 328     }
 329
 330     if (!*fmt)
 331         ret = AVERROR_INVALIDDATA;
 332
 333 fail:
 334     /* Rewind. Reuse probe buffer to avoid seeking. */
 335     ret2 = ffio_rewind_with_probe_data(pb, &buf, buf_offset);
 336     if (ret >= 0)
 337         ret = ret2;
 338
 339 #if FF_API_PROBE_MIME
 340     av_free(pd.mime_type);
 341 #endif
 342     return ret < 0 ? ret : score;
 343 }
 344
 345 int av_probe_input_buffer(AVIOContext *pb, AVInputFormat **fmt,
 346                           const char *filename, void *logctx,
 347                           unsigned int offset, unsigned int max_probe_size)
 348 {
 349     int ret = av_probe_input_buffer2(pb, fmt, filename, logctx, offset, max_probe_size);
 350     return ret < 0 ? ret : 0;
 351 }