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