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

   1 /*
   2  * Apple HTTP Live Streaming segmenter
   3  * Copyright (c) 2012, Luca Barbato
   4  *
   5  * This file is part of FFmpeg.
   6  *
   7  * FFmpeg is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * FFmpeg is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with FFmpeg; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21
  22 #include "config.h"
  23 #include <float.h>
  24 #include <stdint.h>
  25 #if HAVE_UNISTD_H
  26 #include <unistd.h>
  27 #endif
  28
  29 #include "libavutil/avassert.h"
  30 #include "libavutil/mathematics.h"
  31 #include "libavutil/parseutils.h"
  32 #include "libavutil/avstring.h"
  33 #include "libavutil/opt.h"
  34 #include "libavutil/log.h"
  35 #include "libavutil/time_internal.h"
  36
  37 #include "avformat.h"
  38 #include "avio_internal.h"
  39 #include "internal.h"
  40 #include "os_support.h"
  41
  42 #define KEYSIZE 16
  43 #define LINE_BUFFER_SIZE 1024
  44
  45 typedef struct HLSSegment {
  46     char filename[1024];
  47     char sub_filename[1024];
  48     double duration; /* in seconds */
  49     int64_t pos;
  50     int64_t size;
  51
  52     char key_uri[LINE_BUFFER_SIZE + 1];
  53     char iv_string[KEYSIZE*2 + 1];
  54
  55     struct HLSSegment *next;
  56 } HLSSegment;
  57
  58 typedef enum HLSFlags {
  59     // Generate a single media file and use byte ranges in the playlist.
  60     HLS_SINGLE_FILE = (1 << 0),
  61     HLS_DELETE_SEGMENTS = (1 << 1),
  62     HLS_ROUND_DURATIONS = (1 << 2),
  63     HLS_DISCONT_START = (1 << 3),
  64     HLS_OMIT_ENDLIST = (1 << 4),
  65 } HLSFlags;
  66
  67 typedef enum {
  68     PLAYLIST_TYPE_NONE,
  69     PLAYLIST_TYPE_EVENT,
  70     PLAYLIST_TYPE_VOD,
  71     PLAYLIST_TYPE_NB,
  72 } PlaylistType;
  73
  74 typedef struct HLSContext {
  75     const AVClass *class;  // Class for private options.
  76     unsigned number;
  77     int64_t sequence;
  78     int64_t start_sequence;
  79     AVOutputFormat *oformat;
  80     AVOutputFormat *vtt_oformat;
  81
  82     AVFormatContext *avf;
  83     AVFormatContext *vtt_avf;
  84
  85     float time;            // Set by a private option.
  86     int max_nb_segments;   // Set by a private option.
  87     int  wrap;             // Set by a private option.
  88     uint32_t flags;        // enum HLSFlags
  89     uint32_t pl_type;      // enum PlaylistType
  90     char *segment_filename;
  91
  92     int use_localtime;      ///< flag to expand filename with localtime
  93     int use_localtime_mkdir;///< flag to mkdir dirname in timebased filename
  94     int allowcache;
  95     int64_t recording_time;
  96     int has_video;
  97     int has_subtitle;
  98     int64_t start_pts;
  99     int64_t end_pts;
 100     double duration;      // last segment duration computed so far, in seconds
 101     int64_t start_pos;    // last segment starting position
 102     int64_t size;         // last segment size
 103     int nb_entries;
 104     int discontinuity_set;
 105
 106     HLSSegment *segments;
 107     HLSSegment *last_segment;
 108     HLSSegment *old_segments;
 109
 110     char *basename;
 111     char *vtt_basename;
 112     char *vtt_m3u8_name;
 113     char *baseurl;
 114     char *format_options_str;
 115     char *vtt_format_options_str;
 116     char *subtitle_filename;
 117     AVDictionary *format_options;
 118
 119     char *key_info_file;
 120     char key_file[LINE_BUFFER_SIZE + 1];
 121     char key_uri[LINE_BUFFER_SIZE + 1];
 122     char key_string[KEYSIZE*2 + 1];
 123     char iv_string[KEYSIZE*2 + 1];
 124     AVDictionary *vtt_format_options;
 125
 126     char *method;
 127
 128 } HLSContext;
 129
 130 static int hls_delete_old_segments(HLSContext *hls) {
 131
 132     HLSSegment *segment, *previous_segment = NULL;
 133     float playlist_duration = 0.0f;
 134     int ret = 0, path_size, sub_path_size;
 135     char *dirname = NULL, *p, *sub_path;
 136     char *path = NULL;
 137
 138     segment = hls->segments;
 139     while (segment) {
 140         playlist_duration += segment->duration;
 141         segment = segment->next;
 142     }
 143
 144     segment = hls->old_segments;
 145     while (segment) {
 146         playlist_duration -= segment->duration;
 147         previous_segment = segment;
 148         segment = previous_segment->next;
 149         if (playlist_duration <= -previous_segment->duration) {
 150             previous_segment->next = NULL;
 151             break;
 152         }
 153     }
 154
 155     if (segment) {
 156         if (hls->segment_filename) {
 157             dirname = av_strdup(hls->segment_filename);
 158         } else {
 159             dirname = av_strdup(hls->avf->filename);
 160         }
 161         if (!dirname) {
 162             ret = AVERROR(ENOMEM);
 163             goto fail;
 164         }
 165         p = (char *)av_basename(dirname);
 166         *p = '\0';
 167     }
 168
 169     while (segment) {
 170         av_log(hls, AV_LOG_DEBUG, "deleting old segment %s\n",
 171                                   segment->filename);
 172         path_size = strlen(dirname) + strlen(segment->filename) + 1;
 173         path = av_malloc(path_size);
 174         if (!path) {
 175             ret = AVERROR(ENOMEM);
 176             goto fail;
 177         }
 178
 179         av_strlcpy(path, dirname, path_size);
 180         av_strlcat(path, segment->filename, path_size);
 181         if (unlink(path) < 0) {
 182             av_log(hls, AV_LOG_ERROR, "failed to delete old segment %s: %s\n",
 183                                      path, strerror(errno));
 184         }
 185
 186         if (segment->sub_filename[0] != '\0') {
 187             sub_path_size = strlen(dirname) + strlen(segment->sub_filename) + 1;
 188             sub_path = av_malloc(sub_path_size);
 189             if (!sub_path) {
 190                 ret = AVERROR(ENOMEM);
 191                 goto fail;
 192             }
 193
 194             av_strlcpy(sub_path, dirname, sub_path_size);
 195             av_strlcat(sub_path, segment->sub_filename, sub_path_size);
 196             if (unlink(sub_path) < 0) {
 197                 av_log(hls, AV_LOG_ERROR, "failed to delete old segment %s: %s\n",
 198                                          sub_path, strerror(errno));
 199             }
 200             av_free(sub_path);
 201         }
 202         av_freep(&path);
 203         previous_segment = segment;
 204         segment = previous_segment->next;
 205         av_free(previous_segment);
 206     }
 207
 208 fail:
 209     av_free(path);
 210     av_free(dirname);
 211
 212     return ret;
 213 }
 214
 215 static int hls_encryption_start(AVFormatContext *s)
 216 {
 217     HLSContext *hls = s->priv_data;
 218     int ret;
 219     AVIOContext *pb;
 220     uint8_t key[KEYSIZE];
 221
 222     if ((ret = s->io_open(s, &pb, hls->key_info_file, AVIO_FLAG_READ, NULL)) < 0) {
 223         av_log(hls, AV_LOG_ERROR,
 224                 "error opening key info file %s\n", hls->key_info_file);
 225         return ret;
 226     }
 227
 228     ff_get_line(pb, hls->key_uri, sizeof(hls->key_uri));
 229     hls->key_uri[strcspn(hls->key_uri, "\r\n")] = '\0';
 230
 231     ff_get_line(pb, hls->key_file, sizeof(hls->key_file));
 232     hls->key_file[strcspn(hls->key_file, "\r\n")] = '\0';
 233
 234     ff_get_line(pb, hls->iv_string, sizeof(hls->iv_string));
 235     hls->iv_string[strcspn(hls->iv_string, "\r\n")] = '\0';
 236
 237     ff_format_io_close(s, &pb);
 238
 239     if (!*hls->key_uri) {
 240         av_log(hls, AV_LOG_ERROR, "no key URI specified in key info file\n");
 241         return AVERROR(EINVAL);
 242     }
 243
 244     if (!*hls->key_file) {
 245         av_log(hls, AV_LOG_ERROR, "no key file specified in key info file\n");
 246         return AVERROR(EINVAL);
 247     }
 248
 249     if ((ret = s->io_open(s, &pb, hls->key_file, AVIO_FLAG_READ, NULL)) < 0) {
 250         av_log(hls, AV_LOG_ERROR, "error opening key file %s\n", hls->key_file);
 251         return ret;
 252     }
 253
 254     ret = avio_read(pb, key, sizeof(key));
 255     ff_format_io_close(s, &pb);
 256     if (ret != sizeof(key)) {
 257         av_log(hls, AV_LOG_ERROR, "error reading key file %s\n", hls->key_file);
 258         if (ret >= 0 || ret == AVERROR_EOF)
 259             ret = AVERROR(EINVAL);
 260         return ret;
 261     }
 262     ff_data_to_hex(hls->key_string, key, sizeof(key), 0);
 263
 264     return 0;
 265 }
 266
 267 static int hls_mux_init(AVFormatContext *s)
 268 {
 269     HLSContext *hls = s->priv_data;
 270     AVFormatContext *oc;
 271     AVFormatContext *vtt_oc = NULL;
 272     int i, ret;
 273
 274     ret = avformat_alloc_output_context2(&hls->avf, hls->oformat, NULL, NULL);
 275     if (ret < 0)
 276         return ret;
 277     oc = hls->avf;
 278
 279     oc->oformat            = hls->oformat;
 280     oc->interrupt_callback = s->interrupt_callback;
 281     oc->max_delay          = s->max_delay;
 282     oc->opaque             = s->opaque;
 283     oc->io_open            = s->io_open;
 284     oc->io_close           = s->io_close;
 285     av_dict_copy(&oc->metadata, s->metadata, 0);
 286
 287     if(hls->vtt_oformat) {
 288         ret = avformat_alloc_output_context2(&hls->vtt_avf, hls->vtt_oformat, NULL, NULL);
 289         if (ret < 0)
 290             return ret;
 291         vtt_oc          = hls->vtt_avf;
 292         vtt_oc->oformat = hls->vtt_oformat;
 293         av_dict_copy(&vtt_oc->metadata, s->metadata, 0);
 294     }
 295
 296     for (i = 0; i < s->nb_streams; i++) {
 297         AVStream *st;
 298         AVFormatContext *loc;
 299         if (s->streams[i]->codec->codec_type == AVMEDIA_TYPE_SUBTITLE)
 300             loc = vtt_oc;
 301         else
 302             loc = oc;
 303
 304         if (!(st = avformat_new_stream(loc, NULL)))
 305             return AVERROR(ENOMEM);
 306         avcodec_copy_context(st->codec, s->streams[i]->codec);
 307         st->sample_aspect_ratio = s->streams[i]->sample_aspect_ratio;
 308         st->time_base = s->streams[i]->time_base;
 309     }
 310     hls->start_pos = 0;
 311
 312     return 0;
 313 }
 314
 315 /* Create a new segment and append it to the segment list */
 316 static int hls_append_segment(struct AVFormatContext *s, HLSContext *hls, double duration,
 317                               int64_t pos, int64_t size)
 318 {
 319     HLSSegment *en = av_malloc(sizeof(*en));
 320     char *tmp, *p;
 321     const char *pl_dir, *filename;
 322     int ret;
 323
 324     if (!en)
 325         return AVERROR(ENOMEM);
 326
 327     filename = av_basename(hls->avf->filename);
 328
 329     if (hls->use_localtime_mkdir) {
 330         /* Possibly prefix with mkdir'ed subdir, if playlist share same
 331          * base path. */
 332         tmp = av_strdup(s->filename);
 333         if (!tmp) {
 334             av_free(en);
 335             return AVERROR(ENOMEM);
 336         }
 337
 338         pl_dir = av_dirname(tmp);
 339         p = hls->avf->filename;
 340         if (strstr(p, pl_dir) == p)
 341             filename = hls->avf->filename + strlen(pl_dir) + 1;
 342         av_free(tmp);
 343     }
 344     av_strlcpy(en->filename, filename, sizeof(en->filename));
 345
 346     if(hls->has_subtitle)
 347         av_strlcpy(en->sub_filename, av_basename(hls->vtt_avf->filename), sizeof(en->sub_filename));
 348     else
 349         en->sub_filename[0] = '\0';
 350
 351     en->duration = duration;
 352     en->pos      = pos;
 353     en->size     = size;
 354     en->next     = NULL;
 355
 356     if (hls->key_info_file) {
 357         av_strlcpy(en->key_uri, hls->key_uri, sizeof(en->key_uri));
 358         av_strlcpy(en->iv_string, hls->iv_string, sizeof(en->iv_string));
 359     }
 360
 361     if (!hls->segments)
 362         hls->segments = en;
 363     else
 364         hls->last_segment->next = en;
 365
 366     hls->last_segment = en;
 367
 368     // EVENT or VOD playlists imply sliding window cannot be used
 369     if (hls->pl_type != PLAYLIST_TYPE_NONE)
 370         hls->max_nb_segments = 0;
 371
 372     if (hls->max_nb_segments && hls->nb_entries >= hls->max_nb_segments) {
 373         en = hls->segments;
 374         hls->segments = en->next;
 375         if (en && hls->flags & HLS_DELETE_SEGMENTS &&
 376                 !(hls->flags & HLS_SINGLE_FILE || hls->wrap)) {
 377             en->next = hls->old_segments;
 378             hls->old_segments = en;
 379             if ((ret = hls_delete_old_segments(hls)) < 0)
 380                 return ret;
 381         } else
 382             av_free(en);
 383     } else
 384         hls->nb_entries++;
 385
 386     hls->sequence++;
 387
 388     return 0;
 389 }
 390
 391 static void hls_free_segments(HLSSegment *p)
 392 {
 393     HLSSegment *en;
 394
 395     while(p) {
 396         en = p;
 397         p = p->next;
 398         av_free(en);
 399     }
 400 }
 401
 402 static void set_http_options(AVDictionary **options, HLSContext *c)
 403 {
 404     if (c->method)
 405         av_dict_set(options, "method", c->method, 0);
 406 }
 407
 408 static int hls_window(AVFormatContext *s, int last)
 409 {
 410     HLSContext *hls = s->priv_data;
 411     HLSSegment *en;
 412     int target_duration = 0;
 413     int ret = 0;
 414     AVIOContext *out = NULL;
 415     AVIOContext *sub_out = NULL;
 416     char temp_filename[1024];
 417     int64_t sequence = FFMAX(hls->start_sequence, hls->sequence - hls->nb_entries);
 418     int version = hls->flags & HLS_SINGLE_FILE ? 4 : 3;
 419     const char *proto = avio_find_protocol_name(s->filename);
 420     int use_rename = proto && !strcmp(proto, "file");
 421     static unsigned warned_non_file;
 422     char *key_uri = NULL;
 423     char *iv_string = NULL;
 424     AVDictionary *options = NULL;
 425
 426     if (!use_rename && !warned_non_file++)
 427         av_log(s, AV_LOG_ERROR, "Cannot use rename on non file protocol, this may lead to races and temporarly partial files\n");
 428
 429     set_http_options(&options, hls);
 430     snprintf(temp_filename, sizeof(temp_filename), use_rename ? "%s.tmp" : "%s", s->filename);
 431     if ((ret = s->io_open(s, &out, temp_filename, AVIO_FLAG_WRITE, &options)) < 0)
 432         goto fail;
 433
 434     for (en = hls->segments; en; en = en->next) {
 435         if (target_duration < en->duration)
 436             target_duration = ceil(en->duration);
 437     }
 438
 439     hls->discontinuity_set = 0;
 440     avio_printf(out, "#EXTM3U\n");
 441     avio_printf(out, "#EXT-X-VERSION:%d\n", version);
 442     if (hls->allowcache == 0 || hls->allowcache == 1) {
 443         avio_printf(out, "#EXT-X-ALLOW-CACHE:%s\n", hls->allowcache == 0 ? "NO" : "YES");
 444     }
 445     avio_printf(out, "#EXT-X-TARGETDURATION:%d\n", target_duration);
 446     avio_printf(out, "#EXT-X-MEDIA-SEQUENCE:%"PRId64"\n", sequence);
 447     if (hls->pl_type == PLAYLIST_TYPE_EVENT) {
 448         avio_printf(out, "#EXT-X-PLAYLIST-TYPE:EVENT\n");
 449     } else if (hls->pl_type == PLAYLIST_TYPE_VOD) {
 450         avio_printf(out, "#EXT-X-PLAYLIST-TYPE:VOD\n");
 451     }
 452
 453     av_log(s, AV_LOG_VERBOSE, "EXT-X-MEDIA-SEQUENCE:%"PRId64"\n",
 454            sequence);
 455     if((hls->flags & HLS_DISCONT_START) && sequence==hls->start_sequence && hls->discontinuity_set==0 ){
 456         avio_printf(out, "#EXT-X-DISCONTINUITY\n");
 457         hls->discontinuity_set = 1;
 458     }
 459     for (en = hls->segments; en; en = en->next) {
 460         if (hls->key_info_file && (!key_uri || strcmp(en->key_uri, key_uri) ||
 461                                     av_strcasecmp(en->iv_string, iv_string))) {
 462             avio_printf(out, "#EXT-X-KEY:METHOD=AES-128,URI=\"%s\"", en->key_uri);
 463             if (*en->iv_string)
 464                 avio_printf(out, ",IV=0x%s", en->iv_string);
 465             avio_printf(out, "\n");
 466             key_uri = en->key_uri;
 467             iv_string = en->iv_string;
 468         }
 469
 470         if (hls->flags & HLS_ROUND_DURATIONS)
 471             avio_printf(out, "#EXTINF:%ld,\n",  lrint(en->duration));
 472         else
 473             avio_printf(out, "#EXTINF:%f,\n", en->duration);
 474         if (hls->flags & HLS_SINGLE_FILE)
 475              avio_printf(out, "#EXT-X-BYTERANGE:%"PRIi64"@%"PRIi64"\n",
 476                          en->size, en->pos);
 477         if (hls->baseurl)
 478             avio_printf(out, "%s", hls->baseurl);
 479         avio_printf(out, "%s\n", en->filename);
 480     }
 481
 482     if (last && (hls->flags & HLS_OMIT_ENDLIST)==0)
 483         avio_printf(out, "#EXT-X-ENDLIST\n");
 484
 485     if( hls->vtt_m3u8_name ) {
 486         if ((ret = s->io_open(s, &sub_out, hls->vtt_m3u8_name, AVIO_FLAG_WRITE, &options)) < 0)
 487             goto fail;
 488         avio_printf(sub_out, "#EXTM3U\n");
 489         avio_printf(sub_out, "#EXT-X-VERSION:%d\n", version);
 490         if (hls->allowcache == 0 || hls->allowcache == 1) {
 491             avio_printf(sub_out, "#EXT-X-ALLOW-CACHE:%s\n", hls->allowcache == 0 ? "NO" : "YES");
 492         }
 493         avio_printf(sub_out, "#EXT-X-TARGETDURATION:%d\n", target_duration);
 494         avio_printf(sub_out, "#EXT-X-MEDIA-SEQUENCE:%"PRId64"\n", sequence);
 495
 496         av_log(s, AV_LOG_VERBOSE, "EXT-X-MEDIA-SEQUENCE:%"PRId64"\n",
 497                sequence);
 498
 499         for (en = hls->segments; en; en = en->next) {
 500             avio_printf(sub_out, "#EXTINF:%f,\n", en->duration);
 501             if (hls->flags & HLS_SINGLE_FILE)
 502                  avio_printf(sub_out, "#EXT-X-BYTERANGE:%"PRIi64"@%"PRIi64"\n",
 503                          en->size, en->pos);
 504             if (hls->baseurl)
 505                 avio_printf(sub_out, "%s", hls->baseurl);
 506             avio_printf(sub_out, "%s\n", en->sub_filename);
 507         }
 508
 509         if (last)
 510             avio_printf(sub_out, "#EXT-X-ENDLIST\n");
 511
 512     }
 513
 514 fail:
 515     av_dict_free(&options);
 516     ff_format_io_close(s, &out);
 517     ff_format_io_close(s, &sub_out);
 518     if (ret >= 0 && use_rename)
 519         ff_rename(temp_filename, s->filename, s);
 520     return ret;
 521 }
 522
 523 static int hls_start(AVFormatContext *s)
 524 {
 525     HLSContext *c = s->priv_data;
 526     AVFormatContext *oc = c->avf;
 527     AVFormatContext *vtt_oc = c->vtt_avf;
 528     AVDictionary *options = NULL;
 529     char *filename, iv_string[KEYSIZE*2 + 1];
 530     int err = 0;
 531
 532     if (c->flags & HLS_SINGLE_FILE) {
 533         av_strlcpy(oc->filename, c->basename,
 534                    sizeof(oc->filename));
 535         if (c->vtt_basename)
 536             av_strlcpy(vtt_oc->filename, c->vtt_basename,
 537                   sizeof(vtt_oc->filename));
 538     } else {
 539         if (c->use_localtime) {
 540             time_t now0;
 541             struct tm *tm, tmpbuf;
 542             time(&now0);
 543             tm = localtime_r(&now0, &tmpbuf);
 544             if (!strftime(oc->filename, sizeof(oc->filename), c->basename, tm)) {
 545                 av_log(oc, AV_LOG_ERROR, "Could not get segment filename with use_localtime\n");
 546                 return AVERROR(EINVAL);
 547             }
 548
 549             if (c->use_localtime_mkdir) {
 550                 const char *dir;
 551                 char *fn_copy = av_strdup(oc->filename);
 552                 if (!fn_copy) {
 553                     return AVERROR(ENOMEM);
 554                 }
 555                 dir = av_dirname(fn_copy);
 556                 if (mkdir(dir, 0777) == -1 && errno != EEXIST) {
 557                     av_log(oc, AV_LOG_ERROR, "Could not create directory %s with use_localtime_mkdir\n", dir);
 558                     av_free(fn_copy);
 559                     return AVERROR(errno);
 560                 }
 561                 av_free(fn_copy);
 562             }
 563         } else if (av_get_frame_filename(oc->filename, sizeof(oc->filename),
 564                                   c->basename, c->wrap ? c->sequence % c->wrap : c->sequence) < 0) {
 565             av_log(oc, AV_LOG_ERROR, "Invalid segment filename template '%s' you can try use -use_localtime 1 with it\n", c->basename);
 566             return AVERROR(EINVAL);
 567         }
 568         if( c->vtt_basename) {
 569             if (av_get_frame_filename(vtt_oc->filename, sizeof(vtt_oc->filename),
 570                               c->vtt_basename, c->wrap ? c->sequence % c->wrap : c->sequence) < 0) {
 571                 av_log(vtt_oc, AV_LOG_ERROR, "Invalid segment filename template '%s'\n", c->vtt_basename);
 572                 return AVERROR(EINVAL);
 573             }
 574        }
 575     }
 576     c->number++;
 577
 578     set_http_options(&options, c);
 579
 580     if (c->key_info_file) {
 581         if ((err = hls_encryption_start(s)) < 0)
 582             goto fail;
 583         if ((err = av_dict_set(&options, "encryption_key", c->key_string, 0))
 584                 < 0)
 585             goto fail;
 586         err = av_strlcpy(iv_string, c->iv_string, sizeof(iv_string));
 587         if (!err)
 588             snprintf(iv_string, sizeof(iv_string), "%032"PRIx64, c->sequence);
 589         if ((err = av_dict_set(&options, "encryption_iv", iv_string, 0)) < 0)
 590            goto fail;
 591
 592         filename = av_asprintf("crypto:%s", oc->filename);
 593         if (!filename) {
 594             err = AVERROR(ENOMEM);
 595             goto fail;
 596         }
 597         err = s->io_open(s, &oc->pb, filename, AVIO_FLAG_WRITE, &options);
 598         av_free(filename);
 599         av_dict_free(&options);
 600         if (err < 0)
 601             return err;
 602     } else
 603         if ((err = s->io_open(s, &oc->pb, oc->filename, AVIO_FLAG_WRITE, &options)) < 0)
 604             goto fail;
 605     if (c->vtt_basename) {
 606         set_http_options(&options, c);
 607         if ((err = s->io_open(s, &vtt_oc->pb, vtt_oc->filename, AVIO_FLAG_WRITE, &options)) < 0)
 608             goto fail;
 609     }
 610     av_dict_free(&options);
 611
 612     /* We only require one PAT/PMT per segment. */
 613     if (oc->oformat->priv_class && oc->priv_data) {
 614         char period[21];
 615
 616         snprintf(period, sizeof(period), "%d", (INT_MAX / 2) - 1);
 617
 618         av_opt_set(oc->priv_data, "mpegts_flags", "resend_headers", 0);
 619         av_opt_set(oc->priv_data, "sdt_period", period, 0);
 620         av_opt_set(oc->priv_data, "pat_period", period, 0);
 621     }
 622
 623     if (c->vtt_basename) {
 624         err = avformat_write_header(vtt_oc,NULL);
 625         if (err < 0)
 626             return err;
 627     }
 628
 629     return 0;
 630 fail:
 631     av_dict_free(&options);
 632
 633     return err;
 634 }
 635
 636 static int hls_write_header(AVFormatContext *s)
 637 {
 638     HLSContext *hls = s->priv_data;
 639     int ret, i;
 640     char *p;
 641     const char *pattern = "%d.ts";
 642     const char *pattern_localtime_fmt = "-%s.ts";
 643     const char *vtt_pattern = "%d.vtt";
 644     AVDictionary *options = NULL;
 645     int basename_size;
 646     int vtt_basename_size;
 647
 648     hls->sequence       = hls->start_sequence;
 649     hls->recording_time = hls->time * AV_TIME_BASE;
 650     hls->start_pts      = AV_NOPTS_VALUE;
 651
 652     if (hls->format_options_str) {
 653         ret = av_dict_parse_string(&hls->format_options, hls->format_options_str, "=", ":", 0);
 654         if (ret < 0) {
 655             av_log(s, AV_LOG_ERROR, "Could not parse format options list '%s'\n", hls->format_options_str);
 656             goto fail;
 657         }
 658     }
 659
 660     for (i = 0; i < s->nb_streams; i++) {
 661         hls->has_video +=
 662             s->streams[i]->codec->codec_type == AVMEDIA_TYPE_VIDEO;
 663         hls->has_subtitle +=
 664             s->streams[i]->codec->codec_type == AVMEDIA_TYPE_SUBTITLE;
 665     }
 666
 667     if (hls->has_video > 1)
 668         av_log(s, AV_LOG_WARNING,
 669                "More than a single video stream present, "
 670                "expect issues decoding it.\n");
 671
 672     hls->oformat = av_guess_format("mpegts", NULL, NULL);
 673
 674     if (!hls->oformat) {
 675         ret = AVERROR_MUXER_NOT_FOUND;
 676         goto fail;
 677     }
 678
 679     if(hls->has_subtitle) {
 680         hls->vtt_oformat = av_guess_format("webvtt", NULL, NULL);
 681         if (!hls->oformat) {
 682             ret = AVERROR_MUXER_NOT_FOUND;
 683             goto fail;
 684         }
 685     }
 686
 687     if (hls->segment_filename) {
 688         hls->basename = av_strdup(hls->segment_filename);
 689         if (!hls->basename) {
 690             ret = AVERROR(ENOMEM);
 691             goto fail;
 692         }
 693     } else {
 694         if (hls->flags & HLS_SINGLE_FILE)
 695             pattern = ".ts";
 696
 697         if (hls->use_localtime) {
 698             basename_size = strlen(s->filename) + strlen(pattern_localtime_fmt) + 1;
 699         } else {
 700             basename_size = strlen(s->filename) + strlen(pattern) + 1;
 701         }
 702         hls->basename = av_malloc(basename_size);
 703         if (!hls->basename) {
 704             ret = AVERROR(ENOMEM);
 705             goto fail;
 706         }
 707
 708         av_strlcpy(hls->basename, s->filename, basename_size);
 709
 710         p = strrchr(hls->basename, '.');
 711         if (p)
 712             *p = '\0';
 713         if (hls->use_localtime) {
 714             av_strlcat(hls->basename, pattern_localtime_fmt, basename_size);
 715         } else {
 716             av_strlcat(hls->basename, pattern, basename_size);
 717         }
 718     }
 719
 720     if(hls->has_subtitle) {
 721
 722         if (hls->flags & HLS_SINGLE_FILE)
 723             vtt_pattern = ".vtt";
 724         vtt_basename_size = strlen(s->filename) + strlen(vtt_pattern) + 1;
 725         hls->vtt_basename = av_malloc(vtt_basename_size);
 726         if (!hls->vtt_basename) {
 727             ret = AVERROR(ENOMEM);
 728             goto fail;
 729         }
 730         hls->vtt_m3u8_name = av_malloc(vtt_basename_size);
 731         if (!hls->vtt_m3u8_name ) {
 732             ret = AVERROR(ENOMEM);
 733             goto fail;
 734         }
 735         av_strlcpy(hls->vtt_basename, s->filename, vtt_basename_size);
 736         p = strrchr(hls->vtt_basename, '.');
 737         if (p)
 738             *p = '\0';
 739
 740         if( hls->subtitle_filename ) {
 741             strcpy(hls->vtt_m3u8_name, hls->subtitle_filename);
 742         } else {
 743             strcpy(hls->vtt_m3u8_name, hls->vtt_basename);
 744             av_strlcat(hls->vtt_m3u8_name, "_vtt.m3u8", vtt_basename_size);
 745         }
 746         av_strlcat(hls->vtt_basename, vtt_pattern, vtt_basename_size);
 747     }
 748
 749     if ((ret = hls_mux_init(s)) < 0)
 750         goto fail;
 751
 752     if ((ret = hls_start(s)) < 0)
 753         goto fail;
 754
 755     av_dict_copy(&options, hls->format_options, 0);
 756     ret = avformat_write_header(hls->avf, &options);
 757     if (av_dict_count(options)) {
 758         av_log(s, AV_LOG_ERROR, "Some of provided format options in '%s' are not recognized\n", hls->format_options_str);
 759         ret = AVERROR(EINVAL);
 760         goto fail;
 761     }
 762     //av_assert0(s->nb_streams == hls->avf->nb_streams);
 763     for (i = 0; i < s->nb_streams; i++) {
 764         AVStream *inner_st;
 765         AVStream *outer_st = s->streams[i];
 766         if (outer_st->codec->codec_type != AVMEDIA_TYPE_SUBTITLE)
 767             inner_st = hls->avf->streams[i];
 768         else if (hls->vtt_avf)
 769             inner_st = hls->vtt_avf->streams[0];
 770         else {
 771             /* We have a subtitle stream, when the user does not want one */
 772             inner_st = NULL;
 773             continue;
 774         }
 775         avpriv_set_pts_info(outer_st, inner_st->pts_wrap_bits, inner_st->time_base.num, inner_st->time_base.den);
 776     }
 777 fail:
 778
 779     av_dict_free(&options);
 780     if (ret < 0) {
 781         av_freep(&hls->basename);
 782         av_freep(&hls->vtt_basename);
 783         if (hls->avf)
 784             avformat_free_context(hls->avf);
 785         if (hls->vtt_avf)
 786             avformat_free_context(hls->vtt_avf);
 787
 788     }
 789     return ret;
 790 }
 791
 792 static int hls_write_packet(AVFormatContext *s, AVPacket *pkt)
 793 {
 794     HLSContext *hls = s->priv_data;
 795     AVFormatContext *oc = NULL;
 796     AVStream *st = s->streams[pkt->stream_index];
 797     int64_t end_pts = hls->recording_time * hls->number;
 798     int is_ref_pkt = 1;
 799     int ret, can_split = 1;
 800     int stream_index = 0;
 801
 802     if( st->codec->codec_type == AVMEDIA_TYPE_SUBTITLE ) {
 803         oc = hls->vtt_avf;
 804         stream_index = 0;
 805     } else {
 806         oc = hls->avf;
 807         stream_index = pkt->stream_index;
 808     }
 809     if (hls->start_pts == AV_NOPTS_VALUE) {
 810         hls->start_pts = pkt->pts;
 811         hls->end_pts   = pkt->pts;
 812     }
 813
 814     if (hls->has_video) {
 815         can_split = st->codec->codec_type == AVMEDIA_TYPE_VIDEO &&
 816                     pkt->flags & AV_PKT_FLAG_KEY;
 817         is_ref_pkt = st->codec->codec_type == AVMEDIA_TYPE_VIDEO;
 818     }
 819     if (pkt->pts == AV_NOPTS_VALUE)
 820         is_ref_pkt = can_split = 0;
 821
 822     if (is_ref_pkt)
 823         hls->duration = (double)(pkt->pts - hls->end_pts)
 824                                    * st->time_base.num / st->time_base.den;
 825
 826     if (can_split && av_compare_ts(pkt->pts - hls->start_pts, st->time_base,
 827                                    end_pts, AV_TIME_BASE_Q) >= 0) {
 828         int64_t new_start_pos;
 829         av_write_frame(oc, NULL); /* Flush any buffered data */
 830
 831         new_start_pos = avio_tell(hls->avf->pb);
 832         hls->size = new_start_pos - hls->start_pos;
 833         ret = hls_append_segment(s, hls, hls->duration, hls->start_pos, hls->size);
 834         hls->start_pos = new_start_pos;
 835         if (ret < 0)
 836             return ret;
 837
 838         hls->end_pts = pkt->pts;
 839         hls->duration = 0;
 840
 841         if (hls->flags & HLS_SINGLE_FILE) {
 842             if (hls->avf->oformat->priv_class && hls->avf->priv_data)
 843                 av_opt_set(hls->avf->priv_data, "mpegts_flags", "resend_headers", 0);
 844             hls->number++;
 845         } else {
 846             ff_format_io_close(s, &oc->pb);
 847             if (hls->vtt_avf)
 848                 ff_format_io_close(s, &hls->vtt_avf->pb);
 849
 850             ret = hls_start(s);
 851         }
 852
 853         if (ret < 0)
 854             return ret;
 855
 856         if( st->codec->codec_type == AVMEDIA_TYPE_SUBTITLE )
 857             oc = hls->vtt_avf;
 858         else
 859         oc = hls->avf;
 860
 861         if ((ret = hls_window(s, 0)) < 0)
 862             return ret;
 863     }
 864
 865     ret = ff_write_chained(oc, stream_index, pkt, s, 0);
 866
 867     return ret;
 868 }
 869
 870 static int hls_write_trailer(struct AVFormatContext *s)
 871 {
 872     HLSContext *hls = s->priv_data;
 873     AVFormatContext *oc = hls->avf;
 874     AVFormatContext *vtt_oc = hls->vtt_avf;
 875
 876     av_write_trailer(oc);
 877     if (oc->pb) {
 878         hls->size = avio_tell(hls->avf->pb) - hls->start_pos;
 879         ff_format_io_close(s, &oc->pb);
 880         hls_append_segment(s, hls, hls->duration, hls->start_pos, hls->size);
 881     }
 882
 883     if (vtt_oc) {
 884         if (vtt_oc->pb)
 885             av_write_trailer(vtt_oc);
 886         hls->size = avio_tell(hls->vtt_avf->pb) - hls->start_pos;
 887         ff_format_io_close(s, &vtt_oc->pb);
 888     }
 889     av_freep(&hls->basename);
 890     avformat_free_context(oc);
 891
 892     if (vtt_oc) {
 893         av_freep(&hls->vtt_basename);
 894         av_freep(&hls->vtt_m3u8_name);
 895         avformat_free_context(vtt_oc);
 896     }
 897
 898     hls->avf = NULL;
 899     hls_window(s, 1);
 900
 901     hls_free_segments(hls->segments);
 902     hls_free_segments(hls->old_segments);
 903     return 0;
 904 }
 905
 906 #define OFFSET(x) offsetof(HLSContext, x)
 907 #define E AV_OPT_FLAG_ENCODING_PARAM
 908 static const AVOption options[] = {
 909     {"start_number",  "set first number in the sequence",        OFFSET(start_sequence),AV_OPT_TYPE_INT64,  {.i64 = 0},     0, INT64_MAX, E},
 910     {"hls_time",      "set segment length in seconds",           OFFSET(time),    AV_OPT_TYPE_FLOAT,  {.dbl = 2},     0, FLT_MAX, E},
 911     {"hls_list_size", "set maximum number of playlist entries",  OFFSET(max_nb_segments),    AV_OPT_TYPE_INT,    {.i64 = 5},     0, INT_MAX, E},
 912     {"hls_ts_options","set hls mpegts list of options for the container format used for hls", OFFSET(format_options_str), AV_OPT_TYPE_STRING, {.str = NULL},  0, 0,    E},
 913     {"hls_vtt_options","set hls vtt list of options for the container format used for hls", OFFSET(vtt_format_options_str), AV_OPT_TYPE_STRING, {.str = NULL},  0, 0,    E},
 914     {"hls_wrap",      "set number after which the index wraps",  OFFSET(wrap),    AV_OPT_TYPE_INT,    {.i64 = 0},     0, INT_MAX, E},
 915     {"hls_allow_cache", "explicitly set whether the client MAY (1) or MUST NOT (0) cache media segments", OFFSET(allowcache), AV_OPT_TYPE_INT, {.i64 = -1}, INT_MIN, INT_MAX, E},
 916     {"hls_base_url",  "url to prepend to each playlist entry",   OFFSET(baseurl), AV_OPT_TYPE_STRING, {.str = NULL},  0, 0,       E},
 917     {"hls_segment_filename", "filename template for segment files", OFFSET(segment_filename),   AV_OPT_TYPE_STRING, {.str = NULL},            0,       0,         E},
 918     {"hls_key_info_file",    "file with key URI and key file path", OFFSET(key_info_file),      AV_OPT_TYPE_STRING, {.str = NULL},            0,       0,         E},
 919     {"hls_subtitle_path",     "set path of hls subtitles", OFFSET(subtitle_filename), AV_OPT_TYPE_STRING, {.str = NULL},  0, 0,    E},
 920     {"hls_flags",     "set flags affecting HLS playlist and media file generation", OFFSET(flags), AV_OPT_TYPE_FLAGS, {.i64 = 0 }, 0, UINT_MAX, E, "flags"},
 921     {"single_file",   "generate a single media file indexed with byte ranges", 0, AV_OPT_TYPE_CONST, {.i64 = HLS_SINGLE_FILE }, 0, UINT_MAX,   E, "flags"},
 922     {"delete_segments", "delete segment files that are no longer part of the playlist", 0, AV_OPT_TYPE_CONST, {.i64 = HLS_DELETE_SEGMENTS }, 0, UINT_MAX,   E, "flags"},
 923     {"round_durations", "round durations in m3u8 to whole numbers", 0, AV_OPT_TYPE_CONST, {.i64 = HLS_ROUND_DURATIONS }, 0, UINT_MAX,   E, "flags"},
 924     {"discont_start", "start the playlist with a discontinuity tag", 0, AV_OPT_TYPE_CONST, {.i64 = HLS_DISCONT_START }, 0, UINT_MAX,   E, "flags"},
 925     {"omit_endlist", "Do not append an endlist when ending stream", 0, AV_OPT_TYPE_CONST, {.i64 = HLS_OMIT_ENDLIST }, 0, UINT_MAX,   E, "flags"},
 926     {"use_localtime", "set filename expansion with strftime at segment creation", OFFSET(use_localtime), AV_OPT_TYPE_BOOL, {.i64 = 0 }, 0, 1, E },
 927     {"use_localtime_mkdir", "create last directory component in strftime-generated filename", OFFSET(use_localtime_mkdir), AV_OPT_TYPE_BOOL, {.i64 = 0 }, 0, 1, E },
 928     {"hls_playlist_type", "set the HLS playlist type", OFFSET(pl_type), AV_OPT_TYPE_INT, {.i64 = PLAYLIST_TYPE_NONE }, 0, PLAYLIST_TYPE_NB-1, E, "pl_type" },
 929     {"event", "EVENT playlist", 0, AV_OPT_TYPE_CONST, {.i64 = PLAYLIST_TYPE_EVENT }, INT_MIN, INT_MAX, E, "pl_type" },
 930     {"vod", "VOD playlist", 0, AV_OPT_TYPE_CONST, {.i64 = PLAYLIST_TYPE_VOD }, INT_MIN, INT_MAX, E, "pl_type" },
 931     {"method", "set the HTTP method", OFFSET(method), AV_OPT_TYPE_STRING, {.str = NULL},  0, 0,    E},
 932
 933     { NULL },
 934 };
 935
 936 static const AVClass hls_class = {
 937     .class_name = "hls muxer",
 938     .item_name  = av_default_item_name,
 939     .option     = options,
 940     .version    = LIBAVUTIL_VERSION_INT,
 941 };
 942
 943
 944 AVOutputFormat ff_hls_muxer = {
 945     .name           = "hls",
 946     .long_name      = NULL_IF_CONFIG_SMALL("Apple HTTP Live Streaming"),
 947     .extensions     = "m3u8",
 948     .priv_data_size = sizeof(HLSContext),
 949     .audio_codec    = AV_CODEC_ID_AAC,
 950     .video_codec    = AV_CODEC_ID_H264,
 951     .subtitle_codec = AV_CODEC_ID_WEBVTT,
 952     .flags          = AVFMT_NOFILE | AVFMT_ALLOW_FLUSH,
 953     .write_header   = hls_write_header,
 954     .write_packet   = hls_write_packet,
 955     .write_trailer  = hls_write_trailer,
 956     .priv_class     = &hls_class,
 957 };