miscellaneous typo fixes
[ffmpeg.git] / libavformat / aviobuf.c
1 /*
2  * buffered I/O
3  * Copyright (c) 2000,2001 Fabrice Bellard
4  *
5  * This file is part of Libav.
6  *
7  * Libav 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  * Libav 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 Libav; 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 static void *ffio_url_child_next(void *obj, void *prev)
44 {
45     AVIOContext *s = obj;
46     return prev ? NULL : s->opaque;
47 }
48
49 static const AVClass *ffio_url_child_class_next(const AVClass *prev)
50 {
51     return prev ? NULL : &ffurl_context_class;
52 }
53
54 static const AVOption ffio_url_options[] = {
55     { NULL },
56 };
57
58 const AVClass ffio_url_class = {
59     .class_name = "AVIOContext",
60     .item_name  = av_default_item_name,
61     .version    = LIBAVUTIL_VERSION_INT,
62     .option     = ffio_url_options,
63     .child_next = ffio_url_child_next,
64     .child_class_next = ffio_url_child_class_next,
65 };
66
67 static void fill_buffer(AVIOContext *s);
68 static int url_resetbuf(AVIOContext *s, int flags);
69
70 int ffio_init_context(AVIOContext *s,
71                   unsigned char *buffer,
72                   int buffer_size,
73                   int write_flag,
74                   void *opaque,
75                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
76                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
77                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
78 {
79     s->buffer      = buffer;
80     s->buffer_size = buffer_size;
81     s->buf_ptr     = buffer;
82     s->opaque      = opaque;
83
84     url_resetbuf(s, write_flag ? AVIO_FLAG_WRITE : AVIO_FLAG_READ);
85
86     s->write_packet    = write_packet;
87     s->read_packet     = read_packet;
88     s->seek            = seek;
89     s->pos             = 0;
90     s->must_flush      = 0;
91     s->eof_reached     = 0;
92     s->error           = 0;
93     s->seekable        = AVIO_SEEKABLE_NORMAL;
94     s->max_packet_size = 0;
95     s->update_checksum = NULL;
96
97     if (!read_packet && !write_flag) {
98         s->pos     = buffer_size;
99         s->buf_end = s->buffer + buffer_size;
100     }
101     s->read_pause = NULL;
102     s->read_seek  = NULL;
103
104     return 0;
105 }
106
107 AVIOContext *avio_alloc_context(
108                   unsigned char *buffer,
109                   int buffer_size,
110                   int write_flag,
111                   void *opaque,
112                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
113                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
114                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
115 {
116     AVIOContext *s = av_mallocz(sizeof(AVIOContext));
117     if (!s)
118         return NULL;
119     ffio_init_context(s, buffer, buffer_size, write_flag, opaque,
120                   read_packet, write_packet, seek);
121     return s;
122 }
123
124 static void flush_buffer(AVIOContext *s)
125 {
126     if (s->buf_ptr > s->buffer) {
127         if (s->write_packet && !s->error) {
128             int ret = s->write_packet(s->opaque, s->buffer,
129                                       s->buf_ptr - s->buffer);
130             if (ret < 0) {
131                 s->error = ret;
132             }
133         }
134         if (s->update_checksum) {
135             s->checksum     = s->update_checksum(s->checksum, s->checksum_ptr,
136                                                  s->buf_ptr - s->checksum_ptr);
137             s->checksum_ptr = s->buffer;
138         }
139         s->pos += s->buf_ptr - s->buffer;
140     }
141     s->buf_ptr = s->buffer;
142 }
143
144 void avio_w8(AVIOContext *s, int b)
145 {
146     *s->buf_ptr++ = b;
147     if (s->buf_ptr >= s->buf_end)
148         flush_buffer(s);
149 }
150
151 void ffio_fill(AVIOContext *s, int b, int count)
152 {
153     while (count > 0) {
154         int len = FFMIN(s->buf_end - s->buf_ptr, count);
155         memset(s->buf_ptr, b, len);
156         s->buf_ptr += len;
157
158         if (s->buf_ptr >= s->buf_end)
159             flush_buffer(s);
160
161         count -= len;
162     }
163 }
164
165 void avio_write(AVIOContext *s, const unsigned char *buf, int size)
166 {
167     while (size > 0) {
168         int len = FFMIN(s->buf_end - s->buf_ptr, size);
169         memcpy(s->buf_ptr, buf, len);
170         s->buf_ptr += len;
171
172         if (s->buf_ptr >= s->buf_end)
173             flush_buffer(s);
174
175         buf += len;
176         size -= len;
177     }
178 }
179
180 void avio_flush(AVIOContext *s)
181 {
182     flush_buffer(s);
183     s->must_flush = 0;
184 }
185
186 int64_t avio_seek(AVIOContext *s, int64_t offset, int whence)
187 {
188     int64_t offset1;
189     int64_t pos;
190     int force = whence & AVSEEK_FORCE;
191     whence &= ~AVSEEK_FORCE;
192
193     if(!s)
194         return AVERROR(EINVAL);
195
196     pos = s->pos - (s->write_flag ? 0 : (s->buf_end - s->buffer));
197
198     if (whence != SEEK_CUR && whence != SEEK_SET)
199         return AVERROR(EINVAL);
200
201     if (whence == SEEK_CUR) {
202         offset1 = pos + (s->buf_ptr - s->buffer);
203         if (offset == 0)
204             return offset1;
205         offset += offset1;
206     }
207     offset1 = offset - pos;
208     if (!s->must_flush &&
209         offset1 >= 0 && offset1 <= (s->buf_end - s->buffer)) {
210         /* can do the seek inside the buffer */
211         s->buf_ptr = s->buffer + offset1;
212     } else if ((!s->seekable ||
213                offset1 <= s->buf_end + SHORT_SEEK_THRESHOLD - s->buffer) &&
214                !s->write_flag && offset1 >= 0 &&
215               (whence != SEEK_END || force)) {
216         while(s->pos < offset && !s->eof_reached)
217             fill_buffer(s);
218         if (s->eof_reached)
219             return AVERROR_EOF;
220         s->buf_ptr = s->buf_end + offset - s->pos;
221     } else {
222         int64_t res;
223
224         if (s->write_flag) {
225             flush_buffer(s);
226             s->must_flush = 1;
227         }
228         if (!s->seek)
229             return AVERROR(EPIPE);
230         if ((res = s->seek(s->opaque, offset, SEEK_SET)) < 0)
231             return res;
232         if (!s->write_flag)
233             s->buf_end = s->buffer;
234         s->buf_ptr = s->buffer;
235         s->pos = offset;
236     }
237     s->eof_reached = 0;
238     return offset;
239 }
240
241 int64_t avio_size(AVIOContext *s)
242 {
243     int64_t size;
244
245     if (!s)
246         return AVERROR(EINVAL);
247
248     if (!s->seek)
249         return AVERROR(ENOSYS);
250     size = s->seek(s->opaque, 0, AVSEEK_SIZE);
251     if (size < 0) {
252         if ((size = s->seek(s->opaque, -1, SEEK_END)) < 0)
253             return size;
254         size++;
255         s->seek(s->opaque, s->pos, SEEK_SET);
256     }
257     return size;
258 }
259
260 void avio_wl32(AVIOContext *s, unsigned int val)
261 {
262     avio_w8(s, val);
263     avio_w8(s, val >> 8);
264     avio_w8(s, val >> 16);
265     avio_w8(s, val >> 24);
266 }
267
268 void avio_wb32(AVIOContext *s, unsigned int val)
269 {
270     avio_w8(s, val >> 24);
271     avio_w8(s, val >> 16);
272     avio_w8(s, val >> 8);
273     avio_w8(s, val);
274 }
275
276 int avio_put_str(AVIOContext *s, const char *str)
277 {
278     int len = 1;
279     if (str) {
280         len += strlen(str);
281         avio_write(s, (const unsigned char *) str, len);
282     } else
283         avio_w8(s, 0);
284     return len;
285 }
286
287 int avio_put_str16le(AVIOContext *s, const char *str)
288 {
289     const uint8_t *q = str;
290     int ret = 0;
291
292     while (*q) {
293         uint32_t ch;
294         uint16_t tmp;
295
296         GET_UTF8(ch, *q++, break;)
297         PUT_UTF16(ch, tmp, avio_wl16(s, tmp); ret += 2;)
298     }
299     avio_wl16(s, 0);
300     ret += 2;
301     return ret;
302 }
303
304 int ff_get_v_length(uint64_t val)
305 {
306     int i = 1;
307
308     while (val >>= 7)
309         i++;
310
311     return i;
312 }
313
314 void ff_put_v(AVIOContext *bc, uint64_t val)
315 {
316     int i = ff_get_v_length(val);
317
318     while (--i > 0)
319         avio_w8(bc, 128 | (val >> (7 * i)));
320
321     avio_w8(bc, val & 127);
322 }
323
324 void avio_wl64(AVIOContext *s, uint64_t val)
325 {
326     avio_wl32(s, (uint32_t)(val & 0xffffffff));
327     avio_wl32(s, (uint32_t)(val >> 32));
328 }
329
330 void avio_wb64(AVIOContext *s, uint64_t val)
331 {
332     avio_wb32(s, (uint32_t)(val >> 32));
333     avio_wb32(s, (uint32_t)(val & 0xffffffff));
334 }
335
336 void avio_wl16(AVIOContext *s, unsigned int val)
337 {
338     avio_w8(s, val);
339     avio_w8(s, val >> 8);
340 }
341
342 void avio_wb16(AVIOContext *s, unsigned int val)
343 {
344     avio_w8(s, val >> 8);
345     avio_w8(s, val);
346 }
347
348 void avio_wl24(AVIOContext *s, unsigned int val)
349 {
350     avio_wl16(s, val & 0xffff);
351     avio_w8(s, val >> 16);
352 }
353
354 void avio_wb24(AVIOContext *s, unsigned int val)
355 {
356     avio_wb16(s, val >> 8);
357     avio_w8(s, val);
358 }
359
360 /* Input stream */
361
362 static void fill_buffer(AVIOContext *s)
363 {
364     uint8_t *dst        = !s->max_packet_size &&
365                           s->buf_end - s->buffer < s->buffer_size ?
366                           s->buf_end : s->buffer;
367     int len             = s->buffer_size - (dst - s->buffer);
368     int max_buffer_size = s->max_packet_size ?
369                           s->max_packet_size : IO_BUFFER_SIZE;
370
371     /* can't fill the buffer without read_packet, just set EOF if appropriate */
372     if (!s->read_packet && s->buf_ptr >= s->buf_end)
373         s->eof_reached = 1;
374
375     /* no need to do anything if EOF already reached */
376     if (s->eof_reached)
377         return;
378
379     if (s->update_checksum && dst == s->buffer) {
380         if (s->buf_end > s->checksum_ptr)
381             s->checksum = s->update_checksum(s->checksum, s->checksum_ptr,
382                                              s->buf_end - s->checksum_ptr);
383         s->checksum_ptr = s->buffer;
384     }
385
386     /* make buffer smaller in case it ended up large after probing */
387     if (s->buffer_size > max_buffer_size) {
388         ffio_set_buf_size(s, max_buffer_size);
389
390         s->checksum_ptr = dst = s->buffer;
391         len = s->buffer_size;
392     }
393
394     if (s->read_packet)
395         len = s->read_packet(s->opaque, dst, len);
396     else
397         len = 0;
398     if (len <= 0) {
399         /* do not modify buffer if EOF reached so that a seek back can
400            be done without rereading data */
401         s->eof_reached = 1;
402         if (len < 0)
403             s->error = len;
404     } else {
405         s->pos += len;
406         s->buf_ptr = dst;
407         s->buf_end = dst + len;
408     }
409 }
410
411 unsigned long ff_crc04C11DB7_update(unsigned long checksum, const uint8_t *buf,
412                                     unsigned int len)
413 {
414     return av_crc(av_crc_get_table(AV_CRC_32_IEEE), checksum, buf, len);
415 }
416
417 unsigned long ffio_get_checksum(AVIOContext *s)
418 {
419     s->checksum = s->update_checksum(s->checksum, s->checksum_ptr,
420                                      s->buf_ptr - s->checksum_ptr);
421     s->update_checksum = NULL;
422     return s->checksum;
423 }
424
425 void ffio_init_checksum(AVIOContext *s,
426                    unsigned long (*update_checksum)(unsigned long c, const uint8_t *p, unsigned int len),
427                    unsigned long checksum)
428 {
429     s->update_checksum = update_checksum;
430     if (s->update_checksum) {
431         s->checksum     = checksum;
432         s->checksum_ptr = s->buf_ptr;
433     }
434 }
435
436 /* XXX: put an inline version */
437 int avio_r8(AVIOContext *s)
438 {
439     if (s->buf_ptr >= s->buf_end)
440         fill_buffer(s);
441     if (s->buf_ptr < s->buf_end)
442         return *s->buf_ptr++;
443     return 0;
444 }
445
446 int avio_read(AVIOContext *s, unsigned char *buf, int size)
447 {
448     int len, size1;
449
450     size1 = size;
451     while (size > 0) {
452         len = s->buf_end - s->buf_ptr;
453         if (len > size)
454             len = size;
455         if (len == 0) {
456             if(size > s->buffer_size && !s->update_checksum){
457                 if(s->read_packet)
458                     len = s->read_packet(s->opaque, buf, size);
459                 if (len <= 0) {
460                     /* do not modify buffer if EOF reached so that a seek back can
461                     be done without rereading data */
462                     s->eof_reached = 1;
463                     if(len<0)
464                         s->error= len;
465                     break;
466                 } else {
467                     s->pos += len;
468                     size -= len;
469                     buf += len;
470                     s->buf_ptr = s->buffer;
471                     s->buf_end = s->buffer/* + len*/;
472                 }
473             } else {
474                 fill_buffer(s);
475                 len = s->buf_end - s->buf_ptr;
476                 if (len == 0)
477                     break;
478             }
479         } else {
480             memcpy(buf, s->buf_ptr, len);
481             buf += len;
482             s->buf_ptr += len;
483             size -= len;
484         }
485     }
486     if (size1 == size) {
487         if (s->error)         return s->error;
488         if (s->eof_reached)   return AVERROR_EOF;
489     }
490     return size1 - size;
491 }
492
493 int ffio_read_partial(AVIOContext *s, unsigned char *buf, int size)
494 {
495     int len;
496
497     if (size < 0)
498         return -1;
499
500     len = s->buf_end - s->buf_ptr;
501     if (len == 0) {
502         fill_buffer(s);
503         len = s->buf_end - s->buf_ptr;
504     }
505     if (len > size)
506         len = size;
507     memcpy(buf, s->buf_ptr, len);
508     s->buf_ptr += len;
509     if (!len) {
510         if (s->error)         return s->error;
511         if (s->eof_reached)   return AVERROR_EOF;
512     }
513     return len;
514 }
515
516 unsigned int avio_rl16(AVIOContext *s)
517 {
518     unsigned int val;
519     val = avio_r8(s);
520     val |= avio_r8(s) << 8;
521     return val;
522 }
523
524 unsigned int avio_rl24(AVIOContext *s)
525 {
526     unsigned int val;
527     val = avio_rl16(s);
528     val |= avio_r8(s) << 16;
529     return val;
530 }
531
532 unsigned int avio_rl32(AVIOContext *s)
533 {
534     unsigned int val;
535     val = avio_rl16(s);
536     val |= avio_rl16(s) << 16;
537     return val;
538 }
539
540 uint64_t avio_rl64(AVIOContext *s)
541 {
542     uint64_t val;
543     val = (uint64_t)avio_rl32(s);
544     val |= (uint64_t)avio_rl32(s) << 32;
545     return val;
546 }
547
548 unsigned int avio_rb16(AVIOContext *s)
549 {
550     unsigned int val;
551     val = avio_r8(s) << 8;
552     val |= avio_r8(s);
553     return val;
554 }
555
556 unsigned int avio_rb24(AVIOContext *s)
557 {
558     unsigned int val;
559     val = avio_rb16(s) << 8;
560     val |= avio_r8(s);
561     return val;
562 }
563 unsigned int avio_rb32(AVIOContext *s)
564 {
565     unsigned int val;
566     val = avio_rb16(s) << 16;
567     val |= avio_rb16(s);
568     return val;
569 }
570
571 int ff_get_line(AVIOContext *s, char *buf, int maxlen)
572 {
573     int i = 0;
574     char c;
575
576     do {
577         c = avio_r8(s);
578         if (c && i < maxlen-1)
579             buf[i++] = c;
580     } while (c != '\n' && c);
581
582     buf[i] = 0;
583     return i;
584 }
585
586 int avio_get_str(AVIOContext *s, int maxlen, char *buf, int buflen)
587 {
588     int i;
589
590     if (buflen <= 0)
591         return AVERROR(EINVAL);
592     // reserve 1 byte for terminating 0
593     buflen = FFMIN(buflen - 1, maxlen);
594     for (i = 0; i < buflen; i++)
595         if (!(buf[i] = avio_r8(s)))
596             return i + 1;
597     buf[i] = 0;
598     for (; i < maxlen; i++)
599         if (!avio_r8(s))
600             return i + 1;
601     return maxlen;
602 }
603
604 #define GET_STR16(type, read) \
605     int avio_get_str16 ##type(AVIOContext *pb, int maxlen, char *buf, int buflen)\
606 {\
607     char* q = buf;\
608     int ret = 0;\
609     if (buflen <= 0) \
610         return AVERROR(EINVAL); \
611     while (ret + 1 < maxlen) {\
612         uint8_t tmp;\
613         uint32_t ch;\
614         GET_UTF16(ch, (ret += 2) <= maxlen ? read(pb) : 0, break;)\
615         if (!ch)\
616             break;\
617         PUT_UTF8(ch, tmp, if (q - buf < buflen - 1) *q++ = tmp;)\
618     }\
619     *q = 0;\
620     return ret;\
621 }\
622
623 GET_STR16(le, avio_rl16)
624 GET_STR16(be, avio_rb16)
625
626 #undef GET_STR16
627
628 uint64_t avio_rb64(AVIOContext *s)
629 {
630     uint64_t val;
631     val = (uint64_t)avio_rb32(s) << 32;
632     val |= (uint64_t)avio_rb32(s);
633     return val;
634 }
635
636 uint64_t ffio_read_varlen(AVIOContext *bc){
637     uint64_t val = 0;
638     int tmp;
639
640     do{
641         tmp = avio_r8(bc);
642         val= (val<<7) + (tmp&127);
643     }while(tmp&128);
644     return val;
645 }
646
647 int ffio_fdopen(AVIOContext **s, URLContext *h)
648 {
649     uint8_t *buffer;
650     int buffer_size, max_packet_size;
651
652     max_packet_size = h->max_packet_size;
653     if (max_packet_size) {
654         buffer_size = max_packet_size; /* no need to bufferize more than one packet */
655     } else {
656         buffer_size = IO_BUFFER_SIZE;
657     }
658     buffer = av_malloc(buffer_size);
659     if (!buffer)
660         return AVERROR(ENOMEM);
661
662     *s = avio_alloc_context(buffer, buffer_size, h->flags & AVIO_FLAG_WRITE, h,
663                             ffurl_read, ffurl_write, ffurl_seek);
664     if (!*s) {
665         av_free(buffer);
666         return AVERROR(ENOMEM);
667     }
668     (*s)->seekable = h->is_streamed ? 0 : AVIO_SEEKABLE_NORMAL;
669     (*s)->max_packet_size = max_packet_size;
670     if(h->prot) {
671         (*s)->read_pause = (int (*)(void *, int))h->prot->url_read_pause;
672         (*s)->read_seek  = (int64_t (*)(void *, int, int64_t, int))h->prot->url_read_seek;
673     }
674     (*s)->av_class = &ffio_url_class;
675     return 0;
676 }
677
678 int ffio_set_buf_size(AVIOContext *s, int buf_size)
679 {
680     uint8_t *buffer;
681     buffer = av_malloc(buf_size);
682     if (!buffer)
683         return AVERROR(ENOMEM);
684
685     av_free(s->buffer);
686     s->buffer = buffer;
687     s->buffer_size = buf_size;
688     s->buf_ptr = buffer;
689     url_resetbuf(s, s->write_flag ? AVIO_FLAG_WRITE : AVIO_FLAG_READ);
690     return 0;
691 }
692
693 static int url_resetbuf(AVIOContext *s, int flags)
694 {
695     assert(flags == AVIO_FLAG_WRITE || flags == AVIO_FLAG_READ);
696
697     if (flags & AVIO_FLAG_WRITE) {
698         s->buf_end = s->buffer + s->buffer_size;
699         s->write_flag = 1;
700     } else {
701         s->buf_end = s->buffer;
702         s->write_flag = 0;
703     }
704     return 0;
705 }
706
707 int ffio_rewind_with_probe_data(AVIOContext *s, unsigned char *buf, int buf_size)
708 {
709     int64_t buffer_start;
710     int buffer_size;
711     int overlap, new_size, alloc_size;
712
713     if (s->write_flag)
714         return AVERROR(EINVAL);
715
716     buffer_size = s->buf_end - s->buffer;
717
718     /* the buffers must touch or overlap */
719     if ((buffer_start = s->pos - buffer_size) > buf_size)
720         return AVERROR(EINVAL);
721
722     overlap = buf_size - buffer_start;
723     new_size = buf_size + buffer_size - overlap;
724
725     alloc_size = FFMAX(s->buffer_size, new_size);
726     if (alloc_size > buf_size)
727         if (!(buf = av_realloc(buf, alloc_size)))
728             return AVERROR(ENOMEM);
729
730     if (new_size > buf_size) {
731         memcpy(buf + buf_size, s->buffer + overlap, buffer_size - overlap);
732         buf_size = new_size;
733     }
734
735     av_free(s->buffer);
736     s->buf_ptr = s->buffer = buf;
737     s->buffer_size = alloc_size;
738     s->pos = buf_size;
739     s->buf_end = s->buf_ptr + buf_size;
740     s->eof_reached = 0;
741     s->must_flush = 0;
742
743     return 0;
744 }
745
746 int avio_open(AVIOContext **s, const char *filename, int flags)
747 {
748     return avio_open2(s, filename, flags, NULL, NULL);
749 }
750
751 int avio_open2(AVIOContext **s, const char *filename, int flags,
752                const AVIOInterruptCB *int_cb, AVDictionary **options)
753 {
754     URLContext *h;
755     int err;
756
757     err = ffurl_open(&h, filename, flags, int_cb, options);
758     if (err < 0)
759         return err;
760     err = ffio_fdopen(s, h);
761     if (err < 0) {
762         ffurl_close(h);
763         return err;
764     }
765     return 0;
766 }
767
768 int avio_close(AVIOContext *s)
769 {
770     URLContext *h;
771
772     if (!s)
773         return 0;
774
775     avio_flush(s);
776     h = s->opaque;
777     av_freep(&s->buffer);
778     av_free(s);
779     return ffurl_close(h);
780 }
781
782 int avio_closep(AVIOContext **s)
783 {
784     int ret = avio_close(*s);
785     *s = NULL;
786     return ret;
787 }
788
789 int avio_printf(AVIOContext *s, const char *fmt, ...)
790 {
791     va_list ap;
792     char buf[4096];
793     int ret;
794
795     va_start(ap, fmt);
796     ret = vsnprintf(buf, sizeof(buf), fmt, ap);
797     va_end(ap);
798     avio_write(s, buf, strlen(buf));
799     return ret;
800 }
801
802 int avio_pause(AVIOContext *s, int pause)
803 {
804     if (!s->read_pause)
805         return AVERROR(ENOSYS);
806     return s->read_pause(s->opaque, pause);
807 }
808
809 int64_t avio_seek_time(AVIOContext *s, int stream_index,
810                        int64_t timestamp, int flags)
811 {
812     URLContext *h = s->opaque;
813     int64_t ret;
814     if (!s->read_seek)
815         return AVERROR(ENOSYS);
816     ret = s->read_seek(h, stream_index, timestamp, flags);
817     if (ret >= 0) {
818         int64_t pos;
819         s->buf_ptr = s->buf_end; // Flush buffer
820         pos = s->seek(h, 0, SEEK_CUR);
821         if (pos >= 0)
822             s->pos = pos;
823         else if (pos != AVERROR(ENOSYS))
824             ret = pos;
825     }
826     return ret;
827 }
828
829 /* output in a dynamic buffer */
830
831 typedef struct DynBuffer {
832     int pos, size, allocated_size;
833     uint8_t *buffer;
834     int io_buffer_size;
835     uint8_t io_buffer[1];
836 } DynBuffer;
837
838 static int dyn_buf_write(void *opaque, uint8_t *buf, int buf_size)
839 {
840     DynBuffer *d = opaque;
841     unsigned new_size, new_allocated_size;
842
843     /* reallocate buffer if needed */
844     new_size = d->pos + buf_size;
845     new_allocated_size = d->allocated_size;
846     if (new_size < d->pos || new_size > INT_MAX/2)
847         return -1;
848     while (new_size > new_allocated_size) {
849         if (!new_allocated_size)
850             new_allocated_size = new_size;
851         else
852             new_allocated_size += new_allocated_size / 2 + 1;
853     }
854
855     if (new_allocated_size > d->allocated_size) {
856         d->buffer = av_realloc(d->buffer, new_allocated_size);
857         if(d->buffer == NULL)
858              return AVERROR(ENOMEM);
859         d->allocated_size = new_allocated_size;
860     }
861     memcpy(d->buffer + d->pos, buf, buf_size);
862     d->pos = new_size;
863     if (d->pos > d->size)
864         d->size = d->pos;
865     return buf_size;
866 }
867
868 static int dyn_packet_buf_write(void *opaque, uint8_t *buf, int buf_size)
869 {
870     unsigned char buf1[4];
871     int ret;
872
873     /* packetized write: output the header */
874     AV_WB32(buf1, buf_size);
875     ret = dyn_buf_write(opaque, buf1, 4);
876     if (ret < 0)
877         return ret;
878
879     /* then the data */
880     return dyn_buf_write(opaque, buf, buf_size);
881 }
882
883 static int64_t dyn_buf_seek(void *opaque, int64_t offset, int whence)
884 {
885     DynBuffer *d = opaque;
886
887     if (whence == SEEK_CUR)
888         offset += d->pos;
889     else if (whence == SEEK_END)
890         offset += d->size;
891     if (offset < 0 || offset > 0x7fffffffLL)
892         return -1;
893     d->pos = offset;
894     return 0;
895 }
896
897 static int url_open_dyn_buf_internal(AVIOContext **s, int max_packet_size)
898 {
899     DynBuffer *d;
900     unsigned io_buffer_size = max_packet_size ? max_packet_size : 1024;
901
902     if (sizeof(DynBuffer) + io_buffer_size < io_buffer_size)
903         return -1;
904     d = av_mallocz(sizeof(DynBuffer) + io_buffer_size);
905     if (!d)
906         return AVERROR(ENOMEM);
907     d->io_buffer_size = io_buffer_size;
908     *s = avio_alloc_context(d->io_buffer, d->io_buffer_size, 1, d, NULL,
909                             max_packet_size ? dyn_packet_buf_write : dyn_buf_write,
910                             max_packet_size ? NULL : dyn_buf_seek);
911     if(!*s) {
912         av_free(d);
913         return AVERROR(ENOMEM);
914     }
915     (*s)->max_packet_size = max_packet_size;
916     return 0;
917 }
918
919 int avio_open_dyn_buf(AVIOContext **s)
920 {
921     return url_open_dyn_buf_internal(s, 0);
922 }
923
924 int ffio_open_dyn_packet_buf(AVIOContext **s, int max_packet_size)
925 {
926     if (max_packet_size <= 0)
927         return -1;
928     return url_open_dyn_buf_internal(s, max_packet_size);
929 }
930
931 int avio_close_dyn_buf(AVIOContext *s, uint8_t **pbuffer)
932 {
933     DynBuffer *d = s->opaque;
934     int size;
935     static const char padbuf[FF_INPUT_BUFFER_PADDING_SIZE] = {0};
936     int padding = 0;
937
938     /* don't attempt to pad fixed-size packet buffers */
939     if (!s->max_packet_size) {
940         avio_write(s, padbuf, sizeof(padbuf));
941         padding = FF_INPUT_BUFFER_PADDING_SIZE;
942     }
943
944     avio_flush(s);
945
946     *pbuffer = d->buffer;
947     size = d->size;
948     av_free(d);
949     av_free(s);
950     return size - padding;
951 }