libmpdemux/demux_lavf.c

   1 /*
   2  * Copyright (C) 2004 Michael Niedermayer <michaelni@gmx.at>
   3  *
   4  * This file is part of MPlayer.
   5  *
   6  * MPlayer is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * MPlayer is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License along
  17  * with MPlayer; if not, write to the Free Software Foundation, Inc.,
  18  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  19  */
  20
  21 // #include <stdio.h>
  22 #include <stdlib.h>
  23 // #include <unistd.h>
  24 #include <limits.h>
  25 #include <stdbool.h>
  26 #include <string.h>
  27
  28 #include "config.h"
  29 #include "options.h"
  30 #include "mp_msg.h"
  31 #include "av_opts.h"
  32 #include "bstr.h"
  33
  34 #include "stream/stream.h"
  35 #include "aviprint.h"
  36 #include "demuxer.h"
  37 #include "stheader.h"
  38 #include "m_option.h"
  39 #include "sub/sub.h"
  40
  41 #include "libavformat/avformat.h"
  42 #include "libavformat/avio.h"
  43 #include "libavutil/avutil.h"
  44 #include "libavutil/avstring.h"
  45 #include "libavcodec/opt.h"
  46
  47 #include "mp_taglists.h"
  48
  49 #define INITIAL_PROBE_SIZE STREAM_BUFFER_SIZE
  50 #define SMALL_MAX_PROBE_SIZE (32 * 1024)
  51 #define PROBE_BUF_SIZE (2*1024*1024)
  52
  53 const m_option_t lavfdopts_conf[] = {
  54     OPT_INTRANGE("probesize", lavfdopts.probesize, 0, 32, INT_MAX),
  55     OPT_STRING("format", lavfdopts.format, 0),
  56     OPT_INTRANGE("analyzeduration", lavfdopts.analyzeduration, 0, 0, INT_MAX),
  57     OPT_STRING("cryptokey", lavfdopts.cryptokey, 0),
  58     OPT_STRING("o", lavfdopts.avopt, 0),
  59     {NULL, NULL, 0, 0, 0, 0, NULL}
  60 };
  61
  62 #define BIO_BUFFER_SIZE 32768
  63
  64 typedef struct lavf_priv {
  65     AVInputFormat *avif;
  66     AVFormatContext *avfc;
  67     ByteIOContext *pb;
  68     uint8_t buffer[BIO_BUFFER_SIZE];
  69     int audio_streams;
  70     int video_streams;
  71     int sub_streams;
  72     int64_t last_pts;
  73     int astreams[MAX_A_STREAMS];
  74     int vstreams[MAX_V_STREAMS];
  75     int sstreams[MAX_S_STREAMS];
  76     int cur_program;
  77     int nb_streams_last;
  78     bool internet_radio_hack;
  79     bool use_dts;
  80     bool seek_by_bytes;
  81     int bitrate;
  82 }lavf_priv_t;
  83
  84 static int mp_read(void *opaque, uint8_t *buf, int size) {
  85     struct demuxer *demuxer = opaque;
  86     struct stream *stream = demuxer->stream;
  87     int ret;
  88
  89     ret=stream_read(stream, buf, size);
  90
  91     mp_msg(MSGT_HEADER,MSGL_DBG2,"%d=mp_read(%p, %p, %d), pos: %"PRId64", eof:%d\n",
  92            ret, stream, buf, size, stream_tell(stream), stream->eof);
  93     return ret;
  94 }
  95
  96 static int64_t mp_seek(void *opaque, int64_t pos, int whence) {
  97     struct demuxer *demuxer = opaque;
  98     struct stream *stream = demuxer->stream;
  99     int64_t current_pos;
 100     mp_msg(MSGT_HEADER,MSGL_DBG2,"mp_seek(%p, %"PRId64", %d)\n", stream, pos, whence);
 101     if(whence == SEEK_CUR)
 102         pos +=stream_tell(stream);
 103     else if(whence == SEEK_END && stream->end_pos > 0)
 104         pos += stream->end_pos;
 105     else if(whence == SEEK_SET)
 106         pos += stream->start_pos;
 107     else if(whence == AVSEEK_SIZE && stream->end_pos > 0)
 108         return stream->end_pos - stream->start_pos;
 109     else
 110         return -1;
 111
 112     if(pos<0)
 113         return -1;
 114     current_pos = stream_tell(stream);
 115     if(stream_seek(stream, pos)==0) {
 116         stream_reset(stream);
 117         stream_seek(stream, current_pos);
 118         return -1;
 119     }
 120
 121     return pos - stream->start_pos;
 122 }
 123
 124 static int64_t mp_read_seek(void *opaque, int stream_idx, int64_t ts, int flags)
 125 {
 126     struct demuxer *demuxer = opaque;
 127     struct stream *stream = demuxer->stream;
 128     struct lavf_priv *priv = demuxer->priv;
 129
 130     AVStream *st = priv->avfc->streams[stream_idx];
 131     double pts = (double)ts * st->time_base.num / st->time_base.den;
 132     int ret = stream_control(stream, STREAM_CTRL_SEEK_TO_TIME, &pts);
 133     if (ret < 0)
 134         ret = AVERROR(ENOSYS);
 135     return ret;
 136 }
 137
 138 static void list_formats(void) {
 139     mp_msg(MSGT_DEMUX, MSGL_INFO, "Available lavf input formats:\n");
 140     AVInputFormat *fmt = NULL;
 141     while (fmt = av_iformat_next(fmt))
 142         mp_msg(MSGT_DEMUX, MSGL_INFO, "%15s : %s\n", fmt->name, fmt->long_name);
 143 }
 144
 145 static int lavf_check_file(demuxer_t *demuxer){
 146     struct MPOpts *opts = demuxer->opts;
 147     struct lavfdopts *lavfdopts = &opts->lavfdopts;
 148     AVProbeData avpd;
 149     lavf_priv_t *priv;
 150     int probe_data_size = 0;
 151     int read_size = INITIAL_PROBE_SIZE;
 152     int score;
 153
 154     if(!demuxer->priv)
 155         demuxer->priv=calloc(sizeof(lavf_priv_t),1);
 156     priv= demuxer->priv;
 157
 158     av_register_all();
 159
 160     char *format = lavfdopts->format;
 161     if (!format)
 162         format = demuxer->stream->lavf_type;
 163     if (format) {
 164         if (strcmp(format, "help") == 0) {
 165            list_formats();
 166            return 0;
 167         }
 168         priv->avif = av_find_input_format(format);
 169         if (!priv->avif) {
 170             mp_msg(MSGT_DEMUX, MSGL_FATAL, "Unknown lavf format %s\n", format);
 171             return 0;
 172         }
 173         mp_msg(MSGT_DEMUX,MSGL_INFO,"Forced lavf %s demuxer\n", priv->avif->long_name);
 174         return DEMUXER_TYPE_LAVF;
 175     }
 176
 177     avpd.buf = av_mallocz(FFMAX(BIO_BUFFER_SIZE, PROBE_BUF_SIZE) +
 178                           FF_INPUT_BUFFER_PADDING_SIZE);
 179     do {
 180         read_size = stream_read(demuxer->stream, avpd.buf + probe_data_size, read_size);
 181         if(read_size < 0) {
 182             av_free(avpd.buf);
 183             return 0;
 184         }
 185         probe_data_size += read_size;
 186         avpd.filename= demuxer->stream->url;
 187         if (!avpd.filename) {
 188             mp_msg(MSGT_DEMUX, MSGL_WARN, "Stream url is not set!\n");
 189             avpd.filename = "";
 190         }
 191         if (!strncmp(avpd.filename, "ffmpeg://", 9))
 192             avpd.filename += 9;
 193         avpd.buf_size= probe_data_size;
 194
 195         score = 0;
 196         priv->avif= av_probe_input_format2(&avpd, probe_data_size > 0, &score);
 197         read_size = FFMIN(2*read_size, PROBE_BUF_SIZE - probe_data_size);
 198     } while ((demuxer->desc->type != DEMUXER_TYPE_LAVF_PREFERRED ||
 199               probe_data_size < SMALL_MAX_PROBE_SIZE) &&
 200              score <= AVPROBE_SCORE_MAX / 4 &&
 201              read_size > 0 && probe_data_size < PROBE_BUF_SIZE);
 202     av_free(avpd.buf);
 203
 204     if (!priv->avif || score <= AVPROBE_SCORE_MAX / 4) {
 205         mp_msg(MSGT_HEADER,MSGL_V,"LAVF_check: no clue about this gibberish!\n");
 206         return 0;
 207     }else
 208         mp_msg(MSGT_HEADER,MSGL_V,"LAVF_check: %s\n", priv->avif->long_name);
 209
 210     demuxer->filetype = priv->avif->long_name;
 211     if (!demuxer->filetype)
 212         demuxer->filetype = priv->avif->name;
 213
 214     return DEMUXER_TYPE_LAVF;
 215 }
 216
 217 static bool matches_avinputformat_name(struct lavf_priv *priv,
 218                                        const char *name)
 219 {
 220     const char *avifname = priv->avif->name;
 221     while (1) {
 222         const char *next = strchr(avifname, ',');
 223         if (!next)
 224             return !strcmp(avifname, name);
 225         int len = next - avifname;
 226         if (len == strlen(name) && !memcmp(avifname, name, len))
 227             return true;
 228         avifname = next + 1;
 229     }
 230 }
 231
 232 /* formats for which an internal demuxer is preferred */
 233 static const char * const preferred_internal[] = {
 234     /* lavf Matroska demuxer doesn't support ordered chapters and fails
 235      * for more files */
 236     "matroska",
 237 #if LIBAVCODEC_VERSION_INT < AV_VERSION_INT(52, 99, 0)
 238     /* Seeking doesn't work with lavf FLAC demuxer in FFmpeg versions
 239      * without a FLAC parser. In principle this could use a runtime check to
 240      * switch if a shared library is updated. */
 241     "flac",
 242 #endif
 243     /* lavf gives neither pts nor dts for some video frames in .rm */
 244     "rm",
 245     NULL
 246 };
 247
 248 static int lavf_check_preferred_file(demuxer_t *demuxer){
 249     if (lavf_check_file(demuxer)) {
 250         const char * const *p;
 251         lavf_priv_t *priv = demuxer->priv;
 252         for (p = preferred_internal; *p; p++)
 253             if (matches_avinputformat_name(priv, *p))
 254                 return 0;
 255         return DEMUXER_TYPE_LAVF_PREFERRED;
 256     }
 257     return 0;
 258 }
 259
 260 static uint8_t char2int(char c) {
 261     if (c >= '0' && c <= '9') return c - '0';
 262     if (c >= 'a' && c <= 'f') return c - 'a' + 10;
 263     if (c >= 'A' && c <= 'F') return c - 'A' + 10;
 264     return 0;
 265 }
 266
 267 static void parse_cryptokey(AVFormatContext *avfc, const char *str) {
 268     int len = strlen(str) / 2;
 269     uint8_t *key = av_mallocz(len);
 270     int i;
 271     avfc->keylen = len;
 272     avfc->key = key;
 273     for (i = 0; i < len; i++, str += 2)
 274         *key++ = (char2int(str[0]) << 4) | char2int(str[1]);
 275 }
 276
 277 static void handle_stream(demuxer_t *demuxer, AVFormatContext *avfc, int i) {
 278     lavf_priv_t *priv= demuxer->priv;
 279     AVStream *st= avfc->streams[i];
 280     AVCodecContext *codec= st->codec;
 281     char *stream_type = NULL;
 282     int stream_id;
 283     AVMetadataTag *lang = av_metadata_get(st->metadata, "language", NULL, 0);
 284     AVMetadataTag *title= av_metadata_get(st->metadata, "title",    NULL, 0);
 285     int g, override_tag = mp_av_codec_get_tag(mp_codecid_override_taglists,
 286                                               codec->codec_id);
 287     // For some formats (like PCM) always trust CODEC_ID_* more than codec_tag
 288     if (override_tag)
 289         codec->codec_tag = override_tag;
 290
 291     switch(codec->codec_type){
 292         case AVMEDIA_TYPE_AUDIO:{
 293             WAVEFORMATEX *wf;
 294             sh_audio_t* sh_audio;
 295             sh_audio = new_sh_audio_aid(demuxer, i, priv->audio_streams);
 296             if(!sh_audio)
 297                 break;
 298             stream_type = "audio";
 299             priv->astreams[priv->audio_streams] = i;
 300             wf= calloc(sizeof(*wf) + codec->extradata_size, 1);
 301             // mp4a tag is used for all mp4 files no matter what they actually contain
 302             if(codec->codec_tag == MKTAG('m', 'p', '4', 'a'))
 303                 codec->codec_tag= 0;
 304             if(!codec->codec_tag)
 305                 codec->codec_tag= mp_av_codec_get_tag(mp_wav_taglists, codec->codec_id);
 306             wf->wFormatTag= codec->codec_tag;
 307             wf->nChannels= codec->channels;
 308             wf->nSamplesPerSec= codec->sample_rate;
 309             wf->nAvgBytesPerSec= codec->bit_rate/8;
 310             wf->nBlockAlign= codec->block_align ? codec->block_align : 1;
 311             wf->wBitsPerSample= codec->bits_per_coded_sample;
 312             wf->cbSize= codec->extradata_size;
 313             if(codec->extradata_size)
 314                 memcpy(wf + 1, codec->extradata, codec->extradata_size);
 315             sh_audio->wf= wf;
 316             sh_audio->audio.dwSampleSize= codec->block_align;
 317             if(codec->frame_size && codec->sample_rate){
 318                 sh_audio->audio.dwScale=codec->frame_size;
 319                 sh_audio->audio.dwRate= codec->sample_rate;
 320             }else{
 321                 sh_audio->audio.dwScale= codec->block_align ? codec->block_align*8 : 8;
 322                 sh_audio->audio.dwRate = codec->bit_rate;
 323             }
 324             g= av_gcd(sh_audio->audio.dwScale, sh_audio->audio.dwRate);
 325             sh_audio->audio.dwScale /= g;
 326             sh_audio->audio.dwRate  /= g;
 327 //          printf("sca:%d rat:%d fs:%d sr:%d ba:%d\n", sh_audio->audio.dwScale, sh_audio->audio.dwRate, codec->frame_size, codec->sample_rate, codec->block_align);
 328             sh_audio->ds= demuxer->audio;
 329             sh_audio->format= codec->codec_tag;
 330             sh_audio->channels= codec->channels;
 331             sh_audio->samplerate= codec->sample_rate;
 332             sh_audio->i_bps= codec->bit_rate/8;
 333             switch (codec->codec_id) {
 334                 case CODEC_ID_PCM_S8:
 335                 case CODEC_ID_PCM_U8:
 336                     sh_audio->samplesize = 1;
 337                     break;
 338                 case CODEC_ID_PCM_S16LE:
 339                 case CODEC_ID_PCM_S16BE:
 340                 case CODEC_ID_PCM_U16LE:
 341                 case CODEC_ID_PCM_U16BE:
 342                     sh_audio->samplesize = 2;
 343                     break;
 344                 case CODEC_ID_PCM_ALAW:
 345                     sh_audio->format = 0x6;
 346                     break;
 347                 case CODEC_ID_PCM_MULAW:
 348                     sh_audio->format = 0x7;
 349                     break;
 350             }
 351             if (title && title->value)
 352                 mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_AID_%d_NAME=%s\n", priv->audio_streams, title->value);
 353             if (lang && lang->value) {
 354               sh_audio->lang = strdup(lang->value);
 355               mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_AID_%d_LANG=%s\n", priv->audio_streams, sh_audio->lang);
 356             }
 357             if (st->disposition & AV_DISPOSITION_DEFAULT)
 358               sh_audio->default_track = 1;
 359             if(mp_msg_test(MSGT_HEADER,MSGL_V) ) print_wave_header(sh_audio->wf, MSGL_V);
 360             st->discard= AVDISCARD_ALL;
 361             stream_id = priv->audio_streams++;
 362             break;
 363         }
 364         case AVMEDIA_TYPE_VIDEO:{
 365             sh_video_t* sh_video;
 366             BITMAPINFOHEADER *bih;
 367             sh_video=new_sh_video_vid(demuxer, i, priv->video_streams);
 368             if(!sh_video) break;
 369             stream_type = "video";
 370             priv->vstreams[priv->video_streams] = i;
 371             bih=calloc(sizeof(*bih) + codec->extradata_size,1);
 372
 373             if(codec->codec_id == CODEC_ID_RAWVIDEO) {
 374                 switch (codec->pix_fmt) {
 375                     case PIX_FMT_RGB24:
 376                         codec->codec_tag= MKTAG(24, 'B', 'G', 'R');
 377                     case PIX_FMT_BGR24:
 378                         codec->codec_tag= MKTAG(24, 'R', 'G', 'B');
 379                 }
 380             }
 381             if(!codec->codec_tag)
 382                 codec->codec_tag= mp_av_codec_get_tag(mp_bmp_taglists, codec->codec_id);
 383             bih->biSize= sizeof(*bih) + codec->extradata_size;
 384             bih->biWidth= codec->width;
 385             bih->biHeight= codec->height;
 386             bih->biBitCount= codec->bits_per_coded_sample;
 387             bih->biSizeImage = bih->biWidth * bih->biHeight * bih->biBitCount/8;
 388             bih->biCompression= codec->codec_tag;
 389             sh_video->bih= bih;
 390             sh_video->disp_w= codec->width;
 391             sh_video->disp_h= codec->height;
 392             if (st->time_base.den) { /* if container has time_base, use that */
 393                 sh_video->video.dwRate= st->time_base.den;
 394                 sh_video->video.dwScale= st->time_base.num;
 395             } else {
 396                 sh_video->video.dwRate= codec->time_base.den;
 397                 sh_video->video.dwScale= codec->time_base.num;
 398             }
 399             sh_video->fps=av_q2d(st->r_frame_rate);
 400             sh_video->frametime=1/av_q2d(st->r_frame_rate);
 401             sh_video->format=bih->biCompression;
 402             if(st->sample_aspect_ratio.num)
 403                 sh_video->aspect = codec->width  * st->sample_aspect_ratio.num
 404                          / (float)(codec->height * st->sample_aspect_ratio.den);
 405             else
 406                 sh_video->aspect=codec->width  * codec->sample_aspect_ratio.num
 407                        / (float)(codec->height * codec->sample_aspect_ratio.den);
 408             sh_video->i_bps=codec->bit_rate/8;
 409             if (title && title->value)
 410                 mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_VID_%d_NAME=%s\n", priv->video_streams, title->value);
 411             mp_msg(MSGT_DEMUX,MSGL_DBG2,"aspect= %d*%d/(%d*%d)\n",
 412                 codec->width, codec->sample_aspect_ratio.num,
 413                 codec->height, codec->sample_aspect_ratio.den);
 414
 415             sh_video->ds= demuxer->video;
 416             if(codec->extradata_size)
 417                 memcpy(sh_video->bih + 1, codec->extradata, codec->extradata_size);
 418             if( mp_msg_test(MSGT_HEADER,MSGL_V) ) print_video_header(sh_video->bih, MSGL_V);
 419             /*
 420                 short biPlanes;
 421                 int  biXPelsPerMeter;
 422                 int  biYPelsPerMeter;
 423                 int biClrUsed;
 424                 int biClrImportant;
 425             */
 426             if(demuxer->video->id != priv->video_streams
 427                && demuxer->video->id != -1)
 428                 st->discard= AVDISCARD_ALL;
 429             else{
 430                 demuxer->video->id = i;
 431                 demuxer->video->sh= demuxer->v_streams[i];
 432             }
 433             stream_id = priv->video_streams++;
 434             break;
 435         }
 436         case AVMEDIA_TYPE_SUBTITLE:{
 437             sh_sub_t* sh_sub;
 438             char type;
 439             /* only support text subtitles for now */
 440             if(codec->codec_id == CODEC_ID_TEXT)
 441                 type = 't';
 442             else if(codec->codec_id == CODEC_ID_MOV_TEXT)
 443                 type = 'm';
 444             else if(codec->codec_id == CODEC_ID_SSA)
 445                 type = 'a';
 446             else if(codec->codec_id == CODEC_ID_DVD_SUBTITLE)
 447                 type = 'v';
 448             else if(codec->codec_id == CODEC_ID_XSUB)
 449                 type = 'x';
 450             else if(codec->codec_id == CODEC_ID_DVB_SUBTITLE)
 451                 type = 'b';
 452             else if(codec->codec_id == CODEC_ID_DVB_TELETEXT)
 453                 type = 'd';
 454             else if(codec->codec_id == CODEC_ID_HDMV_PGS_SUBTITLE)
 455                 type = 'p';
 456             else
 457                 break;
 458             sh_sub = new_sh_sub_sid(demuxer, i, priv->sub_streams);
 459             if(!sh_sub) break;
 460             stream_type = "subtitle";
 461             priv->sstreams[priv->sub_streams] = i;
 462             sh_sub->type = type;
 463             if (codec->extradata_size) {
 464                 sh_sub->extradata = malloc(codec->extradata_size);
 465                 memcpy(sh_sub->extradata, codec->extradata, codec->extradata_size);
 466                 sh_sub->extradata_len = codec->extradata_size;
 467             }
 468             if (title && title->value)
 469                 mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_SID_%d_NAME=%s\n", priv->sub_streams, title->value);
 470             if (lang && lang->value) {
 471               sh_sub->lang = strdup(lang->value);
 472               mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_SID_%d_LANG=%s\n", priv->sub_streams, sh_sub->lang);
 473             }
 474             if (st->disposition & AV_DISPOSITION_DEFAULT)
 475               sh_sub->default_track = 1;
 476             stream_id = priv->sub_streams++;
 477             break;
 478         }
 479         case AVMEDIA_TYPE_ATTACHMENT:{
 480             AVMetadataTag *ftag = av_metadata_get(st->metadata, "filename",
 481                                                    NULL, 0);
 482             char *filename = ftag ? ftag->value : NULL;
 483             if (st->codec->codec_id == CODEC_ID_TTF)
 484                 demuxer_add_attachment(demuxer, BSTR(filename),
 485                                        BSTR("application/x-truetype-font"),
 486                                        (struct bstr){codec->extradata,
 487                                                      codec->extradata_size});
 488             break;
 489         }
 490         default:
 491             st->discard= AVDISCARD_ALL;
 492     }
 493     if (stream_type) {
 494         AVCodec *avc = avcodec_find_decoder(codec->codec_id);
 495         const char *codec_name = avc ? avc->name : "unknown";
 496         if (!avc && *stream_type == 's' && demuxer->s_streams[stream_id])
 497             codec_name = sh_sub_type2str(((sh_sub_t *)demuxer->s_streams[stream_id])->type);
 498         mp_msg(MSGT_DEMUX, MSGL_INFO, "[lavf] stream %d: %s (%s), -%cid %d", i, stream_type, codec_name, *stream_type, stream_id);
 499         if (lang && lang->value && *stream_type != 'v')
 500             mp_msg(MSGT_DEMUX, MSGL_INFO, ", -%clang %s", *stream_type, lang->value);
 501         if (title && title->value)
 502             mp_msg(MSGT_DEMUX, MSGL_INFO, ", %s", title->value);
 503         mp_msg(MSGT_DEMUX, MSGL_INFO, "\n");
 504     }
 505 }
 506
 507 static demuxer_t* demux_open_lavf(demuxer_t *demuxer){
 508     struct MPOpts *opts = demuxer->opts;
 509     struct lavfdopts *lavfdopts = &opts->lavfdopts;
 510     AVFormatContext *avfc;
 511     AVFormatParameters ap;
 512     const AVOption *opt;
 513     AVMetadataTag *t = NULL;
 514     lavf_priv_t *priv= demuxer->priv;
 515     int i;
 516     char mp_filename[256]="mp:";
 517
 518     memset(&ap, 0, sizeof(AVFormatParameters));
 519
 520     stream_seek(demuxer->stream, 0);
 521
 522     avfc = avformat_alloc_context();
 523
 524     if (lavfdopts->cryptokey)
 525         parse_cryptokey(avfc, lavfdopts->cryptokey);
 526     if (matches_avinputformat_name(priv, "avi")) {
 527         /* for avi libavformat returns the avi timestamps in .dts,
 528          * some made-up stuff that's not really pts in .pts */
 529         priv->use_dts = true;
 530         demuxer->timestamp_type = TIMESTAMP_TYPE_SORT;
 531     } else {
 532         if (opts->user_correct_pts != 0)
 533             avfc->flags |= AVFMT_FLAG_GENPTS;
 534     }
 535     if (index_mode == 0)
 536         avfc->flags |= AVFMT_FLAG_IGNIDX;
 537
 538     ap.prealloced_context = 1;
 539     if (lavfdopts->probesize) {
 540         opt = av_set_int(avfc, "probesize", lavfdopts->probesize);
 541         if(!opt) mp_msg(MSGT_HEADER,MSGL_ERR, "demux_lavf, couldn't set option probesize to %u\n", lavfdopts->probesize);
 542     }
 543     if (lavfdopts->analyzeduration) {
 544         opt = av_set_int(avfc, "analyzeduration",
 545                          lavfdopts->analyzeduration * AV_TIME_BASE);
 546         if (!opt)
 547             mp_msg(MSGT_HEADER, MSGL_ERR, "demux_lavf, couldn't set option "
 548                    "analyzeduration to %u\n", lavfdopts->analyzeduration);
 549     }
 550
 551     if (lavfdopts->avopt){
 552         if(parse_avopts(avfc, lavfdopts->avopt) < 0){
 553             mp_msg(MSGT_HEADER,MSGL_ERR, "Your options /%s/ look like gibberish to me pal\n", lavfdopts->avopt);
 554             return NULL;
 555         }
 556     }
 557
 558     if(demuxer->stream->url) {
 559         if (!strncmp(demuxer->stream->url, "ffmpeg://rtsp:", 14))
 560             av_strlcpy(mp_filename, demuxer->stream->url + 9, sizeof(mp_filename));
 561         else
 562             av_strlcat(mp_filename, demuxer->stream->url, sizeof(mp_filename));
 563     } else
 564         av_strlcat(mp_filename, "foobar.dummy", sizeof(mp_filename));
 565
 566     priv->pb = av_alloc_put_byte(priv->buffer, BIO_BUFFER_SIZE, 0,
 567                                  demuxer, mp_read, NULL, mp_seek);
 568     priv->pb->read_seek = mp_read_seek;
 569     priv->pb->is_streamed = !demuxer->stream->end_pos || (demuxer->stream->flags & MP_STREAM_SEEK) != MP_STREAM_SEEK;
 570
 571     if(av_open_input_stream(&avfc, priv->pb, mp_filename, priv->avif, &ap)<0){
 572         mp_msg(MSGT_HEADER,MSGL_ERR,"LAVF_header: av_open_input_stream() failed\n");
 573         return NULL;
 574     }
 575
 576     priv->avfc= avfc;
 577
 578     if(av_find_stream_info(avfc) < 0){
 579         mp_msg(MSGT_HEADER,MSGL_ERR,"LAVF_header: av_find_stream_info() failed\n");
 580         return NULL;
 581     }
 582
 583     /* Add metadata. */
 584     av_metadata_conv(avfc, NULL, avfc->iformat->metadata_conv);
 585     while((t = av_metadata_get(avfc->metadata, "", t, AV_METADATA_IGNORE_SUFFIX)))
 586         demux_info_add(demuxer, t->key, t->value);
 587
 588     for(i=0; i < avfc->nb_chapters; i++) {
 589         AVChapter *c = avfc->chapters[i];
 590         uint64_t start = av_rescale_q(c->start, c->time_base, (AVRational){1,1000000000});
 591         uint64_t end   = av_rescale_q(c->end, c->time_base, (AVRational){1,1000000000});
 592         t = av_metadata_get(c->metadata, "title", NULL, 0);
 593         demuxer_add_chapter(demuxer, t ? BSTR(t->value) : BSTR(NULL), start, end);
 594     }
 595
 596     for(i=0; i<avfc->nb_streams; i++)
 597         handle_stream(demuxer, avfc, i);
 598     priv->nb_streams_last = avfc->nb_streams;
 599
 600     if(avfc->nb_programs) {
 601         int p;
 602         for (p = 0; p < avfc->nb_programs; p++) {
 603             AVProgram *program = avfc->programs[p];
 604             t = av_metadata_get(program->metadata, "title", NULL, 0);
 605             mp_msg(MSGT_HEADER,MSGL_INFO,"LAVF: Program %d %s\n", program->id, t ? t->value : "");
 606             mp_msg(MSGT_IDENTIFY, MSGL_V, "PROGRAM_ID=%d\n", program->id);
 607         }
 608     }
 609
 610     mp_msg(MSGT_HEADER,MSGL_V,"LAVF: %d audio and %d video streams found\n",priv->audio_streams,priv->video_streams);
 611     mp_msg(MSGT_HEADER,MSGL_V,"LAVF: build %d\n", LIBAVFORMAT_BUILD);
 612     demuxer->audio->id = -2;  // wait for higher-level code to select track
 613     if(!priv->video_streams){
 614         if(!priv->audio_streams){
 615             mp_msg(MSGT_HEADER,MSGL_ERR,"LAVF: no audio or video headers found - broken file?\n");
 616             return NULL;
 617         }
 618         demuxer->video->id=-2; // audio-only
 619     } //else if (best_video > 0 && demuxer->video->id == -1) demuxer->video->id = best_video;
 620
 621     // disabled because unreliable per-stream bitrate values returned
 622     // by libavformat trigger this heuristic incorrectly and break things
 623 #if 0
 624     /* libavformat sets bitrate for mpeg based on pts at start and end
 625      * of file, which fails for files with pts resets. So calculate our
 626      * own bitrate estimate. */
 627     if (priv->avif->flags & AVFMT_TS_DISCONT) {
 628         for (int i = 0; i < avfc->nb_streams; i++)
 629             priv->bitrate += avfc->streams[i]->codec->bit_rate;
 630         /* pts-based is more accurate if there are no resets; try to make
 631          * a somewhat reasonable guess */
 632         if (!avfc->duration || avfc->duration == AV_NOPTS_VALUE
 633             || priv->bitrate && (avfc->bit_rate < priv->bitrate / 2
 634                                  || avfc->bit_rate > priv->bitrate * 2))
 635             priv->seek_by_bytes = true;
 636         if (!priv->bitrate)
 637             priv->bitrate = 1440000;
 638     }
 639 #endif
 640     demuxer->accurate_seek = !priv->seek_by_bytes;
 641
 642     return demuxer;
 643 }
 644
 645 static void check_internet_radio_hack(struct demuxer *demuxer)
 646 {
 647     struct lavf_priv *priv = demuxer->priv;
 648     struct AVFormatContext *avfc = priv->avfc;
 649
 650     if (!matches_avinputformat_name(priv, "ogg"))
 651         return;
 652     if (priv->nb_streams_last == avfc->nb_streams)
 653         return;
 654     if (avfc->nb_streams - priv->nb_streams_last == 1
 655         && priv->video_streams == 0 && priv->sub_streams == 0
 656         && demuxer->a_streams[priv->audio_streams-1]->format == 0x566f // vorbis
 657         && (priv->audio_streams == 2 || priv->internet_radio_hack)
 658         && demuxer->a_streams[0]->format == 0x566f) {
 659         // extradata match could be checked but would require parsing
 660         // headers, as the comment section will vary
 661         if (!priv->internet_radio_hack) {
 662             mp_msg(MSGT_DEMUX, MSGL_V,
 663                    "[lavf] enabling internet ogg radio hack\n");
 664 #if LIBAVFORMAT_VERSION_MAJOR < 53
 665             mp_tmsg(MSGT_DEMUX, MSGL_WARN, "[lavf] This looks like an "
 666                     "internet radio ogg stream with track changes.\n"
 667                     "Playback will likely fail after %d track changes "
 668                     "due to libavformat limitations.\n"
 669                     "You may be able to work around that limitation by "
 670                     "using -demuxer ogg.\n", MAX_STREAMS);
 671 #endif
 672         }
 673 #if LIBAVFORMAT_VERSION_MAJOR < 53
 674         if (avfc->nb_streams == MAX_STREAMS) {
 675             mp_tmsg(MSGT_DEMUX, MSGL_WARN, "[lavf] This is the %dth "
 676                     "track.\nPlayback will likely fail at the next change.\n"
 677                     "You may be able to work around this limitation by "
 678                     "using -demuxer ogg.\n", MAX_STREAMS);
 679         }
 680 #endif
 681         priv->internet_radio_hack = true;
 682         // use new per-track metadata as global metadata
 683         AVMetadataTag *t = NULL;
 684         AVStream *stream = avfc->streams[avfc->nb_streams - 1];
 685         while ((t = av_metadata_get(stream->metadata, "", t,
 686                                    AV_METADATA_IGNORE_SUFFIX)))
 687             demux_info_add(demuxer, t->key, t->value);
 688     } else {
 689         if (priv->internet_radio_hack)
 690             mp_tmsg(MSGT_DEMUX, MSGL_WARN, "[lavf] Internet radio ogg hack "
 691                     "was enabled, but stream characteristics changed.\n"
 692                     "This may or may not work.\n");
 693         priv->internet_radio_hack = false;
 694     }
 695 }
 696
 697 static int demux_lavf_fill_buffer(demuxer_t *demux, demux_stream_t *dsds){
 698     lavf_priv_t *priv= demux->priv;
 699     AVPacket pkt;
 700     demux_packet_t *dp;
 701     demux_stream_t *ds;
 702     int id;
 703     mp_msg(MSGT_DEMUX,MSGL_DBG2,"demux_lavf_fill_buffer()\n");
 704
 705     demux->filepos=stream_tell(demux->stream);
 706
 707     if(av_read_frame(priv->avfc, &pkt) < 0)
 708         return 0;
 709
 710     // handle any new streams that might have been added
 711     for (id = priv->nb_streams_last; id < priv->avfc->nb_streams; id++)
 712         handle_stream(demux, priv->avfc, id);
 713     check_internet_radio_hack(demux);
 714
 715     priv->nb_streams_last = priv->avfc->nb_streams;
 716
 717     id= pkt.stream_index;
 718
 719     if (id == demux->audio->id || priv->internet_radio_hack) {
 720         // audio
 721         ds=demux->audio;
 722         if(!ds->sh){
 723             ds->sh=demux->a_streams[id];
 724             mp_msg(MSGT_DEMUX,MSGL_V,"Auto-selected LAVF audio ID = %d\n",ds->id);
 725         }
 726     } else if(id==demux->video->id){
 727         // video
 728         ds=demux->video;
 729         if(!ds->sh){
 730             ds->sh=demux->v_streams[id];
 731             mp_msg(MSGT_DEMUX,MSGL_V,"Auto-selected LAVF video ID = %d\n",ds->id);
 732         }
 733     } else if(id==demux->sub->id){
 734         // subtitle
 735         ds=demux->sub;
 736         sub_utf8=1;
 737     } else {
 738         av_free_packet(&pkt);
 739         return 1;
 740     }
 741
 742     if(0/*pkt.destruct == av_destruct_packet*/){
 743         //ok kids, dont try this at home :)
 744         dp=malloc(sizeof(demux_packet_t));
 745         dp->len=pkt.size;
 746         dp->next=NULL;
 747         dp->refcount=1;
 748         dp->master=NULL;
 749         dp->buffer=pkt.data;
 750         pkt.destruct= NULL;
 751     }else{
 752         dp=new_demux_packet(pkt.size);
 753         memcpy(dp->buffer, pkt.data, pkt.size);
 754         av_free_packet(&pkt);
 755     }
 756
 757     int64_t ts = priv->use_dts ? pkt.dts : pkt.pts;
 758     if(ts != AV_NOPTS_VALUE){
 759         dp->pts = ts * av_q2d(priv->avfc->streams[id]->time_base);
 760         priv->last_pts= dp->pts * AV_TIME_BASE;
 761         // always set duration for subtitles, even if AV_PKT_FLAG_KEY isn't set,
 762         // otherwise they will stay on screen to long if e.g. ASS is demuxed from mkv
 763         if ((ds == demux->sub || (pkt.flags & AV_PKT_FLAG_KEY)) &&
 764            pkt.convergence_duration > 0)
 765             dp->duration = pkt.convergence_duration * av_q2d(priv->avfc->streams[id]->time_base);
 766     }
 767     dp->pos=demux->filepos;
 768     dp->flags = !!(pkt.flags & AV_PKT_FLAG_KEY);
 769     // append packet to DS stream:
 770     ds_add_packet(ds,dp);
 771     return 1;
 772 }
 773
 774 static void demux_seek_lavf(demuxer_t *demuxer, float rel_seek_secs, float audio_delay, int flags){
 775     lavf_priv_t *priv = demuxer->priv;
 776     int avsflags = 0;
 777     mp_msg(MSGT_DEMUX,MSGL_DBG2,"demux_seek_lavf(%p, %f, %f, %d)\n", demuxer, rel_seek_secs, audio_delay, flags);
 778
 779     if (priv->seek_by_bytes) {
 780         int64_t pos = demuxer->filepos;
 781         rel_seek_secs *= priv->bitrate / 8;
 782         pos += rel_seek_secs;
 783         av_seek_frame(priv->avfc, -1, pos, AVSEEK_FLAG_BYTE);
 784         return;
 785     }
 786
 787     if (flags & SEEK_ABSOLUTE) {
 788       priv->last_pts = 0;
 789     } else {
 790       if (rel_seek_secs < 0) avsflags = AVSEEK_FLAG_BACKWARD;
 791     }
 792     if (flags & SEEK_FORWARD)
 793         avsflags = 0;
 794     else if (flags & SEEK_BACKWARD)
 795         avsflags = AVSEEK_FLAG_BACKWARD;
 796     if (flags & SEEK_FACTOR) {
 797       if (priv->avfc->duration == 0 || priv->avfc->duration == AV_NOPTS_VALUE)
 798         return;
 799       priv->last_pts += rel_seek_secs * priv->avfc->duration;
 800     } else {
 801       priv->last_pts += rel_seek_secs * AV_TIME_BASE;
 802     }
 803     if (av_seek_frame(priv->avfc, -1, priv->last_pts, avsflags) < 0) {
 804         avsflags ^= AVSEEK_FLAG_BACKWARD;
 805         av_seek_frame(priv->avfc, -1, priv->last_pts, avsflags);
 806     }
 807 }
 808
 809 static int demux_lavf_control(demuxer_t *demuxer, int cmd, void *arg)
 810 {
 811     lavf_priv_t *priv = demuxer->priv;
 812
 813     switch (cmd) {
 814         case DEMUXER_CTRL_CORRECT_PTS:
 815             return DEMUXER_CTRL_OK;
 816     case DEMUXER_CTRL_GET_TIME_LENGTH:
 817         if (priv->seek_by_bytes) {
 818             /* Our bitrate estimate may be better than would be used in
 819              * otherwise similar fallback code at higher level */
 820             if (demuxer->movi_end <= 0)
 821                 return DEMUXER_CTRL_DONTKNOW;
 822             *(double *)arg = (demuxer->movi_end - demuxer->movi_start) * 8 /
 823                 priv->bitrate;
 824             return DEMUXER_CTRL_GUESS;
 825         }
 826             if (priv->avfc->duration == 0 || priv->avfc->duration == AV_NOPTS_VALUE)
 827                 return DEMUXER_CTRL_DONTKNOW;
 828
 829             *((double *)arg) = (double)priv->avfc->duration / AV_TIME_BASE;
 830             return DEMUXER_CTRL_OK;
 831
 832     case DEMUXER_CTRL_GET_PERCENT_POS:
 833         if (priv->seek_by_bytes)
 834             return DEMUXER_CTRL_DONTKNOW; // let it use the fallback code
 835             if (priv->avfc->duration == 0 || priv->avfc->duration == AV_NOPTS_VALUE)
 836                 return DEMUXER_CTRL_DONTKNOW;
 837
 838             *((int *)arg) = (int)((priv->last_pts - priv->avfc->start_time)*100 / priv->avfc->duration);
 839             return DEMUXER_CTRL_OK;
 840         case DEMUXER_CTRL_SWITCH_AUDIO:
 841         case DEMUXER_CTRL_SWITCH_VIDEO:
 842         {
 843             int id = *((int*)arg);
 844             int newid = -2;
 845             int i, curridx = -1;
 846             int nstreams, *pstreams;
 847             demux_stream_t *ds;
 848
 849             if(cmd == DEMUXER_CTRL_SWITCH_VIDEO)
 850             {
 851                 ds = demuxer->video;
 852                 nstreams = priv->video_streams;
 853                 pstreams = priv->vstreams;
 854             }
 855             else
 856             {
 857                 ds = demuxer->audio;
 858                 nstreams = priv->audio_streams;
 859                 pstreams = priv->astreams;
 860             }
 861             for(i = 0; i < nstreams; i++)
 862             {
 863                 if(pstreams[i] == ds->id) //current stream id
 864                 {
 865                     curridx = i;
 866                     break;
 867                 }
 868             }
 869
 870             if (id == -1) {   // next track
 871                 i = (curridx + 2) % (nstreams + 1) - 1;
 872                 if (i >= 0)
 873                     newid = pstreams[i];
 874             } else if (id >= 0 && id < nstreams) {   // select track by id
 875                 i = id;
 876                 newid = pstreams[i];
 877             } else   // no sound
 878                 i = -1;
 879
 880             if (i == curridx) {
 881                 *(int *) arg = curridx < 0 ? -2 : curridx;
 882                 return DEMUXER_CTRL_OK;
 883             } else {
 884                 ds_free_packs(ds);
 885                 if(ds->id >= 0)
 886                     priv->avfc->streams[ds->id]->discard = AVDISCARD_ALL;
 887                 ds->id = newid;
 888                 *(int *) arg = i < 0 ? -2 : i;
 889                 if(newid >= 0)
 890                     priv->avfc->streams[newid]->discard = AVDISCARD_NONE;
 891                 return DEMUXER_CTRL_OK;
 892             }
 893         }
 894         case DEMUXER_CTRL_IDENTIFY_PROGRAM:
 895         {
 896             demux_program_t *prog = arg;
 897             AVProgram *program;
 898             int p, i;
 899             int start;
 900
 901             prog->vid = prog->aid = prog->sid = -2;     //no audio and no video by default
 902             if(priv->avfc->nb_programs < 1)
 903                 return DEMUXER_CTRL_DONTKNOW;
 904
 905             if(prog->progid == -1)
 906             {
 907                 p = 0;
 908                 while(p<priv->avfc->nb_programs && priv->avfc->programs[p]->id != priv->cur_program)
 909                     p++;
 910                 p = (p + 1) % priv->avfc->nb_programs;
 911             }
 912             else
 913             {
 914                 for(i=0; i<priv->avfc->nb_programs; i++)
 915                     if(priv->avfc->programs[i]->id == prog->progid)
 916                         break;
 917                 if(i==priv->avfc->nb_programs)
 918                     return DEMUXER_CTRL_DONTKNOW;
 919                 p = i;
 920             }
 921             start = p;
 922 redo:
 923             program = priv->avfc->programs[p];
 924             for(i=0; i<program->nb_stream_indexes; i++)
 925             {
 926                 switch(priv->avfc->streams[program->stream_index[i]]->codec->codec_type)
 927                 {
 928                     case AVMEDIA_TYPE_VIDEO:
 929                         if(prog->vid == -2)
 930                             prog->vid = program->stream_index[i];
 931                         break;
 932                     case AVMEDIA_TYPE_AUDIO:
 933                         if(prog->aid == -2)
 934                             prog->aid = program->stream_index[i];
 935                         break;
 936                     case AVMEDIA_TYPE_SUBTITLE:
 937                         if(prog->sid == -2 && priv->avfc->streams[program->stream_index[i]]->codec->codec_id == CODEC_ID_TEXT)
 938                             prog->sid = program->stream_index[i];
 939                         break;
 940                 }
 941             }
 942             if (prog->aid >= 0 && prog->aid < MAX_A_STREAMS &&
 943                 demuxer->a_streams[prog->aid]) {
 944                 sh_audio_t *sh = demuxer->a_streams[prog->aid];
 945                 prog->aid = sh->aid;
 946             } else
 947                 prog->aid = -2;
 948             if (prog->vid >= 0 && prog->vid < MAX_V_STREAMS &&
 949                 demuxer->v_streams[prog->vid]) {
 950                 sh_video_t *sh = demuxer->v_streams[prog->vid];
 951                 prog->vid = sh->vid;
 952             } else
 953                 prog->vid = -2;
 954             if(prog->progid == -1 && prog->vid == -2 && prog->aid == -2)
 955             {
 956                 p = (p + 1) % priv->avfc->nb_programs;
 957                 if (p == start)
 958                     return DEMUXER_CTRL_DONTKNOW;
 959                 goto redo;
 960             }
 961             priv->cur_program = prog->progid = program->id;
 962             return DEMUXER_CTRL_OK;
 963         }
 964         default:
 965             return DEMUXER_CTRL_NOTIMPL;
 966     }
 967 }
 968
 969 static void demux_close_lavf(demuxer_t *demuxer)
 970 {
 971     lavf_priv_t* priv = demuxer->priv;
 972     if (priv){
 973         if(priv->avfc)
 974        {
 975          av_freep(&priv->avfc->key);
 976          av_close_input_stream(priv->avfc);
 977         }
 978         av_freep(&priv->pb);
 979         free(priv); demuxer->priv= NULL;
 980     }
 981 }
 982
 983
 984 const demuxer_desc_t demuxer_desc_lavf = {
 985   "libavformat demuxer",
 986   "lavf",
 987   "libavformat",
 988   "Michael Niedermayer",
 989   "supports many formats, requires libavformat",
 990   DEMUXER_TYPE_LAVF,
 991   0, // Check after other demuxer
 992   lavf_check_file,
 993   demux_lavf_fill_buffer,
 994   demux_open_lavf,
 995   demux_close_lavf,
 996   demux_seek_lavf,
 997   demux_lavf_control
 998 };
 999
1000 const demuxer_desc_t demuxer_desc_lavf_preferred = {
1001   "libavformat preferred demuxer",
1002   "lavfpref",
1003   "libavformat",
1004   "Michael Niedermayer",
1005   "supports many formats, requires libavformat",
1006   DEMUXER_TYPE_LAVF_PREFERRED,
1007   1,
1008   lavf_check_preferred_file,
1009   demux_lavf_fill_buffer,
1010   demux_open_lavf,
1011   demux_close_lavf,
1012   demux_seek_lavf,
1013   demux_lavf_control
1014 };