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