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/crc.h"
  23 #include "libavutil/dict.h"
  24 #include "libavutil/intreadwrite.h"
  25 #include "libavutil/log.h"
  26 #include "libavutil/opt.h"
  27 #include "avformat.h"
  28 #include "avio.h"
  29 #include "avio_internal.h"
  30 #include "internal.h"
  31 #include "url.h"
  32 #include <stdarg.h>
  33
  34 #define IO_BUFFER_SIZE 32768
  35
  36 /**
  37  * Do seeks within this distance ahead of the current buffer by skipping
  38  * data instead of calling the protocol seek function, for seekable
  39  * protocols.
  40  */
  41 #define SHORT_SEEK_THRESHOLD 4096
  42
  43 static void *ffio_url_child_next(void *obj, void *prev)
  44 {
  45     AVIOContext *s = obj;
  46     return prev ? NULL : s->opaque;
  47 }
  48
  49 static const AVClass *ffio_url_child_class_next(const AVClass *prev)
  50 {
  51     return prev ? NULL : &ffurl_context_class;
  52 }
  53
  54 static const AVOption ffio_url_options[] = {
  55     { NULL },
  56 };
  57
  58 const AVClass ffio_url_class = {
  59     .class_name = "AVIOContext",
  60     .item_name  = av_default_item_name,
  61     .version    = LIBAVUTIL_VERSION_INT,
  62     .option     = ffio_url_options,
  63     .child_next = ffio_url_child_next,
  64     .child_class_next = ffio_url_child_class_next,
  65 };
  66
  67 static void fill_buffer(AVIOContext *s);
  68 static int url_resetbuf(AVIOContext *s, int flags);
  69
  70 int ffio_init_context(AVIOContext *s,
  71                   unsigned char *buffer,
  72                   int buffer_size,
  73                   int write_flag,
  74                   void *opaque,
  75                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
  76                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
  77                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
  78 {
  79     s->buffer = buffer;
  80     s->buffer_size = buffer_size;
  81     s->buf_ptr = buffer;
  82     s->opaque = opaque;
  83     url_resetbuf(s, write_flag ? AVIO_FLAG_WRITE : AVIO_FLAG_READ);
  84     s->write_packet = write_packet;
  85     s->read_packet = read_packet;
  86     s->seek = seek;
  87     s->pos = 0;
  88     s->must_flush = 0;
  89     s->eof_reached = 0;
  90     s->error = 0;
  91     s->seekable = AVIO_SEEKABLE_NORMAL;
  92     s->max_packet_size = 0;
  93     s->update_checksum= NULL;
  94     if(!read_packet && !write_flag){
  95         s->pos = buffer_size;
  96         s->buf_end = s->buffer + buffer_size;
  97     }
  98     s->read_pause = NULL;
  99     s->read_seek  = NULL;
 100     return 0;
 101 }
 102
 103 AVIOContext *avio_alloc_context(
 104                   unsigned char *buffer,
 105                   int buffer_size,
 106                   int write_flag,
 107                   void *opaque,
 108                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
 109                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
 110                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
 111 {
 112     AVIOContext *s = av_mallocz(sizeof(AVIOContext));
 113     if (!s)
 114         return NULL;
 115     ffio_init_context(s, buffer, buffer_size, write_flag, opaque,
 116                   read_packet, write_packet, seek);
 117     return s;
 118 }
 119
 120 static void flush_buffer(AVIOContext *s)
 121 {
 122     if (s->buf_ptr > s->buffer) {
 123         if (s->write_packet && !s->error){
 124             int ret= s->write_packet(s->opaque, s->buffer, s->buf_ptr - s->buffer);
 125             if(ret < 0){
 126                 s->error = ret;
 127             }
 128         }
 129         if(s->update_checksum){
 130             s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
 131             s->checksum_ptr= s->buffer;
 132         }
 133         s->pos += s->buf_ptr - s->buffer;
 134     }
 135     s->buf_ptr = s->buffer;
 136 }
 137
 138 void avio_w8(AVIOContext *s, int b)
 139 {
 140     *s->buf_ptr++ = b;
 141     if (s->buf_ptr >= s->buf_end)
 142         flush_buffer(s);
 143 }
 144
 145 void ffio_fill(AVIOContext *s, int b, int count)
 146 {
 147     while (count > 0) {
 148         int len = FFMIN(s->buf_end - s->buf_ptr, count);
 149         memset(s->buf_ptr, b, len);
 150         s->buf_ptr += len;
 151
 152         if (s->buf_ptr >= s->buf_end)
 153             flush_buffer(s);
 154
 155         count -= len;
 156     }
 157 }
 158
 159 void avio_write(AVIOContext *s, const unsigned char *buf, int size)
 160 {
 161     while (size > 0) {
 162         int len = FFMIN(s->buf_end - s->buf_ptr, size);
 163         memcpy(s->buf_ptr, buf, len);
 164         s->buf_ptr += len;
 165
 166         if (s->buf_ptr >= s->buf_end)
 167             flush_buffer(s);
 168
 169         buf += len;
 170         size -= len;
 171     }
 172 }
 173
 174 void avio_flush(AVIOContext *s)
 175 {
 176     flush_buffer(s);
 177     s->must_flush = 0;
 178 }
 179
 180 int64_t avio_seek(AVIOContext *s, int64_t offset, int whence)
 181 {
 182     int64_t offset1;
 183     int64_t pos;
 184     int force = whence & AVSEEK_FORCE;
 185     whence &= ~AVSEEK_FORCE;
 186
 187     if(!s)
 188         return AVERROR(EINVAL);
 189
 190     pos = s->pos - (s->write_flag ? 0 : (s->buf_end - s->buffer));
 191
 192     if (whence != SEEK_CUR && whence != SEEK_SET)
 193         return AVERROR(EINVAL);
 194
 195     if (whence == SEEK_CUR) {
 196         offset1 = pos + (s->buf_ptr - s->buffer);
 197         if (offset == 0)
 198             return offset1;
 199         offset += offset1;
 200     }
 201     offset1 = offset - pos;
 202     if (!s->must_flush &&
 203         offset1 >= 0 && offset1 <= (s->buf_end - s->buffer)) {
 204         /* can do the seek inside the buffer */
 205         s->buf_ptr = s->buffer + offset1;
 206     } else if ((!s->seekable ||
 207                offset1 <= s->buf_end + SHORT_SEEK_THRESHOLD - s->buffer) &&
 208                !s->write_flag && offset1 >= 0 &&
 209               (whence != SEEK_END || force)) {
 210         while(s->pos < offset && !s->eof_reached)
 211             fill_buffer(s);
 212         if (s->eof_reached)
 213             return AVERROR_EOF;
 214         s->buf_ptr = s->buf_end + offset - s->pos;
 215     } else {
 216         int64_t res;
 217
 218 #if CONFIG_MUXERS || CONFIG_NETWORK
 219         if (s->write_flag) {
 220             flush_buffer(s);
 221             s->must_flush = 1;
 222         }
 223 #endif /* CONFIG_MUXERS || CONFIG_NETWORK */
 224         if (!s->seek)
 225             return AVERROR(EPIPE);
 226         if ((res = s->seek(s->opaque, offset, SEEK_SET)) < 0)
 227             return res;
 228         if (!s->write_flag)
 229             s->buf_end = s->buffer;
 230         s->buf_ptr = s->buffer;
 231         s->pos = offset;
 232     }
 233     s->eof_reached = 0;
 234     return offset;
 235 }
 236
 237 int64_t avio_skip(AVIOContext *s, int64_t offset)
 238 {
 239     return avio_seek(s, offset, SEEK_CUR);
 240 }
 241
 242 int64_t avio_size(AVIOContext *s)
 243 {
 244     int64_t size;
 245
 246     if(!s)
 247         return AVERROR(EINVAL);
 248
 249     if (!s->seek)
 250         return AVERROR(ENOSYS);
 251     size = s->seek(s->opaque, 0, AVSEEK_SIZE);
 252     if(size<0){
 253         if ((size = s->seek(s->opaque, -1, SEEK_END)) < 0)
 254             return size;
 255         size++;
 256         s->seek(s->opaque, s->pos, SEEK_SET);
 257     }
 258     return size;
 259 }
 260
 261 int url_feof(AVIOContext *s)
 262 {
 263     if(!s)
 264         return 0;
 265     if(s->eof_reached){
 266         s->eof_reached=0;
 267         fill_buffer(s);
 268     }
 269     return s->eof_reached;
 270 }
 271
 272 void avio_wl32(AVIOContext *s, unsigned int val)
 273 {
 274     avio_w8(s, val);
 275     avio_w8(s, val >> 8);
 276     avio_w8(s, val >> 16);
 277     avio_w8(s, val >> 24);
 278 }
 279
 280 void avio_wb32(AVIOContext *s, unsigned int val)
 281 {
 282     avio_w8(s, val >> 24);
 283     avio_w8(s, val >> 16);
 284     avio_w8(s, val >> 8);
 285     avio_w8(s, val);
 286 }
 287
 288 int avio_put_str(AVIOContext *s, const char *str)
 289 {
 290     int len = 1;
 291     if (str) {
 292         len += strlen(str);
 293         avio_write(s, (const unsigned char *) str, len);
 294     } else
 295         avio_w8(s, 0);
 296     return len;
 297 }
 298
 299 int avio_put_str16le(AVIOContext *s, const char *str)
 300 {
 301     const uint8_t *q = str;
 302     int ret = 0;
 303
 304     while (*q) {
 305         uint32_t ch;
 306         uint16_t tmp;
 307
 308         GET_UTF8(ch, *q++, break;)
 309         PUT_UTF16(ch, tmp, avio_wl16(s, tmp);ret += 2;)
 310     }
 311     avio_wl16(s, 0);
 312     ret += 2;
 313     return ret;
 314 }
 315
 316 int ff_get_v_length(uint64_t val){
 317     int i=1;
 318
 319     while(val>>=7)
 320         i++;
 321
 322     return i;
 323 }
 324
 325 void ff_put_v(AVIOContext *bc, uint64_t val){
 326     int i= ff_get_v_length(val);
 327
 328     while(--i>0)
 329         avio_w8(bc, 128 | (val>>(7*i)));
 330
 331     avio_w8(bc, val&127);
 332 }
 333
 334 void avio_wl64(AVIOContext *s, uint64_t val)
 335 {
 336     avio_wl32(s, (uint32_t)(val & 0xffffffff));
 337     avio_wl32(s, (uint32_t)(val >> 32));
 338 }
 339
 340 void avio_wb64(AVIOContext *s, uint64_t val)
 341 {
 342     avio_wb32(s, (uint32_t)(val >> 32));
 343     avio_wb32(s, (uint32_t)(val & 0xffffffff));
 344 }
 345
 346 void avio_wl16(AVIOContext *s, unsigned int val)
 347 {
 348     avio_w8(s, val);
 349     avio_w8(s, val >> 8);
 350 }
 351
 352 void avio_wb16(AVIOContext *s, unsigned int val)
 353 {
 354     avio_w8(s, val >> 8);
 355     avio_w8(s, val);
 356 }
 357
 358 void avio_wl24(AVIOContext *s, unsigned int val)
 359 {
 360     avio_wl16(s, val & 0xffff);
 361     avio_w8(s, val >> 16);
 362 }
 363
 364 void avio_wb24(AVIOContext *s, unsigned int val)
 365 {
 366     avio_wb16(s, val >> 8);
 367     avio_w8(s, val);
 368 }
 369
 370 /* Input stream */
 371
 372 static void fill_buffer(AVIOContext *s)
 373 {
 374     uint8_t *dst= !s->max_packet_size && s->buf_end - s->buffer < s->buffer_size ? s->buf_end : s->buffer;
 375     int len= s->buffer_size - (dst - s->buffer);
 376     int max_buffer_size = s->max_packet_size ? s->max_packet_size : IO_BUFFER_SIZE;
 377
 378     /* can't fill the buffer without read_packet, just set EOF if appropiate */
 379     if (!s->read_packet && s->buf_ptr >= s->buf_end)
 380         s->eof_reached = 1;
 381
 382     /* no need to do anything if EOF already reached */
 383     if (s->eof_reached)
 384         return;
 385
 386     if(s->update_checksum && dst == s->buffer){
 387         if(s->buf_end > s->checksum_ptr)
 388             s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_end - s->checksum_ptr);
 389         s->checksum_ptr= s->buffer;
 390     }
 391
 392     /* make buffer smaller in case it ended up large after probing */
 393     if (s->read_packet && s->buffer_size > max_buffer_size) {
 394         ffio_set_buf_size(s, max_buffer_size);
 395
 396         s->checksum_ptr = dst = s->buffer;
 397         len = s->buffer_size;
 398     }
 399
 400     if(s->read_packet)
 401         len = s->read_packet(s->opaque, dst, len);
 402     else
 403         len = 0;
 404     if (len <= 0) {
 405         /* do not modify buffer if EOF reached so that a seek back can
 406            be done without rereading data */
 407         s->eof_reached = 1;
 408         if(len<0)
 409             s->error= len;
 410     } else {
 411         s->pos += len;
 412         s->buf_ptr = dst;
 413         s->buf_end = dst + len;
 414     }
 415 }
 416
 417 unsigned long ff_crc04C11DB7_update(unsigned long checksum, const uint8_t *buf,
 418                                     unsigned int len)
 419 {
 420     return av_crc(av_crc_get_table(AV_CRC_32_IEEE), checksum, buf, len);
 421 }
 422
 423 unsigned long ffio_get_checksum(AVIOContext *s)
 424 {
 425     s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
 426     s->update_checksum= NULL;
 427     return s->checksum;
 428 }
 429
 430 void ffio_init_checksum(AVIOContext *s,
 431                    unsigned long (*update_checksum)(unsigned long c, const uint8_t *p, unsigned int len),
 432                    unsigned long checksum)
 433 {
 434     s->update_checksum= update_checksum;
 435     if(s->update_checksum){
 436         s->checksum= checksum;
 437         s->checksum_ptr= s->buf_ptr;
 438     }
 439 }
 440
 441 /* XXX: put an inline version */
 442 int avio_r8(AVIOContext *s)
 443 {
 444     if (s->buf_ptr >= s->buf_end)
 445         fill_buffer(s);
 446     if (s->buf_ptr < s->buf_end)
 447         return *s->buf_ptr++;
 448     return 0;
 449 }
 450
 451 int avio_read(AVIOContext *s, unsigned char *buf, int size)
 452 {
 453     int len, size1;
 454
 455     size1 = size;
 456     while (size > 0) {
 457         len = s->buf_end - s->buf_ptr;
 458         if (len > size)
 459             len = size;
 460         if (len == 0) {
 461             if(size > s->buffer_size && !s->update_checksum){
 462                 if(s->read_packet)
 463                     len = s->read_packet(s->opaque, buf, size);
 464                 if (len <= 0) {
 465                     /* do not modify buffer if EOF reached so that a seek back can
 466                     be done without rereading data */
 467                     s->eof_reached = 1;
 468                     if(len<0)
 469                         s->error= len;
 470                     break;
 471                 } else {
 472                     s->pos += len;
 473                     size -= len;
 474                     buf += len;
 475                     s->buf_ptr = s->buffer;
 476                     s->buf_end = s->buffer/* + len*/;
 477                 }
 478             }else{
 479                 fill_buffer(s);
 480                 len = s->buf_end - s->buf_ptr;
 481                 if (len == 0)
 482                     break;
 483             }
 484         } else {
 485             memcpy(buf, s->buf_ptr, len);
 486             buf += len;
 487             s->buf_ptr += len;
 488             size -= len;
 489         }
 490     }
 491     if (size1 == size) {
 492         if (s->error)      return s->error;
 493         if (url_feof(s))   return AVERROR_EOF;
 494     }
 495     return size1 - size;
 496 }
 497
 498 int ffio_read_partial(AVIOContext *s, unsigned char *buf, int size)
 499 {
 500     int len;
 501
 502     if(size<0)
 503         return -1;
 504
 505     len = s->buf_end - s->buf_ptr;
 506     if (len == 0) {
 507         fill_buffer(s);
 508         len = s->buf_end - s->buf_ptr;
 509     }
 510     if (len > size)
 511         len = size;
 512     memcpy(buf, s->buf_ptr, len);
 513     s->buf_ptr += len;
 514     if (!len) {
 515         if (s->error)      return s->error;
 516         if (url_feof(s))   return AVERROR_EOF;
 517     }
 518     return len;
 519 }
 520
 521 unsigned int avio_rl16(AVIOContext *s)
 522 {
 523     unsigned int val;
 524     val = avio_r8(s);
 525     val |= avio_r8(s) << 8;
 526     return val;
 527 }
 528
 529 unsigned int avio_rl24(AVIOContext *s)
 530 {
 531     unsigned int val;
 532     val = avio_rl16(s);
 533     val |= avio_r8(s) << 16;
 534     return val;
 535 }
 536
 537 unsigned int avio_rl32(AVIOContext *s)
 538 {
 539     unsigned int val;
 540     val = avio_rl16(s);
 541     val |= avio_rl16(s) << 16;
 542     return val;
 543 }
 544
 545 uint64_t avio_rl64(AVIOContext *s)
 546 {
 547     uint64_t val;
 548     val = (uint64_t)avio_rl32(s);
 549     val |= (uint64_t)avio_rl32(s) << 32;
 550     return val;
 551 }
 552
 553 unsigned int avio_rb16(AVIOContext *s)
 554 {
 555     unsigned int val;
 556     val = avio_r8(s) << 8;
 557     val |= avio_r8(s);
 558     return val;
 559 }
 560
 561 unsigned int avio_rb24(AVIOContext *s)
 562 {
 563     unsigned int val;
 564     val = avio_rb16(s) << 8;
 565     val |= avio_r8(s);
 566     return val;
 567 }
 568 unsigned int avio_rb32(AVIOContext *s)
 569 {
 570     unsigned int val;
 571     val = avio_rb16(s) << 16;
 572     val |= avio_rb16(s);
 573     return val;
 574 }
 575
 576 int ff_get_line(AVIOContext *s, char *buf, int maxlen)
 577 {
 578     int i = 0;
 579     char c;
 580
 581     do {
 582         c = avio_r8(s);
 583         if (c && i < maxlen-1)
 584             buf[i++] = c;
 585     } while (c != '\n' && c);
 586
 587     buf[i] = 0;
 588     return i;
 589 }
 590
 591 int avio_get_str(AVIOContext *s, int maxlen, char *buf, int buflen)
 592 {
 593     int i;
 594
 595     if (buflen <= 0)
 596         return AVERROR(EINVAL);
 597     // reserve 1 byte for terminating 0
 598     buflen = FFMIN(buflen - 1, maxlen);
 599     for (i = 0; i < buflen; i++)
 600         if (!(buf[i] = avio_r8(s)))
 601             return i + 1;
 602     buf[i] = 0;
 603     for (; i < maxlen; i++)
 604         if (!avio_r8(s))
 605             return i + 1;
 606     return maxlen;
 607 }
 608
 609 #define GET_STR16(type, read) \
 610     int avio_get_str16 ##type(AVIOContext *pb, int maxlen, char *buf, int buflen)\
 611 {\
 612     char* q = buf;\
 613     int ret = 0;\
 614     if (buflen <= 0) \
 615         return AVERROR(EINVAL); \
 616     while (ret + 1 < maxlen) {\
 617         uint8_t tmp;\
 618         uint32_t ch;\
 619         GET_UTF16(ch, (ret += 2) <= maxlen ? read(pb) : 0, break;)\
 620         if (!ch)\
 621             break;\
 622         PUT_UTF8(ch, tmp, if (q - buf < buflen - 1) *q++ = tmp;)\
 623     }\
 624     *q = 0;\
 625     return ret;\
 626 }\
 627
 628 GET_STR16(le, avio_rl16)
 629 GET_STR16(be, avio_rb16)
 630
 631 #undef GET_STR16
 632
 633 uint64_t avio_rb64(AVIOContext *s)
 634 {
 635     uint64_t val;
 636     val = (uint64_t)avio_rb32(s) << 32;
 637     val |= (uint64_t)avio_rb32(s);
 638     return val;
 639 }
 640
 641 uint64_t ffio_read_varlen(AVIOContext *bc){
 642     uint64_t val = 0;
 643     int tmp;
 644
 645     do{
 646         tmp = avio_r8(bc);
 647         val= (val<<7) + (tmp&127);
 648     }while(tmp&128);
 649     return val;
 650 }
 651
 652 int ffio_fdopen(AVIOContext **s, URLContext *h)
 653 {
 654     uint8_t *buffer;
 655     int buffer_size, max_packet_size;
 656
 657     max_packet_size = h->max_packet_size;
 658     if (max_packet_size) {
 659         buffer_size = max_packet_size; /* no need to bufferize more than one packet */
 660     } else {
 661         buffer_size = IO_BUFFER_SIZE;
 662     }
 663     buffer = av_malloc(buffer_size);
 664     if (!buffer)
 665         return AVERROR(ENOMEM);
 666
 667     *s = avio_alloc_context(buffer, buffer_size, h->flags & AVIO_FLAG_WRITE, h,
 668                             ffurl_read, ffurl_write, ffurl_seek);
 669     if (!*s) {
 670         av_free(buffer);
 671         return AVERROR(ENOMEM);
 672     }
 673     (*s)->seekable = h->is_streamed ? 0 : AVIO_SEEKABLE_NORMAL;
 674     (*s)->max_packet_size = max_packet_size;
 675     if(h->prot) {
 676         (*s)->read_pause = (int (*)(void *, int))h->prot->url_read_pause;
 677         (*s)->read_seek  = (int64_t (*)(void *, int, int64_t, int))h->prot->url_read_seek;
 678     }
 679     (*s)->av_class = &ffio_url_class;
 680     return 0;
 681 }
 682
 683 int ffio_set_buf_size(AVIOContext *s, int buf_size)
 684 {
 685     uint8_t *buffer;
 686     buffer = av_malloc(buf_size);
 687     if (!buffer)
 688         return AVERROR(ENOMEM);
 689
 690     av_free(s->buffer);
 691     s->buffer = buffer;
 692     s->buffer_size = buf_size;
 693     s->buf_ptr = buffer;
 694     url_resetbuf(s, s->write_flag ? AVIO_FLAG_WRITE : AVIO_FLAG_READ);
 695     return 0;
 696 }
 697
 698 static int url_resetbuf(AVIOContext *s, int flags)
 699 {
 700     assert(flags == AVIO_FLAG_WRITE || flags == AVIO_FLAG_READ);
 701
 702     if (flags & AVIO_FLAG_WRITE) {
 703         s->buf_end = s->buffer + s->buffer_size;
 704         s->write_flag = 1;
 705     } else {
 706         s->buf_end = s->buffer;
 707         s->write_flag = 0;
 708     }
 709     return 0;
 710 }
 711
 712 int ffio_rewind_with_probe_data(AVIOContext *s, unsigned char *buf, int buf_size)
 713 {
 714     int64_t buffer_start;
 715     int buffer_size;
 716     int overlap, new_size, alloc_size;
 717
 718     if (s->write_flag)
 719         return AVERROR(EINVAL);
 720
 721     buffer_size = s->buf_end - s->buffer;
 722
 723     /* the buffers must touch or overlap */
 724     if ((buffer_start = s->pos - buffer_size) > buf_size)
 725         return AVERROR(EINVAL);
 726
 727     overlap = buf_size - buffer_start;
 728     new_size = buf_size + buffer_size - overlap;
 729
 730     alloc_size = FFMAX(s->buffer_size, new_size);
 731     if (alloc_size > buf_size)
 732         if (!(buf = av_realloc_f(buf, 1, alloc_size)))
 733             return AVERROR(ENOMEM);
 734
 735     if (new_size > buf_size) {
 736         memcpy(buf + buf_size, s->buffer + overlap, buffer_size - overlap);
 737         buf_size = new_size;
 738     }
 739
 740     av_free(s->buffer);
 741     s->buf_ptr = s->buffer = buf;
 742     s->buffer_size = alloc_size;
 743     s->pos = buf_size;
 744     s->buf_end = s->buf_ptr + buf_size;
 745     s->eof_reached = 0;
 746     s->must_flush = 0;
 747
 748     return 0;
 749 }
 750
 751 int avio_open(AVIOContext **s, const char *filename, int flags)
 752 {
 753     return avio_open2(s, filename, flags, NULL, NULL);
 754 }
 755
 756 int avio_open2(AVIOContext **s, const char *filename, int flags,
 757                const AVIOInterruptCB *int_cb, AVDictionary **options)
 758 {
 759     URLContext *h;
 760     int err;
 761
 762     err = ffurl_open(&h, filename, flags, int_cb, options);
 763     if (err < 0)
 764         return err;
 765     err = ffio_fdopen(s, h);
 766     if (err < 0) {
 767         ffurl_close(h);
 768         return err;
 769     }
 770     return 0;
 771 }
 772
 773 int avio_close(AVIOContext *s)
 774 {
 775     URLContext *h = s->opaque;
 776
 777     av_free(s->buffer);
 778     av_free(s);
 779     return ffurl_close(h);
 780 }
 781
 782 int avio_printf(AVIOContext *s, const char *fmt, ...)
 783 {
 784     va_list ap;
 785     char buf[4096];
 786     int ret;
 787
 788     va_start(ap, fmt);
 789     ret = vsnprintf(buf, sizeof(buf), fmt, ap);
 790     va_end(ap);
 791     avio_write(s, buf, strlen(buf));
 792     return ret;
 793 }
 794
 795 int avio_pause(AVIOContext *s, int pause)
 796 {
 797     if (!s->read_pause)
 798         return AVERROR(ENOSYS);
 799     return s->read_pause(s->opaque, pause);
 800 }
 801
 802 int64_t avio_seek_time(AVIOContext *s, int stream_index,
 803                        int64_t timestamp, int flags)
 804 {
 805     URLContext *h = s->opaque;
 806     int64_t ret;
 807     if (!s->read_seek)
 808         return AVERROR(ENOSYS);
 809     ret = s->read_seek(h, stream_index, timestamp, flags);
 810     if(ret >= 0) {
 811         int64_t pos;
 812         s->buf_ptr = s->buf_end; // Flush buffer
 813         pos = s->seek(h, 0, SEEK_CUR);
 814         if (pos >= 0)
 815             s->pos = pos;
 816         else if (pos != AVERROR(ENOSYS))
 817             ret = pos;
 818     }
 819     return ret;
 820 }
 821
 822 /* output in a dynamic buffer */
 823
 824 typedef struct DynBuffer {
 825     int pos, size, allocated_size;
 826     uint8_t *buffer;
 827     int io_buffer_size;
 828     uint8_t io_buffer[1];
 829 } DynBuffer;
 830
 831 static int dyn_buf_write(void *opaque, uint8_t *buf, int buf_size)
 832 {
 833     DynBuffer *d = opaque;
 834     unsigned new_size, new_allocated_size;
 835
 836     /* reallocate buffer if needed */
 837     new_size = d->pos + buf_size;
 838     new_allocated_size = d->allocated_size;
 839     if(new_size < d->pos || new_size > INT_MAX/2)
 840         return -1;
 841     while (new_size > new_allocated_size) {
 842         if (!new_allocated_size)
 843             new_allocated_size = new_size;
 844         else
 845             new_allocated_size += new_allocated_size / 2 + 1;
 846     }
 847
 848     if (new_allocated_size > d->allocated_size) {
 849         d->buffer = av_realloc_f(d->buffer, 1, new_allocated_size);
 850         if(d->buffer == NULL)
 851              return AVERROR(ENOMEM);
 852         d->allocated_size = new_allocated_size;
 853     }
 854     memcpy(d->buffer + d->pos, buf, buf_size);
 855     d->pos = new_size;
 856     if (d->pos > d->size)
 857         d->size = d->pos;
 858     return buf_size;
 859 }
 860
 861 static int dyn_packet_buf_write(void *opaque, uint8_t *buf, int buf_size)
 862 {
 863     unsigned char buf1[4];
 864     int ret;
 865
 866     /* packetized write: output the header */
 867     AV_WB32(buf1, buf_size);
 868     ret= dyn_buf_write(opaque, buf1, 4);
 869     if(ret < 0)
 870         return ret;
 871
 872     /* then the data */
 873     return dyn_buf_write(opaque, buf, buf_size);
 874 }
 875
 876 static int64_t dyn_buf_seek(void *opaque, int64_t offset, int whence)
 877 {
 878     DynBuffer *d = opaque;
 879
 880     if (whence == SEEK_CUR)
 881         offset += d->pos;
 882     else if (whence == SEEK_END)
 883         offset += d->size;
 884     if (offset < 0 || offset > 0x7fffffffLL)
 885         return -1;
 886     d->pos = offset;
 887     return 0;
 888 }
 889
 890 static int url_open_dyn_buf_internal(AVIOContext **s, int max_packet_size)
 891 {
 892     DynBuffer *d;
 893     unsigned io_buffer_size = max_packet_size ? max_packet_size : 1024;
 894
 895     if(sizeof(DynBuffer) + io_buffer_size < io_buffer_size)
 896         return -1;
 897     d = av_mallocz(sizeof(DynBuffer) + io_buffer_size);
 898     if (!d)
 899         return AVERROR(ENOMEM);
 900     d->io_buffer_size = io_buffer_size;
 901     *s = avio_alloc_context(d->io_buffer, d->io_buffer_size, 1, d, NULL,
 902                             max_packet_size ? dyn_packet_buf_write : dyn_buf_write,
 903                             max_packet_size ? NULL : dyn_buf_seek);
 904     if(!*s) {
 905         av_free(d);
 906         return AVERROR(ENOMEM);
 907     }
 908     (*s)->max_packet_size = max_packet_size;
 909     return 0;
 910 }
 911
 912 int avio_open_dyn_buf(AVIOContext **s)
 913 {
 914     return url_open_dyn_buf_internal(s, 0);
 915 }
 916
 917 int ffio_open_dyn_packet_buf(AVIOContext **s, int max_packet_size)
 918 {
 919     if (max_packet_size <= 0)
 920         return -1;
 921     return url_open_dyn_buf_internal(s, max_packet_size);
 922 }
 923
 924 int avio_close_dyn_buf(AVIOContext *s, uint8_t **pbuffer)
 925 {
 926     DynBuffer *d = s->opaque;
 927     int size;
 928     static const char padbuf[FF_INPUT_BUFFER_PADDING_SIZE] = {0};
 929     int padding = 0;
 930
 931     /* don't attempt to pad fixed-size packet buffers */
 932     if (!s->max_packet_size) {
 933         avio_write(s, padbuf, sizeof(padbuf));
 934         padding = FF_INPUT_BUFFER_PADDING_SIZE;
 935     }
 936
 937     avio_flush(s);
 938
 939     *pbuffer = d->buffer;
 940     size = d->size;
 941     av_free(d);
 942     av_free(s);
 943     return size - padding;
 944 }