Simplify get_byte and url_fgetc.
[ffmpeg.git] / 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 "internal.h"
27 #include <stdarg.h>
28
29 #define IO_BUFFER_SIZE 32768
30
31 /**
32  * Do seeks within this distance ahead of the current buffer by skipping
33  * data instead of calling the protocol seek function, for seekable
34  * protocols.
35  */
36 #define SHORT_SEEK_THRESHOLD 4096
37
38 static void fill_buffer(ByteIOContext *s);
39 #if LIBAVFORMAT_VERSION_MAJOR >= 53
40 static int url_resetbuf(ByteIOContext *s, int flags);
41 #endif
42
43 int init_put_byte(ByteIOContext *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 ? URL_WRONLY : URL_RDONLY);
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     s->is_streamed = 0;
65     s->max_packet_size = 0;
66     s->update_checksum= NULL;
67     if(!read_packet && !write_flag){
68         s->pos = buffer_size;
69         s->buf_end = s->buffer + buffer_size;
70     }
71     s->read_pause = NULL;
72     s->read_seek  = NULL;
73     return 0;
74 }
75
76 ByteIOContext *av_alloc_put_byte(
77                   unsigned char *buffer,
78                   int buffer_size,
79                   int write_flag,
80                   void *opaque,
81                   int (*read_packet)(void *opaque, uint8_t *buf, int buf_size),
82                   int (*write_packet)(void *opaque, uint8_t *buf, int buf_size),
83                   int64_t (*seek)(void *opaque, int64_t offset, int whence))
84 {
85     ByteIOContext *s = av_mallocz(sizeof(ByteIOContext));
86     init_put_byte(s, buffer, buffer_size, write_flag, opaque,
87                   read_packet, write_packet, seek);
88     return s;
89 }
90
91 static void flush_buffer(ByteIOContext *s)
92 {
93     if (s->buf_ptr > s->buffer) {
94         if (s->write_packet && !s->error){
95             int ret= s->write_packet(s->opaque, s->buffer, s->buf_ptr - s->buffer);
96             if(ret < 0){
97                 s->error = ret;
98             }
99         }
100         if(s->update_checksum){
101             s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
102             s->checksum_ptr= s->buffer;
103         }
104         s->pos += s->buf_ptr - s->buffer;
105     }
106     s->buf_ptr = s->buffer;
107 }
108
109 void put_byte(ByteIOContext *s, int b)
110 {
111     *(s->buf_ptr)++ = b;
112     if (s->buf_ptr >= s->buf_end)
113         flush_buffer(s);
114 }
115
116 void put_buffer(ByteIOContext *s, const unsigned char *buf, int size)
117 {
118     while (size > 0) {
119         int len = FFMIN(s->buf_end - s->buf_ptr, size);
120         memcpy(s->buf_ptr, buf, len);
121         s->buf_ptr += len;
122
123         if (s->buf_ptr >= s->buf_end)
124             flush_buffer(s);
125
126         buf += len;
127         size -= len;
128     }
129 }
130
131 void put_flush_packet(ByteIOContext *s)
132 {
133     flush_buffer(s);
134     s->must_flush = 0;
135 }
136
137 int64_t url_fseek(ByteIOContext *s, int64_t offset, int whence)
138 {
139     int64_t offset1;
140     int64_t pos;
141     int force = whence & AVSEEK_FORCE;
142     whence &= ~AVSEEK_FORCE;
143
144     if(!s)
145         return AVERROR(EINVAL);
146
147     pos = s->pos - (s->write_flag ? 0 : (s->buf_end - s->buffer));
148
149     if (whence != SEEK_CUR && whence != SEEK_SET)
150         return AVERROR(EINVAL);
151
152     if (whence == SEEK_CUR) {
153         offset1 = pos + (s->buf_ptr - s->buffer);
154         if (offset == 0)
155             return offset1;
156         offset += offset1;
157     }
158     offset1 = offset - pos;
159     if (!s->must_flush &&
160         offset1 >= 0 && offset1 <= (s->buf_end - s->buffer)) {
161         /* can do the seek inside the buffer */
162         s->buf_ptr = s->buffer + offset1;
163     } else if ((s->is_streamed ||
164                offset1 <= s->buf_end + SHORT_SEEK_THRESHOLD - s->buffer) &&
165                !s->write_flag && offset1 >= 0 &&
166               (whence != SEEK_END || force)) {
167         while(s->pos < offset && !s->eof_reached)
168             fill_buffer(s);
169         if (s->eof_reached)
170             return AVERROR_EOF;
171         s->buf_ptr = s->buf_end + offset - s->pos;
172     } else {
173         int64_t res;
174
175 #if CONFIG_MUXERS || CONFIG_NETWORK
176         if (s->write_flag) {
177             flush_buffer(s);
178             s->must_flush = 1;
179         }
180 #endif /* CONFIG_MUXERS || CONFIG_NETWORK */
181         if (!s->seek)
182             return AVERROR(EPIPE);
183         if ((res = s->seek(s->opaque, offset, SEEK_SET)) < 0)
184             return res;
185         if (!s->write_flag)
186             s->buf_end = s->buffer;
187         s->buf_ptr = s->buffer;
188         s->pos = offset;
189     }
190     s->eof_reached = 0;
191     return offset;
192 }
193
194 int url_fskip(ByteIOContext *s, int64_t offset)
195 {
196     int64_t ret = url_fseek(s, offset, SEEK_CUR);
197     return ret < 0 ? ret : 0;
198 }
199
200 int64_t url_ftell(ByteIOContext *s)
201 {
202     return url_fseek(s, 0, SEEK_CUR);
203 }
204
205 int64_t url_fsize(ByteIOContext *s)
206 {
207     int64_t size;
208
209     if(!s)
210         return AVERROR(EINVAL);
211
212     if (!s->seek)
213         return AVERROR(ENOSYS);
214     size = s->seek(s->opaque, 0, AVSEEK_SIZE);
215     if(size<0){
216         if ((size = s->seek(s->opaque, -1, SEEK_END)) < 0)
217             return size;
218         size++;
219         s->seek(s->opaque, s->pos, SEEK_SET);
220     }
221     return size;
222 }
223
224 int url_feof(ByteIOContext *s)
225 {
226     if(!s)
227         return 0;
228     return s->eof_reached;
229 }
230
231 int url_ferror(ByteIOContext *s)
232 {
233     if(!s)
234         return 0;
235     return s->error;
236 }
237
238 void put_le32(ByteIOContext *s, unsigned int val)
239 {
240     put_byte(s, val);
241     put_byte(s, val >> 8);
242     put_byte(s, val >> 16);
243     put_byte(s, val >> 24);
244 }
245
246 void put_be32(ByteIOContext *s, unsigned int val)
247 {
248     put_byte(s, val >> 24);
249     put_byte(s, val >> 16);
250     put_byte(s, val >> 8);
251     put_byte(s, val);
252 }
253
254 void put_strz(ByteIOContext *s, const char *str)
255 {
256     if (str)
257         put_buffer(s, (const unsigned char *) str, strlen(str) + 1);
258     else
259         put_byte(s, 0);
260 }
261
262 int ff_get_v_length(uint64_t val){
263     int i=1;
264
265     while(val>>=7)
266         i++;
267
268     return i;
269 }
270
271 void ff_put_v(ByteIOContext *bc, uint64_t val){
272     int i= ff_get_v_length(val);
273
274     while(--i>0)
275         put_byte(bc, 128 | (val>>(7*i)));
276
277     put_byte(bc, val&127);
278 }
279
280 void put_le64(ByteIOContext *s, uint64_t val)
281 {
282     put_le32(s, (uint32_t)(val & 0xffffffff));
283     put_le32(s, (uint32_t)(val >> 32));
284 }
285
286 void put_be64(ByteIOContext *s, uint64_t val)
287 {
288     put_be32(s, (uint32_t)(val >> 32));
289     put_be32(s, (uint32_t)(val & 0xffffffff));
290 }
291
292 void put_le16(ByteIOContext *s, unsigned int val)
293 {
294     put_byte(s, val);
295     put_byte(s, val >> 8);
296 }
297
298 void put_be16(ByteIOContext *s, unsigned int val)
299 {
300     put_byte(s, val >> 8);
301     put_byte(s, val);
302 }
303
304 void put_le24(ByteIOContext *s, unsigned int val)
305 {
306     put_le16(s, val & 0xffff);
307     put_byte(s, val >> 16);
308 }
309
310 void put_be24(ByteIOContext *s, unsigned int val)
311 {
312     put_be16(s, val >> 8);
313     put_byte(s, val);
314 }
315
316 void put_tag(ByteIOContext *s, const char *tag)
317 {
318     while (*tag) {
319         put_byte(s, *tag++);
320     }
321 }
322
323 /* Input stream */
324
325 static void fill_buffer(ByteIOContext *s)
326 {
327     uint8_t *dst= !s->max_packet_size && s->buf_end - s->buffer < s->buffer_size ? s->buf_ptr : s->buffer;
328     int len= s->buffer_size - (dst - s->buffer);
329     int max_buffer_size = s->max_packet_size ? s->max_packet_size : IO_BUFFER_SIZE;
330
331     /* no need to do anything if EOF already reached */
332     if (s->eof_reached)
333         return;
334
335     if(s->update_checksum && dst == s->buffer){
336         if(s->buf_end > s->checksum_ptr)
337             s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_end - s->checksum_ptr);
338         s->checksum_ptr= s->buffer;
339     }
340
341     /* make buffer smaller in case it ended up large after probing */
342     if (s->buffer_size > max_buffer_size) {
343         url_setbufsize(s, max_buffer_size);
344
345         s->checksum_ptr = dst = s->buffer;
346         len = s->buffer_size;
347     }
348
349     if(s->read_packet)
350         len = s->read_packet(s->opaque, dst, len);
351     else
352         len = 0;
353     if (len <= 0) {
354         /* do not modify buffer if EOF reached so that a seek back can
355            be done without rereading data */
356         s->eof_reached = 1;
357         if(len<0)
358             s->error= len;
359     } else {
360         s->pos += len;
361         s->buf_ptr = dst;
362         s->buf_end = dst + len;
363     }
364 }
365
366 unsigned long ff_crc04C11DB7_update(unsigned long checksum, const uint8_t *buf,
367                                     unsigned int len)
368 {
369     return av_crc(av_crc_get_table(AV_CRC_32_IEEE), checksum, buf, len);
370 }
371
372 unsigned long get_checksum(ByteIOContext *s)
373 {
374     s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
375     s->update_checksum= NULL;
376     return s->checksum;
377 }
378
379 void init_checksum(ByteIOContext *s,
380                    unsigned long (*update_checksum)(unsigned long c, const uint8_t *p, unsigned int len),
381                    unsigned long checksum)
382 {
383     s->update_checksum= update_checksum;
384     if(s->update_checksum){
385         s->checksum= checksum;
386         s->checksum_ptr= s->buf_ptr;
387     }
388 }
389
390 /* XXX: put an inline version */
391 int get_byte(ByteIOContext *s)
392 {
393     if (s->buf_ptr >= s->buf_end)
394         fill_buffer(s);
395         if (s->buf_ptr < s->buf_end)
396             return *s->buf_ptr++;
397         else
398             return 0;
399 }
400
401 int url_fgetc(ByteIOContext *s)
402 {
403     if (s->buf_ptr >= s->buf_end)
404         fill_buffer(s);
405         if (s->buf_ptr < s->buf_end)
406             return *s->buf_ptr++;
407         else
408             return URL_EOF;
409 }
410
411 int get_buffer(ByteIOContext *s, unsigned char *buf, int size)
412 {
413     int len, size1;
414
415     size1 = size;
416     while (size > 0) {
417         len = s->buf_end - s->buf_ptr;
418         if (len > size)
419             len = size;
420         if (len == 0) {
421             if(size > s->buffer_size && !s->update_checksum){
422                 if(s->read_packet)
423                     len = s->read_packet(s->opaque, buf, size);
424                 if (len <= 0) {
425                     /* do not modify buffer if EOF reached so that a seek back can
426                     be done without rereading data */
427                     s->eof_reached = 1;
428                     if(len<0)
429                         s->error= len;
430                     break;
431                 } else {
432                     s->pos += len;
433                     size -= len;
434                     buf += len;
435                     s->buf_ptr = s->buffer;
436                     s->buf_end = s->buffer/* + len*/;
437                 }
438             }else{
439                 fill_buffer(s);
440                 len = s->buf_end - s->buf_ptr;
441                 if (len == 0)
442                     break;
443             }
444         } else {
445             memcpy(buf, s->buf_ptr, len);
446             buf += len;
447             s->buf_ptr += len;
448             size -= len;
449         }
450     }
451     if (size1 == size) {
452         if (url_ferror(s)) return url_ferror(s);
453         if (url_feof(s))   return AVERROR_EOF;
454     }
455     return size1 - size;
456 }
457
458 int get_partial_buffer(ByteIOContext *s, unsigned char *buf, int size)
459 {
460     int len;
461
462     if(size<0)
463         return -1;
464
465     len = s->buf_end - s->buf_ptr;
466     if (len == 0) {
467         fill_buffer(s);
468         len = s->buf_end - s->buf_ptr;
469     }
470     if (len > size)
471         len = size;
472     memcpy(buf, s->buf_ptr, len);
473     s->buf_ptr += len;
474     if (!len) {
475         if (url_ferror(s)) return url_ferror(s);
476         if (url_feof(s))   return AVERROR_EOF;
477     }
478     return len;
479 }
480
481 unsigned int get_le16(ByteIOContext *s)
482 {
483     unsigned int val;
484     val = get_byte(s);
485     val |= get_byte(s) << 8;
486     return val;
487 }
488
489 unsigned int get_le24(ByteIOContext *s)
490 {
491     unsigned int val;
492     val = get_le16(s);
493     val |= get_byte(s) << 16;
494     return val;
495 }
496
497 unsigned int get_le32(ByteIOContext *s)
498 {
499     unsigned int val;
500     val = get_le16(s);
501     val |= get_le16(s) << 16;
502     return val;
503 }
504
505 uint64_t get_le64(ByteIOContext *s)
506 {
507     uint64_t val;
508     val = (uint64_t)get_le32(s);
509     val |= (uint64_t)get_le32(s) << 32;
510     return val;
511 }
512
513 unsigned int get_be16(ByteIOContext *s)
514 {
515     unsigned int val;
516     val = get_byte(s) << 8;
517     val |= get_byte(s);
518     return val;
519 }
520
521 unsigned int get_be24(ByteIOContext *s)
522 {
523     unsigned int val;
524     val = get_be16(s) << 8;
525     val |= get_byte(s);
526     return val;
527 }
528 unsigned int get_be32(ByteIOContext *s)
529 {
530     unsigned int val;
531     val = get_be16(s) << 16;
532     val |= get_be16(s);
533     return val;
534 }
535
536 char *get_strz(ByteIOContext *s, char *buf, int maxlen)
537 {
538     int i = 0;
539     char c;
540
541     while ((c = get_byte(s))) {
542         if (i < maxlen-1)
543             buf[i++] = c;
544     }
545
546     buf[i] = 0; /* Ensure null terminated, but may be truncated */
547
548     return buf;
549 }
550
551 int ff_get_line(ByteIOContext *s, char *buf, int maxlen)
552 {
553     int i = 0;
554     char c;
555
556     do {
557         c = get_byte(s);
558         if (c && i < maxlen-1)
559             buf[i++] = c;
560     } while (c != '\n' && c);
561
562     buf[i] = 0;
563     return i;
564 }
565
566 uint64_t get_be64(ByteIOContext *s)
567 {
568     uint64_t val;
569     val = (uint64_t)get_be32(s) << 32;
570     val |= (uint64_t)get_be32(s);
571     return val;
572 }
573
574 uint64_t ff_get_v(ByteIOContext *bc){
575     uint64_t val = 0;
576     int tmp;
577
578     do{
579         tmp = get_byte(bc);
580         val= (val<<7) + (tmp&127);
581     }while(tmp&128);
582     return val;
583 }
584
585 int url_fdopen(ByteIOContext **s, URLContext *h)
586 {
587     uint8_t *buffer;
588     int buffer_size, max_packet_size;
589
590     max_packet_size = url_get_max_packet_size(h);
591     if (max_packet_size) {
592         buffer_size = max_packet_size; /* no need to bufferize more than one packet */
593     } else {
594         buffer_size = IO_BUFFER_SIZE;
595     }
596     buffer = av_malloc(buffer_size);
597     if (!buffer)
598         return AVERROR(ENOMEM);
599
600     *s = av_mallocz(sizeof(ByteIOContext));
601     if(!*s) {
602         av_free(buffer);
603         return AVERROR(ENOMEM);
604     }
605
606     if (init_put_byte(*s, buffer, buffer_size,
607                       (h->flags & URL_WRONLY || h->flags & URL_RDWR), h,
608                       url_read, url_write, url_seek) < 0) {
609         av_free(buffer);
610         av_freep(s);
611         return AVERROR(EIO);
612     }
613     (*s)->is_streamed = h->is_streamed;
614     (*s)->max_packet_size = max_packet_size;
615     if(h->prot) {
616         (*s)->read_pause = (int (*)(void *, int))h->prot->url_read_pause;
617         (*s)->read_seek  = (int64_t (*)(void *, int, int64_t, int))h->prot->url_read_seek;
618     }
619     return 0;
620 }
621
622 int url_setbufsize(ByteIOContext *s, int buf_size)
623 {
624     uint8_t *buffer;
625     buffer = av_malloc(buf_size);
626     if (!buffer)
627         return AVERROR(ENOMEM);
628
629     av_free(s->buffer);
630     s->buffer = buffer;
631     s->buffer_size = buf_size;
632     s->buf_ptr = buffer;
633     url_resetbuf(s, s->write_flag ? URL_WRONLY : URL_RDONLY);
634     return 0;
635 }
636
637 #if LIBAVFORMAT_VERSION_MAJOR < 53
638 int url_resetbuf(ByteIOContext *s, int flags)
639 #else
640 static int url_resetbuf(ByteIOContext *s, int flags)
641 #endif
642 {
643 #if LIBAVFORMAT_VERSION_MAJOR < 53
644     if (flags & URL_RDWR)
645         return AVERROR(EINVAL);
646 #else
647     assert(flags == URL_WRONLY || flags == URL_RDONLY);
648 #endif
649
650     if (flags & URL_WRONLY) {
651         s->buf_end = s->buffer + s->buffer_size;
652         s->write_flag = 1;
653     } else {
654         s->buf_end = s->buffer;
655         s->write_flag = 0;
656     }
657     return 0;
658 }
659
660 int ff_rewind_with_probe_data(ByteIOContext *s, unsigned char *buf, int buf_size)
661 {
662     int64_t buffer_start;
663     int buffer_size;
664     int overlap, new_size, alloc_size;
665
666     if (s->write_flag)
667         return AVERROR(EINVAL);
668
669     buffer_size = s->buf_end - s->buffer;
670
671     /* the buffers must touch or overlap */
672     if ((buffer_start = s->pos - buffer_size) > buf_size)
673         return AVERROR(EINVAL);
674
675     overlap = buf_size - buffer_start;
676     new_size = buf_size + buffer_size - overlap;
677
678     alloc_size = FFMAX(s->buffer_size, new_size);
679     if (alloc_size > buf_size)
680         if (!(buf = av_realloc(buf, alloc_size)))
681             return AVERROR(ENOMEM);
682
683     if (new_size > buf_size) {
684         memcpy(buf + buf_size, s->buffer + overlap, buffer_size - overlap);
685         buf_size = new_size;
686     }
687
688     av_free(s->buffer);
689     s->buf_ptr = s->buffer = buf;
690     s->buffer_size = alloc_size;
691     s->pos = buf_size;
692     s->buf_end = s->buf_ptr + buf_size;
693     s->eof_reached = 0;
694     s->must_flush = 0;
695
696     return 0;
697 }
698
699 int url_fopen(ByteIOContext **s, const char *filename, int flags)
700 {
701     URLContext *h;
702     int err;
703
704     err = url_open(&h, filename, flags);
705     if (err < 0)
706         return err;
707     err = url_fdopen(s, h);
708     if (err < 0) {
709         url_close(h);
710         return err;
711     }
712     return 0;
713 }
714
715 int url_fclose(ByteIOContext *s)
716 {
717     URLContext *h = s->opaque;
718
719     av_free(s->buffer);
720     av_free(s);
721     return url_close(h);
722 }
723
724 URLContext *url_fileno(ByteIOContext *s)
725 {
726     return s->opaque;
727 }
728
729 #if CONFIG_MUXERS
730 int url_fprintf(ByteIOContext *s, const char *fmt, ...)
731 {
732     va_list ap;
733     char buf[4096];
734     int ret;
735
736     va_start(ap, fmt);
737     ret = vsnprintf(buf, sizeof(buf), fmt, ap);
738     va_end(ap);
739     put_buffer(s, buf, strlen(buf));
740     return ret;
741 }
742 #endif //CONFIG_MUXERS
743
744 char *url_fgets(ByteIOContext *s, char *buf, int buf_size)
745 {
746     int c;
747     char *q;
748
749     c = url_fgetc(s);
750     if (c == EOF)
751         return NULL;
752     q = buf;
753     for(;;) {
754         if (c == EOF || c == '\n')
755             break;
756         if ((q - buf) < buf_size - 1)
757             *q++ = c;
758         c = url_fgetc(s);
759     }
760     if (buf_size > 0)
761         *q = '\0';
762     return buf;
763 }
764
765 int url_fget_max_packet_size(ByteIOContext *s)
766 {
767     return s->max_packet_size;
768 }
769
770 int av_url_read_fpause(ByteIOContext *s, int pause)
771 {
772     if (!s->read_pause)
773         return AVERROR(ENOSYS);
774     return s->read_pause(s->opaque, pause);
775 }
776
777 int64_t av_url_read_fseek(ByteIOContext *s, int stream_index,
778                           int64_t timestamp, int flags)
779 {
780     URLContext *h = s->opaque;
781     int64_t ret;
782     if (!s->read_seek)
783         return AVERROR(ENOSYS);
784     ret = s->read_seek(h, stream_index, timestamp, flags);
785     if(ret >= 0) {
786         int64_t pos;
787         s->buf_ptr = s->buf_end; // Flush buffer
788         pos = s->seek(h, 0, SEEK_CUR);
789         if (pos >= 0)
790             s->pos = pos;
791         else if (pos != AVERROR(ENOSYS))
792             ret = pos;
793     }
794     return ret;
795 }
796
797 /* url_open_dyn_buf and url_close_dyn_buf are used in rtp.c to send a response
798  * back to the server even if CONFIG_MUXERS is false. */
799 #if CONFIG_MUXERS || CONFIG_NETWORK
800 /* buffer handling */
801 int url_open_buf(ByteIOContext **s, uint8_t *buf, int buf_size, int flags)
802 {
803     int ret;
804     *s = av_mallocz(sizeof(ByteIOContext));
805     if(!*s)
806         return AVERROR(ENOMEM);
807     ret = init_put_byte(*s, buf, buf_size,
808                         (flags & URL_WRONLY || flags & URL_RDWR),
809                         NULL, NULL, NULL, NULL);
810     if(ret != 0)
811         av_freep(s);
812     return ret;
813 }
814
815 int url_close_buf(ByteIOContext *s)
816 {
817     put_flush_packet(s);
818     return s->buf_ptr - s->buffer;
819 }
820
821 /* output in a dynamic buffer */
822
823 typedef struct DynBuffer {
824     int pos, size, allocated_size;
825     uint8_t *buffer;
826     int io_buffer_size;
827     uint8_t io_buffer[1];
828 } DynBuffer;
829
830 static int dyn_buf_write(void *opaque, uint8_t *buf, int buf_size)
831 {
832     DynBuffer *d = opaque;
833     unsigned new_size, new_allocated_size;
834
835     /* reallocate buffer if needed */
836     new_size = d->pos + buf_size;
837     new_allocated_size = d->allocated_size;
838     if(new_size < d->pos || new_size > INT_MAX/2)
839         return -1;
840     while (new_size > new_allocated_size) {
841         if (!new_allocated_size)
842             new_allocated_size = new_size;
843         else
844             new_allocated_size += new_allocated_size / 2 + 1;
845     }
846
847     if (new_allocated_size > d->allocated_size) {
848         d->buffer = av_realloc(d->buffer, new_allocated_size);
849         if(d->buffer == NULL)
850              return AVERROR(ENOMEM);
851         d->allocated_size = new_allocated_size;
852     }
853     memcpy(d->buffer + d->pos, buf, buf_size);
854     d->pos = new_size;
855     if (d->pos > d->size)
856         d->size = d->pos;
857     return buf_size;
858 }
859
860 static int dyn_packet_buf_write(void *opaque, uint8_t *buf, int buf_size)
861 {
862     unsigned char buf1[4];
863     int ret;
864
865     /* packetized write: output the header */
866     AV_WB32(buf1, buf_size);
867     ret= dyn_buf_write(opaque, buf1, 4);
868     if(ret < 0)
869         return ret;
870
871     /* then the data */
872     return dyn_buf_write(opaque, buf, buf_size);
873 }
874
875 static int64_t dyn_buf_seek(void *opaque, int64_t offset, int whence)
876 {
877     DynBuffer *d = opaque;
878
879     if (whence == SEEK_CUR)
880         offset += d->pos;
881     else if (whence == SEEK_END)
882         offset += d->size;
883     if (offset < 0 || offset > 0x7fffffffLL)
884         return -1;
885     d->pos = offset;
886     return 0;
887 }
888
889 static int url_open_dyn_buf_internal(ByteIOContext **s, int max_packet_size)
890 {
891     DynBuffer *d;
892     int ret;
893     unsigned io_buffer_size = max_packet_size ? max_packet_size : 1024;
894
895     if(sizeof(DynBuffer) + io_buffer_size < io_buffer_size)
896         return -1;
897     d = av_mallocz(sizeof(DynBuffer) + io_buffer_size);
898     if (!d)
899         return AVERROR(ENOMEM);
900     *s = av_mallocz(sizeof(ByteIOContext));
901     if(!*s) {
902         av_free(d);
903         return AVERROR(ENOMEM);
904     }
905     d->io_buffer_size = io_buffer_size;
906     ret = init_put_byte(*s, d->io_buffer, io_buffer_size,
907                         1, d, NULL,
908                         max_packet_size ? dyn_packet_buf_write : dyn_buf_write,
909                         max_packet_size ? NULL : dyn_buf_seek);
910     if (ret == 0) {
911         (*s)->max_packet_size = max_packet_size;
912     } else {
913         av_free(d);
914         av_freep(s);
915     }
916     return ret;
917 }
918
919 int url_open_dyn_buf(ByteIOContext **s)
920 {
921     return url_open_dyn_buf_internal(s, 0);
922 }
923
924 int url_open_dyn_packet_buf(ByteIOContext **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 url_close_dyn_buf(ByteIOContext *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         put_buffer(s, padbuf, sizeof(padbuf));
941         padding = FF_INPUT_BUFFER_PADDING_SIZE;
942     }
943
944     put_flush_packet(s);
945
946     *pbuffer = d->buffer;
947     size = d->size;
948     av_free(d);
949     av_free(s);
950     return size - padding;
951 }
952 #endif /* CONFIG_MUXERS || CONFIG_NETWORK */