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