Statistics
| Branch: | Revision:

ffmpeg / libavformat / aviobuf.c @ 2912e87a

History | View | Annotate | Download (27.2 KB)

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
#endif
401

    
402
int avio_put_str(AVIOContext *s, const char *str)
403
{
404
    int len = 1;
405
    if (str) {
406
        len += strlen(str);
407
        avio_write(s, (const unsigned char *) str, len);
408
    } else
409
        avio_w8(s, 0);
410
    return len;
411
}
412

    
413
int avio_put_str16le(AVIOContext *s, const char *str)
414
{
415
    const uint8_t *q = str;
416
    int ret = 0;
417

    
418
    while (*q) {
419
        uint32_t ch;
420
        uint16_t tmp;
421

    
422
        GET_UTF8(ch, *q++, break;)
423
        PUT_UTF16(ch, tmp, avio_wl16(s, tmp);ret += 2;)
424
    }
425
    avio_wl16(s, 0);
426
    ret += 2;
427
    return ret;
428
}
429

    
430
int ff_get_v_length(uint64_t val){
431
    int i=1;
432

    
433
    while(val>>=7)
434
        i++;
435

    
436
    return i;
437
}
438

    
439
void ff_put_v(AVIOContext *bc, uint64_t val){
440
    int i= ff_get_v_length(val);
441

    
442
    while(--i>0)
443
        avio_w8(bc, 128 | (val>>(7*i)));
444

    
445
    avio_w8(bc, val&127);
446
}
447

    
448
void avio_wl64(AVIOContext *s, uint64_t val)
449
{
450
    avio_wl32(s, (uint32_t)(val & 0xffffffff));
451
    avio_wl32(s, (uint32_t)(val >> 32));
452
}
453

    
454
void avio_wb64(AVIOContext *s, uint64_t val)
455
{
456
    avio_wb32(s, (uint32_t)(val >> 32));
457
    avio_wb32(s, (uint32_t)(val & 0xffffffff));
458
}
459

    
460
void avio_wl16(AVIOContext *s, unsigned int val)
461
{
462
    avio_w8(s, val);
463
    avio_w8(s, val >> 8);
464
}
465

    
466
void avio_wb16(AVIOContext *s, unsigned int val)
467
{
468
    avio_w8(s, val >> 8);
469
    avio_w8(s, val);
470
}
471

    
472
void avio_wl24(AVIOContext *s, unsigned int val)
473
{
474
    avio_wl16(s, val & 0xffff);
475
    avio_w8(s, val >> 16);
476
}
477

    
478
void avio_wb24(AVIOContext *s, unsigned int val)
479
{
480
    avio_wb16(s, val >> 8);
481
    avio_w8(s, val);
482
}
483

    
484
#if FF_API_OLD_AVIO
485
void put_tag(AVIOContext *s, const char *tag)
486
{
487
    while (*tag) {
488
        avio_w8(s, *tag++);
489
    }
490
}
491
#endif
492

    
493
/* Input stream */
494

    
495
static void fill_buffer(AVIOContext *s)
496
{
497
    uint8_t *dst= !s->max_packet_size && s->buf_end - s->buffer < s->buffer_size ? s->buf_end : s->buffer;
498
    int len= s->buffer_size - (dst - s->buffer);
499
    int max_buffer_size = s->max_packet_size ? s->max_packet_size : IO_BUFFER_SIZE;
500

    
501
    /* no need to do anything if EOF already reached */
502
    if (s->eof_reached)
503
        return;
504

    
505
    if(s->update_checksum && dst == s->buffer){
506
        if(s->buf_end > s->checksum_ptr)
507
            s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_end - s->checksum_ptr);
508
        s->checksum_ptr= s->buffer;
509
    }
510

    
511
    /* make buffer smaller in case it ended up large after probing */
512
    if (s->buffer_size > max_buffer_size) {
513
        ffio_set_buf_size(s, max_buffer_size);
514

    
515
        s->checksum_ptr = dst = s->buffer;
516
        len = s->buffer_size;
517
    }
518

    
519
    if(s->read_packet)
520
        len = s->read_packet(s->opaque, dst, len);
521
    else
522
        len = 0;
523
    if (len <= 0) {
524
        /* do not modify buffer if EOF reached so that a seek back can
525
           be done without rereading data */
526
        s->eof_reached = 1;
527
        if(len<0)
528
            s->error= len;
529
    } else {
530
        s->pos += len;
531
        s->buf_ptr = dst;
532
        s->buf_end = dst + len;
533
    }
534
}
535

    
536
unsigned long ff_crc04C11DB7_update(unsigned long checksum, const uint8_t *buf,
537
                                    unsigned int len)
538
{
539
    return av_crc(av_crc_get_table(AV_CRC_32_IEEE), checksum, buf, len);
540
}
541

    
542
unsigned long get_checksum(AVIOContext *s)
543
{
544
    s->checksum= s->update_checksum(s->checksum, s->checksum_ptr, s->buf_ptr - s->checksum_ptr);
545
    s->update_checksum= NULL;
546
    return s->checksum;
547
}
548

    
549
void init_checksum(AVIOContext *s,
550
                   unsigned long (*update_checksum)(unsigned long c, const uint8_t *p, unsigned int len),
551
                   unsigned long checksum)
552
{
553
    s->update_checksum= update_checksum;
554
    if(s->update_checksum){
555
        s->checksum= checksum;
556
        s->checksum_ptr= s->buf_ptr;
557
    }
558
}
559

    
560
/* XXX: put an inline version */
561
int avio_r8(AVIOContext *s)
562
{
563
    if (s->buf_ptr >= s->buf_end)
564
        fill_buffer(s);
565
    if (s->buf_ptr < s->buf_end)
566
        return *s->buf_ptr++;
567
    return 0;
568
}
569

    
570
#if FF_API_OLD_AVIO
571
int url_fgetc(AVIOContext *s)
572
{
573
    if (s->buf_ptr >= s->buf_end)
574
        fill_buffer(s);
575
    if (s->buf_ptr < s->buf_end)
576
        return *s->buf_ptr++;
577
    return URL_EOF;
578
}
579
#endif
580

    
581
int avio_read(AVIOContext *s, unsigned char *buf, int size)
582
{
583
    int len, size1;
584

    
585
    size1 = size;
586
    while (size > 0) {
587
        len = s->buf_end - s->buf_ptr;
588
        if (len > size)
589
            len = size;
590
        if (len == 0) {
591
            if(size > s->buffer_size && !s->update_checksum){
592
                if(s->read_packet)
593
                    len = s->read_packet(s->opaque, buf, size);
594
                if (len <= 0) {
595
                    /* do not modify buffer if EOF reached so that a seek back can
596
                    be done without rereading data */
597
                    s->eof_reached = 1;
598
                    if(len<0)
599
                        s->error= len;
600
                    break;
601
                } else {
602
                    s->pos += len;
603
                    size -= len;
604
                    buf += len;
605
                    s->buf_ptr = s->buffer;
606
                    s->buf_end = s->buffer/* + len*/;
607
                }
608
            }else{
609
                fill_buffer(s);
610
                len = s->buf_end - s->buf_ptr;
611
                if (len == 0)
612
                    break;
613
            }
614
        } else {
615
            memcpy(buf, s->buf_ptr, len);
616
            buf += len;
617
            s->buf_ptr += len;
618
            size -= len;
619
        }
620
    }
621
    if (size1 == size) {
622
        if (s->error)         return s->error;
623
        if (s->eof_reached)   return AVERROR_EOF;
624
    }
625
    return size1 - size;
626
}
627

    
628
int ffio_read_partial(AVIOContext *s, unsigned char *buf, int size)
629
{
630
    int len;
631

    
632
    if(size<0)
633
        return -1;
634

    
635
    len = s->buf_end - s->buf_ptr;
636
    if (len == 0) {
637
        fill_buffer(s);
638
        len = s->buf_end - s->buf_ptr;
639
    }
640
    if (len > size)
641
        len = size;
642
    memcpy(buf, s->buf_ptr, len);
643
    s->buf_ptr += len;
644
    if (!len) {
645
        if (s->error)         return s->error;
646
        if (s->eof_reached)   return AVERROR_EOF;
647
    }
648
    return len;
649
}
650

    
651
unsigned int avio_rl16(AVIOContext *s)
652
{
653
    unsigned int val;
654
    val = avio_r8(s);
655
    val |= avio_r8(s) << 8;
656
    return val;
657
}
658

    
659
unsigned int avio_rl24(AVIOContext *s)
660
{
661
    unsigned int val;
662
    val = avio_rl16(s);
663
    val |= avio_r8(s) << 16;
664
    return val;
665
}
666

    
667
unsigned int avio_rl32(AVIOContext *s)
668
{
669
    unsigned int val;
670
    val = avio_rl16(s);
671
    val |= avio_rl16(s) << 16;
672
    return val;
673
}
674

    
675
uint64_t avio_rl64(AVIOContext *s)
676
{
677
    uint64_t val;
678
    val = (uint64_t)avio_rl32(s);
679
    val |= (uint64_t)avio_rl32(s) << 32;
680
    return val;
681
}
682

    
683
unsigned int avio_rb16(AVIOContext *s)
684
{
685
    unsigned int val;
686
    val = avio_r8(s) << 8;
687
    val |= avio_r8(s);
688
    return val;
689
}
690

    
691
unsigned int avio_rb24(AVIOContext *s)
692
{
693
    unsigned int val;
694
    val = avio_rb16(s) << 8;
695
    val |= avio_r8(s);
696
    return val;
697
}
698
unsigned int avio_rb32(AVIOContext *s)
699
{
700
    unsigned int val;
701
    val = avio_rb16(s) << 16;
702
    val |= avio_rb16(s);
703
    return val;
704
}
705

    
706
#if FF_API_OLD_AVIO
707
char *get_strz(AVIOContext *s, char *buf, int maxlen)
708
{
709
    avio_get_str(s, INT_MAX, buf, maxlen);
710
    return buf;
711
}
712
#endif
713

    
714
int ff_get_line(AVIOContext *s, char *buf, int maxlen)
715
{
716
    int i = 0;
717
    char c;
718

    
719
    do {
720
        c = avio_r8(s);
721
        if (c && i < maxlen-1)
722
            buf[i++] = c;
723
    } while (c != '\n' && c);
724

    
725
    buf[i] = 0;
726
    return i;
727
}
728

    
729
int avio_get_str(AVIOContext *s, int maxlen, char *buf, int buflen)
730
{
731
    int i;
732

    
733
    // reserve 1 byte for terminating 0
734
    buflen = FFMIN(buflen - 1, maxlen);
735
    for (i = 0; i < buflen; i++)
736
        if (!(buf[i] = avio_r8(s)))
737
            return i + 1;
738
    if (buflen)
739
        buf[i] = 0;
740
    for (; i < maxlen; i++)
741
        if (!avio_r8(s))
742
            return i + 1;
743
    return maxlen;
744
}
745

    
746
#define GET_STR16(type, read) \
747
    int avio_get_str16 ##type(AVIOContext *pb, int maxlen, char *buf, int buflen)\
748
{\
749
    char* q = buf;\
750
    int ret = 0;\
751
    while (ret + 1 < maxlen) {\
752
        uint8_t tmp;\
753
        uint32_t ch;\
754
        GET_UTF16(ch, (ret += 2) <= maxlen ? read(pb) : 0, break;)\
755
        if (!ch)\
756
            break;\
757
        PUT_UTF8(ch, tmp, if (q - buf < buflen - 1) *q++ = tmp;)\
758
    }\
759
    *q = 0;\
760
    return ret;\
761
}\
762

    
763
GET_STR16(le, avio_rl16)
764
GET_STR16(be, avio_rb16)
765

    
766
#undef GET_STR16
767

    
768
uint64_t avio_rb64(AVIOContext *s)
769
{
770
    uint64_t val;
771
    val = (uint64_t)avio_rb32(s) << 32;
772
    val |= (uint64_t)avio_rb32(s);
773
    return val;
774
}
775

    
776
uint64_t ffio_read_varlen(AVIOContext *bc){
777
    uint64_t val = 0;
778
    int tmp;
779

    
780
    do{
781
        tmp = avio_r8(bc);
782
        val= (val<<7) + (tmp&127);
783
    }while(tmp&128);
784
    return val;
785
}
786

    
787
int url_fdopen(AVIOContext **s, URLContext *h)
788
{
789
    uint8_t *buffer;
790
    int buffer_size, max_packet_size;
791

    
792
    max_packet_size = url_get_max_packet_size(h);
793
    if (max_packet_size) {
794
        buffer_size = max_packet_size; /* no need to bufferize more than one packet */
795
    } else {
796
        buffer_size = IO_BUFFER_SIZE;
797
    }
798
    buffer = av_malloc(buffer_size);
799
    if (!buffer)
800
        return AVERROR(ENOMEM);
801

    
802
    *s = av_mallocz(sizeof(AVIOContext));
803
    if(!*s) {
804
        av_free(buffer);
805
        return AVERROR(ENOMEM);
806
    }
807

    
808
    if (ffio_init_context(*s, buffer, buffer_size,
809
                      (h->flags & URL_WRONLY || h->flags & URL_RDWR), h,
810
                      url_read, url_write, url_seek) < 0) {
811
        av_free(buffer);
812
        av_freep(s);
813
        return AVERROR(EIO);
814
    }
815
    (*s)->is_streamed = h->is_streamed;
816
    (*s)->max_packet_size = max_packet_size;
817
    if(h->prot) {
818
        (*s)->read_pause = (int (*)(void *, int))h->prot->url_read_pause;
819
        (*s)->read_seek  = (int64_t (*)(void *, int, int64_t, int))h->prot->url_read_seek;
820
    }
821
    return 0;
822
}
823

    
824
int ffio_set_buf_size(AVIOContext *s, int buf_size)
825
{
826
    uint8_t *buffer;
827
    buffer = av_malloc(buf_size);
828
    if (!buffer)
829
        return AVERROR(ENOMEM);
830

    
831
    av_free(s->buffer);
832
    s->buffer = buffer;
833
    s->buffer_size = buf_size;
834
    s->buf_ptr = buffer;
835
    url_resetbuf(s, s->write_flag ? URL_WRONLY : URL_RDONLY);
836
    return 0;
837
}
838

    
839
#if FF_API_URL_RESETBUF
840
int url_resetbuf(AVIOContext *s, int flags)
841
#else
842
static int url_resetbuf(AVIOContext *s, int flags)
843
#endif
844
{
845
#if FF_API_URL_RESETBUF
846
    if (flags & URL_RDWR)
847
        return AVERROR(EINVAL);
848
#else
849
    assert(flags == URL_WRONLY || flags == URL_RDONLY);
850
#endif
851

    
852
    if (flags & URL_WRONLY) {
853
        s->buf_end = s->buffer + s->buffer_size;
854
        s->write_flag = 1;
855
    } else {
856
        s->buf_end = s->buffer;
857
        s->write_flag = 0;
858
    }
859
    return 0;
860
}
861

    
862
int ffio_rewind_with_probe_data(AVIOContext *s, unsigned char *buf, int buf_size)
863
{
864
    int64_t buffer_start;
865
    int buffer_size;
866
    int overlap, new_size, alloc_size;
867

    
868
    if (s->write_flag)
869
        return AVERROR(EINVAL);
870

    
871
    buffer_size = s->buf_end - s->buffer;
872

    
873
    /* the buffers must touch or overlap */
874
    if ((buffer_start = s->pos - buffer_size) > buf_size)
875
        return AVERROR(EINVAL);
876

    
877
    overlap = buf_size - buffer_start;
878
    new_size = buf_size + buffer_size - overlap;
879

    
880
    alloc_size = FFMAX(s->buffer_size, new_size);
881
    if (alloc_size > buf_size)
882
        if (!(buf = av_realloc(buf, alloc_size)))
883
            return AVERROR(ENOMEM);
884

    
885
    if (new_size > buf_size) {
886
        memcpy(buf + buf_size, s->buffer + overlap, buffer_size - overlap);
887
        buf_size = new_size;
888
    }
889

    
890
    av_free(s->buffer);
891
    s->buf_ptr = s->buffer = buf;
892
    s->buffer_size = alloc_size;
893
    s->pos = buf_size;
894
    s->buf_end = s->buf_ptr + buf_size;
895
    s->eof_reached = 0;
896
    s->must_flush = 0;
897

    
898
    return 0;
899
}
900

    
901
int avio_open(AVIOContext **s, const char *filename, int flags)
902
{
903
    URLContext *h;
904
    int err;
905

    
906
    err = url_open(&h, filename, flags);
907
    if (err < 0)
908
        return err;
909
    err = url_fdopen(s, h);
910
    if (err < 0) {
911
        url_close(h);
912
        return err;
913
    }
914
    return 0;
915
}
916

    
917
int avio_close(AVIOContext *s)
918
{
919
    URLContext *h = s->opaque;
920

    
921
    av_free(s->buffer);
922
    av_free(s);
923
    return url_close(h);
924
}
925

    
926
URLContext *url_fileno(AVIOContext *s)
927
{
928
    return s->opaque;
929
}
930

    
931
int avio_printf(AVIOContext *s, const char *fmt, ...)
932
{
933
    va_list ap;
934
    char buf[4096];
935
    int ret;
936

    
937
    va_start(ap, fmt);
938
    ret = vsnprintf(buf, sizeof(buf), fmt, ap);
939
    va_end(ap);
940
    avio_write(s, buf, strlen(buf));
941
    return ret;
942
}
943

    
944
#if FF_API_OLD_AVIO
945
char *url_fgets(AVIOContext *s, char *buf, int buf_size)
946
{
947
    int c;
948
    char *q;
949

    
950
    c = avio_r8(s);
951
    if (s->eof_reached)
952
        return NULL;
953
    q = buf;
954
    for(;;) {
955
        if (s->eof_reached || c == '\n')
956
            break;
957
        if ((q - buf) < buf_size - 1)
958
            *q++ = c;
959
        c = avio_r8(s);
960
    }
961
    if (buf_size > 0)
962
        *q = '\0';
963
    return buf;
964
}
965

    
966
int url_fget_max_packet_size(AVIOContext *s)
967
{
968
    return s->max_packet_size;
969
}
970
#endif
971

    
972
int av_url_read_fpause(AVIOContext *s, int pause)
973
{
974
    if (!s->read_pause)
975
        return AVERROR(ENOSYS);
976
    return s->read_pause(s->opaque, pause);
977
}
978

    
979
int64_t av_url_read_fseek(AVIOContext *s, int stream_index,
980
                          int64_t timestamp, int flags)
981
{
982
    URLContext *h = s->opaque;
983
    int64_t ret;
984
    if (!s->read_seek)
985
        return AVERROR(ENOSYS);
986
    ret = s->read_seek(h, stream_index, timestamp, flags);
987
    if(ret >= 0) {
988
        int64_t pos;
989
        s->buf_ptr = s->buf_end; // Flush buffer
990
        pos = s->seek(h, 0, SEEK_CUR);
991
        if (pos >= 0)
992
            s->pos = pos;
993
        else if (pos != AVERROR(ENOSYS))
994
            ret = pos;
995
    }
996
    return ret;
997
}
998

    
999
/* url_open_dyn_buf and url_close_dyn_buf are used in rtp.c to send a response
1000
 * back to the server even if CONFIG_MUXERS is false. */
1001
#if CONFIG_MUXERS || CONFIG_NETWORK
1002
/* buffer handling */
1003
#if FF_API_OLD_AVIO
1004
int url_open_buf(AVIOContext **s, uint8_t *buf, int buf_size, int flags)
1005
{
1006
    int ret;
1007
    *s = av_mallocz(sizeof(AVIOContext));
1008
    if(!*s)
1009
        return AVERROR(ENOMEM);
1010
    ret = ffio_init_context(*s, buf, buf_size,
1011
                        (flags & URL_WRONLY || flags & URL_RDWR),
1012
                        NULL, NULL, NULL, NULL);
1013
    if(ret != 0)
1014
        av_freep(s);
1015
    return ret;
1016
}
1017

    
1018
int url_close_buf(AVIOContext *s)
1019
{
1020
    avio_flush(s);
1021
    return s->buf_ptr - s->buffer;
1022
}
1023
#endif
1024

    
1025
/* output in a dynamic buffer */
1026

    
1027
typedef struct DynBuffer {
1028
    int pos, size, allocated_size;
1029
    uint8_t *buffer;
1030
    int io_buffer_size;
1031
    uint8_t io_buffer[1];
1032
} DynBuffer;
1033

    
1034
static int dyn_buf_write(void *opaque, uint8_t *buf, int buf_size)
1035
{
1036
    DynBuffer *d = opaque;
1037
    unsigned new_size, new_allocated_size;
1038

    
1039
    /* reallocate buffer if needed */
1040
    new_size = d->pos + buf_size;
1041
    new_allocated_size = d->allocated_size;
1042
    if(new_size < d->pos || new_size > INT_MAX/2)
1043
        return -1;
1044
    while (new_size > new_allocated_size) {
1045
        if (!new_allocated_size)
1046
            new_allocated_size = new_size;
1047
        else
1048
            new_allocated_size += new_allocated_size / 2 + 1;
1049
    }
1050

    
1051
    if (new_allocated_size > d->allocated_size) {
1052
        d->buffer = av_realloc(d->buffer, new_allocated_size);
1053
        if(d->buffer == NULL)
1054
             return AVERROR(ENOMEM);
1055
        d->allocated_size = new_allocated_size;
1056
    }
1057
    memcpy(d->buffer + d->pos, buf, buf_size);
1058
    d->pos = new_size;
1059
    if (d->pos > d->size)
1060
        d->size = d->pos;
1061
    return buf_size;
1062
}
1063

    
1064
static int dyn_packet_buf_write(void *opaque, uint8_t *buf, int buf_size)
1065
{
1066
    unsigned char buf1[4];
1067
    int ret;
1068

    
1069
    /* packetized write: output the header */
1070
    AV_WB32(buf1, buf_size);
1071
    ret= dyn_buf_write(opaque, buf1, 4);
1072
    if(ret < 0)
1073
        return ret;
1074

    
1075
    /* then the data */
1076
    return dyn_buf_write(opaque, buf, buf_size);
1077
}
1078

    
1079
static int64_t dyn_buf_seek(void *opaque, int64_t offset, int whence)
1080
{
1081
    DynBuffer *d = opaque;
1082

    
1083
    if (whence == SEEK_CUR)
1084
        offset += d->pos;
1085
    else if (whence == SEEK_END)
1086
        offset += d->size;
1087
    if (offset < 0 || offset > 0x7fffffffLL)
1088
        return -1;
1089
    d->pos = offset;
1090
    return 0;
1091
}
1092

    
1093
static int url_open_dyn_buf_internal(AVIOContext **s, int max_packet_size)
1094
{
1095
    DynBuffer *d;
1096
    int ret;
1097
    unsigned io_buffer_size = max_packet_size ? max_packet_size : 1024;
1098

    
1099
    if(sizeof(DynBuffer) + io_buffer_size < io_buffer_size)
1100
        return -1;
1101
    d = av_mallocz(sizeof(DynBuffer) + io_buffer_size);
1102
    if (!d)
1103
        return AVERROR(ENOMEM);
1104
    *s = av_mallocz(sizeof(AVIOContext));
1105
    if(!*s) {
1106
        av_free(d);
1107
        return AVERROR(ENOMEM);
1108
    }
1109
    d->io_buffer_size = io_buffer_size;
1110
    ret = ffio_init_context(*s, d->io_buffer, io_buffer_size,
1111
                        1, d, NULL,
1112
                        max_packet_size ? dyn_packet_buf_write : dyn_buf_write,
1113
                        max_packet_size ? NULL : dyn_buf_seek);
1114
    if (ret == 0) {
1115
        (*s)->max_packet_size = max_packet_size;
1116
    } else {
1117
        av_free(d);
1118
        av_freep(s);
1119
    }
1120
    return ret;
1121
}
1122

    
1123
int url_open_dyn_buf(AVIOContext **s)
1124
{
1125
    return url_open_dyn_buf_internal(s, 0);
1126
}
1127

    
1128
int url_open_dyn_packet_buf(AVIOContext **s, int max_packet_size)
1129
{
1130
    if (max_packet_size <= 0)
1131
        return -1;
1132
    return url_open_dyn_buf_internal(s, max_packet_size);
1133
}
1134

    
1135
int url_close_dyn_buf(AVIOContext *s, uint8_t **pbuffer)
1136
{
1137
    DynBuffer *d = s->opaque;
1138
    int size;
1139
    static const char padbuf[FF_INPUT_BUFFER_PADDING_SIZE] = {0};
1140
    int padding = 0;
1141

    
1142
    /* don't attempt to pad fixed-size packet buffers */
1143
    if (!s->max_packet_size) {
1144
        avio_write(s, padbuf, sizeof(padbuf));
1145
        padding = FF_INPUT_BUFFER_PADDING_SIZE;
1146
    }
1147

    
1148
    avio_flush(s);
1149

    
1150
    *pbuffer = d->buffer;
1151
    size = d->size;
1152
    av_free(d);
1153
    av_free(s);
1154
    return size - padding;
1155
}
1156
#endif /* CONFIG_MUXERS || CONFIG_NETWORK */