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

   1 /*
   2  * buffered I/O
   3  * Copyright (c) 2000,2001 Fabrice Bellard
   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 "libavutil/bprint.h"
  23 #include "libavutil/crc.h"
  24 #include "libavutil/dict.h"
  25 #include "libavutil/intreadwrite.h"
  26 #include "libavutil/log.h"
  27 #include "libavutil/opt.h"
  28 #include "libavutil/avassert.h"
  29 #include "libavutil/thread.h"
  30 #include "avformat.h"
  31 #include "avio.h"
  32 #include "avio_internal.h"
  33 #include "internal.h"
  34 #include "metacube2.h"
  35 #include "url.h"
  36 #include <stdarg.h>
  37
  38 #define IO_BUFFER_SIZE 32768
  39
  40 /**
  41  * Do seeks within this distance ahead of the current buffer by skipping
  42  * data instead of calling the protocol seek function, for seekable
  43  * protocols.
  44  */
  45 #define SHORT_SEEK_THRESHOLD 32768
  46
  47 static void *ff_avio_child_next(void *obj, void *prev)
  48 {
  49     AVIOContext *s = obj;
  50     return prev ? NULL : s->opaque;
  51 }
  52
  53 static const AVClass *child_class_iterate(void **iter)
  54 {
  55     const AVClass *c = *iter ? NULL : &ffurl_context_class;
  56     *iter = (void*)(uintptr_t)c;
  57     return c;
  58 }
  59
  60 #define OFFSET(x) offsetof(AVIOContext,x)
  61 #define E AV_OPT_FLAG_ENCODING_PARAM
  62 #define D AV_OPT_FLAG_DECODING_PARAM
  63 static const AVOption ff_avio_options[] = {
  64     {"protocol_whitelist", "List of protocols that are allowed to be used", OFFSET(protocol_whitelist), AV_OPT_TYPE_STRING, { .str = NULL },  0, 0, D },
  65     { NULL },
  66 };
  67
  68 const AVClass ff_avio_class = {
  69     .class_name = "AVIOContext",
  70     .item_name  = av_default_item_name,
  71     .version    = LIBAVUTIL_VERSION_INT,
  72     .option     = ff_avio_options,
  73     .child_next = ff_avio_child_next,
  74     .child_class_iterate = child_class_iterate,
  75 };
  76
  77 static void fill_buffer(AVIOContext *s);
  78 static int url_resetbuf(AVIOContext *s, int flags);
  79
  80 int ffio_init_context(AVIOContext *s,
  81                   unsigned char *buffer,
  82                   int buffer_size,
  83                   int write_flag,
  84                   void *opaque,
  85                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
  86                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
  87                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
  88 {
  89     memset(s, 0, sizeof(AVIOContext));
  90
  91     s->buffer      = buffer;
  92     s->orig_buffer_size =
  93     s->buffer_size = buffer_size;
  94     s->buf_ptr     = buffer;
  95     s->buf_ptr_max = buffer;
  96     s->opaque      = opaque;
  97     s->direct      = 0;
  98
  99     url_resetbuf(s, write_flag ? AVIO_FLAG_WRITE : AVIO_FLAG_READ);
 100
 101     s->write_packet    = write_packet;
 102     s->read_packet     = read_packet;
 103     s->seek            = seek;
 104     s->pos             = 0;
 105     s->eof_reached     = 0;
 106     s->error           = 0;
 107     s->seekable        = seek ? AVIO_SEEKABLE_NORMAL : 0;
 108     s->min_packet_size = 0;
 109     s->max_packet_size = 0;
 110     s->metacube        = 0;
 111     s->update_checksum = NULL;
 112     s->short_seek_threshold = SHORT_SEEK_THRESHOLD;
 113
 114     if (!read_packet && !write_flag) {
 115         s->pos     = buffer_size;
 116         s->buf_end = s->buffer + buffer_size;
 117     }
 118     s->read_pause = NULL;
 119     s->read_seek  = NULL;
 120
 121     s->write_data_type       = NULL;
 122     s->ignore_boundary_point = 0;
 123     s->current_type          = AVIO_DATA_MARKER_UNKNOWN;
 124     s->last_time             = AV_NOPTS_VALUE;
 125     s->short_seek_get        = NULL;
 126     s->written               = 0;
 127
 128     return 0;
 129 }
 130
 131 AVIOContext *avio_alloc_context(
 132                   unsigned char *buffer,
 133                   int buffer_size,
 134                   int write_flag,
 135                   void *opaque,
 136                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
 137                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
 138                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
 139 {
 140     AVIOContext *s = av_malloc(sizeof(AVIOContext));
 141     if (!s)
 142         return NULL;
 143     ffio_init_context(s, buffer, buffer_size, write_flag, opaque,
 144                   read_packet, write_packet, seek);
 145     return s;
 146 }
 147
 148 void avio_context_free(AVIOContext **ps)
 149 {
 150     av_freep(ps);
 151 }
 152
 153 static void writeout(AVIOContext *s, const uint8_t *data, int len)
 154 {
 155     if (!s->error) {
 156         int ret = 0;
 157         if (s->write_data_type)
 158             ret = s->write_data_type(s->opaque, (uint8_t *)data,
 159                                      len,
 160                                      s->current_type,
 161                                      s->last_time);
 162         else if (s->write_packet)
 163             ret = s->write_packet(s->opaque, (uint8_t *)data, len);
 164         if (ret < 0) {
 165             s->error = ret;
 166         } else {
 167             if (s->pos + len > s->written)
 168                 s->written = s->pos + len;
 169         }
 170     }
 171     if (s->current_type == AVIO_DATA_MARKER_SYNC_POINT ||
 172         s->current_type == AVIO_DATA_MARKER_BOUNDARY_POINT) {
 173         s->current_type = AVIO_DATA_MARKER_UNKNOWN;
 174     }
 175     s->last_time = AV_NOPTS_VALUE;
 176     s->writeout_count ++;
 177     s->pos += len;
 178 }
 179
 180 static AVOnce metacube2_crc_once_control = AV_ONCE_INIT;
 181 static AVCRC metacube2_crc_table[257];
 182
 183 static void metacube2_crc_init_table_once(void)
 184 {
 185     av_assert0(av_crc_init(metacube2_crc_table, 0, 16, 0x8fdb, sizeof(metacube2_crc_table)) >= 0);
 186 }
 187
 188 static uint16_t metacube2_compute_crc(const struct metacube2_block_header *hdr)
 189 {
 190     static const int data_len = sizeof(hdr->size) + sizeof(hdr->flags);
 191     const uint8_t *data = (uint8_t *)&hdr->size;
 192     uint16_t crc;
 193
 194     ff_thread_once(&metacube2_crc_once_control, metacube2_crc_init_table_once);
 195
 196     // Metacube2 specifies a CRC start of 0x1234, but its pycrc-derived CRC
 197     // includes a finalization step that is done somewhat differently in av_crc().
 198     // 0x1234 alone sent through that finalization becomes 0x394a, and then we
 199     // need a byte-swap of the CRC value (both on input and output) to account for
 200     // differing conventions.
 201     crc = av_crc(metacube2_crc_table, 0x4a39, data, data_len);
 202     return av_bswap16(crc);
 203 }
 204
 205 static void finalize_metacube_block_header(AVIOContext *s)
 206 {
 207     struct metacube2_block_header hdr;
 208     int len = s->buf_ptr_max - s->buffer;
 209     int flags = 0;
 210
 211     if (s->current_type == AVIO_DATA_MARKER_SYNC_POINT)
 212         s->seen_sync_point = 1;
 213     else if (s->current_type == AVIO_DATA_MARKER_HEADER)
 214         // NOTE: If there are multiple blocks marked METACUBE_FLAGS_HEADER,
 215         // only the last one will count. This may become a problem if the
 216         // mux flushes halfway through the stream header; if so, we would
 217         // need to keep track of and concatenate the different parts.
 218         flags |= METACUBE_FLAGS_HEADER;
 219     else if (s->seen_sync_point)
 220         flags |= METACUBE_FLAGS_NOT_SUITABLE_FOR_STREAM_START;
 221
 222     memcpy(hdr.sync, METACUBE2_SYNC, sizeof(hdr.sync));
 223     AV_WB32(&hdr.size, len - sizeof(hdr));
 224     AV_WB16(&hdr.flags, flags);
 225     AV_WB16(&hdr.csum, metacube2_compute_crc(&hdr));
 226     memcpy(s->buffer, &hdr, sizeof(hdr));
 227 }
 228
 229 static void flush_buffer(AVIOContext *s)
 230 {
 231     int buffer_empty;
 232     s->buf_ptr_max = FFMAX(s->buf_ptr, s->buf_ptr_max);
 233     if (s->metacube)
 234        buffer_empty = s->buf_ptr_max <= s->buffer + sizeof(struct metacube2_block_header);
 235     else
 236        buffer_empty = s->buf_ptr_max <= s->buffer;
 237     if (s->write_flag && !buffer_empty) {
 238         if (s->metacube)
 239             finalize_metacube_block_header(s);
 240         writeout(s, s->buffer, s->buf_ptr_max - s->buffer);
 241         if (s->update_checksum) {
 242             s->checksum     = s->update_checksum(s->checksum, s->checksum_ptr,
 243                                                  s->buf_ptr_max - s->checksum_ptr);
 244             s->checksum_ptr = s->buffer;
 245         }
 246     }
 247     s->buf_ptr = s->buf_ptr_max = s->buffer;
 248
 249     // Add space for Metacube header.
 250     if (s->write_flag && s->metacube)
 251         s->buf_ptr += sizeof(struct metacube2_block_header);
 252     if (!s->write_flag)
 253         s->buf_end = s->buffer;
 254 }
 255
 256 void avio_w8(AVIOContext *s, int b)
 257 {
 258     av_assert2(b>=-128 && b<=255);
 259     *s->buf_ptr++ = b;
 260     if (s->buf_ptr >= s->buf_end)
 261         flush_buffer(s);
 262 }
 263
 264 void ffio_fill(AVIOContext *s, int b, int count)
 265 {
 266     while (count > 0) {
 267         int len = FFMIN(s->buf_end - s->buf_ptr, count);
 268         memset(s->buf_ptr, b, len);
 269         s->buf_ptr += len;
 270
 271         if (s->buf_ptr >= s->buf_end)
 272             flush_buffer(s);
 273
 274         count -= len;
 275     }
 276 }
 277
 278 void avio_write(AVIOContext *s, const unsigned char *buf, int size)
 279 {
 280     if (s->direct && !s->update_checksum && !s->metacube) {
 281         avio_flush(s);
 282         writeout(s, buf, size);
 283         return;
 284     }
 285     while (size > 0) {
 286         int len = FFMIN(s->buf_end - s->buf_ptr, size);
 287         memcpy(s->buf_ptr, buf, len);
 288         s->buf_ptr += len;
 289
 290         if (s->buf_ptr >= s->buf_end)
 291             flush_buffer(s);
 292
 293         buf += len;
 294         size -= len;
 295     }
 296 }
 297
 298 void avio_flush(AVIOContext *s)
 299 {
 300     int seekback = s->write_flag ? FFMIN(0, s->buf_ptr - s->buf_ptr_max) : 0;
 301     flush_buffer(s);
 302     if (seekback)
 303         avio_seek(s, seekback, SEEK_CUR);
 304 }
 305
 306 int64_t avio_seek(AVIOContext *s, int64_t offset, int whence)
 307 {
 308     int64_t offset1;
 309     int64_t pos;
 310     int force = whence & AVSEEK_FORCE;
 311     int buffer_size;
 312     int short_seek;
 313     whence &= ~AVSEEK_FORCE;
 314
 315     if(!s)
 316         return AVERROR(EINVAL);
 317
 318     if ((whence & AVSEEK_SIZE))
 319         return s->seek ? s->seek(s->opaque, offset, AVSEEK_SIZE) : AVERROR(ENOSYS);
 320
 321     buffer_size = s->buf_end - s->buffer;
 322     // pos is the absolute position that the beginning of s->buffer corresponds to in the file
 323     pos = s->pos - (s->write_flag ? 0 : buffer_size);
 324
 325     if (whence != SEEK_CUR && whence != SEEK_SET)
 326         return AVERROR(EINVAL);
 327
 328     if (whence == SEEK_CUR) {
 329         offset1 = pos + (s->buf_ptr - s->buffer);
 330         if (offset == 0) {
 331             if (s->metacube && s->write_flag)
 332                 return offset1 - sizeof(struct metacube2_block_header);
 333             else
 334                 return offset1;
 335         }
 336         if (offset > INT64_MAX - offset1)
 337             return AVERROR(EINVAL);
 338         offset += offset1;
 339     } else if (s->metacube && s->write_flag) {
 340         offset += sizeof(struct metacube2_block_header);
 341     }
 342     if (offset < 0)
 343         return AVERROR(EINVAL);
 344
 345     short_seek = s->short_seek_threshold;
 346     if (s->short_seek_get)
 347         short_seek = FFMAX(s->short_seek_get(s->opaque), short_seek);
 348
 349     offset1 = offset - pos; // "offset1" is the relative offset from the beginning of s->buffer
 350     s->buf_ptr_max = FFMAX(s->buf_ptr_max, s->buf_ptr);
 351     if ((!s->direct || !s->seek) &&
 352         offset1 >= 0 && offset1 <= (s->write_flag ? s->buf_ptr_max - s->buffer : buffer_size)) {
 353         /* can do the seek inside the buffer */
 354         s->buf_ptr = s->buffer + offset1;
 355     } else if ((!(s->seekable & AVIO_SEEKABLE_NORMAL) ||
 356                offset1 <= buffer_size + short_seek) &&
 357                !s->write_flag && offset1 >= 0 &&
 358                (!s->direct || !s->seek) &&
 359               (whence != SEEK_END || force)) {
 360         while(s->pos < offset && !s->eof_reached)
 361             fill_buffer(s);
 362         if (s->eof_reached)
 363             return AVERROR_EOF;
 364         s->buf_ptr = s->buf_end - (s->pos - offset);
 365     } else if(!s->write_flag && offset1 < 0 && -offset1 < buffer_size>>1 && s->seek && offset > 0) {
 366         int64_t res;
 367
 368         pos -= FFMIN(buffer_size>>1, pos);
 369         if ((res = s->seek(s->opaque, pos, SEEK_SET)) < 0)
 370             return res;
 371         s->buf_end =
 372         s->buf_ptr = s->buffer;
 373         s->pos = pos;
 374         s->eof_reached = 0;
 375         fill_buffer(s);
 376         return avio_seek(s, offset, SEEK_SET | force);
 377     } else {
 378         int64_t res;
 379         if (s->write_flag) {
 380             flush_buffer(s);
 381         }
 382         if (!s->seek)
 383             return AVERROR(EPIPE);
 384         if ((res = s->seek(s->opaque, offset, SEEK_SET)) < 0)
 385             return res;
 386         s->seek_count ++;
 387         if (!s->write_flag)
 388             s->buf_end = s->buffer;
 389         s->buf_ptr = s->buf_ptr_max = s->buffer;
 390         s->pos = offset;
 391     }
 392     s->eof_reached = 0;
 393     if (s->metacube && s->write_flag)
 394         return offset - sizeof(struct metacube2_block_header);
 395     else
 396         return offset;
 397 }
 398
 399 int64_t avio_skip(AVIOContext *s, int64_t offset)
 400 {
 401     return avio_seek(s, offset, SEEK_CUR);
 402 }
 403
 404 int64_t avio_size(AVIOContext *s)
 405 {
 406     int64_t size;
 407
 408     if (!s)
 409         return AVERROR(EINVAL);
 410
 411     if (s->written)
 412         return s->written;
 413
 414     if (!s->seek)
 415         return AVERROR(ENOSYS);
 416     size = s->seek(s->opaque, 0, AVSEEK_SIZE);
 417     if (size < 0) {
 418         if ((size = s->seek(s->opaque, -1, SEEK_END)) < 0)
 419             return size;
 420         size++;
 421         s->seek(s->opaque, s->pos, SEEK_SET);
 422     }
 423     return size;
 424 }
 425
 426 int avio_feof(AVIOContext *s)
 427 {
 428     if(!s)
 429         return 0;
 430     if(s->eof_reached){
 431         s->eof_reached=0;
 432         fill_buffer(s);
 433     }
 434     return s->eof_reached;
 435 }
 436
 437 void avio_wl32(AVIOContext *s, unsigned int val)
 438 {
 439     avio_w8(s, (uint8_t) val       );
 440     avio_w8(s, (uint8_t)(val >> 8 ));
 441     avio_w8(s, (uint8_t)(val >> 16));
 442     avio_w8(s,           val >> 24 );
 443 }
 444
 445 void avio_wb32(AVIOContext *s, unsigned int val)
 446 {
 447     avio_w8(s,           val >> 24 );
 448     avio_w8(s, (uint8_t)(val >> 16));
 449     avio_w8(s, (uint8_t)(val >> 8 ));
 450     avio_w8(s, (uint8_t) val       );
 451 }
 452
 453 int avio_put_str(AVIOContext *s, const char *str)
 454 {
 455     int len = 1;
 456     if (str) {
 457         len += strlen(str);
 458         avio_write(s, (const unsigned char *) str, len);
 459     } else
 460         avio_w8(s, 0);
 461     return len;
 462 }
 463
 464 static inline int put_str16(AVIOContext *s, const char *str, const int be)
 465 {
 466     const uint8_t *q = str;
 467     int ret = 0;
 468     int err = 0;
 469
 470     while (*q) {
 471         uint32_t ch;
 472         uint16_t tmp;
 473
 474         GET_UTF8(ch, *q++, goto invalid;)
 475         PUT_UTF16(ch, tmp, be ? avio_wb16(s, tmp) : avio_wl16(s, tmp);
 476                   ret += 2;)
 477         continue;
 478 invalid:
 479         av_log(s, AV_LOG_ERROR, "Invalid UTF8 sequence in avio_put_str16%s\n", be ? "be" : "le");
 480         err = AVERROR(EINVAL);
 481         if (!*(q-1))
 482             break;
 483     }
 484     if (be)
 485         avio_wb16(s, 0);
 486     else
 487         avio_wl16(s, 0);
 488     if (err)
 489         return err;
 490     ret += 2;
 491     return ret;
 492 }
 493
 494 #define PUT_STR16(type, big_endian)                          \
 495 int avio_put_str16 ## type(AVIOContext *s, const char *str)  \
 496 {                                                            \
 497 return put_str16(s, str, big_endian);                        \
 498 }
 499
 500 PUT_STR16(le, 0)
 501 PUT_STR16(be, 1)
 502
 503 #undef PUT_STR16
 504
 505 void avio_wl64(AVIOContext *s, uint64_t val)
 506 {
 507     avio_wl32(s, (uint32_t)(val & 0xffffffff));
 508     avio_wl32(s, (uint32_t)(val >> 32));
 509 }
 510
 511 void avio_wb64(AVIOContext *s, uint64_t val)
 512 {
 513     avio_wb32(s, (uint32_t)(val >> 32));
 514     avio_wb32(s, (uint32_t)(val & 0xffffffff));
 515 }
 516
 517 void avio_wl16(AVIOContext *s, unsigned int val)
 518 {
 519     avio_w8(s, (uint8_t)val);
 520     avio_w8(s, (int)val >> 8);
 521 }
 522
 523 void avio_wb16(AVIOContext *s, unsigned int val)
 524 {
 525     avio_w8(s, (int)val >> 8);
 526     avio_w8(s, (uint8_t)val);
 527 }
 528
 529 void avio_wl24(AVIOContext *s, unsigned int val)
 530 {
 531     avio_wl16(s, val & 0xffff);
 532     avio_w8(s, (int)val >> 16);
 533 }
 534
 535 void avio_wb24(AVIOContext *s, unsigned int val)
 536 {
 537     avio_wb16(s, (int)val >> 8);
 538     avio_w8(s, (uint8_t)val);
 539 }
 540
 541 void avio_write_marker(AVIOContext *s, int64_t time, enum AVIODataMarkerType type)
 542 {
 543     if (type == AVIO_DATA_MARKER_FLUSH_POINT) {
 544         if (s->buf_ptr - s->buffer >= s->min_packet_size)
 545             avio_flush(s);
 546         return;
 547     }
 548     if (!s->write_data_type && !s->metacube)
 549         return;
 550     // If ignoring boundary points, just treat it as unknown
 551     if (type == AVIO_DATA_MARKER_BOUNDARY_POINT && s->ignore_boundary_point)
 552         type = AVIO_DATA_MARKER_UNKNOWN;
 553     // Avoid unnecessary flushes if we are already in non-header/trailer
 554     // data and setting the type to unknown
 555     if (type == AVIO_DATA_MARKER_UNKNOWN &&
 556         (s->current_type != AVIO_DATA_MARKER_HEADER &&
 557          s->current_type != AVIO_DATA_MARKER_TRAILER))
 558         return;
 559
 560     switch (type) {
 561     case AVIO_DATA_MARKER_HEADER:
 562     case AVIO_DATA_MARKER_TRAILER:
 563         // For header/trailer, ignore a new marker of the same type;
 564         // consecutive header/trailer markers can be merged.
 565         if (type == s->current_type)
 566             return;
 567         break;
 568     }
 569
 570     // If we've reached here, we have a new, noteworthy marker.
 571     // Flush the previous data and mark the start of the new data.
 572     avio_flush(s);
 573     s->current_type = type;
 574     s->last_time = time;
 575 }
 576
 577 static int read_packet_wrapper(AVIOContext *s, uint8_t *buf, int size)
 578 {
 579     int ret;
 580
 581     if (!s->read_packet)
 582         return AVERROR(EINVAL);
 583     ret = s->read_packet(s->opaque, buf, size);
 584     av_assert2(ret || s->max_packet_size);
 585     return ret;
 586 }
 587
 588 /* Input stream */
 589
 590 static void fill_buffer(AVIOContext *s)
 591 {
 592     int max_buffer_size = s->max_packet_size ?
 593                           s->max_packet_size : IO_BUFFER_SIZE;
 594     uint8_t *dst        = s->buf_end - s->buffer + max_buffer_size <= s->buffer_size ?
 595                           s->buf_end : s->buffer;
 596     int len             = s->buffer_size - (dst - s->buffer);
 597
 598     /* can't fill the buffer without read_packet, just set EOF if appropriate */
 599     if (!s->read_packet && s->buf_ptr >= s->buf_end)
 600         s->eof_reached = 1;
 601
 602     /* no need to do anything if EOF already reached */
 603     if (s->eof_reached)
 604         return;
 605
 606     if (s->update_checksum && dst == s->buffer) {
 607         if (s->buf_end > s->checksum_ptr)
 608             s->checksum = s->update_checksum(s->checksum, s->checksum_ptr,
 609                                              s->buf_end - s->checksum_ptr);
 610         s->checksum_ptr = s->buffer;
 611     }
 612
 613     /* make buffer smaller in case it ended up large after probing */
 614     if (s->read_packet && s->orig_buffer_size && s->buffer_size > s->orig_buffer_size && len >= s->orig_buffer_size) {
 615         if (dst == s->buffer && s->buf_ptr != dst) {
 616             int ret = ffio_set_buf_size(s, s->orig_buffer_size);
 617             if (ret < 0)
 618                 av_log(s, AV_LOG_WARNING, "Failed to decrease buffer size\n");
 619
 620             s->checksum_ptr = dst = s->buffer;
 621         }
 622         len = s->orig_buffer_size;
 623     }
 624
 625     len = read_packet_wrapper(s, dst, len);
 626     if (len == AVERROR_EOF) {
 627         /* do not modify buffer if EOF reached so that a seek back can
 628            be done without rereading data */
 629         s->eof_reached = 1;
 630     } else if (len < 0) {
 631         s->eof_reached = 1;
 632         s->error= len;
 633     } else {
 634         s->pos += len;
 635         s->buf_ptr = dst;
 636         s->buf_end = dst + len;
 637         s->bytes_read += len;
 638     }
 639 }
 640
 641 unsigned long ff_crc04C11DB7_update(unsigned long checksum, const uint8_t *buf,
 642                                     unsigned int len)
 643 {
 644     return av_crc(av_crc_get_table(AV_CRC_32_IEEE), checksum, buf, len);
 645 }
 646
 647 unsigned long ff_crcEDB88320_update(unsigned long checksum, const uint8_t *buf,
 648                                     unsigned int len)
 649 {
 650     return av_crc(av_crc_get_table(AV_CRC_32_IEEE_LE), checksum, buf, len);
 651 }
 652
 653 unsigned long ff_crcA001_update(unsigned long checksum, const uint8_t *buf,
 654                                 unsigned int len)
 655 {
 656     return av_crc(av_crc_get_table(AV_CRC_16_ANSI_LE), checksum, buf, len);
 657 }
 658
 659 unsigned long ffio_get_checksum(AVIOContext *s)
 660 {
 661     s->checksum = s->update_checksum(s->checksum, s->checksum_ptr,
 662                                      s->buf_ptr - s->checksum_ptr);
 663     s->update_checksum = NULL;
 664     return s->checksum;
 665 }
 666
 667 void ffio_init_checksum(AVIOContext *s,
 668                    unsigned long (*update_checksum)(unsigned long c, const uint8_t *p, unsigned int len),
 669                    unsigned long checksum)
 670 {
 671     s->update_checksum = update_checksum;
 672     if (s->update_checksum) {
 673         s->checksum     = checksum;
 674         s->checksum_ptr = s->buf_ptr;
 675     }
 676 }
 677
 678 /* XXX: put an inline version */
 679 int avio_r8(AVIOContext *s)
 680 {
 681     if (s->buf_ptr >= s->buf_end)
 682         fill_buffer(s);
 683     if (s->buf_ptr < s->buf_end)
 684         return *s->buf_ptr++;
 685     return 0;
 686 }
 687
 688 int avio_read(AVIOContext *s, unsigned char *buf, int size)
 689 {
 690     int len, size1;
 691
 692     size1 = size;
 693     while (size > 0) {
 694         len = FFMIN(s->buf_end - s->buf_ptr, size);
 695         if (len == 0 || s->write_flag) {
 696             if((s->direct || size > s->buffer_size) && !s->update_checksum) {
 697                 // bypass the buffer and read data directly into buf
 698                 len = read_packet_wrapper(s, buf, size);
 699                 if (len == AVERROR_EOF) {
 700                     /* do not modify buffer if EOF reached so that a seek back can
 701                     be done without rereading data */
 702                     s->eof_reached = 1;
 703                     break;
 704                 } else if (len < 0) {
 705                     s->eof_reached = 1;
 706                     s->error= len;
 707                     break;
 708                 } else {
 709                     s->pos += len;
 710                     s->bytes_read += len;
 711                     size -= len;
 712                     buf += len;
 713                     // reset the buffer
 714                     s->buf_ptr = s->buffer;
 715                     s->buf_end = s->buffer/* + len*/;
 716                 }
 717             } else {
 718                 fill_buffer(s);
 719                 len = s->buf_end - s->buf_ptr;
 720                 if (len == 0)
 721                     break;
 722             }
 723         } else {
 724             memcpy(buf, s->buf_ptr, len);
 725             buf += len;
 726             s->buf_ptr += len;
 727             size -= len;
 728         }
 729     }
 730     if (size1 == size) {
 731         if (s->error)      return s->error;
 732         if (avio_feof(s))  return AVERROR_EOF;
 733     }
 734     return size1 - size;
 735 }
 736
 737 int ffio_read_size(AVIOContext *s, unsigned char *buf, int size)
 738 {
 739     int ret = avio_read(s, buf, size);
 740     if (ret == size)
 741         return ret;
 742     if (ret < 0 && ret != AVERROR_EOF)
 743         return ret;
 744     return AVERROR_INVALIDDATA;
 745 }
 746
 747 int ffio_read_indirect(AVIOContext *s, unsigned char *buf, int size, const unsigned char **data)
 748 {
 749     if (s->buf_end - s->buf_ptr >= size && !s->write_flag) {
 750         *data = s->buf_ptr;
 751         s->buf_ptr += size;
 752         return size;
 753     } else {
 754         *data = buf;
 755         return avio_read(s, buf, size);
 756     }
 757 }
 758
 759 int avio_read_partial(AVIOContext *s, unsigned char *buf, int size)
 760 {
 761     int len;
 762
 763     if (size < 0)
 764         return AVERROR(EINVAL);
 765
 766     if (s->read_packet && s->write_flag) {
 767         len = read_packet_wrapper(s, buf, size);
 768         if (len > 0)
 769             s->pos += len;
 770         return len;
 771     }
 772
 773     len = s->buf_end - s->buf_ptr;
 774     if (len == 0) {
 775         fill_buffer(s);
 776         len = s->buf_end - s->buf_ptr;
 777     }
 778     if (len > size)
 779         len = size;
 780     memcpy(buf, s->buf_ptr, len);
 781     s->buf_ptr += len;
 782     if (!len) {
 783         if (s->error)      return s->error;
 784         if (avio_feof(s))  return AVERROR_EOF;
 785     }
 786     return len;
 787 }
 788
 789 unsigned int avio_rl16(AVIOContext *s)
 790 {
 791     unsigned int val;
 792     val = avio_r8(s);
 793     val |= avio_r8(s) << 8;
 794     return val;
 795 }
 796
 797 unsigned int avio_rl24(AVIOContext *s)
 798 {
 799     unsigned int val;
 800     val = avio_rl16(s);
 801     val |= avio_r8(s) << 16;
 802     return val;
 803 }
 804
 805 unsigned int avio_rl32(AVIOContext *s)
 806 {
 807     unsigned int val;
 808     val = avio_rl16(s);
 809     val |= avio_rl16(s) << 16;
 810     return val;
 811 }
 812
 813 uint64_t avio_rl64(AVIOContext *s)
 814 {
 815     uint64_t val;
 816     val = (uint64_t)avio_rl32(s);
 817     val |= (uint64_t)avio_rl32(s) << 32;
 818     return val;
 819 }
 820
 821 unsigned int avio_rb16(AVIOContext *s)
 822 {
 823     unsigned int val;
 824     val = avio_r8(s) << 8;
 825     val |= avio_r8(s);
 826     return val;
 827 }
 828
 829 unsigned int avio_rb24(AVIOContext *s)
 830 {
 831     unsigned int val;
 832     val = avio_rb16(s) << 8;
 833     val |= avio_r8(s);
 834     return val;
 835 }
 836 unsigned int avio_rb32(AVIOContext *s)
 837 {
 838     unsigned int val;
 839     val = avio_rb16(s) << 16;
 840     val |= avio_rb16(s);
 841     return val;
 842 }
 843
 844 int ff_get_line(AVIOContext *s, char *buf, int maxlen)
 845 {
 846     int i = 0;
 847     char c;
 848
 849     do {
 850         c = avio_r8(s);
 851         if (c && i < maxlen-1)
 852             buf[i++] = c;
 853     } while (c != '\n' && c != '\r' && c);
 854     if (c == '\r' && avio_r8(s) != '\n' && !avio_feof(s))
 855         avio_skip(s, -1);
 856
 857     buf[i] = 0;
 858     return i;
 859 }
 860
 861 int ff_get_chomp_line(AVIOContext *s, char *buf, int maxlen)
 862 {
 863     int len = ff_get_line(s, buf, maxlen);
 864     while (len > 0 && av_isspace(buf[len - 1]))
 865         buf[--len] = '\0';
 866     return len;
 867 }
 868
 869 int64_t ff_read_line_to_bprint(AVIOContext *s, AVBPrint *bp)
 870 {
 871     int len, end;
 872     int64_t read = 0;
 873     char tmp[1024];
 874     char c;
 875
 876     do {
 877         len = 0;
 878         do {
 879             c = avio_r8(s);
 880             end = (c == '\r' || c == '\n' || c == '\0');
 881             if (!end)
 882                 tmp[len++] = c;
 883         } while (!end && len < sizeof(tmp));
 884         av_bprint_append_data(bp, tmp, len);
 885         read += len;
 886     } while (!end);
 887
 888     if (c == '\r' && avio_r8(s) != '\n' && !avio_feof(s))
 889         avio_skip(s, -1);
 890
 891     if (!c && s->error)
 892         return s->error;
 893
 894     if (!c && !read && avio_feof(s))
 895         return AVERROR_EOF;
 896
 897     return read;
 898 }
 899
 900 int64_t ff_read_line_to_bprint_overwrite(AVIOContext *s, AVBPrint *bp)
 901 {
 902     int64_t ret;
 903
 904     av_bprint_clear(bp);
 905     ret = ff_read_line_to_bprint(s, bp);
 906     if (ret < 0)
 907         return ret;
 908
 909     if (!av_bprint_is_complete(bp))
 910         return AVERROR(ENOMEM);
 911
 912     return bp->len;
 913 }
 914
 915 int avio_get_str(AVIOContext *s, int maxlen, char *buf, int buflen)
 916 {
 917     int i;
 918
 919     if (buflen <= 0)
 920         return AVERROR(EINVAL);
 921     // reserve 1 byte for terminating 0
 922     buflen = FFMIN(buflen - 1, maxlen);
 923     for (i = 0; i < buflen; i++)
 924         if (!(buf[i] = avio_r8(s)))
 925             return i + 1;
 926     buf[i] = 0;
 927     for (; i < maxlen; i++)
 928         if (!avio_r8(s))
 929             return i + 1;
 930     return maxlen;
 931 }
 932
 933 #define GET_STR16(type, read) \
 934     int avio_get_str16 ##type(AVIOContext *pb, int maxlen, char *buf, int buflen)\
 935 {\
 936     char* q = buf;\
 937     int ret = 0;\
 938     if (buflen <= 0) \
 939         return AVERROR(EINVAL); \
 940     while (ret + 1 < maxlen) {\
 941         uint8_t tmp;\
 942         uint32_t ch;\
 943         GET_UTF16(ch, (ret += 2) <= maxlen ? read(pb) : 0, break;)\
 944         if (!ch)\
 945             break;\
 946         PUT_UTF8(ch, tmp, if (q - buf < buflen - 1) *q++ = tmp;)\
 947     }\
 948     *q = 0;\
 949     return ret;\
 950 }\
 951
 952 GET_STR16(le, avio_rl16)
 953 GET_STR16(be, avio_rb16)
 954
 955 #undef GET_STR16
 956
 957 uint64_t avio_rb64(AVIOContext *s)
 958 {
 959     uint64_t val;
 960     val = (uint64_t)avio_rb32(s) << 32;
 961     val |= (uint64_t)avio_rb32(s);
 962     return val;
 963 }
 964
 965 uint64_t ffio_read_varlen(AVIOContext *bc){
 966     uint64_t val = 0;
 967     int tmp;
 968
 969     do{
 970         tmp = avio_r8(bc);
 971         val= (val<<7) + (tmp&127);
 972     }while(tmp&128);
 973     return val;
 974 }
 975
 976 int ffio_fdopen(AVIOContext **s, URLContext *h)
 977 {
 978     uint8_t *buffer = NULL;
 979     int buffer_size, max_packet_size;
 980
 981     max_packet_size = h->max_packet_size;
 982     if (max_packet_size) {
 983         buffer_size = max_packet_size; /* no need to bufferize more than one packet */
 984     } else {
 985         buffer_size = IO_BUFFER_SIZE;
 986     }
 987     if (!(h->flags & AVIO_FLAG_WRITE) && h->is_streamed) {
 988         if (buffer_size > INT_MAX/2)
 989             return AVERROR(EINVAL);
 990         buffer_size *= 2;
 991     }
 992     buffer = av_malloc(buffer_size);
 993     if (!buffer)
 994         return AVERROR(ENOMEM);
 995
 996     *s = avio_alloc_context(buffer, buffer_size, h->flags & AVIO_FLAG_WRITE, h,
 997                             (int (*)(void *, uint8_t *, int))  ffurl_read,
 998                             (int (*)(void *, uint8_t *, int))  ffurl_write,
 999                             (int64_t (*)(void *, int64_t, int))ffurl_seek);
1000     if (!*s)
1001         goto fail;
1002
1003     (*s)->protocol_whitelist = av_strdup(h->protocol_whitelist);
1004     if (!(*s)->protocol_whitelist && h->protocol_whitelist) {
1005         avio_closep(s);
1006         goto fail;
1007     }
1008     (*s)->protocol_blacklist = av_strdup(h->protocol_blacklist);
1009     if (!(*s)->protocol_blacklist && h->protocol_blacklist) {
1010         avio_closep(s);
1011         goto fail;
1012     }
1013     (*s)->direct = h->flags & AVIO_FLAG_DIRECT;
1014
1015     (*s)->seekable = h->is_streamed ? 0 : AVIO_SEEKABLE_NORMAL;
1016     (*s)->max_packet_size = max_packet_size;
1017     (*s)->min_packet_size = h->min_packet_size;
1018     if(h->prot) {
1019         (*s)->read_pause = (int (*)(void *, int))h->prot->url_read_pause;
1020         (*s)->read_seek  =
1021             (int64_t (*)(void *, int, int64_t, int))h->prot->url_read_seek;
1022
1023         if (h->prot->url_read_seek)
1024             (*s)->seekable |= AVIO_SEEKABLE_TIME;
1025     }
1026     (*s)->short_seek_get = (int (*)(void *))ffurl_get_short_seek;
1027     (*s)->av_class = &ff_avio_class;
1028     (*s)->metacube = h->flags & AVIO_FLAG_METACUBE;
1029     (*s)->seen_sync_point = 0;
1030     return 0;
1031 fail:
1032     av_freep(&buffer);
1033     return AVERROR(ENOMEM);
1034 }
1035
1036 URLContext* ffio_geturlcontext(AVIOContext *s)
1037 {
1038     if (!s)
1039         return NULL;
1040
1041     if (s->opaque && s->read_packet == (int (*)(void *, uint8_t *, int))ffurl_read)
1042         return s->opaque;
1043     else
1044         return NULL;
1045 }
1046
1047 static void update_checksum(AVIOContext *s)
1048 {
1049     if (s->update_checksum && s->buf_ptr > s->checksum_ptr) {
1050         s->checksum = s->update_checksum(s->checksum, s->checksum_ptr,
1051                                          s->buf_ptr - s->checksum_ptr);
1052     }
1053 }
1054
1055 int ffio_ensure_seekback(AVIOContext *s, int64_t buf_size)
1056 {
1057     uint8_t *buffer;
1058     int max_buffer_size = s->max_packet_size ?
1059                           s->max_packet_size : IO_BUFFER_SIZE;
1060     ptrdiff_t filled = s->buf_end - s->buf_ptr;
1061
1062     if (buf_size <= s->buf_end - s->buf_ptr)
1063         return 0;
1064
1065     buf_size += max_buffer_size - 1;
1066
1067     if (buf_size + s->buf_ptr - s->buffer <= s->buffer_size || s->seekable || !s->read_packet)
1068         return 0;
1069     av_assert0(!s->write_flag);
1070
1071     if (buf_size <= s->buffer_size) {
1072         update_checksum(s);
1073         memmove(s->buffer, s->buf_ptr, filled);
1074     } else {
1075         buffer = av_malloc(buf_size);
1076         if (!buffer)
1077             return AVERROR(ENOMEM);
1078         update_checksum(s);
1079         memcpy(buffer, s->buf_ptr, filled);
1080         av_free(s->buffer);
1081         s->buffer = buffer;
1082         s->buffer_size = buf_size;
1083     }
1084     s->buf_ptr = s->buffer;
1085     s->buf_end = s->buffer + filled;
1086     s->checksum_ptr = s->buffer;
1087     return 0;
1088 }
1089
1090 int ffio_set_buf_size(AVIOContext *s, int buf_size)
1091 {
1092     uint8_t *buffer;
1093
1094     if (s->metacube)
1095         buf_size += sizeof(struct metacube2_block_header);
1096
1097     buffer = av_malloc(buf_size);
1098     if (!buffer)
1099         return AVERROR(ENOMEM);
1100
1101     av_free(s->buffer);
1102     s->buffer = buffer;
1103     s->orig_buffer_size =
1104     s->buffer_size = buf_size;
1105     s->buf_ptr = s->buf_ptr_max = buffer;
1106
1107     // Add space for Metacube header.
1108     if (s->metacube)
1109         s->buf_ptr += sizeof(struct metacube2_block_header);
1110
1111     url_resetbuf(s, s->write_flag ? AVIO_FLAG_WRITE : AVIO_FLAG_READ);
1112     return 0;
1113 }
1114
1115 int ffio_realloc_buf(AVIOContext *s, int buf_size)
1116 {
1117     uint8_t *buffer;
1118     int data_size;
1119
1120     if (s->metacube && s->write_flag)
1121         buf_size += sizeof(struct metacube2_block_header);
1122
1123     if (!s->buffer_size)
1124         return ffio_set_buf_size(s, buf_size);
1125
1126     if (buf_size <= s->buffer_size)
1127         return 0;
1128
1129     buffer = av_malloc(buf_size);
1130     if (!buffer)
1131         return AVERROR(ENOMEM);
1132
1133     data_size = s->write_flag ? (s->buf_ptr - s->buffer) : (s->buf_end - s->buf_ptr);
1134     if (data_size > 0)
1135         memcpy(buffer, s->write_flag ? s->buffer : s->buf_ptr, data_size);
1136     av_free(s->buffer);
1137     s->buffer = buffer;
1138     s->orig_buffer_size = buf_size;
1139     s->buffer_size = buf_size;
1140     s->buf_ptr = s->write_flag ? (s->buffer + data_size) : s->buffer;
1141
1142     // Add space for Metacube header.
1143     if (s->metacube && s->write_flag && data_size == 0)
1144         s->buf_ptr += sizeof(struct metacube2_block_header);
1145
1146     if (s->write_flag)
1147         s->buf_ptr_max = s->buffer + data_size;
1148
1149     s->buf_end = s->write_flag ? (s->buffer + s->buffer_size) : (s->buf_ptr + data_size);
1150
1151     return 0;
1152 }
1153
1154 static int url_resetbuf(AVIOContext *s, int flags)
1155 {
1156     av_assert1(flags == AVIO_FLAG_WRITE || flags == AVIO_FLAG_READ);
1157
1158     if (flags & AVIO_FLAG_WRITE) {
1159         s->buf_end = s->buffer + s->buffer_size;
1160         s->write_flag = 1;
1161     } else {
1162         s->buf_end = s->buffer;
1163         s->write_flag = 0;
1164     }
1165     return 0;
1166 }
1167
1168 int ffio_rewind_with_probe_data(AVIOContext *s, unsigned char **bufp, int buf_size)
1169 {
1170     int64_t buffer_start;
1171     int buffer_size;
1172     int overlap, new_size, alloc_size;
1173     uint8_t *buf = *bufp;
1174
1175     if (s->write_flag) {
1176         av_freep(bufp);
1177         return AVERROR(EINVAL);
1178     }
1179
1180     buffer_size = s->buf_end - s->buffer;
1181
1182     /* the buffers must touch or overlap */
1183     if ((buffer_start = s->pos - buffer_size) > buf_size) {
1184         av_freep(bufp);
1185         return AVERROR(EINVAL);
1186     }
1187
1188     overlap = buf_size - buffer_start;
1189     new_size = buf_size + buffer_size - overlap;
1190
1191     alloc_size = FFMAX(s->buffer_size, new_size);
1192     if (alloc_size > buf_size)
1193         if (!(buf = (*bufp) = av_realloc_f(buf, 1, alloc_size)))
1194             return AVERROR(ENOMEM);
1195
1196     if (new_size > buf_size) {
1197         memcpy(buf + buf_size, s->buffer + overlap, buffer_size - overlap);
1198         buf_size = new_size;
1199     }
1200
1201     av_free(s->buffer);
1202     s->buf_ptr = s->buffer = buf;
1203     s->buffer_size = alloc_size;
1204     s->pos = buf_size;
1205     s->buf_end = s->buf_ptr + buf_size;
1206     s->eof_reached = 0;
1207
1208     return 0;
1209 }
1210
1211 int avio_open(AVIOContext **s, const char *filename, int flags)
1212 {
1213     return avio_open2(s, filename, flags, NULL, NULL);
1214 }
1215
1216 int ffio_open_whitelist(AVIOContext **s, const char *filename, int flags,
1217                          const AVIOInterruptCB *int_cb, AVDictionary **options,
1218                          const char *whitelist, const char *blacklist
1219                         )
1220 {
1221     URLContext *h;
1222     int err;
1223
1224     *s = NULL;
1225
1226     err = ffurl_open_whitelist(&h, filename, flags, int_cb, options, whitelist, blacklist, NULL);
1227     if (err < 0)
1228         return err;
1229     err = ffio_fdopen(s, h);
1230     if (err < 0) {
1231         ffurl_close(h);
1232         return err;
1233     }
1234     return 0;
1235 }
1236
1237 int avio_open2(AVIOContext **s, const char *filename, int flags,
1238                const AVIOInterruptCB *int_cb, AVDictionary **options)
1239 {
1240     return ffio_open_whitelist(s, filename, flags, int_cb, options, NULL, NULL);
1241 }
1242
1243 int avio_close(AVIOContext *s)
1244 {
1245     URLContext *h;
1246
1247     if (!s)
1248         return 0;
1249
1250     avio_flush(s);
1251     h         = s->opaque;
1252     s->opaque = NULL;
1253
1254     av_freep(&s->buffer);
1255     if (s->write_flag)
1256         av_log(s, AV_LOG_VERBOSE, "Statistics: %d seeks, %d writeouts\n", s->seek_count, s->writeout_count);
1257     else
1258         av_log(s, AV_LOG_VERBOSE, "Statistics: %"PRId64" bytes read, %d seeks\n", s->bytes_read, s->seek_count);
1259     av_opt_free(s);
1260
1261     avio_context_free(&s);
1262
1263     return ffurl_close(h);
1264 }
1265
1266 int avio_closep(AVIOContext **s)
1267 {
1268     int ret = avio_close(*s);
1269     *s = NULL;
1270     return ret;
1271 }
1272
1273 int avio_printf(AVIOContext *s, const char *fmt, ...)
1274 {
1275     va_list ap;
1276     AVBPrint bp;
1277
1278     av_bprint_init(&bp, 0, INT_MAX);
1279     va_start(ap, fmt);
1280     av_vbprintf(&bp, fmt, ap);
1281     va_end(ap);
1282     if (!av_bprint_is_complete(&bp)) {
1283         av_bprint_finalize(&bp, NULL);
1284         s->error = AVERROR(ENOMEM);
1285         return AVERROR(ENOMEM);
1286     }
1287     avio_write(s, bp.str, bp.len);
1288     av_bprint_finalize(&bp, NULL);
1289     return bp.len;
1290 }
1291
1292 void avio_print_string_array(AVIOContext *s, const char *strings[])
1293 {
1294     for(; *strings; strings++)
1295         avio_write(s, (const unsigned char *)*strings, strlen(*strings));
1296 }
1297
1298 int avio_pause(AVIOContext *s, int pause)
1299 {
1300     if (!s->read_pause)
1301         return AVERROR(ENOSYS);
1302     return s->read_pause(s->opaque, pause);
1303 }
1304
1305 int64_t avio_seek_time(AVIOContext *s, int stream_index,
1306                        int64_t timestamp, int flags)
1307 {
1308     int64_t ret;
1309     if (!s->read_seek)
1310         return AVERROR(ENOSYS);
1311     ret = s->read_seek(s->opaque, stream_index, timestamp, flags);
1312     if (ret >= 0) {
1313         int64_t pos;
1314         s->buf_ptr = s->buf_end; // Flush buffer
1315         pos = s->seek(s->opaque, 0, SEEK_CUR);
1316         if (pos >= 0)
1317             s->pos = pos;
1318         else if (pos != AVERROR(ENOSYS))
1319             ret = pos;
1320     }
1321     return ret;
1322 }
1323
1324 int avio_read_to_bprint(AVIOContext *h, AVBPrint *pb, size_t max_size)
1325 {
1326     int ret;
1327     char buf[1024];
1328     while (max_size) {
1329         ret = avio_read(h, buf, FFMIN(max_size, sizeof(buf)));
1330         if (ret == AVERROR_EOF)
1331             return 0;
1332         if (ret <= 0)
1333             return ret;
1334         av_bprint_append_data(pb, buf, ret);
1335         if (!av_bprint_is_complete(pb))
1336             return AVERROR(ENOMEM);
1337         max_size -= ret;
1338     }
1339     return 0;
1340 }
1341
1342 int avio_accept(AVIOContext *s, AVIOContext **c)
1343 {
1344     int ret;
1345     URLContext *sc = s->opaque;
1346     URLContext *cc = NULL;
1347     ret = ffurl_accept(sc, &cc);
1348     if (ret < 0)
1349         return ret;
1350     return ffio_fdopen(c, cc);
1351 }
1352
1353 int avio_handshake(AVIOContext *c)
1354 {
1355     URLContext *cc = c->opaque;
1356     return ffurl_handshake(cc);
1357 }
1358
1359 /* output in a dynamic buffer */
1360
1361 typedef struct DynBuffer {
1362     int pos, size, allocated_size;
1363     uint8_t *buffer;
1364     int io_buffer_size;
1365     uint8_t io_buffer[1];
1366 } DynBuffer;
1367
1368 static int dyn_buf_write(void *opaque, uint8_t *buf, int buf_size)
1369 {
1370     DynBuffer *d = opaque;
1371     unsigned new_size;
1372
1373     /* reallocate buffer if needed */
1374     new_size = (unsigned)d->pos + buf_size;
1375     if (new_size < d->pos || new_size > INT_MAX)
1376         return AVERROR(ERANGE);
1377     if (new_size > d->allocated_size) {
1378         unsigned new_allocated_size = d->allocated_size ? d->allocated_size
1379                                                         : new_size;
1380         int err;
1381         while (new_size > new_allocated_size)
1382             new_allocated_size += new_allocated_size / 2 + 1;
1383
1384         new_allocated_size = FFMIN(new_allocated_size, INT_MAX);
1385
1386         if ((err = av_reallocp(&d->buffer, new_allocated_size)) < 0) {
1387             d->allocated_size = 0;
1388             d->size = 0;
1389             return err;
1390         }
1391         d->allocated_size = new_allocated_size;
1392     }
1393     memcpy(d->buffer + d->pos, buf, buf_size);
1394     d->pos = new_size;
1395     if (d->pos > d->size)
1396         d->size = d->pos;
1397     return buf_size;
1398 }
1399
1400 static int dyn_packet_buf_write(void *opaque, uint8_t *buf, int buf_size)
1401 {
1402     unsigned char buf1[4];
1403     int ret;
1404
1405     /* packetized write: output the header */
1406     AV_WB32(buf1, buf_size);
1407     ret = dyn_buf_write(opaque, buf1, 4);
1408     if (ret < 0)
1409         return ret;
1410
1411     /* then the data */
1412     return dyn_buf_write(opaque, buf, buf_size);
1413 }
1414
1415 static int64_t dyn_buf_seek(void *opaque, int64_t offset, int whence)
1416 {
1417     DynBuffer *d = opaque;
1418
1419     if (whence == SEEK_CUR)
1420         offset += d->pos;
1421     else if (whence == SEEK_END)
1422         offset += d->size;
1423     if (offset < 0)
1424         return AVERROR(EINVAL);
1425     if (offset > INT_MAX)
1426         return AVERROR(ERANGE);
1427     d->pos = offset;
1428     return 0;
1429 }
1430
1431 static int url_open_dyn_buf_internal(AVIOContext **s, int max_packet_size)
1432 {
1433     DynBuffer *d;
1434     unsigned io_buffer_size = max_packet_size ? max_packet_size : 1024;
1435
1436     if (sizeof(DynBuffer) + io_buffer_size < io_buffer_size)
1437         return AVERROR(ERANGE);
1438     d = av_mallocz(sizeof(DynBuffer) + io_buffer_size);
1439     if (!d)
1440         return AVERROR(ENOMEM);
1441     d->io_buffer_size = io_buffer_size;
1442     *s = avio_alloc_context(d->io_buffer, d->io_buffer_size, 1, d, NULL,
1443                             max_packet_size ? dyn_packet_buf_write : dyn_buf_write,
1444                             max_packet_size ? NULL : dyn_buf_seek);
1445     if(!*s) {
1446         av_free(d);
1447         return AVERROR(ENOMEM);
1448     }
1449     (*s)->max_packet_size = max_packet_size;
1450     return 0;
1451 }
1452
1453 int avio_open_dyn_buf(AVIOContext **s)
1454 {
1455     return url_open_dyn_buf_internal(s, 0);
1456 }
1457
1458 int ffio_open_dyn_packet_buf(AVIOContext **s, int max_packet_size)
1459 {
1460     if (max_packet_size <= 0)
1461         return AVERROR(EINVAL);
1462     return url_open_dyn_buf_internal(s, max_packet_size);
1463 }
1464
1465 int avio_get_dyn_buf(AVIOContext *s, uint8_t **pbuffer)
1466 {
1467     DynBuffer *d;
1468
1469     if (!s) {
1470         *pbuffer = NULL;
1471         return 0;
1472     }
1473     d = s->opaque;
1474
1475     if (!s->error && !d->size) {
1476         *pbuffer = d->io_buffer;
1477         return FFMAX(s->buf_ptr, s->buf_ptr_max) - s->buffer;
1478     }
1479
1480     avio_flush(s);
1481
1482     *pbuffer = d->buffer;
1483
1484     return d->size;
1485 }
1486
1487 void ffio_reset_dyn_buf(AVIOContext *s)
1488 {
1489     DynBuffer *d = s->opaque;
1490     int max_packet_size = s->max_packet_size;
1491
1492     ffio_init_context(s, d->io_buffer, d->io_buffer_size, 1, d, NULL,
1493                       s->write_packet, s->seek);
1494     s->max_packet_size = max_packet_size;
1495     d->pos = d->size = 0;
1496 }
1497
1498 int avio_close_dyn_buf(AVIOContext *s, uint8_t **pbuffer)
1499 {
1500     DynBuffer *d;
1501     int size;
1502     static const char padbuf[AV_INPUT_BUFFER_PADDING_SIZE] = {0};
1503     int padding = 0;
1504
1505     if (!s) {
1506         *pbuffer = NULL;
1507         return 0;
1508     }
1509
1510     /* don't attempt to pad fixed-size packet buffers */
1511     if (!s->max_packet_size) {
1512         avio_write(s, padbuf, sizeof(padbuf));
1513         padding = AV_INPUT_BUFFER_PADDING_SIZE;
1514     }
1515
1516     avio_flush(s);
1517
1518     d = s->opaque;
1519     *pbuffer = d->buffer;
1520     size = d->size;
1521     av_free(d);
1522
1523     avio_context_free(&s);
1524
1525     return size - padding;
1526 }
1527
1528 void ffio_free_dyn_buf(AVIOContext **s)
1529 {
1530     DynBuffer *d;
1531
1532     if (!*s)
1533         return;
1534
1535     d = (*s)->opaque;
1536     av_free(d->buffer);
1537     av_free(d);
1538     avio_context_free(s);
1539 }
1540
1541 static int null_buf_write(void *opaque, uint8_t *buf, int buf_size)
1542 {
1543     DynBuffer *d = opaque;
1544
1545     d->pos += buf_size;
1546     if (d->pos > d->size)
1547         d->size = d->pos;
1548     return buf_size;
1549 }
1550
1551 int ffio_open_null_buf(AVIOContext **s)
1552 {
1553     int ret = url_open_dyn_buf_internal(s, 0);
1554     if (ret >= 0) {
1555         AVIOContext *pb = *s;
1556         pb->write_packet = null_buf_write;
1557     }
1558     return ret;
1559 }
1560
1561 int ffio_close_null_buf(AVIOContext *s)
1562 {
1563     DynBuffer *d = s->opaque;
1564     int size;
1565
1566     avio_flush(s);
1567
1568     size = d->size;
1569     av_free(d);
1570
1571     avio_context_free(&s);
1572
1573     return size;
1574 }