Move ff_reverse in libavcodec to av_reverse in libavutil.
[ffmpeg.git] / libavcodec / utils.c
1 /*
2  * utils for libavcodec
3  * Copyright (c) 2001 Fabrice Bellard
4  * Copyright (c) 2002-2004 Michael Niedermayer <michaelni@gmx.at>
5  *
6  * This file is part of FFmpeg.
7  *
8  * FFmpeg is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * FFmpeg is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with FFmpeg; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22
23 /**
24  * @file libavcodec/utils.c
25  * utils.
26  */
27
28 /* needed for mkstemp() */
29 #define _XOPEN_SOURCE 600
30
31 #include "libavutil/avstring.h"
32 #include "libavutil/integer.h"
33 #include "libavutil/crc.h"
34 #include "avcodec.h"
35 #include "dsputil.h"
36 #include "opt.h"
37 #include "imgconvert.h"
38 #include "audioconvert.h"
39 #include "internal.h"
40 #include <stdlib.h>
41 #include <stdarg.h>
42 #include <limits.h>
43 #include <float.h>
44 #if !HAVE_MKSTEMP
45 #include <fcntl.h>
46 #endif
47
48 static int volatile entangled_thread_counter=0;
49 int (*ff_lockmgr_cb)(void **mutex, enum AVLockOp op);
50 static void *codec_mutex;
51
52 void *av_fast_realloc(void *ptr, unsigned int *size, unsigned int min_size)
53 {
54     if(min_size < *size)
55         return ptr;
56
57     *size= FFMAX(17*min_size/16 + 32, min_size);
58
59     ptr= av_realloc(ptr, *size);
60     if(!ptr) //we could set this to the unmodified min_size but this is safer if the user lost the ptr and uses NULL now
61         *size= 0;
62
63     return ptr;
64 }
65
66 void av_fast_malloc(void *ptr, unsigned int *size, unsigned int min_size)
67 {
68     void **p = ptr;
69     if (min_size < *size)
70         return;
71     *size= FFMAX(17*min_size/16 + 32, min_size);
72     av_free(*p);
73     *p = av_malloc(*size);
74     if (!*p) *size = 0;
75 }
76
77 /* encoder management */
78 static AVCodec *first_avcodec = NULL;
79
80 AVCodec *av_codec_next(AVCodec *c){
81     if(c) return c->next;
82     else  return first_avcodec;
83 }
84
85 void avcodec_register(AVCodec *codec)
86 {
87     AVCodec **p;
88     avcodec_init();
89     p = &first_avcodec;
90     while (*p != NULL) p = &(*p)->next;
91     *p = codec;
92     codec->next = NULL;
93 }
94
95 #if LIBAVCODEC_VERSION_MAJOR < 53
96 void register_avcodec(AVCodec *codec)
97 {
98     avcodec_register(codec);
99 }
100 #endif
101
102 void avcodec_set_dimensions(AVCodecContext *s, int width, int height){
103     s->coded_width = width;
104     s->coded_height= height;
105     s->width = -((-width )>>s->lowres);
106     s->height= -((-height)>>s->lowres);
107 }
108
109 typedef struct InternalBuffer{
110     int last_pic_num;
111     uint8_t *base[4];
112     uint8_t *data[4];
113     int linesize[4];
114     int width, height;
115     enum PixelFormat pix_fmt;
116 }InternalBuffer;
117
118 #define INTERNAL_BUFFER_SIZE 32
119
120 void avcodec_align_dimensions(AVCodecContext *s, int *width, int *height){
121     int w_align= 1;
122     int h_align= 1;
123
124     switch(s->pix_fmt){
125     case PIX_FMT_YUV420P:
126     case PIX_FMT_YUYV422:
127     case PIX_FMT_UYVY422:
128     case PIX_FMT_YUV422P:
129     case PIX_FMT_YUV444P:
130     case PIX_FMT_GRAY8:
131     case PIX_FMT_GRAY16BE:
132     case PIX_FMT_GRAY16LE:
133     case PIX_FMT_YUVJ420P:
134     case PIX_FMT_YUVJ422P:
135     case PIX_FMT_YUVJ444P:
136     case PIX_FMT_YUVA420P:
137         w_align= 16; //FIXME check for non mpeg style codecs and use less alignment
138         h_align= 16;
139         if(s->codec_id == CODEC_ID_MPEG2VIDEO)
140             h_align= 32; // interlaced is rounded up to 2 MBs
141         break;
142     case PIX_FMT_YUV411P:
143     case PIX_FMT_UYYVYY411:
144         w_align=32;
145         h_align=8;
146         break;
147     case PIX_FMT_YUV410P:
148         if(s->codec_id == CODEC_ID_SVQ1){
149             w_align=64;
150             h_align=64;
151         }
152     case PIX_FMT_RGB555:
153         if(s->codec_id == CODEC_ID_RPZA){
154             w_align=4;
155             h_align=4;
156         }
157     case PIX_FMT_PAL8:
158     case PIX_FMT_BGR8:
159     case PIX_FMT_RGB8:
160         if(s->codec_id == CODEC_ID_SMC){
161             w_align=4;
162             h_align=4;
163         }
164         break;
165     case PIX_FMT_BGR24:
166         if((s->codec_id == CODEC_ID_MSZH) || (s->codec_id == CODEC_ID_ZLIB)){
167             w_align=4;
168             h_align=4;
169         }
170         break;
171     default:
172         w_align= 1;
173         h_align= 1;
174         break;
175     }
176
177     *width = FFALIGN(*width , w_align);
178     *height= FFALIGN(*height, h_align);
179     if(s->codec_id == CODEC_ID_H264)
180         *height+=2; // some of the optimized chroma MC reads one line too much
181 }
182
183 int avcodec_check_dimensions(void *av_log_ctx, unsigned int w, unsigned int h){
184     if((int)w>0 && (int)h>0 && (w+128)*(uint64_t)(h+128) < INT_MAX/8)
185         return 0;
186
187     av_log(av_log_ctx, AV_LOG_ERROR, "picture size invalid (%ux%u)\n", w, h);
188     return -1;
189 }
190
191 int avcodec_default_get_buffer(AVCodecContext *s, AVFrame *pic){
192     int i;
193     int w= s->width;
194     int h= s->height;
195     InternalBuffer *buf;
196     int *picture_number;
197
198     if(pic->data[0]!=NULL) {
199         av_log(s, AV_LOG_ERROR, "pic->data[0]!=NULL in avcodec_default_get_buffer\n");
200         return -1;
201     }
202     if(s->internal_buffer_count >= INTERNAL_BUFFER_SIZE) {
203         av_log(s, AV_LOG_ERROR, "internal_buffer_count overflow (missing release_buffer?)\n");
204         return -1;
205     }
206
207     if(avcodec_check_dimensions(s,w,h))
208         return -1;
209
210     if(s->internal_buffer==NULL){
211         s->internal_buffer= av_mallocz((INTERNAL_BUFFER_SIZE+1)*sizeof(InternalBuffer));
212     }
213 #if 0
214     s->internal_buffer= av_fast_realloc(
215         s->internal_buffer,
216         &s->internal_buffer_size,
217         sizeof(InternalBuffer)*FFMAX(99,  s->internal_buffer_count+1)/*FIXME*/
218         );
219 #endif
220
221     buf= &((InternalBuffer*)s->internal_buffer)[s->internal_buffer_count];
222     picture_number= &(((InternalBuffer*)s->internal_buffer)[INTERNAL_BUFFER_SIZE]).last_pic_num; //FIXME ugly hack
223     (*picture_number)++;
224
225     if(buf->base[0] && (buf->width != w || buf->height != h || buf->pix_fmt != s->pix_fmt)){
226         for(i=0; i<4; i++){
227             av_freep(&buf->base[i]);
228             buf->data[i]= NULL;
229         }
230     }
231
232     if(buf->base[0]){
233         pic->age= *picture_number - buf->last_pic_num;
234         buf->last_pic_num= *picture_number;
235     }else{
236         int h_chroma_shift, v_chroma_shift;
237         int size[4] = {0};
238         int tmpsize;
239         int unaligned;
240         AVPicture picture;
241         int stride_align[4];
242
243         avcodec_get_chroma_sub_sample(s->pix_fmt, &h_chroma_shift, &v_chroma_shift);
244
245         avcodec_align_dimensions(s, &w, &h);
246
247         if(!(s->flags&CODEC_FLAG_EMU_EDGE)){
248             w+= EDGE_WIDTH*2;
249             h+= EDGE_WIDTH*2;
250         }
251
252         do {
253             // NOTE: do not align linesizes individually, this breaks e.g. assumptions
254             // that linesize[0] == 2*linesize[1] in the MPEG-encoder for 4:2:2
255             ff_fill_linesize(&picture, s->pix_fmt, w);
256             // increase alignment of w for next try (rhs gives the lowest bit set in w)
257             w += w & ~(w-1);
258
259             unaligned = 0;
260             for (i=0; i<4; i++){
261 //STRIDE_ALIGN is 8 for SSE* but this does not work for SVQ1 chroma planes
262 //we could change STRIDE_ALIGN to 16 for x86/sse but it would increase the
263 //picture size unneccessarily in some cases. The solution here is not
264 //pretty and better ideas are welcome!
265 #if HAVE_MMX
266                 if(s->codec_id == CODEC_ID_SVQ1)
267                     stride_align[i]= 16;
268                 else
269 #endif
270                 stride_align[i] = STRIDE_ALIGN;
271                 unaligned |= picture.linesize[i] % stride_align[i];
272             }
273         } while (unaligned);
274
275         tmpsize = ff_fill_pointer(&picture, NULL, s->pix_fmt, h);
276         if (tmpsize < 0)
277             return -1;
278
279         for (i=0; i<3 && picture.data[i+1]; i++)
280             size[i] = picture.data[i+1] - picture.data[i];
281         size[i] = tmpsize - (picture.data[i] - picture.data[0]);
282
283         buf->last_pic_num= -256*256*256*64;
284         memset(buf->base, 0, sizeof(buf->base));
285         memset(buf->data, 0, sizeof(buf->data));
286
287         for(i=0; i<4 && size[i]; i++){
288             const int h_shift= i==0 ? 0 : h_chroma_shift;
289             const int v_shift= i==0 ? 0 : v_chroma_shift;
290
291             buf->linesize[i]= picture.linesize[i];
292
293             buf->base[i]= av_malloc(size[i]+16); //FIXME 16
294             if(buf->base[i]==NULL) return -1;
295             memset(buf->base[i], 128, size[i]);
296
297             // no edge if EDEG EMU or not planar YUV
298             if((s->flags&CODEC_FLAG_EMU_EDGE) || !size[2])
299                 buf->data[i] = buf->base[i];
300             else
301                 buf->data[i] = buf->base[i] + FFALIGN((buf->linesize[i]*EDGE_WIDTH>>v_shift) + (EDGE_WIDTH>>h_shift), stride_align[i]);
302         }
303         if(size[1] && !size[2])
304             ff_set_systematic_pal((uint32_t*)buf->data[1], s->pix_fmt);
305         buf->width  = s->width;
306         buf->height = s->height;
307         buf->pix_fmt= s->pix_fmt;
308         pic->age= 256*256*256*64;
309     }
310     pic->type= FF_BUFFER_TYPE_INTERNAL;
311
312     for(i=0; i<4; i++){
313         pic->base[i]= buf->base[i];
314         pic->data[i]= buf->data[i];
315         pic->linesize[i]= buf->linesize[i];
316     }
317     s->internal_buffer_count++;
318
319     pic->reordered_opaque= s->reordered_opaque;
320
321     if(s->debug&FF_DEBUG_BUFFERS)
322         av_log(s, AV_LOG_DEBUG, "default_get_buffer called on pic %p, %d buffers used\n", pic, s->internal_buffer_count);
323
324     return 0;
325 }
326
327 void avcodec_default_release_buffer(AVCodecContext *s, AVFrame *pic){
328     int i;
329     InternalBuffer *buf, *last;
330
331     assert(pic->type==FF_BUFFER_TYPE_INTERNAL);
332     assert(s->internal_buffer_count);
333
334     buf = NULL; /* avoids warning */
335     for(i=0; i<s->internal_buffer_count; i++){ //just 3-5 checks so is not worth to optimize
336         buf= &((InternalBuffer*)s->internal_buffer)[i];
337         if(buf->data[0] == pic->data[0])
338             break;
339     }
340     assert(i < s->internal_buffer_count);
341     s->internal_buffer_count--;
342     last = &((InternalBuffer*)s->internal_buffer)[s->internal_buffer_count];
343
344     FFSWAP(InternalBuffer, *buf, *last);
345
346     for(i=0; i<4; i++){
347         pic->data[i]=NULL;
348 //        pic->base[i]=NULL;
349     }
350 //printf("R%X\n", pic->opaque);
351
352     if(s->debug&FF_DEBUG_BUFFERS)
353         av_log(s, AV_LOG_DEBUG, "default_release_buffer called on pic %p, %d buffers used\n", pic, s->internal_buffer_count);
354 }
355
356 int avcodec_default_reget_buffer(AVCodecContext *s, AVFrame *pic){
357     AVFrame temp_pic;
358     int i;
359
360     /* If no picture return a new buffer */
361     if(pic->data[0] == NULL) {
362         /* We will copy from buffer, so must be readable */
363         pic->buffer_hints |= FF_BUFFER_HINTS_READABLE;
364         return s->get_buffer(s, pic);
365     }
366
367     /* If internal buffer type return the same buffer */
368     if(pic->type == FF_BUFFER_TYPE_INTERNAL)
369         return 0;
370
371     /*
372      * Not internal type and reget_buffer not overridden, emulate cr buffer
373      */
374     temp_pic = *pic;
375     for(i = 0; i < 4; i++)
376         pic->data[i] = pic->base[i] = NULL;
377     pic->opaque = NULL;
378     /* Allocate new frame */
379     if (s->get_buffer(s, pic))
380         return -1;
381     /* Copy image data from old buffer to new buffer */
382     av_picture_copy((AVPicture*)pic, (AVPicture*)&temp_pic, s->pix_fmt, s->width,
383              s->height);
384     s->release_buffer(s, &temp_pic); // Release old frame
385     return 0;
386 }
387
388 int avcodec_default_execute(AVCodecContext *c, int (*func)(AVCodecContext *c2, void *arg2),void *arg, int *ret, int count, int size){
389     int i;
390
391     for(i=0; i<count; i++){
392         int r= func(c, (char*)arg + i*size);
393         if(ret) ret[i]= r;
394     }
395     return 0;
396 }
397
398 int avcodec_default_execute2(AVCodecContext *c, int (*func)(AVCodecContext *c2, void *arg2, int jobnr, int threadnr),void *arg, int *ret, int count){
399     int i;
400
401     for(i=0; i<count; i++){
402         int r= func(c, arg, i, 0);
403         if(ret) ret[i]= r;
404     }
405     return 0;
406 }
407
408 enum PixelFormat avcodec_default_get_format(struct AVCodecContext *s, const enum PixelFormat *fmt){
409     while (*fmt != PIX_FMT_NONE && ff_is_hwaccel_pix_fmt(*fmt))
410         ++fmt;
411     return fmt[0];
412 }
413
414 void avcodec_get_frame_defaults(AVFrame *pic){
415     memset(pic, 0, sizeof(AVFrame));
416
417     pic->pts= AV_NOPTS_VALUE;
418     pic->key_frame= 1;
419 }
420
421 AVFrame *avcodec_alloc_frame(void){
422     AVFrame *pic= av_malloc(sizeof(AVFrame));
423
424     if(pic==NULL) return NULL;
425
426     avcodec_get_frame_defaults(pic);
427
428     return pic;
429 }
430
431 int attribute_align_arg avcodec_open(AVCodecContext *avctx, AVCodec *codec)
432 {
433     int ret= -1;
434
435     /* If there is a user-supplied mutex locking routine, call it. */
436     if (ff_lockmgr_cb) {
437         if ((*ff_lockmgr_cb)(&codec_mutex, AV_LOCK_OBTAIN))
438             return -1;
439     }
440
441     entangled_thread_counter++;
442     if(entangled_thread_counter != 1){
443         av_log(avctx, AV_LOG_ERROR, "insufficient thread locking around avcodec_open/close()\n");
444         goto end;
445     }
446
447     if(avctx->codec || !codec)
448         goto end;
449
450     if (codec->priv_data_size > 0) {
451         avctx->priv_data = av_mallocz(codec->priv_data_size);
452         if (!avctx->priv_data) {
453             ret = AVERROR(ENOMEM);
454             goto end;
455         }
456     } else {
457         avctx->priv_data = NULL;
458     }
459
460     if(avctx->coded_width && avctx->coded_height)
461         avcodec_set_dimensions(avctx, avctx->coded_width, avctx->coded_height);
462     else if(avctx->width && avctx->height)
463         avcodec_set_dimensions(avctx, avctx->width, avctx->height);
464
465 #define SANE_NB_CHANNELS 128U
466     if (((avctx->coded_width || avctx->coded_height)
467         && avcodec_check_dimensions(avctx, avctx->coded_width, avctx->coded_height))
468         || avctx->channels > SANE_NB_CHANNELS) {
469         ret = AVERROR(EINVAL);
470         goto free_and_end;
471     }
472
473     avctx->codec = codec;
474     if ((avctx->codec_type == CODEC_TYPE_UNKNOWN || avctx->codec_type == codec->type) &&
475         avctx->codec_id == CODEC_ID_NONE) {
476         avctx->codec_type = codec->type;
477         avctx->codec_id   = codec->id;
478     }
479     if(avctx->codec_id != codec->id || avctx->codec_type != codec->type){
480         av_log(avctx, AV_LOG_ERROR, "codec type or id mismatches\n");
481         goto free_and_end;
482     }
483     avctx->frame_number = 0;
484     if(avctx->codec->init){
485         ret = avctx->codec->init(avctx);
486         if (ret < 0) {
487             goto free_and_end;
488         }
489     }
490     ret=0;
491 end:
492     entangled_thread_counter--;
493
494     /* Release any user-supplied mutex. */
495     if (ff_lockmgr_cb) {
496         (*ff_lockmgr_cb)(&codec_mutex, AV_LOCK_RELEASE);
497     }
498     return ret;
499 free_and_end:
500     av_freep(&avctx->priv_data);
501     avctx->codec= NULL;
502     goto end;
503 }
504
505 int attribute_align_arg avcodec_encode_audio(AVCodecContext *avctx, uint8_t *buf, int buf_size,
506                          const short *samples)
507 {
508     if(buf_size < FF_MIN_BUFFER_SIZE && 0){
509         av_log(avctx, AV_LOG_ERROR, "buffer smaller than minimum size\n");
510         return -1;
511     }
512     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || samples){
513         int ret = avctx->codec->encode(avctx, buf, buf_size, samples);
514         avctx->frame_number++;
515         return ret;
516     }else
517         return 0;
518 }
519
520 int attribute_align_arg avcodec_encode_video(AVCodecContext *avctx, uint8_t *buf, int buf_size,
521                          const AVFrame *pict)
522 {
523     if(buf_size < FF_MIN_BUFFER_SIZE){
524         av_log(avctx, AV_LOG_ERROR, "buffer smaller than minimum size\n");
525         return -1;
526     }
527     if(avcodec_check_dimensions(avctx,avctx->width,avctx->height))
528         return -1;
529     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || pict){
530         int ret = avctx->codec->encode(avctx, buf, buf_size, pict);
531         avctx->frame_number++;
532         emms_c(); //needed to avoid an emms_c() call before every return;
533
534         return ret;
535     }else
536         return 0;
537 }
538
539 int avcodec_encode_subtitle(AVCodecContext *avctx, uint8_t *buf, int buf_size,
540                             const AVSubtitle *sub)
541 {
542     int ret;
543     if(sub->start_display_time) {
544         av_log(avctx, AV_LOG_ERROR, "start_display_time must be 0.\n");
545         return -1;
546     }
547     if(sub->num_rects == 0 || !sub->rects)
548         return -1;
549     ret = avctx->codec->encode(avctx, buf, buf_size, sub);
550     avctx->frame_number++;
551     return ret;
552 }
553
554 #if LIBAVCODEC_VERSION_MAJOR < 53
555 int attribute_align_arg avcodec_decode_video(AVCodecContext *avctx, AVFrame *picture,
556                          int *got_picture_ptr,
557                          const uint8_t *buf, int buf_size)
558 {
559     AVPacket avpkt;
560     av_init_packet(&avpkt);
561     avpkt.data = buf;
562     avpkt.size = buf_size;
563     // HACK for CorePNG to decode as normal PNG by default
564     avpkt.flags = AV_PKT_FLAG_KEY;
565
566     return avcodec_decode_video2(avctx, picture, got_picture_ptr, &avpkt);
567 }
568 #endif
569
570 int attribute_align_arg avcodec_decode_video2(AVCodecContext *avctx, AVFrame *picture,
571                          int *got_picture_ptr,
572                          AVPacket *avpkt)
573 {
574     int ret;
575
576     *got_picture_ptr= 0;
577     if((avctx->coded_width||avctx->coded_height) && avcodec_check_dimensions(avctx,avctx->coded_width,avctx->coded_height))
578         return -1;
579     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || avpkt->size){
580         ret = avctx->codec->decode(avctx, picture, got_picture_ptr,
581                                 avpkt);
582
583         emms_c(); //needed to avoid an emms_c() call before every return;
584
585         if (*got_picture_ptr)
586             avctx->frame_number++;
587     }else
588         ret= 0;
589
590     return ret;
591 }
592
593 #if LIBAVCODEC_VERSION_MAJOR < 53
594 int attribute_align_arg avcodec_decode_audio2(AVCodecContext *avctx, int16_t *samples,
595                          int *frame_size_ptr,
596                          const uint8_t *buf, int buf_size)
597 {
598     AVPacket avpkt;
599     av_init_packet(&avpkt);
600     avpkt.data = buf;
601     avpkt.size = buf_size;
602
603     return avcodec_decode_audio3(avctx, samples, frame_size_ptr, &avpkt);
604 }
605 #endif
606
607 int attribute_align_arg avcodec_decode_audio3(AVCodecContext *avctx, int16_t *samples,
608                          int *frame_size_ptr,
609                          AVPacket *avpkt)
610 {
611     int ret;
612
613     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || avpkt->size){
614         //FIXME remove the check below _after_ ensuring that all audio check that the available space is enough
615         if(*frame_size_ptr < AVCODEC_MAX_AUDIO_FRAME_SIZE){
616             av_log(avctx, AV_LOG_ERROR, "buffer smaller than AVCODEC_MAX_AUDIO_FRAME_SIZE\n");
617             return -1;
618         }
619         if(*frame_size_ptr < FF_MIN_BUFFER_SIZE ||
620         *frame_size_ptr < avctx->channels * avctx->frame_size * sizeof(int16_t)){
621             av_log(avctx, AV_LOG_ERROR, "buffer %d too small\n", *frame_size_ptr);
622             return -1;
623         }
624
625         ret = avctx->codec->decode(avctx, samples, frame_size_ptr, avpkt);
626         avctx->frame_number++;
627     }else{
628         ret= 0;
629         *frame_size_ptr=0;
630     }
631     return ret;
632 }
633
634 #if LIBAVCODEC_VERSION_MAJOR < 53
635 int avcodec_decode_subtitle(AVCodecContext *avctx, AVSubtitle *sub,
636                             int *got_sub_ptr,
637                             const uint8_t *buf, int buf_size)
638 {
639     AVPacket avpkt;
640     av_init_packet(&avpkt);
641     avpkt.data = buf;
642     avpkt.size = buf_size;
643
644     return avcodec_decode_subtitle2(avctx, sub, got_sub_ptr, &avpkt);
645 }
646 #endif
647
648 int avcodec_decode_subtitle2(AVCodecContext *avctx, AVSubtitle *sub,
649                             int *got_sub_ptr,
650                             AVPacket *avpkt)
651 {
652     int ret;
653
654     *got_sub_ptr = 0;
655     ret = avctx->codec->decode(avctx, sub, got_sub_ptr, avpkt);
656     if (*got_sub_ptr)
657         avctx->frame_number++;
658     return ret;
659 }
660
661 int avcodec_close(AVCodecContext *avctx)
662 {
663     /* If there is a user-supplied mutex locking routine, call it. */
664     if (ff_lockmgr_cb) {
665         if ((*ff_lockmgr_cb)(&codec_mutex, AV_LOCK_OBTAIN))
666             return -1;
667     }
668
669     entangled_thread_counter++;
670     if(entangled_thread_counter != 1){
671         av_log(avctx, AV_LOG_ERROR, "insufficient thread locking around avcodec_open/close()\n");
672         entangled_thread_counter--;
673         return -1;
674     }
675
676     if (HAVE_THREADS && avctx->thread_opaque)
677         avcodec_thread_free(avctx);
678     if (avctx->codec->close)
679         avctx->codec->close(avctx);
680     avcodec_default_free_buffers(avctx);
681     av_freep(&avctx->priv_data);
682     avctx->codec = NULL;
683     entangled_thread_counter--;
684
685     /* Release any user-supplied mutex. */
686     if (ff_lockmgr_cb) {
687         (*ff_lockmgr_cb)(&codec_mutex, AV_LOCK_RELEASE);
688     }
689     return 0;
690 }
691
692 AVCodec *avcodec_find_encoder(enum CodecID id)
693 {
694     AVCodec *p;
695     p = first_avcodec;
696     while (p) {
697         if (p->encode != NULL && p->id == id)
698             return p;
699         p = p->next;
700     }
701     return NULL;
702 }
703
704 AVCodec *avcodec_find_encoder_by_name(const char *name)
705 {
706     AVCodec *p;
707     if (!name)
708         return NULL;
709     p = first_avcodec;
710     while (p) {
711         if (p->encode != NULL && strcmp(name,p->name) == 0)
712             return p;
713         p = p->next;
714     }
715     return NULL;
716 }
717
718 AVCodec *avcodec_find_decoder(enum CodecID id)
719 {
720     AVCodec *p;
721     p = first_avcodec;
722     while (p) {
723         if (p->decode != NULL && p->id == id)
724             return p;
725         p = p->next;
726     }
727     return NULL;
728 }
729
730 AVCodec *avcodec_find_decoder_by_name(const char *name)
731 {
732     AVCodec *p;
733     if (!name)
734         return NULL;
735     p = first_avcodec;
736     while (p) {
737         if (p->decode != NULL && strcmp(name,p->name) == 0)
738             return p;
739         p = p->next;
740     }
741     return NULL;
742 }
743
744 void avcodec_string(char *buf, int buf_size, AVCodecContext *enc, int encode)
745 {
746     const char *codec_name;
747     AVCodec *p;
748     char buf1[32];
749     int bitrate;
750     AVRational display_aspect_ratio;
751
752     if (encode)
753         p = avcodec_find_encoder(enc->codec_id);
754     else
755         p = avcodec_find_decoder(enc->codec_id);
756
757     if (p) {
758         codec_name = p->name;
759     } else if (enc->codec_id == CODEC_ID_MPEG2TS) {
760         /* fake mpeg2 transport stream codec (currently not
761            registered) */
762         codec_name = "mpeg2ts";
763     } else if (enc->codec_name[0] != '\0') {
764         codec_name = enc->codec_name;
765     } else {
766         /* output avi tags */
767         if(   isprint(enc->codec_tag&0xFF) && isprint((enc->codec_tag>>8)&0xFF)
768            && isprint((enc->codec_tag>>16)&0xFF) && isprint((enc->codec_tag>>24)&0xFF)){
769             snprintf(buf1, sizeof(buf1), "%c%c%c%c / 0x%04X",
770                      enc->codec_tag & 0xff,
771                      (enc->codec_tag >> 8) & 0xff,
772                      (enc->codec_tag >> 16) & 0xff,
773                      (enc->codec_tag >> 24) & 0xff,
774                       enc->codec_tag);
775         } else {
776             snprintf(buf1, sizeof(buf1), "0x%04x", enc->codec_tag);
777         }
778         codec_name = buf1;
779     }
780
781     switch(enc->codec_type) {
782     case CODEC_TYPE_VIDEO:
783         snprintf(buf, buf_size,
784                  "Video: %s%s",
785                  codec_name, enc->mb_decision ? " (hq)" : "");
786         if (enc->pix_fmt != PIX_FMT_NONE) {
787             snprintf(buf + strlen(buf), buf_size - strlen(buf),
788                      ", %s",
789                      avcodec_get_pix_fmt_name(enc->pix_fmt));
790         }
791         if (enc->width) {
792             snprintf(buf + strlen(buf), buf_size - strlen(buf),
793                      ", %dx%d",
794                      enc->width, enc->height);
795             if (enc->sample_aspect_ratio.num) {
796                 av_reduce(&display_aspect_ratio.num, &display_aspect_ratio.den,
797                           enc->width*enc->sample_aspect_ratio.num,
798                           enc->height*enc->sample_aspect_ratio.den,
799                           1024*1024);
800                 snprintf(buf + strlen(buf), buf_size - strlen(buf),
801                          " [PAR %d:%d DAR %d:%d]",
802                          enc->sample_aspect_ratio.num, enc->sample_aspect_ratio.den,
803                          display_aspect_ratio.num, display_aspect_ratio.den);
804             }
805             if(av_log_get_level() >= AV_LOG_DEBUG){
806                 int g= av_gcd(enc->time_base.num, enc->time_base.den);
807                 snprintf(buf + strlen(buf), buf_size - strlen(buf),
808                      ", %d/%d",
809                      enc->time_base.num/g, enc->time_base.den/g);
810             }
811         }
812         if (encode) {
813             snprintf(buf + strlen(buf), buf_size - strlen(buf),
814                      ", q=%d-%d", enc->qmin, enc->qmax);
815         }
816         bitrate = enc->bit_rate;
817         break;
818     case CODEC_TYPE_AUDIO:
819         snprintf(buf, buf_size,
820                  "Audio: %s",
821                  codec_name);
822         if (enc->sample_rate) {
823             snprintf(buf + strlen(buf), buf_size - strlen(buf),
824                      ", %d Hz", enc->sample_rate);
825         }
826         av_strlcat(buf, ", ", buf_size);
827         avcodec_get_channel_layout_string(buf + strlen(buf), buf_size - strlen(buf), enc->channels, enc->channel_layout);
828         if (enc->sample_fmt != SAMPLE_FMT_NONE) {
829             snprintf(buf + strlen(buf), buf_size - strlen(buf),
830                      ", %s", avcodec_get_sample_fmt_name(enc->sample_fmt));
831         }
832
833         /* for PCM codecs, compute bitrate directly */
834         switch(enc->codec_id) {
835         case CODEC_ID_PCM_F64BE:
836         case CODEC_ID_PCM_F64LE:
837             bitrate = enc->sample_rate * enc->channels * 64;
838             break;
839         case CODEC_ID_PCM_S32LE:
840         case CODEC_ID_PCM_S32BE:
841         case CODEC_ID_PCM_U32LE:
842         case CODEC_ID_PCM_U32BE:
843         case CODEC_ID_PCM_F32BE:
844         case CODEC_ID_PCM_F32LE:
845             bitrate = enc->sample_rate * enc->channels * 32;
846             break;
847         case CODEC_ID_PCM_S24LE:
848         case CODEC_ID_PCM_S24BE:
849         case CODEC_ID_PCM_U24LE:
850         case CODEC_ID_PCM_U24BE:
851         case CODEC_ID_PCM_S24DAUD:
852             bitrate = enc->sample_rate * enc->channels * 24;
853             break;
854         case CODEC_ID_PCM_S16LE:
855         case CODEC_ID_PCM_S16BE:
856         case CODEC_ID_PCM_S16LE_PLANAR:
857         case CODEC_ID_PCM_U16LE:
858         case CODEC_ID_PCM_U16BE:
859             bitrate = enc->sample_rate * enc->channels * 16;
860             break;
861         case CODEC_ID_PCM_S8:
862         case CODEC_ID_PCM_U8:
863         case CODEC_ID_PCM_ALAW:
864         case CODEC_ID_PCM_MULAW:
865         case CODEC_ID_PCM_ZORK:
866             bitrate = enc->sample_rate * enc->channels * 8;
867             break;
868         default:
869             bitrate = enc->bit_rate;
870             break;
871         }
872         break;
873     case CODEC_TYPE_DATA:
874         snprintf(buf, buf_size, "Data: %s", codec_name);
875         bitrate = enc->bit_rate;
876         break;
877     case CODEC_TYPE_SUBTITLE:
878         snprintf(buf, buf_size, "Subtitle: %s", codec_name);
879         bitrate = enc->bit_rate;
880         break;
881     case CODEC_TYPE_ATTACHMENT:
882         snprintf(buf, buf_size, "Attachment: %s", codec_name);
883         bitrate = enc->bit_rate;
884         break;
885     default:
886         snprintf(buf, buf_size, "Invalid Codec type %d", enc->codec_type);
887         return;
888     }
889     if (encode) {
890         if (enc->flags & CODEC_FLAG_PASS1)
891             snprintf(buf + strlen(buf), buf_size - strlen(buf),
892                      ", pass 1");
893         if (enc->flags & CODEC_FLAG_PASS2)
894             snprintf(buf + strlen(buf), buf_size - strlen(buf),
895                      ", pass 2");
896     }
897     if (bitrate != 0) {
898         snprintf(buf + strlen(buf), buf_size - strlen(buf),
899                  ", %d kb/s", bitrate / 1000);
900     }
901 }
902
903 unsigned avcodec_version( void )
904 {
905   return LIBAVCODEC_VERSION_INT;
906 }
907
908 void avcodec_init(void)
909 {
910     static int initialized = 0;
911
912     if (initialized != 0)
913         return;
914     initialized = 1;
915
916     dsputil_static_init();
917 }
918
919 void avcodec_flush_buffers(AVCodecContext *avctx)
920 {
921     if(avctx->codec->flush)
922         avctx->codec->flush(avctx);
923 }
924
925 void avcodec_default_free_buffers(AVCodecContext *s){
926     int i, j;
927
928     if(s->internal_buffer==NULL) return;
929
930     if (s->internal_buffer_count)
931         av_log(s, AV_LOG_WARNING, "Found %i unreleased buffers!\n", s->internal_buffer_count);
932     for(i=0; i<INTERNAL_BUFFER_SIZE; i++){
933         InternalBuffer *buf= &((InternalBuffer*)s->internal_buffer)[i];
934         for(j=0; j<4; j++){
935             av_freep(&buf->base[j]);
936             buf->data[j]= NULL;
937         }
938     }
939     av_freep(&s->internal_buffer);
940
941     s->internal_buffer_count=0;
942 }
943
944 char av_get_pict_type_char(int pict_type){
945     switch(pict_type){
946     case FF_I_TYPE: return 'I';
947     case FF_P_TYPE: return 'P';
948     case FF_B_TYPE: return 'B';
949     case FF_S_TYPE: return 'S';
950     case FF_SI_TYPE:return 'i';
951     case FF_SP_TYPE:return 'p';
952     case FF_BI_TYPE:return 'b';
953     default:        return '?';
954     }
955 }
956
957 int av_get_bits_per_sample(enum CodecID codec_id){
958     switch(codec_id){
959     case CODEC_ID_ADPCM_SBPRO_2:
960         return 2;
961     case CODEC_ID_ADPCM_SBPRO_3:
962         return 3;
963     case CODEC_ID_ADPCM_SBPRO_4:
964     case CODEC_ID_ADPCM_CT:
965         return 4;
966     case CODEC_ID_PCM_ALAW:
967     case CODEC_ID_PCM_MULAW:
968     case CODEC_ID_PCM_S8:
969     case CODEC_ID_PCM_U8:
970     case CODEC_ID_PCM_ZORK:
971         return 8;
972     case CODEC_ID_PCM_S16BE:
973     case CODEC_ID_PCM_S16LE:
974     case CODEC_ID_PCM_S16LE_PLANAR:
975     case CODEC_ID_PCM_U16BE:
976     case CODEC_ID_PCM_U16LE:
977         return 16;
978     case CODEC_ID_PCM_S24DAUD:
979     case CODEC_ID_PCM_S24BE:
980     case CODEC_ID_PCM_S24LE:
981     case CODEC_ID_PCM_U24BE:
982     case CODEC_ID_PCM_U24LE:
983         return 24;
984     case CODEC_ID_PCM_S32BE:
985     case CODEC_ID_PCM_S32LE:
986     case CODEC_ID_PCM_U32BE:
987     case CODEC_ID_PCM_U32LE:
988     case CODEC_ID_PCM_F32BE:
989     case CODEC_ID_PCM_F32LE:
990         return 32;
991     case CODEC_ID_PCM_F64BE:
992     case CODEC_ID_PCM_F64LE:
993         return 64;
994     default:
995         return 0;
996     }
997 }
998
999 int av_get_bits_per_sample_format(enum SampleFormat sample_fmt) {
1000     switch (sample_fmt) {
1001     case SAMPLE_FMT_U8:
1002         return 8;
1003     case SAMPLE_FMT_S16:
1004         return 16;
1005     case SAMPLE_FMT_S32:
1006     case SAMPLE_FMT_FLT:
1007         return 32;
1008     case SAMPLE_FMT_DBL:
1009         return 64;
1010     default:
1011         return 0;
1012     }
1013 }
1014
1015 #if !HAVE_THREADS
1016 int avcodec_thread_init(AVCodecContext *s, int thread_count){
1017     s->thread_count = thread_count;
1018     return -1;
1019 }
1020 #endif
1021
1022 unsigned int av_xiphlacing(unsigned char *s, unsigned int v)
1023 {
1024     unsigned int n = 0;
1025
1026     while(v >= 0xff) {
1027         *s++ = 0xff;
1028         v -= 0xff;
1029         n++;
1030     }
1031     *s = v;
1032     n++;
1033     return n;
1034 }
1035
1036 /* Wrapper to work around the lack of mkstemp() on mingw/cygin.
1037  * Also, tries to create file in /tmp first, if possible.
1038  * *prefix can be a character constant; *filename will be allocated internally.
1039  * Returns file descriptor of opened file (or -1 on error)
1040  * and opened file name in **filename. */
1041 int av_tempfile(char *prefix, char **filename) {
1042     int fd=-1;
1043 #if !HAVE_MKSTEMP
1044     *filename = tempnam(".", prefix);
1045 #else
1046     size_t len = strlen(prefix) + 12; /* room for "/tmp/" and "XXXXXX\0" */
1047     *filename = av_malloc(len);
1048 #endif
1049     /* -----common section-----*/
1050     if (*filename == NULL) {
1051         av_log(NULL, AV_LOG_ERROR, "ff_tempfile: Cannot allocate file name\n");
1052         return -1;
1053     }
1054 #if !HAVE_MKSTEMP
1055     fd = open(*filename, O_RDWR | O_BINARY | O_CREAT, 0444);
1056 #else
1057     snprintf(*filename, len, "/tmp/%sXXXXXX", prefix);
1058     fd = mkstemp(*filename);
1059     if (fd < 0) {
1060         snprintf(*filename, len, "./%sXXXXXX", prefix);
1061         fd = mkstemp(*filename);
1062     }
1063 #endif
1064     /* -----common section-----*/
1065     if (fd < 0) {
1066         av_log(NULL, AV_LOG_ERROR, "ff_tempfile: Cannot open temporary file %s\n", *filename);
1067         return -1;
1068     }
1069     return fd; /* success */
1070 }
1071
1072 typedef struct {
1073     const char *abbr;
1074     int width, height;
1075 } VideoFrameSizeAbbr;
1076
1077 typedef struct {
1078     const char *abbr;
1079     int rate_num, rate_den;
1080 } VideoFrameRateAbbr;
1081
1082 static const VideoFrameSizeAbbr video_frame_size_abbrs[] = {
1083     { "ntsc",      720, 480 },
1084     { "pal",       720, 576 },
1085     { "qntsc",     352, 240 }, /* VCD compliant NTSC */
1086     { "qpal",      352, 288 }, /* VCD compliant PAL */
1087     { "sntsc",     640, 480 }, /* square pixel NTSC */
1088     { "spal",      768, 576 }, /* square pixel PAL */
1089     { "film",      352, 240 },
1090     { "ntsc-film", 352, 240 },
1091     { "sqcif",     128,  96 },
1092     { "qcif",      176, 144 },
1093     { "cif",       352, 288 },
1094     { "4cif",      704, 576 },
1095     { "16cif",    1408,1152 },
1096     { "qqvga",     160, 120 },
1097     { "qvga",      320, 240 },
1098     { "vga",       640, 480 },
1099     { "svga",      800, 600 },
1100     { "xga",      1024, 768 },
1101     { "uxga",     1600,1200 },
1102     { "qxga",     2048,1536 },
1103     { "sxga",     1280,1024 },
1104     { "qsxga",    2560,2048 },
1105     { "hsxga",    5120,4096 },
1106     { "wvga",      852, 480 },
1107     { "wxga",     1366, 768 },
1108     { "wsxga",    1600,1024 },
1109     { "wuxga",    1920,1200 },
1110     { "woxga",    2560,1600 },
1111     { "wqsxga",   3200,2048 },
1112     { "wquxga",   3840,2400 },
1113     { "whsxga",   6400,4096 },
1114     { "whuxga",   7680,4800 },
1115     { "cga",       320, 200 },
1116     { "ega",       640, 350 },
1117     { "hd480",     852, 480 },
1118     { "hd720",    1280, 720 },
1119     { "hd1080",   1920,1080 },
1120 };
1121
1122 static const VideoFrameRateAbbr video_frame_rate_abbrs[]= {
1123     { "ntsc",      30000, 1001 },
1124     { "pal",          25,    1 },
1125     { "qntsc",     30000, 1001 }, /* VCD compliant NTSC */
1126     { "qpal",         25,    1 }, /* VCD compliant PAL */
1127     { "sntsc",     30000, 1001 }, /* square pixel NTSC */
1128     { "spal",         25,    1 }, /* square pixel PAL */
1129     { "film",         24,    1 },
1130     { "ntsc-film", 24000, 1001 },
1131 };
1132
1133 int av_parse_video_frame_size(int *width_ptr, int *height_ptr, const char *str)
1134 {
1135     int i;
1136     int n = FF_ARRAY_ELEMS(video_frame_size_abbrs);
1137     char *p;
1138     int frame_width = 0, frame_height = 0;
1139
1140     for(i=0;i<n;i++) {
1141         if (!strcmp(video_frame_size_abbrs[i].abbr, str)) {
1142             frame_width = video_frame_size_abbrs[i].width;
1143             frame_height = video_frame_size_abbrs[i].height;
1144             break;
1145         }
1146     }
1147     if (i == n) {
1148         p = str;
1149         frame_width = strtol(p, &p, 10);
1150         if (*p)
1151             p++;
1152         frame_height = strtol(p, &p, 10);
1153     }
1154     if (frame_width <= 0 || frame_height <= 0)
1155         return -1;
1156     *width_ptr = frame_width;
1157     *height_ptr = frame_height;
1158     return 0;
1159 }
1160
1161 int av_parse_video_frame_rate(AVRational *frame_rate, const char *arg)
1162 {
1163     int i;
1164     int n = FF_ARRAY_ELEMS(video_frame_rate_abbrs);
1165     char* cp;
1166
1167     /* First, we check our abbreviation table */
1168     for (i = 0; i < n; ++i)
1169          if (!strcmp(video_frame_rate_abbrs[i].abbr, arg)) {
1170              frame_rate->num = video_frame_rate_abbrs[i].rate_num;
1171              frame_rate->den = video_frame_rate_abbrs[i].rate_den;
1172              return 0;
1173          }
1174
1175     /* Then, we try to parse it as fraction */
1176     cp = strchr(arg, '/');
1177     if (!cp)
1178         cp = strchr(arg, ':');
1179     if (cp) {
1180         char* cpp;
1181         frame_rate->num = strtol(arg, &cpp, 10);
1182         if (cpp != arg || cpp == cp)
1183             frame_rate->den = strtol(cp+1, &cpp, 10);
1184         else
1185            frame_rate->num = 0;
1186     }
1187     else {
1188         /* Finally we give up and parse it as double */
1189         AVRational time_base = av_d2q(strtod(arg, 0), 1001000);
1190         frame_rate->den = time_base.den;
1191         frame_rate->num = time_base.num;
1192     }
1193     if (!frame_rate->num || !frame_rate->den)
1194         return -1;
1195     else
1196         return 0;
1197 }
1198
1199 void av_log_missing_feature(void *avc, const char *feature, int want_sample)
1200 {
1201     av_log(avc, AV_LOG_WARNING, "%s not implemented. Update your FFmpeg "
1202             "version to the newest one from SVN. If the problem still "
1203             "occurs, it means that your file has a feature which has not "
1204             "been implemented.", feature);
1205     if(want_sample)
1206         av_log_ask_for_sample(avc, NULL);
1207     else
1208         av_log(avc, AV_LOG_WARNING, "\n");
1209 }
1210
1211 void av_log_ask_for_sample(void *avc, const char *msg)
1212 {
1213     if (msg)
1214         av_log(avc, AV_LOG_WARNING, "%s ", msg);
1215     av_log(avc, AV_LOG_WARNING, "If you want to help, upload a sample "
1216             "of this file to ftp://upload.ffmpeg.org/MPlayer/incoming/ "
1217             "and contact the ffmpeg-devel mailing list.\n");
1218 }
1219
1220 static AVHWAccel *first_hwaccel = NULL;
1221
1222 void av_register_hwaccel(AVHWAccel *hwaccel)
1223 {
1224     AVHWAccel **p = &first_hwaccel;
1225     while (*p)
1226         p = &(*p)->next;
1227     *p = hwaccel;
1228     hwaccel->next = NULL;
1229 }
1230
1231 AVHWAccel *av_hwaccel_next(AVHWAccel *hwaccel)
1232 {
1233     return hwaccel ? hwaccel->next : first_hwaccel;
1234 }
1235
1236 AVHWAccel *ff_find_hwaccel(enum CodecID codec_id, enum PixelFormat pix_fmt)
1237 {
1238     AVHWAccel *hwaccel=NULL;
1239
1240     while((hwaccel= av_hwaccel_next(hwaccel))){
1241         if (   hwaccel->id      == codec_id
1242             && hwaccel->pix_fmt == pix_fmt)
1243             return hwaccel;
1244     }
1245     return NULL;
1246 }
1247
1248 int av_lockmgr_register(int (*cb)(void **mutex, enum AVLockOp op))
1249 {
1250     if (ff_lockmgr_cb) {
1251         if (ff_lockmgr_cb(&codec_mutex, AV_LOCK_DESTROY))
1252             return -1;
1253     }
1254
1255     ff_lockmgr_cb = cb;
1256
1257     if (ff_lockmgr_cb) {
1258         if (ff_lockmgr_cb(&codec_mutex, AV_LOCK_CREATE))
1259             return -1;
1260     }
1261     return 0;
1262 }