git.sesse.net Git - ffmpeg/blob - libavformat/dashdec.c

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