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