Merge remote-tracking branch 'qatar/master'
[ffmpeg.git] / 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     /* no need to do anything if EOF already reached */
578     if (s->eof_reached)
579         return;
580
581     if(s->update_checksum && dst == s->buffer){
582         if(s->buf_end > s->checksum_ptr)
583             s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_end - s->checksum_ptr);
584         s->checksum_ptr= s->buffer;
585     }
586
587     /* make buffer smaller in case it ended up large after probing */
588     if (s->read_packet && s->buffer_size > max_buffer_size) {
589         ffio_set_buf_size(s, max_buffer_size);
590
591         s->checksum_ptr = dst = s->buffer;
592         len = s->buffer_size;
593     }
594
595     if(s->read_packet)
596         len = s->read_packet(s->opaque, dst, len);
597     else
598         len = 0;
599     if (len <= 0) {
600         /* do not modify buffer if EOF reached so that a seek back can
601            be done without rereading data */
602         s->eof_reached = 1;
603         if(len<0)
604             s->error= len;
605     } else {
606         s->pos += len;
607         s->buf_ptr = dst;
608         s->buf_end = dst + len;
609     }
610 }
611
612 unsigned long ff_crc04C11DB7_update(unsigned long checksum, const uint8_t *buf,
613                                     unsigned int len)
614 {
615     return av_crc(av_crc_get_table(AV_CRC_32_IEEE), checksum, buf, len);
616 }
617
618 unsigned long ffio_get_checksum(AVIOContext *s)
619 {
620     s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
621     s->update_checksum= NULL;
622     return s->checksum;
623 }
624
625 void ffio_init_checksum(AVIOContext *s,
626                    unsigned long (*update_checksum)(unsigned long c, const uint8_t *p, unsigned int len),
627                    unsigned long checksum)
628 {
629     s->update_checksum= update_checksum;
630     if(s->update_checksum){
631         s->checksum= checksum;
632         s->checksum_ptr= s->buf_ptr;
633     }
634 }
635
636 /* XXX: put an inline version */
637 int avio_r8(AVIOContext *s)
638 {
639     if (s->buf_ptr >= s->buf_end)
640         fill_buffer(s);
641     if (s->buf_ptr < s->buf_end)
642         return *s->buf_ptr++;
643     return 0;
644 }
645
646 #if FF_API_OLD_AVIO
647 int url_fgetc(AVIOContext *s)
648 {
649     if (s->buf_ptr >= s->buf_end)
650         fill_buffer(s);
651     if (s->buf_ptr < s->buf_end)
652         return *s->buf_ptr++;
653     return URL_EOF;
654 }
655 #endif
656
657 int avio_read(AVIOContext *s, unsigned char *buf, int size)
658 {
659     int len, size1;
660
661     size1 = size;
662     while (size > 0) {
663         len = s->buf_end - s->buf_ptr;
664         if (len > size)
665             len = size;
666         if (len == 0) {
667             if(size > s->buffer_size && !s->update_checksum){
668                 if(s->read_packet)
669                     len = s->read_packet(s->opaque, buf, size);
670                 if (len <= 0) {
671                     /* do not modify buffer if EOF reached so that a seek back can
672                     be done without rereading data */
673                     s->eof_reached = 1;
674                     if(len<0)
675                         s->error= len;
676                     break;
677                 } else {
678                     s->pos += len;
679                     size -= len;
680                     buf += len;
681                     s->buf_ptr = s->buffer;
682                     s->buf_end = s->buffer/* + len*/;
683                 }
684             }else{
685                 fill_buffer(s);
686                 len = s->buf_end - s->buf_ptr;
687                 if (len == 0)
688                     break;
689             }
690         } else {
691             memcpy(buf, s->buf_ptr, len);
692             buf += len;
693             s->buf_ptr += len;
694             size -= len;
695         }
696     }
697     if (size1 == size) {
698         if (s->error)      return s->error;
699         if (url_feof(s))   return AVERROR_EOF;
700     }
701     return size1 - size;
702 }
703
704 int ffio_read_partial(AVIOContext *s, unsigned char *buf, int size)
705 {
706     int len;
707
708     if(size<0)
709         return -1;
710
711     len = s->buf_end - s->buf_ptr;
712     if (len == 0) {
713         fill_buffer(s);
714         len = s->buf_end - s->buf_ptr;
715     }
716     if (len > size)
717         len = size;
718     memcpy(buf, s->buf_ptr, len);
719     s->buf_ptr += len;
720     if (!len) {
721         if (s->error)      return s->error;
722         if (url_feof(s))   return AVERROR_EOF;
723     }
724     return len;
725 }
726
727 unsigned int avio_rl16(AVIOContext *s)
728 {
729     unsigned int val;
730     val = avio_r8(s);
731     val |= avio_r8(s) << 8;
732     return val;
733 }
734
735 unsigned int avio_rl24(AVIOContext *s)
736 {
737     unsigned int val;
738     val = avio_rl16(s);
739     val |= avio_r8(s) << 16;
740     return val;
741 }
742
743 unsigned int avio_rl32(AVIOContext *s)
744 {
745     unsigned int val;
746     val = avio_rl16(s);
747     val |= avio_rl16(s) << 16;
748     return val;
749 }
750
751 uint64_t avio_rl64(AVIOContext *s)
752 {
753     uint64_t val;
754     val = (uint64_t)avio_rl32(s);
755     val |= (uint64_t)avio_rl32(s) << 32;
756     return val;
757 }
758
759 unsigned int avio_rb16(AVIOContext *s)
760 {
761     unsigned int val;
762     val = avio_r8(s) << 8;
763     val |= avio_r8(s);
764     return val;
765 }
766
767 unsigned int avio_rb24(AVIOContext *s)
768 {
769     unsigned int val;
770     val = avio_rb16(s) << 8;
771     val |= avio_r8(s);
772     return val;
773 }
774 unsigned int avio_rb32(AVIOContext *s)
775 {
776     unsigned int val;
777     val = avio_rb16(s) << 16;
778     val |= avio_rb16(s);
779     return val;
780 }
781
782 #if FF_API_OLD_AVIO
783 char *get_strz(AVIOContext *s, char *buf, int maxlen)
784 {
785     avio_get_str(s, INT_MAX, buf, maxlen);
786     return buf;
787 }
788 #endif
789
790 int ff_get_line(AVIOContext *s, char *buf, int maxlen)
791 {
792     int i = 0;
793     char c;
794
795     do {
796         c = avio_r8(s);
797         if (c && i < maxlen-1)
798             buf[i++] = c;
799     } while (c != '\n' && c);
800
801     buf[i] = 0;
802     return i;
803 }
804
805 int avio_get_str(AVIOContext *s, int maxlen, char *buf, int buflen)
806 {
807     int i;
808
809     if (buflen <= 0)
810         return AVERROR(EINVAL);
811     // reserve 1 byte for terminating 0
812     buflen = FFMIN(buflen - 1, maxlen);
813     for (i = 0; i < buflen; i++)
814         if (!(buf[i] = avio_r8(s)))
815             return i + 1;
816     buf[i] = 0;
817     for (; i < maxlen; i++)
818         if (!avio_r8(s))
819             return i + 1;
820     return maxlen;
821 }
822
823 #define GET_STR16(type, read) \
824     int avio_get_str16 ##type(AVIOContext *pb, int maxlen, char *buf, int buflen)\
825 {\
826     char* q = buf;\
827     int ret = 0;\
828     if (buflen <= 0) \
829         return AVERROR(EINVAL); \
830     while (ret + 1 < maxlen) {\
831         uint8_t tmp;\
832         uint32_t ch;\
833         GET_UTF16(ch, (ret += 2) <= maxlen ? read(pb) : 0, break;)\
834         if (!ch)\
835             break;\
836         PUT_UTF8(ch, tmp, if (q - buf < buflen - 1) *q++ = tmp;)\
837     }\
838     *q = 0;\
839     return ret;\
840 }\
841
842 GET_STR16(le, avio_rl16)
843 GET_STR16(be, avio_rb16)
844
845 #undef GET_STR16
846
847 uint64_t avio_rb64(AVIOContext *s)
848 {
849     uint64_t val;
850     val = (uint64_t)avio_rb32(s) << 32;
851     val |= (uint64_t)avio_rb32(s);
852     return val;
853 }
854
855 uint64_t ffio_read_varlen(AVIOContext *bc){
856     uint64_t val = 0;
857     int tmp;
858
859     do{
860         tmp = avio_r8(bc);
861         val= (val<<7) + (tmp&127);
862     }while(tmp&128);
863     return val;
864 }
865
866 int ffio_fdopen(AVIOContext **s, URLContext *h)
867 {
868     uint8_t *buffer;
869     int buffer_size, max_packet_size;
870
871     max_packet_size = h->max_packet_size;
872     if (max_packet_size) {
873         buffer_size = max_packet_size; /* no need to bufferize more than one packet */
874     } else {
875         buffer_size = IO_BUFFER_SIZE;
876     }
877     buffer = av_malloc(buffer_size);
878     if (!buffer)
879         return AVERROR(ENOMEM);
880
881     *s = avio_alloc_context(buffer, buffer_size, h->flags & AVIO_FLAG_WRITE, h,
882                             ffurl_read, ffurl_write, ffurl_seek);
883     if (!*s) {
884         av_free(buffer);
885         return AVERROR(ENOMEM);
886     }
887
888 #if FF_API_OLD_AVIO
889     (*s)->is_streamed = h->is_streamed;
890 #endif
891     (*s)->seekable = h->is_streamed ? 0 : AVIO_SEEKABLE_NORMAL;
892     (*s)->max_packet_size = max_packet_size;
893     if(h->prot) {
894         (*s)->read_pause = (int (*)(void *, int))h->prot->url_read_pause;
895         (*s)->read_seek  = (int64_t (*)(void *, int, int64_t, int))h->prot->url_read_seek;
896     }
897 #if !FF_API_OLD_AVIO
898     (*s)->av_class = &ffio_url_class;
899 #endif
900     return 0;
901 }
902
903 int ffio_set_buf_size(AVIOContext *s, int buf_size)
904 {
905     uint8_t *buffer;
906     buffer = av_malloc(buf_size);
907     if (!buffer)
908         return AVERROR(ENOMEM);
909
910     av_free(s->buffer);
911     s->buffer = buffer;
912     s->buffer_size = buf_size;
913     s->buf_ptr = buffer;
914     url_resetbuf(s, s->write_flag ? AVIO_FLAG_WRITE : AVIO_FLAG_READ);
915     return 0;
916 }
917
918 static int url_resetbuf(AVIOContext *s, int flags)
919 {
920     assert(flags == AVIO_FLAG_WRITE || flags == AVIO_FLAG_READ);
921
922     if (flags & AVIO_FLAG_WRITE) {
923         s->buf_end = s->buffer + s->buffer_size;
924         s->write_flag = 1;
925     } else {
926         s->buf_end = s->buffer;
927         s->write_flag = 0;
928     }
929     return 0;
930 }
931
932 int ffio_rewind_with_probe_data(AVIOContext *s, unsigned char *buf, int buf_size)
933 {
934     int64_t buffer_start;
935     int buffer_size;
936     int overlap, new_size, alloc_size;
937
938     if (s->write_flag)
939         return AVERROR(EINVAL);
940
941     buffer_size = s->buf_end - s->buffer;
942
943     /* the buffers must touch or overlap */
944     if ((buffer_start = s->pos - buffer_size) > buf_size)
945         return AVERROR(EINVAL);
946
947     overlap = buf_size - buffer_start;
948     new_size = buf_size + buffer_size - overlap;
949
950     alloc_size = FFMAX(s->buffer_size, new_size);
951     if (alloc_size > buf_size)
952         if (!(buf = av_realloc_f(buf, 1, alloc_size)))
953             return AVERROR(ENOMEM);
954
955     if (new_size > buf_size) {
956         memcpy(buf + buf_size, s->buffer + overlap, buffer_size - overlap);
957         buf_size = new_size;
958     }
959
960     av_free(s->buffer);
961     s->buf_ptr = s->buffer = buf;
962     s->buffer_size = alloc_size;
963     s->pos = buf_size;
964     s->buf_end = s->buf_ptr + buf_size;
965     s->eof_reached = 0;
966     s->must_flush = 0;
967
968     return 0;
969 }
970
971 int avio_open(AVIOContext **s, const char *filename, int flags)
972 {
973     return avio_open2(s, filename, flags, NULL, NULL);
974 }
975
976 int avio_open2(AVIOContext **s, const char *filename, int flags,
977                const AVIOInterruptCB *int_cb, AVDictionary **options)
978 {
979     URLContext *h;
980     int err;
981
982     err = ffurl_open(&h, filename, flags, int_cb, options);
983     if (err < 0)
984         return err;
985     err = ffio_fdopen(s, h);
986     if (err < 0) {
987         ffurl_close(h);
988         return err;
989     }
990     return 0;
991 }
992
993 int avio_close(AVIOContext *s)
994 {
995     URLContext *h = s->opaque;
996
997     av_free(s->buffer);
998     av_free(s);
999     return ffurl_close(h);
1000 }
1001
1002 #if FF_API_OLD_AVIO
1003 URLContext *url_fileno(AVIOContext *s)
1004 {
1005     return s->opaque;
1006 }
1007 #endif
1008
1009 int avio_printf(AVIOContext *s, const char *fmt, ...)
1010 {
1011     va_list ap;
1012     char buf[4096];
1013     int ret;
1014
1015     va_start(ap, fmt);
1016     ret = vsnprintf(buf, sizeof(buf), fmt, ap);
1017     va_end(ap);
1018     avio_write(s, buf, strlen(buf));
1019     return ret;
1020 }
1021
1022 #if FF_API_OLD_AVIO
1023 char *url_fgets(AVIOContext *s, char *buf, int buf_size)
1024 {
1025     int c;
1026     char *q;
1027
1028     c = avio_r8(s);
1029     if (url_feof(s))
1030         return NULL;
1031     q = buf;
1032     for(;;) {
1033         if (url_feof(s) || c == '\n')
1034             break;
1035         if ((q - buf) < buf_size - 1)
1036             *q++ = c;
1037         c = avio_r8(s);
1038     }
1039     if (buf_size > 0)
1040         *q = '\0';
1041     return buf;
1042 }
1043
1044 int url_fget_max_packet_size(AVIOContext *s)
1045 {
1046     return s->max_packet_size;
1047 }
1048 #endif
1049
1050 int avio_pause(AVIOContext *s, int pause)
1051 {
1052     if (!s->read_pause)
1053         return AVERROR(ENOSYS);
1054     return s->read_pause(s->opaque, pause);
1055 }
1056
1057 int64_t avio_seek_time(AVIOContext *s, int stream_index,
1058                        int64_t timestamp, int flags)
1059 {
1060     URLContext *h = s->opaque;
1061     int64_t ret;
1062     if (!s->read_seek)
1063         return AVERROR(ENOSYS);
1064     ret = s->read_seek(h, stream_index, timestamp, flags);
1065     if(ret >= 0) {
1066         int64_t pos;
1067         s->buf_ptr = s->buf_end; // Flush buffer
1068         pos = s->seek(h, 0, SEEK_CUR);
1069         if (pos >= 0)
1070             s->pos = pos;
1071         else if (pos != AVERROR(ENOSYS))
1072             ret = pos;
1073     }
1074     return ret;
1075 }
1076
1077 /* buffer handling */
1078 #if FF_API_OLD_AVIO
1079 int url_open_buf(AVIOContext **s, uint8_t *buf, int buf_size, int flags)
1080 {
1081     int ret;
1082     *s = av_mallocz(sizeof(AVIOContext));
1083     if(!*s)
1084         return AVERROR(ENOMEM);
1085     ret = ffio_init_context(*s, buf, buf_size,
1086                             flags & AVIO_FLAG_WRITE,
1087                         NULL, NULL, NULL, NULL);
1088     if(ret != 0)
1089         av_freep(s);
1090     return ret;
1091 }
1092
1093 int url_close_buf(AVIOContext *s)
1094 {
1095     avio_flush(s);
1096     return s->buf_ptr - s->buffer;
1097 }
1098 #endif
1099
1100 /* output in a dynamic buffer */
1101
1102 typedef struct DynBuffer {
1103     int pos, size, allocated_size;
1104     uint8_t *buffer;
1105     int io_buffer_size;
1106     uint8_t io_buffer[1];
1107 } DynBuffer;
1108
1109 static int dyn_buf_write(void *opaque, uint8_t *buf, int buf_size)
1110 {
1111     DynBuffer *d = opaque;
1112     unsigned new_size, new_allocated_size;
1113
1114     /* reallocate buffer if needed */
1115     new_size = d->pos + buf_size;
1116     new_allocated_size = d->allocated_size;
1117     if(new_size < d->pos || new_size > INT_MAX/2)
1118         return -1;
1119     while (new_size > new_allocated_size) {
1120         if (!new_allocated_size)
1121             new_allocated_size = new_size;
1122         else
1123             new_allocated_size += new_allocated_size / 2 + 1;
1124     }
1125
1126     if (new_allocated_size > d->allocated_size) {
1127         d->buffer = av_realloc_f(d->buffer, 1, new_allocated_size);
1128         if(d->buffer == NULL)
1129              return AVERROR(ENOMEM);
1130         d->allocated_size = new_allocated_size;
1131     }
1132     memcpy(d->buffer + d->pos, buf, buf_size);
1133     d->pos = new_size;
1134     if (d->pos > d->size)
1135         d->size = d->pos;
1136     return buf_size;
1137 }
1138
1139 static int dyn_packet_buf_write(void *opaque, uint8_t *buf, int buf_size)
1140 {
1141     unsigned char buf1[4];
1142     int ret;
1143
1144     /* packetized write: output the header */
1145     AV_WB32(buf1, buf_size);
1146     ret= dyn_buf_write(opaque, buf1, 4);
1147     if(ret < 0)
1148         return ret;
1149
1150     /* then the data */
1151     return dyn_buf_write(opaque, buf, buf_size);
1152 }
1153
1154 static int64_t dyn_buf_seek(void *opaque, int64_t offset, int whence)
1155 {
1156     DynBuffer *d = opaque;
1157
1158     if (whence == SEEK_CUR)
1159         offset += d->pos;
1160     else if (whence == SEEK_END)
1161         offset += d->size;
1162     if (offset < 0 || offset > 0x7fffffffLL)
1163         return -1;
1164     d->pos = offset;
1165     return 0;
1166 }
1167
1168 static int url_open_dyn_buf_internal(AVIOContext **s, int max_packet_size)
1169 {
1170     DynBuffer *d;
1171     unsigned io_buffer_size = max_packet_size ? max_packet_size : 1024;
1172
1173     if(sizeof(DynBuffer) + io_buffer_size < io_buffer_size)
1174         return -1;
1175     d = av_mallocz(sizeof(DynBuffer) + io_buffer_size);
1176     if (!d)
1177         return AVERROR(ENOMEM);
1178     d->io_buffer_size = io_buffer_size;
1179     *s = avio_alloc_context(d->io_buffer, d->io_buffer_size, 1, d, NULL,
1180                             max_packet_size ? dyn_packet_buf_write : dyn_buf_write,
1181                             max_packet_size ? NULL : dyn_buf_seek);
1182     if(!*s) {
1183         av_free(d);
1184         return AVERROR(ENOMEM);
1185     }
1186     (*s)->max_packet_size = max_packet_size;
1187     return 0;
1188 }
1189
1190 int avio_open_dyn_buf(AVIOContext **s)
1191 {
1192     return url_open_dyn_buf_internal(s, 0);
1193 }
1194
1195 int ffio_open_dyn_packet_buf(AVIOContext **s, int max_packet_size)
1196 {
1197     if (max_packet_size <= 0)
1198         return -1;
1199     return url_open_dyn_buf_internal(s, max_packet_size);
1200 }
1201
1202 int avio_close_dyn_buf(AVIOContext *s, uint8_t **pbuffer)
1203 {
1204     DynBuffer *d = s->opaque;
1205     int size;
1206     static const char padbuf[FF_INPUT_BUFFER_PADDING_SIZE] = {0};
1207     int padding = 0;
1208
1209     /* don't attempt to pad fixed-size packet buffers */
1210     if (!s->max_packet_size) {
1211         avio_write(s, padbuf, sizeof(padbuf));
1212         padding = FF_INPUT_BUFFER_PADDING_SIZE;
1213     }
1214
1215     avio_flush(s);
1216
1217     *pbuffer = d->buffer;
1218     size = d->size;
1219     av_free(d);
1220     av_free(s);
1221     return size - padding;
1222 }