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