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