[svn] / branches / dev-api-4 / xvidcore / src / plugins / plugin_2pass2.c Repository:
ViewVC logotype

Diff of /branches/dev-api-4/xvidcore/src/plugins/plugin_2pass2.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1014, Mon May 12 12:33:16 2003 UTC revision 1161, Wed Oct 1 23:23:01 2003 UTC
# Line 1  Line 1 
1  /******************************************************************************  /******************************************************************************
2   *   *
3   * XviD Bit Rate Controller Library   * XviD Bit Rate Controller Library
4   * - VBR 2 pass bitrate controler implementation -   *  - VBR 2 pass bitrate controller implementation -
5   *   *
6   * Copyright (C) 2002 Edouard Gomez <ed.gomez@wanadoo.fr>   *  Copyright (C)      2002 Foxer <email?>
7     *                     2002 Dirk Knop <dknop@gwdg.de>
8     *                2002-2003 Edouard Gomez <ed.gomez@free.fr>
9     *                     2003 Pete Ross <pross@xvid.org>
10   *   *
11   * The curve treatment algorithm is the one implemented by Foxer <email?> and   *  This curve treatment algorithm is the one originally implemented by Foxer
12   * Dirk Knop <dknop@gwdg.de> for the XviD vfw dynamic library.   *  and tuned by Dirk Knop for the XviD vfw frontend.
13   *   *
14   * This program is free software; you can redistribute it and/or modify   * This program is free software; you can redistribute it and/or modify
15   * it under the terms of the GNU General Public License as published by   * it under the terms of the GNU General Public License as published by
# Line 22  Line 25 
25   * along with this program; if not, write to the Free Software   * along with this program; if not, write to the Free Software
26   * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA   * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
27   *   *
28   * $Id: plugin_2pass2.c,v 1.1.2.3 2003-05-12 12:33:16 suxen_drol Exp $   * $Id: plugin_2pass2.c,v 1.1.2.23 2003-10-01 23:23:01 edgomez Exp $
29   *   *
30   *****************************************************************************/   *****************************************************************************/
31    
32  #include <stdio.h>  #include <stdio.h>
33  #include <math.h>  #include <math.h>
34    #include <limits.h>
 #define RAD2DEG 57.295779513082320876798154814105  
 #define DEG2RAD 0.017453292519943295769236907684886  
35    
36  #include "../xvid.h"  #include "../xvid.h"
37  #include "../image/image.h"  #include "../image/image.h"
38    
39    /*****************************************************************************
40     * Some constants
41     ****************************************************************************/
42    
43    #define DEFAULT_KEYFRAME_BOOST 0
44    #define DEFAULT_PAYBACK_METHOD XVID_PAYBACK_PROP
45    #define DEFAULT_BITRATE_PAYBACK_DELAY 250
46    #define DEFAULT_CURVE_COMPRESSION_HIGH 0
47    #define DEFAULT_CURVE_COMPRESSION_LOW 0
48    #define DEFAULT_MAX_OVERFLOW_IMPROVEMENT 60
49    #define DEFAULT_MAX_OVERFLOW_DEGRADATION 60
50    
51    /* Keyframe settings */
52    #define DEFAULT_KFTRESHOLD 10
53    #define DEFAULT_KFREDUCTION 20
54    #define DEFAULT_MIN_KEY_INTERVAL 1
55    
56    /*****************************************************************************
57     * Structures
58     ****************************************************************************/
59    
60    /* Statistics */
61  typedef struct {  typedef struct {
62      int type;               /* first pass type */      int type;               /* first pass type */
63      int quant;              /* first pass quant */      int quant;              /* first pass quant */
64          int blks[3];                    /* k,m,y blks */          int blks[3];                    /* k,m,y blks */
65      int length;             /* first pass length */      int length;             /* first pass length */
66      int scaled_length;     /* scaled length */      int scaled_length;     /* scaled length */
67      int desired_length;          int desired_length;     /* desired length; calcuated during encoding */
 } stat_t;  
   
   
68    
69            int zone_mode;   /* XVID_ZONE_xxx */
70            double weight;
71    } stat_t;
72    
73  /* context struct */  /* Context struct */
74  typedef struct  typedef struct
75  {  {
76      xvid_plugin_2pass2_t param;      xvid_plugin_2pass2_t param;
# Line 55  Line 78 
78      /* constant statistical data */      /* constant statistical data */
79          int num_frames;          int num_frames;
80      int num_keyframes;      int num_keyframes;
81      uint64_t target;    /* target bitrate */          uint64_t target;        /* target filesize */
82    
83      int count[3];   /* count of each frame types */      int count[3];   /* count of each frame types */
84      uint64_t tot_length[3];  /* total length of each frame types */      uint64_t tot_length[3];  /* total length of each frame types */
# Line 64  Line 87 
87      uint64_t tot_scaled_length[3];  /* total scaled length of each frame type */      uint64_t tot_scaled_length[3];  /* total scaled length of each frame type */
88      int max_length;     /* max frame size */      int max_length;     /* max frame size */
89    
90            /* zone statistical data */
91            double avg_weight;  /* average weight */
92            int64_t tot_quant;   /* total length used by XVID_ZONE_QUANT zones */
93    
94    
95      double curve_comp_scale;      double curve_comp_scale;
96      double movie_curve;      double movie_curve;
97    
         double alt_curve_low;  
         double alt_curve_high;  
         double alt_curve_low_diff;  
         double alt_curve_high_diff;  
     double alt_curve_curve_bias_bonus;  
         double alt_curve_mid_qual;  
         double alt_curve_qual_dev;  
   
98      /* dynamic */      /* dynamic */
   
99      int * keyframe_locations;      int * keyframe_locations;
100      stat_t * stats;      stat_t * stats;
101    
102      double pquant_error[32];          double quant_error[3][32];
     double bquant_error[32];  
103      int quant_count[32];      int quant_count[32];
104      int last_quant[3];      int last_quant[3];
105    
# Line 90  Line 108 
108      int KFoverflow;      int KFoverflow;
109      int KFoverflow_partial;      int KFoverflow_partial;
110      int KF_idx;      int KF_idx;
 } rc_2pass2_t;  
   
111    
112            double fq_error;
113  #define BUF_SZ 1024  } rc_2pass2_t;
 #define MAX_COLS    5  
114    
115    
116  /* open stats file, and count num frames */  /*****************************************************************************
117     * Sub plugin functions prototypes
118     ****************************************************************************/
119    
120    static int rc_2pass2_create(xvid_plg_create_t * create, rc_2pass2_t ** handle);
121    static int rc_2pass2_before(rc_2pass2_t * rc, xvid_plg_data_t * data);
122    static int rc_2pass2_after(rc_2pass2_t * rc, xvid_plg_data_t * data);
123    static int rc_2pass2_destroy(rc_2pass2_t * rc, xvid_plg_destroy_t * destroy);
124    
125    /*****************************************************************************
126     * Plugin definition
127     ****************************************************************************/
128    
129  static int det_stats_length(rc_2pass2_t * rc, char * filename)  int
130    xvid_plugin_2pass2(void * handle, int opt, void * param1, void * param2)
131  {  {
132      FILE * f;          switch(opt) {
133      int n, ignore;          case XVID_PLG_INFO :
134      char type;                  return 0;
135    
136      rc->num_frames = 0;          case XVID_PLG_CREATE :
137      rc->num_keyframes = 0;                  return rc_2pass2_create((xvid_plg_create_t*)param1, param2);
138    
139      if ((f = fopen(filename, "rt")) == NULL)          case XVID_PLG_DESTROY :
140          return 0;                  return rc_2pass2_destroy((rc_2pass2_t*)handle, (xvid_plg_destroy_t*)param1);
141    
142      while((n = fscanf(f, "%c %d %d %d %d %d %d\n",          case XVID_PLG_BEFORE :
143          &type, &ignore, &ignore, &ignore, &ignore, &ignore, &ignore)) != EOF) {                  return rc_2pass2_before((rc_2pass2_t*)handle, (xvid_plg_data_t*)param1);
         if (type == 'i') {  
             rc->num_frames++;  
             rc->num_keyframes++;  
         }else if (type == 'p' || type == 'b' || type == 's') {  
             rc->num_frames++;  
         }  
     }  
144    
145      fclose(f);          case XVID_PLG_AFTER :
146                    return rc_2pass2_after((rc_2pass2_t*)handle, (xvid_plg_data_t*)param1);
147            }
148    
149      return 1;          return XVID_ERR_FAIL;
150  }  }
151    
152    /*****************************************************************************
153     * Sub plugin functions definitions
154     ****************************************************************************/
155    
156    /* First a few local helping function prototypes */
157    static  int det_stats_length(rc_2pass2_t * rc, char * filename);
158    static  int load_stats(rc_2pass2_t *rc, char * filename);
159    static void zone_process(rc_2pass2_t *rc, const xvid_plg_create_t * create);
160    static void internal_scale(rc_2pass2_t *rc);
161    static void pre_process0(rc_2pass2_t * rc);
162    static void pre_process1(rc_2pass2_t * rc);
163    
164  /* scale the curve */  /*----------------------------------------------------------------------------
165     *--------------------------------------------------------------------------*/
166    
167  static void internal_scale(rc_2pass2_t *rc)  static int
168    rc_2pass2_create(xvid_plg_create_t * create, rc_2pass2_t **handle)
169  {  {
170          int64_t target  = rc->target;          xvid_plugin_2pass2_t * param = (xvid_plugin_2pass2_t *)create->param;
171          int64_t tot_length = rc->tot_length[0] + rc->tot_length[1] + rc->tot_length[2];          rc_2pass2_t * rc;
         int min_size[3];  
         double scaler;  
172          int i;          int i;
173    
174          if (target <= 0 || target >= tot_length) {          rc = malloc(sizeof(rc_2pass2_t));
175                  printf("undersize warning\n");          if (rc == NULL)
176          }                  return XVID_ERR_MEMORY;
177    
178          /* perform an initial scale pass.          rc->param = *param;
            if a frame size is scaled underneath our hardcoded minimums, then we force the  
            frame size to the minimum, and deduct the original & scaled frmae length from the  
            original and target total lengths */  
179    
180          min_size[0] = ((rc->stats[0].blks[0]*22) + 240) / 8;          /*
181          min_size[1] = (rc->stats[0].blks[0] + 88) / 8;           * Initialize all defaults
182          min_size[2] = 8;           */
183    #define _INIT(a, b) if((a) <= 0) (a) = (b)
184            /* Let's set our defaults if needed */
185            _INIT(rc->param.keyframe_boost, DEFAULT_KEYFRAME_BOOST);
186            _INIT(rc->param.payback_method, DEFAULT_PAYBACK_METHOD);
187            _INIT(rc->param.bitrate_payback_delay, DEFAULT_BITRATE_PAYBACK_DELAY);
188            _INIT(rc->param.curve_compression_high, DEFAULT_CURVE_COMPRESSION_HIGH);
189            _INIT(rc->param.curve_compression_low, DEFAULT_CURVE_COMPRESSION_LOW);
190            _INIT(rc->param.max_overflow_improvement, DEFAULT_MAX_OVERFLOW_IMPROVEMENT);
191            _INIT(rc->param.max_overflow_degradation,  DEFAULT_MAX_OVERFLOW_DEGRADATION);
192    
193            /* Keyframe settings */
194            _INIT(rc->param.kftreshold, DEFAULT_KFTRESHOLD);
195            _INIT(rc->param.kfreduction, DEFAULT_KFREDUCTION);
196            _INIT(rc->param.min_key_interval, DEFAULT_MIN_KEY_INTERVAL);
197    #undef _INIT
198    
199            /* Initialize some stuff to zero */
200            for(i=0; i<32; i++) rc->quant_count[i] = 0;
201    
202          scaler = (double)target / (double)tot_length;          for(i=0; i<3; i++) {
203          //printf("target=%i, tot_length=%i, scaler=%f\n", (int)target, (int)tot_length, scaler);                  int j;
204                    for (j=0; j<32; j++)
205                            rc->quant_error[i][j] = 0;
206            }
207    
208          for (i=0; i<rc->num_frames; i++) {          for (i=0; i<3; i++)
209                  stat_t * s = &rc->stats[i];                  rc->last_quant[i] = 0;
                 int len;  
210    
211                  len = (int)((double)s->length * scaler);          rc->fq_error = 0;
212                  if (len < min_size[s->type]) {          /* force frame size */  
213                          s->scaled_length = min_size[s->type];          /* Count frames in the stats file */
214                          target -= s->scaled_length;          if (!det_stats_length(rc, param->filename)) {
215                          tot_length -= s->length;                  DPRINTF(XVID_DEBUG_RC,"ERROR: fopen %s failed\n", param->filename);
216                  }else{                  free(rc);
217                          s->scaled_length = 0;                  return XVID_ERR_FAIL;
218            }
219    
220            /* Allocate the stats' memory */
221            if ((rc->stats = malloc(rc->num_frames * sizeof(stat_t))) == NULL) {
222                    free(rc);
223                    return XVID_ERR_MEMORY;
224                  }                  }
225    
226            /*
227             * Allocate keyframes location's memory
228             * PS: see comment in pre_process0 for the +1 location requirement
229             */
230            rc->keyframe_locations = malloc((rc->num_keyframes + 1) * sizeof(int));
231            if (rc->keyframe_locations == NULL) {
232                    free(rc->stats);
233                    free(rc);
234                    return XVID_ERR_MEMORY;
235          }          }
236    
237          if (target <= 0 || target >= tot_length) {          if (!load_stats(rc, param->filename)) {
238                  printf("undersize warning\n");                  DPRINTF(XVID_DEBUG_RC,"ERROR: fopen %s failed\n", param->filename);
239                  return;                  free(rc->keyframe_locations);
240                    free(rc->stats);
241                    free(rc);
242                    return XVID_ERR_FAIL;
243          }          }
244    
245          scaler = (double)target / (double)tot_length;          /* Compute the target filesize */
246          //printf("target=%i, tot_length=%i, scaler=%f\n", (int)target, (int)tot_length, scaler);          if (rc->param.bitrate<0) {
247                    /* if negative, bitrate equals the target (in kbytes) */
248                    rc->target = (-rc->param.bitrate) * 1024;
249            } else if (rc->num_frames  < create->fbase/create->fincr) {
250                    /* Source sequence is less than 1s long, we do as if it was 1s long */
251                    rc->target = rc->param.bitrate / 8;
252            } else {
253                    /* Target filesize = bitrate/8 * numframes / framerate */
254                    rc->target =
255                            ((uint64_t)rc->param.bitrate * (uint64_t)rc->num_frames * \
256                             (uint64_t)create->fincr) / \
257                            ((uint64_t)create->fbase * 8);
258            }
259    
260            DPRINTF(XVID_DEBUG_RC, "Frame rate: %d/%d (%ffps)\n",
261                            create->fbase, create->fincr,
262                            (double)create->fbase/(double)create->fincr);
263            DPRINTF(XVID_DEBUG_RC, "Number of frames: %d\n", rc->num_frames);
264            DPRINTF(XVID_DEBUG_RC, "Target bitrate: %ld\n", rc->param.bitrate);
265            DPRINTF(XVID_DEBUG_RC, "Target filesize: %lld\n", rc->target);
266    
267            /* Compensate the average frame overhead caused by the container */
268            rc->target -= rc->num_frames*rc->param.container_frame_overhead;
269            DPRINTF(XVID_DEBUG_RC, "Container Frame overhead: %d\n", rc->param.container_frame_overhead);
270            DPRINTF(XVID_DEBUG_RC, "Target filesize (after container compensation): %lld\n", rc->target);
271    
272            /*
273             * First data pre processing:
274             *  - finds the minimum frame length for each frame type during 1st pass.
275             *     rc->min_size[]
276             *  - determines the maximum frame length observed (no frame type distinction).
277             *     rc->max_size
278             *  - count how many times each frame type has been used.
279             *     rc->count[]
280             *  - total bytes used per frame type
281             *     rc->total[]
282             *  - store keyframe location
283             *     rc->keyframe_locations[]
284             */
285            pre_process0(rc);
286    
287            /*
288             * When bitrate is not given it means it has been scaled by an external
289             * application
290             */
291            if (rc->param.bitrate) {
292                    /* Apply zone settings */
293                    zone_process(rc, create);
294                    /* Perform curve scaling */
295                    internal_scale(rc);
296            } else {
297                    /* External scaling -- zones are ignored */
298          for (i=0; i<rc->num_frames; i++) {          for (i=0; i<rc->num_frames; i++) {
299                  stat_t * s = &rc->stats[i];                          rc->stats[i].zone_mode = XVID_ZONE_WEIGHT;
300                            rc->stats[i].weight = 1.0;
                 if (s->scaled_length==0) {      /* ignore frame with forced frame sizes */  
                         s->scaled_length = (int)((double)s->length * scaler);  
301                  }                  }
302                    rc->avg_weight = 1.0;
303                    rc->tot_quant = 0;
304          }          }
305    
306  }          pre_process1(rc);
307    
308            *handle = rc;
309            return(0);
310    }
311    
312    /*----------------------------------------------------------------------------
313     *--------------------------------------------------------------------------*/
314    
315    static int
316    rc_2pass2_destroy(rc_2pass2_t * rc, xvid_plg_destroy_t * destroy)
317    {
318            free(rc->keyframe_locations);
319            free(rc->stats);
320            free(rc);
321            return(0);
322    }
323    
324    /*----------------------------------------------------------------------------
325     *--------------------------------------------------------------------------*/
326    
327  /* static void internal_scale(rc_2pass2_t *rc)  static int
328    rc_2pass2_before(rc_2pass2_t * rc, xvid_plg_data_t * data)
329  {  {
330      const double avg_pvop = rc->avg_length[XVID_TYPE_PVOP-1];          stat_t * s = &rc->stats[data->frame_num];
331      const double avg_bvop = rc->avg_length[XVID_TYPE_BVOP-1];          int overflow;
332      const uint64_t tot_pvop = rc->tot_length[XVID_TYPE_PVOP-1];          int desired;
333      const uint64_t tot_bvop = rc->tot_length[XVID_TYPE_BVOP-1];          double dbytes;
334      uint64_t i_total = 0;          double curve_temp;
335          double total1,total2;          double scaled_quant;
336      int i;          int capped_to_max_framesize = 0;
337    
338      for (i=0; i<rc->num_frames; i++) {          /*
339          stat_t * s = &rc->stats[i];           * This function is quite long but easy to understand. In order to simplify
340             * the code path (a bit), we treat 3 cases that can return immediatly.
341             */
342    
343                  if (s->type == XVID_TYPE_IVOP) {          /* First case: Another plugin has already set a quantizer */
344                          i_total += s->length + s->length * rc->param.keyframe_boost / 100;          if (data->quant > 0)
345          }                  return(0);
346    
347            /* Second case: We are in a Quant zone */
348            if (s->zone_mode == XVID_ZONE_QUANT) {
349                    rc->fq_error += s->weight;
350                    data->quant = (int)rc->fq_error;
351                    rc->fq_error -= data->quant;
352    
353                    s->desired_length = s->length;
354    
355                    return(0);
356          }          }
357    
358          // compensate for avi frame overhead          /* Third case: insufficent stats data */
359          rc->target_size -= rc->num_frames * 24;          if (data->frame_num >= rc->num_frames)
360                    return 0;
361    
362          // perform prepass to compensate for over/undersizing          /* XXX: why by 8 */
363            overflow = rc->overflow / 8;
364    
365          if (rc->param.use_alt_curve) {          /*
366             * The rc->overflow field represents the overflow in current scene (between two
367             * IFrames) so we must not forget to reset it if we are entering a new scene
368             */
369            if (s->type == XVID_TYPE_IVOP)
370                    overflow = 0;
371    
372          rc->alt_curve_low = avg_pvop - avg_pvop * (double)rc->param.alt_curve_low_dist / 100.0;          desired = s->scaled_length;
                 rc->alt_curve_low_diff = avg_pvop - rc->alt_curve_low;  
                 rc->alt_curve_high = avg_pvop + avg_pvop * (double)rc->param.alt_curve_high_dist / 100.0;  
                 rc->alt_curve_high_diff = rc->alt_curve_high - avg_pvop;  
                 if (rc->alt_curve_use_auto) {  
                         if (rc->movie_curve > 1.0) {  
                                 rc->param.alt_curve_min_rel_qual = (int)(100.0 - (100.0 - 100.0 / rc->movie_curve) * (double)rc->param.alt_curve_auto_str / 100.0);  
                                 if (rc->param.alt_curve_min_rel_qual < 20)  
                                         rc->param.alt_curve_min_rel_qual = 20;  
             }else{  
                                 rc->param.alt_curve_min_rel_qual = 100;  
             }  
                 }  
                 rc->alt_curve_mid_qual = (1.0 + (double)rc->param.alt_curve_min_rel_qual / 100.0) / 2.0;  
                 rc->alt_curve_qual_dev = 1.0 - rc->alt_curve_mid_qual;  
373    
374                  if (rc->param.alt_curve_low_dist > 100) {          dbytes = desired;
375                          switch(rc->param.alt_curve_type) {          if (s->type == XVID_TYPE_IVOP)
376                          case XVID_CURVE_SINE : // Sine Curve (high aggressiveness)                  dbytes += desired * rc->param.keyframe_boost / 100;
377                                  rc->alt_curve_qual_dev *= 2.0 / (1.0 + sin(DEG2RAD * (avg_pvop * 90.0 / rc->alt_curve_low_diff)));          dbytes /= rc->movie_curve;
                                 rc->alt_curve_mid_qual = 1.0 - rc->alt_curve_qual_dev * sin(DEG2RAD * (avg_pvop * 90.0 / rc->alt_curve_low_diff));  
                                 break;  
                         case XVID_CURVE_LINEAR : // Linear (medium aggressiveness)  
                                 rc->alt_curve_qual_dev *= 2.0 / (1.0 + avg_pvop / rc->alt_curve_low_diff);  
                                 rc->alt_curve_mid_qual = 1.0 - rc->alt_curve_qual_dev * avg_pvop / rc->alt_curve_low_diff;  
                                 break;  
                         case XVID_CURVE_COSINE : // Cosine Curve (low aggressiveness)  
                                 rc->alt_curve_qual_dev *= 2.0 / (1.0 +  (1.0 - cos(DEG2RAD * (avg_pvop * 90.0 / rc->alt_curve_low_diff))));  
                                 rc->alt_curve_mid_qual = 1.0 - rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * (avg_pvop * 90.0 / rc->alt_curve_low_diff)));  
                         }  
                 }  
         }  
378    
379          total1 = 0;          /*
380          total2 = 0;           * Apply user's choosen Payback method. Payback helps bitrate to follow the
381             * scaled curve "paying back" past errors in curve previsions.
382             */
383            if (rc->param.payback_method == XVID_PAYBACK_BIAS) {
384                    desired = (int)(rc->curve_comp_error / rc->param.bitrate_payback_delay);
385            } else {
386                    desired = (int)(rc->curve_comp_error * dbytes /
387                                                    rc->avg_length[s->type-1] / rc->param.bitrate_payback_delay);
388    
389      for (i=0; i<rc->num_frames; i++) {                  if (labs(desired) > fabs(rc->curve_comp_error))
390          stat_t * s = &rc->stats[i];                          desired = (int)rc->curve_comp_error;
391            }
392    
393                  if (s->type != XVID_TYPE_IVOP) {          rc->curve_comp_error -= desired;
394    
395              double dbytes = s->length / rc->movie_curve;          /* XXX: warning */
396              double dbytes2;          curve_temp = 0;
                         total1 += dbytes;  
397    
398                          if (s->type == XVID_TYPE_BVOP)          if ((rc->param.curve_compression_high + rc->param.curve_compression_low) &&     s->type != XVID_TYPE_IVOP) {
                                 dbytes *= avg_pvop / avg_bvop;  
399    
400                          if (rc->param.use_alt_curve) {                  curve_temp = rc->curve_comp_scale;
401                                  if (dbytes > avg_pvop) {                  if (dbytes > rc->avg_length[s->type-1]) {
402                      if (dbytes >= rc->alt_curve_high) {                          curve_temp *= ((double)dbytes + (rc->avg_length[s->type-1] - dbytes) * rc->param.curve_compression_high / 100.0);
                                                 dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev);  
403                      }else{                      }else{
404                                                  switch(rc->param.alt_curve_type){                          curve_temp *= ((double)dbytes + (rc->avg_length[s->type-1] - dbytes) * rc->param.curve_compression_low / 100.0);
                                                 case XVID_CURVE_SINE :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * sin(DEG2RAD * ((dbytes - avg_pvop) * 90.0 / rc->alt_curve_high_diff)));  
                                                         break;  
                                                 case XVID_CURVE_LINEAR :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (dbytes - avg_pvop) / rc->alt_curve_high_diff);  
                                                         break;  
                                                 case XVID_CURVE_COSINE :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * ((dbytes - avg_pvop) * 90.0 / rc->alt_curve_high_diff))));  
                                                 }  
405                                          }                                          }
406    
407                    desired += (int)curve_temp;
408                    rc->curve_comp_error += curve_temp - (int)curve_temp;
409                                  }else{                                  }else{
410                      if (dbytes <= rc->alt_curve_low){                  desired += (int)dbytes;
411                                                  dbytes2 = dbytes;                  rc->curve_comp_error += dbytes - (int)dbytes;
                     }else{  
                                                 switch(rc->param.alt_curve_type){  
                                                 case XVID_CURVE_SINE :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * sin(DEG2RAD * ((dbytes - avg_pvop) * 90.0 / rc->alt_curve_low_diff)));  
                                                         break;  
                                                 case XVID_CURVE_LINEAR :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (dbytes - avg_pvop) / rc->alt_curve_low_diff);  
                                                         break;  
                                                 case XVID_CURVE_COSINE :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual + rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * ((dbytes - avg_pvop) * 90.0 / rc->alt_curve_low_diff))));  
                                                 }  
                                         }  
412                                  }                                  }
413    
414            /*
415             * We can't do bigger frames than first pass, this would be stupid as first
416             * pass is quant=2 and that reaching quant=1 is not worth it. We would lose
417             * many bytes and we would not not gain much quality.
418             */
419            if (desired > s->length) {
420                    rc->curve_comp_error += desired - s->length;
421                    desired = s->length;
422                          }else{                          }else{
423                  if (dbytes > avg_pvop) {                  if (desired < rc->min_length[s->type-1]) {
424                                          dbytes2 = ((double)dbytes + (avg_pvop - dbytes) *                          if (s->type == XVID_TYPE_IVOP){
425                                                  rc->param.curve_compression_high / 100.0);                                  rc->curve_comp_error -= rc->min_length[XVID_TYPE_IVOP-1] - desired;
                                 }else{  
                                         dbytes2 = ((double)dbytes + (avg_pvop - dbytes) *  
                                                 rc->param.curve_compression_low / 100.0);  
                                 }  
426                          }                          }
427                            desired = rc->min_length[s->type-1];
                         if (s->type == XVID_TYPE_BVOP) {  
                                 dbytes2 *= avg_bvop / avg_pvop;  
428              }              }
   
             if (dbytes2 < rc->min_length[s->type-1]) {  
                 dbytes = rc->min_length[s->type-1];  
429              }              }
430    
431              total2 += dbytes2;          s->desired_length = desired;
                 }  
         }  
432    
433          rc->curve_comp_scale = total1 / total2;          /*
434             * if this keyframe is too close to the next, reduce it's byte allotment
435             * XXX: why do we do this after setting the desired length ?
436             */
437    
438          if (!rc->param.use_alt_curve) {          if (s->type == XVID_TYPE_IVOP) {
439                  printf("middle frame size for asymmetric curve compression: %i",                  int KFdistance = rc->keyframe_locations[rc->KF_idx] - rc->keyframe_locations[rc->KF_idx - 1];
             (int)(avg_pvop * rc->curve_comp_scale));  
         }  
 }*/  
440    
441                    if (KFdistance < rc->param.kftreshold) {
442    
443                            KFdistance -= rc->param.min_key_interval;
444    
445  /* open stats file(s) and read into rc->stats array */                          if (KFdistance >= 0) {
446                                    int KF_min_size;
447    
448  static int load_stats(rc_2pass2_t *rc, char * filename)                                  KF_min_size = desired * (100 - rc->param.kfreduction) / 100;
449  {                                  if (KF_min_size < 1)
450      FILE * f;                                          KF_min_size = 1;
     int i, not_scaled;  
451    
452                                    desired = KF_min_size + (desired - KF_min_size) * KFdistance /
453                                            (rc->param.kftreshold - rc->param.min_key_interval);
454    
455      if ((f = fopen(filename, "rt"))==NULL)                                  if (desired < 1)
456          return 0;                                          desired = 1;
457                            }
458                    }
459            }
460    
461      i = 0;          /*
462          not_scaled = 0;           * The "sens commun" would force us to use rc->avg_length[s->type-1] but
463      while(i < rc->num_frames) {           * even VFW code uses the pframe average length. Note that this length is
464          stat_t * s = &rc->stats[i];           * used with desired which represents bframes _and_ pframes length.
465          int n;           *
466          char type;           * XXX: why are we using the avg pframe length for all frame types ?
467             */
468            overflow = (int)((double)overflow * desired / rc->avg_length[XVID_TYPE_PVOP-1]);
469    
470                  s->scaled_length = 0;          /* Reign in overflow with huge frames */
471          n = fscanf(f, "%c %d %d %d %d %d %d\n", &type, &s->quant, &s->blks[0], &s->blks[1], &s->blks[2], &s->length, &s->scaled_length);          if (labs(overflow) > labs(rc->overflow))
472          if (n == EOF) break;                  overflow = rc->overflow;
                 if (n < 7) {  
                         not_scaled = 1;  
                 }  
473    
474          if (type == 'i') {          /* Make sure overflow doesn't run away */
475              s->type = XVID_TYPE_IVOP;          if (overflow > desired * rc->param.max_overflow_improvement / 100) {
476          }else if (type == 'p' || type == 's') {                  desired += (overflow <= desired) ? desired * rc->param.max_overflow_improvement / 100 :
477              s->type = XVID_TYPE_PVOP;                          overflow * rc->param.max_overflow_improvement / 100;
478          }else if (type == 'b') {          } else if (overflow < desired * rc->param.max_overflow_degradation / -100){
479              s->type = XVID_TYPE_BVOP;                  desired += desired * rc->param.max_overflow_degradation / -100;
480          }else{  /* unknown type */          } else {
481              printf("unk\n");                  desired += overflow;
             continue;  
482          }          }
483    
484          i++;          /* Make sure we are not higher than desired frame size */
485            if (desired > rc->max_length) {
486                    capped_to_max_framesize = 1;
487                    desired = rc->max_length;
488                    DPRINTF(XVID_DEBUG_RC,"[%i] Capped to maximum frame size\n",
489                                    data->frame_num);
490      }      }
     rc->num_frames = i;  
   
     fclose(f);  
491    
492      return 1;          /* Make sure to not scale below the minimum framesize */
493            if (desired < rc->min_length[s->type-1]) {
494                    desired = rc->min_length[s->type-1];
495                    DPRINTF(XVID_DEBUG_RC,"[%i] Capped to minimum frame size\n",
496                                    data->frame_num);
497  }  }
498    
499            /*
500             * Don't laugh at this very 'simple' quant<->filesize relationship, it
501             * proves to be acurate enough for our algorithm
502             */
503            scaled_quant = (double)s->quant*(double)s->length/(double)desired;
504    
505            /*
506             * Quantizer has been scaled using floating point operations/results, we
507             * must cast it to integer
508             */
509            data->quant = (int)scaled_quant;
510    
511            /* Let's clip the computed quantizer, if needed */
512            if (data->quant < 1) {
513                    data->quant = 1;
514            } else if (data->quant > 31) {
515                    data->quant = 31;
516            } else if (s->type != XVID_TYPE_IVOP) {
517    
518                    /*
519                     * The frame quantizer has not been clipped, this appears to be a good
520                     * computed quantizer, do not loose quantizer decimal part that we
521                     * accumulate for later reuse when its sum represents a complete unit.
522                     */
523                    rc->quant_error[s->type-1][data->quant] += scaled_quant - (double)data->quant;
524    
525  static void print_stats(rc_2pass2_t * rc)                  if (rc->quant_error[s->type-1][data->quant] >= 1.0) {
526  {                          rc->quant_error[s->type-1][data->quant] -= 1.0;
527      int i;                          data->quant++;
528      for (i = 0; i < rc->num_frames; i++) {                  } else if (rc->quant_error[s->type-1][data->quant] <= -1.0) {
529          stat_t * s = &rc->stats[i];                          rc->quant_error[s->type-1][data->quant] += 1.0;
530          printf("%i %i %i %i\n", s->type, s->quant, s->length, s->scaled_length);                          data->quant--;
   
     }  
531  }  }
532    
533            }
534    
535  /* pre-process the statistics data          /*
536      this is a clone of vfw/src/2pass.c:codec_2pass_init minus file reading, alt_curve, internal scale           * Now we have a computed quant that is in the right quante range, with a
537             * possible +1 correction due to cumulated error. We can now safely clip
538             * the quantizer again with user's quant ranges. "Safely" means the Rate
539             * Control could learn more about this quantizer, this knowledge is useful
540             * for future frames even if it this quantizer won't be really used atm,
541             * that's why we don't perform this clipping earlier.
542  */  */
543            if (data->quant < data->min_quant[s->type-1]) {
544  void pre_process0(rc_2pass2_t * rc)                  data->quant = data->min_quant[s->type-1];
545  {          } else if (data->quant > data->max_quant[s->type-1]) {
546      int i,j;                  data->quant = data->max_quant[s->type-1];
   
     for (i=0; i<3; i++) {  
         rc->count[i]=0;  
         rc->tot_length[i] = 0;  
         rc->last_quant[i] = 0;  
     }  
   
     for (i=0; i<32;i++) {  
         rc->pquant_error[i] = 0;  
         rc->bquant_error[i] = 0;  
         rc->quant_count[i] = 0;  
     }  
   
     for (i=j=0; i<rc->num_frames; i++) {  
         stat_t * s = &rc->stats[i];  
   
         rc->count[s->type-1]++;  
         rc->tot_length[s->type-1] += s->length;  
   
         if (i == 0 || s->length < rc->min_length[s->type-1]) {  
             rc->min_length[s->type-1] = s->length;  
         }  
   
         if (i == 0 || s->length > rc->max_length) {  
             rc->max_length = s->length;  
         }  
   
         if (s->type == XVID_TYPE_IVOP) {  
             rc->keyframe_locations[j] = i;  
             j++;  
         }  
     }  
     rc->keyframe_locations[j] = i;  
 }  
   
   
   
 void pre_process1(rc_2pass2_t * rc)  
 {  
     int i;  
     double total1, total2;  
     uint64_t ivop_boost_total;  
   
     ivop_boost_total = 0;  
     rc->curve_comp_error = 0;  
   
     for (i=0; i<3; i++) {  
         rc->tot_scaled_length[i] = 0;  
547      }      }
548    
549      for (i=0; i<rc->num_frames; i++) {          /*
550          stat_t * s = &rc->stats[i];           * To avoid big quality jumps from frame to frame, we apply a "security"
551             * rule that makes |last_quant - new_quant| <= 2. This rule only applies
552          rc->tot_scaled_length[s->type-1] += s->scaled_length;           * to predicted frames (P and B)
553             */
554            if (s->type != XVID_TYPE_IVOP && rc->last_quant[s->type-1] && capped_to_max_framesize == 0) {
555    
556          if (s->type == XVID_TYPE_IVOP) {                  if (data->quant > rc->last_quant[s->type-1] + 2) {
557              ivop_boost_total += s->scaled_length * rc->param.keyframe_boost / 100;                          data->quant = rc->last_quant[s->type-1] + 2;
558          }                          DPRINTF(XVID_DEBUG_RC,
559                                            "[%i] p/b-frame quantizer prevented from rising too steeply\n",
560                                            data->frame_num);
561      }      }
562                    if (data->quant < rc->last_quant[s->type-1] - 2) {
563      rc->movie_curve = ((double)(rc->tot_scaled_length[XVID_TYPE_PVOP-1] + rc->tot_scaled_length[XVID_TYPE_BVOP-1] + ivop_boost_total) /                          data->quant = rc->last_quant[s->type-1] - 2;
564                                          (rc->tot_scaled_length[XVID_TYPE_PVOP-1] + rc->tot_scaled_length[XVID_TYPE_BVOP-1]));                          DPRINTF(XVID_DEBUG_RC,
565                                            "[%i] p/b-frame quantizer prevented from falling too steeply\n",
566      for(i=0; i<3; i++) {                                          data->frame_num);
         if (rc->count[i] == 0 || rc->movie_curve == 0) {  
             rc->avg_length[i] = 1;  
         }else{  
             rc->avg_length[i] = rc->tot_scaled_length[i] / rc->count[i] / rc->movie_curve;  
567          }          }
568      }      }
569    
570      /* alt curve stuff here */          /*
571             * We don't want to pollute the RC history results when our computed quant
572      if (rc->param.use_alt_curve) {           * has been computed from a capped frame size
573          const double avg_pvop = rc->avg_length[XVID_TYPE_PVOP-1];           */
574          const uint64_t tot_pvop = rc->tot_length[XVID_TYPE_PVOP-1];          if (capped_to_max_framesize == 0)
575          const uint64_t tot_bvop = rc->tot_length[XVID_TYPE_BVOP-1];                  rc->last_quant[s->type-1] = data->quant;
         const uint64_t tot_scaled_pvop = rc->tot_scaled_length[XVID_TYPE_PVOP-1];  
         const uint64_t tot_scaled_bvop = rc->tot_scaled_length[XVID_TYPE_BVOP-1];  
   
                 rc->alt_curve_low = avg_pvop - avg_pvop * (double)rc->param.alt_curve_low_dist / 100.0;  
                 rc->alt_curve_low_diff = avg_pvop - rc->alt_curve_low;  
                 rc->alt_curve_high = avg_pvop + avg_pvop * (double)rc->param.alt_curve_high_dist / 100.0;  
                 rc->alt_curve_high_diff = rc->alt_curve_high - avg_pvop;  
   
         if (rc->param.alt_curve_use_auto) {  
             if (tot_bvop + tot_pvop > tot_scaled_bvop + tot_scaled_pvop) {  
                                 rc->param.alt_curve_min_rel_qual = (int)(100.0 - (100.0 - 100.0 /  
                                         ((double)(tot_pvop + tot_bvop) / (double)(tot_scaled_pvop + tot_scaled_bvop))) * (double)rc->param.alt_curve_auto_str / 100.0);  
576    
577                                  if (rc->param.alt_curve_min_rel_qual < 20)          /* Force frame type */
578                                          rc->param.alt_curve_min_rel_qual = 20;          data->type = s->type;
             }else{  
                                 rc->param.alt_curve_min_rel_qual = 100;  
             }  
         }  
                 rc->alt_curve_mid_qual = (1.0 + (double)rc->param.alt_curve_min_rel_qual / 100.0) / 2.0;  
                 rc->alt_curve_qual_dev = 1.0 - rc->alt_curve_mid_qual;  
579    
580          if (rc->param.alt_curve_low_dist > 100) {          return 0;
                         switch(rc->param.alt_curve_type) {  
             case XVID_CURVE_SINE: // Sine Curve (high aggressiveness)  
                                 rc->alt_curve_qual_dev *= 2.0 / (1.0 + sin(DEG2RAD * (avg_pvop * 90.0 / rc->alt_curve_low_diff)));  
                                 rc->alt_curve_mid_qual = 1.0 - rc->alt_curve_qual_dev * sin(DEG2RAD * (avg_pvop * 90.0 / rc->alt_curve_low_diff));  
                                 break;  
                         case XVID_CURVE_LINEAR: // Linear (medium aggressiveness)  
                                 rc->alt_curve_qual_dev *= 2.0 / (1.0 + avg_pvop / rc->alt_curve_low_diff);  
                                 rc->alt_curve_mid_qual = 1.0 - rc->alt_curve_qual_dev * avg_pvop / rc->alt_curve_low_diff;  
                                 break;  
                         case XVID_CURVE_COSINE: // Cosine Curve (low aggressiveness)  
                                 rc->alt_curve_qual_dev *= 2.0 / (1.0 + (1.0 - cos(DEG2RAD * (avg_pvop * 90.0 / rc->alt_curve_low_diff))));  
                                 rc->alt_curve_mid_qual = 1.0 - rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * (avg_pvop * 90.0 / rc->alt_curve_low_diff)));  
                         }  
                 }  
581      }      }
     /* --- */  
582    
583    /*----------------------------------------------------------------------------
584     *--------------------------------------------------------------------------*/
585    
586      total1=total2=0;  static int
587      for (i=0; i<rc->num_frames; i++) {  rc_2pass2_after(rc_2pass2_t * rc, xvid_plg_data_t * data)
588          stat_t * s = &rc->stats[i];  {
589            const char frame_type[4] = { 'i', 'p', 'b', 's'};
590          if (s->type != XVID_TYPE_IVOP) {          stat_t * s = &rc->stats[data->frame_num];
             double dbytes,dbytes2;  
   
             dbytes = s->scaled_length / rc->movie_curve;  
             dbytes2 = 0; /* XXX: warning */  
             total1 += dbytes;  
             if (s->type == XVID_TYPE_BVOP)  
                 dbytes *= rc->avg_length[XVID_TYPE_PVOP-1] / rc->avg_length[XVID_TYPE_BVOP-1];  
591    
592              if (rc->param.use_alt_curve) {          /* Insufficent stats data */
593                  if (dbytes > rc->avg_length[XVID_TYPE_PVOP-1]) {          if (data->frame_num >= rc->num_frames)
594                    return 0;
595    
596                      if (dbytes >= rc->alt_curve_high) {          rc->quant_count[data->quant]++;
                                                 dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev);  
                     }else{  
                                                 switch(rc->param.alt_curve_type) {  
                         case XVID_CURVE_SINE :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * sin(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_high_diff)));  
                                                         break;  
                         case XVID_CURVE_LINEAR :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) / rc->alt_curve_high_diff);  
                                                         break;  
                                                 case XVID_CURVE_COSINE :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_high_diff))));  
                                                 }  
                                         }  
                 }else{  
                     if (dbytes <= rc->alt_curve_low) {  
                                                 dbytes2 = dbytes;  
                     }else{  
                                                 switch(rc->param.alt_curve_type) {  
                                                 case XVID_CURVE_SINE :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * sin(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_low_diff)));  
                                                         break;  
                                                 case XVID_CURVE_LINEAR :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) / rc->alt_curve_low_diff);  
                                                         break;  
                                                 case XVID_CURVE_COSINE :  
                                                     dbytes2 = dbytes * (rc->alt_curve_mid_qual + rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_low_diff))));  
                                                 }  
                                         }  
597    
598                  }          if (data->type == XVID_TYPE_IVOP) {
599                    int kfdiff = (rc->keyframe_locations[rc->KF_idx] -      rc->keyframe_locations[rc->KF_idx - 1]);
600    
601                    rc->overflow += rc->KFoverflow;
602                    rc->KFoverflow = s->desired_length - data->length;
603    
604              }else{                  if (kfdiff > 1) {  /* non-consecutive keyframes */
605                  if (dbytes > rc->avg_length[XVID_TYPE_PVOP-1]) {                          rc->KFoverflow_partial = rc->KFoverflow / (kfdiff - 1);
606                      dbytes2=((double)dbytes + (rc->avg_length[XVID_TYPE_PVOP-1] - dbytes) * rc->param.curve_compression_high / 100.0);                  }else{ /* consecutive keyframes */
607                  }else{                          rc->overflow += rc->KFoverflow;
608                                  dbytes2 = ((double)dbytes + (rc->avg_length[XVID_TYPE_PVOP-1] - dbytes) * rc->param.curve_compression_low / 100.0);                          rc->KFoverflow = 0;
609                  }                          rc->KFoverflow_partial = 0;
610              }              }
611                    rc->KF_idx++;
             if (s->type == XVID_TYPE_BVOP) {  
                             dbytes2 *= rc->avg_length[XVID_TYPE_BVOP-1] / rc->avg_length[XVID_TYPE_PVOP-1];  
                             if (dbytes2 < rc->min_length[XVID_TYPE_BVOP-1])  
                                     dbytes2 = rc->min_length[XVID_TYPE_BVOP-1];  
612              }else{              }else{
613                              if (dbytes2 < rc->min_length[XVID_TYPE_PVOP-1])                  /* distribute part of the keyframe overflow */
614                                      dbytes2 = rc->min_length[XVID_TYPE_PVOP-1];                  rc->overflow += s->desired_length - data->length + rc->KFoverflow_partial;
615              }                  rc->KFoverflow -= rc->KFoverflow_partial;
             total2 += dbytes2;  
         }  
616      }      }
617    
618      rc->curve_comp_scale = total1 / total2;          DPRINTF(XVID_DEBUG_RC, "[%i] type:%c quant:%i stats1:%i scaled:%i actual:%i desired:%d overflow:%i\n",
619                            data->frame_num,
620                            frame_type[data->type-1],
621                            data->quant,
622                            s->length,
623                            s->scaled_length,
624                            data->length,
625                            s->desired_length,
626                            rc->overflow);
627    
628      if (!rc->param.use_alt_curve) {          return(0);
         printf("middle frame size for asymmetric curve compression: %i\n",  
             (int)(rc->avg_length[XVID_TYPE_PVOP-1] * rc->curve_comp_scale));  
629      }      }
630    
631      if (rc->param.use_alt_curve) {  /*****************************************************************************
632          int bonus_bias = rc->param.alt_curve_bonus_bias;   * Helper functions definition
633          int oldquant = 1;   ****************************************************************************/
   
             if (rc->param.alt_curve_use_auto_bonus_bias)  
                     bonus_bias = rc->param.alt_curve_min_rel_qual;  
   
             rc->alt_curve_curve_bias_bonus = (total1 - total2) * (double)bonus_bias / 100.0 / (double)(rc->num_frames /* - credits_frames */ - rc->num_keyframes);  
             rc->curve_comp_scale = ((total1 - total2) * (1.0 - (double)bonus_bias / 100.0) + total2) / total2;  
   
634    
635          /* special info for alt curve:  bias bonus and quantizer thresholds */  #define BUF_SZ   1024
636    #define MAX_COLS 5
637    
638                  printf("avg scaled framesize:%i", (int)rc->avg_length[XVID_TYPE_PVOP-1]);  /* open stats file, and count num frames */
639                  printf("bias bonus:%i bytes", (int)rc->alt_curve_curve_bias_bonus);  static int
640    det_stats_length(rc_2pass2_t * rc, char * filename)
641    {
642            FILE * f;
643            int n, ignore;
644            char type;
645    
646                  for (i=1; i <= (int)(rc->alt_curve_high*2)+1; i++) {          rc->num_frames = 0;
647              double curve_temp, dbytes;          rc->num_keyframes = 0;
             int newquant;  
648    
649              dbytes = i;          if ((f = fopen(filename, "rt")) == NULL)
650                          if (dbytes > rc->avg_length[XVID_TYPE_PVOP-1]) {                  return 0;
                 if (dbytes >= rc->alt_curve_high) {  
                                         curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev);  
                 }else{  
                                         switch(rc->param.alt_curve_type)  
                                         {  
                                         case XVID_CURVE_SINE :  
                                                 curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * sin(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_high_diff)));  
                                                 break;  
                                         case XVID_CURVE_LINEAR :  
                                                 curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) / rc->alt_curve_high_diff);  
                                                 break;  
                                         case XVID_CURVE_COSINE :  
                                                 curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_high_diff))));  
                                         }  
                                 }  
                         }else{  
                 if (dbytes <= rc->alt_curve_low) {  
                                         curve_temp = dbytes;  
                 }else{  
                                         switch(rc->param.alt_curve_type)  
                                         {  
                                         case XVID_CURVE_SINE :  
                                                 curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * sin(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_low_diff)));  
                                                 break;  
                                         case XVID_CURVE_LINEAR :  
                                                 curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) / rc->alt_curve_low_diff);  
                                                 break;  
                                         case XVID_CURVE_COSINE :  
                                                 curve_temp = dbytes * (rc->alt_curve_mid_qual + rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_low_diff))));  
                                         }  
                                 }  
                         }  
651    
652                          if (rc->movie_curve > 1.0)          while((n = fscanf(f, "%c %d %d %d %d %d %d\n",
653                                  dbytes *= rc->movie_curve;                                            &type, &ignore, &ignore, &ignore, &ignore, &ignore, &ignore)) != EOF) {
654                    if (type == 'i') {
655                          newquant = (int)(dbytes * 2.0 / (curve_temp * rc->curve_comp_scale + rc->alt_curve_curve_bias_bonus));                          rc->num_frames++;
656                          if (newquant > 1) {                          rc->num_keyframes++;
657                                  if (newquant != oldquant) {                  }else if (type == 'p' || type == 'b' || type == 's') {
658                      int percent = (int)((i - rc->avg_length[XVID_TYPE_PVOP-1]) * 100.0 / rc->avg_length[XVID_TYPE_PVOP-1]);                          rc->num_frames++;
                                         oldquant = newquant;  
                                         printf("quant:%i threshold at %i : %i percent", newquant, i, percent);  
                                 }  
659                          }                          }
660                  }                  }
661    
662      }          fclose(f);
663    
664      rc->overflow = 0;          return 1;
     rc->KFoverflow = 0;  
     rc->KFoverflow_partial = 0;  
     rc->KF_idx = 1;  
665  }  }
666    
667    /* open stats file(s) and read into rc->stats array */
668    
669    static int
670    load_stats(rc_2pass2_t *rc, char * filename)
 static int rc_2pass2_create(xvid_plg_create_t * create, rc_2pass2_t ** handle)  
671  {  {
672      xvid_plugin_2pass2_t * param = (xvid_plugin_2pass2_t *)create->param;          FILE * f;
673      rc_2pass2_t * rc;          int i, not_scaled;
   
     rc = malloc(sizeof(rc_2pass2_t));  
     if (rc == NULL)  
         return XVID_ERR_MEMORY;  
   
     rc->param = *param;  
674    
     if (rc->param.keyframe_boost <= 0) rc->param.keyframe_boost = 0;  
     if (rc->param.payback_method <= 0) rc->param.payback_method = XVID_PAYBACK_PROP;  
     if (rc->param.bitrate_payback_delay <= 0) rc->param.bitrate_payback_delay = 250;  
     if (rc->param.curve_compression_high <= 0) rc->param.curve_compression_high = 0;  
     if (rc->param.curve_compression_low <= 0) rc->param.curve_compression_low = 0;  
     if (rc->param.max_overflow_improvement <= 0) rc->param.max_overflow_improvement = 60;  
     if (rc->param.max_overflow_degradation <= 0) rc->param.max_overflow_degradation = 60;  
   
     if (rc->param.use_alt_curve <= 0) rc->param.use_alt_curve = 0;  
     if (rc->param.alt_curve_high_dist <= 0) rc->param.alt_curve_high_dist = 500;  
     if (rc->param.alt_curve_low_dist <= 0) rc->param.alt_curve_low_dist = 90;  
     if (rc->param.alt_curve_use_auto <= 0) rc->param.alt_curve_use_auto = 1;  
     if (rc->param.alt_curve_auto_str <= 0) rc->param.alt_curve_auto_str = 30;  
     if (rc->param.alt_curve_type <= 0) rc->param.alt_curve_type = XVID_CURVE_LINEAR;  
     if (rc->param.alt_curve_min_rel_qual <= 0) rc->param.alt_curve_min_rel_qual = 50;  
     if (rc->param.alt_curve_use_auto_bonus_bias <= 0) rc->param.alt_curve_use_auto_bonus_bias = 1;  
     if (rc->param.alt_curve_bonus_bias <= 0) rc->param.alt_curve_bonus_bias = 50;  
   
     if (rc->param.kftreshold <= 0) rc->param.kftreshold = 10;  
     if (rc->param.kfreduction <= 0) rc->param.kfreduction = 20;  
     if (rc->param.min_key_interval <= 0) rc->param.min_key_interval = 300;  
675    
676      if (!det_stats_length(rc, param->filename)){          if ((f = fopen(filename, "rt"))==NULL)
677          DPRINTF(DPRINTF_RC,"fopen %s failed\n", param->filename);                  return 0;
         free(rc);  
         return XVID_ERR_FAIL;  
     }  
678    
679      if ((rc->stats = malloc(rc->num_frames * sizeof(stat_t))) == NULL) {          i = 0;
680          free(rc);          not_scaled = 0;
681          return XVID_ERR_MEMORY;          while(i < rc->num_frames) {
682      }                  stat_t * s = &rc->stats[i];
683                    int n;
684                    char type;
685    
686      /* XXX: do we need an addition location */                  s->scaled_length = 0;
687      if ((rc->keyframe_locations = malloc((rc->num_keyframes + 1) * sizeof(int))) == NULL) {                  n = fscanf(f, "%c %d %d %d %d %d %d\n", &type, &s->quant, &s->blks[0], &s->blks[1], &s->blks[2], &s->length, &s->scaled_length);
688          free(rc->stats);                  if (n == EOF) break;
689          free(rc);                  if (n < 7) {
690          return XVID_ERR_MEMORY;                          not_scaled = 1;
691      }      }
692    
693      if (!load_stats(rc, param->filename)) {                  if (type == 'i') {
694          DPRINTF(DPRINTF_RC,"fopen %s failed\n", param->filename);                          s->type = XVID_TYPE_IVOP;
695          free(rc->keyframe_locations);                  }else if (type == 'p' || type == 's') {
696          free(rc->stats);                          s->type = XVID_TYPE_PVOP;
697          free(rc);                  }else if (type == 'b') {
698          return XVID_ERR_FAIL;                          s->type = XVID_TYPE_BVOP;
699                    }else{  /* unknown type */
700                            DPRINTF(XVID_DEBUG_RC, "WARNING: unknown stats frame type, assuming pvop\n");
701                            s->type = XVID_TYPE_PVOP;
702      }      }
703    
704      /* pre-process our stats */                  i++;
   
         {  
                 if (rc->num_frames  < create->fbase/create->fincr) {  
                         rc->target = rc->param.bitrate / 8;     /* one second */  
                 }else{  
                         rc->target = (rc->param.bitrate * rc->num_frames * create->fincr) / (create->fbase * 8);  
705                  }                  }
706    
707            rc->num_frames = i;
708    
709                  rc->target -= rc->num_frames*24;        /* avi file header */          fclose(f);
710    
711            return 1;
712          }          }
713    
714    #if 0
715          pre_process0(rc);  static void print_stats(rc_2pass2_t * rc)
716          if (rc->param.bitrate) {  {
717                  internal_scale(rc);          int i;
718            DPRINTF(XVID_DEBUG_RC, "type quant length scaled_length\n");
719            for (i = 0; i < rc->num_frames; i++) {
720                    stat_t * s = &rc->stats[i];
721                    DPRINTF(XVID_DEBUG_RC, "%d %d %d %d\n", s->type, s->quant, s->length, s->scaled_length);
722          }          }
         pre_process1(rc);pre_process1(rc);pre_process1(rc);  
   
     *handle = rc;  
         return(0);  
723  }  }
724    #endif
725    
726    /* pre-process the statistics data
727       - for each type, count, tot_length, min_length, max_length
728       - set keyframes_locations
729    */
730    
731  static int rc_2pass2_destroy(rc_2pass2_t * rc, xvid_plg_destroy_t * destroy)  static void
732    pre_process0(rc_2pass2_t * rc)
733  {  {
734      free(rc->keyframe_locations);          int i,j;
735      free(rc->stats);  
736          free(rc);          /*
737          return(0);           * *rc fields initialization
738             * NB: INT_MAX and INT_MIN are used in order to be immediately replaced
739             *     with real values of the 1pass
740             */
741            for (i=0; i<3; i++) {
742                    rc->count[i]=0;
743                    rc->tot_length[i] = 0;
744                    rc->min_length[i] = INT_MAX;
745  }  }
746    
747            rc->max_length = INT_MIN;
748    
749            /*
750             * Loop through all frames and find/compute all the stuff this function
751             * is supposed to do
752             */
753            for (i=j=0; i<rc->num_frames; i++) {
754                    stat_t * s = &rc->stats[i];
755    
756  static int rc_2pass2_before(rc_2pass2_t * rc, xvid_plg_data_t * data)                  rc->count[s->type-1]++;
757  {                  rc->tot_length[s->type-1] += s->length;
     stat_t * s = &rc->stats[data->frame_num];  
     int overflow;  
     int desired;  
     double dbytes;  
     double curve_temp;  
     int capped_to_max_framesize = 0;  
758    
759      if (data->frame_num >= rc->num_frames) {                  if (s->length < rc->min_length[s->type-1]) {
760          /* insufficent stats data */                          rc->min_length[s->type-1] = s->length;
         return 0;  
761      }      }
762    
763      overflow = rc->overflow / 8;        /* XXX: why by 8 */                  if (s->length > rc->max_length) {
764                            rc->max_length = s->length;
     if (s->type == XVID_TYPE_IVOP) {        /* XXX: why */  
         overflow = 0;  
765      }      }
766    
     desired = s->scaled_length;  
   
     dbytes = desired;  
767      if (s->type == XVID_TYPE_IVOP) {      if (s->type == XVID_TYPE_IVOP) {
768          dbytes += desired * rc->param.keyframe_boost / 100;                          rc->keyframe_locations[j] = i;
769                            j++;
770      }      }
     dbytes /= rc->movie_curve;  
   
     if (s->type == XVID_TYPE_BVOP) {  
         dbytes *= rc->avg_length[XVID_TYPE_PVOP-1] / rc->avg_length[XVID_TYPE_BVOP-1];  
771      }      }
772    
773      if (rc->param.payback_method == XVID_PAYBACK_BIAS) {          /*
774          desired =(int)(rc->curve_comp_error / rc->param.bitrate_payback_delay);           * Nota Bene:
775      }else{           * The "per sequence" overflow system considers a natural sequence to be
776                  //printf("desired=%i, dbytes=%i\n", desired,dbytes);           * formed by all frames between two iframes, so if we want to make sure
777                  desired = (int)(rc->curve_comp_error * dbytes /           * the system does not go nuts during last sequence, we force the last
778                          rc->avg_length[XVID_TYPE_PVOP-1] / rc->param.bitrate_payback_delay);           * frame to appear in the keyframe locations array.
779                  //printf("desired=%i\n", desired);           */
780            rc->keyframe_locations[j] = i;
781    
782                  if (labs(desired) > fabs(rc->curve_comp_error)) {          DPRINTF(XVID_DEBUG_RC, "Min 1st pass IFrame length: %d\n", rc->min_length[0]);
783                          desired = (int)rc->curve_comp_error;          DPRINTF(XVID_DEBUG_RC, "Min 1st pass PFrame length: %d\n", rc->min_length[1]);
784                  }          DPRINTF(XVID_DEBUG_RC, "Min 1st pass BFrame length: %d\n", rc->min_length[2]);
785      }      }
786    
787      rc->curve_comp_error -= desired;  /* calculate zone weight "center" */
788    
789      /* alt curve */  static void
790    zone_process(rc_2pass2_t *rc, const xvid_plg_create_t * create)
791    {
792            int i,j;
793            int n = 0;
794    
795      curve_temp = 0; /* XXX: warning */          rc->avg_weight = 0.0;
796            rc->tot_quant = 0;
797    
798      if (rc->param.use_alt_curve) {  
799          if (s->type != XVID_TYPE_IVOP)  {          if (create->num_zones == 0) {
800              if (dbytes > rc->avg_length[XVID_TYPE_PVOP-1]) {                  for (j = 0; j < rc->num_frames; j++) {
801                  if (dbytes >= rc->alt_curve_high) {                          rc->stats[j].zone_mode = XVID_ZONE_WEIGHT;
802                                          curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev);                          rc->stats[j].weight = 1.0;
                 }else{  
                     switch(rc->param.alt_curve_type) {  
                                         case XVID_CURVE_SINE :  
                                             curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * sin(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_high_diff)));  
                                                 break;  
                                         case XVID_CURVE_LINEAR :  
                                             curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) / rc->alt_curve_high_diff);  
                                                 break;  
                                         case XVID_CURVE_COSINE :  
                                             curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_high_diff))));  
                                         }  
                                 }  
                         }else{  
                 if (dbytes <= rc->alt_curve_low){  
                                         curve_temp = dbytes;  
                 }else{  
                                         switch(rc->param.alt_curve_type) {  
                                         case XVID_CURVE_SINE :  
                                             curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * sin(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_low_diff)));  
                                                 break;  
                                         case XVID_CURVE_LINEAR :  
                                             curve_temp = dbytes * (rc->alt_curve_mid_qual - rc->alt_curve_qual_dev * (dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) / rc->alt_curve_low_diff);  
                                                 break;  
                                         case XVID_CURVE_COSINE :  
                                             curve_temp = dbytes * (rc->alt_curve_mid_qual + rc->alt_curve_qual_dev * (1.0 - cos(DEG2RAD * ((dbytes - rc->avg_length[XVID_TYPE_PVOP-1]) * 90.0 / rc->alt_curve_low_diff))));  
                     }  
803                                  }                                  }
804                    rc->avg_weight += rc->num_frames * 1.0;
805                    n += rc->num_frames;
806                          }                          }
                         if (s->type == XVID_TYPE_BVOP)  
                                 curve_temp *= rc->avg_length[XVID_TYPE_BVOP-1] / rc->avg_length[XVID_TYPE_PVOP-1];  
807    
                         curve_temp = curve_temp * rc->curve_comp_scale + rc->alt_curve_curve_bias_bonus;  
808    
809                          desired += ((int)curve_temp);          for(i=0; i < create->num_zones; i++) {
                         rc->curve_comp_error += curve_temp - (int)curve_temp;  
                 }else{  
                         if (s->type == XVID_TYPE_BVOP)  
                                 dbytes *= rc->avg_length[XVID_TYPE_BVOP-1] / rc->avg_length[XVID_TYPE_PVOP-1];  
810    
811                          desired += ((int)dbytes);                  int next = (i+1<create->num_zones) ? create->zones[i+1].frame : rc->num_frames;
                         rc->curve_comp_error += dbytes - (int)dbytes;  
                 }  
   
     }else if ((rc->param.curve_compression_high + rc->param.curve_compression_low) &&   s->type != XVID_TYPE_IVOP) {  
812    
813          curve_temp = rc->curve_comp_scale;                  if (i==0 && create->zones[i].frame > 0) {
814          if (dbytes > rc->avg_length[XVID_TYPE_PVOP-1]) {                          for (j = 0; j < create->zones[i].frame && j < rc->num_frames; j++) {
815              curve_temp *= ((double)dbytes + (rc->avg_length[XVID_TYPE_PVOP-1] - dbytes) * rc->param.curve_compression_high / 100.0);                                  rc->stats[j].zone_mode = XVID_ZONE_WEIGHT;
816          } else {                                  rc->stats[j].weight = 1.0;
             curve_temp *= ((double)dbytes + (rc->avg_length[XVID_TYPE_PVOP-1] - dbytes) * rc->param.curve_compression_low / 100.0);  
817          }          }
818                            rc->avg_weight += create->zones[i].frame * 1.0;
819          if (s->type == XVID_TYPE_BVOP){                          n += create->zones[i].frame;
             curve_temp *= rc->avg_length[XVID_TYPE_BVOP-1] / rc->avg_length[XVID_TYPE_PVOP-1];  
820          }          }
821    
822          desired += (int)curve_temp;                  if (create->zones[i].mode == XVID_ZONE_WEIGHT) {
823          rc->curve_comp_error += curve_temp - (int)curve_temp;                          for (j = create->zones[i].frame; j < next && j < rc->num_frames; j++ ) {
824      }else{                                  rc->stats[j].zone_mode = XVID_ZONE_WEIGHT;
825          if (s->type == XVID_TYPE_BVOP){                                  rc->stats[j].weight = (double)create->zones[i].increment / (double)create->zones[i].base;
                         dbytes *= rc->avg_length[XVID_TYPE_BVOP-1] / rc->avg_length[XVID_TYPE_PVOP-1];  
826          }          }
827                            next -= create->zones[i].frame;
828                  desired += (int)dbytes;                          rc->avg_weight += (double)(next * create->zones[i].increment) / (double)create->zones[i].base;
829                  rc->curve_comp_error += dbytes - (int)dbytes;                          n += next;
830                    }else{  /* XVID_ZONE_QUANT */
831                            for (j = create->zones[i].frame; j < next && j < rc->num_frames; j++ ) {
832                                    rc->stats[j].zone_mode = XVID_ZONE_QUANT;
833                                    rc->stats[j].weight = (double)create->zones[i].increment / (double)create->zones[i].base;
834                                    rc->tot_quant += rc->stats[j].length;
835      }      }
   
         if (desired > s->length){  
                 rc->curve_comp_error += desired - s->length;  
                 desired = s->length;  
         }else{  
         if (desired < rc->min_length[s->type-1]) {  
             if (s->type == XVID_TYPE_IVOP){  
                 rc->curve_comp_error -= rc->min_length[XVID_TYPE_IVOP-1] - desired;  
             }  
             desired = rc->min_length[s->type-1];  
836          }          }
837          }          }
838            rc->avg_weight = n>0 ? rc->avg_weight/n : 1.0;
839    
840      s->desired_length = desired;          DPRINTF(XVID_DEBUG_RC, "center_weight: %f (for %i frames);   fixed_bytes: %i\n", rc->avg_weight, n, rc->tot_quant);
841    }
842    
843    
844      /* if this keyframe is too close to the next, reduce it's byte allotment  /* scale the curve */
     XXX: why do we do this after setting the desired length  */  
845    
846          if (s->type == XVID_TYPE_IVOP) {  static void
847                  int KFdistance = rc->keyframe_locations[rc->KF_idx] - rc->keyframe_locations[rc->KF_idx - 1];  internal_scale(rc_2pass2_t *rc)
848    {
849            int64_t target  = rc->target - rc->tot_quant;
850            int64_t pass1_length = rc->tot_length[0] + rc->tot_length[1] + rc->tot_length[2] - rc->tot_quant;
851            double scaler;
852            int i, num_MBs;
853    
854          if (KFdistance < rc->param.kftreshold) {          /* Let's compute a linear scaler in order to perform curve scaling */
855            scaler = (double)target / (double)pass1_length;
856    
857              KFdistance = KFdistance - rc->param.min_key_interval;          if (target <= 0 || pass1_length <= 0 || target >= pass1_length) {
858                    DPRINTF(XVID_DEBUG_RC, "WARNING: Undersize detected\n");
859                    scaler = 1.0;
860            }
861    
862                          if (KFdistance >= 0) {          DPRINTF(XVID_DEBUG_RC,
863                  int KF_min_size;                          "Before correction: target=%i, tot_length=%i, scaler=%f\n",
864                            (int)target, (int)pass1_length, scaler);
865    
866                                  KF_min_size = desired * (100 - rc->param.kfreduction) / 100;          /*
867                                  if (KF_min_size < 1)           * Compute min frame lengths (for each frame type) according to the number
868                                          KF_min_size = 1;           * of MBs. We sum all blocks count from frame 0 (should be an IFrame, so
869             * blocks[0] should be enough) to know how many MBs there are.
870             *
871             * We compare these hardcoded values with observed values in first pass
872             * (determined in pre_process0).Then we keep the real minimum.
873             */
874            num_MBs = rc->stats[0].blks[0] + rc->stats[0].blks[1] + rc->stats[0].blks[2];
875    
876                                  desired = KF_min_size + (desired - KF_min_size) * KFdistance /          if(rc->min_length[0] > ((num_MBs*22) + 240) / 8)
877                                          (rc->param.kftreshold - rc->param.min_key_interval);                  rc->min_length[0] = ((num_MBs*22) + 240) / 8;
878    
879                                  if (desired < 1)          if(rc->min_length[1] > ((num_MBs) + 88)  / 8)
880                                          desired = 1;                  rc->min_length[1] = ((num_MBs) + 88)  / 8;
                         }  
                 }  
         }  
881    
882      overflow = (int)((double)overflow * desired / rc->avg_length[XVID_TYPE_PVOP-1]);          if(rc->min_length[2] > 8)
883                    rc->min_length[2] = 8;
884    
885            /*
886             * Perform an initial scale pass.
887             * If a frame size is scaled underneath our hardcoded minimums, then we
888             * force the frame size to the minimum, and deduct the original & scaled
889             * frame length from the original and target total lengths
890             */
891            for (i=0; i<rc->num_frames; i++) {
892                    stat_t * s = &rc->stats[i];
893                    int len;
894    
895          // Foxer: reign in overflow with huge frames                  if (s->zone_mode == XVID_ZONE_QUANT) {
896          if (labs(overflow) > labs(rc->overflow)) {                          s->scaled_length = s->length;
897                  overflow = rc->overflow;                          continue;
898          }          }
899    
900      // Foxer: make sure overflow doesn't run away                  /* Compute the scaled length */
901                    len = (int)((double)s->length * scaler * s->weight / rc->avg_weight);
902    
903          if (overflow > desired * rc->param.max_overflow_improvement / 100) {                  /* Compare with the computed minimum */
904                  desired += (overflow <= desired) ? desired * rc->param.max_overflow_improvement / 100 :                  if (len < rc->min_length[s->type-1]) {
905                          overflow * rc->param.max_overflow_improvement / 100;                          /* force frame size to our computed minimum */
906          }else if (overflow < desired * rc->param.max_overflow_degradation / -100){                          s->scaled_length = rc->min_length[s->type-1];
907                  desired += desired * rc->param.max_overflow_degradation / -100;                          target -= s->scaled_length;
908                            pass1_length -= s->length;
909          }else{          }else{
910                  desired += overflow;                          /* Do nothing for now, we'll scale this later */
911                            s->scaled_length = 0;
912          }          }
   
     if (desired > rc->max_length) {  
                 capped_to_max_framesize = 1;  
                 desired = rc->max_length;  
913          }          }
914    
915      // make sure to not scale below the minimum framesize          /* Correct the scaler for all non forced frames */
916      if (desired < rc->min_length[s->type-1]) {          scaler = (double)target / (double)pass1_length;
917          desired = rc->min_length[s->type-1];  
918            /* Detect undersizing */
919            if (target <= 0 || pass1_length <= 0 || target >= pass1_length) {
920                    DPRINTF(XVID_DEBUG_RC, "WARNING: Undersize detected\n");
921                    scaler = 1.0;
922      }      }
923    
924            DPRINTF(XVID_DEBUG_RC,
925                            "After correction: target=%i, tot_length=%i, scaler=%f\n",
926                            (int)target, (int)pass1_length, scaler);
927    
928      // very 'simple' quant<->filesize relationship          /* Do another pass with the new scaler */
929      data->quant= (s->quant * s->length) / desired;          for (i=0; i<rc->num_frames; i++) {
930                    stat_t * s = &rc->stats[i];
931    
932          if (data->quant < 1) {                  /* Ignore frame with forced frame sizes */
933                  data->quant = 1;                  if (s->scaled_length == 0)
934      } else if (data->quant > 31) {                          s->scaled_length = (int)((double)s->length * scaler * s->weight / rc->avg_weight);
                 data->quant = 31;  
935          }          }
         else if (s->type != XVID_TYPE_IVOP)  
         {  
                 // Foxer: aid desired quantizer precision by accumulating decision error  
                 if (s->type== XVID_TYPE_BVOP) {  
                         rc->bquant_error[data->quant] += ((double)(s->quant * s->length) / desired) - data->quant;  
   
                         if (rc->bquant_error[data->quant] >= 1.0) {  
                                 rc->bquant_error[data->quant] -= 1.0;  
                                 data->quant++;  
936                          }                          }
                 }else{  
                         rc->pquant_error[data->quant] += ((double)(s->quant * s->length) / desired) - data->quant;  
937    
938              if (rc->pquant_error[data->quant] >= 1.0) {  static void
939                                  rc->pquant_error[data->quant] -= 1.0;  pre_process1(rc_2pass2_t * rc)
940                                  ++data->quant;  {
941                          }          int i;
942                  }          double total1, total2;
943          }          uint64_t ivop_boost_total;
944    
945      /* cap to min/max quant */          ivop_boost_total = 0;
946            rc->curve_comp_error = 0;
947    
948      if (data->quant < data->min_quant[s->type-1]) {          for (i=0; i<3; i++) {
949          data->quant = data->min_quant[s->type-1];                  rc->tot_scaled_length[i] = 0;
     }else if (data->quant > data->max_quant[s->type-1]) {  
         data->quant = data->max_quant[s->type-1];  
950      }      }
951    
952      /* subsequent p/b frame quants can only be +- 2 */          for (i=0; i<rc->num_frames; i++) {
953          if (s->type != XVID_TYPE_IVOP && rc->last_quant[s->type-1] && capped_to_max_framesize == 0) {                  stat_t * s = &rc->stats[i];
954    
955                  if (data->quant > rc->last_quant[s->type-1] + 2) {                  rc->tot_scaled_length[s->type-1] += s->scaled_length;
                         data->quant = rc->last_quant[s->type-1] + 2;  
                         DPRINTF(DPRINTF_RC, "p/b-frame quantizer prevented from rising too steeply");  
                 }  
                 if (data->quant < rc->last_quant[s->type-1] - 2) {  
                         data->quant = rc->last_quant[s->type-1] - 2;  
                         DPRINTF(DPRINTF_RC, "p/b-frame quantizer prevented from falling too steeply");  
                 }  
         }  
956    
957          if (capped_to_max_framesize == 0) {                  if (s->type == XVID_TYPE_IVOP) {
958          rc->last_quant[s->type-1] = data->quant;                          ivop_boost_total += s->scaled_length * rc->param.keyframe_boost / 100;
959          }          }
   
         return 0;  
960  }  }
961    
962            rc->movie_curve = ((double)(rc->tot_scaled_length[XVID_TYPE_PVOP-1] + rc->tot_scaled_length[XVID_TYPE_BVOP-1] + ivop_boost_total) /
963                                               (rc->tot_scaled_length[XVID_TYPE_PVOP-1] + rc->tot_scaled_length[XVID_TYPE_BVOP-1]));
964    
965            for(i=0; i<3; i++) {
966                    if (rc->count[i] == 0 || rc->movie_curve == 0) {
967                            rc->avg_length[i] = 1;
968                    }else{
969                            rc->avg_length[i] = rc->tot_scaled_length[i] / rc->count[i] / rc->movie_curve;
970                    }
971            }
972    
973  static int rc_2pass2_after(rc_2pass2_t * rc, xvid_plg_data_t * data)  /* --- */
 {  
     stat_t * s = &rc->stats[data->frame_num];  
974    
975      if (data->frame_num >= rc->num_frames) {          total1=total2=0;
         /* insufficent stats data */  
         return 0;  
     }  
976    
977      rc->quant_count[data->quant]++;          for (i=0; i<rc->num_frames; i++) {
978                    stat_t * s = &rc->stats[i];
979    
980      if (data->type == XVID_TYPE_IVOP) {                  if (s->type != XVID_TYPE_IVOP) {
981          int kfdiff = (rc->keyframe_locations[rc->KF_idx] -      rc->keyframe_locations[rc->KF_idx - 1]);                          double dbytes,dbytes2;
982    
983          rc->overflow += rc->KFoverflow;                          dbytes = s->scaled_length / rc->movie_curve;
984          rc->KFoverflow = s->desired_length - data->length;                          dbytes2 = 0; /* XXX: warning */
985                            total1 += dbytes;
986    
987          if (kfdiff > 1) {  // non-consecutive keyframes                          if (dbytes > rc->avg_length[s->type-1]) {
988              rc->KFoverflow_partial = rc->KFoverflow / (kfdiff - 1);                                  dbytes2=((double)dbytes + (rc->avg_length[s->type-1] - dbytes) * rc->param.curve_compression_high / 100.0);
         }else{ // consecutive keyframes  
                         rc->overflow += rc->KFoverflow;  
                         rc->KFoverflow = 0;  
                         rc->KFoverflow_partial = 0;  
         }  
         rc->KF_idx++;  
989      }else{      }else{
990          // distribute part of the keyframe overflow                                  dbytes2 = ((double)dbytes + (rc->avg_length[s->type-1] - dbytes) * rc->param.curve_compression_low / 100.0);
         rc->overflow += s->desired_length - data->length + rc->KFoverflow_partial;  
         rc->KFoverflow -= rc->KFoverflow_partial;  
991      }      }
992    
993      printf("[%i] quant:%i stats1:%i scaled:%i actual:%i overflow:%i\n",                          if (dbytes2 < rc->min_length[s->type-1])
994          data->frame_num,                                  dbytes2 = rc->min_length[s->type-1];
         data->quant,  
         s->length,  
         s->scaled_length,  
         data->length,  
         rc->overflow);  
995    
996      return(0);                          total2 += dbytes2;
997                    }
998  }  }
999    
1000            rc->curve_comp_scale = total1 / total2;
1001    
1002            DPRINTF(XVID_DEBUG_RC, "middle frame size for asymmetric curve compression: pframe%d bframe:%d\n",
1003                            (int)(rc->avg_length[XVID_TYPE_PVOP-1] * rc->curve_comp_scale),
1004                            (int)(rc->avg_length[XVID_TYPE_BVOP-1] * rc->curve_comp_scale));
1005    
1006  int xvid_plugin_2pass2(void * handle, int opt, void * param1, void * param2)          rc->overflow = 0;
1007  {          rc->KFoverflow = 0;
1008      switch(opt)          rc->KFoverflow_partial = 0;
1009      {          rc->KF_idx = 1;
     case XVID_PLG_INFO :  
         return 0;  
   
     case XVID_PLG_CREATE :  
         return rc_2pass2_create((xvid_plg_create_t*)param1, param2);  
   
     case XVID_PLG_DESTROY :  
         return rc_2pass2_destroy((rc_2pass2_t*)handle, (xvid_plg_destroy_t*)param1);  
   
     case XVID_PLG_BEFORE :  
         return rc_2pass2_before((rc_2pass2_t*)handle, (xvid_plg_data_t*)param1);  
   
     case XVID_PLG_AFTER :  
         return rc_2pass2_after((rc_2pass2_t*)handle, (xvid_plg_data_t*)param1);  
     }  
   
     return XVID_ERR_FAIL;  
1010  }  }
Legend:
Removed from v.1014  
changed lines
  Added in v.1161
No admin address has been configured
 ViewVC Help
Powered by ViewVC 1.0.4