]> git.sesse.net Git - x264/blob - encoder/encoder.c
remove a division in macroblock-level bookkeeping
[x264] / encoder / encoder.c
1 /*****************************************************************************
2  * x264: h264 encoder
3  *****************************************************************************
4  * Copyright (C) 2003 Laurent Aimar
5  * $Id: encoder.c,v 1.1 2004/06/03 19:27:08 fenrir Exp $
6  *
7  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111, USA.
22  *****************************************************************************/
23
24 #include <math.h>
25
26 #include "common/common.h"
27 #include "common/cpu.h"
28
29 #include "set.h"
30 #include "analyse.h"
31 #include "ratecontrol.h"
32 #include "macroblock.h"
33
34 #if VISUALIZE
35 #include "common/visualize.h"
36 #endif
37
38 //#define DEBUG_MB_TYPE
39 //#define DEBUG_DUMP_FRAME
40 //#define DEBUG_BENCHMARK
41
42 #ifdef DEBUG_BENCHMARK
43 static int64_t i_mtime_encode_frame = 0;
44 static int64_t i_mtime_analyse = 0;
45 static int64_t i_mtime_encode = 0;
46 static int64_t i_mtime_write = 0;
47 static int64_t i_mtime_filter = 0;
48 #define TIMER_START( d ) \
49     { \
50         int64_t d##start = x264_mdate();
51
52 #define TIMER_STOP( d ) \
53         d += x264_mdate() - d##start;\
54     }
55 #else
56 #define TIMER_START( d )
57 #define TIMER_STOP( d )
58 #endif
59
60 #define NALU_OVERHEAD 5 // startcode + NAL type costs 5 bytes per frame
61
62 static void x264_encoder_frame_end( x264_t *h, x264_t *thread_current,
63                                     x264_nal_t **pp_nal, int *pi_nal,
64                                     x264_picture_t *pic_out );
65
66 /****************************************************************************
67  *
68  ******************************* x264 libs **********************************
69  *
70  ****************************************************************************/
71 static float x264_psnr( int64_t i_sqe, int64_t i_size )
72 {
73     double f_mse = (double)i_sqe / ((double)65025.0 * (double)i_size);
74     if( f_mse <= 0.0000000001 ) /* Max 100dB */
75         return 100;
76
77     return (float)(-10.0 * log( f_mse ) / log( 10.0 ));
78 }
79
80 #ifdef DEBUG_DUMP_FRAME
81 static void x264_frame_dump( x264_t *h, x264_frame_t *fr, char *name )
82 {
83     FILE *f = fopen( name, "r+b" );
84     int i, y;
85     if( !f )
86         return;
87
88     /* Write the frame in display order */
89     fseek( f, fr->i_frame * h->param.i_height * h->param.i_width * 3 / 2, SEEK_SET );
90
91     for( i = 0; i < fr->i_plane; i++ )
92     {
93         for( y = 0; y < h->param.i_height / ( i == 0 ? 1 : 2 ); y++ )
94         {
95             fwrite( &fr->plane[i][y*fr->i_stride[i]], 1, h->param.i_width / ( i == 0 ? 1 : 2 ), f );
96         }
97     }
98     fclose( f );
99 }
100 #endif
101
102
103 /* Fill "default" values */
104 static void x264_slice_header_init( x264_t *h, x264_slice_header_t *sh,
105                                     x264_sps_t *sps, x264_pps_t *pps,
106                                     int i_idr_pic_id, int i_frame, int i_qp )
107 {
108     x264_param_t *param = &h->param;
109     int i;
110
111     /* First we fill all field */
112     sh->sps = sps;
113     sh->pps = pps;
114
115     sh->i_first_mb  = 0;
116     sh->i_last_mb   = h->sps->i_mb_width * h->sps->i_mb_height;
117     sh->i_pps_id    = pps->i_id;
118
119     sh->i_frame_num = i_frame;
120
121     sh->b_mbaff = h->param.b_interlaced;
122     sh->b_field_pic = 0;    /* no field support for now */
123     sh->b_bottom_field = 0; /* not yet used */
124
125     sh->i_idr_pic_id = i_idr_pic_id;
126
127     /* poc stuff, fixed later */
128     sh->i_poc_lsb = 0;
129     sh->i_delta_poc_bottom = 0;
130     sh->i_delta_poc[0] = 0;
131     sh->i_delta_poc[1] = 0;
132
133     sh->i_redundant_pic_cnt = 0;
134
135     if( !h->mb.b_direct_auto_read )
136     {
137         if( h->mb.b_direct_auto_write )
138             sh->b_direct_spatial_mv_pred = ( h->stat.i_direct_score[1] > h->stat.i_direct_score[0] );
139         else
140             sh->b_direct_spatial_mv_pred = ( param->analyse.i_direct_mv_pred == X264_DIRECT_PRED_SPATIAL );
141     }
142     /* else b_direct_spatial_mv_pred was read from the 2pass statsfile */
143
144     sh->b_num_ref_idx_override = 0;
145     sh->i_num_ref_idx_l0_active = 1;
146     sh->i_num_ref_idx_l1_active = 1;
147
148     sh->b_ref_pic_list_reordering_l0 = h->b_ref_reorder[0];
149     sh->b_ref_pic_list_reordering_l1 = h->b_ref_reorder[1];
150
151     /* If the ref list isn't in the default order, construct reordering header */
152     /* List1 reordering isn't needed yet */
153     if( sh->b_ref_pic_list_reordering_l0 )
154     {
155         int pred_frame_num = i_frame;
156         for( i = 0; i < h->i_ref0; i++ )
157         {
158             int diff = h->fref0[i]->i_frame_num - pred_frame_num;
159             if( diff == 0 )
160                 x264_log( h, X264_LOG_ERROR, "diff frame num == 0\n" );
161             sh->ref_pic_list_order[0][i].idc = ( diff > 0 );
162             sh->ref_pic_list_order[0][i].arg = abs( diff ) - 1;
163             pred_frame_num = h->fref0[i]->i_frame_num;
164         }
165     }
166
167     sh->i_cabac_init_idc = param->i_cabac_init_idc;
168
169     sh->i_qp = i_qp;
170     sh->i_qp_delta = i_qp - pps->i_pic_init_qp;
171     sh->b_sp_for_swidth = 0;
172     sh->i_qs_delta = 0;
173
174     /* If effective qp <= 15, deblocking would have no effect anyway */
175     if( param->b_deblocking_filter
176         && ( h->mb.b_variable_qp
177         || 15 < i_qp + 2 * X264_MAX(param->i_deblocking_filter_alphac0, param->i_deblocking_filter_beta) ) )
178     {
179         sh->i_disable_deblocking_filter_idc = 0;
180     }
181     else
182     {
183         sh->i_disable_deblocking_filter_idc = 1;
184     }
185     sh->i_alpha_c0_offset = param->i_deblocking_filter_alphac0 << 1;
186     sh->i_beta_offset = param->i_deblocking_filter_beta << 1;
187 }
188
189 static void x264_slice_header_write( bs_t *s, x264_slice_header_t *sh, int i_nal_ref_idc )
190 {
191     int i;
192
193     if( sh->b_mbaff )
194     {
195         assert( sh->i_first_mb % (2*sh->sps->i_mb_width) == 0 );
196         bs_write_ue( s, sh->i_first_mb >> 1 );
197     }
198     else
199         bs_write_ue( s, sh->i_first_mb );
200
201     bs_write_ue( s, sh->i_type + 5 );   /* same type things */
202     bs_write_ue( s, sh->i_pps_id );
203     bs_write( s, sh->sps->i_log2_max_frame_num, sh->i_frame_num );
204
205     if( !sh->sps->b_frame_mbs_only )
206     {
207         bs_write1( s, sh->b_field_pic );
208         if ( sh->b_field_pic )
209             bs_write1( s, sh->b_bottom_field );
210     }
211
212     if( sh->i_idr_pic_id >= 0 ) /* NAL IDR */
213     {
214         bs_write_ue( s, sh->i_idr_pic_id );
215     }
216
217     if( sh->sps->i_poc_type == 0 )
218     {
219         bs_write( s, sh->sps->i_log2_max_poc_lsb, sh->i_poc_lsb );
220         if( sh->pps->b_pic_order && !sh->b_field_pic )
221         {
222             bs_write_se( s, sh->i_delta_poc_bottom );
223         }
224     }
225     else if( sh->sps->i_poc_type == 1 && !sh->sps->b_delta_pic_order_always_zero )
226     {
227         bs_write_se( s, sh->i_delta_poc[0] );
228         if( sh->pps->b_pic_order && !sh->b_field_pic )
229         {
230             bs_write_se( s, sh->i_delta_poc[1] );
231         }
232     }
233
234     if( sh->pps->b_redundant_pic_cnt )
235     {
236         bs_write_ue( s, sh->i_redundant_pic_cnt );
237     }
238
239     if( sh->i_type == SLICE_TYPE_B )
240     {
241         bs_write1( s, sh->b_direct_spatial_mv_pred );
242     }
243     if( sh->i_type == SLICE_TYPE_P || sh->i_type == SLICE_TYPE_SP || sh->i_type == SLICE_TYPE_B )
244     {
245         bs_write1( s, sh->b_num_ref_idx_override );
246         if( sh->b_num_ref_idx_override )
247         {
248             bs_write_ue( s, sh->i_num_ref_idx_l0_active - 1 );
249             if( sh->i_type == SLICE_TYPE_B )
250             {
251                 bs_write_ue( s, sh->i_num_ref_idx_l1_active - 1 );
252             }
253         }
254     }
255
256     /* ref pic list reordering */
257     if( sh->i_type != SLICE_TYPE_I )
258     {
259         bs_write1( s, sh->b_ref_pic_list_reordering_l0 );
260         if( sh->b_ref_pic_list_reordering_l0 )
261         {
262             for( i = 0; i < sh->i_num_ref_idx_l0_active; i++ )
263             {
264                 bs_write_ue( s, sh->ref_pic_list_order[0][i].idc );
265                 bs_write_ue( s, sh->ref_pic_list_order[0][i].arg );
266                         
267             }
268             bs_write_ue( s, 3 );
269         }
270     }
271     if( sh->i_type == SLICE_TYPE_B )
272     {
273         bs_write1( s, sh->b_ref_pic_list_reordering_l1 );
274         if( sh->b_ref_pic_list_reordering_l1 )
275         {
276             for( i = 0; i < sh->i_num_ref_idx_l1_active; i++ )
277             {
278                 bs_write_ue( s, sh->ref_pic_list_order[1][i].idc );
279                 bs_write_ue( s, sh->ref_pic_list_order[1][i].arg );
280             }
281             bs_write_ue( s, 3 );
282         }
283     }
284
285     if( ( sh->pps->b_weighted_pred && ( sh->i_type == SLICE_TYPE_P || sh->i_type == SLICE_TYPE_SP ) ) ||
286         ( sh->pps->b_weighted_bipred == 1 && sh->i_type == SLICE_TYPE_B ) )
287     {
288         /* FIXME */
289     }
290
291     if( i_nal_ref_idc != 0 )
292     {
293         if( sh->i_idr_pic_id >= 0 )
294         {
295             bs_write1( s, 0 );  /* no output of prior pics flag */
296             bs_write1( s, 0 );  /* long term reference flag */
297         }
298         else
299         {
300             bs_write1( s, 0 );  /* adaptive_ref_pic_marking_mode_flag */
301         }
302     }
303
304     if( sh->pps->b_cabac && sh->i_type != SLICE_TYPE_I )
305     {
306         bs_write_ue( s, sh->i_cabac_init_idc );
307     }
308     bs_write_se( s, sh->i_qp_delta );      /* slice qp delta */
309
310     if( sh->pps->b_deblocking_filter_control )
311     {
312         bs_write_ue( s, sh->i_disable_deblocking_filter_idc );
313         if( sh->i_disable_deblocking_filter_idc != 1 )
314         {
315             bs_write_se( s, sh->i_alpha_c0_offset >> 1 );
316             bs_write_se( s, sh->i_beta_offset >> 1 );
317         }
318     }
319 }
320
321 /****************************************************************************
322  *
323  ****************************************************************************
324  ****************************** External API*********************************
325  ****************************************************************************
326  *
327  ****************************************************************************/
328
329 static int x264_validate_parameters( x264_t *h )
330 {
331     if( h->param.i_width <= 0 || h->param.i_height <= 0 )
332     {
333         x264_log( h, X264_LOG_ERROR, "invalid width x height (%dx%d)\n",
334                   h->param.i_width, h->param.i_height );
335         return -1;
336     }
337
338     if( h->param.i_width % 2 || h->param.i_height % 2 )
339     {
340         x264_log( h, X264_LOG_ERROR, "width or height not divisible by 2 (%dx%d)\n",
341                   h->param.i_width, h->param.i_height );
342         return -1;
343     }
344     if( h->param.i_csp != X264_CSP_I420 )
345     {
346         x264_log( h, X264_LOG_ERROR, "invalid CSP (only I420 supported)\n" );
347         return -1;
348     }
349
350     if( h->param.i_threads == 0 )
351         h->param.i_threads = x264_cpu_num_processors() * 3/2;
352     h->param.i_threads = x264_clip3( h->param.i_threads, 1, X264_THREAD_MAX );
353     if( h->param.i_threads > 1 )
354     {
355 #ifndef HAVE_PTHREAD
356         x264_log( h, X264_LOG_WARNING, "not compiled with pthread support!\n");
357         h->param.i_threads = 1;
358 #else
359         if( h->param.i_scenecut_threshold >= 0 )
360             h->param.b_pre_scenecut = 1;
361 #endif
362     }
363
364     if( h->param.b_interlaced )
365     {
366         if( h->param.analyse.i_me_method >= X264_ME_ESA )
367         {
368             x264_log( h, X264_LOG_WARNING, "interlace + me=esa is not implemented\n" );
369             h->param.analyse.i_me_method = X264_ME_UMH;
370         }
371         if( h->param.analyse.i_direct_mv_pred > X264_DIRECT_PRED_SPATIAL )
372         {
373             x264_log( h, X264_LOG_WARNING, "interlace + direct=temporal is not implemented\n" );
374             h->param.analyse.i_direct_mv_pred = X264_DIRECT_PRED_SPATIAL;
375         }
376     }
377
378     if( h->param.rc.i_rc_method < 0 || h->param.rc.i_rc_method > 2 )
379     {
380         x264_log( h, X264_LOG_ERROR, "no ratecontrol method specified\n" );
381         return -1;
382     }
383     h->param.rc.f_rf_constant = x264_clip3f( h->param.rc.f_rf_constant, 0, 51 );
384     h->param.rc.i_qp_constant = x264_clip3( h->param.rc.i_qp_constant, 0, 51 );
385     if( h->param.rc.i_rc_method == X264_RC_CRF )
386         h->param.rc.i_qp_constant = h->param.rc.f_rf_constant;
387     if( (h->param.rc.i_rc_method == X264_RC_CQP || h->param.rc.i_rc_method == X264_RC_CRF)
388         && h->param.rc.i_qp_constant == 0 )
389     {
390         h->mb.b_lossless = 1;
391         h->param.i_cqm_preset = X264_CQM_FLAT;
392         h->param.psz_cqm_file = NULL;
393         h->param.rc.i_rc_method = X264_RC_CQP;
394         h->param.rc.f_ip_factor = 1;
395         h->param.rc.f_pb_factor = 1;
396         h->param.analyse.b_transform_8x8 = 0;
397         h->param.analyse.b_psnr = 0;
398         h->param.analyse.b_ssim = 0;
399         h->param.analyse.i_chroma_qp_offset = 0;
400         h->param.analyse.i_trellis = 0;
401         h->param.analyse.b_fast_pskip = 0;
402         h->param.analyse.i_noise_reduction = 0;
403         h->param.analyse.i_subpel_refine = x264_clip3( h->param.analyse.i_subpel_refine, 1, 6 );
404         h->param.rc.i_aq_mode = 0;
405     }
406     if( h->param.rc.i_rc_method == X264_RC_CQP )
407     {
408         float qp_p = h->param.rc.i_qp_constant;
409         float qp_i = qp_p - 6*log(h->param.rc.f_ip_factor)/log(2);
410         float qp_b = qp_p + 6*log(h->param.rc.f_pb_factor)/log(2);
411         h->param.rc.i_qp_min = x264_clip3( (int)(X264_MIN3( qp_p, qp_i, qp_b )), 0, 51 );
412         h->param.rc.i_qp_max = x264_clip3( (int)(X264_MAX3( qp_p, qp_i, qp_b ) + .999), 0, 51 );
413     }
414
415     if( ( h->param.i_width % 16 || h->param.i_height % 16 )
416         && h->param.i_height != 1080 && !h->mb.b_lossless )
417     {
418         // There's nothing special about 1080 in that the warning still applies to it,
419         // but chances are the user can't help it if his content is already 1080p,
420         // so there's no point in warning in that case.
421         x264_log( h, X264_LOG_WARNING, 
422                   "width or height not divisible by 16 (%dx%d), compression will suffer.\n",
423                   h->param.i_width, h->param.i_height );
424     }
425
426     h->param.i_frame_reference = x264_clip3( h->param.i_frame_reference, 1, 16 );
427     if( h->param.i_keyint_max <= 0 )
428         h->param.i_keyint_max = 1;
429     h->param.i_keyint_min = x264_clip3( h->param.i_keyint_min, 1, h->param.i_keyint_max/2+1 );
430
431     h->param.i_bframe = x264_clip3( h->param.i_bframe, 0, X264_BFRAME_MAX );
432     h->param.i_bframe_bias = x264_clip3( h->param.i_bframe_bias, -90, 100 );
433     h->param.b_bframe_pyramid = h->param.b_bframe_pyramid && h->param.i_bframe > 1;
434     h->param.b_bframe_adaptive = h->param.b_bframe_adaptive && h->param.i_bframe > 0;
435     h->param.analyse.b_weighted_bipred = h->param.analyse.b_weighted_bipred && h->param.i_bframe > 0;
436     h->mb.b_direct_auto_write = h->param.analyse.i_direct_mv_pred == X264_DIRECT_PRED_AUTO
437                                 && h->param.i_bframe
438                                 && ( h->param.rc.b_stat_write || !h->param.rc.b_stat_read );
439     if( h->param.i_scenecut_threshold < 0 )
440         h->param.b_pre_scenecut = 0;
441
442     h->param.i_deblocking_filter_alphac0 = x264_clip3( h->param.i_deblocking_filter_alphac0, -6, 6 );
443     h->param.i_deblocking_filter_beta    = x264_clip3( h->param.i_deblocking_filter_beta, -6, 6 );
444     h->param.analyse.i_luma_deadzone[0] = x264_clip3( h->param.analyse.i_luma_deadzone[0], 0, 32 );
445     h->param.analyse.i_luma_deadzone[1] = x264_clip3( h->param.analyse.i_luma_deadzone[1], 0, 32 );
446
447     h->param.i_cabac_init_idc = x264_clip3( h->param.i_cabac_init_idc, 0, 2 );
448
449     if( h->param.i_cqm_preset < X264_CQM_FLAT || h->param.i_cqm_preset > X264_CQM_CUSTOM )
450         h->param.i_cqm_preset = X264_CQM_FLAT;
451
452     if( h->param.analyse.i_me_method < X264_ME_DIA ||
453         h->param.analyse.i_me_method > X264_ME_TESA )
454         h->param.analyse.i_me_method = X264_ME_HEX;
455     if( h->param.analyse.i_me_range < 4 )
456         h->param.analyse.i_me_range = 4;
457     if( h->param.analyse.i_me_range > 16 && h->param.analyse.i_me_method <= X264_ME_HEX )
458         h->param.analyse.i_me_range = 16;
459     if( h->param.analyse.i_me_method == X264_ME_TESA &&
460         (h->mb.b_lossless || h->param.analyse.i_subpel_refine <= 1) )
461         h->param.analyse.i_me_method = X264_ME_ESA;
462     h->param.analyse.i_subpel_refine = x264_clip3( h->param.analyse.i_subpel_refine, 1, 7 );
463     h->param.analyse.b_bframe_rdo = h->param.analyse.b_bframe_rdo && h->param.analyse.i_subpel_refine >= 6;
464     h->param.analyse.b_mixed_references = h->param.analyse.b_mixed_references && h->param.i_frame_reference > 1;
465     h->param.analyse.inter &= X264_ANALYSE_PSUB16x16|X264_ANALYSE_PSUB8x8|X264_ANALYSE_BSUB16x16|
466                               X264_ANALYSE_I4x4|X264_ANALYSE_I8x8;
467     h->param.analyse.intra &= X264_ANALYSE_I4x4|X264_ANALYSE_I8x8;
468     if( !(h->param.analyse.inter & X264_ANALYSE_PSUB16x16) )
469         h->param.analyse.inter &= ~X264_ANALYSE_PSUB8x8;
470     if( !h->param.analyse.b_transform_8x8 )
471     {
472         h->param.analyse.inter &= ~X264_ANALYSE_I8x8;
473         h->param.analyse.intra &= ~X264_ANALYSE_I8x8;
474     }
475     h->param.analyse.i_chroma_qp_offset = x264_clip3(h->param.analyse.i_chroma_qp_offset, -12, 12);
476     if( !h->param.b_cabac )
477         h->param.analyse.i_trellis = 0;
478     h->param.analyse.i_trellis = x264_clip3( h->param.analyse.i_trellis, 0, 2 );
479     h->param.rc.i_aq_mode = x264_clip3( h->param.rc.i_aq_mode, 0, 2 );
480     if( h->param.rc.f_aq_strength <= 0 )
481         h->param.rc.i_aq_mode = 0;
482     /* VAQ effectively replaces qcomp, so qcomp is raised towards 1 to compensate. */
483     if( h->param.rc.i_aq_mode == X264_AQ_GLOBAL )
484         h->param.rc.f_qcompress = x264_clip3f(h->param.rc.f_qcompress + h->param.rc.f_aq_strength / 0.7, 0, 1);
485     h->param.analyse.i_noise_reduction = x264_clip3( h->param.analyse.i_noise_reduction, 0, 1<<16 );
486
487     {
488         const x264_level_t *l = x264_levels;
489         while( l->level_idc != 0 && l->level_idc != h->param.i_level_idc )
490             l++;
491         if( l->level_idc == 0 )
492         {
493             x264_log( h, X264_LOG_ERROR, "invalid level_idc: %d\n", h->param.i_level_idc );
494             return -1;
495         }
496         if( h->param.analyse.i_mv_range <= 0 )
497             h->param.analyse.i_mv_range = l->mv_range;
498         else
499             h->param.analyse.i_mv_range = x264_clip3(h->param.analyse.i_mv_range, 32, 512);
500         if( h->param.analyse.i_direct_8x8_inference < 0 )
501             h->param.analyse.i_direct_8x8_inference = l->direct8x8;
502     }
503
504     if( h->param.i_threads > 1 )
505     {
506         int r = h->param.analyse.i_mv_range_thread;
507         int r2;
508         if( r <= 0 )
509         {
510             // half of the available space is reserved and divided evenly among the threads,
511             // the rest is allocated to whichever thread is far enough ahead to use it.
512             // reserving more space increases quality for some videos, but costs more time
513             // in thread synchronization.
514             int max_range = (h->param.i_height + X264_THREAD_HEIGHT) / h->param.i_threads - X264_THREAD_HEIGHT;
515             r = max_range / 2;
516         }
517         r = X264_MAX( r, h->param.analyse.i_me_range );
518         r = X264_MIN( r, h->param.analyse.i_mv_range );
519         // round up to use the whole mb row
520         r2 = (r & ~15) + ((-X264_THREAD_HEIGHT) & 15);
521         if( r2 < r )
522             r2 += 16;
523         x264_log( h, X264_LOG_DEBUG, "using mv_range_thread = %d\n", r2 );
524         h->param.analyse.i_mv_range_thread = r2;
525     }
526
527     if( h->param.rc.f_qblur < 0 )
528         h->param.rc.f_qblur = 0;
529     if( h->param.rc.f_complexity_blur < 0 )
530         h->param.rc.f_complexity_blur = 0;
531
532     h->param.i_sps_id &= 31;
533
534     if( h->param.i_log_level < X264_LOG_INFO )
535     {
536         h->param.analyse.b_psnr = 0;
537         h->param.analyse.b_ssim = 0;
538     }
539
540     /* ensure the booleans are 0 or 1 so they can be used in math */
541 #define BOOLIFY(x) h->param.x = !!h->param.x
542     BOOLIFY( b_cabac );
543     BOOLIFY( b_deblocking_filter );
544     BOOLIFY( b_interlaced );
545     BOOLIFY( analyse.b_transform_8x8 );
546     BOOLIFY( analyse.i_direct_8x8_inference );
547     BOOLIFY( analyse.b_bidir_me );
548     BOOLIFY( analyse.b_chroma_me );
549     BOOLIFY( analyse.b_fast_pskip );
550     BOOLIFY( rc.b_stat_write );
551     BOOLIFY( rc.b_stat_read );
552 #undef BOOLIFY
553
554     return 0;
555 }
556
557 static void mbcmp_init( x264_t *h )
558 {
559     int satd = !h->mb.b_lossless && h->param.analyse.i_subpel_refine > 1;
560     memcpy( h->pixf.mbcmp, satd ? h->pixf.satd : h->pixf.sad, sizeof(h->pixf.mbcmp) );
561     satd &= h->param.analyse.i_me_method == X264_ME_TESA;
562     memcpy( h->pixf.fpelcmp, satd ? h->pixf.satd : h->pixf.sad, sizeof(h->pixf.fpelcmp) );
563     memcpy( h->pixf.fpelcmp_x3, satd ? h->pixf.satd_x3 : h->pixf.sad_x3, sizeof(h->pixf.fpelcmp_x3) );
564     memcpy( h->pixf.fpelcmp_x4, satd ? h->pixf.satd_x4 : h->pixf.sad_x4, sizeof(h->pixf.fpelcmp_x4) );
565 }
566
567 /****************************************************************************
568  * x264_encoder_open:
569  ****************************************************************************/
570 x264_t *x264_encoder_open   ( x264_param_t *param )
571 {
572     x264_t *h = x264_malloc( sizeof( x264_t ) );
573     char buf[1000], *p;
574     int i;
575
576     memset( h, 0, sizeof( x264_t ) );
577
578     /* Create a copy of param */
579     memcpy( &h->param, param, sizeof( x264_param_t ) );
580
581     if( x264_validate_parameters( h ) < 0 )
582     {
583         x264_free( h );
584         return NULL;
585     }
586
587     if( h->param.psz_cqm_file )
588         if( x264_cqm_parse_file( h, h->param.psz_cqm_file ) < 0 )
589         {
590             x264_free( h );
591             return NULL;
592         }
593
594     if( h->param.rc.psz_stat_out )
595         h->param.rc.psz_stat_out = strdup( h->param.rc.psz_stat_out );
596     if( h->param.rc.psz_stat_in )
597         h->param.rc.psz_stat_in = strdup( h->param.rc.psz_stat_in );
598     if( h->param.rc.psz_rc_eq )
599         h->param.rc.psz_rc_eq = strdup( h->param.rc.psz_rc_eq );
600
601     /* VUI */
602     if( h->param.vui.i_sar_width > 0 && h->param.vui.i_sar_height > 0 )
603     {
604         int i_w = param->vui.i_sar_width;
605         int i_h = param->vui.i_sar_height;
606
607         x264_reduce_fraction( &i_w, &i_h );
608
609         while( i_w > 65535 || i_h > 65535 )
610         {
611             i_w /= 2;
612             i_h /= 2;
613         }
614
615         h->param.vui.i_sar_width = 0;
616         h->param.vui.i_sar_height = 0;
617         if( i_w == 0 || i_h == 0 )
618         {
619             x264_log( h, X264_LOG_WARNING, "cannot create valid sample aspect ratio\n" );
620         }
621         else
622         {
623             x264_log( h, X264_LOG_INFO, "using SAR=%d/%d\n", i_w, i_h );
624             h->param.vui.i_sar_width = i_w;
625             h->param.vui.i_sar_height = i_h;
626         }
627     }
628
629     x264_reduce_fraction( &h->param.i_fps_num, &h->param.i_fps_den );
630
631     /* Init x264_t */
632     h->i_frame = 0;
633     h->i_frame_num = 0;
634     h->i_idr_pic_id = 0;
635
636     h->sps = &h->sps_array[0];
637     x264_sps_init( h->sps, h->param.i_sps_id, &h->param );
638
639     h->pps = &h->pps_array[0];
640     x264_pps_init( h->pps, h->param.i_sps_id, &h->param, h->sps);
641
642     x264_validate_levels( h );
643
644     if( x264_cqm_init( h ) < 0 )
645     {
646         x264_free( h );
647         return NULL;
648     }
649     
650     h->mb.i_mb_count = h->sps->i_mb_width * h->sps->i_mb_height;
651
652     /* Init frames. */
653     h->frames.i_delay = h->param.i_bframe + h->param.i_threads - 1;
654     h->frames.i_max_ref0 = h->param.i_frame_reference;
655     h->frames.i_max_ref1 = h->sps->vui.i_num_reorder_frames;
656     h->frames.i_max_dpb  = h->sps->vui.i_max_dec_frame_buffering;
657     h->frames.b_have_lowres = !h->param.rc.b_stat_read
658         && ( h->param.rc.i_rc_method == X264_RC_ABR
659           || h->param.rc.i_rc_method == X264_RC_CRF
660           || h->param.b_bframe_adaptive
661           || h->param.b_pre_scenecut );
662
663     h->frames.i_last_idr = - h->param.i_keyint_max;
664     h->frames.i_input    = 0;
665     h->frames.last_nonb  = NULL;
666
667     h->i_ref0 = 0;
668     h->i_ref1 = 0;
669
670     x264_rdo_init( );
671
672     /* init CPU functions */
673     x264_predict_16x16_init( h->param.cpu, h->predict_16x16 );
674     x264_predict_8x8c_init( h->param.cpu, h->predict_8x8c );
675     x264_predict_8x8_init( h->param.cpu, h->predict_8x8 );
676     x264_predict_4x4_init( h->param.cpu, h->predict_4x4 );
677
678     x264_pixel_init( h->param.cpu, &h->pixf );
679     x264_dct_init( h->param.cpu, &h->dctf );
680     x264_zigzag_init( h->param.cpu, &h->zigzagf, h->param.b_interlaced );
681     x264_mc_init( h->param.cpu, &h->mc );
682     x264_quant_init( h, h->param.cpu, &h->quantf );
683     x264_deblock_init( h->param.cpu, &h->loopf );
684     x264_dct_init_weights();
685
686     mbcmp_init( h );
687
688     p = buf + sprintf( buf, "using cpu capabilities:" );
689     for( i=0; x264_cpu_names[i].flags; i++ )
690         if( (param->cpu & x264_cpu_names[i].flags) == x264_cpu_names[i].flags
691             && (!i || x264_cpu_names[i].flags != x264_cpu_names[i-1].flags) )
692             p += sprintf( p, " %s", x264_cpu_names[i].name );
693     if( !param->cpu )
694         p += sprintf( p, " none!" );
695     x264_log( h, X264_LOG_INFO, "%s\n", buf );
696
697     h->out.i_nal = 0;
698     h->out.i_bitstream = X264_MAX( 1000000, h->param.i_width * h->param.i_height * 4
699         * ( h->param.rc.i_rc_method == X264_RC_ABR ? pow( 0.95, h->param.rc.i_qp_min )
700           : pow( 0.95, h->param.rc.i_qp_constant ) * X264_MAX( 1, h->param.rc.f_ip_factor )));
701
702     h->thread[0] = h;
703     h->i_thread_num = 0;
704     for( i = 1; i < h->param.i_threads; i++ )
705         h->thread[i] = x264_malloc( sizeof(x264_t) );
706
707     for( i = 0; i < h->param.i_threads; i++ )
708     {
709         if( i > 0 )
710             *h->thread[i] = *h;
711         h->thread[i]->fdec = x264_frame_pop_unused( h );
712         h->thread[i]->out.p_bitstream = x264_malloc( h->out.i_bitstream );
713         if( x264_macroblock_cache_init( h->thread[i] ) < 0 )
714             return NULL;
715     }
716
717     if( x264_ratecontrol_new( h ) < 0 )
718         return NULL;
719
720 #ifdef DEBUG_DUMP_FRAME
721     {
722         /* create or truncate the reconstructed video file */
723         FILE *f = fopen( "fdec.yuv", "w" );
724         if( f )
725             fclose( f );
726         else
727         {
728             x264_log( h, X264_LOG_ERROR, "can't write to fdec.yuv\n" );
729             x264_free( h );
730             return NULL;
731         }
732     }
733 #endif
734
735     return h;
736 }
737
738 /****************************************************************************
739  * x264_encoder_reconfig:
740  ****************************************************************************/
741 int x264_encoder_reconfig( x264_t *h, x264_param_t *param )
742 {
743 #define COPY(var) h->param.var = param->var
744     COPY( i_frame_reference ); // but never uses more refs than initially specified
745     COPY( i_bframe_bias );
746     if( h->param.i_scenecut_threshold >= 0 && param->i_scenecut_threshold >= 0 )
747         COPY( i_scenecut_threshold ); // can't turn it on or off, only vary the threshold
748     COPY( b_deblocking_filter );
749     COPY( i_deblocking_filter_alphac0 );
750     COPY( i_deblocking_filter_beta );
751     COPY( analyse.intra );
752     COPY( analyse.inter );
753     COPY( analyse.i_direct_mv_pred );
754     COPY( analyse.i_me_method );
755     COPY( analyse.i_me_range );
756     COPY( analyse.i_noise_reduction );
757     COPY( analyse.i_subpel_refine );
758     COPY( analyse.i_trellis );
759     COPY( analyse.b_bidir_me );
760     COPY( analyse.b_bframe_rdo );
761     COPY( analyse.b_chroma_me );
762     COPY( analyse.b_dct_decimate );
763     COPY( analyse.b_fast_pskip );
764     COPY( analyse.b_mixed_references );
765     // can only twiddle these if they were enabled to begin with:
766     if( h->pps->b_transform_8x8_mode )
767         COPY( analyse.b_transform_8x8 );
768     if( h->frames.i_max_ref1 > 1 )
769         COPY( b_bframe_pyramid );
770 #undef COPY
771
772     mbcmp_init( h );
773
774     return x264_validate_parameters( h );
775 }
776
777 /* internal usage */
778 static void x264_nal_start( x264_t *h, int i_type, int i_ref_idc )
779 {
780     x264_nal_t *nal = &h->out.nal[h->out.i_nal];
781
782     nal->i_ref_idc = i_ref_idc;
783     nal->i_type    = i_type;
784
785     nal->i_payload= 0;
786     nal->p_payload= &h->out.p_bitstream[bs_pos( &h->out.bs ) / 8];
787 }
788 static void x264_nal_end( x264_t *h )
789 {
790     x264_nal_t *nal = &h->out.nal[h->out.i_nal];
791     nal->i_payload = &h->out.p_bitstream[bs_pos( &h->out.bs ) / 8] - nal->p_payload;
792     h->out.i_nal++;
793 }
794
795 /****************************************************************************
796  * x264_encoder_headers:
797  ****************************************************************************/
798 int x264_encoder_headers( x264_t *h, x264_nal_t **pp_nal, int *pi_nal )
799 {
800     /* init bitstream context */
801     h->out.i_nal = 0;
802     bs_init( &h->out.bs, h->out.p_bitstream, h->out.i_bitstream );
803
804     /* Put SPS and PPS */
805     if( h->i_frame == 0 )
806     {
807         /* identify ourself */
808         x264_nal_start( h, NAL_SEI, NAL_PRIORITY_DISPOSABLE );
809         x264_sei_version_write( h, &h->out.bs );
810         x264_nal_end( h );
811
812         /* generate sequence parameters */
813         x264_nal_start( h, NAL_SPS, NAL_PRIORITY_HIGHEST );
814         x264_sps_write( &h->out.bs, h->sps );
815         x264_nal_end( h );
816
817         /* generate picture parameters */
818         x264_nal_start( h, NAL_PPS, NAL_PRIORITY_HIGHEST );
819         x264_pps_write( &h->out.bs, h->pps );
820         x264_nal_end( h );
821     }
822     /* now set output*/
823     *pi_nal = h->out.i_nal;
824     *pp_nal = &h->out.nal[0];
825     h->out.i_nal = 0;
826
827     return 0;
828 }
829
830 static inline void x264_reference_build_list( x264_t *h, int i_poc )
831 {
832     int i;
833     int b_ok;
834
835     /* build ref list 0/1 */
836     h->i_ref0 = 0;
837     h->i_ref1 = 0;
838     for( i = 0; h->frames.reference[i]; i++ )
839     {
840         if( h->frames.reference[i]->i_poc < i_poc )
841         {
842             h->fref0[h->i_ref0++] = h->frames.reference[i];
843         }
844         else if( h->frames.reference[i]->i_poc > i_poc )
845         {
846             h->fref1[h->i_ref1++] = h->frames.reference[i];
847         }
848     }
849
850     /* Order ref0 from higher to lower poc */
851     do
852     {
853         b_ok = 1;
854         for( i = 0; i < h->i_ref0 - 1; i++ )
855         {
856             if( h->fref0[i]->i_poc < h->fref0[i+1]->i_poc )
857             {
858                 XCHG( x264_frame_t*, h->fref0[i], h->fref0[i+1] );
859                 b_ok = 0;
860                 break;
861             }
862         }
863     } while( !b_ok );
864     /* Order ref1 from lower to higher poc (bubble sort) for B-frame */
865     do
866     {
867         b_ok = 1;
868         for( i = 0; i < h->i_ref1 - 1; i++ )
869         {
870             if( h->fref1[i]->i_poc > h->fref1[i+1]->i_poc )
871             {
872                 XCHG( x264_frame_t*, h->fref1[i], h->fref1[i+1] );
873                 b_ok = 0;
874                 break;
875             }
876         }
877     } while( !b_ok );
878
879     /* In the standard, a P-frame's ref list is sorted by frame_num.
880      * We use POC, but check whether explicit reordering is needed */
881     h->b_ref_reorder[0] =
882     h->b_ref_reorder[1] = 0;
883     if( h->sh.i_type == SLICE_TYPE_P )
884     {
885         for( i = 0; i < h->i_ref0 - 1; i++ )
886             if( h->fref0[i]->i_frame_num < h->fref0[i+1]->i_frame_num )
887             {
888                 h->b_ref_reorder[0] = 1;
889                 break;
890             }
891     }
892
893     h->i_ref1 = X264_MIN( h->i_ref1, h->frames.i_max_ref1 );
894     h->i_ref0 = X264_MIN( h->i_ref0, h->frames.i_max_ref0 );
895     h->i_ref0 = X264_MIN( h->i_ref0, h->param.i_frame_reference ); // if reconfig() has lowered the limit
896     assert( h->i_ref0 + h->i_ref1 <= 16 );
897     h->mb.pic.i_fref[0] = h->i_ref0;
898     h->mb.pic.i_fref[1] = h->i_ref1;
899 }
900
901 static void x264_fdec_filter_row( x264_t *h, int mb_y )
902 {
903     /* mb_y is the mb to be encoded next, not the mb to be filtered here */
904     int b_hpel = h->fdec->b_kept_as_ref;
905     int b_deblock = !h->sh.i_disable_deblocking_filter_idc;
906     int b_end = mb_y == h->sps->i_mb_height;
907     int min_y = mb_y - (1 << h->sh.b_mbaff);
908 #ifndef DEBUG_DUMP_FRAME
909     b_deblock &= b_hpel;
910 #endif
911     if( mb_y & h->sh.b_mbaff )
912         return;
913     if( min_y < 0 )
914         return;
915
916     if( !b_end )
917     {
918         int i, j;
919         for( j=0; j<=h->sh.b_mbaff; j++ )
920             for( i=0; i<3; i++ )
921             {
922                 memcpy( h->mb.intra_border_backup[j][i],
923                         h->fdec->plane[i] + ((mb_y*16 >> !!i) + j - 1 - h->sh.b_mbaff) * h->fdec->i_stride[i],
924                         h->sps->i_mb_width*16 >> !!i );
925             }
926     }
927
928     if( b_deblock )
929     {
930         int max_y = b_end ? h->sps->i_mb_height : mb_y;
931         int y;
932         for( y = min_y; y < max_y; y += (1 << h->sh.b_mbaff) )
933             x264_frame_deblock_row( h, y );
934     }
935
936     if( b_hpel )
937     {
938         x264_frame_expand_border( h, h->fdec, min_y, b_end );
939         x264_frame_filter( h, h->fdec, min_y, b_end );
940         x264_frame_expand_border_filtered( h, h->fdec, min_y, b_end );
941     }
942
943     if( h->param.i_threads > 1 && h->fdec->b_kept_as_ref )
944     {
945         x264_frame_cond_broadcast( h->fdec, mb_y*16 + (b_end ? 10000 : -(X264_THREAD_HEIGHT << h->sh.b_mbaff)) );
946     }
947 }
948
949 static inline void x264_reference_update( x264_t *h )
950 {
951     int i;
952
953     if( h->fdec->i_frame >= 0 )
954         h->i_frame++;
955
956     if( !h->fdec->b_kept_as_ref )
957     {
958         if( h->param.i_threads > 1 )
959         {
960             x264_frame_push_unused( h, h->fdec );
961             h->fdec = x264_frame_pop_unused( h );
962         }
963         return;
964     }
965
966     /* move lowres copy of the image to the ref frame */
967     for( i = 0; i < 4; i++)
968     {
969         XCHG( uint8_t*, h->fdec->lowres[i], h->fenc->lowres[i] );
970         XCHG( uint8_t*, h->fdec->buffer_lowres[i], h->fenc->buffer_lowres[i] );
971     }
972
973     /* adaptive B decision needs a pointer, since it can't use the ref lists */
974     if( h->sh.i_type != SLICE_TYPE_B )
975         h->frames.last_nonb = h->fdec;
976
977     /* move frame in the buffer */
978     x264_frame_push( h->frames.reference, h->fdec );
979     if( h->frames.reference[h->frames.i_max_dpb] )
980         x264_frame_push_unused( h, x264_frame_shift( h->frames.reference ) );
981     h->fdec = x264_frame_pop_unused( h );
982 }
983
984 static inline void x264_reference_reset( x264_t *h )
985 {
986     while( h->frames.reference[0] )
987         x264_frame_push_unused( h, x264_frame_pop( h->frames.reference ) );
988     h->fdec->i_poc =
989     h->fenc->i_poc = 0;
990 }
991
992 static inline void x264_slice_init( x264_t *h, int i_nal_type, int i_global_qp )
993 {
994     /* ------------------------ Create slice header  ----------------------- */
995     if( i_nal_type == NAL_SLICE_IDR )
996     {
997         x264_slice_header_init( h, &h->sh, h->sps, h->pps, h->i_idr_pic_id, h->i_frame_num, i_global_qp );
998
999         /* increment id */
1000         h->i_idr_pic_id = ( h->i_idr_pic_id + 1 ) % 65536;
1001     }
1002     else
1003     {
1004         x264_slice_header_init( h, &h->sh, h->sps, h->pps, -1, h->i_frame_num, i_global_qp );
1005
1006         /* always set the real higher num of ref frame used */
1007         h->sh.b_num_ref_idx_override = 1;
1008         h->sh.i_num_ref_idx_l0_active = h->i_ref0 <= 0 ? 1 : h->i_ref0;
1009         h->sh.i_num_ref_idx_l1_active = h->i_ref1 <= 0 ? 1 : h->i_ref1;
1010     }
1011
1012     h->fdec->i_frame_num = h->sh.i_frame_num;
1013
1014     if( h->sps->i_poc_type == 0 )
1015     {
1016         h->sh.i_poc_lsb = h->fdec->i_poc & ( (1 << h->sps->i_log2_max_poc_lsb) - 1 );
1017         h->sh.i_delta_poc_bottom = 0;   /* XXX won't work for field */
1018     }
1019     else if( h->sps->i_poc_type == 1 )
1020     {
1021         /* FIXME TODO FIXME */
1022     }
1023     else
1024     {
1025         /* Nothing to do ? */
1026     }
1027
1028     x264_macroblock_slice_init( h );
1029 }
1030
1031 static void x264_slice_write( x264_t *h )
1032 {
1033     int i_skip;
1034     int mb_xy, i_mb_x, i_mb_y;
1035     int i;
1036
1037     /* init stats */
1038     memset( &h->stat.frame, 0, sizeof(h->stat.frame) );
1039
1040     /* Slice */
1041     x264_nal_start( h, h->i_nal_type, h->i_nal_ref_idc );
1042
1043     /* Slice header */
1044     x264_slice_header_write( &h->out.bs, &h->sh, h->i_nal_ref_idc );
1045     if( h->param.b_cabac )
1046     {
1047         /* alignment needed */
1048         bs_align_1( &h->out.bs );
1049
1050         /* init cabac */
1051         x264_cabac_context_init( &h->cabac, h->sh.i_type, h->sh.i_qp, h->sh.i_cabac_init_idc );
1052         x264_cabac_encode_init ( &h->cabac, h->out.bs.p, h->out.bs.p_end );
1053     }
1054     h->mb.i_last_qp = h->sh.i_qp;
1055     h->mb.i_last_dqp = 0;
1056
1057     i_mb_y = h->sh.i_first_mb / h->sps->i_mb_width;
1058     i_mb_x = h->sh.i_first_mb % h->sps->i_mb_width;
1059     i_skip = 0;
1060
1061     while( (mb_xy = i_mb_x + i_mb_y * h->sps->i_mb_width) < h->sh.i_last_mb )
1062     {
1063         int mb_spos = bs_pos(&h->out.bs) + x264_cabac_pos(&h->cabac);
1064
1065         if( i_mb_x == 0 )
1066             x264_fdec_filter_row( h, i_mb_y );
1067
1068         /* load cache */
1069         x264_macroblock_cache_load( h, i_mb_x, i_mb_y );
1070
1071         /* analyse parameters
1072          * Slice I: choose I_4x4 or I_16x16 mode
1073          * Slice P: choose between using P mode or intra (4x4 or 16x16)
1074          * */
1075         TIMER_START( i_mtime_analyse );
1076         x264_macroblock_analyse( h );
1077         TIMER_STOP( i_mtime_analyse );
1078
1079         /* encode this macroblock -> be careful it can change the mb type to P_SKIP if needed */
1080         TIMER_START( i_mtime_encode );
1081         x264_macroblock_encode( h );
1082         TIMER_STOP( i_mtime_encode );
1083
1084         TIMER_START( i_mtime_write );
1085         if( h->param.b_cabac )
1086         {
1087             if( mb_xy > h->sh.i_first_mb && !(h->sh.b_mbaff && (i_mb_y&1)) )
1088                 x264_cabac_encode_terminal( &h->cabac );
1089
1090             if( IS_SKIP( h->mb.i_type ) )
1091                 x264_cabac_mb_skip( h, 1 );
1092             else
1093             {
1094                 if( h->sh.i_type != SLICE_TYPE_I )
1095                     x264_cabac_mb_skip( h, 0 );
1096                 x264_macroblock_write_cabac( h, &h->cabac );
1097             }
1098         }
1099         else
1100         {
1101             if( IS_SKIP( h->mb.i_type ) )
1102                 i_skip++;
1103             else
1104             {
1105                 if( h->sh.i_type != SLICE_TYPE_I )
1106                 {
1107                     bs_write_ue( &h->out.bs, i_skip );  /* skip run */
1108                     i_skip = 0;
1109                 }
1110                 x264_macroblock_write_cavlc( h, &h->out.bs );
1111             }
1112         }
1113         TIMER_STOP( i_mtime_write );
1114
1115 #if VISUALIZE
1116         if( h->param.b_visualize )
1117             x264_visualize_mb( h );
1118 #endif
1119
1120         /* save cache */
1121         x264_macroblock_cache_save( h );
1122
1123         /* accumulate mb stats */
1124         h->stat.frame.i_mb_count[h->mb.i_type]++;
1125         if( !IS_SKIP(h->mb.i_type) && !IS_INTRA(h->mb.i_type) && !IS_DIRECT(h->mb.i_type) )
1126         {
1127             if( h->mb.i_partition != D_8x8 )
1128                 h->stat.frame.i_mb_count_size[ x264_mb_partition_pixel_table[ h->mb.i_partition ] ] += 4;
1129             else
1130                 for( i = 0; i < 4; i++ )
1131                     h->stat.frame.i_mb_count_size[ x264_mb_partition_pixel_table[ h->mb.i_sub_partition[i] ] ] ++;
1132             if( h->param.i_frame_reference > 1 )
1133             {
1134                 for( i = 0; i < 4; i++ )
1135                 {
1136                     int i_ref = h->mb.cache.ref[0][ x264_scan8[4*i] ];
1137                     if( i_ref >= 0 )
1138                         h->stat.frame.i_mb_count_ref[i_ref] ++;
1139                 }
1140             }
1141         }
1142         if( h->mb.i_cbp_luma && !IS_INTRA(h->mb.i_type) )
1143         {
1144             h->stat.frame.i_mb_count_8x8dct[0] ++;
1145             h->stat.frame.i_mb_count_8x8dct[1] += h->mb.b_transform_8x8;
1146         }
1147
1148         x264_ratecontrol_mb( h, bs_pos(&h->out.bs) + x264_cabac_pos(&h->cabac) - mb_spos );
1149
1150         if( h->sh.b_mbaff )
1151         {
1152             i_mb_x += i_mb_y & 1;
1153             i_mb_y ^= i_mb_x < h->sps->i_mb_width;
1154         }
1155         else
1156             i_mb_x++;
1157         if(i_mb_x == h->sps->i_mb_width)
1158         {
1159             i_mb_y++;
1160             i_mb_x = 0;
1161         }
1162     }
1163
1164     if( h->param.b_cabac )
1165     {
1166         x264_cabac_encode_flush( h, &h->cabac );
1167         h->out.bs.p = h->cabac.p;
1168     }
1169     else
1170     {
1171         if( i_skip > 0 )
1172             bs_write_ue( &h->out.bs, i_skip );  /* last skip run */
1173         /* rbsp_slice_trailing_bits */
1174         bs_rbsp_trailing( &h->out.bs );
1175     }
1176
1177     x264_nal_end( h );
1178
1179     /* Compute misc bits */
1180     h->stat.frame.i_misc_bits = bs_pos( &h->out.bs )
1181                               + NALU_OVERHEAD * 8
1182                               - h->stat.frame.i_itex_bits
1183                               - h->stat.frame.i_ptex_bits
1184                               - h->stat.frame.i_hdr_bits;
1185 }
1186
1187 static void x264_thread_sync_context( x264_t *dst, x264_t *src )
1188 {
1189     x264_frame_t **f;
1190     if( dst == src )
1191         return;
1192
1193     // reference counting
1194     for( f = src->frames.reference; *f; f++ )
1195         (*f)->i_reference_count++;
1196     for( f = dst->frames.reference; *f; f++ )
1197         x264_frame_push_unused( src, *f );
1198     src->fdec->i_reference_count++;
1199     x264_frame_push_unused( src, dst->fdec );
1200
1201     // copy everything except the per-thread pointers and the constants.
1202     memcpy( &dst->i_frame, &src->i_frame, offsetof(x264_t, mb.type) - offsetof(x264_t, i_frame) );
1203     memcpy( &dst->mb.i_type, &src->mb.i_type, offsetof(x264_t, rc) - offsetof(x264_t, mb.i_type) );
1204     dst->stat = src->stat;
1205 }
1206
1207 static void x264_thread_sync_stat( x264_t *dst, x264_t *src )
1208 {
1209     if( dst == src )
1210         return;
1211     memcpy( &dst->stat.i_slice_count, &src->stat.i_slice_count, sizeof(dst->stat) - sizeof(dst->stat.frame) );
1212 }
1213
1214 static int x264_slices_write( x264_t *h )
1215 {
1216     int i_frame_size;
1217
1218 #if VISUALIZE
1219     if( h->param.b_visualize )
1220         x264_visualize_init( h );
1221 #endif
1222
1223     x264_stack_align( x264_slice_write, h );
1224     i_frame_size = h->out.nal[h->out.i_nal-1].i_payload;
1225     x264_fdec_filter_row( h, h->sps->i_mb_height );
1226
1227 #if VISUALIZE
1228     if( h->param.b_visualize )
1229     {
1230         x264_visualize_show( h );
1231         x264_visualize_close( h );
1232     }
1233 #endif
1234
1235     h->out.i_frame_size = i_frame_size;
1236     return 0;
1237 }
1238
1239 /****************************************************************************
1240  * x264_encoder_encode:
1241  *  XXX: i_poc   : is the poc of the current given picture
1242  *       i_frame : is the number of the frame being coded
1243  *  ex:  type frame poc
1244  *       I      0   2*0
1245  *       P      1   2*3
1246  *       B      2   2*1
1247  *       B      3   2*2
1248  *       P      4   2*6
1249  *       B      5   2*4
1250  *       B      6   2*5
1251  ****************************************************************************/
1252 int     x264_encoder_encode( x264_t *h,
1253                              x264_nal_t **pp_nal, int *pi_nal,
1254                              x264_picture_t *pic_in,
1255                              x264_picture_t *pic_out )
1256 {
1257     x264_t *thread_current, *thread_prev, *thread_oldest;
1258     int     i_nal_type;
1259     int     i_nal_ref_idc;
1260
1261     int   i_global_qp;
1262
1263     if( h->param.i_threads > 1)
1264     {
1265         int i = ++h->i_thread_phase;
1266         int t = h->param.i_threads;
1267         thread_current = h->thread[ i%t ];
1268         thread_prev    = h->thread[ (i-1)%t ];
1269         thread_oldest  = h->thread[ (i+1)%t ];
1270         x264_thread_sync_context( thread_current, thread_prev );
1271         x264_thread_sync_ratecontrol( thread_current, thread_prev, thread_oldest );
1272         h = thread_current;
1273 //      fprintf(stderr, "current: %p  prev: %p  oldest: %p \n", thread_current, thread_prev, thread_oldest);
1274     }
1275     else
1276     {
1277         thread_current =
1278         thread_prev    =
1279         thread_oldest  = h;
1280     }
1281
1282     // ok to call this before encoding any frames, since the initial values of fdec have b_kept_as_ref=0
1283     x264_reference_update( h );
1284     h->fdec->i_lines_completed = -1;
1285
1286     /* no data out */
1287     *pi_nal = 0;
1288     *pp_nal = NULL;
1289
1290     /* ------------------- Setup new frame from picture -------------------- */
1291     TIMER_START( i_mtime_encode_frame );
1292     if( pic_in != NULL )
1293     {
1294         /* 1: Copy the picture to a frame and move it to a buffer */
1295         x264_frame_t *fenc = x264_frame_pop_unused( h );
1296
1297         if( x264_frame_copy_picture( h, fenc, pic_in ) < 0 )
1298             return -1;
1299
1300         if( h->param.i_width != 16 * h->sps->i_mb_width ||
1301             h->param.i_height != 16 * h->sps->i_mb_height )
1302             x264_frame_expand_border_mod16( h, fenc );
1303
1304         fenc->i_frame = h->frames.i_input++;
1305
1306         x264_frame_push( h->frames.next, fenc );
1307
1308         if( h->frames.b_have_lowres )
1309             x264_frame_init_lowres( h, fenc );
1310
1311         if( h->frames.i_input <= h->frames.i_delay + 1 - h->param.i_threads )
1312         {
1313             /* Nothing yet to encode */
1314             /* waiting for filling bframe buffer */
1315             pic_out->i_type = X264_TYPE_AUTO;
1316             return 0;
1317         }
1318     }
1319
1320     if( h->frames.current[0] == NULL )
1321     {
1322         int bframes = 0;
1323         /* 2: Select frame types */
1324         if( h->frames.next[0] == NULL )
1325         {
1326             x264_encoder_frame_end( thread_oldest, thread_current, pp_nal, pi_nal, pic_out );
1327             return 0;
1328         }
1329
1330         x264_slicetype_decide( h );
1331
1332         /* 3: move some B-frames and 1 non-B to encode queue */
1333         while( IS_X264_TYPE_B( h->frames.next[bframes]->i_type ) )
1334             bframes++;
1335         x264_frame_push( h->frames.current, x264_frame_shift( &h->frames.next[bframes] ) );
1336         /* FIXME: when max B-frames > 3, BREF may no longer be centered after GOP closing */
1337         if( h->param.b_bframe_pyramid && bframes > 1 )
1338         {
1339             x264_frame_t *mid = x264_frame_shift( &h->frames.next[bframes/2] );
1340             mid->i_type = X264_TYPE_BREF;
1341             x264_frame_push( h->frames.current, mid );
1342             bframes--;
1343         }
1344         while( bframes-- )
1345             x264_frame_push( h->frames.current, x264_frame_shift( h->frames.next ) );
1346     }
1347     TIMER_STOP( i_mtime_encode_frame );
1348
1349     /* ------------------- Get frame to be encoded ------------------------- */
1350     /* 4: get picture to encode */
1351     h->fenc = x264_frame_shift( h->frames.current );
1352     if( h->fenc == NULL )
1353     {
1354         /* Nothing yet to encode (ex: waiting for I/P with B frames) */
1355         /* waiting for filling bframe buffer */
1356         pic_out->i_type = X264_TYPE_AUTO;
1357         return 0;
1358     }
1359
1360 do_encode:
1361
1362     if( h->fenc->i_type == X264_TYPE_IDR )
1363     {
1364         h->frames.i_last_idr = h->fenc->i_frame;
1365     }
1366
1367     /* ------------------- Setup frame context ----------------------------- */
1368     /* 5: Init data dependent of frame type */
1369     TIMER_START( i_mtime_encode_frame );
1370     if( h->fenc->i_type == X264_TYPE_IDR )
1371     {
1372         /* reset ref pictures */
1373         x264_reference_reset( h );
1374
1375         i_nal_type    = NAL_SLICE_IDR;
1376         i_nal_ref_idc = NAL_PRIORITY_HIGHEST;
1377         h->sh.i_type = SLICE_TYPE_I;
1378     }
1379     else if( h->fenc->i_type == X264_TYPE_I )
1380     {
1381         i_nal_type    = NAL_SLICE;
1382         i_nal_ref_idc = NAL_PRIORITY_HIGH; /* Not completely true but for now it is (as all I/P are kept as ref)*/
1383         h->sh.i_type = SLICE_TYPE_I;
1384     }
1385     else if( h->fenc->i_type == X264_TYPE_P )
1386     {
1387         i_nal_type    = NAL_SLICE;
1388         i_nal_ref_idc = NAL_PRIORITY_HIGH; /* Not completely true but for now it is (as all I/P are kept as ref)*/
1389         h->sh.i_type = SLICE_TYPE_P;
1390     }
1391     else if( h->fenc->i_type == X264_TYPE_BREF )
1392     {
1393         i_nal_type    = NAL_SLICE;
1394         i_nal_ref_idc = NAL_PRIORITY_HIGH; /* maybe add MMCO to forget it? -> low */
1395         h->sh.i_type = SLICE_TYPE_B;
1396     }
1397     else    /* B frame */
1398     {
1399         i_nal_type    = NAL_SLICE;
1400         i_nal_ref_idc = NAL_PRIORITY_DISPOSABLE;
1401         h->sh.i_type = SLICE_TYPE_B;
1402     }
1403
1404     h->fdec->i_poc =
1405     h->fenc->i_poc = 2 * (h->fenc->i_frame - h->frames.i_last_idr);
1406     h->fdec->i_type = h->fenc->i_type;
1407     h->fdec->i_frame = h->fenc->i_frame;
1408     h->fenc->b_kept_as_ref =
1409     h->fdec->b_kept_as_ref = i_nal_ref_idc != NAL_PRIORITY_DISPOSABLE && h->param.i_keyint_max > 1;
1410
1411
1412
1413     /* ------------------- Init                ----------------------------- */
1414     /* build ref list 0/1 */
1415     x264_reference_build_list( h, h->fdec->i_poc );
1416
1417     /* Init the rate control */
1418     x264_ratecontrol_start( h, h->fenc->i_qpplus1 );
1419     i_global_qp = x264_ratecontrol_qp( h );
1420
1421     pic_out->i_qpplus1 =
1422     h->fdec->i_qpplus1 = i_global_qp + 1;
1423
1424     if( h->sh.i_type == SLICE_TYPE_B )
1425         x264_macroblock_bipred_init( h );
1426
1427     /* ------------------------ Create slice header  ----------------------- */
1428     x264_slice_init( h, i_nal_type, i_global_qp );
1429
1430     if( i_nal_ref_idc != NAL_PRIORITY_DISPOSABLE )
1431         h->i_frame_num++;
1432
1433     /* ---------------------- Write the bitstream -------------------------- */
1434     /* Init bitstream context */
1435     h->out.i_nal = 0;
1436     bs_init( &h->out.bs, h->out.p_bitstream, h->out.i_bitstream );
1437
1438     if(h->param.b_aud){
1439         int pic_type;
1440
1441         if(h->sh.i_type == SLICE_TYPE_I)
1442             pic_type = 0;
1443         else if(h->sh.i_type == SLICE_TYPE_P)
1444             pic_type = 1;
1445         else if(h->sh.i_type == SLICE_TYPE_B)
1446             pic_type = 2;
1447         else
1448             pic_type = 7;
1449
1450         x264_nal_start(h, NAL_AUD, NAL_PRIORITY_DISPOSABLE);
1451         bs_write(&h->out.bs, 3, pic_type);
1452         bs_rbsp_trailing(&h->out.bs);
1453         x264_nal_end(h);
1454     }
1455
1456     h->i_nal_type = i_nal_type;
1457     h->i_nal_ref_idc = i_nal_ref_idc;
1458
1459     /* Write SPS and PPS */
1460     if( i_nal_type == NAL_SLICE_IDR && h->param.b_repeat_headers )
1461     {
1462         if( h->fenc->i_frame == 0 )
1463         {
1464             /* identify ourself */
1465             x264_nal_start( h, NAL_SEI, NAL_PRIORITY_DISPOSABLE );
1466             x264_sei_version_write( h, &h->out.bs );
1467             x264_nal_end( h );
1468         }
1469
1470         /* generate sequence parameters */
1471         x264_nal_start( h, NAL_SPS, NAL_PRIORITY_HIGHEST );
1472         x264_sps_write( &h->out.bs, h->sps );
1473         x264_nal_end( h );
1474
1475         /* generate picture parameters */
1476         x264_nal_start( h, NAL_PPS, NAL_PRIORITY_HIGHEST );
1477         x264_pps_write( &h->out.bs, h->pps );
1478         x264_nal_end( h );
1479     }
1480
1481     /* Write frame */
1482     if( h->param.i_threads > 1 )
1483     {
1484         x264_pthread_create( &h->thread_handle, NULL, (void*)x264_slices_write, h );
1485         h->b_thread_active = 1;
1486     }
1487     else
1488         x264_slices_write( h );
1489
1490     /* restore CPU state (before using float again) */
1491     x264_cpu_restore( h->param.cpu );
1492
1493     if( h->sh.i_type == SLICE_TYPE_P && !h->param.rc.b_stat_read 
1494         && h->param.i_scenecut_threshold >= 0
1495         && !h->param.b_pre_scenecut )
1496     {
1497         const int *mbs = h->stat.frame.i_mb_count;
1498         int i_mb_i = mbs[I_16x16] + mbs[I_8x8] + mbs[I_4x4];
1499         int i_mb_p = mbs[P_L0] + mbs[P_8x8];
1500         int i_mb_s = mbs[P_SKIP];
1501         int i_mb   = h->sps->i_mb_width * h->sps->i_mb_height;
1502         int64_t i_inter_cost = h->stat.frame.i_inter_cost;
1503         int64_t i_intra_cost = h->stat.frame.i_intra_cost;
1504
1505         float f_bias;
1506         int i_gop_size = h->fenc->i_frame - h->frames.i_last_idr;
1507         float f_thresh_max = h->param.i_scenecut_threshold / 100.0;
1508         /* magic numbers pulled out of thin air */
1509         float f_thresh_min = f_thresh_max * h->param.i_keyint_min
1510                              / ( h->param.i_keyint_max * 4 );
1511         if( h->param.i_keyint_min == h->param.i_keyint_max )
1512              f_thresh_min= f_thresh_max;
1513
1514         /* macroblock_analyse() doesn't further analyse skipped mbs,
1515          * so we have to guess their cost */
1516         if( h->stat.frame.i_mbs_analysed > 0 )
1517             i_intra_cost = i_intra_cost * i_mb / h->stat.frame.i_mbs_analysed;
1518
1519         if( i_gop_size < h->param.i_keyint_min / 4 )
1520             f_bias = f_thresh_min / 4;
1521         else if( i_gop_size <= h->param.i_keyint_min )
1522             f_bias = f_thresh_min * i_gop_size / h->param.i_keyint_min;
1523         else
1524         {
1525             f_bias = f_thresh_min
1526                      + ( f_thresh_max - f_thresh_min )
1527                        * ( i_gop_size - h->param.i_keyint_min )
1528                        / ( h->param.i_keyint_max - h->param.i_keyint_min );
1529         }
1530         f_bias = X264_MIN( f_bias, 1.0 );
1531
1532         /* Bad P will be reencoded as I */
1533         if( h->stat.frame.i_mbs_analysed > 0 &&
1534             i_inter_cost >= (1.0 - f_bias) * i_intra_cost )
1535         {
1536             int b;
1537
1538             x264_log( h, X264_LOG_DEBUG, "scene cut at %d Icost:%.0f Pcost:%.0f ratio:%.4f bias:%.4f gop:%d (imb:%d pmb:%d smb:%d)\n",
1539                       h->fenc->i_frame,
1540                       (double)i_intra_cost, (double)i_inter_cost,
1541                       1. - (double)i_inter_cost / i_intra_cost,
1542                       f_bias, i_gop_size,
1543                       i_mb_i, i_mb_p, i_mb_s );
1544
1545             /* Restore frame num */
1546             h->i_frame_num--;
1547
1548             for( b = 0; h->frames.current[b] && IS_X264_TYPE_B( h->frames.current[b]->i_type ); b++ );
1549             if( b > 0 )
1550             {
1551                 /* If using B-frames, force GOP to be closed.
1552                  * Even if this frame is going to be I and not IDR, forcing a
1553                  * P-frame before the scenecut will probably help compression.
1554                  * 
1555                  * We don't yet know exactly which frame is the scene cut, so
1556                  * we can't assign an I-frame. Instead, change the previous
1557                  * B-frame to P, and rearrange coding order. */
1558
1559                 if( h->param.b_bframe_adaptive || b > 1 )
1560                     h->fenc->i_type = X264_TYPE_AUTO;
1561                 x264_frame_sort_pts( h->frames.current );
1562                 x264_frame_unshift( h->frames.next, h->fenc );
1563                 h->fenc = h->frames.current[b-1];
1564                 h->frames.current[b-1] = NULL;
1565                 h->fenc->i_type = X264_TYPE_P;
1566                 x264_frame_sort_dts( h->frames.current );
1567             }
1568             /* Do IDR if needed */
1569             else if( i_gop_size >= h->param.i_keyint_min )
1570             {
1571                 /* Reset */
1572                 h->i_frame_num = 0;
1573
1574                 /* Reinit field of fenc */
1575                 h->fenc->i_type = X264_TYPE_IDR;
1576                 h->fenc->i_poc = 0;
1577
1578                 /* Put enqueued frames back in the pool */
1579                 while( h->frames.current[0] )
1580                     x264_frame_push( h->frames.next, x264_frame_shift( h->frames.current ) );
1581                 x264_frame_sort_pts( h->frames.next );
1582             }
1583             else
1584             {
1585                 h->fenc->i_type = X264_TYPE_I;
1586             }
1587             goto do_encode;
1588         }
1589     }
1590
1591     x264_encoder_frame_end( thread_oldest, thread_current, pp_nal, pi_nal, pic_out );
1592     return 0;
1593 }
1594
1595 static void x264_encoder_frame_end( x264_t *h, x264_t *thread_current,
1596                                     x264_nal_t **pp_nal, int *pi_nal,
1597                                     x264_picture_t *pic_out )
1598 {
1599     int i;
1600     char psz_message[80];
1601
1602     if( h->b_thread_active )
1603     {
1604         x264_pthread_join( h->thread_handle, NULL );
1605         h->b_thread_active = 0;
1606     }
1607     if( !h->out.i_nal )
1608     {
1609         pic_out->i_type = X264_TYPE_AUTO;
1610         return;
1611     }
1612
1613     x264_frame_push_unused( thread_current, h->fenc );
1614
1615     /* End bitstream, set output  */
1616     *pi_nal = h->out.i_nal;
1617     *pp_nal = h->out.nal;
1618     h->out.i_nal = 0;
1619
1620     /* Set output picture properties */
1621     if( h->sh.i_type == SLICE_TYPE_I )
1622         pic_out->i_type = h->i_nal_type == NAL_SLICE_IDR ? X264_TYPE_IDR : X264_TYPE_I;
1623     else if( h->sh.i_type == SLICE_TYPE_P )
1624         pic_out->i_type = X264_TYPE_P;
1625     else
1626         pic_out->i_type = X264_TYPE_B;
1627     pic_out->i_pts = h->fenc->i_pts;
1628
1629     pic_out->img.i_plane = h->fdec->i_plane;
1630     for(i = 0; i < 4; i++){
1631         pic_out->img.i_stride[i] = h->fdec->i_stride[i];
1632         pic_out->img.plane[i] = h->fdec->plane[i];
1633     }
1634
1635     /* ---------------------- Update encoder state ------------------------- */
1636
1637     /* update rc */
1638     x264_cpu_restore( h->param.cpu );
1639     x264_ratecontrol_end( h, h->out.i_frame_size * 8 );
1640
1641     /* restore CPU state (before using float again) */
1642     x264_cpu_restore( h->param.cpu );
1643
1644     x264_noise_reduction_update( h );
1645
1646     TIMER_STOP( i_mtime_encode_frame );
1647
1648     /* ---------------------- Compute/Print statistics --------------------- */
1649     x264_thread_sync_stat( h, h->thread[0] );
1650
1651     /* Slice stat */
1652     h->stat.i_slice_count[h->sh.i_type]++;
1653     h->stat.i_slice_size[h->sh.i_type] += h->out.i_frame_size + NALU_OVERHEAD;
1654     h->stat.f_slice_qp[h->sh.i_type] += h->fdec->f_qp_avg_aq;
1655
1656     for( i = 0; i < X264_MBTYPE_MAX; i++ )
1657         h->stat.i_mb_count[h->sh.i_type][i] += h->stat.frame.i_mb_count[i];
1658     for( i = 0; i < 2; i++ )
1659         h->stat.i_mb_count_8x8dct[i] += h->stat.frame.i_mb_count_8x8dct[i];
1660     if( h->sh.i_type != SLICE_TYPE_I )
1661     {
1662         for( i = 0; i < 7; i++ )
1663             h->stat.i_mb_count_size[h->sh.i_type][i] += h->stat.frame.i_mb_count_size[i];
1664         for( i = 0; i < 32; i++ )
1665             h->stat.i_mb_count_ref[h->sh.i_type][i] += h->stat.frame.i_mb_count_ref[i];
1666     }
1667     if( h->sh.i_type == SLICE_TYPE_B )
1668     {
1669         h->stat.i_direct_frames[ h->sh.b_direct_spatial_mv_pred ] ++;
1670         if( h->mb.b_direct_auto_write )
1671         {
1672             //FIXME somewhat arbitrary time constants
1673             if( h->stat.i_direct_score[0] + h->stat.i_direct_score[1] > h->mb.i_mb_count )
1674             {
1675                 for( i = 0; i < 2; i++ )
1676                     h->stat.i_direct_score[i] = h->stat.i_direct_score[i] * 9/10;
1677             }
1678             for( i = 0; i < 2; i++ )
1679                 h->stat.i_direct_score[i] += h->stat.frame.i_direct_score[i];
1680         }
1681     }
1682
1683     psz_message[0] = '\0';
1684     if( h->param.analyse.b_psnr )
1685     {
1686         int64_t sqe[3];
1687
1688         for( i=0; i<3; i++ )
1689         {
1690             sqe[i] = x264_pixel_ssd_wxh( &h->pixf,
1691                          h->fdec->plane[i], h->fdec->i_stride[i],
1692                          h->fenc->plane[i], h->fenc->i_stride[i],
1693                          h->param.i_width >> !!i, h->param.i_height >> !!i );
1694         }
1695         x264_cpu_restore( h->param.cpu );
1696
1697         h->stat.i_sqe_global[h->sh.i_type] += sqe[0] + sqe[1] + sqe[2];
1698         h->stat.f_psnr_average[h->sh.i_type] += x264_psnr( sqe[0] + sqe[1] + sqe[2], 3 * h->param.i_width * h->param.i_height / 2 );
1699         h->stat.f_psnr_mean_y[h->sh.i_type] += x264_psnr( sqe[0], h->param.i_width * h->param.i_height );
1700         h->stat.f_psnr_mean_u[h->sh.i_type] += x264_psnr( sqe[1], h->param.i_width * h->param.i_height / 4 );
1701         h->stat.f_psnr_mean_v[h->sh.i_type] += x264_psnr( sqe[2], h->param.i_width * h->param.i_height / 4 );
1702
1703         snprintf( psz_message, 80, " PSNR Y:%5.2f U:%5.2f V:%5.2f",
1704                   x264_psnr( sqe[0], h->param.i_width * h->param.i_height ),
1705                   x264_psnr( sqe[1], h->param.i_width * h->param.i_height / 4),
1706                   x264_psnr( sqe[2], h->param.i_width * h->param.i_height / 4) );
1707     }
1708
1709     if( h->param.analyse.b_ssim )
1710     {
1711         // offset by 2 pixels to avoid alignment of ssim blocks with dct blocks
1712         float ssim_y = x264_pixel_ssim_wxh( &h->pixf,
1713                          h->fdec->plane[0] + 2+2*h->fdec->i_stride[0], h->fdec->i_stride[0],
1714                          h->fenc->plane[0] + 2+2*h->fenc->i_stride[0], h->fenc->i_stride[0],
1715                          h->param.i_width-2, h->param.i_height-2 );
1716         h->stat.f_ssim_mean_y[h->sh.i_type] += ssim_y;
1717         snprintf( psz_message + strlen(psz_message), 80 - strlen(psz_message),
1718                   " SSIM Y:%.5f", ssim_y );
1719     }
1720     psz_message[79] = '\0';
1721     
1722     x264_log( h, X264_LOG_DEBUG,
1723                   "frame=%4d QP=%.2f NAL=%d Slice:%c Poc:%-3d I:%-4d P:%-4d SKIP:%-4d size=%d bytes%s\n",
1724               h->i_frame,
1725               h->fdec->f_qp_avg_aq,
1726               h->i_nal_ref_idc,
1727               h->sh.i_type == SLICE_TYPE_I ? 'I' : (h->sh.i_type == SLICE_TYPE_P ? 'P' : 'B' ),
1728               h->fdec->i_poc,
1729               h->stat.frame.i_mb_count_i,
1730               h->stat.frame.i_mb_count_p,
1731               h->stat.frame.i_mb_count_skip,
1732               h->out.i_frame_size,
1733               psz_message );
1734
1735     // keep stats all in one place
1736     x264_thread_sync_stat( h->thread[0], h );
1737     // for the use of the next frame
1738     x264_thread_sync_stat( thread_current, h );
1739
1740 #ifdef DEBUG_MB_TYPE
1741 {
1742     static const char mb_chars[] = { 'i', 'i', 'I', 'C', 'P', '8', 'S',
1743         'D', '<', 'X', 'B', 'X', '>', 'B', 'B', 'B', 'B', '8', 'S' };
1744     int mb_xy;
1745     for( mb_xy = 0; mb_xy < h->sps->i_mb_width * h->sps->i_mb_height; mb_xy++ )
1746     {
1747         if( h->mb.type[mb_xy] < X264_MBTYPE_MAX && h->mb.type[mb_xy] >= 0 )
1748             fprintf( stderr, "%c ", mb_chars[ h->mb.type[mb_xy] ] );
1749         else
1750             fprintf( stderr, "? " );
1751
1752         if( (mb_xy+1) % h->sps->i_mb_width == 0 )
1753             fprintf( stderr, "\n" );
1754     }
1755 }
1756 #endif
1757
1758 #ifdef DEBUG_DUMP_FRAME
1759     /* Dump reconstructed frame */
1760     x264_frame_dump( h, h->fdec, "fdec.yuv" );
1761 #endif
1762 }
1763
1764 /****************************************************************************
1765  * x264_encoder_close:
1766  ****************************************************************************/
1767 void    x264_encoder_close  ( x264_t *h )
1768 {
1769 #ifdef DEBUG_BENCHMARK
1770     int64_t i_mtime_total = i_mtime_analyse + i_mtime_encode + i_mtime_write + i_mtime_filter + 1;
1771 #endif
1772     int64_t i_yuv_size = 3 * h->param.i_width * h->param.i_height / 2;
1773     int i;
1774
1775     for( i=0; i<h->param.i_threads; i++ )
1776     {
1777         // don't strictly have to wait for the other threads, but it's simpler than cancelling them
1778         if( h->thread[i]->b_thread_active )
1779             x264_pthread_join( h->thread[i]->thread_handle, NULL );
1780     }
1781
1782 #ifdef DEBUG_BENCHMARK
1783     x264_log( h, X264_LOG_INFO,
1784               "analyse=%d(%lldms) encode=%d(%lldms) write=%d(%lldms) filter=%d(%lldms)\n",
1785               (int)(100*i_mtime_analyse/i_mtime_total), i_mtime_analyse/1000,
1786               (int)(100*i_mtime_encode/i_mtime_total), i_mtime_encode/1000,
1787               (int)(100*i_mtime_write/i_mtime_total), i_mtime_write/1000,
1788               (int)(100*i_mtime_filter/i_mtime_total), i_mtime_filter/1000 );
1789 #endif
1790
1791     /* Slices used and PSNR */
1792     for( i=0; i<5; i++ )
1793     {
1794         static const int slice_order[] = { SLICE_TYPE_I, SLICE_TYPE_SI, SLICE_TYPE_P, SLICE_TYPE_SP, SLICE_TYPE_B };
1795         static const char *slice_name[] = { "P", "B", "I", "SP", "SI" };
1796         int i_slice = slice_order[i];
1797
1798         if( h->stat.i_slice_count[i_slice] > 0 )
1799         {
1800             const int i_count = h->stat.i_slice_count[i_slice];
1801             if( h->param.analyse.b_psnr )
1802             {
1803                 x264_log( h, X264_LOG_INFO,
1804                           "slice %s:%-5d Avg QP:%5.2f  size:%6.0f  PSNR Mean Y:%5.2f U:%5.2f V:%5.2f Avg:%5.2f Global:%5.2f\n",
1805                           slice_name[i_slice],
1806                           i_count,
1807                           h->stat.f_slice_qp[i_slice] / i_count,
1808                           (double)h->stat.i_slice_size[i_slice] / i_count,
1809                           h->stat.f_psnr_mean_y[i_slice] / i_count, h->stat.f_psnr_mean_u[i_slice] / i_count, h->stat.f_psnr_mean_v[i_slice] / i_count,
1810                           h->stat.f_psnr_average[i_slice] / i_count,
1811                           x264_psnr( h->stat.i_sqe_global[i_slice], i_count * i_yuv_size ) );
1812             }
1813             else
1814             {
1815                 x264_log( h, X264_LOG_INFO,
1816                           "slice %s:%-5d Avg QP:%5.2f  size:%6.0f\n",
1817                           slice_name[i_slice],
1818                           i_count,
1819                           h->stat.f_slice_qp[i_slice] / i_count,
1820                           (double)h->stat.i_slice_size[i_slice] / i_count );
1821             }
1822         }
1823     }
1824
1825     /* MB types used */
1826     if( h->stat.i_slice_count[SLICE_TYPE_I] > 0 )
1827     {
1828         const int64_t *i_mb_count = h->stat.i_mb_count[SLICE_TYPE_I];
1829         const double i_count = h->stat.i_slice_count[SLICE_TYPE_I] * h->mb.i_mb_count / 100.0;
1830         x264_log( h, X264_LOG_INFO,
1831                   "mb I  I16..4: %4.1f%% %4.1f%% %4.1f%%\n",
1832                   i_mb_count[I_16x16]/ i_count,
1833                   i_mb_count[I_8x8]  / i_count,
1834                   i_mb_count[I_4x4]  / i_count );
1835     }
1836     if( h->stat.i_slice_count[SLICE_TYPE_P] > 0 )
1837     {
1838         const int64_t *i_mb_count = h->stat.i_mb_count[SLICE_TYPE_P];
1839         const int64_t *i_mb_size = h->stat.i_mb_count_size[SLICE_TYPE_P];
1840         const double i_count = h->stat.i_slice_count[SLICE_TYPE_P] * h->mb.i_mb_count / 100.0;
1841         x264_log( h, X264_LOG_INFO,
1842                   "mb P  I16..4: %4.1f%% %4.1f%% %4.1f%%  P16..4: %4.1f%% %4.1f%% %4.1f%% %4.1f%% %4.1f%%    skip:%4.1f%%\n",
1843                   i_mb_count[I_16x16]/ i_count,
1844                   i_mb_count[I_8x8]  / i_count,
1845                   i_mb_count[I_4x4]  / i_count,
1846                   i_mb_size[PIXEL_16x16] / (i_count*4),
1847                   (i_mb_size[PIXEL_16x8] + i_mb_size[PIXEL_8x16]) / (i_count*4),
1848                   i_mb_size[PIXEL_8x8] / (i_count*4),
1849                   (i_mb_size[PIXEL_8x4] + i_mb_size[PIXEL_4x8]) / (i_count*4),
1850                   i_mb_size[PIXEL_4x4] / (i_count*4),
1851                   i_mb_count[P_SKIP] / i_count );
1852     }
1853     if( h->stat.i_slice_count[SLICE_TYPE_B] > 0 )
1854     {
1855         const int64_t *i_mb_count = h->stat.i_mb_count[SLICE_TYPE_B];
1856         const int64_t *i_mb_size = h->stat.i_mb_count_size[SLICE_TYPE_B];
1857         const double i_count = h->stat.i_slice_count[SLICE_TYPE_B] * h->mb.i_mb_count / 100.0;
1858         x264_log( h, X264_LOG_INFO,
1859                   "mb B  I16..4: %4.1f%% %4.1f%% %4.1f%%  B16..8: %4.1f%% %4.1f%% %4.1f%%  direct:%4.1f%%  skip:%4.1f%%\n",
1860                   i_mb_count[I_16x16]  / i_count,
1861                   i_mb_count[I_8x8]    / i_count,
1862                   i_mb_count[I_4x4]    / i_count,
1863                   i_mb_size[PIXEL_16x16] / (i_count*4),
1864                   (i_mb_size[PIXEL_16x8] + i_mb_size[PIXEL_8x16]) / (i_count*4),
1865                   i_mb_size[PIXEL_8x8] / (i_count*4),
1866                   i_mb_count[B_DIRECT] / i_count,
1867                   i_mb_count[B_SKIP]   / i_count );
1868     }
1869
1870     x264_ratecontrol_summary( h );
1871
1872     if( h->stat.i_slice_count[SLICE_TYPE_I] + h->stat.i_slice_count[SLICE_TYPE_P] + h->stat.i_slice_count[SLICE_TYPE_B] > 0 )
1873     {
1874         const int i_count = h->stat.i_slice_count[SLICE_TYPE_I] +
1875                             h->stat.i_slice_count[SLICE_TYPE_P] +
1876                             h->stat.i_slice_count[SLICE_TYPE_B];
1877         float fps = (float) h->param.i_fps_num / h->param.i_fps_den;
1878 #define SUM3(p) (p[SLICE_TYPE_I] + p[SLICE_TYPE_P] + p[SLICE_TYPE_B])
1879 #define SUM3b(p,o) (p[SLICE_TYPE_I][o] + p[SLICE_TYPE_P][o] + p[SLICE_TYPE_B][o])
1880         float f_bitrate = fps * SUM3(h->stat.i_slice_size) / i_count / 125;
1881
1882         if( h->pps->b_transform_8x8_mode )
1883         {
1884             int64_t i_i8x8 = SUM3b( h->stat.i_mb_count, I_8x8 );
1885             int64_t i_intra = i_i8x8 + SUM3b( h->stat.i_mb_count, I_4x4 )
1886                                      + SUM3b( h->stat.i_mb_count, I_16x16 );
1887             x264_log( h, X264_LOG_INFO, "8x8 transform  intra:%.1f%%  inter:%.1f%%\n",
1888                       100. * i_i8x8 / i_intra,
1889                       100. * h->stat.i_mb_count_8x8dct[1] / h->stat.i_mb_count_8x8dct[0] );
1890         }
1891
1892         if( h->param.analyse.i_direct_mv_pred == X264_DIRECT_PRED_AUTO
1893             && h->stat.i_slice_count[SLICE_TYPE_B] )
1894         {
1895             x264_log( h, X264_LOG_INFO, "direct mvs  spatial:%.1f%%  temporal:%.1f%%\n",
1896                       h->stat.i_direct_frames[1] * 100. / h->stat.i_slice_count[SLICE_TYPE_B],
1897                       h->stat.i_direct_frames[0] * 100. / h->stat.i_slice_count[SLICE_TYPE_B] );
1898         }
1899
1900         if( h->frames.i_max_ref0 > 1 )
1901         {
1902             int i_slice;
1903             for( i_slice = 0; i_slice < 2; i_slice++ )
1904             {
1905                 char buf[200];
1906                 char *p = buf;
1907                 int64_t i_den = 0;
1908                 int i_max = 0;
1909                 for( i = 0; i < h->frames.i_max_ref0 << h->param.b_interlaced; i++ )
1910                     if( h->stat.i_mb_count_ref[i_slice][i] )
1911                     {
1912                         i_den += h->stat.i_mb_count_ref[i_slice][i];
1913                         i_max = i;
1914                     }
1915                 if( i_max == 0 )
1916                     continue;
1917                 for( i = 0; i <= i_max; i++ )
1918                     p += sprintf( p, " %4.1f%%", 100. * h->stat.i_mb_count_ref[i_slice][i] / i_den );
1919                 x264_log( h, X264_LOG_INFO, "ref %c %s\n", i_slice==SLICE_TYPE_P ? 'P' : 'B', buf );
1920             }
1921         }
1922
1923         if( h->param.analyse.b_ssim )
1924         {
1925             x264_log( h, X264_LOG_INFO,
1926                       "SSIM Mean Y:%.7f\n",
1927                       SUM3( h->stat.f_ssim_mean_y ) / i_count );
1928         }
1929         if( h->param.analyse.b_psnr )
1930         {
1931             x264_log( h, X264_LOG_INFO,
1932                       "PSNR Mean Y:%6.3f U:%6.3f V:%6.3f Avg:%6.3f Global:%6.3f kb/s:%.2f\n",
1933                       SUM3( h->stat.f_psnr_mean_y ) / i_count,
1934                       SUM3( h->stat.f_psnr_mean_u ) / i_count,
1935                       SUM3( h->stat.f_psnr_mean_v ) / i_count,
1936                       SUM3( h->stat.f_psnr_average ) / i_count,
1937                       x264_psnr( SUM3( h->stat.i_sqe_global ), i_count * i_yuv_size ),
1938                       f_bitrate );
1939         }
1940         else
1941             x264_log( h, X264_LOG_INFO, "kb/s:%.1f\n", f_bitrate );
1942     }
1943
1944     /* frames */
1945     for( i = 0; h->frames.current[i]; i++ )
1946         x264_frame_delete( h->frames.current[i] );
1947     for( i = 0; h->frames.next[i]; i++ )
1948         x264_frame_delete( h->frames.next[i] );
1949     for( i = 0; h->frames.unused[i]; i++ )
1950         x264_frame_delete( h->frames.unused[i] );
1951     for( i = 0; h->frames.reference[i]; i++ )
1952         x264_frame_delete( h->frames.reference[i] );
1953
1954     /* rc */
1955     x264_ratecontrol_delete( h );
1956
1957     /* param */
1958     if( h->param.rc.psz_stat_out )
1959         free( h->param.rc.psz_stat_out );
1960     if( h->param.rc.psz_stat_in )
1961         free( h->param.rc.psz_stat_in );
1962     if( h->param.rc.psz_rc_eq )
1963         free( h->param.rc.psz_rc_eq );
1964
1965     x264_cqm_delete( h );
1966     for( i = h->param.i_threads - 1; i >= 0; i-- )
1967     {
1968         x264_macroblock_cache_end( h->thread[i] );
1969         x264_free( h->thread[i]->out.p_bitstream );
1970         x264_free( h->thread[i] );
1971     }
1972 }