09b06ef3ed634db09a9d765a2c78a2c6129308e5
[ffmpeg.git] / libavformat / dashdec.c
1 /*
2  * Dynamic Adaptive Streaming over HTTP demux
3  * Copyright (c) 2017 samsamsam@o2.pl based on HLS demux
4  * Copyright (c) 2017 Steven Liu
5  *
6  * This file is part of FFmpeg.
7  *
8  * FFmpeg is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * FFmpeg is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with FFmpeg; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22 #include <libxml/parser.h>
23 #include "libavutil/intreadwrite.h"
24 #include "libavutil/opt.h"
25 #include "libavutil/time.h"
26 #include "libavutil/parseutils.h"
27 #include "internal.h"
28 #include "avio_internal.h"
29 #include "dash.h"
30
31 #define INITIAL_BUFFER_SIZE 32768
32
33 struct fragment {
34     int64_t url_offset;
35     int64_t size;
36     char *url;
37 };
38
39 /*
40  * reference to : ISO_IEC_23009-1-DASH-2012
41  * Section: 5.3.9.6.2
42  * Table: Table 17 — Semantics of SegmentTimeline element
43  * */
44 struct timeline {
45     /* starttime: Element or Attribute Name
46      * specifies the MPD start time, in @timescale units,
47      * the first Segment in the series starts relative to the beginning of the Period.
48      * The value of this attribute must be equal to or greater than the sum of the previous S
49      * element earliest presentation time and the sum of the contiguous Segment durations.
50      * If the value of the attribute is greater than what is expressed by the previous S element,
51      * it expresses discontinuities in the timeline.
52      * If not present then the value shall be assumed to be zero for the first S element
53      * and for the subsequent S elements, the value shall be assumed to be the sum of
54      * the previous S element's earliest presentation time and contiguous duration
55      * (i.e. previous S@starttime + @duration * (@repeat + 1)).
56      * */
57     int64_t starttime;
58     /* repeat: Element or Attribute Name
59      * specifies the repeat count of the number of following contiguous Segments with
60      * the same duration expressed by the value of @duration. This value is zero-based
61      * (e.g. a value of three means four Segments in the contiguous series).
62      * */
63     int64_t repeat;
64     /* duration: Element or Attribute Name
65      * specifies the Segment duration, in units of the value of the @timescale.
66      * */
67     int64_t duration;
68 };
69
70 /*
71  * Each playlist has its own demuxer. If it is currently active,
72  * it has an opened AVIOContext too, and potentially an AVPacket
73  * containing the next packet from this stream.
74  */
75 struct representation {
76     char *url_template;
77     AVIOContext pb;
78     AVIOContext *input;
79     AVFormatContext *parent;
80     AVFormatContext *ctx;
81     AVPacket pkt;
82     int rep_idx;
83     int rep_count;
84     int stream_index;
85
86     enum AVMediaType type;
87     char id[20];
88     int bandwidth;
89     AVRational framerate;
90     AVStream *assoc_stream; /* demuxer stream associated with this representation */
91
92     int n_fragments;
93     struct fragment **fragments; /* VOD list of fragment for profile */
94
95     int n_timelines;
96     struct timeline **timelines;
97
98     int64_t first_seq_no;
99     int64_t last_seq_no;
100     int64_t start_number; /* used in case when we have dynamic list of segment to know which segments are new one*/
101
102     int64_t fragment_duration;
103     int64_t fragment_timescale;
104
105     int64_t presentation_timeoffset;
106
107     int64_t cur_seq_no;
108     int64_t cur_seg_offset;
109     int64_t cur_seg_size;
110     struct fragment *cur_seg;
111
112     /* Currently active Media Initialization Section */
113     struct fragment *init_section;
114     uint8_t *init_sec_buf;
115     uint32_t init_sec_buf_size;
116     uint32_t init_sec_data_len;
117     uint32_t init_sec_buf_read_offset;
118     int64_t cur_timestamp;
119     int is_restart_needed;
120 };
121
122 typedef struct DASHContext {
123     const AVClass *class;
124     char *base_url;
125
126     int n_videos;
127     struct representation **videos;
128     int n_audios;
129     struct representation **audios;
130
131     /* MediaPresentationDescription Attribute */
132     uint64_t media_presentation_duration;
133     uint64_t suggested_presentation_delay;
134     uint64_t availability_start_time;
135     uint64_t publish_time;
136     uint64_t minimum_update_period;
137     uint64_t time_shift_buffer_depth;
138     uint64_t min_buffer_time;
139
140     /* Period Attribute */
141     uint64_t period_duration;
142     uint64_t period_start;
143
144     int is_live;
145     AVIOInterruptCB *interrupt_callback;
146     char *allowed_extensions;
147     AVDictionary *avio_opts;
148     int max_url_size;
149
150     /* Flags for init section*/
151     int is_init_section_common_video;
152     int is_init_section_common_audio;
153
154 } DASHContext;
155
156 static int ishttp(char *url)
157 {
158     const char *proto_name = avio_find_protocol_name(url);
159     return av_strstart(proto_name, "http", NULL);
160 }
161
162 static int aligned(int val)
163 {
164     return ((val + 0x3F) >> 6) << 6;
165 }
166
167 static uint64_t get_current_time_in_sec(void)
168 {
169     return  av_gettime() / 1000000;
170 }
171
172 static uint64_t get_utc_date_time_insec(AVFormatContext *s, const char *datetime)
173 {
174     struct tm timeinfo;
175     int year = 0;
176     int month = 0;
177     int day = 0;
178     int hour = 0;
179     int minute = 0;
180     int ret = 0;
181     float second = 0.0;
182
183     /* ISO-8601 date parser */
184     if (!datetime)
185         return 0;
186
187     ret = sscanf(datetime, "%d-%d-%dT%d:%d:%fZ", &year, &month, &day, &hour, &minute, &second);
188     /* year, month, day, hour, minute, second  6 arguments */
189     if (ret != 6) {
190         av_log(s, AV_LOG_WARNING, "get_utc_date_time_insec get a wrong time format\n");
191     }
192     timeinfo.tm_year = year - 1900;
193     timeinfo.tm_mon  = month - 1;
194     timeinfo.tm_mday = day;
195     timeinfo.tm_hour = hour;
196     timeinfo.tm_min  = minute;
197     timeinfo.tm_sec  = (int)second;
198
199     return av_timegm(&timeinfo);
200 }
201
202 static uint32_t get_duration_insec(AVFormatContext *s, const char *duration)
203 {
204     /* ISO-8601 duration parser */
205     uint32_t days = 0;
206     uint32_t hours = 0;
207     uint32_t mins = 0;
208     uint32_t secs = 0;
209     int size = 0;
210     float value = 0;
211     char type = '\0';
212     const char *ptr = duration;
213
214     while (*ptr) {
215         if (*ptr == 'P' || *ptr == 'T') {
216             ptr++;
217             continue;
218         }
219
220         if (sscanf(ptr, "%f%c%n", &value, &type, &size) != 2) {
221             av_log(s, AV_LOG_WARNING, "get_duration_insec get a wrong time format\n");
222             return 0; /* parser error */
223         }
224         switch (type) {
225             case 'D':
226                 days = (uint32_t)value;
227                 break;
228             case 'H':
229                 hours = (uint32_t)value;
230                 break;
231             case 'M':
232                 mins = (uint32_t)value;
233                 break;
234             case 'S':
235                 secs = (uint32_t)value;
236                 break;
237             default:
238                 // handle invalid type
239                 break;
240         }
241         ptr += size;
242     }
243     return  ((days * 24 + hours) * 60 + mins) * 60 + secs;
244 }
245
246 static int64_t get_segment_start_time_based_on_timeline(struct representation *pls, int64_t cur_seq_no)
247 {
248     int64_t start_time = 0;
249     int64_t i = 0;
250     int64_t j = 0;
251     int64_t num = 0;
252
253     if (pls->n_timelines) {
254         for (i = 0; i < pls->n_timelines; i++) {
255             if (pls->timelines[i]->starttime > 0) {
256                 start_time = pls->timelines[i]->starttime;
257             }
258             if (num == cur_seq_no)
259                 goto finish;
260
261             start_time += pls->timelines[i]->duration;
262             for (j = 0; j < pls->timelines[i]->repeat; j++) {
263                 num++;
264                 if (num == cur_seq_no)
265                     goto finish;
266                 start_time += pls->timelines[i]->duration;
267             }
268             num++;
269         }
270     }
271 finish:
272     return start_time;
273 }
274
275 static int64_t calc_next_seg_no_from_timelines(struct representation *pls, int64_t cur_time)
276 {
277     int64_t i = 0;
278     int64_t j = 0;
279     int64_t num = 0;
280     int64_t start_time = 0;
281
282     for (i = 0; i < pls->n_timelines; i++) {
283         if (pls->timelines[i]->starttime > 0) {
284             start_time = pls->timelines[i]->starttime;
285         }
286         if (start_time > cur_time)
287             goto finish;
288
289         start_time += pls->timelines[i]->duration;
290         for (j = 0; j < pls->timelines[i]->repeat; j++) {
291             num++;
292             if (start_time > cur_time)
293                 goto finish;
294             start_time += pls->timelines[i]->duration;
295         }
296         num++;
297     }
298
299     return -1;
300
301 finish:
302     return num;
303 }
304
305 static void free_fragment(struct fragment **seg)
306 {
307     if (!(*seg)) {
308         return;
309     }
310     av_freep(&(*seg)->url);
311     av_freep(seg);
312 }
313
314 static void free_fragment_list(struct representation *pls)
315 {
316     int i;
317
318     for (i = 0; i < pls->n_fragments; i++) {
319         free_fragment(&pls->fragments[i]);
320     }
321     av_freep(&pls->fragments);
322     pls->n_fragments = 0;
323 }
324
325 static void free_timelines_list(struct representation *pls)
326 {
327     int i;
328
329     for (i = 0; i < pls->n_timelines; i++) {
330         av_freep(&pls->timelines[i]);
331     }
332     av_freep(&pls->timelines);
333     pls->n_timelines = 0;
334 }
335
336 static void free_representation(struct representation *pls)
337 {
338     free_fragment_list(pls);
339     free_timelines_list(pls);
340     free_fragment(&pls->cur_seg);
341     free_fragment(&pls->init_section);
342     av_freep(&pls->init_sec_buf);
343     av_freep(&pls->pb.buffer);
344     if (pls->input)
345         ff_format_io_close(pls->parent, &pls->input);
346     if (pls->ctx) {
347         pls->ctx->pb = NULL;
348         avformat_close_input(&pls->ctx);
349     }
350
351     av_freep(&pls->url_template);
352     av_freep(&pls);
353 }
354
355 static void free_video_list(DASHContext *c)
356 {
357     int i;
358     for (i = 0; i < c->n_videos; i++) {
359         struct representation *pls = c->videos[i];
360         free_representation(pls);
361     }
362     av_freep(&c->videos);
363     c->n_videos = 0;
364 }
365
366 static void free_audio_list(DASHContext *c)
367 {
368     int i;
369     for (i = 0; i < c->n_audios; i++) {
370         struct representation *pls = c->audios[i];
371         free_representation(pls);
372     }
373     av_freep(&c->audios);
374     c->n_audios = 0;
375 }
376
377 static int open_url(AVFormatContext *s, AVIOContext **pb, const char *url,
378                     AVDictionary *opts, AVDictionary *opts2, int *is_http)
379 {
380     DASHContext *c = s->priv_data;
381     AVDictionary *tmp = NULL;
382     const char *proto_name = NULL;
383     int ret;
384
385     av_dict_copy(&tmp, opts, 0);
386     av_dict_copy(&tmp, opts2, 0);
387
388     if (av_strstart(url, "crypto", NULL)) {
389         if (url[6] == '+' || url[6] == ':')
390             proto_name = avio_find_protocol_name(url + 7);
391     }
392
393     if (!proto_name)
394         proto_name = avio_find_protocol_name(url);
395
396     if (!proto_name)
397         return AVERROR_INVALIDDATA;
398
399     // only http(s) & file are allowed
400     if (av_strstart(proto_name, "file", NULL)) {
401         if (strcmp(c->allowed_extensions, "ALL") && !av_match_ext(url, c->allowed_extensions)) {
402             av_log(s, AV_LOG_ERROR,
403                    "Filename extension of \'%s\' is not a common multimedia extension, blocked for security reasons.\n"
404                    "If you wish to override this adjust allowed_extensions, you can set it to \'ALL\' to allow all\n",
405                    url);
406             return AVERROR_INVALIDDATA;
407         }
408     } else if (av_strstart(proto_name, "http", NULL)) {
409         ;
410     } else
411         return AVERROR_INVALIDDATA;
412
413     if (!strncmp(proto_name, url, strlen(proto_name)) && url[strlen(proto_name)] == ':')
414         ;
415     else if (av_strstart(url, "crypto", NULL) && !strncmp(proto_name, url + 7, strlen(proto_name)) && url[7 + strlen(proto_name)] == ':')
416         ;
417     else if (strcmp(proto_name, "file") || !strncmp(url, "file,", 5))
418         return AVERROR_INVALIDDATA;
419
420     av_freep(pb);
421     ret = avio_open2(pb, url, AVIO_FLAG_READ, c->interrupt_callback, &tmp);
422     if (ret >= 0) {
423         // update cookies on http response with setcookies.
424         char *new_cookies = NULL;
425
426         if (!(s->flags & AVFMT_FLAG_CUSTOM_IO))
427             av_opt_get(*pb, "cookies", AV_OPT_SEARCH_CHILDREN, (uint8_t**)&new_cookies);
428
429         if (new_cookies) {
430             av_dict_set(&opts, "cookies", new_cookies, AV_DICT_DONT_STRDUP_VAL);
431         }
432
433     }
434
435     av_dict_free(&tmp);
436
437     if (is_http)
438         *is_http = av_strstart(proto_name, "http", NULL);
439
440     return ret;
441 }
442
443 static char *get_content_url(xmlNodePtr *baseurl_nodes,
444                              int n_baseurl_nodes,
445                              int max_url_size,
446                              char *rep_id_val,
447                              char *rep_bandwidth_val,
448                              char *val)
449 {
450     int i;
451     char *text;
452     char *url = NULL;
453     char *tmp_str = av_mallocz(max_url_size);
454     char *tmp_str_2 = av_mallocz(max_url_size);
455
456     if (!tmp_str || !tmp_str_2) {
457         return NULL;
458     }
459
460     for (i = 0; i < n_baseurl_nodes; ++i) {
461         if (baseurl_nodes[i] &&
462             baseurl_nodes[i]->children &&
463             baseurl_nodes[i]->children->type == XML_TEXT_NODE) {
464             text = xmlNodeGetContent(baseurl_nodes[i]->children);
465             if (text) {
466                 memset(tmp_str, 0, max_url_size);
467                 memset(tmp_str_2, 0, max_url_size);
468                 ff_make_absolute_url(tmp_str_2, max_url_size, tmp_str, text);
469                 av_strlcpy(tmp_str, tmp_str_2, max_url_size);
470                 xmlFree(text);
471             }
472         }
473     }
474
475     if (val)
476         av_strlcat(tmp_str, (const char*)val, max_url_size);
477
478     if (rep_id_val) {
479         url = av_strireplace(tmp_str, "$RepresentationID$", (const char*)rep_id_val);
480         if (!url) {
481             goto end;
482         }
483         av_strlcpy(tmp_str, url, max_url_size);
484     }
485     if (rep_bandwidth_val && tmp_str[0] != '\0') {
486         // free any previously assigned url before reassigning
487         av_free(url);
488         url = av_strireplace(tmp_str, "$Bandwidth$", (const char*)rep_bandwidth_val);
489         if (!url) {
490             goto end;
491         }
492     }
493 end:
494     av_free(tmp_str);
495     av_free(tmp_str_2);
496     return url;
497 }
498
499 static char *get_val_from_nodes_tab(xmlNodePtr *nodes, const int n_nodes, const char *attrname)
500 {
501     int i;
502     char *val;
503
504     for (i = 0; i < n_nodes; ++i) {
505         if (nodes[i]) {
506             val = xmlGetProp(nodes[i], attrname);
507             if (val)
508                 return val;
509         }
510     }
511
512     return NULL;
513 }
514
515 static xmlNodePtr find_child_node_by_name(xmlNodePtr rootnode, const char *nodename)
516 {
517     xmlNodePtr node = rootnode;
518     if (!node) {
519         return NULL;
520     }
521
522     node = xmlFirstElementChild(node);
523     while (node) {
524         if (!av_strcasecmp(node->name, nodename)) {
525             return node;
526         }
527         node = xmlNextElementSibling(node);
528     }
529     return NULL;
530 }
531
532 static enum AVMediaType get_content_type(xmlNodePtr node)
533 {
534     enum AVMediaType type = AVMEDIA_TYPE_UNKNOWN;
535     int i = 0;
536     const char *attr;
537     char *val = NULL;
538
539     if (node) {
540         for (i = 0; i < 2; i++) {
541             attr = i ? "mimeType" : "contentType";
542             val = xmlGetProp(node, attr);
543             if (val) {
544                 if (av_stristr((const char *)val, "video")) {
545                     type = AVMEDIA_TYPE_VIDEO;
546                 } else if (av_stristr((const char *)val, "audio")) {
547                     type = AVMEDIA_TYPE_AUDIO;
548                 }
549                 xmlFree(val);
550             }
551         }
552     }
553     return type;
554 }
555
556 static struct fragment * get_Fragment(char *range)
557 {
558     struct fragment * seg =  av_mallocz(sizeof(struct fragment));
559
560     if (!seg)
561         return NULL;
562
563     seg->size = -1;
564     if (range) {
565         char *str_end_offset;
566         char *str_offset = av_strtok(range, "-", &str_end_offset);
567         seg->url_offset = strtoll(str_offset, NULL, 10);
568         seg->size = strtoll(str_end_offset, NULL, 10) - seg->url_offset;
569     }
570
571     return seg;
572 }
573
574 static int parse_manifest_segmenturlnode(AVFormatContext *s, struct representation *rep,
575                                          xmlNodePtr fragmenturl_node,
576                                          xmlNodePtr *baseurl_nodes,
577                                          char *rep_id_val,
578                                          char *rep_bandwidth_val)
579 {
580     DASHContext *c = s->priv_data;
581     char *initialization_val = NULL;
582     char *media_val = NULL;
583     char *range_val = NULL;
584     int max_url_size = c ? c->max_url_size: MAX_URL_SIZE;
585
586     if (!av_strcasecmp(fragmenturl_node->name, (const char *)"Initialization")) {
587         initialization_val = xmlGetProp(fragmenturl_node, "sourceURL");
588         range_val = xmlGetProp(fragmenturl_node, "range");
589         if (initialization_val || range_val) {
590             rep->init_section = get_Fragment(range_val);
591             if (!rep->init_section) {
592                 xmlFree(initialization_val);
593                 xmlFree(range_val);
594                 return AVERROR(ENOMEM);
595             }
596             rep->init_section->url = get_content_url(baseurl_nodes, 4,
597                                                      max_url_size,
598                                                      rep_id_val,
599                                                      rep_bandwidth_val,
600                                                      initialization_val);
601
602             if (!rep->init_section->url) {
603                 av_free(rep->init_section);
604                 xmlFree(initialization_val);
605                 xmlFree(range_val);
606                 return AVERROR(ENOMEM);
607             }
608             xmlFree(initialization_val);
609             xmlFree(range_val);
610         }
611     } else if (!av_strcasecmp(fragmenturl_node->name, (const char *)"SegmentURL")) {
612         media_val = xmlGetProp(fragmenturl_node, "media");
613         range_val = xmlGetProp(fragmenturl_node, "mediaRange");
614         if (media_val || range_val) {
615             struct fragment *seg = get_Fragment(range_val);
616             if (!seg) {
617                 xmlFree(media_val);
618                 xmlFree(range_val);
619                 return AVERROR(ENOMEM);
620             }
621             seg->url = get_content_url(baseurl_nodes, 4,
622                                        max_url_size,
623                                        rep_id_val,
624                                        rep_bandwidth_val,
625                                        media_val);
626             if (!seg->url) {
627                 av_free(seg);
628                 xmlFree(media_val);
629                 xmlFree(range_val);
630                 return AVERROR(ENOMEM);
631             }
632             dynarray_add(&rep->fragments, &rep->n_fragments, seg);
633             xmlFree(media_val);
634             xmlFree(range_val);
635         }
636     }
637
638     return 0;
639 }
640
641 static int parse_manifest_segmenttimeline(AVFormatContext *s, struct representation *rep,
642                                           xmlNodePtr fragment_timeline_node)
643 {
644     xmlAttrPtr attr = NULL;
645     char *val  = NULL;
646
647     if (!av_strcasecmp(fragment_timeline_node->name, (const char *)"S")) {
648         struct timeline *tml = av_mallocz(sizeof(struct timeline));
649         if (!tml) {
650             return AVERROR(ENOMEM);
651         }
652         attr = fragment_timeline_node->properties;
653         while (attr) {
654             val = xmlGetProp(fragment_timeline_node, attr->name);
655
656             if (!val) {
657                 av_log(s, AV_LOG_WARNING, "parse_manifest_segmenttimeline attr->name = %s val is NULL\n", attr->name);
658                 continue;
659             }
660
661             if (!av_strcasecmp(attr->name, (const char *)"t")) {
662                 tml->starttime = (int64_t)strtoll(val, NULL, 10);
663             } else if (!av_strcasecmp(attr->name, (const char *)"r")) {
664                 tml->repeat =(int64_t) strtoll(val, NULL, 10);
665             } else if (!av_strcasecmp(attr->name, (const char *)"d")) {
666                 tml->duration = (int64_t)strtoll(val, NULL, 10);
667             }
668             attr = attr->next;
669             xmlFree(val);
670         }
671         dynarray_add(&rep->timelines, &rep->n_timelines, tml);
672     }
673
674     return 0;
675 }
676
677 static int resolve_content_path(AVFormatContext *s, const char *url, int *max_url_size, xmlNodePtr *baseurl_nodes, int n_baseurl_nodes) {
678
679     char *tmp_str = NULL;
680     char *path = NULL;
681     char *mpdName = NULL;
682     xmlNodePtr node = NULL;
683     char *baseurl = NULL;
684     char *root_url = NULL;
685     char *text = NULL;
686     char *tmp = NULL;
687
688     int isRootHttp = 0;
689     char token ='/';
690     int start =  0;
691     int rootId = 0;
692     int updated = 0;
693     int size = 0;
694     int i;
695     int tmp_max_url_size = strlen(url);
696
697     for (i = n_baseurl_nodes-1; i >= 0 ; i--) {
698         text = xmlNodeGetContent(baseurl_nodes[i]);
699         if (!text)
700             continue;
701         tmp_max_url_size += strlen(text);
702         if (ishttp(text)) {
703             xmlFree(text);
704             break;
705         }
706         xmlFree(text);
707     }
708
709     tmp_max_url_size = aligned(tmp_max_url_size);
710     text = av_mallocz(tmp_max_url_size);
711     if (!text) {
712         updated = AVERROR(ENOMEM);
713         goto end;
714     }
715     av_strlcpy(text, url, strlen(url)+1);
716     tmp = text;
717     while (mpdName = av_strtok(tmp, "/", &tmp))  {
718         size = strlen(mpdName);
719     }
720     av_free(text);
721
722     path = av_mallocz(tmp_max_url_size);
723     tmp_str = av_mallocz(tmp_max_url_size);
724     if (!tmp_str || !path) {
725         updated = AVERROR(ENOMEM);
726         goto end;
727     }
728
729     av_strlcpy (path, url, strlen(url) - size + 1);
730     for (rootId = n_baseurl_nodes - 1; rootId > 0; rootId --) {
731         if (!(node = baseurl_nodes[rootId])) {
732             continue;
733         }
734         text = xmlNodeGetContent(node);
735         if (ishttp(text)) {
736             xmlFree(text);
737             break;
738         }
739         xmlFree(text);
740     }
741
742     node = baseurl_nodes[rootId];
743     baseurl = xmlNodeGetContent(node);
744     root_url = (av_strcasecmp(baseurl, "")) ? baseurl : path;
745     if (node) {
746         xmlNodeSetContent(node, root_url);
747         updated = 1;
748     }
749
750     size = strlen(root_url);
751     isRootHttp = ishttp(root_url);
752
753     if (root_url[size - 1] != token) {
754         av_strlcat(root_url, "/", size + 2);
755         size += 2;
756     }
757
758     for (i = 0; i < n_baseurl_nodes; ++i) {
759         if (i == rootId) {
760             continue;
761         }
762         text = xmlNodeGetContent(baseurl_nodes[i]);
763         if (text) {
764             memset(tmp_str, 0, strlen(tmp_str));
765             if (!ishttp(text) && isRootHttp) {
766                 av_strlcpy(tmp_str, root_url, size + 1);
767             }
768             start = (text[0] == token);
769             av_strlcat(tmp_str, text + start, tmp_max_url_size);
770             xmlNodeSetContent(baseurl_nodes[i], tmp_str);
771             updated = 1;
772             xmlFree(text);
773         }
774     }
775
776 end:
777     if (tmp_max_url_size > *max_url_size) {
778         *max_url_size = tmp_max_url_size;
779     }
780     av_free(path);
781     av_free(tmp_str);
782     xmlFree(baseurl);
783     return updated;
784
785 }
786
787 static int parse_manifest_representation(AVFormatContext *s, const char *url,
788                                          xmlNodePtr node,
789                                          xmlNodePtr adaptionset_node,
790                                          xmlNodePtr mpd_baseurl_node,
791                                          xmlNodePtr period_baseurl_node,
792                                          xmlNodePtr period_segmenttemplate_node,
793                                          xmlNodePtr period_segmentlist_node,
794                                          xmlNodePtr fragment_template_node,
795                                          xmlNodePtr content_component_node,
796                                          xmlNodePtr adaptionset_baseurl_node,
797                                          xmlNodePtr adaptionset_segmentlist_node,
798                                          xmlNodePtr adaptionset_supplementalproperty_node)
799 {
800     int32_t ret = 0;
801     int32_t audio_rep_idx = 0;
802     int32_t video_rep_idx = 0;
803     DASHContext *c = s->priv_data;
804     struct representation *rep = NULL;
805     struct fragment *seg = NULL;
806     xmlNodePtr representation_segmenttemplate_node = NULL;
807     xmlNodePtr representation_baseurl_node = NULL;
808     xmlNodePtr representation_segmentlist_node = NULL;
809     xmlNodePtr segmentlists_tab[2];
810     xmlNodePtr fragment_timeline_node = NULL;
811     xmlNodePtr fragment_templates_tab[5];
812     char *duration_val = NULL;
813     char *presentation_timeoffset_val = NULL;
814     char *startnumber_val = NULL;
815     char *timescale_val = NULL;
816     char *initialization_val = NULL;
817     char *media_val = NULL;
818     char *val = NULL;
819     xmlNodePtr baseurl_nodes[4];
820     xmlNodePtr representation_node = node;
821     char *rep_id_val = xmlGetProp(representation_node, "id");
822     char *rep_bandwidth_val = xmlGetProp(representation_node, "bandwidth");
823     char *rep_framerate_val = xmlGetProp(representation_node, "frameRate");
824     enum AVMediaType type = AVMEDIA_TYPE_UNKNOWN;
825
826     // try get information from representation
827     if (type == AVMEDIA_TYPE_UNKNOWN)
828         type = get_content_type(representation_node);
829     // try get information from contentComponen
830     if (type == AVMEDIA_TYPE_UNKNOWN)
831         type = get_content_type(content_component_node);
832     // try get information from adaption set
833     if (type == AVMEDIA_TYPE_UNKNOWN)
834         type = get_content_type(adaptionset_node);
835     if (type == AVMEDIA_TYPE_UNKNOWN) {
836         av_log(s, AV_LOG_VERBOSE, "Parsing '%s' - skipp not supported representation type\n", url);
837     } else if (type == AVMEDIA_TYPE_VIDEO || type == AVMEDIA_TYPE_AUDIO) {
838         // convert selected representation to our internal struct
839         rep = av_mallocz(sizeof(struct representation));
840         if (!rep) {
841             ret = AVERROR(ENOMEM);
842             goto end;
843         }
844         representation_segmenttemplate_node = find_child_node_by_name(representation_node, "SegmentTemplate");
845         representation_baseurl_node = find_child_node_by_name(representation_node, "BaseURL");
846         representation_segmentlist_node = find_child_node_by_name(representation_node, "SegmentList");
847
848         baseurl_nodes[0] = mpd_baseurl_node;
849         baseurl_nodes[1] = period_baseurl_node;
850         baseurl_nodes[2] = adaptionset_baseurl_node;
851         baseurl_nodes[3] = representation_baseurl_node;
852
853         ret = resolve_content_path(s, url, &c->max_url_size, baseurl_nodes, 4);
854         c->max_url_size = aligned(c->max_url_size  + strlen(rep_id_val) + strlen(rep_bandwidth_val));
855         if (ret == AVERROR(ENOMEM) || ret == 0) {
856             goto end;
857         }
858         if (representation_segmenttemplate_node || fragment_template_node || period_segmenttemplate_node) {
859             fragment_timeline_node = NULL;
860             fragment_templates_tab[0] = representation_segmenttemplate_node;
861             fragment_templates_tab[1] = adaptionset_segmentlist_node;
862             fragment_templates_tab[2] = fragment_template_node;
863             fragment_templates_tab[3] = period_segmenttemplate_node;
864             fragment_templates_tab[4] = period_segmentlist_node;
865
866             presentation_timeoffset_val = get_val_from_nodes_tab(fragment_templates_tab, 4, "presentationTimeOffset");
867             duration_val = get_val_from_nodes_tab(fragment_templates_tab, 4, "duration");
868             startnumber_val = get_val_from_nodes_tab(fragment_templates_tab, 4, "startNumber");
869             timescale_val = get_val_from_nodes_tab(fragment_templates_tab, 4, "timescale");
870             initialization_val = get_val_from_nodes_tab(fragment_templates_tab, 4, "initialization");
871             media_val = get_val_from_nodes_tab(fragment_templates_tab, 4, "media");
872
873             if (initialization_val) {
874                 rep->init_section = av_mallocz(sizeof(struct fragment));
875                 if (!rep->init_section) {
876                     av_free(rep);
877                     ret = AVERROR(ENOMEM);
878                     goto end;
879                 }
880                 c->max_url_size = aligned(c->max_url_size  + strlen(initialization_val));
881                 rep->init_section->url = get_content_url(baseurl_nodes, 4,  c->max_url_size, rep_id_val, rep_bandwidth_val, initialization_val);
882                 if (!rep->init_section->url) {
883                     av_free(rep->init_section);
884                     av_free(rep);
885                     ret = AVERROR(ENOMEM);
886                     goto end;
887                 }
888                 rep->init_section->size = -1;
889                 xmlFree(initialization_val);
890             }
891
892             if (media_val) {
893                 c->max_url_size = aligned(c->max_url_size  + strlen(media_val));
894                 rep->url_template = get_content_url(baseurl_nodes, 4, c->max_url_size, rep_id_val, rep_bandwidth_val, media_val);
895                 xmlFree(media_val);
896             }
897
898             if (presentation_timeoffset_val) {
899                 rep->presentation_timeoffset = (int64_t) strtoll(presentation_timeoffset_val, NULL, 10);
900                 xmlFree(presentation_timeoffset_val);
901             }
902             if (duration_val) {
903                 rep->fragment_duration = (int64_t) strtoll(duration_val, NULL, 10);
904                 xmlFree(duration_val);
905             }
906             if (timescale_val) {
907                 rep->fragment_timescale = (int64_t) strtoll(timescale_val, NULL, 10);
908                 xmlFree(timescale_val);
909             }
910             if (startnumber_val) {
911                 rep->first_seq_no = (int64_t) strtoll(startnumber_val, NULL, 10);
912                 xmlFree(startnumber_val);
913             }
914             if (adaptionset_supplementalproperty_node) {
915                 if (!av_strcasecmp(xmlGetProp(adaptionset_supplementalproperty_node,"schemeIdUri"), "http://dashif.org/guidelines/last-segment-number")) {
916                     val = xmlGetProp(adaptionset_supplementalproperty_node,"value");
917                     if (!val) {
918                         av_log(s, AV_LOG_ERROR, "Missing value attribute in adaptionset_supplementalproperty_node\n");
919                     } else {
920                         rep->last_seq_no =(int64_t) strtoll(val, NULL, 10) - 1;
921                         xmlFree(val);
922                     }
923                 }
924             }
925
926             fragment_timeline_node = find_child_node_by_name(representation_segmenttemplate_node, "SegmentTimeline");
927
928             if (!fragment_timeline_node)
929                 fragment_timeline_node = find_child_node_by_name(fragment_template_node, "SegmentTimeline");
930             if (!fragment_timeline_node)
931                 fragment_timeline_node = find_child_node_by_name(adaptionset_segmentlist_node, "SegmentTimeline");
932             if (!fragment_timeline_node)
933                 fragment_timeline_node = find_child_node_by_name(period_segmentlist_node, "SegmentTimeline");
934             if (fragment_timeline_node) {
935                 fragment_timeline_node = xmlFirstElementChild(fragment_timeline_node);
936                 while (fragment_timeline_node) {
937                     ret = parse_manifest_segmenttimeline(s, rep, fragment_timeline_node);
938                     if (ret < 0) {
939                         return ret;
940                     }
941                     fragment_timeline_node = xmlNextElementSibling(fragment_timeline_node);
942                 }
943             }
944         } else if (representation_baseurl_node && !representation_segmentlist_node) {
945             seg = av_mallocz(sizeof(struct fragment));
946             if (!seg) {
947                 ret = AVERROR(ENOMEM);
948                 goto end;
949             }
950             seg->url = get_content_url(baseurl_nodes, 4, c->max_url_size, rep_id_val, rep_bandwidth_val, NULL);
951             if (!seg->url) {
952                 av_free(seg);
953                 ret = AVERROR(ENOMEM);
954                 goto end;
955             }
956             seg->size = -1;
957             dynarray_add(&rep->fragments, &rep->n_fragments, seg);
958         } else if (representation_segmentlist_node) {
959             // TODO: https://www.brendanlong.com/the-structure-of-an-mpeg-dash-mpd.html
960             // http://www-itec.uni-klu.ac.at/dash/ddash/mpdGenerator.php?fragmentlength=15&type=full
961             xmlNodePtr fragmenturl_node = NULL;
962             segmentlists_tab[0] = representation_segmentlist_node;
963             segmentlists_tab[1] = adaptionset_segmentlist_node;
964
965             duration_val = get_val_from_nodes_tab(segmentlists_tab, 2, "duration");
966             timescale_val = get_val_from_nodes_tab(segmentlists_tab, 2, "timescale");
967             if (duration_val) {
968                 rep->fragment_duration = (int64_t) strtoll(duration_val, NULL, 10);
969                 xmlFree(duration_val);
970             }
971             if (timescale_val) {
972                 rep->fragment_timescale = (int64_t) strtoll(timescale_val, NULL, 10);
973                 xmlFree(timescale_val);
974             }
975             fragmenturl_node = xmlFirstElementChild(representation_segmentlist_node);
976             while (fragmenturl_node) {
977                 ret = parse_manifest_segmenturlnode(s, rep, fragmenturl_node,
978                                                     baseurl_nodes,
979                                                     rep_id_val,
980                                                     rep_bandwidth_val);
981                 if (ret < 0) {
982                     return ret;
983                 }
984                 fragmenturl_node = xmlNextElementSibling(fragmenturl_node);
985             }
986
987             fragment_timeline_node = find_child_node_by_name(representation_segmenttemplate_node, "SegmentTimeline");
988
989             if (!fragment_timeline_node)
990                 fragment_timeline_node = find_child_node_by_name(fragment_template_node, "SegmentTimeline");
991             if (!fragment_timeline_node)
992                 fragment_timeline_node = find_child_node_by_name(adaptionset_segmentlist_node, "SegmentTimeline");
993             if (!fragment_timeline_node)
994                 fragment_timeline_node = find_child_node_by_name(period_segmentlist_node, "SegmentTimeline");
995             if (fragment_timeline_node) {
996                 fragment_timeline_node = xmlFirstElementChild(fragment_timeline_node);
997                 while (fragment_timeline_node) {
998                     ret = parse_manifest_segmenttimeline(s, rep, fragment_timeline_node);
999                     if (ret < 0) {
1000                         return ret;
1001                     }
1002                     fragment_timeline_node = xmlNextElementSibling(fragment_timeline_node);
1003                 }
1004             }
1005         } else {
1006             free_representation(rep);
1007             rep = NULL;
1008             av_log(s, AV_LOG_ERROR, "Unknown format of Representation node id[%s] \n", (const char *)rep_id_val);
1009         }
1010
1011         if (rep) {
1012             if (rep->fragment_duration > 0 && !rep->fragment_timescale)
1013                 rep->fragment_timescale = 1;
1014             rep->bandwidth = rep_bandwidth_val ? atoi(rep_bandwidth_val) : 0;
1015             strncpy(rep->id, rep_id_val ? rep_id_val : "", sizeof(rep->id));
1016             rep->framerate = av_make_q(0, 0);
1017             if (type == AVMEDIA_TYPE_VIDEO && rep_framerate_val) {
1018                 ret = av_parse_video_rate(&rep->framerate, rep_framerate_val);
1019                 if (ret < 0)
1020                     av_log(s, AV_LOG_VERBOSE, "Ignoring invalid frame rate '%s'\n", rep_framerate_val);
1021             }
1022
1023             if (type == AVMEDIA_TYPE_VIDEO) {
1024                 rep->rep_idx = video_rep_idx;
1025                 dynarray_add(&c->videos, &c->n_videos, rep);
1026             } else {
1027                 rep->rep_idx = audio_rep_idx;
1028                 dynarray_add(&c->audios, &c->n_audios, rep);
1029             }
1030         }
1031     }
1032
1033     video_rep_idx += type == AVMEDIA_TYPE_VIDEO;
1034     audio_rep_idx += type == AVMEDIA_TYPE_AUDIO;
1035
1036 end:
1037     if (rep_id_val)
1038         xmlFree(rep_id_val);
1039     if (rep_bandwidth_val)
1040         xmlFree(rep_bandwidth_val);
1041     if (rep_framerate_val)
1042         xmlFree(rep_framerate_val);
1043
1044     return ret;
1045 }
1046
1047 static int parse_manifest_adaptationset(AVFormatContext *s, const char *url,
1048                                         xmlNodePtr adaptionset_node,
1049                                         xmlNodePtr mpd_baseurl_node,
1050                                         xmlNodePtr period_baseurl_node,
1051                                         xmlNodePtr period_segmenttemplate_node,
1052                                         xmlNodePtr period_segmentlist_node)
1053 {
1054     int ret = 0;
1055     xmlNodePtr fragment_template_node = NULL;
1056     xmlNodePtr content_component_node = NULL;
1057     xmlNodePtr adaptionset_baseurl_node = NULL;
1058     xmlNodePtr adaptionset_segmentlist_node = NULL;
1059     xmlNodePtr adaptionset_supplementalproperty_node = NULL;
1060     xmlNodePtr node = NULL;
1061
1062     node = xmlFirstElementChild(adaptionset_node);
1063     while (node) {
1064         if (!av_strcasecmp(node->name, (const char *)"SegmentTemplate")) {
1065             fragment_template_node = node;
1066         } else if (!av_strcasecmp(node->name, (const char *)"ContentComponent")) {
1067             content_component_node = node;
1068         } else if (!av_strcasecmp(node->name, (const char *)"BaseURL")) {
1069             adaptionset_baseurl_node = node;
1070         } else if (!av_strcasecmp(node->name, (const char *)"SegmentList")) {
1071             adaptionset_segmentlist_node = node;
1072         } else if (!av_strcasecmp(node->name, (const char *)"SupplementalProperty")) {
1073             adaptionset_supplementalproperty_node = node;
1074         } else if (!av_strcasecmp(node->name, (const char *)"Representation")) {
1075             ret = parse_manifest_representation(s, url, node,
1076                                                 adaptionset_node,
1077                                                 mpd_baseurl_node,
1078                                                 period_baseurl_node,
1079                                                 period_segmenttemplate_node,
1080                                                 period_segmentlist_node,
1081                                                 fragment_template_node,
1082                                                 content_component_node,
1083                                                 adaptionset_baseurl_node,
1084                                                 adaptionset_segmentlist_node,
1085                                                 adaptionset_supplementalproperty_node);
1086             if (ret < 0) {
1087                 return ret;
1088             }
1089         }
1090         node = xmlNextElementSibling(node);
1091     }
1092     return 0;
1093 }
1094
1095 static int parse_manifest(AVFormatContext *s, const char *url, AVIOContext *in)
1096 {
1097     DASHContext *c = s->priv_data;
1098     int ret = 0;
1099     int close_in = 0;
1100     uint8_t *new_url = NULL;
1101     int64_t filesize = 0;
1102     char *buffer = NULL;
1103     AVDictionary *opts = NULL;
1104     xmlDoc *doc = NULL;
1105     xmlNodePtr root_element = NULL;
1106     xmlNodePtr node = NULL;
1107     xmlNodePtr period_node = NULL;
1108     xmlNodePtr tmp_node = NULL;
1109     xmlNodePtr mpd_baseurl_node = NULL;
1110     xmlNodePtr period_baseurl_node = NULL;
1111     xmlNodePtr period_segmenttemplate_node = NULL;
1112     xmlNodePtr period_segmentlist_node = NULL;
1113     xmlNodePtr adaptionset_node = NULL;
1114     xmlAttrPtr attr = NULL;
1115     char *val  = NULL;
1116     uint32_t period_duration_sec = 0;
1117     uint32_t period_start_sec = 0;
1118
1119     if (!in) {
1120         close_in = 1;
1121
1122         av_dict_copy(&opts, c->avio_opts, 0);
1123         ret = avio_open2(&in, url, AVIO_FLAG_READ, c->interrupt_callback, &opts);
1124         av_dict_free(&opts);
1125         if (ret < 0)
1126             return ret;
1127     }
1128
1129     if (av_opt_get(in, "location", AV_OPT_SEARCH_CHILDREN, &new_url) >= 0) {
1130         c->base_url = av_strdup(new_url);
1131     } else {
1132         c->base_url = av_strdup(url);
1133     }
1134
1135     filesize = avio_size(in);
1136     if (filesize <= 0) {
1137         filesize = 8 * 1024;
1138     }
1139
1140     buffer = av_mallocz(filesize);
1141     if (!buffer) {
1142         av_free(c->base_url);
1143         return AVERROR(ENOMEM);
1144     }
1145
1146     filesize = avio_read(in, buffer, filesize);
1147     if (filesize <= 0) {
1148         av_log(s, AV_LOG_ERROR, "Unable to read to offset '%s'\n", url);
1149         ret = AVERROR_INVALIDDATA;
1150     } else {
1151         LIBXML_TEST_VERSION
1152
1153             doc = xmlReadMemory(buffer, filesize, c->base_url, NULL, 0);
1154         root_element = xmlDocGetRootElement(doc);
1155         node = root_element;
1156
1157         if (!node) {
1158             ret = AVERROR_INVALIDDATA;
1159             av_log(s, AV_LOG_ERROR, "Unable to parse '%s' - missing root node\n", url);
1160             goto cleanup;
1161         }
1162
1163         if (node->type != XML_ELEMENT_NODE ||
1164             av_strcasecmp(node->name, (const char *)"MPD")) {
1165             ret = AVERROR_INVALIDDATA;
1166             av_log(s, AV_LOG_ERROR, "Unable to parse '%s' - wrong root node name[%s] type[%d]\n", url, node->name, (int)node->type);
1167             goto cleanup;
1168         }
1169
1170         val = xmlGetProp(node, "type");
1171         if (!val) {
1172             av_log(s, AV_LOG_ERROR, "Unable to parse '%s' - missing type attrib\n", url);
1173             ret = AVERROR_INVALIDDATA;
1174             goto cleanup;
1175         }
1176         if (!av_strcasecmp(val, (const char *)"dynamic"))
1177             c->is_live = 1;
1178         xmlFree(val);
1179
1180         attr = node->properties;
1181         while (attr) {
1182             val = xmlGetProp(node, attr->name);
1183
1184             if (!av_strcasecmp(attr->name, (const char *)"availabilityStartTime")) {
1185                 c->availability_start_time = get_utc_date_time_insec(s, (const char *)val);
1186             } else if (!av_strcasecmp(attr->name, (const char *)"publishTime")) {
1187                 c->publish_time = get_utc_date_time_insec(s, (const char *)val);
1188             } else if (!av_strcasecmp(attr->name, (const char *)"minimumUpdatePeriod")) {
1189                 c->minimum_update_period = get_duration_insec(s, (const char *)val);
1190             } else if (!av_strcasecmp(attr->name, (const char *)"timeShiftBufferDepth")) {
1191                 c->time_shift_buffer_depth = get_duration_insec(s, (const char *)val);
1192             } else if (!av_strcasecmp(attr->name, (const char *)"minBufferTime")) {
1193                 c->min_buffer_time = get_duration_insec(s, (const char *)val);
1194             } else if (!av_strcasecmp(attr->name, (const char *)"suggestedPresentationDelay")) {
1195                 c->suggested_presentation_delay = get_duration_insec(s, (const char *)val);
1196             } else if (!av_strcasecmp(attr->name, (const char *)"mediaPresentationDuration")) {
1197                 c->media_presentation_duration = get_duration_insec(s, (const char *)val);
1198             }
1199             attr = attr->next;
1200             xmlFree(val);
1201         }
1202
1203         tmp_node = find_child_node_by_name(node, "BaseURL");
1204         if (tmp_node) {
1205             mpd_baseurl_node = xmlCopyNode(tmp_node,1);
1206         } else {
1207             mpd_baseurl_node = xmlNewNode(NULL, "BaseURL");
1208         }
1209
1210         // at now we can handle only one period, with the longest duration
1211         node = xmlFirstElementChild(node);
1212         while (node) {
1213             if (!av_strcasecmp(node->name, (const char *)"Period")) {
1214                 period_duration_sec = 0;
1215                 period_start_sec = 0;
1216                 attr = node->properties;
1217                 while (attr) {
1218                     val = xmlGetProp(node, attr->name);
1219                     if (!av_strcasecmp(attr->name, (const char *)"duration")) {
1220                         period_duration_sec = get_duration_insec(s, (const char *)val);
1221                     } else if (!av_strcasecmp(attr->name, (const char *)"start")) {
1222                         period_start_sec = get_duration_insec(s, (const char *)val);
1223                     }
1224                     attr = attr->next;
1225                     xmlFree(val);
1226                 }
1227                 if ((period_duration_sec) >= (c->period_duration)) {
1228                     period_node = node;
1229                     c->period_duration = period_duration_sec;
1230                     c->period_start = period_start_sec;
1231                     if (c->period_start > 0)
1232                         c->media_presentation_duration = c->period_duration;
1233                 }
1234             }
1235             node = xmlNextElementSibling(node);
1236         }
1237         if (!period_node) {
1238             av_log(s, AV_LOG_ERROR, "Unable to parse '%s' - missing Period node\n", url);
1239             ret = AVERROR_INVALIDDATA;
1240             goto cleanup;
1241         }
1242
1243         adaptionset_node = xmlFirstElementChild(period_node);
1244         while (adaptionset_node) {
1245             if (!av_strcasecmp(adaptionset_node->name, (const char *)"BaseURL")) {
1246                 period_baseurl_node = adaptionset_node;
1247             } else if (!av_strcasecmp(adaptionset_node->name, (const char *)"SegmentTemplate")) {
1248                 period_segmenttemplate_node = adaptionset_node;
1249             } else if (!av_strcasecmp(adaptionset_node->name, (const char *)"SegmentList")) {
1250                 period_segmentlist_node = adaptionset_node;
1251             } else if (!av_strcasecmp(adaptionset_node->name, (const char *)"AdaptationSet")) {
1252                 parse_manifest_adaptationset(s, url, adaptionset_node, mpd_baseurl_node, period_baseurl_node, period_segmenttemplate_node, period_segmentlist_node);
1253             }
1254             adaptionset_node = xmlNextElementSibling(adaptionset_node);
1255         }
1256 cleanup:
1257         /*free the document */
1258         xmlFreeDoc(doc);
1259         xmlCleanupParser();
1260         xmlFreeNode(mpd_baseurl_node);
1261     }
1262
1263     av_free(new_url);
1264     av_free(buffer);
1265     if (close_in) {
1266         avio_close(in);
1267     }
1268     return ret;
1269 }
1270
1271 static int64_t calc_cur_seg_no(AVFormatContext *s, struct representation *pls)
1272 {
1273     DASHContext *c = s->priv_data;
1274     int64_t num = 0;
1275     int64_t start_time_offset = 0;
1276
1277     if (c->is_live) {
1278         if (pls->n_fragments) {
1279             num = pls->first_seq_no;
1280         } else if (pls->n_timelines) {
1281             start_time_offset = get_segment_start_time_based_on_timeline(pls, 0xFFFFFFFF) - 60 * pls->fragment_timescale; // 60 seconds before end
1282             num = calc_next_seg_no_from_timelines(pls, start_time_offset);
1283             if (num == -1)
1284                 num = pls->first_seq_no;
1285             else
1286                 num += pls->first_seq_no;
1287         } else if (pls->fragment_duration){
1288             if (pls->presentation_timeoffset) {
1289                 num = pls->presentation_timeoffset * pls->fragment_timescale / pls->fragment_duration;
1290             } else if (c->publish_time > 0 && !c->availability_start_time) {
1291                 num = pls->first_seq_no + (((c->publish_time - c->availability_start_time) - c->suggested_presentation_delay) * pls->fragment_timescale) / pls->fragment_duration;
1292             } else {
1293                 num = pls->first_seq_no + (((get_current_time_in_sec() - c->availability_start_time) - c->suggested_presentation_delay) * pls->fragment_timescale) / pls->fragment_duration;
1294             }
1295         }
1296     } else {
1297         num = pls->first_seq_no;
1298     }
1299     return num;
1300 }
1301
1302 static int64_t calc_min_seg_no(AVFormatContext *s, struct representation *pls)
1303 {
1304     DASHContext *c = s->priv_data;
1305     int64_t num = 0;
1306
1307     if (c->is_live && pls->fragment_duration) {
1308         num = pls->first_seq_no + (((get_current_time_in_sec() - c->availability_start_time) - c->time_shift_buffer_depth) * pls->fragment_timescale) / pls->fragment_duration;
1309     } else {
1310         num = pls->first_seq_no;
1311     }
1312     return num;
1313 }
1314
1315 static int64_t calc_max_seg_no(struct representation *pls, DASHContext *c)
1316 {
1317     int64_t num = 0;
1318
1319     if (pls->n_fragments) {
1320         num = pls->first_seq_no + pls->n_fragments - 1;
1321     } else if (pls->n_timelines) {
1322         int i = 0;
1323         num = pls->first_seq_no + pls->n_timelines - 1;
1324         for (i = 0; i < pls->n_timelines; i++) {
1325             num += pls->timelines[i]->repeat;
1326         }
1327     } else if (c->is_live && pls->fragment_duration) {
1328         num = pls->first_seq_no + (((get_current_time_in_sec() - c->availability_start_time)) * pls->fragment_timescale)  / pls->fragment_duration;
1329     } else if (pls->fragment_duration) {
1330         num = pls->first_seq_no + (c->media_presentation_duration * pls->fragment_timescale) / pls->fragment_duration;
1331     }
1332
1333     return num;
1334 }
1335
1336 static void move_timelines(struct representation *rep_src, struct representation *rep_dest, DASHContext *c)
1337 {
1338     if (rep_dest && rep_src ) {
1339         free_timelines_list(rep_dest);
1340         rep_dest->timelines    = rep_src->timelines;
1341         rep_dest->n_timelines  = rep_src->n_timelines;
1342         rep_dest->first_seq_no = rep_src->first_seq_no;
1343         rep_dest->last_seq_no = calc_max_seg_no(rep_dest, c);
1344         rep_src->timelines = NULL;
1345         rep_src->n_timelines = 0;
1346         rep_dest->cur_seq_no = rep_src->cur_seq_no;
1347     }
1348 }
1349
1350 static void move_segments(struct representation *rep_src, struct representation *rep_dest, DASHContext *c)
1351 {
1352     if (rep_dest && rep_src ) {
1353         free_fragment_list(rep_dest);
1354         if (rep_src->start_number > (rep_dest->start_number + rep_dest->n_fragments))
1355             rep_dest->cur_seq_no = 0;
1356         else
1357             rep_dest->cur_seq_no += rep_src->start_number - rep_dest->start_number;
1358         rep_dest->fragments    = rep_src->fragments;
1359         rep_dest->n_fragments  = rep_src->n_fragments;
1360         rep_dest->parent  = rep_src->parent;
1361         rep_dest->last_seq_no = calc_max_seg_no(rep_dest, c);
1362         rep_src->fragments = NULL;
1363         rep_src->n_fragments = 0;
1364     }
1365 }
1366
1367
1368 static int refresh_manifest(AVFormatContext *s)
1369 {
1370
1371     int ret = 0, i;
1372     DASHContext *c = s->priv_data;
1373
1374     // save current context
1375     int n_videos = c->n_videos;
1376     struct representation **videos = c->videos;
1377     int n_audios = c->n_audios;
1378     struct representation **audios = c->audios;
1379     char *base_url = c->base_url;
1380
1381     c->base_url = NULL;
1382     c->n_videos = 0;
1383     c->videos = NULL;
1384     c->n_audios = 0;
1385     c->audios = NULL;
1386     ret = parse_manifest(s, s->url, NULL);
1387     if (ret)
1388         goto finish;
1389
1390     if (c->n_videos != n_videos) {
1391         av_log(c, AV_LOG_ERROR,
1392                "new manifest has mismatched no. of video representations, %d -> %d\n",
1393                n_videos, c->n_videos);
1394         return AVERROR_INVALIDDATA;
1395     }
1396     if (c->n_audios != n_audios) {
1397         av_log(c, AV_LOG_ERROR,
1398                "new manifest has mismatched no. of audio representations, %d -> %d\n",
1399                n_audios, c->n_audios);
1400         return AVERROR_INVALIDDATA;
1401     }
1402
1403     for (i = 0; i < n_videos; i++) {
1404         struct representation *cur_video = videos[i];
1405         struct representation *ccur_video = c->videos[i];
1406         if (cur_video->timelines) {
1407             // calc current time
1408             int64_t currentTime = get_segment_start_time_based_on_timeline(cur_video, cur_video->cur_seq_no) / cur_video->fragment_timescale;
1409             // update segments
1410             ccur_video->cur_seq_no = calc_next_seg_no_from_timelines(ccur_video, currentTime * cur_video->fragment_timescale - 1);
1411             if (ccur_video->cur_seq_no >= 0) {
1412                 move_timelines(ccur_video, cur_video, c);
1413             }
1414         }
1415         if (cur_video->fragments) {
1416             move_segments(ccur_video, cur_video, c);
1417         }
1418     }
1419     for (i = 0; i < n_audios; i++) {
1420         struct representation *cur_audio = audios[i];
1421         struct representation *ccur_audio = c->audios[i];
1422         if (cur_audio->timelines) {
1423             // calc current time
1424             int64_t currentTime = get_segment_start_time_based_on_timeline(cur_audio, cur_audio->cur_seq_no) / cur_audio->fragment_timescale;
1425             // update segments
1426             ccur_audio->cur_seq_no = calc_next_seg_no_from_timelines(ccur_audio, currentTime * cur_audio->fragment_timescale - 1);
1427             if (ccur_audio->cur_seq_no >= 0) {
1428                 move_timelines(ccur_audio, cur_audio, c);
1429             }
1430         }
1431         if (cur_audio->fragments) {
1432             move_segments(ccur_audio, cur_audio, c);
1433         }
1434     }
1435
1436 finish:
1437     // restore context
1438     if (c->base_url)
1439         av_free(base_url);
1440     else
1441         c->base_url  = base_url;
1442     if (c->audios)
1443         free_audio_list(c);
1444     if (c->videos)
1445         free_video_list(c);
1446     c->n_audios = n_audios;
1447     c->audios = audios;
1448     c->n_videos = n_videos;
1449     c->videos = videos;
1450     return ret;
1451 }
1452
1453 static struct fragment *get_current_fragment(struct representation *pls)
1454 {
1455     int64_t min_seq_no = 0;
1456     int64_t max_seq_no = 0;
1457     struct fragment *seg = NULL;
1458     struct fragment *seg_ptr = NULL;
1459     DASHContext *c = pls->parent->priv_data;
1460
1461     while (( !ff_check_interrupt(c->interrupt_callback)&& pls->n_fragments > 0)) {
1462         if (pls->cur_seq_no < pls->n_fragments) {
1463             seg_ptr = pls->fragments[pls->cur_seq_no];
1464             seg = av_mallocz(sizeof(struct fragment));
1465             if (!seg) {
1466                 return NULL;
1467             }
1468             seg->url = av_strdup(seg_ptr->url);
1469             if (!seg->url) {
1470                 av_free(seg);
1471                 return NULL;
1472             }
1473             seg->size = seg_ptr->size;
1474             seg->url_offset = seg_ptr->url_offset;
1475             return seg;
1476         } else if (c->is_live) {
1477             refresh_manifest(pls->parent);
1478         } else {
1479             break;
1480         }
1481     }
1482     if (c->is_live) {
1483         min_seq_no = calc_min_seg_no(pls->parent, pls);
1484         max_seq_no = calc_max_seg_no(pls, c);
1485
1486         if (pls->timelines || pls->fragments) {
1487             refresh_manifest(pls->parent);
1488         }
1489         if (pls->cur_seq_no <= min_seq_no) {
1490             av_log(pls->parent, AV_LOG_VERBOSE, "old fragment: cur[%"PRId64"] min[%"PRId64"] max[%"PRId64"], playlist %d\n", (int64_t)pls->cur_seq_no, min_seq_no, max_seq_no, (int)pls->rep_idx);
1491             pls->cur_seq_no = calc_cur_seg_no(pls->parent, pls);
1492         } else if (pls->cur_seq_no > max_seq_no) {
1493             av_log(pls->parent, AV_LOG_VERBOSE, "new fragment: min[%"PRId64"] max[%"PRId64"], playlist %d\n", min_seq_no, max_seq_no, (int)pls->rep_idx);
1494         }
1495         seg = av_mallocz(sizeof(struct fragment));
1496         if (!seg) {
1497             return NULL;
1498         }
1499     } else if (pls->cur_seq_no <= pls->last_seq_no) {
1500         seg = av_mallocz(sizeof(struct fragment));
1501         if (!seg) {
1502             return NULL;
1503         }
1504     }
1505     if (seg) {
1506         char *tmpfilename= av_mallocz(c->max_url_size);
1507         if (!tmpfilename) {
1508             return NULL;
1509         }
1510         ff_dash_fill_tmpl_params(tmpfilename, c->max_url_size, pls->url_template, 0, pls->cur_seq_no, 0, get_segment_start_time_based_on_timeline(pls, pls->cur_seq_no));
1511         seg->url = av_strireplace(pls->url_template, pls->url_template, tmpfilename);
1512         if (!seg->url) {
1513             av_log(pls->parent, AV_LOG_WARNING, "Unable to resolve template url '%s', try to use origin template\n", pls->url_template);
1514             seg->url = av_strdup(pls->url_template);
1515             if (!seg->url) {
1516                 av_log(pls->parent, AV_LOG_ERROR, "Cannot resolve template url '%s'\n", pls->url_template);
1517                 av_free(tmpfilename);
1518                 return NULL;
1519             }
1520         }
1521         av_free(tmpfilename);
1522         seg->size = -1;
1523     }
1524
1525     return seg;
1526 }
1527
1528 enum ReadFromURLMode {
1529     READ_NORMAL,
1530     READ_COMPLETE,
1531 };
1532
1533 static int read_from_url(struct representation *pls, struct fragment *seg,
1534                          uint8_t *buf, int buf_size,
1535                          enum ReadFromURLMode mode)
1536 {
1537     int ret;
1538
1539     /* limit read if the fragment was only a part of a file */
1540     if (seg->size >= 0)
1541         buf_size = FFMIN(buf_size, pls->cur_seg_size - pls->cur_seg_offset);
1542
1543     if (mode == READ_COMPLETE) {
1544         ret = avio_read(pls->input, buf, buf_size);
1545         if (ret < buf_size) {
1546             av_log(pls->parent, AV_LOG_WARNING, "Could not read complete fragment.\n");
1547         }
1548     } else {
1549         ret = avio_read(pls->input, buf, buf_size);
1550     }
1551     if (ret > 0)
1552         pls->cur_seg_offset += ret;
1553
1554     return ret;
1555 }
1556
1557 static int open_input(DASHContext *c, struct representation *pls, struct fragment *seg)
1558 {
1559     AVDictionary *opts = NULL;
1560     char *url = NULL;
1561     int ret = 0;
1562
1563     url = av_mallocz(c->max_url_size);
1564     if (!url) {
1565         goto cleanup;
1566     }
1567
1568     if (seg->size >= 0) {
1569         /* try to restrict the HTTP request to the part we want
1570          * (if this is in fact a HTTP request) */
1571         av_dict_set_int(&opts, "offset", seg->url_offset, 0);
1572         av_dict_set_int(&opts, "end_offset", seg->url_offset + seg->size, 0);
1573     }
1574
1575     ff_make_absolute_url(url, c->max_url_size, c->base_url, seg->url);
1576     av_log(pls->parent, AV_LOG_VERBOSE, "DASH request for url '%s', offset %"PRId64", playlist %d\n",
1577            url, seg->url_offset, pls->rep_idx);
1578     ret = open_url(pls->parent, &pls->input, url, c->avio_opts, opts, NULL);
1579     if (ret < 0) {
1580         goto cleanup;
1581     }
1582
1583 cleanup:
1584     av_free(url);
1585     av_dict_free(&opts);
1586     pls->cur_seg_offset = 0;
1587     pls->cur_seg_size = seg->size;
1588     return ret;
1589 }
1590
1591 static int update_init_section(struct representation *pls)
1592 {
1593     static const int max_init_section_size = 1024 * 1024;
1594     DASHContext *c = pls->parent->priv_data;
1595     int64_t sec_size;
1596     int64_t urlsize;
1597     int ret;
1598
1599     if (!pls->init_section || pls->init_sec_buf)
1600         return 0;
1601
1602     ret = open_input(c, pls, pls->init_section);
1603     if (ret < 0) {
1604         av_log(pls->parent, AV_LOG_WARNING,
1605                "Failed to open an initialization section in playlist %d\n",
1606                pls->rep_idx);
1607         return ret;
1608     }
1609
1610     if (pls->init_section->size >= 0)
1611         sec_size = pls->init_section->size;
1612     else if ((urlsize = avio_size(pls->input)) >= 0)
1613         sec_size = urlsize;
1614     else
1615         sec_size = max_init_section_size;
1616
1617     av_log(pls->parent, AV_LOG_DEBUG,
1618            "Downloading an initialization section of size %"PRId64"\n",
1619            sec_size);
1620
1621     sec_size = FFMIN(sec_size, max_init_section_size);
1622
1623     av_fast_malloc(&pls->init_sec_buf, &pls->init_sec_buf_size, sec_size);
1624
1625     ret = read_from_url(pls, pls->init_section, pls->init_sec_buf,
1626                         pls->init_sec_buf_size, READ_COMPLETE);
1627     ff_format_io_close(pls->parent, &pls->input);
1628
1629     if (ret < 0)
1630         return ret;
1631
1632     pls->init_sec_data_len = ret;
1633     pls->init_sec_buf_read_offset = 0;
1634
1635     return 0;
1636 }
1637
1638 static int64_t seek_data(void *opaque, int64_t offset, int whence)
1639 {
1640     struct representation *v = opaque;
1641     if (v->n_fragments && !v->init_sec_data_len) {
1642         return avio_seek(v->input, offset, whence);
1643     }
1644
1645     return AVERROR(ENOSYS);
1646 }
1647
1648 static int read_data(void *opaque, uint8_t *buf, int buf_size)
1649 {
1650     int ret = 0;
1651     struct representation *v = opaque;
1652     DASHContext *c = v->parent->priv_data;
1653
1654 restart:
1655     if (!v->input) {
1656         free_fragment(&v->cur_seg);
1657         v->cur_seg = get_current_fragment(v);
1658         if (!v->cur_seg) {
1659             ret = AVERROR_EOF;
1660             goto end;
1661         }
1662
1663         /* load/update Media Initialization Section, if any */
1664         ret = update_init_section(v);
1665         if (ret)
1666             goto end;
1667
1668         ret = open_input(c, v, v->cur_seg);
1669         if (ret < 0) {
1670             if (ff_check_interrupt(c->interrupt_callback)) {
1671                 goto end;
1672                 ret = AVERROR_EXIT;
1673             }
1674             av_log(v->parent, AV_LOG_WARNING, "Failed to open fragment of playlist %d\n", v->rep_idx);
1675             v->cur_seq_no++;
1676             goto restart;
1677         }
1678     }
1679
1680     if (v->init_sec_buf_read_offset < v->init_sec_data_len) {
1681         /* Push init section out first before first actual fragment */
1682         int copy_size = FFMIN(v->init_sec_data_len - v->init_sec_buf_read_offset, buf_size);
1683         memcpy(buf, v->init_sec_buf, copy_size);
1684         v->init_sec_buf_read_offset += copy_size;
1685         ret = copy_size;
1686         goto end;
1687     }
1688
1689     /* check the v->cur_seg, if it is null, get current and double check if the new v->cur_seg*/
1690     if (!v->cur_seg) {
1691         v->cur_seg = get_current_fragment(v);
1692     }
1693     if (!v->cur_seg) {
1694         ret = AVERROR_EOF;
1695         goto end;
1696     }
1697     ret = read_from_url(v, v->cur_seg, buf, buf_size, READ_NORMAL);
1698     if (ret > 0)
1699         goto end;
1700
1701     if (c->is_live || v->cur_seq_no < v->last_seq_no) {
1702         if (!v->is_restart_needed)
1703             v->cur_seq_no++;
1704         v->is_restart_needed = 1;
1705     }
1706
1707 end:
1708     return ret;
1709 }
1710
1711 static int save_avio_options(AVFormatContext *s)
1712 {
1713     DASHContext *c = s->priv_data;
1714     const char *opts[] = { "headers", "user_agent", "cookies", NULL }, **opt = opts;
1715     uint8_t *buf = NULL;
1716     int ret = 0;
1717
1718     while (*opt) {
1719         if (av_opt_get(s->pb, *opt, AV_OPT_SEARCH_CHILDREN, &buf) >= 0) {
1720             if (buf[0] != '\0') {
1721                 ret = av_dict_set(&c->avio_opts, *opt, buf, AV_DICT_DONT_STRDUP_VAL);
1722                 if (ret < 0) {
1723                     av_freep(&buf);
1724                     return ret;
1725                 }
1726             } else {
1727                 av_freep(&buf);
1728             }
1729         }
1730         opt++;
1731     }
1732
1733     return ret;
1734 }
1735
1736 static int nested_io_open(AVFormatContext *s, AVIOContext **pb, const char *url,
1737                           int flags, AVDictionary **opts)
1738 {
1739     av_log(s, AV_LOG_ERROR,
1740            "A DASH playlist item '%s' referred to an external file '%s'. "
1741            "Opening this file was forbidden for security reasons\n",
1742            s->url, url);
1743     return AVERROR(EPERM);
1744 }
1745
1746 static void close_demux_for_component(struct representation *pls)
1747 {
1748     /* note: the internal buffer could have changed */
1749     av_freep(&pls->pb.buffer);
1750     memset(&pls->pb, 0x00, sizeof(AVIOContext));
1751     pls->ctx->pb = NULL;
1752     avformat_close_input(&pls->ctx);
1753     pls->ctx = NULL;
1754 }
1755
1756 static int reopen_demux_for_component(AVFormatContext *s, struct representation *pls)
1757 {
1758     DASHContext *c = s->priv_data;
1759     AVInputFormat *in_fmt = NULL;
1760     AVDictionary  *in_fmt_opts = NULL;
1761     uint8_t *avio_ctx_buffer  = NULL;
1762     int ret = 0, i;
1763
1764     if (pls->ctx) {
1765         close_demux_for_component(pls);
1766     }
1767     if (!(pls->ctx = avformat_alloc_context())) {
1768         ret = AVERROR(ENOMEM);
1769         goto fail;
1770     }
1771
1772     avio_ctx_buffer  = av_malloc(INITIAL_BUFFER_SIZE);
1773     if (!avio_ctx_buffer ) {
1774         ret = AVERROR(ENOMEM);
1775         avformat_free_context(pls->ctx);
1776         pls->ctx = NULL;
1777         goto fail;
1778     }
1779     if (c->is_live) {
1780         ffio_init_context(&pls->pb, avio_ctx_buffer , INITIAL_BUFFER_SIZE, 0, pls, read_data, NULL, NULL);
1781     } else {
1782         ffio_init_context(&pls->pb, avio_ctx_buffer , INITIAL_BUFFER_SIZE, 0, pls, read_data, NULL, seek_data);
1783     }
1784     pls->pb.seekable = 0;
1785
1786     if ((ret = ff_copy_whiteblacklists(pls->ctx, s)) < 0)
1787         goto fail;
1788
1789     pls->ctx->flags = AVFMT_FLAG_CUSTOM_IO;
1790     pls->ctx->probesize = 1024 * 4;
1791     pls->ctx->max_analyze_duration = 4 * AV_TIME_BASE;
1792     ret = av_probe_input_buffer(&pls->pb, &in_fmt, "", NULL, 0, 0);
1793     if (ret < 0) {
1794         av_log(s, AV_LOG_ERROR, "Error when loading first fragment, playlist %d\n", (int)pls->rep_idx);
1795         avformat_free_context(pls->ctx);
1796         pls->ctx = NULL;
1797         goto fail;
1798     }
1799
1800     pls->ctx->pb = &pls->pb;
1801     pls->ctx->io_open  = nested_io_open;
1802
1803     // provide additional information from mpd if available
1804     ret = avformat_open_input(&pls->ctx, "", in_fmt, &in_fmt_opts); //pls->init_section->url
1805     av_dict_free(&in_fmt_opts);
1806     if (ret < 0)
1807         goto fail;
1808     if (pls->n_fragments) {
1809 #if FF_API_R_FRAME_RATE
1810         if (pls->framerate.den) {
1811             for (i = 0; i < pls->ctx->nb_streams; i++)
1812                 pls->ctx->streams[i]->r_frame_rate = pls->framerate;
1813         }
1814 #endif
1815
1816         ret = avformat_find_stream_info(pls->ctx, NULL);
1817         if (ret < 0)
1818             goto fail;
1819     }
1820
1821 fail:
1822     return ret;
1823 }
1824
1825 static int open_demux_for_component(AVFormatContext *s, struct representation *pls)
1826 {
1827     int ret = 0;
1828     int i;
1829
1830     pls->parent = s;
1831     pls->cur_seq_no  = calc_cur_seg_no(s, pls);
1832
1833     if (!pls->last_seq_no) {
1834         pls->last_seq_no = calc_max_seg_no(pls, s->priv_data);
1835     }
1836
1837     ret = reopen_demux_for_component(s, pls);
1838     if (ret < 0) {
1839         goto fail;
1840     }
1841     for (i = 0; i < pls->ctx->nb_streams; i++) {
1842         AVStream *st = avformat_new_stream(s, NULL);
1843         AVStream *ist = pls->ctx->streams[i];
1844         if (!st) {
1845             ret = AVERROR(ENOMEM);
1846             goto fail;
1847         }
1848         st->id = i;
1849         avcodec_parameters_copy(st->codecpar, pls->ctx->streams[i]->codecpar);
1850         avpriv_set_pts_info(st, ist->pts_wrap_bits, ist->time_base.num, ist->time_base.den);
1851     }
1852
1853     return 0;
1854 fail:
1855     return ret;
1856 }
1857
1858 static int is_common_init_section_exist(struct representation **pls, int n_pls)
1859 {
1860     struct fragment *first_init_section = pls[0]->init_section;
1861     char *url =NULL;
1862     int64_t url_offset = -1;
1863     int64_t size = -1;
1864     int i = 0;
1865
1866     if (first_init_section == NULL || n_pls == 0)
1867         return 0;
1868
1869     url = first_init_section->url;
1870     url_offset = first_init_section->url_offset;
1871     size = pls[0]->init_section->size;
1872     for (i=0;i<n_pls;i++) {
1873         if (av_strcasecmp(pls[i]->init_section->url,url) || pls[i]->init_section->url_offset != url_offset || pls[i]->init_section->size != size) {
1874             return 0;
1875         }
1876     }
1877     return 1;
1878 }
1879
1880 static void copy_init_section(struct representation *rep_dest, struct representation *rep_src)
1881 {
1882     *rep_dest->init_section = *rep_src->init_section;
1883     rep_dest->init_sec_buf = av_mallocz(rep_src->init_sec_buf_size);
1884     memcpy(rep_dest->init_sec_buf, rep_src->init_sec_buf, rep_src->init_sec_data_len);
1885     rep_dest->init_sec_buf_size = rep_src->init_sec_buf_size;
1886     rep_dest->init_sec_data_len = rep_src->init_sec_data_len;
1887     rep_dest->cur_timestamp = rep_src->cur_timestamp;
1888 }
1889
1890
1891 static int dash_read_header(AVFormatContext *s)
1892 {
1893     DASHContext *c = s->priv_data;
1894     int ret = 0;
1895     int stream_index = 0;
1896     int i;
1897
1898     c->interrupt_callback = &s->interrupt_callback;
1899
1900     if ((ret = save_avio_options(s)) < 0)
1901         goto fail;
1902
1903     av_dict_set(&c->avio_opts, "seekable", "0", 0);
1904
1905     if ((ret = parse_manifest(s, s->url, s->pb)) < 0)
1906         goto fail;
1907
1908     /* If this isn't a live stream, fill the total duration of the
1909      * stream. */
1910     if (!c->is_live) {
1911         s->duration = (int64_t) c->media_presentation_duration * AV_TIME_BASE;
1912     }
1913
1914     if(c->n_videos)
1915         c->is_init_section_common_video = is_common_init_section_exist(c->videos, c->n_videos);
1916
1917     /* Open the demuxer for video and audio components if available */
1918     for (i = 0; i < c->n_videos; i++) {
1919         struct representation *cur_video = c->videos[i];
1920         if (i > 0 && c->is_init_section_common_video) {
1921             copy_init_section(cur_video,c->videos[0]);
1922         }
1923         ret = open_demux_for_component(s, cur_video);
1924
1925         if (ret)
1926             goto fail;
1927         cur_video->stream_index = stream_index;
1928         ++stream_index;
1929     }
1930
1931     if(c->n_audios)
1932         c->is_init_section_common_audio = is_common_init_section_exist(c->audios, c->n_audios);
1933
1934     for (i = 0; i < c->n_audios; i++) {
1935         struct representation *cur_audio = c->audios[i];
1936         if (i > 0 && c->is_init_section_common_audio) {
1937             copy_init_section(cur_audio,c->audios[0]);
1938         }
1939         ret = open_demux_for_component(s, cur_audio);
1940
1941         if (ret)
1942             goto fail;
1943         cur_audio->stream_index = stream_index;
1944         ++stream_index;
1945     }
1946
1947     if (!stream_index) {
1948         ret = AVERROR_INVALIDDATA;
1949         goto fail;
1950     }
1951
1952     /* Create a program */
1953     if (!ret) {
1954         AVProgram *program;
1955         program = av_new_program(s, 0);
1956         if (!program) {
1957             goto fail;
1958         }
1959
1960         for (i = 0; i < c->n_videos; i++) {
1961             struct representation *pls = c->videos[i];
1962
1963             av_program_add_stream_index(s, 0, pls->stream_index);
1964             pls->assoc_stream = s->streams[pls->stream_index];
1965             if (pls->bandwidth > 0)
1966                 av_dict_set_int(&pls->assoc_stream->metadata, "variant_bitrate", pls->bandwidth, 0);
1967             if (pls->id[0])
1968                 av_dict_set(&pls->assoc_stream->metadata, "id", pls->id, 0);
1969         }
1970         for (i = 0; i < c->n_audios; i++) {
1971             struct representation *pls = c->audios[i];
1972
1973             av_program_add_stream_index(s, 0, pls->stream_index);
1974             pls->assoc_stream = s->streams[pls->stream_index];
1975             if (pls->bandwidth > 0)
1976                 av_dict_set_int(&pls->assoc_stream->metadata, "variant_bitrate", pls->bandwidth, 0);
1977             if (pls->id[0])
1978                 av_dict_set(&pls->assoc_stream->metadata, "id", pls->id, 0);
1979         }
1980     }
1981
1982     return 0;
1983 fail:
1984     return ret;
1985 }
1986
1987 static void recheck_discard_flags(AVFormatContext *s, struct representation **p, int n)
1988 {
1989     int i, j;
1990
1991     for (i = 0; i < n; i++) {
1992         struct representation *pls = p[i];
1993
1994         int needed = !pls->assoc_stream || pls->assoc_stream->discard < AVDISCARD_ALL;
1995         if (needed && !pls->ctx) {
1996             pls->cur_seg_offset = 0;
1997             pls->init_sec_buf_read_offset = 0;
1998             /* Catch up */
1999             for (j = 0; j < n; j++) {
2000                 pls->cur_seq_no = FFMAX(pls->cur_seq_no, p[j]->cur_seq_no);
2001             }
2002             reopen_demux_for_component(s, pls);
2003             av_log(s, AV_LOG_INFO, "Now receiving stream_index %d\n", pls->stream_index);
2004         } else if (!needed && pls->ctx) {
2005             close_demux_for_component(pls);
2006             if (pls->input)
2007                 ff_format_io_close(pls->parent, &pls->input);
2008             av_log(s, AV_LOG_INFO, "No longer receiving stream_index %d\n", pls->stream_index);
2009         }
2010     }
2011 }
2012
2013 static int dash_read_packet(AVFormatContext *s, AVPacket *pkt)
2014 {
2015     DASHContext *c = s->priv_data;
2016     int ret = 0, i;
2017     int64_t mints = 0;
2018     struct representation *cur = NULL;
2019
2020     recheck_discard_flags(s, c->videos, c->n_videos);
2021     recheck_discard_flags(s, c->audios, c->n_audios);
2022
2023     for (i = 0; i < c->n_videos; i++) {
2024         struct representation *pls = c->videos[i];
2025         if (!pls->ctx)
2026             continue;
2027         if (!cur || pls->cur_timestamp < mints) {
2028             cur = pls;
2029             mints = pls->cur_timestamp;
2030         }
2031     }
2032     for (i = 0; i < c->n_audios; i++) {
2033         struct representation *pls = c->audios[i];
2034         if (!pls->ctx)
2035             continue;
2036         if (!cur || pls->cur_timestamp < mints) {
2037             cur = pls;
2038             mints = pls->cur_timestamp;
2039         }
2040     }
2041
2042     if (!cur) {
2043         return AVERROR_INVALIDDATA;
2044     }
2045     while (!ff_check_interrupt(c->interrupt_callback) && !ret) {
2046         ret = av_read_frame(cur->ctx, pkt);
2047         if (ret >= 0) {
2048             /* If we got a packet, return it */
2049             cur->cur_timestamp = av_rescale(pkt->pts, (int64_t)cur->ctx->streams[0]->time_base.num * 90000, cur->ctx->streams[0]->time_base.den);
2050             pkt->stream_index = cur->stream_index;
2051             return 0;
2052         }
2053         if (cur->is_restart_needed) {
2054             cur->cur_seg_offset = 0;
2055             cur->init_sec_buf_read_offset = 0;
2056             if (cur->input)
2057                 ff_format_io_close(cur->parent, &cur->input);
2058             ret = reopen_demux_for_component(s, cur);
2059             cur->is_restart_needed = 0;
2060         }
2061     }
2062     return AVERROR_EOF;
2063 }
2064
2065 static int dash_close(AVFormatContext *s)
2066 {
2067     DASHContext *c = s->priv_data;
2068     free_audio_list(c);
2069     free_video_list(c);
2070
2071     av_dict_free(&c->avio_opts);
2072     av_freep(&c->base_url);
2073     return 0;
2074 }
2075
2076 static int dash_seek(AVFormatContext *s, struct representation *pls, int64_t seek_pos_msec, int flags, int dry_run)
2077 {
2078     int ret = 0;
2079     int i = 0;
2080     int j = 0;
2081     int64_t duration = 0;
2082
2083     av_log(pls->parent, AV_LOG_VERBOSE, "DASH seek pos[%"PRId64"ms], playlist %d%s\n",
2084            seek_pos_msec, pls->rep_idx, dry_run ? " (dry)" : "");
2085
2086     // single fragment mode
2087     if (pls->n_fragments == 1) {
2088         pls->cur_timestamp = 0;
2089         pls->cur_seg_offset = 0;
2090         if (dry_run)
2091             return 0;
2092         ff_read_frame_flush(pls->ctx);
2093         return av_seek_frame(pls->ctx, -1, seek_pos_msec * 1000, flags);
2094     }
2095
2096     if (pls->input)
2097         ff_format_io_close(pls->parent, &pls->input);
2098
2099     // find the nearest fragment
2100     if (pls->n_timelines > 0 && pls->fragment_timescale > 0) {
2101         int64_t num = pls->first_seq_no;
2102         av_log(pls->parent, AV_LOG_VERBOSE, "dash_seek with SegmentTimeline start n_timelines[%d] "
2103                "last_seq_no[%"PRId64"], playlist %d.\n",
2104                (int)pls->n_timelines, (int64_t)pls->last_seq_no, (int)pls->rep_idx);
2105         for (i = 0; i < pls->n_timelines; i++) {
2106             if (pls->timelines[i]->starttime > 0) {
2107                 duration = pls->timelines[i]->starttime;
2108             }
2109             duration += pls->timelines[i]->duration;
2110             if (seek_pos_msec < ((duration * 1000) /  pls->fragment_timescale)) {
2111                 goto set_seq_num;
2112             }
2113             for (j = 0; j < pls->timelines[i]->repeat; j++) {
2114                 duration += pls->timelines[i]->duration;
2115                 num++;
2116                 if (seek_pos_msec < ((duration * 1000) /  pls->fragment_timescale)) {
2117                     goto set_seq_num;
2118                 }
2119             }
2120             num++;
2121         }
2122
2123 set_seq_num:
2124         pls->cur_seq_no = num > pls->last_seq_no ? pls->last_seq_no : num;
2125         av_log(pls->parent, AV_LOG_VERBOSE, "dash_seek with SegmentTimeline end cur_seq_no[%"PRId64"], playlist %d.\n",
2126                (int64_t)pls->cur_seq_no, (int)pls->rep_idx);
2127     } else if (pls->fragment_duration > 0) {
2128         pls->cur_seq_no = pls->first_seq_no + ((seek_pos_msec * pls->fragment_timescale) / pls->fragment_duration) / 1000;
2129     } else {
2130         av_log(pls->parent, AV_LOG_ERROR, "dash_seek missing timeline or fragment_duration\n");
2131         pls->cur_seq_no = pls->first_seq_no;
2132     }
2133     pls->cur_timestamp = 0;
2134     pls->cur_seg_offset = 0;
2135     pls->init_sec_buf_read_offset = 0;
2136     ret = dry_run ? 0 : reopen_demux_for_component(s, pls);
2137
2138     return ret;
2139 }
2140
2141 static int dash_read_seek(AVFormatContext *s, int stream_index, int64_t timestamp, int flags)
2142 {
2143     int ret = 0, i;
2144     DASHContext *c = s->priv_data;
2145     int64_t seek_pos_msec = av_rescale_rnd(timestamp, 1000,
2146                                            s->streams[stream_index]->time_base.den,
2147                                            flags & AVSEEK_FLAG_BACKWARD ?
2148                                            AV_ROUND_DOWN : AV_ROUND_UP);
2149     if ((flags & AVSEEK_FLAG_BYTE) || c->is_live)
2150         return AVERROR(ENOSYS);
2151
2152     /* Seek in discarded streams with dry_run=1 to avoid reopening them */
2153     for (i = 0; i < c->n_videos; i++) {
2154         if (!ret)
2155             ret = dash_seek(s, c->videos[i], seek_pos_msec, flags, !c->videos[i]->ctx);
2156     }
2157     for (i = 0; i < c->n_audios; i++) {
2158         if (!ret)
2159             ret = dash_seek(s, c->audios[i], seek_pos_msec, flags, !c->audios[i]->ctx);
2160     }
2161
2162     return ret;
2163 }
2164
2165 static int dash_probe(AVProbeData *p)
2166 {
2167     if (!av_stristr(p->buf, "<MPD"))
2168         return 0;
2169
2170     if (av_stristr(p->buf, "dash:profile:isoff-on-demand:2011") ||
2171         av_stristr(p->buf, "dash:profile:isoff-live:2011") ||
2172         av_stristr(p->buf, "dash:profile:isoff-live:2012") ||
2173         av_stristr(p->buf, "dash:profile:isoff-main:2011")) {
2174         return AVPROBE_SCORE_MAX;
2175     }
2176     if (av_stristr(p->buf, "dash:profile")) {
2177         return AVPROBE_SCORE_MAX;
2178     }
2179
2180     return 0;
2181 }
2182
2183 #define OFFSET(x) offsetof(DASHContext, x)
2184 #define FLAGS AV_OPT_FLAG_DECODING_PARAM
2185 static const AVOption dash_options[] = {
2186     {"allowed_extensions", "List of file extensions that dash is allowed to access",
2187         OFFSET(allowed_extensions), AV_OPT_TYPE_STRING,
2188         {.str = "aac,m4a,m4s,m4v,mov,mp4"},
2189         INT_MIN, INT_MAX, FLAGS},
2190     {NULL}
2191 };
2192
2193 static const AVClass dash_class = {
2194     .class_name = "dash",
2195     .item_name  = av_default_item_name,
2196     .option     = dash_options,
2197     .version    = LIBAVUTIL_VERSION_INT,
2198 };
2199
2200 AVInputFormat ff_dash_demuxer = {
2201     .name           = "dash",
2202     .long_name      = NULL_IF_CONFIG_SMALL("Dynamic Adaptive Streaming over HTTP"),
2203     .priv_class     = &dash_class,
2204     .priv_data_size = sizeof(DASHContext),
2205     .read_probe     = dash_probe,
2206     .read_header    = dash_read_header,
2207     .read_packet    = dash_read_packet,
2208     .read_close     = dash_close,
2209     .read_seek      = dash_read_seek,
2210     .flags          = AVFMT_NO_BYTE_SEEK,
2211 };