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