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 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 const uint8_t ff_reverse[256]={
  49 0x00,0x80,0x40,0xC0,0x20,0xA0,0x60,0xE0,0x10,0x90,0x50,0xD0,0x30,0xB0,0x70,0xF0,
  50 0x08,0x88,0x48,0xC8,0x28,0xA8,0x68,0xE8,0x18,0x98,0x58,0xD8,0x38,0xB8,0x78,0xF8,
  51 0x04,0x84,0x44,0xC4,0x24,0xA4,0x64,0xE4,0x14,0x94,0x54,0xD4,0x34,0xB4,0x74,0xF4,
  52 0x0C,0x8C,0x4C,0xCC,0x2C,0xAC,0x6C,0xEC,0x1C,0x9C,0x5C,0xDC,0x3C,0xBC,0x7C,0xFC,
  53 0x02,0x82,0x42,0xC2,0x22,0xA2,0x62,0xE2,0x12,0x92,0x52,0xD2,0x32,0xB2,0x72,0xF2,
  54 0x0A,0x8A,0x4A,0xCA,0x2A,0xAA,0x6A,0xEA,0x1A,0x9A,0x5A,0xDA,0x3A,0xBA,0x7A,0xFA,
  55 0x06,0x86,0x46,0xC6,0x26,0xA6,0x66,0xE6,0x16,0x96,0x56,0xD6,0x36,0xB6,0x76,0xF6,
  56 0x0E,0x8E,0x4E,0xCE,0x2E,0xAE,0x6E,0xEE,0x1E,0x9E,0x5E,0xDE,0x3E,0xBE,0x7E,0xFE,
  57 0x01,0x81,0x41,0xC1,0x21,0xA1,0x61,0xE1,0x11,0x91,0x51,0xD1,0x31,0xB1,0x71,0xF1,
  58 0x09,0x89,0x49,0xC9,0x29,0xA9,0x69,0xE9,0x19,0x99,0x59,0xD9,0x39,0xB9,0x79,0xF9,
  59 0x05,0x85,0x45,0xC5,0x25,0xA5,0x65,0xE5,0x15,0x95,0x55,0xD5,0x35,0xB5,0x75,0xF5,
  60 0x0D,0x8D,0x4D,0xCD,0x2D,0xAD,0x6D,0xED,0x1D,0x9D,0x5D,0xDD,0x3D,0xBD,0x7D,0xFD,
  61 0x03,0x83,0x43,0xC3,0x23,0xA3,0x63,0xE3,0x13,0x93,0x53,0xD3,0x33,0xB3,0x73,0xF3,
  62 0x0B,0x8B,0x4B,0xCB,0x2B,0xAB,0x6B,0xEB,0x1B,0x9B,0x5B,0xDB,0x3B,0xBB,0x7B,0xFB,
  63 0x07,0x87,0x47,0xC7,0x27,0xA7,0x67,0xE7,0x17,0x97,0x57,0xD7,0x37,0xB7,0x77,0xF7,
  64 0x0F,0x8F,0x4F,0xCF,0x2F,0xAF,0x6F,0xEF,0x1F,0x9F,0x5F,0xDF,0x3F,0xBF,0x7F,0xFF,
  65 };
  66
  67 static int volatile entangled_thread_counter=0;
  68
  69 void *av_fast_realloc(void *ptr, unsigned int *size, unsigned int min_size)
  70 {
  71     if(min_size < *size)
  72         return ptr;
  73
  74     *size= FFMAX(17*min_size/16 + 32, min_size);
  75
  76     ptr= av_realloc(ptr, *size);
  77     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
  78         *size= 0;
  79
  80     return ptr;
  81 }
  82
  83 /* encoder management */
  84 static AVCodec *first_avcodec = NULL;
  85
  86 AVCodec *av_codec_next(AVCodec *c){
  87     if(c) return c->next;
  88     else  return first_avcodec;
  89 }
  90
  91 void register_avcodec(AVCodec *codec)
  92 {
  93     AVCodec **p;
  94     avcodec_init();
  95     p = &first_avcodec;
  96     while (*p != NULL) p = &(*p)->next;
  97     *p = codec;
  98     codec->next = NULL;
  99 }
 100
 101 void avcodec_set_dimensions(AVCodecContext *s, int width, int height){
 102     s->coded_width = width;
 103     s->coded_height= height;
 104     s->width = -((-width )>>s->lowres);
 105     s->height= -((-height)>>s->lowres);
 106 }
 107
 108 typedef struct InternalBuffer{
 109     int last_pic_num;
 110     uint8_t *base[4];
 111     uint8_t *data[4];
 112     int linesize[4];
 113     int width, height;
 114     enum PixelFormat pix_fmt;
 115 }InternalBuffer;
 116
 117 #define INTERNAL_BUFFER_SIZE 32
 118
 119 #define ALIGN(x, a) (((x)+(a)-1)&~((a)-1))
 120
 121 void avcodec_align_dimensions(AVCodecContext *s, int *width, int *height){
 122     int w_align= 1;
 123     int h_align= 1;
 124
 125     switch(s->pix_fmt){
 126     case PIX_FMT_YUV420P:
 127     case PIX_FMT_YUYV422:
 128     case PIX_FMT_UYVY422:
 129     case PIX_FMT_YUV422P:
 130     case PIX_FMT_YUV444P:
 131     case PIX_FMT_GRAY8:
 132     case PIX_FMT_GRAY16BE:
 133     case PIX_FMT_GRAY16LE:
 134     case PIX_FMT_YUVJ420P:
 135     case PIX_FMT_YUVJ422P:
 136     case PIX_FMT_YUVJ444P:
 137     case PIX_FMT_YUVA420P:
 138         w_align= 16; //FIXME check for non mpeg style codecs and use less alignment
 139         h_align= 16;
 140         break;
 141     case PIX_FMT_YUV411P:
 142     case PIX_FMT_UYYVYY411:
 143         w_align=32;
 144         h_align=8;
 145         break;
 146     case PIX_FMT_YUV410P:
 147         if(s->codec_id == CODEC_ID_SVQ1){
 148             w_align=64;
 149             h_align=64;
 150         }
 151     case PIX_FMT_RGB555:
 152         if(s->codec_id == CODEC_ID_RPZA){
 153             w_align=4;
 154             h_align=4;
 155         }
 156     case PIX_FMT_PAL8:
 157         if(s->codec_id == CODEC_ID_SMC){
 158             w_align=4;
 159             h_align=4;
 160         }
 161         break;
 162     case PIX_FMT_BGR24:
 163         if((s->codec_id == CODEC_ID_MSZH) || (s->codec_id == CODEC_ID_ZLIB)){
 164             w_align=4;
 165             h_align=4;
 166         }
 167         break;
 168     default:
 169         w_align= 1;
 170         h_align= 1;
 171         break;
 172     }
 173
 174     *width = ALIGN(*width , w_align);
 175     *height= ALIGN(*height, h_align);
 176     if(s->codec_id == CODEC_ID_H264)
 177         *height+=2; // some of the optimized chroma MC reads one line too much
 178 }
 179
 180 int avcodec_check_dimensions(void *av_log_ctx, unsigned int w, unsigned int h){
 181     if((int)w>0 && (int)h>0 && (w+128)*(uint64_t)(h+128) < INT_MAX/4)
 182         return 0;
 183
 184     av_log(av_log_ctx, AV_LOG_ERROR, "picture size invalid (%ux%u)\n", w, h);
 185     return -1;
 186 }
 187
 188 int avcodec_default_get_buffer(AVCodecContext *s, AVFrame *pic){
 189     int i;
 190     int w= s->width;
 191     int h= s->height;
 192     InternalBuffer *buf;
 193     int *picture_number;
 194
 195     if(pic->data[0]!=NULL) {
 196         av_log(s, AV_LOG_ERROR, "pic->data[0]!=NULL in avcodec_default_get_buffer\n");
 197         return -1;
 198     }
 199     if(s->internal_buffer_count >= INTERNAL_BUFFER_SIZE) {
 200         av_log(s, AV_LOG_ERROR, "internal_buffer_count overflow (missing release_buffer?)\n");
 201         return -1;
 202     }
 203
 204     if(avcodec_check_dimensions(s,w,h))
 205         return -1;
 206
 207     if(s->internal_buffer==NULL){
 208         s->internal_buffer= av_mallocz((INTERNAL_BUFFER_SIZE+1)*sizeof(InternalBuffer));
 209     }
 210 #if 0
 211     s->internal_buffer= av_fast_realloc(
 212         s->internal_buffer,
 213         &s->internal_buffer_size,
 214         sizeof(InternalBuffer)*FFMAX(99,  s->internal_buffer_count+1)/*FIXME*/
 215         );
 216 #endif
 217
 218     buf= &((InternalBuffer*)s->internal_buffer)[s->internal_buffer_count];
 219     picture_number= &(((InternalBuffer*)s->internal_buffer)[INTERNAL_BUFFER_SIZE]).last_pic_num; //FIXME ugly hack
 220     (*picture_number)++;
 221
 222     if(buf->base[0] && (buf->width != w || buf->height != h || buf->pix_fmt != s->pix_fmt)){
 223         for(i=0; i<4; i++){
 224             av_freep(&buf->base[i]);
 225             buf->data[i]= NULL;
 226         }
 227     }
 228
 229     if(buf->base[0]){
 230         pic->age= *picture_number - buf->last_pic_num;
 231         buf->last_pic_num= *picture_number;
 232     }else{
 233         int h_chroma_shift, v_chroma_shift;
 234         int size[4] = {0};
 235         int tmpsize;
 236         AVPicture picture;
 237         int stride_align[4];
 238
 239         avcodec_get_chroma_sub_sample(s->pix_fmt, &h_chroma_shift, &v_chroma_shift);
 240
 241         avcodec_align_dimensions(s, &w, &h);
 242
 243         if(!(s->flags&CODEC_FLAG_EMU_EDGE)){
 244             w+= EDGE_WIDTH*2;
 245             h+= EDGE_WIDTH*2;
 246         }
 247
 248         ff_fill_linesize(&picture, s->pix_fmt, w);
 249
 250         for (i=0; i<4; i++){
 251 //STRIDE_ALIGN is 8 for SSE* but this does not work for SVQ1 chroma planes
 252 //we could change STRIDE_ALIGN to 16 for x86/sse but it would increase the
 253 //picture size unneccessarily in some cases. The solution here is not
 254 //pretty and better ideas are welcome!
 255 #if HAVE_MMX
 256             if(s->codec_id == CODEC_ID_SVQ1)
 257                 stride_align[i]= 16;
 258             else
 259 #endif
 260             stride_align[i] = STRIDE_ALIGN;
 261             picture.linesize[i] = ALIGN(picture.linesize[i], stride_align[i]);
 262         }
 263
 264         tmpsize = ff_fill_pointer(&picture, NULL, s->pix_fmt, h);
 265
 266         for (i=0; i<3 && picture.data[i+1]; i++)
 267             size[i] = picture.data[i+1] - picture.data[i];
 268         size[i] = tmpsize - (picture.data[i] - picture.data[0]);
 269
 270         buf->last_pic_num= -256*256*256*64;
 271         memset(buf->base, 0, sizeof(buf->base));
 272         memset(buf->data, 0, sizeof(buf->data));
 273
 274         for(i=0; i<4 && size[i]; i++){
 275             const int h_shift= i==0 ? 0 : h_chroma_shift;
 276             const int v_shift= i==0 ? 0 : v_chroma_shift;
 277
 278             buf->linesize[i]= picture.linesize[i];
 279
 280             buf->base[i]= av_malloc(size[i]+16); //FIXME 16
 281             if(buf->base[i]==NULL) return -1;
 282             memset(buf->base[i], 128, size[i]);
 283
 284             // no edge if EDEG EMU or not planar YUV, we check for PAL8 redundantly to protect against a exploitable bug regression ...
 285             if((s->flags&CODEC_FLAG_EMU_EDGE) || (s->pix_fmt == PIX_FMT_PAL8) || !size[2])
 286                 buf->data[i] = buf->base[i];
 287             else
 288                 buf->data[i] = buf->base[i] + ALIGN((buf->linesize[i]*EDGE_WIDTH>>v_shift) + (EDGE_WIDTH>>h_shift), stride_align[i]);
 289         }
 290         buf->width  = s->width;
 291         buf->height = s->height;
 292         buf->pix_fmt= s->pix_fmt;
 293         pic->age= 256*256*256*64;
 294     }
 295     pic->type= FF_BUFFER_TYPE_INTERNAL;
 296
 297     for(i=0; i<4; i++){
 298         pic->base[i]= buf->base[i];
 299         pic->data[i]= buf->data[i];
 300         pic->linesize[i]= buf->linesize[i];
 301     }
 302     s->internal_buffer_count++;
 303
 304     pic->reordered_opaque= s->reordered_opaque;
 305
 306     if(s->debug&FF_DEBUG_BUFFERS)
 307         av_log(s, AV_LOG_DEBUG, "default_get_buffer called on pic %p, %d buffers used\n", pic, s->internal_buffer_count);
 308
 309     return 0;
 310 }
 311
 312 void avcodec_default_release_buffer(AVCodecContext *s, AVFrame *pic){
 313     int i;
 314     InternalBuffer *buf, *last;
 315
 316     assert(pic->type==FF_BUFFER_TYPE_INTERNAL);
 317     assert(s->internal_buffer_count);
 318
 319     buf = NULL; /* avoids warning */
 320     for(i=0; i<s->internal_buffer_count; i++){ //just 3-5 checks so is not worth to optimize
 321         buf= &((InternalBuffer*)s->internal_buffer)[i];
 322         if(buf->data[0] == pic->data[0])
 323             break;
 324     }
 325     assert(i < s->internal_buffer_count);
 326     s->internal_buffer_count--;
 327     last = &((InternalBuffer*)s->internal_buffer)[s->internal_buffer_count];
 328
 329     FFSWAP(InternalBuffer, *buf, *last);
 330
 331     for(i=0; i<4; i++){
 332         pic->data[i]=NULL;
 333 //        pic->base[i]=NULL;
 334     }
 335 //printf("R%X\n", pic->opaque);
 336
 337     if(s->debug&FF_DEBUG_BUFFERS)
 338         av_log(s, AV_LOG_DEBUG, "default_release_buffer called on pic %p, %d buffers used\n", pic, s->internal_buffer_count);
 339 }
 340
 341 int avcodec_default_reget_buffer(AVCodecContext *s, AVFrame *pic){
 342     AVFrame temp_pic;
 343     int i;
 344
 345     /* If no picture return a new buffer */
 346     if(pic->data[0] == NULL) {
 347         /* We will copy from buffer, so must be readable */
 348         pic->buffer_hints |= FF_BUFFER_HINTS_READABLE;
 349         return s->get_buffer(s, pic);
 350     }
 351
 352     /* If internal buffer type return the same buffer */
 353     if(pic->type == FF_BUFFER_TYPE_INTERNAL)
 354         return 0;
 355
 356     /*
 357      * Not internal type and reget_buffer not overridden, emulate cr buffer
 358      */
 359     temp_pic = *pic;
 360     for(i = 0; i < 4; i++)
 361         pic->data[i] = pic->base[i] = NULL;
 362     pic->opaque = NULL;
 363     /* Allocate new frame */
 364     if (s->get_buffer(s, pic))
 365         return -1;
 366     /* Copy image data from old buffer to new buffer */
 367     av_picture_copy((AVPicture*)pic, (AVPicture*)&temp_pic, s->pix_fmt, s->width,
 368              s->height);
 369     s->release_buffer(s, &temp_pic); // Release old frame
 370     return 0;
 371 }
 372
 373 int avcodec_default_execute(AVCodecContext *c, int (*func)(AVCodecContext *c2, void *arg2),void *arg, int *ret, int count, int size){
 374     int i;
 375
 376     for(i=0; i<count; i++){
 377         int r= func(c, (char*)arg + i*size);
 378         if(ret) ret[i]= r;
 379     }
 380     return 0;
 381 }
 382
 383 enum PixelFormat avcodec_default_get_format(struct AVCodecContext *s, const enum PixelFormat * fmt){
 384     return fmt[0];
 385 }
 386
 387 void avcodec_get_frame_defaults(AVFrame *pic){
 388     memset(pic, 0, sizeof(AVFrame));
 389
 390     pic->pts= AV_NOPTS_VALUE;
 391     pic->key_frame= 1;
 392 }
 393
 394 AVFrame *avcodec_alloc_frame(void){
 395     AVFrame *pic= av_malloc(sizeof(AVFrame));
 396
 397     if(pic==NULL) return NULL;
 398
 399     avcodec_get_frame_defaults(pic);
 400
 401     return pic;
 402 }
 403
 404 int attribute_align_arg avcodec_open(AVCodecContext *avctx, AVCodec *codec)
 405 {
 406     int ret= -1;
 407
 408     entangled_thread_counter++;
 409     if(entangled_thread_counter != 1){
 410         av_log(avctx, AV_LOG_ERROR, "insufficient thread locking around avcodec_open/close()\n");
 411         goto end;
 412     }
 413
 414     if(avctx->codec || !codec)
 415         goto end;
 416
 417     if (codec->priv_data_size > 0) {
 418         avctx->priv_data = av_mallocz(codec->priv_data_size);
 419         if (!avctx->priv_data) {
 420             ret = AVERROR(ENOMEM);
 421             goto end;
 422         }
 423     } else {
 424         avctx->priv_data = NULL;
 425     }
 426
 427     if(avctx->coded_width && avctx->coded_height)
 428         avcodec_set_dimensions(avctx, avctx->coded_width, avctx->coded_height);
 429     else if(avctx->width && avctx->height)
 430         avcodec_set_dimensions(avctx, avctx->width, avctx->height);
 431
 432     if((avctx->coded_width||avctx->coded_height) && avcodec_check_dimensions(avctx,avctx->coded_width,avctx->coded_height)){
 433         av_freep(&avctx->priv_data);
 434         ret = AVERROR(EINVAL);
 435         goto end;
 436     }
 437
 438     avctx->codec = codec;
 439     avctx->codec_id = codec->id;
 440     avctx->frame_number = 0;
 441     if(avctx->codec->init){
 442         ret = avctx->codec->init(avctx);
 443         if (ret < 0) {
 444             av_freep(&avctx->priv_data);
 445             avctx->codec= NULL;
 446             goto end;
 447         }
 448     }
 449     ret=0;
 450 end:
 451     entangled_thread_counter--;
 452     return ret;
 453 }
 454
 455 int attribute_align_arg avcodec_encode_audio(AVCodecContext *avctx, uint8_t *buf, int buf_size,
 456                          const short *samples)
 457 {
 458     if(buf_size < FF_MIN_BUFFER_SIZE && 0){
 459         av_log(avctx, AV_LOG_ERROR, "buffer smaller than minimum size\n");
 460         return -1;
 461     }
 462     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || samples){
 463         int ret = avctx->codec->encode(avctx, buf, buf_size, (void *)samples);
 464         avctx->frame_number++;
 465         return ret;
 466     }else
 467         return 0;
 468 }
 469
 470 int attribute_align_arg avcodec_encode_video(AVCodecContext *avctx, uint8_t *buf, int buf_size,
 471                          const AVFrame *pict)
 472 {
 473     if(buf_size < FF_MIN_BUFFER_SIZE){
 474         av_log(avctx, AV_LOG_ERROR, "buffer smaller than minimum size\n");
 475         return -1;
 476     }
 477     if(avcodec_check_dimensions(avctx,avctx->width,avctx->height))
 478         return -1;
 479     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || pict){
 480         int ret = avctx->codec->encode(avctx, buf, buf_size, (void *)pict);
 481         avctx->frame_number++;
 482         emms_c(); //needed to avoid an emms_c() call before every return;
 483
 484         return ret;
 485     }else
 486         return 0;
 487 }
 488
 489 int avcodec_encode_subtitle(AVCodecContext *avctx, uint8_t *buf, int buf_size,
 490                             const AVSubtitle *sub)
 491 {
 492     int ret;
 493     ret = avctx->codec->encode(avctx, buf, buf_size, (void *)sub);
 494     avctx->frame_number++;
 495     return ret;
 496 }
 497
 498 int attribute_align_arg avcodec_decode_video(AVCodecContext *avctx, AVFrame *picture,
 499                          int *got_picture_ptr,
 500                          const uint8_t *buf, int buf_size)
 501 {
 502     int ret;
 503
 504     *got_picture_ptr= 0;
 505     if((avctx->coded_width||avctx->coded_height) && avcodec_check_dimensions(avctx,avctx->coded_width,avctx->coded_height))
 506         return -1;
 507     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || buf_size){
 508         ret = avctx->codec->decode(avctx, picture, got_picture_ptr,
 509                                 buf, buf_size);
 510
 511         emms_c(); //needed to avoid an emms_c() call before every return;
 512
 513         if (*got_picture_ptr)
 514             avctx->frame_number++;
 515     }else
 516         ret= 0;
 517
 518     return ret;
 519 }
 520
 521 int attribute_align_arg avcodec_decode_audio2(AVCodecContext *avctx, int16_t *samples,
 522                          int *frame_size_ptr,
 523                          const uint8_t *buf, int buf_size)
 524 {
 525     int ret;
 526
 527     if((avctx->codec->capabilities & CODEC_CAP_DELAY) || buf_size){
 528         //FIXME remove the check below _after_ ensuring that all audio check that the available space is enough
 529         if(*frame_size_ptr < AVCODEC_MAX_AUDIO_FRAME_SIZE){
 530             av_log(avctx, AV_LOG_ERROR, "buffer smaller than AVCODEC_MAX_AUDIO_FRAME_SIZE\n");
 531             return -1;
 532         }
 533         if(*frame_size_ptr < FF_MIN_BUFFER_SIZE ||
 534         *frame_size_ptr < avctx->channels * avctx->frame_size * sizeof(int16_t)){
 535             av_log(avctx, AV_LOG_ERROR, "buffer %d too small\n", *frame_size_ptr);
 536             return -1;
 537         }
 538
 539         ret = avctx->codec->decode(avctx, samples, frame_size_ptr,
 540                                 buf, buf_size);
 541         avctx->frame_number++;
 542     }else{
 543         ret= 0;
 544         *frame_size_ptr=0;
 545     }
 546     return ret;
 547 }
 548
 549 int avcodec_decode_subtitle(AVCodecContext *avctx, AVSubtitle *sub,
 550                             int *got_sub_ptr,
 551                             const uint8_t *buf, int buf_size)
 552 {
 553     int ret;
 554
 555     *got_sub_ptr = 0;
 556     ret = avctx->codec->decode(avctx, sub, got_sub_ptr,
 557                                buf, buf_size);
 558     if (*got_sub_ptr)
 559         avctx->frame_number++;
 560     return ret;
 561 }
 562
 563 int avcodec_close(AVCodecContext *avctx)
 564 {
 565     entangled_thread_counter++;
 566     if(entangled_thread_counter != 1){
 567         av_log(avctx, AV_LOG_ERROR, "insufficient thread locking around avcodec_open/close()\n");
 568         entangled_thread_counter--;
 569         return -1;
 570     }
 571
 572     if (HAVE_THREADS && avctx->thread_opaque)
 573         avcodec_thread_free(avctx);
 574     if (avctx->codec->close)
 575         avctx->codec->close(avctx);
 576     avcodec_default_free_buffers(avctx);
 577     av_freep(&avctx->priv_data);
 578     avctx->codec = NULL;
 579     entangled_thread_counter--;
 580     return 0;
 581 }
 582
 583 AVCodec *avcodec_find_encoder(enum CodecID id)
 584 {
 585     AVCodec *p;
 586     p = first_avcodec;
 587     while (p) {
 588         if (p->encode != NULL && p->id == id)
 589             return p;
 590         p = p->next;
 591     }
 592     return NULL;
 593 }
 594
 595 AVCodec *avcodec_find_encoder_by_name(const char *name)
 596 {
 597     AVCodec *p;
 598     if (!name)
 599         return NULL;
 600     p = first_avcodec;
 601     while (p) {
 602         if (p->encode != NULL && strcmp(name,p->name) == 0)
 603             return p;
 604         p = p->next;
 605     }
 606     return NULL;
 607 }
 608
 609 AVCodec *avcodec_find_decoder(enum CodecID id)
 610 {
 611     AVCodec *p;
 612     p = first_avcodec;
 613     while (p) {
 614         if (p->decode != NULL && p->id == id)
 615             return p;
 616         p = p->next;
 617     }
 618     return NULL;
 619 }
 620
 621 AVCodec *avcodec_find_decoder_by_name(const char *name)
 622 {
 623     AVCodec *p;
 624     if (!name)
 625         return NULL;
 626     p = first_avcodec;
 627     while (p) {
 628         if (p->decode != NULL && strcmp(name,p->name) == 0)
 629             return p;
 630         p = p->next;
 631     }
 632     return NULL;
 633 }
 634
 635 void avcodec_string(char *buf, int buf_size, AVCodecContext *enc, int encode)
 636 {
 637     const char *codec_name;
 638     AVCodec *p;
 639     char buf1[32];
 640     int bitrate;
 641     AVRational display_aspect_ratio;
 642
 643     if (encode)
 644         p = avcodec_find_encoder(enc->codec_id);
 645     else
 646         p = avcodec_find_decoder(enc->codec_id);
 647
 648     if (p) {
 649         codec_name = p->name;
 650     } else if (enc->codec_id == CODEC_ID_MPEG2TS) {
 651         /* fake mpeg2 transport stream codec (currently not
 652            registered) */
 653         codec_name = "mpeg2ts";
 654     } else if (enc->codec_name[0] != '\0') {
 655         codec_name = enc->codec_name;
 656     } else {
 657         /* output avi tags */
 658         if(   isprint(enc->codec_tag&0xFF) && isprint((enc->codec_tag>>8)&0xFF)
 659            && isprint((enc->codec_tag>>16)&0xFF) && isprint((enc->codec_tag>>24)&0xFF)){
 660             snprintf(buf1, sizeof(buf1), "%c%c%c%c / 0x%04X",
 661                      enc->codec_tag & 0xff,
 662                      (enc->codec_tag >> 8) & 0xff,
 663                      (enc->codec_tag >> 16) & 0xff,
 664                      (enc->codec_tag >> 24) & 0xff,
 665                       enc->codec_tag);
 666         } else {
 667             snprintf(buf1, sizeof(buf1), "0x%04x", enc->codec_tag);
 668         }
 669         codec_name = buf1;
 670     }
 671
 672     switch(enc->codec_type) {
 673     case CODEC_TYPE_VIDEO:
 674         snprintf(buf, buf_size,
 675                  "Video: %s%s",
 676                  codec_name, enc->mb_decision ? " (hq)" : "");
 677         if (enc->pix_fmt != PIX_FMT_NONE) {
 678             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 679                      ", %s",
 680                      avcodec_get_pix_fmt_name(enc->pix_fmt));
 681         }
 682         if (enc->width) {
 683             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 684                      ", %dx%d",
 685                      enc->width, enc->height);
 686             if (enc->sample_aspect_ratio.num) {
 687                 av_reduce(&display_aspect_ratio.num, &display_aspect_ratio.den,
 688                           enc->width*enc->sample_aspect_ratio.num,
 689                           enc->height*enc->sample_aspect_ratio.den,
 690                           1024*1024);
 691                 snprintf(buf + strlen(buf), buf_size - strlen(buf),
 692                          " [PAR %d:%d DAR %d:%d]",
 693                          enc->sample_aspect_ratio.num, enc->sample_aspect_ratio.den,
 694                          display_aspect_ratio.num, display_aspect_ratio.den);
 695             }
 696             if(av_log_get_level() >= AV_LOG_DEBUG){
 697                 int g= av_gcd(enc->time_base.num, enc->time_base.den);
 698                 snprintf(buf + strlen(buf), buf_size - strlen(buf),
 699                      ", %d/%d",
 700                      enc->time_base.num/g, enc->time_base.den/g);
 701             }
 702         }
 703         if (encode) {
 704             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 705                      ", q=%d-%d", enc->qmin, enc->qmax);
 706         }
 707         bitrate = enc->bit_rate;
 708         break;
 709     case CODEC_TYPE_AUDIO:
 710         snprintf(buf, buf_size,
 711                  "Audio: %s",
 712                  codec_name);
 713         if (enc->sample_rate) {
 714             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 715                      ", %d Hz", enc->sample_rate);
 716         }
 717         av_strlcat(buf, ", ", buf_size);
 718         avcodec_get_channel_layout_string(buf + strlen(buf), buf_size - strlen(buf), enc->channels, enc->channel_layout);
 719         if (enc->sample_fmt != SAMPLE_FMT_NONE) {
 720             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 721                      ", %s", avcodec_get_sample_fmt_name(enc->sample_fmt));
 722         }
 723
 724         /* for PCM codecs, compute bitrate directly */
 725         switch(enc->codec_id) {
 726         case CODEC_ID_PCM_F64BE:
 727         case CODEC_ID_PCM_F64LE:
 728             bitrate = enc->sample_rate * enc->channels * 64;
 729             break;
 730         case CODEC_ID_PCM_S32LE:
 731         case CODEC_ID_PCM_S32BE:
 732         case CODEC_ID_PCM_U32LE:
 733         case CODEC_ID_PCM_U32BE:
 734         case CODEC_ID_PCM_F32BE:
 735         case CODEC_ID_PCM_F32LE:
 736             bitrate = enc->sample_rate * enc->channels * 32;
 737             break;
 738         case CODEC_ID_PCM_S24LE:
 739         case CODEC_ID_PCM_S24BE:
 740         case CODEC_ID_PCM_U24LE:
 741         case CODEC_ID_PCM_U24BE:
 742         case CODEC_ID_PCM_S24DAUD:
 743             bitrate = enc->sample_rate * enc->channels * 24;
 744             break;
 745         case CODEC_ID_PCM_S16LE:
 746         case CODEC_ID_PCM_S16BE:
 747         case CODEC_ID_PCM_S16LE_PLANAR:
 748         case CODEC_ID_PCM_U16LE:
 749         case CODEC_ID_PCM_U16BE:
 750             bitrate = enc->sample_rate * enc->channels * 16;
 751             break;
 752         case CODEC_ID_PCM_S8:
 753         case CODEC_ID_PCM_U8:
 754         case CODEC_ID_PCM_ALAW:
 755         case CODEC_ID_PCM_MULAW:
 756         case CODEC_ID_PCM_ZORK:
 757             bitrate = enc->sample_rate * enc->channels * 8;
 758             break;
 759         default:
 760             bitrate = enc->bit_rate;
 761             break;
 762         }
 763         break;
 764     case CODEC_TYPE_DATA:
 765         snprintf(buf, buf_size, "Data: %s", codec_name);
 766         bitrate = enc->bit_rate;
 767         break;
 768     case CODEC_TYPE_SUBTITLE:
 769         snprintf(buf, buf_size, "Subtitle: %s", codec_name);
 770         bitrate = enc->bit_rate;
 771         break;
 772     case CODEC_TYPE_ATTACHMENT:
 773         snprintf(buf, buf_size, "Attachment: %s", codec_name);
 774         bitrate = enc->bit_rate;
 775         break;
 776     default:
 777         snprintf(buf, buf_size, "Invalid Codec type %d", enc->codec_type);
 778         return;
 779     }
 780     if (encode) {
 781         if (enc->flags & CODEC_FLAG_PASS1)
 782             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 783                      ", pass 1");
 784         if (enc->flags & CODEC_FLAG_PASS2)
 785             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 786                      ", pass 2");
 787     }
 788     if (bitrate != 0) {
 789         snprintf(buf + strlen(buf), buf_size - strlen(buf),
 790                  ", %d kb/s", bitrate / 1000);
 791     }
 792 }
 793
 794 unsigned avcodec_version( void )
 795 {
 796   return LIBAVCODEC_VERSION_INT;
 797 }
 798
 799 void avcodec_init(void)
 800 {
 801     static int initialized = 0;
 802
 803     if (initialized != 0)
 804         return;
 805     initialized = 1;
 806
 807     dsputil_static_init();
 808 }
 809
 810 void avcodec_flush_buffers(AVCodecContext *avctx)
 811 {
 812     if(avctx->codec->flush)
 813         avctx->codec->flush(avctx);
 814 }
 815
 816 void avcodec_default_free_buffers(AVCodecContext *s){
 817     int i, j;
 818
 819     if(s->internal_buffer==NULL) return;
 820
 821     for(i=0; i<INTERNAL_BUFFER_SIZE; i++){
 822         InternalBuffer *buf= &((InternalBuffer*)s->internal_buffer)[i];
 823         for(j=0; j<4; j++){
 824             av_freep(&buf->base[j]);
 825             buf->data[j]= NULL;
 826         }
 827     }
 828     av_freep(&s->internal_buffer);
 829
 830     s->internal_buffer_count=0;
 831 }
 832
 833 char av_get_pict_type_char(int pict_type){
 834     switch(pict_type){
 835     case FF_I_TYPE: return 'I';
 836     case FF_P_TYPE: return 'P';
 837     case FF_B_TYPE: return 'B';
 838     case FF_S_TYPE: return 'S';
 839     case FF_SI_TYPE:return 'i';
 840     case FF_SP_TYPE:return 'p';
 841     case FF_BI_TYPE:return 'b';
 842     default:        return '?';
 843     }
 844 }
 845
 846 int av_get_bits_per_sample(enum CodecID codec_id){
 847     switch(codec_id){
 848     case CODEC_ID_ADPCM_SBPRO_2:
 849         return 2;
 850     case CODEC_ID_ADPCM_SBPRO_3:
 851         return 3;
 852     case CODEC_ID_ADPCM_SBPRO_4:
 853     case CODEC_ID_ADPCM_CT:
 854         return 4;
 855     case CODEC_ID_PCM_ALAW:
 856     case CODEC_ID_PCM_MULAW:
 857     case CODEC_ID_PCM_S8:
 858     case CODEC_ID_PCM_U8:
 859     case CODEC_ID_PCM_ZORK:
 860         return 8;
 861     case CODEC_ID_PCM_S16BE:
 862     case CODEC_ID_PCM_S16LE:
 863     case CODEC_ID_PCM_S16LE_PLANAR:
 864     case CODEC_ID_PCM_U16BE:
 865     case CODEC_ID_PCM_U16LE:
 866         return 16;
 867     case CODEC_ID_PCM_S24DAUD:
 868     case CODEC_ID_PCM_S24BE:
 869     case CODEC_ID_PCM_S24LE:
 870     case CODEC_ID_PCM_U24BE:
 871     case CODEC_ID_PCM_U24LE:
 872         return 24;
 873     case CODEC_ID_PCM_S32BE:
 874     case CODEC_ID_PCM_S32LE:
 875     case CODEC_ID_PCM_U32BE:
 876     case CODEC_ID_PCM_U32LE:
 877     case CODEC_ID_PCM_F32BE:
 878     case CODEC_ID_PCM_F32LE:
 879         return 32;
 880     case CODEC_ID_PCM_F64BE:
 881     case CODEC_ID_PCM_F64LE:
 882         return 64;
 883     default:
 884         return 0;
 885     }
 886 }
 887
 888 int av_get_bits_per_sample_format(enum SampleFormat sample_fmt) {
 889     switch (sample_fmt) {
 890     case SAMPLE_FMT_U8:
 891         return 8;
 892     case SAMPLE_FMT_S16:
 893         return 16;
 894     case SAMPLE_FMT_S32:
 895     case SAMPLE_FMT_FLT:
 896         return 32;
 897     case SAMPLE_FMT_DBL:
 898         return 64;
 899     default:
 900         return 0;
 901     }
 902 }
 903
 904 #if !HAVE_THREADS
 905 int avcodec_thread_init(AVCodecContext *s, int thread_count){
 906     return -1;
 907 }
 908 #endif
 909
 910 unsigned int av_xiphlacing(unsigned char *s, unsigned int v)
 911 {
 912     unsigned int n = 0;
 913
 914     while(v >= 0xff) {
 915         *s++ = 0xff;
 916         v -= 0xff;
 917         n++;
 918     }
 919     *s = v;
 920     n++;
 921     return n;
 922 }
 923
 924 /* Wrapper to work around the lack of mkstemp() on mingw/cygin.
 925  * Also, tries to create file in /tmp first, if possible.
 926  * *prefix can be a character constant; *filename will be allocated internally.
 927  * Returns file descriptor of opened file (or -1 on error)
 928  * and opened file name in **filename. */
 929 int av_tempfile(char *prefix, char **filename) {
 930     int fd=-1;
 931 #if !HAVE_MKSTEMP
 932     *filename = tempnam(".", prefix);
 933 #else
 934     size_t len = strlen(prefix) + 12; /* room for "/tmp/" and "XXXXXX\0" */
 935     *filename = av_malloc(len);
 936 #endif
 937     /* -----common section-----*/
 938     if (*filename == NULL) {
 939         av_log(NULL, AV_LOG_ERROR, "ff_tempfile: Cannot allocate file name\n");
 940         return -1;
 941     }
 942 #if !HAVE_MKSTEMP
 943     fd = open(*filename, O_RDWR | O_BINARY | O_CREAT, 0444);
 944 #else
 945     snprintf(*filename, len, "/tmp/%sXXXXXX", prefix);
 946     fd = mkstemp(*filename);
 947     if (fd < 0) {
 948         snprintf(*filename, len, "./%sXXXXXX", prefix);
 949         fd = mkstemp(*filename);
 950     }
 951 #endif
 952     /* -----common section-----*/
 953     if (fd < 0) {
 954         av_log(NULL, AV_LOG_ERROR, "ff_tempfile: Cannot open temporary file %s\n", *filename);
 955         return -1;
 956     }
 957     return fd; /* success */
 958 }
 959
 960 typedef struct {
 961     const char *abbr;
 962     int width, height;
 963 } VideoFrameSizeAbbr;
 964
 965 typedef struct {
 966     const char *abbr;
 967     int rate_num, rate_den;
 968 } VideoFrameRateAbbr;
 969
 970 static const VideoFrameSizeAbbr video_frame_size_abbrs[] = {
 971     { "ntsc",      720, 480 },
 972     { "pal",       720, 576 },
 973     { "qntsc",     352, 240 }, /* VCD compliant NTSC */
 974     { "qpal",      352, 288 }, /* VCD compliant PAL */
 975     { "sntsc",     640, 480 }, /* square pixel NTSC */
 976     { "spal",      768, 576 }, /* square pixel PAL */
 977     { "film",      352, 240 },
 978     { "ntsc-film", 352, 240 },
 979     { "sqcif",     128,  96 },
 980     { "qcif",      176, 144 },
 981     { "cif",       352, 288 },
 982     { "4cif",      704, 576 },
 983     { "qqvga",     160, 120 },
 984     { "qvga",      320, 240 },
 985     { "vga",       640, 480 },
 986     { "svga",      800, 600 },
 987     { "xga",      1024, 768 },
 988     { "uxga",     1600,1200 },
 989     { "qxga",     2048,1536 },
 990     { "sxga",     1280,1024 },
 991     { "qsxga",    2560,2048 },
 992     { "hsxga",    5120,4096 },
 993     { "wvga",      852, 480 },
 994     { "wxga",     1366, 768 },
 995     { "wsxga",    1600,1024 },
 996     { "wuxga",    1920,1200 },
 997     { "woxga",    2560,1600 },
 998     { "wqsxga",   3200,2048 },
 999     { "wquxga",   3840,2400 },
1000     { "whsxga",   6400,4096 },
1001     { "whuxga",   7680,4800 },
1002     { "cga",       320, 200 },
1003     { "ega",       640, 350 },
1004     { "hd480",     852, 480 },
1005     { "hd720",    1280, 720 },
1006     { "hd1080",   1920,1080 },
1007 };
1008
1009 static const VideoFrameRateAbbr video_frame_rate_abbrs[]= {
1010     { "ntsc",      30000, 1001 },
1011     { "pal",          25,    1 },
1012     { "qntsc",     30000, 1001 }, /* VCD compliant NTSC */
1013     { "qpal",         25,    1 }, /* VCD compliant PAL */
1014     { "sntsc",     30000, 1001 }, /* square pixel NTSC */
1015     { "spal",         25,    1 }, /* square pixel PAL */
1016     { "film",         24,    1 },
1017     { "ntsc-film", 24000, 1001 },
1018 };
1019
1020 int av_parse_video_frame_size(int *width_ptr, int *height_ptr, const char *str)
1021 {
1022     int i;
1023     int n = FF_ARRAY_ELEMS(video_frame_size_abbrs);
1024     const char *p;
1025     int frame_width = 0, frame_height = 0;
1026
1027     for(i=0;i<n;i++) {
1028         if (!strcmp(video_frame_size_abbrs[i].abbr, str)) {
1029             frame_width = video_frame_size_abbrs[i].width;
1030             frame_height = video_frame_size_abbrs[i].height;
1031             break;
1032         }
1033     }
1034     if (i == n) {
1035         p = str;
1036         frame_width = strtol(p, (char **)&p, 10);
1037         if (*p)
1038             p++;
1039         frame_height = strtol(p, (char **)&p, 10);
1040     }
1041     if (frame_width <= 0 || frame_height <= 0)
1042         return -1;
1043     *width_ptr = frame_width;
1044     *height_ptr = frame_height;
1045     return 0;
1046 }
1047
1048 int av_parse_video_frame_rate(AVRational *frame_rate, const char *arg)
1049 {
1050     int i;
1051     int n = FF_ARRAY_ELEMS(video_frame_rate_abbrs);
1052     char* cp;
1053
1054     /* First, we check our abbreviation table */
1055     for (i = 0; i < n; ++i)
1056          if (!strcmp(video_frame_rate_abbrs[i].abbr, arg)) {
1057              frame_rate->num = video_frame_rate_abbrs[i].rate_num;
1058              frame_rate->den = video_frame_rate_abbrs[i].rate_den;
1059              return 0;
1060          }
1061
1062     /* Then, we try to parse it as fraction */
1063     cp = strchr(arg, '/');
1064     if (!cp)
1065         cp = strchr(arg, ':');
1066     if (cp) {
1067         char* cpp;
1068         frame_rate->num = strtol(arg, &cpp, 10);
1069         if (cpp != arg || cpp == cp)
1070             frame_rate->den = strtol(cp+1, &cpp, 10);
1071         else
1072            frame_rate->num = 0;
1073     }
1074     else {
1075         /* Finally we give up and parse it as double */
1076         AVRational time_base = av_d2q(strtod(arg, 0), 1001000);
1077         frame_rate->den = time_base.den;
1078         frame_rate->num = time_base.num;
1079     }
1080     if (!frame_rate->num || !frame_rate->den)
1081         return -1;
1082     else
1083         return 0;
1084 }
1085
1086 void ff_log_missing_feature(void *avc, const char *feature, int want_sample)
1087 {
1088     av_log(avc, AV_LOG_WARNING, "%s not implemented. Update your FFmpeg "
1089             "version to the newest one from SVN. If the problem still "
1090             "occurs, it means that your file has a feature which has not "
1091             "been implemented.", feature);
1092     if(want_sample)
1093         ff_log_ask_for_sample(avc, NULL);
1094     else
1095         av_log(avc, AV_LOG_WARNING, "\n");
1096 }
1097
1098 void ff_log_ask_for_sample(void *avc, const char *msg)
1099 {
1100     if (msg)
1101         av_log(avc, AV_LOG_WARNING, "%s ", msg);
1102     av_log(avc, AV_LOG_WARNING, "If you want to help, upload a sample "
1103             "of this file to ftp://upload.ffmpeg.org/MPlayer/incoming/ "
1104             "and contact the ffmpeg-devel mailing list.\n");
1105 }