git.sesse.net Git - ffmpeg/blob - libavformat/mux.c

   1 /*
   2  * muxing functions for use within FFmpeg
   3  * Copyright (c) 2000, 2001, 2002 Fabrice Bellard
   4  *
   5  * This file is part of FFmpeg.
   6  *
   7  * FFmpeg is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * FFmpeg is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with FFmpeg; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21
  22 #include "avformat.h"
  23 #include "avio_internal.h"
  24 #include "internal.h"
  25 #include "libavcodec/internal.h"
  26 #include "libavcodec/bytestream.h"
  27 #include "libavutil/opt.h"
  28 #include "libavutil/dict.h"
  29 #include "libavutil/pixdesc.h"
  30 #include "libavutil/timestamp.h"
  31 #include "metadata.h"
  32 #include "id3v2.h"
  33 #include "libavutil/avassert.h"
  34 #include "libavutil/avstring.h"
  35 #include "libavutil/internal.h"
  36 #include "libavutil/mathematics.h"
  37 #include "libavutil/parseutils.h"
  38 #include "libavutil/time.h"
  39 #include "riff.h"
  40 #include "audiointerleave.h"
  41 #include "url.h"
  42 #include <stdarg.h>
  43 #if CONFIG_NETWORK
  44 #include "network.h"
  45 #endif
  46
  47 /**
  48  * @file
  49  * muxing functions for use within libavformat
  50  */
  51
  52 /* fraction handling */
  53
  54 /**
  55  * f = val + (num / den) + 0.5.
  56  *
  57  * 'num' is normalized so that it is such as 0 <= num < den.
  58  *
  59  * @param f fractional number
  60  * @param val integer value
  61  * @param num must be >= 0
  62  * @param den must be >= 1
  63  */
  64 static void frac_init(FFFrac *f, int64_t val, int64_t num, int64_t den)
  65 {
  66     num += (den >> 1);
  67     if (num >= den) {
  68         val += num / den;
  69         num  = num % den;
  70     }
  71     f->val = val;
  72     f->num = num;
  73     f->den = den;
  74 }
  75
  76 /**
  77  * Fractional addition to f: f = f + (incr / f->den).
  78  *
  79  * @param f fractional number
  80  * @param incr increment, can be positive or negative
  81  */
  82 static void frac_add(FFFrac *f, int64_t incr)
  83 {
  84     int64_t num, den;
  85
  86     num = f->num + incr;
  87     den = f->den;
  88     if (num < 0) {
  89         f->val += num / den;
  90         num     = num % den;
  91         if (num < 0) {
  92             num += den;
  93             f->val--;
  94         }
  95     } else if (num >= den) {
  96         f->val += num / den;
  97         num     = num % den;
  98     }
  99     f->num = num;
 100 }
 101
 102 AVRational ff_choose_timebase(AVFormatContext *s, AVStream *st, int min_precision)
 103 {
 104     AVRational q;
 105     int j;
 106
 107     q = st->time_base;
 108
 109     for (j=2; j<14; j+= 1+(j>2))
 110         while (q.den / q.num < min_precision && q.num % j == 0)
 111             q.num /= j;
 112     while (q.den / q.num < min_precision && q.den < (1<<24))
 113         q.den <<= 1;
 114
 115     return q;
 116 }
 117
 118 enum AVChromaLocation ff_choose_chroma_location(AVFormatContext *s, AVStream *st)
 119 {
 120     AVCodecContext *avctx = st->codec;
 121     const AVPixFmtDescriptor *pix_desc = av_pix_fmt_desc_get(avctx->pix_fmt);
 122
 123     if (avctx->chroma_sample_location != AVCHROMA_LOC_UNSPECIFIED)
 124         return avctx->chroma_sample_location;
 125
 126     if (pix_desc) {
 127         if (pix_desc->log2_chroma_h == 0) {
 128             return AVCHROMA_LOC_TOPLEFT;
 129         } else if (pix_desc->log2_chroma_w == 1 && pix_desc->log2_chroma_h == 1) {
 130             if (avctx->field_order == AV_FIELD_UNKNOWN || avctx->field_order == AV_FIELD_PROGRESSIVE) {
 131                 switch (avctx->codec_id) {
 132                 case AV_CODEC_ID_MJPEG:
 133                 case AV_CODEC_ID_MPEG1VIDEO: return AVCHROMA_LOC_CENTER;
 134                 }
 135             }
 136             if (avctx->field_order == AV_FIELD_UNKNOWN || avctx->field_order != AV_FIELD_PROGRESSIVE) {
 137                 switch (avctx->codec_id) {
 138                 case AV_CODEC_ID_MPEG2VIDEO: return AVCHROMA_LOC_LEFT;
 139                 }
 140             }
 141         }
 142     }
 143
 144     return AVCHROMA_LOC_UNSPECIFIED;
 145
 146 }
 147
 148 int avformat_alloc_output_context2(AVFormatContext **avctx, AVOutputFormat *oformat,
 149                                    const char *format, const char *filename)
 150 {
 151     AVFormatContext *s = avformat_alloc_context();
 152     int ret = 0;
 153
 154     *avctx = NULL;
 155     if (!s)
 156         goto nomem;
 157
 158     if (!oformat) {
 159         if (format) {
 160             oformat = av_guess_format(format, NULL, NULL);
 161             if (!oformat) {
 162                 av_log(s, AV_LOG_ERROR, "Requested output format '%s' is not a suitable output format\n", format);
 163                 ret = AVERROR(EINVAL);
 164                 goto error;
 165             }
 166         } else {
 167             oformat = av_guess_format(NULL, filename, NULL);
 168             if (!oformat) {
 169                 ret = AVERROR(EINVAL);
 170                 av_log(s, AV_LOG_ERROR, "Unable to find a suitable output format for '%s'\n",
 171                        filename);
 172                 goto error;
 173             }
 174         }
 175     }
 176
 177     s->oformat = oformat;
 178     if (s->oformat->priv_data_size > 0) {
 179         s->priv_data = av_mallocz(s->oformat->priv_data_size);
 180         if (!s->priv_data)
 181             goto nomem;
 182         if (s->oformat->priv_class) {
 183             *(const AVClass**)s->priv_data= s->oformat->priv_class;
 184             av_opt_set_defaults(s->priv_data);
 185         }
 186     } else
 187         s->priv_data = NULL;
 188
 189     if (filename)
 190         av_strlcpy(s->filename, filename, sizeof(s->filename));
 191     *avctx = s;
 192     return 0;
 193 nomem:
 194     av_log(s, AV_LOG_ERROR, "Out of memory\n");
 195     ret = AVERROR(ENOMEM);
 196 error:
 197     avformat_free_context(s);
 198     return ret;
 199 }
 200
 201 static int validate_codec_tag(AVFormatContext *s, AVStream *st)
 202 {
 203     const AVCodecTag *avctag;
 204     int n;
 205     enum AVCodecID id = AV_CODEC_ID_NONE;
 206     int64_t tag  = -1;
 207
 208     /**
 209      * Check that tag + id is in the table
 210      * If neither is in the table -> OK
 211      * If tag is in the table with another id -> FAIL
 212      * If id is in the table with another tag -> FAIL unless strict < normal
 213      */
 214     for (n = 0; s->oformat->codec_tag[n]; n++) {
 215         avctag = s->oformat->codec_tag[n];
 216         while (avctag->id != AV_CODEC_ID_NONE) {
 217             if (avpriv_toupper4(avctag->tag) == avpriv_toupper4(st->codec->codec_tag)) {
 218                 id = avctag->id;
 219                 if (id == st->codec->codec_id)
 220                     return 1;
 221             }
 222             if (avctag->id == st->codec->codec_id)
 223                 tag = avctag->tag;
 224             avctag++;
 225         }
 226     }
 227     if (id != AV_CODEC_ID_NONE)
 228         return 0;
 229     if (tag >= 0 && (s->strict_std_compliance >= FF_COMPLIANCE_NORMAL))
 230         return 0;
 231     return 1;
 232 }
 233
 234
 235 static int init_muxer(AVFormatContext *s, AVDictionary **options)
 236 {
 237     int ret = 0, i;
 238     AVStream *st;
 239     AVDictionary *tmp = NULL;
 240     AVCodecContext *codec = NULL;
 241     AVOutputFormat *of = s->oformat;
 242     AVDictionaryEntry *e;
 243
 244     if (options)
 245         av_dict_copy(&tmp, *options, 0);
 246
 247     if ((ret = av_opt_set_dict(s, &tmp)) < 0)
 248         goto fail;
 249     if (s->priv_data && s->oformat->priv_class && *(const AVClass**)s->priv_data==s->oformat->priv_class &&
 250         (ret = av_opt_set_dict2(s->priv_data, &tmp, AV_OPT_SEARCH_CHILDREN)) < 0)
 251         goto fail;
 252
 253     if (s->nb_streams && s->streams[0]->codec->flags & AV_CODEC_FLAG_BITEXACT) {
 254         if (!(s->flags & AVFMT_FLAG_BITEXACT)) {
 255 #if FF_API_LAVF_BITEXACT
 256             av_log(s, AV_LOG_WARNING,
 257                    "Setting the AVFormatContext to bitexact mode, because "
 258                    "the AVCodecContext is in that mode. This behavior will "
 259                    "change in the future. To keep the current behavior, set "
 260                    "AVFormatContext.flags |= AVFMT_FLAG_BITEXACT.\n");
 261             s->flags |= AVFMT_FLAG_BITEXACT;
 262 #else
 263             av_log(s, AV_LOG_WARNING,
 264                    "The AVFormatContext is not in set to bitexact mode, only "
 265                    "the AVCodecContext. If this is not intended, set "
 266                    "AVFormatContext.flags |= AVFMT_FLAG_BITEXACT.\n");
 267 #endif
 268         }
 269     }
 270
 271     // some sanity checks
 272     if (s->nb_streams == 0 && !(of->flags & AVFMT_NOSTREAMS)) {
 273         av_log(s, AV_LOG_ERROR, "No streams to mux were specified\n");
 274         ret = AVERROR(EINVAL);
 275         goto fail;
 276     }
 277
 278     for (i = 0; i < s->nb_streams; i++) {
 279         st    = s->streams[i];
 280         codec = st->codec;
 281
 282 #if FF_API_LAVF_CODEC_TB
 283 FF_DISABLE_DEPRECATION_WARNINGS
 284         if (!st->time_base.num && codec->time_base.num) {
 285             av_log(s, AV_LOG_WARNING, "Using AVStream.codec.time_base as a "
 286                    "timebase hint to the muxer is deprecated. Set "
 287                    "AVStream.time_base instead.\n");
 288             avpriv_set_pts_info(st, 64, codec->time_base.num, codec->time_base.den);
 289         }
 290 FF_ENABLE_DEPRECATION_WARNINGS
 291 #endif
 292
 293         if (!st->time_base.num) {
 294             /* fall back on the default timebase values */
 295             if (codec->codec_type == AVMEDIA_TYPE_AUDIO && codec->sample_rate)
 296                 avpriv_set_pts_info(st, 64, 1, codec->sample_rate);
 297             else
 298                 avpriv_set_pts_info(st, 33, 1, 90000);
 299         }
 300
 301         switch (codec->codec_type) {
 302         case AVMEDIA_TYPE_AUDIO:
 303             if (codec->sample_rate <= 0) {
 304                 av_log(s, AV_LOG_ERROR, "sample rate not set\n");
 305                 ret = AVERROR(EINVAL);
 306                 goto fail;
 307             }
 308             if (!codec->block_align)
 309                 codec->block_align = codec->channels *
 310                                      av_get_bits_per_sample(codec->codec_id) >> 3;
 311             break;
 312         case AVMEDIA_TYPE_VIDEO:
 313             if ((codec->width <= 0 || codec->height <= 0) &&
 314                 !(of->flags & AVFMT_NODIMENSIONS)) {
 315                 av_log(s, AV_LOG_ERROR, "dimensions not set\n");
 316                 ret = AVERROR(EINVAL);
 317                 goto fail;
 318             }
 319             if (av_cmp_q(st->sample_aspect_ratio, codec->sample_aspect_ratio)
 320                 && FFABS(av_q2d(st->sample_aspect_ratio) - av_q2d(codec->sample_aspect_ratio)) > 0.004*av_q2d(st->sample_aspect_ratio)
 321             ) {
 322                 if (st->sample_aspect_ratio.num != 0 &&
 323                     st->sample_aspect_ratio.den != 0 &&
 324                     codec->sample_aspect_ratio.num != 0 &&
 325                     codec->sample_aspect_ratio.den != 0) {
 326                     av_log(s, AV_LOG_ERROR, "Aspect ratio mismatch between muxer "
 327                            "(%d/%d) and encoder layer (%d/%d)\n",
 328                            st->sample_aspect_ratio.num, st->sample_aspect_ratio.den,
 329                            codec->sample_aspect_ratio.num,
 330                            codec->sample_aspect_ratio.den);
 331                     ret = AVERROR(EINVAL);
 332                     goto fail;
 333                 }
 334             }
 335             break;
 336         }
 337
 338         if (of->codec_tag) {
 339             if (   codec->codec_tag
 340                 && codec->codec_id == AV_CODEC_ID_RAWVIDEO
 341                 && (   av_codec_get_tag(of->codec_tag, codec->codec_id) == 0
 342                     || av_codec_get_tag(of->codec_tag, codec->codec_id) == MKTAG('r', 'a', 'w', ' '))
 343                 && !validate_codec_tag(s, st)) {
 344                 // the current rawvideo encoding system ends up setting
 345                 // the wrong codec_tag for avi/mov, we override it here
 346                 codec->codec_tag = 0;
 347             }
 348             if (codec->codec_tag) {
 349                 if (!validate_codec_tag(s, st)) {
 350                     char tagbuf[32], tagbuf2[32];
 351                     av_get_codec_tag_string(tagbuf, sizeof(tagbuf), codec->codec_tag);
 352                     av_get_codec_tag_string(tagbuf2, sizeof(tagbuf2), av_codec_get_tag(s->oformat->codec_tag, codec->codec_id));
 353                     av_log(s, AV_LOG_ERROR,
 354                            "Tag %s/0x%08x incompatible with output codec id '%d' (%s)\n",
 355                            tagbuf, codec->codec_tag, codec->codec_id, tagbuf2);
 356                     ret = AVERROR_INVALIDDATA;
 357                     goto fail;
 358                 }
 359             } else
 360                 codec->codec_tag = av_codec_get_tag(of->codec_tag, codec->codec_id);
 361         }
 362
 363         if (of->flags & AVFMT_GLOBALHEADER &&
 364             !(codec->flags & AV_CODEC_FLAG_GLOBAL_HEADER))
 365             av_log(s, AV_LOG_WARNING,
 366                    "Codec for stream %d does not use global headers "
 367                    "but container format requires global headers\n", i);
 368
 369         if (codec->codec_type != AVMEDIA_TYPE_ATTACHMENT)
 370             s->internal->nb_interleaved_streams++;
 371     }
 372
 373     if (!s->priv_data && of->priv_data_size > 0) {
 374         s->priv_data = av_mallocz(of->priv_data_size);
 375         if (!s->priv_data) {
 376             ret = AVERROR(ENOMEM);
 377             goto fail;
 378         }
 379         if (of->priv_class) {
 380             *(const AVClass **)s->priv_data = of->priv_class;
 381             av_opt_set_defaults(s->priv_data);
 382             if ((ret = av_opt_set_dict2(s->priv_data, &tmp, AV_OPT_SEARCH_CHILDREN)) < 0)
 383                 goto fail;
 384         }
 385     }
 386
 387     /* set muxer identification string */
 388     if (!(s->flags & AVFMT_FLAG_BITEXACT)) {
 389         av_dict_set(&s->metadata, "encoder", LIBAVFORMAT_IDENT, 0);
 390     } else {
 391         av_dict_set(&s->metadata, "encoder", NULL, 0);
 392     }
 393
 394     for (e = NULL; e = av_dict_get(s->metadata, "encoder-", e, AV_DICT_IGNORE_SUFFIX); ) {
 395         av_dict_set(&s->metadata, e->key, NULL, 0);
 396     }
 397
 398     if (options) {
 399          av_dict_free(options);
 400          *options = tmp;
 401     }
 402
 403     return 0;
 404
 405 fail:
 406     av_dict_free(&tmp);
 407     return ret;
 408 }
 409
 410 static int init_pts(AVFormatContext *s)
 411 {
 412     int i;
 413     AVStream *st;
 414
 415     /* init PTS generation */
 416     for (i = 0; i < s->nb_streams; i++) {
 417         int64_t den = AV_NOPTS_VALUE;
 418         st = s->streams[i];
 419
 420         switch (st->codec->codec_type) {
 421         case AVMEDIA_TYPE_AUDIO:
 422             den = (int64_t)st->time_base.num * st->codec->sample_rate;
 423             break;
 424         case AVMEDIA_TYPE_VIDEO:
 425             den = (int64_t)st->time_base.num * st->codec->time_base.den;
 426             break;
 427         default:
 428             break;
 429         }
 430
 431         if (!st->priv_pts)
 432             st->priv_pts = av_mallocz(sizeof(*st->priv_pts));
 433         if (!st->priv_pts)
 434             return AVERROR(ENOMEM);
 435
 436         if (den != AV_NOPTS_VALUE) {
 437             if (den <= 0)
 438                 return AVERROR_INVALIDDATA;
 439
 440             frac_init(st->priv_pts, 0, 0, den);
 441         }
 442     }
 443
 444     return 0;
 445 }
 446
 447 int avformat_write_header(AVFormatContext *s, AVDictionary **options)
 448 {
 449     int ret = 0;
 450
 451     if ((ret = init_muxer(s, options)) < 0)
 452         return ret;
 453
 454     if (s->oformat->write_header) {
 455         ret = s->oformat->write_header(s);
 456         if (ret >= 0 && s->pb && s->pb->error < 0)
 457             ret = s->pb->error;
 458         if (ret < 0)
 459             return ret;
 460         if (s->flush_packets && s->pb && s->pb->error >= 0 && s->flags & AVFMT_FLAG_FLUSH_PACKETS)
 461             avio_flush(s->pb);
 462     }
 463
 464     if ((ret = init_pts(s)) < 0)
 465         return ret;
 466
 467     if (s->avoid_negative_ts < 0) {
 468         av_assert2(s->avoid_negative_ts == AVFMT_AVOID_NEG_TS_AUTO);
 469         if (s->oformat->flags & (AVFMT_TS_NEGATIVE | AVFMT_NOTIMESTAMPS)) {
 470             s->avoid_negative_ts = 0;
 471         } else
 472             s->avoid_negative_ts = AVFMT_AVOID_NEG_TS_MAKE_NON_NEGATIVE;
 473     }
 474
 475     return 0;
 476 }
 477
 478 #define AV_PKT_FLAG_UNCODED_FRAME 0x2000
 479
 480 /* Note: using sizeof(AVFrame) from outside lavu is unsafe in general, but
 481    it is only being used internally to this file as a consistency check.
 482    The value is chosen to be very unlikely to appear on its own and to cause
 483    immediate failure if used anywhere as a real size. */
 484 #define UNCODED_FRAME_PACKET_SIZE (INT_MIN / 3 * 2 + (int)sizeof(AVFrame))
 485
 486
 487 //FIXME merge with compute_pkt_fields
 488 static int compute_pkt_fields2(AVFormatContext *s, AVStream *st, AVPacket *pkt)
 489 {
 490     int delay = FFMAX(st->codec->has_b_frames, st->codec->max_b_frames > 0);
 491     int num, den, i;
 492     int frame_size;
 493
 494     if (s->debug & FF_FDEBUG_TS)
 495         av_log(s, AV_LOG_TRACE, "compute_pkt_fields2: pts:%s dts:%s cur_dts:%s b:%d size:%d st:%d\n",
 496             av_ts2str(pkt->pts), av_ts2str(pkt->dts), av_ts2str(st->cur_dts), delay, pkt->size, pkt->stream_index);
 497
 498     if (pkt->duration < 0 && st->codec->codec_type != AVMEDIA_TYPE_SUBTITLE) {
 499         av_log(s, AV_LOG_WARNING, "Packet with invalid duration %"PRId64" in stream %d\n",
 500                pkt->duration, pkt->stream_index);
 501         pkt->duration = 0;
 502     }
 503
 504     /* duration field */
 505     if (pkt->duration == 0) {
 506         ff_compute_frame_duration(s, &num, &den, st, NULL, pkt);
 507         if (den && num) {
 508             pkt->duration = av_rescale(1, num * (int64_t)st->time_base.den * st->codec->ticks_per_frame, den * (int64_t)st->time_base.num);
 509         }
 510     }
 511
 512     if (pkt->pts == AV_NOPTS_VALUE && pkt->dts != AV_NOPTS_VALUE && delay == 0)
 513         pkt->pts = pkt->dts;
 514
 515     //XXX/FIXME this is a temporary hack until all encoders output pts
 516     if ((pkt->pts == 0 || pkt->pts == AV_NOPTS_VALUE) && pkt->dts == AV_NOPTS_VALUE && !delay) {
 517         static int warned;
 518         if (!warned) {
 519             av_log(s, AV_LOG_WARNING, "Encoder did not produce proper pts, making some up.\n");
 520             warned = 1;
 521         }
 522         pkt->dts =
 523 //        pkt->pts= st->cur_dts;
 524             pkt->pts = st->priv_pts->val;
 525     }
 526
 527     //calculate dts from pts
 528     if (pkt->pts != AV_NOPTS_VALUE && pkt->dts == AV_NOPTS_VALUE && delay <= MAX_REORDER_DELAY) {
 529         st->pts_buffer[0] = pkt->pts;
 530         for (i = 1; i < delay + 1 && st->pts_buffer[i] == AV_NOPTS_VALUE; i++)
 531             st->pts_buffer[i] = pkt->pts + (i - delay - 1) * pkt->duration;
 532         for (i = 0; i<delay && st->pts_buffer[i] > st->pts_buffer[i + 1]; i++)
 533             FFSWAP(int64_t, st->pts_buffer[i], st->pts_buffer[i + 1]);
 534
 535         pkt->dts = st->pts_buffer[0];
 536     }
 537
 538     if (st->cur_dts && st->cur_dts != AV_NOPTS_VALUE &&
 539         ((!(s->oformat->flags & AVFMT_TS_NONSTRICT) &&
 540           st->codec->codec_type != AVMEDIA_TYPE_SUBTITLE &&
 541           st->cur_dts >= pkt->dts) || st->cur_dts > pkt->dts)) {
 542         av_log(s, AV_LOG_ERROR,
 543                "Application provided invalid, non monotonically increasing dts to muxer in stream %d: %s >= %s\n",
 544                st->index, av_ts2str(st->cur_dts), av_ts2str(pkt->dts));
 545         return AVERROR(EINVAL);
 546     }
 547     if (pkt->dts != AV_NOPTS_VALUE && pkt->pts != AV_NOPTS_VALUE && pkt->pts < pkt->dts) {
 548         av_log(s, AV_LOG_ERROR,
 549                "pts (%s) < dts (%s) in stream %d\n",
 550                av_ts2str(pkt->pts), av_ts2str(pkt->dts),
 551                st->index);
 552         return AVERROR(EINVAL);
 553     }
 554
 555     if (s->debug & FF_FDEBUG_TS)
 556         av_log(s, AV_LOG_TRACE, "av_write_frame: pts2:%s dts2:%s\n",
 557             av_ts2str(pkt->pts), av_ts2str(pkt->dts));
 558
 559     st->cur_dts = pkt->dts;
 560     st->priv_pts->val = pkt->dts;
 561
 562     /* update pts */
 563     switch (st->codec->codec_type) {
 564     case AVMEDIA_TYPE_AUDIO:
 565         frame_size = (pkt->flags & AV_PKT_FLAG_UNCODED_FRAME) ?
 566                      ((AVFrame *)pkt->data)->nb_samples :
 567                      av_get_audio_frame_duration(st->codec, pkt->size);
 568
 569         /* HACK/FIXME, we skip the initial 0 size packets as they are most
 570          * likely equal to the encoder delay, but it would be better if we
 571          * had the real timestamps from the encoder */
 572         if (frame_size >= 0 && (pkt->size || st->priv_pts->num != st->priv_pts->den >> 1 || st->priv_pts->val)) {
 573             frac_add(st->priv_pts, (int64_t)st->time_base.den * frame_size);
 574         }
 575         break;
 576     case AVMEDIA_TYPE_VIDEO:
 577         frac_add(st->priv_pts, (int64_t)st->time_base.den * st->codec->time_base.num);
 578         break;
 579     }
 580     return 0;
 581 }
 582
 583 /**
 584  * Make timestamps non negative, move side data from payload to internal struct, call muxer, and restore
 585  * sidedata.
 586  *
 587  * FIXME: this function should NEVER get undefined pts/dts beside when the
 588  * AVFMT_NOTIMESTAMPS is set.
 589  * Those additional safety checks should be dropped once the correct checks
 590  * are set in the callers.
 591  */
 592 static int write_packet(AVFormatContext *s, AVPacket *pkt)
 593 {
 594     int ret, did_split;
 595
 596     if (s->output_ts_offset) {
 597         AVStream *st = s->streams[pkt->stream_index];
 598         int64_t offset = av_rescale_q(s->output_ts_offset, AV_TIME_BASE_Q, st->time_base);
 599
 600         if (pkt->dts != AV_NOPTS_VALUE)
 601             pkt->dts += offset;
 602         if (pkt->pts != AV_NOPTS_VALUE)
 603             pkt->pts += offset;
 604     }
 605
 606     if (s->avoid_negative_ts > 0) {
 607         AVStream *st = s->streams[pkt->stream_index];
 608         int64_t offset = st->mux_ts_offset;
 609         int64_t ts = s->internal->avoid_negative_ts_use_pts ? pkt->pts : pkt->dts;
 610
 611         if (s->internal->offset == AV_NOPTS_VALUE && ts != AV_NOPTS_VALUE &&
 612             (ts < 0 || s->avoid_negative_ts == AVFMT_AVOID_NEG_TS_MAKE_ZERO)) {
 613             s->internal->offset = -ts;
 614             s->internal->offset_timebase = st->time_base;
 615         }
 616
 617         if (s->internal->offset != AV_NOPTS_VALUE && !offset) {
 618             offset = st->mux_ts_offset =
 619                 av_rescale_q_rnd(s->internal->offset,
 620                                  s->internal->offset_timebase,
 621                                  st->time_base,
 622                                  AV_ROUND_UP);
 623         }
 624
 625         if (pkt->dts != AV_NOPTS_VALUE)
 626             pkt->dts += offset;
 627         if (pkt->pts != AV_NOPTS_VALUE)
 628             pkt->pts += offset;
 629
 630         if (s->internal->avoid_negative_ts_use_pts) {
 631             if (pkt->pts != AV_NOPTS_VALUE && pkt->pts < 0) {
 632                 av_log(s, AV_LOG_WARNING, "failed to avoid negative "
 633                     "pts %s in stream %d.\n"
 634                     "Try -avoid_negative_ts 1 as a possible workaround.\n",
 635                     av_ts2str(pkt->dts),
 636                     pkt->stream_index
 637                 );
 638             }
 639         } else {
 640             av_assert2(pkt->dts == AV_NOPTS_VALUE || pkt->dts >= 0 || s->max_interleave_delta > 0);
 641             if (pkt->dts != AV_NOPTS_VALUE && pkt->dts < 0) {
 642                 av_log(s, AV_LOG_WARNING,
 643                     "Packets poorly interleaved, failed to avoid negative "
 644                     "timestamp %s in stream %d.\n"
 645                     "Try -max_interleave_delta 0 as a possible workaround.\n",
 646                     av_ts2str(pkt->dts),
 647                     pkt->stream_index
 648                 );
 649             }
 650         }
 651     }
 652
 653     did_split = av_packet_split_side_data(pkt);
 654     if ((pkt->flags & AV_PKT_FLAG_UNCODED_FRAME)) {
 655         AVFrame *frame = (AVFrame *)pkt->data;
 656         av_assert0(pkt->size == UNCODED_FRAME_PACKET_SIZE);
 657         ret = s->oformat->write_uncoded_frame(s, pkt->stream_index, &frame, 0);
 658         av_frame_free(&frame);
 659     } else {
 660         ret = s->oformat->write_packet(s, pkt);
 661     }
 662
 663     if (s->pb && ret >= 0) {
 664         if (s->flush_packets && s->flags & AVFMT_FLAG_FLUSH_PACKETS)
 665             avio_flush(s->pb);
 666         if (s->pb->error < 0)
 667             ret = s->pb->error;
 668     }
 669
 670
 671     if (did_split)
 672         av_packet_merge_side_data(pkt);
 673
 674     return ret;
 675 }
 676
 677 static int check_packet(AVFormatContext *s, AVPacket *pkt)
 678 {
 679     if (!pkt)
 680         return 0;
 681
 682     if (pkt->stream_index < 0 || pkt->stream_index >= s->nb_streams) {
 683         av_log(s, AV_LOG_ERROR, "Invalid packet stream index: %d\n",
 684                pkt->stream_index);
 685         return AVERROR(EINVAL);
 686     }
 687
 688     if (s->streams[pkt->stream_index]->codec->codec_type == AVMEDIA_TYPE_ATTACHMENT) {
 689         av_log(s, AV_LOG_ERROR, "Received a packet for an attachment stream.\n");
 690         return AVERROR(EINVAL);
 691     }
 692
 693     return 0;
 694 }
 695
 696 int av_write_frame(AVFormatContext *s, AVPacket *pkt)
 697 {
 698     int ret;
 699
 700     ret = check_packet(s, pkt);
 701     if (ret < 0)
 702         return ret;
 703
 704     if (!pkt) {
 705         if (s->oformat->flags & AVFMT_ALLOW_FLUSH) {
 706             ret = s->oformat->write_packet(s, NULL);
 707             if (s->flush_packets && s->pb && s->pb->error >= 0 && s->flags & AVFMT_FLAG_FLUSH_PACKETS)
 708                 avio_flush(s->pb);
 709             if (ret >= 0 && s->pb && s->pb->error < 0)
 710                 ret = s->pb->error;
 711             return ret;
 712         }
 713         return 1;
 714     }
 715
 716     ret = compute_pkt_fields2(s, s->streams[pkt->stream_index], pkt);
 717
 718     if (ret < 0 && !(s->oformat->flags & AVFMT_NOTIMESTAMPS))
 719         return ret;
 720
 721     ret = write_packet(s, pkt);
 722     if (ret >= 0 && s->pb && s->pb->error < 0)
 723         ret = s->pb->error;
 724
 725     if (ret >= 0)
 726         s->streams[pkt->stream_index]->nb_frames++;
 727     return ret;
 728 }
 729
 730 #define CHUNK_START 0x1000
 731
 732 int ff_interleave_add_packet(AVFormatContext *s, AVPacket *pkt,
 733                              int (*compare)(AVFormatContext *, AVPacket *, AVPacket *))
 734 {
 735     int ret;
 736     AVPacketList **next_point, *this_pktl;
 737     AVStream *st   = s->streams[pkt->stream_index];
 738     int chunked    = s->max_chunk_size || s->max_chunk_duration;
 739
 740     this_pktl      = av_mallocz(sizeof(AVPacketList));
 741     if (!this_pktl)
 742         return AVERROR(ENOMEM);
 743     this_pktl->pkt = *pkt;
 744     pkt->buf       = NULL;
 745     pkt->side_data = NULL;
 746     pkt->side_data_elems = 0;
 747     if ((pkt->flags & AV_PKT_FLAG_UNCODED_FRAME)) {
 748         av_assert0(pkt->size == UNCODED_FRAME_PACKET_SIZE);
 749         av_assert0(((AVFrame *)pkt->data)->buf);
 750     } else {
 751         // Duplicate the packet if it uses non-allocated memory
 752         if ((ret = av_dup_packet(&this_pktl->pkt)) < 0) {
 753             av_free(this_pktl);
 754             return ret;
 755         }
 756     }
 757
 758     if (s->streams[pkt->stream_index]->last_in_packet_buffer) {
 759         next_point = &(st->last_in_packet_buffer->next);
 760     } else {
 761         next_point = &s->internal->packet_buffer;
 762     }
 763
 764     if (chunked) {
 765         uint64_t max= av_rescale_q_rnd(s->max_chunk_duration, AV_TIME_BASE_Q, st->time_base, AV_ROUND_UP);
 766         st->interleaver_chunk_size     += pkt->size;
 767         st->interleaver_chunk_duration += pkt->duration;
 768         if (   (s->max_chunk_size && st->interleaver_chunk_size > s->max_chunk_size)
 769             || (max && st->interleaver_chunk_duration           > max)) {
 770             st->interleaver_chunk_size      = 0;
 771             this_pktl->pkt.flags |= CHUNK_START;
 772             if (max && st->interleaver_chunk_duration > max) {
 773                 int64_t syncoffset = (st->codec->codec_type == AVMEDIA_TYPE_VIDEO)*max/2;
 774                 int64_t syncto = av_rescale(pkt->dts + syncoffset, 1, max)*max - syncoffset;
 775
 776                 st->interleaver_chunk_duration += (pkt->dts - syncto)/8 - max;
 777             } else
 778                 st->interleaver_chunk_duration = 0;
 779         }
 780     }
 781     if (*next_point) {
 782         if (chunked && !(this_pktl->pkt.flags & CHUNK_START))
 783             goto next_non_null;
 784
 785         if (compare(s, &s->internal->packet_buffer_end->pkt, pkt)) {
 786             while (   *next_point
 787                    && ((chunked && !((*next_point)->pkt.flags&CHUNK_START))
 788                        || !compare(s, &(*next_point)->pkt, pkt)))
 789                 next_point = &(*next_point)->next;
 790             if (*next_point)
 791                 goto next_non_null;
 792         } else {
 793             next_point = &(s->internal->packet_buffer_end->next);
 794         }
 795     }
 796     av_assert1(!*next_point);
 797
 798     s->internal->packet_buffer_end = this_pktl;
 799 next_non_null:
 800
 801     this_pktl->next = *next_point;
 802
 803     s->streams[pkt->stream_index]->last_in_packet_buffer =
 804         *next_point                                      = this_pktl;
 805
 806     return 0;
 807 }
 808
 809 static int interleave_compare_dts(AVFormatContext *s, AVPacket *next,
 810                                   AVPacket *pkt)
 811 {
 812     AVStream *st  = s->streams[pkt->stream_index];
 813     AVStream *st2 = s->streams[next->stream_index];
 814     int comp      = av_compare_ts(next->dts, st2->time_base, pkt->dts,
 815                                   st->time_base);
 816     if (s->audio_preload && ((st->codec->codec_type == AVMEDIA_TYPE_AUDIO) != (st2->codec->codec_type == AVMEDIA_TYPE_AUDIO))) {
 817         int64_t ts = av_rescale_q(pkt ->dts, st ->time_base, AV_TIME_BASE_Q) - s->audio_preload*(st ->codec->codec_type == AVMEDIA_TYPE_AUDIO);
 818         int64_t ts2= av_rescale_q(next->dts, st2->time_base, AV_TIME_BASE_Q) - s->audio_preload*(st2->codec->codec_type == AVMEDIA_TYPE_AUDIO);
 819         if (ts == ts2) {
 820             ts= ( pkt ->dts* st->time_base.num*AV_TIME_BASE - s->audio_preload*(int64_t)(st ->codec->codec_type == AVMEDIA_TYPE_AUDIO)* st->time_base.den)*st2->time_base.den
 821                -( next->dts*st2->time_base.num*AV_TIME_BASE - s->audio_preload*(int64_t)(st2->codec->codec_type == AVMEDIA_TYPE_AUDIO)*st2->time_base.den)* st->time_base.den;
 822             ts2=0;
 823         }
 824         comp= (ts>ts2) - (ts<ts2);
 825     }
 826
 827     if (comp == 0)
 828         return pkt->stream_index < next->stream_index;
 829     return comp > 0;
 830 }
 831
 832 int ff_interleave_packet_per_dts(AVFormatContext *s, AVPacket *out,
 833                                  AVPacket *pkt, int flush)
 834 {
 835     AVPacketList *pktl;
 836     int stream_count = 0;
 837     int noninterleaved_count = 0;
 838     int i, ret;
 839
 840     if (pkt) {
 841         if ((ret = ff_interleave_add_packet(s, pkt, interleave_compare_dts)) < 0)
 842             return ret;
 843     }
 844
 845     for (i = 0; i < s->nb_streams; i++) {
 846         if (s->streams[i]->last_in_packet_buffer) {
 847             ++stream_count;
 848         } else if (s->streams[i]->codec->codec_type != AVMEDIA_TYPE_ATTACHMENT &&
 849                    s->streams[i]->codec->codec_id != AV_CODEC_ID_VP8 &&
 850                    s->streams[i]->codec->codec_id != AV_CODEC_ID_VP9) {
 851             ++noninterleaved_count;
 852         }
 853     }
 854
 855     if (s->internal->nb_interleaved_streams == stream_count)
 856         flush = 1;
 857
 858     if (s->max_interleave_delta > 0 &&
 859         s->internal->packet_buffer &&
 860         !flush &&
 861         s->internal->nb_interleaved_streams == stream_count+noninterleaved_count
 862     ) {
 863         AVPacket *top_pkt = &s->internal->packet_buffer->pkt;
 864         int64_t delta_dts = INT64_MIN;
 865         int64_t top_dts = av_rescale_q(top_pkt->dts,
 866                                        s->streams[top_pkt->stream_index]->time_base,
 867                                        AV_TIME_BASE_Q);
 868
 869         for (i = 0; i < s->nb_streams; i++) {
 870             int64_t last_dts;
 871             const AVPacketList *last = s->streams[i]->last_in_packet_buffer;
 872
 873             if (!last)
 874                 continue;
 875
 876             last_dts = av_rescale_q(last->pkt.dts,
 877                                     s->streams[i]->time_base,
 878                                     AV_TIME_BASE_Q);
 879             delta_dts = FFMAX(delta_dts, last_dts - top_dts);
 880         }
 881
 882         if (delta_dts > s->max_interleave_delta) {
 883             av_log(s, AV_LOG_DEBUG,
 884                    "Delay between the first packet and last packet in the "
 885                    "muxing queue is %"PRId64" > %"PRId64": forcing output\n",
 886                    delta_dts, s->max_interleave_delta);
 887             flush = 1;
 888         }
 889     }
 890
 891     if (stream_count && flush) {
 892         AVStream *st;
 893         pktl = s->internal->packet_buffer;
 894         *out = pktl->pkt;
 895         st   = s->streams[out->stream_index];
 896
 897         s->internal->packet_buffer = pktl->next;
 898         if (!s->internal->packet_buffer)
 899             s->internal->packet_buffer_end = NULL;
 900
 901         if (st->last_in_packet_buffer == pktl)
 902             st->last_in_packet_buffer = NULL;
 903         av_freep(&pktl);
 904
 905         return 1;
 906     } else {
 907         av_init_packet(out);
 908         return 0;
 909     }
 910 }
 911
 912 /**
 913  * Interleave an AVPacket correctly so it can be muxed.
 914  * @param out the interleaved packet will be output here
 915  * @param in the input packet
 916  * @param flush 1 if no further packets are available as input and all
 917  *              remaining packets should be output
 918  * @return 1 if a packet was output, 0 if no packet could be output,
 919  *         < 0 if an error occurred
 920  */
 921 static int interleave_packet(AVFormatContext *s, AVPacket *out, AVPacket *in, int flush)
 922 {
 923     if (s->oformat->interleave_packet) {
 924         int ret = s->oformat->interleave_packet(s, out, in, flush);
 925         if (in)
 926             av_free_packet(in);
 927         return ret;
 928     } else
 929         return ff_interleave_packet_per_dts(s, out, in, flush);
 930 }
 931
 932 int av_interleaved_write_frame(AVFormatContext *s, AVPacket *pkt)
 933 {
 934     int ret, flush = 0;
 935
 936     ret = check_packet(s, pkt);
 937     if (ret < 0)
 938         goto fail;
 939
 940     if (pkt) {
 941         AVStream *st = s->streams[pkt->stream_index];
 942
 943         if (s->debug & FF_FDEBUG_TS)
 944             av_log(s, AV_LOG_TRACE, "av_interleaved_write_frame size:%d dts:%s pts:%s\n",
 945                 pkt->size, av_ts2str(pkt->dts), av_ts2str(pkt->pts));
 946
 947         if ((ret = compute_pkt_fields2(s, st, pkt)) < 0 && !(s->oformat->flags & AVFMT_NOTIMESTAMPS))
 948             goto fail;
 949
 950         if (pkt->dts == AV_NOPTS_VALUE && !(s->oformat->flags & AVFMT_NOTIMESTAMPS)) {
 951             ret = AVERROR(EINVAL);
 952             goto fail;
 953         }
 954     } else {
 955         av_log(s, AV_LOG_TRACE, "av_interleaved_write_frame FLUSH\n");
 956         flush = 1;
 957     }
 958
 959     for (;; ) {
 960         AVPacket opkt;
 961         int ret = interleave_packet(s, &opkt, pkt, flush);
 962         if (pkt) {
 963             memset(pkt, 0, sizeof(*pkt));
 964             av_init_packet(pkt);
 965             pkt = NULL;
 966         }
 967         if (ret <= 0) //FIXME cleanup needed for ret<0 ?
 968             return ret;
 969
 970         ret = write_packet(s, &opkt);
 971         if (ret >= 0)
 972             s->streams[opkt.stream_index]->nb_frames++;
 973
 974         av_free_packet(&opkt);
 975
 976         if (ret < 0)
 977             return ret;
 978         if(s->pb && s->pb->error)
 979             return s->pb->error;
 980     }
 981 fail:
 982     av_packet_unref(pkt);
 983     return ret;
 984 }
 985
 986 int av_write_trailer(AVFormatContext *s)
 987 {
 988     int ret, i;
 989
 990     for (;; ) {
 991         AVPacket pkt;
 992         ret = interleave_packet(s, &pkt, NULL, 1);
 993         if (ret < 0)
 994             goto fail;
 995         if (!ret)
 996             break;
 997
 998         ret = write_packet(s, &pkt);
 999         if (ret >= 0)
1000             s->streams[pkt.stream_index]->nb_frames++;
1001
1002         av_free_packet(&pkt);
1003
1004         if (ret < 0)
1005             goto fail;
1006         if(s->pb && s->pb->error)
1007             goto fail;
1008     }
1009
1010 fail:
1011     if (s->oformat->write_trailer)
1012         if (ret >= 0) {
1013         ret = s->oformat->write_trailer(s);
1014         } else {
1015             s->oformat->write_trailer(s);
1016         }
1017
1018     if (s->pb)
1019        avio_flush(s->pb);
1020     if (ret == 0)
1021        ret = s->pb ? s->pb->error : 0;
1022     for (i = 0; i < s->nb_streams; i++) {
1023         av_freep(&s->streams[i]->priv_data);
1024         av_freep(&s->streams[i]->index_entries);
1025     }
1026     if (s->oformat->priv_class)
1027         av_opt_free(s->priv_data);
1028     av_freep(&s->priv_data);
1029     return ret;
1030 }
1031
1032 int av_get_output_timestamp(struct AVFormatContext *s, int stream,
1033                             int64_t *dts, int64_t *wall)
1034 {
1035     if (!s->oformat || !s->oformat->get_output_timestamp)
1036         return AVERROR(ENOSYS);
1037     s->oformat->get_output_timestamp(s, stream, dts, wall);
1038     return 0;
1039 }
1040
1041 int ff_write_chained(AVFormatContext *dst, int dst_stream, AVPacket *pkt,
1042                      AVFormatContext *src, int interleave)
1043 {
1044     AVPacket local_pkt;
1045     int ret;
1046
1047     local_pkt = *pkt;
1048     local_pkt.stream_index = dst_stream;
1049     if (pkt->pts != AV_NOPTS_VALUE)
1050         local_pkt.pts = av_rescale_q(pkt->pts,
1051                                      src->streams[pkt->stream_index]->time_base,
1052                                      dst->streams[dst_stream]->time_base);
1053     if (pkt->dts != AV_NOPTS_VALUE)
1054         local_pkt.dts = av_rescale_q(pkt->dts,
1055                                      src->streams[pkt->stream_index]->time_base,
1056                                      dst->streams[dst_stream]->time_base);
1057     if (pkt->duration)
1058         local_pkt.duration = av_rescale_q(pkt->duration,
1059                                           src->streams[pkt->stream_index]->time_base,
1060                                           dst->streams[dst_stream]->time_base);
1061
1062     if (interleave) ret = av_interleaved_write_frame(dst, &local_pkt);
1063     else            ret = av_write_frame(dst, &local_pkt);
1064     pkt->buf = local_pkt.buf;
1065     pkt->side_data       = local_pkt.side_data;
1066     pkt->side_data_elems = local_pkt.side_data_elems;
1067     return ret;
1068 }
1069
1070 static int av_write_uncoded_frame_internal(AVFormatContext *s, int stream_index,
1071                                            AVFrame *frame, int interleaved)
1072 {
1073     AVPacket pkt, *pktp;
1074
1075     av_assert0(s->oformat);
1076     if (!s->oformat->write_uncoded_frame)
1077         return AVERROR(ENOSYS);
1078
1079     if (!frame) {
1080         pktp = NULL;
1081     } else {
1082         pktp = &pkt;
1083         av_init_packet(&pkt);
1084         pkt.data = (void *)frame;
1085         pkt.size         = UNCODED_FRAME_PACKET_SIZE;
1086         pkt.pts          =
1087         pkt.dts          = frame->pts;
1088         pkt.duration     = av_frame_get_pkt_duration(frame);
1089         pkt.stream_index = stream_index;
1090         pkt.flags |= AV_PKT_FLAG_UNCODED_FRAME;
1091     }
1092
1093     return interleaved ? av_interleaved_write_frame(s, pktp) :
1094                          av_write_frame(s, pktp);
1095 }
1096
1097 int av_write_uncoded_frame(AVFormatContext *s, int stream_index,
1098                            AVFrame *frame)
1099 {
1100     return av_write_uncoded_frame_internal(s, stream_index, frame, 0);
1101 }
1102
1103 int av_interleaved_write_uncoded_frame(AVFormatContext *s, int stream_index,
1104                                        AVFrame *frame)
1105 {
1106     return av_write_uncoded_frame_internal(s, stream_index, frame, 1);
1107 }
1108
1109 int av_write_uncoded_frame_query(AVFormatContext *s, int stream_index)
1110 {
1111     av_assert0(s->oformat);
1112     if (!s->oformat->write_uncoded_frame)
1113         return AVERROR(ENOSYS);
1114     return s->oformat->write_uncoded_frame(s, stream_index, NULL,
1115                                            AV_WRITE_UNCODED_FRAME_QUERY);
1116 }