git.sesse.net Git - ffmpeg/blob - 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 "avio_internal.h"
  27 #include "internal.h"
  28 #include <stdarg.h>
  29
  30 #define IO_BUFFER_SIZE 32768
  31
  32 /**
  33  * Do seeks within this distance ahead of the current buffer by skipping
  34  * data instead of calling the protocol seek function, for seekable
  35  * protocols.
  36  */
  37 #define SHORT_SEEK_THRESHOLD 4096
  38
  39 static void fill_buffer(AVIOContext *s);
  40 #if !FF_API_URL_RESETBUF
  41 static int url_resetbuf(AVIOContext *s, int flags);
  42 #endif
  43
  44 int ffio_init_context(AVIOContext *s,
  45                   unsigned char *buffer,
  46                   int buffer_size,
  47                   int write_flag,
  48                   void *opaque,
  49                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
  50                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
  51                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
  52 {
  53     s->buffer = buffer;
  54     s->buffer_size = buffer_size;
  55     s->buf_ptr = buffer;
  56     s->opaque = opaque;
  57     url_resetbuf(s, write_flag ? URL_WRONLY : URL_RDONLY);
  58     s->write_packet = write_packet;
  59     s->read_packet = read_packet;
  60     s->seek = seek;
  61     s->pos = 0;
  62     s->must_flush = 0;
  63     s->eof_reached = 0;
  64     s->error = 0;
  65     s->is_streamed = 0;
  66     s->max_packet_size = 0;
  67     s->update_checksum= NULL;
  68     if(!read_packet && !write_flag){
  69         s->pos = buffer_size;
  70         s->buf_end = s->buffer + buffer_size;
  71     }
  72     s->read_pause = NULL;
  73     s->read_seek  = NULL;
  74     return 0;
  75 }
  76
  77 #if FF_API_OLD_AVIO
  78 int init_put_byte(AVIOContext *s,
  79                   unsigned char *buffer,
  80                   int buffer_size,
  81                   int write_flag,
  82                   void *opaque,
  83                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
  84                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
  85                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
  86 {
  87     return ffio_init_context(s, buffer, buffer_size, write_flag, opaque,
  88                                 read_packet, write_packet, seek);
  89 }
  90 AVIOContext *av_alloc_put_byte(
  91                   unsigned char *buffer,
  92                   int buffer_size,
  93                   int write_flag,
  94                   void *opaque,
  95                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
  96                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
  97                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
  98 {
  99     return avio_alloc_context(buffer, buffer_size, write_flag, opaque,
 100                               read_packet, write_packet, seek);
 101 }
 102 #endif
 103
 104 AVIOContext *avio_alloc_context(
 105                   unsigned char *buffer,
 106                   int buffer_size,
 107                   int write_flag,
 108                   void *opaque,
 109                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
 110                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
 111                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
 112 {
 113     AVIOContext *s = av_mallocz(sizeof(AVIOContext));
 114     ffio_init_context(s, buffer, buffer_size, write_flag, opaque,
 115                   read_packet, write_packet, seek);
 116     return s;
 117 }
 118
 119 static void flush_buffer(AVIOContext *s)
 120 {
 121     if (s->buf_ptr > s->buffer) {
 122         if (s->write_packet && !s->error){
 123             int ret= s->write_packet(s->opaque, s->buffer, s->buf_ptr - s->buffer);
 124             if(ret < 0){
 125                 s->error = ret;
 126             }
 127         }
 128         if(s->update_checksum){
 129             s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
 130             s->checksum_ptr= s->buffer;
 131         }
 132         s->pos += s->buf_ptr - s->buffer;
 133     }
 134     s->buf_ptr = s->buffer;
 135 }
 136
 137 void avio_w8(AVIOContext *s, int b)
 138 {
 139     *(s->buf_ptr)++ = b;
 140     if (s->buf_ptr >= s->buf_end)
 141         flush_buffer(s);
 142 }
 143
 144 void ffio_fill(AVIOContext *s, int b, int count)
 145 {
 146     while (count > 0) {
 147         int len = FFMIN(s->buf_end - s->buf_ptr, count);
 148         memset(s->buf_ptr, b, len);
 149         s->buf_ptr += len;
 150
 151         if (s->buf_ptr >= s->buf_end)
 152             flush_buffer(s);
 153
 154         count -= len;
 155     }
 156 }
 157
 158 void avio_write(AVIOContext *s, const unsigned char *buf, int size)
 159 {
 160     while (size > 0) {
 161         int len = FFMIN(s->buf_end - s->buf_ptr, 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(AVIOContext *s)
 174 {
 175     flush_buffer(s);
 176     s->must_flush = 0;
 177 }
 178
 179 int64_t avio_seek(AVIOContext *s, int64_t offset, int whence)
 180 {
 181     int64_t offset1;
 182     int64_t pos;
 183     int force = whence & AVSEEK_FORCE;
 184     whence &= ~AVSEEK_FORCE;
 185
 186     if(!s)
 187         return AVERROR(EINVAL);
 188
 189     pos = s->pos - (s->write_flag ? 0 : (s->buf_end - s->buffer));
 190
 191     if (whence != SEEK_CUR && whence != SEEK_SET)
 192         return AVERROR(EINVAL);
 193
 194     if (whence == SEEK_CUR) {
 195         offset1 = pos + (s->buf_ptr - s->buffer);
 196         if (offset == 0)
 197             return offset1;
 198         offset += offset1;
 199     }
 200     offset1 = offset - pos;
 201     if (!s->must_flush &&
 202         offset1 >= 0 && offset1 <= (s->buf_end - s->buffer)) {
 203         /* can do the seek inside the buffer */
 204         s->buf_ptr = s->buffer + offset1;
 205     } else if ((s->is_streamed ||
 206                offset1 <= s->buf_end + SHORT_SEEK_THRESHOLD - s->buffer) &&
 207                !s->write_flag && offset1 >= 0 &&
 208               (whence != SEEK_END || force)) {
 209         while(s->pos < offset && !s->eof_reached)
 210             fill_buffer(s);
 211         if (s->eof_reached)
 212             return AVERROR_EOF;
 213         s->buf_ptr = s->buf_end + offset - s->pos;
 214     } else {
 215         int64_t res;
 216
 217 #if CONFIG_MUXERS || CONFIG_NETWORK
 218         if (s->write_flag) {
 219             flush_buffer(s);
 220             s->must_flush = 1;
 221         }
 222 #endif /* CONFIG_MUXERS || CONFIG_NETWORK */
 223         if (!s->seek)
 224             return AVERROR(EPIPE);
 225         if ((res = s->seek(s->opaque, offset, SEEK_SET)) < 0)
 226             return res;
 227         if (!s->write_flag)
 228             s->buf_end = s->buffer;
 229         s->buf_ptr = s->buffer;
 230         s->pos = offset;
 231     }
 232     s->eof_reached = 0;
 233     return offset;
 234 }
 235
 236 int url_fskip(AVIOContext *s, int64_t offset)
 237 {
 238     int64_t ret = avio_seek(s, offset, SEEK_CUR);
 239     return ret < 0 ? ret : 0;
 240 }
 241
 242 int64_t url_ftell(AVIOContext *s)
 243 {
 244     return avio_seek(s, 0, SEEK_CUR);
 245 }
 246
 247 int64_t url_fsize(AVIOContext *s)
 248 {
 249     int64_t size;
 250
 251     if(!s)
 252         return AVERROR(EINVAL);
 253
 254     if (!s->seek)
 255         return AVERROR(ENOSYS);
 256     size = s->seek(s->opaque, 0, AVSEEK_SIZE);
 257     if(size<0){
 258         if ((size = s->seek(s->opaque, -1, SEEK_END)) < 0)
 259             return size;
 260         size++;
 261         s->seek(s->opaque, s->pos, SEEK_SET);
 262     }
 263     return size;
 264 }
 265
 266 int url_feof(AVIOContext *s)
 267 {
 268     if(!s)
 269         return 0;
 270     return s->eof_reached;
 271 }
 272
 273 int url_ferror(AVIOContext *s)
 274 {
 275     if(!s)
 276         return 0;
 277     return s->error;
 278 }
 279
 280 void avio_wl32(AVIOContext *s, unsigned int val)
 281 {
 282     avio_w8(s, val);
 283     avio_w8(s, val >> 8);
 284     avio_w8(s, val >> 16);
 285     avio_w8(s, val >> 24);
 286 }
 287
 288 void avio_wb32(AVIOContext *s, unsigned int val)
 289 {
 290     avio_w8(s, val >> 24);
 291     avio_w8(s, val >> 16);
 292     avio_w8(s, val >> 8);
 293     avio_w8(s, val);
 294 }
 295
 296 #if FF_API_OLD_AVIO
 297 void put_strz(AVIOContext *s, const char *str)
 298 {
 299     avio_put_str(s, str);
 300 }
 301
 302 #define GET(name, type) \
 303     type get_be ##name(AVIOContext *s) \
 304 {\
 305     return avio_rb ##name(s);\
 306 }\
 307     type get_le ##name(AVIOContext *s) \
 308 {\
 309     return avio_rl ##name(s);\
 310 }
 311
 312 GET(16, unsigned int)
 313 GET(24, unsigned int)
 314 GET(32, unsigned int)
 315 GET(64, uint64_t)
 316
 317 #undef GET
 318
 319 #define PUT(name, type ) \
 320     void put_le ##name(AVIOContext *s, type val)\
 321 {\
 322         avio_wl ##name(s, val);\
 323 }\
 324     void put_be ##name(AVIOContext *s, type val)\
 325 {\
 326         avio_wb ##name(s, val);\
 327 }
 328
 329 PUT(16, unsigned int)
 330 PUT(24, unsigned int)
 331 PUT(32, unsigned int)
 332 PUT(64, uint64_t)
 333 #undef PUT
 334
 335 int get_byte(AVIOContext *s)
 336 {
 337    return avio_r8(s);
 338 }
 339 int get_buffer(AVIOContext *s, unsigned char *buf, int size)
 340 {
 341     return avio_read(s, buf, size);
 342 }
 343 int get_partial_buffer(AVIOContext *s, unsigned char *buf, int size)
 344 {
 345     return ffio_read_partial(s, buf, size);
 346 }
 347 void put_byte(AVIOContext *s, int val)
 348 {
 349     avio_w8(s, val);
 350 }
 351 void put_buffer(AVIOContext *s, const unsigned char *buf, int size)
 352 {
 353     avio_write(s, buf, size);
 354 }
 355 void put_nbyte(AVIOContext *s, int b, int count)
 356 {
 357     ffio_fill(s, b, count);
 358 }
 359
 360 int url_fopen(AVIOContext **s, const char *filename, int flags)
 361 {
 362     return avio_open(s, filename, flags);
 363 }
 364 int url_fclose(AVIOContext *s)
 365 {
 366     return avio_close(s);
 367 }
 368 int64_t url_fseek(AVIOContext *s, int64_t offset, int whence)
 369 {
 370     return avio_seek(s, offset, whence);
 371 }
 372 #endif
 373
 374 int avio_put_str(AVIOContext *s, const char *str)
 375 {
 376     int len = 1;
 377     if (str) {
 378         len += strlen(str);
 379         avio_write(s, (const unsigned char *) str, len);
 380     } else
 381         avio_w8(s, 0);
 382     return len;
 383 }
 384
 385 int avio_put_str16le(AVIOContext *s, const char *str)
 386 {
 387     const uint8_t *q = str;
 388     int ret = 0;
 389
 390     while (*q) {
 391         uint32_t ch;
 392         uint16_t tmp;
 393
 394         GET_UTF8(ch, *q++, break;)
 395         PUT_UTF16(ch, tmp, avio_wl16(s, tmp);ret += 2;)
 396     }
 397     avio_wl16(s, 0);
 398     ret += 2;
 399     return ret;
 400 }
 401
 402 int ff_get_v_length(uint64_t val){
 403     int i=1;
 404
 405     while(val>>=7)
 406         i++;
 407
 408     return i;
 409 }
 410
 411 void ff_put_v(AVIOContext *bc, uint64_t val){
 412     int i= ff_get_v_length(val);
 413
 414     while(--i>0)
 415         avio_w8(bc, 128 | (val>>(7*i)));
 416
 417     avio_w8(bc, val&127);
 418 }
 419
 420 void avio_wl64(AVIOContext *s, uint64_t val)
 421 {
 422     avio_wl32(s, (uint32_t)(val & 0xffffffff));
 423     avio_wl32(s, (uint32_t)(val >> 32));
 424 }
 425
 426 void avio_wb64(AVIOContext *s, uint64_t val)
 427 {
 428     avio_wb32(s, (uint32_t)(val >> 32));
 429     avio_wb32(s, (uint32_t)(val & 0xffffffff));
 430 }
 431
 432 void avio_wl16(AVIOContext *s, unsigned int val)
 433 {
 434     avio_w8(s, val);
 435     avio_w8(s, val >> 8);
 436 }
 437
 438 void avio_wb16(AVIOContext *s, unsigned int val)
 439 {
 440     avio_w8(s, val >> 8);
 441     avio_w8(s, val);
 442 }
 443
 444 void avio_wl24(AVIOContext *s, unsigned int val)
 445 {
 446     avio_wl16(s, val & 0xffff);
 447     avio_w8(s, val >> 16);
 448 }
 449
 450 void avio_wb24(AVIOContext *s, unsigned int val)
 451 {
 452     avio_wb16(s, val >> 8);
 453     avio_w8(s, val);
 454 }
 455
 456 #if FF_API_OLD_AVIO
 457 void put_tag(AVIOContext *s, const char *tag)
 458 {
 459     while (*tag) {
 460         avio_w8(s, *tag++);
 461     }
 462 }
 463 #endif
 464
 465 /* Input stream */
 466
 467 static void fill_buffer(AVIOContext *s)
 468 {
 469     uint8_t *dst= !s->max_packet_size && s->buf_end - s->buffer < s->buffer_size ? s->buf_ptr : s->buffer;
 470     int len= s->buffer_size - (dst - s->buffer);
 471     int max_buffer_size = s->max_packet_size ? s->max_packet_size : IO_BUFFER_SIZE;
 472
 473     /* no need to do anything if EOF already reached */
 474     if (s->eof_reached)
 475         return;
 476
 477     if(s->update_checksum && dst == s->buffer){
 478         if(s->buf_end > s->checksum_ptr)
 479             s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_end - s->checksum_ptr);
 480         s->checksum_ptr= s->buffer;
 481     }
 482
 483     /* make buffer smaller in case it ended up large after probing */
 484     if (s->buffer_size > max_buffer_size) {
 485         url_setbufsize(s, max_buffer_size);
 486
 487         s->checksum_ptr = dst = s->buffer;
 488         len = s->buffer_size;
 489     }
 490
 491     if(s->read_packet)
 492         len = s->read_packet(s->opaque, dst, len);
 493     else
 494         len = 0;
 495     if (len <= 0) {
 496         /* do not modify buffer if EOF reached so that a seek back can
 497            be done without rereading data */
 498         s->eof_reached = 1;
 499         if(len<0)
 500             s->error= len;
 501     } else {
 502         s->pos += len;
 503         s->buf_ptr = dst;
 504         s->buf_end = dst + len;
 505     }
 506 }
 507
 508 unsigned long ff_crc04C11DB7_update(unsigned long checksum, const uint8_t *buf,
 509                                     unsigned int len)
 510 {
 511     return av_crc(av_crc_get_table(AV_CRC_32_IEEE), checksum, buf, len);
 512 }
 513
 514 unsigned long get_checksum(AVIOContext *s)
 515 {
 516     s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
 517     s->update_checksum= NULL;
 518     return s->checksum;
 519 }
 520
 521 void init_checksum(AVIOContext *s,
 522                    unsigned long (*update_checksum)(unsigned long c, const uint8_t *p, unsigned int len),
 523                    unsigned long checksum)
 524 {
 525     s->update_checksum= update_checksum;
 526     if(s->update_checksum){
 527         s->checksum= checksum;
 528         s->checksum_ptr= s->buf_ptr;
 529     }
 530 }
 531
 532 /* XXX: put an inline version */
 533 int avio_r8(AVIOContext *s)
 534 {
 535     if (s->buf_ptr >= s->buf_end)
 536         fill_buffer(s);
 537     if (s->buf_ptr < s->buf_end)
 538         return *s->buf_ptr++;
 539     return 0;
 540 }
 541
 542 int url_fgetc(AVIOContext *s)
 543 {
 544     if (s->buf_ptr >= s->buf_end)
 545         fill_buffer(s);
 546     if (s->buf_ptr < s->buf_end)
 547         return *s->buf_ptr++;
 548     return URL_EOF;
 549 }
 550
 551 int avio_read(AVIOContext *s, unsigned char *buf, int size)
 552 {
 553     int len, size1;
 554
 555     size1 = size;
 556     while (size > 0) {
 557         len = s->buf_end - s->buf_ptr;
 558         if (len > size)
 559             len = size;
 560         if (len == 0) {
 561             if(size > s->buffer_size && !s->update_checksum){
 562                 if(s->read_packet)
 563                     len = s->read_packet(s->opaque, buf, size);
 564                 if (len <= 0) {
 565                     /* do not modify buffer if EOF reached so that a seek back can
 566                     be done without rereading data */
 567                     s->eof_reached = 1;
 568                     if(len<0)
 569                         s->error= len;
 570                     break;
 571                 } else {
 572                     s->pos += len;
 573                     size -= len;
 574                     buf += len;
 575                     s->buf_ptr = s->buffer;
 576                     s->buf_end = s->buffer/* + len*/;
 577                 }
 578             }else{
 579                 fill_buffer(s);
 580                 len = s->buf_end - s->buf_ptr;
 581                 if (len == 0)
 582                     break;
 583             }
 584         } else {
 585             memcpy(buf, s->buf_ptr, len);
 586             buf += len;
 587             s->buf_ptr += len;
 588             size -= len;
 589         }
 590     }
 591     if (size1 == size) {
 592         if (url_ferror(s)) return url_ferror(s);
 593         if (url_feof(s))   return AVERROR_EOF;
 594     }
 595     return size1 - size;
 596 }
 597
 598 int ffio_read_partial(AVIOContext *s, unsigned char *buf, int size)
 599 {
 600     int len;
 601
 602     if(size<0)
 603         return -1;
 604
 605     len = s->buf_end - s->buf_ptr;
 606     if (len == 0) {
 607         fill_buffer(s);
 608         len = s->buf_end - s->buf_ptr;
 609     }
 610     if (len > size)
 611         len = size;
 612     memcpy(buf, s->buf_ptr, len);
 613     s->buf_ptr += len;
 614     if (!len) {
 615         if (url_ferror(s)) return url_ferror(s);
 616         if (url_feof(s))   return AVERROR_EOF;
 617     }
 618     return len;
 619 }
 620
 621 unsigned int avio_rl16(AVIOContext *s)
 622 {
 623     unsigned int val;
 624     val = avio_r8(s);
 625     val |= avio_r8(s) << 8;
 626     return val;
 627 }
 628
 629 unsigned int avio_rl24(AVIOContext *s)
 630 {
 631     unsigned int val;
 632     val = avio_rl16(s);
 633     val |= avio_r8(s) << 16;
 634     return val;
 635 }
 636
 637 unsigned int avio_rl32(AVIOContext *s)
 638 {
 639     unsigned int val;
 640     val = avio_rl16(s);
 641     val |= avio_rl16(s) << 16;
 642     return val;
 643 }
 644
 645 uint64_t avio_rl64(AVIOContext *s)
 646 {
 647     uint64_t val;
 648     val = (uint64_t)avio_rl32(s);
 649     val |= (uint64_t)avio_rl32(s) << 32;
 650     return val;
 651 }
 652
 653 unsigned int avio_rb16(AVIOContext *s)
 654 {
 655     unsigned int val;
 656     val = avio_r8(s) << 8;
 657     val |= avio_r8(s);
 658     return val;
 659 }
 660
 661 unsigned int avio_rb24(AVIOContext *s)
 662 {
 663     unsigned int val;
 664     val = avio_rb16(s) << 8;
 665     val |= avio_r8(s);
 666     return val;
 667 }
 668 unsigned int avio_rb32(AVIOContext *s)
 669 {
 670     unsigned int val;
 671     val = avio_rb16(s) << 16;
 672     val |= avio_rb16(s);
 673     return val;
 674 }
 675
 676 char *get_strz(AVIOContext *s, char *buf, int maxlen)
 677 {
 678     int i = 0;
 679     char c;
 680
 681     while ((c = avio_r8(s))) {
 682         if (i < maxlen-1)
 683             buf[i++] = c;
 684     }
 685
 686     buf[i] = 0; /* Ensure null terminated, but may be truncated */
 687
 688     return buf;
 689 }
 690
 691 int ff_get_line(AVIOContext *s, char *buf, int maxlen)
 692 {
 693     int i = 0;
 694     char c;
 695
 696     do {
 697         c = avio_r8(s);
 698         if (c && i < maxlen-1)
 699             buf[i++] = c;
 700     } while (c != '\n' && c);
 701
 702     buf[i] = 0;
 703     return i;
 704 }
 705
 706 #define GET_STR16(type, read) \
 707     int avio_get_str16 ##type(AVIOContext *pb, int maxlen, char *buf, int buflen)\
 708 {\
 709     char* q = buf;\
 710     int ret = 0;\
 711     while (ret + 1 < maxlen) {\
 712         uint8_t tmp;\
 713         uint32_t ch;\
 714         GET_UTF16(ch, (ret += 2) <= maxlen ? read(pb) : 0, break;)\
 715         if (!ch)\
 716             break;\
 717         PUT_UTF8(ch, tmp, if (q - buf < buflen - 1) *q++ = tmp;)\
 718     }\
 719     *q = 0;\
 720     return ret;\
 721 }\
 722
 723 GET_STR16(le, avio_rl16)
 724 GET_STR16(be, avio_rb16)
 725
 726 #undef GET_STR16
 727
 728 uint64_t avio_rb64(AVIOContext *s)
 729 {
 730     uint64_t val;
 731     val = (uint64_t)avio_rb32(s) << 32;
 732     val |= (uint64_t)avio_rb32(s);
 733     return val;
 734 }
 735
 736 uint64_t ff_get_v(AVIOContext *bc){
 737     uint64_t val = 0;
 738     int tmp;
 739
 740     do{
 741         tmp = avio_r8(bc);
 742         val= (val<<7) + (tmp&127);
 743     }while(tmp&128);
 744     return val;
 745 }
 746
 747 int url_fdopen(AVIOContext **s, URLContext *h)
 748 {
 749     uint8_t *buffer;
 750     int buffer_size, max_packet_size;
 751
 752     max_packet_size = url_get_max_packet_size(h);
 753     if (max_packet_size) {
 754         buffer_size = max_packet_size; /* no need to bufferize more than one packet */
 755     } else {
 756         buffer_size = IO_BUFFER_SIZE;
 757     }
 758     buffer = av_malloc(buffer_size);
 759     if (!buffer)
 760         return AVERROR(ENOMEM);
 761
 762     *s = av_mallocz(sizeof(AVIOContext));
 763     if(!*s) {
 764         av_free(buffer);
 765         return AVERROR(ENOMEM);
 766     }
 767
 768     if (ffio_init_context(*s, buffer, buffer_size,
 769                       (h->flags & URL_WRONLY || h->flags & URL_RDWR), h,
 770                       url_read, url_write, url_seek) < 0) {
 771         av_free(buffer);
 772         av_freep(s);
 773         return AVERROR(EIO);
 774     }
 775     (*s)->is_streamed = h->is_streamed;
 776     (*s)->max_packet_size = max_packet_size;
 777     if(h->prot) {
 778         (*s)->read_pause = (int (*)(void *, int))h->prot->url_read_pause;
 779         (*s)->read_seek  = (int64_t (*)(void *, int, int64_t, int))h->prot->url_read_seek;
 780     }
 781     return 0;
 782 }
 783
 784 int url_setbufsize(AVIOContext *s, int buf_size)
 785 {
 786     uint8_t *buffer;
 787     buffer = av_malloc(buf_size);
 788     if (!buffer)
 789         return AVERROR(ENOMEM);
 790
 791     av_free(s->buffer);
 792     s->buffer = buffer;
 793     s->buffer_size = buf_size;
 794     s->buf_ptr = buffer;
 795     url_resetbuf(s, s->write_flag ? URL_WRONLY : URL_RDONLY);
 796     return 0;
 797 }
 798
 799 #if FF_API_URL_RESETBUF
 800 int url_resetbuf(AVIOContext *s, int flags)
 801 #else
 802 static int url_resetbuf(AVIOContext *s, int flags)
 803 #endif
 804 {
 805 #if FF_API_URL_RESETBUF
 806     if (flags & URL_RDWR)
 807         return AVERROR(EINVAL);
 808 #else
 809     assert(flags == URL_WRONLY || flags == URL_RDONLY);
 810 #endif
 811
 812     if (flags & URL_WRONLY) {
 813         s->buf_end = s->buffer + s->buffer_size;
 814         s->write_flag = 1;
 815     } else {
 816         s->buf_end = s->buffer;
 817         s->write_flag = 0;
 818     }
 819     return 0;
 820 }
 821
 822 int ff_rewind_with_probe_data(AVIOContext *s, unsigned char *buf, int buf_size)
 823 {
 824     int64_t buffer_start;
 825     int buffer_size;
 826     int overlap, new_size, alloc_size;
 827
 828     if (s->write_flag)
 829         return AVERROR(EINVAL);
 830
 831     buffer_size = s->buf_end - s->buffer;
 832
 833     /* the buffers must touch or overlap */
 834     if ((buffer_start = s->pos - buffer_size) > buf_size)
 835         return AVERROR(EINVAL);
 836
 837     overlap = buf_size - buffer_start;
 838     new_size = buf_size + buffer_size - overlap;
 839
 840     alloc_size = FFMAX(s->buffer_size, new_size);
 841     if (alloc_size > buf_size)
 842         if (!(buf = av_realloc(buf, alloc_size)))
 843             return AVERROR(ENOMEM);
 844
 845     if (new_size > buf_size) {
 846         memcpy(buf + buf_size, s->buffer + overlap, buffer_size - overlap);
 847         buf_size = new_size;
 848     }
 849
 850     av_free(s->buffer);
 851     s->buf_ptr = s->buffer = buf;
 852     s->buffer_size = alloc_size;
 853     s->pos = buf_size;
 854     s->buf_end = s->buf_ptr + buf_size;
 855     s->eof_reached = 0;
 856     s->must_flush = 0;
 857
 858     return 0;
 859 }
 860
 861 int avio_open(AVIOContext **s, const char *filename, int flags)
 862 {
 863     URLContext *h;
 864     int err;
 865
 866     err = url_open(&h, filename, flags);
 867     if (err < 0)
 868         return err;
 869     err = url_fdopen(s, h);
 870     if (err < 0) {
 871         url_close(h);
 872         return err;
 873     }
 874     return 0;
 875 }
 876
 877 int avio_close(AVIOContext *s)
 878 {
 879     URLContext *h = s->opaque;
 880
 881     av_free(s->buffer);
 882     av_free(s);
 883     return url_close(h);
 884 }
 885
 886 URLContext *url_fileno(AVIOContext *s)
 887 {
 888     return s->opaque;
 889 }
 890
 891 #if CONFIG_MUXERS
 892 int url_fprintf(AVIOContext *s, const char *fmt, ...)
 893 {
 894     va_list ap;
 895     char buf[4096];
 896     int ret;
 897
 898     va_start(ap, fmt);
 899     ret = vsnprintf(buf, sizeof(buf), fmt, ap);
 900     va_end(ap);
 901     avio_write(s, buf, strlen(buf));
 902     return ret;
 903 }
 904 #endif //CONFIG_MUXERS
 905
 906 char *url_fgets(AVIOContext *s, char *buf, int buf_size)
 907 {
 908     int c;
 909     char *q;
 910
 911     c = url_fgetc(s);
 912     if (c == EOF)
 913         return NULL;
 914     q = buf;
 915     for(;;) {
 916         if (c == EOF || c == '\n')
 917             break;
 918         if ((q - buf) < buf_size - 1)
 919             *q++ = c;
 920         c = url_fgetc(s);
 921     }
 922     if (buf_size > 0)
 923         *q = '\0';
 924     return buf;
 925 }
 926
 927 int url_fget_max_packet_size(AVIOContext *s)
 928 {
 929     return s->max_packet_size;
 930 }
 931
 932 int av_url_read_fpause(AVIOContext *s, int pause)
 933 {
 934     if (!s->read_pause)
 935         return AVERROR(ENOSYS);
 936     return s->read_pause(s->opaque, pause);
 937 }
 938
 939 int64_t av_url_read_fseek(AVIOContext *s, int stream_index,
 940                           int64_t timestamp, int flags)
 941 {
 942     URLContext *h = s->opaque;
 943     int64_t ret;
 944     if (!s->read_seek)
 945         return AVERROR(ENOSYS);
 946     ret = s->read_seek(h, stream_index, timestamp, flags);
 947     if(ret >= 0) {
 948         int64_t pos;
 949         s->buf_ptr = s->buf_end; // Flush buffer
 950         pos = s->seek(h, 0, SEEK_CUR);
 951         if (pos >= 0)
 952             s->pos = pos;
 953         else if (pos != AVERROR(ENOSYS))
 954             ret = pos;
 955     }
 956     return ret;
 957 }
 958
 959 /* url_open_dyn_buf and url_close_dyn_buf are used in rtp.c to send a response
 960  * back to the server even if CONFIG_MUXERS is false. */
 961 #if CONFIG_MUXERS || CONFIG_NETWORK
 962 /* buffer handling */
 963 int url_open_buf(AVIOContext **s, uint8_t *buf, int buf_size, int flags)
 964 {
 965     int ret;
 966     *s = av_mallocz(sizeof(AVIOContext));
 967     if(!*s)
 968         return AVERROR(ENOMEM);
 969     ret = ffio_init_context(*s, buf, buf_size,
 970                         (flags & URL_WRONLY || flags & URL_RDWR),
 971                         NULL, NULL, NULL, NULL);
 972     if(ret != 0)
 973         av_freep(s);
 974     return ret;
 975 }
 976
 977 int url_close_buf(AVIOContext *s)
 978 {
 979     put_flush_packet(s);
 980     return s->buf_ptr - s->buffer;
 981 }
 982
 983 /* output in a dynamic buffer */
 984
 985 typedef struct DynBuffer {
 986     int pos, size, allocated_size;
 987     uint8_t *buffer;
 988     int io_buffer_size;
 989     uint8_t io_buffer[1];
 990 } DynBuffer;
 991
 992 static int dyn_buf_write(void *opaque, uint8_t *buf, int buf_size)
 993 {
 994     DynBuffer *d = opaque;
 995     unsigned new_size, new_allocated_size;
 996
 997     /* reallocate buffer if needed */
 998     new_size = d->pos + buf_size;
 999     new_allocated_size = d->allocated_size;
1000     if(new_size < d->pos || new_size > INT_MAX/2)
1001         return -1;
1002     while (new_size > new_allocated_size) {
1003         if (!new_allocated_size)
1004             new_allocated_size = new_size;
1005         else
1006             new_allocated_size += new_allocated_size / 2 + 1;
1007     }
1008
1009     if (new_allocated_size > d->allocated_size) {
1010         d->buffer = av_realloc(d->buffer, new_allocated_size);
1011         if(d->buffer == NULL)
1012              return AVERROR(ENOMEM);
1013         d->allocated_size = new_allocated_size;
1014     }
1015     memcpy(d->buffer + d->pos, buf, buf_size);
1016     d->pos = new_size;
1017     if (d->pos > d->size)
1018         d->size = d->pos;
1019     return buf_size;
1020 }
1021
1022 static int dyn_packet_buf_write(void *opaque, uint8_t *buf, int buf_size)
1023 {
1024     unsigned char buf1[4];
1025     int ret;
1026
1027     /* packetized write: output the header */
1028     AV_WB32(buf1, buf_size);
1029     ret= dyn_buf_write(opaque, buf1, 4);
1030     if(ret < 0)
1031         return ret;
1032
1033     /* then the data */
1034     return dyn_buf_write(opaque, buf, buf_size);
1035 }
1036
1037 static int64_t dyn_buf_seek(void *opaque, int64_t offset, int whence)
1038 {
1039     DynBuffer *d = opaque;
1040
1041     if (whence == SEEK_CUR)
1042         offset += d->pos;
1043     else if (whence == SEEK_END)
1044         offset += d->size;
1045     if (offset < 0 || offset > 0x7fffffffLL)
1046         return -1;
1047     d->pos = offset;
1048     return 0;
1049 }
1050
1051 static int url_open_dyn_buf_internal(AVIOContext **s, int max_packet_size)
1052 {
1053     DynBuffer *d;
1054     int ret;
1055     unsigned io_buffer_size = max_packet_size ? max_packet_size : 1024;
1056
1057     if(sizeof(DynBuffer) + io_buffer_size < io_buffer_size)
1058         return -1;
1059     d = av_mallocz(sizeof(DynBuffer) + io_buffer_size);
1060     if (!d)
1061         return AVERROR(ENOMEM);
1062     *s = av_mallocz(sizeof(AVIOContext));
1063     if(!*s) {
1064         av_free(d);
1065         return AVERROR(ENOMEM);
1066     }
1067     d->io_buffer_size = io_buffer_size;
1068     ret = ffio_init_context(*s, d->io_buffer, io_buffer_size,
1069                         1, d, NULL,
1070                         max_packet_size ? dyn_packet_buf_write : dyn_buf_write,
1071                         max_packet_size ? NULL : dyn_buf_seek);
1072     if (ret == 0) {
1073         (*s)->max_packet_size = max_packet_size;
1074     } else {
1075         av_free(d);
1076         av_freep(s);
1077     }
1078     return ret;
1079 }
1080
1081 int url_open_dyn_buf(AVIOContext **s)
1082 {
1083     return url_open_dyn_buf_internal(s, 0);
1084 }
1085
1086 int url_open_dyn_packet_buf(AVIOContext **s, int max_packet_size)
1087 {
1088     if (max_packet_size <= 0)
1089         return -1;
1090     return url_open_dyn_buf_internal(s, max_packet_size);
1091 }
1092
1093 int url_close_dyn_buf(AVIOContext *s, uint8_t **pbuffer)
1094 {
1095     DynBuffer *d = s->opaque;
1096     int size;
1097     static const char padbuf[FF_INPUT_BUFFER_PADDING_SIZE] = {0};
1098     int padding = 0;
1099
1100     /* don't attempt to pad fixed-size packet buffers */
1101     if (!s->max_packet_size) {
1102         avio_write(s, padbuf, sizeof(padbuf));
1103         padding = FF_INPUT_BUFFER_PADDING_SIZE;
1104     }
1105
1106     put_flush_packet(s);
1107
1108     *pbuffer = d->buffer;
1109     size = d->size;
1110     av_free(d);
1111     av_free(s);
1112     return size - padding;
1113 }
1114 #endif /* CONFIG_MUXERS || CONFIG_NETWORK */