libmpdemux/demuxer.c

   1 /*
   2  * DEMUXER v2.5
   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 <string.h>
  24 #include <assert.h>
  25 #include <unistd.h>
  26
  27 #include <sys/types.h>
  28 #include <sys/stat.h>
  29
  30 #include "config.h"
  31 #include "options.h"
  32 #include "talloc.h"
  33 #include "mp_msg.h"
  34 #include "m_config.h"
  35
  36 #include "libvo/fastmemcpy.h"
  37
  38 #include "stream/stream.h"
  39 #include "demuxer.h"
  40 #include "stheader.h"
  41 #include "mf.h"
  42
  43 #include "libaf/af_format.h"
  44 #include "libmpcodecs/dec_teletext.h"
  45
  46 #include "libavcodec/avcodec.h"
  47 #if MP_INPUT_BUFFER_PADDING_SIZE < FF_INPUT_BUFFER_PADDING_SIZE
  48 #error MP_INPUT_BUFFER_PADDING_SIZE is too small!
  49 #endif
  50
  51 static void clear_parser(sh_common_t *sh);
  52
  53 // Demuxer list
  54 extern const struct demuxer_desc demuxer_desc_edl;
  55 extern const demuxer_desc_t demuxer_desc_rawaudio;
  56 extern const demuxer_desc_t demuxer_desc_rawvideo;
  57 extern const demuxer_desc_t demuxer_desc_tv;
  58 extern const demuxer_desc_t demuxer_desc_mf;
  59 extern const demuxer_desc_t demuxer_desc_avi;
  60 extern const demuxer_desc_t demuxer_desc_y4m;
  61 extern const demuxer_desc_t demuxer_desc_asf;
  62 extern const demuxer_desc_t demuxer_desc_real;
  63 extern const demuxer_desc_t demuxer_desc_smjpeg;
  64 extern const demuxer_desc_t demuxer_desc_matroska;
  65 extern const demuxer_desc_t demuxer_desc_realaudio;
  66 extern const demuxer_desc_t demuxer_desc_vqf;
  67 extern const demuxer_desc_t demuxer_desc_mov;
  68 extern const demuxer_desc_t demuxer_desc_vivo;
  69 extern const demuxer_desc_t demuxer_desc_fli;
  70 extern const demuxer_desc_t demuxer_desc_film;
  71 extern const demuxer_desc_t demuxer_desc_roq;
  72 extern const demuxer_desc_t demuxer_desc_gif;
  73 extern const demuxer_desc_t demuxer_desc_ogg;
  74 extern const demuxer_desc_t demuxer_desc_avs;
  75 extern const demuxer_desc_t demuxer_desc_pva;
  76 extern const demuxer_desc_t demuxer_desc_nsv;
  77 extern const demuxer_desc_t demuxer_desc_mpeg_ts;
  78 extern const demuxer_desc_t demuxer_desc_lmlm4;
  79 extern const demuxer_desc_t demuxer_desc_mpeg_ps;
  80 extern const demuxer_desc_t demuxer_desc_mpeg_pes;
  81 extern const demuxer_desc_t demuxer_desc_mpeg_es;
  82 extern const demuxer_desc_t demuxer_desc_mpeg_gxf;
  83 extern const demuxer_desc_t demuxer_desc_mpeg4_es;
  84 extern const demuxer_desc_t demuxer_desc_h264_es;
  85 extern const demuxer_desc_t demuxer_desc_rawdv;
  86 extern const demuxer_desc_t demuxer_desc_mpc;
  87 extern const demuxer_desc_t demuxer_desc_audio;
  88 extern const demuxer_desc_t demuxer_desc_xmms;
  89 extern const demuxer_desc_t demuxer_desc_mpeg_ty;
  90 extern const demuxer_desc_t demuxer_desc_lavf;
  91 extern const demuxer_desc_t demuxer_desc_lavf_preferred;
  92 extern const demuxer_desc_t demuxer_desc_aac;
  93 extern const demuxer_desc_t demuxer_desc_nut;
  94 extern const demuxer_desc_t demuxer_desc_mng;
  95
  96 /* Please do not add any new demuxers here. If you want to implement a new
  97  * demuxer, add it to libavformat, except for wrappers around external
  98  * libraries and demuxers requiring binary support. */
  99
 100 const demuxer_desc_t *const demuxer_list[] = {
 101     &demuxer_desc_edl,
 102     &demuxer_desc_rawaudio,
 103     &demuxer_desc_rawvideo,
 104 #ifdef CONFIG_TV
 105     &demuxer_desc_tv,
 106 #endif
 107     &demuxer_desc_mf,
 108     &demuxer_desc_lavf_preferred,
 109     &demuxer_desc_avi,
 110     &demuxer_desc_y4m,
 111     &demuxer_desc_asf,
 112     &demuxer_desc_nsv,
 113     &demuxer_desc_real,
 114     &demuxer_desc_smjpeg,
 115     &demuxer_desc_matroska,
 116     &demuxer_desc_realaudio,
 117     &demuxer_desc_vqf,
 118     &demuxer_desc_mov,
 119     &demuxer_desc_vivo,
 120     &demuxer_desc_fli,
 121     &demuxer_desc_film,
 122     &demuxer_desc_roq,
 123 #ifdef CONFIG_GIF
 124     &demuxer_desc_gif,
 125 #endif
 126 #ifdef CONFIG_OGGVORBIS
 127     &demuxer_desc_ogg,
 128 #endif
 129 #ifdef CONFIG_WIN32DLL
 130     &demuxer_desc_avs,
 131 #endif
 132     &demuxer_desc_pva,
 133     &demuxer_desc_mpeg_ts,
 134     &demuxer_desc_lmlm4,
 135     &demuxer_desc_mpeg_ps,
 136     &demuxer_desc_mpeg_pes,
 137     &demuxer_desc_mpeg_es,
 138     &demuxer_desc_mpeg_gxf,
 139     &demuxer_desc_mpeg4_es,
 140     &demuxer_desc_h264_es,
 141     &demuxer_desc_audio,
 142     &demuxer_desc_mpeg_ty,
 143     &demuxer_desc_lavf,
 144 #ifdef CONFIG_MUSEPACK
 145     &demuxer_desc_mpc,
 146 #endif
 147 #ifdef CONFIG_LIBDV095
 148     &demuxer_desc_rawdv,
 149 #endif
 150     &demuxer_desc_aac,
 151 #ifdef CONFIG_LIBNUT
 152     &demuxer_desc_nut,
 153 #endif
 154 #ifdef CONFIG_XMMS
 155     &demuxer_desc_xmms,
 156 #endif
 157 #ifdef CONFIG_MNG
 158     &demuxer_desc_mng,
 159 #endif
 160     /* Please do not add any new demuxers here. If you want to implement a new
 161      * demuxer, add it to libavformat, except for wrappers around external
 162      * libraries and demuxers requiring binary support. */
 163     NULL
 164 };
 165
 166 static struct demux_packet *create_packet(size_t len)
 167 {
 168     if (len > 1000000000) {
 169         mp_msg(MSGT_DEMUXER, MSGL_FATAL, "Attempt to allocate demux packet "
 170                "over 1 GB!\n");
 171         abort();
 172     }
 173     struct demux_packet *dp = malloc(sizeof(struct demux_packet));
 174     dp->len = len;
 175     dp->next = NULL;
 176     dp->pts = MP_NOPTS_VALUE;
 177     dp->duration = -1;
 178     dp->stream_pts = MP_NOPTS_VALUE;
 179     dp->pos = 0;
 180     dp->keyframe = false;
 181     dp->refcount = 1;
 182     dp->master = NULL;
 183     dp->buffer = NULL;
 184     dp->avpacket = NULL;
 185     return dp;
 186 }
 187
 188 struct demux_packet *new_demux_packet(size_t len)
 189 {
 190     struct demux_packet *dp = create_packet(len);
 191     dp->buffer = malloc(len + MP_INPUT_BUFFER_PADDING_SIZE);
 192     if (!dp->buffer) {
 193         mp_msg(MSGT_DEMUXER, MSGL_FATAL, "Memory allocation failure!\n");
 194         abort();
 195     }
 196     memset(dp->buffer + len, 0, 8);
 197     return dp;
 198 }
 199
 200 // data must already have suitable padding
 201 struct demux_packet *new_demux_packet_fromdata(void *data, size_t len)
 202 {
 203     struct demux_packet *dp = create_packet(len);
 204     dp->buffer = data;
 205     return dp;
 206 }
 207
 208 void resize_demux_packet(struct demux_packet *dp, size_t len)
 209 {
 210     if (len > 1000000000) {
 211         mp_msg(MSGT_DEMUXER, MSGL_FATAL, "Attempt to realloc demux packet "
 212                "over 1 GB!\n");
 213         abort();
 214     }
 215     dp->buffer = realloc(dp->buffer, len + MP_INPUT_BUFFER_PADDING_SIZE);
 216     if (!dp->buffer) {
 217         mp_msg(MSGT_DEMUXER, MSGL_FATAL, "Memory allocation failure!\n");
 218         abort();
 219     }
 220     memset(dp->buffer + len, 0, 8);
 221     dp->len = len;
 222 }
 223
 224 struct demux_packet *clone_demux_packet(struct demux_packet *pack)
 225 {
 226     struct demux_packet *dp = malloc(sizeof(struct demux_packet));
 227     while (pack->master)
 228         pack = pack->master;  // find the master
 229     memcpy(dp, pack, sizeof(struct demux_packet));
 230     dp->next = NULL;
 231     dp->refcount = 0;
 232     dp->master = pack;
 233     pack->refcount++;
 234     return dp;
 235 }
 236
 237 void free_demux_packet(struct demux_packet *dp)
 238 {
 239     if (dp->master == NULL) {  //dp is a master packet
 240         dp->refcount--;
 241         if (dp->refcount == 0) {
 242             if (dp->avpacket)
 243                 talloc_free(dp->avpacket);
 244             else
 245                 free(dp->buffer);
 246             free(dp);
 247         }
 248         return;
 249     }
 250     // dp is a clone:
 251     free_demux_packet(dp->master);
 252     free(dp);
 253 }
 254
 255 static void free_demuxer_stream(struct demux_stream *ds)
 256 {
 257     ds_free_packs(ds);
 258     free(ds);
 259 }
 260
 261 static struct demux_stream *new_demuxer_stream(struct demuxer *demuxer, int id)
 262 {
 263     demux_stream_t *ds = malloc(sizeof(demux_stream_t));
 264     *ds = (demux_stream_t){
 265         .id = id,
 266         .demuxer = demuxer,
 267         .asf_seq = -1,
 268     };
 269     return ds;
 270 }
 271
 272
 273 /**
 274  * Get demuxer description structure for a given demuxer type
 275  *
 276  * @param file_format    type of the demuxer
 277  * @return               structure for the demuxer, NULL if not found
 278  */
 279 static const demuxer_desc_t *get_demuxer_desc_from_type(int file_format)
 280 {
 281     int i;
 282
 283     for (i = 0; demuxer_list[i]; i++)
 284         if (file_format == demuxer_list[i]->type)
 285             return demuxer_list[i];
 286
 287     return NULL;
 288 }
 289
 290
 291 demuxer_t *new_demuxer(struct MPOpts *opts, stream_t *stream, int type,
 292                        int a_id, int v_id, int s_id, char *filename)
 293 {
 294     struct demuxer *d = talloc_zero(NULL, struct demuxer);
 295     d->stream = stream;
 296     d->stream_pts = MP_NOPTS_VALUE;
 297     d->reference_clock = MP_NOPTS_VALUE;
 298     d->movi_start = stream->start_pos;
 299     d->movi_end = stream->end_pos;
 300     d->seekable = 1;
 301     d->synced = 0;
 302     d->filepos = -1;
 303     d->audio = new_demuxer_stream(d, a_id);
 304     d->video = new_demuxer_stream(d, v_id);
 305     d->sub = new_demuxer_stream(d, s_id);
 306     d->type = type;
 307     d->opts = opts;
 308     if (type)
 309         if (!(d->desc = get_demuxer_desc_from_type(type)))
 310             mp_msg(MSGT_DEMUXER, MSGL_ERR,
 311                    "BUG! Invalid demuxer type in new_demuxer(), "
 312                    "big troubles ahead.");
 313     if (filename) // Filename hack for avs_check_file
 314         d->filename = strdup(filename);
 315     stream_seek(stream, stream->start_pos);
 316     return d;
 317 }
 318
 319 const char *sh_sub_type2str(int type)
 320 {
 321     switch (type) {
 322     case 't': return "text";
 323     case 'm': return "movtext";
 324     case 'a': return "ass";
 325     case 'v': return "vobsub";
 326     case 'x': return "xsub";
 327     case 'b': return "dvb";
 328     case 'd': return "dvb-teletext";
 329     case 'p': return "hdmv pgs";
 330     }
 331     return "unknown";
 332 }
 333
 334 sh_sub_t *new_sh_sub_sid(demuxer_t *demuxer, int id, int sid)
 335 {
 336     if (id > MAX_S_STREAMS - 1 || id < 0) {
 337         mp_msg(MSGT_DEMUXER, MSGL_WARN,
 338                "Requested sub stream id overflow (%d > %d)\n", id,
 339                MAX_S_STREAMS);
 340         return NULL;
 341     }
 342     if (demuxer->s_streams[id])
 343         mp_msg(MSGT_DEMUXER, MSGL_WARN, "Sub stream %i redefined\n", id);
 344     else {
 345         struct sh_sub *sh = talloc_zero(demuxer, struct sh_sub);
 346         demuxer->s_streams[id] = sh;
 347         sh->sid = sid;
 348         sh->opts = demuxer->opts;
 349         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_SUBTITLE_ID=%d\n", sid);
 350     }
 351     return demuxer->s_streams[id];
 352 }
 353
 354 struct sh_sub *new_sh_sub_sid_lang(struct demuxer *demuxer, int id, int sid,
 355                                    const char *lang)
 356 {
 357     struct sh_sub *sh = new_sh_sub_sid(demuxer, id, sid);
 358     if (lang && lang[0] && strcmp(lang, "und")) {
 359         sh->lang = talloc_strdup(sh, lang);
 360         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_SID_%d_LANG=%s\n", sid, lang);
 361     }
 362     return sh;
 363 }
 364
 365 static void free_sh_sub(sh_sub_t *sh)
 366 {
 367     mp_msg(MSGT_DEMUXER, MSGL_DBG2, "DEMUXER: freeing sh_sub at %p\n", sh);
 368     free(sh->extradata);
 369     clear_parser((sh_common_t *)sh);
 370     talloc_free(sh);
 371 }
 372
 373 sh_audio_t *new_sh_audio_aid(demuxer_t *demuxer, int id, int aid)
 374 {
 375     if (id > MAX_A_STREAMS - 1 || id < 0) {
 376         mp_msg(MSGT_DEMUXER, MSGL_WARN,
 377                "Requested audio stream id overflow (%d > %d)\n", id,
 378                MAX_A_STREAMS);
 379         return NULL;
 380     }
 381     if (demuxer->a_streams[id]) {
 382         mp_tmsg(MSGT_DEMUXER, MSGL_WARN, "WARNING: Audio stream header %d redefined.\n", id);
 383     } else {
 384         mp_tmsg(MSGT_DEMUXER, MSGL_V, "==> Found audio stream: %d\n", id);
 385         struct sh_audio *sh = talloc_zero(demuxer, struct sh_audio);
 386         demuxer->a_streams[id] = sh;
 387         sh->aid = aid;
 388         sh->ds = demuxer->audio;
 389         // set some defaults
 390         sh->samplesize = 2;
 391         sh->sample_format = AF_FORMAT_S16_NE;
 392         sh->opts = demuxer->opts;
 393         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_AUDIO_ID=%d\n", aid);
 394     }
 395     return demuxer->a_streams[id];
 396 }
 397
 398 void free_sh_audio(demuxer_t *demuxer, int id)
 399 {
 400     sh_audio_t *sh = demuxer->a_streams[id];
 401     demuxer->a_streams[id] = NULL;
 402     mp_msg(MSGT_DEMUXER, MSGL_DBG2, "DEMUXER: freeing sh_audio at %p\n", sh);
 403     free(sh->wf);
 404     free(sh->codecdata);
 405     clear_parser((sh_common_t *)sh);
 406     talloc_free(sh);
 407 }
 408
 409 sh_video_t *new_sh_video_vid(demuxer_t *demuxer, int id, int vid)
 410 {
 411     if (id > MAX_V_STREAMS - 1 || id < 0) {
 412         mp_msg(MSGT_DEMUXER, MSGL_WARN,
 413                "Requested video stream id overflow (%d > %d)\n", id,
 414                MAX_V_STREAMS);
 415         return NULL;
 416     }
 417     if (demuxer->v_streams[id])
 418         mp_tmsg(MSGT_DEMUXER, MSGL_WARN, "WARNING: Video stream header %d redefined.\n", id);
 419     else {
 420         mp_tmsg(MSGT_DEMUXER, MSGL_V, "==> Found video stream: %d\n", id);
 421         struct sh_video *sh = talloc_zero(demuxer, struct sh_video);
 422         demuxer->v_streams[id] = sh;
 423         sh->vid = vid;
 424         sh->ds = demuxer->video;
 425         sh->opts = demuxer->opts;
 426         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_VIDEO_ID=%d\n", vid);
 427     }
 428     return demuxer->v_streams[id];
 429 }
 430
 431 void free_sh_video(sh_video_t *sh)
 432 {
 433     mp_msg(MSGT_DEMUXER, MSGL_DBG2, "DEMUXER: freeing sh_video at %p\n", sh);
 434     free(sh->bih);
 435     clear_parser((sh_common_t *)sh);
 436     talloc_free(sh);
 437 }
 438
 439 void free_demuxer(demuxer_t *demuxer)
 440 {
 441     int i;
 442     mp_msg(MSGT_DEMUXER, MSGL_DBG2, "DEMUXER: freeing %s demuxer at %p\n",
 443            demuxer->desc->shortdesc, demuxer);
 444     if (demuxer->desc->close)
 445         demuxer->desc->close(demuxer);
 446     // Very ugly hack to make it behave like old implementation
 447     if (demuxer->desc->type == DEMUXER_TYPE_DEMUXERS)
 448         goto skip_streamfree;
 449     // free streams:
 450     for (i = 0; i < MAX_A_STREAMS; i++)
 451         if (demuxer->a_streams[i])
 452             free_sh_audio(demuxer, i);
 453     for (i = 0; i < MAX_V_STREAMS; i++)
 454         if (demuxer->v_streams[i])
 455             free_sh_video(demuxer->v_streams[i]);
 456     for (i = 0; i < MAX_S_STREAMS; i++)
 457         if (demuxer->s_streams[i])
 458             free_sh_sub(demuxer->s_streams[i]);
 459     // free demuxers:
 460     free_demuxer_stream(demuxer->audio);
 461     free_demuxer_stream(demuxer->video);
 462     free_demuxer_stream(demuxer->sub);
 463  skip_streamfree:
 464     free(demuxer->filename);
 465     if (demuxer->teletext)
 466         teletext_control(demuxer->teletext, TV_VBI_CONTROL_STOP, NULL);
 467     talloc_free(demuxer);
 468 }
 469
 470
 471 void ds_add_packet(demux_stream_t *ds, demux_packet_t *dp)
 472 {
 473     // append packet to DS stream:
 474     ++ds->packs;
 475     ds->bytes += dp->len;
 476     if (ds->last) {
 477         // next packet in stream
 478         ds->last->next = dp;
 479         ds->last = dp;
 480     } else {
 481         // first packet in stream
 482         ds->first = ds->last = dp;
 483     }
 484     mp_dbg(MSGT_DEMUXER, MSGL_DBG2,
 485            "DEMUX: Append packet to %s, len=%d  pts=%5.3f  pos=%u  [packs: A=%d V=%d]\n",
 486            (ds == ds->demuxer->audio) ? "d_audio" : "d_video", dp->len,
 487            dp->pts, (unsigned int) dp->pos, ds->demuxer->audio->packs,
 488            ds->demuxer->video->packs);
 489 }
 490
 491 static void allocate_parser(AVCodecContext **avctx, AVCodecParserContext **parser, unsigned format)
 492 {
 493     enum CodecID codec_id = CODEC_ID_NONE;
 494
 495     switch (format) {
 496     case MKTAG('M', 'P', '4', 'L'):
 497         codec_id = CODEC_ID_AAC_LATM;
 498         break;
 499     case 0x2000:
 500     case 0x332D6361:
 501     case 0x332D4341:
 502     case 0x20736D:
 503     case MKTAG('s', 'a', 'c', '3'):
 504         codec_id = CODEC_ID_AC3;
 505         break;
 506     case MKTAG('d', 'n', 'e', 't'):
 507         // DNET/byte-swapped AC-3 - there is no parser for that yet
 508         //codec_id = CODEC_ID_DNET;
 509         break;
 510     case MKTAG('E', 'A', 'C', '3'):
 511         codec_id = CODEC_ID_EAC3;
 512         break;
 513     case 0x2001:
 514     case 0x86:
 515         codec_id = CODEC_ID_DTS;
 516         break;
 517     case MKTAG('f', 'L', 'a', 'C'):
 518         codec_id = CODEC_ID_FLAC;
 519         break;
 520     case MKTAG('M', 'L', 'P', ' '):
 521         codec_id = CODEC_ID_MLP;
 522         break;
 523     case 0x55:
 524     case 0x5500736d:
 525     case 0x55005354:
 526     case MKTAG('.', 'm', 'p', '3'):
 527     case MKTAG('M', 'P', '3', ' '):
 528     case MKTAG('L', 'A', 'M', 'E'):
 529         codec_id = CODEC_ID_MP3;
 530         break;
 531     case 0x50:
 532     case 0x5000736d:
 533     case MKTAG('.', 'm', 'p', '2'):
 534     case MKTAG('.', 'm', 'p', '1'):
 535         codec_id = CODEC_ID_MP2;
 536         break;
 537     case MKTAG('T', 'R', 'H', 'D'):
 538         codec_id = CODEC_ID_TRUEHD;
 539         break;
 540     }
 541     if (codec_id != CODEC_ID_NONE) {
 542         *avctx = avcodec_alloc_context3(NULL);
 543         if (!*avctx)
 544             return;
 545         *parser = av_parser_init(codec_id);
 546         if (!*parser)
 547             av_freep(avctx);
 548     }
 549 }
 550
 551 static void get_parser(sh_common_t *sh, AVCodecContext **avctx, AVCodecParserContext **parser)
 552 {
 553     *avctx  = NULL;
 554     *parser = NULL;
 555
 556     if (!sh || !sh->needs_parsing)
 557         return;
 558
 559     *avctx  = sh->avctx;
 560     *parser = sh->parser;
 561     if (*parser)
 562         return;
 563
 564     allocate_parser(avctx, parser, sh->format);
 565     sh->avctx  = *avctx;
 566     sh->parser = *parser;
 567 }
 568
 569 int ds_parse(demux_stream_t *ds, uint8_t **buffer, int *len, double pts, off_t pos)
 570 {
 571     AVCodecContext *avctx;
 572     AVCodecParserContext *parser;
 573     get_parser(ds->sh, &avctx, &parser);
 574     if (!parser)
 575         return *len;
 576     return av_parser_parse2(parser, avctx, buffer, len, *buffer, *len, pts, pts, pos);
 577 }
 578
 579 static void clear_parser(sh_common_t *sh)
 580 {
 581     av_parser_close(sh->parser);
 582     sh->parser = NULL;
 583     av_freep(&sh->avctx);
 584 }
 585
 586 void ds_clear_parser(demux_stream_t *ds)
 587 {
 588     if (!ds->sh)
 589         return;
 590     clear_parser(ds->sh);
 591 }
 592
 593 void ds_read_packet(demux_stream_t *ds, stream_t *stream, int len,
 594                     double pts, off_t pos, bool keyframe)
 595 {
 596     demux_packet_t *dp = new_demux_packet(len);
 597     len = stream_read(stream, dp->buffer, len);
 598     resize_demux_packet(dp, len);
 599     dp->pts = pts;
 600     dp->pos = pos;
 601     dp->keyframe = keyframe;
 602     // append packet to DS stream:
 603     ds_add_packet(ds, dp);
 604 }
 605
 606 // return value:
 607 //     0 = EOF or no stream found or invalid type
 608 //     1 = successfully read a packet
 609
 610 int demux_fill_buffer(demuxer_t *demux, demux_stream_t *ds)
 611 {
 612     // Note: parameter 'ds' can be NULL!
 613     return demux->desc->fill_buffer(demux, ds);
 614 }
 615
 616 // return value:
 617 //     0 = EOF
 618 //     1 = successful
 619 int ds_fill_buffer(demux_stream_t *ds)
 620 {
 621     demuxer_t *demux = ds->demuxer;
 622     if (ds->current)
 623         free_demux_packet(ds->current);
 624     ds->current = NULL;
 625     mp_dbg(MSGT_DEMUXER, MSGL_DBG3, "ds_fill_buffer (%s) called\n",
 626            ds == demux->audio ? "d_audio" : ds == demux->video ? "d_video" :
 627            ds == demux->sub   ? "d_sub"   : "unknown");
 628     while (1) {
 629         if (ds->packs) {
 630             demux_packet_t *p = ds->first;
 631             // copy useful data:
 632             ds->buffer = p->buffer;
 633             ds->buffer_pos = 0;
 634             ds->buffer_size = p->len;
 635             ds->pos = p->pos;
 636             ds->dpos += p->len; // !!!
 637             ++ds->pack_no;
 638             if (p->pts != MP_NOPTS_VALUE) {
 639                 ds->pts = p->pts;
 640                 ds->pts_bytes = 0;
 641             }
 642             ds->pts_bytes += p->len;    // !!!
 643             if (p->stream_pts != MP_NOPTS_VALUE)
 644                 demux->stream_pts = p->stream_pts;
 645             ds->keyframe = p->keyframe;
 646             // unlink packet:
 647             ds->bytes -= p->len;
 648             ds->current = p;
 649             ds->first = p->next;
 650             if (!ds->first)
 651                 ds->last = NULL;
 652             --ds->packs;
 653             /* The code below can set ds->eof to 1 when another stream runs
 654              * out of buffer space. That makes sense because in that situation
 655              * the calling code should not count on being able to demux more
 656              * packets from this stream.
 657              * If however the situation improves and we're called again
 658              * despite the eof flag then it's better to clear it to avoid
 659              * weird behavior. */
 660             ds->eof = 0;
 661             return 1;
 662         }
 663
 664 #define MaybeNI _("Maybe you are playing a non-interleaved stream/file or the codec failed?\n" \
 665                 "For AVI files, try to force non-interleaved mode with the -ni option.\n")
 666
 667         if (demux->audio->packs >= MAX_PACKS
 668             || demux->audio->bytes >= MAX_PACK_BYTES) {
 669             mp_tmsg(MSGT_DEMUXER, MSGL_ERR, "\nToo many audio packets in the buffer: (%d in %d bytes).\n",
 670                    demux->audio->packs, demux->audio->bytes);
 671             mp_tmsg(MSGT_DEMUXER, MSGL_HINT, MaybeNI);
 672             break;
 673         }
 674         if (demux->video->packs >= MAX_PACKS
 675             || demux->video->bytes >= MAX_PACK_BYTES) {
 676             mp_tmsg(MSGT_DEMUXER, MSGL_ERR, "\nToo many video packets in the buffer: (%d in %d bytes).\n",
 677                    demux->video->packs, demux->video->bytes);
 678             mp_tmsg(MSGT_DEMUXER, MSGL_HINT, MaybeNI);
 679             break;
 680         }
 681         if (!demux_fill_buffer(demux, ds)) {
 682             mp_dbg(MSGT_DEMUXER, MSGL_DBG2,
 683                    "ds_fill_buffer()->demux_fill_buffer() failed\n");
 684             break; // EOF
 685         }
 686     }
 687     ds->buffer_pos = ds->buffer_size = 0;
 688     ds->buffer = NULL;
 689     mp_msg(MSGT_DEMUXER, MSGL_V,
 690            "ds_fill_buffer: EOF reached (stream: %s)  \n",
 691            ds == demux->audio ? "audio" : "video");
 692     ds->eof = 1;
 693     return 0;
 694 }
 695
 696 int demux_read_data(demux_stream_t *ds, unsigned char *mem, int len)
 697 {
 698     int x;
 699     int bytes = 0;
 700     while (len > 0) {
 701         x = ds->buffer_size - ds->buffer_pos;
 702         if (x == 0) {
 703             if (!ds_fill_buffer(ds))
 704                 return bytes;
 705         } else {
 706             if (x > len)
 707                 x = len;
 708             if (mem)
 709                 fast_memcpy(mem + bytes, &ds->buffer[ds->buffer_pos], x);
 710             bytes += x;
 711             len -= x;
 712             ds->buffer_pos += x;
 713         }
 714     }
 715     return bytes;
 716 }
 717
 718 /**
 719  * \brief read data until the given 3-byte pattern is encountered, up to maxlen
 720  * \param mem memory to read data into, may be NULL to discard data
 721  * \param maxlen maximum number of bytes to read
 722  * \param read number of bytes actually read
 723  * \param pattern pattern to search for (lowest 8 bits are ignored)
 724  * \return whether pattern was found
 725  */
 726 int demux_pattern_3(demux_stream_t *ds, unsigned char *mem, int maxlen,
 727                     int *read, uint32_t pattern)
 728 {
 729     register uint32_t head = 0xffffff00;
 730     register uint32_t pat = pattern & 0xffffff00;
 731     int total_len = 0;
 732     do {
 733         register unsigned char *ds_buf = &ds->buffer[ds->buffer_size];
 734         int len = ds->buffer_size - ds->buffer_pos;
 735         register long pos = -len;
 736         if (unlikely(pos >= 0)) { // buffer is empty
 737             ds_fill_buffer(ds);
 738             continue;
 739         }
 740         do {
 741             head |= ds_buf[pos];
 742             head <<= 8;
 743         } while (++pos && head != pat);
 744         len += pos;
 745         if (total_len + len > maxlen)
 746             len = maxlen - total_len;
 747         len = demux_read_data(ds, mem ? &mem[total_len] : NULL, len);
 748         total_len += len;
 749     } while ((head != pat || total_len < 3) && total_len < maxlen && !ds->eof);
 750     if (read)
 751         *read = total_len;
 752     return total_len >= 3 && head == pat;
 753 }
 754
 755 void ds_free_packs(demux_stream_t *ds)
 756 {
 757     demux_packet_t *dp = ds->first;
 758     while (dp) {
 759         demux_packet_t *dn = dp->next;
 760         free_demux_packet(dp);
 761         dp = dn;
 762     }
 763     if (ds->asf_packet) {
 764         // free unfinished .asf fragments:
 765         free(ds->asf_packet->buffer);
 766         free(ds->asf_packet);
 767         ds->asf_packet = NULL;
 768     }
 769     ds->first = ds->last = NULL;
 770     ds->packs = 0; // !!!!!
 771     ds->bytes = 0;
 772     if (ds->current)
 773         free_demux_packet(ds->current);
 774     ds->current = NULL;
 775     ds->buffer = NULL;
 776     ds->buffer_pos = ds->buffer_size;
 777     ds->pts = MP_NOPTS_VALUE;
 778     ds->pts_bytes = 0;
 779 }
 780
 781 int ds_get_packet(demux_stream_t *ds, unsigned char **start)
 782 {
 783     int len;
 784     if (ds->buffer_pos >= ds->buffer_size) {
 785         if (!ds_fill_buffer(ds)) {
 786             // EOF
 787             *start = NULL;
 788             return -1;
 789         }
 790     }
 791     len = ds->buffer_size - ds->buffer_pos;
 792     *start = &ds->buffer[ds->buffer_pos];
 793     ds->buffer_pos += len;
 794     return len;
 795 }
 796
 797 int ds_get_packet_pts(demux_stream_t *ds, unsigned char **start, double *pts)
 798 {
 799     int len;
 800     *pts = MP_NOPTS_VALUE;
 801     len = ds_get_packet(ds, start);
 802     if (len < 0)
 803         return len;
 804     // Return pts unless this read starts from the middle of a packet
 805     if (len == ds->buffer_pos)
 806         *pts = ds->current->pts;
 807     return len;
 808 }
 809
 810 int ds_get_packet_sub(demux_stream_t *ds, unsigned char **start)
 811 {
 812     int len;
 813     if (ds->buffer_pos >= ds->buffer_size) {
 814         *start = NULL;
 815         if (!ds->packs)
 816             return -1;  // no sub
 817         if (!ds_fill_buffer(ds))
 818             return -1;  // EOF
 819     }
 820     len = ds->buffer_size - ds->buffer_pos;
 821     *start = &ds->buffer[ds->buffer_pos];
 822     ds->buffer_pos += len;
 823     return len;
 824 }
 825
 826 struct demux_packet *ds_get_packet2(struct demux_stream *ds, bool repeat_last)
 827 {
 828     // This shouldn't get used together with partial reads
 829     assert(ds->buffer_pos == 0 || ds->buffer_pos >= ds->buffer_size);
 830     if (!repeat_last)
 831         ds_fill_buffer(ds);
 832     ds->buffer_pos = ds->buffer_size;
 833     return ds->current;
 834 }
 835
 836 double ds_get_next_pts(demux_stream_t *ds)
 837 {
 838     demuxer_t *demux = ds->demuxer;
 839     // if we have not read from the "current" packet, consider it
 840     // as the next, otherwise we never get the pts for the first packet.
 841     while (!ds->first && (!ds->current || ds->buffer_pos)) {
 842         if (demux->audio->packs >= MAX_PACKS
 843             || demux->audio->bytes >= MAX_PACK_BYTES) {
 844             mp_tmsg(MSGT_DEMUXER, MSGL_ERR, "\nToo many audio packets in the buffer: (%d in %d bytes).\n",
 845                    demux->audio->packs, demux->audio->bytes);
 846             mp_tmsg(MSGT_DEMUXER, MSGL_HINT, MaybeNI);
 847             return MP_NOPTS_VALUE;
 848         }
 849         if (demux->video->packs >= MAX_PACKS
 850             || demux->video->bytes >= MAX_PACK_BYTES) {
 851             mp_tmsg(MSGT_DEMUXER, MSGL_ERR, "\nToo many video packets in the buffer: (%d in %d bytes).\n",
 852                    demux->video->packs, demux->video->bytes);
 853             mp_tmsg(MSGT_DEMUXER, MSGL_HINT, MaybeNI);
 854             return MP_NOPTS_VALUE;
 855         }
 856         if (!demux_fill_buffer(demux, ds))
 857             return MP_NOPTS_VALUE;
 858     }
 859     // take pts from "current" if we never read from it.
 860     if (ds->current && !ds->buffer_pos)
 861         return ds->current->pts;
 862     return ds->first->pts;
 863 }
 864
 865 // ====================================================================
 866
 867 void demuxer_help(void)
 868 {
 869     int i;
 870
 871     mp_msg(MSGT_DEMUXER, MSGL_INFO, "Available demuxers:\n");
 872     mp_msg(MSGT_DEMUXER, MSGL_INFO, " demuxer:   info:  (comment)\n");
 873     mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_DEMUXERS\n");
 874     for (i = 0; demuxer_list[i]; i++) {
 875         if (demuxer_list[i]->type >= DEMUXER_TYPE_END)  // internal type
 876             continue;
 877         if (demuxer_list[i]->comment && strlen(demuxer_list[i]->comment))
 878             mp_msg(MSGT_DEMUXER, MSGL_INFO, "%10s  %s (%s)\n",
 879                    demuxer_list[i]->name, demuxer_list[i]->info,
 880                    demuxer_list[i]->comment);
 881         else
 882             mp_msg(MSGT_DEMUXER, MSGL_INFO, "%10s  %s\n",
 883                    demuxer_list[i]->name, demuxer_list[i]->info);
 884     }
 885 }
 886
 887
 888 /**
 889  * Get demuxer type for a given demuxer name
 890  *
 891  * @param demuxer_name    string with demuxer name of demuxer number
 892  * @param force           will be set if demuxer should be forced.
 893  *                        May be NULL.
 894  * @return                DEMUXER_TYPE_xxx, -1 if error or not found
 895  */
 896 static int get_demuxer_type_from_name(char *demuxer_name, int *force)
 897 {
 898     if (!demuxer_name || !demuxer_name[0])
 899         return DEMUXER_TYPE_UNKNOWN;
 900     if (force)
 901         *force = demuxer_name[0] == '+';
 902     if (demuxer_name[0] == '+')
 903         demuxer_name = &demuxer_name[1];
 904     for (int i = 0; demuxer_list[i]; i++) {
 905         if (demuxer_list[i]->type >= DEMUXER_TYPE_END)
 906             // Can't select special demuxers from commandline
 907             continue;
 908         if (strcmp(demuxer_name, demuxer_list[i]->name) == 0)
 909             return demuxer_list[i]->type;
 910     }
 911
 912     return -1;
 913 }
 914
 915 static struct demuxer *open_given_type(struct MPOpts *opts,
 916                                        const struct demuxer_desc *desc,
 917                                        struct stream *stream, bool force,
 918                                        int audio_id, int video_id, int sub_id,
 919                                        char *filename,
 920                                        struct demuxer_params *params)
 921 {
 922     struct demuxer *demuxer;
 923     int fformat;
 924     demuxer = new_demuxer(opts, stream, desc->type, audio_id,
 925                           video_id, sub_id, filename);
 926     demuxer->params = params;
 927     if (desc->check_file)
 928         fformat = desc->check_file(demuxer);
 929     else
 930         fformat = desc->type;
 931     if (force)
 932         fformat = desc->type;
 933     if (fformat == 0)
 934         goto fail;
 935     if (fformat == desc->type) {
 936         if (demuxer->filetype)
 937             mp_tmsg(MSGT_DEMUXER, MSGL_INFO, "Detected file format: %s (%s)\n",
 938                     demuxer->filetype, desc->shortdesc);
 939         else
 940             mp_tmsg(MSGT_DEMUXER, MSGL_INFO, "Detected file format: %s\n",
 941                     desc->shortdesc);
 942         if (demuxer->desc->open) {
 943             struct demuxer *demux2 = demuxer->desc->open(demuxer);
 944             if (!demux2) {
 945                 mp_tmsg(MSGT_DEMUXER, MSGL_ERR, "Opening as detected format "
 946                         "\"%s\" failed.\n", desc->shortdesc);
 947                 goto fail;
 948             }
 949             /* At least demux_mov can return a demux_demuxers instance
 950              * from open() instead of the original fed in. */
 951             demuxer = demux2;
 952         }
 953         demuxer->file_format = fformat;
 954         return demuxer;
 955     } else {
 956         // demux_mov can return playlist instead of mov
 957         if (fformat == DEMUXER_TYPE_PLAYLIST)
 958             return demuxer; // handled in mplayer.c
 959         /* Internal MPEG PS demuxer check can return other MPEG subtypes
 960          * which don't have their own checks; recurse to try opening as
 961          * the returned type instead. */
 962         free_demuxer(demuxer);
 963         desc = get_demuxer_desc_from_type(fformat);
 964         if (!desc) {
 965             mp_msg(MSGT_DEMUXER, MSGL_ERR,
 966                    "BUG: recursion to nonexistent file format\n");
 967             return NULL;
 968         }
 969         return open_given_type(opts, desc, stream, false, audio_id,
 970                                video_id, sub_id, filename, params);
 971     }
 972  fail:
 973     free_demuxer(demuxer);
 974     return NULL;
 975 }
 976
 977 static struct demuxer *demux_open_stream(struct MPOpts *opts,
 978                                          struct stream *stream,
 979                                          int file_format, bool force,
 980                                          int audio_id, int video_id, int sub_id,
 981                                          char *filename,
 982                                          struct demuxer_params *params)
 983 {
 984     struct demuxer *demuxer = NULL;
 985     const struct demuxer_desc *desc;
 986
 987     // If somebody requested a demuxer check it
 988     if (file_format) {
 989         desc = get_demuxer_desc_from_type(file_format);
 990         if (!desc)
 991             // should only happen with obsolete -demuxer 99 numeric format
 992             return NULL;
 993         return open_given_type(opts, desc, stream, force, audio_id,
 994                                video_id, sub_id, filename, params);
 995     }
 996
 997     // Test demuxers with safe file checks
 998     for (int i = 0; (desc = demuxer_list[i]); i++) {
 999         if (desc->safe_check) {
1000             demuxer = open_given_type(opts, desc, stream, false, audio_id,
1001                                       video_id, sub_id, filename, params);
1002             if (demuxer)
1003                 return demuxer;
1004         }
1005     }
1006
1007     // Ok. We're over the stable detectable fileformats, the next ones are
1008     // a bit fuzzy. So by default (extension_parsing==1) try extension-based
1009     // detection first:
1010     if (filename && opts->extension_parsing == 1) {
1011         desc = get_demuxer_desc_from_type(demuxer_type_by_filename(filename));
1012         if (desc)
1013             demuxer = open_given_type(opts, desc, stream, false, audio_id,
1014                                       video_id, sub_id, filename, params);
1015         if (demuxer)
1016             return demuxer;
1017     }
1018
1019     // Finally try detection for demuxers with unsafe checks
1020     for (int i = 0; (desc = demuxer_list[i]); i++) {
1021         if (!desc->safe_check && desc->check_file) {
1022             demuxer = open_given_type(opts, desc, stream, false, audio_id,
1023                                       video_id, sub_id, filename, params);
1024             if (demuxer)
1025                 return demuxer;
1026         }
1027     }
1028
1029     return NULL;
1030 }
1031
1032 struct demuxer *demux_open(struct MPOpts *opts, stream_t *vs, int file_format,
1033                            int audio_id, int video_id, int sub_id,
1034                            char *filename)
1035 {
1036     return demux_open_withparams(opts, vs, file_format, audio_id, video_id,
1037                                  sub_id, filename, NULL);
1038 }
1039
1040 struct demuxer *demux_open_withparams(struct MPOpts *opts, stream_t *vs,
1041                 int file_format, int audio_id, int video_id, int dvdsub_id,
1042                 char *filename, struct demuxer_params *params)
1043 {
1044     stream_t *as = NULL, *ss = NULL;
1045     demuxer_t *vd, *ad = NULL, *sd = NULL;
1046     demuxer_t *res;
1047     int afmt = DEMUXER_TYPE_UNKNOWN, sfmt = DEMUXER_TYPE_UNKNOWN;
1048     int demuxer_type;
1049     int audio_demuxer_type = 0, sub_demuxer_type = 0;
1050     int demuxer_force = 0, audio_demuxer_force = 0, sub_demuxer_force = 0;
1051
1052     if ((demuxer_type =
1053          get_demuxer_type_from_name(opts->demuxer_name, &demuxer_force)) < 0) {
1054         mp_msg(MSGT_DEMUXER, MSGL_ERR, "-demuxer %s does not exist.\n",
1055                opts->demuxer_name);
1056         return NULL;
1057     }
1058     if ((audio_demuxer_type =
1059          get_demuxer_type_from_name(opts->audio_demuxer_name,
1060                                     &audio_demuxer_force)) < 0) {
1061         mp_msg(MSGT_DEMUXER, MSGL_ERR, "-audio-demuxer %s does not exist.\n",
1062                opts->audio_demuxer_name);
1063         if (opts->audio_stream)
1064             return NULL;
1065     }
1066     if ((sub_demuxer_type =
1067          get_demuxer_type_from_name(opts->sub_demuxer_name,
1068                                     &sub_demuxer_force)) < 0) {
1069         mp_msg(MSGT_DEMUXER, MSGL_ERR, "-sub-demuxer %s does not exist.\n",
1070                opts->sub_demuxer_name);
1071         if (opts->sub_stream)
1072             return NULL;
1073     }
1074
1075     if (opts->audio_stream) {
1076         as = open_stream(opts->audio_stream, opts, &afmt);
1077         if (!as) {
1078             mp_tmsg(MSGT_DEMUXER, MSGL_ERR, "Cannot open audio stream: %s\n",
1079                    opts->audio_stream);
1080             return NULL;
1081         }
1082         if (!stream_enable_cache_percent(as, opts->audio_stream_cache,
1083                                          opts->stream_cache_min_percent,
1084                                          opts->stream_cache_seek_min_percent)) {
1085             free_stream(as);
1086             mp_msg(MSGT_DEMUXER, MSGL_ERR, "Can't enable audio stream cache\n");
1087             return NULL;
1088         }
1089     }
1090     if (opts->sub_stream) {
1091         ss = open_stream(opts->sub_stream, opts, &sfmt);
1092         if (!ss) {
1093             mp_tmsg(MSGT_DEMUXER, MSGL_ERR, "Cannot open subtitle stream: %s\n",
1094                    opts->sub_stream);
1095             return NULL;
1096         }
1097     }
1098
1099     vd = demux_open_stream(opts, vs, demuxer_type ? demuxer_type : file_format,
1100                            demuxer_force, opts->audio_stream ? -2 : audio_id,
1101                            video_id, opts->sub_stream ? -2 : dvdsub_id,
1102                            filename, params);
1103     if (!vd) {
1104         if (as)
1105             free_stream(as);
1106         if (ss)
1107             free_stream(ss);
1108         return NULL;
1109     }
1110     if (as) {
1111         ad = demux_open_stream(opts, as,
1112                                audio_demuxer_type ? audio_demuxer_type : afmt,
1113                                audio_demuxer_force, audio_id, -2, -2,
1114                                opts->audio_stream, params);
1115         if (!ad) {
1116             mp_tmsg(MSGT_DEMUXER, MSGL_WARN, "Failed to open audio demuxer: %s\n",
1117                    opts->audio_stream);
1118             free_stream(as);
1119         } else if (ad->audio->sh
1120                    && ((sh_audio_t *) ad->audio->sh)->format == 0x55) // MP3
1121             opts->hr_mp3_seek = 1;    // Enable high res seeking
1122     }
1123     if (ss) {
1124         sd = demux_open_stream(opts, ss,
1125                                sub_demuxer_type ? sub_demuxer_type : sfmt,
1126                                sub_demuxer_force, -2, -2, dvdsub_id,
1127                                opts->sub_stream, params);
1128         if (!sd) {
1129             mp_tmsg(MSGT_DEMUXER, MSGL_WARN,
1130                    "Failed to open subtitle demuxer: %s\n", opts->sub_stream);
1131             free_stream(ss);
1132         }
1133     }
1134
1135     if (ad && sd)
1136         res = new_demuxers_demuxer(vd, ad, sd);
1137     else if (ad)
1138         res = new_demuxers_demuxer(vd, ad, vd);
1139     else if (sd)
1140         res = new_demuxers_demuxer(vd, vd, sd);
1141     else
1142         res = vd;
1143
1144     opts->correct_pts = opts->user_correct_pts;
1145     if (opts->correct_pts < 0)
1146         opts->correct_pts =
1147             demux_control(vd ? vd : res, DEMUXER_CTRL_CORRECT_PTS,
1148                           NULL) == DEMUXER_CTRL_OK;
1149     return res;
1150 }
1151
1152
1153 void demux_flush(demuxer_t *demuxer)
1154 {
1155     ds_free_packs(demuxer->video);
1156     ds_free_packs(demuxer->audio);
1157     ds_free_packs(demuxer->sub);
1158 }
1159
1160 int demux_seek(demuxer_t *demuxer, float rel_seek_secs, float audio_delay,
1161                int flags)
1162 {
1163     if (!demuxer->seekable) {
1164         if (demuxer->file_format == DEMUXER_TYPE_AVI)
1165             mp_tmsg(MSGT_SEEK, MSGL_WARN, "Cannot seek in raw AVI streams. (Index required, try with the -idx switch.)\n");
1166 #ifdef CONFIG_TV
1167         else if (demuxer->file_format == DEMUXER_TYPE_TV)
1168             mp_tmsg(MSGT_SEEK, MSGL_WARN, "TV input is not seekable! (Seeking will probably be for changing channels ;)\n");
1169 #endif
1170         else
1171             mp_tmsg(MSGT_SEEK, MSGL_WARN, "Cannot seek in this file.\n");
1172         return 0;
1173     }
1174     // clear demux buffers:
1175     demux_flush(demuxer);
1176     demuxer->video->eof = 0;
1177     demuxer->audio->eof = 0;
1178     demuxer->sub->eof = 0;
1179
1180     /* HACK: assume any demuxer used with these streams can cope with
1181      * the stream layer suddenly seeking to a different position under it
1182      * (nothing actually implements DEMUXER_CTRL_RESYNC now).
1183      */
1184     struct stream *stream = demuxer->stream;
1185     if (stream->type == STREAMTYPE_DVD || stream->type == STREAMTYPE_DVDNAV) {
1186         double pts;
1187
1188         if (flags & SEEK_ABSOLUTE)
1189             pts = 0.0f;
1190         else {
1191             if (demuxer->stream_pts == MP_NOPTS_VALUE)
1192                 goto dmx_seek;
1193             pts = demuxer->stream_pts;
1194         }
1195
1196         if (flags & SEEK_FACTOR) {
1197             double tmp = 0;
1198             if (stream_control(demuxer->stream, STREAM_CTRL_GET_TIME_LENGTH,
1199                                &tmp) == STREAM_UNSUPPORTED)
1200                 goto dmx_seek;
1201             pts += tmp * rel_seek_secs;
1202         } else
1203             pts += rel_seek_secs;
1204
1205         if (stream_control(demuxer->stream, STREAM_CTRL_SEEK_TO_TIME, &pts)
1206             != STREAM_UNSUPPORTED) {
1207             demux_control(demuxer, DEMUXER_CTRL_RESYNC, NULL);
1208             return 1;
1209         }
1210     }
1211
1212   dmx_seek:
1213     if (demuxer->desc->seek)
1214         demuxer->desc->seek(demuxer, rel_seek_secs, audio_delay, flags);
1215
1216     return 1;
1217 }
1218
1219 int demux_info_add(demuxer_t *demuxer, const char *opt, const char *param)
1220 {
1221     return demux_info_add_bstr(demuxer, bstr(opt), bstr(param));
1222 }
1223
1224 int demux_info_add_bstr(demuxer_t *demuxer, struct bstr opt, struct bstr param)
1225 {
1226     char **info = demuxer->info;
1227     int n = 0;
1228
1229
1230     for (n = 0; info && info[2 * n] != NULL; n++) {
1231         if (!bstrcasecmp(opt, bstr(info[2*n]))) {
1232             if (!bstrcmp(param, bstr(info[2*n + 1]))) {
1233                 mp_msg(MSGT_DEMUX, MSGL_V, "Demuxer info %.*s set to unchanged value %.*s\n",
1234                        BSTR_P(opt), BSTR_P(param));
1235                 return 0;
1236             }
1237             mp_tmsg(MSGT_DEMUX, MSGL_INFO, "Demuxer info %.*s changed to %.*s\n",
1238                     BSTR_P(opt), BSTR_P(param));
1239             talloc_free(info[2*n + 1]);
1240             info[2*n + 1] = talloc_strndup(demuxer->info, param.start, param.len);
1241             return 0;
1242         }
1243     }
1244
1245     info = demuxer->info = talloc_realloc(demuxer, info, char *, 2 * (n + 2));
1246     info[2*n]     = talloc_strndup(demuxer->info, opt.start,   opt.len);
1247     info[2*n + 1] = talloc_strndup(demuxer->info, param.start, param.len);
1248     memset(&info[2 * (n + 1)], 0, 2 * sizeof(char *));
1249
1250     return 1;
1251 }
1252
1253 int demux_info_print(demuxer_t *demuxer)
1254 {
1255     char **info = demuxer->info;
1256     int n;
1257
1258     if (!info)
1259         return 0;
1260
1261     mp_tmsg(MSGT_DEMUX, MSGL_INFO, "Clip info:\n");
1262     for (n = 0; info[2 * n] != NULL; n++) {
1263         mp_msg(MSGT_DEMUX, MSGL_INFO, " %s: %s\n", info[2 * n],
1264                info[2 * n + 1]);
1265         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_CLIP_INFO_NAME%d=%s\n", n,
1266                info[2 * n]);
1267         mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_CLIP_INFO_VALUE%d=%s\n", n,
1268                info[2 * n + 1]);
1269     }
1270     mp_msg(MSGT_IDENTIFY, MSGL_INFO, "ID_CLIP_INFO_N=%d\n", n);
1271
1272     return 0;
1273 }
1274
1275 char *demux_info_get(demuxer_t *demuxer, const char *opt)
1276 {
1277     int i;
1278     char **info = demuxer->info;
1279
1280     for (i = 0; info && info[2 * i] != NULL; i++) {
1281         if (!strcasecmp(opt, info[2 * i]))
1282             return info[2 * i + 1];
1283     }
1284
1285     return NULL;
1286 }
1287
1288 int demux_control(demuxer_t *demuxer, int cmd, void *arg)
1289 {
1290
1291     if (demuxer->desc->control)
1292         return demuxer->desc->control(demuxer, cmd, arg);
1293
1294     return DEMUXER_CTRL_NOTIMPL;
1295 }
1296
1297 int demuxer_switch_audio(demuxer_t *demuxer, int index)
1298 {
1299     int res = demux_control(demuxer, DEMUXER_CTRL_SWITCH_AUDIO, &index);
1300     if (res == DEMUXER_CTRL_NOTIMPL) {
1301         struct sh_audio *sh_audio = demuxer->audio->sh;
1302         return sh_audio ? sh_audio->aid : -2;
1303     }
1304     if (demuxer->audio->id >= 0) {
1305         struct sh_audio *sh_audio = demuxer->a_streams[demuxer->audio->id];
1306         demuxer->audio->sh = sh_audio;
1307         index = sh_audio->aid; // internal MPEG demuxers don't set it right
1308     }
1309     else
1310         demuxer->audio->sh = NULL;
1311     return index;
1312 }
1313
1314 int demuxer_switch_video(demuxer_t *demuxer, int index)
1315 {
1316     int res = demux_control(demuxer, DEMUXER_CTRL_SWITCH_VIDEO, &index);
1317     if (res == DEMUXER_CTRL_NOTIMPL) {
1318         struct sh_video *sh_video = demuxer->video->sh;
1319         return sh_video ? sh_video->vid : -2;
1320     }
1321     if (demuxer->video->id >= 0) {
1322         struct sh_video *sh_video = demuxer->v_streams[demuxer->video->id];
1323         demuxer->video->sh = sh_video;
1324         index = sh_video->vid; // internal MPEG demuxers don't set it right
1325     } else
1326         demuxer->video->sh = NULL;
1327     return index;
1328 }
1329
1330 int demuxer_add_attachment(demuxer_t *demuxer, struct bstr name,
1331                            struct bstr type, struct bstr data)
1332 {
1333     if (!(demuxer->num_attachments % 32))
1334         demuxer->attachments = talloc_realloc(demuxer, demuxer->attachments,
1335                                               struct demux_attachment,
1336                                               demuxer->num_attachments + 32);
1337
1338     struct demux_attachment *att =
1339         demuxer->attachments + demuxer->num_attachments;
1340     att->name = talloc_strndup(demuxer->attachments, name.start, name.len);
1341     att->type = talloc_strndup(demuxer->attachments, type.start, type.len);
1342     att->data = talloc_size(demuxer->attachments, data.len);
1343     memcpy(att->data, data.start, data.len);
1344     att->data_size = data.len;
1345
1346     return demuxer->num_attachments++;
1347 }
1348
1349 int demuxer_add_chapter(demuxer_t *demuxer, struct bstr name,
1350                         uint64_t start, uint64_t end)
1351 {
1352     if (!(demuxer->num_chapters % 32))
1353         demuxer->chapters = talloc_realloc(demuxer, demuxer->chapters,
1354                                            struct demux_chapter,
1355                                            demuxer->num_chapters + 32);
1356
1357     demuxer->chapters[demuxer->num_chapters].start = start;
1358     demuxer->chapters[demuxer->num_chapters].end = end;
1359     demuxer->chapters[demuxer->num_chapters].name = name.len ?
1360         talloc_strndup(demuxer->chapters, name.start, name.len) :
1361         talloc_strdup(demuxer->chapters, mp_gtext("unknown"));
1362
1363     return demuxer->num_chapters++;
1364 }
1365
1366 /**
1367  * \brief demuxer_seek_chapter() seeks to a chapter in two possible ways:
1368  *        either using the demuxer->chapters structure set by the demuxer
1369  *        or asking help to the stream layer (e.g. dvd)
1370  * \param chapter - chapter number wished - 0-based
1371  * \param seek_pts set by the function to the pts to seek to (if demuxer->chapters is set)
1372  * \return -1 on error, current chapter if successful
1373  */
1374
1375 int demuxer_seek_chapter(demuxer_t *demuxer, int chapter, double *seek_pts)
1376 {
1377     int ris;
1378
1379     if (!demuxer->num_chapters || !demuxer->chapters) {
1380         demux_flush(demuxer);
1381
1382         ris = stream_control(demuxer->stream, STREAM_CTRL_SEEK_TO_CHAPTER,
1383                              &chapter);
1384         if (ris != STREAM_UNSUPPORTED)
1385             demux_control(demuxer, DEMUXER_CTRL_RESYNC, NULL);
1386
1387         // exit status may be ok, but main() doesn't have to seek itself
1388         // (because e.g. dvds depend on sectors, not on pts)
1389         *seek_pts = -1.0;
1390
1391         return ris != STREAM_UNSUPPORTED ? chapter : -1;
1392     } else {  // chapters structure is set in the demuxer
1393         if (chapter >= demuxer->num_chapters)
1394             return -1;
1395         if (chapter < 0)
1396             chapter = 0;
1397
1398         *seek_pts = demuxer->chapters[chapter].start / 1e9;
1399
1400         return chapter;
1401     }
1402 }
1403
1404 int demuxer_get_current_chapter(demuxer_t *demuxer, double time_now)
1405 {
1406     int chapter = -2;
1407     if (!demuxer->num_chapters || !demuxer->chapters) {
1408         if (stream_control(demuxer->stream, STREAM_CTRL_GET_CURRENT_CHAPTER,
1409                            &chapter) == STREAM_UNSUPPORTED)
1410             chapter = -2;
1411     } else {
1412         uint64_t now = time_now * 1e9 + 0.5;
1413         for (chapter = demuxer->num_chapters - 1; chapter >= 0; --chapter) {
1414             if (demuxer->chapters[chapter].start <= now)
1415                 break;
1416         }
1417     }
1418     return chapter;
1419 }
1420
1421 char *demuxer_chapter_name(demuxer_t *demuxer, int chapter)
1422 {
1423     if (demuxer->num_chapters && demuxer->chapters) {
1424         if (chapter >= 0 && chapter < demuxer->num_chapters
1425             && demuxer->chapters[chapter].name)
1426             return talloc_strdup(NULL, demuxer->chapters[chapter].name);
1427     }
1428     return NULL;
1429 }
1430
1431 float demuxer_chapter_time(demuxer_t *demuxer, int chapter, float *end)
1432 {
1433     if (demuxer->num_chapters && demuxer->chapters && chapter >= 0
1434         && chapter < demuxer->num_chapters) {
1435         if (end)
1436             *end = demuxer->chapters[chapter].end / 1e9;
1437         return demuxer->chapters[chapter].start / 1e9;
1438     }
1439     return -1.0;
1440 }
1441
1442 int demuxer_chapter_count(demuxer_t *demuxer)
1443 {
1444     if (!demuxer->num_chapters || !demuxer->chapters) {
1445         int num_chapters = 0;
1446         if (stream_control(demuxer->stream, STREAM_CTRL_GET_NUM_CHAPTERS,
1447                            &num_chapters) == STREAM_UNSUPPORTED)
1448             num_chapters = 0;
1449         return num_chapters;
1450     } else
1451         return demuxer->num_chapters;
1452 }
1453
1454 int demuxer_angles_count(demuxer_t *demuxer)
1455 {
1456     int ris, angles = -1;
1457
1458     ris = stream_control(demuxer->stream, STREAM_CTRL_GET_NUM_ANGLES, &angles);
1459     if (ris == STREAM_UNSUPPORTED)
1460         return -1;
1461     return angles;
1462 }
1463
1464 int demuxer_get_current_angle(demuxer_t *demuxer)
1465 {
1466     int ris, curr_angle = -1;
1467     ris = stream_control(demuxer->stream, STREAM_CTRL_GET_ANGLE, &curr_angle);
1468     if (ris == STREAM_UNSUPPORTED)
1469         return -1;
1470     return curr_angle;
1471 }
1472
1473
1474 int demuxer_set_angle(demuxer_t *demuxer, int angle)
1475 {
1476     int ris, angles = -1;
1477
1478     angles = demuxer_angles_count(demuxer);
1479     if ((angles < 1) || (angle > angles))
1480         return -1;
1481
1482     demux_flush(demuxer);
1483
1484     ris = stream_control(demuxer->stream, STREAM_CTRL_SET_ANGLE, &angle);
1485     if (ris == STREAM_UNSUPPORTED)
1486         return -1;
1487
1488     demux_control(demuxer, DEMUXER_CTRL_RESYNC, NULL);
1489
1490     return angle;
1491 }
1492
1493 int demuxer_audio_track_by_lang_and_default(struct demuxer *d, char **langt)
1494 {
1495     int n = 0;
1496     while (1) {
1497         char *lang = langt ? langt[n++] : NULL;
1498         int id = -1;
1499         for (int i = 0; i < MAX_A_STREAMS; i++) {
1500             struct sh_audio *sh = d->a_streams[i];
1501             if (sh && (!lang || sh->lang && !strcmp(lang, sh->lang))) {
1502                 if (sh->default_track)
1503                     return sh->aid;
1504                 if (id < 0)
1505                     id = sh->aid;
1506             }
1507         }
1508         if (id >= 0)
1509             return id;
1510         if (!lang)
1511             return -1;
1512     }
1513 }
1514
1515 int demuxer_sub_track_by_lang_and_default(struct demuxer *d, char **langt)
1516 {
1517     int n = 0;
1518     while (1) {
1519         char *lang = langt ? langt[n++] : NULL;
1520         int id = -1;
1521         for (int i = 0; i < MAX_S_STREAMS; i++) {
1522             struct sh_sub *sh = d->s_streams[i];
1523             if (sh && (!lang || sh->lang && !strcmp(lang, sh->lang))) {
1524                 if (sh->default_track)
1525                     return sh->sid;
1526                 if (id < 0)
1527                     id = sh->sid;
1528             }
1529         }
1530         if (!lang)
1531             return -1;
1532         if (id >= 0)
1533             return id;
1534     }
1535 }