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