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