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