This fixes error handling for BeOS, removing the need for some ifdefs.
[libav.git] / libavformat / mpegts.c
CommitLineData
fe9cf0d4 1/*
7fbde343 2 * MPEG2 transport stream (aka DVB) demuxer
5dbafeb7 3 * Copyright (c) 2002-2003 Fabrice Bellard.
fe9cf0d4 4 *
b78e7197
DB
5 * This file is part of FFmpeg.
6 *
7 * FFmpeg is free software; you can redistribute it and/or
19720f15
FB
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
b78e7197 10 * version 2.1 of the License, or (at your option) any later version.
fe9cf0d4 11 *
b78e7197 12 * FFmpeg is distributed in the hope that it will be useful,
fe9cf0d4 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19720f15
FB
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
fe9cf0d4 16 *
19720f15 17 * You should have received a copy of the GNU Lesser General Public
b78e7197 18 * License along with FFmpeg; if not, write to the Free Software
5509bffa 19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
fe9cf0d4
FB
20 */
21#include "avformat.h"
43a80cce 22#include "crc.h"
5dbafeb7 23#include "mpegts.h"
fe9cf0d4 24
5dbafeb7 25//#define DEBUG_SI
27f388aa 26//#define DEBUG_SEEK
5dbafeb7
FB
27
28/* 1.0 second at 24Mbit/s */
fc48fe84
FB
29#define MAX_SCAN_PACKETS 32000
30
31/* maximum size in which we look for synchronisation if
32 synchronisation is lost */
33#define MAX_RESYNC_SIZE 4096
5dbafeb7 34
c6ec28b1
MN
35typedef struct PESContext PESContext;
36
37static PESContext* add_pes_stream(MpegTSContext *ts, int pid, int stream_type);
38static AVStream* new_pes_av_stream(PESContext *pes, uint32_t code);
5dbafeb7
FB
39
40enum MpegTSFilterType {
41 MPEGTS_PES,
42 MPEGTS_SECTION,
fe9cf0d4
FB
43};
44
5dbafeb7 45typedef void PESCallback(void *opaque, const uint8_t *buf, int len, int is_start);
fe9cf0d4 46
5dbafeb7
FB
47typedef struct MpegTSPESFilter {
48 PESCallback *pes_cb;
49 void *opaque;
50} MpegTSPESFilter;
51
52typedef void SectionCallback(void *opaque, const uint8_t *buf, int len);
53
54typedef void SetServiceCallback(void *opaque, int ret);
55
56typedef struct MpegTSSectionFilter {
57 int section_index;
58 int section_h_size;
59 uint8_t *section_buf;
60 int check_crc:1;
61 int end_of_section_reached:1;
62 SectionCallback *section_cb;
63 void *opaque;
64} MpegTSSectionFilter;
65
66typedef struct MpegTSFilter {
fe9cf0d4 67 int pid;
fe9cf0d4 68 int last_cc; /* last cc code (-1 if first packet) */
5dbafeb7
FB
69 enum MpegTSFilterType type;
70 union {
71 MpegTSPESFilter pes_filter;
72 MpegTSSectionFilter section_filter;
73 } u;
74} MpegTSFilter;
75
76typedef struct MpegTSService {
77 int running:1;
e995cfca
DK
78 int sid; /**< MPEG Program Number of stream */
79 char *provider_name; /**< DVB Network name, "" if not DVB stream */
80 char *name; /**< DVB Service name, "MPEG Program [sid]" if not DVB stream*/
5dbafeb7 81} MpegTSService;
fe9cf0d4 82
b45a7a18 83struct MpegTSContext {
5dbafeb7
FB
84 /* user data */
85 AVFormatContext *stream;
e995cfca
DK
86 /** raw packet size, including FEC if present */
87 int raw_packet_size;
88 /** if true, all pids are analyzed to find streams */
89 int auto_guess;
5dbafeb7
FB
90 int set_service_ret;
91
e995cfca
DK
92 /** force raw MPEG2 transport stream output, if possible */
93 int mpeg2ts_raw;
94 /** compute exact PCR for each transport stream packet */
95 int mpeg2ts_compute_pcr;
b45a7a18 96
e995cfca
DK
97 int64_t cur_pcr; /**< used to estimate the exact PCR */
98 int pcr_incr; /**< used to estimate the exact PCR */
99 int pcr_pid; /**< used to estimate the exact PCR */
115329f1 100
5dbafeb7 101 /* data needed to handle file based ts */
e995cfca
DK
102 /** stop parsing loop */
103 int stop_parse;
104 /** packet containing Audio/Video data */
105 AVPacket *pkt;
5dbafeb7
FB
106
107 /******************************************/
108 /* private mpegts data */
109 /* scan context */
110 MpegTSFilter *sdt_filter;
e995cfca 111 /** number of PMTs in the last PAT seen */
5dbafeb7 112 int nb_services;
e995cfca 113 /** list of PMTs in the last PAT seen */
5dbafeb7 114 MpegTSService **services;
115329f1 115
5dbafeb7
FB
116 /* set service context (XXX: allocated it ?) */
117 SetServiceCallback *set_service_cb;
118 void *set_service_opaque;
e995cfca 119 /** filter for the PAT */
5dbafeb7 120 MpegTSFilter *pat_filter;
e995cfca 121 /** filter for the PMT for the MPEG program number specified by req_sid */
5dbafeb7 122 MpegTSFilter *pmt_filter;
e995cfca 123 /** MPEG program number of stream we want to decode */
5dbafeb7
FB
124 int req_sid;
125
e995cfca 126 /** filters for various streams specified by PMT + for the PAT and PMT */
5dbafeb7 127 MpegTSFilter *pids[NB_PID_MAX];
b45a7a18 128};
fe9cf0d4 129
e995cfca
DK
130/**
131 * Assembles PES packets out of TS packets, and then calls the "section_cb"
132 * function when they are complete.
133 */
5dbafeb7
FB
134static void write_section_data(AVFormatContext *s, MpegTSFilter *tss1,
135 const uint8_t *buf, int buf_size, int is_start)
136{
137 MpegTSSectionFilter *tss = &tss1->u.section_filter;
138 int len;
115329f1 139
5dbafeb7
FB
140 if (is_start) {
141 memcpy(tss->section_buf, buf, buf_size);
142 tss->section_index = buf_size;
143 tss->section_h_size = -1;
144 tss->end_of_section_reached = 0;
145 } else {
146 if (tss->end_of_section_reached)
147 return;
148 len = 4096 - tss->section_index;
149 if (buf_size < len)
150 len = buf_size;
151 memcpy(tss->section_buf + tss->section_index, buf, len);
152 tss->section_index += len;
153 }
154
155 /* compute section length if possible */
156 if (tss->section_h_size == -1 && tss->section_index >= 3) {
157 len = (((tss->section_buf[1] & 0xf) << 8) | tss->section_buf[2]) + 3;
158 if (len > 4096)
159 return;
160 tss->section_h_size = len;
161 }
162
163 if (tss->section_h_size != -1 && tss->section_index >= tss->section_h_size) {
5dbafeb7 164 tss->end_of_section_reached = 1;
27bb1ed3 165 if (!tss->check_crc ||
43a80cce 166 av_crc(av_crc04C11DB7, -1, tss->section_buf, tss->section_h_size) == 0)
27bb1ed3 167 tss->section_cb(tss->opaque, tss->section_buf, tss->section_h_size);
5dbafeb7
FB
168 }
169}
170
7b49ce2e 171static MpegTSFilter *mpegts_open_section_filter(MpegTSContext *ts, unsigned int pid,
5dbafeb7
FB
172 SectionCallback *section_cb, void *opaque,
173 int check_crc)
174
175{
176 MpegTSFilter *filter;
177 MpegTSSectionFilter *sec;
115329f1 178
b45a7a18 179#ifdef DEBUG_SI
f0ee3ea6 180 av_log(ts->stream, AV_LOG_DEBUG, "Filter: pid=0x%x\n", pid);
b45a7a18 181#endif
5dbafeb7
FB
182 if (pid >= NB_PID_MAX || ts->pids[pid])
183 return NULL;
184 filter = av_mallocz(sizeof(MpegTSFilter));
115329f1 185 if (!filter)
5dbafeb7
FB
186 return NULL;
187 ts->pids[pid] = filter;
188 filter->type = MPEGTS_SECTION;
189 filter->pid = pid;
190 filter->last_cc = -1;
191 sec = &filter->u.section_filter;
192 sec->section_cb = section_cb;
193 sec->opaque = opaque;
194 sec->section_buf = av_malloc(MAX_SECTION_SIZE);
195 sec->check_crc = check_crc;
196 if (!sec->section_buf) {
197 av_free(filter);
198 return NULL;
199 }
200 return filter;
201}
202
7b49ce2e 203static MpegTSFilter *mpegts_open_pes_filter(MpegTSContext *ts, unsigned int pid,
5dbafeb7
FB
204 PESCallback *pes_cb,
205 void *opaque)
206{
207 MpegTSFilter *filter;
208 MpegTSPESFilter *pes;
209
210 if (pid >= NB_PID_MAX || ts->pids[pid])
211 return NULL;
212 filter = av_mallocz(sizeof(MpegTSFilter));
115329f1 213 if (!filter)
5dbafeb7
FB
214 return NULL;
215 ts->pids[pid] = filter;
216 filter->type = MPEGTS_PES;
217 filter->pid = pid;
218 filter->last_cc = -1;
219 pes = &filter->u.pes_filter;
220 pes->pes_cb = pes_cb;
221 pes->opaque = opaque;
222 return filter;
223}
224
7b49ce2e 225static void mpegts_close_filter(MpegTSContext *ts, MpegTSFilter *filter)
5dbafeb7
FB
226{
227 int pid;
228
229 pid = filter->pid;
230 if (filter->type == MPEGTS_SECTION)
231 av_freep(&filter->u.section_filter.section_buf);
ec7d0d2e
GB
232 else if (filter->type == MPEGTS_PES)
233 av_freep(&filter->u.pes_filter.opaque);
234
5dbafeb7
FB
235 av_free(filter);
236 ts->pids[pid] = NULL;
237}
238
a0b8f70c
MN
239static int analyze(const uint8_t *buf, int size, int packet_size, int *index){
240 int stat[packet_size];
241 int i;
242 int x=0;
243 int best_score=0;
244
245 memset(stat, 0, packet_size*sizeof(int));
246
247 for(x=i=0; i<size; i++){
248 if(buf[i] == 0x47){
249 stat[x]++;
250 if(stat[x] > best_score){
251 best_score= stat[x];
252 if(index) *index= x;
253 }
254 }
255
256 x++;
257 if(x == packet_size) x= 0;
258 }
259
260 return best_score;
261}
262
fe9cf0d4 263/* autodetect fec presence. Must have at least 1024 bytes */
5dbafeb7 264static int get_packet_size(const uint8_t *buf, int size)
fe9cf0d4 265{
5d4d67e0 266 int score, fec_score, dvhs_score;
fe9cf0d4
FB
267
268 if (size < (TS_FEC_PACKET_SIZE * 5 + 1))
269 return -1;
115329f1 270
a0b8f70c 271 score = analyze(buf, size, TS_PACKET_SIZE, NULL);
5d4d67e0 272 dvhs_score = analyze(buf, size, TS_DVHS_PACKET_SIZE, NULL);
a0b8f70c 273 fec_score= analyze(buf, size, TS_FEC_PACKET_SIZE, NULL);
5d4d67e0 274// av_log(NULL, AV_LOG_DEBUG, "score: %d, dvhs_score: %d, fec_score: %d \n", score, dvhs_score, fec_score);
115329f1 275
5d4d67e0
NS
276 if (score > fec_score && score > dvhs_score) return TS_PACKET_SIZE;
277 else if(dvhs_score > score && dvhs_score > fec_score) return TS_DVHS_PACKET_SIZE;
278 else if(score < fec_score && dvhs_score < fec_score) return TS_FEC_PACKET_SIZE;
a0b8f70c 279 else return -1;
fe9cf0d4
FB
280}
281
5dbafeb7
FB
282typedef struct SectionHeader {
283 uint8_t tid;
284 uint16_t id;
285 uint8_t version;
286 uint8_t sec_num;
287 uint8_t last_sec_num;
288} SectionHeader;
289
290static inline int get8(const uint8_t **pp, const uint8_t *p_end)
fe9cf0d4 291{
5dbafeb7
FB
292 const uint8_t *p;
293 int c;
294
295 p = *pp;
296 if (p >= p_end)
297 return -1;
298 c = *p++;
299 *pp = p;
300 return c;
fe9cf0d4
FB
301}
302
5dbafeb7
FB
303static inline int get16(const uint8_t **pp, const uint8_t *p_end)
304{
305 const uint8_t *p;
306 int c;
307
308 p = *pp;
309 if ((p + 1) >= p_end)
310 return -1;
311 c = (p[0] << 8) | p[1];
312 p += 2;
313 *pp = p;
314 return c;
315}
316
317/* read and allocate a DVB string preceeded by its length */
318static char *getstr8(const uint8_t **pp, const uint8_t *p_end)
fe9cf0d4 319{
fe9cf0d4 320 int len;
5dbafeb7
FB
321 const uint8_t *p;
322 char *str;
fe9cf0d4 323
5dbafeb7
FB
324 p = *pp;
325 len = get8(&p, p_end);
326 if (len < 0)
327 return NULL;
328 if ((p + len) > p_end)
329 return NULL;
330 str = av_malloc(len + 1);
331 if (!str)
332 return NULL;
333 memcpy(str, p, len);
334 str[len] = '\0';
335 p += len;
336 *pp = p;
337 return str;
338}
339
115329f1 340static int parse_section_header(SectionHeader *h,
5dbafeb7
FB
341 const uint8_t **pp, const uint8_t *p_end)
342{
343 int val;
344
345 val = get8(pp, p_end);
346 if (val < 0)
347 return -1;
348 h->tid = val;
349 *pp += 2;
350 val = get16(pp, p_end);
351 if (val < 0)
352 return -1;
353 h->id = val;
354 val = get8(pp, p_end);
355 if (val < 0)
356 return -1;
357 h->version = (val >> 1) & 0x1f;
358 val = get8(pp, p_end);
359 if (val < 0)
360 return -1;
361 h->sec_num = val;
362 val = get8(pp, p_end);
363 if (val < 0)
364 return -1;
365 h->last_sec_num = val;
fe9cf0d4 366 return 0;
5dbafeb7
FB
367}
368
115329f1 369static MpegTSService *new_service(MpegTSContext *ts, int sid,
5dbafeb7
FB
370 char *provider_name, char *name)
371{
372 MpegTSService *service;
373
374#ifdef DEBUG_SI
f0ee3ea6 375 av_log(ts->stream, AV_LOG_DEBUG, "new_service: "
2ddb79be 376 "sid=0x%04x provider='%s' name='%s'\n",
5dbafeb7
FB
377 sid, provider_name, name);
378#endif
379
380 service = av_mallocz(sizeof(MpegTSService));
381 if (!service)
382 return NULL;
383 service->sid = sid;
384 service->provider_name = provider_name;
385 service->name = name;
386 dynarray_add(&ts->services, &ts->nb_services, service);
387 return service;
388}
389
390static void pmt_cb(void *opaque, const uint8_t *section, int section_len)
391{
392 MpegTSContext *ts = opaque;
393 SectionHeader h1, *h = &h1;
c6ec28b1
MN
394 PESContext *pes;
395 AVStream *st;
396 const uint8_t *p, *p_end, *desc_list_end, *desc_end;
397 int program_info_length, pcr_pid, pid, stream_type;
398 int desc_list_len, desc_len, desc_tag;
79396ac6 399 int comp_page = 0, anc_page = 0; /* initialize to kill warnings */
c6ec28b1 400 char language[4];
115329f1 401
5dbafeb7 402#ifdef DEBUG_SI
f0ee3ea6 403 av_log(ts->stream, AV_LOG_DEBUG, "PMT: len %i\n", section_len);
6fb316d5 404 av_hex_dump(stdout, (uint8_t *)section, section_len);
5dbafeb7
FB
405#endif
406 p_end = section + section_len - 4;
407 p = section;
408 if (parse_section_header(h, &p, p_end) < 0)
409 return;
410#ifdef DEBUG_SI
f0ee3ea6 411 av_log(ts->stream, AV_LOG_DEBUG, "sid=0x%x sec_num=%d/%d\n",
2ddb79be 412 h->id, h->sec_num, h->last_sec_num);
5dbafeb7 413#endif
ce34182d 414 if (h->tid != PMT_TID || (ts->req_sid >= 0 && h->id != ts->req_sid) )
5dbafeb7
FB
415 return;
416
417 pcr_pid = get16(&p, p_end) & 0x1fff;
418 if (pcr_pid < 0)
419 return;
27f388aa 420 ts->pcr_pid = pcr_pid;
5dbafeb7 421#ifdef DEBUG_SI
f0ee3ea6 422 av_log(ts->stream, AV_LOG_DEBUG, "pcr_pid=0x%x\n", pcr_pid);
5dbafeb7
FB
423#endif
424 program_info_length = get16(&p, p_end) & 0xfff;
425 if (program_info_length < 0)
426 return;
427 p += program_info_length;
428 if (p >= p_end)
429 return;
430 for(;;) {
c6ec28b1
MN
431 language[0] = 0;
432 st = 0;
5dbafeb7
FB
433 stream_type = get8(&p, p_end);
434 if (stream_type < 0)
435 break;
436 pid = get16(&p, p_end) & 0x1fff;
437 if (pid < 0)
438 break;
c6ec28b1
MN
439 desc_list_len = get16(&p, p_end) & 0xfff;
440 if (desc_list_len < 0)
441 break;
442 desc_list_end = p + desc_list_len;
443 if (desc_list_end > p_end)
5dbafeb7 444 break;
c6ec28b1
MN
445 for(;;) {
446 desc_tag = get8(&p, desc_list_end);
447 if (desc_tag < 0)
448 break;
2eb1a65d
NS
449 if (stream_type == STREAM_TYPE_PRIVATE_DATA) {
450 if((desc_tag == 0x6A) || (desc_tag == 0x7A)) {
9d9b432a
MR
451 /*assume DVB AC-3 Audio*/
452 stream_type = STREAM_TYPE_AUDIO_AC3;
2eb1a65d
NS
453 } else if(desc_tag == 0x7B) {
454 /* DVB DTS audio */
455 stream_type = STREAM_TYPE_AUDIO_DTS;
456 }
9d9b432a 457 }
c6ec28b1
MN
458 desc_len = get8(&p, desc_list_end);
459 desc_end = p + desc_len;
460 if (desc_end > desc_list_end)
461 break;
462#ifdef DEBUG_SI
f0ee3ea6 463 av_log(ts->stream, AV_LOG_DEBUG, "tag: 0x%02x len=%d\n",
2ddb79be 464 desc_tag, desc_len);
c6ec28b1
MN
465#endif
466 switch(desc_tag) {
467 case DVB_SUBT_DESCID:
468 if (stream_type == STREAM_TYPE_PRIVATE_DATA)
469 stream_type = STREAM_TYPE_SUBTITLE_DVB;
470
471 language[0] = get8(&p, desc_end);
472 language[1] = get8(&p, desc_end);
473 language[2] = get8(&p, desc_end);
474 language[3] = 0;
475 get8(&p, desc_end);
476 comp_page = get16(&p, desc_end);
477 anc_page = get16(&p, desc_end);
478
479 break;
480 case 0x0a: /* ISO 639 language descriptor */
481 language[0] = get8(&p, desc_end);
482 language[1] = get8(&p, desc_end);
483 language[2] = get8(&p, desc_end);
484 language[3] = 0;
485 break;
486 default:
487 break;
488 }
489 p = desc_end;
490 }
491 p = desc_list_end;
5dbafeb7
FB
492
493#ifdef DEBUG_SI
f0ee3ea6 494 av_log(ts->stream, AV_LOG_DEBUG, "stream_type=%d pid=0x%x\n",
2ddb79be 495 stream_type, pid);
5dbafeb7
FB
496#endif
497
498 /* now create ffmpeg stream */
499 switch(stream_type) {
ce34182d
MN
500 case STREAM_TYPE_AUDIO_MPEG1:
501 case STREAM_TYPE_AUDIO_MPEG2:
502 case STREAM_TYPE_VIDEO_MPEG1:
503 case STREAM_TYPE_VIDEO_MPEG2:
278de475
MR
504 case STREAM_TYPE_VIDEO_MPEG4:
505 case STREAM_TYPE_VIDEO_H264:
cf10ee18 506 case STREAM_TYPE_VIDEO_VC1:
278de475 507 case STREAM_TYPE_AUDIO_AAC:
ec23a472 508 case STREAM_TYPE_AUDIO_AC3:
23c99253 509 case STREAM_TYPE_AUDIO_DTS:
c6ec28b1
MN
510 case STREAM_TYPE_SUBTITLE_DVB:
511 pes = add_pes_stream(ts, pid, stream_type);
512 if (pes)
513 st = new_pes_av_stream(pes, 0);
5dbafeb7
FB
514 break;
515 default:
516 /* we ignore the other streams */
517 break;
518 }
c6ec28b1
MN
519
520 if (st) {
521 if (language[0] != 0) {
522 st->language[0] = language[0];
523 st->language[1] = language[1];
524 st->language[2] = language[2];
525 st->language[3] = language[3];
526 }
527
528 if (stream_type == STREAM_TYPE_SUBTITLE_DVB) {
01f4895c 529 st->codec->sub_id = (anc_page << 16) | comp_page;
c6ec28b1
MN
530 }
531 }
5dbafeb7
FB
532 }
533 /* all parameters are there */
534 ts->set_service_cb(ts->set_service_opaque, 0);
535 mpegts_close_filter(ts, ts->pmt_filter);
536 ts->pmt_filter = NULL;
537}
538
539static void pat_cb(void *opaque, const uint8_t *section, int section_len)
540{
541 MpegTSContext *ts = opaque;
542 SectionHeader h1, *h = &h1;
543 const uint8_t *p, *p_end;
544 int sid, pmt_pid;
545
546#ifdef DEBUG_SI
f0ee3ea6 547 av_log(ts->stream, AV_LOG_DEBUG, "PAT:\n");
6fb316d5 548 av_hex_dump(stdout, (uint8_t *)section, section_len);
5dbafeb7
FB
549#endif
550 p_end = section + section_len - 4;
551 p = section;
552 if (parse_section_header(h, &p, p_end) < 0)
553 return;
554 if (h->tid != PAT_TID)
555 return;
556
557 for(;;) {
558 sid = get16(&p, p_end);
559 if (sid < 0)
560 break;
561 pmt_pid = get16(&p, p_end) & 0x1fff;
562 if (pmt_pid < 0)
563 break;
564#ifdef DEBUG_SI
f0ee3ea6 565 av_log(ts->stream, AV_LOG_DEBUG, "sid=0x%x pid=0x%x\n", sid, pmt_pid);
5dbafeb7
FB
566#endif
567 if (sid == 0x0000) {
568 /* NIT info */
569 } else {
fc48fe84 570 if (ts->req_sid == sid) {
115329f1 571 ts->pmt_filter = mpegts_open_section_filter(ts, pmt_pid,
5dbafeb7
FB
572 pmt_cb, ts, 1);
573 goto found;
574 }
575 }
576 }
577 /* not found */
578 ts->set_service_cb(ts->set_service_opaque, -1);
579
580 found:
581 mpegts_close_filter(ts, ts->pat_filter);
582 ts->pat_filter = NULL;
583}
584
fc48fe84
FB
585/* add all services found in the PAT */
586static void pat_scan_cb(void *opaque, const uint8_t *section, int section_len)
587{
588 MpegTSContext *ts = opaque;
589 SectionHeader h1, *h = &h1;
590 const uint8_t *p, *p_end;
591 int sid, pmt_pid;
592 char *provider_name, *name;
593 char buf[256];
594
595#ifdef DEBUG_SI
f0ee3ea6 596 av_log(ts->stream, AV_LOG_DEBUG, "PAT:\n");
6fb316d5 597 av_hex_dump(stdout, (uint8_t *)section, section_len);
fc48fe84
FB
598#endif
599 p_end = section + section_len - 4;
600 p = section;
601 if (parse_section_header(h, &p, p_end) < 0)
602 return;
603 if (h->tid != PAT_TID)
604 return;
605
606 for(;;) {
607 sid = get16(&p, p_end);
608 if (sid < 0)
609 break;
610 pmt_pid = get16(&p, p_end) & 0x1fff;
611 if (pmt_pid < 0)
612 break;
613#ifdef DEBUG_SI
f0ee3ea6 614 av_log(ts->stream, AV_LOG_DEBUG, "sid=0x%x pid=0x%x\n", sid, pmt_pid);
fc48fe84
FB
615#endif
616 if (sid == 0x0000) {
617 /* NIT info */
618 } else {
619 /* add the service with a dummy name */
620 snprintf(buf, sizeof(buf), "Service %x\n", sid);
621 name = av_strdup(buf);
622 provider_name = av_strdup("");
623 if (name && provider_name) {
624 new_service(ts, sid, provider_name, name);
625 } else {
626 av_freep(&name);
627 av_freep(&provider_name);
628 }
629 }
630 }
631 ts->stop_parse = 1;
632
633 /* remove filter */
634 mpegts_close_filter(ts, ts->pat_filter);
635 ts->pat_filter = NULL;
636}
637
7b49ce2e 638static void mpegts_set_service(MpegTSContext *ts, int sid,
5dbafeb7
FB
639 SetServiceCallback *set_service_cb, void *opaque)
640{
641 ts->set_service_cb = set_service_cb;
642 ts->set_service_opaque = opaque;
643 ts->req_sid = sid;
115329f1 644 ts->pat_filter = mpegts_open_section_filter(ts, PAT_PID,
5dbafeb7
FB
645 pat_cb, ts, 1);
646}
647
648static void sdt_cb(void *opaque, const uint8_t *section, int section_len)
649{
650 MpegTSContext *ts = opaque;
651 SectionHeader h1, *h = &h1;
652 const uint8_t *p, *p_end, *desc_list_end, *desc_end;
653 int onid, val, sid, desc_list_len, desc_tag, desc_len, service_type;
654 char *name, *provider_name;
655
656#ifdef DEBUG_SI
f0ee3ea6 657 av_log(ts->stream, AV_LOG_DEBUG, "SDT:\n");
6fb316d5 658 av_hex_dump(stdout, (uint8_t *)section, section_len);
5dbafeb7
FB
659#endif
660
661 p_end = section + section_len - 4;
662 p = section;
663 if (parse_section_header(h, &p, p_end) < 0)
664 return;
665 if (h->tid != SDT_TID)
666 return;
667 onid = get16(&p, p_end);
668 if (onid < 0)
669 return;
670 val = get8(&p, p_end);
671 if (val < 0)
672 return;
673 for(;;) {
674 sid = get16(&p, p_end);
675 if (sid < 0)
676 break;
677 val = get8(&p, p_end);
678 if (val < 0)
679 break;
680 desc_list_len = get16(&p, p_end) & 0xfff;
681 if (desc_list_len < 0)
682 break;
683 desc_list_end = p + desc_list_len;
684 if (desc_list_end > p_end)
685 break;
686 for(;;) {
687 desc_tag = get8(&p, desc_list_end);
688 if (desc_tag < 0)
689 break;
690 desc_len = get8(&p, desc_list_end);
691 desc_end = p + desc_len;
692 if (desc_end > desc_list_end)
693 break;
694#ifdef DEBUG_SI
f0ee3ea6 695 av_log(ts->stream, AV_LOG_DEBUG, "tag: 0x%02x len=%d\n",
2ddb79be 696 desc_tag, desc_len);
5dbafeb7
FB
697#endif
698 switch(desc_tag) {
699 case 0x48:
700 service_type = get8(&p, p_end);
701 if (service_type < 0)
702 break;
703 provider_name = getstr8(&p, p_end);
704 if (!provider_name)
705 break;
706 name = getstr8(&p, p_end);
707 if (!name)
708 break;
709 new_service(ts, sid, provider_name, name);
710 break;
711 default:
712 break;
713 }
714 p = desc_end;
715 }
716 p = desc_list_end;
717 }
718 ts->stop_parse = 1;
719
720 /* remove filter */
721 mpegts_close_filter(ts, ts->sdt_filter);
722 ts->sdt_filter = NULL;
723}
724
fc48fe84 725/* scan services in a transport stream by looking at the SDT */
7b49ce2e 726static void mpegts_scan_sdt(MpegTSContext *ts)
5dbafeb7 727{
115329f1 728 ts->sdt_filter = mpegts_open_section_filter(ts, SDT_PID,
5dbafeb7
FB
729 sdt_cb, ts, 1);
730}
731
fc48fe84
FB
732/* scan services in a transport stream by looking at the PAT (better
733 than nothing !) */
7b49ce2e 734static void mpegts_scan_pat(MpegTSContext *ts)
fc48fe84 735{
115329f1 736 ts->pat_filter = mpegts_open_section_filter(ts, PAT_PID,
fc48fe84
FB
737 pat_scan_cb, ts, 1);
738}
5dbafeb7
FB
739
740/* TS stream handling */
741
742enum MpegTSState {
743 MPEGTS_HEADER = 0,
744 MPEGTS_PESHEADER_FILL,
745 MPEGTS_PAYLOAD,
746 MPEGTS_SKIP,
747};
748
749/* enough for PES header + length */
750#define PES_START_SIZE 9
751#define MAX_PES_HEADER_SIZE (9 + 255)
752
c6ec28b1 753struct PESContext {
5dbafeb7 754 int pid;
278de475 755 int stream_type;
b45a7a18 756 MpegTSContext *ts;
5dbafeb7
FB
757 AVFormatContext *stream;
758 AVStream *st;
759 enum MpegTSState state;
760 /* used to get the format */
761 int data_index;
762 int total_size;
763 int pes_header_size;
764 int64_t pts, dts;
765 uint8_t header[MAX_PES_HEADER_SIZE];
c6ec28b1 766};
5dbafeb7
FB
767
768static int64_t get_pts(const uint8_t *p)
769{
770 int64_t pts;
771 int val;
772
773 pts = (int64_t)((p[0] >> 1) & 0x07) << 30;
774 val = (p[1] << 8) | p[2];
775 pts |= (int64_t)(val >> 1) << 15;
776 val = (p[3] << 8) | p[4];
777 pts |= (int64_t)(val >> 1);
778 return pts;
fe9cf0d4
FB
779}
780
781/* return non zero if a packet could be constructed */
5dbafeb7
FB
782static void mpegts_push_data(void *opaque,
783 const uint8_t *buf, int buf_size, int is_start)
fe9cf0d4 784{
5dbafeb7 785 PESContext *pes = opaque;
b45a7a18 786 MpegTSContext *ts = pes->ts;
5dbafeb7 787 const uint8_t *p;
c6ec28b1 788 int len, code;
115329f1 789
fe9cf0d4 790 if (is_start) {
5dbafeb7
FB
791 pes->state = MPEGTS_HEADER;
792 pes->data_index = 0;
fe9cf0d4
FB
793 }
794 p = buf;
795 while (buf_size > 0) {
5dbafeb7 796 switch(pes->state) {
fe9cf0d4 797 case MPEGTS_HEADER:
5dbafeb7
FB
798 len = PES_START_SIZE - pes->data_index;
799 if (len > buf_size)
800 len = buf_size;
801 memcpy(pes->header + pes->data_index, p, len);
802 pes->data_index += len;
fe9cf0d4
FB
803 p += len;
804 buf_size -= len;
5dbafeb7 805 if (pes->data_index == PES_START_SIZE) {
fe9cf0d4
FB
806 /* we got all the PES or section header. We can now
807 decide */
808#if 0
5dbafeb7 809 av_hex_dump(pes->header, pes->data_index);
fe9cf0d4 810#endif
5dbafeb7
FB
811 if (pes->header[0] == 0x00 && pes->header[1] == 0x00 &&
812 pes->header[2] == 0x01) {
fe9cf0d4 813 /* it must be an mpeg2 PES stream */
5dbafeb7 814 code = pes->header[3] | 0x100;
fe9cf0d4 815 if (!((code >= 0x1c0 && code <= 0x1df) ||
ec23a472 816 (code >= 0x1e0 && code <= 0x1ef) ||
cf10ee18 817 (code == 0x1bd) || (code == 0x1fd)))
fe9cf0d4 818 goto skip;
5dbafeb7 819 if (!pes->st) {
fe9cf0d4 820 /* allocate stream */
c6ec28b1 821 new_pes_av_stream(pes, code);
fe9cf0d4 822 }
5dbafeb7
FB
823 pes->state = MPEGTS_PESHEADER_FILL;
824 pes->total_size = (pes->header[4] << 8) | pes->header[5];
825 /* NOTE: a zero total size means the PES size is
826 unbounded */
827 if (pes->total_size)
828 pes->total_size += 6;
829 pes->pes_header_size = pes->header[8] + 9;
fe9cf0d4
FB
830 } else {
831 /* otherwise, it should be a table */
832 /* skip packet */
833 skip:
5dbafeb7 834 pes->state = MPEGTS_SKIP;
fe9cf0d4
FB
835 continue;
836 }
837 }
838 break;
839 /**********************************************/
840 /* PES packing parsing */
841 case MPEGTS_PESHEADER_FILL:
5dbafeb7
FB
842 len = pes->pes_header_size - pes->data_index;
843 if (len > buf_size)
844 len = buf_size;
845 memcpy(pes->header + pes->data_index, p, len);
846 pes->data_index += len;
fe9cf0d4
FB
847 p += len;
848 buf_size -= len;
5dbafeb7
FB
849 if (pes->data_index == pes->pes_header_size) {
850 const uint8_t *r;
851 unsigned int flags;
852
853 flags = pes->header[7];
854 r = pes->header + 9;
855 pes->pts = AV_NOPTS_VALUE;
856 pes->dts = AV_NOPTS_VALUE;
857 if ((flags & 0xc0) == 0x80) {
858 pes->pts = get_pts(r);
859 r += 5;
860 } else if ((flags & 0xc0) == 0xc0) {
861 pes->pts = get_pts(r);
862 r += 5;
863 pes->dts = get_pts(r);
864 r += 5;
865 }
866 /* we got the full header. We parse it and get the payload */
867 pes->state = MPEGTS_PAYLOAD;
868 }
fe9cf0d4
FB
869 break;
870 case MPEGTS_PAYLOAD:
5dbafeb7
FB
871 if (pes->total_size) {
872 len = pes->total_size - pes->data_index;
873 if (len > buf_size)
874 len = buf_size;
875 } else {
876 len = buf_size;
877 }
fe9cf0d4 878 if (len > 0) {
5dbafeb7
FB
879 AVPacket *pkt = ts->pkt;
880 if (pes->st && av_new_packet(pkt, len) == 0) {
881 memcpy(pkt->data, p, len);
882 pkt->stream_index = pes->st->index;
883 pkt->pts = pes->pts;
2092bd75 884 pkt->dts = pes->dts;
5dbafeb7
FB
885 /* reset pts values */
886 pes->pts = AV_NOPTS_VALUE;
887 pes->dts = AV_NOPTS_VALUE;
888 ts->stop_parse = 1;
889 return;
fe9cf0d4 890 }
fe9cf0d4
FB
891 }
892 buf_size = 0;
893 break;
894 case MPEGTS_SKIP:
895 buf_size = 0;
896 break;
897 }
898 }
5dbafeb7
FB
899}
900
c6ec28b1
MN
901static AVStream* new_pes_av_stream(PESContext *pes, uint32_t code)
902{
903 AVStream *st;
904 int codec_type, codec_id;
905
906 switch(pes->stream_type){
907 case STREAM_TYPE_AUDIO_MPEG1:
908 case STREAM_TYPE_AUDIO_MPEG2:
909 codec_type = CODEC_TYPE_AUDIO;
910 codec_id = CODEC_ID_MP3;
911 break;
912 case STREAM_TYPE_VIDEO_MPEG1:
913 case STREAM_TYPE_VIDEO_MPEG2:
914 codec_type = CODEC_TYPE_VIDEO;
915 codec_id = CODEC_ID_MPEG2VIDEO;
916 break;
917 case STREAM_TYPE_VIDEO_MPEG4:
918 codec_type = CODEC_TYPE_VIDEO;
919 codec_id = CODEC_ID_MPEG4;
920 break;
921 case STREAM_TYPE_VIDEO_H264:
922 codec_type = CODEC_TYPE_VIDEO;
923 codec_id = CODEC_ID_H264;
924 break;
cf10ee18
NS
925 case STREAM_TYPE_VIDEO_VC1:
926 codec_type = CODEC_TYPE_VIDEO;
927 codec_id = CODEC_ID_VC1;
928 break;
c6ec28b1
MN
929 case STREAM_TYPE_AUDIO_AAC:
930 codec_type = CODEC_TYPE_AUDIO;
931 codec_id = CODEC_ID_AAC;
932 break;
933 case STREAM_TYPE_AUDIO_AC3:
934 codec_type = CODEC_TYPE_AUDIO;
935 codec_id = CODEC_ID_AC3;
936 break;
937 case STREAM_TYPE_AUDIO_DTS:
938 codec_type = CODEC_TYPE_AUDIO;
939 codec_id = CODEC_ID_DTS;
940 break;
941 case STREAM_TYPE_SUBTITLE_DVB:
942 codec_type = CODEC_TYPE_SUBTITLE;
943 codec_id = CODEC_ID_DVB_SUBTITLE;
944 break;
945 default:
946 if (code >= 0x1c0 && code <= 0x1df) {
947 codec_type = CODEC_TYPE_AUDIO;
948 codec_id = CODEC_ID_MP2;
949 } else if (code == 0x1bd) {
950 codec_type = CODEC_TYPE_AUDIO;
951 codec_id = CODEC_ID_AC3;
952 } else {
953 codec_type = CODEC_TYPE_VIDEO;
954 codec_id = CODEC_ID_MPEG1VIDEO;
955 }
956 break;
957 }
958 st = av_new_stream(pes->stream, pes->pid);
959 if (st) {
960 av_set_pts_info(st, 33, 1, 90000);
961 st->priv_data = pes;
01f4895c
MN
962 st->codec->codec_type = codec_type;
963 st->codec->codec_id = codec_id;
c6ec28b1
MN
964 st->need_parsing = 1;
965 pes->st = st;
966 }
967 return st;
968}
969
970
971static PESContext *add_pes_stream(MpegTSContext *ts, int pid, int stream_type)
5dbafeb7 972{
5dbafeb7
FB
973 MpegTSFilter *tss;
974 PESContext *pes;
975
976 /* if no pid found, then add a pid context */
977 pes = av_mallocz(sizeof(PESContext));
978 if (!pes)
c6ec28b1 979 return 0;
b45a7a18
FB
980 pes->ts = ts;
981 pes->stream = ts->stream;
5dbafeb7 982 pes->pid = pid;
278de475 983 pes->stream_type = stream_type;
5dbafeb7
FB
984 tss = mpegts_open_pes_filter(ts, pid, mpegts_push_data, pes);
985 if (!tss) {
986 av_free(pes);
c6ec28b1 987 return 0;
5dbafeb7 988 }
c6ec28b1 989 return pes;
fe9cf0d4
FB
990}
991
5dbafeb7 992/* handle one TS packet */
b45a7a18 993static void handle_packet(MpegTSContext *ts, const uint8_t *packet)
fe9cf0d4 994{
b45a7a18 995 AVFormatContext *s = ts->stream;
5dbafeb7
FB
996 MpegTSFilter *tss;
997 int len, pid, cc, cc_ok, afc, is_start;
998 const uint8_t *p, *p_end;
999
1000 pid = ((packet[1] & 0x1f) << 8) | packet[2];
1001 is_start = packet[1] & 0x40;
1002 tss = ts->pids[pid];
1003 if (ts->auto_guess && tss == NULL && is_start) {
278de475 1004 add_pes_stream(ts, pid, 0);
5dbafeb7
FB
1005 tss = ts->pids[pid];
1006 }
1007 if (!tss)
1008 return;
1009
1010 /* continuity check (currently not used) */
1011 cc = (packet[3] & 0xf);
1012 cc_ok = (tss->last_cc < 0) || ((((tss->last_cc + 1) & 0x0f) == cc));
1013 tss->last_cc = cc;
115329f1 1014
5dbafeb7
FB
1015 /* skip adaptation field */
1016 afc = (packet[3] >> 4) & 3;
1017 p = packet + 4;
1018 if (afc == 0) /* reserved value */
1019 return;
1020 if (afc == 2) /* adaptation field only */
1021 return;
1022 if (afc == 3) {
1023 /* skip adapation field */
1024 p += p[0] + 1;
1025 }
1026 /* if past the end of packet, ignore */
1027 p_end = packet + TS_PACKET_SIZE;
1028 if (p >= p_end)
1029 return;
115329f1 1030
5dbafeb7
FB
1031 if (tss->type == MPEGTS_SECTION) {
1032 if (is_start) {
1033 /* pointer field present */
1034 len = *p++;
1035 if (p + len > p_end)
1036 return;
1037 if (len && cc_ok) {
27bb1ed3 1038 /* write remaining section bytes */
115329f1 1039 write_section_data(s, tss,
5dbafeb7 1040 p, len, 0);
27bb1ed3
WG
1041 /* check whether filter has been closed */
1042 if (!ts->pids[pid])
1043 return;
5dbafeb7
FB
1044 }
1045 p += len;
1046 if (p < p_end) {
115329f1 1047 write_section_data(s, tss,
5dbafeb7
FB
1048 p, p_end - p, 1);
1049 }
1050 } else {
1051 if (cc_ok) {
115329f1 1052 write_section_data(s, tss,
5dbafeb7 1053 p, p_end - p, 0);
fc48fe84 1054 }
5dbafeb7
FB
1055 }
1056 } else {
115329f1 1057 tss->u.pes_filter.pes_cb(tss->u.pes_filter.opaque,
5dbafeb7
FB
1058 p, p_end - p, is_start);
1059 }
1060}
1061
fc48fe84
FB
1062/* XXX: try to find a better synchro over several packets (use
1063 get_packet_size() ?) */
b45a7a18 1064static int mpegts_resync(ByteIOContext *pb)
fc48fe84 1065{
fc48fe84
FB
1066 int c, i;
1067
1068 for(i = 0;i < MAX_RESYNC_SIZE; i++) {
1069 c = url_fgetc(pb);
1070 if (c < 0)
1071 return -1;
1072 if (c == 0x47) {
1073 url_fseek(pb, -1, SEEK_CUR);
1074 return 0;
1075 }
1076 }
1077 /* no sync found */
1078 return -1;
1079}
1080
b45a7a18
FB
1081/* return -1 if error or EOF. Return 0 if OK. */
1082static int read_packet(ByteIOContext *pb, uint8_t *buf, int raw_packet_size)
5dbafeb7 1083{
b45a7a18
FB
1084 int skip, len;
1085
1086 for(;;) {
1087 len = get_buffer(pb, buf, TS_PACKET_SIZE);
1088 if (len != TS_PACKET_SIZE)
1089 return AVERROR_IO;
1090 /* check paquet sync byte */
1091 if (buf[0] != 0x47) {
1092 /* find a new packet start */
1093 url_fseek(pb, -TS_PACKET_SIZE, SEEK_CUR);
1094 if (mpegts_resync(pb) < 0)
1095 return AVERROR_INVALIDDATA;
1096 else
1097 continue;
1098 } else {
1099 skip = raw_packet_size - TS_PACKET_SIZE;
1100 if (skip > 0)
1101 url_fskip(pb, skip);
1102 break;
1103 }
1104 }
1105 return 0;
1106}
1107
1108static int handle_packets(MpegTSContext *ts, int nb_packets)
1109{
1110 AVFormatContext *s = ts->stream;
5dbafeb7 1111 ByteIOContext *pb = &s->pb;
b45a7a18
FB
1112 uint8_t packet[TS_PACKET_SIZE];
1113 int packet_num, ret;
5dbafeb7
FB
1114
1115 ts->stop_parse = 0;
1116 packet_num = 0;
fe9cf0d4 1117 for(;;) {
5dbafeb7
FB
1118 if (ts->stop_parse)
1119 break;
1120 packet_num++;
1121 if (nb_packets != 0 && packet_num >= nb_packets)
1122 break;
b45a7a18
FB
1123 ret = read_packet(pb, packet, ts->raw_packet_size);
1124 if (ret != 0)
1125 return ret;
1126 handle_packet(ts, packet);
5dbafeb7
FB
1127 }
1128 return 0;
1129}
fe9cf0d4 1130
5dbafeb7
FB
1131static int mpegts_probe(AVProbeData *p)
1132{
fc48fe84 1133#if 1
a0b8f70c 1134 const int size= p->buf_size;
5d4d67e0 1135 int score, fec_score, dvhs_score;
a0b8f70c 1136#define CHECK_COUNT 10
115329f1 1137
a0b8f70c
MN
1138 if (size < (TS_FEC_PACKET_SIZE * CHECK_COUNT))
1139 return -1;
115329f1 1140
a0b8f70c 1141 score = analyze(p->buf, TS_PACKET_SIZE *CHECK_COUNT, TS_PACKET_SIZE, NULL);
5d4d67e0 1142 dvhs_score = analyze(p->buf, TS_DVHS_PACKET_SIZE *CHECK_COUNT, TS_DVHS_PACKET_SIZE, NULL);
a0b8f70c 1143 fec_score= analyze(p->buf, TS_FEC_PACKET_SIZE*CHECK_COUNT, TS_FEC_PACKET_SIZE, NULL);
5d4d67e0 1144// av_log(NULL, AV_LOG_DEBUG, "score: %d, dvhs_score: %d, fec_score: %d \n", score, dvhs_score, fec_score);
115329f1 1145
a0b8f70c 1146// we need a clear definition for the returned score otherwise things will become messy sooner or later
5d4d67e0
NS
1147 if (score > fec_score && score > dvhs_score && score > 6) return AVPROBE_SCORE_MAX + score - CHECK_COUNT;
1148 else if(dvhs_score > score && dvhs_score > fec_score && dvhs_score > 6) return AVPROBE_SCORE_MAX + dvhs_score - CHECK_COUNT;
a0b8f70c
MN
1149 else if( fec_score > 6) return AVPROBE_SCORE_MAX + fec_score - CHECK_COUNT;
1150 else return -1;
fc48fe84
FB
1151#else
1152 /* only use the extension for safer guess */
1153 if (match_ext(p->filename, "ts"))
1154 return AVPROBE_SCORE_MAX;
1155 else
1156 return 0;
1157#endif
5dbafeb7
FB
1158}
1159
1ed1a122 1160static void set_service_cb(void *opaque, int ret)
5dbafeb7
FB
1161{
1162 MpegTSContext *ts = opaque;
1163 ts->set_service_ret = ret;
1164 ts->stop_parse = 1;
1165}
1166
b45a7a18
FB
1167/* return the 90 kHz PCR and the extension for the 27 MHz PCR. return
1168 (-1) if not available */
115329f1 1169static int parse_pcr(int64_t *ppcr_high, int *ppcr_low,
b45a7a18
FB
1170 const uint8_t *packet)
1171{
1172 int afc, len, flags;
1173 const uint8_t *p;
1174 unsigned int v;
1175
1176 afc = (packet[3] >> 4) & 3;
1177 if (afc <= 1)
1178 return -1;
1179 p = packet + 4;
1180 len = p[0];
1181 p++;
1182 if (len == 0)
1183 return -1;
1184 flags = *p++;
1185 len--;
1186 if (!(flags & 0x10))
1187 return -1;
1188 if (len < 6)
1189 return -1;
1190 v = (p[0] << 24) | (p[1] << 16) | (p[2] << 8) | p[3];
1191 *ppcr_high = ((int64_t)v << 1) | (p[4] >> 7);
1192 *ppcr_low = ((p[4] & 1) << 8) | p[5];
1193 return 0;
1194}
1195
5dbafeb7
FB
1196static int mpegts_read_header(AVFormatContext *s,
1197 AVFormatParameters *ap)
1198{
1199 MpegTSContext *ts = s->priv_data;
1200 ByteIOContext *pb = &s->pb;
1201 uint8_t buf[1024];
e05655fb 1202 int len, sid, i;
5dbafeb7
FB
1203 int64_t pos;
1204 MpegTSService *service;
e05655fb 1205
b45a7a18
FB
1206 if (ap) {
1207 ts->mpeg2ts_raw = ap->mpeg2ts_raw;
1208 ts->mpeg2ts_compute_pcr = ap->mpeg2ts_compute_pcr;
1209 }
1210
5dbafeb7
FB
1211 /* read the first 1024 bytes to get packet size */
1212 pos = url_ftell(pb);
1213 len = get_buffer(pb, buf, sizeof(buf));
1214 if (len != sizeof(buf))
1215 goto fail;
1216 ts->raw_packet_size = get_packet_size(buf, sizeof(buf));
1217 if (ts->raw_packet_size <= 0)
1218 goto fail;
b45a7a18 1219 ts->stream = s;
5dbafeb7 1220 ts->auto_guess = 0;
5dbafeb7 1221
27c748b5 1222goto_auto_guess:
b45a7a18
FB
1223 if (!ts->mpeg2ts_raw) {
1224 /* normal demux */
fc48fe84 1225
b45a7a18
FB
1226 if (!ts->auto_guess) {
1227 ts->set_service_ret = -1;
ce34182d 1228
b45a7a18 1229 /* first do a scaning to get all the services */
fc48fe84 1230 url_fseek(pb, pos, SEEK_SET);
b45a7a18 1231 mpegts_scan_sdt(ts);
115329f1 1232
ec6913d2 1233 handle_packets(ts, s->probesize);
115329f1 1234
b45a7a18
FB
1235 if (ts->nb_services <= 0) {
1236 /* no SDT found, we try to look at the PAT */
115329f1 1237
b45a7a18
FB
1238 /* First remove the SDT filters from each PID */
1239 int i;
1240 for (i=0; i < NB_PID_MAX; i++) {
1241 if (ts->pids[i])
1242 mpegts_close_filter(ts, ts->pids[i]);
1243 }
1244 url_fseek(pb, pos, SEEK_SET);
1245 mpegts_scan_pat(ts);
115329f1 1246
ec6913d2 1247 handle_packets(ts, s->probesize);
b45a7a18 1248 }
115329f1 1249
6fb316d5 1250 if (ts->nb_services <= 0) {
c6ec28b1
MN
1251 /* raw transport stream */
1252 ts->auto_guess = 1;
1253 s->ctx_flags |= AVFMTCTX_NOHEADER;
1254 goto do_pcr;
1255 }
115329f1 1256
b45a7a18 1257 /* tune to first service found */
e05655fb
MN
1258 for(i=0; i<ts->nb_services && ts->set_service_ret; i++){
1259 service = ts->services[i];
1260 sid = service->sid;
5dbafeb7 1261#ifdef DEBUG_SI
f0ee3ea6 1262 av_log(ts->stream, AV_LOG_DEBUG, "tuning to '%s'\n", service->name);
5dbafeb7 1263#endif
115329f1 1264
e05655fb
MN
1265 /* now find the info for the first service if we found any,
1266 otherwise try to filter all PATs */
115329f1 1267
e05655fb
MN
1268 url_fseek(pb, pos, SEEK_SET);
1269 mpegts_set_service(ts, sid, set_service_cb, ts);
115329f1 1270
ec6913d2 1271 handle_packets(ts, s->probesize);
e05655fb 1272 }
b45a7a18 1273 /* if could not find service, exit */
115329f1 1274
27c748b5
NS
1275 if (ts->set_service_ret != 0) {
1276 if(ts->auto_guess)
1277 return -1;
1278 else {
1279 //let's retry with auto_guess set
1280 ts->auto_guess = 1;
1281 goto goto_auto_guess;
1282 }
1283 }
115329f1 1284
b45a7a18 1285#ifdef DEBUG_SI
f0ee3ea6 1286 av_log(ts->stream, AV_LOG_DEBUG, "tuning done\n");
b45a7a18
FB
1287#endif
1288 }
1289 s->ctx_flags |= AVFMTCTX_NOHEADER;
1290 } else {
1291 AVStream *st;
1292 int pcr_pid, pid, nb_packets, nb_pcrs, ret, pcr_l;
1293 int64_t pcrs[2], pcr_h;
1294 int packet_count[2];
1295 uint8_t packet[TS_PACKET_SIZE];
115329f1 1296
b45a7a18 1297 /* only read packets */
115329f1 1298
6fb316d5 1299 do_pcr:
b45a7a18
FB
1300 st = av_new_stream(s, 0);
1301 if (!st)
1302 goto fail;
9ee91c2f 1303 av_set_pts_info(st, 60, 1, 27000000);
01f4895c
MN
1304 st->codec->codec_type = CODEC_TYPE_DATA;
1305 st->codec->codec_id = CODEC_ID_MPEG2TS;
115329f1 1306
b45a7a18
FB
1307 /* we iterate until we find two PCRs to estimate the bitrate */
1308 pcr_pid = -1;
1309 nb_pcrs = 0;
1310 nb_packets = 0;
1311 for(;;) {
1312 ret = read_packet(&s->pb, packet, ts->raw_packet_size);
1313 if (ret < 0)
1314 return -1;
1315 pid = ((packet[1] & 0x1f) << 8) | packet[2];
1316 if ((pcr_pid == -1 || pcr_pid == pid) &&
1317 parse_pcr(&pcr_h, &pcr_l, packet) == 0) {
1318 pcr_pid = pid;
1319 packet_count[nb_pcrs] = nb_packets;
1320 pcrs[nb_pcrs] = pcr_h * 300 + pcr_l;
1321 nb_pcrs++;
1322 if (nb_pcrs >= 2)
1323 break;
1324 }
1325 nb_packets++;
1326 }
27f388aa 1327 ts->pcr_pid = pcr_pid;
5dbafeb7 1328
b45a7a18
FB
1329 /* NOTE1: the bitrate is computed without the FEC */
1330 /* NOTE2: it is only the bitrate of the start of the stream */
1331 ts->pcr_incr = (pcrs[1] - pcrs[0]) / (packet_count[1] - packet_count[0]);
1332 ts->cur_pcr = pcrs[0] - ts->pcr_incr * packet_count[0];
1333 s->bit_rate = (TS_PACKET_SIZE * 8) * 27e6 / ts->pcr_incr;
01f4895c 1334 st->codec->bit_rate = s->bit_rate;
c0df9d75 1335 st->start_time = ts->cur_pcr;
b45a7a18 1336#if 0
f0ee3ea6 1337 av_log(ts->stream, AV_LOG_DEBUG, "start=%0.3f pcr=%0.3f incr=%d\n",
b45a7a18 1338 st->start_time / 1000000.0, pcrs[0] / 27e6, ts->pcr_incr);
5dbafeb7 1339#endif
fe9cf0d4 1340 }
5dbafeb7
FB
1341
1342 url_fseek(pb, pos, SEEK_SET);
fe9cf0d4 1343 return 0;
5dbafeb7
FB
1344 fail:
1345 return -1;
1346}
1347
b45a7a18
FB
1348#define MAX_PACKET_READAHEAD ((128 * 1024) / 188)
1349
1350static int mpegts_raw_read_packet(AVFormatContext *s,
1351 AVPacket *pkt)
1352{
1353 MpegTSContext *ts = s->priv_data;
1354 int ret, i;
1355 int64_t pcr_h, next_pcr_h, pos;
1356 int pcr_l, next_pcr_l;
1357 uint8_t pcr_buf[12];
1358
1359 if (av_new_packet(pkt, TS_PACKET_SIZE) < 0)
8fa36ae0 1360 return AVERROR(ENOMEM);
2692067a 1361 pkt->pos= url_ftell(&s->pb);
b45a7a18
FB
1362 ret = read_packet(&s->pb, pkt->data, ts->raw_packet_size);
1363 if (ret < 0) {
1364 av_free_packet(pkt);
1365 return ret;
1366 }
1367 if (ts->mpeg2ts_compute_pcr) {
1368 /* compute exact PCR for each packet */
1369 if (parse_pcr(&pcr_h, &pcr_l, pkt->data) == 0) {
1370 /* we read the next PCR (XXX: optimize it by using a bigger buffer */
1371 pos = url_ftell(&s->pb);
1372 for(i = 0; i < MAX_PACKET_READAHEAD; i++) {
1373 url_fseek(&s->pb, pos + i * ts->raw_packet_size, SEEK_SET);
1374 get_buffer(&s->pb, pcr_buf, 12);
1375 if (parse_pcr(&next_pcr_h, &next_pcr_l, pcr_buf) == 0) {
1376 /* XXX: not precise enough */
115329f1 1377 ts->pcr_incr = ((next_pcr_h - pcr_h) * 300 + (next_pcr_l - pcr_l)) /
b45a7a18
FB
1378 (i + 1);
1379 break;
1380 }
1381 }
1382 url_fseek(&s->pb, pos, SEEK_SET);
1383 /* no next PCR found: we use previous increment */
1384 ts->cur_pcr = pcr_h * 300 + pcr_l;
1385 }
1386 pkt->pts = ts->cur_pcr;
1387 pkt->duration = ts->pcr_incr;
1388 ts->cur_pcr += ts->pcr_incr;
1389 }
1390 pkt->stream_index = 0;
1391 return 0;
1392}
1393
5dbafeb7
FB
1394static int mpegts_read_packet(AVFormatContext *s,
1395 AVPacket *pkt)
1396{
1397 MpegTSContext *ts = s->priv_data;
b45a7a18
FB
1398
1399 if (!ts->mpeg2ts_raw) {
1400 ts->pkt = pkt;
1401 return handle_packets(ts, 0);
1402 } else {
1403 return mpegts_raw_read_packet(s, pkt);
1404 }
fe9cf0d4
FB
1405}
1406
1407static int mpegts_read_close(AVFormatContext *s)
1408{
1409 MpegTSContext *ts = s->priv_data;
1410 int i;
1411 for(i=0;i<NB_PID_MAX;i++)
ec7d0d2e 1412 if (ts->pids[i]) mpegts_close_filter(ts, ts->pids[i]);
00a6b92b
MR
1413
1414 for(i = 0; i < ts->nb_services; i++){
1415 av_free(ts->services[i]->provider_name);
1416 av_free(ts->services[i]->name);
1417 av_free(ts->services[i]);
1418 }
1419 av_freep(&ts->services);
1420
fe9cf0d4
FB
1421 return 0;
1422}
1423
115329f1 1424static int64_t mpegts_get_pcr(AVFormatContext *s, int stream_index,
cdd5034f 1425 int64_t *ppos, int64_t pos_limit)
27f388aa
FB
1426{
1427 MpegTSContext *ts = s->priv_data;
1428 int64_t pos, timestamp;
1429 uint8_t buf[TS_PACKET_SIZE];
1430 int pcr_l, pid;
cdd5034f
MN
1431 const int find_next= 1;
1432 pos = ((*ppos + ts->raw_packet_size - 1) / ts->raw_packet_size) * ts->raw_packet_size;
27f388aa
FB
1433 if (find_next) {
1434 for(;;) {
1435 url_fseek(&s->pb, pos, SEEK_SET);
1436 if (get_buffer(&s->pb, buf, TS_PACKET_SIZE) != TS_PACKET_SIZE)
1437 return AV_NOPTS_VALUE;
1438 pid = ((buf[1] & 0x1f) << 8) | buf[2];
1439 if (pid == ts->pcr_pid &&
1440 parse_pcr(&timestamp, &pcr_l, buf) == 0) {
1441 break;
1442 }
1443 pos += ts->raw_packet_size;
1444 }
1445 } else {
1446 for(;;) {
1447 pos -= ts->raw_packet_size;
1448 if (pos < 0)
1449 return AV_NOPTS_VALUE;
1450 url_fseek(&s->pb, pos, SEEK_SET);
1451 if (get_buffer(&s->pb, buf, TS_PACKET_SIZE) != TS_PACKET_SIZE)
1452 return AV_NOPTS_VALUE;
1453 pid = ((buf[1] & 0x1f) << 8) | buf[2];
1454 if (pid == ts->pcr_pid &&
1455 parse_pcr(&timestamp, &pcr_l, buf) == 0) {
1456 break;
1457 }
1458 }
1459 }
1460 *ppos = pos;
27f388aa 1461
cdd5034f 1462 return timestamp;
27f388aa
FB
1463}
1464
3ba1438d 1465static int read_seek(AVFormatContext *s, int stream_index, int64_t target_ts, int flags){
e05655fb
MN
1466 MpegTSContext *ts = s->priv_data;
1467 uint8_t buf[TS_PACKET_SIZE];
1468 int64_t pos;
1469
3ba1438d 1470 if(av_seek_frame_binary(s, stream_index, target_ts, flags) < 0)
e05655fb
MN
1471 return -1;
1472
1473 pos= url_ftell(&s->pb);
1474
1475 for(;;) {
1476 url_fseek(&s->pb, pos, SEEK_SET);
1477 if (get_buffer(&s->pb, buf, TS_PACKET_SIZE) != TS_PACKET_SIZE)
1478 return -1;
1479// pid = ((buf[1] & 0x1f) << 8) | buf[2];
1480 if(buf[1] & 0x40) break;
1481 pos += ts->raw_packet_size;
115329f1 1482 }
e05655fb
MN
1483 url_fseek(&s->pb, pos, SEEK_SET);
1484
1485 return 0;
1486}
1487
b45a7a18
FB
1488/**************************************************************/
1489/* parsing functions - called from other demuxers such as RTP */
1490
1491MpegTSContext *mpegts_parse_open(AVFormatContext *s)
1492{
1493 MpegTSContext *ts;
115329f1 1494
b45a7a18
FB
1495 ts = av_mallocz(sizeof(MpegTSContext));
1496 if (!ts)
1497 return NULL;
1498 /* no stream case, currently used by RTP */
1499 ts->raw_packet_size = TS_PACKET_SIZE;
1500 ts->stream = s;
1501 ts->auto_guess = 1;
1502 return ts;
1503}
1504
1505/* return the consumed length if a packet was output, or -1 if no
1506 packet is output */
1507int mpegts_parse_packet(MpegTSContext *ts, AVPacket *pkt,
1508 const uint8_t *buf, int len)
1509{
1510 int len1;
1511
1512 len1 = len;
1513 ts->pkt = pkt;
1514 ts->stop_parse = 0;
1515 for(;;) {
1516 if (ts->stop_parse)
1517 break;
1518 if (len < TS_PACKET_SIZE)
1519 return -1;
1520 if (buf[0] != 0x47) {
550f0a9b 1521 buf++;
b45a7a18
FB
1522 len--;
1523 } else {
1524 handle_packet(ts, buf);
1525 buf += TS_PACKET_SIZE;
1526 len -= TS_PACKET_SIZE;
1527 }
1528 }
1529 return len1 - len;
1530}
1531
1532void mpegts_parse_close(MpegTSContext *ts)
1533{
1534 int i;
1535
1536 for(i=0;i<NB_PID_MAX;i++)
1537 av_free(ts->pids[i]);
1538 av_free(ts);
1539}
1540
d2a067d1 1541AVInputFormat mpegts_demuxer = {
fe9cf0d4
FB
1542 "mpegts",
1543 "MPEG2 transport stream format",
1544 sizeof(MpegTSContext),
1545 mpegts_probe,
1546 mpegts_read_header,
1547 mpegts_read_packet,
1548 mpegts_read_close,
e05655fb 1549 read_seek,
cdd5034f 1550 mpegts_get_pcr,
b45a7a18 1551 .flags = AVFMT_SHOW_IDS,
fe9cf0d4 1552};