git.sesse.net Git - ffmpeg/blob - libavformat/aviobuf.c

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