libavformat/aviobuf.c

   1 /*
   2  * Buffered I/O for ffmpeg system
   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/intreadwrite.h"
  24 #include "avformat.h"
  25 #include "avio.h"
  26 #include <stdarg.h>
  27 #include <unistd.h>
  28 #include <malloc.h>
  29
  30 #define IO_BUFFER_SIZE 32768
  31
  32 static void fill_buffer(ByteIOContext *s);
  33
  34 int init_put_byte(ByteIOContext *s,
  35                   unsigned char *buffer,
  36                   int buffer_size,
  37                   int write_flag,
  38                   void *opaque,
  39                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
  40                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
  41                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
  42 {
  43     s->buffer = buffer;
  44     s->buffer_size = buffer_size;
  45     s->buf_ptr = buffer;
  46     s->opaque = opaque;
  47     url_resetbuf(s, write_flag ? URL_WRONLY : URL_RDONLY);
  48     s->write_packet = write_packet;
  49     s->read_packet = read_packet;
  50     s->seek = seek;
  51     s->pos = 0;
  52     s->must_flush = 0;
  53     s->eof_reached = 0;
  54     s->error = 0;
  55     s->is_streamed = 0;
  56     s->max_packet_size = 0;
  57     s->update_checksum= NULL;
  58     if(!read_packet && !write_flag){
  59         s->pos = buffer_size;
  60         s->buf_end = s->buffer + buffer_size;
  61     }
  62     s->read_pause = NULL;
  63     s->read_seek  = NULL;
  64     return 0;
  65 }
  66
  67 ByteIOContext *av_alloc_put_byte(
  68                   unsigned char *buffer,
  69                   int buffer_size,
  70                   int write_flag,
  71                   void *opaque,
  72                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
  73                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
  74                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
  75 {
  76     ByteIOContext *s = av_mallocz(sizeof(ByteIOContext));
  77     init_put_byte(s, buffer, buffer_size, write_flag, opaque,
  78                   read_packet, write_packet, seek);
  79     return s;
  80 }
  81
  82 #define BLOCK_SIZE 512
  83
  84 static void flush_buffer(ByteIOContext *s)
  85 {
  86     size_t data_len = s->buf_ptr - s->buffer;
  87     size_t to_write = (data_len + BLOCK_SIZE - 1) & ~(BLOCK_SIZE - 1);
  88     int64_t res = AVERROR(EPIPE);
  89     av_log(NULL, AV_LOG_ERROR, "YYY dl=%u, tw=%u\n", data_len, to_write);
  90     if (s->buf_ptr > s->buffer) {
  91         if (s->write_packet && !s->error){
  92             int ret= s->write_packet(s->opaque, s->buffer, to_write);
  93             if(ret < 0){
  94                 s->error = ret;
  95             }
  96         }
  97         if(s->update_checksum){
  98             av_log(NULL, AV_LOG_ERROR, "Checksumming not implemented in O_DIRECT patch\n");
  99             s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
 100             s->checksum_ptr= s->buffer;
 101         }
 102         s->pos += to_write - BLOCK_SIZE;
 103         memcpy(s->buffer, &s->buffer[to_write], data_len - to_write + BLOCK_SIZE);
 104         s->buf_ptr -= to_write - BLOCK_SIZE;
 105
 106         if (s->seek)
 107             res = s->seek(s->opaque, s->pos, SEEK_SET);
 108         if (res < 0)
 109             av_log(NULL, AV_LOG_ERROR, "seek error inside flush_buffer: %lld\n", res);
 110         av_log(NULL, AV_LOG_ERROR, "ZZZ tw=%u, pos=%d\n", to_write, s->pos);
 111     }
 112 }
 113
 114 void put_byte(ByteIOContext *s, int b)
 115 {
 116     *(s->buf_ptr)++ = b;
 117     if (s->buf_ptr >= s->buf_end)
 118         flush_buffer(s);
 119 }
 120
 121 void put_buffer(ByteIOContext *s, const unsigned char *buf, int size)
 122 {
 123     int len;
 124
 125     while (size > 0) {
 126         len = (s->buf_end - s->buf_ptr);
 127         if (len > size)
 128             len = size;
 129         memcpy(s->buf_ptr, buf, len);
 130         s->buf_ptr += len;
 131
 132         if (s->buf_ptr >= s->buf_end)
 133             flush_buffer(s);
 134
 135         buf += len;
 136         size -= len;
 137     }
 138 }
 139
 140 void put_flush_packet(ByteIOContext *s)
 141 {
 142     flush_buffer(s);
 143     s->must_flush = 0;
 144 }
 145
 146 int64_t url_fseek(ByteIOContext *s, int64_t offset, int whence)
 147 {
 148     int64_t offset1;
 149     int64_t pos;
 150
 151     if(!s)
 152         return AVERROR(EINVAL);
 153
 154     pos = s->pos - (s->write_flag ? 0 : (s->buf_end - s->buffer));
 155
 156     if (whence != SEEK_CUR && whence != SEEK_SET)
 157         return AVERROR(EINVAL);
 158
 159     if (whence == SEEK_CUR) {
 160         offset1 = pos + (s->buf_ptr - s->buffer);
 161         if (offset == 0)
 162             return offset1;
 163         offset += offset1;
 164     }
 165     av_log(NULL, AV_LOG_ERROR, "SEEK to %llu\n", offset);
 166
 167     offset1 = offset - pos;
 168     if (!s->must_flush &&
 169         offset1 >= 0 && offset1 <= (s->buf_end - s->buffer)) {
 170         /* can do the seek inside the buffer */
 171         s->buf_ptr = s->buffer + offset1;
 172     } else if(s->is_streamed && !s->write_flag &&
 173               offset1 >= 0 && offset1 < (s->buf_end - s->buffer) + (1<<16)){
 174         while(s->pos < offset && !s->eof_reached)
 175             fill_buffer(s);
 176         if (s->eof_reached)
 177             return AVERROR(EPIPE);
 178         s->buf_ptr = s->buf_end + offset - s->pos;
 179     } else {
 180         int64_t res = AVERROR(EPIPE);
 181
 182 #if CONFIG_MUXERS || CONFIG_NETWORK
 183         if (s->write_flag) {
 184             flush_buffer(s);
 185             s->must_flush = 1;
 186         }
 187 #endif /* CONFIG_MUXERS || CONFIG_NETWORK */
 188 #warning TODO read the whole block from the file to the buffer
 189         if (!s->seek || (res = s->seek(s->opaque, offset, SEEK_SET)) < 0)
 190             return res;
 191         if (!s->write_flag)
 192             s->buf_end = s->buffer;
 193         s->buf_ptr = s->buffer;
 194         s->pos = offset;
 195     }
 196     s->eof_reached = 0;
 197     return offset;
 198 }
 199
 200 void url_fskip(ByteIOContext *s, int64_t offset)
 201 {
 202     url_fseek(s, offset, SEEK_CUR);
 203 }
 204
 205 int64_t url_ftell(ByteIOContext *s)
 206 {
 207     return url_fseek(s, 0, SEEK_CUR);
 208 }
 209
 210 int64_t url_fsize(ByteIOContext *s)
 211 {
 212     int64_t size;
 213
 214     if(!s)
 215         return AVERROR(EINVAL);
 216
 217     if (!s->seek)
 218         return AVERROR(EPIPE);
 219     size = s->seek(s->opaque, 0, AVSEEK_SIZE);
 220     if(size<0){
 221         if ((size = s->seek(s->opaque, -1, SEEK_END)) < 0)
 222             return size;
 223         size++;
 224         s->seek(s->opaque, s->pos, SEEK_SET);
 225     }
 226     return size;
 227 }
 228
 229 int url_feof(ByteIOContext *s)
 230 {
 231     if(!s)
 232         return 0;
 233     return s->eof_reached;
 234 }
 235
 236 int url_ferror(ByteIOContext *s)
 237 {
 238     if(!s)
 239         return 0;
 240     return s->error;
 241 }
 242
 243 void put_le32(ByteIOContext *s, unsigned int val)
 244 {
 245     put_byte(s, val);
 246     put_byte(s, val >> 8);
 247     put_byte(s, val >> 16);
 248     put_byte(s, val >> 24);
 249 }
 250
 251 void put_be32(ByteIOContext *s, unsigned int val)
 252 {
 253     put_byte(s, val >> 24);
 254     put_byte(s, val >> 16);
 255     put_byte(s, val >> 8);
 256     put_byte(s, val);
 257 }
 258
 259 void put_strz(ByteIOContext *s, const char *str)
 260 {
 261     if (str)
 262         put_buffer(s, (const unsigned char *) str, strlen(str) + 1);
 263     else
 264         put_byte(s, 0);
 265 }
 266
 267 void put_le64(ByteIOContext *s, uint64_t val)
 268 {
 269     put_le32(s, (uint32_t)(val & 0xffffffff));
 270     put_le32(s, (uint32_t)(val >> 32));
 271 }
 272
 273 void put_be64(ByteIOContext *s, uint64_t val)
 274 {
 275     put_be32(s, (uint32_t)(val >> 32));
 276     put_be32(s, (uint32_t)(val & 0xffffffff));
 277 }
 278
 279 void put_le16(ByteIOContext *s, unsigned int val)
 280 {
 281     put_byte(s, val);
 282     put_byte(s, val >> 8);
 283 }
 284
 285 void put_be16(ByteIOContext *s, unsigned int val)
 286 {
 287     put_byte(s, val >> 8);
 288     put_byte(s, val);
 289 }
 290
 291 void put_le24(ByteIOContext *s, unsigned int val)
 292 {
 293     put_le16(s, val & 0xffff);
 294     put_byte(s, val >> 16);
 295 }
 296
 297 void put_be24(ByteIOContext *s, unsigned int val)
 298 {
 299     put_be16(s, val >> 8);
 300     put_byte(s, val);
 301 }
 302
 303 void put_tag(ByteIOContext *s, const char *tag)
 304 {
 305     while (*tag) {
 306         put_byte(s, *tag++);
 307     }
 308 }
 309
 310 /* Input stream */
 311
 312 static void fill_buffer(ByteIOContext *s)
 313 {
 314     uint8_t *dst= !s->max_packet_size && s->buf_end - s->buffer < s->buffer_size ? s->buf_ptr : s->buffer;
 315     int len= s->buffer_size - (dst - s->buffer);
 316
 317     assert(s->buf_ptr == s->buf_end);
 318
 319     /* no need to do anything if EOF already reached */
 320     if (s->eof_reached)
 321         return;
 322
 323     if(s->update_checksum && dst == s->buffer){
 324         if(s->buf_end > s->checksum_ptr)
 325             s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_end - s->checksum_ptr);
 326         s->checksum_ptr= s->buffer;
 327     }
 328
 329     if(s->read_packet)
 330         len = s->read_packet(s->opaque, dst, len);
 331     else
 332         len = 0;
 333     if (len <= 0) {
 334         /* do not modify buffer if EOF reached so that a seek back can
 335            be done without rereading data */
 336         s->eof_reached = 1;
 337         if(len<0)
 338             s->error= len;
 339     } else {
 340         s->pos += len;
 341         s->buf_ptr = dst;
 342         s->buf_end = dst + len;
 343     }
 344 }
 345
 346 unsigned long ff_crc04C11DB7_update(unsigned long checksum, const uint8_t *buf,
 347                                     unsigned int len)
 348 {
 349     return av_crc(av_crc_get_table(AV_CRC_32_IEEE), checksum, buf, len);
 350 }
 351
 352 unsigned long get_checksum(ByteIOContext *s)
 353 {
 354     s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
 355     s->update_checksum= NULL;
 356     return s->checksum;
 357 }
 358
 359 void init_checksum(ByteIOContext *s,
 360                    unsigned long (*update_checksum)(unsigned long c, const uint8_t *p, unsigned int len),
 361                    unsigned long checksum)
 362 {
 363     s->update_checksum= update_checksum;
 364     if(s->update_checksum){
 365         s->checksum= checksum;
 366         s->checksum_ptr= s->buf_ptr;
 367     }
 368 }
 369
 370 /* XXX: put an inline version */
 371 int get_byte(ByteIOContext *s)
 372 {
 373     if (s->buf_ptr < s->buf_end) {
 374         return *s->buf_ptr++;
 375     } else {
 376         fill_buffer(s);
 377         if (s->buf_ptr < s->buf_end)
 378             return *s->buf_ptr++;
 379         else
 380             return 0;
 381     }
 382 }
 383
 384 int url_fgetc(ByteIOContext *s)
 385 {
 386     if (s->buf_ptr < s->buf_end) {
 387         return *s->buf_ptr++;
 388     } else {
 389         fill_buffer(s);
 390         if (s->buf_ptr < s->buf_end)
 391             return *s->buf_ptr++;
 392         else
 393             return URL_EOF;
 394     }
 395 }
 396
 397 int get_buffer(ByteIOContext *s, unsigned char *buf, int size)
 398 {
 399     int len, size1;
 400
 401     size1 = size;
 402     while (size > 0) {
 403         len = s->buf_end - s->buf_ptr;
 404         if (len > size)
 405             len = size;
 406         if (len == 0) {
 407             if(size > s->buffer_size && !s->update_checksum){
 408                 if(s->read_packet)
 409                     len = s->read_packet(s->opaque, buf, size);
 410                 if (len <= 0) {
 411                     /* do not modify buffer if EOF reached so that a seek back can
 412                     be done without rereading data */
 413                     s->eof_reached = 1;
 414                     if(len<0)
 415                         s->error= len;
 416                     break;
 417                 } else {
 418                     s->pos += len;
 419                     size -= len;
 420                     buf += len;
 421                     s->buf_ptr = s->buffer;
 422                     s->buf_end = s->buffer/* + len*/;
 423                 }
 424             }else{
 425                 fill_buffer(s);
 426                 len = s->buf_end - s->buf_ptr;
 427                 if (len == 0)
 428                     break;
 429             }
 430         } else {
 431             memcpy(buf, s->buf_ptr, len);
 432             buf += len;
 433             s->buf_ptr += len;
 434             size -= len;
 435         }
 436     }
 437     return size1 - size;
 438 }
 439
 440 int get_partial_buffer(ByteIOContext *s, unsigned char *buf, int size)
 441 {
 442     int len;
 443
 444     if(size<0)
 445         return -1;
 446
 447     len = s->buf_end - s->buf_ptr;
 448     if (len == 0) {
 449         fill_buffer(s);
 450         len = s->buf_end - s->buf_ptr;
 451     }
 452     if (len > size)
 453         len = size;
 454     memcpy(buf, s->buf_ptr, len);
 455     s->buf_ptr += len;
 456     return len;
 457 }
 458
 459 unsigned int get_le16(ByteIOContext *s)
 460 {
 461     unsigned int val;
 462     val = get_byte(s);
 463     val |= get_byte(s) << 8;
 464     return val;
 465 }
 466
 467 unsigned int get_le24(ByteIOContext *s)
 468 {
 469     unsigned int val;
 470     val = get_le16(s);
 471     val |= get_byte(s) << 16;
 472     return val;
 473 }
 474
 475 unsigned int get_le32(ByteIOContext *s)
 476 {
 477     unsigned int val;
 478     val = get_le16(s);
 479     val |= get_le16(s) << 16;
 480     return val;
 481 }
 482
 483 uint64_t get_le64(ByteIOContext *s)
 484 {
 485     uint64_t val;
 486     val = (uint64_t)get_le32(s);
 487     val |= (uint64_t)get_le32(s) << 32;
 488     return val;
 489 }
 490
 491 unsigned int get_be16(ByteIOContext *s)
 492 {
 493     unsigned int val;
 494     val = get_byte(s) << 8;
 495     val |= get_byte(s);
 496     return val;
 497 }
 498
 499 unsigned int get_be24(ByteIOContext *s)
 500 {
 501     unsigned int val;
 502     val = get_be16(s) << 8;
 503     val |= get_byte(s);
 504     return val;
 505 }
 506 unsigned int get_be32(ByteIOContext *s)
 507 {
 508     unsigned int val;
 509     val = get_be16(s) << 16;
 510     val |= get_be16(s);
 511     return val;
 512 }
 513
 514 char *get_strz(ByteIOContext *s, char *buf, int maxlen)
 515 {
 516     int i = 0;
 517     char c;
 518
 519     while ((c = get_byte(s))) {
 520         if (i < maxlen-1)
 521             buf[i++] = c;
 522     }
 523
 524     buf[i] = 0; /* Ensure null terminated, but may be truncated */
 525
 526     return buf;
 527 }
 528
 529 uint64_t get_be64(ByteIOContext *s)
 530 {
 531     uint64_t val;
 532     val = (uint64_t)get_be32(s) << 32;
 533     val |= (uint64_t)get_be32(s);
 534     return val;
 535 }
 536
 537 uint64_t ff_get_v(ByteIOContext *bc){
 538     uint64_t val = 0;
 539     int tmp;
 540
 541     do{
 542         tmp = get_byte(bc);
 543         val= (val<<7) + (tmp&127);
 544     }while(tmp&128);
 545     return val;
 546 }
 547
 548 int url_fdopen(ByteIOContext **s, URLContext *h)
 549 {
 550     uint8_t *buffer;
 551     int buffer_size, max_packet_size;
 552
 553
 554     max_packet_size = url_get_max_packet_size(h);
 555     if (max_packet_size) {
 556         buffer_size = max_packet_size; /* no need to bufferize more than one packet */
 557     } else {
 558         buffer_size = IO_BUFFER_SIZE;
 559     }
 560     buffer_size = 2*buffer_size+BLOCK_SIZE;
 561     buffer = memalign(sysconf(_SC_PAGESIZE), buffer_size);
 562     if (!buffer)
 563         return AVERROR(ENOMEM);
 564
 565     *s = av_mallocz(sizeof(ByteIOContext));
 566     if(!*s) {
 567         av_free(buffer);
 568         return AVERROR(ENOMEM);
 569     }
 570
 571     if (init_put_byte(*s, buffer, buffer_size,
 572                       (h->flags & URL_WRONLY || h->flags & URL_RDWR), h,
 573                       url_read, url_write, url_seek) < 0) {
 574         av_free(buffer);
 575         av_freep(s);
 576         return AVERROR(EIO);
 577     }
 578     (*s)->is_streamed = h->is_streamed;
 579     (*s)->max_packet_size = max_packet_size;
 580     if(h->prot) {
 581         (*s)->read_pause = (int (*)(void *, int))h->prot->url_read_pause;
 582         (*s)->read_seek  = (int64_t (*)(void *, int, int64_t, int))h->prot->url_read_seek;
 583     }
 584     return 0;
 585 }
 586
 587 int url_setbufsize(ByteIOContext *s, int buf_size)
 588 {
 589     uint8_t *buffer;
 590     buffer = av_malloc(buf_size);
 591     if (!buffer)
 592         return AVERROR(ENOMEM);
 593
 594     av_free(s->buffer);
 595     s->buffer = buffer;
 596     s->buffer_size = buf_size;
 597     s->buf_ptr = buffer;
 598     url_resetbuf(s, s->write_flag ? URL_WRONLY : URL_RDONLY);
 599     return 0;
 600 }
 601
 602 int url_resetbuf(ByteIOContext *s, int flags)
 603 {
 604     URLContext *h = s->opaque;
 605     if ((flags & URL_RDWR) || (h && h->flags != flags && !h->flags & URL_RDWR))
 606         return AVERROR(EINVAL);
 607
 608     if (flags & URL_WRONLY) {
 609         s->buf_end = s->buffer + s->buffer_size;
 610         s->write_flag = 1;
 611     } else {
 612         s->buf_end = s->buffer;
 613         s->write_flag = 0;
 614     }
 615     return 0;
 616 }
 617
 618 int url_fopen(ByteIOContext **s, const char *filename, int flags)
 619 {
 620     URLContext *h;
 621     int err;
 622
 623     err = url_open(&h, filename, flags);
 624     if (err < 0)
 625         return err;
 626     err = url_fdopen(s, h);
 627     if (err < 0) {
 628         url_close(h);
 629         return err;
 630     }
 631     return 0;
 632 }
 633
 634 int url_fclose(ByteIOContext *s)
 635 {
 636     URLContext *h = s->opaque;
 637
 638     av_free(s->buffer);
 639     av_free(s);
 640     return url_close(h);
 641 }
 642
 643 URLContext *url_fileno(ByteIOContext *s)
 644 {
 645     return s->opaque;
 646 }
 647
 648 #if CONFIG_MUXERS
 649 int url_fprintf(ByteIOContext *s, const char *fmt, ...)
 650 {
 651     va_list ap;
 652     char buf[4096];
 653     int ret;
 654
 655     va_start(ap, fmt);
 656     ret = vsnprintf(buf, sizeof(buf), fmt, ap);
 657     va_end(ap);
 658     put_buffer(s, buf, strlen(buf));
 659     return ret;
 660 }
 661 #endif //CONFIG_MUXERS
 662
 663 char *url_fgets(ByteIOContext *s, char *buf, int buf_size)
 664 {
 665     int c;
 666     char *q;
 667
 668     c = url_fgetc(s);
 669     if (c == EOF)
 670         return NULL;
 671     q = buf;
 672     for(;;) {
 673         if (c == EOF || c == '\n')
 674             break;
 675         if ((q - buf) < buf_size - 1)
 676             *q++ = c;
 677         c = url_fgetc(s);
 678     }
 679     if (buf_size > 0)
 680         *q = '\0';
 681     return buf;
 682 }
 683
 684 int url_fget_max_packet_size(ByteIOContext *s)
 685 {
 686     return s->max_packet_size;
 687 }
 688
 689 int av_url_read_fpause(ByteIOContext *s, int pause)
 690 {
 691     if (!s->read_pause)
 692         return AVERROR(ENOSYS);
 693     return s->read_pause(s->opaque, pause);
 694 }
 695
 696 int64_t av_url_read_fseek(ByteIOContext *s, int stream_index,
 697                           int64_t timestamp, int flags)
 698 {
 699     URLContext *h = s->opaque;
 700     int64_t ret;
 701     if (!s->read_seek)
 702         return AVERROR(ENOSYS);
 703     ret = s->read_seek(h, stream_index, timestamp, flags);
 704     if(ret >= 0) {
 705         s->buf_ptr = s->buf_end; // Flush buffer
 706         s->pos = s->seek(h, 0, SEEK_CUR);
 707     }
 708     return ret;
 709 }
 710
 711 /* url_open_dyn_buf and url_close_dyn_buf are used in rtp.c to send a response
 712  * back to the server even if CONFIG_MUXERS is false. */
 713 #if CONFIG_MUXERS || CONFIG_NETWORK
 714 /* buffer handling */
 715 int url_open_buf(ByteIOContext **s, uint8_t *buf, int buf_size, int flags)
 716 {
 717     int ret;
 718     *s = av_mallocz(sizeof(ByteIOContext));
 719     if(!*s)
 720         return AVERROR(ENOMEM);
 721     ret = init_put_byte(*s, buf, buf_size,
 722                         (flags & URL_WRONLY || flags & URL_RDWR),
 723                         NULL, NULL, NULL, NULL);
 724     if(ret != 0)
 725         av_freep(s);
 726     return ret;
 727 }
 728
 729 int url_close_buf(ByteIOContext *s)
 730 {
 731     put_flush_packet(s);
 732     return s->buf_ptr - s->buffer;
 733 }
 734
 735 /* output in a dynamic buffer */
 736
 737 typedef struct DynBuffer {
 738     int pos, size, allocated_size;
 739     uint8_t *buffer;
 740     int io_buffer_size;
 741     uint8_t io_buffer[1];
 742 } DynBuffer;
 743
 744 static int dyn_buf_write(void *opaque, uint8_t *buf, int buf_size)
 745 {
 746     DynBuffer *d = opaque;
 747     unsigned new_size, new_allocated_size;
 748
 749     /* reallocate buffer if needed */
 750     new_size = d->pos + buf_size;
 751     new_allocated_size = d->allocated_size;
 752     if(new_size < d->pos || new_size > INT_MAX/2)
 753         return -1;
 754     while (new_size > new_allocated_size) {
 755         if (!new_allocated_size)
 756             new_allocated_size = new_size;
 757         else
 758             new_allocated_size += new_allocated_size / 2 + 1;
 759     }
 760
 761     if (new_allocated_size > d->allocated_size) {
 762         d->buffer = av_realloc(d->buffer, new_allocated_size);
 763         if(d->buffer == NULL)
 764              return AVERROR(ENOMEM);
 765         d->allocated_size = new_allocated_size;
 766     }
 767     memcpy(d->buffer + d->pos, buf, buf_size);
 768     d->pos = new_size;
 769     if (d->pos > d->size)
 770         d->size = d->pos;
 771     return buf_size;
 772 }
 773
 774 static int dyn_packet_buf_write(void *opaque, uint8_t *buf, int buf_size)
 775 {
 776     unsigned char buf1[4];
 777     int ret;
 778
 779     /* packetized write: output the header */
 780     AV_WB32(buf1, buf_size);
 781     ret= dyn_buf_write(opaque, buf1, 4);
 782     if(ret < 0)
 783         return ret;
 784
 785     /* then the data */
 786     return dyn_buf_write(opaque, buf, buf_size);
 787 }
 788
 789 static int64_t dyn_buf_seek(void *opaque, int64_t offset, int whence)
 790 {
 791     DynBuffer *d = opaque;
 792
 793     if (whence == SEEK_CUR)
 794         offset += d->pos;
 795     else if (whence == SEEK_END)
 796         offset += d->size;
 797     if (offset < 0 || offset > 0x7fffffffLL)
 798         return -1;
 799     d->pos = offset;
 800     return 0;
 801 }
 802
 803 static int url_open_dyn_buf_internal(ByteIOContext **s, int max_packet_size)
 804 {
 805     DynBuffer *d;
 806     int ret;
 807     unsigned io_buffer_size = max_packet_size ? max_packet_size : 1024;
 808
 809     if(sizeof(DynBuffer) + io_buffer_size < io_buffer_size)
 810         return -1;
 811     d = av_mallocz(sizeof(DynBuffer) + io_buffer_size);
 812     if (!d)
 813         return AVERROR(ENOMEM);
 814     *s = av_mallocz(sizeof(ByteIOContext));
 815     if(!*s) {
 816         av_free(d);
 817         return AVERROR(ENOMEM);
 818     }
 819     d->io_buffer_size = io_buffer_size;
 820     ret = init_put_byte(*s, d->io_buffer, io_buffer_size,
 821                         1, d, NULL,
 822                         max_packet_size ? dyn_packet_buf_write : dyn_buf_write,
 823                         max_packet_size ? NULL : dyn_buf_seek);
 824     if (ret == 0) {
 825         (*s)->max_packet_size = max_packet_size;
 826     } else {
 827         av_free(d);
 828         av_freep(s);
 829     }
 830     return ret;
 831 }
 832
 833 int url_open_dyn_buf(ByteIOContext **s)
 834 {
 835     return url_open_dyn_buf_internal(s, 0);
 836 }
 837
 838 int url_open_dyn_packet_buf(ByteIOContext **s, int max_packet_size)
 839 {
 840     if (max_packet_size <= 0)
 841         return -1;
 842     return url_open_dyn_buf_internal(s, max_packet_size);
 843 }
 844
 845 int url_close_dyn_buf(ByteIOContext *s, uint8_t **pbuffer)
 846 {
 847     DynBuffer *d = s->opaque;
 848     int size;
 849
 850     put_flush_packet(s);
 851
 852     *pbuffer = d->buffer;
 853     size = d->size;
 854     av_free(d);
 855     av_free(s);
 856     return size;
 857 }
 858 #endif /* CONFIG_MUXERS || CONFIG_NETWORK */