hvirtual/quicktime/libavcodec/utils.c

   1 /*
   2  * utils for libavcodec
   3  * Copyright (c) 2001 Fabrice Bellard.
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18  */
  19 #include "avcodec.h"
  20 #include "dsputil.h"
  21 #include "mpegvideo.h"
  22
  23 void *av_mallocz(unsigned int size)
  24 {
  25     void *ptr;
  26
  27     if(size == 0) fprintf(stderr, "Warning, allocating 0 bytes\n");
  28
  29     ptr = av_malloc(size);
  30     if (!ptr)
  31         return NULL;
  32     memset(ptr, 0, size);
  33     return ptr;
  34 }
  35
  36 /* allocation of static arrays - do not use for normal allocation */
  37 static unsigned int last_static = 0;
  38 static char*** array_static = NULL;
  39 static const unsigned int grow_static = 64; // ^2
  40 void *__av_mallocz_static(void** location, unsigned int size)
  41 {
  42     int l = (last_static + grow_static) & ~(grow_static - 1);
  43     void *ptr = av_mallocz(size);
  44     if (!ptr)
  45         return NULL;
  46
  47     if (location)
  48     {
  49         if (l > last_static)
  50             array_static = realloc(array_static, l);
  51         array_static[last_static++] = (char**) location;
  52         *location = ptr;
  53     }
  54     return ptr;
  55 }
  56 /* free all static arrays and reset pointers to 0 */
  57 void av_free_static()
  58 {
  59     if (array_static)
  60     {
  61         unsigned i;
  62         for (i = 0; i < last_static; i++)
  63         {
  64             free(*array_static[i]);
  65             *array_static[i] = NULL;
  66         }
  67         free(array_static);
  68         array_static = 0;
  69     }
  70     last_static = 0;
  71 }
  72
  73 /* cannot call it directly because of 'void **' casting is not automatic */
  74 void __av_freep(void **ptr)
  75 {
  76     av_free(*ptr);
  77     *ptr = NULL;
  78 }
  79
  80 /* encoder management */
  81 AVCodec *first_avcodec;
  82
  83 void register_avcodec(AVCodec *format)
  84 {
  85     AVCodec **p;
  86     p = &first_avcodec;
  87     while (*p != NULL) p = &(*p)->next;
  88     *p = format;
  89     format->next = NULL;
  90 }
  91
  92 void avcodec_get_chroma_sub_sample(int fmt, int *h_shift, int *v_shift){
  93     switch(fmt){
  94     case PIX_FMT_YUV410P:
  95         *h_shift=2;
  96         *v_shift=2;
  97         break;
  98     case PIX_FMT_YUV420P:
  99         *h_shift=1;
 100         *v_shift=1;
 101         break;
 102     case PIX_FMT_YUV411P:
 103         *h_shift=2;
 104         *v_shift=0;
 105         break;
 106     case PIX_FMT_YUV422P:
 107     case PIX_FMT_YUV422:
 108         *h_shift=1;
 109         *v_shift=0;
 110         break;
 111     default: //RGB/...
 112         *h_shift=0;
 113         *v_shift=0;
 114         break;
 115     }
 116 }
 117
 118 typedef struct DefaultPicOpaque{
 119     int last_pic_num;
 120     uint8_t *data[4];
 121 }DefaultPicOpaque;
 122
 123 int avcodec_default_get_buffer(AVCodecContext *s, AVFrame *pic){
 124     int i;
 125     const int width = s->width;
 126     const int height= s->height;
 127     DefaultPicOpaque *opaque;
 128
 129     assert(pic->data[0]==NULL);
 130     assert(pic->type==0 || pic->type==FF_TYPE_INTERNAL);
 131
 132     if(pic->opaque){
 133         opaque= (DefaultPicOpaque *)pic->opaque;
 134         for(i=0; i<3; i++)
 135             pic->data[i]= opaque->data[i];
 136
 137 //    printf("get_buffer %X coded_pic_num:%d last:%d\n", pic->opaque, pic->coded_picture_number, opaque->last_pic_num);
 138         pic->age= pic->coded_picture_number - opaque->last_pic_num;
 139         opaque->last_pic_num= pic->coded_picture_number;
 140 //printf("age: %d %d %d\n", pic->age, c->picture_number, pic->coded_picture_number);
 141     }else{
 142         int align, h_chroma_shift, v_chroma_shift;
 143         int w, h, pixel_size;
 144
 145         avcodec_get_chroma_sub_sample(s->pix_fmt, &h_chroma_shift, &v_chroma_shift);
 146
 147         switch(s->pix_fmt){
 148         case PIX_FMT_YUV422:
 149             pixel_size=2;
 150             break;
 151         case PIX_FMT_RGB24:
 152         case PIX_FMT_BGR24:
 153             pixel_size=3;
 154             break;
 155         case PIX_FMT_BGRA32:
 156         case PIX_FMT_RGBA32:
 157             pixel_size=4;
 158             break;
 159         default:
 160             pixel_size=1;
 161         }
 162
 163         if(s->codec_id==CODEC_ID_SVQ1) align=63;
 164         else                           align=15;
 165
 166         w= (width +align)&~align;
 167         h= (height+align)&~align;
 168
 169         if(!(s->flags&CODEC_FLAG_EMU_EDGE)){
 170             w+= EDGE_WIDTH*2;
 171             h+= EDGE_WIDTH*2;
 172         }
 173
 174         opaque= av_mallocz(sizeof(DefaultPicOpaque));
 175         if(opaque==NULL) return -1;
 176
 177         pic->opaque= opaque;
 178         opaque->last_pic_num= -256*256*256*64;
 179
 180         for(i=0; i<3; i++){
 181             int h_shift= i==0 ? 0 : h_chroma_shift;
 182             int v_shift= i==0 ? 0 : v_chroma_shift;
 183
 184             pic->linesize[i]= pixel_size*w>>h_shift;
 185
 186             pic->base[i]= av_mallocz((pic->linesize[i]*h>>v_shift)+16); //FIXME 16
 187             if(pic->base[i]==NULL) return -1;
 188
 189             memset(pic->base[i], 128, pic->linesize[i]*h>>v_shift);
 190
 191             if(s->flags&CODEC_FLAG_EMU_EDGE)
 192                 pic->data[i] = pic->base[i] + 16; //FIXME 16
 193             else
 194                 pic->data[i] = pic->base[i] + (pic->linesize[i]*EDGE_WIDTH>>v_shift) + (EDGE_WIDTH>>h_shift) + 16; //FIXME 16
 195
 196             opaque->data[i]= pic->data[i];
 197         }
 198         pic->age= 256*256*256*64;
 199         pic->type= FF_BUFFER_TYPE_INTERNAL;
 200     }
 201
 202     return 0;
 203 }
 204
 205 void avcodec_default_release_buffer(AVCodecContext *s, AVFrame *pic){
 206     int i;
 207
 208     assert(pic->type==FF_BUFFER_TYPE_INTERNAL);
 209
 210     for(i=0; i<3; i++)
 211         pic->data[i]=NULL;
 212 //printf("R%X\n", pic->opaque);
 213 }
 214
 215 void avcodec_get_context_defaults(AVCodecContext *s){
 216     s->bit_rate= 800*1000;
 217     s->bit_rate_tolerance= s->bit_rate*10;
 218     s->qmin= 2;
 219     s->qmax= 31;
 220     s->mb_qmin= 2;
 221     s->mb_qmax= 31;
 222     s->rc_eq= "tex^qComp";
 223     s->qcompress= 0.5;
 224     s->max_qdiff= 3;
 225     s->b_quant_factor=1.25;
 226     s->b_quant_offset=1.25;
 227     s->i_quant_factor=-0.8;
 228     s->i_quant_offset=0.0;
 229     s->error_concealment= 3;
 230     s->error_resilience= 1;
 231     s->workaround_bugs= FF_BUG_AUTODETECT;
 232     s->frame_rate = 25 * FRAME_RATE_BASE;
 233     s->gop_size= 50;
 234     s->me_method= ME_EPZS;
 235     s->get_buffer= avcodec_default_get_buffer;
 236     s->release_buffer= avcodec_default_release_buffer;
 237 }
 238
 239 /**
 240  * allocates a AVCodecContext and set it to defaults.
 241  * this can be deallocated by simply calling free()
 242  */
 243 AVCodecContext *avcodec_alloc_context(void){
 244     AVCodecContext *avctx= av_mallocz(sizeof(AVCodecContext));
 245
 246     if(avctx==NULL) return NULL;
 247
 248     avcodec_get_context_defaults(avctx);
 249
 250     return avctx;
 251 }
 252
 253 /**
 254  * allocates a AVPFrame and set it to defaults.
 255  * this can be deallocated by simply calling free()
 256  */
 257 AVFrame *avcodec_alloc_frame(void){
 258     AVFrame *pic= av_mallocz(sizeof(AVFrame));
 259
 260     return pic;
 261 }
 262
 263 int avcodec_open(AVCodecContext *avctx, AVCodec *codec)
 264 {
 265     int ret;
 266
 267     avctx->codec = codec;
 268     avctx->codec_id = codec->id;
 269     avctx->frame_number = 0;
 270     if (codec->priv_data_size > 0) {
 271         avctx->priv_data = av_mallocz(codec->priv_data_size);
 272         if (!avctx->priv_data)
 273             return -ENOMEM;
 274     } else {
 275         avctx->priv_data = NULL;
 276     }
 277     ret = avctx->codec->init(avctx);
 278     if (ret < 0) {
 279         av_freep(&avctx->priv_data);
 280         return ret;
 281     }
 282     return 0;
 283 }
 284
 285 int avcodec_encode_audio(AVCodecContext *avctx, UINT8 *buf, int buf_size,
 286                          const short *samples)
 287 {
 288     int ret;
 289
 290     ret = avctx->codec->encode(avctx, buf, buf_size, (void *)samples);
 291     avctx->frame_number++;
 292     return ret;
 293 }
 294
 295 int avcodec_encode_video(AVCodecContext *avctx, UINT8 *buf, int buf_size,
 296                          const AVFrame *pict)
 297 {
 298     int ret;
 299
 300     ret = avctx->codec->encode(avctx, buf, buf_size, (void *)pict);
 301
 302     emms_c(); //needed to avoid a emms_c() call before every return;
 303
 304     avctx->frame_number++;
 305     return ret;
 306 }
 307
 308 /* decode a frame. return -1 if error, otherwise return the number of
 309    bytes used. If no frame could be decompressed, *got_picture_ptr is
 310    zero. Otherwise, it is non zero */
 311 int avcodec_decode_video(AVCodecContext *avctx, AVFrame *picture,
 312                          int *got_picture_ptr,
 313                          UINT8 *buf, int buf_size)
 314 {
 315     int ret;
 316 //printf("avcodec_decode_video 1 %p\n", avctx->codec->decode);
 317
 318     ret = avctx->codec->decode(avctx, picture, got_picture_ptr,
 319                                buf, buf_size);
 320
 321     emms_c(); //needed to avoid a emms_c() call before every return;
 322
 323     if (*got_picture_ptr)
 324         avctx->frame_number++;
 325     return ret;
 326 }
 327
 328 /* decode an audio frame. return -1 if error, otherwise return the
 329    *number of bytes used. If no frame could be decompressed,
 330    *frame_size_ptr is zero. Otherwise, it is the decompressed frame
 331    *size in BYTES. */
 332 int avcodec_decode_audio(AVCodecContext *avctx, INT16 *samples,
 333                          int *frame_size_ptr,
 334                          UINT8 *buf, int buf_size)
 335 {
 336     int ret;
 337
 338     ret = avctx->codec->decode(avctx, samples, frame_size_ptr,
 339                                buf, buf_size);
 340     avctx->frame_number++;
 341     return ret;
 342 }
 343
 344 int avcodec_close(AVCodecContext *avctx)
 345 {
 346     if (avctx->codec->close)
 347         avctx->codec->close(avctx);
 348     av_freep(&avctx->priv_data);
 349     avctx->codec = NULL;
 350     return 0;
 351 }
 352
 353 AVCodec *avcodec_find_encoder(enum CodecID id)
 354 {
 355     AVCodec *p;
 356     p = first_avcodec;
 357     while (p) {
 358         if (p->encode != NULL && p->id == id)
 359             return p;
 360         p = p->next;
 361     }
 362     return NULL;
 363 }
 364
 365 AVCodec *avcodec_find_encoder_by_name(const char *name)
 366 {
 367     AVCodec *p;
 368     p = first_avcodec;
 369     while (p) {
 370         if (p->encode != NULL && strcmp(name,p->name) == 0)
 371             return p;
 372         p = p->next;
 373     }
 374     return NULL;
 375 }
 376
 377 AVCodec *avcodec_find_decoder(enum CodecID id)
 378 {
 379     AVCodec *p;
 380     p = first_avcodec;
 381     while (p) {
 382         if (p->decode != NULL && p->id == id)
 383             return p;
 384         p = p->next;
 385     }
 386     return NULL;
 387 }
 388
 389 AVCodec *avcodec_find_decoder_by_name(const char *name)
 390 {
 391     AVCodec *p;
 392     p = first_avcodec;
 393     while (p) {
 394         if (p->decode != NULL && strcmp(name,p->name) == 0)
 395             return p;
 396         p = p->next;
 397     }
 398     return NULL;
 399 }
 400
 401 AVCodec *avcodec_find(enum CodecID id)
 402 {
 403     AVCodec *p;
 404     p = first_avcodec;
 405     while (p) {
 406         if (p->id == id)
 407             return p;
 408         p = p->next;
 409     }
 410     return NULL;
 411 }
 412
 413 const char *pix_fmt_str[] = {
 414     "yuv420p",
 415     "yuv422",
 416     "rgb24",
 417     "bgr24",
 418     "yuv422p",
 419     "yuv444p",
 420     "rgba32",
 421     "bgra32",
 422     "yuv410p",
 423     "yuv411p",
 424 };
 425
 426 void avcodec_string(char *buf, int buf_size, AVCodecContext *enc, int encode)
 427 {
 428     const char *codec_name;
 429     AVCodec *p;
 430     char buf1[32];
 431     char channels_str[100];
 432     int bitrate;
 433
 434     if (encode)
 435         p = avcodec_find_encoder(enc->codec_id);
 436     else
 437         p = avcodec_find_decoder(enc->codec_id);
 438
 439     if (p) {
 440         codec_name = p->name;
 441     } else if (enc->codec_name[0] != '\0') {
 442         codec_name = enc->codec_name;
 443     } else {
 444         /* output avi tags */
 445         if (enc->codec_type == CODEC_TYPE_VIDEO) {
 446             snprintf(buf1, sizeof(buf1), "%c%c%c%c",
 447                      enc->codec_tag & 0xff,
 448                      (enc->codec_tag >> 8) & 0xff,
 449                      (enc->codec_tag >> 16) & 0xff,
 450                      (enc->codec_tag >> 24) & 0xff);
 451         } else {
 452             snprintf(buf1, sizeof(buf1), "0x%04x", enc->codec_tag);
 453         }
 454         codec_name = buf1;
 455     }
 456
 457     switch(enc->codec_type) {
 458     case CODEC_TYPE_VIDEO:
 459         snprintf(buf, buf_size,
 460                  "Video: %s%s",
 461                  codec_name, enc->flags & CODEC_FLAG_HQ ? " (hq)" : "");
 462         if (enc->codec_id == CODEC_ID_RAWVIDEO) {
 463             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 464                      ", %s",
 465                      pix_fmt_str[enc->pix_fmt]);
 466         }
 467         if (enc->width) {
 468             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 469                      ", %dx%d, %0.2f fps",
 470                      enc->width, enc->height,
 471                      (float)enc->frame_rate / FRAME_RATE_BASE);
 472         }
 473         if (encode) {
 474             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 475                      ", q=%d-%d", enc->qmin, enc->qmax);
 476         }
 477         bitrate = enc->bit_rate;
 478         break;
 479     case CODEC_TYPE_AUDIO:
 480         snprintf(buf, buf_size,
 481                  "Audio: %s",
 482                  codec_name);
 483         switch (enc->channels) {
 484             case 1:
 485                 strcpy(channels_str, "mono");
 486                 break;
 487             case 2:
 488                 strcpy(channels_str, "stereo");
 489                 break;
 490             case 6:
 491                 strcpy(channels_str, "5:1");
 492                 break;
 493             default:
 494                 sprintf(channels_str, "%d channels", enc->channels);
 495                 break;
 496         }
 497         if (enc->sample_rate) {
 498             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 499                      ", %d Hz, %s",
 500                      enc->sample_rate,
 501                      channels_str);
 502         }
 503
 504         /* for PCM codecs, compute bitrate directly */
 505         switch(enc->codec_id) {
 506         case CODEC_ID_PCM_S16LE:
 507         case CODEC_ID_PCM_S16BE:
 508         case CODEC_ID_PCM_U16LE:
 509         case CODEC_ID_PCM_U16BE:
 510             bitrate = enc->sample_rate * enc->channels * 16;
 511             break;
 512         case CODEC_ID_PCM_S8:
 513         case CODEC_ID_PCM_U8:
 514         case CODEC_ID_PCM_ALAW:
 515         case CODEC_ID_PCM_MULAW:
 516             bitrate = enc->sample_rate * enc->channels * 8;
 517             break;
 518         default:
 519             bitrate = enc->bit_rate;
 520             break;
 521         }
 522         break;
 523     default:
 524         av_abort();
 525     }
 526     if (encode) {
 527         if (enc->flags & CODEC_FLAG_PASS1)
 528             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 529                      ", pass 1");
 530         if (enc->flags & CODEC_FLAG_PASS2)
 531             snprintf(buf + strlen(buf), buf_size - strlen(buf),
 532                      ", pass 2");
 533     }
 534     if (bitrate != 0) {
 535         snprintf(buf + strlen(buf), buf_size - strlen(buf),
 536                  ", %d kb/s", bitrate / 1000);
 537     }
 538 }
 539
 540 /* Picture field are filled with 'ptr' addresses */
 541 void avpicture_fill(AVPicture *picture, UINT8 *ptr,
 542                     int pix_fmt, int width, int height)
 543 {
 544     int size;
 545
 546     size = width * height;
 547     switch(pix_fmt) {
 548     case PIX_FMT_YUV420P:
 549         picture->data[0] = ptr;
 550         picture->data[1] = picture->data[0] + size;
 551         picture->data[2] = picture->data[1] + size / 4;
 552         picture->linesize[0] = width;
 553         picture->linesize[1] = width / 2;
 554         picture->linesize[2] = width / 2;
 555         break;
 556     case PIX_FMT_YUV422P:
 557         picture->data[0] = ptr;
 558         picture->data[1] = picture->data[0] + size;
 559         picture->data[2] = picture->data[1] + size / 2;
 560         picture->linesize[0] = width;
 561         picture->linesize[1] = width / 2;
 562         picture->linesize[2] = width / 2;
 563         break;
 564     case PIX_FMT_YUV444P:
 565         picture->data[0] = ptr;
 566         picture->data[1] = picture->data[0] + size;
 567         picture->data[2] = picture->data[1] + size;
 568         picture->linesize[0] = width;
 569         picture->linesize[1] = width;
 570         picture->linesize[2] = width;
 571         break;
 572     case PIX_FMT_RGB24:
 573     case PIX_FMT_BGR24:
 574         picture->data[0] = ptr;
 575         picture->data[1] = NULL;
 576         picture->data[2] = NULL;
 577         picture->linesize[0] = width * 3;
 578         break;
 579     case PIX_FMT_RGBA32:
 580     case PIX_FMT_BGRA32:
 581         picture->data[0] = ptr;
 582         picture->data[1] = NULL;
 583         picture->data[2] = NULL;
 584         picture->linesize[0] = width * 4;
 585         break;
 586     case PIX_FMT_YUV422:
 587         picture->data[0] = ptr;
 588         picture->data[1] = NULL;
 589         picture->data[2] = NULL;
 590         picture->linesize[0] = width * 2;
 591         break;
 592     default:
 593         picture->data[0] = NULL;
 594         picture->data[1] = NULL;
 595         picture->data[2] = NULL;
 596         break;
 597     }
 598 }
 599
 600 int avpicture_get_size(int pix_fmt, int width, int height)
 601 {
 602     int size;
 603
 604     size = width * height;
 605     switch(pix_fmt) {
 606     case PIX_FMT_YUV420P:
 607         size = (size * 3) / 2;
 608         break;
 609     case PIX_FMT_YUV422P:
 610         size = (size * 2);
 611         break;
 612     case PIX_FMT_YUV444P:
 613         size = (size * 3);
 614         break;
 615     case PIX_FMT_RGB24:
 616     case PIX_FMT_BGR24:
 617         size = (size * 3);
 618         break;
 619     case PIX_FMT_RGBA32:
 620     case PIX_FMT_BGRA32:
 621         size = (size * 4);
 622         break;
 623     case PIX_FMT_YUV422:
 624         size = (size * 2);
 625         break;
 626     default:
 627         size = -1;
 628         break;
 629     }
 630     return size;
 631 }
 632
 633 unsigned avcodec_version( void )
 634 {
 635   return LIBAVCODEC_VERSION_INT;
 636 }
 637
 638 unsigned avcodec_build( void )
 639 {
 640   return LIBAVCODEC_BUILD;
 641 }
 642
 643 /* must be called before any other functions */
 644 void avcodec_init(void)
 645 {
 646     static int inited = 0;
 647
 648     if (inited != 0)
 649         return;
 650     inited = 1;
 651
 652     //dsputil_init();
 653 }
 654
 655 /* this can be called after seeking and before trying to decode the next keyframe */
 656 void avcodec_flush_buffers(AVCodecContext *avctx)
 657 {
 658     int i;
 659     MpegEncContext *s = avctx->priv_data;
 660
 661     switch(avctx->codec_id){
 662     case CODEC_ID_MPEG1VIDEO:
 663     case CODEC_ID_H263:
 664     case CODEC_ID_RV10:
 665     case CODEC_ID_MJPEG:
 666     case CODEC_ID_MJPEGB:
 667     case CODEC_ID_MPEG4:
 668     case CODEC_ID_MSMPEG4V1:
 669     case CODEC_ID_MSMPEG4V2:
 670     case CODEC_ID_MSMPEG4V3:
 671     case CODEC_ID_WMV1:
 672     case CODEC_ID_WMV2:
 673     case CODEC_ID_H263P:
 674     case CODEC_ID_H263I:
 675     case CODEC_ID_SVQ1:
 676         for(i=0; i<MAX_PICTURE_COUNT; i++){
 677            if(s->picture[i].data[0] && (   s->picture[i].type == FF_BUFFER_TYPE_INTERNAL
 678                                         || s->picture[i].type == FF_BUFFER_TYPE_USER))
 679             avctx->release_buffer(avctx, (AVFrame*)&s->picture[i]);
 680         }
 681         break;
 682     default:
 683         //FIXME
 684         break;
 685     }
 686 }
 687
 688 static int raw_encode_init(AVCodecContext *s)
 689 {
 690     return 0;
 691 }
 692
 693 static int raw_decode_frame(AVCodecContext *avctx,
 694                             void *data, int *data_size,
 695                             UINT8 *buf, int buf_size)
 696 {
 697     return -1;
 698 }
 699
 700 static int raw_encode_frame(AVCodecContext *avctx,
 701                             unsigned char *frame, int buf_size, void *data)
 702 {
 703     return -1;
 704 }
 705
 706 AVCodec rawvideo_codec = {
 707     "rawvideo",
 708     CODEC_TYPE_VIDEO,
 709     CODEC_ID_RAWVIDEO,
 710     0,
 711     raw_encode_init,
 712     raw_encode_frame,
 713     NULL,
 714     raw_decode_frame,
 715 };