Diff of /xvidcore/src/encoder.c

-revision 1.39, Sun Jun  9 13:16:26 2002 UTC
+revision 1.95.2.59, Wed Dec 17 15:16:16 2003 UTC
 Line 1
- /**************************************************************************
+ /*****************************************************************************
   *
   *  XVID MPEG-4 VIDEO CODEC
   *  -  Encoder main module  -
   *
-  *  This program is an implementation of a part of one or more MPEG-4
+  *  Copyright(C) 2002     Michael Militzer <isibaar@xvid.org>
-  *  Video tools as specified in ISO/IEC 14496-2 standard.  Those intending
+  *                         2002-2003 Peter Ross <pross@xvid.org>
-  *  to use this software module in hardware or software products are
+  *                         2002   Daniel Smith <danielsmith@astroboymail.com>
-  *  advised that its use may infringe existing patents or copyrights, and
-  *  any such use would be at such party's own risk.  The original
-  *  developer of this software module and his/her company, and subsequent
-  *  editors and their companies, will have no liability for use of this
-  *  software or modifications or derivatives thereof.
   *
   *  This program is free software; you can redistribute it and/or modify
   *  it under the terms of the GNU General Public License as published by
-Line 26
+Line 21
   *  along with this program; if not, write to the Free Software
   *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
   *
-  ***************************************************************************/
- /****************************************************************************
-  *
-  *  History
-  *
-  *  08.05.2002 fix some problem in DEBUG mode;
-  *             MinChen <chenm001@163.com>
-  *  14.04.2002 added FrameCodeB()
-  *
   *  $Id$
   *
-  ***************************************************************************/
+  ****************************************************************************/
  #include <stdlib.h>
  #include <stdio.h>
  #include <math.h>
+ #include <string.h>
  #include "encoder.h"
  #include "prediction/mbprediction.h"
  #include "global.h"
  #include "utils/timer.h"
  #include "image/image.h"
+ #include "image/font.h"
+ #include "motion/sad.h"
  #include "motion/motion.h"
+ #include "motion/gmc.h"
  #include "bitstream/cbp.h"
  #include "utils/mbfunctions.h"
  #include "bitstream/bitstream.h"
  #include "bitstream/mbcoding.h"
- #include "utils/ratecontrol.h"
  #include "utils/emms.h"
  #include "bitstream/mbcoding.h"
- #include "quant/adapt_quant.h"
  #include "quant/quant_matrix.h"
  #include "utils/mem_align.h"
- #define ENC_CHECK(X) if(!(X)) return XVID_ERR_FORMAT
+ /*****************************************************************************
- #define SWAP(A,B)    { void * tmp = A; A = B; B = tmp; }
+  * Local function prototypes
+  ****************************************************************************/
  static int FrameCodeI(Encoder * pEnc,
-                       Bitstream * bs,
+                                           Bitstream * bs);
-                       uint32_t *pBits);
  static int FrameCodeP(Encoder * pEnc,
                        Bitstream * bs,
-                       uint32_t *pBits,
                        bool force_inter,
                        bool vol_header);
- #ifdef BFRAMES
  static void FrameCodeB(Encoder * pEnc,
                         FRAMEINFO * frame,
-                        Bitstream * bs,
+                                            Bitstream * bs);
-                        uint32_t *pBits);
- #endif
- static int DQtab[4] =
- {
-         -1, -2, 1, 2
- };
- static int iDQtab[5] =
- {
-, 0, NO_CHANGE, 2, 3
- };
- void static image_null(IMAGE * image)
- {
-         image->y = image->u = image->v = NULL;
- }
- int encoder_create(XVID_ENC_PARAM * pParam)
+ /*****************************************************************************
- {
+  * Encoder creation
-         Encoder *pEnc;
+  *
-         uint32_t i;
+  * This function creates an Encoder instance, it allocates all necessary
+  * image buffers (reference, current and bframes) and initialize the internal
-         pParam->handle = NULL;
+  * xvid encoder paremeters according to the XVID_ENC_PARAM input parameter.
+  *
-         ENC_CHECK(pParam);
+  * The code seems to be very long but is very basic, mainly memory allocation
+  * and cleaning code.
-         ENC_CHECK(pParam->width > 0 && pParam->width <= 1920);
+  *
-         ENC_CHECK(pParam->height > 0 && pParam->height <= 1280);
+  * Returned values :
-         ENC_CHECK(!(pParam->width % 2));
+  *      - 0                             - no errors
-         ENC_CHECK(!(pParam->height % 2));
+  *      - XVID_ERR_MEMORY - the libc could not allocate memory, the function
+  *                                              cleans the structure before exiting.
-         /* Fps */
+  *                                              pParam->handle is also set to NULL.
+  *
-         if (pParam->fincr <= 0 || pParam->fbase <= 0)
+  ****************************************************************************/
-         {
-                 pParam->fincr = 1;
-                 pParam->fbase = 25;
-         }
          /*
           * Simplify the "fincr/fbase" fraction
-          * (neccessary, since windows supplies us with huge numbers)
           */
+ static void
-         i = pParam->fincr;
+ simplify_time(int *inc, int *base)
-         while (i > 1)
          {
-                 if (pParam->fincr % i == 0 && pParam->fbase % i == 0)
+         /* common factor */
-                 {
+         int i = *inc;
-                         pParam->fincr /= i;
+         while (i > 1) {
-                         pParam->fbase /= i;
+                 if (*inc % i == 0 && *base % i == 0) {
-                         i = pParam->fincr;
+                         *inc /= i;
+                         *base /= i;
+                         i = *inc;
                          continue;
                  }
                  i--;
          }
-         if (pParam->fbase > 65535)
+         /* if neccessary, round to 65535 accuracy */
-         {
+         if (*base > 65535) {
-                 float div = (float)pParam->fbase / 65535;
+                 float div = (float) *base / 65535;
-                 pParam->fbase = (int)(pParam->fbase / div);
+                 *base = (int) (*base / div);
-                 pParam->fincr = (int)(pParam->fincr / div);
+                 *inc = (int) (*inc / div);
+         }
          }
-         /* Bitrate allocator defaults */
-         if (pParam->rc_bitrate <= 0)
-                 pParam->rc_bitrate = 900000;
-         if (pParam->rc_reaction_delay_factor <= 0)
-                 pParam->rc_reaction_delay_factor = 16;
-         if (pParam->rc_averaging_period <= 0)
-                 pParam->rc_averaging_period = 100;
-         if (pParam->rc_buffer <= 0)
-                 pParam->rc_buffer = 100;
-         /* Max and min quantizers */
-         if ((pParam->min_quantizer <= 0) || (pParam->min_quantizer > 31))
-                 pParam->min_quantizer = 1;
-         if ((pParam->max_quantizer <= 0) || (pParam->max_quantizer > 31))
-                 pParam->max_quantizer = 31;
-         if (pParam->max_quantizer < pParam->min_quantizer)
+ int
-                 pParam->max_quantizer = pParam->min_quantizer;
+ enc_create(xvid_enc_create_t * create)
+ {
+         Encoder *pEnc;
+   int n;
-         /* 1 keyframe each 10 seconds */
+         if (XVID_VERSION_MAJOR(create->version) != 1) /* v1.x.x */
+                 return XVID_ERR_VERSION;
-         if (pParam->max_key_interval == 0)
+         if (create->width%2 || create->height%2)
-                 pParam->max_key_interval = 10 * pParam->fincr / pParam->fbase;
+                 return XVID_ERR_FAIL;
+         /* allocate encoder struct */
          pEnc = (Encoder *) xvid_malloc(sizeof(Encoder), CACHE_LINE);
          if (pEnc == NULL)
                  return XVID_ERR_MEMORY;
+         memset(pEnc, 0, sizeof(Encoder));
-         /* Fill members of Encoder structure */
+         pEnc->mbParam.profile = create->profile;
-         pEnc->mbParam.width = pParam->width;
+         /* global flags */
-         pEnc->mbParam.height = pParam->height;
+         pEnc->mbParam.global_flags = create->global;
+         /* width, height */
+         pEnc->mbParam.width = create->width;
+         pEnc->mbParam.height = create->height;
          pEnc->mbParam.mb_width = (pEnc->mbParam.width + 15) / 16;
          pEnc->mbParam.mb_height = (pEnc->mbParam.height + 15) / 16;
          pEnc->mbParam.edged_width  = 16*pEnc->mbParam.mb_width  + 2*EDGE_SIZE;
          pEnc->mbParam.edged_height = 16*pEnc->mbParam.mb_height + 2*EDGE_SIZE;
-         pEnc->mbParam.fbase = pParam->fbase;
+         /* framerate */
-         pEnc->mbParam.fincr = pParam->fincr;
+         pEnc->mbParam.fincr = MAX(create->fincr, 0);
+         pEnc->mbParam.fbase = create->fincr <= 0 ? 25 : create->fbase;
-         pEnc->sStat.fMvPrevSigma = -1;
+         if (pEnc->mbParam.fincr>0)
+                 simplify_time(&pEnc->mbParam.fincr, &pEnc->mbParam.fbase);
-         /* Fill rate control parameters */
+         /* zones */
+         if(create->num_zones > 0) {
+                 pEnc->num_zones = create->num_zones;
+                 pEnc->zones = xvid_malloc(sizeof(xvid_enc_zone_t) * pEnc->num_zones, CACHE_LINE);
+                 if (pEnc->zones == NULL)
+                         goto xvid_err_memory0;
+                 memcpy(pEnc->zones, create->zones, sizeof(xvid_enc_zone_t) * pEnc->num_zones);
+         } else {
+                 pEnc->num_zones = 0;
+                 pEnc->zones = NULL;
+         }
+         /* plugins */
+         if(create->num_plugins > 0) {
+                 pEnc->num_plugins = create->num_plugins;
+                 pEnc->plugins = xvid_malloc(sizeof(xvid_enc_plugin_t) * pEnc->num_plugins, CACHE_LINE);
+                 if (pEnc->plugins == NULL)
+                         goto xvid_err_memory0;
+         } else {
+                 pEnc->num_plugins = 0;
+                 pEnc->plugins = NULL;
+         }
+         for (n=0; n<pEnc->num_plugins;n++) {
+                 xvid_plg_create_t pcreate;
+                 xvid_plg_info_t pinfo;
+                 memset(&pinfo, 0, sizeof(xvid_plg_info_t));
+                 pinfo.version = XVID_VERSION;
+                 if (create->plugins[n].func(0, XVID_PLG_INFO, &pinfo, 0) >= 0) {
+                         pEnc->mbParam.plugin_flags |= pinfo.flags;
+                 }
+                 memset(&pcreate, 0, sizeof(xvid_plg_create_t));
+                 pcreate.version = XVID_VERSION;
+                 pcreate.num_zones = pEnc->num_zones;
+                 pcreate.zones = pEnc->zones;
+                 pcreate.width = pEnc->mbParam.width;
+                 pcreate.height = pEnc->mbParam.height;
+                 pcreate.mb_width = pEnc->mbParam.mb_width;
+                 pcreate.mb_height = pEnc->mbParam.mb_height;
+                 pcreate.fincr = pEnc->mbParam.fincr;
+                 pcreate.fbase = pEnc->mbParam.fbase;
+                 pcreate.param = create->plugins[n].param;
+                 pEnc->plugins[n].func = NULL;   /* disable plugins that fail */
+                 if (create->plugins[n].func(0, XVID_PLG_CREATE, &pcreate, &pEnc->plugins[n].param) >= 0) {
+                         pEnc->plugins[n].func = create->plugins[n].func;
+                 }
+         }
+         if ((pEnc->mbParam.global_flags & XVID_GLOBAL_EXTRASTATS_ENABLE) ||
+                 (pEnc->mbParam.plugin_flags & XVID_REQPSNR)) {
+                 pEnc->mbParam.plugin_flags |= XVID_REQORIGINAL; /* psnr calculation requires the original */
+         }
+         /* temp dquants */
+         if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
+                 pEnc->temp_dquants = (int *) xvid_malloc(pEnc->mbParam.mb_width *
+                                                 pEnc->mbParam.mb_height * sizeof(int), CACHE_LINE);
+                 if (pEnc->temp_dquants==NULL)
+                         goto xvid_err_memory1a;
+         }
+         /* bframes */
+         pEnc->mbParam.max_bframes = MAX(create->max_bframes, 0);
+         pEnc->mbParam.bquant_ratio = MAX(create->bquant_ratio, 0);
+         pEnc->mbParam.bquant_offset = create->bquant_offset;
+         /* min/max quant */
+         for (n=0; n<3; n++) {
+                 pEnc->mbParam.min_quant[n] = create->min_quant[n] > 0 ? create->min_quant[n] : 2;
+                 pEnc->mbParam.max_quant[n] = create->max_quant[n] > 0 ? create->max_quant[n] : 31;
+         }
-         pEnc->bitrate = pParam->rc_bitrate;
+         /* frame drop ratio */
+         pEnc->mbParam.frame_drop_ratio = MAX(create->frame_drop_ratio, 0);
-         pEnc->iFrameNum = 0;
+         /* max keyframe interval */
-         pEnc->iMaxKeyInterval = pParam->max_key_interval;
+         pEnc->mbParam.iMaxKeyInterval = create->max_key_interval <= 0 ? (10 * (int)pEnc->mbParam.fbase) / (int)pEnc->mbParam.fincr : create->max_key_interval;
-         /* try to allocate frame memory */
+         /* allocate working frame-image memory */
          pEnc->current = xvid_malloc(sizeof(FRAMEINFO), CACHE_LINE);
          pEnc->reference = xvid_malloc(sizeof(FRAMEINFO), CACHE_LINE);
-Line 211
+Line 238
          if ( pEnc->current == NULL || pEnc->reference == NULL)
                  goto xvid_err_memory1;
-         /* try to allocate mb memory */
+         /* allocate macroblock memory */
-         pEnc->current->mbs = xvid_malloc(sizeof(MACROBLOCK) * \
+         pEnc->current->mbs =
-                                          pEnc->mbParam.mb_width * \
+                 xvid_malloc(sizeof(MACROBLOCK) * pEnc->mbParam.mb_width *
-                                          pEnc->mbParam.mb_height,
+                                         pEnc->mbParam.mb_height, CACHE_LINE);
-                                          CACHE_LINE);
+         pEnc->reference->mbs =
-         pEnc->reference->mbs = xvid_malloc(sizeof(MACROBLOCK) * \
+                 xvid_malloc(sizeof(MACROBLOCK) * pEnc->mbParam.mb_width *
-                                            pEnc->mbParam.mb_width * \
+                                         pEnc->mbParam.mb_height, CACHE_LINE);
-                                            pEnc->mbParam.mb_height,
-                                            CACHE_LINE);
          if (pEnc->current->mbs == NULL || pEnc->reference->mbs == NULL)
                  goto xvid_err_memory2;
-         /* try to allocate image memory */
+         /* allocate quant matrix memory */
+         pEnc->mbParam.mpeg_quant_matrices =
+                 xvid_malloc(sizeof(uint16_t) * 64 * 8, CACHE_LINE);
+         if (pEnc->mbParam.mpeg_quant_matrices == NULL)
+                 goto xvid_err_memory2a;
- #ifdef _DEBUG
+         /* allocate interpolation image memory */
+         if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
          image_null(&pEnc->sOriginal);
- #endif
+                 image_null(&pEnc->sOriginal2);
- #ifdef BFRAMES
+         }
          image_null(&pEnc->f_refh);
          image_null(&pEnc->f_refv);
          image_null(&pEnc->f_refhv);
- #endif
          image_null(&pEnc->current->image);
          image_null(&pEnc->reference->image);
          image_null(&pEnc->vInterH);
          image_null(&pEnc->vInterV);
-         image_null(&pEnc->vInterVf);
          image_null(&pEnc->vInterHV);
-         image_null(&pEnc->vInterHVf);
- #ifdef _DEBUG
+         if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
-         if (image_create(&pEnc->sOriginal,
+                 if (image_create
-                          pEnc->mbParam.edged_width,
+                         (&pEnc->sOriginal, pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
- #endif
- #ifdef BFRAMES
+                 if (image_create
-         if (image_create(&pEnc->f_refh,
+                         (&pEnc->sOriginal2, pEnc->mbParam.edged_width,
-                          pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
-         if (image_create(&pEnc->f_refv,
+         }
-                          pEnc->mbParam.edged_width,
+         if (image_create
+                 (&pEnc->f_refh, pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
-         if (image_create(&pEnc->f_refhv,
+         if (image_create
-                          pEnc->mbParam.edged_width,
+                 (&pEnc->f_refv, pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
- #endif
+         if (image_create
-         if (image_create(&pEnc->current->image,
+                 (&pEnc->f_refhv, pEnc->mbParam.edged_width,
-                          pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
-         if (image_create(&pEnc->reference->image,
-                          pEnc->mbParam.edged_width,
+         if (image_create
+                 (&pEnc->current->image, pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
-         if (image_create(&pEnc->vInterH,
+         if (image_create
-                          pEnc->mbParam.edged_width,
+                 (&pEnc->reference->image, pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
-         if (image_create(&pEnc->vInterV,
+         if (image_create
-                          pEnc->mbParam.edged_width,
+                 (&pEnc->vInterH, pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
-         if (image_create(&pEnc->vInterVf,
+         if (image_create
-                          pEnc->mbParam.edged_width,
+                 (&pEnc->vInterV, pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
-         if (image_create(&pEnc->vInterHV,
+         if (image_create
-                          pEnc->mbParam.edged_width,
+                 (&pEnc->vInterHV, pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
-         if (image_create(&pEnc->vInterHVf,
-                          pEnc->mbParam.edged_width,
+ /* Create full bitplane for GMC, this might be wasteful */
+         if (image_create
+                 (&pEnc->vGMC, pEnc->mbParam.edged_width,
                           pEnc->mbParam.edged_height) < 0)
                  goto xvid_err_memory3;
+         /* init bframe image buffers */
+         pEnc->bframenum_head = 0;
+         pEnc->bframenum_tail = 0;
+         pEnc->flush_bframes = 0;
+         pEnc->closed_bframenum = -1;
          /* B Frames specific init */
- #ifdef BFRAMES
-         pEnc->mbParam.max_bframes = pParam->max_bframes;
-         pEnc->bquant_ratio = pParam->bquant_ratio;
          pEnc->bframes = NULL;
-         if (pEnc->mbParam.max_bframes > 0)
+         if (pEnc->mbParam.max_bframes > 0) {
-         {
-                 int n;
-                 pEnc->bframes = xvid_malloc(pEnc->mbParam.max_bframes * \
+                 pEnc->bframes =
-                                             sizeof(FRAMEINFO *),
+                         xvid_malloc(pEnc->mbParam.max_bframes * sizeof(FRAMEINFO *),
                                              CACHE_LINE);
                  if (pEnc->bframes == NULL)
-Line 316
+Line 350
                          pEnc->bframes[n] = NULL;
-                 for (n = 0; n < pEnc->mbParam.max_bframes; n++)
+                 for (n = 0; n < pEnc->mbParam.max_bframes; n++) {
-                 {
+                         pEnc->bframes[n] = xvid_malloc(sizeof(FRAMEINFO), CACHE_LINE);
-                         pEnc->bframes[n] = xvid_malloc(sizeof(FRAMEINFO),
-                                                        CACHE_LINE);
                          if (pEnc->bframes[n] == NULL)
                                  goto xvid_err_memory4;
-                         pEnc->bframes[n]->mbs = xvid_malloc(sizeof(MACROBLOCK) * \
+                         pEnc->bframes[n]->mbs =
-                                                             pEnc->mbParam.mb_width * \
+                                 xvid_malloc(sizeof(MACROBLOCK) * pEnc->mbParam.mb_width *
-                                                             pEnc->mbParam.mb_height,
+                                                         pEnc->mbParam.mb_height, CACHE_LINE);
-                                                             CACHE_LINE);
                          if (pEnc->bframes[n]->mbs == NULL)
                                  goto xvid_err_memory4;
                          image_null(&pEnc->bframes[n]->image);
-                         if (image_create(&pEnc->bframes[n]->image,
+                         if (image_create
-                                          pEnc->mbParam.edged_width,
+                                 (&pEnc->bframes[n]->image, pEnc->mbParam.edged_width,
                                           pEnc->mbParam.edged_height) < 0)
                                  goto xvid_err_memory4;
                  }
          }
-         pEnc->bframenum_head = 0;
+         /* init incoming frame queue */
-         pEnc->bframenum_tail = 0;
+         pEnc->queue_head = 0;
-         pEnc->flush_bframes = 0;
+         pEnc->queue_tail = 0;
+         pEnc->queue_size = 0;
-         pEnc->mbParam.m_seconds = 0;
+         pEnc->queue =
-         pEnc->mbParam.m_ticks = 0;
+                 xvid_malloc((pEnc->mbParam.max_bframes+1) * sizeof(QUEUEINFO),
- #endif
+                                         CACHE_LINE);
-         pParam->handle = (void *)pEnc;
+         if (pEnc->queue == NULL)
+                 goto xvid_err_memory4;
-         if (pParam->rc_bitrate)
+         for (n = 0; n < pEnc->mbParam.max_bframes+1; n++)
-         {
+                 image_null(&pEnc->queue[n].image);
-                 RateControlInit(&pEnc->rate_control,
-                                 pParam->rc_bitrate,
-                                 pParam->rc_reaction_delay_factor,
+         for (n = 0; n < pEnc->mbParam.max_bframes+1; n++) {
-                                 pParam->rc_averaging_period,
+                 if (image_create
-                                 pParam->rc_buffer,
+                         (&pEnc->queue[n].image, pEnc->mbParam.edged_width,
-                                 pParam->fbase * 1000 / pParam->fincr,
+                          pEnc->mbParam.edged_height) < 0)
-                                 pParam->max_quantizer,
+                         goto xvid_err_memory5;
-                                 pParam->min_quantizer);
          }
+         /* timestamp stuff */
+         pEnc->mbParam.m_stamp = 0;
+         pEnc->m_framenum = 0;
+         pEnc->current->stamp = 0;
+         pEnc->reference->stamp = 0;
+         /* other stuff */
+         pEnc->iFrameNum = 0;
+         pEnc->fMvPrevSigma = -1;
+         create->handle = (void *) pEnc;
          init_timer();
+         init_mpeg_matrix(pEnc->mbParam.mpeg_quant_matrices);
-         return XVID_ERR_OK;
+         return 0;   /* ok */
          /*
           * We handle all XVID_ERR_MEMORY here, this makes the code lighter
-          *
-          * ToDo?: We could avoid that piece of code if encoder_destroy could
-          *        handle different destroy levels
           */
- #ifdef BFRAMES
-  xvid_err_memory4:
-         for (i=0; i<pEnc->mbParam.max_bframes; i++)
-         {
-                 if (pEnc->bframes[i] == NULL) continue;
+   xvid_err_memory5:
-                 image_destroy(&pEnc->bframes[i]->image,
+         for (n = 0; n < pEnc->mbParam.max_bframes+1; n++) {
-                               pEnc->mbParam.edged_width,
+                         image_destroy(&pEnc->queue[n].image, pEnc->mbParam.edged_width,
                                pEnc->mbParam.edged_height);
+                 }
-                 xvid_free(pEnc->bframes[i]->mbs);
+         xvid_free(pEnc->queue);
-                 xvid_free(pEnc->bframes[i]);
+   xvid_err_memory4:
+         if (pEnc->mbParam.max_bframes > 0) {
+                 int i;
+                 for (i = 0; i < pEnc->mbParam.max_bframes; i++) {
+                         if (pEnc->bframes[i] == NULL)
+                                 continue;
+                         image_destroy(&pEnc->bframes[i]->image, pEnc->mbParam.edged_width,
+                                                   pEnc->mbParam.edged_height);
+                         xvid_free(pEnc->bframes[i]->mbs);
+                         xvid_free(pEnc->bframes[i]);
          }
          xvid_free(pEnc->bframes);
+         }
- #endif
   xvid_err_memory3:
- #ifdef _DEBUG
-         image_destroy(&pEnc->sOriginal,
+         if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
-                       pEnc->mbParam.edged_width,
+                 image_destroy(&pEnc->sOriginal, pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
- #endif
+                 image_destroy(&pEnc->sOriginal2, pEnc->mbParam.edged_width,
+                                           pEnc->mbParam.edged_height);
+         }
- #ifdef BFRAMES
+         image_destroy(&pEnc->f_refh, pEnc->mbParam.edged_width,
-         image_destroy(&pEnc->f_refh,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->f_refv,
+         image_destroy(&pEnc->f_refv, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->f_refhv,
+         image_destroy(&pEnc->f_refhv, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
- #endif
-         image_destroy(&pEnc->current->image,
+         image_destroy(&pEnc->current->image, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->reference->image,
+         image_destroy(&pEnc->reference->image, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->vInterH,
+         image_destroy(&pEnc->vInterH, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->vInterV,
+         image_destroy(&pEnc->vInterV, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->vInterVf,
+         image_destroy(&pEnc->vInterHV, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->vInterHV,
-                       pEnc->mbParam.edged_width,
+ /* destroy GMC image */
-                       pEnc->mbParam.edged_height);
+         image_destroy(&pEnc->vGMC, pEnc->mbParam.edged_width,
-         image_destroy(&pEnc->vInterHVf,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
+   xvid_err_memory2a:
+         xvid_free(pEnc->mbParam.mpeg_quant_matrices);
   xvid_err_memory2:
          xvid_free(pEnc->current->mbs);
          xvid_free(pEnc->reference->mbs);
-Line 443
+Line 488
   xvid_err_memory1:
          xvid_free(pEnc->current);
          xvid_free(pEnc->reference);
+   xvid_err_memory1a:
+         if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
+                 xvid_free(pEnc->temp_dquants);
+         }
+   xvid_err_memory0:
+         for (n=0; n<pEnc->num_plugins;n++) {
+                 if (pEnc->plugins[n].func) {
+                         pEnc->plugins[n].func(pEnc->plugins[n].param, XVID_PLG_DESTROY, 0, 0);
+                 }
+         }
+         xvid_free(pEnc->plugins);
+         xvid_free(pEnc->zones);
          xvid_free(pEnc);
+         create->handle = NULL;
          return XVID_ERR_MEMORY;
  }
- int encoder_destroy(Encoder * pEnc)
+ /*****************************************************************************
+  * Encoder destruction
+  *
+  * This function destroy the entire encoder structure created by a previous
+  * successful enc_create call.
+  *
+  * Returned values (for now only one returned value) :
+  *      - 0      - no errors
+  *
+  ****************************************************************************/
+ int
+ enc_destroy(Encoder * pEnc)
  {
-         ENC_CHECK(pEnc);
+         int i;
          /* B Frames specific */
- #ifdef BFRAMES
+         for (i = 0; i < pEnc->mbParam.max_bframes+1; i++) {
-         int i;
+                 image_destroy(&pEnc->queue[i].image, pEnc->mbParam.edged_width,
+                                           pEnc->mbParam.edged_height);
+         }
-         for (i=0; i<pEnc->mbParam.max_bframes; i++)
+         xvid_free(pEnc->queue);
-         {
-                 if (pEnc->bframes[i] == NULL) continue;
+         if (pEnc->mbParam.max_bframes > 0) {
-                 image_destroy(&pEnc->bframes[i]->image,
+                 for (i = 0; i < pEnc->mbParam.max_bframes; i++) {
-                               pEnc->mbParam.edged_width,
-                               pEnc->mbParam.edged_height);
-                 xvid_free(pEnc->bframes[i]->mbs);
+                         if (pEnc->bframes[i] == NULL)
+                                 continue;
+                         image_destroy(&pEnc->bframes[i]->image, pEnc->mbParam.edged_width,
+                                           pEnc->mbParam.edged_height);
+                         xvid_free(pEnc->bframes[i]->mbs);
                  xvid_free(pEnc->bframes[i]);
          }
          xvid_free(pEnc->bframes);
- #endif
+         }
          /* All images, reference, current etc ... */
-         image_destroy(&pEnc->current->image,
+         image_destroy(&pEnc->current->image, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->reference->image,
+         image_destroy(&pEnc->reference->image, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->vInterH,
+         image_destroy(&pEnc->vInterH, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->vInterV,
+         image_destroy(&pEnc->vInterV, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->vInterVf,
+         image_destroy(&pEnc->vInterHV, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->vInterHV,
+         image_destroy(&pEnc->f_refh, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->vInterHVf,
+         image_destroy(&pEnc->f_refv, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
- #ifdef BFRAMES
+         image_destroy(&pEnc->f_refhv, pEnc->mbParam.edged_width,
-         image_destroy(&pEnc->f_refh,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->f_refv,
+         image_destroy(&pEnc->vGMC, pEnc->mbParam.edged_width,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
-         image_destroy(&pEnc->f_refhv,
-                       pEnc->mbParam.edged_width,
+         if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
+                 image_destroy(&pEnc->sOriginal, pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
- #endif
+                 image_destroy(&pEnc->sOriginal2, pEnc->mbParam.edged_width,
- #ifdef _DEBUG
-         image_destroy(&pEnc->sOriginal,
-                       pEnc->mbParam.edged_width,
                        pEnc->mbParam.edged_height);
- #endif
+         }
          /* Encoder structure */
-Line 523
+Line 588
          xvid_free(pEnc->reference->mbs);
          xvid_free(pEnc->reference);
-         xvid_free(pEnc);
+         if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
+                 xvid_free(pEnc->temp_dquants);
-         return XVID_ERR_OK;
  }
+         if (pEnc->num_plugins>0) {
+                 xvid_plg_destroy_t pdestroy;
+                 memset(&pdestroy, 0, sizeof(xvid_plg_destroy_t));
- // ==================================================================
+                 pdestroy.version = XVID_VERSION;
- #ifdef BFRAMES
+                 pdestroy.num_frames = pEnc->m_framenum;
- int encoder_encode(Encoder * pEnc, XVID_ENC_FRAME * pFrame, XVID_ENC_STATS * pResult)
- {
-         uint16_t x, y;
-         Bitstream bs;
-         uint32_t bits;
- #ifdef _DEBUG
+                 for (i=0; i<pEnc->num_plugins;i++) {
-         float psnr;
+                         if (pEnc->plugins[i].func) {
-         char temp[128];
+                                 pEnc->plugins[i].func(pEnc->plugins[i].param, XVID_PLG_DESTROY, &pdestroy, 0);
- #endif
+                         }
+                 }
+                 xvid_free(pEnc->plugins);
+         }
-         ENC_CHECK(pEnc);
+         xvid_free(pEnc->mbParam.mpeg_quant_matrices);
-         ENC_CHECK(pFrame);
-         start_global_timer();
+         if (pEnc->num_plugins>0)
+                 xvid_free(pEnc->zones);
-         BitstreamInit(&bs, pFrame->bitstream, 0);
+         xvid_free(pEnc);
+         return 0;  /* ok */
+ }
- // %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- // bframe "flush" code
- // %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-         if ((pFrame->image == NULL || pEnc->flush_bframes) &&
+ /*
-                 pEnc->bframenum_head < pEnc->bframenum_tail)
+   call the plugins
-         {
+   */
-                 if (pEnc->flush_bframes == 0)
+ static void call_plugins(Encoder * pEnc, FRAMEINFO * frame, IMAGE * original,
+                                                  int opt, int * type, int * quant, xvid_enc_stats_t * stats)
                  {
-                         // we have reached end of stream without getting a future reference
+         unsigned int i, j;
-                         // .. so encode last final frame a pframe
+         xvid_plg_data_t data;
-                         //dprintf("--- PFRAME (final frame correction) --- ");
-                         pEnc->bframenum_tail--;
-                         SWAP(pEnc->current, pEnc->reference);
-                         SWAP(pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
+         /* set data struct */
-                         FrameCodeP(pEnc, &bs, &bits, 1, 0);
+         memset(&data, 0, sizeof(xvid_plg_data_t));
+         data.version = XVID_VERSION;
+         /* find zone */
+         for(i=0; i<pEnc->num_zones && pEnc->zones[i].frame<=frame->frame_num; i++) ;
+         data.zone = i>0 ? &pEnc->zones[i-1] : NULL;
+         data.width = pEnc->mbParam.width;
+         data.height = pEnc->mbParam.height;
+         data.mb_width = pEnc->mbParam.mb_width;
+         data.mb_height = pEnc->mbParam.mb_height;
+         data.fincr = frame->fincr;
+         data.fbase = pEnc->mbParam.fbase;
+         data.bquant_ratio = pEnc->mbParam.bquant_ratio;
+         data.bquant_offset = pEnc->mbParam.bquant_offset;
+         for (i=0; i<3; i++) {
+                 data.min_quant[i] = pEnc->mbParam.min_quant[i];
+                 data.max_quant[i] = pEnc->mbParam.max_quant[i];
+         }
+         data.reference.csp = XVID_CSP_USER;
+         data.reference.plane[0] = pEnc->reference->image.y;
+         data.reference.plane[1] = pEnc->reference->image.u;
+         data.reference.plane[2] = pEnc->reference->image.v;
+         data.reference.stride[0] = pEnc->mbParam.edged_width;
+         data.reference.stride[1] = pEnc->mbParam.edged_width/2;
+         data.reference.stride[2] = pEnc->mbParam.edged_width/2;
+         data.current.csp = XVID_CSP_USER;
+         data.current.plane[0] = frame->image.y;
+         data.current.plane[1] = frame->image.u;
+         data.current.plane[2] = frame->image.v;
+         data.current.stride[0] = pEnc->mbParam.edged_width;
+         data.current.stride[1] = pEnc->mbParam.edged_width/2;
+         data.current.stride[2] = pEnc->mbParam.edged_width/2;
+         data.frame_num = frame->frame_num;
+         if (opt == XVID_PLG_BEFORE) {
+                 data.type = *type;
+                 data.quant = *quant;
+                 data.vol_flags = frame->vol_flags;
+                 data.vop_flags = frame->vop_flags;
+                 data.motion_flags = frame->motion_flags;
+         } else if (opt == XVID_PLG_FRAME) {
+                 data.type = coding2type(frame->coding_type);
+                 data.quant = frame->quant;
+                 if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
+                         data.dquant = pEnc->temp_dquants;
+                         data.dquant_stride = pEnc->mbParam.mb_width;
+                         memset(data.dquant, 0, data.mb_width*data.mb_height);
+                 }
+         } else { /* XVID_PLG_AFTER */
+                 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
+                         data.original.csp = XVID_CSP_USER;
+                         data.original.plane[0] = original->y;
+                         data.original.plane[1] = original->u;
+                         data.original.plane[2] = original->v;
+                         data.original.stride[0] = pEnc->mbParam.edged_width;
+                         data.original.stride[1] = pEnc->mbParam.edged_width/2;
+                         data.original.stride[2] = pEnc->mbParam.edged_width/2;
+                 }
+                 if ((frame->vol_flags & XVID_VOL_EXTRASTATS) ||
+                         (pEnc->mbParam.plugin_flags & XVID_REQPSNR)) {
+                         data.sse_y =
+                                 plane_sse( original->y, frame->image.y,
+                                                    pEnc->mbParam.edged_width, pEnc->mbParam.width,
+                                                    pEnc->mbParam.height);
+                         data.sse_u =
+                                 plane_sse( original->u, frame->image.u,
+                                                    pEnc->mbParam.edged_width/2, pEnc->mbParam.width/2,
+                                                    pEnc->mbParam.height/2);
+                         data.sse_v =
+                                 plane_sse( original->v, frame->image.v,
+                                                    pEnc->mbParam.edged_width/2, pEnc->mbParam.width/2,
+                                                    pEnc->mbParam.height/2);
+                 }
+                 data.type = coding2type(frame->coding_type);
+                 data.quant = frame->quant;
+                 if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
+                         data.dquant = pEnc->temp_dquants;
+                         data.dquant_stride = pEnc->mbParam.mb_width;
+                         for (j=0; j<pEnc->mbParam.mb_height; j++)
+                         for (i=0; i<pEnc->mbParam.mb_width; i++) {
+                                 data.dquant[j*data.dquant_stride + i] = frame->mbs[j*pEnc->mbParam.mb_width + i].dquant;
+                         }
+                 }
+                 data.vol_flags = frame->vol_flags;
+                 data.vop_flags = frame->vop_flags;
+                 data.motion_flags = frame->motion_flags;
+                 data.length = frame->length;
+                 data.kblks = frame->sStat.kblks;
+                 data.mblks = frame->sStat.mblks;
+                 data.ublks = frame->sStat.ublks;
+                 /* New code */
+                 data.stats.type      = coding2type(frame->coding_type);
+                 data.stats.quant     = frame->quant;
+                 data.stats.vol_flags = frame->vol_flags;
+                 data.stats.vop_flags = frame->vop_flags;
+                 data.stats.length    = frame->length;
+                 data.stats.hlength   = frame->length - (frame->sStat.iTextBits / 8);
+                 data.stats.kblks     = frame->sStat.kblks;
+                 data.stats.mblks     = frame->sStat.mblks;
+                 data.stats.ublks     = frame->sStat.ublks;
+                 data.stats.sse_y     = data.sse_y;
+                 data.stats.sse_u     = data.sse_u;
+                 data.stats.sse_v     = data.sse_v;
-                         BitstreamPad(&bs);
+                 if (stats)
-                         pFrame->length = BitstreamLength(&bs);
+                         *stats = data.stats;
-                         pFrame->input_consumed = 0;
-                         pFrame->intra = 0;
-                         return XVID_ERR_OK;
                  }
-                 //dprintf("--- BFRAME (flush) --- ");
+         /* call plugins */
-                 FrameCodeB(pEnc,
+         for (i=0; i<(unsigned int)pEnc->num_plugins;i++) {
-                         pEnc->bframes[pEnc->bframenum_head],
+                 emms();
-                          &bs, &bits);
+                 if (pEnc->plugins[i].func) {
-                 pEnc->bframenum_head++;
+                         if (pEnc->plugins[i].func(pEnc->plugins[i].param, opt, &data, 0) < 0) {
+                                 continue;
-                 BitstreamPad(&bs);
-                 pFrame->length = BitstreamLength(&bs);
-                 pFrame->input_consumed = 0;
-                 pFrame->intra = 0;
-                 return XVID_ERR_OK;
          }
-         if (pFrame->image == NULL)
-         {
-                 pFrame->length = 0;
-                 pFrame->input_consumed = 1;
-                 pFrame->intra = 0;
-                 return XVID_ERR_OK;
          }
-         if (pEnc->bframenum_head > 0)
-         {
-                 pEnc->bframenum_head = pEnc->bframenum_tail = 0;
          }
+         emms();
-         pEnc->flush_bframes = 0;
+         /* copy modified values back into frame*/
+         if (opt == XVID_PLG_BEFORE) {
- // %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+                 *type = data.type;
+                 *quant = data.quant > 0 ? data.quant : 2;   /* default */
-         SWAP(pEnc->current, pEnc->reference);
-         pEnc->current->quant = (pFrame->quant == 0) ? RateControlGetQ(&pEnc->rate_control, 0) : pFrame->quant;
+                 frame->vol_flags = data.vol_flags;
+                 frame->vop_flags = data.vop_flags;
+                 frame->motion_flags = data.motion_flags;
-         if(pEnc->current->quant < 1)
+         } else if (opt == XVID_PLG_FRAME) {
-                 pEnc->current->quant = 1;
-         if(pEnc->current->quant > 31)
+                 if ((pEnc->mbParam.plugin_flags & XVID_REQDQUANTS)) {
-                 pEnc->current->quant = 31;
+                         for (j=0; j<pEnc->mbParam.mb_height; j++)
+                         for (i=0; i<pEnc->mbParam.mb_width; i++) {
+                                 frame->mbs[j*pEnc->mbParam.mb_width + i].dquant = data.dquant[j*data.mb_width + i];
+                         }
+                 } else {
+                         for (j=0; j<pEnc->mbParam.mb_height; j++)
+                         for (i=0; i<pEnc->mbParam.mb_width; i++) {
+                                 frame->mbs[j*pEnc->mbParam.mb_width + i].dquant = 0;
+                         }
+                 }
+                 frame->mbs[0].quant = data.quant; /* FRAME will not affect the quant in stats */
+         }
-         pEnc->current->global_flags = pFrame->general;
-         pEnc->current->motion_flags = pFrame->motion;
-         pEnc->current->seconds = pEnc->mbParam.m_seconds;
-         pEnc->current->ticks = pEnc->mbParam.m_ticks;
-         //@@@ TODO: dyanmic fcode (in both directions)
-         pEnc->current->fcode = pEnc->mbParam.m_fcode;
-         pEnc->current->bcode = pEnc->mbParam.m_fcode;
-         start_timer();
-         if (image_input(&pEnc->current->image, pEnc->mbParam.width, pEnc->mbParam.height, pEnc->mbParam.edged_width,
-                         pFrame->image, pFrame->colorspace))
-         {
-                 return XVID_ERR_FORMAT;
          }
-         stop_conv_timer();
- #ifdef _DEBUG
-         image_copy(&pEnc->sOriginal, &pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height);
- #endif
+ static __inline void inc_frame_num(Encoder * pEnc)
+ {
+         pEnc->current->frame_num = pEnc->m_framenum;
+         pEnc->current->stamp = pEnc->mbParam.m_stamp;   /* first frame is zero */
- // %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+         pEnc->mbParam.m_stamp += pEnc->current->fincr;
- // lumi masking
+         pEnc->m_framenum++;     /* debug ticker */
- // %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+ }
-         if ((pEnc->current->global_flags & XVID_LUMIMASKING))
+ static __inline void dec_frame_num(Encoder * pEnc)
          {
-                 int * temp_dquants = (int *) xvid_malloc(pEnc->mbParam.mb_width * pEnc->mbParam.mb_height * sizeof(int), CACHE_LINE);
+         pEnc->mbParam.m_stamp -= pEnc->mbParam.fincr;
+         pEnc->m_framenum--;     /* debug ticker */
-                 pEnc->current->quant = adaptive_quantization(pEnc->current->image.y,
+ }
-                                                             pEnc->mbParam.edged_width,  // stride
-                                                             temp_dquants,
-                                                             pEnc->current->quant,
-                                                             pEnc->current->quant,       // min_quant
-*pEnc->current->quant,     // max_quant
-                                                             pEnc->mbParam.mb_width,
-                                                             pEnc->mbParam.mb_height);
-                 for (y = 0; y < pEnc->mbParam.mb_height; y++)
+ static __inline void
-                         for (x = 0; x < pEnc->mbParam.mb_width; x++)
+ MBSetDquant(MACROBLOCK * pMB, int x, int y, MBParam * mbParam)
                          {
-                                 MACROBLOCK *pMB = &pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
+         if (pMB->cbp == 0) {
-                                 pMB->dquant = iDQtab[(temp_dquants[y * pEnc->mbParam.mb_width + x] + 2)];
+                 /* we want to code dquant but the quantizer value will not be used yet
+                         let's find out if we can postpone dquant to next MB
+                 */
+                 if (x == mbParam->mb_width-1 && y == mbParam->mb_height-1) {
+                         pMB->dquant = 0; /* it's the last MB of all, the easiest case */
+                         return;
+                 } else {
+                         MACROBLOCK * next = pMB + 1;
+                         const MACROBLOCK * prev = pMB - 1;
+                         if (next->mode != MODE_INTER4V && next->mode != MODE_NOT_CODED)
+                                 /* mode allows dquant change in the future */
+                                 if (abs(next->quant - prev->quant) <= 2) {
+                                         /* quant change is not out of range */
+                                         pMB->quant = prev->quant;
+                                         pMB->dquant = 0;
+                                         next->dquant = next->quant - prev->quant;
+                                         return;
                          }
-                 xvid_free(temp_dquants);
+                 }
+         }
+         /* couldn't skip this dquant */
+         pMB->mode = MODE_INTER_Q;
          }
- // %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- // ivop/pvop/bvop selection
- // %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-         if (pEnc->iFrameNum == 0 ||
+ static __inline void
-                 pFrame->intra == 1 ||
+ set_timecodes(FRAMEINFO* pCur,FRAMEINFO *pRef, int32_t time_base)
-                 (pFrame->intra < 0 && (pEnc->iMaxKeyInterval > 0 && pEnc->iFrameNum >= pEnc->iMaxKeyInterval)) ||
-                 image_mad(&pEnc->reference->image, &pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.width, pEnc->mbParam.height) > 30)
          {
-                 //dprintf("--- IFRAME ---");
-                 FrameCodeI(pEnc, &bs, &bits);
-                 pFrame->intra = 1;
+         pCur->ticks = (int32_t)pCur->stamp % time_base;
-                 pEnc->flush_bframes = 1;
+         pCur->seconds =  ((int32_t)pCur->stamp / time_base)     - ((int32_t)pRef->stamp / time_base) ;
-                 /* note: sequences like "IIBB" decode fine with msfdam but,
+ #if 0   /* HEAVY DEBUG OUTPUT */
-                    go screwy with divx5.00 */
+         fprintf(stderr,"WriteVop:   %d - %d \n",
+                         ((int32_t)pCur->stamp / time_base), ((int32_t)pRef->stamp / time_base));
+         fprintf(stderr,"set_timecodes: VOP %1d   stamp=%lld ref_stamp=%lld  base=%d\n",
+                         pCur->coding_type, pCur->stamp, pRef->stamp, time_base);
+         fprintf(stderr,"set_timecodes: VOP %1d   seconds=%d   ticks=%d   (ref-sec=%d  ref-tick=%d)\n",
+                         pCur->coding_type, pCur->seconds, pCur->ticks, pRef->seconds, pRef->ticks);
+ #endif
          }
-         else if (pEnc->bframenum_tail >= pEnc->mbParam.max_bframes)
-         {
-                 //dprintf("--- PFRAME ---");
-                 FrameCodeP(pEnc, &bs, &bits, 1, 0);
+ static int
-                 pFrame->intra = 0;
+ gcd(int a, int b)
-                 pEnc->flush_bframes = 1;
-         }
-         else
          {
-                 //dprintf("--- BFRAME (store) ---  head=%i tail=%i", pEnc->bframenum_head, pEnc->bframenum_tail);
+         int r ;
-                 if (pFrame->bquant < 1)
+         if (b > a) {
-                 {
+                 r = a;
-                         pEnc->current->quant = ((pEnc->reference->quant + pEnc->current->quant) * pEnc->bquant_ratio) / 200;
+                 a = b;
-                 }
+                 b = r;
-                 else
-                 {
-                         pEnc->current->quant = pFrame->bquant;
                  }
-                 // store frame into bframe buffer & swap ref back to current
+         while ((r = a % b)) {
-                 SWAP(pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
+                 a = b;
-                 SWAP(pEnc->current, pEnc->reference);
+                 b = r;
-                 pEnc->bframenum_tail++;
-                 pFrame->intra = 0;
-                 pFrame->length = 0;
-                 pFrame->input_consumed = 1;
-                 pEnc->mbParam.m_ticks += pEnc->mbParam.fincr;
-                 if (pEnc->mbParam.m_ticks > pEnc->mbParam.fbase)
-                 {
-                         pEnc->mbParam.m_seconds++;
-                         pEnc->mbParam.m_ticks = 0;
                  }
-                 return XVID_ERR_OK;
+         return b;
          }
-         BitstreamPad(&bs);
+ static void
-         pFrame->length = BitstreamLength(&bs);
+ simplify_par(int *par_width, int *par_height)
-         if (pResult)
          {
-                 pResult->quant = pEnc->current->quant;
-                 pResult->hlength = pFrame->length - (pEnc->sStat.iTextBits / 8);
-                 pResult->kblks = pEnc->sStat.kblks;
-                 pResult->mblks = pEnc->sStat.mblks;
-                 pResult->ublks = pEnc->sStat.ublks;
-         }
- #ifdef _DEBUG
+         int _par_width  = (!*par_width)  ? 1 : (*par_width<0)  ? -*par_width:  *par_width;
-         psnr = image_psnr(&pEnc->sOriginal, &pEnc->current->image, pEnc->mbParam.edged_width,
+         int _par_height = (!*par_height) ? 1 : (*par_height<0) ? -*par_height: *par_height;
-                                 pEnc->mbParam.width, pEnc->mbParam.height);
+         int divisor = gcd(_par_width, _par_height);
-         sprintf(temp, "PSNR: %f\n", psnr);
+         _par_width  /= divisor;
-         DEBUG(temp);
+         _par_height /= divisor;
- #endif
-         if (pFrame->quant == 0)
+         /* 2^8 precision maximum */
-         {
+         if (_par_width>255 || _par_height>255) {
-                 RateControlUpdate(&pEnc->rate_control,
+                 float div;
-                                   pEnc->current->quant,
+                 emms();
-                                   pFrame->length,
+                 if (_par_width>_par_height)
-                                   pFrame->intra);
+                         div = (float)_par_width/255;
-         }
+                 else
+                         div = (float)_par_height/255;
-         pEnc->iFrameNum++;
+                 _par_width  = (int)((float)_par_width/div);
-         pEnc->mbParam.m_ticks += pEnc->mbParam.fincr;
+                 _par_height = (int)((float)_par_height/div);
-         if (pEnc->mbParam.m_ticks > pEnc->mbParam.fbase)
-         {
-                 pEnc->mbParam.m_seconds++;
-                 pEnc->mbParam.m_ticks = 0;
          }
-         pFrame->input_consumed = 1;
-         stop_global_timer();
+         *par_width = _par_width;
-         write_timer();
+         *par_height = _par_height;
-         return XVID_ERR_OK;
+         return;
  }
- // ==================================================================
- #else
- int encoder_encode(Encoder * pEnc, XVID_ENC_FRAME * pFrame, XVID_ENC_STATS * pResult)
+ /*****************************************************************************
+  * IPB frame encoder entry point
+  *
+  * Returned values :
+  *      - >0                       - output bytes
+  *      - 0                             - no output
+  *      - XVID_ERR_VERSION - wrong version passed to core
+  *      - XVID_ERR_END   - End of stream reached before end of coding
+  *      - XVID_ERR_FORMAT  - the image subsystem reported the image had a wrong
+  *                                               format
+  ****************************************************************************/
+ int
+ enc_encode(Encoder * pEnc,
+                            xvid_enc_frame_t * xFrame,
+                            xvid_enc_stats_t * stats)
  {
-         uint16_t x, y;
+         xvid_enc_frame_t * frame;
+         int type;
          Bitstream bs;
-         uint32_t bits;
-         uint16_t write_vol_header = 0;
+         if (XVID_VERSION_MAJOR(xFrame->version) != 1 || (stats && XVID_VERSION_MAJOR(stats->version) != 1))     /* v1.x.x */
- #ifdef _DEBUG
+                 return XVID_ERR_VERSION;
-         float psnr;
-         uint8_t temp[100];
+         xFrame->out_flags = 0;
- #endif
          start_global_timer();
+         BitstreamInit(&bs, xFrame->bitstream, 0);
-         ENC_CHECK(pEnc);
-         ENC_CHECK(pFrame);
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-         ENC_CHECK(pFrame->bitstream);
+          * enqueue image to the encoding-queue
-         ENC_CHECK(pFrame->image);
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
-         SWAP(pEnc->current, pEnc->reference);
+         if (xFrame->input.csp != XVID_CSP_NULL)
+         {
-         pEnc->current->global_flags = pFrame->general;
+                 QUEUEINFO * q = &pEnc->queue[pEnc->queue_tail];
-         pEnc->current->motion_flags = pFrame->motion;
-         pEnc->mbParam.hint = &pFrame->hint;
          start_timer();
-         if (image_input(&pEnc->current->image, pEnc->mbParam.width, pEnc->mbParam.height, pEnc->mbParam.edged_width,
+                 if (image_input
-                         pFrame->image, pFrame->colorspace))
+                         (&q->image, pEnc->mbParam.width, pEnc->mbParam.height,
+                         pEnc->mbParam.edged_width, (uint8_t**)xFrame->input.plane, xFrame->input.stride,
+                         xFrame->input.csp, xFrame->vol_flags & XVID_VOL_INTERLACING))
          {
+                         emms();
                  return XVID_ERR_FORMAT;
          }
          stop_conv_timer();
- #ifdef _DEBUG
+                 if ((xFrame->vop_flags & XVID_VOP_CHROMAOPT)) {
-         image_copy(&pEnc->sOriginal, &pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height);
+                         image_chroma_optimize(&q->image,
- #endif
+                                 pEnc->mbParam.width, pEnc->mbParam.height, pEnc->mbParam.edged_width);
+                 }
-         EMMS();
-         BitstreamInit(&bs, pFrame->bitstream, 0);
+                 q->frame = *xFrame;
-         if (pFrame->quant == 0)
+                 if (xFrame->quant_intra_matrix)
-         {
-                 pEnc->current->quant = RateControlGetQ(&pEnc->rate_control,0);
-         }
-         else
          {
-                 pEnc->current->quant = pFrame->quant;
+                         memcpy(q->quant_intra_matrix, xFrame->quant_intra_matrix, 64*sizeof(unsigned char));
+                         q->frame.quant_intra_matrix = q->quant_intra_matrix;
          }
-         if ((pEnc->current->global_flags & XVID_LUMIMASKING))
+                 if (xFrame->quant_inter_matrix)
-         {
-                 int * temp_dquants = (int *) xvid_malloc(pEnc->mbParam.mb_width * pEnc->mbParam.mb_height * sizeof(int), CACHE_LINE);
-                 pEnc->current->quant = adaptive_quantization(pEnc->current->image.y,
-                                                             pEnc->mbParam.edged_width,  // stride
-                                                             temp_dquants,
-                                                             pEnc->current->quant,
-                                                             pEnc->current->quant,       // min_quant
-*pEnc->current->quant,     // max_quant
-                                                             pEnc->mbParam.mb_width,
-                                                             pEnc->mbParam.mb_height);
-                 for (y = 0; y < pEnc->mbParam.mb_height; y++)
-                         for (x = 0; x < pEnc->mbParam.mb_width; x++)
                          {
-                                 MACROBLOCK *pMB = &pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
+                         memcpy(q->quant_inter_matrix, xFrame->quant_inter_matrix, 64*sizeof(unsigned char));
-                                 pMB->dquant = iDQtab[(temp_dquants[y * pEnc->mbParam.mb_width + x] + 2)];
+                         q->frame.quant_inter_matrix = q->quant_inter_matrix;
-                         }
-                 xvid_free(temp_dquants);
          }
-         if (pEnc->current->global_flags & XVID_H263QUANT) {
+                 pEnc->queue_tail = (pEnc->queue_tail + 1) % (pEnc->mbParam.max_bframes+1);
-                 if(pEnc->mbParam.m_quant_type != H263_QUANT)
+                 pEnc->queue_size++;
-                         write_vol_header = 1;
-                 pEnc->mbParam.m_quant_type = H263_QUANT;
          }
-         else if(pEnc->current->global_flags & XVID_MPEGQUANT) {
-                 int ret1, ret2;
-                 ret1 = ret2 = 0;
-                 if(pEnc->mbParam.m_quant_type != MPEG4_QUANT)
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-                         write_vol_header = 1;
+          * bframe flush code
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
-                 pEnc->mbParam.m_quant_type = MPEG4_QUANT;
+ repeat:
-                 if ((pEnc->current->global_flags & XVID_CUSTOM_QMATRIX) > 0) {
+         if (pEnc->flush_bframes)
-                         if(pFrame->quant_intra_matrix != NULL)
-                                 ret1 = set_intra_matrix(pFrame->quant_intra_matrix);
-                         if(pFrame->quant_inter_matrix != NULL)
-                                 ret2 = set_inter_matrix(pFrame->quant_inter_matrix);
-                 }
-                 else {
-                         ret1 = set_intra_matrix(get_default_intra_matrix());
-                         ret2 = set_inter_matrix(get_default_inter_matrix());
-                 }
-                 if(write_vol_header == 0)
-                         write_vol_header = ret1 | ret2;
-         }
-         if (pFrame->intra < 0)
          {
-                 if ((pEnc->iFrameNum == 0) || ((pEnc->iMaxKeyInterval > 0)
+                 if (pEnc->bframenum_head < pEnc->bframenum_tail) {
-                                                && (pEnc->iFrameNum >= pEnc->iMaxKeyInterval)))
-                         pFrame->intra = FrameCodeI(pEnc, &bs, &bits);
+                         DPRINTF(XVID_DEBUG_DEBUG,"*** BFRAME (flush) bf: head=%i tail=%i   queue: head=%i tail=%i size=%i\n",
-                 else
+                                         pEnc->bframenum_head, pEnc->bframenum_tail,
-                         pFrame->intra = FrameCodeP(pEnc, &bs, &bits, 0, write_vol_header);
+                                         pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
+                         if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
+                                 image_copy(&pEnc->sOriginal2, &pEnc->bframes[pEnc->bframenum_head]->image,
+                                                    pEnc->mbParam.edged_width, pEnc->mbParam.height);
          }
-         else
-         {
+                         FrameCodeB(pEnc, pEnc->bframes[pEnc->bframenum_head], &bs);
-                 if (pFrame->intra == 1)
+                         call_plugins(pEnc, pEnc->bframes[pEnc->bframenum_head], &pEnc->sOriginal2, XVID_PLG_AFTER, 0, 0, stats);
-                         pFrame->intra = FrameCodeI(pEnc, &bs, &bits);
+                         pEnc->bframenum_head++;
-                 else
-                         pFrame->intra = FrameCodeP(pEnc, &bs, &bits, 1, write_vol_header);
+                         goto done;
          }
-         BitstreamPutBits(&bs, 0xFFFF, 16);
+                 /* write an empty marker to the bitstream.
-         BitstreamPutBits(&bs, 0xFFFF, 16);
+                    for divx5 decoder compatibility, this marker must consist
+                    of a not-coded p-vop, with a time_base of zero, and time_increment
+                    indentical to the future-referece frame.
+                 */
+                 if ((pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED && pEnc->bframenum_tail > 0)) {
+                         int tmp;
+                         int bits;
+                         DPRINTF(XVID_DEBUG_DEBUG,"*** EMPTY bf: head=%i tail=%i   queue: head=%i tail=%i size=%i\n",
+                                 pEnc->bframenum_head, pEnc->bframenum_tail,
+                                 pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
+                         bits = BitstreamPos(&bs);
+                         tmp = pEnc->current->seconds;
+                         pEnc->current->seconds = 0; /* force time_base = 0 */
+                         BitstreamWriteVopHeader(&bs, &pEnc->mbParam, pEnc->current, 0, pEnc->current->quant);
          BitstreamPad(&bs);
-         pFrame->length = BitstreamLength(&bs);
+                         pEnc->current->seconds = tmp;
-         if (pResult)
+                         /* add the not-coded length to the reference frame size */
-         {
+                         pEnc->current->length += (BitstreamPos(&bs) - bits) / 8;
-                 pResult->quant = pEnc->current->quant;
+                         call_plugins(pEnc, pEnc->current, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
-                 pResult->hlength = pFrame->length - (pEnc->sStat.iTextBits / 8);
-                 pResult->kblks = pEnc->sStat.kblks;
-                 pResult->mblks = pEnc->sStat.mblks;
-                 pResult->ublks = pEnc->sStat.ublks;
-         }
-         EMMS();
+                         /* flush complete: reset counters */
+                         pEnc->flush_bframes = 0;
+                         pEnc->bframenum_head = pEnc->bframenum_tail = 0;
+                         goto done;
-         if (pFrame->quant == 0)
-         {
-                 RateControlUpdate(&pEnc->rate_control,
-                                   pEnc->current->quant,
-                                   pFrame->length,
-                                   pFrame->intra);
          }
- #ifdef _DEBUG
+                 /* flush complete: reset counters */
-         psnr = image_psnr(&pEnc->sOriginal, &pEnc->current->image, pEnc->mbParam.edged_width,
+                 pEnc->flush_bframes = 0;
-                                 pEnc->mbParam.width, pEnc->mbParam.height);
+                 pEnc->bframenum_head = pEnc->bframenum_tail = 0;
+         }
-         sprintf(temp, "PSNR: %f\n", psnr);
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-         DEBUG(temp);
+          * dequeue frame from the encoding queue
- #endif
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
-         pEnc->iFrameNum++;
+         if (pEnc->queue_size == 0)              /* empty */
+         {
+                 if (xFrame->input.csp == XVID_CSP_NULL) /* no futher input */
+                 {
-         stop_global_timer();
+                         DPRINTF(XVID_DEBUG_DEBUG,"*** FINISH bf: head=%i tail=%i   queue: head=%i tail=%i size=%i\n",
-         write_timer();
+                                 pEnc->bframenum_head, pEnc->bframenum_tail,
+                                 pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
-         return XVID_ERR_OK;
+                         if (!(pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) && pEnc->mbParam.max_bframes > 0) {
+                                 call_plugins(pEnc, pEnc->current, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
  }
- #endif
+                         /* if the very last frame is to be b-vop, we must change it to a p-vop */
+                         if (pEnc->bframenum_tail > 0) {
- static __inline void CodeIntraMB(Encoder *pEnc, MACROBLOCK *pMB) {
+                                 SWAP(FRAMEINFO*, pEnc->current, pEnc->reference);
+                                 pEnc->bframenum_tail--;
+                                 SWAP(FRAMEINFO*, pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
-         pMB->mode = MODE_INTRA;
+                                 /* convert B-VOP to P-VOP */
+                                 pEnc->current->quant  = 100*pEnc->current->quant - pEnc->mbParam.bquant_offset;
+                                 pEnc->current->quant += pEnc->mbParam.bquant_ratio - 1; /* to avoid rouding issues */
+                                 pEnc->current->quant /= pEnc->mbParam.bquant_ratio;
-         /* zero mv statistics */
+                                 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
-         pMB->mvs[0].x = pMB->mvs[1].x = pMB->mvs[2].x = pMB->mvs[3].x = 0;
+                                         image_copy(&pEnc->sOriginal, &pEnc->current->image,
-         pMB->mvs[0].y = pMB->mvs[1].y = pMB->mvs[2].y = pMB->mvs[3].y = 0;
+                                                    pEnc->mbParam.edged_width, pEnc->mbParam.height);
-         pMB->sad8[0] = pMB->sad8[1] = pMB->sad8[2] = pMB->sad8[3] = 0;
+                                 }
-         pMB->sad16 = 0;
+                                 DPRINTF(XVID_DEBUG_DEBUG,"*** PFRAME bf: head=%i tail=%i   queue: head=%i tail=%i size=%i\n",
+                                 pEnc->bframenum_head, pEnc->bframenum_tail,
+                                 pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
+                                 FrameCodeP(pEnc, &bs, 1, 0);
-         if ((pEnc->current->global_flags & XVID_LUMIMASKING)) {
-                 if(pMB->dquant != NO_CHANGE)
-                 {
-                         pMB->mode = MODE_INTRA_Q;
-                         pEnc->current->quant += DQtab[pMB->dquant];
-                         if (pEnc->current->quant > 31) pEnc->current->quant = 31;
+                                 if ((pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) && pEnc->bframenum_tail==0) {
-                         if (pEnc->current->quant < 1) pEnc->current->quant = 1;
+                                         call_plugins(pEnc, pEnc->current, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
+                                 }else{
+                                         pEnc->flush_bframes = 1;
+                                         goto done;
                  }
          }
+                         DPRINTF(XVID_DEBUG_DEBUG, "*** END\n");
-         pMB->quant = pEnc->current->quant;
+                         emms();
+                         return XVID_ERR_END;    /* end of stream reached */
+                 }
+                 goto done;      /* nothing to encode yet; encoder lag */
  }
+         /* the current FRAME becomes the reference */
+         SWAP(FRAMEINFO*, pEnc->current, pEnc->reference);
- #define FCODEBITS       3
+         /* remove frame from encoding-queue (head), and move it into the current */
- #define MODEBITS        5
+         image_swap(&pEnc->current->image, &pEnc->queue[pEnc->queue_head].image);
+         frame = &pEnc->queue[pEnc->queue_head].frame;
+         pEnc->queue_head = (pEnc->queue_head + 1) % (pEnc->mbParam.max_bframes+1);
+         pEnc->queue_size--;
- void HintedMESet(Encoder * pEnc, int * intra)
- {
-         HINTINFO * hint;
-         Bitstream bs;
-         int length, high;
-         uint32_t x, y;
-         hint = pEnc->mbParam.hint;
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+          * init pEnc->current fields
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
-         if (hint->rawhints)
+         pEnc->current->fincr = pEnc->mbParam.fincr>0 ? pEnc->mbParam.fincr : frame->fincr;
-         {
+         inc_frame_num(pEnc);
-                 *intra = hint->mvhint.intra;
+         pEnc->current->vol_flags = pEnc->mbParam.vol_flags;
+         pEnc->current->vop_flags = frame->vop_flags;
+         pEnc->current->motion_flags = frame->motion;
+         pEnc->current->fcode = pEnc->mbParam.m_fcode;
+         pEnc->current->bcode = pEnc->mbParam.m_fcode;
+         if ((xFrame->vop_flags & XVID_VOP_CHROMAOPT)) {
+                 image_chroma_optimize(&pEnc->current->image,
+                         pEnc->mbParam.width, pEnc->mbParam.height, pEnc->mbParam.edged_width);
+         }
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+          * frame type & quant selection
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
+         type = frame->type;
+         pEnc->current->quant = frame->quant;
+         call_plugins(pEnc, pEnc->current, NULL, XVID_PLG_BEFORE, &type, &pEnc->current->quant, stats);
+         if (type > 0){  /* XVID_TYPE_?VOP */
+                 type = type2coding(type);       /* convert XVID_TYPE_?VOP to bitstream coding type */
+         } else{         /* XVID_TYPE_AUTO */
+                 if (pEnc->iFrameNum == 0 || (pEnc->mbParam.iMaxKeyInterval > 0 && pEnc->iFrameNum >= pEnc->mbParam.iMaxKeyInterval)){
+                         pEnc->iFrameNum = 0;
+                         type = I_VOP;
+                 }else{
+                         type = MEanalysis(&pEnc->reference->image, pEnc->current,
+                                                           &pEnc->mbParam, pEnc->mbParam.iMaxKeyInterval,
+                                                           pEnc->iFrameNum, pEnc->bframenum_tail, xFrame->bframe_threshold,
+                                                           (pEnc->bframes) ? pEnc->bframes[pEnc->bframenum_head]->mbs: NULL);
          }
-         else
-         {
-                 BitstreamInit(&bs, hint->hintstream, hint->hintlength);
-                 *intra = BitstreamGetBit(&bs);
          }
-         if (*intra)
+         /* bframes buffer overflow check */
-         {
+         if (type == B_VOP && pEnc->bframenum_tail >= pEnc->mbParam.max_bframes) {
-                 return;
+                 type = P_VOP;
          }
-         pEnc->current->fcode = (hint->rawhints) ? hint->mvhint.fcode : BitstreamGetBits(&bs, FCODEBITS);
+         pEnc->iFrameNum++;
-         length  = pEnc->current->fcode + 5;
+         if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
-         high    = 1 << (length - 1);
+                 image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 5,
+                         "%d  st:%lld  if:%d", pEnc->current->frame_num, pEnc->current->stamp, pEnc->iFrameNum);
+         }
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+          * encode this frame as a b-vop
+          * (we dont encode here, rather we store the frame in the bframes queue, to be encoded later)
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
+         if (type == B_VOP) {
+                 if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
+                         image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 200, "BVOP");
+                 }
+                 if (frame->quant < 1) {
+                         pEnc->current->quant = ((((pEnc->reference->quant + pEnc->current->quant) *
+                                 pEnc->mbParam.bquant_ratio) / 2) + pEnc->mbParam.bquant_offset)/100;
-         for (y=0 ; y<pEnc->mbParam.mb_height ; ++y)
+                 } else {
-         {
+                         pEnc->current->quant = frame->quant;
-                 for (x=0 ; x<pEnc->mbParam.mb_width ; ++x)
+                 }
-                 {
-                         MACROBLOCK * pMB = &pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
-                         MVBLOCKHINT * bhint = &hint->mvhint.block[x + y * pEnc->mbParam.mb_width];
-                         VECTOR pred[4];
-                         VECTOR tmp;
-                         int32_t dummy[4];
-                         int vec;
-                         pMB->mode = (hint->rawhints) ? bhint->mode : BitstreamGetBits(&bs, MODEBITS);
+                 if (pEnc->current->quant < 1)
+                         pEnc->current->quant = 1;
+                 else if (pEnc->current->quant > 31)
+                         pEnc->current->quant = 31;
-                         pMB->mode = (pMB->mode == MODE_INTER_Q) ? MODE_INTER : pMB->mode;
+                 DPRINTF(XVID_DEBUG_DEBUG,"*** BFRAME (store) bf: head=%i tail=%i   queue: head=%i tail=%i size=%i  quant=%i\n",
-                         pMB->mode = (pMB->mode == MODE_INTRA_Q) ? MODE_INTRA : pMB->mode;
+                                 pEnc->bframenum_head, pEnc->bframenum_tail,
+                                 pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size,pEnc->current->quant);
+                 /* store frame into bframe buffer & swap ref back to current */
+                 SWAP(FRAMEINFO*, pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
+                 SWAP(FRAMEINFO*, pEnc->current, pEnc->reference);
-                         if (pMB->mode == MODE_INTER)
+                 pEnc->bframenum_tail++;
-                         {
-                                 tmp.x  = (hint->rawhints) ? bhint->mvs[0].x : BitstreamGetBits(&bs, length);
+                 goto repeat;
-                                 tmp.y  = (hint->rawhints) ? bhint->mvs[0].y : BitstreamGetBits(&bs, length);
+         }
-                                 tmp.x -= (tmp.x >= high) ? high*2 : 0;
-                                 tmp.y -= (tmp.y >= high) ? high*2 : 0;
-                                 get_pmvdata(pEnc->current->mbs, x, y, pEnc->mbParam.mb_width, 0, pred, dummy);
-                                 for (vec=0 ; vec<4 ; ++vec)
+                 DPRINTF(XVID_DEBUG_DEBUG,"*** XXXXXX bf: head=%i tail=%i   queue: head=%i tail=%i size=%i\n",
+                                 pEnc->bframenum_head, pEnc->bframenum_tail,
+                                 pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
+         /* for unpacked bframes, output the stats for the last encoded frame */
+         if (!(pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) && pEnc->mbParam.max_bframes > 0)
                                  {
-                                         pMB->mvs[vec].x  = tmp.x;
+                 if (pEnc->current->stamp > 0) {
-                                         pMB->mvs[vec].y  = tmp.y;
+                         call_plugins(pEnc, pEnc->reference, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
-                                         pMB->pmvs[vec].x = pMB->mvs[0].x - pred[0].x;
-                                         pMB->pmvs[vec].y = pMB->mvs[0].y - pred[0].y;
                                  }
+                 else
+                         stats->type = XVID_TYPE_NOTHING;
                          }
-                         else if (pMB->mode == MODE_INTER4V)
-                         {
-                                 for (vec=0 ; vec<4 ; ++vec)
-                                 {
-                                         tmp.x  = (hint->rawhints) ? bhint->mvs[vec].x : BitstreamGetBits(&bs, length);
-                                         tmp.y  = (hint->rawhints) ? bhint->mvs[vec].y : BitstreamGetBits(&bs, length);
-                                         tmp.x -= (tmp.x >= high) ? high*2 : 0;
-                                         tmp.y -= (tmp.y >= high) ? high*2 : 0;
-                                         get_pmvdata(pEnc->current->mbs, x, y, pEnc->mbParam.mb_width, vec, pred, dummy);
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+          * closed-gop
+          * if the frame prior to an iframe is scheduled as a bframe, we must change it to a pframe
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
-                                         pMB->mvs[vec].x  = tmp.x;
+         if (type == I_VOP && (pEnc->mbParam.global_flags & XVID_GLOBAL_CLOSED_GOP) && pEnc->bframenum_tail > 0) {
-                                         pMB->mvs[vec].y  = tmp.y;
-                                         pMB->pmvs[vec].x = pMB->mvs[vec].x - pred[0].x;
+                 /* place this frame back on the encoding-queue (head) */
-                                         pMB->pmvs[vec].y = pMB->mvs[vec].y - pred[0].y;
+                 /* we will deal with it next time */
-                                 }
+                 dec_frame_num(pEnc);
-                         }
+                 pEnc->iFrameNum--;
-                         else    // intra / stuffing / not_coded
-                         {
+                 pEnc->queue_head = (pEnc->queue_head + (pEnc->mbParam.max_bframes+1) - 1) % (pEnc->mbParam.max_bframes+1);
-                                 for (vec=0 ; vec<4 ; ++vec)
+                 pEnc->queue_size++;
-                                 {
+                 image_swap(&pEnc->current->image, &pEnc->queue[pEnc->queue_head].image);
-                                         pMB->mvs[vec].x  = pMB->mvs[vec].y  = 0;
+                 /* grab the last frame from the bframe-queue */
+                 pEnc->bframenum_tail--;
+                 SWAP(FRAMEINFO*, pEnc->current, pEnc->bframes[pEnc->bframenum_tail]);
+                 if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
+                         image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 100, "DX50 BVOP->PVOP");
                                  }
+                 /* convert B-VOP quant to P-VOP */
+                 pEnc->current->quant  = 100*pEnc->current->quant - pEnc->mbParam.bquant_offset;
+                 pEnc->current->quant += pEnc->mbParam.bquant_ratio - 1; /* to avoid rouding issues */
+                 pEnc->current->quant /= pEnc->mbParam.bquant_ratio;
+                 type = P_VOP;
                          }
-                         if (pMB->mode == MODE_INTER4V &&
-                                 (pEnc->current->global_flags & XVID_LUMIMASKING) && pMB->dquant != NO_CHANGE)
-                         {
-                                 pMB->mode = MODE_INTRA;
-                                 for (vec=0 ; vec<4 ; ++vec)
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-                                 {
+          * encode this frame as an i-vop
-                                         pMB->mvs[vec].x = pMB->mvs[vec].y = 0;
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
-                                 }
+         if (type == I_VOP) {
+                 DPRINTF(XVID_DEBUG_DEBUG,"*** IFRAME bf: head=%i tail=%i   queue: head=%i tail=%i size=%i\n",
+                                 pEnc->bframenum_head, pEnc->bframenum_tail,
+                                 pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
+                 if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
+                         image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 200, "IVOP");
                          }
+                 pEnc->iFrameNum = 1;
+                 /* ---- update vol flags at IVOP ----------- */
+                 pEnc->mbParam.vol_flags = frame->vol_flags;
+                 /* Aspect ratio */
+                 switch(frame->par) {
+                 case XVID_PAR_11_VGA:
+                 case XVID_PAR_43_PAL:
+                 case XVID_PAR_43_NTSC:
+                 case XVID_PAR_169_PAL:
+                 case XVID_PAR_169_NTSC:
+                 case XVID_PAR_EXT:
+                         pEnc->mbParam.par = frame->par;
+                         break;
+                 default:
+                         pEnc->mbParam.par = XVID_PAR_11_VGA;
+                         break;
                  }
+                 /* For extended PAR only, we try to sanityse/simplify par values */
+                 if (pEnc->mbParam.par == XVID_PAR_EXT) {
+                         pEnc->mbParam.par_width  = frame->par_width;
+                         pEnc->mbParam.par_height = frame->par_height;
+                         simplify_par(&pEnc->mbParam.par_width, &pEnc->mbParam.par_height);
          }
+                 if ((pEnc->mbParam.vol_flags & XVID_VOL_MPEGQUANT)) {
+                         if (frame->quant_intra_matrix != NULL)
+                                 set_intra_matrix(pEnc->mbParam.mpeg_quant_matrices, frame->quant_intra_matrix);
+                         if (frame->quant_inter_matrix != NULL)
+                                 set_inter_matrix(pEnc->mbParam.mpeg_quant_matrices, frame->quant_inter_matrix);
  }
+                 /* prevent vol/vop misuse */
- void HintedMEGet(Encoder * pEnc, int intra)
+                 if (!(pEnc->current->vol_flags & XVID_VOL_REDUCED_ENABLE))
- {
+                         pEnc->current->vop_flags &= ~XVID_VOP_REDUCED;
-         HINTINFO * hint;
-         Bitstream bs;
-         uint32_t x, y;
-         int length, high;
-         hint = pEnc->mbParam.hint;
+                 if (!(pEnc->current->vol_flags & XVID_VOL_INTERLACING))
+                         pEnc->current->vop_flags &= ~(XVID_VOP_TOPFIELDFIRST|XVID_VOP_ALTERNATESCAN);
-         if (hint->rawhints)
+                 /* ^^^------------------------ */
-         {
-                 hint->mvhint.intra = intra;
+                 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
+                         image_copy(&pEnc->sOriginal, &pEnc->current->image,
+                                    pEnc->mbParam.edged_width, pEnc->mbParam.height);
          }
-         else
-         {
+                 FrameCodeI(pEnc, &bs);
-                 BitstreamInit(&bs, hint->hintstream, 0);
+                 xFrame->out_flags |= XVID_KEYFRAME;
-                 BitstreamPutBit(&bs, intra);
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+          * encode this frame as an p-vop
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
+         } else { /* (type == P_VOP || type == S_VOP) */
+                 DPRINTF(XVID_DEBUG_DEBUG,"*** PFRAME bf: head=%i tail=%i   queue: head=%i tail=%i size=%i\n",
+                                 pEnc->bframenum_head, pEnc->bframenum_tail,
+                                 pEnc->queue_head, pEnc->queue_tail, pEnc->queue_size);
+                 if ((pEnc->current->vop_flags & XVID_VOP_DEBUG)) {
+                         image_printf(&pEnc->current->image, pEnc->mbParam.edged_width, pEnc->mbParam.height, 5, 200, "PVOP");
          }
-         if (intra)
+                 if ((pEnc->mbParam.plugin_flags & XVID_REQORIGINAL)) {
-         {
+                         image_copy(&pEnc->sOriginal, &pEnc->current->image,
-                 if (!hint->rawhints)
+                                    pEnc->mbParam.edged_width, pEnc->mbParam.height);
-                 {
-                         BitstreamPad(&bs);
-                         hint->hintlength = BitstreamLength(&bs);
                  }
-                 return;
+                 FrameCodeP(pEnc, &bs, 1, 0);
          }
-         length  = pEnc->current->fcode + 5;
-         high    = 1 << (length - 1);
-         if (hint->rawhints)
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-         {
+          * on next enc_encode call we must flush bframes
-                 hint->mvhint.fcode = pEnc->current->fcode;
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
-         }
-         else
-         {
-                 BitstreamPutBits(&bs, pEnc->current->fcode, FCODEBITS);
-         }
-         for (y=0 ; y<pEnc->mbParam.mb_height ; ++y)
+ /*done_flush:*/
-         {
-                 for (x=0 ; x<pEnc->mbParam.mb_width ; ++x)
-                 {
-                         MACROBLOCK * pMB = &pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
-                         MVBLOCKHINT * bhint = &hint->mvhint.block[x + y * pEnc->mbParam.mb_width];
-                         VECTOR tmp;
-                         if (hint->rawhints)
+         pEnc->flush_bframes = 1;
-                         {
-                                 bhint->mode = pMB->mode;
+         /* packed & queued_bframes: dont bother outputting stats here, we do so after the flush */
+         if ((pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) && pEnc->bframenum_tail > 0) {
+                 goto repeat;
                          }
-                         else
-                         {
+         /* packed or no-bframes or no-bframes-queued: output stats */
-                                 BitstreamPutBits(&bs, pMB->mode, MODEBITS);
+         if ((pEnc->mbParam.global_flags & XVID_GLOBAL_PACKED) || pEnc->mbParam.max_bframes == 0 ) {
+                 call_plugins(pEnc, pEnc->current, &pEnc->sOriginal, XVID_PLG_AFTER, 0, 0, stats);
                          }
-                         if (pMB->mode == MODE_INTER || pMB->mode == MODE_INTER_Q)
+         /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-                         {
+          * done; return number of bytes consumed
-                                 tmp.x  = pMB->mvs[0].x;
+          * %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% */
-                                 tmp.y  = pMB->mvs[0].y;
-                                 tmp.x += (tmp.x < 0) ? high*2 : 0;
-                                 tmp.y += (tmp.y < 0) ? high*2 : 0;
-                                 if (hint->rawhints)
+ done:
-                                 {
-                                         bhint->mvs[0].x = tmp.x;
-                                         bhint->mvs[0].y = tmp.y;
-                                 }
-                                 else
-                                 {
-                                         BitstreamPutBits(&bs, tmp.x, length);
-                                         BitstreamPutBits(&bs, tmp.y, length);
-                                 }
-                         }
-                         else if (pMB->mode == MODE_INTER4V)
-                         {
-                                 int vec;
-                                 for (vec=0 ; vec<4 ; ++vec)
+         stop_global_timer();
-                                 {
+         write_timer();
-                                         tmp.x  = pMB->mvs[vec].x;
-                                         tmp.y  = pMB->mvs[vec].y;
-                                         tmp.x += (tmp.x < 0) ? high*2 : 0;
-                                         tmp.y += (tmp.y < 0) ? high*2 : 0;
-                                         if (hint->rawhints)
+         emms();
-                                         {
+         return BitstreamLength(&bs);
-                                                 bhint->mvs[vec].x = tmp.x;
-                                                 bhint->mvs[vec].y = tmp.y;
                                          }
-                                         else
+ static void SetMacroblockQuants(MBParam * const pParam, FRAMEINFO * frame)
                                          {
-                                                 BitstreamPutBits(&bs, tmp.x, length);
+         unsigned int i;
-                                                 BitstreamPutBits(&bs, tmp.y, length);
+         MACROBLOCK * pMB = frame->mbs;
-                                         }
+         int quant = frame->mbs[0].quant; /* set by XVID_PLG_FRAME */
-                                 }
+         if (quant > 31)
-                         }
+                 frame->quant = quant = 31;
+         else if (quant < 1)
+                 frame->quant = quant = 1;
+         for (i = 0; i < pParam->mb_height * pParam->mb_width; i++) {
+                 quant += pMB->dquant;
+                 if (quant > 31)
+                         quant = 31;
+                 else if (quant < 1)
+                         quant = 1;
+                 pMB->quant = quant;
+                 pMB++;
                  }
          }
-         if (!hint->rawhints)
+ static __inline void
+ CodeIntraMB(Encoder * pEnc,
+                         MACROBLOCK * pMB)
          {
-                 BitstreamPad(&bs);
-                 hint->hintlength = BitstreamLength(&bs);
+         pMB->mode = MODE_INTRA;
+         /* zero mv statistics */
+         pMB->mvs[0].x = pMB->mvs[1].x = pMB->mvs[2].x = pMB->mvs[3].x = 0;
+         pMB->mvs[0].y = pMB->mvs[1].y = pMB->mvs[2].y = pMB->mvs[3].y = 0;
+         pMB->sad8[0] = pMB->sad8[1] = pMB->sad8[2] = pMB->sad8[3] = 0;
+         pMB->sad16 = 0;
+         if (pMB->dquant != 0) {
+                 pMB->mode = MODE_INTRA_Q;
          }
  }
- static int FrameCodeI(Encoder * pEnc, Bitstream * bs, uint32_t *pBits)
- {
+ static int
+ FrameCodeI(Encoder * pEnc,
+                    Bitstream * bs)
+ {
+         int bits = BitstreamPos(bs);
+         int mb_width = pEnc->mbParam.mb_width;
+         int mb_height = pEnc->mbParam.mb_height;
          DECLARE_ALIGNED_MATRIX(dct_codes, 6, 64, int16_t, CACHE_LINE);
          DECLARE_ALIGNED_MATRIX(qcoeff,    6, 64, int16_t, CACHE_LINE);
          uint16_t x, y;
-         pEnc->iFrameNum = 0;
+         if ((pEnc->current->vol_flags & XVID_VOL_REDUCED_ENABLE))
+         {
+                 mb_width = (pEnc->mbParam.width + 31) / 32;
+                 mb_height = (pEnc->mbParam.height + 31) / 32;
+                 /* 16x16->8x8 downsample requires 1 additional edge pixel*/
+                 /* XXX: setedges is overkill */
+                 start_timer();
+                 image_setedges(&pEnc->current->image,
+                         pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
+                         pEnc->mbParam.width, pEnc->mbParam.height);
+                 stop_edges_timer();
+         }
          pEnc->mbParam.m_rounding_type = 1;
          pEnc->current->rounding_type = pEnc->mbParam.m_rounding_type;
          pEnc->current->coding_type = I_VOP;
-         BitstreamWriteVolHeader(bs, &pEnc->mbParam, pEnc->current);
+         call_plugins(pEnc, pEnc->current, NULL, XVID_PLG_FRAME, NULL, NULL, NULL);
-         BitstreamWriteVopHeader(bs, &pEnc->mbParam, pEnc->current);
-         *pBits = BitstreamPos(bs);
+         SetMacroblockQuants(&pEnc->mbParam, pEnc->current);
-         pEnc->sStat.iTextBits = 0;
+         BitstreamWriteVolHeader(bs, &pEnc->mbParam);
-         pEnc->sStat.kblks = pEnc->mbParam.mb_width * pEnc->mbParam.mb_height;
-         pEnc->sStat.mblks = pEnc->sStat.ublks = 0;
-         for (y = 0; y < pEnc->mbParam.mb_height; y++)
+         set_timecodes(pEnc->current,pEnc->reference,pEnc->mbParam.fbase);
-                 for (x = 0; x < pEnc->mbParam.mb_width; x++)
-                 {
+         BitstreamPad(bs);
-                         MACROBLOCK *pMB = &pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
+         BitstreamWriteVopHeader(bs, &pEnc->mbParam, pEnc->current, 1, pEnc->current->mbs[0].quant);
+         pEnc->current->sStat.iTextBits = 0;
+         pEnc->current->sStat.kblks = mb_width * mb_height;
+         pEnc->current->sStat.mblks = pEnc->current->sStat.ublks = 0;
+         for (y = 0; y < mb_height; y++)
+                 for (x = 0; x < mb_width; x++) {
+                         MACROBLOCK *pMB =
+                                 &pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
                          CodeIntraMB(pEnc, pMB);
-                         MBTransQuantIntra(&pEnc->mbParam, pEnc->current, pMB, x, y, dct_codes, qcoeff);
+                         MBTransQuantIntra(&pEnc->mbParam, pEnc->current, pMB, x, y,
+                                                           dct_codes, qcoeff);
                          start_timer();
                          MBPrediction(pEnc->current, x, y, pEnc->mbParam.mb_width, qcoeff);
                          stop_prediction_timer();
                          start_timer();
-                         MBCoding(pEnc->current, pMB, qcoeff, bs, &pEnc->sStat);
+                         if (pEnc->current->vop_flags & XVID_VOP_GREYSCALE)
+                         {       pMB->cbp &= 0x3C;               /* keep only bits 5-2 */
+                                 qcoeff[4*64+0]=0;               /* zero, because for INTRA MBs DC value is saved */
+                                 qcoeff[5*64+0]=0;
+                         }
+                         MBCoding(pEnc->current, pMB, qcoeff, bs, &pEnc->current->sStat);
                          stop_coding_timer();
                  }
+         if ((pEnc->current->vop_flags & XVID_VOP_REDUCED))
+         {
+                 image_deblock_rrv(&pEnc->current->image, pEnc->mbParam.edged_width,
+                         pEnc->current->mbs, mb_width, mb_height, pEnc->mbParam.mb_width,
+, 0);
+         }
          emms();
-         *pBits = BitstreamPos(bs) - *pBits;
+         BitstreamPadAlways(bs); /* next_start_code() at the end of VideoObjectPlane() */
-         pEnc->sStat.fMvPrevSigma = -1;
-         pEnc->sStat.iMvSum = 0;
+         pEnc->current->length = (BitstreamPos(bs) - bits) / 8;
-         pEnc->sStat.iMvCount = 0;
+         pEnc->fMvPrevSigma = -1;
          pEnc->mbParam.m_fcode = 2;
-         if (pEnc->current->global_flags & XVID_HINTEDME_GET)
+         pEnc->current->is_edged = 0; /* not edged */
-         {
+         pEnc->current->is_interpolated = -1; /* not interpolated (fake rounding -1) */
-                 HintedMEGet(pEnc, 1);
-         }
-         return 1;                                        // intra
+         return 1;                                       /* intra */
  }
  #define INTRA_THRESHOLD 0.5
+ #define BFRAME_SKIP_THRESHHOLD 30
- static int FrameCodeP(Encoder * pEnc, Bitstream * bs, uint32_t *pBits, bool force_inter, bool vol_header)
+ /* FrameCodeP also handles S(GMC)-VOPs */
+ static int
+ FrameCodeP(Encoder * pEnc,
+                    Bitstream * bs,
+                    bool force_inter,
+                    bool vol_header)
  {
          float fSigma;
+         int bits = BitstreamPos(bs);
          DECLARE_ALIGNED_MATRIX(dct_codes, 6, 64, int16_t, CACHE_LINE);
          DECLARE_ALIGNED_MATRIX(qcoeff,    6, 64, int16_t, CACHE_LINE);
          int iLimit;
-         uint32_t x, y;
+         int x, y, k;
          int iSearchRange;
-         int bIntra;
+         int bIntra=0, skip_possible;
+         FRAMEINFO *const current = pEnc->current;
+         FRAMEINFO *const reference = pEnc->reference;
+         MBParam * const pParam = &pEnc->mbParam;
+         int mb_width = pParam->mb_width;
+         int mb_height = pParam->mb_height;
-         /* IMAGE *pCurrent = &pEnc->current->image; */
+         /* IMAGE *pCurrent = &current->image; */
-         IMAGE *pRef = &pEnc->reference->image;
+         IMAGE *pRef = &reference->image;
+         if ((current->vop_flags & XVID_VOP_REDUCED))
+         {
+                 mb_width = (pParam->width + 31) / 32;
+                 mb_height = (pParam->height + 31) / 32;
+         }
+         if (!reference->is_edged) {
          start_timer();
-         image_setedges(pRef,
+                 image_setedges(pRef, pParam->edged_width, pParam->edged_height,
-                        pEnc->mbParam.edged_width,
+                                            pParam->width, pParam->height);
-                        pEnc->mbParam.edged_height,
-                        pEnc->mbParam.width,
-                        pEnc->mbParam.height,
-                        pEnc->current->global_flags & XVID_INTERLACING);
          stop_edges_timer();
+                 reference->is_edged = 1;
+         }
-         pEnc->mbParam.m_rounding_type = 1 - pEnc->mbParam.m_rounding_type;
+         pParam->m_rounding_type = 1 - pParam->m_rounding_type;
-         pEnc->current->rounding_type = pEnc->mbParam.m_rounding_type;
+         current->rounding_type = pParam->m_rounding_type;
-         pEnc->current->fcode = pEnc->mbParam.m_fcode;
+         current->fcode = pParam->m_fcode;
          if (!force_inter)
-                 iLimit = (int)(pEnc->mbParam.mb_width * pEnc->mbParam.mb_height * INTRA_THRESHOLD);
+                 iLimit = (int)(mb_width * mb_height *  INTRA_THRESHOLD);
          else
-                 iLimit = pEnc->mbParam.mb_width * pEnc->mbParam.mb_height + 1;
+                 iLimit = mb_width * mb_height + 1;
-         if ((pEnc->current->global_flags & XVID_HALFPEL)) {
+         if ((current->vop_flags & XVID_VOP_HALFPEL)) {
+                 if (reference->is_interpolated != current->rounding_type) {
                  start_timer();
-                 image_interpolate(pRef, &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV,
+                         image_interpolate(pRef, &pEnc->vInterH, &pEnc->vInterV,
-                                   pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
+                                                           &pEnc->vInterHV, pParam->edged_width,
-                                   pEnc->current->rounding_type);
+                                                           pParam->edged_height,
+                                                           (pParam->vol_flags & XVID_VOL_QUARTERPEL),
+                                                           current->rounding_type);
                  stop_inter_timer();
+                         reference->is_interpolated = current->rounding_type;
          }
+         }
+         current->coding_type = P_VOP;
+         call_plugins(pEnc, pEnc->current, NULL, XVID_PLG_FRAME, NULL, NULL, NULL);
+         SetMacroblockQuants(&pEnc->mbParam, current);
          start_timer();
-         if (pEnc->current->global_flags & XVID_HINTEDME_SET)
+         if (current->vol_flags & XVID_VOL_GMC ) /* GMC only for S(GMC)-VOPs */
-         {
+         {       int gmcval;
-                 HintedMESet(pEnc, &bIntra);
+                 current->warp = GlobalMotionEst( current->mbs, pParam, current, reference,
-         }
+                                                                  &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV);
-         else
-         {
+                 if (current->motion_flags & XVID_ME_GME_REFINE) {
-                 bIntra = MotionEstimation(
+                         gmcval = GlobalMotionEstRefine(&current->warp,
-                         &pEnc->mbParam,
+                                                                                    current->mbs, pParam,
-                         pEnc->current,
+                                                                                    current, reference,
-                         pEnc->reference,
+                                                                                    &current->image,
+                                                                                    &reference->image,
                          &pEnc->vInterH,
                          &pEnc->vInterV,
-                         &pEnc->vInterHV,
+                                                                                    &pEnc->vInterHV);
-                         iLimit);
+                 } else {
+                         gmcval = globalSAD(&current->warp, pParam, current->mbs,
+                                                            current,
+                                                            &reference->image,
+                                                            &current->image,
+                                                            pEnc->vGMC.y);
          }
-         stop_motion_timer();
-         if (bIntra == 1)
+                 gmcval += /*current->quant*/ 2 * (int)(pParam->mb_width*pParam->mb_height);
+                 /* 1st '3': 3 warpoints, 2nd '3': 16th pel res (2<<3) */
+                 generate_GMCparameters( 3, 3, &current->warp,
+                                 pParam->width, pParam->height,
+                                 &current->new_gmc_data);
+                 if ( (gmcval<0) && ( (current->warp.duv[1].x != 0) || (current->warp.duv[1].y != 0) ||
+                          (current->warp.duv[2].x != 0) || (current->warp.duv[2].y != 0) ) )
          {
-                 return FrameCodeI(pEnc, bs, pBits);
+                         current->coding_type = S_VOP;
+                         generate_GMCimage(&current->new_gmc_data, &reference->image,
+                                 pParam->mb_width, pParam->mb_height,
+                                 pParam->edged_width, pParam->edged_width/2,
+                                 pParam->m_fcode, ((pParam->vol_flags & XVID_VOL_QUARTERPEL)?1:0), 0,
+                                 current->rounding_type, current->mbs, &pEnc->vGMC);
+                 } else {
+                         generate_GMCimage(&current->new_gmc_data, &reference->image,
+                                 pParam->mb_width, pParam->mb_height,
+                                 pParam->edged_width, pParam->edged_width/2,
+                                 pParam->m_fcode, ((pParam->vol_flags & XVID_VOL_QUARTERPEL)?1:0), 0,
+                                 current->rounding_type, current->mbs, NULL);    /* no warping, just AMV */
+                 }
          }
-         pEnc->current->coding_type = P_VOP;
+         bIntra =
+                 MotionEstimation(&pEnc->mbParam, current, reference,
+                                          &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV,
+                                          &pEnc->vGMC, iLimit);
+         stop_motion_timer();
+         if (bIntra == 1) return FrameCodeI(pEnc, bs);
+         set_timecodes(current,reference,pParam->fbase);
          if(vol_header)
-                 BitstreamWriteVolHeader(bs, &pEnc->mbParam, pEnc->current);
+         {       BitstreamWriteVolHeader(bs, &pEnc->mbParam);
+                 BitstreamPad(bs);
+         }
-         BitstreamWriteVopHeader(bs, &pEnc->mbParam, pEnc->current);
+         BitstreamWriteVopHeader(bs, &pEnc->mbParam, current, 1, current->mbs[0].quant);
-         *pBits = BitstreamPos(bs);
+         current->sStat.iTextBits = current->sStat.iMvSum = current->sStat.iMvCount =
+                 current->sStat.kblks = current->sStat.mblks = current->sStat.ublks = 0;
-         pEnc->sStat.iTextBits = 0;
-         pEnc->sStat.iMvSum = 0;
-         pEnc->sStat.iMvCount = 0;
-         pEnc->sStat.kblks = pEnc->sStat.mblks = pEnc->sStat.ublks = 0;
-         for(y = 0; y < pEnc->mbParam.mb_height; y++)
+         for (y = 0; y < mb_height; y++) {
-         {
+                 for (x = 0; x < mb_width; x++) {
-                 for(x = 0; x < pEnc->mbParam.mb_width; x++)
+                         MACROBLOCK *pMB =
-                 {
+                                 &current->mbs[x + y * pParam->mb_width];
-                         MACROBLOCK * pMB = &pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
                          bIntra = (pMB->mode == MODE_INTRA) || (pMB->mode == MODE_INTRA_Q);
-                         if (!bIntra)
+                         if (bIntra) {
-                         {
+                                 CodeIntraMB(pEnc, pMB);
+                                 MBTransQuantIntra(&pEnc->mbParam, current, pMB, x, y,
+                                                                   dct_codes, qcoeff);
                                  start_timer();
-                                 MBMotionCompensation(pMB,
+                                 MBPrediction(current, x, y, pParam->mb_width, qcoeff);
-                                                      x, y,
+                                 stop_prediction_timer();
-                                                      &pEnc->reference->image,
-                                                      &pEnc->vInterH,
-                                                      &pEnc->vInterV,
-                                                      &pEnc->vInterHV,
-                                                      &pEnc->current->image,
-                                                      dct_codes,
-                                                      pEnc->mbParam.width,
-                                                      pEnc->mbParam.height,
-                                                      pEnc->mbParam.edged_width,
-                                                      pEnc->current->rounding_type);
-                                 stop_comp_timer();
-                                 if ((pEnc->current->global_flags & XVID_LUMIMASKING)) {
+                                 current->sStat.kblks++;
-                                         if(pMB->dquant != NO_CHANGE) {
-                                                 pMB->mode = MODE_INTER_Q;
+                                 if (pEnc->current->vop_flags & XVID_VOP_GREYSCALE)
-                                                 pEnc->current->quant += DQtab[pMB->dquant];
+                                 {       pMB->cbp &= 0x3C;               /* keep only bits 5-2 */
-                                                 if (pEnc->current->quant > 31) pEnc->current->quant = 31;
+                                         qcoeff[4*64+0]=0;               /* zero, because for INTRA MBs DC value is saved */
-                                                 else if(pEnc->current->quant < 1) pEnc->current->quant = 1;
+                                         qcoeff[5*64+0]=0;
                                          }
+                                 MBCoding(current, pMB, qcoeff, bs, &current->sStat);
+                                 stop_coding_timer();
+                                 continue;
                                  }
-                                 pMB->quant = pEnc->current->quant;
+                         start_timer();
+                         MBMotionCompensation(pMB, x, y, &reference->image,
+                                                                  &pEnc->vInterH, &pEnc->vInterV,
+                                                                  &pEnc->vInterHV, &pEnc->vGMC,
+                                                                  &current->image,
+                                                                  dct_codes, pParam->width,
+                                                                  pParam->height,
+                                                                  pParam->edged_width,
+                                                                  (current->vol_flags & XVID_VOL_QUARTERPEL),
+                                                                  (current->vop_flags & XVID_VOP_REDUCED),
+                                                                  current->rounding_type);
+                         stop_comp_timer();
                                  pMB->field_pred = 0;
-                                 pMB->cbp = MBTransQuantInter(&pEnc->mbParam, pEnc->current, pMB, x, y, dct_codes, qcoeff);
+                         if (pMB->mode != MODE_NOT_CODED)
+                         {       pMB->cbp =
+                                         MBTransQuantInter(&pEnc->mbParam, current, pMB, x, y,
+                                                                           dct_codes, qcoeff);
+                         }
+                         if (pMB->dquant != 0)
+                                 MBSetDquant(pMB, x, y, &pEnc->mbParam);
+                         if (pMB->cbp || pMB->mvs[0].x || pMB->mvs[0].y ||
+                                    pMB->mvs[1].x || pMB->mvs[1].y || pMB->mvs[2].x ||
+                                    pMB->mvs[2].y || pMB->mvs[3].x || pMB->mvs[3].y) {
+                                 current->sStat.mblks++;
+                         }  else {
+                                 current->sStat.ublks++;
                          }
+                         start_timer();
+                         /* Finished processing the MB, now check if to CODE or SKIP */
+                         skip_possible = (pMB->cbp == 0) && (pMB->mode == MODE_INTER) &&
+                                                         (pMB->dquant == 0);
+                         if (current->coding_type == S_VOP)
+                                 skip_possible &= (pMB->mcsel == 1);
+                         else if (current->coding_type == P_VOP) {
+                                 if ((pParam->vol_flags & XVID_VOL_QUARTERPEL))
+                                         skip_possible &= ( (pMB->qmvs[0].x == 0) && (pMB->qmvs[0].y == 0) );
                          else
-                         {
+                                         skip_possible &= ( (pMB->mvs[0].x == 0) && (pMB->mvs[0].y == 0) );
-                                 CodeIntraMB(pEnc, pMB);
-                                 MBTransQuantIntra(&pEnc->mbParam, pEnc->current, pMB, x, y, dct_codes, qcoeff);
                          }
-                         start_timer();
+                         if ( (pMB->mode == MODE_NOT_CODED) || (skip_possible)) {
-                         MBPrediction(pEnc->current, x, y, pEnc->mbParam.mb_width, qcoeff);
-                         stop_prediction_timer();
-                         if (pMB->mode == MODE_INTRA || pMB->mode == MODE_INTRA_Q)
+ /* This is a candidate for SKIPping, but for P-VOPs check intermediate B-frames first */
+                                 if (current->coding_type == P_VOP)      /* special rule for P-VOP's SKIP */
                          {
-                                 pEnc->sStat.kblks++;
+                                         int bSkip = 1;
-                         }
-                         else if (pMB->cbp ||
+                                         for (k=pEnc->bframenum_head; k< pEnc->bframenum_tail; k++)
-                                  pMB->mvs[0].x || pMB->mvs[0].y ||
-                                  pMB->mvs[1].x || pMB->mvs[1].y ||
-                                  pMB->mvs[2].x || pMB->mvs[2].y ||
-                                  pMB->mvs[3].x || pMB->mvs[3].y)
                          {
-                                 pEnc->sStat.mblks++;
+                                                 int iSAD;
+                                                 iSAD = sad16(reference->image.y + 16*y*pParam->edged_width + 16*x,
+                                                                         pEnc->bframes[k]->image.y + 16*y*pParam->edged_width + 16*x,
+                                                                 pParam->edged_width,BFRAME_SKIP_THRESHHOLD);
+                                                 if (iSAD >= BFRAME_SKIP_THRESHHOLD * pMB->quant)
+                                                 {       bSkip = 0;
+                                                         break;
                          }
-                         else
-                         {
-                                 pEnc->sStat.ublks++;
                          }
-                         start_timer();
+                                         if (!bSkip) {   /* no SKIP, but trivial block */
-                         MBCoding(pEnc->current, pMB, qcoeff, bs, &pEnc->sStat);
+                                                 if((pParam->vol_flags & XVID_VOL_QUARTERPEL)) {
+                                                         VECTOR predMV = get_qpmv2(current->mbs, pParam->mb_width, 0, x, y, 0);
+                                                         pMB->pmvs[0].x = - predMV.x;
+                                                         pMB->pmvs[0].y = - predMV.y;
+                                                 }
+                                                 else {
+                                                         VECTOR predMV = get_pmv2(current->mbs, pParam->mb_width, 0, x, y, 0);
+                                                         pMB->pmvs[0].x = - predMV.x;
+                                                         pMB->pmvs[0].y = - predMV.y;
+                                                 }
+                                                 pMB->mode = MODE_INTER;
+                                                 pMB->cbp = 0;
+                                                 MBCoding(current, pMB, qcoeff, bs, &current->sStat);
                          stop_coding_timer();
+                                                 continue;       /* next MB */
                  }
          }
+                                 /* do SKIP */
-         emms();
+                                 pMB->mode = MODE_NOT_CODED;
+                                 MBSkip(bs);
+                                 stop_coding_timer();
+                                 continue;       /* next MB */
+                         }
+                         /* ordinary case: normal coded INTER/INTER4V block */
+                         if ((current->vop_flags & XVID_VOP_GREYSCALE))
+                         {       pMB->cbp &= 0x3C;               /* keep only bits 5-2 */
+                                 qcoeff[4*64+0]=0;               /* zero, because DC for INTRA MBs DC value is saved */
+                                 qcoeff[5*64+0]=0;
+                         }
+                         if((pParam->vol_flags & XVID_VOL_QUARTERPEL)) {
+                                 VECTOR predMV = get_qpmv2(current->mbs, pParam->mb_width, 0, x, y, 0);
+                                 pMB->pmvs[0].x = pMB->qmvs[0].x - predMV.x;
+                                 pMB->pmvs[0].y = pMB->qmvs[0].y - predMV.y;
+                                 DPRINTF(XVID_DEBUG_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)\n", pMB->pmvs[0].x, pMB->pmvs[0].y, predMV.x, predMV.y, pMB->mvs[0].x, pMB->mvs[0].y);
+                         } else {
+                                 VECTOR predMV = get_pmv2(current->mbs, pParam->mb_width, 0, x, y, 0);
+                                 pMB->pmvs[0].x = pMB->mvs[0].x - predMV.x;
+                                 pMB->pmvs[0].y = pMB->mvs[0].y - predMV.y;
+                                 DPRINTF(XVID_DEBUG_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)\n", pMB->pmvs[0].x, pMB->pmvs[0].y, predMV.x, predMV.y, pMB->mvs[0].x, pMB->mvs[0].y);
+                         }
+                         if (pMB->mode == MODE_INTER4V)
+                         {       int k;
+                                 for (k=1;k<4;k++)
+                                 {
+                                         if((pParam->vol_flags & XVID_VOL_QUARTERPEL)) {
+                                                 VECTOR predMV = get_qpmv2(current->mbs, pParam->mb_width, 0, x, y, k);
+                                                 pMB->pmvs[k].x = pMB->qmvs[k].x - predMV.x;
+                                                 pMB->pmvs[k].y = pMB->qmvs[k].y - predMV.y;
+                                 DPRINTF(XVID_DEBUG_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)\n", pMB->pmvs[k].x, pMB->pmvs[k].y, predMV.x, predMV.y, pMB->mvs[k].x, pMB->mvs[k].y);
+                                         } else {
+                                                 VECTOR predMV = get_pmv2(current->mbs, pParam->mb_width, 0, x, y, k);
+                                                 pMB->pmvs[k].x = pMB->mvs[k].x - predMV.x;
+                                                 pMB->pmvs[k].y = pMB->mvs[k].y - predMV.y;
+                                 DPRINTF(XVID_DEBUG_MV,"mv_diff (%i,%i) pred (%i,%i) result (%i,%i)\n", pMB->pmvs[k].x, pMB->pmvs[k].y, predMV.x, predMV.y, pMB->mvs[k].x, pMB->mvs[k].y);
+                                         }
+                                 }
+                         }
+                         MBCoding(current, pMB, qcoeff, bs, &pEnc->current->sStat);
+                         stop_coding_timer();
+                 }
+         }
-         if (pEnc->current->global_flags & XVID_HINTEDME_GET)
+         if ((current->vop_flags & XVID_VOP_REDUCED))
          {
-                 HintedMEGet(pEnc, 0);
+                 image_deblock_rrv(&current->image, pParam->edged_width,
+                         current->mbs, mb_width, mb_height, pParam->mb_width,
+, 0);
          }
-         if (pEnc->sStat.iMvCount == 0)
+         emms();
-                 pEnc->sStat.iMvCount = 1;
+         if (current->sStat.iMvCount == 0)
+                 current->sStat.iMvCount = 1;
-         fSigma = (float)sqrt((float) pEnc->sStat.iMvSum / pEnc->sStat.iMvCount);
+         fSigma = (float) sqrt((float) current->sStat.iMvSum / current->sStat.iMvCount);
-         iSearchRange = 1 << (3 + pEnc->mbParam.m_fcode);
+         iSearchRange = 1 << (3 + pParam->m_fcode);
          if ((fSigma > iSearchRange / 3)
-             && (pEnc->mbParam.m_fcode <= 3))    // maximum search range 128
+                 && (pParam->m_fcode <= (3 +  (pParam->vol_flags & XVID_VOL_QUARTERPEL?1:0)  ))) /* maximum search range 128 */
          {
-                 pEnc->mbParam.m_fcode++;
+                 pParam->m_fcode++;
                  iSearchRange *= 2;
-         }
+         } else if ((fSigma < iSearchRange / 6)
-         else if ((fSigma < iSearchRange / 6)
+                            && (pEnc->fMvPrevSigma >= 0)
-                  && (pEnc->sStat.fMvPrevSigma >= 0)
+                            && (pEnc->fMvPrevSigma < iSearchRange / 6)
-                  && (pEnc->sStat.fMvPrevSigma < iSearchRange / 6)
+                            && (pParam->m_fcode >= (2 + (pParam->vol_flags & XVID_VOL_QUARTERPEL?1:0) )))        /* minimum search range 16 */
-                  && (pEnc->mbParam.m_fcode >= 2))       // minimum search range 16
          {
-                 pEnc->mbParam.m_fcode--;
+                 pParam->m_fcode--;
                  iSearchRange /= 2;
          }
-         pEnc->sStat.fMvPrevSigma = fSigma;
+         pEnc->fMvPrevSigma = fSigma;
+         /* frame drop code */
+ #if 0
+         DPRINTF(XVID_DEBUG_DEBUG, "kmu %i %i %i\n", current->sStat.kblks, current->sStat.mblks, current->sStat.ublks);
+ #endif
+         if (current->sStat.kblks + current->sStat.mblks <
+                 (pParam->frame_drop_ratio * mb_width * mb_height) / 100)
+         {
+                 current->sStat.kblks = current->sStat.mblks = 0;
+                 current->sStat.ublks = mb_width * mb_height;
+                 BitstreamReset(bs);
+                 set_timecodes(current,reference,pParam->fbase);
+                 BitstreamWriteVopHeader(bs, &pEnc->mbParam, current, 0, current->mbs[0].quant);
+                 /* copy reference frame details into the current frame */
+                 current->quant = reference->quant;
+                 current->motion_flags = reference->motion_flags;
+                 current->rounding_type = reference->rounding_type;
+                 current->fcode = reference->fcode;
+                 current->bcode = reference->bcode;
+                 image_copy(&current->image, &reference->image, pParam->edged_width, pParam->height);
+                 memcpy(current->mbs, reference->mbs, sizeof(MACROBLOCK) * mb_width * mb_height);
+         }
+         pEnc->current->is_edged = 0; /* not edged */
+         pEnc->current->is_interpolated = -1; /* not interpolated (fake rounding -1) */
+         /* what was this frame's interpolated reference will become
+                 forward (past) reference in b-frame coding */
+         image_swap(&pEnc->vInterH, &pEnc->f_refh);
+         image_swap(&pEnc->vInterV, &pEnc->f_refv);
+         image_swap(&pEnc->vInterHV, &pEnc->f_refhv);
+         /* XXX: debug
+         {
+                 char s[100];
+                 sprintf(s, "\\%05i_cur.pgm", pEnc->m_framenum);
+                 image_dump_yuvpgm(&current->image,
+                         pParam->edged_width,
+                         pParam->width, pParam->height, s);
+                 sprintf(s, "\\%05i_ref.pgm", pEnc->m_framenum);
+                 image_dump_yuvpgm(&reference->image,
+                         pParam->edged_width,
+                         pParam->width, pParam->height, s);
+         }
+         */
+         BitstreamPadAlways(bs); /* next_start_code() at the end of VideoObjectPlane() */
-         *pBits = BitstreamPos(bs) - *pBits;
+         current->length = (BitstreamPos(bs) - bits) / 8;
-         return 0;                                        // inter
+         return 0;                                       /* inter */
  }
- #ifdef BFRAMES
+ static void
- static void FrameCodeB(Encoder * pEnc, FRAMEINFO * frame, Bitstream * bs, uint32_t *pBits)
+ FrameCodeB(Encoder * pEnc,
+                    FRAMEINFO * frame,
+                    Bitstream * bs)
  {
-     int16_t dct_codes[6*64];
+         int bits = BitstreamPos(bs);
-     int16_t qcoeff[6*64];
+         DECLARE_ALIGNED_MATRIX(dct_codes, 6, 64, int16_t, CACHE_LINE);
+         DECLARE_ALIGNED_MATRIX(qcoeff, 6, 64, int16_t, CACHE_LINE);
      uint32_t x, y;
-         VECTOR forward;
-         VECTOR backward;
      IMAGE *f_ref = &pEnc->reference->image;
          IMAGE *b_ref = &pEnc->current->image;
-         // forward
+         #ifdef BFRAMES_DEC_DEBUG
-         image_setedges(f_ref, pEnc->mbParam.edged_width, pEnc->mbParam.edged_height, pEnc->mbParam.width, pEnc->mbParam.height, frame->global_flags & XVID_INTERLACING);
+         FILE *fp;
+         static char first=0;
+ #define BFRAME_DEBUG    if (!first && fp){ \
+                 fprintf(fp,"Y=%3d   X=%3d   MB=%2d   CBP=%02X\n",y,x,mb->mode,mb->cbp); \
+         }
+         /* XXX: pEnc->current->global_flags &= ~XVID_VOP_REDUCED;  reduced resoltion not yet supported */
+         if (!first){
+                 fp=fopen("C:\\XVIDDBGE.TXT","w");
+         }
+ #endif
+         /* forward  */
+         if (!pEnc->reference->is_edged) {
+                 image_setedges(f_ref, pEnc->mbParam.edged_width,
+                                            pEnc->mbParam.edged_height, pEnc->mbParam.width,
+                                            pEnc->mbParam.height);
+                 pEnc->current->is_edged = 1;
+         }
+         if (pEnc->reference->is_interpolated != 0) {
          start_timer();
          image_interpolate(f_ref, &pEnc->f_refh, &pEnc->f_refv, &pEnc->f_refhv,
-                 pEnc->mbParam.edged_width, pEnc->mbParam.edged_height, 0);
+                                                   pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
+                                                   (pEnc->mbParam.vol_flags & XVID_VOL_QUARTERPEL), 0);
          stop_inter_timer();
+                 pEnc->reference->is_interpolated = 0;
+         }
+         /* backward */
+         if (!pEnc->current->is_edged) {
+                 image_setedges(b_ref, pEnc->mbParam.edged_width,
+                                            pEnc->mbParam.edged_height, pEnc->mbParam.width,
+                                            pEnc->mbParam.height);
+                 pEnc->current->is_edged = 1;
+         }
-         // backward
+         if (pEnc->current->is_interpolated != 0) {
-         image_setedges(b_ref, pEnc->mbParam.edged_width, pEnc->mbParam.edged_height, pEnc->mbParam.width, pEnc->mbParam.height, frame->global_flags & XVID_INTERLACING);
      start_timer();
          image_interpolate(b_ref, &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV,
-                 pEnc->mbParam.edged_width, pEnc->mbParam.edged_height, 0);
+                                                 pEnc->mbParam.edged_width, pEnc->mbParam.edged_height,
+                                                 (pEnc->mbParam.vol_flags & XVID_VOL_QUARTERPEL), 0);
          stop_inter_timer();
+                 pEnc->current->is_interpolated = 0;
+         }
+         frame->coding_type = B_VOP;
+         call_plugins(pEnc, pEnc->current, NULL, XVID_PLG_FRAME, NULL, NULL, NULL);
          start_timer();
          MotionEstimationBVOP(&pEnc->mbParam, frame,
-                 pEnc->reference->mbs, f_ref, &pEnc->f_refh, &pEnc->f_refv, &pEnc->f_refhv,
+                                                  ((int32_t)(pEnc->current->stamp - frame->stamp)),                              /* time_bp */
-                 pEnc->current->mbs, b_ref, &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV);
+                                                  ((int32_t)(pEnc->current->stamp - pEnc->reference->stamp)),    /* time_pp */
+                                                  pEnc->reference->mbs, f_ref,
+                                                  &pEnc->f_refh, &pEnc->f_refv, &pEnc->f_refhv,
+                                                  pEnc->current, b_ref, &pEnc->vInterH,
+                                                  &pEnc->vInterV, &pEnc->vInterHV);
          stop_motion_timer();
-         /*if (test_quant_type(&pEnc->mbParam, pEnc->current))
+         set_timecodes(frame, pEnc->reference,pEnc->mbParam.fbase);
-         {
+         BitstreamWriteVopHeader(bs, &pEnc->mbParam, frame, 1, frame->quant);
-                 BitstreamWriteVolHeader(bs, pEnc->mbParam.width, pEnc->mbParam.height, pEnc->mbParam.quant_type);
-         }*/
-     frame->coding_type = B_VOP;
-     BitstreamWriteVopHeader(bs, &pEnc->mbParam, frame);
-     *pBits = BitstreamPos(bs);
-     pEnc->sStat.iTextBits = 0;
-     pEnc->sStat.iMvSum = 0;
-     pEnc->sStat.iMvCount = 0;
-         pEnc->sStat.kblks = pEnc->sStat.mblks = pEnc->sStat.ublks = 0;
+         frame->sStat.iTextBits = 0;
+         frame->sStat.iMvSum = 0;
+         frame->sStat.iMvCount = 0;
+         frame->sStat.kblks = frame->sStat.mblks = frame->sStat.ublks = 0;
+         frame->sStat.mblks = pEnc->mbParam.mb_width * pEnc->mbParam.mb_height;
+         frame->sStat.kblks = frame->sStat.ublks = 0;
+         for (y = 0; y < pEnc->mbParam.mb_height; y++) {
+                 for (x = 0; x < pEnc->mbParam.mb_width; x++) {
+                         MACROBLOCK * const mb = &frame->mbs[x + y * pEnc->mbParam.mb_width];
+                         /* decoder ignores mb when refence block is INTER(0,0), CBP=0 */
+                         if (mb->mode == MODE_NOT_CODED) {
+                                 if (pEnc->mbParam.plugin_flags & XVID_REQORIGINAL) {
+                                         MBMotionCompensation(mb, x, y, f_ref, NULL, f_ref, NULL, NULL, &frame->image,
+                                                                                         NULL, 0, 0, pEnc->mbParam.edged_width, 0, 0, 0);
+                                 }
-     for (y = 0; y < pEnc->mbParam.mb_height; y++)
-         {
-                 // reset prediction
-                 forward.x = 0;
-                 forward.y = 0;
-                 backward.x = 0;
-                 backward.y = 0;
-                 for (x = 0; x < pEnc->mbParam.mb_width; x++)
-                 {
-                         MACROBLOCK * f_mb = &pEnc->reference->mbs[x + y * pEnc->mbParam.mb_width];
-                         MACROBLOCK * b_mb = &pEnc->current->mbs[x + y * pEnc->mbParam.mb_width];
-                         MACROBLOCK * mb = &frame->mbs[x + y * pEnc->mbParam.mb_width];
-                         // decoder ignores mb when refence block is INTER(0,0), CBP=0
-                         if (mb->mode == MODE_NOT_CODED)
-                         {
-                                 mb->mvs[0].x = 0;
-                                 mb->mvs[0].y = 0;
                                  continue;
                          }
+                         if (mb->mode != MODE_DIRECT_NONE_MV || pEnc->mbParam.plugin_flags & XVID_REQORIGINAL) {
                          MBMotionCompensationBVOP(&pEnc->mbParam, mb, x, y, &frame->image,
-                                         f_ref, &pEnc->f_refh, &pEnc->f_refv, &pEnc->f_refhv,
+                                                                          f_ref, &pEnc->f_refh, &pEnc->f_refv,
-                                         b_ref, &pEnc->vInterH, &pEnc->vInterV, &pEnc->vInterHV,
+                                                                          &pEnc->f_refhv, b_ref, &pEnc->vInterH,
+                                                                          &pEnc->vInterV, &pEnc->vInterHV,
                                          dct_codes);
+                                 if (mb->mode == MODE_DIRECT_NO4V) mb->mode = MODE_DIRECT;
                          mb->quant = frame->quant;
-                         mb->cbp = MBTransQuantInter(&pEnc->mbParam, frame, mb, x, y, dct_codes, qcoeff);
-                         //mb->cbp = MBTransQuantBVOP(&pEnc->mbParam, x, y, dct_codes, qcoeff, &frame->image, frame->quant);
-                         if ((mb->mode == MODE_INTERPOLATE || mb->mode == MODE_DIRECT) &&
+                                 if (mb->mode != MODE_DIRECT_NONE_MV)
-                                 mb->cbp == 0 &&
+                                         mb->cbp = MBTransQuantInterBVOP(&pEnc->mbParam, frame, mb, x, y,  dct_codes, qcoeff);
-                                 mb->mvs[0].x == 0 &&
-                                 mb->mvs[0].y == 0)
-                         {
-                                 mb->mode = 5;  // skipped
-                         }
-                         if (mb->mode == MODE_INTERPOLATE || mb->mode == MODE_FORWARD)
+                                 if ( (mb->mode == MODE_DIRECT) && (mb->cbp == 0)
-                         {
+                                         && (mb->pmvs[3].x == 0) && (mb->pmvs[3].y == 0) ) {
-                                 mb->pmvs[0].x = mb->mvs[0].x - forward.x;
+                                         mb->mode = MODE_DIRECT_NONE_MV; /* skipped */
-                                 mb->pmvs[0].y = mb->mvs[0].y - forward.y;
-                                 forward.x = mb->mvs[0].x;
-                                 forward.y = mb->mvs[0].y;
                          }
-                         if (mb->mode == MODE_INTERPOLATE || mb->mode == MODE_BACKWARD)
-                         {
-                                 mb->b_pmvs[0].x = mb->b_mvs[0].x - backward.x;
-                                 mb->b_pmvs[0].y = mb->b_mvs[0].y - backward.y;
-                                 backward.x = mb->b_mvs[0].x;
-                                 backward.y = mb->b_mvs[0].y;
                          }
- //                      printf("[%i %i] M=%i CBP=%i MVX=%i MVY=%i %i,%i  %i,%i\n", x, y, pMB->mode, pMB->cbp, pMB->mvs[0].x, bmb->pmvs[0].x, bmb->pmvs[0].y, forward.x, forward.y);
+                         /* keep only bits 5-2 -- Chroma blocks will just be skipped by the
+                          * coding function for BFrames, that's why we don't zero teh DC
+                          * coeffs */
+                         if ((frame->vop_flags & XVID_VOP_GREYSCALE))
+                                 mb->cbp &= 0x3C;
                          start_timer();
-                         MBCodingBVOP(mb, qcoeff, frame->fcode, frame->bcode, bs, &pEnc->sStat);
+                         MBCodingBVOP(frame, mb, qcoeff, frame->fcode, frame->bcode, bs,
+                                                  &frame->sStat);
                          stop_coding_timer();
                  }
          }
          emms();
-         // TODO: dynamic fcode/bcode ???
+         /* TODO: dynamic fcode/bcode ??? */
-         *pBits = BitstreamPos(bs) - *pBits;
+         BitstreamPadAlways(bs); /* next_start_code() at the end of VideoObjectPlane() */
+         frame->length = (BitstreamPos(bs) - bits) / 8;
+ #ifdef BFRAMES_DEC_DEBUG
+         if (!first){
+                 first=1;
+                 if (fp)
+                         fclose(fp);
  }
  #endif
+ }

 Legend:



Removed from v.1.39
 


changed lines


 
Added in v.1.95.2.59
 Legend:



Removed from v.1.39
 


changed lines


 
Added in v.1.95.2.59
-Removed from v.1.39
+Added in v.1.95.2.59

No admin address has been configured	ViewVC Help
Powered by ViewVC 1.0.4