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