mpegtsenc.c 48.4 KB
Newer Older
1
/*
2
 * MPEG2 transport stream (aka DVB) muxer
3
 * Copyright (c) 2003 Fabrice Bellard
4
 *
5 6 7
 * This file is part of FFmpeg.
 *
 * FFmpeg is free software; you can redistribute it and/or
8 9
 * modify it under the terms of the GNU Lesser General Public
 * 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 14 15 16 17
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
18
 * License along with FFmpeg; if not, write to the Free Software
19
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20
 */
21

22
#include "libavutil/bswap.h"
23
#include "libavutil/crc.h"
24
#include "libavutil/dict.h"
25
#include "libavutil/intreadwrite.h"
26
#include "libavutil/mathematics.h"
27
#include "libavutil/opt.h"
28
#include "libavutil/avassert.h"
29
#include "libavcodec/internal.h"
30
#include "avformat.h"
31
#include "internal.h"
32 33
#include "mpegts.h"

34 35
#define PCR_TIME_BASE 27000000

36 37 38 39 40 41 42 43 44 45 46 47
/* write DVB SI sections */

/*********************************************/
/* mpegts section writer */

typedef struct MpegTSSection {
    int pid;
    int cc;
    void (*write_packet)(struct MpegTSSection *s, const uint8_t *packet);
    void *opaque;
} MpegTSSection;

48 49 50 51 52 53 54
typedef struct MpegTSService {
    MpegTSSection pmt; /* MPEG2 pmt table context */
    int sid;           /* service ID */
    char *name;
    char *provider_name;
    int pcr_pid;
    int pcr_packet_count;
55
    int pcr_packet_period;
56 57 58
} MpegTSService;

typedef struct MpegTSWrite {
59
    const AVClass *av_class;
60 61 62 63
    MpegTSSection pat; /* MPEG2 pat table */
    MpegTSSection sdt; /* MPEG2 sdt table context */
    MpegTSService **services;
    int sdt_packet_count;
64
    int sdt_packet_period;
65
    int pat_packet_count;
66
    int pat_packet_period;
67 68 69
    int nb_services;
    int onid;
    int tsid;
70
    int64_t first_pcr;
71
    int mux_rate; ///< set to 1 when VBR
72
    int pes_payload_size;
73 74 75 76 77 78 79

    int transport_stream_id;
    int original_network_id;
    int service_id;

    int pmt_start_pid;
    int start_pid;
80
    int m2ts_mode;
81

82 83
    int reemit_pat_pmt; // backward compatibility

84
    int pcr_period;
85 86 87
#define MPEGTS_FLAG_REEMIT_PAT_PMT  0x01
#define MPEGTS_FLAG_AAC_LATM        0x02
    int flags;
88
    int copyts;
89
    int tables_version;
90

R
Reimar Döffinger 已提交
91
    int omit_video_pes_length;
92 93
} MpegTSWrite;

94 95 96 97
/* a PES packet header is generated every DEFAULT_PES_HEADER_FREQ packets */
#define DEFAULT_PES_HEADER_FREQ 16
#define DEFAULT_PES_PAYLOAD_SIZE ((DEFAULT_PES_HEADER_FREQ - 1) * 184 + 170)

98 99 100 101
/* The section length is 12 bits. The first 2 are set to 0, the remaining
 * 10 bits should not exceed 1021. */
#define SECTION_LENGTH 1020

102
/* NOTE: 4 bytes must be left at the end for the crc32 */
103
static void mpegts_write_section(MpegTSSection *s, uint8_t *buf, int len)
104 105 106 107 108 109 110
{
    unsigned int crc;
    unsigned char packet[TS_PACKET_SIZE];
    const unsigned char *buf_ptr;
    unsigned char *q;
    int first, b, len1, left;

M
Måns Rullgård 已提交
111
    crc = av_bswap32(av_crc(av_crc_get_table(AV_CRC_32_IEEE), -1, buf, len - 4));
112 113 114 115
    buf[len - 4] = (crc >> 24) & 0xff;
    buf[len - 3] = (crc >> 16) & 0xff;
    buf[len - 2] = (crc >> 8) & 0xff;
    buf[len - 1] = (crc) & 0xff;
116

117 118 119 120 121 122 123 124 125 126 127
    /* send each packet */
    buf_ptr = buf;
    while (len > 0) {
        first = (buf == buf_ptr);
        q = packet;
        *q++ = 0x47;
        b = (s->pid >> 8);
        if (first)
            b |= 0x40;
        *q++ = b;
        *q++ = s->pid;
128
        s->cc = (s->cc + 1) & 0xf;
129
        *q++ = 0x10 | s->cc;
130 131 132
        if (first)
            *q++ = 0; /* 0 offset */
        len1 = TS_PACKET_SIZE - (q - packet);
133
        if (len1 > len)
134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157
            len1 = len;
        memcpy(q, buf_ptr, len1);
        q += len1;
        /* add known padding data */
        left = TS_PACKET_SIZE - (q - packet);
        if (left > 0)
            memset(q, 0xff, left);

        s->write_packet(s, packet);

        buf_ptr += len1;
        len -= len1;
    }
}

static inline void put16(uint8_t **q_ptr, int val)
{
    uint8_t *q;
    q = *q_ptr;
    *q++ = val >> 8;
    *q++ = val;
    *q_ptr = q;
}

158
static int mpegts_write_section1(MpegTSSection *s, int tid, int id,
159 160 161 162 163
                          int version, int sec_num, int last_sec_num,
                          uint8_t *buf, int len)
{
    uint8_t section[1024], *q;
    unsigned int tot_len;
164 165
    /* reserved_future_use field must be set to 1 for SDT */
    unsigned int flags = tid == SDT_TID ? 0xf000 : 0xb000;
166

167 168 169
    tot_len = 3 + 5 + len + 4;
    /* check if not too big */
    if (tot_len > 1024)
170
        return AVERROR_INVALIDDATA;
171 172 173

    q = section;
    *q++ = tid;
174
    put16(&q, flags | (len + 5 + 4)); /* 5 byte header + 4 byte CRC */
175 176 177 178 179
    put16(&q, id);
    *q++ = 0xc1 | (version << 1); /* current_next_indicator = 1 */
    *q++ = sec_num;
    *q++ = last_sec_num;
    memcpy(q, buf, len);
180

181 182 183 184 185 186 187
    mpegts_write_section(s, section, tot_len);
    return 0;
}

/*********************************************/
/* mpegts writer */

188
#define DEFAULT_PROVIDER_NAME   "FFmpeg"
189 190 191 192 193
#define DEFAULT_SERVICE_NAME    "Service01"

/* we retransmit the SI info at this rate */
#define SDT_RETRANS_TIME 500
#define PAT_RETRANS_TIME 100
194
#define PCR_RETRANS_TIME 20
195 196

typedef struct MpegTSWriteStream {
197
    struct MpegTSService *service;
198 199
    int pid; /* stream associated pid */
    int cc;
200
    int payload_size;
201
    int first_pts_check; ///< first pts check needed
202
    int prev_payload_key;
203
    int64_t payload_pts;
204
    int64_t payload_dts;
205
    int payload_flags;
206
    uint8_t *payload;
207
    AVFormatContext *amux;
208
    AVRational user_tb;
209 210 211 212 213 214
} MpegTSWriteStream;

static void mpegts_write_pat(AVFormatContext *s)
{
    MpegTSWrite *ts = s->priv_data;
    MpegTSService *service;
215
    uint8_t data[SECTION_LENGTH], *q;
216
    int i;
217

218 219 220 221 222 223
    q = data;
    for(i = 0; i < ts->nb_services; i++) {
        service = ts->services[i];
        put16(&q, service->sid);
        put16(&q, 0xe000 | service->pmt.pid);
    }
224
    mpegts_write_section1(&ts->pat, PAT_TID, ts->tsid, ts->tables_version, 0, 0,
225 226 227
                          data, q - data);
}

228
static int mpegts_write_pmt(AVFormatContext *s, MpegTSService *service)
229
{
230
    MpegTSWrite *ts = s->priv_data;
231
    uint8_t data[SECTION_LENGTH], *q, *desc_length_ptr, *program_info_length_ptr;
232 233 234 235 236 237 238 239 240 241 242 243 244
    int val, stream_type, i;

    q = data;
    put16(&q, 0xe000 | service->pcr_pid);

    program_info_length_ptr = q;
    q += 2; /* patched after */

    /* put program info here */

    val = 0xf000 | (q - program_info_length_ptr - 2);
    program_info_length_ptr[0] = val >> 8;
    program_info_length_ptr[1] = val;
245

246 247 248
    for(i = 0; i < s->nb_streams; i++) {
        AVStream *st = s->streams[i];
        MpegTSWriteStream *ts_st = st->priv_data;
249
        AVDictionaryEntry *lang = av_dict_get(st->metadata, "language", NULL,0);
250
        switch(st->codec->codec_id) {
251 252
        case AV_CODEC_ID_MPEG1VIDEO:
        case AV_CODEC_ID_MPEG2VIDEO:
253
            stream_type = STREAM_TYPE_VIDEO_MPEG2;
254
            break;
255
        case AV_CODEC_ID_MPEG4:
256 257
            stream_type = STREAM_TYPE_VIDEO_MPEG4;
            break;
258
        case AV_CODEC_ID_H264:
259 260
            stream_type = STREAM_TYPE_VIDEO_H264;
            break;
261 262 263
        case AV_CODEC_ID_HEVC:
            stream_type = STREAM_TYPE_VIDEO_HEVC;
            break;
264 265 266
        case AV_CODEC_ID_CAVS:
            stream_type = STREAM_TYPE_VIDEO_CAVS;
            break;
267
        case AV_CODEC_ID_DIRAC:
268 269
            stream_type = STREAM_TYPE_VIDEO_DIRAC;
            break;
270 271
        case AV_CODEC_ID_MP2:
        case AV_CODEC_ID_MP3:
272
            stream_type = STREAM_TYPE_AUDIO_MPEG1;
273
            break;
274
        case AV_CODEC_ID_AAC:
275
            stream_type = (ts->flags & MPEGTS_FLAG_AAC_LATM) ? STREAM_TYPE_AUDIO_AAC_LATM : STREAM_TYPE_AUDIO_AAC;
276
            break;
277
        case AV_CODEC_ID_AAC_LATM:
278 279
            stream_type = STREAM_TYPE_AUDIO_AAC_LATM;
            break;
280
        case AV_CODEC_ID_AC3:
281
            stream_type = STREAM_TYPE_AUDIO_AC3;
282
            break;
283 284 285 286 287 288
        case AV_CODEC_ID_DTS:
            stream_type = STREAM_TYPE_AUDIO_DTS;
            break;
        case AV_CODEC_ID_TRUEHD:
            stream_type = STREAM_TYPE_AUDIO_TRUEHD;
            break;
289 290 291 292
        default:
            stream_type = STREAM_TYPE_PRIVATE_DATA;
            break;
        }
293 294 295 296

        if (q - data > sizeof(data) - 32)
            return AVERROR(EINVAL);

297 298 299 300 301 302
        *q++ = stream_type;
        put16(&q, 0xe000 | ts_st->pid);
        desc_length_ptr = q;
        q += 2; /* patched after */

        /* write optional descriptors here */
303
        switch(st->codec->codec_type) {
304
        case AVMEDIA_TYPE_AUDIO:
305
            if(st->codec->codec_id==AV_CODEC_ID_EAC3){
M
Mean 已提交
306 307 308 309
                *q++=0x7a; // EAC3 descriptor see A038 DVB SI
                *q++=1; // 1 byte, all flags sets to 0
                *q++=0; // omit all fields...
            }
310
            if(st->codec->codec_id==AV_CODEC_ID_S302M){
311 312 313 314 315 316 317
                *q++ = 0x05; /* MPEG-2 registration descriptor*/
                *q++ = 4;
                *q++ = 'B';
                *q++ = 'S';
                *q++ = 'S';
                *q++ = 'D';
            }
M
Mean 已提交
318

319 320 321 322 323
            if (lang) {
                char *p;
                char *next = lang->value;
                uint8_t *len_ptr;

324
                *q++ = 0x0a; /* ISO 639 language descriptor */
325 326 327
                len_ptr = q++;
                *len_ptr = 0;

328
                for (p = lang->value; next && *len_ptr < 255 / 4 * 4 && q - data < sizeof(data) - 4; p = next + 1) {
329 330 331 332 333 334 335 336
                    next = strchr(p, ',');
                    if (strlen(p) != 3 && (!next || next != p + 3))
                        continue; /* not a 3-letter code */

                    *q++ = *p++;
                    *q++ = *p++;
                    *q++ = *p++;

337 338 339 340 341 342 343
                if (st->disposition & AV_DISPOSITION_CLEAN_EFFECTS)
                    *q++ = 0x01;
                else if (st->disposition & AV_DISPOSITION_HEARING_IMPAIRED)
                    *q++ = 0x02;
                else if (st->disposition & AV_DISPOSITION_VISUAL_IMPAIRED)
                    *q++ = 0x03;
                else
M
Mans Rullgard 已提交
344
                    *q++ = 0; /* undefined type */
345 346 347 348 349 350

                    *len_ptr += 4;
                }

                if (*len_ptr == 0)
                    q -= 2; /* no language codes were written */
351 352
            }
            break;
353
        case AVMEDIA_TYPE_SUBTITLE:
354
            {
355
                const char default_language[] = "und";
356 357 358
                const char *language = lang && strlen(lang->value) >= 3 ? lang->value : default_language;

                if (st->codec->codec_id == AV_CODEC_ID_DVB_SUBTITLE) {
359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392
                    uint8_t *len_ptr;
                    int extradata_copied = 0;

                    *q++ = 0x59; /* subtitling_descriptor */
                    len_ptr = q++;

                    while (strlen(language) >= 3 && (sizeof(data) - (q - data)) >= 8) { /* 8 bytes per DVB subtitle substream data */
                        *q++ = *language++;
                        *q++ = *language++;
                        *q++ = *language++;
                        /* Skip comma */
                        if (*language != '\0')
                            language++;

                        if (st->codec->extradata_size - extradata_copied >= 5) {
                            *q++ = st->codec->extradata[extradata_copied + 4]; /* subtitling_type */
                            memcpy(q, st->codec->extradata + extradata_copied, 4); /* composition_page_id and ancillary_page_id */
                            extradata_copied += 5;
                            q += 4;
                        } else {
                            /* subtitling_type:
                             * 0x10 - normal with no monitor aspect ratio criticality
                             * 0x20 - for the hard of hearing with no monitor aspect ratio criticality */
                            *q++ = (st->disposition & AV_DISPOSITION_HEARING_IMPAIRED) ? 0x20 : 0x10;
                            if ((st->codec->extradata_size == 4) && (extradata_copied == 0)) {
                                /* support of old 4-byte extradata format */
                                memcpy(q, st->codec->extradata, 4); /* composition_page_id and ancillary_page_id */
                                extradata_copied += 4;
                                q += 4;
                            } else {
                                put16(&q, 1); /* composition_page_id */
                                put16(&q, 1); /* ancillary_page_id */
                            }
                        }
393
                    }
394 395

                    *len_ptr = q - len_ptr - 1;
396 397 398 399 400 401 402 403
                } else if (st->codec->codec_id == AV_CODEC_ID_DVB_TELETEXT) {
                    uint8_t *len_ptr = NULL;
                    int extradata_copied = 0;

                    /* The descriptor tag. teletext_descriptor */
                    *q++ = 0x56;
                    len_ptr = q++;

404
                    while (strlen(language) >= 3 && q - data < sizeof(data) - 6) {
405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427
                        *q++ = *language++;
                        *q++ = *language++;
                        *q++ = *language++;
                        /* Skip comma */
                        if (*language != '\0')
                            language++;

                        if (st->codec->extradata_size - 1 > extradata_copied) {
                            memcpy(q, st->codec->extradata + extradata_copied, 2);
                            extradata_copied += 2;
                            q += 2;
                        } else {
                            /* The Teletext descriptor:
                             * teletext_type: This 5-bit field indicates the type of Teletext page indicated. (0x01 Initial Teletext page)
                             * teletext_magazine_number: This is a 3-bit field which identifies the magazine number.
                             * teletext_page_number: This is an 8-bit field giving two 4-bit hex digits identifying the page number. */
                            *q++ = 0x08;
                            *q++ = 0x00;
                        }
                    }

                    *len_ptr = q - len_ptr - 1;
                 }
428 429
            }
            break;
430
        case AVMEDIA_TYPE_VIDEO:
431 432 433 434 435 436 437 438 439
            if (stream_type == STREAM_TYPE_VIDEO_DIRAC) {
                *q++ = 0x05; /*MPEG-2 registration descriptor*/
                *q++ = 4;
                *q++ = 'd';
                *q++ = 'r';
                *q++ = 'a';
                *q++ = 'c';
            }
            break;
440 441 442 443 444 445 446 447 448 449
        case AVMEDIA_TYPE_DATA:
            if (st->codec->codec_id == AV_CODEC_ID_SMPTE_KLV) {
                *q++ = 0x05; /* MPEG-2 registration descriptor */
                *q++ = 4;
                *q++ = 'K';
                *q++ = 'L';
                *q++ = 'V';
                *q++ = 'A';
            }
            break;
450
        }
451 452 453 454 455

        val = 0xf000 | (q - desc_length_ptr - 2);
        desc_length_ptr[0] = val >> 8;
        desc_length_ptr[1] = val;
    }
456
    mpegts_write_section1(&service->pmt, PMT_TID, service->sid, ts->tables_version, 0, 0,
457
                          data, q - data);
458
    return 0;
459
}
460 461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481

/* NOTE: str == NULL is accepted for an empty string */
static void putstr8(uint8_t **q_ptr, const char *str)
{
    uint8_t *q;
    int len;

    q = *q_ptr;
    if (!str)
        len = 0;
    else
        len = strlen(str);
    *q++ = len;
    memcpy(q, str, len);
    q += len;
    *q_ptr = q;
}

static void mpegts_write_sdt(AVFormatContext *s)
{
    MpegTSWrite *ts = s->priv_data;
    MpegTSService *service;
482
    uint8_t data[SECTION_LENGTH], *q, *desc_list_len_ptr, *desc_len_ptr;
483
    int i, running_status, free_ca_mode, val;
484

485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506
    q = data;
    put16(&q, ts->onid);
    *q++ = 0xff;
    for(i = 0; i < ts->nb_services; i++) {
        service = ts->services[i];
        put16(&q, service->sid);
        *q++ = 0xfc | 0x00; /* currently no EIT info */
        desc_list_len_ptr = q;
        q += 2;
        running_status = 4; /* running */
        free_ca_mode = 0;

        /* write only one descriptor for the service name and provider */
        *q++ = 0x48;
        desc_len_ptr = q;
        q++;
        *q++ = 0x01; /* digital television service */
        putstr8(&q, service->provider_name);
        putstr8(&q, service->name);
        desc_len_ptr[0] = q - desc_len_ptr - 1;

        /* fill descriptor length */
507
        val = (running_status << 13) | (free_ca_mode << 12) |
508 509 510 511
            (q - desc_list_len_ptr - 2);
        desc_list_len_ptr[0] = val >> 8;
        desc_list_len_ptr[1] = val;
    }
512
    mpegts_write_section1(&ts->sdt, SDT_TID, ts->tsid, ts->tables_version, 0, 0,
513 514 515
                          data, q - data);
}

516 517 518
static MpegTSService *mpegts_add_service(MpegTSWrite *ts,
                                         int sid,
                                         const char *provider_name,
519 520 521 522 523 524 525
                                         const char *name)
{
    MpegTSService *service;

    service = av_mallocz(sizeof(MpegTSService));
    if (!service)
        return NULL;
526
    service->pmt.pid = ts->pmt_start_pid + ts->nb_services;
527 528 529 530 531 532 533 534
    service->sid = sid;
    service->provider_name = av_strdup(provider_name);
    service->name = av_strdup(name);
    service->pcr_pid = 0x1fff;
    dynarray_add(&ts->services, &ts->nb_services, service);
    return service;
}

535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552
static int64_t get_pcr(const MpegTSWrite *ts, AVIOContext *pb)
{
    return av_rescale(avio_tell(pb) + 11, 8 * PCR_TIME_BASE, ts->mux_rate) +
           ts->first_pcr;
}

static void mpegts_prefix_m2ts_header(AVFormatContext *s)
{
    MpegTSWrite *ts = s->priv_data;
    if (ts->m2ts_mode) {
        int64_t pcr = get_pcr(s->priv_data, s->pb);
        uint32_t tp_extra_header = pcr % 0x3fffffff;
        tp_extra_header = AV_RB32(&tp_extra_header);
        avio_write(s->pb, (unsigned char *) &tp_extra_header,
                sizeof(tp_extra_header));
    }
}

553 554 555
static void section_write_packet(MpegTSSection *s, const uint8_t *packet)
{
    AVFormatContext *ctx = s->opaque;
556
    mpegts_prefix_m2ts_header(ctx);
557
    avio_write(ctx->pb, packet, TS_PACKET_SIZE);
558 559 560 561 562 563 564
}

static int mpegts_write_header(AVFormatContext *s)
{
    MpegTSWrite *ts = s->priv_data;
    MpegTSWriteStream *ts_st;
    MpegTSService *service;
565
    AVStream *st, *pcr_st = NULL;
566
    AVDictionaryEntry *title, *provider;
567
    int i, j;
568
    const char *service_name;
569
    const char *provider_name;
570
    int *pids;
571
    int ret;
572

573 574 575
    if (s->max_delay < 0) /* Not set by the caller */
        s->max_delay = 0;

576 577 578
    // round up to a whole number of TS packets
    ts->pes_payload_size = (ts->pes_payload_size + 14 + 183) / 184 * 184 - 14;

579 580
    ts->tsid = ts->transport_stream_id;
    ts->onid = ts->original_network_id;
581
    /* allocate a single DVB service */
582
    title = av_dict_get(s->metadata, "service_name", NULL, 0);
583
    if (!title)
584
        title = av_dict_get(s->metadata, "title", NULL, 0);
585
    service_name = title ? title->value : DEFAULT_SERVICE_NAME;
586
    provider = av_dict_get(s->metadata, "service_provider", NULL, 0);
587
    provider_name = provider ? provider->value : DEFAULT_PROVIDER_NAME;
588
    service = mpegts_add_service(ts, ts->service_id, provider_name, service_name);
589 590
    service->pmt.write_packet = section_write_packet;
    service->pmt.opaque = s;
591
    service->pmt.cc = 15;
592 593

    ts->pat.pid = PAT_PID;
594
    ts->pat.cc = 15; // Initialize at 15 so that it wraps and be equal to 0 for the first packet we write
595 596 597 598
    ts->pat.write_packet = section_write_packet;
    ts->pat.opaque = s;

    ts->sdt.pid = SDT_PID;
599
    ts->sdt.cc = 15;
600 601 602
    ts->sdt.write_packet = section_write_packet;
    ts->sdt.opaque = s;

603
    pids = av_malloc_array(s->nb_streams, sizeof(*pids));
604 605 606
    if (!pids)
        return AVERROR(ENOMEM);

607 608 609
    /* assign pids to each stream */
    for(i = 0;i < s->nb_streams; i++) {
        st = s->streams[i];
610

611
        ts_st = av_mallocz(sizeof(MpegTSWriteStream));
612 613
        if (!ts_st) {
            ret = AVERROR(ENOMEM);
614
            goto fail;
615
        }
616
        st->priv_data = ts_st;
617 618 619 620

        ts_st->user_tb = st->time_base;
        avpriv_set_pts_info(st, 33, 1, 90000);

621
        ts_st->payload = av_mallocz(ts->pes_payload_size);
622 623
        if (!ts_st->payload) {
            ret = AVERROR(ENOMEM);
624
            goto fail;
625
        }
626
        ts_st->service = service;
627 628 629
        /* MPEG pid values < 16 are reserved. Applications which set st->id in
         * this range are assigned a calculated pid. */
        if (st->id < 16) {
630
            ts_st->pid = ts->start_pid + i;
631 632 633 634
        } else if (st->id < 0x1FFF) {
            ts_st->pid = st->id;
        } else {
            av_log(s, AV_LOG_ERROR, "Invalid stream id %d, must be less than 8191\n", st->id);
635
            ret = AVERROR(EINVAL);
636 637 638 639
            goto fail;
        }
        if (ts_st->pid == service->pmt.pid) {
            av_log(s, AV_LOG_ERROR, "Duplicate stream id %d\n", ts_st->pid);
640
            ret = AVERROR(EINVAL);
641 642 643 644 645
            goto fail;
        }
        for (j = 0; j < i; j++)
            if (pids[j] == ts_st->pid) {
                av_log(s, AV_LOG_ERROR, "Duplicate stream id %d\n", ts_st->pid);
646
                ret = AVERROR(EINVAL);
647 648 649
                goto fail;
            }
        pids[i] = ts_st->pid;
650
        ts_st->payload_pts = AV_NOPTS_VALUE;
651
        ts_st->payload_dts = AV_NOPTS_VALUE;
652
        ts_st->first_pts_check = 1;
653
        ts_st->cc = 15;
654
        /* update PCR pid by using the first video stream */
655
        if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO &&
656
            service->pcr_pid == 0x1fff) {
657
            service->pcr_pid = ts_st->pid;
658
            pcr_st = st;
659
        }
660
        if (st->codec->codec_id == AV_CODEC_ID_AAC &&
661 662 663 664 665 666
            st->codec->extradata_size > 0)
        {
            AVStream *ast;
            ts_st->amux = avformat_alloc_context();
            if (!ts_st->amux) {
                ret = AVERROR(ENOMEM);
667
                goto fail;
668
            }
669 670 671 672 673
            ts_st->amux->oformat = av_guess_format((ts->flags & MPEGTS_FLAG_AAC_LATM) ? "latm" : "adts", NULL, NULL);
            if (!ts_st->amux->oformat) {
                ret = AVERROR(EINVAL);
                goto fail;
            }
674
            ast = avformat_new_stream(ts_st->amux, NULL);
675 676 677 678
            if (!ast) {
                ret = AVERROR(ENOMEM);
                goto fail;
            }
679 680 681 682 683
            ret = avcodec_copy_context(ast->codec, st->codec);
            if (ret != 0)
                goto fail;
            ret = avformat_write_header(ts_st->amux, NULL);
            if (ret < 0)
684
                goto fail;
685
        }
686
    }
687

688 689
    av_free(pids);

690 691
    /* if no video stream, use the first stream as PCR */
    if (service->pcr_pid == 0x1fff && s->nb_streams > 0) {
692 693
        pcr_st = s->streams[0];
        ts_st = pcr_st->priv_data;
694
        service->pcr_pid = ts_st->pid;
695 696
    } else
        ts_st = pcr_st->priv_data;
697

698
    if (ts->mux_rate > 1) {
699
        service->pcr_packet_period = (ts->mux_rate * ts->pcr_period) /
B
Baptiste Coudurier 已提交
700 701 702 703 704 705
            (TS_PACKET_SIZE * 8 * 1000);
        ts->sdt_packet_period      = (ts->mux_rate * SDT_RETRANS_TIME) /
            (TS_PACKET_SIZE * 8 * 1000);
        ts->pat_packet_period      = (ts->mux_rate * PAT_RETRANS_TIME) /
            (TS_PACKET_SIZE * 8 * 1000);

706 707
        if(ts->copyts < 1)
            ts->first_pcr = av_rescale(s->max_delay, PCR_TIME_BASE, AV_TIME_BASE);
708
    } else {
709
        /* Arbitrary values, PAT/PMT will also be written on video key frames */
710 711
        ts->sdt_packet_period = 200;
        ts->pat_packet_period = 40;
712
        if (pcr_st->codec->codec_type == AVMEDIA_TYPE_AUDIO) {
713 714 715 716 717 718 719 720 721 722
            if (!pcr_st->codec->frame_size) {
                av_log(s, AV_LOG_WARNING, "frame size not set\n");
                service->pcr_packet_period =
                    pcr_st->codec->sample_rate/(10*512);
            } else {
                service->pcr_packet_period =
                    pcr_st->codec->sample_rate/(10*pcr_st->codec->frame_size);
            }
        } else {
            // max delta PCR 0.1s
723
            // TODO: should be avg_frame_rate
724
            service->pcr_packet_period =
725
                ts_st->user_tb.den / (10 * ts_st->user_tb.num);
726
        }
727 728
        if(!service->pcr_packet_period)
            service->pcr_packet_period = 1;
729 730
    }

731 732
    // output a PCR as soon as possible
    service->pcr_packet_count = service->pcr_packet_period;
733 734
    ts->pat_packet_count = ts->pat_packet_period-1;
    ts->sdt_packet_count = ts->sdt_packet_period-1;
735

736
    if (ts->mux_rate == 1)
737
        av_log(s, AV_LOG_VERBOSE, "muxrate VBR, ");
738
    else
739 740
        av_log(s, AV_LOG_VERBOSE, "muxrate %d, ", ts->mux_rate);
    av_log(s, AV_LOG_VERBOSE, "pcr every %d pkts, "
741
           "sdt every %d, pat/pmt every %d pkts\n",
742
           service->pcr_packet_period,
743
           ts->sdt_packet_period, ts->pat_packet_period);
744

745 746 747 748 749 750 751 752
    if (ts->m2ts_mode == -1) {
        if (av_match_ext(s->filename, "m2ts")) {
            ts->m2ts_mode = 1;
        } else {
            ts->m2ts_mode = 0;
        }
    }

753 754 755
    return 0;

 fail:
756
    av_free(pids);
757
    for(i = 0;i < s->nb_streams; i++) {
758
        MpegTSWriteStream *ts_st;
759
        st = s->streams[i];
760 761 762
        ts_st = st->priv_data;
        if (ts_st) {
            av_freep(&ts_st->payload);
763 764
            if (ts_st->amux) {
                avformat_free_context(ts_st->amux);
765
                ts_st->amux = NULL;
766
            }
767
        }
768
        av_freep(&st->priv_data);
769
    }
770
    return ret;
771 772 773
}

/* send SDT, PAT and PMT tables regulary */
774
static void retransmit_si_info(AVFormatContext *s, int force_pat)
775 776 777 778
{
    MpegTSWrite *ts = s->priv_data;
    int i;

779
    if (++ts->sdt_packet_count == ts->sdt_packet_period) {
780 781 782
        ts->sdt_packet_count = 0;
        mpegts_write_sdt(s);
    }
783
    if (++ts->pat_packet_count == ts->pat_packet_period || force_pat) {
784 785 786 787 788 789 790 791
        ts->pat_packet_count = 0;
        mpegts_write_pat(s);
        for(i = 0; i < ts->nb_services; i++) {
            mpegts_write_pmt(s, ts->services[i]);
        }
    }
}

792
static int write_pcr_bits(uint8_t *buf, int64_t pcr)
793 794 795 796 797 798 799
{
    int64_t pcr_low = pcr % 300, pcr_high = pcr / 300;

    *buf++ = pcr_high >> 25;
    *buf++ = pcr_high >> 17;
    *buf++ = pcr_high >> 9;
    *buf++ = pcr_high >> 1;
800
    *buf++ = pcr_high << 7 | pcr_low >> 8 | 0x7e;
801 802
    *buf++ = pcr_low;

803
    return 6;
804 805
}

806 807 808 809 810 811 812 813 814 815 816 817
/* Write a single null transport stream packet */
static void mpegts_insert_null_packet(AVFormatContext *s)
{
    uint8_t *q;
    uint8_t buf[TS_PACKET_SIZE];

    q = buf;
    *q++ = 0x47;
    *q++ = 0x00 | 0x1f;
    *q++ = 0xff;
    *q++ = 0x10;
    memset(q, 0x0FF, TS_PACKET_SIZE - (q - buf));
818
    mpegts_prefix_m2ts_header(s);
819
    avio_write(s->pb, buf, TS_PACKET_SIZE);
820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839
}

/* Write a single transport stream packet with a PCR and no payload */
static void mpegts_insert_pcr_only(AVFormatContext *s, AVStream *st)
{
    MpegTSWrite *ts = s->priv_data;
    MpegTSWriteStream *ts_st = st->priv_data;
    uint8_t *q;
    uint8_t buf[TS_PACKET_SIZE];

    q = buf;
    *q++ = 0x47;
    *q++ = ts_st->pid >> 8;
    *q++ = ts_st->pid;
    *q++ = 0x20 | ts_st->cc;   /* Adaptation only */
    /* Continuity Count field does not increment (see 13818-1 section 2.4.3.3) */
    *q++ = TS_PACKET_SIZE - 5; /* Adaptation Field Length */
    *q++ = 0x10;               /* Adaptation flags: PCR present */

    /* PCR coded into 6 bytes */
840
    q += write_pcr_bits(q, get_pcr(ts, s->pb));
841 842 843

    /* stuffing bytes */
    memset(q, 0xFF, TS_PACKET_SIZE - (q - buf));
844
    mpegts_prefix_m2ts_header(s);
845
    avio_write(s->pb, buf, TS_PACKET_SIZE);
846 847
}

848 849 850 851 852 853 854 855 856 857 858 859 860 861
static void write_pts(uint8_t *q, int fourbits, int64_t pts)
{
    int val;

    val = fourbits << 4 | (((pts >> 30) & 0x07) << 1) | 1;
    *q++ = val;
    val = (((pts >> 15) & 0x7fff) << 1) | 1;
    *q++ = val >> 8;
    *q++ = val;
    val = (((pts) & 0x7fff) << 1) | 1;
    *q++ = val >> 8;
    *q++ = val;
}

862 863 864 865
/* Set an adaptation field flag in an MPEG-TS packet*/
static void set_af_flag(uint8_t *pkt, int flag)
{
    // expect at least one flag to set
M
Michael Niedermayer 已提交
866
    av_assert0(flag);
867 868 869 870 871 872 873 874 875 876 877 878 879 880 881

    if ((pkt[3] & 0x20) == 0) {
        // no AF yet, set adaptation field flag
        pkt[3] |= 0x20;
        // 1 byte length, no flags
        pkt[4] = 1;
        pkt[5] = 0;
    }
    pkt[5] |= flag;
}

/* Extend the adaptation field by size bytes */
static void extend_af(uint8_t *pkt, int size)
{
    // expect already existing adaptation field
M
Michael Niedermayer 已提交
882
    av_assert0(pkt[3] & 0x20);
883 884 885 886 887 888 889 890 891 892 893 894
    pkt[4] += size;
}

/* Get a pointer to MPEG-TS payload (right after TS packet header) */
static uint8_t *get_ts_payload_start(uint8_t *pkt)
{
    if (pkt[3] & 0x20)
        return pkt + 5 + pkt[4];
    else
        return pkt + 4;
}

895 896 897 898 899
/* Add a pes header to the front of payload, and segment into an integer number of
 * ts packets. The final ts packet is padded using an over-sized adaptation header
 * to exactly fill the last ts packet.
 * NOTE: 'payload' contains a complete PES payload.
 */
900 901
static void mpegts_write_pes(AVFormatContext *s, AVStream *st,
                             const uint8_t *payload, int payload_size,
902
                             int64_t pts, int64_t dts, int key)
903 904
{
    MpegTSWriteStream *ts_st = st->priv_data;
905
    MpegTSWrite *ts = s->priv_data;
906
    uint8_t buf[TS_PACKET_SIZE];
907
    uint8_t *q;
908
    int val, is_start, len, header_len, write_pcr, is_dvb_subtitle, is_dvb_teletext, flags;
909 910
    int afc_len, stuffing_len;
    int64_t pcr = -1; /* avoid warning */
911
    int64_t delay = av_rescale(s->max_delay, 90000, AV_TIME_BASE);
912
    int force_pat = st->codec->codec_type == AVMEDIA_TYPE_VIDEO && key && !ts_st->prev_payload_key;
913

914 915
    is_start = 1;
    while (payload_size > 0) {
916 917
        retransmit_si_info(s, force_pat);
        force_pat = 0;
918

919 920
        write_pcr = 0;
        if (ts_st->pid == ts_st->service->pcr_pid) {
921 922
            if (ts->mux_rate > 1 || is_start) // VBR pcr period is based on frames
                ts_st->service->pcr_packet_count++;
923
            if (ts_st->service->pcr_packet_count >=
924
                ts_st->service->pcr_packet_period) {
925 926 927 928 929
                ts_st->service->pcr_packet_count = 0;
                write_pcr = 1;
            }
        }

930
        if (ts->mux_rate > 1 && dts != AV_NOPTS_VALUE &&
931
            (dts - get_pcr(ts, s->pb)/300) > delay) {
932 933 934 935 936 937 938 939
            /* pcr insert gets priority over null packet insert */
            if (write_pcr)
                mpegts_insert_pcr_only(s, st);
            else
                mpegts_insert_null_packet(s);
            continue; /* recalculate write_pcr and possibly retransmit si_info */
        }

940 941 942 943 944 945 946 947 948
        /* prepare packet header */
        q = buf;
        *q++ = 0x47;
        val = (ts_st->pid >> 8);
        if (is_start)
            val |= 0x40;
        *q++ = val;
        *q++ = ts_st->pid;
        ts_st->cc = (ts_st->cc + 1) & 0xf;
949 950 951 952 953 954 955 956
        *q++ = 0x10 | ts_st->cc; // payload indicator + CC
        if (key && is_start && pts != AV_NOPTS_VALUE) {
            // set Random Access for key frames
            if (ts_st->pid == ts_st->service->pcr_pid)
                write_pcr = 1;
            set_af_flag(buf, 0x40);
            q = get_ts_payload_start(buf);
        }
957
        if (write_pcr) {
958 959
            set_af_flag(buf, 0x10);
            q = get_ts_payload_start(buf);
960
            // add 11, pcr references the last byte of program clock reference base
961
            if (ts->mux_rate > 1)
962
                pcr = get_pcr(ts, s->pb);
963
            else
964 965
                pcr = (dts - delay)*300;
            if (dts != AV_NOPTS_VALUE && dts < pcr / 300)
966
                av_log(s, AV_LOG_WARNING, "dts < pcr, TS is invalid\n");
967 968
            extend_af(buf, write_pcr_bits(q, pcr));
            q = get_ts_payload_start(buf);
969
        }
970
        if (is_start) {
971
            int pes_extension = 0;
972
            int pes_header_stuffing_bytes = 0;
973 974 975 976
            /* write PES header */
            *q++ = 0x00;
            *q++ = 0x00;
            *q++ = 0x01;
977
            is_dvb_subtitle = 0;
978
            is_dvb_teletext = 0;
979
            if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO) {
980
                if (st->codec->codec_id == AV_CODEC_ID_DIRAC) {
981 982 983
                    *q++ = 0xfd;
                } else
                    *q++ = 0xe0;
984
            } else if (st->codec->codec_type == AVMEDIA_TYPE_AUDIO &&
985 986 987
                       (st->codec->codec_id == AV_CODEC_ID_MP2 ||
                        st->codec->codec_id == AV_CODEC_ID_MP3 ||
                        st->codec->codec_id == AV_CODEC_ID_AAC)) {
988
                *q++ = 0xc0;
989
            } else if (st->codec->codec_type == AVMEDIA_TYPE_AUDIO &&
990
                        st->codec->codec_id == AV_CODEC_ID_AC3 &&
991 992
                        ts->m2ts_mode) {
                *q++ = 0xfd;
993 994
            } else {
                *q++ = 0xbd;
995 996 997 998 999 1000
                if(st->codec->codec_type == AVMEDIA_TYPE_SUBTITLE) {
                    if (st->codec->codec_id == AV_CODEC_ID_DVB_SUBTITLE) {
                        is_dvb_subtitle = 1;
                    } else if (st->codec->codec_id == AV_CODEC_ID_DVB_TELETEXT) {
                        is_dvb_teletext = 1;
                    }
1001 1002
                }
            }
1003 1004 1005 1006 1007 1008
            header_len = 0;
            flags = 0;
            if (pts != AV_NOPTS_VALUE) {
                header_len += 5;
                flags |= 0x80;
            }
1009
            if (dts != AV_NOPTS_VALUE && pts != AV_NOPTS_VALUE && dts != pts) {
1010 1011 1012
                header_len += 5;
                flags |= 0x40;
            }
1013
            if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO &&
1014
                st->codec->codec_id == AV_CODEC_ID_DIRAC) {
1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025
                /* set PES_extension_flag */
                pes_extension = 1;
                flags |= 0x01;

                /*
                * One byte for PES2 extension flag +
                * one byte for extension length +
                * one byte for extension id
                */
                header_len += 3;
            }
1026 1027 1028 1029 1030
            /* for Blu-ray AC3 Audio the PES Extension flag should be as follow
             * otherwise it will not play sound on blu-ray
             */
            if (ts->m2ts_mode &&
                st->codec->codec_type == AVMEDIA_TYPE_AUDIO &&
1031
                st->codec->codec_id == AV_CODEC_ID_AC3) {
1032 1033 1034 1035 1036
                        /* set PES_extension_flag */
                        pes_extension = 1;
                        flags |= 0x01;
                        header_len += 3;
            }
1037 1038 1039 1040
            if (is_dvb_teletext) {
                pes_header_stuffing_bytes = 0x24 - header_len;
                header_len = 0x24;
            }
1041
            len = payload_size + header_len + 3;
1042 1043 1044 1045 1046
            /* 3 extra bytes should be added to DVB subtitle payload: 0x20 0x00 at the beginning and trailing 0xff */
            if (is_dvb_subtitle) {
                len += 3;
                payload_size++;
            }
1047 1048
            if (len > 0xffff)
                len = 0;
1049
            if (ts->omit_video_pes_length && st->codec->codec_type == AVMEDIA_TYPE_VIDEO) {
1050 1051
                len = 0;
            }
1052 1053
            *q++ = len >> 8;
            *q++ = len;
1054
            val = 0x80;
1055 1056
            /* data alignment indicator is required for subtitle and data streams */
            if (st->codec->codec_type == AVMEDIA_TYPE_SUBTITLE || st->codec->codec_type == AVMEDIA_TYPE_DATA)
1057 1058
                val |= 0x04;
            *q++ = val;
1059 1060
            *q++ = flags;
            *q++ = header_len;
1061
            if (pts != AV_NOPTS_VALUE) {
1062 1063 1064
                write_pts(q, flags >> 6, pts);
                q += 5;
            }
1065
            if (dts != AV_NOPTS_VALUE && pts != AV_NOPTS_VALUE && dts != pts) {
1066 1067
                write_pts(q, 1, dts);
                q += 5;
1068
            }
1069
            if (pes_extension && st->codec->codec_id == AV_CODEC_ID_DIRAC) {
1070 1071 1072 1073 1074 1075 1076 1077 1078
                flags = 0x01;  /* set PES_extension_flag_2 */
                *q++ = flags;
                *q++ = 0x80 | 0x01;  /* marker bit + extension length */
                /*
                * Set the stream id extension flag bit to 0 and
                * write the extended stream id
                */
                *q++ = 0x00 | 0x60;
            }
1079 1080 1081
            /* For Blu-ray AC3 Audio Setting extended flags */
          if (ts->m2ts_mode &&
              pes_extension &&
1082
              st->codec->codec_id == AV_CODEC_ID_AC3) {
1083 1084 1085 1086 1087 1088 1089
                      flags = 0x01; /* set PES_extension_flag_2 */
                      *q++ = flags;
                      *q++ = 0x80 | 0x01; /* marker bit + extension length */
                      *q++ = 0x00 | 0x71; /* for AC3 Audio (specifically on blue-rays) */
              }


1090 1091 1092 1093 1094 1095 1096
            if (is_dvb_subtitle) {
                /* First two fields of DVB subtitles PES data:
                 * data_identifier: for DVB subtitle streams shall be coded with the value 0x20
                 * subtitle_stream_id: for DVB subtitle stream shall be identified by the value 0x00 */
                *q++ = 0x20;
                *q++ = 0x00;
            }
1097 1098 1099 1100
            if (is_dvb_teletext) {
                memset(q, 0xff, pes_header_stuffing_bytes);
                q += pes_header_stuffing_bytes;
            }
1101
            is_start = 0;
1102
        }
1103 1104 1105 1106
        /* header size */
        header_len = q - buf;
        /* data len */
        len = TS_PACKET_SIZE - header_len;
1107 1108
        if (len > payload_size)
            len = payload_size;
1109 1110 1111 1112 1113 1114 1115
        stuffing_len = TS_PACKET_SIZE - header_len - len;
        if (stuffing_len > 0) {
            /* add stuffing with AFC */
            if (buf[3] & 0x20) {
                /* stuffing already present: increase its size */
                afc_len = buf[4] + 1;
                memmove(buf + 4 + afc_len + stuffing_len,
1116
                        buf + 4 + afc_len,
1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130
                        header_len - (4 + afc_len));
                buf[4] += stuffing_len;
                memset(buf + 4 + afc_len, 0xff, stuffing_len);
            } else {
                /* add stuffing */
                memmove(buf + 4 + stuffing_len, buf + 4, header_len - 4);
                buf[3] |= 0x20;
                buf[4] = stuffing_len - 1;
                if (stuffing_len >= 2) {
                    buf[5] = 0x00;
                    memset(buf + 6, 0xff, stuffing_len - 2);
                }
            }
        }
1131 1132 1133 1134 1135 1136 1137 1138

        if (is_dvb_subtitle && payload_size == len) {
            memcpy(buf + TS_PACKET_SIZE - len, payload, len - 1);
            buf[TS_PACKET_SIZE - 1] = 0xff; /* end_of_PES_data_field_marker: an 8-bit field with fixed contents 0xff for DVB subtitle */
        } else {
            memcpy(buf + TS_PACKET_SIZE - len, payload, len);
        }

1139 1140
        payload += len;
        payload_size -= len;
1141
        mpegts_prefix_m2ts_header(s);
1142
        avio_write(s->pb, buf, TS_PACKET_SIZE);
1143
    }
1144
    ts_st->prev_payload_key = key;
1145 1146
}

1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159
int ff_check_h264_startcode(AVFormatContext *s, const AVStream *st, const AVPacket *pkt)
{
    if (pkt->size < 5 || AV_RB32(pkt->data) != 0x0000001) {
        if (!st->nb_frames) {
            av_log(s, AV_LOG_ERROR, "H.264 bitstream malformed, "
                   "no startcode found, use the h264_mp4toannexb bitstream filter (-bsf h264_mp4toannexb)\n");
            return AVERROR(EINVAL);
        }
        av_log(s, AV_LOG_WARNING, "H.264 bitstream error, startcode missing\n");
    }
    return 0;
}

1160
static int mpegts_write_packet_internal(AVFormatContext *s, AVPacket *pkt)
1161
{
1162
    AVStream *st = s->streams[pkt->stream_index];
1163
    int size = pkt->size;
1164
    uint8_t *buf= pkt->data;
1165
    uint8_t *data= NULL;
1166
    MpegTSWrite *ts = s->priv_data;
1167
    MpegTSWriteStream *ts_st = st->priv_data;
M
Michael Niedermayer 已提交
1168
    const int64_t delay = av_rescale(s->max_delay, 90000, AV_TIME_BASE)*2;
1169
    int64_t dts = pkt->dts, pts = pkt->pts;
1170

1171
    if (ts->reemit_pat_pmt) {
1172 1173 1174 1175 1176 1177
        av_log(s, AV_LOG_WARNING, "resend_headers option is deprecated, use -mpegts_flags resend_headers\n");
        ts->reemit_pat_pmt = 0;
        ts->flags |= MPEGTS_FLAG_REEMIT_PAT_PMT;
    }

    if (ts->flags & MPEGTS_FLAG_REEMIT_PAT_PMT) {
1178 1179
        ts->pat_packet_count = ts->pat_packet_period - 1;
        ts->sdt_packet_count = ts->sdt_packet_period - 1;
1180
        ts->flags &= ~MPEGTS_FLAG_REEMIT_PAT_PMT;
1181 1182
    }

1183 1184 1185 1186 1187 1188
    if(ts->copyts < 1){
        if (pts != AV_NOPTS_VALUE)
            pts += delay;
        if (dts != AV_NOPTS_VALUE)
            dts += delay;
    }
1189

1190
    if (ts_st->first_pts_check && pts == AV_NOPTS_VALUE) {
1191
        av_log(s, AV_LOG_ERROR, "first pts value must be set\n");
1192
        return AVERROR_INVALIDDATA;
1193 1194 1195
    }
    ts_st->first_pts_check = 0;

1196
    if (st->codec->codec_id == AV_CODEC_ID_H264) {
1197 1198
        const uint8_t *p = buf, *buf_end = p+size;
        uint32_t state = -1;
1199 1200 1201
        int ret = ff_check_h264_startcode(s, st, pkt);
        if (ret < 0)
            return ret;
1202 1203

        do {
1204
            p = avpriv_find_start_code(p, buf_end, &state);
1205
            av_dlog(s, "nal %d\n", state & 0x1f);
1206 1207 1208 1209
        } while (p < buf_end && (state & 0x1f) != 9 &&
                 (state & 0x1f) != 5 && (state & 0x1f) != 1);

        if ((state & 0x1f) != 9) { // AUD NAL
1210 1211
            data = av_malloc(pkt->size+6);
            if (!data)
1212
                return AVERROR(ENOMEM);
1213 1214 1215
            memcpy(data+6, pkt->data, pkt->size);
            AV_WB32(data, 0x00000001);
            data[4] = 0x09;
1216
            data[5] = 0xf0; // any slice type (0xe) + rbsp stop one bit
1217 1218 1219
            buf  = data;
            size = pkt->size+6;
        }
1220
    } else if (st->codec->codec_id == AV_CODEC_ID_AAC) {
1221 1222
        if (pkt->size < 2) {
            av_log(s, AV_LOG_ERROR, "AAC packet too short\n");
1223
            return AVERROR_INVALIDDATA;
1224
        }
1225
        if ((AV_RB16(pkt->data) & 0xfff0) != 0xfff0) {
1226 1227 1228 1229
            int ret;
            AVPacket pkt2;

            if (!ts_st->amux) {
1230
                av_log(s, AV_LOG_ERROR, "AAC bitstream not in ADTS format "
1231
                       "and extradata missing\n");
1232
                return AVERROR_INVALIDDATA;
1233
            }
1234 1235 1236 1237

            av_init_packet(&pkt2);
            pkt2.data = pkt->data;
            pkt2.size = pkt->size;
1238 1239
            av_assert0(pkt->dts != AV_NOPTS_VALUE);
            pkt2.dts = av_rescale_q(pkt->dts, st->time_base, ts_st->amux->streams[0]->time_base);
1240 1241
            ret = avio_open_dyn_buf(&ts_st->amux->pb);
            if (ret < 0)
1242
                return AVERROR(ENOMEM);
1243 1244 1245

            ret = av_write_frame(ts_st->amux, &pkt2);
            if (ret < 0) {
1246 1247
                avio_close_dyn_buf(ts_st->amux->pb, &data);
                ts_st->amux->pb = NULL;
A
Alex Converse 已提交
1248
                av_free(data);
1249
                return ret;
A
Alex Converse 已提交
1250
            }
1251 1252 1253
            size = avio_close_dyn_buf(ts_st->amux->pb, &data);
            ts_st->amux->pb = NULL;
            buf = data;
1254
        }
1255 1256
    }

1257 1258 1259 1260 1261 1262
    if (pkt->dts != AV_NOPTS_VALUE) {
        int i;
        for(i=0; i<s->nb_streams; i++){
            AVStream *st2 = s->streams[i];
            MpegTSWriteStream *ts_st2 = st2->priv_data;
            if(   ts_st2->payload_size
1263
               && (ts_st2->payload_dts == AV_NOPTS_VALUE || dts - ts_st2->payload_dts > delay/2)){
1264 1265 1266 1267
                mpegts_write_pes(s, st2, ts_st2->payload, ts_st2->payload_size,
                                ts_st2->payload_pts, ts_st2->payload_dts,
                                ts_st2->payload_flags & AV_PKT_FLAG_KEY);
                ts_st2->payload_size = 0;
1268 1269 1270 1271
            }
        }
    }

1272
    if (ts_st->payload_size && ts_st->payload_size + size > ts->pes_payload_size) {
1273
        mpegts_write_pes(s, st, ts_st->payload, ts_st->payload_size,
1274 1275
                         ts_st->payload_pts, ts_st->payload_dts,
                         ts_st->payload_flags & AV_PKT_FLAG_KEY);
1276
        ts_st->payload_size = 0;
1277 1278
    }

1279
    if (st->codec->codec_type != AVMEDIA_TYPE_AUDIO || size > ts->pes_payload_size) {
1280
        av_assert0(!ts_st->payload_size);
1281 1282 1283 1284 1285 1286
        // for video and subtitle, write a single pes packet
        mpegts_write_pes(s, st, buf, size, pts, dts, pkt->flags & AV_PKT_FLAG_KEY);
        av_free(data);
        return 0;
    }

1287
    if (!ts_st->payload_size) {
1288 1289
        ts_st->payload_pts = pts;
        ts_st->payload_dts = dts;
1290
        ts_st->payload_flags = pkt->flags;
1291
    }
1292

1293 1294
    memcpy(ts_st->payload + ts_st->payload_size, buf, size);
    ts_st->payload_size += size;
1295

1296 1297
    av_free(data);

1298 1299 1300
    return 0;
}

1301
static void mpegts_write_flush(AVFormatContext *s)
1302 1303 1304 1305 1306
{
    int i;

    /* flush current packets */
    for(i = 0; i < s->nb_streams; i++) {
1307 1308
        AVStream *st = s->streams[i];
        MpegTSWriteStream *ts_st = st->priv_data;
1309 1310
        if (ts_st->payload_size > 0) {
            mpegts_write_pes(s, st, ts_st->payload, ts_st->payload_size,
1311 1312
                             ts_st->payload_pts, ts_st->payload_dts,
                             ts_st->payload_flags & AV_PKT_FLAG_KEY);
1313
            ts_st->payload_size = 0;
1314
        }
1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338
    }
}

static int mpegts_write_packet(AVFormatContext *s, AVPacket *pkt)
{
    if (!pkt) {
        mpegts_write_flush(s);
        return 1;
    } else {
        return mpegts_write_packet_internal(s, pkt);
    }
}

static int mpegts_write_end(AVFormatContext *s)
{
    MpegTSWrite *ts = s->priv_data;
    MpegTSService *service;
    int i;

    mpegts_write_flush(s);

    for(i = 0; i < s->nb_streams; i++) {
        AVStream *st = s->streams[i];
        MpegTSWriteStream *ts_st = st->priv_data;
1339
        av_freep(&ts_st->payload);
1340 1341
        if (ts_st->amux) {
            avformat_free_context(ts_st->amux);
1342
            ts_st->amux = NULL;
1343
        }
1344
    }
1345

1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356
    for(i = 0; i < ts->nb_services; i++) {
        service = ts->services[i];
        av_freep(&service->provider_name);
        av_freep(&service->name);
        av_free(service);
    }
    av_free(ts->services);

    return 0;
}

1357 1358 1359 1360 1361 1362 1363 1364
static const AVOption options[] = {
    { "mpegts_transport_stream_id", "Set transport_stream_id field.",
      offsetof(MpegTSWrite, transport_stream_id), AV_OPT_TYPE_INT, {.i64 = 0x0001 }, 0x0001, 0xffff, AV_OPT_FLAG_ENCODING_PARAM},
    { "mpegts_original_network_id", "Set original_network_id field.",
      offsetof(MpegTSWrite, original_network_id), AV_OPT_TYPE_INT, {.i64 = 0x0001 }, 0x0001, 0xffff, AV_OPT_FLAG_ENCODING_PARAM},
    { "mpegts_service_id", "Set service_id field.",
      offsetof(MpegTSWrite, service_id), AV_OPT_TYPE_INT, {.i64 = 0x0001 }, 0x0001, 0xffff, AV_OPT_FLAG_ENCODING_PARAM},
    { "mpegts_pmt_start_pid", "Set the first pid of the PMT.",
1365
      offsetof(MpegTSWrite, pmt_start_pid), AV_OPT_TYPE_INT, {.i64 = 0x1000 }, 0x0010, 0x1f00, AV_OPT_FLAG_ENCODING_PARAM},
1366 1367
    { "mpegts_start_pid", "Set the first pid.",
      offsetof(MpegTSWrite, start_pid), AV_OPT_TYPE_INT, {.i64 = 0x0100 }, 0x0100, 0x0f00, AV_OPT_FLAG_ENCODING_PARAM},
1368 1369 1370
    {"mpegts_m2ts_mode", "Enable m2ts mode.",
        offsetof(MpegTSWrite, m2ts_mode), AV_OPT_TYPE_INT, {.i64 = -1 },
        -1,1, AV_OPT_FLAG_ENCODING_PARAM},
1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384
    { "muxrate", NULL, offsetof(MpegTSWrite, mux_rate), AV_OPT_TYPE_INT, {.i64 = 1}, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM},
    { "pes_payload_size", "Minimum PES packet payload in bytes",
      offsetof(MpegTSWrite, pes_payload_size), AV_OPT_TYPE_INT, {.i64 = DEFAULT_PES_PAYLOAD_SIZE}, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM},
    { "mpegts_flags", "MPEG-TS muxing flags", offsetof(MpegTSWrite, flags), AV_OPT_TYPE_FLAGS, {.i64 = 0}, 0, INT_MAX,
      AV_OPT_FLAG_ENCODING_PARAM, "mpegts_flags" },
    { "resend_headers", "Reemit PAT/PMT before writing the next packet",
      0, AV_OPT_TYPE_CONST, {.i64 = MPEGTS_FLAG_REEMIT_PAT_PMT}, 0, INT_MAX,
      AV_OPT_FLAG_ENCODING_PARAM, "mpegts_flags"},
    { "latm", "Use LATM packetization for AAC",
      0, AV_OPT_TYPE_CONST, {.i64 = MPEGTS_FLAG_AAC_LATM}, 0, INT_MAX,
      AV_OPT_FLAG_ENCODING_PARAM, "mpegts_flags"},
    // backward compatibility
    { "resend_headers", "Reemit PAT/PMT before writing the next packet",
      offsetof(MpegTSWrite, reemit_pat_pmt), AV_OPT_TYPE_INT, {.i64 = 0}, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM},
1385 1386 1387 1388 1389 1390
    { "mpegts_copyts", "don't offset dts/pts",
      offsetof(MpegTSWrite, copyts), AV_OPT_TYPE_INT, {.i64=-1}, -1, 1, AV_OPT_FLAG_ENCODING_PARAM},
    { "tables_version", "set PAT, PMT and SDT version",
      offsetof(MpegTSWrite, tables_version), AV_OPT_TYPE_INT, {.i64=0}, 0, 31, AV_OPT_FLAG_ENCODING_PARAM},
    { "omit_video_pes_length", "Omit the PES packet length for video packets",
      offsetof(MpegTSWrite, omit_video_pes_length), AV_OPT_TYPE_INT, {.i64=1}, 0, 1, AV_OPT_FLAG_ENCODING_PARAM},
1391 1392
    { "pcr_period", "PCR retransmission time",
      offsetof(MpegTSWrite, pcr_period), AV_OPT_TYPE_INT, { .i64 = PCR_RETRANS_TIME }, 0, INT_MAX, AV_OPT_FLAG_ENCODING_PARAM },
1393 1394 1395 1396 1397 1398 1399 1400 1401 1402
    { NULL },
};

static const AVClass mpegts_muxer_class = {
    .class_name     = "MPEGTS muxer",
    .item_name      = av_default_item_name,
    .option         = options,
    .version        = LIBAVUTIL_VERSION_INT,
};

1403
AVOutputFormat ff_mpegts_muxer = {
1404
    .name              = "mpegts",
1405
    .long_name         = NULL_IF_CONFIG_SMALL("MPEG-TS (MPEG-2 Transport Stream)"),
1406
    .mime_type         = "video/MP2T",
1407
    .extensions        = "ts,m2t,m2ts,mts",
1408
    .priv_data_size    = sizeof(MpegTSWrite),
1409 1410
    .audio_codec       = AV_CODEC_ID_MP2,
    .video_codec       = AV_CODEC_ID_MPEG2VIDEO,
1411 1412 1413
    .write_header      = mpegts_write_header,
    .write_packet      = mpegts_write_packet,
    .write_trailer     = mpegts_write_end,
1414
    .flags             = AVFMT_ALLOW_FLUSH,
1415
    .priv_class        = &mpegts_muxer_class,
1416
};