Statistics
| Branch: | Revision:

ffmpeg / libavformat / mpegts.c @ 72415b2a

History | View | Annotate | Download (53.2 KB)

1 fe9cf0d4 Fabrice Bellard
/*
2 7fbde343 Aurelien Jacobs
 * MPEG2 transport stream (aka DVB) demuxer
3 406792e7 Diego Biurrun
 * Copyright (c) 2002-2003 Fabrice Bellard
4 fe9cf0d4 Fabrice Bellard
 *
5 b78e7197 Diego Biurrun
 * This file is part of FFmpeg.
6
 *
7
 * FFmpeg is free software; you can redistribute it and/or
8 19720f15 Fabrice Bellard
 * modify it under the terms of the GNU Lesser General Public
9
 * License as published by the Free Software Foundation; either
10 b78e7197 Diego Biurrun
 * version 2.1 of the License, or (at your option) any later version.
11 fe9cf0d4 Fabrice Bellard
 *
12 b78e7197 Diego Biurrun
 * FFmpeg is distributed in the hope that it will be useful,
13 fe9cf0d4 Fabrice Bellard
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 19720f15 Fabrice Bellard
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15
 * Lesser General Public License for more details.
16 fe9cf0d4 Fabrice Bellard
 *
17 19720f15 Fabrice Bellard
 * You should have received a copy of the GNU Lesser General Public
18 b78e7197 Diego Biurrun
 * License along with FFmpeg; if not, write to the Free Software
19 5509bffa Diego Biurrun
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20 fe9cf0d4 Fabrice Bellard
 */
21 245976da Diego Biurrun
22 e9859317 Baptiste Coudurier
//#define DEBUG
23
//#define DEBUG_SEEK
24 af8aae3f Ivan Schreter
//#define USE_SYNCPOINT_SEARCH
25 e9859317 Baptiste Coudurier
26 245976da Diego Biurrun
#include "libavutil/crc.h"
27 6a5d31ac Diego Biurrun
#include "libavutil/intreadwrite.h"
28 4f1db48e Baptiste Coudurier
#include "libavcodec/bytestream.h"
29 fe9cf0d4 Fabrice Bellard
#include "avformat.h"
30 5dbafeb7 Fabrice Bellard
#include "mpegts.h"
31 ecfb51d1 Diego Biurrun
#include "internal.h"
32 a8dd8dc6 Ivan Schreter
#include "seek.h"
33 fe9cf0d4 Fabrice Bellard
34 5dbafeb7 Fabrice Bellard
/* 1.0 second at 24Mbit/s */
35 fc48fe84 Fabrice Bellard
#define MAX_SCAN_PACKETS 32000
36
37
/* maximum size in which we look for synchronisation if
38
   synchronisation is lost */
39 1303d62d Baptiste Coudurier
#define MAX_RESYNC_SIZE 65536
40 5dbafeb7 Fabrice Bellard
41 0c137557 Baptiste Coudurier
#define MAX_PES_PAYLOAD 200*1024
42
43 5dbafeb7 Fabrice Bellard
enum MpegTSFilterType {
44
    MPEGTS_PES,
45
    MPEGTS_SECTION,
46 fe9cf0d4 Fabrice Bellard
};
47
48 b474d1f3 Måns Rullgård
typedef struct MpegTSFilter MpegTSFilter;
49
50 bdfa9824 Baptiste Coudurier
typedef int PESCallback(MpegTSFilter *f, const uint8_t *buf, int len, int is_start, int64_t pos);
51 fe9cf0d4 Fabrice Bellard
52 5dbafeb7 Fabrice Bellard
typedef struct MpegTSPESFilter {
53
    PESCallback *pes_cb;
54
    void *opaque;
55
} MpegTSPESFilter;
56
57 b474d1f3 Måns Rullgård
typedef void SectionCallback(MpegTSFilter *f, const uint8_t *buf, int len);
58 5dbafeb7 Fabrice Bellard
59
typedef void SetServiceCallback(void *opaque, int ret);
60
61
typedef struct MpegTSSectionFilter {
62
    int section_index;
63
    int section_h_size;
64
    uint8_t *section_buf;
65 72e043dd Erik Hovland
    unsigned int check_crc:1;
66
    unsigned int end_of_section_reached:1;
67 5dbafeb7 Fabrice Bellard
    SectionCallback *section_cb;
68
    void *opaque;
69
} MpegTSSectionFilter;
70
71 b474d1f3 Måns Rullgård
struct MpegTSFilter {
72 fe9cf0d4 Fabrice Bellard
    int pid;
73
    int last_cc; /* last cc code (-1 if first packet) */
74 5dbafeb7 Fabrice Bellard
    enum MpegTSFilterType type;
75
    union {
76
        MpegTSPESFilter pes_filter;
77
        MpegTSSectionFilter section_filter;
78
    } u;
79 b474d1f3 Måns Rullgård
};
80 5dbafeb7 Fabrice Bellard
81 172d1171 Nico Sabbi
#define MAX_PIDS_PER_PROGRAM 64
82 8c39a758 Måns Rullgård
struct Program {
83 172d1171 Nico Sabbi
    unsigned int id; //program id/service id
84
    unsigned int nb_pids;
85
    unsigned int pids[MAX_PIDS_PER_PROGRAM];
86 8c39a758 Måns Rullgård
};
87 172d1171 Nico Sabbi
88 0694a009 Måns Rullgård
struct MpegTSContext {
89 5dbafeb7 Fabrice Bellard
    /* user data */
90
    AVFormatContext *stream;
91 e995cfca Daniel Kristjansson
    /** raw packet size, including FEC if present            */
92
    int raw_packet_size;
93 5fd63f3c Michael Niedermayer
94
    int pos47;
95
96 e995cfca Daniel Kristjansson
    /** if true, all pids are analyzed to find streams       */
97
    int auto_guess;
98 5dbafeb7 Fabrice Bellard
99 e995cfca Daniel Kristjansson
    /** compute exact PCR for each transport stream packet   */
100
    int mpeg2ts_compute_pcr;
101 b45a7a18 Fabrice Bellard
102 e995cfca Daniel Kristjansson
    int64_t cur_pcr;    /**< used to estimate the exact PCR  */
103
    int pcr_incr;       /**< used to estimate the exact PCR  */
104 115329f1 Diego Biurrun
105 5dbafeb7 Fabrice Bellard
    /* data needed to handle file based ts */
106 e995cfca Daniel Kristjansson
    /** stop parsing loop                                    */
107
    int stop_parse;
108
    /** packet containing Audio/Video data                   */
109
    AVPacket *pkt;
110 0c137557 Baptiste Coudurier
    /** to detect seek                                       */
111
    int64_t last_pos;
112 5dbafeb7 Fabrice Bellard
113
    /******************************************/
114
    /* private mpegts data */
115
    /* scan context */
116 172d1171 Nico Sabbi
    /** structure to keep track of Program->pids mapping     */
117
    unsigned int nb_prg;
118 8c39a758 Måns Rullgård
    struct Program *prg;
119 115329f1 Diego Biurrun
120 5dbafeb7 Fabrice Bellard
121 e995cfca Daniel Kristjansson
    /** filters for various streams specified by PMT + for the PAT and PMT */
122 5dbafeb7 Fabrice Bellard
    MpegTSFilter *pids[NB_PID_MAX];
123 0694a009 Måns Rullgård
};
124 fe9cf0d4 Fabrice Bellard
125 ecc31d1d Michael Niedermayer
/* TS stream handling */
126
127
enum MpegTSState {
128
    MPEGTS_HEADER = 0,
129 b2984add Baptiste Coudurier
    MPEGTS_PESHEADER,
130 ecc31d1d Michael Niedermayer
    MPEGTS_PESHEADER_FILL,
131
    MPEGTS_PAYLOAD,
132
    MPEGTS_SKIP,
133
};
134
135
/* enough for PES header + length */
136 b2984add Baptiste Coudurier
#define PES_START_SIZE  6
137
#define PES_HEADER_SIZE 9
138 ecc31d1d Michael Niedermayer
#define MAX_PES_HEADER_SIZE (9 + 255)
139
140 10061cd6 Baptiste Coudurier
typedef struct PESContext {
141 ecc31d1d Michael Niedermayer
    int pid;
142 dbf6b678 Michael Niedermayer
    int pcr_pid; /**< if -1 then all packets containing PCR are considered */
143 ecc31d1d Michael Niedermayer
    int stream_type;
144
    MpegTSContext *ts;
145
    AVFormatContext *stream;
146
    AVStream *st;
147 63380b5e Ian Caulfield
    AVStream *sub_st; /**< stream for the embedded AC3 stream in HDMV TrueHD */
148 ecc31d1d Michael Niedermayer
    enum MpegTSState state;
149
    /* used to get the format */
150
    int data_index;
151
    int total_size;
152
    int pes_header_size;
153 63380b5e Ian Caulfield
    int extended_stream_id;
154 ecc31d1d Michael Niedermayer
    int64_t pts, dts;
155 4c6b49bf Ivan Schreter
    int64_t ts_packet_pos; /**< position of first TS packet of this PES packet */
156 ecc31d1d Michael Niedermayer
    uint8_t header[MAX_PES_HEADER_SIZE];
157 0c137557 Baptiste Coudurier
    uint8_t *buffer;
158 10061cd6 Baptiste Coudurier
} PESContext;
159 ecc31d1d Michael Niedermayer
160 6369638b Aurelien Jacobs
extern AVInputFormat mpegts_demuxer;
161
162 172d1171 Nico Sabbi
static void clear_program(MpegTSContext *ts, unsigned int programid)
163
{
164
    int i;
165
166
    for(i=0; i<ts->nb_prg; i++)
167
        if(ts->prg[i].id == programid)
168
            ts->prg[i].nb_pids = 0;
169
}
170
171
static void clear_programs(MpegTSContext *ts)
172
{
173
    av_freep(&ts->prg);
174
    ts->nb_prg=0;
175
}
176
177
static void add_pat_entry(MpegTSContext *ts, unsigned int programid)
178
{
179 8c39a758 Måns Rullgård
    struct Program *p;
180
    void *tmp = av_realloc(ts->prg, (ts->nb_prg+1)*sizeof(struct Program));
181 172d1171 Nico Sabbi
    if(!tmp)
182
        return;
183
    ts->prg = tmp;
184
    p = &ts->prg[ts->nb_prg];
185
    p->id = programid;
186
    p->nb_pids = 0;
187
    ts->nb_prg++;
188
}
189
190
static void add_pid_to_pmt(MpegTSContext *ts, unsigned int programid, unsigned int pid)
191
{
192
    int i;
193 8c39a758 Måns Rullgård
    struct Program *p = NULL;
194 172d1171 Nico Sabbi
    for(i=0; i<ts->nb_prg; i++) {
195
        if(ts->prg[i].id == programid) {
196
            p = &ts->prg[i];
197
            break;
198
        }
199
    }
200
    if(!p)
201
        return;
202
203
    if(p->nb_pids >= MAX_PIDS_PER_PROGRAM)
204
        return;
205
    p->pids[p->nb_pids++] = pid;
206
}
207
208
/**
209
 * \brief discard_pid() decides if the pid is to be discarded according
210
 *                      to caller's programs selection
211
 * \param ts    : - TS context
212
 * \param pid   : - pid
213
 * \return 1 if the pid is only comprised in programs that have .discard=AVDISCARD_ALL
214
 *         0 otherwise
215
 */
216
static int discard_pid(MpegTSContext *ts, unsigned int pid)
217
{
218
    int i, j, k;
219
    int used = 0, discarded = 0;
220 8c39a758 Måns Rullgård
    struct Program *p;
221 172d1171 Nico Sabbi
    for(i=0; i<ts->nb_prg; i++) {
222
        p = &ts->prg[i];
223
        for(j=0; j<p->nb_pids; j++) {
224
            if(p->pids[j] != pid)
225
                continue;
226
            //is program with id p->id set to be discarded?
227
            for(k=0; k<ts->stream->nb_programs; k++) {
228
                if(ts->stream->programs[k]->id == p->id) {
229
                    if(ts->stream->programs[k]->discard == AVDISCARD_ALL)
230
                        discarded++;
231
                    else
232
                        used++;
233
                }
234
            }
235
        }
236
    }
237
238 ccd425e7 Diego Biurrun
    return !used && discarded;
239 172d1171 Nico Sabbi
}
240
241 e995cfca Daniel Kristjansson
/**
242
 *  Assembles PES packets out of TS packets, and then calls the "section_cb"
243
 *  function when they are complete.
244
 */
245 5dbafeb7 Fabrice Bellard
static void write_section_data(AVFormatContext *s, MpegTSFilter *tss1,
246
                               const uint8_t *buf, int buf_size, int is_start)
247
{
248
    MpegTSSectionFilter *tss = &tss1->u.section_filter;
249
    int len;
250 115329f1 Diego Biurrun
251 5dbafeb7 Fabrice Bellard
    if (is_start) {
252
        memcpy(tss->section_buf, buf, buf_size);
253
        tss->section_index = buf_size;
254
        tss->section_h_size = -1;
255
        tss->end_of_section_reached = 0;
256
    } else {
257
        if (tss->end_of_section_reached)
258
            return;
259
        len = 4096 - tss->section_index;
260
        if (buf_size < len)
261
            len = buf_size;
262
        memcpy(tss->section_buf + tss->section_index, buf, len);
263
        tss->section_index += len;
264
    }
265
266
    /* compute section length if possible */
267
    if (tss->section_h_size == -1 && tss->section_index >= 3) {
268 80fb8234 Ronald S. Bultje
        len = (AV_RB16(tss->section_buf + 1) & 0xfff) + 3;
269 5dbafeb7 Fabrice Bellard
        if (len > 4096)
270
            return;
271
        tss->section_h_size = len;
272
    }
273
274
    if (tss->section_h_size != -1 && tss->section_index >= tss->section_h_size) {
275
        tss->end_of_section_reached = 1;
276 27bb1ed3 Wolfram Gloger
        if (!tss->check_crc ||
277 3abe5fbd Aurelien Jacobs
            av_crc(av_crc_get_table(AV_CRC_32_IEEE), -1,
278
                   tss->section_buf, tss->section_h_size) == 0)
279 4d9a577e Michael Niedermayer
            tss->section_cb(tss1, tss->section_buf, tss->section_h_size);
280 5dbafeb7 Fabrice Bellard
    }
281
}
282
283 7b49ce2e Stefan Huehner
static MpegTSFilter *mpegts_open_section_filter(MpegTSContext *ts, unsigned int pid,
284 5dbafeb7 Fabrice Bellard
                                         SectionCallback *section_cb, void *opaque,
285
                                         int check_crc)
286
287
{
288
    MpegTSFilter *filter;
289
    MpegTSSectionFilter *sec;
290 115329f1 Diego Biurrun
291 ebcf352a Baptiste Coudurier
    dprintf(ts->stream, "Filter: pid=0x%x\n", pid);
292
293 5dbafeb7 Fabrice Bellard
    if (pid >= NB_PID_MAX || ts->pids[pid])
294
        return NULL;
295
    filter = av_mallocz(sizeof(MpegTSFilter));
296 115329f1 Diego Biurrun
    if (!filter)
297 5dbafeb7 Fabrice Bellard
        return NULL;
298
    ts->pids[pid] = filter;
299
    filter->type = MPEGTS_SECTION;
300
    filter->pid = pid;
301
    filter->last_cc = -1;
302
    sec = &filter->u.section_filter;
303
    sec->section_cb = section_cb;
304
    sec->opaque = opaque;
305
    sec->section_buf = av_malloc(MAX_SECTION_SIZE);
306
    sec->check_crc = check_crc;
307
    if (!sec->section_buf) {
308
        av_free(filter);
309
        return NULL;
310
    }
311
    return filter;
312
}
313
314 7b49ce2e Stefan Huehner
static MpegTSFilter *mpegts_open_pes_filter(MpegTSContext *ts, unsigned int pid,
315 5dbafeb7 Fabrice Bellard
                                     PESCallback *pes_cb,
316
                                     void *opaque)
317
{
318
    MpegTSFilter *filter;
319
    MpegTSPESFilter *pes;
320
321
    if (pid >= NB_PID_MAX || ts->pids[pid])
322
        return NULL;
323
    filter = av_mallocz(sizeof(MpegTSFilter));
324 115329f1 Diego Biurrun
    if (!filter)
325 5dbafeb7 Fabrice Bellard
        return NULL;
326
    ts->pids[pid] = filter;
327
    filter->type = MPEGTS_PES;
328
    filter->pid = pid;
329
    filter->last_cc = -1;
330
    pes = &filter->u.pes_filter;
331
    pes->pes_cb = pes_cb;
332
    pes->opaque = opaque;
333
    return filter;
334
}
335
336 7b49ce2e Stefan Huehner
static void mpegts_close_filter(MpegTSContext *ts, MpegTSFilter *filter)
337 5dbafeb7 Fabrice Bellard
{
338
    int pid;
339
340
    pid = filter->pid;
341
    if (filter->type == MPEGTS_SECTION)
342
        av_freep(&filter->u.section_filter.section_buf);
343 dcd913d9 Jindřich Makovička
    else if (filter->type == MPEGTS_PES) {
344 0c137557 Baptiste Coudurier
        PESContext *pes = filter->u.pes_filter.opaque;
345
        av_freep(&pes->buffer);
346 dcd913d9 Jindřich Makovička
        /* referenced private data will be freed later in
347
         * av_close_input_stream */
348
        if (!((PESContext *)filter->u.pes_filter.opaque)->st) {
349
            av_freep(&filter->u.pes_filter.opaque);
350
        }
351
    }
352 ec7d0d2e Gildas Bazin
353 5dbafeb7 Fabrice Bellard
    av_free(filter);
354
    ts->pids[pid] = NULL;
355
}
356
357 a0b8f70c Michael Niedermayer
static int analyze(const uint8_t *buf, int size, int packet_size, int *index){
358 cf5ec607 Måns Rullgård
    int stat[TS_MAX_PACKET_SIZE];
359 a0b8f70c Michael Niedermayer
    int i;
360
    int x=0;
361
    int best_score=0;
362
363
    memset(stat, 0, packet_size*sizeof(int));
364
365 c6002ea1 Måns Rullgård
    for(x=i=0; i<size-3; i++){
366
        if(buf[i] == 0x47 && !(buf[i+1] & 0x80) && (buf[i+3] & 0x30)){
367 a0b8f70c Michael Niedermayer
            stat[x]++;
368
            if(stat[x] > best_score){
369
                best_score= stat[x];
370
                if(index) *index= x;
371
            }
372
        }
373
374
        x++;
375
        if(x == packet_size) x= 0;
376
    }
377
378
    return best_score;
379
}
380
381 fe9cf0d4 Fabrice Bellard
/* autodetect fec presence. Must have at least 1024 bytes  */
382 5dbafeb7 Fabrice Bellard
static int get_packet_size(const uint8_t *buf, int size)
383 fe9cf0d4 Fabrice Bellard
{
384 5d4d67e0 Nico Sabbi
    int score, fec_score, dvhs_score;
385 fe9cf0d4 Fabrice Bellard
386
    if (size < (TS_FEC_PACKET_SIZE * 5 + 1))
387
        return -1;
388 115329f1 Diego Biurrun
389 a0b8f70c Michael Niedermayer
    score    = analyze(buf, size, TS_PACKET_SIZE, NULL);
390 5d4d67e0 Nico Sabbi
    dvhs_score    = analyze(buf, size, TS_DVHS_PACKET_SIZE, NULL);
391 a0b8f70c Michael Niedermayer
    fec_score= analyze(buf, size, TS_FEC_PACKET_SIZE, NULL);
392 5d4d67e0 Nico Sabbi
//    av_log(NULL, AV_LOG_DEBUG, "score: %d, dvhs_score: %d, fec_score: %d \n", score, dvhs_score, fec_score);
393 115329f1 Diego Biurrun
394 5d4d67e0 Nico Sabbi
    if     (score > fec_score && score > dvhs_score) return TS_PACKET_SIZE;
395
    else if(dvhs_score > score && dvhs_score > fec_score) return TS_DVHS_PACKET_SIZE;
396
    else if(score < fec_score && dvhs_score < fec_score) return TS_FEC_PACKET_SIZE;
397 a0b8f70c Michael Niedermayer
    else                       return -1;
398 fe9cf0d4 Fabrice Bellard
}
399
400 5dbafeb7 Fabrice Bellard
typedef struct SectionHeader {
401
    uint8_t tid;
402
    uint16_t id;
403
    uint8_t version;
404
    uint8_t sec_num;
405
    uint8_t last_sec_num;
406
} SectionHeader;
407
408
static inline int get8(const uint8_t **pp, const uint8_t *p_end)
409 fe9cf0d4 Fabrice Bellard
{
410 5dbafeb7 Fabrice Bellard
    const uint8_t *p;
411
    int c;
412
413
    p = *pp;
414
    if (p >= p_end)
415
        return -1;
416
    c = *p++;
417
    *pp = p;
418
    return c;
419 fe9cf0d4 Fabrice Bellard
}
420
421 5dbafeb7 Fabrice Bellard
static inline int get16(const uint8_t **pp, const uint8_t *p_end)
422
{
423
    const uint8_t *p;
424
    int c;
425
426
    p = *pp;
427
    if ((p + 1) >= p_end)
428
        return -1;
429 80fb8234 Ronald S. Bultje
    c = AV_RB16(p);
430 5dbafeb7 Fabrice Bellard
    p += 2;
431
    *pp = p;
432
    return c;
433
}
434
435
/* read and allocate a DVB string preceeded by its length */
436
static char *getstr8(const uint8_t **pp, const uint8_t *p_end)
437 fe9cf0d4 Fabrice Bellard
{
438
    int len;
439 5dbafeb7 Fabrice Bellard
    const uint8_t *p;
440
    char *str;
441 fe9cf0d4 Fabrice Bellard
442 5dbafeb7 Fabrice Bellard
    p = *pp;
443
    len = get8(&p, p_end);
444
    if (len < 0)
445
        return NULL;
446
    if ((p + len) > p_end)
447
        return NULL;
448
    str = av_malloc(len + 1);
449
    if (!str)
450
        return NULL;
451
    memcpy(str, p, len);
452
    str[len] = '\0';
453
    p += len;
454
    *pp = p;
455
    return str;
456
}
457
458 115329f1 Diego Biurrun
static int parse_section_header(SectionHeader *h,
459 5dbafeb7 Fabrice Bellard
                                const uint8_t **pp, const uint8_t *p_end)
460
{
461
    int val;
462
463
    val = get8(pp, p_end);
464
    if (val < 0)
465
        return -1;
466
    h->tid = val;
467
    *pp += 2;
468
    val = get16(pp, p_end);
469
    if (val < 0)
470
        return -1;
471
    h->id = val;
472
    val = get8(pp, p_end);
473
    if (val < 0)
474
        return -1;
475
    h->version = (val >> 1) & 0x1f;
476
    val = get8(pp, p_end);
477
    if (val < 0)
478
        return -1;
479
    h->sec_num = val;
480
    val = get8(pp, p_end);
481
    if (val < 0)
482
        return -1;
483
    h->last_sec_num = val;
484 fe9cf0d4 Fabrice Bellard
    return 0;
485 5dbafeb7 Fabrice Bellard
}
486
487 08f94e98 Baptiste Coudurier
typedef struct {
488
    uint32_t stream_type;
489 72415b2a Stefano Sabatini
    enum AVMediaType codec_type;
490 08f94e98 Baptiste Coudurier
    enum CodecID codec_id;
491
} StreamType;
492
493
static const StreamType ISO_types[] = {
494 72415b2a Stefano Sabatini
    { 0x01, AVMEDIA_TYPE_VIDEO, CODEC_ID_MPEG2VIDEO },
495
    { 0x02, AVMEDIA_TYPE_VIDEO, CODEC_ID_MPEG2VIDEO },
496
    { 0x03, AVMEDIA_TYPE_AUDIO,        CODEC_ID_MP3 },
497
    { 0x04, AVMEDIA_TYPE_AUDIO,        CODEC_ID_MP3 },
498
    { 0x0f, AVMEDIA_TYPE_AUDIO,        CODEC_ID_AAC },
499
    { 0x10, AVMEDIA_TYPE_VIDEO,      CODEC_ID_MPEG4 },
500
    { 0x11, AVMEDIA_TYPE_AUDIO,        CODEC_ID_AAC }, /* LATM syntax */
501
    { 0x1b, AVMEDIA_TYPE_VIDEO,       CODEC_ID_H264 },
502
    { 0xd1, AVMEDIA_TYPE_VIDEO,      CODEC_ID_DIRAC },
503
    { 0xea, AVMEDIA_TYPE_VIDEO,        CODEC_ID_VC1 },
504 08f94e98 Baptiste Coudurier
    { 0 },
505
};
506
507
static const StreamType HDMV_types[] = {
508 72415b2a Stefano Sabatini
    { 0x80, AVMEDIA_TYPE_AUDIO, CODEC_ID_PCM_BLURAY },
509
    { 0x81, AVMEDIA_TYPE_AUDIO, CODEC_ID_AC3 },
510
    { 0x82, AVMEDIA_TYPE_AUDIO, CODEC_ID_DTS },
511
    { 0x83, AVMEDIA_TYPE_AUDIO, CODEC_ID_TRUEHD },
512
    { 0x84, AVMEDIA_TYPE_AUDIO, CODEC_ID_EAC3 },
513
    { 0x90, AVMEDIA_TYPE_SUBTITLE, CODEC_ID_HDMV_PGS_SUBTITLE },
514 08f94e98 Baptiste Coudurier
    { 0 },
515
};
516
517
/* ATSC ? */
518
static const StreamType MISC_types[] = {
519 72415b2a Stefano Sabatini
    { 0x81, AVMEDIA_TYPE_AUDIO,   CODEC_ID_AC3 },
520
    { 0x8a, AVMEDIA_TYPE_AUDIO,   CODEC_ID_DTS },
521 08f94e98 Baptiste Coudurier
    { 0 },
522
};
523
524
static const StreamType REGD_types[] = {
525 72415b2a Stefano Sabatini
    { MKTAG('d','r','a','c'), AVMEDIA_TYPE_VIDEO, CODEC_ID_DIRAC },
526
    { MKTAG('A','C','-','3'), AVMEDIA_TYPE_AUDIO,   CODEC_ID_AC3 },
527 08f94e98 Baptiste Coudurier
    { 0 },
528
};
529
530 6a2a50f8 Baptiste Coudurier
/* descriptor present */
531
static const StreamType DESC_types[] = {
532 72415b2a Stefano Sabatini
    { 0x6a, AVMEDIA_TYPE_AUDIO,             CODEC_ID_AC3 }, /* AC-3 descriptor */
533
    { 0x7a, AVMEDIA_TYPE_AUDIO,            CODEC_ID_EAC3 }, /* E-AC-3 descriptor */
534
    { 0x7b, AVMEDIA_TYPE_AUDIO,             CODEC_ID_DTS },
535
    { 0x56, AVMEDIA_TYPE_SUBTITLE, CODEC_ID_DVB_TELETEXT },
536
    { 0x59, AVMEDIA_TYPE_SUBTITLE, CODEC_ID_DVB_SUBTITLE }, /* subtitling descriptor */
537 896f2b32 Wolfram Gloger
    { 0 },
538 6a2a50f8 Baptiste Coudurier
};
539
540 08f94e98 Baptiste Coudurier
static void mpegts_find_stream_type(AVStream *st,
541
                                    uint32_t stream_type, const StreamType *types)
542
{
543
    for (; types->stream_type; types++) {
544
        if (stream_type == types->stream_type) {
545
            st->codec->codec_type = types->codec_type;
546
            st->codec->codec_id   = types->codec_id;
547
            return;
548
        }
549
    }
550
}
551
552 b3f9f7a3 Baptiste Coudurier
static int mpegts_set_stream_info(AVStream *st, PESContext *pes,
553
                                  uint32_t stream_type, uint32_t prog_reg_desc)
554 08f94e98 Baptiste Coudurier
{
555
    av_set_pts_info(st, 33, 1, 90000);
556
    st->priv_data = pes;
557 72415b2a Stefano Sabatini
    st->codec->codec_type = AVMEDIA_TYPE_DATA;
558 d23612ef Baptiste Coudurier
    st->codec->codec_id   = CODEC_ID_NONE;
559 08f94e98 Baptiste Coudurier
    st->need_parsing = AVSTREAM_PARSE_FULL;
560
    pes->st = st;
561 b3f9f7a3 Baptiste Coudurier
    pes->stream_type = stream_type;
562 08f94e98 Baptiste Coudurier
563 b3f9f7a3 Baptiste Coudurier
    av_log(pes->stream, AV_LOG_DEBUG,
564
           "stream=%d stream_type=%x pid=%x prog_reg_desc=%.4s\n",
565
           st->index, pes->stream_type, pes->pid, (char*)&prog_reg_desc);
566 08f94e98 Baptiste Coudurier
567 7103a77b Baptiste Coudurier
    st->codec->codec_tag = pes->stream_type;
568
569 f2c357d9 Baptiste Coudurier
    mpegts_find_stream_type(st, pes->stream_type, ISO_types);
570
    if (prog_reg_desc == AV_RL32("HDMV") &&
571 63380b5e Ian Caulfield
        st->codec->codec_id == CODEC_ID_NONE) {
572 f2c357d9 Baptiste Coudurier
        mpegts_find_stream_type(st, pes->stream_type, HDMV_types);
573 63380b5e Ian Caulfield
        if (pes->stream_type == 0x83) {
574
            // HDMV TrueHD streams also contain an AC3 coded version of the
575
            // audio track - add a second stream for this
576
            AVStream *sub_st;
577
            // priv_data cannot be shared between streams
578
            PESContext *sub_pes = av_malloc(sizeof(*sub_pes));
579
            if (!sub_pes)
580 b3f9f7a3 Baptiste Coudurier
                return AVERROR(ENOMEM);
581 63380b5e Ian Caulfield
            memcpy(sub_pes, pes, sizeof(*sub_pes));
582
583
            sub_st = av_new_stream(pes->stream, pes->pid);
584
            if (!sub_st) {
585
                av_free(sub_pes);
586 b3f9f7a3 Baptiste Coudurier
                return AVERROR(ENOMEM);
587 63380b5e Ian Caulfield
            }
588
589
            av_set_pts_info(sub_st, 33, 1, 90000);
590
            sub_st->priv_data = sub_pes;
591 72415b2a Stefano Sabatini
            sub_st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
592 63380b5e Ian Caulfield
            sub_st->codec->codec_id   = CODEC_ID_AC3;
593
            sub_st->need_parsing = AVSTREAM_PARSE_FULL;
594
            sub_pes->sub_st = pes->sub_st = sub_st;
595
        }
596
    }
597 d23612ef Baptiste Coudurier
    if (st->codec->codec_id == CODEC_ID_NONE)
598 f2c357d9 Baptiste Coudurier
        mpegts_find_stream_type(st, pes->stream_type, MISC_types);
599 08f94e98 Baptiste Coudurier
600 b3f9f7a3 Baptiste Coudurier
    return 0;
601 08f94e98 Baptiste Coudurier
}
602 5dbafeb7 Fabrice Bellard
603 609d8646 Baptiste Coudurier
static int64_t get_pts(const uint8_t *p)
604
{
605
    int64_t pts = (int64_t)((p[0] >> 1) & 0x07) << 30;
606
    pts |= (AV_RB16(p + 1) >> 1) << 15;
607
    pts |=  AV_RB16(p + 3) >> 1;
608
    return pts;
609
}
610
611
static void new_pes_packet(PESContext *pes, AVPacket *pkt)
612
{
613
    av_init_packet(pkt);
614
615
    pkt->destruct = av_destruct_packet;
616
    pkt->data = pes->buffer;
617
    pkt->size = pes->data_index;
618
    memset(pkt->data+pkt->size, 0, FF_INPUT_BUFFER_PADDING_SIZE);
619
620
    // Separate out the AC3 substream from an HDMV combined TrueHD/AC3 PID
621
    if (pes->sub_st && pes->stream_type == 0x83 && pes->extended_stream_id == 0x76)
622
        pkt->stream_index = pes->sub_st->index;
623
    else
624
        pkt->stream_index = pes->st->index;
625
    pkt->pts = pes->pts;
626
    pkt->dts = pes->dts;
627
    /* store position of first TS packet of this PES packet */
628
    pkt->pos = pes->ts_packet_pos;
629
630
    /* reset pts values */
631
    pes->pts = AV_NOPTS_VALUE;
632
    pes->dts = AV_NOPTS_VALUE;
633
    pes->buffer = NULL;
634
    pes->data_index = 0;
635
}
636
637
/* return non zero if a packet could be constructed */
638
static int mpegts_push_data(MpegTSFilter *filter,
639
                            const uint8_t *buf, int buf_size, int is_start,
640
                            int64_t pos)
641
{
642
    PESContext *pes = filter->u.pes_filter.opaque;
643
    MpegTSContext *ts = pes->ts;
644
    const uint8_t *p;
645
    int len, code;
646
647
    if(!ts->pkt)
648
        return 0;
649
650
    if (is_start) {
651
        if (pes->state == MPEGTS_PAYLOAD && pes->data_index > 0) {
652
            new_pes_packet(pes, ts->pkt);
653
            ts->stop_parse = 1;
654
        }
655
        pes->state = MPEGTS_HEADER;
656
        pes->data_index = 0;
657
        pes->ts_packet_pos = pos;
658
    }
659
    p = buf;
660
    while (buf_size > 0) {
661
        switch(pes->state) {
662
        case MPEGTS_HEADER:
663
            len = PES_START_SIZE - pes->data_index;
664
            if (len > buf_size)
665
                len = buf_size;
666
            memcpy(pes->header + pes->data_index, p, len);
667
            pes->data_index += len;
668
            p += len;
669
            buf_size -= len;
670
            if (pes->data_index == PES_START_SIZE) {
671
                /* we got all the PES or section header. We can now
672
                   decide */
673
#if 0
674
                av_hex_dump_log(pes->stream, AV_LOG_DEBUG, pes->header, pes->data_index);
675
#endif
676
                if (pes->header[0] == 0x00 && pes->header[1] == 0x00 &&
677
                    pes->header[2] == 0x01) {
678
                    /* it must be an mpeg2 PES stream */
679
                    code = pes->header[3] | 0x100;
680
                    dprintf(pes->stream, "pid=%x pes_code=%#x\n", pes->pid, code);
681
682
                    if ((!pes->st && pes->stream->nb_streams == MAX_STREAMS) ||
683
                        (pes->st && pes->st->discard == AVDISCARD_ALL) ||
684
                        code == 0x1be) /* padding_stream */
685
                        goto skip;
686
687
                    /* stream not present in PMT */
688
                    if (!pes->st) {
689
                        pes->st = av_new_stream(ts->stream, pes->pid);
690
                        if (!pes->st)
691
                            return AVERROR(ENOMEM);
692
                        mpegts_set_stream_info(pes->st, pes, 0, 0);
693
                    }
694
695
                    pes->total_size = AV_RB16(pes->header + 4);
696
                    /* NOTE: a zero total size means the PES size is
697
                       unbounded */
698
                    if (!pes->total_size)
699
                        pes->total_size = MAX_PES_PAYLOAD;
700
701
                    /* allocate pes buffer */
702
                    pes->buffer = av_malloc(pes->total_size+FF_INPUT_BUFFER_PADDING_SIZE);
703
                    if (!pes->buffer)
704
                        return AVERROR(ENOMEM);
705
706
                    if (code != 0x1bc && code != 0x1bf && /* program_stream_map, private_stream_2 */
707
                        code != 0x1f0 && code != 0x1f1 && /* ECM, EMM */
708
                        code != 0x1ff && code != 0x1f2 && /* program_stream_directory, DSMCC_stream */
709
                        code != 0x1f8) {                  /* ITU-T Rec. H.222.1 type E stream */
710
                        pes->state = MPEGTS_PESHEADER;
711
                        if (pes->st->codec->codec_id == CODEC_ID_NONE) {
712
                            dprintf(pes->stream, "pid=%x stream_type=%x probing\n",
713
                                    pes->pid, pes->stream_type);
714
                            pes->st->codec->codec_id = CODEC_ID_PROBE;
715
                        }
716
                    } else {
717
                        pes->state = MPEGTS_PAYLOAD;
718
                        pes->data_index = 0;
719
                    }
720
                } else {
721
                    /* otherwise, it should be a table */
722
                    /* skip packet */
723
                skip:
724
                    pes->state = MPEGTS_SKIP;
725
                    continue;
726
                }
727
            }
728
            break;
729
            /**********************************************/
730
            /* PES packing parsing */
731
        case MPEGTS_PESHEADER:
732
            len = PES_HEADER_SIZE - pes->data_index;
733
            if (len < 0)
734
                return -1;
735
            if (len > buf_size)
736
                len = buf_size;
737
            memcpy(pes->header + pes->data_index, p, len);
738
            pes->data_index += len;
739
            p += len;
740
            buf_size -= len;
741
            if (pes->data_index == PES_HEADER_SIZE) {
742
                pes->pes_header_size = pes->header[8] + 9;
743
                pes->state = MPEGTS_PESHEADER_FILL;
744
            }
745
            break;
746
        case MPEGTS_PESHEADER_FILL:
747
            len = pes->pes_header_size - pes->data_index;
748
            if (len < 0)
749
                return -1;
750
            if (len > buf_size)
751
                len = buf_size;
752
            memcpy(pes->header + pes->data_index, p, len);
753
            pes->data_index += len;
754
            p += len;
755
            buf_size -= len;
756
            if (pes->data_index == pes->pes_header_size) {
757
                const uint8_t *r;
758
                unsigned int flags, pes_ext, skip;
759
760
                flags = pes->header[7];
761
                r = pes->header + 9;
762
                pes->pts = AV_NOPTS_VALUE;
763
                pes->dts = AV_NOPTS_VALUE;
764
                if ((flags & 0xc0) == 0x80) {
765
                    pes->dts = pes->pts = get_pts(r);
766
                    r += 5;
767
                } else if ((flags & 0xc0) == 0xc0) {
768
                    pes->pts = get_pts(r);
769
                    r += 5;
770
                    pes->dts = get_pts(r);
771
                    r += 5;
772
                }
773
                pes->extended_stream_id = -1;
774
                if (flags & 0x01) { /* PES extension */
775
                    pes_ext = *r++;
776
                    /* Skip PES private data, program packet sequence counter and P-STD buffer */
777
                    skip = (pes_ext >> 4) & 0xb;
778
                    skip += skip & 0x9;
779
                    r += skip;
780
                    if ((pes_ext & 0x41) == 0x01 &&
781
                        (r + 2) <= (pes->header + pes->pes_header_size)) {
782
                        /* PES extension 2 */
783
                        if ((r[0] & 0x7f) > 0 && (r[1] & 0x80) == 0)
784
                            pes->extended_stream_id = r[1];
785
                    }
786
                }
787
788
                /* we got the full header. We parse it and get the payload */
789
                pes->state = MPEGTS_PAYLOAD;
790
                pes->data_index = 0;
791
            }
792
            break;
793
        case MPEGTS_PAYLOAD:
794
            if (buf_size > 0 && pes->buffer) {
795
                if (pes->data_index+buf_size > pes->total_size) {
796
                    new_pes_packet(pes, ts->pkt);
797
                    pes->total_size = MAX_PES_PAYLOAD;
798
                    pes->buffer = av_malloc(pes->total_size+FF_INPUT_BUFFER_PADDING_SIZE);
799
                    if (!pes->buffer)
800
                        return AVERROR(ENOMEM);
801
                    ts->stop_parse = 1;
802
                }
803
                memcpy(pes->buffer+pes->data_index, p, buf_size);
804
                pes->data_index += buf_size;
805
            }
806
            buf_size = 0;
807
            break;
808
        case MPEGTS_SKIP:
809
            buf_size = 0;
810
            break;
811
        }
812
    }
813
814
    return 0;
815
}
816
817
static PESContext *add_pes_stream(MpegTSContext *ts, int pid, int pcr_pid)
818
{
819
    MpegTSFilter *tss;
820
    PESContext *pes;
821
822
    /* if no pid found, then add a pid context */
823
    pes = av_mallocz(sizeof(PESContext));
824
    if (!pes)
825
        return 0;
826
    pes->ts = ts;
827
    pes->stream = ts->stream;
828
    pes->pid = pid;
829
    pes->pcr_pid = pcr_pid;
830
    pes->state = MPEGTS_SKIP;
831
    pes->pts = AV_NOPTS_VALUE;
832
    pes->dts = AV_NOPTS_VALUE;
833
    tss = mpegts_open_pes_filter(ts, pid, mpegts_push_data, pes);
834
    if (!tss) {
835
        av_free(pes);
836
        return 0;
837
    }
838
    return pes;
839
}
840
841 4d9a577e Michael Niedermayer
static void pmt_cb(MpegTSFilter *filter, const uint8_t *section, int section_len)
842 5dbafeb7 Fabrice Bellard
{
843 4d9a577e Michael Niedermayer
    MpegTSContext *ts = filter->u.section_filter.opaque;
844 5dbafeb7 Fabrice Bellard
    SectionHeader h1, *h = &h1;
845 c6ec28b1 Michael Niedermayer
    PESContext *pes;
846
    AVStream *st;
847
    const uint8_t *p, *p_end, *desc_list_end, *desc_end;
848
    int program_info_length, pcr_pid, pid, stream_type;
849
    int desc_list_len, desc_len, desc_tag;
850 ed68efad Baptiste Coudurier
    int comp_page, anc_page;
851
    char language[4];
852 8430f3ec Baptiste Coudurier
    uint32_t prog_reg_desc = 0; /* registration descriptor */
853 115329f1 Diego Biurrun
854 ebcf352a Baptiste Coudurier
#ifdef DEBUG
855
    dprintf(ts->stream, "PMT: len %i\n", section_len);
856 750f0e1f Panagiotis Issaris
    av_hex_dump_log(ts->stream, AV_LOG_DEBUG, (uint8_t *)section, section_len);
857 5dbafeb7 Fabrice Bellard
#endif
858 ebcf352a Baptiste Coudurier
859 5dbafeb7 Fabrice Bellard
    p_end = section + section_len - 4;
860
    p = section;
861
    if (parse_section_header(h, &p, p_end) < 0)
862
        return;
863 ebcf352a Baptiste Coudurier
864
    dprintf(ts->stream, "sid=0x%x sec_num=%d/%d\n",
865 2ddb79be Daniel Kristjansson
           h->id, h->sec_num, h->last_sec_num);
866 ebcf352a Baptiste Coudurier
867 90d13e30 Michael Niedermayer
    if (h->tid != PMT_TID)
868 5dbafeb7 Fabrice Bellard
        return;
869
870 172d1171 Nico Sabbi
    clear_program(ts, h->id);
871 5dbafeb7 Fabrice Bellard
    pcr_pid = get16(&p, p_end) & 0x1fff;
872
    if (pcr_pid < 0)
873
        return;
874 172d1171 Nico Sabbi
    add_pid_to_pmt(ts, h->id, pcr_pid);
875 ebcf352a Baptiste Coudurier
876
    dprintf(ts->stream, "pcr_pid=0x%x\n", pcr_pid);
877
878 5dbafeb7 Fabrice Bellard
    program_info_length = get16(&p, p_end) & 0xfff;
879
    if (program_info_length < 0)
880
        return;
881 a45b40c4 Nico Sabbi
    while(program_info_length >= 2) {
882
        uint8_t tag, len;
883
        tag = get8(&p, p_end);
884
        len = get8(&p, p_end);
885
        if(len > program_info_length - 2)
886
            //something else is broken, exit the program_descriptors_loop
887
            break;
888
        program_info_length -= len + 2;
889 2fef7b53 Baptiste Coudurier
        if(tag == 0x05 && len >= 4) { // registration descriptor
890 8430f3ec Baptiste Coudurier
            prog_reg_desc = bytestream_get_le32(&p);
891 a45b40c4 Nico Sabbi
            len -= 4;
892
        }
893
        p += len;
894
    }
895 5dbafeb7 Fabrice Bellard
    p += program_info_length;
896
    if (p >= p_end)
897
        return;
898 d46c84ea Baptiste Coudurier
899
    // stop parsing after pmt, we found header
900
    if (!ts->stream->nb_streams)
901
        ts->stop_parse = 1;
902
903 5dbafeb7 Fabrice Bellard
    for(;;) {
904 c6ec28b1 Michael Niedermayer
        st = 0;
905 5dbafeb7 Fabrice Bellard
        stream_type = get8(&p, p_end);
906
        if (stream_type < 0)
907
            break;
908
        pid = get16(&p, p_end) & 0x1fff;
909
        if (pid < 0)
910
            break;
911 f42d1d82 Baptiste Coudurier
912
        /* now create ffmpeg stream */
913
        if (ts->pids[pid] && ts->pids[pid]->type == MPEGTS_PES) {
914
            pes = ts->pids[pid]->u.pes_filter.opaque;
915
            st = pes->st;
916
        } else {
917
            if (ts->pids[pid]) mpegts_close_filter(ts, ts->pids[pid]); //wrongly added sdt filter probably
918 b3f9f7a3 Baptiste Coudurier
            pes = add_pes_stream(ts, pid, pcr_pid);
919 f42d1d82 Baptiste Coudurier
            if (pes)
920 b3f9f7a3 Baptiste Coudurier
                st = av_new_stream(pes->stream, pes->pid);
921 f42d1d82 Baptiste Coudurier
        }
922
923
        if (!st)
924
            return;
925
926 b3f9f7a3 Baptiste Coudurier
        if (!pes->stream_type)
927
            mpegts_set_stream_info(st, pes, stream_type, prog_reg_desc);
928
929 f42d1d82 Baptiste Coudurier
        add_pid_to_pmt(ts, h->id, pid);
930
931 588af13f Aurelien Jacobs
        ff_program_add_stream_index(ts->stream, h->id, st->index);
932 f42d1d82 Baptiste Coudurier
933 c6ec28b1 Michael Niedermayer
        desc_list_len = get16(&p, p_end) & 0xfff;
934
        if (desc_list_len < 0)
935
            break;
936
        desc_list_end = p + desc_list_len;
937 a4d2af9b Björn Axelsson
        if (desc_list_end > p_end)
938 5dbafeb7 Fabrice Bellard
            break;
939 c6ec28b1 Michael Niedermayer
        for(;;) {
940
            desc_tag = get8(&p, desc_list_end);
941
            if (desc_tag < 0)
942
                break;
943
            desc_len = get8(&p, desc_list_end);
944 a4d2af9b Björn Axelsson
            if (desc_len < 0)
945
                break;
946 c6ec28b1 Michael Niedermayer
            desc_end = p + desc_len;
947
            if (desc_end > desc_list_end)
948
                break;
949 ebcf352a Baptiste Coudurier
950
            dprintf(ts->stream, "tag: 0x%02x len=%d\n",
951 2ddb79be Daniel Kristjansson
                   desc_tag, desc_len);
952 ebcf352a Baptiste Coudurier
953 d23612ef Baptiste Coudurier
            if (st->codec->codec_id == CODEC_ID_NONE &&
954 6a2a50f8 Baptiste Coudurier
                stream_type == STREAM_TYPE_PRIVATE_DATA)
955
                mpegts_find_stream_type(st, desc_tag, DESC_types);
956
957 c6ec28b1 Michael Niedermayer
            switch(desc_tag) {
958 e58992e4 Francesco Lavra
            case 0x56: /* DVB teletext descriptor */
959
                language[0] = get8(&p, desc_end);
960
                language[1] = get8(&p, desc_end);
961
                language[2] = get8(&p, desc_end);
962
                language[3] = 0;
963
                av_metadata_set(&st->metadata, "language", language);
964
                break;
965 2fef7b53 Baptiste Coudurier
            case 0x59: /* subtitling descriptor */
966 c6ec28b1 Michael Niedermayer
                language[0] = get8(&p, desc_end);
967
                language[1] = get8(&p, desc_end);
968
                language[2] = get8(&p, desc_end);
969
                language[3] = 0;
970
                get8(&p, desc_end);
971
                comp_page = get16(&p, desc_end);
972
                anc_page = get16(&p, desc_end);
973 f42d1d82 Baptiste Coudurier
                st->codec->sub_id = (anc_page << 16) | comp_page;
974
                av_metadata_set(&st->metadata, "language", language);
975 c6ec28b1 Michael Niedermayer
                break;
976
            case 0x0a: /* ISO 639 language descriptor */
977
                language[0] = get8(&p, desc_end);
978
                language[1] = get8(&p, desc_end);
979
                language[2] = get8(&p, desc_end);
980
                language[3] = 0;
981 f42d1d82 Baptiste Coudurier
                av_metadata_set(&st->metadata, "language", language);
982 c6ec28b1 Michael Niedermayer
                break;
983 2fef7b53 Baptiste Coudurier
            case 0x05: /* registration descriptor */
984 5b3c4c8a Baptiste Coudurier
                st->codec->codec_tag = bytestream_get_le32(&p);
985 1f076543 Baptiste Coudurier
                dprintf(ts->stream, "reg_desc=%.4s\n", (char*)&st->codec->codec_tag);
986 d23612ef Baptiste Coudurier
                if (st->codec->codec_id == CODEC_ID_NONE &&
987 f42d1d82 Baptiste Coudurier
                    stream_type == STREAM_TYPE_PRIVATE_DATA)
988 5b3c4c8a Baptiste Coudurier
                    mpegts_find_stream_type(st, st->codec->codec_tag, REGD_types);
989 4f1db48e Baptiste Coudurier
                break;
990 c6ec28b1 Michael Niedermayer
            default:
991
                break;
992
            }
993
            p = desc_end;
994 63380b5e Ian Caulfield
995
            if (prog_reg_desc == AV_RL32("HDMV") && stream_type == 0x83 && pes->sub_st) {
996 588af13f Aurelien Jacobs
                ff_program_add_stream_index(ts->stream, h->id, pes->sub_st->index);
997 63380b5e Ian Caulfield
                pes->sub_st->codec->codec_tag = st->codec->codec_tag;
998
            }
999 c6ec28b1 Michael Niedermayer
        }
1000
        p = desc_list_end;
1001 5dbafeb7 Fabrice Bellard
    }
1002
    /* all parameters are there */
1003 4d9a577e Michael Niedermayer
    mpegts_close_filter(ts, filter);
1004 5dbafeb7 Fabrice Bellard
}
1005
1006 4d9a577e Michael Niedermayer
static void pat_cb(MpegTSFilter *filter, const uint8_t *section, int section_len)
1007 5dbafeb7 Fabrice Bellard
{
1008 4d9a577e Michael Niedermayer
    MpegTSContext *ts = filter->u.section_filter.opaque;
1009 5dbafeb7 Fabrice Bellard
    SectionHeader h1, *h = &h1;
1010
    const uint8_t *p, *p_end;
1011
    int sid, pmt_pid;
1012
1013 ebcf352a Baptiste Coudurier
#ifdef DEBUG
1014
    dprintf(ts->stream, "PAT:\n");
1015 750f0e1f Panagiotis Issaris
    av_hex_dump_log(ts->stream, AV_LOG_DEBUG, (uint8_t *)section, section_len);
1016 5dbafeb7 Fabrice Bellard
#endif
1017
    p_end = section + section_len - 4;
1018
    p = section;
1019
    if (parse_section_header(h, &p, p_end) < 0)
1020
        return;
1021
    if (h->tid != PAT_TID)
1022
        return;
1023
1024 172d1171 Nico Sabbi
    clear_programs(ts);
1025 5dbafeb7 Fabrice Bellard
    for(;;) {
1026
        sid = get16(&p, p_end);
1027
        if (sid < 0)
1028
            break;
1029
        pmt_pid = get16(&p, p_end) & 0x1fff;
1030
        if (pmt_pid < 0)
1031
            break;
1032 ebcf352a Baptiste Coudurier
1033
        dprintf(ts->stream, "sid=0x%x pid=0x%x\n", sid, pmt_pid);
1034
1035 5dbafeb7 Fabrice Bellard
        if (sid == 0x0000) {
1036
            /* NIT info */
1037
        } else {
1038 1d257254 Nico Sabbi
            av_new_program(ts->stream, sid);
1039 28f03d04 Michael Niedermayer
            mpegts_open_section_filter(ts, pmt_pid, pmt_cb, ts, 1);
1040 172d1171 Nico Sabbi
            add_pat_entry(ts, sid);
1041
            add_pid_to_pmt(ts, sid, 0); //add pat pid to program
1042
            add_pid_to_pmt(ts, sid, pmt_pid);
1043 5dbafeb7 Fabrice Bellard
        }
1044
    }
1045
}
1046
1047 4d9a577e Michael Niedermayer
static void sdt_cb(MpegTSFilter *filter, const uint8_t *section, int section_len)
1048 5dbafeb7 Fabrice Bellard
{
1049 4d9a577e Michael Niedermayer
    MpegTSContext *ts = filter->u.section_filter.opaque;
1050 5dbafeb7 Fabrice Bellard
    SectionHeader h1, *h = &h1;
1051
    const uint8_t *p, *p_end, *desc_list_end, *desc_end;
1052
    int onid, val, sid, desc_list_len, desc_tag, desc_len, service_type;
1053
    char *name, *provider_name;
1054
1055 ebcf352a Baptiste Coudurier
#ifdef DEBUG
1056
    dprintf(ts->stream, "SDT:\n");
1057 750f0e1f Panagiotis Issaris
    av_hex_dump_log(ts->stream, AV_LOG_DEBUG, (uint8_t *)section, section_len);
1058 5dbafeb7 Fabrice Bellard
#endif
1059
1060
    p_end = section + section_len - 4;
1061
    p = section;
1062
    if (parse_section_header(h, &p, p_end) < 0)
1063
        return;
1064
    if (h->tid != SDT_TID)
1065
        return;
1066
    onid = get16(&p, p_end);
1067
    if (onid < 0)
1068
        return;
1069
    val = get8(&p, p_end);
1070
    if (val < 0)
1071
        return;
1072
    for(;;) {
1073
        sid = get16(&p, p_end);
1074
        if (sid < 0)
1075
            break;
1076
        val = get8(&p, p_end);
1077
        if (val < 0)
1078
            break;
1079
        desc_list_len = get16(&p, p_end) & 0xfff;
1080
        if (desc_list_len < 0)
1081
            break;
1082
        desc_list_end = p + desc_list_len;
1083
        if (desc_list_end > p_end)
1084
            break;
1085
        for(;;) {
1086
            desc_tag = get8(&p, desc_list_end);
1087
            if (desc_tag < 0)
1088
                break;
1089
            desc_len = get8(&p, desc_list_end);
1090
            desc_end = p + desc_len;
1091
            if (desc_end > desc_list_end)
1092
                break;
1093 ebcf352a Baptiste Coudurier
1094
            dprintf(ts->stream, "tag: 0x%02x len=%d\n",
1095 2ddb79be Daniel Kristjansson
                   desc_tag, desc_len);
1096 ebcf352a Baptiste Coudurier
1097 5dbafeb7 Fabrice Bellard
            switch(desc_tag) {
1098
            case 0x48:
1099
                service_type = get8(&p, p_end);
1100
                if (service_type < 0)
1101
                    break;
1102
                provider_name = getstr8(&p, p_end);
1103
                if (!provider_name)
1104
                    break;
1105
                name = getstr8(&p, p_end);
1106 1d257254 Nico Sabbi
                if (name) {
1107
                    AVProgram *program = av_new_program(ts->stream, sid);
1108 08681191 Aurelien Jacobs
                    if(program) {
1109
                        av_metadata_set(&program->metadata, "name", name);
1110
                        av_metadata_set(&program->metadata, "provider_name", provider_name);
1111
                    }
1112 1d257254 Nico Sabbi
                }
1113 81d5ae6d Michael Niedermayer
                av_free(name);
1114
                av_free(provider_name);
1115 5dbafeb7 Fabrice Bellard
                break;
1116
            default:
1117
                break;
1118
            }
1119
            p = desc_end;
1120
        }
1121
        p = desc_list_end;
1122
    }
1123
}
1124
1125
/* handle one TS packet */
1126 bdfa9824 Baptiste Coudurier
static int handle_packet(MpegTSContext *ts, const uint8_t *packet)
1127 fe9cf0d4 Fabrice Bellard
{
1128 b45a7a18 Fabrice Bellard
    AVFormatContext *s = ts->stream;
1129 5dbafeb7 Fabrice Bellard
    MpegTSFilter *tss;
1130
    int len, pid, cc, cc_ok, afc, is_start;
1131
    const uint8_t *p, *p_end;
1132 4c6b49bf Ivan Schreter
    int64_t pos;
1133 5dbafeb7 Fabrice Bellard
1134 80fb8234 Ronald S. Bultje
    pid = AV_RB16(packet + 1) & 0x1fff;
1135 172d1171 Nico Sabbi
    if(pid && discard_pid(ts, pid))
1136 bdfa9824 Baptiste Coudurier
        return 0;
1137 5dbafeb7 Fabrice Bellard
    is_start = packet[1] & 0x40;
1138
    tss = ts->pids[pid];
1139
    if (ts->auto_guess && tss == NULL && is_start) {
1140 b3f9f7a3 Baptiste Coudurier
        add_pes_stream(ts, pid, -1);
1141 5dbafeb7 Fabrice Bellard
        tss = ts->pids[pid];
1142
    }
1143
    if (!tss)
1144 bdfa9824 Baptiste Coudurier
        return 0;
1145 5dbafeb7 Fabrice Bellard
1146
    /* continuity check (currently not used) */
1147
    cc = (packet[3] & 0xf);
1148
    cc_ok = (tss->last_cc < 0) || ((((tss->last_cc + 1) & 0x0f) == cc));
1149
    tss->last_cc = cc;
1150 115329f1 Diego Biurrun
1151 5dbafeb7 Fabrice Bellard
    /* skip adaptation field */
1152
    afc = (packet[3] >> 4) & 3;
1153
    p = packet + 4;
1154
    if (afc == 0) /* reserved value */
1155 bdfa9824 Baptiste Coudurier
        return 0;
1156 5dbafeb7 Fabrice Bellard
    if (afc == 2) /* adaptation field only */
1157 bdfa9824 Baptiste Coudurier
        return 0;
1158 5dbafeb7 Fabrice Bellard
    if (afc == 3) {
1159
        /* skip adapation field */
1160
        p += p[0] + 1;
1161
    }
1162
    /* if past the end of packet, ignore */
1163
    p_end = packet + TS_PACKET_SIZE;
1164
    if (p >= p_end)
1165 bdfa9824 Baptiste Coudurier
        return 0;
1166 115329f1 Diego Biurrun
1167 4c6b49bf Ivan Schreter
    pos = url_ftell(ts->stream->pb);
1168
    ts->pos47= pos % ts->raw_packet_size;
1169 5fd63f3c Michael Niedermayer
1170 5dbafeb7 Fabrice Bellard
    if (tss->type == MPEGTS_SECTION) {
1171
        if (is_start) {
1172
            /* pointer field present */
1173
            len = *p++;
1174
            if (p + len > p_end)
1175 bdfa9824 Baptiste Coudurier
                return 0;
1176 5dbafeb7 Fabrice Bellard
            if (len && cc_ok) {
1177 27bb1ed3 Wolfram Gloger
                /* write remaining section bytes */
1178 115329f1 Diego Biurrun
                write_section_data(s, tss,
1179 5dbafeb7 Fabrice Bellard
                                   p, len, 0);
1180 27bb1ed3 Wolfram Gloger
                /* check whether filter has been closed */
1181
                if (!ts->pids[pid])
1182 bdfa9824 Baptiste Coudurier
                    return 0;
1183 5dbafeb7 Fabrice Bellard
            }
1184
            p += len;
1185
            if (p < p_end) {
1186 115329f1 Diego Biurrun
                write_section_data(s, tss,
1187 5dbafeb7 Fabrice Bellard
                                   p, p_end - p, 1);
1188
            }
1189
        } else {
1190
            if (cc_ok) {
1191 115329f1 Diego Biurrun
                write_section_data(s, tss,
1192 5dbafeb7 Fabrice Bellard
                                   p, p_end - p, 0);
1193 fc48fe84 Fabrice Bellard
            }
1194 5dbafeb7 Fabrice Bellard
        }
1195
    } else {
1196 bdfa9824 Baptiste Coudurier
        int ret;
1197 4c6b49bf Ivan Schreter
        // Note: The position here points actually behind the current packet.
1198 bdfa9824 Baptiste Coudurier
        if ((ret = tss->u.pes_filter.pes_cb(tss, p, p_end - p, is_start,
1199
                                            pos - ts->raw_packet_size)) < 0)
1200
            return ret;
1201 5dbafeb7 Fabrice Bellard
    }
1202 bdfa9824 Baptiste Coudurier
1203
    return 0;
1204 5dbafeb7 Fabrice Bellard
}
1205
1206 fc48fe84 Fabrice Bellard
/* XXX: try to find a better synchro over several packets (use
1207
   get_packet_size() ?) */
1208 1303d62d Baptiste Coudurier
static int mpegts_resync(AVFormatContext *s)
1209 fc48fe84 Fabrice Bellard
{
1210 1303d62d Baptiste Coudurier
    ByteIOContext *pb = s->pb;
1211 fc48fe84 Fabrice Bellard
    int c, i;
1212
1213
    for(i = 0;i < MAX_RESYNC_SIZE; i++) {
1214
        c = url_fgetc(pb);
1215
        if (c < 0)
1216
            return -1;
1217
        if (c == 0x47) {
1218
            url_fseek(pb, -1, SEEK_CUR);
1219
            return 0;
1220
        }
1221
    }
1222 1303d62d Baptiste Coudurier
    av_log(s, AV_LOG_ERROR, "max resync size reached, could not find sync byte\n");
1223 fc48fe84 Fabrice Bellard
    /* no sync found */
1224
    return -1;
1225
}
1226
1227 b45a7a18 Fabrice Bellard
/* return -1 if error or EOF. Return 0 if OK. */
1228 1303d62d Baptiste Coudurier
static int read_packet(AVFormatContext *s, uint8_t *buf, int raw_packet_size)
1229 5dbafeb7 Fabrice Bellard
{
1230 1303d62d Baptiste Coudurier
    ByteIOContext *pb = s->pb;
1231 b45a7a18 Fabrice Bellard
    int skip, len;
1232
1233
    for(;;) {
1234
        len = get_buffer(pb, buf, TS_PACKET_SIZE);
1235
        if (len != TS_PACKET_SIZE)
1236 6f3e0b21 Panagiotis Issaris
            return AVERROR(EIO);
1237 b45a7a18 Fabrice Bellard
        /* check paquet sync byte */
1238
        if (buf[0] != 0x47) {
1239
            /* find a new packet start */
1240
            url_fseek(pb, -TS_PACKET_SIZE, SEEK_CUR);
1241 1303d62d Baptiste Coudurier
            if (mpegts_resync(s) < 0)
1242
                return AVERROR(EAGAIN);
1243 b45a7a18 Fabrice Bellard
            else
1244
                continue;
1245
        } else {
1246
            skip = raw_packet_size - TS_PACKET_SIZE;
1247
            if (skip > 0)
1248
                url_fskip(pb, skip);
1249
            break;
1250
        }
1251
    }
1252
    return 0;
1253
}
1254
1255
static int handle_packets(MpegTSContext *ts, int nb_packets)
1256
{
1257
    AVFormatContext *s = ts->stream;
1258
    uint8_t packet[TS_PACKET_SIZE];
1259
    int packet_num, ret;
1260 5dbafeb7 Fabrice Bellard
1261
    ts->stop_parse = 0;
1262
    packet_num = 0;
1263 fe9cf0d4 Fabrice Bellard
    for(;;) {
1264 90d13e30 Michael Niedermayer
        if (ts->stop_parse>0)
1265 5dbafeb7 Fabrice Bellard
            break;
1266
        packet_num++;
1267
        if (nb_packets != 0 && packet_num >= nb_packets)
1268
            break;
1269 1303d62d Baptiste Coudurier
        ret = read_packet(s, packet, ts->raw_packet_size);
1270 b45a7a18 Fabrice Bellard
        if (ret != 0)
1271
            return ret;
1272 bdfa9824 Baptiste Coudurier
        ret = handle_packet(ts, packet);
1273
        if (ret != 0)
1274
            return ret;
1275 5dbafeb7 Fabrice Bellard
    }
1276
    return 0;
1277
}
1278 fe9cf0d4 Fabrice Bellard
1279 5dbafeb7 Fabrice Bellard
static int mpegts_probe(AVProbeData *p)
1280
{
1281 fc48fe84 Fabrice Bellard
#if 1
1282 a0b8f70c Michael Niedermayer
    const int size= p->buf_size;
1283 5d4d67e0 Nico Sabbi
    int score, fec_score, dvhs_score;
1284 1558d0b9 Michael Niedermayer
    int check_count= size / TS_FEC_PACKET_SIZE;
1285 a0b8f70c Michael Niedermayer
#define CHECK_COUNT 10
1286 115329f1 Diego Biurrun
1287 1558d0b9 Michael Niedermayer
    if (check_count < CHECK_COUNT)
1288 a0b8f70c Michael Niedermayer
        return -1;
1289 115329f1 Diego Biurrun
1290 1558d0b9 Michael Niedermayer
    score     = analyze(p->buf, TS_PACKET_SIZE     *check_count, TS_PACKET_SIZE     , NULL)*CHECK_COUNT/check_count;
1291
    dvhs_score= analyze(p->buf, TS_DVHS_PACKET_SIZE*check_count, TS_DVHS_PACKET_SIZE, NULL)*CHECK_COUNT/check_count;
1292
    fec_score = analyze(p->buf, TS_FEC_PACKET_SIZE *check_count, TS_FEC_PACKET_SIZE , NULL)*CHECK_COUNT/check_count;
1293 5d4d67e0 Nico Sabbi
//    av_log(NULL, AV_LOG_DEBUG, "score: %d, dvhs_score: %d, fec_score: %d \n", score, dvhs_score, fec_score);
1294 115329f1 Diego Biurrun
1295 a0b8f70c Michael Niedermayer
// we need a clear definition for the returned score otherwise things will become messy sooner or later
1296 5d4d67e0 Nico Sabbi
    if     (score > fec_score && score > dvhs_score && score > 6) return AVPROBE_SCORE_MAX + score     - CHECK_COUNT;
1297
    else if(dvhs_score > score && dvhs_score > fec_score && dvhs_score > 6) return AVPROBE_SCORE_MAX + dvhs_score  - CHECK_COUNT;
1298 a0b8f70c Michael Niedermayer
    else if(                 fec_score > 6) return AVPROBE_SCORE_MAX + fec_score - CHECK_COUNT;
1299
    else                                    return -1;
1300 fc48fe84 Fabrice Bellard
#else
1301
    /* only use the extension for safer guess */
1302 4837bb52 Stefano Sabatini
    if (av_match_ext(p->filename, "ts"))
1303 fc48fe84 Fabrice Bellard
        return AVPROBE_SCORE_MAX;
1304
    else
1305
        return 0;
1306
#endif
1307 5dbafeb7 Fabrice Bellard
}
1308
1309 910f02a0 Diego Biurrun
/* return the 90kHz PCR and the extension for the 27MHz PCR. return
1310 b45a7a18 Fabrice Bellard
   (-1) if not available */
1311 115329f1 Diego Biurrun
static int parse_pcr(int64_t *ppcr_high, int *ppcr_low,
1312 b45a7a18 Fabrice Bellard
                     const uint8_t *packet)
1313
{
1314
    int afc, len, flags;
1315
    const uint8_t *p;
1316
    unsigned int v;
1317
1318
    afc = (packet[3] >> 4) & 3;
1319
    if (afc <= 1)
1320
        return -1;
1321
    p = packet + 4;
1322
    len = p[0];
1323
    p++;
1324
    if (len == 0)
1325
        return -1;
1326
    flags = *p++;
1327
    len--;
1328
    if (!(flags & 0x10))
1329
        return -1;
1330
    if (len < 6)
1331
        return -1;
1332 80fb8234 Ronald S. Bultje
    v = AV_RB32(p);
1333 b45a7a18 Fabrice Bellard
    *ppcr_high = ((int64_t)v << 1) | (p[4] >> 7);
1334
    *ppcr_low = ((p[4] & 1) << 8) | p[5];
1335
    return 0;
1336
}
1337
1338 5dbafeb7 Fabrice Bellard
static int mpegts_read_header(AVFormatContext *s,
1339
                              AVFormatParameters *ap)
1340
{
1341
    MpegTSContext *ts = s->priv_data;
1342 899681cd Björn Axelsson
    ByteIOContext *pb = s->pb;
1343 1558d0b9 Michael Niedermayer
    uint8_t buf[5*1024];
1344 4dc8a963 Michael Niedermayer
    int len;
1345 5dbafeb7 Fabrice Bellard
    int64_t pos;
1346 e05655fb Michael Niedermayer
1347 b45a7a18 Fabrice Bellard
    if (ap) {
1348
        ts->mpeg2ts_compute_pcr = ap->mpeg2ts_compute_pcr;
1349 38c48be2 Michael Niedermayer
        if(ap->mpeg2ts_raw){
1350
            av_log(s, AV_LOG_ERROR, "use mpegtsraw_demuxer!\n");
1351
            return -1;
1352
        }
1353 b45a7a18 Fabrice Bellard
    }
1354
1355 5dbafeb7 Fabrice Bellard
    /* read the first 1024 bytes to get packet size */
1356
    pos = url_ftell(pb);
1357
    len = get_buffer(pb, buf, sizeof(buf));
1358
    if (len != sizeof(buf))
1359
        goto fail;
1360
    ts->raw_packet_size = get_packet_size(buf, sizeof(buf));
1361
    if (ts->raw_packet_size <= 0)
1362
        goto fail;
1363 b45a7a18 Fabrice Bellard
    ts->stream = s;
1364 5dbafeb7 Fabrice Bellard
    ts->auto_guess = 0;
1365
1366 38c48be2 Michael Niedermayer
    if (s->iformat == &mpegts_demuxer) {
1367 b45a7a18 Fabrice Bellard
        /* normal demux */
1368 fc48fe84 Fabrice Bellard
1369 a45ec414 Benoit Fouet
        /* first do a scaning to get all the services */
1370
        url_fseek(pb, pos, SEEK_SET);
1371 c950c25a Baptiste Coudurier
1372
        mpegts_open_section_filter(ts, SDT_PID, sdt_cb, ts, 1);
1373 115329f1 Diego Biurrun
1374 7b9677f6 Baptiste Coudurier
        mpegts_open_section_filter(ts, PAT_PID, pat_cb, ts, 1);
1375 115329f1 Diego Biurrun
1376 45a49840 Baptiste Coudurier
        handle_packets(ts, s->probesize / ts->raw_packet_size);
1377 a45ec414 Benoit Fouet
        /* if could not find service, enable auto_guess */
1378 115329f1 Diego Biurrun
1379 a45ec414 Benoit Fouet
        ts->auto_guess = 1;
1380 115329f1 Diego Biurrun
1381 ebcf352a Baptiste Coudurier
        dprintf(ts->stream, "tuning done\n");
1382
1383 b45a7a18 Fabrice Bellard
        s->ctx_flags |= AVFMTCTX_NOHEADER;
1384
    } else {
1385
        AVStream *st;
1386
        int pcr_pid, pid, nb_packets, nb_pcrs, ret, pcr_l;
1387
        int64_t pcrs[2], pcr_h;
1388
        int packet_count[2];
1389
        uint8_t packet[TS_PACKET_SIZE];
1390 115329f1 Diego Biurrun
1391 b45a7a18 Fabrice Bellard
        /* only read packets */
1392 115329f1 Diego Biurrun
1393 b45a7a18 Fabrice Bellard
        st = av_new_stream(s, 0);
1394
        if (!st)
1395
            goto fail;
1396 9ee91c2f Michael Niedermayer
        av_set_pts_info(st, 60, 1, 27000000);
1397 72415b2a Stefano Sabatini
        st->codec->codec_type = AVMEDIA_TYPE_DATA;
1398 01f4895c Michael Niedermayer
        st->codec->codec_id = CODEC_ID_MPEG2TS;
1399 115329f1 Diego Biurrun
1400 b45a7a18 Fabrice Bellard
        /* we iterate until we find two PCRs to estimate the bitrate */
1401
        pcr_pid = -1;
1402
        nb_pcrs = 0;
1403
        nb_packets = 0;
1404
        for(;;) {
1405 1303d62d Baptiste Coudurier
            ret = read_packet(s, packet, ts->raw_packet_size);
1406 b45a7a18 Fabrice Bellard
            if (ret < 0)
1407
                return -1;
1408 80fb8234 Ronald S. Bultje
            pid = AV_RB16(packet + 1) & 0x1fff;
1409 b45a7a18 Fabrice Bellard
            if ((pcr_pid == -1 || pcr_pid == pid) &&
1410
                parse_pcr(&pcr_h, &pcr_l, packet) == 0) {
1411
                pcr_pid = pid;
1412
                packet_count[nb_pcrs] = nb_packets;
1413
                pcrs[nb_pcrs] = pcr_h * 300 + pcr_l;
1414
                nb_pcrs++;
1415
                if (nb_pcrs >= 2)
1416
                    break;
1417
            }
1418
            nb_packets++;
1419
        }
1420 5dbafeb7 Fabrice Bellard
1421 b45a7a18 Fabrice Bellard
        /* NOTE1: the bitrate is computed without the FEC */
1422
        /* NOTE2: it is only the bitrate of the start of the stream */
1423
        ts->pcr_incr = (pcrs[1] - pcrs[0]) / (packet_count[1] - packet_count[0]);
1424
        ts->cur_pcr = pcrs[0] - ts->pcr_incr * packet_count[0];
1425
        s->bit_rate = (TS_PACKET_SIZE * 8) * 27e6 / ts->pcr_incr;
1426 01f4895c Michael Niedermayer
        st->codec->bit_rate = s->bit_rate;
1427 c0df9d75 Michael Niedermayer
        st->start_time = ts->cur_pcr;
1428 b45a7a18 Fabrice Bellard
#if 0
1429 f0ee3ea6 Michel Bardiaux
        av_log(ts->stream, AV_LOG_DEBUG, "start=%0.3f pcr=%0.3f incr=%d\n",
1430 b45a7a18 Fabrice Bellard
               st->start_time / 1000000.0, pcrs[0] / 27e6, ts->pcr_incr);
1431 5dbafeb7 Fabrice Bellard
#endif
1432 fe9cf0d4 Fabrice Bellard
    }
1433 5dbafeb7 Fabrice Bellard
1434
    url_fseek(pb, pos, SEEK_SET);
1435 fe9cf0d4 Fabrice Bellard
    return 0;
1436 5dbafeb7 Fabrice Bellard
 fail:
1437
    return -1;
1438
}
1439
1440 b45a7a18 Fabrice Bellard
#define MAX_PACKET_READAHEAD ((128 * 1024) / 188)
1441
1442
static int mpegts_raw_read_packet(AVFormatContext *s,
1443
                                  AVPacket *pkt)
1444
{
1445
    MpegTSContext *ts = s->priv_data;
1446
    int ret, i;
1447
    int64_t pcr_h, next_pcr_h, pos;
1448
    int pcr_l, next_pcr_l;
1449
    uint8_t pcr_buf[12];
1450
1451
    if (av_new_packet(pkt, TS_PACKET_SIZE) < 0)
1452 8fa36ae0 François Revol
        return AVERROR(ENOMEM);
1453 899681cd Björn Axelsson
    pkt->pos= url_ftell(s->pb);
1454 1303d62d Baptiste Coudurier
    ret = read_packet(s, pkt->data, ts->raw_packet_size);
1455 b45a7a18 Fabrice Bellard
    if (ret < 0) {
1456
        av_free_packet(pkt);
1457
        return ret;
1458
    }
1459
    if (ts->mpeg2ts_compute_pcr) {
1460
        /* compute exact PCR for each packet */
1461
        if (parse_pcr(&pcr_h, &pcr_l, pkt->data) == 0) {
1462
            /* we read the next PCR (XXX: optimize it by using a bigger buffer */
1463 899681cd Björn Axelsson
            pos = url_ftell(s->pb);
1464 b45a7a18 Fabrice Bellard
            for(i = 0; i < MAX_PACKET_READAHEAD; i++) {
1465 899681cd Björn Axelsson
                url_fseek(s->pb, pos + i * ts->raw_packet_size, SEEK_SET);
1466
                get_buffer(s->pb, pcr_buf, 12);
1467 b45a7a18 Fabrice Bellard
                if (parse_pcr(&next_pcr_h, &next_pcr_l, pcr_buf) == 0) {
1468
                    /* XXX: not precise enough */
1469 115329f1 Diego Biurrun
                    ts->pcr_incr = ((next_pcr_h - pcr_h) * 300 + (next_pcr_l - pcr_l)) /
1470 b45a7a18 Fabrice Bellard
                        (i + 1);
1471
                    break;
1472
                }
1473
            }
1474 899681cd Björn Axelsson
            url_fseek(s->pb, pos, SEEK_SET);
1475 b45a7a18 Fabrice Bellard
            /* no next PCR found: we use previous increment */
1476
            ts->cur_pcr = pcr_h * 300 + pcr_l;
1477
        }
1478
        pkt->pts = ts->cur_pcr;
1479
        pkt->duration = ts->pcr_incr;
1480
        ts->cur_pcr += ts->pcr_incr;
1481
    }
1482
    pkt->stream_index = 0;
1483
    return 0;
1484
}
1485
1486 5dbafeb7 Fabrice Bellard
static int mpegts_read_packet(AVFormatContext *s,
1487
                              AVPacket *pkt)
1488
{
1489
    MpegTSContext *ts = s->priv_data;
1490 0c137557 Baptiste Coudurier
    int ret, i;
1491
1492
    if (url_ftell(s->pb) != ts->last_pos) {
1493
        /* seek detected, flush pes buffer */
1494
        for (i = 0; i < NB_PID_MAX; i++) {
1495
            if (ts->pids[i] && ts->pids[i]->type == MPEGTS_PES) {
1496
                PESContext *pes = ts->pids[i]->u.pes_filter.opaque;
1497
                av_freep(&pes->buffer);
1498
                pes->data_index = 0;
1499
                pes->state = MPEGTS_SKIP; /* skip until pes header */
1500
            }
1501
        }
1502
    }
1503 b45a7a18 Fabrice Bellard
1504 38c48be2 Michael Niedermayer
    ts->pkt = pkt;
1505 0c137557 Baptiste Coudurier
    ret = handle_packets(ts, 0);
1506
    if (ret < 0) {
1507
        /* flush pes data left */
1508
        for (i = 0; i < NB_PID_MAX; i++) {
1509
            if (ts->pids[i] && ts->pids[i]->type == MPEGTS_PES) {
1510
                PESContext *pes = ts->pids[i]->u.pes_filter.opaque;
1511
                if (pes->state == MPEGTS_PAYLOAD && pes->data_index > 0) {
1512
                    new_pes_packet(pes, pkt);
1513 8956f680 Baptiste Coudurier
                    pes->state = MPEGTS_SKIP;
1514 0c137557 Baptiste Coudurier
                    ret = 0;
1515
                    break;
1516
                }
1517
            }
1518
        }
1519
    }
1520
1521
    ts->last_pos = url_ftell(s->pb);
1522
1523
    return ret;
1524 fe9cf0d4 Fabrice Bellard
}
1525
1526
static int mpegts_read_close(AVFormatContext *s)
1527
{
1528
    MpegTSContext *ts = s->priv_data;
1529
    int i;
1530 81d5ae6d Michael Niedermayer
1531
    clear_programs(ts);
1532
1533 fe9cf0d4 Fabrice Bellard
    for(i=0;i<NB_PID_MAX;i++)
1534 ec7d0d2e Gildas Bazin
        if (ts->pids[i]) mpegts_close_filter(ts, ts->pids[i]);
1535 00a6b92b Måns Rullgård
1536 fe9cf0d4 Fabrice Bellard
    return 0;
1537
}
1538
1539 115329f1 Diego Biurrun
static int64_t mpegts_get_pcr(AVFormatContext *s, int stream_index,
1540 cdd5034f Michael Niedermayer
                              int64_t *ppos, int64_t pos_limit)
1541 27f388aa Fabrice Bellard
{
1542
    MpegTSContext *ts = s->priv_data;
1543
    int64_t pos, timestamp;
1544
    uint8_t buf[TS_PACKET_SIZE];
1545 dbf6b678 Michael Niedermayer
    int pcr_l, pcr_pid = ((PESContext*)s->streams[stream_index]->priv_data)->pcr_pid;
1546 cdd5034f Michael Niedermayer
    const int find_next= 1;
1547 5fd63f3c Michael Niedermayer
    pos = ((*ppos  + ts->raw_packet_size - 1 - ts->pos47) / ts->raw_packet_size) * ts->raw_packet_size + ts->pos47;
1548 27f388aa Fabrice Bellard
    if (find_next) {
1549
        for(;;) {
1550 899681cd Björn Axelsson
            url_fseek(s->pb, pos, SEEK_SET);
1551
            if (get_buffer(s->pb, buf, TS_PACKET_SIZE) != TS_PACKET_SIZE)
1552 27f388aa Fabrice Bellard
                return AV_NOPTS_VALUE;
1553 80fb8234 Ronald S. Bultje
            if ((pcr_pid < 0 || (AV_RB16(buf + 1) & 0x1fff) == pcr_pid) &&
1554 27f388aa Fabrice Bellard
                parse_pcr(&timestamp, &pcr_l, buf) == 0) {
1555
                break;
1556
            }
1557
            pos += ts->raw_packet_size;
1558
        }
1559
    } else {
1560
        for(;;) {
1561
            pos -= ts->raw_packet_size;
1562
            if (pos < 0)
1563
                return AV_NOPTS_VALUE;
1564 899681cd Björn Axelsson
            url_fseek(s->pb, pos, SEEK_SET);
1565
            if (get_buffer(s->pb, buf, TS_PACKET_SIZE) != TS_PACKET_SIZE)
1566 27f388aa Fabrice Bellard
                return AV_NOPTS_VALUE;
1567 80fb8234 Ronald S. Bultje
            if ((pcr_pid < 0 || (AV_RB16(buf + 1) & 0x1fff) == pcr_pid) &&
1568 27f388aa Fabrice Bellard
                parse_pcr(&timestamp, &pcr_l, buf) == 0) {
1569
                break;
1570
            }
1571
        }
1572
    }
1573
    *ppos = pos;
1574
1575 cdd5034f Michael Niedermayer
    return timestamp;
1576 27f388aa Fabrice Bellard
}
1577
1578 af8aae3f Ivan Schreter
#ifdef USE_SYNCPOINT_SEARCH
1579
1580 608be2ac Ivan Schreter
static int read_seek2(AVFormatContext *s,
1581
                      int stream_index,
1582
                      int64_t min_ts,
1583
                      int64_t target_ts,
1584
                      int64_t max_ts,
1585
                      int flags)
1586 a8dd8dc6 Ivan Schreter
{
1587 e05655fb Michael Niedermayer
    int64_t pos;
1588
1589 a8dd8dc6 Ivan Schreter
    int64_t ts_ret, ts_adj;
1590
    int stream_index_gen_search;
1591
    AVStream *st;
1592
    AVParserState *backup;
1593 e05655fb Michael Niedermayer
1594 a8dd8dc6 Ivan Schreter
    backup = ff_store_parser_state(s);
1595 e05655fb Michael Niedermayer
1596 a8dd8dc6 Ivan Schreter
    // detect direction of seeking for search purposes
1597 608be2ac Ivan Schreter
    flags |= (target_ts - min_ts > (uint64_t)(max_ts - target_ts)) ?
1598
             AVSEEK_FLAG_BACKWARD : 0;
1599 a8dd8dc6 Ivan Schreter
1600
    if (flags & AVSEEK_FLAG_BYTE) {
1601 608be2ac Ivan Schreter
        // use position directly, we will search starting from it
1602 a8dd8dc6 Ivan Schreter
        pos = target_ts;
1603
    } else {
1604 608be2ac Ivan Schreter
        // search for some position with good timestamp match
1605
        if (stream_index < 0) {
1606 a8dd8dc6 Ivan Schreter
            stream_index_gen_search = av_find_default_stream_index(s);
1607
            if (stream_index_gen_search < 0) {
1608
                ff_restore_parser_state(s, backup);
1609
                return -1;
1610
            }
1611
1612
            st = s->streams[stream_index_gen_search];
1613 608be2ac Ivan Schreter
            // timestamp for default must be expressed in AV_TIME_BASE units
1614
            ts_adj = av_rescale(target_ts,
1615
                                st->time_base.den,
1616
                                AV_TIME_BASE * (int64_t)st->time_base.num);
1617 a8dd8dc6 Ivan Schreter
        } else {
1618
            ts_adj = target_ts;
1619
            stream_index_gen_search = stream_index;
1620
        }
1621
        pos = av_gen_search(s, stream_index_gen_search, ts_adj,
1622
                            0, INT64_MAX, -1,
1623
                            AV_NOPTS_VALUE,
1624
                            AV_NOPTS_VALUE,
1625
                            flags, &ts_ret, mpegts_get_pcr);
1626
        if (pos < 0) {
1627
            ff_restore_parser_state(s, backup);
1628 e05655fb Michael Niedermayer
            return -1;
1629 a8dd8dc6 Ivan Schreter
        }
1630 115329f1 Diego Biurrun
    }
1631 e05655fb Michael Niedermayer
1632 608be2ac Ivan Schreter
    // search for actual matching keyframe/starting position for all streams
1633
    if (ff_gen_syncpoint_search(s, stream_index, pos,
1634
                                min_ts, target_ts, max_ts,
1635
                                flags) < 0) {
1636 a8dd8dc6 Ivan Schreter
        ff_restore_parser_state(s, backup);
1637
        return -1;
1638
    }
1639
1640
    ff_free_parser_state(s, backup);
1641 e05655fb Michael Niedermayer
    return 0;
1642
}
1643
1644 a8dd8dc6 Ivan Schreter
static int read_seek(AVFormatContext *s, int stream_index, int64_t target_ts, int flags)
1645
{
1646
    int ret;
1647
    if (flags & AVSEEK_FLAG_BACKWARD) {
1648 608be2ac Ivan Schreter
        flags &= ~AVSEEK_FLAG_BACKWARD;
1649
        ret = read_seek2(s, stream_index, INT64_MIN, target_ts, target_ts, flags);
1650
        if (ret < 0)
1651
            // for compatibility reasons, seek to the best-fitting timestamp
1652
            ret = read_seek2(s, stream_index, INT64_MIN, target_ts, INT64_MAX, flags);
1653 a8dd8dc6 Ivan Schreter
    } else {
1654
        ret = read_seek2(s, stream_index, target_ts, target_ts, INT64_MAX, flags);
1655 608be2ac Ivan Schreter
        if (ret < 0)
1656
            // for compatibility reasons, seek to the best-fitting timestamp
1657 a8dd8dc6 Ivan Schreter
            ret = read_seek2(s, stream_index, INT64_MIN, target_ts, INT64_MAX, flags);
1658
    }
1659
    return ret;
1660
}
1661
1662 af8aae3f Ivan Schreter
#else
1663
1664
static int read_seek(AVFormatContext *s, int stream_index, int64_t target_ts, int flags){
1665
    MpegTSContext *ts = s->priv_data;
1666
    uint8_t buf[TS_PACKET_SIZE];
1667
    int64_t pos;
1668
1669
    if(av_seek_frame_binary(s, stream_index, target_ts, flags) < 0)
1670
        return -1;
1671
1672
    pos= url_ftell(s->pb);
1673
1674
    for(;;) {
1675
        url_fseek(s->pb, pos, SEEK_SET);
1676
        if (get_buffer(s->pb, buf, TS_PACKET_SIZE) != TS_PACKET_SIZE)
1677
            return -1;
1678
//        pid = AV_RB16(buf + 1) & 0x1fff;
1679
        if(buf[1] & 0x40) break;
1680
        pos += ts->raw_packet_size;
1681
    }
1682
    url_fseek(s->pb, pos, SEEK_SET);
1683
1684
    return 0;
1685
}
1686
1687
#endif
1688
1689 b45a7a18 Fabrice Bellard
/**************************************************************/
1690
/* parsing functions - called from other demuxers such as RTP */
1691
1692 9125806e Alexis Ballier
MpegTSContext *ff_mpegts_parse_open(AVFormatContext *s)
1693 b45a7a18 Fabrice Bellard
{
1694
    MpegTSContext *ts;
1695 115329f1 Diego Biurrun
1696 b45a7a18 Fabrice Bellard
    ts = av_mallocz(sizeof(MpegTSContext));
1697
    if (!ts)
1698
        return NULL;
1699
    /* no stream case, currently used by RTP */
1700
    ts->raw_packet_size = TS_PACKET_SIZE;
1701
    ts->stream = s;
1702
    ts->auto_guess = 1;
1703
    return ts;
1704
}
1705
1706
/* return the consumed length if a packet was output, or -1 if no
1707
   packet is output */
1708 9125806e Alexis Ballier
int ff_mpegts_parse_packet(MpegTSContext *ts, AVPacket *pkt,
1709 b45a7a18 Fabrice Bellard
                        const uint8_t *buf, int len)
1710
{
1711
    int len1;
1712
1713
    len1 = len;
1714
    ts->pkt = pkt;
1715
    ts->stop_parse = 0;
1716
    for(;;) {
1717 90d13e30 Michael Niedermayer
        if (ts->stop_parse>0)
1718 b45a7a18 Fabrice Bellard
            break;
1719
        if (len < TS_PACKET_SIZE)
1720
            return -1;
1721
        if (buf[0] != 0x47) {
1722 550f0a9b Wolfram Gloger
            buf++;
1723 b45a7a18 Fabrice Bellard
            len--;
1724
        } else {
1725
            handle_packet(ts, buf);
1726
            buf += TS_PACKET_SIZE;
1727
            len -= TS_PACKET_SIZE;
1728
        }
1729
    }
1730
    return len1 - len;
1731
}
1732
1733 9125806e Alexis Ballier
void ff_mpegts_parse_close(MpegTSContext *ts)
1734 b45a7a18 Fabrice Bellard
{
1735
    int i;
1736
1737
    for(i=0;i<NB_PID_MAX;i++)
1738
        av_free(ts->pids[i]);
1739
    av_free(ts);
1740
}
1741
1742 d2a067d1 Måns Rullgård
AVInputFormat mpegts_demuxer = {
1743 fe9cf0d4 Fabrice Bellard
    "mpegts",
1744 bde15e74 Stefano Sabatini
    NULL_IF_CONFIG_SMALL("MPEG-2 transport stream format"),
1745 fe9cf0d4 Fabrice Bellard
    sizeof(MpegTSContext),
1746
    mpegts_probe,
1747
    mpegts_read_header,
1748
    mpegts_read_packet,
1749
    mpegts_read_close,
1750 e05655fb Michael Niedermayer
    read_seek,
1751 cdd5034f Michael Niedermayer
    mpegts_get_pcr,
1752 ff9c8d7c Michael Niedermayer
    .flags = AVFMT_SHOW_IDS|AVFMT_TS_DISCONT,
1753 af8aae3f Ivan Schreter
#ifdef USE_SYNCPOINT_SEARCH
1754 a8dd8dc6 Ivan Schreter
    .read_seek2 = read_seek2,
1755 af8aae3f Ivan Schreter
#endif
1756 fe9cf0d4 Fabrice Bellard
};
1757 38c48be2 Michael Niedermayer
1758
AVInputFormat mpegtsraw_demuxer = {
1759
    "mpegtsraw",
1760 bde15e74 Stefano Sabatini
    NULL_IF_CONFIG_SMALL("MPEG-2 raw transport stream format"),
1761 38c48be2 Michael Niedermayer
    sizeof(MpegTSContext),
1762 056f6b8f Michael Niedermayer
    NULL,
1763 38c48be2 Michael Niedermayer
    mpegts_read_header,
1764
    mpegts_raw_read_packet,
1765
    mpegts_read_close,
1766
    read_seek,
1767
    mpegts_get_pcr,
1768 ff9c8d7c Michael Niedermayer
    .flags = AVFMT_SHOW_IDS|AVFMT_TS_DISCONT,
1769 af8aae3f Ivan Schreter
#ifdef USE_SYNCPOINT_SEARCH
1770 a8dd8dc6 Ivan Schreter
    .read_seek2 = read_seek2,
1771 af8aae3f Ivan Schreter
#endif
1772 38c48be2 Michael Niedermayer
};