falkTX
/
FFmpeg
mirror of https://github.com/falkTX/FFmpeg.git
1
0
Fork 0
Code Issues 0 Releases 338 Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
6702 Commits
32 Branches
896MB
Tree: 050b60b2cc
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '050b60b2cc'
${ noResults }
FFmpeg/libavcodec/h264.c

8614 lines
322KB
Raw Blame History 

  1. /*

  2.  * H.26L/H.264/AVC/JVT/14496-10/... encoder/decoder

  3.  * Copyright (c) 2003 Michael Niedermayer <michaelni@gmx.at>

  4.  *

  5.  * This library is free software; you can redistribute it and/or

  6.  * modify it under the terms of the GNU Lesser General Public

  7.  * License as published by the Free Software Foundation; either

  8.  * version 2 of the License, or (at your option) any later version.

  9.  *

  10.  * This library is distributed in the hope that it will be useful,

  11.  * but WITHOUT ANY WARRANTY; without even the implied warranty of

  12.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

  13.  * Lesser General Public License for more details.

  14.  *

  15.  * You should have received a copy of the GNU Lesser General Public

  16.  * License along with this library; if not, write to the Free Software

  17.  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA

  18.  *

  19.  */

  20. 

  21. /**

  22.  * @file h264.c

  23.  * H.264 / AVC / MPEG4 part10 codec.

  24.  * @author Michael Niedermayer <michaelni@gmx.at>

  25.  */

  26. 

  27. #include "common.h"

  28. #include "dsputil.h"

  29. #include "avcodec.h"

  30. #include "mpegvideo.h"

  31. #include "h264data.h"

  32. #include "golomb.h"

  33. 

  34. #include "cabac.h"

  35. 

  36. //#undef NDEBUG

  37. #include <assert.h>

  38. 

  39. #define interlaced_dct interlaced_dct_is_a_bad_name

  40. #define mb_intra mb_intra_isnt_initalized_see_mb_type

  41. 

  42. #define LUMA_DC_BLOCK_INDEX   25

  43. #define CHROMA_DC_BLOCK_INDEX 26

  44. 

  45. #define CHROMA_DC_COEFF_TOKEN_VLC_BITS 8

  46. #define COEFF_TOKEN_VLC_BITS           8

  47. #define TOTAL_ZEROS_VLC_BITS           9

  48. #define CHROMA_DC_TOTAL_ZEROS_VLC_BITS 3

  49. #define RUN_VLC_BITS                   3

  50. #define RUN7_VLC_BITS                  6

  51. 

  52. #define MAX_SPS_COUNT 32

  53. #define MAX_PPS_COUNT 256

  54. 

  55. #define MAX_MMCO_COUNT 66

  56. 

  57. /* Compiling in interlaced support reduces the speed

  58.  * of progressive decoding by about 2%. */

  59. #define ALLOW_INTERLACE

  60. 

  61. #ifdef ALLOW_INTERLACE

  62. #define MB_MBAFF h->mb_mbaff

  63. #define MB_FIELD h->mb_field_decoding_flag

  64. #define FRAME_MBAFF h->mb_aff_frame

  65. #else

  66. #define MB_MBAFF 0

  67. #define MB_FIELD 0

  68. #define FRAME_MBAFF 0

  69. #undef  IS_INTERLACED

  70. #define IS_INTERLACED(mb_type) 0

  71. #endif

  72. 

  73. /**

  74.  * Sequence parameter set

  75.  */

  76. typedef struct SPS{

  77. 

  78.     int profile_idc;

  79.     int level_idc;

  80.     int transform_bypass;              ///< qpprime_y_zero_transform_bypass_flag

  81.     int log2_max_frame_num;            ///< log2_max_frame_num_minus4 + 4

  82.     int poc_type;                      ///< pic_order_cnt_type

  83.     int log2_max_poc_lsb;              ///< log2_max_pic_order_cnt_lsb_minus4

  84.     int delta_pic_order_always_zero_flag;

  85.     int offset_for_non_ref_pic;

  86.     int offset_for_top_to_bottom_field;

  87.     int poc_cycle_length;              ///< num_ref_frames_in_pic_order_cnt_cycle

  88.     int ref_frame_count;               ///< num_ref_frames

  89.     int gaps_in_frame_num_allowed_flag;

  90.     int mb_width;                      ///< frame_width_in_mbs_minus1 + 1

  91.     int mb_height;                     ///< frame_height_in_mbs_minus1 + 1

  92.     int frame_mbs_only_flag;

  93.     int mb_aff;                        ///<mb_adaptive_frame_field_flag

  94.     int direct_8x8_inference_flag;

  95.     int crop;                   ///< frame_cropping_flag

  96.     int crop_left;              ///< frame_cropping_rect_left_offset

  97.     int crop_right;             ///< frame_cropping_rect_right_offset

  98.     int crop_top;               ///< frame_cropping_rect_top_offset

  99.     int crop_bottom;            ///< frame_cropping_rect_bottom_offset

  100.     int vui_parameters_present_flag;

  101.     AVRational sar;

  102.     int timing_info_present_flag;

  103.     uint32_t num_units_in_tick;

  104.     uint32_t time_scale;

  105.     int fixed_frame_rate_flag;

  106.     short offset_for_ref_frame[256]; //FIXME dyn aloc?

  107.     int bitstream_restriction_flag;

  108.     int num_reorder_frames;

  109.     int scaling_matrix_present;

  110.     uint8_t scaling_matrix4[6][16];

  111.     uint8_t scaling_matrix8[2][64];

  112. }SPS;

  113. 

  114. /**

  115.  * Picture parameter set

  116.  */

  117. typedef struct PPS{

  118.     int sps_id;

  119.     int cabac;                  ///< entropy_coding_mode_flag

  120.     int pic_order_present;      ///< pic_order_present_flag

  121.     int slice_group_count;      ///< num_slice_groups_minus1 + 1

  122.     int mb_slice_group_map_type;

  123.     int ref_count[2];           ///< num_ref_idx_l0/1_active_minus1 + 1

  124.     int weighted_pred;          ///< weighted_pred_flag

  125.     int weighted_bipred_idc;

  126.     int init_qp;                ///< pic_init_qp_minus26 + 26

  127.     int init_qs;                ///< pic_init_qs_minus26 + 26

  128.     int chroma_qp_index_offset;

  129.     int deblocking_filter_parameters_present; ///< deblocking_filter_parameters_present_flag

  130.     int constrained_intra_pred; ///< constrained_intra_pred_flag

  131.     int redundant_pic_cnt_present; ///< redundant_pic_cnt_present_flag

  132.     int transform_8x8_mode;     ///< transform_8x8_mode_flag

  133.     uint8_t scaling_matrix4[6][16];

  134.     uint8_t scaling_matrix8[2][64];

  135. }PPS;

  136. 

  137. /**

  138.  * Memory management control operation opcode.

  139.  */

  140. typedef enum MMCOOpcode{

  141.     MMCO_END=0,

  142.     MMCO_SHORT2UNUSED,

  143.     MMCO_LONG2UNUSED,

  144.     MMCO_SHORT2LONG,

  145.     MMCO_SET_MAX_LONG,

  146.     MMCO_RESET,

  147.     MMCO_LONG,

  148. } MMCOOpcode;

  149. 

  150. /**

  151.  * Memory management control operation.

  152.  */

  153. typedef struct MMCO{

  154.     MMCOOpcode opcode;

  155.     int short_frame_num;

  156.     int long_index;

  157. } MMCO;

  158. 

  159. /**

  160.  * H264Context

  161.  */

  162. typedef struct H264Context{

  163.     MpegEncContext s;

  164.     int nal_ref_idc;

  165.     int nal_unit_type;

  166. #define NAL_SLICE                1

  167. #define NAL_DPA                  2

  168. #define NAL_DPB                  3

  169. #define NAL_DPC                  4

  170. #define NAL_IDR_SLICE            5

  171. #define NAL_SEI                  6

  172. #define NAL_SPS                  7

  173. #define NAL_PPS                  8

  174. #define NAL_AUD                  9

  175. #define NAL_END_SEQUENCE        10

  176. #define NAL_END_STREAM          11

  177. #define NAL_FILLER_DATA         12

  178. #define NAL_SPS_EXT             13

  179. #define NAL_AUXILIARY_SLICE     19

  180.     uint8_t *rbsp_buffer;

  181.     unsigned int rbsp_buffer_size;

  182. 

  183.     /**

  184.       * Used to parse AVC variant of h264

  185.       */

  186.     int is_avc; ///< this flag is != 0 if codec is avc1

  187.     int got_avcC; ///< flag used to parse avcC data only once

  188.     int nal_length_size; ///< Number of bytes used for nal length (1, 2 or 4)

  189. 

  190.     int chroma_qp; //QPc

  191. 

  192.     int prev_mb_skipped;

  193.     int next_mb_skipped;

  194. 

  195.     //prediction stuff

  196.     int chroma_pred_mode;

  197.     int intra16x16_pred_mode;

  198. 

  199.     int top_mb_xy;

  200.     int left_mb_xy[2];

  201. 

  202.     int8_t intra4x4_pred_mode_cache[5*8];

  203.     int8_t (*intra4x4_pred_mode)[8];

  204.     void (*pred4x4  [9+3])(uint8_t *src, uint8_t *topright, int stride);//FIXME move to dsp?

  205.     void (*pred8x8l [9+3])(uint8_t *src, int topleft, int topright, int stride);

  206.     void (*pred8x8  [4+3])(uint8_t *src, int stride);

  207.     void (*pred16x16[4+3])(uint8_t *src, int stride);

  208.     unsigned int topleft_samples_available;

  209.     unsigned int top_samples_available;

  210.     unsigned int topright_samples_available;

  211.     unsigned int left_samples_available;

  212.     uint8_t (*top_borders[2])[16+2*8];

  213.     uint8_t left_border[2*(17+2*9)];

  214. 

  215.     /**

  216.      * non zero coeff count cache.

  217.      * is 64 if not available.

  218.      */

  219.     DECLARE_ALIGNED_8(uint8_t, non_zero_count_cache[6*8]);

  220.     uint8_t (*non_zero_count)[16];

  221. 

  222.     /**

  223.      * Motion vector cache.

  224.      */

  225.     DECLARE_ALIGNED_8(int16_t, mv_cache[2][5*8][2]);

  226.     DECLARE_ALIGNED_8(int8_t, ref_cache[2][5*8]);

  227. #define LIST_NOT_USED -1 //FIXME rename?

  228. #define PART_NOT_AVAILABLE -2

  229. 

  230.     /**

  231.      * is 1 if the specific list MV&references are set to 0,0,-2.

  232.      */

  233.     int mv_cache_clean[2];

  234. 

  235.     /**

  236.      * number of neighbors (top and/or left) that used 8x8 dct

  237.      */

  238.     int neighbor_transform_size;

  239. 

  240.     /**

  241.      * block_offset[ 0..23] for frame macroblocks

  242.      * block_offset[24..47] for field macroblocks

  243.      */

  244.     int block_offset[2*(16+8)];

  245. 

  246.     uint32_t *mb2b_xy; //FIXME are these 4 a good idea?

  247.     uint32_t *mb2b8_xy;

  248.     int b_stride; //FIXME use s->b4_stride

  249.     int b8_stride;

  250. 

  251.     int mb_linesize;   ///< may be equal to s->linesize or s->linesize*2, for mbaff

  252.     int mb_uvlinesize;

  253. 

  254.     int emu_edge_width;

  255.     int emu_edge_height;

  256. 

  257.     int halfpel_flag;

  258.     int thirdpel_flag;

  259. 

  260.     int unknown_svq3_flag;

  261.     int next_slice_index;

  262. 

  263.     SPS sps_buffer[MAX_SPS_COUNT];

  264.     SPS sps; ///< current sps

  265. 

  266.     PPS pps_buffer[MAX_PPS_COUNT];

  267.     /**

  268.      * current pps

  269.      */

  270.     PPS pps; //FIXME move to Picture perhaps? (->no) do we need that?

  271. 

  272.     uint32_t dequant4_buffer[6][52][16];

  273.     uint32_t dequant8_buffer[2][52][64];

  274.     uint32_t (*dequant4_coeff[6])[16];

  275.     uint32_t (*dequant8_coeff[2])[64];

  276.     int dequant_coeff_pps;     ///< reinit tables when pps changes

  277. 

  278.     int slice_num;

  279.     uint8_t *slice_table_base;

  280.     uint8_t *slice_table;      ///< slice_table_base + 2*mb_stride + 1

  281.     int slice_type;

  282.     int slice_type_fixed;

  283. 

  284.     //interlacing specific flags

  285.     int mb_aff_frame;

  286.     int mb_field_decoding_flag;

  287.     int mb_mbaff;              ///< mb_aff_frame && mb_field_decoding_flag

  288. 

  289.     int sub_mb_type[4];

  290. 

  291.     //POC stuff

  292.     int poc_lsb;

  293.     int poc_msb;

  294.     int delta_poc_bottom;

  295.     int delta_poc[2];

  296.     int frame_num;

  297.     int prev_poc_msb;             ///< poc_msb of the last reference pic for POC type 0

  298.     int prev_poc_lsb;             ///< poc_lsb of the last reference pic for POC type 0

  299.     int frame_num_offset;         ///< for POC type 2

  300.     int prev_frame_num_offset;    ///< for POC type 2

  301.     int prev_frame_num;           ///< frame_num of the last pic for POC type 1/2

  302. 

  303.     /**

  304.      * frame_num for frames or 2*frame_num for field pics.

  305.      */

  306.     int curr_pic_num;

  307. 

  308.     /**

  309.      * max_frame_num or 2*max_frame_num for field pics.

  310.      */

  311.     int max_pic_num;

  312. 

  313.     //Weighted pred stuff

  314.     int use_weight;

  315.     int use_weight_chroma;

  316.     int luma_log2_weight_denom;

  317.     int chroma_log2_weight_denom;

  318.     int luma_weight[2][48];

  319.     int luma_offset[2][48];

  320.     int chroma_weight[2][48][2];

  321.     int chroma_offset[2][48][2];

  322.     int implicit_weight[48][48];

  323. 

  324.     //deblock

  325.     int deblocking_filter;         ///< disable_deblocking_filter_idc with 1<->0

  326.     int slice_alpha_c0_offset;

  327.     int slice_beta_offset;

  328. 

  329.     int redundant_pic_count;

  330. 

  331.     int direct_spatial_mv_pred;

  332.     int dist_scale_factor[16];

  333.     int dist_scale_factor_field[32];

  334.     int map_col_to_list0[2][16];

  335.     int map_col_to_list0_field[2][32];

  336. 

  337.     /**

  338.      * num_ref_idx_l0/1_active_minus1 + 1

  339.      */

  340.     int ref_count[2];            ///< counts frames or fields, depending on current mb mode

  341.     Picture *short_ref[32];

  342.     Picture *long_ref[32];

  343.     Picture default_ref_list[2][32];

  344.     Picture ref_list[2][48];     ///< 0..15: frame refs, 16..47: mbaff field refs

  345.     Picture *delayed_pic[16]; //FIXME size?

  346.     Picture *delayed_output_pic;

  347. 

  348.     /**

  349.      * memory management control operations buffer.

  350.      */

  351.     MMCO mmco[MAX_MMCO_COUNT];

  352.     int mmco_index;

  353. 

  354.     int long_ref_count;  ///< number of actual long term references

  355.     int short_ref_count; ///< number of actual short term references

  356. 

  357.     //data partitioning

  358.     GetBitContext intra_gb;

  359.     GetBitContext inter_gb;

  360.     GetBitContext *intra_gb_ptr;

  361.     GetBitContext *inter_gb_ptr;

  362. 

  363.     DECLARE_ALIGNED_8(DCTELEM, mb[16*24]);

  364. 

  365.     /**

  366.      * Cabac

  367.      */

  368.     CABACContext cabac;

  369.     uint8_t      cabac_state[460];

  370.     int          cabac_init_idc;

  371. 

  372.     /* 0x100 -> non null luma_dc, 0x80/0x40 -> non null chroma_dc (cb/cr), 0x?0 -> chroma_cbp(0,1,2), 0x0? luma_cbp */

  373.     uint16_t     *cbp_table;

  374.     int cbp;

  375.     int top_cbp;

  376.     int left_cbp;

  377.     /* chroma_pred_mode for i4x4 or i16x16, else 0 */

  378.     uint8_t     *chroma_pred_mode_table;

  379.     int         last_qscale_diff;

  380.     int16_t     (*mvd_table[2])[2];

  381.     DECLARE_ALIGNED_8(int16_t, mvd_cache[2][5*8][2]);

  382.     uint8_t     *direct_table;

  383.     uint8_t     direct_cache[5*8];

  384. 

  385.     uint8_t zigzag_scan[16];

  386.     uint8_t zigzag_scan8x8[64];

  387.     uint8_t zigzag_scan8x8_cavlc[64];

  388.     uint8_t field_scan[16];

  389.     uint8_t field_scan8x8[64];

  390.     uint8_t field_scan8x8_cavlc[64];

  391.     const uint8_t *zigzag_scan_q0;

  392.     const uint8_t *zigzag_scan8x8_q0;

  393.     const uint8_t *zigzag_scan8x8_cavlc_q0;

  394.     const uint8_t *field_scan_q0;

  395.     const uint8_t *field_scan8x8_q0;

  396.     const uint8_t *field_scan8x8_cavlc_q0;

  397. 

  398.     int x264_build;

  399. }H264Context;

  400. 

  401. static VLC coeff_token_vlc[4];

  402. static VLC chroma_dc_coeff_token_vlc;

  403. 

  404. static VLC total_zeros_vlc[15];

  405. static VLC chroma_dc_total_zeros_vlc[3];

  406. 

  407. static VLC run_vlc[6];

  408. static VLC run7_vlc;

  409. 

  410. static void svq3_luma_dc_dequant_idct_c(DCTELEM *block, int qp);

  411. static void svq3_add_idct_c(uint8_t *dst, DCTELEM *block, int stride, int qp, int dc);

  412. static void filter_mb( H264Context *h, int mb_x, int mb_y, uint8_t *img_y, uint8_t *img_cb, uint8_t *img_cr, unsigned int linesize, unsigned int uvlinesize);

  413. static void filter_mb_fast( H264Context *h, int mb_x, int mb_y, uint8_t *img_y, uint8_t *img_cb, uint8_t *img_cr, unsigned int linesize, unsigned int uvlinesize);

  414. 

  415. static always_inline uint32_t pack16to32(int a, int b){

  416. #ifdef WORDS_BIGENDIAN

  417.    return (b&0xFFFF) + (a<<16);

  418. #else

  419.    return (a&0xFFFF) + (b<<16);

  420. #endif

  421. }

  422. 

  423. /**

  424.  * fill a rectangle.

  425.  * @param h height of the rectangle, should be a constant

  426.  * @param w width of the rectangle, should be a constant

  427.  * @param size the size of val (1 or 4), should be a constant

  428.  */

  429. static always_inline void fill_rectangle(void *vp, int w, int h, int stride, uint32_t val, int size){

  430.     uint8_t *p= (uint8_t*)vp;

  431.     assert(size==1 || size==4);

  432.     assert(w<=4);

  433. 

  434.     w      *= size;

  435.     stride *= size;

  436. 

  437.     assert((((long)vp)&(FFMIN(w, STRIDE_ALIGN)-1)) == 0);

  438.     assert((stride&(w-1))==0);

  439.     if(w==2){

  440.         const uint16_t v= size==4 ? val : val*0x0101;

  441.         *(uint16_t*)(p + 0*stride)= v;

  442.         if(h==1) return;

  443.         *(uint16_t*)(p + 1*stride)= v;

  444.         if(h==2) return;

  445.         *(uint16_t*)(p + 2*stride)=

  446.         *(uint16_t*)(p + 3*stride)= v;

  447.     }else if(w==4){

  448.         const uint32_t v= size==4 ? val : val*0x01010101;

  449.         *(uint32_t*)(p + 0*stride)= v;

  450.         if(h==1) return;

  451.         *(uint32_t*)(p + 1*stride)= v;

  452.         if(h==2) return;

  453.         *(uint32_t*)(p + 2*stride)=

  454.         *(uint32_t*)(p + 3*stride)= v;

  455.     }else if(w==8){

  456.     //gcc can't optimize 64bit math on x86_32

  457. #if defined(ARCH_X86_64) || (defined(MP_WORDSIZE) && MP_WORDSIZE >= 64)

  458.         const uint64_t v= val*0x0100000001ULL;

  459.         *(uint64_t*)(p + 0*stride)= v;

  460.         if(h==1) return;

  461.         *(uint64_t*)(p + 1*stride)= v;

  462.         if(h==2) return;

  463.         *(uint64_t*)(p + 2*stride)=

  464.         *(uint64_t*)(p + 3*stride)= v;

  465.     }else if(w==16){

  466.         const uint64_t v= val*0x0100000001ULL;

  467.         *(uint64_t*)(p + 0+0*stride)=

  468.         *(uint64_t*)(p + 8+0*stride)=

  469.         *(uint64_t*)(p + 0+1*stride)=

  470.         *(uint64_t*)(p + 8+1*stride)= v;

  471.         if(h==2) return;

  472.         *(uint64_t*)(p + 0+2*stride)=

  473.         *(uint64_t*)(p + 8+2*stride)=

  474.         *(uint64_t*)(p + 0+3*stride)=

  475.         *(uint64_t*)(p + 8+3*stride)= v;

  476. #else

  477.         *(uint32_t*)(p + 0+0*stride)=

  478.         *(uint32_t*)(p + 4+0*stride)= val;

  479.         if(h==1) return;

  480.         *(uint32_t*)(p + 0+1*stride)=

  481.         *(uint32_t*)(p + 4+1*stride)= val;

  482.         if(h==2) return;

  483.         *(uint32_t*)(p + 0+2*stride)=

  484.         *(uint32_t*)(p + 4+2*stride)=

  485.         *(uint32_t*)(p + 0+3*stride)=

  486.         *(uint32_t*)(p + 4+3*stride)= val;

  487.     }else if(w==16){

  488.         *(uint32_t*)(p + 0+0*stride)=

  489.         *(uint32_t*)(p + 4+0*stride)=

  490.         *(uint32_t*)(p + 8+0*stride)=

  491.         *(uint32_t*)(p +12+0*stride)=

  492.         *(uint32_t*)(p + 0+1*stride)=

  493.         *(uint32_t*)(p + 4+1*stride)=

  494.         *(uint32_t*)(p + 8+1*stride)=

  495.         *(uint32_t*)(p +12+1*stride)= val;

  496.         if(h==2) return;

  497.         *(uint32_t*)(p + 0+2*stride)=

  498.         *(uint32_t*)(p + 4+2*stride)=

  499.         *(uint32_t*)(p + 8+2*stride)=

  500.         *(uint32_t*)(p +12+2*stride)=

  501.         *(uint32_t*)(p + 0+3*stride)=

  502.         *(uint32_t*)(p + 4+3*stride)=

  503.         *(uint32_t*)(p + 8+3*stride)=

  504.         *(uint32_t*)(p +12+3*stride)= val;

  505. #endif

  506.     }else

  507.         assert(0);

  508.     assert(h==4);

  509. }

  510. 

  511. static void fill_caches(H264Context *h, int mb_type, int for_deblock){

  512.     MpegEncContext * const s = &h->s;

  513.     const int mb_xy= s->mb_x + s->mb_y*s->mb_stride;

  514.     int topleft_xy, top_xy, topright_xy, left_xy[2];

  515.     int topleft_type, top_type, topright_type, left_type[2];

  516.     int left_block[8];

  517.     int i;

  518. 

  519.     //FIXME deblocking could skip the intra and nnz parts.

  520.     if(for_deblock && (h->slice_num == 1 || h->slice_table[mb_xy] == h->slice_table[mb_xy-s->mb_stride]) && !FRAME_MBAFF)

  521.         return;

  522. 

  523.     //wow what a mess, why didn't they simplify the interlacing&intra stuff, i can't imagine that these complex rules are worth it

  524. 

  525.     top_xy     = mb_xy  - s->mb_stride;

  526.     topleft_xy = top_xy - 1;

  527.     topright_xy= top_xy + 1;

  528.     left_xy[1] = left_xy[0] = mb_xy-1;

  529.     left_block[0]= 0;

  530.     left_block[1]= 1;

  531.     left_block[2]= 2;

  532.     left_block[3]= 3;

  533.     left_block[4]= 7;

  534.     left_block[5]= 10;

  535.     left_block[6]= 8;

  536.     left_block[7]= 11;

  537.     if(FRAME_MBAFF){

  538.         const int pair_xy          = s->mb_x     + (s->mb_y & ~1)*s->mb_stride;

  539.         const int top_pair_xy      = pair_xy     - s->mb_stride;

  540.         const int topleft_pair_xy  = top_pair_xy - 1;

  541.         const int topright_pair_xy = top_pair_xy + 1;

  542.         const int topleft_mb_frame_flag  = !IS_INTERLACED(s->current_picture.mb_type[topleft_pair_xy]);

  543.         const int top_mb_frame_flag      = !IS_INTERLACED(s->current_picture.mb_type[top_pair_xy]);

  544.         const int topright_mb_frame_flag = !IS_INTERLACED(s->current_picture.mb_type[topright_pair_xy]);

  545.         const int left_mb_frame_flag = !IS_INTERLACED(s->current_picture.mb_type[pair_xy-1]);

  546.         const int curr_mb_frame_flag = !IS_INTERLACED(mb_type);

  547.         const int bottom = (s->mb_y & 1);

  548.         tprintf("fill_caches: curr_mb_frame_flag:%d, left_mb_frame_flag:%d, topleft_mb_frame_flag:%d, top_mb_frame_flag:%d, topright_mb_frame_flag:%d\n", curr_mb_frame_flag, left_mb_frame_flag, topleft_mb_frame_flag, top_mb_frame_flag, topright_mb_frame_flag);

  549.         if (bottom

  550.                 ? !curr_mb_frame_flag // bottom macroblock

  551.                 : (!curr_mb_frame_flag && !top_mb_frame_flag) // top macroblock

  552.                 ) {

  553.             top_xy -= s->mb_stride;

  554.         }

  555.         if (bottom

  556.                 ? !curr_mb_frame_flag // bottom macroblock

  557.                 : (!curr_mb_frame_flag && !topleft_mb_frame_flag) // top macroblock

  558.                 ) {

  559.             topleft_xy -= s->mb_stride;

  560.         }

  561.         if (bottom

  562.                 ? !curr_mb_frame_flag // bottom macroblock

  563.                 : (!curr_mb_frame_flag && !topright_mb_frame_flag) // top macroblock

  564.                 ) {

  565.             topright_xy -= s->mb_stride;

  566.         }

  567.         if (left_mb_frame_flag != curr_mb_frame_flag) {

  568.             left_xy[1] = left_xy[0] = pair_xy - 1;

  569.             if (curr_mb_frame_flag) {

  570.                 if (bottom) {

  571.                     left_block[0]= 2;

  572.                     left_block[1]= 2;

  573.                     left_block[2]= 3;

  574.                     left_block[3]= 3;

  575.                     left_block[4]= 8;

  576.                     left_block[5]= 11;

  577.                     left_block[6]= 8;

  578.                     left_block[7]= 11;

  579.                 } else {

  580.                     left_block[0]= 0;

  581.                     left_block[1]= 0;

  582.                     left_block[2]= 1;

  583.                     left_block[3]= 1;

  584.                     left_block[4]= 7;

  585.                     left_block[5]= 10;

  586.                     left_block[6]= 7;

  587.                     left_block[7]= 10;

  588.                 }

  589.             } else {

  590.                 left_xy[1] += s->mb_stride;

  591.                 //left_block[0]= 0;

  592.                 left_block[1]= 2;

  593.                 left_block[2]= 0;

  594.                 left_block[3]= 2;

  595.                 //left_block[4]= 7;

  596.                 left_block[5]= 10;

  597.                 left_block[6]= 7;

  598.                 left_block[7]= 10;

  599.             }

  600.         }

  601.     }

  602. 

  603.     h->top_mb_xy = top_xy;

  604.     h->left_mb_xy[0] = left_xy[0];

  605.     h->left_mb_xy[1] = left_xy[1];

  606.     if(for_deblock){

  607.         topleft_type = 0;

  608.         topright_type = 0;

  609.         top_type     = h->slice_table[top_xy     ] < 255 ? s->current_picture.mb_type[top_xy]     : 0;

  610.         left_type[0] = h->slice_table[left_xy[0] ] < 255 ? s->current_picture.mb_type[left_xy[0]] : 0;

  611.         left_type[1] = h->slice_table[left_xy[1] ] < 255 ? s->current_picture.mb_type[left_xy[1]] : 0;

  612. 

  613.         if(FRAME_MBAFF && !IS_INTRA(mb_type)){

  614.             int list;

  615.             int v = *(uint16_t*)&h->non_zero_count[mb_xy][14];

  616.             for(i=0; i<16; i++)

  617.                 h->non_zero_count_cache[scan8[i]] = (v>>i)&1;

  618.             for(list=0; list<1+(h->slice_type==B_TYPE); list++){

  619.                 if(USES_LIST(mb_type,list)){

  620.                     uint32_t *src = (uint32_t*)s->current_picture.motion_val[list][h->mb2b_xy[mb_xy]];

  621.                     uint32_t *dst = (uint32_t*)h->mv_cache[list][scan8[0]];

  622.                     uint8_t *ref = &s->current_picture.ref_index[list][h->mb2b8_xy[mb_xy]];

  623.                     for(i=0; i<4; i++, dst+=8, src+=h->b_stride){

  624.                         dst[0] = src[0];

  625.                         dst[1] = src[1];

  626.                         dst[2] = src[2];

  627.                         dst[3] = src[3];

  628.                     }

  629.                     *(uint32_t*)&h->ref_cache[list][scan8[ 0]] =

  630.                     *(uint32_t*)&h->ref_cache[list][scan8[ 2]] = pack16to32(ref[0],ref[1])*0x0101;

  631.                     ref += h->b8_stride;

  632.                     *(uint32_t*)&h->ref_cache[list][scan8[ 8]] =

  633.                     *(uint32_t*)&h->ref_cache[list][scan8[10]] = pack16to32(ref[0],ref[1])*0x0101;

  634.                 }else{

  635.                     fill_rectangle(&h-> mv_cache[list][scan8[ 0]], 4, 4, 8, 0, 4);

  636.                     fill_rectangle(&h->ref_cache[list][scan8[ 0]], 4, 4, 8, (uint8_t)LIST_NOT_USED, 1);

  637.                 }

  638.             }

  639.         }

  640.     }else{

  641.         topleft_type = h->slice_table[topleft_xy ] == h->slice_num ? s->current_picture.mb_type[topleft_xy] : 0;

  642.         top_type     = h->slice_table[top_xy     ] == h->slice_num ? s->current_picture.mb_type[top_xy]     : 0;

  643.         topright_type= h->slice_table[topright_xy] == h->slice_num ? s->current_picture.mb_type[topright_xy]: 0;

  644.         left_type[0] = h->slice_table[left_xy[0] ] == h->slice_num ? s->current_picture.mb_type[left_xy[0]] : 0;

  645.         left_type[1] = h->slice_table[left_xy[1] ] == h->slice_num ? s->current_picture.mb_type[left_xy[1]] : 0;

  646.     }

  647. 

  648.     if(IS_INTRA(mb_type)){

  649.         h->topleft_samples_available=

  650.         h->top_samples_available=

  651.         h->left_samples_available= 0xFFFF;

  652.         h->topright_samples_available= 0xEEEA;

  653. 

  654.         if(!IS_INTRA(top_type) && (top_type==0 || h->pps.constrained_intra_pred)){

  655.             h->topleft_samples_available= 0xB3FF;

  656.             h->top_samples_available= 0x33FF;

  657.             h->topright_samples_available= 0x26EA;

  658.         }

  659.         for(i=0; i<2; i++){

  660.             if(!IS_INTRA(left_type[i]) && (left_type[i]==0 || h->pps.constrained_intra_pred)){

  661.                 h->topleft_samples_available&= 0xDF5F;

  662.                 h->left_samples_available&= 0x5F5F;

  663.             }

  664.         }

  665. 

  666.         if(!IS_INTRA(topleft_type) && (topleft_type==0 || h->pps.constrained_intra_pred))

  667.             h->topleft_samples_available&= 0x7FFF;

  668. 

  669.         if(!IS_INTRA(topright_type) && (topright_type==0 || h->pps.constrained_intra_pred))

  670.             h->topright_samples_available&= 0xFBFF;

  671. 

  672.         if(IS_INTRA4x4(mb_type)){

  673.             if(IS_INTRA4x4(top_type)){

  674.                 h->intra4x4_pred_mode_cache[4+8*0]= h->intra4x4_pred_mode[top_xy][4];

  675.                 h->intra4x4_pred_mode_cache[5+8*0]= h->intra4x4_pred_mode[top_xy][5];

  676.                 h->intra4x4_pred_mode_cache[6+8*0]= h->intra4x4_pred_mode[top_xy][6];

  677.                 h->intra4x4_pred_mode_cache[7+8*0]= h->intra4x4_pred_mode[top_xy][3];

  678.             }else{

  679.                 int pred;

  680.                 if(!top_type || (IS_INTER(top_type) && h->pps.constrained_intra_pred))

  681.                     pred= -1;

  682.                 else{

  683.                     pred= 2;

  684.                 }

  685.                 h->intra4x4_pred_mode_cache[4+8*0]=

  686.                 h->intra4x4_pred_mode_cache[5+8*0]=

  687.                 h->intra4x4_pred_mode_cache[6+8*0]=

  688.                 h->intra4x4_pred_mode_cache[7+8*0]= pred;

  689.             }

  690.             for(i=0; i<2; i++){

  691.                 if(IS_INTRA4x4(left_type[i])){

  692.                     h->intra4x4_pred_mode_cache[3+8*1 + 2*8*i]= h->intra4x4_pred_mode[left_xy[i]][left_block[0+2*i]];

  693.                     h->intra4x4_pred_mode_cache[3+8*2 + 2*8*i]= h->intra4x4_pred_mode[left_xy[i]][left_block[1+2*i]];

  694.                 }else{

  695.                     int pred;

  696.                     if(!left_type[i] || (IS_INTER(left_type[i]) && h->pps.constrained_intra_pred))

  697.                         pred= -1;

  698.                     else{

  699.                         pred= 2;

  700.                     }

  701.                     h->intra4x4_pred_mode_cache[3+8*1 + 2*8*i]=

  702.                     h->intra4x4_pred_mode_cache[3+8*2 + 2*8*i]= pred;

  703.                 }

  704.             }

  705.         }

  706.     }

  707. 

  708. 

  709. /*

  710. 0 . T T. T T T T

  711. 1 L . .L . . . .

  712. 2 L . .L . . . .

  713. 3 . T TL . . . .

  714. 4 L . .L . . . .

  715. 5 L . .. . . . .

  716. */

  717. //FIXME constraint_intra_pred & partitioning & nnz (lets hope this is just a typo in the spec)

  718.     if(top_type){

  719.         h->non_zero_count_cache[4+8*0]= h->non_zero_count[top_xy][4];

  720.         h->non_zero_count_cache[5+8*0]= h->non_zero_count[top_xy][5];

  721.         h->non_zero_count_cache[6+8*0]= h->non_zero_count[top_xy][6];

  722.         h->non_zero_count_cache[7+8*0]= h->non_zero_count[top_xy][3];

  723. 

  724.         h->non_zero_count_cache[1+8*0]= h->non_zero_count[top_xy][9];

  725.         h->non_zero_count_cache[2+8*0]= h->non_zero_count[top_xy][8];

  726. 

  727.         h->non_zero_count_cache[1+8*3]= h->non_zero_count[top_xy][12];

  728.         h->non_zero_count_cache[2+8*3]= h->non_zero_count[top_xy][11];

  729. 

  730.     }else{

  731.         h->non_zero_count_cache[4+8*0]=

  732.         h->non_zero_count_cache[5+8*0]=

  733.         h->non_zero_count_cache[6+8*0]=

  734.         h->non_zero_count_cache[7+8*0]=

  735. 

  736.         h->non_zero_count_cache[1+8*0]=

  737.         h->non_zero_count_cache[2+8*0]=

  738. 

  739.         h->non_zero_count_cache[1+8*3]=

  740.         h->non_zero_count_cache[2+8*3]= h->pps.cabac && !IS_INTRA(mb_type) ? 0 : 64;

  741. 

  742.     }

  743. 

  744.     for (i=0; i<2; i++) {

  745.         if(left_type[i]){

  746.             h->non_zero_count_cache[3+8*1 + 2*8*i]= h->non_zero_count[left_xy[i]][left_block[0+2*i]];

  747.             h->non_zero_count_cache[3+8*2 + 2*8*i]= h->non_zero_count[left_xy[i]][left_block[1+2*i]];

  748.             h->non_zero_count_cache[0+8*1 +   8*i]= h->non_zero_count[left_xy[i]][left_block[4+2*i]];

  749.             h->non_zero_count_cache[0+8*4 +   8*i]= h->non_zero_count[left_xy[i]][left_block[5+2*i]];

  750.         }else{

  751.             h->non_zero_count_cache[3+8*1 + 2*8*i]=

  752.             h->non_zero_count_cache[3+8*2 + 2*8*i]=

  753.             h->non_zero_count_cache[0+8*1 +   8*i]=

  754.             h->non_zero_count_cache[0+8*4 +   8*i]= h->pps.cabac && !IS_INTRA(mb_type) ? 0 : 64;

  755.         }

  756.     }

  757. 

  758.     if( h->pps.cabac ) {

  759.         // top_cbp

  760.         if(top_type) {

  761.             h->top_cbp = h->cbp_table[top_xy];

  762.         } else if(IS_INTRA(mb_type)) {

  763.             h->top_cbp = 0x1C0;

  764.         } else {

  765.             h->top_cbp = 0;

  766.         }

  767.         // left_cbp

  768.         if (left_type[0]) {

  769.             h->left_cbp = h->cbp_table[left_xy[0]] & 0x1f0;

  770.         } else if(IS_INTRA(mb_type)) {

  771.             h->left_cbp = 0x1C0;

  772.         } else {

  773.             h->left_cbp = 0;

  774.         }

  775.         if (left_type[0]) {

  776.             h->left_cbp |= ((h->cbp_table[left_xy[0]]>>((left_block[0]&(~1))+1))&0x1) << 1;

  777.         }

  778.         if (left_type[1]) {

  779.             h->left_cbp |= ((h->cbp_table[left_xy[1]]>>((left_block[2]&(~1))+1))&0x1) << 3;

  780.         }

  781.     }

  782. 

  783. #if 1

  784.     if(IS_INTER(mb_type) || IS_DIRECT(mb_type)){

  785.         int list;

  786.         for(list=0; list<1+(h->slice_type==B_TYPE); list++){

  787.             if(!USES_LIST(mb_type, list) && !IS_DIRECT(mb_type) && !h->deblocking_filter){

  788.                 /*if(!h->mv_cache_clean[list]){

  789.                     memset(h->mv_cache [list],  0, 8*5*2*sizeof(int16_t)); //FIXME clean only input? clean at all?

  790.                     memset(h->ref_cache[list], PART_NOT_AVAILABLE, 8*5*sizeof(int8_t));

  791.                     h->mv_cache_clean[list]= 1;

  792.                 }*/

  793.                 continue;

  794.             }

  795.             h->mv_cache_clean[list]= 0;

  796. 

  797.             if(USES_LIST(top_type, list)){

  798.                 const int b_xy= h->mb2b_xy[top_xy] + 3*h->b_stride;

  799.                 const int b8_xy= h->mb2b8_xy[top_xy] + h->b8_stride;

  800.                 *(uint32_t*)h->mv_cache[list][scan8[0] + 0 - 1*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy + 0];

  801.                 *(uint32_t*)h->mv_cache[list][scan8[0] + 1 - 1*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy + 1];

  802.                 *(uint32_t*)h->mv_cache[list][scan8[0] + 2 - 1*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy + 2];

  803.                 *(uint32_t*)h->mv_cache[list][scan8[0] + 3 - 1*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy + 3];

  804.                 h->ref_cache[list][scan8[0] + 0 - 1*8]=

  805.                 h->ref_cache[list][scan8[0] + 1 - 1*8]= s->current_picture.ref_index[list][b8_xy + 0];

  806.                 h->ref_cache[list][scan8[0] + 2 - 1*8]=

  807.                 h->ref_cache[list][scan8[0] + 3 - 1*8]= s->current_picture.ref_index[list][b8_xy + 1];

  808.             }else{

  809.                 *(uint32_t*)h->mv_cache [list][scan8[0] + 0 - 1*8]=

  810.                 *(uint32_t*)h->mv_cache [list][scan8[0] + 1 - 1*8]=

  811.                 *(uint32_t*)h->mv_cache [list][scan8[0] + 2 - 1*8]=

  812.                 *(uint32_t*)h->mv_cache [list][scan8[0] + 3 - 1*8]= 0;

  813.                 *(uint32_t*)&h->ref_cache[list][scan8[0] + 0 - 1*8]= ((top_type ? LIST_NOT_USED : PART_NOT_AVAILABLE)&0xFF)*0x01010101;

  814.             }

  815. 

  816.             //FIXME unify cleanup or sth

  817.             if(USES_LIST(left_type[0], list)){

  818.                 const int b_xy= h->mb2b_xy[left_xy[0]] + 3;

  819.                 const int b8_xy= h->mb2b8_xy[left_xy[0]] + 1;

  820.                 *(uint32_t*)h->mv_cache[list][scan8[0] - 1 + 0*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy + h->b_stride*left_block[0]];

  821.                 *(uint32_t*)h->mv_cache[list][scan8[0] - 1 + 1*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy + h->b_stride*left_block[1]];

  822.                 h->ref_cache[list][scan8[0] - 1 + 0*8]= s->current_picture.ref_index[list][b8_xy + h->b8_stride*(left_block[0]>>1)];

  823.                 h->ref_cache[list][scan8[0] - 1 + 1*8]= s->current_picture.ref_index[list][b8_xy + h->b8_stride*(left_block[1]>>1)];

  824.             }else{

  825.                 *(uint32_t*)h->mv_cache [list][scan8[0] - 1 + 0*8]=

  826.                 *(uint32_t*)h->mv_cache [list][scan8[0] - 1 + 1*8]= 0;

  827.                 h->ref_cache[list][scan8[0] - 1 + 0*8]=

  828.                 h->ref_cache[list][scan8[0] - 1 + 1*8]= left_type[0] ? LIST_NOT_USED : PART_NOT_AVAILABLE;

  829.             }

  830. 

  831.             if(USES_LIST(left_type[1], list)){

  832.                 const int b_xy= h->mb2b_xy[left_xy[1]] + 3;

  833.                 const int b8_xy= h->mb2b8_xy[left_xy[1]] + 1;

  834.                 *(uint32_t*)h->mv_cache[list][scan8[0] - 1 + 2*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy + h->b_stride*left_block[2]];

  835.                 *(uint32_t*)h->mv_cache[list][scan8[0] - 1 + 3*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy + h->b_stride*left_block[3]];

  836.                 h->ref_cache[list][scan8[0] - 1 + 2*8]= s->current_picture.ref_index[list][b8_xy + h->b8_stride*(left_block[2]>>1)];

  837.                 h->ref_cache[list][scan8[0] - 1 + 3*8]= s->current_picture.ref_index[list][b8_xy + h->b8_stride*(left_block[3]>>1)];

  838.             }else{

  839.                 *(uint32_t*)h->mv_cache [list][scan8[0] - 1 + 2*8]=

  840.                 *(uint32_t*)h->mv_cache [list][scan8[0] - 1 + 3*8]= 0;

  841.                 h->ref_cache[list][scan8[0] - 1 + 2*8]=

  842.                 h->ref_cache[list][scan8[0] - 1 + 3*8]= left_type[0] ? LIST_NOT_USED : PART_NOT_AVAILABLE;

  843.                 assert((!left_type[0]) == (!left_type[1]));

  844.             }

  845. 

  846.             if((for_deblock || (IS_DIRECT(mb_type) && !h->direct_spatial_mv_pred)) && !FRAME_MBAFF)

  847.                 continue;

  848. 

  849.             if(USES_LIST(topleft_type, list)){

  850.                 const int b_xy = h->mb2b_xy[topleft_xy] + 3 + 3*h->b_stride;

  851.                 const int b8_xy= h->mb2b8_xy[topleft_xy] + 1 + h->b8_stride;

  852.                 *(uint32_t*)h->mv_cache[list][scan8[0] - 1 - 1*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy];

  853.                 h->ref_cache[list][scan8[0] - 1 - 1*8]= s->current_picture.ref_index[list][b8_xy];

  854.             }else{

  855.                 *(uint32_t*)h->mv_cache[list][scan8[0] - 1 - 1*8]= 0;

  856.                 h->ref_cache[list][scan8[0] - 1 - 1*8]= topleft_type ? LIST_NOT_USED : PART_NOT_AVAILABLE;

  857.             }

  858. 

  859.             if(USES_LIST(topright_type, list)){

  860.                 const int b_xy= h->mb2b_xy[topright_xy] + 3*h->b_stride;

  861.                 const int b8_xy= h->mb2b8_xy[topright_xy] + h->b8_stride;

  862.                 *(uint32_t*)h->mv_cache[list][scan8[0] + 4 - 1*8]= *(uint32_t*)s->current_picture.motion_val[list][b_xy];

  863.                 h->ref_cache[list][scan8[0] + 4 - 1*8]= s->current_picture.ref_index[list][b8_xy];

  864.             }else{

  865.                 *(uint32_t*)h->mv_cache [list][scan8[0] + 4 - 1*8]= 0;

  866.                 h->ref_cache[list][scan8[0] + 4 - 1*8]= topright_type ? LIST_NOT_USED : PART_NOT_AVAILABLE;

  867.             }

  868. 

  869.             if((IS_SKIP(mb_type) || IS_DIRECT(mb_type)) && !FRAME_MBAFF)

  870.                 continue;

  871. 

  872.             h->ref_cache[list][scan8[5 ]+1] =

  873.             h->ref_cache[list][scan8[7 ]+1] =

  874.             h->ref_cache[list][scan8[13]+1] =  //FIXME remove past 3 (init somewhere else)

  875.             h->ref_cache[list][scan8[4 ]] =

  876.             h->ref_cache[list][scan8[12]] = PART_NOT_AVAILABLE;

  877.             *(uint32_t*)h->mv_cache [list][scan8[5 ]+1]=

  878.             *(uint32_t*)h->mv_cache [list][scan8[7 ]+1]=

  879.             *(uint32_t*)h->mv_cache [list][scan8[13]+1]= //FIXME remove past 3 (init somewhere else)

  880.             *(uint32_t*)h->mv_cache [list][scan8[4 ]]=

  881.             *(uint32_t*)h->mv_cache [list][scan8[12]]= 0;

  882. 

  883.             if( h->pps.cabac ) {

  884.                 /* XXX beurk, Load mvd */

  885.                 if(USES_LIST(top_type, list)){

  886.                     const int b_xy= h->mb2b_xy[top_xy] + 3*h->b_stride;

  887.                     *(uint32_t*)h->mvd_cache[list][scan8[0] + 0 - 1*8]= *(uint32_t*)h->mvd_table[list][b_xy + 0];

  888.                     *(uint32_t*)h->mvd_cache[list][scan8[0] + 1 - 1*8]= *(uint32_t*)h->mvd_table[list][b_xy + 1];

  889.                     *(uint32_t*)h->mvd_cache[list][scan8[0] + 2 - 1*8]= *(uint32_t*)h->mvd_table[list][b_xy + 2];

  890.                     *(uint32_t*)h->mvd_cache[list][scan8[0] + 3 - 1*8]= *(uint32_t*)h->mvd_table[list][b_xy + 3];

  891.                 }else{

  892.                     *(uint32_t*)h->mvd_cache [list][scan8[0] + 0 - 1*8]=

  893.                     *(uint32_t*)h->mvd_cache [list][scan8[0] + 1 - 1*8]=

  894.                     *(uint32_t*)h->mvd_cache [list][scan8[0] + 2 - 1*8]=

  895.                     *(uint32_t*)h->mvd_cache [list][scan8[0] + 3 - 1*8]= 0;

  896.                 }

  897.                 if(USES_LIST(left_type[0], list)){

  898.                     const int b_xy= h->mb2b_xy[left_xy[0]] + 3;

  899.                     *(uint32_t*)h->mvd_cache[list][scan8[0] - 1 + 0*8]= *(uint32_t*)h->mvd_table[list][b_xy + h->b_stride*left_block[0]];

  900.                     *(uint32_t*)h->mvd_cache[list][scan8[0] - 1 + 1*8]= *(uint32_t*)h->mvd_table[list][b_xy + h->b_stride*left_block[1]];

  901.                 }else{

  902.                     *(uint32_t*)h->mvd_cache [list][scan8[0] - 1 + 0*8]=

  903.                     *(uint32_t*)h->mvd_cache [list][scan8[0] - 1 + 1*8]= 0;

  904.                 }

  905.                 if(USES_LIST(left_type[1], list)){

  906.                     const int b_xy= h->mb2b_xy[left_xy[1]] + 3;

  907.                     *(uint32_t*)h->mvd_cache[list][scan8[0] - 1 + 2*8]= *(uint32_t*)h->mvd_table[list][b_xy + h->b_stride*left_block[2]];

  908.                     *(uint32_t*)h->mvd_cache[list][scan8[0] - 1 + 3*8]= *(uint32_t*)h->mvd_table[list][b_xy + h->b_stride*left_block[3]];

  909.                 }else{

  910.                     *(uint32_t*)h->mvd_cache [list][scan8[0] - 1 + 2*8]=

  911.                     *(uint32_t*)h->mvd_cache [list][scan8[0] - 1 + 3*8]= 0;

  912.                 }

  913.                 *(uint32_t*)h->mvd_cache [list][scan8[5 ]+1]=

  914.                 *(uint32_t*)h->mvd_cache [list][scan8[7 ]+1]=

  915.                 *(uint32_t*)h->mvd_cache [list][scan8[13]+1]= //FIXME remove past 3 (init somewhere else)

  916.                 *(uint32_t*)h->mvd_cache [list][scan8[4 ]]=

  917.                 *(uint32_t*)h->mvd_cache [list][scan8[12]]= 0;

  918. 

  919.                 if(h->slice_type == B_TYPE){

  920.                     fill_rectangle(&h->direct_cache[scan8[0]], 4, 4, 8, 0, 1);

  921. 

  922.                     if(IS_DIRECT(top_type)){

  923.                         *(uint32_t*)&h->direct_cache[scan8[0] - 1*8]= 0x01010101;

  924.                     }else if(IS_8X8(top_type)){

  925.                         int b8_xy = h->mb2b8_xy[top_xy] + h->b8_stride;

  926.                         h->direct_cache[scan8[0] + 0 - 1*8]= h->direct_table[b8_xy];

  927.                         h->direct_cache[scan8[0] + 2 - 1*8]= h->direct_table[b8_xy + 1];

  928.                     }else{

  929.                         *(uint32_t*)&h->direct_cache[scan8[0] - 1*8]= 0;

  930.                     }

  931. 

  932.                     if(IS_DIRECT(left_type[0]))

  933.                         h->direct_cache[scan8[0] - 1 + 0*8]= 1;

  934.                     else if(IS_8X8(left_type[0]))

  935.                         h->direct_cache[scan8[0] - 1 + 0*8]= h->direct_table[h->mb2b8_xy[left_xy[0]] + 1 + h->b8_stride*(left_block[0]>>1)];

  936.                     else

  937.                         h->direct_cache[scan8[0] - 1 + 0*8]= 0;

  938. 

  939.                     if(IS_DIRECT(left_type[1]))

  940.                         h->direct_cache[scan8[0] - 1 + 2*8]= 1;

  941.                     else if(IS_8X8(left_type[1]))

  942.                         h->direct_cache[scan8[0] - 1 + 2*8]= h->direct_table[h->mb2b8_xy[left_xy[1]] + 1 + h->b8_stride*(left_block[2]>>1)];

  943.                     else

  944.                         h->direct_cache[scan8[0] - 1 + 2*8]= 0;

  945.                 }

  946.             }

  947. 

  948.             if(FRAME_MBAFF){

  949. #define MAP_MVS\

  950.                     MAP_F2F(scan8[0] - 1 - 1*8, topleft_type)\

  951.                     MAP_F2F(scan8[0] + 0 - 1*8, top_type)\

  952.                     MAP_F2F(scan8[0] + 1 - 1*8, top_type)\

  953.                     MAP_F2F(scan8[0] + 2 - 1*8, top_type)\

  954.                     MAP_F2F(scan8[0] + 3 - 1*8, top_type)\

  955.                     MAP_F2F(scan8[0] + 4 - 1*8, topright_type)\

  956.                     MAP_F2F(scan8[0] - 1 + 0*8, left_type[0])\

  957.                     MAP_F2F(scan8[0] - 1 + 1*8, left_type[0])\

  958.                     MAP_F2F(scan8[0] - 1 + 2*8, left_type[1])\

  959.                     MAP_F2F(scan8[0] - 1 + 3*8, left_type[1])

  960.                 if(MB_FIELD){

  961. #define MAP_F2F(idx, mb_type)\

  962.                     if(!IS_INTERLACED(mb_type) && h->ref_cache[list][idx] >= 0){\

  963.                         h->ref_cache[list][idx] <<= 1;\

  964.                         h->mv_cache[list][idx][1] /= 2;\

  965.                         h->mvd_cache[list][idx][1] /= 2;\

  966.                     }

  967.                     MAP_MVS

  968. #undef MAP_F2F

  969.                 }else{

  970. #define MAP_F2F(idx, mb_type)\

  971.                     if(IS_INTERLACED(mb_type) && h->ref_cache[list][idx] >= 0){\

  972.                         h->ref_cache[list][idx] >>= 1;\

  973.                         h->mv_cache[list][idx][1] <<= 1;\

  974.                         h->mvd_cache[list][idx][1] <<= 1;\

  975.                     }

  976.                     MAP_MVS

  977. #undef MAP_F2F

  978.                 }

  979.             }

  980.         }

  981.     }

  982. #endif

  983. 

  984.     h->neighbor_transform_size= !!IS_8x8DCT(top_type) + !!IS_8x8DCT(left_type[0]);

  985. }

  986. 

  987. static inline void write_back_intra_pred_mode(H264Context *h){

  988.     MpegEncContext * const s = &h->s;

  989.     const int mb_xy= s->mb_x + s->mb_y*s->mb_stride;

  990. 

  991.     h->intra4x4_pred_mode[mb_xy][0]= h->intra4x4_pred_mode_cache[7+8*1];

  992.     h->intra4x4_pred_mode[mb_xy][1]= h->intra4x4_pred_mode_cache[7+8*2];

  993.     h->intra4x4_pred_mode[mb_xy][2]= h->intra4x4_pred_mode_cache[7+8*3];

  994.     h->intra4x4_pred_mode[mb_xy][3]= h->intra4x4_pred_mode_cache[7+8*4];

  995.     h->intra4x4_pred_mode[mb_xy][4]= h->intra4x4_pred_mode_cache[4+8*4];

  996.     h->intra4x4_pred_mode[mb_xy][5]= h->intra4x4_pred_mode_cache[5+8*4];

  997.     h->intra4x4_pred_mode[mb_xy][6]= h->intra4x4_pred_mode_cache[6+8*4];

  998. }

  999. 

  1000. /**

  1001.  * checks if the top & left blocks are available if needed & changes the dc mode so it only uses the available blocks.

  1002.  */

  1003. static inline int check_intra4x4_pred_mode(H264Context *h){

  1004.     MpegEncContext * const s = &h->s;

  1005.     static const int8_t top [12]= {-1, 0,LEFT_DC_PRED,-1,-1,-1,-1,-1, 0};

  1006.     static const int8_t left[12]= { 0,-1, TOP_DC_PRED, 0,-1,-1,-1, 0,-1,DC_128_PRED};

  1007.     int i;

  1008. 

  1009.     if(!(h->top_samples_available&0x8000)){

  1010.         for(i=0; i<4; i++){

  1011.             int status= top[ h->intra4x4_pred_mode_cache[scan8[0] + i] ];

  1012.             if(status<0){

  1013.                 av_log(h->s.avctx, AV_LOG_ERROR, "top block unavailable for requested intra4x4 mode %d at %d %d\n", status, s->mb_x, s->mb_y);

  1014.                 return -1;

  1015.             } else if(status){

  1016.                 h->intra4x4_pred_mode_cache[scan8[0] + i]= status;

  1017.             }

  1018.         }

  1019.     }

  1020. 

  1021.     if(!(h->left_samples_available&0x8000)){

  1022.         for(i=0; i<4; i++){

  1023.             int status= left[ h->intra4x4_pred_mode_cache[scan8[0] + 8*i] ];

  1024.             if(status<0){

  1025.                 av_log(h->s.avctx, AV_LOG_ERROR, "left block unavailable for requested intra4x4 mode %d at %d %d\n", status, s->mb_x, s->mb_y);

  1026.                 return -1;

  1027.             } else if(status){

  1028.                 h->intra4x4_pred_mode_cache[scan8[0] + 8*i]= status;

  1029.             }

  1030.         }

  1031.     }

  1032. 

  1033.     return 0;

  1034. } //FIXME cleanup like next

  1035. 

  1036. /**

  1037.  * checks if the top & left blocks are available if needed & changes the dc mode so it only uses the available blocks.

  1038.  */

  1039. static inline int check_intra_pred_mode(H264Context *h, int mode){

  1040.     MpegEncContext * const s = &h->s;

  1041.     static const int8_t top [7]= {LEFT_DC_PRED8x8, 1,-1,-1};

  1042.     static const int8_t left[7]= { TOP_DC_PRED8x8,-1, 2,-1,DC_128_PRED8x8};

  1043. 

  1044.     if(mode < 0 || mode > 6) {

  1045.         av_log(h->s.avctx, AV_LOG_ERROR, "out of range intra chroma pred mode at %d %d\n", s->mb_x, s->mb_y);

  1046.         return -1;

  1047.     }

  1048. 

  1049.     if(!(h->top_samples_available&0x8000)){

  1050.         mode= top[ mode ];

  1051.         if(mode<0){

  1052.             av_log(h->s.avctx, AV_LOG_ERROR, "top block unavailable for requested intra mode at %d %d\n", s->mb_x, s->mb_y);

  1053.             return -1;

  1054.         }

  1055.     }

  1056. 

  1057.     if(!(h->left_samples_available&0x8000)){

  1058.         mode= left[ mode ];

  1059.         if(mode<0){

  1060.             av_log(h->s.avctx, AV_LOG_ERROR, "left block unavailable for requested intra mode at %d %d\n", s->mb_x, s->mb_y);

  1061.             return -1;

  1062.         }

  1063.     }

  1064. 

  1065.     return mode;

  1066. }

  1067. 

  1068. /**

  1069.  * gets the predicted intra4x4 prediction mode.

  1070.  */

  1071. static inline int pred_intra_mode(H264Context *h, int n){

  1072.     const int index8= scan8[n];

  1073.     const int left= h->intra4x4_pred_mode_cache[index8 - 1];

  1074.     const int top = h->intra4x4_pred_mode_cache[index8 - 8];

  1075.     const int min= FFMIN(left, top);

  1076. 

  1077.     tprintf("mode:%d %d min:%d\n", left ,top, min);

  1078. 

  1079.     if(min<0) return DC_PRED;

  1080.     else      return min;

  1081. }

  1082. 

  1083. static inline void write_back_non_zero_count(H264Context *h){

  1084.     MpegEncContext * const s = &h->s;

  1085.     const int mb_xy= s->mb_x + s->mb_y*s->mb_stride;

  1086. 

  1087.     h->non_zero_count[mb_xy][0]= h->non_zero_count_cache[7+8*1];

  1088.     h->non_zero_count[mb_xy][1]= h->non_zero_count_cache[7+8*2];

  1089.     h->non_zero_count[mb_xy][2]= h->non_zero_count_cache[7+8*3];

  1090.     h->non_zero_count[mb_xy][3]= h->non_zero_count_cache[7+8*4];

  1091.     h->non_zero_count[mb_xy][4]= h->non_zero_count_cache[4+8*4];

  1092.     h->non_zero_count[mb_xy][5]= h->non_zero_count_cache[5+8*4];

  1093.     h->non_zero_count[mb_xy][6]= h->non_zero_count_cache[6+8*4];

  1094. 

  1095.     h->non_zero_count[mb_xy][9]= h->non_zero_count_cache[1+8*2];

  1096.     h->non_zero_count[mb_xy][8]= h->non_zero_count_cache[2+8*2];

  1097.     h->non_zero_count[mb_xy][7]= h->non_zero_count_cache[2+8*1];

  1098. 

  1099.     h->non_zero_count[mb_xy][12]=h->non_zero_count_cache[1+8*5];

  1100.     h->non_zero_count[mb_xy][11]=h->non_zero_count_cache[2+8*5];

  1101.     h->non_zero_count[mb_xy][10]=h->non_zero_count_cache[2+8*4];

  1102. 

  1103.     if(FRAME_MBAFF){

  1104.         // store all luma nnzs, for deblocking

  1105.         int v = 0, i;

  1106.         for(i=0; i<16; i++)

  1107.             v += (!!h->non_zero_count_cache[scan8[i]]) << i;

  1108.         *(uint16_t*)&h->non_zero_count[mb_xy][14] = v;

  1109.     }

  1110. }

  1111. 

  1112. /**

  1113.  * gets the predicted number of non zero coefficients.

  1114.  * @param n block index

  1115.  */

  1116. static inline int pred_non_zero_count(H264Context *h, int n){

  1117.     const int index8= scan8[n];

  1118.     const int left= h->non_zero_count_cache[index8 - 1];

  1119.     const int top = h->non_zero_count_cache[index8 - 8];

  1120.     int i= left + top;

  1121. 

  1122.     if(i<64) i= (i+1)>>1;

  1123. 

  1124.     tprintf("pred_nnz L%X T%X n%d s%d P%X\n", left, top, n, scan8[n], i&31);

  1125. 

  1126.     return i&31;

  1127. }

  1128. 

  1129. static inline int fetch_diagonal_mv(H264Context *h, const int16_t **C, int i, int list, int part_width){

  1130.     const int topright_ref= h->ref_cache[list][ i - 8 + part_width ];

  1131. 

  1132.     /* there is no consistent mapping of mvs to neighboring locations that will

  1133.      * make mbaff happy, so we can't move all this logic to fill_caches */

  1134.     if(FRAME_MBAFF){

  1135.         MpegEncContext *s = &h->s;

  1136.         const int *mb_types = s->current_picture_ptr->mb_type;

  1137.         const int16_t *mv;

  1138.         *(uint32_t*)h->mv_cache[list][scan8[0]-2] = 0;

  1139.         *C = h->mv_cache[list][scan8[0]-2];

  1140. 

  1141.         if(!MB_FIELD

  1142.            && (s->mb_y&1) && i < scan8[0]+8 && topright_ref != PART_NOT_AVAILABLE){

  1143.             int topright_xy = s->mb_x + (s->mb_y-1)*s->mb_stride + (i == scan8[0]+3);

  1144.             if(IS_INTERLACED(mb_types[topright_xy])){

  1145. #define SET_DIAG_MV(MV_OP, REF_OP, X4, Y4)\

  1146.                 const int x4 = X4, y4 = Y4;\

  1147.                 const int mb_type = mb_types[(x4>>2)+(y4>>2)*s->mb_stride];\

  1148.                 if(!USES_LIST(mb_type,list) && !IS_8X8(mb_type))\

  1149.                     return LIST_NOT_USED;\

  1150.                 mv = s->current_picture_ptr->motion_val[list][x4 + y4*h->b_stride];\

  1151.                 h->mv_cache[list][scan8[0]-2][0] = mv[0];\

  1152.                 h->mv_cache[list][scan8[0]-2][1] = mv[1] MV_OP;\

  1153.                 return s->current_picture_ptr->ref_index[list][(x4>>1) + (y4>>1)*h->b8_stride] REF_OP;

  1154. 

  1155.                 SET_DIAG_MV(*2, >>1, s->mb_x*4+(i&7)-4+part_width, s->mb_y*4-1);

  1156.             }

  1157.         }

  1158.         if(topright_ref == PART_NOT_AVAILABLE

  1159.            && ((s->mb_y&1) || i >= scan8[0]+8) && (i&7)==4

  1160.            && h->ref_cache[list][scan8[0]-1] != PART_NOT_AVAILABLE){

  1161.             if(!MB_FIELD

  1162.                && IS_INTERLACED(mb_types[h->left_mb_xy[0]])){

  1163.                 SET_DIAG_MV(*2, >>1, s->mb_x*4-1, (s->mb_y|1)*4+(s->mb_y&1)*2+(i>>4)-1);

  1164.             }

  1165.             if(MB_FIELD

  1166.                && !IS_INTERLACED(mb_types[h->left_mb_xy[0]])

  1167.                && i >= scan8[0]+8){

  1168.                 // leftshift will turn LIST_NOT_USED into PART_NOT_AVAILABLE, but that's ok.

  1169.                 SET_DIAG_MV(>>1, <<1, s->mb_x*4-1, (s->mb_y&~1)*4 - 1 + ((i-scan8[0])>>3)*2);

  1170.             }

  1171.         }

  1172. #undef SET_DIAG_MV

  1173.     }

  1174. 

  1175.     if(topright_ref != PART_NOT_AVAILABLE){

  1176.         *C= h->mv_cache[list][ i - 8 + part_width ];

  1177.         return topright_ref;

  1178.     }else{

  1179.         tprintf("topright MV not available\n");

  1180. 

  1181.         *C= h->mv_cache[list][ i - 8 - 1 ];

  1182.         return h->ref_cache[list][ i - 8 - 1 ];

  1183.     }

  1184. }

  1185. 

  1186. /**

  1187.  * gets the predicted MV.

  1188.  * @param n the block index

  1189.  * @param part_width the width of the partition (4, 8,16) -> (1, 2, 4)

  1190.  * @param mx the x component of the predicted motion vector

  1191.  * @param my the y component of the predicted motion vector

  1192.  */

  1193. static inline void pred_motion(H264Context * const h, int n, int part_width, int list, int ref, int * const mx, int * const my){

  1194.     const int index8= scan8[n];

  1195.     const int top_ref=      h->ref_cache[list][ index8 - 8 ];

  1196.     const int left_ref=     h->ref_cache[list][ index8 - 1 ];

  1197.     const int16_t * const A= h->mv_cache[list][ index8 - 1 ];

  1198.     const int16_t * const B= h->mv_cache[list][ index8 - 8 ];

  1199.     const int16_t * C;

  1200.     int diagonal_ref, match_count;

  1201. 

  1202.     assert(part_width==1 || part_width==2 || part_width==4);

  1203. 

  1204. /* mv_cache

  1205.   B . . A T T T T

  1206.   U . . L . . , .

  1207.   U . . L . . . .

  1208.   U . . L . . , .

  1209.   . . . L . . . .

  1210. */

  1211. 

  1212.     diagonal_ref= fetch_diagonal_mv(h, &C, index8, list, part_width);

  1213.     match_count= (diagonal_ref==ref) + (top_ref==ref) + (left_ref==ref);

  1214.     tprintf("pred_motion match_count=%d\n", match_count);

  1215.     if(match_count > 1){ //most common

  1216.         *mx= mid_pred(A[0], B[0], C[0]);

  1217.         *my= mid_pred(A[1], B[1], C[1]);

  1218.     }else if(match_count==1){

  1219.         if(left_ref==ref){

  1220.             *mx= A[0];

  1221.             *my= A[1];

  1222.         }else if(top_ref==ref){

  1223.             *mx= B[0];

  1224.             *my= B[1];

  1225.         }else{

  1226.             *mx= C[0];

  1227.             *my= C[1];

  1228.         }

  1229.     }else{

  1230.         if(top_ref == PART_NOT_AVAILABLE && diagonal_ref == PART_NOT_AVAILABLE && left_ref != PART_NOT_AVAILABLE){

  1231.             *mx= A[0];

  1232.             *my= A[1];

  1233.         }else{

  1234.             *mx= mid_pred(A[0], B[0], C[0]);

  1235.             *my= mid_pred(A[1], B[1], C[1]);

  1236.         }

  1237.     }

  1238. 

  1239.     tprintf("pred_motion (%2d %2d %2d) (%2d %2d %2d) (%2d %2d %2d) -> (%2d %2d %2d) at %2d %2d %d list %d\n", top_ref, B[0], B[1],                    diagonal_ref, C[0], C[1], left_ref, A[0], A[1], ref, *mx, *my, h->s.mb_x, h->s.mb_y, n, list);

  1240. }

  1241. 

  1242. /**

  1243.  * gets the directionally predicted 16x8 MV.

  1244.  * @param n the block index

  1245.  * @param mx the x component of the predicted motion vector

  1246.  * @param my the y component of the predicted motion vector

  1247.  */

  1248. static inline void pred_16x8_motion(H264Context * const h, int n, int list, int ref, int * const mx, int * const my){

  1249.     if(n==0){

  1250.         const int top_ref=      h->ref_cache[list][ scan8[0] - 8 ];

  1251.         const int16_t * const B= h->mv_cache[list][ scan8[0] - 8 ];

  1252. 

  1253.         tprintf("pred_16x8: (%2d %2d %2d) at %2d %2d %d list %d\n", top_ref, B[0], B[1], h->s.mb_x, h->s.mb_y, n, list);

  1254. 

  1255.         if(top_ref == ref){

  1256.             *mx= B[0];

  1257.             *my= B[1];

  1258.             return;

  1259.         }

  1260.     }else{

  1261.         const int left_ref=     h->ref_cache[list][ scan8[8] - 1 ];

  1262.         const int16_t * const A= h->mv_cache[list][ scan8[8] - 1 ];

  1263. 

  1264.         tprintf("pred_16x8: (%2d %2d %2d) at %2d %2d %d list %d\n", left_ref, A[0], A[1], h->s.mb_x, h->s.mb_y, n, list);

  1265. 

  1266.         if(left_ref == ref){

  1267.             *mx= A[0];

  1268.             *my= A[1];

  1269.             return;

  1270.         }

  1271.     }

  1272. 

  1273.     //RARE

  1274.     pred_motion(h, n, 4, list, ref, mx, my);

  1275. }

  1276. 

  1277. /**

  1278.  * gets the directionally predicted 8x16 MV.

  1279.  * @param n the block index

  1280.  * @param mx the x component of the predicted motion vector

  1281.  * @param my the y component of the predicted motion vector

  1282.  */

  1283. static inline void pred_8x16_motion(H264Context * const h, int n, int list, int ref, int * const mx, int * const my){

  1284.     if(n==0){

  1285.         const int left_ref=      h->ref_cache[list][ scan8[0] - 1 ];

  1286.         const int16_t * const A=  h->mv_cache[list][ scan8[0] - 1 ];

  1287. 

  1288.         tprintf("pred_8x16: (%2d %2d %2d) at %2d %2d %d list %d\n", left_ref, A[0], A[1], h->s.mb_x, h->s.mb_y, n, list);

  1289. 

  1290.         if(left_ref == ref){

  1291.             *mx= A[0];

  1292.             *my= A[1];

  1293.             return;

  1294.         }

  1295.     }else{

  1296.         const int16_t * C;

  1297.         int diagonal_ref;

  1298. 

  1299.         diagonal_ref= fetch_diagonal_mv(h, &C, scan8[4], list, 2);

  1300. 

  1301.         tprintf("pred_8x16: (%2d %2d %2d) at %2d %2d %d list %d\n", diagonal_ref, C[0], C[1], h->s.mb_x, h->s.mb_y, n, list);

  1302. 

  1303.         if(diagonal_ref == ref){

  1304.             *mx= C[0];

  1305.             *my= C[1];

  1306.             return;

  1307.         }

  1308.     }

  1309. 

  1310.     //RARE

  1311.     pred_motion(h, n, 2, list, ref, mx, my);

  1312. }

  1313. 

  1314. static inline void pred_pskip_motion(H264Context * const h, int * const mx, int * const my){

  1315.     const int top_ref = h->ref_cache[0][ scan8[0] - 8 ];

  1316.     const int left_ref= h->ref_cache[0][ scan8[0] - 1 ];

  1317. 

  1318.     tprintf("pred_pskip: (%d) (%d) at %2d %2d\n", top_ref, left_ref, h->s.mb_x, h->s.mb_y);

  1319. 

  1320.     if(top_ref == PART_NOT_AVAILABLE || left_ref == PART_NOT_AVAILABLE

  1321.        || (top_ref == 0  && *(uint32_t*)h->mv_cache[0][ scan8[0] - 8 ] == 0)

  1322.        || (left_ref == 0 && *(uint32_t*)h->mv_cache[0][ scan8[0] - 1 ] == 0)){

  1323. 

  1324.         *mx = *my = 0;

  1325.         return;

  1326.     }

  1327. 

  1328.     pred_motion(h, 0, 4, 0, 0, mx, my);

  1329. 

  1330.     return;

  1331. }

  1332. 

  1333. static inline void direct_dist_scale_factor(H264Context * const h){

  1334.     const int poc = h->s.current_picture_ptr->poc;

  1335.     const int poc1 = h->ref_list[1][0].poc;

  1336.     int i;

  1337.     for(i=0; i<h->ref_count[0]; i++){

  1338.         int poc0 = h->ref_list[0][i].poc;

  1339.         int td = clip(poc1 - poc0, -128, 127);

  1340.         if(td == 0 /* FIXME || pic0 is a long-term ref */){

  1341.             h->dist_scale_factor[i] = 256;

  1342.         }else{

  1343.             int tb = clip(poc - poc0, -128, 127);

  1344.             int tx = (16384 + (ABS(td) >> 1)) / td;

  1345.             h->dist_scale_factor[i] = clip((tb*tx + 32) >> 6, -1024, 1023);

  1346.         }

  1347.     }

  1348.     if(FRAME_MBAFF){

  1349.         for(i=0; i<h->ref_count[0]; i++){

  1350.             h->dist_scale_factor_field[2*i] =

  1351.             h->dist_scale_factor_field[2*i+1] = h->dist_scale_factor[i];

  1352.         }

  1353.     }

  1354. }

  1355. static inline void direct_ref_list_init(H264Context * const h){

  1356.     MpegEncContext * const s = &h->s;

  1357.     Picture * const ref1 = &h->ref_list[1][0];

  1358.     Picture * const cur = s->current_picture_ptr;

  1359.     int list, i, j;

  1360.     if(cur->pict_type == I_TYPE)

  1361.         cur->ref_count[0] = 0;

  1362.     if(cur->pict_type != B_TYPE)

  1363.         cur->ref_count[1] = 0;

  1364.     for(list=0; list<2; list++){

  1365.         cur->ref_count[list] = h->ref_count[list];

  1366.         for(j=0; j<h->ref_count[list]; j++)

  1367.             cur->ref_poc[list][j] = h->ref_list[list][j].poc;

  1368.     }

  1369.     if(cur->pict_type != B_TYPE || h->direct_spatial_mv_pred)

  1370.         return;

  1371.     for(list=0; list<2; list++){

  1372.         for(i=0; i<ref1->ref_count[list]; i++){

  1373.             const int poc = ref1->ref_poc[list][i];

  1374.             h->map_col_to_list0[list][i] = 0; /* bogus; fills in for missing frames */

  1375.             for(j=0; j<h->ref_count[list]; j++)

  1376.                 if(h->ref_list[list][j].poc == poc){

  1377.                     h->map_col_to_list0[list][i] = j;

  1378.                     break;

  1379.                 }

  1380.         }

  1381.     }

  1382.     if(FRAME_MBAFF){

  1383.         for(list=0; list<2; list++){

  1384.             for(i=0; i<ref1->ref_count[list]; i++){

  1385.                 j = h->map_col_to_list0[list][i];

  1386.                 h->map_col_to_list0_field[list][2*i] = 2*j;

  1387.                 h->map_col_to_list0_field[list][2*i+1] = 2*j+1;

  1388.             }

  1389.         }

  1390.     }

  1391. }

  1392. 

  1393. static inline void pred_direct_motion(H264Context * const h, int *mb_type){

  1394.     MpegEncContext * const s = &h->s;

  1395.     const int mb_xy =   s->mb_x +   s->mb_y*s->mb_stride;

  1396.     const int b8_xy = 2*s->mb_x + 2*s->mb_y*h->b8_stride;

  1397.     const int b4_xy = 4*s->mb_x + 4*s->mb_y*h->b_stride;

  1398.     const int mb_type_col = h->ref_list[1][0].mb_type[mb_xy];

  1399.     const int16_t (*l1mv0)[2] = (const int16_t (*)[2]) &h->ref_list[1][0].motion_val[0][b4_xy];

  1400.     const int16_t (*l1mv1)[2] = (const int16_t (*)[2]) &h->ref_list[1][0].motion_val[1][b4_xy];

  1401.     const int8_t *l1ref0 = &h->ref_list[1][0].ref_index[0][b8_xy];

  1402.     const int8_t *l1ref1 = &h->ref_list[1][0].ref_index[1][b8_xy];

  1403.     const int is_b8x8 = IS_8X8(*mb_type);

  1404.     int sub_mb_type;

  1405.     int i8, i4;

  1406. 

  1407. #define MB_TYPE_16x16_OR_INTRA (MB_TYPE_16x16|MB_TYPE_INTRA4x4|MB_TYPE_INTRA16x16|MB_TYPE_INTRA_PCM)

  1408.     if(IS_8X8(mb_type_col) && !h->sps.direct_8x8_inference_flag){

  1409.         /* FIXME save sub mb types from previous frames (or derive from MVs)

  1410.          * so we know exactly what block size to use */

  1411.         sub_mb_type = MB_TYPE_8x8|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_SUB_4x4 */

  1412.         *mb_type =    MB_TYPE_8x8|MB_TYPE_L0L1;

  1413.     }else if(!is_b8x8 && (mb_type_col & MB_TYPE_16x16_OR_INTRA)){

  1414.         sub_mb_type = MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_SUB_8x8 */

  1415.         *mb_type =    MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_16x16 */

  1416.     }else{

  1417.         sub_mb_type = MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2; /* B_SUB_8x8 */

  1418.         *mb_type =    MB_TYPE_8x8|MB_TYPE_L0L1;

  1419.     }

  1420.     if(!is_b8x8)

  1421.         *mb_type |= MB_TYPE_DIRECT2;

  1422.     if(MB_FIELD)

  1423.         *mb_type |= MB_TYPE_INTERLACED;

  1424. 

  1425.     tprintf("mb_type = %08x, sub_mb_type = %08x, is_b8x8 = %d, mb_type_col = %08x\n", *mb_type, sub_mb_type, is_b8x8, mb_type_col);

  1426. 

  1427.     if(h->direct_spatial_mv_pred){

  1428.         int ref[2];

  1429.         int mv[2][2];

  1430.         int list;

  1431. 

  1432.         /* FIXME interlacing + spatial direct uses wrong colocated block positions */

  1433. 

  1434.         /* ref = min(neighbors) */

  1435.         for(list=0; list<2; list++){

  1436.             int refa = h->ref_cache[list][scan8[0] - 1];

  1437.             int refb = h->ref_cache[list][scan8[0] - 8];

  1438.             int refc = h->ref_cache[list][scan8[0] - 8 + 4];

  1439.             if(refc == -2)

  1440.                 refc = h->ref_cache[list][scan8[0] - 8 - 1];

  1441.             ref[list] = refa;

  1442.             if(ref[list] < 0 || (refb < ref[list] && refb >= 0))

  1443.                 ref[list] = refb;

  1444.             if(ref[list] < 0 || (refc < ref[list] && refc >= 0))

  1445.                 ref[list] = refc;

  1446.             if(ref[list] < 0)

  1447.                 ref[list] = -1;

  1448.         }

  1449. 

  1450.         if(ref[0] < 0 && ref[1] < 0){

  1451.             ref[0] = ref[1] = 0;

  1452.             mv[0][0] = mv[0][1] =

  1453.             mv[1][0] = mv[1][1] = 0;

  1454.         }else{

  1455.             for(list=0; list<2; list++){

  1456.                 if(ref[list] >= 0)

  1457.                     pred_motion(h, 0, 4, list, ref[list], &mv[list][0], &mv[list][1]);

  1458.                 else

  1459.                     mv[list][0] = mv[list][1] = 0;

  1460.             }

  1461.         }

  1462. 

  1463.         if(ref[1] < 0){

  1464.             *mb_type &= ~MB_TYPE_P0L1;

  1465.             sub_mb_type &= ~MB_TYPE_P0L1;

  1466.         }else if(ref[0] < 0){

  1467.             *mb_type &= ~MB_TYPE_P0L0;

  1468.             sub_mb_type &= ~MB_TYPE_P0L0;

  1469.         }

  1470. 

  1471.         if(IS_16X16(*mb_type)){

  1472.             fill_rectangle(&h->ref_cache[0][scan8[0]], 4, 4, 8, (uint8_t)ref[0], 1);

  1473.             fill_rectangle(&h->ref_cache[1][scan8[0]], 4, 4, 8, (uint8_t)ref[1], 1);

  1474.             if(!IS_INTRA(mb_type_col)

  1475.                && (   (l1ref0[0] == 0 && ABS(l1mv0[0][0]) <= 1 && ABS(l1mv0[0][1]) <= 1)

  1476.                    || (l1ref0[0]  < 0 && l1ref1[0] == 0 && ABS(l1mv1[0][0]) <= 1 && ABS(l1mv1[0][1]) <= 1

  1477.                        && (h->x264_build>33 || !h->x264_build)))){

  1478.                 if(ref[0] > 0)

  1479.                     fill_rectangle(&h->mv_cache[0][scan8[0]], 4, 4, 8, pack16to32(mv[0][0],mv[0][1]), 4);

  1480.                 else

  1481.                     fill_rectangle(&h->mv_cache[0][scan8[0]], 4, 4, 8, 0, 4);

  1482.                 if(ref[1] > 0)

  1483.                     fill_rectangle(&h->mv_cache[1][scan8[0]], 4, 4, 8, pack16to32(mv[1][0],mv[1][1]), 4);

  1484.                 else

  1485.                     fill_rectangle(&h->mv_cache[1][scan8[0]], 4, 4, 8, 0, 4);

  1486.             }else{

  1487.                 fill_rectangle(&h->mv_cache[0][scan8[0]], 4, 4, 8, pack16to32(mv[0][0],mv[0][1]), 4);

  1488.                 fill_rectangle(&h->mv_cache[1][scan8[0]], 4, 4, 8, pack16to32(mv[1][0],mv[1][1]), 4);

  1489.             }

  1490.         }else{

  1491.             for(i8=0; i8<4; i8++){

  1492.                 const int x8 = i8&1;

  1493.                 const int y8 = i8>>1;

  1494. 

  1495.                 if(is_b8x8 && !IS_DIRECT(h->sub_mb_type[i8]))

  1496.                     continue;

  1497.                 h->sub_mb_type[i8] = sub_mb_type;

  1498. 

  1499.                 fill_rectangle(&h->mv_cache[0][scan8[i8*4]], 2, 2, 8, pack16to32(mv[0][0],mv[0][1]), 4);

  1500.                 fill_rectangle(&h->mv_cache[1][scan8[i8*4]], 2, 2, 8, pack16to32(mv[1][0],mv[1][1]), 4);

  1501.                 fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, (uint8_t)ref[0], 1);

  1502.                 fill_rectangle(&h->ref_cache[1][scan8[i8*4]], 2, 2, 8, (uint8_t)ref[1], 1);

  1503. 

  1504.                 /* col_zero_flag */

  1505.                 if(!IS_INTRA(mb_type_col) && (   l1ref0[x8 + y8*h->b8_stride] == 0

  1506.                                               || (l1ref0[x8 + y8*h->b8_stride] < 0 && l1ref1[x8 + y8*h->b8_stride] == 0

  1507.                                                   && (h->x264_build>33 || !h->x264_build)))){

  1508.                     const int16_t (*l1mv)[2]= l1ref0[x8 + y8*h->b8_stride] == 0 ? l1mv0 : l1mv1;

  1509.                     if(IS_SUB_8X8(sub_mb_type)){

  1510.                         const int16_t *mv_col = l1mv[x8*3 + y8*3*h->b_stride];

  1511.                         if(ABS(mv_col[0]) <= 1 && ABS(mv_col[1]) <= 1){

  1512.                             if(ref[0] == 0)

  1513.                                 fill_rectangle(&h->mv_cache[0][scan8[i8*4]], 2, 2, 8, 0, 4);

  1514.                             if(ref[1] == 0)

  1515.                                 fill_rectangle(&h->mv_cache[1][scan8[i8*4]], 2, 2, 8, 0, 4);

  1516.                         }

  1517.                     }else

  1518.                     for(i4=0; i4<4; i4++){

  1519.                         const int16_t *mv_col = l1mv[x8*2 + (i4&1) + (y8*2 + (i4>>1))*h->b_stride];

  1520.                         if(ABS(mv_col[0]) <= 1 && ABS(mv_col[1]) <= 1){

  1521.                             if(ref[0] == 0)

  1522.                                 *(uint32_t*)h->mv_cache[0][scan8[i8*4+i4]] = 0;

  1523.                             if(ref[1] == 0)

  1524.                                 *(uint32_t*)h->mv_cache[1][scan8[i8*4+i4]] = 0;

  1525.                         }

  1526.                     }

  1527.                 }

  1528.             }

  1529.         }

  1530.     }else{ /* direct temporal mv pred */

  1531.         const int *map_col_to_list0[2] = {h->map_col_to_list0[0], h->map_col_to_list0[1]};

  1532.         const int *dist_scale_factor = h->dist_scale_factor;

  1533. 

  1534.         if(FRAME_MBAFF){

  1535.             if(IS_INTERLACED(*mb_type)){

  1536.                 map_col_to_list0[0] = h->map_col_to_list0_field[0];

  1537.                 map_col_to_list0[1] = h->map_col_to_list0_field[1];

  1538.                 dist_scale_factor = h->dist_scale_factor_field;

  1539.             }

  1540.             if(IS_INTERLACED(*mb_type) != IS_INTERLACED(mb_type_col)){

  1541.                 /* FIXME assumes direct_8x8_inference == 1 */

  1542.                 const int pair_xy = s->mb_x + (s->mb_y&~1)*s->mb_stride;

  1543.                 int mb_types_col[2];

  1544.                 int y_shift;

  1545. 

  1546.                 *mb_type = MB_TYPE_8x8|MB_TYPE_L0L1

  1547.                          | (is_b8x8 ? 0 : MB_TYPE_DIRECT2)

  1548.                          | (*mb_type & MB_TYPE_INTERLACED);

  1549.                 sub_mb_type = MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2|MB_TYPE_16x16;

  1550. 

  1551.                 if(IS_INTERLACED(*mb_type)){

  1552.                     /* frame to field scaling */

  1553.                     mb_types_col[0] = h->ref_list[1][0].mb_type[pair_xy];

  1554.                     mb_types_col[1] = h->ref_list[1][0].mb_type[pair_xy+s->mb_stride];

  1555.                     if(s->mb_y&1){

  1556.                         l1ref0 -= 2*h->b8_stride;

  1557.                         l1ref1 -= 2*h->b8_stride;

  1558.                         l1mv0 -= 4*h->b_stride;

  1559.                         l1mv1 -= 4*h->b_stride;

  1560.                     }

  1561.                     y_shift = 0;

  1562. 

  1563.                     if(   (mb_types_col[0] & MB_TYPE_16x16_OR_INTRA)

  1564.                        && (mb_types_col[1] & MB_TYPE_16x16_OR_INTRA)

  1565.                        && !is_b8x8)

  1566.                         *mb_type |= MB_TYPE_16x8;

  1567.                     else

  1568.                         *mb_type |= MB_TYPE_8x8;

  1569.                 }else{

  1570.                     /* field to frame scaling */

  1571.                     /* col_mb_y = (mb_y&~1) + (topAbsDiffPOC < bottomAbsDiffPOC ? 0 : 1)

  1572.                      * but in MBAFF, top and bottom POC are equal */

  1573.                     int dy = (s->mb_y&1) ? 1 : 2;

  1574.                     mb_types_col[0] =

  1575.                     mb_types_col[1] = h->ref_list[1][0].mb_type[pair_xy+s->mb_stride];

  1576.                     l1ref0 += dy*h->b8_stride;

  1577.                     l1ref1 += dy*h->b8_stride;

  1578.                     l1mv0 += 2*dy*h->b_stride;

  1579.                     l1mv1 += 2*dy*h->b_stride;

  1580.                     y_shift = 2;

  1581. 

  1582.                     if((mb_types_col[0] & (MB_TYPE_16x16_OR_INTRA|MB_TYPE_16x8))

  1583.                        && !is_b8x8)

  1584.                         *mb_type |= MB_TYPE_16x16;

  1585.                     else

  1586.                         *mb_type |= MB_TYPE_8x8;

  1587.                 }

  1588. 

  1589.                 for(i8=0; i8<4; i8++){

  1590.                     const int x8 = i8&1;

  1591.                     const int y8 = i8>>1;

  1592.                     int ref0, scale;

  1593.                     const int16_t (*l1mv)[2]= l1mv0;

  1594. 

  1595.                     if(is_b8x8 && !IS_DIRECT(h->sub_mb_type[i8]))

  1596.                         continue;

  1597.                     h->sub_mb_type[i8] = sub_mb_type;

  1598. 

  1599.                     fill_rectangle(&h->ref_cache[1][scan8[i8*4]], 2, 2, 8, 0, 1);

  1600.                     if(IS_INTRA(mb_types_col[y8])){

  1601.                         fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, 0, 1);

  1602.                         fill_rectangle(&h-> mv_cache[0][scan8[i8*4]], 2, 2, 8, 0, 4);

  1603.                         fill_rectangle(&h-> mv_cache[1][scan8[i8*4]], 2, 2, 8, 0, 4);

  1604.                         continue;

  1605.                     }

  1606. 

  1607.                     ref0 = l1ref0[x8 + (y8*2>>y_shift)*h->b8_stride];

  1608.                     if(ref0 >= 0)

  1609.                         ref0 = map_col_to_list0[0][ref0*2>>y_shift];

  1610.                     else{

  1611.                         ref0 = map_col_to_list0[1][l1ref1[x8 + (y8*2>>y_shift)*h->b8_stride]*2>>y_shift];

  1612.                         l1mv= l1mv1;

  1613.                     }

  1614.                     scale = dist_scale_factor[ref0];

  1615.                     fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, ref0, 1);

  1616. 

  1617.                     {

  1618.                         const int16_t *mv_col = l1mv[x8*3 + (y8*6>>y_shift)*h->b_stride];

  1619.                         int my_col = (mv_col[1]<<y_shift)/2;

  1620.                         int mx = (scale * mv_col[0] + 128) >> 8;

  1621.                         int my = (scale * my_col + 128) >> 8;

  1622.                         fill_rectangle(&h->mv_cache[0][scan8[i8*4]], 2, 2, 8, pack16to32(mx,my), 4);

  1623.                         fill_rectangle(&h->mv_cache[1][scan8[i8*4]], 2, 2, 8, pack16to32(mx-mv_col[0],my-my_col), 4);

  1624.                     }

  1625.                 }

  1626.                 return;

  1627.             }

  1628.         }

  1629. 

  1630.         /* one-to-one mv scaling */

  1631. 

  1632.         if(IS_16X16(*mb_type)){

  1633.             fill_rectangle(&h->ref_cache[1][scan8[0]], 4, 4, 8, 0, 1);

  1634.             if(IS_INTRA(mb_type_col)){

  1635.                 fill_rectangle(&h->ref_cache[0][scan8[0]], 4, 4, 8, 0, 1);

  1636.                 fill_rectangle(&h-> mv_cache[0][scan8[0]], 4, 4, 8, 0, 4);

  1637.                 fill_rectangle(&h-> mv_cache[1][scan8[0]], 4, 4, 8, 0, 4);

  1638.             }else{

  1639.                 const int ref0 = l1ref0[0] >= 0 ? map_col_to_list0[0][l1ref0[0]]

  1640.                                                 : map_col_to_list0[1][l1ref1[0]];

  1641.                 const int scale = dist_scale_factor[ref0];

  1642.                 const int16_t *mv_col = l1ref0[0] >= 0 ? l1mv0[0] : l1mv1[0];

  1643.                 int mv_l0[2];

  1644.                 mv_l0[0] = (scale * mv_col[0] + 128) >> 8;

  1645.                 mv_l0[1] = (scale * mv_col[1] + 128) >> 8;

  1646.                 fill_rectangle(&h->ref_cache[0][scan8[0]], 4, 4, 8, ref0, 1);

  1647.                 fill_rectangle(&h-> mv_cache[0][scan8[0]], 4, 4, 8, pack16to32(mv_l0[0],mv_l0[1]), 4);

  1648.                 fill_rectangle(&h-> mv_cache[1][scan8[0]], 4, 4, 8, pack16to32(mv_l0[0]-mv_col[0],mv_l0[1]-mv_col[1]), 4);

  1649.             }

  1650.         }else{

  1651.             for(i8=0; i8<4; i8++){

  1652.                 const int x8 = i8&1;

  1653.                 const int y8 = i8>>1;

  1654.                 int ref0, scale;

  1655.                 const int16_t (*l1mv)[2]= l1mv0;

  1656. 

  1657.                 if(is_b8x8 && !IS_DIRECT(h->sub_mb_type[i8]))

  1658.                     continue;

  1659.                 h->sub_mb_type[i8] = sub_mb_type;

  1660.                 fill_rectangle(&h->ref_cache[1][scan8[i8*4]], 2, 2, 8, 0, 1);

  1661.                 if(IS_INTRA(mb_type_col)){

  1662.                     fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, 0, 1);

  1663.                     fill_rectangle(&h-> mv_cache[0][scan8[i8*4]], 2, 2, 8, 0, 4);

  1664.                     fill_rectangle(&h-> mv_cache[1][scan8[i8*4]], 2, 2, 8, 0, 4);

  1665.                     continue;

  1666.                 }

  1667. 

  1668.                 ref0 = l1ref0[x8 + y8*h->b8_stride];

  1669.                 if(ref0 >= 0)

  1670.                     ref0 = map_col_to_list0[0][ref0];

  1671.                 else{

  1672.                     ref0 = map_col_to_list0[1][l1ref1[x8 + y8*h->b8_stride]];

  1673.                     l1mv= l1mv1;

  1674.                 }

  1675.                 scale = dist_scale_factor[ref0];

  1676. 

  1677.                 fill_rectangle(&h->ref_cache[0][scan8[i8*4]], 2, 2, 8, ref0, 1);

  1678.                 if(IS_SUB_8X8(sub_mb_type)){

  1679.                     const int16_t *mv_col = l1mv[x8*3 + y8*3*h->b_stride];

  1680.                     int mx = (scale * mv_col[0] + 128) >> 8;

  1681.                     int my = (scale * mv_col[1] + 128) >> 8;

  1682.                     fill_rectangle(&h->mv_cache[0][scan8[i8*4]], 2, 2, 8, pack16to32(mx,my), 4);

  1683.                     fill_rectangle(&h->mv_cache[1][scan8[i8*4]], 2, 2, 8, pack16to32(mx-mv_col[0],my-mv_col[1]), 4);

  1684.                 }else

  1685.                 for(i4=0; i4<4; i4++){

  1686.                     const int16_t *mv_col = l1mv[x8*2 + (i4&1) + (y8*2 + (i4>>1))*h->b_stride];

  1687.                     int16_t *mv_l0 = h->mv_cache[0][scan8[i8*4+i4]];

  1688.                     mv_l0[0] = (scale * mv_col[0] + 128) >> 8;

  1689.                     mv_l0[1] = (scale * mv_col[1] + 128) >> 8;

  1690.                     *(uint32_t*)h->mv_cache[1][scan8[i8*4+i4]] =

  1691.                         pack16to32(mv_l0[0]-mv_col[0],mv_l0[1]-mv_col[1]);

  1692.                 }

  1693.             }

  1694.         }

  1695.     }

  1696. }

  1697. 

  1698. static inline void write_back_motion(H264Context *h, int mb_type){

  1699.     MpegEncContext * const s = &h->s;

  1700.     const int b_xy = 4*s->mb_x + 4*s->mb_y*h->b_stride;

  1701.     const int b8_xy= 2*s->mb_x + 2*s->mb_y*h->b8_stride;

  1702.     int list;

  1703. 

  1704.     if(!USES_LIST(mb_type, 0))

  1705.         fill_rectangle(&s->current_picture.ref_index[0][b8_xy], 2, 2, h->b8_stride, (uint8_t)LIST_NOT_USED, 1);

  1706. 

  1707.     for(list=0; list<2; list++){

  1708.         int y;

  1709.         if(!USES_LIST(mb_type, list))

  1710.             continue;

  1711. 

  1712.         for(y=0; y<4; y++){

  1713.             *(uint64_t*)s->current_picture.motion_val[list][b_xy + 0 + y*h->b_stride]= *(uint64_t*)h->mv_cache[list][scan8[0]+0 + 8*y];

  1714.             *(uint64_t*)s->current_picture.motion_val[list][b_xy + 2 + y*h->b_stride]= *(uint64_t*)h->mv_cache[list][scan8[0]+2 + 8*y];

  1715.         }

  1716.         if( h->pps.cabac ) {

  1717.             for(y=0; y<4; y++){

  1718.                 *(uint64_t*)h->mvd_table[list][b_xy + 0 + y*h->b_stride]= *(uint64_t*)h->mvd_cache[list][scan8[0]+0 + 8*y];

  1719.                 *(uint64_t*)h->mvd_table[list][b_xy + 2 + y*h->b_stride]= *(uint64_t*)h->mvd_cache[list][scan8[0]+2 + 8*y];

  1720.             }

  1721.         }

  1722. 

  1723.         {

  1724.             uint8_t *ref_index = &s->current_picture.ref_index[list][b8_xy];

  1725.             ref_index[0+0*h->b8_stride]= h->ref_cache[list][scan8[0]];

  1726.             ref_index[1+0*h->b8_stride]= h->ref_cache[list][scan8[4]];

  1727.             ref_index[0+1*h->b8_stride]= h->ref_cache[list][scan8[8]];

  1728.             ref_index[1+1*h->b8_stride]= h->ref_cache[list][scan8[12]];

  1729.         }

  1730.     }

  1731. 

  1732.     if(h->slice_type == B_TYPE && h->pps.cabac){

  1733.         if(IS_8X8(mb_type)){

  1734.             uint8_t *direct_table = &h->direct_table[b8_xy];

  1735.             direct_table[1+0*h->b8_stride] = IS_DIRECT(h->sub_mb_type[1]) ? 1 : 0;

  1736.             direct_table[0+1*h->b8_stride] = IS_DIRECT(h->sub_mb_type[2]) ? 1 : 0;

  1737.             direct_table[1+1*h->b8_stride] = IS_DIRECT(h->sub_mb_type[3]) ? 1 : 0;

  1738.         }

  1739.     }

  1740. }

  1741. 

  1742. /**

  1743.  * Decodes a network abstraction layer unit.

  1744.  * @param consumed is the number of bytes used as input

  1745.  * @param length is the length of the array

  1746.  * @param dst_length is the number of decoded bytes FIXME here or a decode rbsp tailing?

  1747.  * @returns decoded bytes, might be src+1 if no escapes

  1748.  */

  1749. static uint8_t *decode_nal(H264Context *h, uint8_t *src, int *dst_length, int *consumed, int length){

  1750.     int i, si, di;

  1751.     uint8_t *dst;

  1752. 

  1753. //    src[0]&0x80;                //forbidden bit

  1754.     h->nal_ref_idc= src[0]>>5;

  1755.     h->nal_unit_type= src[0]&0x1F;

  1756. 

  1757.     src++; length--;

  1758. #if 0

  1759.     for(i=0; i<length; i++)

  1760.         printf("%2X ", src[i]);

  1761. #endif

  1762.     for(i=0; i+1<length; i+=2){

  1763.         if(src[i]) continue;

  1764.         if(i>0 && src[i-1]==0) i--;

  1765.         if(i+2<length && src[i+1]==0 && src[i+2]<=3){

  1766.             if(src[i+2]!=3){

  1767.                 /* startcode, so we must be past the end */

  1768.                 length=i;

  1769.             }

  1770.             break;

  1771.         }

  1772.     }

  1773. 

  1774.     if(i>=length-1){ //no escaped 0

  1775.         *dst_length= length;

  1776.         *consumed= length+1; //+1 for the header

  1777.         return src;

  1778.     }

  1779. 

  1780.     h->rbsp_buffer= av_fast_realloc(h->rbsp_buffer, &h->rbsp_buffer_size, length);

  1781.     dst= h->rbsp_buffer;

  1782. 

  1783. //printf("decoding esc\n");

  1784.     si=di=0;

  1785.     while(si<length){

  1786.         //remove escapes (very rare 1:2^22)

  1787.         if(si+2<length && src[si]==0 && src[si+1]==0 && src[si+2]<=3){

  1788.             if(src[si+2]==3){ //escape

  1789.                 dst[di++]= 0;

  1790.                 dst[di++]= 0;

  1791.                 si+=3;

  1792.                 continue;

  1793.             }else //next start code

  1794.                 break;

  1795.         }

  1796. 

  1797.         dst[di++]= src[si++];

  1798.     }

  1799. 

  1800.     *dst_length= di;

  1801.     *consumed= si + 1;//+1 for the header

  1802. //FIXME store exact number of bits in the getbitcontext (its needed for decoding)

  1803.     return dst;

  1804. }

  1805. 

  1806. #if 0

  1807. /**

  1808.  * @param src the data which should be escaped

  1809.  * @param dst the target buffer, dst+1 == src is allowed as a special case

  1810.  * @param length the length of the src data

  1811.  * @param dst_length the length of the dst array

  1812.  * @returns length of escaped data in bytes or -1 if an error occured

  1813.  */

  1814. static int encode_nal(H264Context *h, uint8_t *dst, uint8_t *src, int length, int dst_length){

  1815.     int i, escape_count, si, di;

  1816.     uint8_t *temp;

  1817. 

  1818.     assert(length>=0);

  1819.     assert(dst_length>0);

  1820. 

  1821.     dst[0]= (h->nal_ref_idc<<5) + h->nal_unit_type;

  1822. 

  1823.     if(length==0) return 1;

  1824. 

  1825.     escape_count= 0;

  1826.     for(i=0; i<length; i+=2){

  1827.         if(src[i]) continue;

  1828.         if(i>0 && src[i-1]==0)

  1829.             i--;

  1830.         if(i+2<length && src[i+1]==0 && src[i+2]<=3){

  1831.             escape_count++;

  1832.             i+=2;

  1833.         }

  1834.     }

  1835. 

  1836.     if(escape_count==0){

  1837.         if(dst+1 != src)

  1838.             memcpy(dst+1, src, length);

  1839.         return length + 1;

  1840.     }

  1841. 

  1842.     if(length + escape_count + 1> dst_length)

  1843.         return -1;

  1844. 

  1845.     //this should be damn rare (hopefully)

  1846. 

  1847.     h->rbsp_buffer= av_fast_realloc(h->rbsp_buffer, &h->rbsp_buffer_size, length + escape_count);

  1848.     temp= h->rbsp_buffer;

  1849. //printf("encoding esc\n");

  1850. 

  1851.     si= 0;

  1852.     di= 0;

  1853.     while(si < length){

  1854.         if(si+2<length && src[si]==0 && src[si+1]==0 && src[si+2]<=3){

  1855.             temp[di++]= 0; si++;

  1856.             temp[di++]= 0; si++;

  1857.             temp[di++]= 3;

  1858.             temp[di++]= src[si++];

  1859.         }

  1860.         else

  1861.             temp[di++]= src[si++];

  1862.     }

  1863.     memcpy(dst+1, temp, length+escape_count);

  1864. 

  1865.     assert(di == length+escape_count);

  1866. 

  1867.     return di + 1;

  1868. }

  1869. 

  1870. /**

  1871.  * write 1,10,100,1000,... for alignment, yes its exactly inverse to mpeg4

  1872.  */

  1873. static void encode_rbsp_trailing(PutBitContext *pb){

  1874.     int length;

  1875.     put_bits(pb, 1, 1);

  1876.     length= (-put_bits_count(pb))&7;

  1877.     if(length) put_bits(pb, length, 0);

  1878. }

  1879. #endif

  1880. 

  1881. /**

  1882.  * identifies the exact end of the bitstream

  1883.  * @return the length of the trailing, or 0 if damaged

  1884.  */

  1885. static int decode_rbsp_trailing(uint8_t *src){

  1886.     int v= *src;

  1887.     int r;

  1888. 

  1889.     tprintf("rbsp trailing %X\n", v);

  1890. 

  1891.     for(r=1; r<9; r++){

  1892.         if(v&1) return r;

  1893.         v>>=1;

  1894.     }

  1895.     return 0;

  1896. }

  1897. 

  1898. /**

  1899.  * idct tranforms the 16 dc values and dequantize them.

  1900.  * @param qp quantization parameter

  1901.  */

  1902. static void h264_luma_dc_dequant_idct_c(DCTELEM *block, int qp, int qmul){

  1903. #define stride 16

  1904.     int i;

  1905.     int temp[16]; //FIXME check if this is a good idea

  1906.     static const int x_offset[4]={0, 1*stride, 4* stride,  5*stride};

  1907.     static const int y_offset[4]={0, 2*stride, 8* stride, 10*stride};

  1908. 

  1909. //memset(block, 64, 2*256);

  1910. //return;

  1911.     for(i=0; i<4; i++){

  1912.         const int offset= y_offset[i];

  1913.         const int z0= block[offset+stride*0] + block[offset+stride*4];

  1914.         const int z1= block[offset+stride*0] - block[offset+stride*4];

  1915.         const int z2= block[offset+stride*1] - block[offset+stride*5];

  1916.         const int z3= block[offset+stride*1] + block[offset+stride*5];

  1917. 

  1918.         temp[4*i+0]= z0+z3;

  1919.         temp[4*i+1]= z1+z2;

  1920.         temp[4*i+2]= z1-z2;

  1921.         temp[4*i+3]= z0-z3;

  1922.     }

  1923. 

  1924.     for(i=0; i<4; i++){

  1925.         const int offset= x_offset[i];

  1926.         const int z0= temp[4*0+i] + temp[4*2+i];

  1927.         const int z1= temp[4*0+i] - temp[4*2+i];

  1928.         const int z2= temp[4*1+i] - temp[4*3+i];

  1929.         const int z3= temp[4*1+i] + temp[4*3+i];

  1930. 

  1931.         block[stride*0 +offset]= ((((z0 + z3)*qmul + 128 ) >> 8)); //FIXME think about merging this into decode_resdual

  1932.         block[stride*2 +offset]= ((((z1 + z2)*qmul + 128 ) >> 8));

  1933.         block[stride*8 +offset]= ((((z1 - z2)*qmul + 128 ) >> 8));

  1934.         block[stride*10+offset]= ((((z0 - z3)*qmul + 128 ) >> 8));

  1935.     }

  1936. }

  1937. 

  1938. #if 0

  1939. /**

  1940.  * dct tranforms the 16 dc values.

  1941.  * @param qp quantization parameter ??? FIXME

  1942.  */

  1943. static void h264_luma_dc_dct_c(DCTELEM *block/*, int qp*/){

  1944. //    const int qmul= dequant_coeff[qp][0];

  1945.     int i;

  1946.     int temp[16]; //FIXME check if this is a good idea

  1947.     static const int x_offset[4]={0, 1*stride, 4* stride,  5*stride};

  1948.     static const int y_offset[4]={0, 2*stride, 8* stride, 10*stride};

  1949. 

  1950.     for(i=0; i<4; i++){

  1951.         const int offset= y_offset[i];

  1952.         const int z0= block[offset+stride*0] + block[offset+stride*4];

  1953.         const int z1= block[offset+stride*0] - block[offset+stride*4];

  1954.         const int z2= block[offset+stride*1] - block[offset+stride*5];

  1955.         const int z3= block[offset+stride*1] + block[offset+stride*5];

  1956. 

  1957.         temp[4*i+0]= z0+z3;

  1958.         temp[4*i+1]= z1+z2;

  1959.         temp[4*i+2]= z1-z2;

  1960.         temp[4*i+3]= z0-z3;

  1961.     }

  1962. 

  1963.     for(i=0; i<4; i++){

  1964.         const int offset= x_offset[i];

  1965.         const int z0= temp[4*0+i] + temp[4*2+i];

  1966.         const int z1= temp[4*0+i] - temp[4*2+i];

  1967.         const int z2= temp[4*1+i] - temp[4*3+i];

  1968.         const int z3= temp[4*1+i] + temp[4*3+i];

  1969. 

  1970.         block[stride*0 +offset]= (z0 + z3)>>1;

  1971.         block[stride*2 +offset]= (z1 + z2)>>1;

  1972.         block[stride*8 +offset]= (z1 - z2)>>1;

  1973.         block[stride*10+offset]= (z0 - z3)>>1;

  1974.     }

  1975. }

  1976. #endif

  1977. 

  1978. #undef xStride

  1979. #undef stride

  1980. 

  1981. static void chroma_dc_dequant_idct_c(DCTELEM *block, int qp, int qmul){

  1982.     const int stride= 16*2;

  1983.     const int xStride= 16;

  1984.     int a,b,c,d,e;

  1985. 

  1986.     a= block[stride*0 + xStride*0];

  1987.     b= block[stride*0 + xStride*1];

  1988.     c= block[stride*1 + xStride*0];

  1989.     d= block[stride*1 + xStride*1];

  1990. 

  1991.     e= a-b;

  1992.     a= a+b;

  1993.     b= c-d;

  1994.     c= c+d;

  1995. 

  1996.     block[stride*0 + xStride*0]= ((a+c)*qmul) >> 7;

  1997.     block[stride*0 + xStride*1]= ((e+b)*qmul) >> 7;

  1998.     block[stride*1 + xStride*0]= ((a-c)*qmul) >> 7;

  1999.     block[stride*1 + xStride*1]= ((e-b)*qmul) >> 7;

  2000. }

  2001. 

  2002. #if 0

  2003. static void chroma_dc_dct_c(DCTELEM *block){

  2004.     const int stride= 16*2;

  2005.     const int xStride= 16;

  2006.     int a,b,c,d,e;

  2007. 

  2008.     a= block[stride*0 + xStride*0];

  2009.     b= block[stride*0 + xStride*1];

  2010.     c= block[stride*1 + xStride*0];

  2011.     d= block[stride*1 + xStride*1];

  2012. 

  2013.     e= a-b;

  2014.     a= a+b;

  2015.     b= c-d;

  2016.     c= c+d;

  2017. 

  2018.     block[stride*0 + xStride*0]= (a+c);

  2019.     block[stride*0 + xStride*1]= (e+b);

  2020.     block[stride*1 + xStride*0]= (a-c);

  2021.     block[stride*1 + xStride*1]= (e-b);

  2022. }

  2023. #endif

  2024. 

  2025. /**

  2026.  * gets the chroma qp.

  2027.  */

  2028. static inline int get_chroma_qp(int chroma_qp_index_offset, int qscale){

  2029. 

  2030.     return chroma_qp[clip(qscale + chroma_qp_index_offset, 0, 51)];

  2031. }

  2032. 

  2033. 

  2034. #if 0

  2035. static void h264_diff_dct_c(DCTELEM *block, uint8_t *src1, uint8_t *src2, int stride){

  2036.     int i;

  2037.     //FIXME try int temp instead of block

  2038. 

  2039.     for(i=0; i<4; i++){

  2040.         const int d0= src1[0 + i*stride] - src2[0 + i*stride];

  2041.         const int d1= src1[1 + i*stride] - src2[1 + i*stride];

  2042.         const int d2= src1[2 + i*stride] - src2[2 + i*stride];

  2043.         const int d3= src1[3 + i*stride] - src2[3 + i*stride];

  2044.         const int z0= d0 + d3;

  2045.         const int z3= d0 - d3;

  2046.         const int z1= d1 + d2;

  2047.         const int z2= d1 - d2;

  2048. 

  2049.         block[0 + 4*i]=   z0 +   z1;

  2050.         block[1 + 4*i]= 2*z3 +   z2;

  2051.         block[2 + 4*i]=   z0 -   z1;

  2052.         block[3 + 4*i]=   z3 - 2*z2;

  2053.     }

  2054. 

  2055.     for(i=0; i<4; i++){

  2056.         const int z0= block[0*4 + i] + block[3*4 + i];

  2057.         const int z3= block[0*4 + i] - block[3*4 + i];

  2058.         const int z1= block[1*4 + i] + block[2*4 + i];

  2059.         const int z2= block[1*4 + i] - block[2*4 + i];

  2060. 

  2061.         block[0*4 + i]=   z0 +   z1;

  2062.         block[1*4 + i]= 2*z3 +   z2;

  2063.         block[2*4 + i]=   z0 -   z1;

  2064.         block[3*4 + i]=   z3 - 2*z2;

  2065.     }

  2066. }

  2067. #endif

  2068. 

  2069. //FIXME need to check that this doesnt overflow signed 32 bit for low qp, i am not sure, it's very close

  2070. //FIXME check that gcc inlines this (and optimizes intra & seperate_dc stuff away)

  2071. static inline int quantize_c(DCTELEM *block, uint8_t *scantable, int qscale, int intra, int seperate_dc){

  2072.     int i;

  2073.     const int * const quant_table= quant_coeff[qscale];

  2074.     const int bias= intra ? (1<<QUANT_SHIFT)/3 : (1<<QUANT_SHIFT)/6;

  2075.     const unsigned int threshold1= (1<<QUANT_SHIFT) - bias - 1;

  2076.     const unsigned int threshold2= (threshold1<<1);

  2077.     int last_non_zero;

  2078. 

  2079.     if(seperate_dc){

  2080.         if(qscale<=18){

  2081.             //avoid overflows

  2082.             const int dc_bias= intra ? (1<<(QUANT_SHIFT-2))/3 : (1<<(QUANT_SHIFT-2))/6;

  2083.             const unsigned int dc_threshold1= (1<<(QUANT_SHIFT-2)) - dc_bias - 1;

  2084.             const unsigned int dc_threshold2= (dc_threshold1<<1);

  2085. 

  2086.             int level= block[0]*quant_coeff[qscale+18][0];

  2087.             if(((unsigned)(level+dc_threshold1))>dc_threshold2){

  2088.                 if(level>0){

  2089.                     level= (dc_bias + level)>>(QUANT_SHIFT-2);

  2090.                     block[0]= level;

  2091.                 }else{

  2092.                     level= (dc_bias - level)>>(QUANT_SHIFT-2);

  2093.                     block[0]= -level;

  2094.                 }

  2095. //                last_non_zero = i;

  2096.             }else{

  2097.                 block[0]=0;

  2098.             }

  2099.         }else{

  2100.             const int dc_bias= intra ? (1<<(QUANT_SHIFT+1))/3 : (1<<(QUANT_SHIFT+1))/6;

  2101.             const unsigned int dc_threshold1= (1<<(QUANT_SHIFT+1)) - dc_bias - 1;

  2102.             const unsigned int dc_threshold2= (dc_threshold1<<1);

  2103. 

  2104.             int level= block[0]*quant_table[0];

  2105.             if(((unsigned)(level+dc_threshold1))>dc_threshold2){

  2106.                 if(level>0){

  2107.                     level= (dc_bias + level)>>(QUANT_SHIFT+1);

  2108.                     block[0]= level;

  2109.                 }else{

  2110.                     level= (dc_bias - level)>>(QUANT_SHIFT+1);

  2111.                     block[0]= -level;

  2112.                 }

  2113. //                last_non_zero = i;

  2114.             }else{

  2115.                 block[0]=0;

  2116.             }

  2117.         }

  2118.         last_non_zero= 0;

  2119.         i=1;

  2120.     }else{

  2121.         last_non_zero= -1;

  2122.         i=0;

  2123.     }

  2124. 

  2125.     for(; i<16; i++){

  2126.         const int j= scantable[i];

  2127.         int level= block[j]*quant_table[j];

  2128. 

  2129. //        if(   bias+level >= (1<<(QMAT_SHIFT - 3))

  2130. //           || bias-level >= (1<<(QMAT_SHIFT - 3))){

  2131.         if(((unsigned)(level+threshold1))>threshold2){

  2132.             if(level>0){

  2133.                 level= (bias + level)>>QUANT_SHIFT;

  2134.                 block[j]= level;

  2135.             }else{

  2136.                 level= (bias - level)>>QUANT_SHIFT;

  2137.                 block[j]= -level;

  2138.             }

  2139.             last_non_zero = i;

  2140.         }else{

  2141.             block[j]=0;

  2142.         }

  2143.     }

  2144. 

  2145.     return last_non_zero;

  2146. }

  2147. 

  2148. static void pred4x4_vertical_c(uint8_t *src, uint8_t *topright, int stride){

  2149.     const uint32_t a= ((uint32_t*)(src-stride))[0];

  2150.     ((uint32_t*)(src+0*stride))[0]= a;

  2151.     ((uint32_t*)(src+1*stride))[0]= a;

  2152.     ((uint32_t*)(src+2*stride))[0]= a;

  2153.     ((uint32_t*)(src+3*stride))[0]= a;

  2154. }

  2155. 

  2156. static void pred4x4_horizontal_c(uint8_t *src, uint8_t *topright, int stride){

  2157.     ((uint32_t*)(src+0*stride))[0]= src[-1+0*stride]*0x01010101;

  2158.     ((uint32_t*)(src+1*stride))[0]= src[-1+1*stride]*0x01010101;

  2159.     ((uint32_t*)(src+2*stride))[0]= src[-1+2*stride]*0x01010101;

  2160.     ((uint32_t*)(src+3*stride))[0]= src[-1+3*stride]*0x01010101;

  2161. }

  2162. 

  2163. static void pred4x4_dc_c(uint8_t *src, uint8_t *topright, int stride){

  2164.     const int dc= (  src[-stride] + src[1-stride] + src[2-stride] + src[3-stride]

  2165.                    + src[-1+0*stride] + src[-1+1*stride] + src[-1+2*stride] + src[-1+3*stride] + 4) >>3;

  2166. 

  2167.     ((uint32_t*)(src+0*stride))[0]=

  2168.     ((uint32_t*)(src+1*stride))[0]=

  2169.     ((uint32_t*)(src+2*stride))[0]=

  2170.     ((uint32_t*)(src+3*stride))[0]= dc* 0x01010101;

  2171. }

  2172. 

  2173. static void pred4x4_left_dc_c(uint8_t *src, uint8_t *topright, int stride){

  2174.     const int dc= (  src[-1+0*stride] + src[-1+1*stride] + src[-1+2*stride] + src[-1+3*stride] + 2) >>2;

  2175. 

  2176.     ((uint32_t*)(src+0*stride))[0]=

  2177.     ((uint32_t*)(src+1*stride))[0]=

  2178.     ((uint32_t*)(src+2*stride))[0]=

  2179.     ((uint32_t*)(src+3*stride))[0]= dc* 0x01010101;

  2180. }

  2181. 

  2182. static void pred4x4_top_dc_c(uint8_t *src, uint8_t *topright, int stride){

  2183.     const int dc= (  src[-stride] + src[1-stride] + src[2-stride] + src[3-stride] + 2) >>2;

  2184. 

  2185.     ((uint32_t*)(src+0*stride))[0]=

  2186.     ((uint32_t*)(src+1*stride))[0]=

  2187.     ((uint32_t*)(src+2*stride))[0]=

  2188.     ((uint32_t*)(src+3*stride))[0]= dc* 0x01010101;

  2189. }

  2190. 

  2191. static void pred4x4_128_dc_c(uint8_t *src, uint8_t *topright, int stride){

  2192.     ((uint32_t*)(src+0*stride))[0]=

  2193.     ((uint32_t*)(src+1*stride))[0]=

  2194.     ((uint32_t*)(src+2*stride))[0]=

  2195.     ((uint32_t*)(src+3*stride))[0]= 128U*0x01010101U;

  2196. }

  2197. 

  2198. 

  2199. #define LOAD_TOP_RIGHT_EDGE\

  2200.     const int t4= topright[0];\

  2201.     const int t5= topright[1];\

  2202.     const int t6= topright[2];\

  2203.     const int t7= topright[3];\

  2204. 

  2205. #define LOAD_LEFT_EDGE\

  2206.     const int l0= src[-1+0*stride];\

  2207.     const int l1= src[-1+1*stride];\

  2208.     const int l2= src[-1+2*stride];\

  2209.     const int l3= src[-1+3*stride];\

  2210. 

  2211. #define LOAD_TOP_EDGE\

  2212.     const int t0= src[ 0-1*stride];\

  2213.     const int t1= src[ 1-1*stride];\

  2214.     const int t2= src[ 2-1*stride];\

  2215.     const int t3= src[ 3-1*stride];\

  2216. 

  2217. static void pred4x4_down_right_c(uint8_t *src, uint8_t *topright, int stride){

  2218.     const int lt= src[-1-1*stride];

  2219.     LOAD_TOP_EDGE

  2220.     LOAD_LEFT_EDGE

  2221. 

  2222.     src[0+3*stride]=(l3 + 2*l2 + l1 + 2)>>2;

  2223.     src[0+2*stride]=

  2224.     src[1+3*stride]=(l2 + 2*l1 + l0 + 2)>>2;

  2225.     src[0+1*stride]=

  2226.     src[1+2*stride]=

  2227.     src[2+3*stride]=(l1 + 2*l0 + lt + 2)>>2;

  2228.     src[0+0*stride]=

  2229.     src[1+1*stride]=

  2230.     src[2+2*stride]=

  2231.     src[3+3*stride]=(l0 + 2*lt + t0 + 2)>>2;

  2232.     src[1+0*stride]=

  2233.     src[2+1*stride]=

  2234.     src[3+2*stride]=(lt + 2*t0 + t1 + 2)>>2;

  2235.     src[2+0*stride]=

  2236.     src[3+1*stride]=(t0 + 2*t1 + t2 + 2)>>2;

  2237.     src[3+0*stride]=(t1 + 2*t2 + t3 + 2)>>2;

  2238. }

  2239. 

  2240. static void pred4x4_down_left_c(uint8_t *src, uint8_t *topright, int stride){

  2241.     LOAD_TOP_EDGE

  2242.     LOAD_TOP_RIGHT_EDGE

  2243. //    LOAD_LEFT_EDGE

  2244. 

  2245.     src[0+0*stride]=(t0 + t2 + 2*t1 + 2)>>2;

  2246.     src[1+0*stride]=

  2247.     src[0+1*stride]=(t1 + t3 + 2*t2 + 2)>>2;

  2248.     src[2+0*stride]=

  2249.     src[1+1*stride]=

  2250.     src[0+2*stride]=(t2 + t4 + 2*t3 + 2)>>2;

  2251.     src[3+0*stride]=

  2252.     src[2+1*stride]=

  2253.     src[1+2*stride]=

  2254.     src[0+3*stride]=(t3 + t5 + 2*t4 + 2)>>2;

  2255.     src[3+1*stride]=

  2256.     src[2+2*stride]=

  2257.     src[1+3*stride]=(t4 + t6 + 2*t5 + 2)>>2;

  2258.     src[3+2*stride]=

  2259.     src[2+3*stride]=(t5 + t7 + 2*t6 + 2)>>2;

  2260.     src[3+3*stride]=(t6 + 3*t7 + 2)>>2;

  2261. }

  2262. 

  2263. static void pred4x4_vertical_right_c(uint8_t *src, uint8_t *topright, int stride){

  2264.     const int lt= src[-1-1*stride];

  2265.     LOAD_TOP_EDGE

  2266.     LOAD_LEFT_EDGE

  2267.     const __attribute__((unused)) int unu= l3;

  2268. 

  2269.     src[0+0*stride]=

  2270.     src[1+2*stride]=(lt + t0 + 1)>>1;

  2271.     src[1+0*stride]=

  2272.     src[2+2*stride]=(t0 + t1 + 1)>>1;

  2273.     src[2+0*stride]=

  2274.     src[3+2*stride]=(t1 + t2 + 1)>>1;

  2275.     src[3+0*stride]=(t2 + t3 + 1)>>1;

  2276.     src[0+1*stride]=

  2277.     src[1+3*stride]=(l0 + 2*lt + t0 + 2)>>2;

  2278.     src[1+1*stride]=

  2279.     src[2+3*stride]=(lt + 2*t0 + t1 + 2)>>2;

  2280.     src[2+1*stride]=

  2281.     src[3+3*stride]=(t0 + 2*t1 + t2 + 2)>>2;

  2282.     src[3+1*stride]=(t1 + 2*t2 + t3 + 2)>>2;

  2283.     src[0+2*stride]=(lt + 2*l0 + l1 + 2)>>2;

  2284.     src[0+3*stride]=(l0 + 2*l1 + l2 + 2)>>2;

  2285. }

  2286. 

  2287. static void pred4x4_vertical_left_c(uint8_t *src, uint8_t *topright, int stride){

  2288.     LOAD_TOP_EDGE

  2289.     LOAD_TOP_RIGHT_EDGE

  2290.     const __attribute__((unused)) int unu= t7;

  2291. 

  2292.     src[0+0*stride]=(t0 + t1 + 1)>>1;

  2293.     src[1+0*stride]=

  2294.     src[0+2*stride]=(t1 + t2 + 1)>>1;

  2295.     src[2+0*stride]=

  2296.     src[1+2*stride]=(t2 + t3 + 1)>>1;

  2297.     src[3+0*stride]=

  2298.     src[2+2*stride]=(t3 + t4+ 1)>>1;

  2299.     src[3+2*stride]=(t4 + t5+ 1)>>1;

  2300.     src[0+1*stride]=(t0 + 2*t1 + t2 + 2)>>2;

  2301.     src[1+1*stride]=

  2302.     src[0+3*stride]=(t1 + 2*t2 + t3 + 2)>>2;

  2303.     src[2+1*stride]=

  2304.     src[1+3*stride]=(t2 + 2*t3 + t4 + 2)>>2;

  2305.     src[3+1*stride]=

  2306.     src[2+3*stride]=(t3 + 2*t4 + t5 + 2)>>2;

  2307.     src[3+3*stride]=(t4 + 2*t5 + t6 + 2)>>2;

  2308. }

  2309. 

  2310. static void pred4x4_horizontal_up_c(uint8_t *src, uint8_t *topright, int stride){

  2311.     LOAD_LEFT_EDGE

  2312. 

  2313.     src[0+0*stride]=(l0 + l1 + 1)>>1;

  2314.     src[1+0*stride]=(l0 + 2*l1 + l2 + 2)>>2;

  2315.     src[2+0*stride]=

  2316.     src[0+1*stride]=(l1 + l2 + 1)>>1;

  2317.     src[3+0*stride]=

  2318.     src[1+1*stride]=(l1 + 2*l2 + l3 + 2)>>2;

  2319.     src[2+1*stride]=

  2320.     src[0+2*stride]=(l2 + l3 + 1)>>1;

  2321.     src[3+1*stride]=

  2322.     src[1+2*stride]=(l2 + 2*l3 + l3 + 2)>>2;

  2323.     src[3+2*stride]=

  2324.     src[1+3*stride]=

  2325.     src[0+3*stride]=

  2326.     src[2+2*stride]=

  2327.     src[2+3*stride]=

  2328.     src[3+3*stride]=l3;

  2329. }

  2330. 

  2331. static void pred4x4_horizontal_down_c(uint8_t *src, uint8_t *topright, int stride){

  2332.     const int lt= src[-1-1*stride];

  2333.     LOAD_TOP_EDGE

  2334.     LOAD_LEFT_EDGE

  2335.     const __attribute__((unused)) int unu= t3;

  2336. 

  2337.     src[0+0*stride]=

  2338.     src[2+1*stride]=(lt + l0 + 1)>>1;

  2339.     src[1+0*stride]=

  2340.     src[3+1*stride]=(l0 + 2*lt + t0 + 2)>>2;

  2341.     src[2+0*stride]=(lt + 2*t0 + t1 + 2)>>2;

  2342.     src[3+0*stride]=(t0 + 2*t1 + t2 + 2)>>2;

  2343.     src[0+1*stride]=

  2344.     src[2+2*stride]=(l0 + l1 + 1)>>1;

  2345.     src[1+1*stride]=

  2346.     src[3+2*stride]=(lt + 2*l0 + l1 + 2)>>2;

  2347.     src[0+2*stride]=

  2348.     src[2+3*stride]=(l1 + l2+ 1)>>1;

  2349.     src[1+2*stride]=

  2350.     src[3+3*stride]=(l0 + 2*l1 + l2 + 2)>>2;

  2351.     src[0+3*stride]=(l2 + l3 + 1)>>1;

  2352.     src[1+3*stride]=(l1 + 2*l2 + l3 + 2)>>2;

  2353. }

  2354. 

  2355. static void pred16x16_vertical_c(uint8_t *src, int stride){

  2356.     int i;

  2357.     const uint32_t a= ((uint32_t*)(src-stride))[0];

  2358.     const uint32_t b= ((uint32_t*)(src-stride))[1];

  2359.     const uint32_t c= ((uint32_t*)(src-stride))[2];

  2360.     const uint32_t d= ((uint32_t*)(src-stride))[3];

  2361. 

  2362.     for(i=0; i<16; i++){

  2363.         ((uint32_t*)(src+i*stride))[0]= a;

  2364.         ((uint32_t*)(src+i*stride))[1]= b;

  2365.         ((uint32_t*)(src+i*stride))[2]= c;

  2366.         ((uint32_t*)(src+i*stride))[3]= d;

  2367.     }

  2368. }

  2369. 

  2370. static void pred16x16_horizontal_c(uint8_t *src, int stride){

  2371.     int i;

  2372. 

  2373.     for(i=0; i<16; i++){

  2374.         ((uint32_t*)(src+i*stride))[0]=

  2375.         ((uint32_t*)(src+i*stride))[1]=

  2376.         ((uint32_t*)(src+i*stride))[2]=

  2377.         ((uint32_t*)(src+i*stride))[3]= src[-1+i*stride]*0x01010101;

  2378.     }

  2379. }

  2380. 

  2381. static void pred16x16_dc_c(uint8_t *src, int stride){

  2382.     int i, dc=0;

  2383. 

  2384.     for(i=0;i<16; i++){

  2385.         dc+= src[-1+i*stride];

  2386.     }

  2387. 

  2388.     for(i=0;i<16; i++){

  2389.         dc+= src[i-stride];

  2390.     }

  2391. 

  2392.     dc= 0x01010101*((dc + 16)>>5);

  2393. 

  2394.     for(i=0; i<16; i++){

  2395.         ((uint32_t*)(src+i*stride))[0]=

  2396.         ((uint32_t*)(src+i*stride))[1]=

  2397.         ((uint32_t*)(src+i*stride))[2]=

  2398.         ((uint32_t*)(src+i*stride))[3]= dc;

  2399.     }

  2400. }

  2401. 

  2402. static void pred16x16_left_dc_c(uint8_t *src, int stride){

  2403.     int i, dc=0;

  2404. 

  2405.     for(i=0;i<16; i++){

  2406.         dc+= src[-1+i*stride];

  2407.     }

  2408. 

  2409.     dc= 0x01010101*((dc + 8)>>4);

  2410. 

  2411.     for(i=0; i<16; i++){

  2412.         ((uint32_t*)(src+i*stride))[0]=

  2413.         ((uint32_t*)(src+i*stride))[1]=

  2414.         ((uint32_t*)(src+i*stride))[2]=

  2415.         ((uint32_t*)(src+i*stride))[3]= dc;

  2416.     }

  2417. }

  2418. 

  2419. static void pred16x16_top_dc_c(uint8_t *src, int stride){

  2420.     int i, dc=0;

  2421. 

  2422.     for(i=0;i<16; i++){

  2423.         dc+= src[i-stride];

  2424.     }

  2425.     dc= 0x01010101*((dc + 8)>>4);

  2426. 

  2427.     for(i=0; i<16; i++){

  2428.         ((uint32_t*)(src+i*stride))[0]=

  2429.         ((uint32_t*)(src+i*stride))[1]=

  2430.         ((uint32_t*)(src+i*stride))[2]=

  2431.         ((uint32_t*)(src+i*stride))[3]= dc;

  2432.     }

  2433. }

  2434. 

  2435. static void pred16x16_128_dc_c(uint8_t *src, int stride){

  2436.     int i;

  2437. 

  2438.     for(i=0; i<16; i++){

  2439.         ((uint32_t*)(src+i*stride))[0]=

  2440.         ((uint32_t*)(src+i*stride))[1]=

  2441.         ((uint32_t*)(src+i*stride))[2]=

  2442.         ((uint32_t*)(src+i*stride))[3]= 0x01010101U*128U;

  2443.     }

  2444. }

  2445. 

  2446. static inline void pred16x16_plane_compat_c(uint8_t *src, int stride, const int svq3){

  2447.   int i, j, k;

  2448.   int a;

  2449.   uint8_t *cm = cropTbl + MAX_NEG_CROP;

  2450.   const uint8_t * const src0 = src+7-stride;

  2451.   const uint8_t *src1 = src+8*stride-1;

  2452.   const uint8_t *src2 = src1-2*stride;      // == src+6*stride-1;

  2453.   int H = src0[1] - src0[-1];

  2454.   int V = src1[0] - src2[ 0];

  2455.   for(k=2; k<=8; ++k) {

  2456.     src1 += stride; src2 -= stride;

  2457.     H += k*(src0[k] - src0[-k]);

  2458.     V += k*(src1[0] - src2[ 0]);

  2459.   }

  2460.   if(svq3){

  2461.     H = ( 5*(H/4) ) / 16;

  2462.     V = ( 5*(V/4) ) / 16;

  2463. 

  2464.     /* required for 100% accuracy */

  2465.     i = H; H = V; V = i;

  2466.   }else{

  2467.     H = ( 5*H+32 ) >> 6;

  2468.     V = ( 5*V+32 ) >> 6;

  2469.   }

  2470. 

  2471.   a = 16*(src1[0] + src2[16] + 1) - 7*(V+H);

  2472.   for(j=16; j>0; --j) {

  2473.     int b = a;

  2474.     a += V;

  2475.     for(i=-16; i<0; i+=4) {

  2476.       src[16+i] = cm[ (b    ) >> 5 ];

  2477.       src[17+i] = cm[ (b+  H) >> 5 ];

  2478.       src[18+i] = cm[ (b+2*H) >> 5 ];

  2479.       src[19+i] = cm[ (b+3*H) >> 5 ];

  2480.       b += 4*H;

  2481.     }

  2482.     src += stride;

  2483.   }

  2484. }

  2485. 

  2486. static void pred16x16_plane_c(uint8_t *src, int stride){

  2487.     pred16x16_plane_compat_c(src, stride, 0);

  2488. }

  2489. 

  2490. static void pred8x8_vertical_c(uint8_t *src, int stride){

  2491.     int i;

  2492.     const uint32_t a= ((uint32_t*)(src-stride))[0];

  2493.     const uint32_t b= ((uint32_t*)(src-stride))[1];

  2494. 

  2495.     for(i=0; i<8; i++){

  2496.         ((uint32_t*)(src+i*stride))[0]= a;

  2497.         ((uint32_t*)(src+i*stride))[1]= b;

  2498.     }

  2499. }

  2500. 

  2501. static void pred8x8_horizontal_c(uint8_t *src, int stride){

  2502.     int i;

  2503. 

  2504.     for(i=0; i<8; i++){

  2505.         ((uint32_t*)(src+i*stride))[0]=

  2506.         ((uint32_t*)(src+i*stride))[1]= src[-1+i*stride]*0x01010101;

  2507.     }

  2508. }

  2509. 

  2510. static void pred8x8_128_dc_c(uint8_t *src, int stride){

  2511.     int i;

  2512. 

  2513.     for(i=0; i<8; i++){

  2514.         ((uint32_t*)(src+i*stride))[0]=

  2515.         ((uint32_t*)(src+i*stride))[1]= 0x01010101U*128U;

  2516.     }

  2517. }

  2518. 

  2519. static void pred8x8_left_dc_c(uint8_t *src, int stride){

  2520.     int i;

  2521.     int dc0, dc2;

  2522. 

  2523.     dc0=dc2=0;

  2524.     for(i=0;i<4; i++){

  2525.         dc0+= src[-1+i*stride];

  2526.         dc2+= src[-1+(i+4)*stride];

  2527.     }

  2528.     dc0= 0x01010101*((dc0 + 2)>>2);

  2529.     dc2= 0x01010101*((dc2 + 2)>>2);

  2530. 

  2531.     for(i=0; i<4; i++){

  2532.         ((uint32_t*)(src+i*stride))[0]=

  2533.         ((uint32_t*)(src+i*stride))[1]= dc0;

  2534.     }

  2535.     for(i=4; i<8; i++){

  2536.         ((uint32_t*)(src+i*stride))[0]=

  2537.         ((uint32_t*)(src+i*stride))[1]= dc2;

  2538.     }

  2539. }

  2540. 

  2541. static void pred8x8_top_dc_c(uint8_t *src, int stride){

  2542.     int i;

  2543.     int dc0, dc1;

  2544. 

  2545.     dc0=dc1=0;

  2546.     for(i=0;i<4; i++){

  2547.         dc0+= src[i-stride];

  2548.         dc1+= src[4+i-stride];

  2549.     }

  2550.     dc0= 0x01010101*((dc0 + 2)>>2);

  2551.     dc1= 0x01010101*((dc1 + 2)>>2);

  2552. 

  2553.     for(i=0; i<4; i++){

  2554.         ((uint32_t*)(src+i*stride))[0]= dc0;

  2555.         ((uint32_t*)(src+i*stride))[1]= dc1;

  2556.     }

  2557.     for(i=4; i<8; i++){

  2558.         ((uint32_t*)(src+i*stride))[0]= dc0;

  2559.         ((uint32_t*)(src+i*stride))[1]= dc1;

  2560.     }

  2561. }

  2562. 

  2563. 

  2564. static void pred8x8_dc_c(uint8_t *src, int stride){

  2565.     int i;

  2566.     int dc0, dc1, dc2, dc3;

  2567. 

  2568.     dc0=dc1=dc2=0;

  2569.     for(i=0;i<4; i++){

  2570.         dc0+= src[-1+i*stride] + src[i-stride];

  2571.         dc1+= src[4+i-stride];

  2572.         dc2+= src[-1+(i+4)*stride];

  2573.     }

  2574.     dc3= 0x01010101*((dc1 + dc2 + 4)>>3);

  2575.     dc0= 0x01010101*((dc0 + 4)>>3);

  2576.     dc1= 0x01010101*((dc1 + 2)>>2);

  2577.     dc2= 0x01010101*((dc2 + 2)>>2);

  2578. 

  2579.     for(i=0; i<4; i++){

  2580.         ((uint32_t*)(src+i*stride))[0]= dc0;

  2581.         ((uint32_t*)(src+i*stride))[1]= dc1;

  2582.     }

  2583.     for(i=4; i<8; i++){

  2584.         ((uint32_t*)(src+i*stride))[0]= dc2;

  2585.         ((uint32_t*)(src+i*stride))[1]= dc3;

  2586.     }

  2587. }

  2588. 

  2589. static void pred8x8_plane_c(uint8_t *src, int stride){

  2590.   int j, k;

  2591.   int a;

  2592.   uint8_t *cm = cropTbl + MAX_NEG_CROP;

  2593.   const uint8_t * const src0 = src+3-stride;

  2594.   const uint8_t *src1 = src+4*stride-1;

  2595.   const uint8_t *src2 = src1-2*stride;      // == src+2*stride-1;

  2596.   int H = src0[1] - src0[-1];

  2597.   int V = src1[0] - src2[ 0];

  2598.   for(k=2; k<=4; ++k) {

  2599.     src1 += stride; src2 -= stride;

  2600.     H += k*(src0[k] - src0[-k]);

  2601.     V += k*(src1[0] - src2[ 0]);

  2602.   }

  2603.   H = ( 17*H+16 ) >> 5;

  2604.   V = ( 17*V+16 ) >> 5;

  2605. 

  2606.   a = 16*(src1[0] + src2[8]+1) - 3*(V+H);

  2607.   for(j=8; j>0; --j) {

  2608.     int b = a;

  2609.     a += V;

  2610.     src[0] = cm[ (b    ) >> 5 ];

  2611.     src[1] = cm[ (b+  H) >> 5 ];

  2612.     src[2] = cm[ (b+2*H) >> 5 ];

  2613.     src[3] = cm[ (b+3*H) >> 5 ];

  2614.     src[4] = cm[ (b+4*H) >> 5 ];

  2615.     src[5] = cm[ (b+5*H) >> 5 ];

  2616.     src[6] = cm[ (b+6*H) >> 5 ];

  2617.     src[7] = cm[ (b+7*H) >> 5 ];

  2618.     src += stride;

  2619.   }

  2620. }

  2621. 

  2622. #define SRC(x,y) src[(x)+(y)*stride]

  2623. #define PL(y) \

  2624.     const int l##y = (SRC(-1,y-1) + 2*SRC(-1,y) + SRC(-1,y+1) + 2) >> 2;

  2625. #define PREDICT_8x8_LOAD_LEFT \

  2626.     const int l0 = ((has_topleft ? SRC(-1,-1) : SRC(-1,0)) \

  2627.                      + 2*SRC(-1,0) + SRC(-1,1) + 2) >> 2; \

  2628.     PL(1) PL(2) PL(3) PL(4) PL(5) PL(6) \

  2629.     const int l7 attribute_unused = (SRC(-1,6) + 3*SRC(-1,7) + 2) >> 2

  2630. 

  2631. #define PT(x) \

  2632.     const int t##x = (SRC(x-1,-1) + 2*SRC(x,-1) + SRC(x+1,-1) + 2) >> 2;

  2633. #define PREDICT_8x8_LOAD_TOP \

  2634.     const int t0 = ((has_topleft ? SRC(-1,-1) : SRC(0,-1)) \

  2635.                      + 2*SRC(0,-1) + SRC(1,-1) + 2) >> 2; \

  2636.     PT(1) PT(2) PT(3) PT(4) PT(5) PT(6) \

  2637.     const int t7 attribute_unused = ((has_topright ? SRC(8,-1) : SRC(7,-1)) \

  2638.                      + 2*SRC(7,-1) + SRC(6,-1) + 2) >> 2

  2639. 

  2640. #define PTR(x) \

  2641.     t##x = (SRC(x-1,-1) + 2*SRC(x,-1) + SRC(x+1,-1) + 2) >> 2;

  2642. #define PREDICT_8x8_LOAD_TOPRIGHT \

  2643.     int t8, t9, t10, t11, t12, t13, t14, t15; \

  2644.     if(has_topright) { \

  2645.         PTR(8) PTR(9) PTR(10) PTR(11) PTR(12) PTR(13) PTR(14) \

  2646.         t15 = (SRC(14,-1) + 3*SRC(15,-1) + 2) >> 2; \

  2647.     } else t8=t9=t10=t11=t12=t13=t14=t15= SRC(7,-1);

  2648. 

  2649. #define PREDICT_8x8_LOAD_TOPLEFT \

  2650.     const int lt = (SRC(-1,0) + 2*SRC(-1,-1) + SRC(0,-1) + 2) >> 2

  2651. 

  2652. #define PREDICT_8x8_DC(v) \

  2653.     int y; \

  2654.     for( y = 0; y < 8; y++ ) { \

  2655.         ((uint32_t*)src)[0] = \

  2656.         ((uint32_t*)src)[1] = v; \

  2657.         src += stride; \

  2658.     }

  2659. 

  2660. static void pred8x8l_128_dc_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2661. {

  2662.     PREDICT_8x8_DC(0x80808080);

  2663. }

  2664. static void pred8x8l_left_dc_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2665. {

  2666.     PREDICT_8x8_LOAD_LEFT;

  2667.     const uint32_t dc = ((l0+l1+l2+l3+l4+l5+l6+l7+4) >> 3) * 0x01010101;

  2668.     PREDICT_8x8_DC(dc);

  2669. }

  2670. static void pred8x8l_top_dc_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2671. {

  2672.     PREDICT_8x8_LOAD_TOP;

  2673.     const uint32_t dc = ((t0+t1+t2+t3+t4+t5+t6+t7+4) >> 3) * 0x01010101;

  2674.     PREDICT_8x8_DC(dc);

  2675. }

  2676. static void pred8x8l_dc_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2677. {

  2678.     PREDICT_8x8_LOAD_LEFT;

  2679.     PREDICT_8x8_LOAD_TOP;

  2680.     const uint32_t dc = ((l0+l1+l2+l3+l4+l5+l6+l7

  2681.                          +t0+t1+t2+t3+t4+t5+t6+t7+8) >> 4) * 0x01010101;

  2682.     PREDICT_8x8_DC(dc);

  2683. }

  2684. static void pred8x8l_horizontal_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2685. {

  2686.     PREDICT_8x8_LOAD_LEFT;

  2687. #define ROW(y) ((uint32_t*)(src+y*stride))[0] =\

  2688.                ((uint32_t*)(src+y*stride))[1] = 0x01010101 * l##y

  2689.     ROW(0); ROW(1); ROW(2); ROW(3); ROW(4); ROW(5); ROW(6); ROW(7);

  2690. #undef ROW

  2691. }

  2692. static void pred8x8l_vertical_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2693. {

  2694.     int y;

  2695.     PREDICT_8x8_LOAD_TOP;

  2696.     src[0] = t0;

  2697.     src[1] = t1;

  2698.     src[2] = t2;

  2699.     src[3] = t3;

  2700.     src[4] = t4;

  2701.     src[5] = t5;

  2702.     src[6] = t6;

  2703.     src[7] = t7;

  2704.     for( y = 1; y < 8; y++ )

  2705.         *(uint64_t*)(src+y*stride) = *(uint64_t*)src;

  2706. }

  2707. static void pred8x8l_down_left_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2708. {

  2709.     PREDICT_8x8_LOAD_TOP;

  2710.     PREDICT_8x8_LOAD_TOPRIGHT;

  2711.     SRC(0,0)= (t0 + 2*t1 + t2 + 2) >> 2;

  2712.     SRC(0,1)=SRC(1,0)= (t1 + 2*t2 + t3 + 2) >> 2;

  2713.     SRC(0,2)=SRC(1,1)=SRC(2,0)= (t2 + 2*t3 + t4 + 2) >> 2;

  2714.     SRC(0,3)=SRC(1,2)=SRC(2,1)=SRC(3,0)= (t3 + 2*t4 + t5 + 2) >> 2;

  2715.     SRC(0,4)=SRC(1,3)=SRC(2,2)=SRC(3,1)=SRC(4,0)= (t4 + 2*t5 + t6 + 2) >> 2;

  2716.     SRC(0,5)=SRC(1,4)=SRC(2,3)=SRC(3,2)=SRC(4,1)=SRC(5,0)= (t5 + 2*t6 + t7 + 2) >> 2;

  2717.     SRC(0,6)=SRC(1,5)=SRC(2,4)=SRC(3,3)=SRC(4,2)=SRC(5,1)=SRC(6,0)= (t6 + 2*t7 + t8 + 2) >> 2;

  2718.     SRC(0,7)=SRC(1,6)=SRC(2,5)=SRC(3,4)=SRC(4,3)=SRC(5,2)=SRC(6,1)=SRC(7,0)= (t7 + 2*t8 + t9 + 2) >> 2;

  2719.     SRC(1,7)=SRC(2,6)=SRC(3,5)=SRC(4,4)=SRC(5,3)=SRC(6,2)=SRC(7,1)= (t8 + 2*t9 + t10 + 2) >> 2;

  2720.     SRC(2,7)=SRC(3,6)=SRC(4,5)=SRC(5,4)=SRC(6,3)=SRC(7,2)= (t9 + 2*t10 + t11 + 2) >> 2;

  2721.     SRC(3,7)=SRC(4,6)=SRC(5,5)=SRC(6,4)=SRC(7,3)= (t10 + 2*t11 + t12 + 2) >> 2;

  2722.     SRC(4,7)=SRC(5,6)=SRC(6,5)=SRC(7,4)= (t11 + 2*t12 + t13 + 2) >> 2;

  2723.     SRC(5,7)=SRC(6,6)=SRC(7,5)= (t12 + 2*t13 + t14 + 2) >> 2;

  2724.     SRC(6,7)=SRC(7,6)= (t13 + 2*t14 + t15 + 2) >> 2;

  2725.     SRC(7,7)= (t14 + 3*t15 + 2) >> 2;

  2726. }

  2727. static void pred8x8l_down_right_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2728. {

  2729.     PREDICT_8x8_LOAD_TOP;

  2730.     PREDICT_8x8_LOAD_LEFT;

  2731.     PREDICT_8x8_LOAD_TOPLEFT;

  2732.     SRC(0,7)= (l7 + 2*l6 + l5 + 2) >> 2;

  2733.     SRC(0,6)=SRC(1,7)= (l6 + 2*l5 + l4 + 2) >> 2;

  2734.     SRC(0,5)=SRC(1,6)=SRC(2,7)= (l5 + 2*l4 + l3 + 2) >> 2;

  2735.     SRC(0,4)=SRC(1,5)=SRC(2,6)=SRC(3,7)= (l4 + 2*l3 + l2 + 2) >> 2;

  2736.     SRC(0,3)=SRC(1,4)=SRC(2,5)=SRC(3,6)=SRC(4,7)= (l3 + 2*l2 + l1 + 2) >> 2;

  2737.     SRC(0,2)=SRC(1,3)=SRC(2,4)=SRC(3,5)=SRC(4,6)=SRC(5,7)= (l2 + 2*l1 + l0 + 2) >> 2;

  2738.     SRC(0,1)=SRC(1,2)=SRC(2,3)=SRC(3,4)=SRC(4,5)=SRC(5,6)=SRC(6,7)= (l1 + 2*l0 + lt + 2) >> 2;

  2739.     SRC(0,0)=SRC(1,1)=SRC(2,2)=SRC(3,3)=SRC(4,4)=SRC(5,5)=SRC(6,6)=SRC(7,7)= (l0 + 2*lt + t0 + 2) >> 2;

  2740.     SRC(1,0)=SRC(2,1)=SRC(3,2)=SRC(4,3)=SRC(5,4)=SRC(6,5)=SRC(7,6)= (lt + 2*t0 + t1 + 2) >> 2;

  2741.     SRC(2,0)=SRC(3,1)=SRC(4,2)=SRC(5,3)=SRC(6,4)=SRC(7,5)= (t0 + 2*t1 + t2 + 2) >> 2;

  2742.     SRC(3,0)=SRC(4,1)=SRC(5,2)=SRC(6,3)=SRC(7,4)= (t1 + 2*t2 + t3 + 2) >> 2;

  2743.     SRC(4,0)=SRC(5,1)=SRC(6,2)=SRC(7,3)= (t2 + 2*t3 + t4 + 2) >> 2;

  2744.     SRC(5,0)=SRC(6,1)=SRC(7,2)= (t3 + 2*t4 + t5 + 2) >> 2;

  2745.     SRC(6,0)=SRC(7,1)= (t4 + 2*t5 + t6 + 2) >> 2;

  2746.     SRC(7,0)= (t5 + 2*t6 + t7 + 2) >> 2;

  2747. 

  2748. }

  2749. static void pred8x8l_vertical_right_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2750. {

  2751.     PREDICT_8x8_LOAD_TOP;

  2752.     PREDICT_8x8_LOAD_LEFT;

  2753.     PREDICT_8x8_LOAD_TOPLEFT;

  2754.     SRC(0,6)= (l5 + 2*l4 + l3 + 2) >> 2;

  2755.     SRC(0,7)= (l6 + 2*l5 + l4 + 2) >> 2;

  2756.     SRC(0,4)=SRC(1,6)= (l3 + 2*l2 + l1 + 2) >> 2;

  2757.     SRC(0,5)=SRC(1,7)= (l4 + 2*l3 + l2 + 2) >> 2;

  2758.     SRC(0,2)=SRC(1,4)=SRC(2,6)= (l1 + 2*l0 + lt + 2) >> 2;

  2759.     SRC(0,3)=SRC(1,5)=SRC(2,7)= (l2 + 2*l1 + l0 + 2) >> 2;

  2760.     SRC(0,1)=SRC(1,3)=SRC(2,5)=SRC(3,7)= (l0 + 2*lt + t0 + 2) >> 2;

  2761.     SRC(0,0)=SRC(1,2)=SRC(2,4)=SRC(3,6)= (lt + t0 + 1) >> 1;

  2762.     SRC(1,1)=SRC(2,3)=SRC(3,5)=SRC(4,7)= (lt + 2*t0 + t1 + 2) >> 2;

  2763.     SRC(1,0)=SRC(2,2)=SRC(3,4)=SRC(4,6)= (t0 + t1 + 1) >> 1;

  2764.     SRC(2,1)=SRC(3,3)=SRC(4,5)=SRC(5,7)= (t0 + 2*t1 + t2 + 2) >> 2;

  2765.     SRC(2,0)=SRC(3,2)=SRC(4,4)=SRC(5,6)= (t1 + t2 + 1) >> 1;

  2766.     SRC(3,1)=SRC(4,3)=SRC(5,5)=SRC(6,7)= (t1 + 2*t2 + t3 + 2) >> 2;

  2767.     SRC(3,0)=SRC(4,2)=SRC(5,4)=SRC(6,6)= (t2 + t3 + 1) >> 1;

  2768.     SRC(4,1)=SRC(5,3)=SRC(6,5)=SRC(7,7)= (t2 + 2*t3 + t4 + 2) >> 2;

  2769.     SRC(4,0)=SRC(5,2)=SRC(6,4)=SRC(7,6)= (t3 + t4 + 1) >> 1;

  2770.     SRC(5,1)=SRC(6,3)=SRC(7,5)= (t3 + 2*t4 + t5 + 2) >> 2;

  2771.     SRC(5,0)=SRC(6,2)=SRC(7,4)= (t4 + t5 + 1) >> 1;

  2772.     SRC(6,1)=SRC(7,3)= (t4 + 2*t5 + t6 + 2) >> 2;

  2773.     SRC(6,0)=SRC(7,2)= (t5 + t6 + 1) >> 1;

  2774.     SRC(7,1)= (t5 + 2*t6 + t7 + 2) >> 2;

  2775.     SRC(7,0)= (t6 + t7 + 1) >> 1;

  2776. }

  2777. static void pred8x8l_horizontal_down_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2778. {

  2779.     PREDICT_8x8_LOAD_TOP;

  2780.     PREDICT_8x8_LOAD_LEFT;

  2781.     PREDICT_8x8_LOAD_TOPLEFT;

  2782.     SRC(0,7)= (l6 + l7 + 1) >> 1;

  2783.     SRC(1,7)= (l5 + 2*l6 + l7 + 2) >> 2;

  2784.     SRC(0,6)=SRC(2,7)= (l5 + l6 + 1) >> 1;

  2785.     SRC(1,6)=SRC(3,7)= (l4 + 2*l5 + l6 + 2) >> 2;

  2786.     SRC(0,5)=SRC(2,6)=SRC(4,7)= (l4 + l5 + 1) >> 1;

  2787.     SRC(1,5)=SRC(3,6)=SRC(5,7)= (l3 + 2*l4 + l5 + 2) >> 2;

  2788.     SRC(0,4)=SRC(2,5)=SRC(4,6)=SRC(6,7)= (l3 + l4 + 1) >> 1;

  2789.     SRC(1,4)=SRC(3,5)=SRC(5,6)=SRC(7,7)= (l2 + 2*l3 + l4 + 2) >> 2;

  2790.     SRC(0,3)=SRC(2,4)=SRC(4,5)=SRC(6,6)= (l2 + l3 + 1) >> 1;

  2791.     SRC(1,3)=SRC(3,4)=SRC(5,5)=SRC(7,6)= (l1 + 2*l2 + l3 + 2) >> 2;

  2792.     SRC(0,2)=SRC(2,3)=SRC(4,4)=SRC(6,5)= (l1 + l2 + 1) >> 1;

  2793.     SRC(1,2)=SRC(3,3)=SRC(5,4)=SRC(7,5)= (l0 + 2*l1 + l2 + 2) >> 2;

  2794.     SRC(0,1)=SRC(2,2)=SRC(4,3)=SRC(6,4)= (l0 + l1 + 1) >> 1;

  2795.     SRC(1,1)=SRC(3,2)=SRC(5,3)=SRC(7,4)= (lt + 2*l0 + l1 + 2) >> 2;

  2796.     SRC(0,0)=SRC(2,1)=SRC(4,2)=SRC(6,3)= (lt + l0 + 1) >> 1;

  2797.     SRC(1,0)=SRC(3,1)=SRC(5,2)=SRC(7,3)= (l0 + 2*lt + t0 + 2) >> 2;

  2798.     SRC(2,0)=SRC(4,1)=SRC(6,2)= (t1 + 2*t0 + lt + 2) >> 2;

  2799.     SRC(3,0)=SRC(5,1)=SRC(7,2)= (t2 + 2*t1 + t0 + 2) >> 2;

  2800.     SRC(4,0)=SRC(6,1)= (t3 + 2*t2 + t1 + 2) >> 2;

  2801.     SRC(5,0)=SRC(7,1)= (t4 + 2*t3 + t2 + 2) >> 2;

  2802.     SRC(6,0)= (t5 + 2*t4 + t3 + 2) >> 2;

  2803.     SRC(7,0)= (t6 + 2*t5 + t4 + 2) >> 2;

  2804. }

  2805. static void pred8x8l_vertical_left_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2806. {

  2807.     PREDICT_8x8_LOAD_TOP;

  2808.     PREDICT_8x8_LOAD_TOPRIGHT;

  2809.     SRC(0,0)= (t0 + t1 + 1) >> 1;

  2810.     SRC(0,1)= (t0 + 2*t1 + t2 + 2) >> 2;

  2811.     SRC(0,2)=SRC(1,0)= (t1 + t2 + 1) >> 1;

  2812.     SRC(0,3)=SRC(1,1)= (t1 + 2*t2 + t3 + 2) >> 2;

  2813.     SRC(0,4)=SRC(1,2)=SRC(2,0)= (t2 + t3 + 1) >> 1;

  2814.     SRC(0,5)=SRC(1,3)=SRC(2,1)= (t2 + 2*t3 + t4 + 2) >> 2;

  2815.     SRC(0,6)=SRC(1,4)=SRC(2,2)=SRC(3,0)= (t3 + t4 + 1) >> 1;

  2816.     SRC(0,7)=SRC(1,5)=SRC(2,3)=SRC(3,1)= (t3 + 2*t4 + t5 + 2) >> 2;

  2817.     SRC(1,6)=SRC(2,4)=SRC(3,2)=SRC(4,0)= (t4 + t5 + 1) >> 1;

  2818.     SRC(1,7)=SRC(2,5)=SRC(3,3)=SRC(4,1)= (t4 + 2*t5 + t6 + 2) >> 2;

  2819.     SRC(2,6)=SRC(3,4)=SRC(4,2)=SRC(5,0)= (t5 + t6 + 1) >> 1;

  2820.     SRC(2,7)=SRC(3,5)=SRC(4,3)=SRC(5,1)= (t5 + 2*t6 + t7 + 2) >> 2;

  2821.     SRC(3,6)=SRC(4,4)=SRC(5,2)=SRC(6,0)= (t6 + t7 + 1) >> 1;

  2822.     SRC(3,7)=SRC(4,5)=SRC(5,3)=SRC(6,1)= (t6 + 2*t7 + t8 + 2) >> 2;

  2823.     SRC(4,6)=SRC(5,4)=SRC(6,2)=SRC(7,0)= (t7 + t8 + 1) >> 1;

  2824.     SRC(4,7)=SRC(5,5)=SRC(6,3)=SRC(7,1)= (t7 + 2*t8 + t9 + 2) >> 2;

  2825.     SRC(5,6)=SRC(6,4)=SRC(7,2)= (t8 + t9 + 1) >> 1;

  2826.     SRC(5,7)=SRC(6,5)=SRC(7,3)= (t8 + 2*t9 + t10 + 2) >> 2;

  2827.     SRC(6,6)=SRC(7,4)= (t9 + t10 + 1) >> 1;

  2828.     SRC(6,7)=SRC(7,5)= (t9 + 2*t10 + t11 + 2) >> 2;

  2829.     SRC(7,6)= (t10 + t11 + 1) >> 1;

  2830.     SRC(7,7)= (t10 + 2*t11 + t12 + 2) >> 2;

  2831. }

  2832. static void pred8x8l_horizontal_up_c(uint8_t *src, int has_topleft, int has_topright, int stride)

  2833. {

  2834.     PREDICT_8x8_LOAD_LEFT;

  2835.     SRC(0,0)= (l0 + l1 + 1) >> 1;

  2836.     SRC(1,0)= (l0 + 2*l1 + l2 + 2) >> 2;

  2837.     SRC(0,1)=SRC(2,0)= (l1 + l2 + 1) >> 1;

  2838.     SRC(1,1)=SRC(3,0)= (l1 + 2*l2 + l3 + 2) >> 2;

  2839.     SRC(0,2)=SRC(2,1)=SRC(4,0)= (l2 + l3 + 1) >> 1;

  2840.     SRC(1,2)=SRC(3,1)=SRC(5,0)= (l2 + 2*l3 + l4 + 2) >> 2;

  2841.     SRC(0,3)=SRC(2,2)=SRC(4,1)=SRC(6,0)= (l3 + l4 + 1) >> 1;

  2842.     SRC(1,3)=SRC(3,2)=SRC(5,1)=SRC(7,0)= (l3 + 2*l4 + l5 + 2) >> 2;

  2843.     SRC(0,4)=SRC(2,3)=SRC(4,2)=SRC(6,1)= (l4 + l5 + 1) >> 1;

  2844.     SRC(1,4)=SRC(3,3)=SRC(5,2)=SRC(7,1)= (l4 + 2*l5 + l6 + 2) >> 2;

  2845.     SRC(0,5)=SRC(2,4)=SRC(4,3)=SRC(6,2)= (l5 + l6 + 1) >> 1;

  2846.     SRC(1,5)=SRC(3,4)=SRC(5,3)=SRC(7,2)= (l5 + 2*l6 + l7 + 2) >> 2;

  2847.     SRC(0,6)=SRC(2,5)=SRC(4,4)=SRC(6,3)= (l6 + l7 + 1) >> 1;

  2848.     SRC(1,6)=SRC(3,5)=SRC(5,4)=SRC(7,3)= (l6 + 3*l7 + 2) >> 2;

  2849.     SRC(0,7)=SRC(1,7)=SRC(2,6)=SRC(2,7)=SRC(3,6)=

  2850.     SRC(3,7)=SRC(4,5)=SRC(4,6)=SRC(4,7)=SRC(5,5)=

  2851.     SRC(5,6)=SRC(5,7)=SRC(6,4)=SRC(6,5)=SRC(6,6)=

  2852.     SRC(6,7)=SRC(7,4)=SRC(7,5)=SRC(7,6)=SRC(7,7)= l7;

  2853. }

  2854. #undef PREDICT_8x8_LOAD_LEFT

  2855. #undef PREDICT_8x8_LOAD_TOP

  2856. #undef PREDICT_8x8_LOAD_TOPLEFT

  2857. #undef PREDICT_8x8_LOAD_TOPRIGHT

  2858. #undef PREDICT_8x8_DC

  2859. #undef PTR

  2860. #undef PT

  2861. #undef PL

  2862. #undef SRC

  2863. 

  2864. static inline void mc_dir_part(H264Context *h, Picture *pic, int n, int square, int chroma_height, int delta, int list,

  2865.                            uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,

  2866.                            int src_x_offset, int src_y_offset,

  2867.                            qpel_mc_func *qpix_op, h264_chroma_mc_func chroma_op){

  2868.     MpegEncContext * const s = &h->s;

  2869.     const int mx= h->mv_cache[list][ scan8[n] ][0] + src_x_offset*8;

  2870.     int my=       h->mv_cache[list][ scan8[n] ][1] + src_y_offset*8;

  2871.     const int luma_xy= (mx&3) + ((my&3)<<2);

  2872.     uint8_t * src_y = pic->data[0] + (mx>>2) + (my>>2)*h->mb_linesize;

  2873.     uint8_t * src_cb, * src_cr;

  2874.     int extra_width= h->emu_edge_width;

  2875.     int extra_height= h->emu_edge_height;

  2876.     int emu=0;

  2877.     const int full_mx= mx>>2;

  2878.     const int full_my= my>>2;

  2879.     const int pic_width  = 16*s->mb_width;

  2880.     const int pic_height = 16*s->mb_height >> MB_MBAFF;

  2881. 

  2882.     if(!pic->data[0])

  2883.         return;

  2884. 

  2885.     if(mx&7) extra_width -= 3;

  2886.     if(my&7) extra_height -= 3;

  2887. 

  2888.     if(   full_mx < 0-extra_width

  2889.        || full_my < 0-extra_height

  2890.        || full_mx + 16/*FIXME*/ > pic_width + extra_width

  2891.        || full_my + 16/*FIXME*/ > pic_height + extra_height){

  2892.         ff_emulated_edge_mc(s->edge_emu_buffer, src_y - 2 - 2*h->mb_linesize, h->mb_linesize, 16+5, 16+5/*FIXME*/, full_mx-2, full_my-2, pic_width, pic_height);

  2893.             src_y= s->edge_emu_buffer + 2 + 2*h->mb_linesize;

  2894.         emu=1;

  2895.     }

  2896. 

  2897.     qpix_op[luma_xy](dest_y, src_y, h->mb_linesize); //FIXME try variable height perhaps?

  2898.     if(!square){

  2899.         qpix_op[luma_xy](dest_y + delta, src_y + delta, h->mb_linesize);

  2900.     }

  2901. 

  2902.     if(s->flags&CODEC_FLAG_GRAY) return;

  2903. 

  2904.     if(MB_MBAFF){

  2905.         // chroma offset when predicting from a field of opposite parity

  2906.         my += 2 * ((s->mb_y & 1) - (h->ref_cache[list][scan8[n]] & 1));

  2907.         emu |= (my>>3) < 0 || (my>>3) + 8 >= (pic_height>>1);

  2908.     }

  2909.     src_cb= pic->data[1] + (mx>>3) + (my>>3)*h->mb_uvlinesize;

  2910.     src_cr= pic->data[2] + (mx>>3) + (my>>3)*h->mb_uvlinesize;

  2911. 

  2912.     if(emu){

  2913.         ff_emulated_edge_mc(s->edge_emu_buffer, src_cb, h->mb_uvlinesize, 9, 9/*FIXME*/, (mx>>3), (my>>3), pic_width>>1, pic_height>>1);

  2914.             src_cb= s->edge_emu_buffer;

  2915.     }

  2916.     chroma_op(dest_cb, src_cb, h->mb_uvlinesize, chroma_height, mx&7, my&7);

  2917. 

  2918.     if(emu){

  2919.         ff_emulated_edge_mc(s->edge_emu_buffer, src_cr, h->mb_uvlinesize, 9, 9/*FIXME*/, (mx>>3), (my>>3), pic_width>>1, pic_height>>1);

  2920.             src_cr= s->edge_emu_buffer;

  2921.     }

  2922.     chroma_op(dest_cr, src_cr, h->mb_uvlinesize, chroma_height, mx&7, my&7);

  2923. }

  2924. 

  2925. static inline void mc_part_std(H264Context *h, int n, int square, int chroma_height, int delta,

  2926.                            uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,

  2927.                            int x_offset, int y_offset,

  2928.                            qpel_mc_func *qpix_put, h264_chroma_mc_func chroma_put,

  2929.                            qpel_mc_func *qpix_avg, h264_chroma_mc_func chroma_avg,

  2930.                            int list0, int list1){

  2931.     MpegEncContext * const s = &h->s;

  2932.     qpel_mc_func *qpix_op=  qpix_put;

  2933.     h264_chroma_mc_func chroma_op= chroma_put;

  2934. 

  2935.     dest_y  += 2*x_offset + 2*y_offset*h->  mb_linesize;

  2936.     dest_cb +=   x_offset +   y_offset*h->mb_uvlinesize;

  2937.     dest_cr +=   x_offset +   y_offset*h->mb_uvlinesize;

  2938.     x_offset += 8*s->mb_x;

  2939.     y_offset += 8*(s->mb_y >> MB_MBAFF);

  2940. 

  2941.     if(list0){

  2942.         Picture *ref= &h->ref_list[0][ h->ref_cache[0][ scan8[n] ] ];

  2943.         mc_dir_part(h, ref, n, square, chroma_height, delta, 0,

  2944.                            dest_y, dest_cb, dest_cr, x_offset, y_offset,

  2945.                            qpix_op, chroma_op);

  2946. 

  2947.         qpix_op=  qpix_avg;

  2948.         chroma_op= chroma_avg;

  2949.     }

  2950. 

  2951.     if(list1){

  2952.         Picture *ref= &h->ref_list[1][ h->ref_cache[1][ scan8[n] ] ];

  2953.         mc_dir_part(h, ref, n, square, chroma_height, delta, 1,

  2954.                            dest_y, dest_cb, dest_cr, x_offset, y_offset,

  2955.                            qpix_op, chroma_op);

  2956.     }

  2957. }

  2958. 

  2959. static inline void mc_part_weighted(H264Context *h, int n, int square, int chroma_height, int delta,

  2960.                            uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,

  2961.                            int x_offset, int y_offset,

  2962.                            qpel_mc_func *qpix_put, h264_chroma_mc_func chroma_put,

  2963.                            h264_weight_func luma_weight_op, h264_weight_func chroma_weight_op,

  2964.                            h264_biweight_func luma_weight_avg, h264_biweight_func chroma_weight_avg,

  2965.                            int list0, int list1){

  2966.     MpegEncContext * const s = &h->s;

  2967. 

  2968.     dest_y  += 2*x_offset + 2*y_offset*h->  mb_linesize;

  2969.     dest_cb +=   x_offset +   y_offset*h->mb_uvlinesize;

  2970.     dest_cr +=   x_offset +   y_offset*h->mb_uvlinesize;

  2971.     x_offset += 8*s->mb_x;

  2972.     y_offset += 8*(s->mb_y >> MB_MBAFF);

  2973. 

  2974.     if(list0 && list1){

  2975.         /* don't optimize for luma-only case, since B-frames usually

  2976.          * use implicit weights => chroma too. */

  2977.         uint8_t *tmp_cb = s->obmc_scratchpad;

  2978.         uint8_t *tmp_cr = s->obmc_scratchpad + 8;

  2979.         uint8_t *tmp_y  = s->obmc_scratchpad + 8*h->mb_uvlinesize;

  2980.         int refn0 = h->ref_cache[0][ scan8[n] ];

  2981.         int refn1 = h->ref_cache[1][ scan8[n] ];

  2982. 

  2983.         mc_dir_part(h, &h->ref_list[0][refn0], n, square, chroma_height, delta, 0,

  2984.                     dest_y, dest_cb, dest_cr,

  2985.                     x_offset, y_offset, qpix_put, chroma_put);

  2986.         mc_dir_part(h, &h->ref_list[1][refn1], n, square, chroma_height, delta, 1,

  2987.                     tmp_y, tmp_cb, tmp_cr,

  2988.                     x_offset, y_offset, qpix_put, chroma_put);

  2989. 

  2990.         if(h->use_weight == 2){

  2991.             int weight0 = h->implicit_weight[refn0][refn1];

  2992.             int weight1 = 64 - weight0;

  2993.             luma_weight_avg(  dest_y,  tmp_y,  h->  mb_linesize, 5, weight0, weight1, 0);

  2994.             chroma_weight_avg(dest_cb, tmp_cb, h->mb_uvlinesize, 5, weight0, weight1, 0);

  2995.             chroma_weight_avg(dest_cr, tmp_cr, h->mb_uvlinesize, 5, weight0, weight1, 0);

  2996.         }else{

  2997.             luma_weight_avg(dest_y, tmp_y, h->mb_linesize, h->luma_log2_weight_denom,

  2998.                             h->luma_weight[0][refn0], h->luma_weight[1][refn1],

  2999.                             h->luma_offset[0][refn0] + h->luma_offset[1][refn1]);

  3000.             chroma_weight_avg(dest_cb, tmp_cb, h->mb_uvlinesize, h->chroma_log2_weight_denom,

  3001.                             h->chroma_weight[0][refn0][0], h->chroma_weight[1][refn1][0],

  3002.                             h->chroma_offset[0][refn0][0] + h->chroma_offset[1][refn1][0]);

  3003.             chroma_weight_avg(dest_cr, tmp_cr, h->mb_uvlinesize, h->chroma_log2_weight_denom,

  3004.                             h->chroma_weight[0][refn0][1], h->chroma_weight[1][refn1][1],

  3005.                             h->chroma_offset[0][refn0][1] + h->chroma_offset[1][refn1][1]);

  3006.         }

  3007.     }else{

  3008.         int list = list1 ? 1 : 0;

  3009.         int refn = h->ref_cache[list][ scan8[n] ];

  3010.         Picture *ref= &h->ref_list[list][refn];

  3011.         mc_dir_part(h, ref, n, square, chroma_height, delta, list,

  3012.                     dest_y, dest_cb, dest_cr, x_offset, y_offset,

  3013.                     qpix_put, chroma_put);

  3014. 

  3015.         luma_weight_op(dest_y, h->mb_linesize, h->luma_log2_weight_denom,

  3016.                        h->luma_weight[list][refn], h->luma_offset[list][refn]);

  3017.         if(h->use_weight_chroma){

  3018.             chroma_weight_op(dest_cb, h->mb_uvlinesize, h->chroma_log2_weight_denom,

  3019.                              h->chroma_weight[list][refn][0], h->chroma_offset[list][refn][0]);

  3020.             chroma_weight_op(dest_cr, h->mb_uvlinesize, h->chroma_log2_weight_denom,

  3021.                              h->chroma_weight[list][refn][1], h->chroma_offset[list][refn][1]);

  3022.         }

  3023.     }

  3024. }

  3025. 

  3026. static inline void mc_part(H264Context *h, int n, int square, int chroma_height, int delta,

  3027.                            uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,

  3028.                            int x_offset, int y_offset,

  3029.                            qpel_mc_func *qpix_put, h264_chroma_mc_func chroma_put,

  3030.                            qpel_mc_func *qpix_avg, h264_chroma_mc_func chroma_avg,

  3031.                            h264_weight_func *weight_op, h264_biweight_func *weight_avg,

  3032.                            int list0, int list1){

  3033.     if((h->use_weight==2 && list0 && list1

  3034.         && (h->implicit_weight[ h->ref_cache[0][scan8[n]] ][ h->ref_cache[1][scan8[n]] ] != 32))

  3035.        || h->use_weight==1)

  3036.         mc_part_weighted(h, n, square, chroma_height, delta, dest_y, dest_cb, dest_cr,

  3037.                          x_offset, y_offset, qpix_put, chroma_put,

  3038.                          weight_op[0], weight_op[3], weight_avg[0], weight_avg[3], list0, list1);

  3039.     else

  3040.         mc_part_std(h, n, square, chroma_height, delta, dest_y, dest_cb, dest_cr,

  3041.                     x_offset, y_offset, qpix_put, chroma_put, qpix_avg, chroma_avg, list0, list1);

  3042. }

  3043. 

  3044. static inline void prefetch_motion(H264Context *h, int list){

  3045.     /* fetch pixels for estimated mv 4 macroblocks ahead

  3046.      * optimized for 64byte cache lines */

  3047.     MpegEncContext * const s = &h->s;

  3048.     const int refn = h->ref_cache[list][scan8[0]];

  3049.     if(refn >= 0){

  3050.         const int mx= (h->mv_cache[list][scan8[0]][0]>>2) + 16*s->mb_x + 8;

  3051.         const int my= (h->mv_cache[list][scan8[0]][1]>>2) + 16*s->mb_y;

  3052.         uint8_t **src= h->ref_list[list][refn].data;

  3053.         int off= mx + (my + (s->mb_x&3)*4)*h->mb_linesize + 64;

  3054.         s->dsp.prefetch(src[0]+off, s->linesize, 4);

  3055.         off= (mx>>1) + ((my>>1) + (s->mb_x&7))*s->uvlinesize + 64;

  3056.         s->dsp.prefetch(src[1]+off, src[2]-src[1], 2);

  3057.     }

  3058. }

  3059. 

  3060. static void hl_motion(H264Context *h, uint8_t *dest_y, uint8_t *dest_cb, uint8_t *dest_cr,

  3061.                       qpel_mc_func (*qpix_put)[16], h264_chroma_mc_func (*chroma_put),

  3062.                       qpel_mc_func (*qpix_avg)[16], h264_chroma_mc_func (*chroma_avg),

  3063.                       h264_weight_func *weight_op, h264_biweight_func *weight_avg){

  3064.     MpegEncContext * const s = &h->s;

  3065.     const int mb_xy= s->mb_x + s->mb_y*s->mb_stride;

  3066.     const int mb_type= s->current_picture.mb_type[mb_xy];

  3067. 

  3068.     assert(IS_INTER(mb_type));

  3069. 

  3070.     prefetch_motion(h, 0);

  3071. 

  3072.     if(IS_16X16(mb_type)){

  3073.         mc_part(h, 0, 1, 8, 0, dest_y, dest_cb, dest_cr, 0, 0,

  3074.                 qpix_put[0], chroma_put[0], qpix_avg[0], chroma_avg[0],

  3075.                 &weight_op[0], &weight_avg[0],

  3076.                 IS_DIR(mb_type, 0, 0), IS_DIR(mb_type, 0, 1));

  3077.     }else if(IS_16X8(mb_type)){

  3078.         mc_part(h, 0, 0, 4, 8, dest_y, dest_cb, dest_cr, 0, 0,

  3079.                 qpix_put[1], chroma_put[0], qpix_avg[1], chroma_avg[0],

  3080.                 &weight_op[1], &weight_avg[1],

  3081.                 IS_DIR(mb_type, 0, 0), IS_DIR(mb_type, 0, 1));

  3082.         mc_part(h, 8, 0, 4, 8, dest_y, dest_cb, dest_cr, 0, 4,

  3083.                 qpix_put[1], chroma_put[0], qpix_avg[1], chroma_avg[0],

  3084.                 &weight_op[1], &weight_avg[1],

  3085.                 IS_DIR(mb_type, 1, 0), IS_DIR(mb_type, 1, 1));

  3086.     }else if(IS_8X16(mb_type)){

  3087.         mc_part(h, 0, 0, 8, 8*h->mb_linesize, dest_y, dest_cb, dest_cr, 0, 0,

  3088.                 qpix_put[1], chroma_put[1], qpix_avg[1], chroma_avg[1],

  3089.                 &weight_op[2], &weight_avg[2],

  3090.                 IS_DIR(mb_type, 0, 0), IS_DIR(mb_type, 0, 1));

  3091.         mc_part(h, 4, 0, 8, 8*h->mb_linesize, dest_y, dest_cb, dest_cr, 4, 0,

  3092.                 qpix_put[1], chroma_put[1], qpix_avg[1], chroma_avg[1],

  3093.                 &weight_op[2], &weight_avg[2],

  3094.                 IS_DIR(mb_type, 1, 0), IS_DIR(mb_type, 1, 1));

  3095.     }else{

  3096.         int i;

  3097. 

  3098.         assert(IS_8X8(mb_type));

  3099. 

  3100.         for(i=0; i<4; i++){

  3101.             const int sub_mb_type= h->sub_mb_type[i];

  3102.             const int n= 4*i;

  3103.             int x_offset= (i&1)<<2;

  3104.             int y_offset= (i&2)<<1;

  3105. 

  3106.             if(IS_SUB_8X8(sub_mb_type)){

  3107.                 mc_part(h, n, 1, 4, 0, dest_y, dest_cb, dest_cr, x_offset, y_offset,

  3108.                     qpix_put[1], chroma_put[1], qpix_avg[1], chroma_avg[1],

  3109.                     &weight_op[3], &weight_avg[3],

  3110.                     IS_DIR(sub_mb_type, 0, 0), IS_DIR(sub_mb_type, 0, 1));

  3111.             }else if(IS_SUB_8X4(sub_mb_type)){

  3112.                 mc_part(h, n  , 0, 2, 4, dest_y, dest_cb, dest_cr, x_offset, y_offset,

  3113.                     qpix_put[2], chroma_put[1], qpix_avg[2], chroma_avg[1],

  3114.                     &weight_op[4], &weight_avg[4],

  3115.                     IS_DIR(sub_mb_type, 0, 0), IS_DIR(sub_mb_type, 0, 1));

  3116.                 mc_part(h, n+2, 0, 2, 4, dest_y, dest_cb, dest_cr, x_offset, y_offset+2,

  3117.                     qpix_put[2], chroma_put[1], qpix_avg[2], chroma_avg[1],

  3118.                     &weight_op[4], &weight_avg[4],

  3119.                     IS_DIR(sub_mb_type, 0, 0), IS_DIR(sub_mb_type, 0, 1));

  3120.             }else if(IS_SUB_4X8(sub_mb_type)){

  3121.                 mc_part(h, n  , 0, 4, 4*h->mb_linesize, dest_y, dest_cb, dest_cr, x_offset, y_offset,

  3122.                     qpix_put[2], chroma_put[2], qpix_avg[2], chroma_avg[2],

  3123.                     &weight_op[5], &weight_avg[5],

  3124.                     IS_DIR(sub_mb_type, 0, 0), IS_DIR(sub_mb_type, 0, 1));

  3125.                 mc_part(h, n+1, 0, 4, 4*h->mb_linesize, dest_y, dest_cb, dest_cr, x_offset+2, y_offset,

  3126.                     qpix_put[2], chroma_put[2], qpix_avg[2], chroma_avg[2],

  3127.                     &weight_op[5], &weight_avg[5],

  3128.                     IS_DIR(sub_mb_type, 0, 0), IS_DIR(sub_mb_type, 0, 1));

  3129.             }else{

  3130.                 int j;

  3131.                 assert(IS_SUB_4X4(sub_mb_type));

  3132.                 for(j=0; j<4; j++){

  3133.                     int sub_x_offset= x_offset + 2*(j&1);

  3134.                     int sub_y_offset= y_offset +   (j&2);

  3135.                     mc_part(h, n+j, 1, 2, 0, dest_y, dest_cb, dest_cr, sub_x_offset, sub_y_offset,

  3136.                         qpix_put[2], chroma_put[2], qpix_avg[2], chroma_avg[2],

  3137.                         &weight_op[6], &weight_avg[6],

  3138.                         IS_DIR(sub_mb_type, 0, 0), IS_DIR(sub_mb_type, 0, 1));

  3139.                 }

  3140.             }

  3141.         }

  3142.     }

  3143. 

  3144.     prefetch_motion(h, 1);

  3145. }

  3146. 

  3147. static void decode_init_vlc(H264Context *h){

  3148.     static int done = 0;

  3149. 

  3150.     if (!done) {

  3151.         int i;

  3152.         done = 1;

  3153. 

  3154.         init_vlc(&chroma_dc_coeff_token_vlc, CHROMA_DC_COEFF_TOKEN_VLC_BITS, 4*5,

  3155.                  &chroma_dc_coeff_token_len [0], 1, 1,

  3156.                  &chroma_dc_coeff_token_bits[0], 1, 1, 1);

  3157. 

  3158.         for(i=0; i<4; i++){

  3159.             init_vlc(&coeff_token_vlc[i], COEFF_TOKEN_VLC_BITS, 4*17,

  3160.                      &coeff_token_len [i][0], 1, 1,

  3161.                      &coeff_token_bits[i][0], 1, 1, 1);

  3162.         }

  3163. 

  3164.         for(i=0; i<3; i++){

  3165.             init_vlc(&chroma_dc_total_zeros_vlc[i], CHROMA_DC_TOTAL_ZEROS_VLC_BITS, 4,

  3166.                      &chroma_dc_total_zeros_len [i][0], 1, 1,

  3167.                      &chroma_dc_total_zeros_bits[i][0], 1, 1, 1);

  3168.         }

  3169.         for(i=0; i<15; i++){

  3170.             init_vlc(&total_zeros_vlc[i], TOTAL_ZEROS_VLC_BITS, 16,

  3171.                      &total_zeros_len [i][0], 1, 1,

  3172.                      &total_zeros_bits[i][0], 1, 1, 1);

  3173.         }

  3174. 

  3175.         for(i=0; i<6; i++){

  3176.             init_vlc(&run_vlc[i], RUN_VLC_BITS, 7,

  3177.                      &run_len [i][0], 1, 1,

  3178.                      &run_bits[i][0], 1, 1, 1);

  3179.         }

  3180.         init_vlc(&run7_vlc, RUN7_VLC_BITS, 16,

  3181.                  &run_len [6][0], 1, 1,

  3182.                  &run_bits[6][0], 1, 1, 1);

  3183.     }

  3184. }

  3185. 

  3186. /**

  3187.  * Sets the intra prediction function pointers.

  3188.  */

  3189. static void init_pred_ptrs(H264Context *h){

  3190. //    MpegEncContext * const s = &h->s;

  3191. 

  3192.     h->pred4x4[VERT_PRED           ]= pred4x4_vertical_c;

  3193.     h->pred4x4[HOR_PRED            ]= pred4x4_horizontal_c;

  3194.     h->pred4x4[DC_PRED             ]= pred4x4_dc_c;

  3195.     h->pred4x4[DIAG_DOWN_LEFT_PRED ]= pred4x4_down_left_c;

  3196.     h->pred4x4[DIAG_DOWN_RIGHT_PRED]= pred4x4_down_right_c;

  3197.     h->pred4x4[VERT_RIGHT_PRED     ]= pred4x4_vertical_right_c;

  3198.     h->pred4x4[HOR_DOWN_PRED       ]= pred4x4_horizontal_down_c;

  3199.     h->pred4x4[VERT_LEFT_PRED      ]= pred4x4_vertical_left_c;

  3200.     h->pred4x4[HOR_UP_PRED         ]= pred4x4_horizontal_up_c;

  3201.     h->pred4x4[LEFT_DC_PRED        ]= pred4x4_left_dc_c;

  3202.     h->pred4x4[TOP_DC_PRED         ]= pred4x4_top_dc_c;

  3203.     h->pred4x4[DC_128_PRED         ]= pred4x4_128_dc_c;

  3204. 

  3205.     h->pred8x8l[VERT_PRED           ]= pred8x8l_vertical_c;

  3206.     h->pred8x8l[HOR_PRED            ]= pred8x8l_horizontal_c;

  3207.     h->pred8x8l[DC_PRED             ]= pred8x8l_dc_c;

  3208.     h->pred8x8l[DIAG_DOWN_LEFT_PRED ]= pred8x8l_down_left_c;

  3209.     h->pred8x8l[DIAG_DOWN_RIGHT_PRED]= pred8x8l_down_right_c;

  3210.     h->pred8x8l[VERT_RIGHT_PRED     ]= pred8x8l_vertical_right_c;

  3211.     h->pred8x8l[HOR_DOWN_PRED       ]= pred8x8l_horizontal_down_c;

  3212.     h->pred8x8l[VERT_LEFT_PRED      ]= pred8x8l_vertical_left_c;

  3213.     h->pred8x8l[HOR_UP_PRED         ]= pred8x8l_horizontal_up_c;

  3214.     h->pred8x8l[LEFT_DC_PRED        ]= pred8x8l_left_dc_c;

  3215.     h->pred8x8l[TOP_DC_PRED         ]= pred8x8l_top_dc_c;

  3216.     h->pred8x8l[DC_128_PRED         ]= pred8x8l_128_dc_c;

  3217. 

  3218.     h->pred8x8[DC_PRED8x8     ]= pred8x8_dc_c;

  3219.     h->pred8x8[VERT_PRED8x8   ]= pred8x8_vertical_c;

  3220.     h->pred8x8[HOR_PRED8x8    ]= pred8x8_horizontal_c;

  3221.     h->pred8x8[PLANE_PRED8x8  ]= pred8x8_plane_c;

  3222.     h->pred8x8[LEFT_DC_PRED8x8]= pred8x8_left_dc_c;

  3223.     h->pred8x8[TOP_DC_PRED8x8 ]= pred8x8_top_dc_c;

  3224.     h->pred8x8[DC_128_PRED8x8 ]= pred8x8_128_dc_c;

  3225. 

  3226.     h->pred16x16[DC_PRED8x8     ]= pred16x16_dc_c;

  3227.     h->pred16x16[VERT_PRED8x8   ]= pred16x16_vertical_c;

  3228.     h->pred16x16[HOR_PRED8x8    ]= pred16x16_horizontal_c;

  3229.     h->pred16x16[PLANE_PRED8x8  ]= pred16x16_plane_c;

  3230.     h->pred16x16[LEFT_DC_PRED8x8]= pred16x16_left_dc_c;

  3231.     h->pred16x16[TOP_DC_PRED8x8 ]= pred16x16_top_dc_c;

  3232.     h->pred16x16[DC_128_PRED8x8 ]= pred16x16_128_dc_c;

  3233. }

  3234. 

  3235. static void free_tables(H264Context *h){

  3236.     av_freep(&h->intra4x4_pred_mode);

  3237.     av_freep(&h->chroma_pred_mode_table);

  3238.     av_freep(&h->cbp_table);

  3239.     av_freep(&h->mvd_table[0]);

  3240.     av_freep(&h->mvd_table[1]);

  3241.     av_freep(&h->direct_table);

  3242.     av_freep(&h->non_zero_count);

  3243.     av_freep(&h->slice_table_base);

  3244.     av_freep(&h->top_borders[1]);

  3245.     av_freep(&h->top_borders[0]);

  3246.     h->slice_table= NULL;

  3247. 

  3248.     av_freep(&h->mb2b_xy);

  3249.     av_freep(&h->mb2b8_xy);

  3250. 

  3251.     av_freep(&h->s.obmc_scratchpad);

  3252. }

  3253. 

  3254. static void init_dequant8_coeff_table(H264Context *h){

  3255.     int i,q,x;

  3256.     const int transpose = (h->s.dsp.h264_idct8_add != ff_h264_idct8_add_c); //FIXME ugly

  3257.     h->dequant8_coeff[0] = h->dequant8_buffer[0];

  3258.     h->dequant8_coeff[1] = h->dequant8_buffer[1];

  3259. 

  3260.     for(i=0; i<2; i++ ){

  3261.         if(i && !memcmp(h->pps.scaling_matrix8[0], h->pps.scaling_matrix8[1], 64*sizeof(uint8_t))){

  3262.             h->dequant8_coeff[1] = h->dequant8_buffer[0];

  3263.             break;

  3264.         }

  3265. 

  3266.         for(q=0; q<52; q++){

  3267.             int shift = div6[q];

  3268.             int idx = rem6[q];

  3269.             for(x=0; x<64; x++)

  3270.                 h->dequant8_coeff[i][q][transpose ? (x>>3)|((x&7)<<3) : x] =

  3271.                     ((uint32_t)dequant8_coeff_init[idx][ dequant8_coeff_init_scan[((x>>1)&12) | (x&3)] ] *

  3272.                     h->pps.scaling_matrix8[i][x]) << shift;

  3273.         }

  3274.     }

  3275. }

  3276. 

  3277. static void init_dequant4_coeff_table(H264Context *h){

  3278.     int i,j,q,x;

  3279.     const int transpose = (h->s.dsp.h264_idct_add != ff_h264_idct_add_c); //FIXME ugly

  3280.     for(i=0; i<6; i++ ){

  3281.         h->dequant4_coeff[i] = h->dequant4_buffer[i];

  3282.         for(j=0; j<i; j++){

  3283.             if(!memcmp(h->pps.scaling_matrix4[j], h->pps.scaling_matrix4[i], 16*sizeof(uint8_t))){

  3284.                 h->dequant4_coeff[i] = h->dequant4_buffer[j];

  3285.                 break;

  3286.             }

  3287.         }

  3288.         if(j<i)

  3289.             continue;

  3290. 

  3291.         for(q=0; q<52; q++){

  3292.             int shift = div6[q] + 2;

  3293.             int idx = rem6[q];

  3294.             for(x=0; x<16; x++)

  3295.                 h->dequant4_coeff[i][q][transpose ? (x>>2)|((x<<2)&0xF) : x] =

  3296.                     ((uint32_t)dequant4_coeff_init[idx][(x&1) + ((x>>2)&1)] *

  3297.                     h->pps.scaling_matrix4[i][x]) << shift;

  3298.         }

  3299.     }

  3300. }

  3301. 

  3302. static void init_dequant_tables(H264Context *h){

  3303.     int i,x;

  3304.     init_dequant4_coeff_table(h);

  3305.     if(h->pps.transform_8x8_mode)

  3306.         init_dequant8_coeff_table(h);

  3307.     if(h->sps.transform_bypass){

  3308.         for(i=0; i<6; i++)

  3309.             for(x=0; x<16; x++)

  3310.                 h->dequant4_coeff[i][0][x] = 1<<6;

  3311.         if(h->pps.transform_8x8_mode)

  3312.             for(i=0; i<2; i++)

  3313.                 for(x=0; x<64; x++)

  3314.                     h->dequant8_coeff[i][0][x] = 1<<6;

  3315.     }

  3316. }

  3317. 

  3318. 

  3319. /**

  3320.  * allocates tables.

  3321.  * needs width/height

  3322.  */

  3323. static int alloc_tables(H264Context *h){

  3324.     MpegEncContext * const s = &h->s;

  3325.     const int big_mb_num= s->mb_stride * (s->mb_height+1);

  3326.     int x,y;

  3327. 

  3328.     CHECKED_ALLOCZ(h->intra4x4_pred_mode, big_mb_num * 8  * sizeof(uint8_t))

  3329. 

  3330.     CHECKED_ALLOCZ(h->non_zero_count    , big_mb_num * 16 * sizeof(uint8_t))

  3331.     CHECKED_ALLOCZ(h->slice_table_base  , (big_mb_num+s->mb_stride) * sizeof(uint8_t))

  3332.     CHECKED_ALLOCZ(h->top_borders[0]    , s->mb_width * (16+8+8) * sizeof(uint8_t))

  3333.     CHECKED_ALLOCZ(h->top_borders[1]    , s->mb_width * (16+8+8) * sizeof(uint8_t))

  3334.     CHECKED_ALLOCZ(h->cbp_table, big_mb_num * sizeof(uint16_t))

  3335. 

  3336.     if( h->pps.cabac ) {

  3337.         CHECKED_ALLOCZ(h->chroma_pred_mode_table, big_mb_num * sizeof(uint8_t))

  3338.         CHECKED_ALLOCZ(h->mvd_table[0], 32*big_mb_num * sizeof(uint16_t));

  3339.         CHECKED_ALLOCZ(h->mvd_table[1], 32*big_mb_num * sizeof(uint16_t));

  3340.         CHECKED_ALLOCZ(h->direct_table, 32*big_mb_num * sizeof(uint8_t));

  3341.     }

  3342. 

  3343.     memset(h->slice_table_base, -1, (big_mb_num+s->mb_stride)  * sizeof(uint8_t));

  3344.     h->slice_table= h->slice_table_base + s->mb_stride*2 + 1;

  3345. 

  3346.     CHECKED_ALLOCZ(h->mb2b_xy  , big_mb_num * sizeof(uint32_t));

  3347.     CHECKED_ALLOCZ(h->mb2b8_xy , big_mb_num * sizeof(uint32_t));

  3348.     for(y=0; y<s->mb_height; y++){

  3349.         for(x=0; x<s->mb_width; x++){

  3350.             const int mb_xy= x + y*s->mb_stride;

  3351.             const int b_xy = 4*x + 4*y*h->b_stride;

  3352.             const int b8_xy= 2*x + 2*y*h->b8_stride;

  3353. 

  3354.             h->mb2b_xy [mb_xy]= b_xy;

  3355.             h->mb2b8_xy[mb_xy]= b8_xy;

  3356.         }

  3357.     }

  3358. 

  3359.     s->obmc_scratchpad = NULL;

  3360. 

  3361.     if(!h->dequant4_coeff[0])

  3362.         init_dequant_tables(h);

  3363. 

  3364.     return 0;

  3365. fail:

  3366.     free_tables(h);

  3367.     return -1;

  3368. }

  3369. 

  3370. static void common_init(H264Context *h){

  3371.     MpegEncContext * const s = &h->s;

  3372. 

  3373.     s->width = s->avctx->width;

  3374.     s->height = s->avctx->height;

  3375.     s->codec_id= s->avctx->codec->id;

  3376. 

  3377.     init_pred_ptrs(h);

  3378. 

  3379.     h->dequant_coeff_pps= -1;

  3380.     s->unrestricted_mv=1;

  3381.     s->decode=1; //FIXME

  3382. 

  3383.     memset(h->pps.scaling_matrix4, 16, 6*16*sizeof(uint8_t));

  3384.     memset(h->pps.scaling_matrix8, 16, 2*64*sizeof(uint8_t));

  3385. }

  3386. 

  3387. static int decode_init(AVCodecContext *avctx){

  3388.     H264Context *h= avctx->priv_data;

  3389.     MpegEncContext * const s = &h->s;

  3390. 

  3391.     MPV_decode_defaults(s);

  3392. 

  3393.     s->avctx = avctx;

  3394.     common_init(h);

  3395. 

  3396.     s->out_format = FMT_H264;

  3397.     s->workaround_bugs= avctx->workaround_bugs;

  3398. 

  3399.     // set defaults

  3400. //    s->decode_mb= ff_h263_decode_mb;

  3401.     s->low_delay= 1;

  3402.     avctx->pix_fmt= PIX_FMT_YUV420P;

  3403. 

  3404.     decode_init_vlc(h);

  3405. 

  3406.     if(avctx->extradata_size > 0 && avctx->extradata &&

  3407.        *(char *)avctx->extradata == 1){

  3408.         h->is_avc = 1;

  3409.         h->got_avcC = 0;

  3410.     } else {

  3411.         h->is_avc = 0;

  3412.     }

  3413. 

  3414.     return 0;

  3415. }

  3416. 

  3417. static int frame_start(H264Context *h){

  3418.     MpegEncContext * const s = &h->s;

  3419.     int i;

  3420. 

  3421.     if(MPV_frame_start(s, s->avctx) < 0)

  3422.         return -1;

  3423.     ff_er_frame_start(s);

  3424. 

  3425.     assert(s->linesize && s->uvlinesize);

  3426. 

  3427.     for(i=0; i<16; i++){

  3428.         h->block_offset[i]= 4*((scan8[i] - scan8[0])&7) + 4*s->linesize*((scan8[i] - scan8[0])>>3);

  3429.         h->block_offset[24+i]= 4*((scan8[i] - scan8[0])&7) + 8*s->linesize*((scan8[i] - scan8[0])>>3);

  3430.     }

  3431.     for(i=0; i<4; i++){

  3432.         h->block_offset[16+i]=

  3433.         h->block_offset[20+i]= 4*((scan8[i] - scan8[0])&7) + 4*s->uvlinesize*((scan8[i] - scan8[0])>>3);

  3434.         h->block_offset[24+16+i]=

  3435.         h->block_offset[24+20+i]= 4*((scan8[i] - scan8[0])&7) + 8*s->uvlinesize*((scan8[i] - scan8[0])>>3);

  3436.     }

  3437. 

  3438.     /* can't be in alloc_tables because linesize isn't known there.

  3439.      * FIXME: redo bipred weight to not require extra buffer? */

  3440.     if(!s->obmc_scratchpad)

  3441.         s->obmc_scratchpad = av_malloc(16*2*s->linesize + 8*2*s->uvlinesize);

  3442. 

  3443.     /* some macroblocks will be accessed before they're available */

  3444.     if(FRAME_MBAFF)

  3445.         memset(h->slice_table, -1, (s->mb_height*s->mb_stride-1) * sizeof(uint8_t));

  3446. 

  3447. //    s->decode= (s->flags&CODEC_FLAG_PSNR) || !s->encoding || s->current_picture.reference /*|| h->contains_intra*/ || 1;

  3448.     return 0;

  3449. }

  3450. 

  3451. static inline void backup_mb_border(H264Context *h, uint8_t *src_y, uint8_t *src_cb, uint8_t *src_cr, int linesize, int uvlinesize){

  3452.     MpegEncContext * const s = &h->s;

  3453.     int i;

  3454. 

  3455.     src_y  -=   linesize;

  3456.     src_cb -= uvlinesize;

  3457.     src_cr -= uvlinesize;

  3458. 

  3459.     // There are two lines saved, the line above the the top macroblock of a pair,

  3460.     // and the line above the bottom macroblock

  3461.     h->left_border[0]= h->top_borders[0][s->mb_x][15];

  3462.     for(i=1; i<17; i++){

  3463.         h->left_border[i]= src_y[15+i*  linesize];

  3464.     }

  3465. 

  3466.     *(uint64_t*)(h->top_borders[0][s->mb_x]+0)= *(uint64_t*)(src_y +  16*linesize);

  3467.     *(uint64_t*)(h->top_borders[0][s->mb_x]+8)= *(uint64_t*)(src_y +8+16*linesize);

  3468. 

  3469.     if(!(s->flags&CODEC_FLAG_GRAY)){

  3470.         h->left_border[17  ]= h->top_borders[0][s->mb_x][16+7];

  3471.         h->left_border[17+9]= h->top_borders[0][s->mb_x][24+7];

  3472.         for(i=1; i<9; i++){

  3473.             h->left_border[i+17  ]= src_cb[7+i*uvlinesize];

  3474.             h->left_border[i+17+9]= src_cr[7+i*uvlinesize];

  3475.         }

  3476.         *(uint64_t*)(h->top_borders[0][s->mb_x]+16)= *(uint64_t*)(src_cb+8*uvlinesize);

  3477.         *(uint64_t*)(h->top_borders[0][s->mb_x]+24)= *(uint64_t*)(src_cr+8*uvlinesize);

  3478.     }

  3479. }

  3480. 

  3481. static inline void xchg_mb_border(H264Context *h, uint8_t *src_y, uint8_t *src_cb, uint8_t *src_cr, int linesize, int uvlinesize, int xchg){

  3482.     MpegEncContext * const s = &h->s;

  3483.     int temp8, i;

  3484.     uint64_t temp64;

  3485.     int deblock_left = (s->mb_x > 0);

  3486.     int deblock_top  = (s->mb_y > 0);

  3487. 

  3488.     src_y  -=   linesize + 1;

  3489.     src_cb -= uvlinesize + 1;

  3490.     src_cr -= uvlinesize + 1;

  3491. 

  3492. #define XCHG(a,b,t,xchg)\

  3493. t= a;\

  3494. if(xchg)\

  3495.     a= b;\

  3496. b= t;

  3497. 

  3498.     if(deblock_left){

  3499.         for(i = !deblock_top; i<17; i++){

  3500.             XCHG(h->left_border[i     ], src_y [i*  linesize], temp8, xchg);

  3501.         }

  3502.     }

  3503. 

  3504.     if(deblock_top){

  3505.         XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x]+0), *(uint64_t*)(src_y +1), temp64, xchg);

  3506.         XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x]+8), *(uint64_t*)(src_y +9), temp64, 1);

  3507.         if(s->mb_x+1 < s->mb_width){

  3508.             XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x+1]), *(uint64_t*)(src_y +17), temp64, 1);

  3509.         }

  3510.     }

  3511. 

  3512.     if(!(s->flags&CODEC_FLAG_GRAY)){

  3513.         if(deblock_left){

  3514.             for(i = !deblock_top; i<9; i++){

  3515.                 XCHG(h->left_border[i+17  ], src_cb[i*uvlinesize], temp8, xchg);

  3516.                 XCHG(h->left_border[i+17+9], src_cr[i*uvlinesize], temp8, xchg);

  3517.             }

  3518.         }

  3519.         if(deblock_top){

  3520.             XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x]+16), *(uint64_t*)(src_cb+1), temp64, 1);

  3521.             XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x]+24), *(uint64_t*)(src_cr+1), temp64, 1);

  3522.         }

  3523.     }

  3524. }

  3525. 

  3526. static inline void backup_pair_border(H264Context *h, uint8_t *src_y, uint8_t *src_cb, uint8_t *src_cr, int linesize, int uvlinesize){

  3527.     MpegEncContext * const s = &h->s;

  3528.     int i;

  3529. 

  3530.     src_y  -= 2 *   linesize;

  3531.     src_cb -= 2 * uvlinesize;

  3532.     src_cr -= 2 * uvlinesize;

  3533. 

  3534.     // There are two lines saved, the line above the the top macroblock of a pair,

  3535.     // and the line above the bottom macroblock

  3536.     h->left_border[0]= h->top_borders[0][s->mb_x][15];

  3537.     h->left_border[1]= h->top_borders[1][s->mb_x][15];

  3538.     for(i=2; i<34; i++){

  3539.         h->left_border[i]= src_y[15+i*  linesize];

  3540.     }

  3541. 

  3542.     *(uint64_t*)(h->top_borders[0][s->mb_x]+0)= *(uint64_t*)(src_y +  32*linesize);

  3543.     *(uint64_t*)(h->top_borders[0][s->mb_x]+8)= *(uint64_t*)(src_y +8+32*linesize);

  3544.     *(uint64_t*)(h->top_borders[1][s->mb_x]+0)= *(uint64_t*)(src_y +  33*linesize);

  3545.     *(uint64_t*)(h->top_borders[1][s->mb_x]+8)= *(uint64_t*)(src_y +8+33*linesize);

  3546. 

  3547.     if(!(s->flags&CODEC_FLAG_GRAY)){

  3548.         h->left_border[34     ]= h->top_borders[0][s->mb_x][16+7];

  3549.         h->left_border[34+   1]= h->top_borders[1][s->mb_x][16+7];

  3550.         h->left_border[34+18  ]= h->top_borders[0][s->mb_x][24+7];

  3551.         h->left_border[34+18+1]= h->top_borders[1][s->mb_x][24+7];

  3552.         for(i=2; i<18; i++){

  3553.             h->left_border[i+34   ]= src_cb[7+i*uvlinesize];

  3554.             h->left_border[i+34+18]= src_cr[7+i*uvlinesize];

  3555.         }

  3556.         *(uint64_t*)(h->top_borders[0][s->mb_x]+16)= *(uint64_t*)(src_cb+16*uvlinesize);

  3557.         *(uint64_t*)(h->top_borders[0][s->mb_x]+24)= *(uint64_t*)(src_cr+16*uvlinesize);

  3558.         *(uint64_t*)(h->top_borders[1][s->mb_x]+16)= *(uint64_t*)(src_cb+17*uvlinesize);

  3559.         *(uint64_t*)(h->top_borders[1][s->mb_x]+24)= *(uint64_t*)(src_cr+17*uvlinesize);

  3560.     }

  3561. }

  3562. 

  3563. static inline void xchg_pair_border(H264Context *h, uint8_t *src_y, uint8_t *src_cb, uint8_t *src_cr, int linesize, int uvlinesize, int xchg){

  3564.     MpegEncContext * const s = &h->s;

  3565.     int temp8, i;

  3566.     uint64_t temp64;

  3567.     int deblock_left = (s->mb_x > 0);

  3568.     int deblock_top  = (s->mb_y > 1);

  3569. 

  3570.     tprintf("xchg_pair_border: src_y:%p src_cb:%p src_cr:%p ls:%d uvls:%d\n", src_y, src_cb, src_cr, linesize, uvlinesize);

  3571. 

  3572.     src_y  -= 2 *   linesize + 1;

  3573.     src_cb -= 2 * uvlinesize + 1;

  3574.     src_cr -= 2 * uvlinesize + 1;

  3575. 

  3576. #define XCHG(a,b,t,xchg)\

  3577. t= a;\

  3578. if(xchg)\

  3579.     a= b;\

  3580. b= t;

  3581. 

  3582.     if(deblock_left){

  3583.         for(i = (!deblock_top)<<1; i<34; i++){

  3584.             XCHG(h->left_border[i     ], src_y [i*  linesize], temp8, xchg);

  3585.         }

  3586.     }

  3587. 

  3588.     if(deblock_top){

  3589.         XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x]+0), *(uint64_t*)(src_y +1), temp64, xchg);

  3590.         XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x]+8), *(uint64_t*)(src_y +9), temp64, 1);

  3591.         XCHG(*(uint64_t*)(h->top_borders[1][s->mb_x]+0), *(uint64_t*)(src_y +1 +linesize), temp64, xchg);

  3592.         XCHG(*(uint64_t*)(h->top_borders[1][s->mb_x]+8), *(uint64_t*)(src_y +9 +linesize), temp64, 1);

  3593.         if(s->mb_x+1 < s->mb_width){

  3594.             XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x+1]), *(uint64_t*)(src_y +17), temp64, 1);

  3595.             XCHG(*(uint64_t*)(h->top_borders[1][s->mb_x+1]), *(uint64_t*)(src_y +17 +linesize), temp64, 1);

  3596.         }

  3597.     }

  3598. 

  3599.     if(!(s->flags&CODEC_FLAG_GRAY)){

  3600.         if(deblock_left){

  3601.             for(i = (!deblock_top) << 1; i<18; i++){

  3602.                 XCHG(h->left_border[i+34   ], src_cb[i*uvlinesize], temp8, xchg);

  3603.                 XCHG(h->left_border[i+34+18], src_cr[i*uvlinesize], temp8, xchg);

  3604.             }

  3605.         }

  3606.         if(deblock_top){

  3607.             XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x]+16), *(uint64_t*)(src_cb+1), temp64, 1);

  3608.             XCHG(*(uint64_t*)(h->top_borders[0][s->mb_x]+24), *(uint64_t*)(src_cr+1), temp64, 1);

  3609.             XCHG(*(uint64_t*)(h->top_borders[1][s->mb_x]+16), *(uint64_t*)(src_cb+1 +uvlinesize), temp64, 1);

  3610.             XCHG(*(uint64_t*)(h->top_borders[1][s->mb_x]+24), *(uint64_t*)(src_cr+1 +uvlinesize), temp64, 1);

  3611.         }

  3612.     }

  3613. }

  3614. 

  3615. static void hl_decode_mb(H264Context *h){

  3616.     MpegEncContext * const s = &h->s;

  3617.     const int mb_x= s->mb_x;

  3618.     const int mb_y= s->mb_y;

  3619.     const int mb_xy= mb_x + mb_y*s->mb_stride;

  3620.     const int mb_type= s->current_picture.mb_type[mb_xy];

  3621.     uint8_t  *dest_y, *dest_cb, *dest_cr;

  3622.     int linesize, uvlinesize /*dct_offset*/;

  3623.     int i;

  3624.     int *block_offset = &h->block_offset[0];

  3625.     const unsigned int bottom = mb_y & 1;

  3626.     const int transform_bypass = (s->qscale == 0 && h->sps.transform_bypass);

  3627.     void (*idct_add)(uint8_t *dst, DCTELEM *block, int stride);

  3628.     void (*idct_dc_add)(uint8_t *dst, DCTELEM *block, int stride);

  3629. 

  3630.     if(!s->decode)

  3631.         return;

  3632. 

  3633.     dest_y  = s->current_picture.data[0] + (mb_y * 16* s->linesize  ) + mb_x * 16;

  3634.     dest_cb = s->current_picture.data[1] + (mb_y * 8 * s->uvlinesize) + mb_x * 8;

  3635.     dest_cr = s->current_picture.data[2] + (mb_y * 8 * s->uvlinesize) + mb_x * 8;

  3636. 

  3637.     if (MB_FIELD) {

  3638.         linesize   = h->mb_linesize   = s->linesize * 2;

  3639.         uvlinesize = h->mb_uvlinesize = s->uvlinesize * 2;

  3640.         block_offset = &h->block_offset[24];

  3641.         if(mb_y&1){ //FIXME move out of this func?

  3642.             dest_y -= s->linesize*15;

  3643.             dest_cb-= s->uvlinesize*7;

  3644.             dest_cr-= s->uvlinesize*7;

  3645.         }

  3646.         if(FRAME_MBAFF) {

  3647.             int list;

  3648.             for(list=0; list<2; list++){

  3649.                 if(!USES_LIST(mb_type, list))

  3650.                     continue;

  3651.                 if(IS_16X16(mb_type)){

  3652.                     int8_t *ref = &h->ref_cache[list][scan8[0]];

  3653.                     fill_rectangle(ref, 4, 4, 8, 16+*ref^(s->mb_y&1), 1);

  3654.                 }else{

  3655.                     for(i=0; i<16; i+=4){

  3656.                         //FIXME can refs be smaller than 8x8 when !direct_8x8_inference ?

  3657.                         int ref = h->ref_cache[list][scan8[i]];

  3658.                         if(ref >= 0)

  3659.                             fill_rectangle(&h->ref_cache[list][scan8[i]], 2, 2, 8, 16+ref^(s->mb_y&1), 1);

  3660.                     }

  3661.                 }

  3662.             }

  3663.         }

  3664.     } else {

  3665.         linesize   = h->mb_linesize   = s->linesize;

  3666.         uvlinesize = h->mb_uvlinesize = s->uvlinesize;

  3667. //        dct_offset = s->linesize * 16;

  3668.     }

  3669. 

  3670.     if(transform_bypass){

  3671.         idct_dc_add =

  3672.         idct_add = IS_8x8DCT(mb_type) ? s->dsp.add_pixels8 : s->dsp.add_pixels4;

  3673.     }else if(IS_8x8DCT(mb_type)){

  3674.         idct_dc_add = s->dsp.h264_idct8_dc_add;

  3675.         idct_add = s->dsp.h264_idct8_add;

  3676.     }else{

  3677.         idct_dc_add = s->dsp.h264_idct_dc_add;

  3678.         idct_add = s->dsp.h264_idct_add;

  3679.     }

  3680. 

  3681.     if(FRAME_MBAFF && h->deblocking_filter && IS_INTRA(mb_type)

  3682.        && (!bottom || !IS_INTRA(s->current_picture.mb_type[mb_xy-s->mb_stride]))){

  3683.         int mbt_y = mb_y&~1;

  3684.         uint8_t *top_y  = s->current_picture.data[0] + (mbt_y * 16* s->linesize  ) + mb_x * 16;

  3685.         uint8_t *top_cb = s->current_picture.data[1] + (mbt_y * 8 * s->uvlinesize) + mb_x * 8;

  3686.         uint8_t *top_cr = s->current_picture.data[2] + (mbt_y * 8 * s->uvlinesize) + mb_x * 8;

  3687.         xchg_pair_border(h, top_y, top_cb, top_cr, s->linesize, s->uvlinesize, 1);

  3688.     }

  3689. 

  3690.     if (IS_INTRA_PCM(mb_type)) {

  3691.         unsigned int x, y;

  3692. 

  3693.         // The pixels are stored in h->mb array in the same order as levels,

  3694.         // copy them in output in the correct order.

  3695.         for(i=0; i<16; i++) {

  3696.             for (y=0; y<4; y++) {

  3697.                 for (x=0; x<4; x++) {

  3698.                     *(dest_y + block_offset[i] + y*linesize + x) = h->mb[i*16+y*4+x];

  3699.                 }

  3700.             }

  3701.         }

  3702.         for(i=16; i<16+4; i++) {

  3703.             for (y=0; y<4; y++) {

  3704.                 for (x=0; x<4; x++) {

  3705.                     *(dest_cb + block_offset[i] + y*uvlinesize + x) = h->mb[i*16+y*4+x];

  3706.                 }

  3707.             }

  3708.         }

  3709.         for(i=20; i<20+4; i++) {

  3710.             for (y=0; y<4; y++) {

  3711.                 for (x=0; x<4; x++) {

  3712.                     *(dest_cr + block_offset[i] + y*uvlinesize + x) = h->mb[i*16+y*4+x];

  3713.                 }

  3714.             }

  3715.         }

  3716.     } else {

  3717.         if(IS_INTRA(mb_type)){

  3718.             if(h->deblocking_filter && !FRAME_MBAFF)

  3719.                 xchg_mb_border(h, dest_y, dest_cb, dest_cr, linesize, uvlinesize, 1);

  3720. 

  3721.             if(!(s->flags&CODEC_FLAG_GRAY)){

  3722.                 h->pred8x8[ h->chroma_pred_mode ](dest_cb, uvlinesize);

  3723.                 h->pred8x8[ h->chroma_pred_mode ](dest_cr, uvlinesize);

  3724.             }

  3725. 

  3726.             if(IS_INTRA4x4(mb_type)){

  3727.                 if(!s->encoding){

  3728.                     if(IS_8x8DCT(mb_type)){

  3729.                         for(i=0; i<16; i+=4){

  3730.                             uint8_t * const ptr= dest_y + block_offset[i];

  3731.                             const int dir= h->intra4x4_pred_mode_cache[ scan8[i] ];

  3732.                             const int nnz = h->non_zero_count_cache[ scan8[i] ];

  3733.                             h->pred8x8l[ dir ](ptr, (h->topleft_samples_available<<i)&0x8000,

  3734.                                                    (h->topright_samples_available<<(i+1))&0x8000, linesize);

  3735.                             if(nnz){

  3736.                                 if(nnz == 1 && h->mb[i*16])

  3737.                                     idct_dc_add(ptr, h->mb + i*16, linesize);

  3738.                                 else

  3739.                                     idct_add(ptr, h->mb + i*16, linesize);

  3740.                             }

  3741.                         }

  3742.                     }else

  3743.                     for(i=0; i<16; i++){

  3744.                         uint8_t * const ptr= dest_y + block_offset[i];

  3745.                         uint8_t *topright;

  3746.                         const int dir= h->intra4x4_pred_mode_cache[ scan8[i] ];

  3747.                         int nnz, tr;

  3748. 

  3749.                         if(dir == DIAG_DOWN_LEFT_PRED || dir == VERT_LEFT_PRED){

  3750.                             const int topright_avail= (h->topright_samples_available<<i)&0x8000;

  3751.                             assert(mb_y || linesize <= block_offset[i]);

  3752.                             if(!topright_avail){

  3753.                                 tr= ptr[3 - linesize]*0x01010101;

  3754.                                 topright= (uint8_t*) &tr;

  3755.                             }else

  3756.                                 topright= ptr + 4 - linesize;

  3757.                         }else

  3758.                             topright= NULL;

  3759. 

  3760.                         h->pred4x4[ dir ](ptr, topright, linesize);

  3761.                         nnz = h->non_zero_count_cache[ scan8[i] ];

  3762.                         if(nnz){

  3763.                             if(s->codec_id == CODEC_ID_H264){

  3764.                                 if(nnz == 1 && h->mb[i*16])

  3765.                                     idct_dc_add(ptr, h->mb + i*16, linesize);

  3766.                                 else

  3767.                                     idct_add(ptr, h->mb + i*16, linesize);

  3768.                             }else

  3769.                                 svq3_add_idct_c(ptr, h->mb + i*16, linesize, s->qscale, 0);

  3770.                         }

  3771.                     }

  3772.                 }

  3773.             }else{

  3774.                 h->pred16x16[ h->intra16x16_pred_mode ](dest_y , linesize);

  3775.                 if(s->codec_id == CODEC_ID_H264){

  3776.                     if(!transform_bypass)

  3777.                         h264_luma_dc_dequant_idct_c(h->mb, s->qscale, h->dequant4_coeff[IS_INTRA(mb_type) ? 0:3][s->qscale][0]);

  3778.                 }else

  3779.                     svq3_luma_dc_dequant_idct_c(h->mb, s->qscale);

  3780.             }

  3781.             if(h->deblocking_filter && !FRAME_MBAFF)

  3782.                 xchg_mb_border(h, dest_y, dest_cb, dest_cr, linesize, uvlinesize, 0);

  3783.         }else if(s->codec_id == CODEC_ID_H264){

  3784.             hl_motion(h, dest_y, dest_cb, dest_cr,

  3785.                       s->dsp.put_h264_qpel_pixels_tab, s->dsp.put_h264_chroma_pixels_tab,

  3786.                       s->dsp.avg_h264_qpel_pixels_tab, s->dsp.avg_h264_chroma_pixels_tab,

  3787.                       s->dsp.weight_h264_pixels_tab, s->dsp.biweight_h264_pixels_tab);

  3788.         }

  3789. 

  3790. 

  3791.         if(!IS_INTRA4x4(mb_type)){

  3792.             if(s->codec_id == CODEC_ID_H264){

  3793.                 if(IS_INTRA16x16(mb_type)){

  3794.                     for(i=0; i<16; i++){

  3795.                         if(h->non_zero_count_cache[ scan8[i] ])

  3796.                             idct_add(dest_y + block_offset[i], h->mb + i*16, linesize);

  3797.                         else if(h->mb[i*16])

  3798.                             idct_dc_add(dest_y + block_offset[i], h->mb + i*16, linesize);

  3799.                     }

  3800.                 }else{

  3801.                     const int di = IS_8x8DCT(mb_type) ? 4 : 1;

  3802.                     for(i=0; i<16; i+=di){

  3803.                         int nnz = h->non_zero_count_cache[ scan8[i] ];

  3804.                         if(nnz){

  3805.                             if(nnz==1 && h->mb[i*16])

  3806.                                 idct_dc_add(dest_y + block_offset[i], h->mb + i*16, linesize);

  3807.                             else

  3808.                                 idct_add(dest_y + block_offset[i], h->mb + i*16, linesize);

  3809.                         }

  3810.                     }

  3811.                 }

  3812.             }else{

  3813.                 for(i=0; i<16; i++){

  3814.                     if(h->non_zero_count_cache[ scan8[i] ] || h->mb[i*16]){ //FIXME benchmark weird rule, & below

  3815.                         uint8_t * const ptr= dest_y + block_offset[i];

  3816.                         svq3_add_idct_c(ptr, h->mb + i*16, linesize, s->qscale, IS_INTRA(mb_type) ? 1 : 0);

  3817.                     }

  3818.                 }

  3819.             }

  3820.         }

  3821. 

  3822.         if(!(s->flags&CODEC_FLAG_GRAY)){

  3823.             uint8_t *dest[2] = {dest_cb, dest_cr};

  3824.             if(transform_bypass){

  3825.                 idct_add = idct_dc_add = s->dsp.add_pixels4;

  3826.             }else{

  3827.                 idct_add = s->dsp.h264_idct_add;

  3828.                 idct_dc_add = s->dsp.h264_idct_dc_add;

  3829.                 chroma_dc_dequant_idct_c(h->mb + 16*16, h->chroma_qp, h->dequant4_coeff[IS_INTRA(mb_type) ? 1:4][h->chroma_qp][0]);

  3830.                 chroma_dc_dequant_idct_c(h->mb + 16*16+4*16, h->chroma_qp, h->dequant4_coeff[IS_INTRA(mb_type) ? 2:5][h->chroma_qp][0]);

  3831.             }

  3832.             if(s->codec_id == CODEC_ID_H264){

  3833.                 for(i=16; i<16+8; i++){

  3834.                     if(h->non_zero_count_cache[ scan8[i] ])

  3835.                         idct_add(dest[(i&4)>>2] + block_offset[i], h->mb + i*16, uvlinesize);

  3836.                     else if(h->mb[i*16])

  3837.                         idct_dc_add(dest[(i&4)>>2] + block_offset[i], h->mb + i*16, uvlinesize);

  3838.                 }

  3839.             }else{

  3840.                 for(i=16; i<16+8; i++){

  3841.                     if(h->non_zero_count_cache[ scan8[i] ] || h->mb[i*16]){

  3842.                         uint8_t * const ptr= dest[(i&4)>>2] + block_offset[i];

  3843.                         svq3_add_idct_c(ptr, h->mb + i*16, uvlinesize, chroma_qp[s->qscale + 12] - 12, 2);

  3844.                     }

  3845.                 }

  3846.             }

  3847.         }

  3848.     }

  3849.     if(h->deblocking_filter) {

  3850.         if (FRAME_MBAFF) {

  3851.             //FIXME try deblocking one mb at a time?

  3852.             // the reduction in load/storing mvs and such might outweigh the extra backup/xchg_border

  3853.             const int mb_y = s->mb_y - 1;

  3854.             uint8_t  *pair_dest_y, *pair_dest_cb, *pair_dest_cr;

  3855.             const int mb_xy= mb_x + mb_y*s->mb_stride;

  3856.             const int mb_type_top   = s->current_picture.mb_type[mb_xy];

  3857.             const int mb_type_bottom= s->current_picture.mb_type[mb_xy+s->mb_stride];

  3858.             if (!bottom) return;

  3859.             pair_dest_y  = s->current_picture.data[0] + (mb_y * 16* s->linesize  ) + mb_x * 16;

  3860.             pair_dest_cb = s->current_picture.data[1] + (mb_y * 8 * s->uvlinesize) + mb_x * 8;

  3861.             pair_dest_cr = s->current_picture.data[2] + (mb_y * 8 * s->uvlinesize) + mb_x * 8;

  3862. 

  3863.             if(IS_INTRA(mb_type_top | mb_type_bottom))

  3864.                 xchg_pair_border(h, pair_dest_y, pair_dest_cb, pair_dest_cr, s->linesize, s->uvlinesize, 0);

  3865. 

  3866.             backup_pair_border(h, pair_dest_y, pair_dest_cb, pair_dest_cr, s->linesize, s->uvlinesize);

  3867.             // deblock a pair

  3868.             // top

  3869.             s->mb_y--;

  3870.             tprintf("call mbaff filter_mb mb_x:%d mb_y:%d pair_dest_y = %p, dest_y = %p\n", mb_x, mb_y, pair_dest_y, dest_y);

  3871.             fill_caches(h, mb_type_top, 1); //FIXME don't fill stuff which isn't used by filter_mb

  3872.             h->chroma_qp = get_chroma_qp(h->pps.chroma_qp_index_offset, s->current_picture.qscale_table[mb_xy]);

  3873.             filter_mb(h, mb_x, mb_y, pair_dest_y, pair_dest_cb, pair_dest_cr, linesize, uvlinesize);

  3874.             // bottom

  3875.             s->mb_y++;

  3876.             tprintf("call mbaff filter_mb\n");

  3877.             fill_caches(h, mb_type_bottom, 1); //FIXME don't fill stuff which isn't used by filter_mb

  3878.             h->chroma_qp = get_chroma_qp(h->pps.chroma_qp_index_offset, s->current_picture.qscale_table[mb_xy+s->mb_stride]);

  3879.             filter_mb(h, mb_x, mb_y+1, dest_y, dest_cb, dest_cr, linesize, uvlinesize);

  3880.         } else {

  3881.             tprintf("call filter_mb\n");

  3882.             backup_mb_border(h, dest_y, dest_cb, dest_cr, linesize, uvlinesize);

  3883.             fill_caches(h, mb_type, 1); //FIXME don't fill stuff which isn't used by filter_mb

  3884.             filter_mb_fast(h, mb_x, mb_y, dest_y, dest_cb, dest_cr, linesize, uvlinesize);

  3885.         }

  3886.     }

  3887. }

  3888. 

  3889. /**

  3890.  * fills the default_ref_list.

  3891.  */

  3892. static int fill_default_ref_list(H264Context *h){

  3893.     MpegEncContext * const s = &h->s;

  3894.     int i;

  3895.     int smallest_poc_greater_than_current = -1;

  3896.     Picture sorted_short_ref[32];

  3897. 

  3898.     if(h->slice_type==B_TYPE){

  3899.         int out_i;

  3900.         int limit= INT_MIN;

  3901. 

  3902.         /* sort frame according to poc in B slice */

  3903.         for(out_i=0; out_i<h->short_ref_count; out_i++){

  3904.             int best_i=INT_MIN;

  3905.             int best_poc=INT_MAX;

  3906. 

  3907.             for(i=0; i<h->short_ref_count; i++){

  3908.                 const int poc= h->short_ref[i]->poc;

  3909.                 if(poc > limit && poc < best_poc){

  3910.                     best_poc= poc;

  3911.                     best_i= i;

  3912.                 }

  3913.             }

  3914. 

  3915.             assert(best_i != INT_MIN);

  3916. 

  3917.             limit= best_poc;

  3918.             sorted_short_ref[out_i]= *h->short_ref[best_i];

  3919.             tprintf("sorted poc: %d->%d poc:%d fn:%d\n", best_i, out_i, sorted_short_ref[out_i].poc, sorted_short_ref[out_i].frame_num);

  3920.             if (-1 == smallest_poc_greater_than_current) {

  3921.                 if (h->short_ref[best_i]->poc >= s->current_picture_ptr->poc) {

  3922.                     smallest_poc_greater_than_current = out_i;

  3923.                 }

  3924.             }

  3925.         }

  3926.     }

  3927. 

  3928.     if(s->picture_structure == PICT_FRAME){

  3929.         if(h->slice_type==B_TYPE){

  3930.             int list;

  3931.             tprintf("current poc: %d, smallest_poc_greater_than_current: %d\n", s->current_picture_ptr->poc, smallest_poc_greater_than_current);

  3932. 

  3933.             // find the largest poc

  3934.             for(list=0; list<2; list++){

  3935.                 int index = 0;

  3936.                 int j= -99;

  3937.                 int step= list ? -1 : 1;

  3938. 

  3939.                 for(i=0; i<h->short_ref_count && index < h->ref_count[list]; i++, j+=step) {

  3940.                     while(j<0 || j>= h->short_ref_count){

  3941.                         if(j != -99 && step == (list ? -1 : 1))

  3942.                             return -1;

  3943.                         step = -step;

  3944.                         j= smallest_poc_greater_than_current + (step>>1);

  3945.                     }

  3946.                     if(sorted_short_ref[j].reference != 3) continue;

  3947.                     h->default_ref_list[list][index  ]= sorted_short_ref[j];

  3948.                     h->default_ref_list[list][index++].pic_id= sorted_short_ref[j].frame_num;

  3949.                 }

  3950. 

  3951.                 for(i = 0; i < 16 && index < h->ref_count[ list ]; i++){

  3952.                     if(h->long_ref[i] == NULL) continue;

  3953.                     if(h->long_ref[i]->reference != 3) continue;

  3954. 

  3955.                     h->default_ref_list[ list ][index  ]= *h->long_ref[i];

  3956.                     h->default_ref_list[ list ][index++].pic_id= i;;

  3957.                 }

  3958. 

  3959.                 if(list && (smallest_poc_greater_than_current<=0 || smallest_poc_greater_than_current>=h->short_ref_count) && (1 < index)){

  3960.                     // swap the two first elements of L1 when

  3961.                     // L0 and L1 are identical

  3962.                     Picture temp= h->default_ref_list[1][0];

  3963.                     h->default_ref_list[1][0] = h->default_ref_list[1][1];

  3964.                     h->default_ref_list[1][1] = temp;

  3965.                 }

  3966. 

  3967.                 if(index < h->ref_count[ list ])

  3968.                     memset(&h->default_ref_list[list][index], 0, sizeof(Picture)*(h->ref_count[ list ] - index));

  3969.             }

  3970.         }else{

  3971.             int index=0;

  3972.             for(i=0; i<h->short_ref_count; i++){

  3973.                 if(h->short_ref[i]->reference != 3) continue; //FIXME refernce field shit

  3974.                 h->default_ref_list[0][index  ]= *h->short_ref[i];

  3975.                 h->default_ref_list[0][index++].pic_id= h->short_ref[i]->frame_num;

  3976.             }

  3977.             for(i = 0; i < 16; i++){

  3978.                 if(h->long_ref[i] == NULL) continue;

  3979.                 if(h->long_ref[i]->reference != 3) continue;

  3980.                 h->default_ref_list[0][index  ]= *h->long_ref[i];

  3981.                 h->default_ref_list[0][index++].pic_id= i;;

  3982.             }

  3983.             if(index < h->ref_count[0])

  3984.                 memset(&h->default_ref_list[0][index], 0, sizeof(Picture)*(h->ref_count[0] - index));

  3985.         }

  3986.     }else{ //FIELD

  3987.         if(h->slice_type==B_TYPE){

  3988.         }else{

  3989.             //FIXME second field balh

  3990.         }

  3991.     }

  3992. #ifdef TRACE

  3993.     for (i=0; i<h->ref_count[0]; i++) {

  3994.         tprintf("List0: %s fn:%d 0x%p\n", (h->default_ref_list[0][i].long_ref ? "LT" : "ST"), h->default_ref_list[0][i].pic_id, h->default_ref_list[0][i].data[0]);

  3995.     }

  3996.     if(h->slice_type==B_TYPE){

  3997.         for (i=0; i<h->ref_count[1]; i++) {

  3998.             tprintf("List1: %s fn:%d 0x%p\n", (h->default_ref_list[1][i].long_ref ? "LT" : "ST"), h->default_ref_list[1][i].pic_id, h->default_ref_list[0][i].data[0]);

  3999.         }

  4000.     }

  4001. #endif

  4002.     return 0;

  4003. }

  4004. 

  4005. static void print_short_term(H264Context *h);

  4006. static void print_long_term(H264Context *h);

  4007. 

  4008. static int decode_ref_pic_list_reordering(H264Context *h){

  4009.     MpegEncContext * const s = &h->s;

  4010.     int list, index;

  4011. 

  4012.     print_short_term(h);

  4013.     print_long_term(h);

  4014.     if(h->slice_type==I_TYPE || h->slice_type==SI_TYPE) return 0; //FIXME move before func

  4015. 

  4016.     for(list=0; list<2; list++){

  4017.         memcpy(h->ref_list[list], h->default_ref_list[list], sizeof(Picture)*h->ref_count[list]);

  4018. 

  4019.         if(get_bits1(&s->gb)){

  4020.             int pred= h->curr_pic_num;

  4021. 

  4022.             for(index=0; ; index++){

  4023.                 int reordering_of_pic_nums_idc= get_ue_golomb(&s->gb);

  4024.                 int pic_id;

  4025.                 int i;

  4026.                 Picture *ref = NULL;

  4027. 

  4028.                 if(reordering_of_pic_nums_idc==3)

  4029.                     break;

  4030. 

  4031.                 if(index >= h->ref_count[list]){

  4032.                     av_log(h->s.avctx, AV_LOG_ERROR, "reference count overflow\n");

  4033.                     return -1;

  4034.                 }

  4035. 

  4036.                 if(reordering_of_pic_nums_idc<3){

  4037.                     if(reordering_of_pic_nums_idc<2){

  4038.                         const int abs_diff_pic_num= get_ue_golomb(&s->gb) + 1;

  4039. 

  4040.                         if(abs_diff_pic_num >= h->max_pic_num){

  4041.                             av_log(h->s.avctx, AV_LOG_ERROR, "abs_diff_pic_num overflow\n");

  4042.                             return -1;

  4043.                         }

  4044. 

  4045.                         if(reordering_of_pic_nums_idc == 0) pred-= abs_diff_pic_num;

  4046.                         else                                pred+= abs_diff_pic_num;

  4047.                         pred &= h->max_pic_num - 1;

  4048. 

  4049.                         for(i= h->short_ref_count-1; i>=0; i--){

  4050.                             ref = h->short_ref[i];

  4051.                             assert(ref->reference == 3);

  4052.                             assert(!ref->long_ref);

  4053.                             if(ref->data[0] != NULL && ref->frame_num == pred && ref->long_ref == 0) // ignore non existing pictures by testing data[0] pointer

  4054.                                 break;

  4055.                         }

  4056.                         if(i>=0)

  4057.                             ref->pic_id= ref->frame_num;

  4058.                     }else{

  4059.                         pic_id= get_ue_golomb(&s->gb); //long_term_pic_idx

  4060.                         ref = h->long_ref[pic_id];

  4061.                         ref->pic_id= pic_id;

  4062.                         assert(ref->reference == 3);

  4063.                         assert(ref->long_ref);

  4064.                         i=0;

  4065.                     }

  4066. 

  4067.                     if (i < 0) {

  4068.                         av_log(h->s.avctx, AV_LOG_ERROR, "reference picture missing during reorder\n");

  4069.                         memset(&h->ref_list[list][index], 0, sizeof(Picture)); //FIXME

  4070.                     } else {

  4071.                         for(i=index; i+1<h->ref_count[list]; i++){

  4072.                             if(ref->long_ref == h->ref_list[list][i].long_ref && ref->pic_id == h->ref_list[list][i].pic_id)

  4073.                                 break;

  4074.                         }

  4075.                         for(; i > index; i--){

  4076.                             h->ref_list[list][i]= h->ref_list[list][i-1];

  4077.                         }

  4078.                         h->ref_list[list][index]= *ref;

  4079.                     }

  4080.                 }else{

  4081.                     av_log(h->s.avctx, AV_LOG_ERROR, "illegal reordering_of_pic_nums_idc\n");

  4082.                     return -1;

  4083.                 }

  4084.             }

  4085.         }

  4086. 

  4087.         if(h->slice_type!=B_TYPE) break;

  4088.     }

  4089.     for(list=0; list<2; list++){

  4090.         for(index= 0; index < h->ref_count[list]; index++){

  4091.             if(!h->ref_list[list][index].data[0])

  4092.                 h->ref_list[list][index]= s->current_picture;

  4093.         }

  4094.         if(h->slice_type!=B_TYPE) break;

  4095.     }

  4096. 

  4097.     if(h->slice_type==B_TYPE && !h->direct_spatial_mv_pred)

  4098.         direct_dist_scale_factor(h);

  4099.     direct_ref_list_init(h);

  4100.     return 0;

  4101. }

  4102. 

  4103. static void fill_mbaff_ref_list(H264Context *h){

  4104.     int list, i, j;

  4105.     for(list=0; list<2; list++){

  4106.         for(i=0; i<h->ref_count[list]; i++){

  4107.             Picture *frame = &h->ref_list[list][i];

  4108.             Picture *field = &h->ref_list[list][16+2*i];

  4109.             field[0] = *frame;

  4110.             for(j=0; j<3; j++)

  4111.                 field[0].linesize[j] <<= 1;

  4112.             field[1] = field[0];

  4113.             for(j=0; j<3; j++)

  4114.                 field[1].data[j] += frame->linesize[j];

  4115. 

  4116.             h->luma_weight[list][16+2*i] = h->luma_weight[list][16+2*i+1] = h->luma_weight[list][i];

  4117.             h->luma_offset[list][16+2*i] = h->luma_offset[list][16+2*i+1] = h->luma_offset[list][i];

  4118.             for(j=0; j<2; j++){

  4119.                 h->chroma_weight[list][16+2*i][j] = h->chroma_weight[list][16+2*i+1][j] = h->chroma_weight[list][i][j];

  4120.                 h->chroma_offset[list][16+2*i][j] = h->chroma_offset[list][16+2*i+1][j] = h->chroma_offset[list][i][j];

  4121.             }

  4122.         }

  4123.     }

  4124.     for(j=0; j<h->ref_count[1]; j++){

  4125.         for(i=0; i<h->ref_count[0]; i++)

  4126.             h->implicit_weight[j][16+2*i] = h->implicit_weight[j][16+2*i+1] = h->implicit_weight[j][i];

  4127.         memcpy(h->implicit_weight[16+2*j],   h->implicit_weight[j], sizeof(*h->implicit_weight));

  4128.         memcpy(h->implicit_weight[16+2*j+1], h->implicit_weight[j], sizeof(*h->implicit_weight));

  4129.     }

  4130. }

  4131. 

  4132. static int pred_weight_table(H264Context *h){

  4133.     MpegEncContext * const s = &h->s;

  4134.     int list, i;

  4135.     int luma_def, chroma_def;

  4136. 

  4137.     h->use_weight= 0;

  4138.     h->use_weight_chroma= 0;

  4139.     h->luma_log2_weight_denom= get_ue_golomb(&s->gb);

  4140.     h->chroma_log2_weight_denom= get_ue_golomb(&s->gb);

  4141.     luma_def = 1<<h->luma_log2_weight_denom;

  4142.     chroma_def = 1<<h->chroma_log2_weight_denom;

  4143. 

  4144.     for(list=0; list<2; list++){

  4145.         for(i=0; i<h->ref_count[list]; i++){

  4146.             int luma_weight_flag, chroma_weight_flag;

  4147. 

  4148.             luma_weight_flag= get_bits1(&s->gb);

  4149.             if(luma_weight_flag){

  4150.                 h->luma_weight[list][i]= get_se_golomb(&s->gb);

  4151.                 h->luma_offset[list][i]= get_se_golomb(&s->gb);

  4152.                 if(   h->luma_weight[list][i] != luma_def

  4153.                    || h->luma_offset[list][i] != 0)

  4154.                     h->use_weight= 1;

  4155.             }else{

  4156.                 h->luma_weight[list][i]= luma_def;

  4157.                 h->luma_offset[list][i]= 0;

  4158.             }

  4159. 

  4160.             chroma_weight_flag= get_bits1(&s->gb);

  4161.             if(chroma_weight_flag){

  4162.                 int j;

  4163.                 for(j=0; j<2; j++){

  4164.                     h->chroma_weight[list][i][j]= get_se_golomb(&s->gb);

  4165.                     h->chroma_offset[list][i][j]= get_se_golomb(&s->gb);

  4166.                     if(   h->chroma_weight[list][i][j] != chroma_def

  4167.                        || h->chroma_offset[list][i][j] != 0)

  4168.                         h->use_weight_chroma= 1;

  4169.                 }

  4170.             }else{

  4171.                 int j;

  4172.                 for(j=0; j<2; j++){

  4173.                     h->chroma_weight[list][i][j]= chroma_def;

  4174.                     h->chroma_offset[list][i][j]= 0;

  4175.                 }

  4176.             }

  4177.         }

  4178.         if(h->slice_type != B_TYPE) break;

  4179.     }

  4180.     h->use_weight= h->use_weight || h->use_weight_chroma;

  4181.     return 0;

  4182. }

  4183. 

  4184. static void implicit_weight_table(H264Context *h){

  4185.     MpegEncContext * const s = &h->s;

  4186.     int ref0, ref1;

  4187.     int cur_poc = s->current_picture_ptr->poc;

  4188. 

  4189.     if(   h->ref_count[0] == 1 && h->ref_count[1] == 1

  4190.        && h->ref_list[0][0].poc + h->ref_list[1][0].poc == 2*cur_poc){

  4191.         h->use_weight= 0;

  4192.         h->use_weight_chroma= 0;

  4193.         return;

  4194.     }

  4195. 

  4196.     h->use_weight= 2;

  4197.     h->use_weight_chroma= 2;

  4198.     h->luma_log2_weight_denom= 5;

  4199.     h->chroma_log2_weight_denom= 5;

  4200. 

  4201.     for(ref0=0; ref0 < h->ref_count[0]; ref0++){

  4202.         int poc0 = h->ref_list[0][ref0].poc;

  4203.         for(ref1=0; ref1 < h->ref_count[1]; ref1++){

  4204.             int poc1 = h->ref_list[1][ref1].poc;

  4205.             int td = clip(poc1 - poc0, -128, 127);

  4206.             if(td){

  4207.                 int tb = clip(cur_poc - poc0, -128, 127);

  4208.                 int tx = (16384 + (ABS(td) >> 1)) / td;

  4209.                 int dist_scale_factor = clip((tb*tx + 32) >> 6, -1024, 1023) >> 2;

  4210.                 if(dist_scale_factor < -64 || dist_scale_factor > 128)

  4211.                     h->implicit_weight[ref0][ref1] = 32;

  4212.                 else

  4213.                     h->implicit_weight[ref0][ref1] = 64 - dist_scale_factor;

  4214.             }else

  4215.                 h->implicit_weight[ref0][ref1] = 32;

  4216.         }

  4217.     }

  4218. }

  4219. 

  4220. static inline void unreference_pic(H264Context *h, Picture *pic){

  4221.     int i;

  4222.     pic->reference=0;

  4223.     if(pic == h->delayed_output_pic)

  4224.         pic->reference=1;

  4225.     else{

  4226.         for(i = 0; h->delayed_pic[i]; i++)

  4227.             if(pic == h->delayed_pic[i]){

  4228.                 pic->reference=1;

  4229.                 break;

  4230.             }

  4231.     }

  4232. }

  4233. 

  4234. /**

  4235.  * instantaneous decoder refresh.

  4236.  */

  4237. static void idr(H264Context *h){

  4238.     int i;

  4239. 

  4240.     for(i=0; i<16; i++){

  4241.         if (h->long_ref[i] != NULL) {

  4242.             unreference_pic(h, h->long_ref[i]);

  4243.             h->long_ref[i]= NULL;

  4244.         }

  4245.     }

  4246.     h->long_ref_count=0;

  4247. 

  4248.     for(i=0; i<h->short_ref_count; i++){

  4249.         unreference_pic(h, h->short_ref[i]);

  4250.         h->short_ref[i]= NULL;

  4251.     }

  4252.     h->short_ref_count=0;

  4253. }

  4254. 

  4255. /* forget old pics after a seek */

  4256. static void flush_dpb(AVCodecContext *avctx){

  4257.     H264Context *h= avctx->priv_data;

  4258.     int i;

  4259.     for(i=0; i<16; i++) {

  4260.         if(h->delayed_pic[i])

  4261.             h->delayed_pic[i]->reference= 0;

  4262.         h->delayed_pic[i]= NULL;

  4263.     }

  4264.     if(h->delayed_output_pic)

  4265.         h->delayed_output_pic->reference= 0;

  4266.     h->delayed_output_pic= NULL;

  4267.     idr(h);

  4268.     if(h->s.current_picture_ptr)

  4269.         h->s.current_picture_ptr->reference= 0;

  4270. }

  4271. 

  4272. /**

  4273.  *

  4274.  * @return the removed picture or NULL if an error occurs

  4275.  */

  4276. static Picture * remove_short(H264Context *h, int frame_num){

  4277.     MpegEncContext * const s = &h->s;

  4278.     int i;

  4279. 

  4280.     if(s->avctx->debug&FF_DEBUG_MMCO)

  4281.         av_log(h->s.avctx, AV_LOG_DEBUG, "remove short %d count %d\n", frame_num, h->short_ref_count);

  4282. 

  4283.     for(i=0; i<h->short_ref_count; i++){

  4284.         Picture *pic= h->short_ref[i];

  4285.         if(s->avctx->debug&FF_DEBUG_MMCO)

  4286.             av_log(h->s.avctx, AV_LOG_DEBUG, "%d %d %p\n", i, pic->frame_num, pic);

  4287.         if(pic->frame_num == frame_num){

  4288.             h->short_ref[i]= NULL;

  4289.             memmove(&h->short_ref[i], &h->short_ref[i+1], (h->short_ref_count - i - 1)*sizeof(Picture*));

  4290.             h->short_ref_count--;

  4291.             return pic;

  4292.         }

  4293.     }

  4294.     return NULL;

  4295. }

  4296. 

  4297. /**

  4298.  *

  4299.  * @return the removed picture or NULL if an error occurs

  4300.  */

  4301. static Picture * remove_long(H264Context *h, int i){

  4302.     Picture *pic;

  4303. 

  4304.     pic= h->long_ref[i];

  4305.     h->long_ref[i]= NULL;

  4306.     if(pic) h->long_ref_count--;

  4307. 

  4308.     return pic;

  4309. }

  4310. 

  4311. /**

  4312.  * print short term list

  4313.  */

  4314. static void print_short_term(H264Context *h) {

  4315.     uint32_t i;

  4316.     if(h->s.avctx->debug&FF_DEBUG_MMCO) {

  4317.         av_log(h->s.avctx, AV_LOG_DEBUG, "short term list:\n");

  4318.         for(i=0; i<h->short_ref_count; i++){

  4319.             Picture *pic= h->short_ref[i];

  4320.             av_log(h->s.avctx, AV_LOG_DEBUG, "%d fn:%d poc:%d %p\n", i, pic->frame_num, pic->poc, pic->data[0]);

  4321.         }

  4322.     }

  4323. }

  4324. 

  4325. /**

  4326.  * print long term list

  4327.  */

  4328. static void print_long_term(H264Context *h) {

  4329.     uint32_t i;

  4330.     if(h->s.avctx->debug&FF_DEBUG_MMCO) {

  4331.         av_log(h->s.avctx, AV_LOG_DEBUG, "long term list:\n");

  4332.         for(i = 0; i < 16; i++){

  4333.             Picture *pic= h->long_ref[i];

  4334.             if (pic) {

  4335.                 av_log(h->s.avctx, AV_LOG_DEBUG, "%d fn:%d poc:%d %p\n", i, pic->frame_num, pic->poc, pic->data[0]);

  4336.             }

  4337.         }

  4338.     }

  4339. }

  4340. 

  4341. /**

  4342.  * Executes the reference picture marking (memory management control operations).

  4343.  */

  4344. static int execute_ref_pic_marking(H264Context *h, MMCO *mmco, int mmco_count){

  4345.     MpegEncContext * const s = &h->s;

  4346.     int i, j;

  4347.     int current_is_long=0;

  4348.     Picture *pic;

  4349. 

  4350.     if((s->avctx->debug&FF_DEBUG_MMCO) && mmco_count==0)

  4351.         av_log(h->s.avctx, AV_LOG_DEBUG, "no mmco here\n");

  4352. 

  4353.     for(i=0; i<mmco_count; i++){

  4354.         if(s->avctx->debug&FF_DEBUG_MMCO)

  4355.             av_log(h->s.avctx, AV_LOG_DEBUG, "mmco:%d %d %d\n", h->mmco[i].opcode, h->mmco[i].short_frame_num, h->mmco[i].long_index);

  4356. 

  4357.         switch(mmco[i].opcode){

  4358.         case MMCO_SHORT2UNUSED:

  4359.             pic= remove_short(h, mmco[i].short_frame_num);

  4360.             if(pic)

  4361.                 unreference_pic(h, pic);

  4362.             else if(s->avctx->debug&FF_DEBUG_MMCO)

  4363.                 av_log(h->s.avctx, AV_LOG_DEBUG, "mmco: remove_short() failure\n");

  4364.             break;

  4365.         case MMCO_SHORT2LONG:

  4366.             pic= remove_long(h, mmco[i].long_index);

  4367.             if(pic) unreference_pic(h, pic);

  4368. 

  4369.             h->long_ref[ mmco[i].long_index ]= remove_short(h, mmco[i].short_frame_num);

  4370.             h->long_ref[ mmco[i].long_index ]->long_ref=1;

  4371.             h->long_ref_count++;

  4372.             break;

  4373.         case MMCO_LONG2UNUSED:

  4374.             pic= remove_long(h, mmco[i].long_index);

  4375.             if(pic)

  4376.                 unreference_pic(h, pic);

  4377.             else if(s->avctx->debug&FF_DEBUG_MMCO)

  4378.                 av_log(h->s.avctx, AV_LOG_DEBUG, "mmco: remove_long() failure\n");

  4379.             break;

  4380.         case MMCO_LONG:

  4381.             pic= remove_long(h, mmco[i].long_index);

  4382.             if(pic) unreference_pic(h, pic);

  4383. 

  4384.             h->long_ref[ mmco[i].long_index ]= s->current_picture_ptr;

  4385.             h->long_ref[ mmco[i].long_index ]->long_ref=1;

  4386.             h->long_ref_count++;

  4387. 

  4388.             current_is_long=1;

  4389.             break;

  4390.         case MMCO_SET_MAX_LONG:

  4391.             assert(mmco[i].long_index <= 16);

  4392.             // just remove the long term which index is greater than new max

  4393.             for(j = mmco[i].long_index; j<16; j++){

  4394.                 pic = remove_long(h, j);

  4395.                 if (pic) unreference_pic(h, pic);

  4396.             }

  4397.             break;

  4398.         case MMCO_RESET:

  4399.             while(h->short_ref_count){

  4400.                 pic= remove_short(h, h->short_ref[0]->frame_num);

  4401.                 unreference_pic(h, pic);

  4402.             }

  4403.             for(j = 0; j < 16; j++) {

  4404.                 pic= remove_long(h, j);

  4405.                 if(pic) unreference_pic(h, pic);

  4406.             }

  4407.             break;

  4408.         default: assert(0);

  4409.         }

  4410.     }

  4411. 

  4412.     if(!current_is_long){

  4413.         pic= remove_short(h, s->current_picture_ptr->frame_num);

  4414.         if(pic){

  4415.             unreference_pic(h, pic);

  4416.             av_log(h->s.avctx, AV_LOG_ERROR, "illegal short term buffer state detected\n");

  4417.         }

  4418. 

  4419.         if(h->short_ref_count)

  4420.             memmove(&h->short_ref[1], &h->short_ref[0], h->short_ref_count*sizeof(Picture*));

  4421. 

  4422.         h->short_ref[0]= s->current_picture_ptr;

  4423.         h->short_ref[0]->long_ref=0;

  4424.         h->short_ref_count++;

  4425.     }

  4426. 

  4427.     print_short_term(h);

  4428.     print_long_term(h);

  4429.     return 0;

  4430. }

  4431. 

  4432. static int decode_ref_pic_marking(H264Context *h){

  4433.     MpegEncContext * const s = &h->s;

  4434.     int i;

  4435. 

  4436.     if(h->nal_unit_type == NAL_IDR_SLICE){ //FIXME fields

  4437.         s->broken_link= get_bits1(&s->gb) -1;

  4438.         h->mmco[0].long_index= get_bits1(&s->gb) - 1; // current_long_term_idx

  4439.         if(h->mmco[0].long_index == -1)

  4440.             h->mmco_index= 0;

  4441.         else{

  4442.             h->mmco[0].opcode= MMCO_LONG;

  4443.             h->mmco_index= 1;

  4444.         }

  4445.     }else{

  4446.         if(get_bits1(&s->gb)){ // adaptive_ref_pic_marking_mode_flag

  4447.             for(i= 0; i<MAX_MMCO_COUNT; i++) {

  4448.                 MMCOOpcode opcode= get_ue_golomb(&s->gb);;

  4449. 

  4450.                 h->mmco[i].opcode= opcode;

  4451.                 if(opcode==MMCO_SHORT2UNUSED || opcode==MMCO_SHORT2LONG){

  4452.                     h->mmco[i].short_frame_num= (h->frame_num - get_ue_golomb(&s->gb) - 1) & ((1<<h->sps.log2_max_frame_num)-1); //FIXME fields

  4453. /*                    if(h->mmco[i].short_frame_num >= h->short_ref_count || h->short_ref[ h->mmco[i].short_frame_num ] == NULL){

  4454.                         av_log(s->avctx, AV_LOG_ERROR, "illegal short ref in memory management control operation %d\n", mmco);

  4455.                         return -1;

  4456.                     }*/

  4457.                 }

  4458.                 if(opcode==MMCO_SHORT2LONG || opcode==MMCO_LONG2UNUSED || opcode==MMCO_LONG || opcode==MMCO_SET_MAX_LONG){

  4459.                     h->mmco[i].long_index= get_ue_golomb(&s->gb);

  4460.                     if(/*h->mmco[i].long_index >= h->long_ref_count || h->long_ref[ h->mmco[i].long_index ] == NULL*/ h->mmco[i].long_index >= 16){

  4461.                         av_log(h->s.avctx, AV_LOG_ERROR, "illegal long ref in memory management control operation %d\n", opcode);

  4462.                         return -1;

  4463.                     }

  4464.                 }

  4465. 

  4466.                 if(opcode > MMCO_LONG){

  4467.                     av_log(h->s.avctx, AV_LOG_ERROR, "illegal memory management control operation %d\n", opcode);

  4468.                     return -1;

  4469.                 }

  4470.                 if(opcode == MMCO_END)

  4471.                     break;

  4472.             }

  4473.             h->mmco_index= i;

  4474.         }else{

  4475.             assert(h->long_ref_count + h->short_ref_count <= h->sps.ref_frame_count);

  4476. 

  4477.             if(h->long_ref_count + h->short_ref_count == h->sps.ref_frame_count){ //FIXME fields

  4478.                 h->mmco[0].opcode= MMCO_SHORT2UNUSED;

  4479.                 h->mmco[0].short_frame_num= h->short_ref[ h->short_ref_count - 1 ]->frame_num;

  4480.                 h->mmco_index= 1;

  4481.             }else

  4482.                 h->mmco_index= 0;

  4483.         }

  4484.     }

  4485. 

  4486.     return 0;

  4487. }

  4488. 

  4489. static int init_poc(H264Context *h){

  4490.     MpegEncContext * const s = &h->s;

  4491.     const int max_frame_num= 1<<h->sps.log2_max_frame_num;

  4492.     int field_poc[2];

  4493. 

  4494.     if(h->nal_unit_type == NAL_IDR_SLICE){

  4495.         h->frame_num_offset= 0;

  4496.     }else{

  4497.         if(h->frame_num < h->prev_frame_num)

  4498.             h->frame_num_offset= h->prev_frame_num_offset + max_frame_num;

  4499.         else

  4500.             h->frame_num_offset= h->prev_frame_num_offset;

  4501.     }

  4502. 

  4503.     if(h->sps.poc_type==0){

  4504.         const int max_poc_lsb= 1<<h->sps.log2_max_poc_lsb;

  4505. 

  4506.         if(h->nal_unit_type == NAL_IDR_SLICE){

  4507.              h->prev_poc_msb=

  4508.              h->prev_poc_lsb= 0;

  4509.         }

  4510. 

  4511.         if     (h->poc_lsb < h->prev_poc_lsb && h->prev_poc_lsb - h->poc_lsb >= max_poc_lsb/2)

  4512.             h->poc_msb = h->prev_poc_msb + max_poc_lsb;

  4513.         else if(h->poc_lsb > h->prev_poc_lsb && h->prev_poc_lsb - h->poc_lsb < -max_poc_lsb/2)

  4514.             h->poc_msb = h->prev_poc_msb - max_poc_lsb;

  4515.         else

  4516.             h->poc_msb = h->prev_poc_msb;

  4517. //printf("poc: %d %d\n", h->poc_msb, h->poc_lsb);

  4518.         field_poc[0] =

  4519.         field_poc[1] = h->poc_msb + h->poc_lsb;

  4520.         if(s->picture_structure == PICT_FRAME)

  4521.             field_poc[1] += h->delta_poc_bottom;

  4522.     }else if(h->sps.poc_type==1){

  4523.         int abs_frame_num, expected_delta_per_poc_cycle, expectedpoc;

  4524.         int i;

  4525. 

  4526.         if(h->sps.poc_cycle_length != 0)

  4527.             abs_frame_num = h->frame_num_offset + h->frame_num;

  4528.         else

  4529.             abs_frame_num = 0;

  4530. 

  4531.         if(h->nal_ref_idc==0 && abs_frame_num > 0)

  4532.             abs_frame_num--;

  4533. 

  4534.         expected_delta_per_poc_cycle = 0;

  4535.         for(i=0; i < h->sps.poc_cycle_length; i++)

  4536.             expected_delta_per_poc_cycle += h->sps.offset_for_ref_frame[ i ]; //FIXME integrate during sps parse

  4537. 

  4538.         if(abs_frame_num > 0){

  4539.             int poc_cycle_cnt          = (abs_frame_num - 1) / h->sps.poc_cycle_length;

  4540.             int frame_num_in_poc_cycle = (abs_frame_num - 1) % h->sps.poc_cycle_length;

  4541. 

  4542.             expectedpoc = poc_cycle_cnt * expected_delta_per_poc_cycle;

  4543.             for(i = 0; i <= frame_num_in_poc_cycle; i++)

  4544.                 expectedpoc = expectedpoc + h->sps.offset_for_ref_frame[ i ];

  4545.         } else

  4546.             expectedpoc = 0;

  4547. 

  4548.         if(h->nal_ref_idc == 0)

  4549.             expectedpoc = expectedpoc + h->sps.offset_for_non_ref_pic;

  4550. 

  4551.         field_poc[0] = expectedpoc + h->delta_poc[0];

  4552.         field_poc[1] = field_poc[0] + h->sps.offset_for_top_to_bottom_field;

  4553. 

  4554.         if(s->picture_structure == PICT_FRAME)

  4555.             field_poc[1] += h->delta_poc[1];

  4556.     }else{

  4557.         int poc;

  4558.         if(h->nal_unit_type == NAL_IDR_SLICE){

  4559.             poc= 0;

  4560.         }else{

  4561.             if(h->nal_ref_idc) poc= 2*(h->frame_num_offset + h->frame_num);

  4562.             else               poc= 2*(h->frame_num_offset + h->frame_num) - 1;

  4563.         }

  4564.         field_poc[0]= poc;

  4565.         field_poc[1]= poc;

  4566.     }

  4567. 

  4568.     if(s->picture_structure != PICT_BOTTOM_FIELD)

  4569.         s->current_picture_ptr->field_poc[0]= field_poc[0];

  4570.     if(s->picture_structure != PICT_TOP_FIELD)

  4571.         s->current_picture_ptr->field_poc[1]= field_poc[1];

  4572.     if(s->picture_structure == PICT_FRAME) // FIXME field pix?

  4573.         s->current_picture_ptr->poc= FFMIN(field_poc[0], field_poc[1]);

  4574. 

  4575.     return 0;

  4576. }

  4577. 

  4578. /**

  4579.  * decodes a slice header.

  4580.  * this will allso call MPV_common_init() and frame_start() as needed

  4581.  */

  4582. static int decode_slice_header(H264Context *h){

  4583.     MpegEncContext * const s = &h->s;

  4584.     int first_mb_in_slice, pps_id;

  4585.     int num_ref_idx_active_override_flag;

  4586.     static const uint8_t slice_type_map[5]= {P_TYPE, B_TYPE, I_TYPE, SP_TYPE, SI_TYPE};

  4587.     int slice_type;

  4588.     int default_ref_list_done = 0;

  4589. 

  4590.     s->current_picture.reference= h->nal_ref_idc != 0;

  4591.     s->dropable= h->nal_ref_idc == 0;

  4592. 

  4593.     first_mb_in_slice= get_ue_golomb(&s->gb);

  4594. 

  4595.     slice_type= get_ue_golomb(&s->gb);

  4596.     if(slice_type > 9){

  4597.         av_log(h->s.avctx, AV_LOG_ERROR, "slice type too large (%d) at %d %d\n", h->slice_type, s->mb_x, s->mb_y);

  4598.         return -1;

  4599.     }

  4600.     if(slice_type > 4){

  4601.         slice_type -= 5;

  4602.         h->slice_type_fixed=1;

  4603.     }else

  4604.         h->slice_type_fixed=0;

  4605. 

  4606.     slice_type= slice_type_map[ slice_type ];

  4607.     if (slice_type == I_TYPE

  4608.         || (h->slice_num != 0 && slice_type == h->slice_type) ) {

  4609.         default_ref_list_done = 1;

  4610.     }

  4611.     h->slice_type= slice_type;

  4612. 

  4613.     s->pict_type= h->slice_type; // to make a few old func happy, it's wrong though

  4614. 

  4615.     pps_id= get_ue_golomb(&s->gb);

  4616.     if(pps_id>255){

  4617.         av_log(h->s.avctx, AV_LOG_ERROR, "pps_id out of range\n");

  4618.         return -1;

  4619.     }

  4620.     h->pps= h->pps_buffer[pps_id];

  4621.     if(h->pps.slice_group_count == 0){

  4622.         av_log(h->s.avctx, AV_LOG_ERROR, "non existing PPS referenced\n");

  4623.         return -1;

  4624.     }

  4625. 

  4626.     h->sps= h->sps_buffer[ h->pps.sps_id ];

  4627.     if(h->sps.log2_max_frame_num == 0){

  4628.         av_log(h->s.avctx, AV_LOG_ERROR, "non existing SPS referenced\n");

  4629.         return -1;

  4630.     }

  4631. 

  4632.     if(h->dequant_coeff_pps != pps_id){

  4633.         h->dequant_coeff_pps = pps_id;

  4634.         init_dequant_tables(h);

  4635.     }

  4636. 

  4637.     s->mb_width= h->sps.mb_width;

  4638.     s->mb_height= h->sps.mb_height * (2 - h->sps.frame_mbs_only_flag);

  4639. 

  4640.     h->b_stride=  s->mb_width*4;

  4641.     h->b8_stride= s->mb_width*2;

  4642. 

  4643.     s->width = 16*s->mb_width - 2*(h->sps.crop_left + h->sps.crop_right );

  4644.     if(h->sps.frame_mbs_only_flag)

  4645.         s->height= 16*s->mb_height - 2*(h->sps.crop_top  + h->sps.crop_bottom);

  4646.     else

  4647.         s->height= 16*s->mb_height - 4*(h->sps.crop_top  + h->sps.crop_bottom); //FIXME recheck

  4648. 

  4649.     if (s->context_initialized

  4650.         && (   s->width != s->avctx->width || s->height != s->avctx->height)) {

  4651.         free_tables(h);

  4652.         MPV_common_end(s);

  4653.     }

  4654.     if (!s->context_initialized) {

  4655.         if (MPV_common_init(s) < 0)

  4656.             return -1;

  4657. 

  4658.         if(s->dsp.h264_idct_add == ff_h264_idct_add_c){ //FIXME little ugly

  4659.             memcpy(h->zigzag_scan, zigzag_scan, 16*sizeof(uint8_t));

  4660.             memcpy(h-> field_scan,  field_scan, 16*sizeof(uint8_t));

  4661.         }else{

  4662.             int i;

  4663.             for(i=0; i<16; i++){

  4664. #define T(x) (x>>2) | ((x<<2) & 0xF)

  4665.                 h->zigzag_scan[i] = T(zigzag_scan[i]);

  4666.                 h-> field_scan[i] = T( field_scan[i]);

  4667. #undef T

  4668.             }

  4669.         }

  4670.         if(s->dsp.h264_idct8_add == ff_h264_idct8_add_c){

  4671.             memcpy(h->zigzag_scan8x8,       zigzag_scan8x8,       64*sizeof(uint8_t));

  4672.             memcpy(h->zigzag_scan8x8_cavlc, zigzag_scan8x8_cavlc, 64*sizeof(uint8_t));

  4673.             memcpy(h->field_scan8x8,        field_scan8x8,        64*sizeof(uint8_t));

  4674.             memcpy(h->field_scan8x8_cavlc,  field_scan8x8_cavlc,  64*sizeof(uint8_t));

  4675.         }else{

  4676.             int i;

  4677.             for(i=0; i<64; i++){

  4678. #define T(x) (x>>3) | ((x&7)<<3)

  4679.                 h->zigzag_scan8x8[i]       = T(zigzag_scan8x8[i]);

  4680.                 h->zigzag_scan8x8_cavlc[i] = T(zigzag_scan8x8_cavlc[i]);

  4681.                 h->field_scan8x8[i]        = T(field_scan8x8[i]);

  4682.                 h->field_scan8x8_cavlc[i]  = T(field_scan8x8_cavlc[i]);

  4683. #undef T

  4684.             }

  4685.         }

  4686.         if(h->sps.transform_bypass){ //FIXME same ugly

  4687.             h->zigzag_scan_q0          = zigzag_scan;

  4688.             h->zigzag_scan8x8_q0       = zigzag_scan8x8;

  4689.             h->zigzag_scan8x8_cavlc_q0 = zigzag_scan8x8_cavlc;

  4690.             h->field_scan_q0           = field_scan;

  4691.             h->field_scan8x8_q0        = field_scan8x8;

  4692.             h->field_scan8x8_cavlc_q0  = field_scan8x8_cavlc;

  4693.         }else{

  4694.             h->zigzag_scan_q0          = h->zigzag_scan;

  4695.             h->zigzag_scan8x8_q0       = h->zigzag_scan8x8;

  4696.             h->zigzag_scan8x8_cavlc_q0 = h->zigzag_scan8x8_cavlc;

  4697.             h->field_scan_q0           = h->field_scan;

  4698.             h->field_scan8x8_q0        = h->field_scan8x8;

  4699.             h->field_scan8x8_cavlc_q0  = h->field_scan8x8_cavlc;

  4700.         }

  4701. 

  4702.         alloc_tables(h);

  4703. 

  4704.         s->avctx->width = s->width;

  4705.         s->avctx->height = s->height;

  4706.         s->avctx->sample_aspect_ratio= h->sps.sar;

  4707.         if(!s->avctx->sample_aspect_ratio.den)

  4708.             s->avctx->sample_aspect_ratio.den = 1;

  4709. 

  4710.         if(h->sps.timing_info_present_flag){

  4711.             s->avctx->time_base= (AVRational){h->sps.num_units_in_tick * 2, h->sps.time_scale};

  4712.             if(h->x264_build > 0 && h->x264_build < 44)

  4713.                 s->avctx->time_base.den *= 2;

  4714.             av_reduce(&s->avctx->time_base.num, &s->avctx->time_base.den,

  4715.                       s->avctx->time_base.num, s->avctx->time_base.den, 1<<30);

  4716.         }

  4717.     }

  4718. 

  4719.     if(h->slice_num == 0){

  4720.         if(frame_start(h) < 0)

  4721.             return -1;

  4722.     }

  4723. 

  4724.     s->current_picture_ptr->frame_num= //FIXME frame_num cleanup

  4725.     h->frame_num= get_bits(&s->gb, h->sps.log2_max_frame_num);

  4726. 

  4727.     h->mb_mbaff = 0;

  4728.     h->mb_aff_frame = 0;

  4729.     if(h->sps.frame_mbs_only_flag){

  4730.         s->picture_structure= PICT_FRAME;

  4731.     }else{

  4732.         if(get_bits1(&s->gb)) { //field_pic_flag

  4733.             s->picture_structure= PICT_TOP_FIELD + get_bits1(&s->gb); //bottom_field_flag

  4734.             av_log(h->s.avctx, AV_LOG_ERROR, "PAFF interlacing is not implemented\n");

  4735.         } else {

  4736.             s->picture_structure= PICT_FRAME;

  4737.             h->mb_aff_frame = h->sps.mb_aff;

  4738.         }

  4739.     }

  4740. 

  4741.     s->resync_mb_x = s->mb_x = first_mb_in_slice % s->mb_width;

  4742.     s->resync_mb_y = s->mb_y = (first_mb_in_slice / s->mb_width) << h->mb_aff_frame;

  4743.     if(s->mb_y >= s->mb_height){

  4744.         return -1;

  4745.     }

  4746. 

  4747.     if(s->picture_structure==PICT_FRAME){

  4748.         h->curr_pic_num=   h->frame_num;

  4749.         h->max_pic_num= 1<< h->sps.log2_max_frame_num;

  4750.     }else{

  4751.         h->curr_pic_num= 2*h->frame_num;

  4752.         h->max_pic_num= 1<<(h->sps.log2_max_frame_num + 1);

  4753.     }

  4754. 

  4755.     if(h->nal_unit_type == NAL_IDR_SLICE){

  4756.         get_ue_golomb(&s->gb); /* idr_pic_id */

  4757.     }

  4758. 

  4759.     if(h->sps.poc_type==0){

  4760.         h->poc_lsb= get_bits(&s->gb, h->sps.log2_max_poc_lsb);

  4761. 

  4762.         if(h->pps.pic_order_present==1 && s->picture_structure==PICT_FRAME){

  4763.             h->delta_poc_bottom= get_se_golomb(&s->gb);

  4764.         }

  4765.     }

  4766. 

  4767.     if(h->sps.poc_type==1 && !h->sps.delta_pic_order_always_zero_flag){

  4768.         h->delta_poc[0]= get_se_golomb(&s->gb);

  4769. 

  4770.         if(h->pps.pic_order_present==1 && s->picture_structure==PICT_FRAME)

  4771.             h->delta_poc[1]= get_se_golomb(&s->gb);

  4772.     }

  4773. 

  4774.     init_poc(h);

  4775. 

  4776.     if(h->pps.redundant_pic_cnt_present){

  4777.         h->redundant_pic_count= get_ue_golomb(&s->gb);

  4778.     }

  4779. 

  4780.     //set defaults, might be overriden a few line later

  4781.     h->ref_count[0]= h->pps.ref_count[0];

  4782.     h->ref_count[1]= h->pps.ref_count[1];

  4783. 

  4784.     if(h->slice_type == P_TYPE || h->slice_type == SP_TYPE || h->slice_type == B_TYPE){

  4785.         if(h->slice_type == B_TYPE){

  4786.             h->direct_spatial_mv_pred= get_bits1(&s->gb);

  4787.             if(h->sps.mb_aff && h->direct_spatial_mv_pred)

  4788.                 av_log(h->s.avctx, AV_LOG_ERROR, "MBAFF + spatial direct mode is not implemented\n");

  4789.         }

  4790.         num_ref_idx_active_override_flag= get_bits1(&s->gb);

  4791. 

  4792.         if(num_ref_idx_active_override_flag){

  4793.             h->ref_count[0]= get_ue_golomb(&s->gb) + 1;

  4794.             if(h->slice_type==B_TYPE)

  4795.                 h->ref_count[1]= get_ue_golomb(&s->gb) + 1;

  4796. 

  4797.             if(h->ref_count[0] > 32 || h->ref_count[1] > 32){

  4798.                 av_log(h->s.avctx, AV_LOG_ERROR, "reference overflow\n");

  4799.                 return -1;

  4800.             }

  4801.         }

  4802.     }

  4803. 

  4804.     if(!default_ref_list_done){

  4805.         fill_default_ref_list(h);

  4806.     }

  4807. 

  4808.     if(decode_ref_pic_list_reordering(h) < 0)

  4809.         return -1;

  4810. 

  4811.     if(   (h->pps.weighted_pred          && (h->slice_type == P_TYPE || h->slice_type == SP_TYPE ))

  4812.        || (h->pps.weighted_bipred_idc==1 && h->slice_type==B_TYPE ) )

  4813.         pred_weight_table(h);

  4814.     else if(h->pps.weighted_bipred_idc==2 && h->slice_type==B_TYPE)

  4815.         implicit_weight_table(h);

  4816.     else

  4817.         h->use_weight = 0;

  4818. 

  4819.     if(s->current_picture.reference)

  4820.         decode_ref_pic_marking(h);

  4821. 

  4822.     if(FRAME_MBAFF)

  4823.         fill_mbaff_ref_list(h);

  4824. 

  4825.     if( h->slice_type != I_TYPE && h->slice_type != SI_TYPE && h->pps.cabac )

  4826.         h->cabac_init_idc = get_ue_golomb(&s->gb);

  4827. 

  4828.     h->last_qscale_diff = 0;

  4829.     s->qscale = h->pps.init_qp + get_se_golomb(&s->gb);

  4830.     if(s->qscale<0 || s->qscale>51){

  4831.         av_log(s->avctx, AV_LOG_ERROR, "QP %d out of range\n", s->qscale);

  4832.         return -1;

  4833.     }

  4834.     h->chroma_qp = get_chroma_qp(h->pps.chroma_qp_index_offset, s->qscale);

  4835.     //FIXME qscale / qp ... stuff

  4836.     if(h->slice_type == SP_TYPE){

  4837.         get_bits1(&s->gb); /* sp_for_switch_flag */

  4838.     }

  4839.     if(h->slice_type==SP_TYPE || h->slice_type == SI_TYPE){

  4840.         get_se_golomb(&s->gb); /* slice_qs_delta */

  4841.     }

  4842. 

  4843.     h->deblocking_filter = 1;

  4844.     h->slice_alpha_c0_offset = 0;

  4845.     h->slice_beta_offset = 0;

  4846.     if( h->pps.deblocking_filter_parameters_present ) {

  4847.         h->deblocking_filter= get_ue_golomb(&s->gb);

  4848.         if(h->deblocking_filter < 2)

  4849.             h->deblocking_filter^= 1; // 1<->0

  4850. 

  4851.         if( h->deblocking_filter ) {

  4852.             h->slice_alpha_c0_offset = get_se_golomb(&s->gb) << 1;

  4853.             h->slice_beta_offset = get_se_golomb(&s->gb) << 1;

  4854.         }

  4855.     }

  4856.     if(   s->avctx->skip_loop_filter >= AVDISCARD_ALL

  4857.        ||(s->avctx->skip_loop_filter >= AVDISCARD_NONKEY && h->slice_type != I_TYPE)

  4858.        ||(s->avctx->skip_loop_filter >= AVDISCARD_BIDIR  && h->slice_type == B_TYPE)

  4859.        ||(s->avctx->skip_loop_filter >= AVDISCARD_NONREF && h->nal_ref_idc == 0))

  4860.         h->deblocking_filter= 0;

  4861. 

  4862. #if 0 //FMO

  4863.     if( h->pps.num_slice_groups > 1  && h->pps.mb_slice_group_map_type >= 3 && h->pps.mb_slice_group_map_type <= 5)

  4864.         slice_group_change_cycle= get_bits(&s->gb, ?);

  4865. #endif

  4866. 

  4867.     h->slice_num++;

  4868. 

  4869.     h->emu_edge_width= (s->flags&CODEC_FLAG_EMU_EDGE) ? 0 : 16;

  4870.     h->emu_edge_height= FRAME_MBAFF ? 0 : h->emu_edge_width;

  4871. 

  4872.     if(s->avctx->debug&FF_DEBUG_PICT_INFO){

  4873.         av_log(h->s.avctx, AV_LOG_DEBUG, "slice:%d %s mb:%d %c pps:%d frame:%d poc:%d/%d ref:%d/%d qp:%d loop:%d:%d:%d weight:%d%s\n",

  4874.                h->slice_num,

  4875.                (s->picture_structure==PICT_FRAME ? "F" : s->picture_structure==PICT_TOP_FIELD ? "T" : "B"),

  4876.                first_mb_in_slice,

  4877.                av_get_pict_type_char(h->slice_type),

  4878.                pps_id, h->frame_num,

  4879.                s->current_picture_ptr->field_poc[0], s->current_picture_ptr->field_poc[1],

  4880.                h->ref_count[0], h->ref_count[1],

  4881.                s->qscale,

  4882.                h->deblocking_filter, h->slice_alpha_c0_offset/2, h->slice_beta_offset/2,

  4883.                h->use_weight,

  4884.                h->use_weight==1 && h->use_weight_chroma ? "c" : ""

  4885.                );

  4886.     }

  4887. 

  4888.     return 0;

  4889. }

  4890. 

  4891. /**

  4892.  *

  4893.  */

  4894. static inline int get_level_prefix(GetBitContext *gb){

  4895.     unsigned int buf;

  4896.     int log;

  4897. 

  4898.     OPEN_READER(re, gb);

  4899.     UPDATE_CACHE(re, gb);

  4900.     buf=GET_CACHE(re, gb);

  4901. 

  4902.     log= 32 - av_log2(buf);

  4903. #ifdef TRACE

  4904.     print_bin(buf>>(32-log), log);

  4905.     av_log(NULL, AV_LOG_DEBUG, "%5d %2d %3d lpr @%5d in %s get_level_prefix\n", buf>>(32-log), log, log-1, get_bits_count(gb), __FILE__);

  4906. #endif

  4907. 

  4908.     LAST_SKIP_BITS(re, gb, log);

  4909.     CLOSE_READER(re, gb);

  4910. 

  4911.     return log-1;

  4912. }

  4913. 

  4914. static inline int get_dct8x8_allowed(H264Context *h){

  4915.     int i;

  4916.     for(i=0; i<4; i++){

  4917.         if(!IS_SUB_8X8(h->sub_mb_type[i])

  4918.            || (!h->sps.direct_8x8_inference_flag && IS_DIRECT(h->sub_mb_type[i])))

  4919.             return 0;

  4920.     }

  4921.     return 1;

  4922. }

  4923. 

  4924. /**

  4925.  * decodes a residual block.

  4926.  * @param n block index

  4927.  * @param scantable scantable

  4928.  * @param max_coeff number of coefficients in the block

  4929.  * @return <0 if an error occured

  4930.  */

  4931. static int decode_residual(H264Context *h, GetBitContext *gb, DCTELEM *block, int n, const uint8_t *scantable, const uint32_t *qmul, int max_coeff){

  4932.     MpegEncContext * const s = &h->s;

  4933.     static const int coeff_token_table_index[17]= {0, 0, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3};

  4934.     int level[16];

  4935.     int zeros_left, coeff_num, coeff_token, total_coeff, i, j, trailing_ones, run_before;

  4936. 

  4937.     //FIXME put trailing_onex into the context

  4938. 

  4939.     if(n == CHROMA_DC_BLOCK_INDEX){

  4940.         coeff_token= get_vlc2(gb, chroma_dc_coeff_token_vlc.table, CHROMA_DC_COEFF_TOKEN_VLC_BITS, 1);

  4941.         total_coeff= coeff_token>>2;

  4942.     }else{

  4943.         if(n == LUMA_DC_BLOCK_INDEX){

  4944.             total_coeff= pred_non_zero_count(h, 0);

  4945.             coeff_token= get_vlc2(gb, coeff_token_vlc[ coeff_token_table_index[total_coeff] ].table, COEFF_TOKEN_VLC_BITS, 2);

  4946.             total_coeff= coeff_token>>2;

  4947.         }else{

  4948.             total_coeff= pred_non_zero_count(h, n);

  4949.             coeff_token= get_vlc2(gb, coeff_token_vlc[ coeff_token_table_index[total_coeff] ].table, COEFF_TOKEN_VLC_BITS, 2);

  4950.             total_coeff= coeff_token>>2;

  4951.             h->non_zero_count_cache[ scan8[n] ]= total_coeff;

  4952.         }

  4953.     }

  4954. 

  4955.     //FIXME set last_non_zero?

  4956. 

  4957.     if(total_coeff==0)

  4958.         return 0;

  4959. 

  4960.     trailing_ones= coeff_token&3;

  4961.     tprintf("trailing:%d, total:%d\n", trailing_ones, total_coeff);

  4962.     assert(total_coeff<=16);

  4963. 

  4964.     for(i=0; i<trailing_ones; i++){

  4965.         level[i]= 1 - 2*get_bits1(gb);

  4966.     }

  4967. 

  4968.     if(i<total_coeff) {

  4969.         int level_code, mask;

  4970.         int suffix_length = total_coeff > 10 && trailing_ones < 3;

  4971.         int prefix= get_level_prefix(gb);

  4972. 

  4973.         //first coefficient has suffix_length equal to 0 or 1

  4974.         if(prefix<14){ //FIXME try to build a large unified VLC table for all this

  4975.             if(suffix_length)

  4976.                 level_code= (prefix<<suffix_length) + get_bits(gb, suffix_length); //part

  4977.             else

  4978.                 level_code= (prefix<<suffix_length); //part

  4979.         }else if(prefix==14){

  4980.             if(suffix_length)

  4981.                 level_code= (prefix<<suffix_length) + get_bits(gb, suffix_length); //part

  4982.             else

  4983.                 level_code= prefix + get_bits(gb, 4); //part

  4984.         }else if(prefix==15){

  4985.             level_code= (prefix<<suffix_length) + get_bits(gb, 12); //part

  4986.             if(suffix_length==0) level_code+=15; //FIXME doesn't make (much)sense

  4987.         }else{

  4988.             av_log(h->s.avctx, AV_LOG_ERROR, "prefix too large at %d %d\n", s->mb_x, s->mb_y);

  4989.             return -1;

  4990.         }

  4991. 

  4992.         if(trailing_ones < 3) level_code += 2;

  4993. 

  4994.         suffix_length = 1;

  4995.         if(level_code > 5)

  4996.             suffix_length++;

  4997.         mask= -(level_code&1);

  4998.         level[i]= (((2+level_code)>>1) ^ mask) - mask;

  4999.         i++;

  5000. 

  5001.         //remaining coefficients have suffix_length > 0

  5002.         for(;i<total_coeff;i++) {

  5003.             static const int suffix_limit[7] = {0,5,11,23,47,95,INT_MAX };

  5004.             prefix = get_level_prefix(gb);

  5005.             if(prefix<15){

  5006.                 level_code = (prefix<<suffix_length) + get_bits(gb, suffix_length);

  5007.             }else if(prefix==15){

  5008.                 level_code =  (prefix<<suffix_length) + get_bits(gb, 12);

  5009.             }else{

  5010.                 av_log(h->s.avctx, AV_LOG_ERROR, "prefix too large at %d %d\n", s->mb_x, s->mb_y);

  5011.                 return -1;

  5012.             }

  5013.             mask= -(level_code&1);

  5014.             level[i]= (((2+level_code)>>1) ^ mask) - mask;

  5015.             if(level_code > suffix_limit[suffix_length])

  5016.                 suffix_length++;

  5017.         }

  5018.     }

  5019. 

  5020.     if(total_coeff == max_coeff)

  5021.         zeros_left=0;

  5022.     else{

  5023.         if(n == CHROMA_DC_BLOCK_INDEX)

  5024.             zeros_left= get_vlc2(gb, chroma_dc_total_zeros_vlc[ total_coeff-1 ].table, CHROMA_DC_TOTAL_ZEROS_VLC_BITS, 1);

  5025.         else

  5026.             zeros_left= get_vlc2(gb, total_zeros_vlc[ total_coeff-1 ].table, TOTAL_ZEROS_VLC_BITS, 1);

  5027.     }

  5028. 

  5029.     coeff_num = zeros_left + total_coeff - 1;

  5030.     j = scantable[coeff_num];

  5031.     if(n > 24){

  5032.         block[j] = level[0];

  5033.         for(i=1;i<total_coeff;i++) {

  5034.             if(zeros_left <= 0)

  5035.                 run_before = 0;

  5036.             else if(zeros_left < 7){

  5037.                 run_before= get_vlc2(gb, run_vlc[zeros_left-1].table, RUN_VLC_BITS, 1);

  5038.             }else{

  5039.                 run_before= get_vlc2(gb, run7_vlc.table, RUN7_VLC_BITS, 2);

  5040.             }

  5041.             zeros_left -= run_before;

  5042.             coeff_num -= 1 + run_before;

  5043.             j= scantable[ coeff_num ];

  5044. 

  5045.             block[j]= level[i];

  5046.         }

  5047.     }else{

  5048.         block[j] = (level[0] * qmul[j] + 32)>>6;

  5049.         for(i=1;i<total_coeff;i++) {

  5050.             if(zeros_left <= 0)

  5051.                 run_before = 0;

  5052.             else if(zeros_left < 7){

  5053.                 run_before= get_vlc2(gb, run_vlc[zeros_left-1].table, RUN_VLC_BITS, 1);

  5054.             }else{

  5055.                 run_before= get_vlc2(gb, run7_vlc.table, RUN7_VLC_BITS, 2);

  5056.             }

  5057.             zeros_left -= run_before;

  5058.             coeff_num -= 1 + run_before;

  5059.             j= scantable[ coeff_num ];

  5060. 

  5061.             block[j]= (level[i] * qmul[j] + 32)>>6;

  5062.         }

  5063.     }

  5064. 

  5065.     if(zeros_left<0){

  5066.         av_log(h->s.avctx, AV_LOG_ERROR, "negative number of zero coeffs at %d %d\n", s->mb_x, s->mb_y);

  5067.         return -1;

  5068.     }

  5069. 

  5070.     return 0;

  5071. }

  5072. 

  5073. static void predict_field_decoding_flag(H264Context *h){

  5074.     MpegEncContext * const s = &h->s;

  5075.     const int mb_xy= s->mb_x + s->mb_y*s->mb_stride;

  5076.     int mb_type = (h->slice_table[mb_xy-1] == h->slice_num)

  5077.                 ? s->current_picture.mb_type[mb_xy-1]

  5078.                 : (h->slice_table[mb_xy-s->mb_stride] == h->slice_num)

  5079.                 ? s->current_picture.mb_type[mb_xy-s->mb_stride]

  5080.                 : 0;

  5081.     h->mb_mbaff = h->mb_field_decoding_flag = IS_INTERLACED(mb_type) ? 1 : 0;

  5082. }

  5083. 

  5084. /**

  5085.  * decodes a P_SKIP or B_SKIP macroblock

  5086.  */

  5087. static void decode_mb_skip(H264Context *h){

  5088.     MpegEncContext * const s = &h->s;

  5089.     const int mb_xy= s->mb_x + s->mb_y*s->mb_stride;

  5090.     int mb_type=0;

  5091. 

  5092.     memset(h->non_zero_count[mb_xy], 0, 16);

  5093.     memset(h->non_zero_count_cache + 8, 0, 8*5); //FIXME ugly, remove pfui

  5094. 

  5095.     if(MB_FIELD)

  5096.         mb_type|= MB_TYPE_INTERLACED;

  5097. 

  5098.     if( h->slice_type == B_TYPE )

  5099.     {

  5100.         // just for fill_caches. pred_direct_motion will set the real mb_type

  5101.         mb_type|= MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P0L1|MB_TYPE_DIRECT2|MB_TYPE_SKIP;

  5102. 

  5103.         fill_caches(h, mb_type, 0); //FIXME check what is needed and what not ...

  5104.         pred_direct_motion(h, &mb_type);

  5105.         if(h->pps.cabac){

  5106.             fill_rectangle(h->mvd_cache[0][scan8[0]], 4, 4, 8, 0, 4);

  5107.             fill_rectangle(h->mvd_cache[1][scan8[0]], 4, 4, 8, 0, 4);

  5108.         }

  5109.     }

  5110.     else

  5111.     {

  5112.         int mx, my;

  5113.         mb_type|= MB_TYPE_16x16|MB_TYPE_P0L0|MB_TYPE_P1L0|MB_TYPE_SKIP;

  5114. 

  5115.         fill_caches(h, mb_type, 0); //FIXME check what is needed and what not ...

  5116.         pred_pskip_motion(h, &mx, &my);

  5117.         fill_rectangle(&h->ref_cache[0][scan8[0]], 4, 4, 8, 0, 1);

  5118.         fill_rectangle(  h->mv_cache[0][scan8[0]], 4, 4, 8, pack16to32(mx,my), 4);

  5119.         if(h->pps.cabac)

  5120.             fill_rectangle(h->mvd_cache[0][scan8[0]], 4, 4, 8, 0, 4);

  5121.     }

  5122. 

  5123.     write_back_motion(h, mb_type);

  5124.     s->current_picture.mb_type[mb_xy]= mb_type|MB_TYPE_SKIP;

  5125.     s->current_picture.qscale_table[mb_xy]= s->qscale;

  5126.     h->slice_table[ mb_xy ]= h->slice_num;

  5127.     h->prev_mb_skipped= 1;

  5128. }

  5129. 

  5130. /**

  5131.  * decodes a macroblock

  5132.  * @returns 0 if ok, AC_ERROR / DC_ERROR / MV_ERROR if an error is noticed

  5133.  */

  5134. static int decode_mb_cavlc(H264Context *h){

  5135.     MpegEncContext * const s = &h->s;

  5136.     const int mb_xy= s->mb_x + s->mb_y*s->mb_stride;

  5137.     int mb_type, partition_count, cbp;

  5138.     int dct8x8_allowed= h->pps.transform_8x8_mode;

  5139. 

  5140.     s->dsp.clear_blocks(h->mb); //FIXME avoid if already clear (move after skip handlong?

  5141. 

  5142.     tprintf("pic:%d mb:%d/%d\n", h->frame_num, s->mb_x, s->mb_y);

  5143.     cbp = 0; /* avoid warning. FIXME: find a solution without slowing

  5144.                 down the code */

  5145.     if(h->slice_type != I_TYPE && h->slice_type != SI_TYPE){

  5146.         if(s->mb_skip_run==-1)

  5147.             s->mb_skip_run= get_ue_golomb(&s->gb);

  5148. 

  5149.         if (s->mb_skip_run--) {

  5150.             if(FRAME_MBAFF && (s->mb_y&1) == 0){

  5151.                 if(s->mb_skip_run==0)

  5152.                     h->mb_mbaff = h->mb_field_decoding_flag = get_bits1(&s->gb);

  5153.                 else

  5154.                     predict_field_decoding_flag(h);

  5155.             }

  5156.             decode_mb_skip(h);

  5157.             return 0;

  5158.         }

  5159.     }

  5160.     if(FRAME_MBAFF){

  5161.         if( (s->mb_y&1) == 0 )

  5162.             h->mb_mbaff = h->mb_field_decoding_flag = get_bits1(&s->gb);

  5163.     }else

  5164.         h->mb_field_decoding_flag= (s->picture_structure!=PICT_FRAME);

  5165. 

  5166.     h->prev_mb_skipped= 0;

  5167. 

  5168.     mb_type= get_ue_golomb(&s->gb);

  5169.     if(h->slice_type == B_TYPE){

  5170.         if(mb_type < 23){

  5171.             partition_count= b_mb_type_info[mb_type].partition_count;

  5172.             mb_type=         b_mb_type_info[mb_type].type;

  5173.         }else{

  5174.             mb_type -= 23;

  5175.             goto decode_intra_mb;

  5176.         }

  5177.     }else if(h->slice_type == P_TYPE /*|| h->slice_type == SP_TYPE */){

  5178.         if(mb_type < 5){

  5179.             partition_count= p_mb_type_info[mb_type].partition_count;

  5180.             mb_type=         p_mb_type_info[mb_type].type;

  5181.         }else{

  5182.             mb_type -= 5;

  5183.             goto decode_intra_mb;

  5184.         }

  5185.     }else{

  5186.        assert(h->slice_type == I_TYPE);

  5187. decode_intra_mb:

  5188.         if(mb_type > 25){

  5189.             av_log(h->s.avctx, AV_LOG_ERROR, "mb_type %d in %c slice to large at %d %d\n", mb_type, av_get_pict_type_char(h->slice_type), s->mb_x, s->mb_y);

  5190.             return -1;

  5191.         }

  5192.         partition_count=0;

  5193.         cbp= i_mb_type_info[mb_type].cbp;

  5194.         h->intra16x16_pred_mode= i_mb_type_info[mb_type].pred_mode;

  5195.         mb_type= i_mb_type_info[mb_type].type;

  5196.     }

  5197. 

  5198.     if(MB_FIELD)

  5199.         mb_type |= MB_TYPE_INTERLACED;

  5200. 

  5201.     h->slice_table[ mb_xy ]= h->slice_num;

  5202. 

  5203.     if(IS_INTRA_PCM(mb_type)){

  5204.         unsigned int x, y;

  5205. 

  5206.         // we assume these blocks are very rare so we dont optimize it

  5207.         align_get_bits(&s->gb);

  5208. 

  5209.         // The pixels are stored in the same order as levels in h->mb array.

  5210.         for(y=0; y<16; y++){

  5211.             const int index= 4*(y&3) + 32*((y>>2)&1) + 128*(y>>3);

  5212.             for(x=0; x<16; x++){

  5213.                 tprintf("LUMA ICPM LEVEL (%3d)\n", show_bits(&s->gb, 8));

  5214.                 h->mb[index + (x&3) + 16*((x>>2)&1) + 64*(x>>3)]= get_bits(&s->gb, 8);

  5215.             }

  5216.         }

  5217.         for(y=0; y<8; y++){

  5218.             const int index= 256 + 4*(y&3) + 32*(y>>2);

  5219.             for(x=0; x<8; x++){

  5220.                 tprintf("CHROMA U ICPM LEVEL (%3d)\n", show_bits(&s->gb, 8));

  5221.                 h->mb[index + (x&3) + 16*(x>>2)]= get_bits(&s->gb, 8);

  5222.             }

  5223.         }

  5224.         for(y=0; y<8; y++){

  5225.             const int index= 256 + 64 + 4*(y&3) + 32*(y>>2);

  5226.             for(x=0; x<8; x++){

  5227.                 tprintf("CHROMA V ICPM LEVEL (%3d)\n", show_bits(&s->gb, 8));

  5228.                 h->mb[index + (x&3) + 16*(x>>2)]= get_bits(&s->gb, 8);

  5229.             }

  5230.         }

  5231. 

  5232.         // In deblocking, the quantizer is 0

  5233.         s->current_picture.qscale_table[mb_xy]= 0;

  5234.         h->chroma_qp = get_chroma_qp(h->pps.chroma_qp_index_offset, 0);

  5235.         // All coeffs are present

  5236.         memset(h->non_zero_count[mb_xy], 16, 16);

  5237. 

  5238.         s->current_picture.mb_type[mb_xy]= mb_type;

  5239.         return 0;

  5240.     }

  5241. 

  5242.     if(MB_MBAFF){

  5243.         h->ref_count[0] <<= 1;

  5244.         h->ref_count[1] <<= 1;

  5245.     }

  5246. 

  5247.     fill_caches(h, mb_type, 0);

  5248. 

  5249.     //mb_pred

  5250.     if(IS_INTRA(mb_type)){

  5251. //            init_top_left_availability(h);

  5252.             if(IS_INTRA4x4(mb_type)){

  5253.                 int i;

  5254.                 int di = 1;

  5255.                 if(dct8x8_allowed && get_bits1(&s->gb)){

  5256.                     mb_type |= MB_TYPE_8x8DCT;

  5257.                     di = 4;

  5258.                 }

  5259. 

  5260. //                fill_intra4x4_pred_table(h);

  5261.                 for(i=0; i<16; i+=di){

  5262.                     int mode= pred_intra_mode(h, i);

  5263. 

  5264.                     if(!get_bits1(&s->gb)){

  5265.                         const int rem_mode= get_bits(&s->gb, 3);

  5266.                         mode = rem_mode + (rem_mode >= mode);

  5267.                     }

  5268. 

  5269.                     if(di==4)

  5270.                         fill_rectangle( &h->intra4x4_pred_mode_cache[ scan8[i] ], 2, 2, 8, mode, 1 );

  5271.                     else

  5272.                         h->intra4x4_pred_mode_cache[ scan8[i] ] = mode;

  5273.                 }

  5274.                 write_back_intra_pred_mode(h);

  5275.                 if( check_intra4x4_pred_mode(h) < 0)

  5276.                     return -1;

  5277.             }else{

  5278.                 h->intra16x16_pred_mode= check_intra_pred_mode(h, h->intra16x16_pred_mode);

  5279.                 if(h->intra16x16_pred_mode < 0)

  5280.                     return -1;

  5281.             }

  5282.             h->chroma_pred_mode= get_ue_golomb(&s->gb);

  5283. 

  5284.             h->chroma_pred_mode= check_intra_pred_mode(h, h->chroma_pred_mode);

  5285.             if(h->chroma_pred_mode < 0)

  5286.                 return -1;

  5287.     }else if(partition_count==4){

  5288.         int i, j, sub_partition_count[4], list, ref[2][4];

  5289. 

  5290.         if(h->slice_type == B_TYPE){

  5291.             for(i=0; i<4; i++){

  5292.                 h->sub_mb_type[i]= get_ue_golomb(&s->gb);

  5293.                 if(h->sub_mb_type[i] >=13){

  5294.                     av_log(h->s.avctx, AV_LOG_ERROR, "B sub_mb_type %d out of range at %d %d\n", h->sub_mb_type[i], s->mb_x, s->mb_y);

  5295.                     return -1;

  5296.                 }

  5297.                 sub_partition_count[i]= b_sub_mb_type_info[ h->sub_mb_type[i] ].partition_count;

  5298.                 h->sub_mb_type[i]=      b_sub_mb_type_info[ h->sub_mb_type[i] ].type;

  5299.             }

  5300.             if(   IS_DIRECT(h->sub_mb_type[0]) || IS_DIRECT(h->sub_mb_type[1])

  5301.                || IS_DIRECT(h->sub_mb_type[2]) || IS_DIRECT(h->sub_mb_type[3])) {

  5302.                 pred_direct_motion(h, &mb_type);

  5303.                 h->ref_cache[0][scan8[4]] =

  5304.                 h->ref_cache[1][scan8[4]] =

  5305.                 h->ref_cache[0][scan8[12]] =

  5306.                 h->ref_cache[1][scan8[12]] = PART_NOT_AVAILABLE;

  5307.             }

  5308.         }else{

  5309.             assert(h->slice_type == P_TYPE || h->slice_type == SP_TYPE); //FIXME SP correct ?

  5310.             for(i=0; i<4; i++){

  5311.                 h->sub_mb_type[i]= get_ue_golomb(&s->gb);

  5312.                 if(h->sub_mb_type[i] >=4){

  5313.                     av_log(h->s.avctx, AV_LOG_ERROR, "P sub_mb_type %d out of range at %d %d\n", h->sub_mb_type[i], s->mb_x, s->mb_y);

  5314.                     return -1;

  5315.                 }

  5316.                 sub_partition_count[i]= p_sub_mb_type_info[ h->sub_mb_type[i] ].partition_count;

  5317.                 h->sub_mb_type[i]=      p_sub_mb_type_info[ h->sub_mb_type[i] ].type;

  5318.             }

  5319.         }

  5320. 

  5321.         for(list=0; list<2; list++){

  5322.             int ref_count= IS_REF0(mb_type) ? 1 : h->ref_count[list];

  5323.             if(ref_count == 0) continue;

  5324.             for(i=0; i<4; i++){

  5325.                 if(IS_DIRECT(h->sub_mb_type[i])) continue;

  5326.                 if(IS_DIR(h->sub_mb_type[i], 0, list)){

  5327.                     ref[list][i] = get_te0_golomb(&s->gb, ref_count); //FIXME init to 0 before and skip?

  5328.                 }else{

  5329.                  //FIXME

  5330.                     ref[list][i] = -1;

  5331.                 }

  5332.             }

  5333.         }

  5334. 

  5335.         if(dct8x8_allowed)

  5336.             dct8x8_allowed = get_dct8x8_allowed(h);

  5337. 

  5338.         for(list=0; list<2; list++){

  5339.             const int ref_count= IS_REF0(mb_type) ? 1 : h->ref_count[list];

  5340.             if(ref_count == 0) continue;

  5341. 

  5342.             for(i=0; i<4; i++){

  5343.                 if(IS_DIRECT(h->sub_mb_type[i])) {

  5344.                     h->ref_cache[list][ scan8[4*i] ] = h->ref_cache[list][ scan8[4*i]+1 ];

  5345.                     continue;

  5346.                 }

  5347.                 h->ref_cache[list][ scan8[4*i]   ]=h->ref_cache[list][ scan8[4*i]+1 ]=

  5348.                 h->ref_cache[list][ scan8[4*i]+8 ]=h->ref_cache[list][ scan8[4*i]+9 ]= ref[list][i];

  5349. 

  5350.                 if(IS_DIR(h->sub_mb_type[i], 0, list)){

  5351.                     const int sub_mb_type= h->sub_mb_type[i];

  5352.                     const int block_width= (sub_mb_type & (MB_TYPE_16x16|MB_TYPE_16x8)) ? 2 : 1;

  5353.                     for(j=0; j<sub_partition_count[i]; j++){

  5354.                         int mx, my;

  5355.                         const int index= 4*i + block_width*j;

  5356.                         int16_t (* mv_cache)[2]= &h->mv_cache[list][ scan8[index] ];

  5357.                         pred_motion(h, index, block_width, list, h->ref_cache[list][ scan8[index] ], &mx, &my);

  5358.                         mx += get_se_golomb(&s->gb);

  5359.                         my += get_se_golomb(&s->gb);

  5360.                         tprintf("final mv:%d %d\n", mx, my);

  5361. 

  5362.                         if(IS_SUB_8X8(sub_mb_type)){

  5363.                             mv_cache[ 0 ][0]= mv_cache[ 1 ][0]=

  5364.                             mv_cache[ 8 ][0]= mv_cache[ 9 ][0]= mx;

  5365.                             mv_cache[ 0 ][1]= mv_cache[ 1 ][1]=

  5366.                             mv_cache[ 8 ][1]= mv_cache[ 9 ][1]= my;

  5367.                         }else if(IS_SUB_8X4(sub_mb_type)){

  5368.                             mv_cache[ 0 ][0]= mv_cache[ 1 ][0]= mx;

  5369.                             mv_cache[ 0 ][1]= mv_cache[ 1 ][1]= my;

  5370.                         }else if(IS_SUB_4X8(sub_mb_type)){

  5371.                             mv_cache[ 0 ][0]= mv_cache[ 8 ][0]= mx;

  5372.                             mv_cache[ 0 ][1]= mv_cache[ 8 ][1]= my;

  5373.                         }else{

  5374.                             assert(IS_SUB_4X4(sub_mb_type));

  5375.                             mv_cache[ 0 ][0]= mx;

  5376.                             mv_cache[ 0 ][1]= my;

  5377.                         }

  5378.                     }

  5379.                 }else{

  5380.                     uint32_t *p= (uint32_t *)&h->mv_cache[list][ scan8[4*i] ][0];

  5381.                     p[0] = p[1]=

  5382.                     p[8] = p[9]= 0;

  5383.                 }

  5384.             }

  5385.         }

  5386.     }else if(IS_DIRECT(mb_type)){

  5387.         pred_direct_motion(h, &mb_type);

  5388.         dct8x8_allowed &= h->sps.direct_8x8_inference_flag;

  5389.     }else{

  5390.         int list, mx, my, i;

  5391.          //FIXME we should set ref_idx_l? to 0 if we use that later ...

  5392.         if(IS_16X16(mb_type)){

  5393.             for(list=0; list<2; list++){

  5394.                 if(h->ref_count[list]>0){

  5395.                     if(IS_DIR(mb_type, 0, list)){

  5396.                         const int val= get_te0_golomb(&s->gb, h->ref_count[list]);

  5397.                         fill_rectangle(&h->ref_cache[list][ scan8[0] ], 4, 4, 8, val, 1);

  5398.                     }else

  5399.                         fill_rectangle(&h->ref_cache[list][ scan8[0] ], 4, 4, 8, (LIST_NOT_USED&0xFF), 1);

  5400.                 }

  5401.             }

  5402.             for(list=0; list<2; list++){

  5403.                 if(IS_DIR(mb_type, 0, list)){

  5404.                     pred_motion(h, 0, 4, list, h->ref_cache[list][ scan8[0] ], &mx, &my);

  5405.                     mx += get_se_golomb(&s->gb);

  5406.                     my += get_se_golomb(&s->gb);

  5407.                     tprintf("final mv:%d %d\n", mx, my);

  5408. 

  5409.                     fill_rectangle(h->mv_cache[list][ scan8[0] ], 4, 4, 8, pack16to32(mx,my), 4);

  5410.                 }else

  5411.                     fill_rectangle(h->mv_cache[list][ scan8[0] ], 4, 4, 8, 0, 4);

  5412.             }

  5413.         }

  5414.         else if(IS_16X8(mb_type)){

  5415.             for(list=0; list<2; list++){

  5416.                 if(h->ref_count[list]>0){

  5417.                     for(i=0; i<2; i++){

  5418.                         if(IS_DIR(mb_type, i, list)){

  5419.                             const int val= get_te0_golomb(&s->gb, h->ref_count[list]);

  5420.                             fill_rectangle(&h->ref_cache[list][ scan8[0] + 16*i ], 4, 2, 8, val, 1);

  5421.                         }else

  5422.                             fill_rectangle(&h->ref_cache[list][ scan8[0] + 16*i ], 4, 2, 8, (LIST_NOT_USED&0xFF), 1);

  5423.                     }

  5424.                 }

  5425.             }

  5426.             for(list=0; list<2; list++){

  5427.                 for(i=0; i<2; i++){

  5428.                     if(IS_DIR(mb_type, i, list)){

  5429.                         pred_16x8_motion(h, 8*i, list, h->ref_cache[list][scan8[0] + 16*i], &mx, &my);

  5430.                         mx += get_se_golomb(&s->gb);

  5431.                         my += get_se_golomb(&s->gb);

  5432.                         tprintf("final mv:%d %d\n", mx, my);

  5433. 

  5434.                         fill_rectangle(h->mv_cache[list][ scan8[0] + 16*i ], 4, 2, 8, pack16to32(mx,my), 4);

  5435.                     }else

  5436.                         fill_rectangle(h->mv_cache[list][ scan8[0] + 16*i ], 4, 2, 8, 0, 4);

  5437.                 }

  5438.             }

  5439.         }else{

  5440.             assert(IS_8X16(mb_type));

  5441.             for(list=0; list<2; list++){

  5442.                 if(h->ref_count[list]>0){

  5443.                     for(i=0; i<2; i++){

  5444.                         if(IS_DIR(mb_type, i, list)){ //FIXME optimize

  5445.                             const int val= get_te0_golomb(&s->gb, h->ref_count[list]);

  5446.                             fill_rectangle(&h->ref_cache[list][ scan8[0] + 2*i ], 2, 4, 8, val, 1);

  5447.                         }else

  5448.                             fill_rectangle(&h->ref_cache[list][ scan8[0] + 2*i ], 2, 4, 8, (LIST_NOT_USED&0xFF), 1);

  5449.                     }

  5450.                 }

  5451.             }

  5452.             for(list=0; list<2; list++){

  5453.                 for(i=0; i<2; i++){

  5454.                     if(IS_DIR(mb_type, i, list)){

  5455.                         pred_8x16_motion(h, i*4, list, h->ref_cache[list][ scan8[0] + 2*i ], &mx, &my);

  5456.                         mx += get_se_golomb(&s->gb);

  5457.                         my += get_se_golomb(&s->gb);

  5458.                         tprintf("final mv:%d %d\n", mx, my);

  5459. 

  5460.                         fill_rectangle(h->mv_cache[list][ scan8[0] + 2*i ], 2, 4, 8, pack16to32(mx,my), 4);

  5461.                     }else

  5462.                         fill_rectangle(h->mv_cache[list][ scan8[0] + 2*i ], 2, 4, 8, 0, 4);

  5463.                 }

  5464.             }

  5465.         }

  5466.     }

  5467. 

  5468.     if(IS_INTER(mb_type))

  5469.         write_back_motion(h, mb_type);

  5470. 

  5471.     if(!IS_INTRA16x16(mb_type)){

  5472.         cbp= get_ue_golomb(&s->gb);

  5473.         if(cbp > 47){

  5474.             av_log(h->s.avctx, AV_LOG_ERROR, "cbp too large (%d) at %d %d\n", cbp, s->mb_x, s->mb_y);

  5475.             return -1;

  5476.         }

  5477. 

  5478.         if(IS_INTRA4x4(mb_type))

  5479.             cbp= golomb_to_intra4x4_cbp[cbp];

  5480.         else

  5481.             cbp= golomb_to_inter_cbp[cbp];

  5482.     }

  5483.     h->cbp = cbp;

  5484. 

  5485.     if(dct8x8_allowed && (cbp&15) && !IS_INTRA(mb_type)){

  5486.         if(get_bits1(&s->gb))

  5487.             mb_type |= MB_TYPE_8x8DCT;

  5488.     }

  5489.     s->current_picture.mb_type[mb_xy]= mb_type;

  5490. 

  5491.     if(cbp || IS_INTRA16x16(mb_type)){

  5492.         int i8x8, i4x4, chroma_idx;

  5493.         int chroma_qp, dquant;

  5494.         GetBitContext *gb= IS_INTRA(mb_type) ? h->intra_gb_ptr : h->inter_gb_ptr;

  5495.         const uint8_t *scan, *scan8x8, *dc_scan;

  5496. 

  5497. //        fill_non_zero_count_cache(h);

  5498. 

  5499.         if(IS_INTERLACED(mb_type)){

  5500.             scan8x8= s->qscale ? h->field_scan8x8_cavlc : h->field_scan8x8_cavlc_q0;

  5501.             scan= s->qscale ? h->field_scan : h->field_scan_q0;

  5502.             dc_scan= luma_dc_field_scan;

  5503.         }else{

  5504.             scan8x8= s->qscale ? h->zigzag_scan8x8_cavlc : h->zigzag_scan8x8_cavlc_q0;

  5505.             scan= s->qscale ? h->zigzag_scan : h->zigzag_scan_q0;

  5506.             dc_scan= luma_dc_zigzag_scan;

  5507.         }

  5508. 

  5509.         dquant= get_se_golomb(&s->gb);

  5510. 

  5511.         if( dquant > 25 || dquant < -26 ){

  5512.             av_log(h->s.avctx, AV_LOG_ERROR, "dquant out of range (%d) at %d %d\n", dquant, s->mb_x, s->mb_y);

  5513.             return -1;

  5514.         }

  5515. 

  5516.         s->qscale += dquant;

  5517.         if(((unsigned)s->qscale) > 51){

  5518.             if(s->qscale<0) s->qscale+= 52;

  5519.             else            s->qscale-= 52;

  5520.         }

  5521. 

  5522.         h->chroma_qp= chroma_qp= get_chroma_qp(h->pps.chroma_qp_index_offset, s->qscale);

  5523.         if(IS_INTRA16x16(mb_type)){

  5524.             if( decode_residual(h, h->intra_gb_ptr, h->mb, LUMA_DC_BLOCK_INDEX, dc_scan, h->dequant4_coeff[0][s->qscale], 16) < 0){

  5525.                 return -1; //FIXME continue if partitioned and other return -1 too

  5526.             }

  5527. 

  5528.             assert((cbp&15) == 0 || (cbp&15) == 15);

  5529. 

  5530.             if(cbp&15){

  5531.                 for(i8x8=0; i8x8<4; i8x8++){

  5532.                     for(i4x4=0; i4x4<4; i4x4++){

  5533.                         const int index= i4x4 + 4*i8x8;

  5534.                         if( decode_residual(h, h->intra_gb_ptr, h->mb + 16*index, index, scan + 1, h->dequant4_coeff[0][s->qscale], 15) < 0 ){

  5535.                             return -1;

  5536.                         }

  5537.                     }

  5538.                 }

  5539.             }else{

  5540.                 fill_rectangle(&h->non_zero_count_cache[scan8[0]], 4, 4, 8, 0, 1);

  5541.             }

  5542.         }else{

  5543.             for(i8x8=0; i8x8<4; i8x8++){

  5544.                 if(cbp & (1<<i8x8)){

  5545.                     if(IS_8x8DCT(mb_type)){

  5546.                         DCTELEM *buf = &h->mb[64*i8x8];

  5547.                         uint8_t *nnz;

  5548.                         for(i4x4=0; i4x4<4; i4x4++){

  5549.                             if( decode_residual(h, gb, buf, i4x4+4*i8x8, scan8x8+16*i4x4,

  5550.                                                 h->dequant8_coeff[IS_INTRA( mb_type ) ? 0:1][s->qscale], 16) <0 )

  5551.                                 return -1;

  5552.                         }

  5553.                         nnz= &h->non_zero_count_cache[ scan8[4*i8x8] ];

  5554.                         nnz[0] += nnz[1] + nnz[8] + nnz[9];

  5555.                     }else{

  5556.                         for(i4x4=0; i4x4<4; i4x4++){

  5557.                             const int index= i4x4 + 4*i8x8;

  5558. 

  5559.                             if( decode_residual(h, gb, h->mb + 16*index, index, scan, h->dequant4_coeff[IS_INTRA( mb_type ) ? 0:3][s->qscale], 16) <0 ){

  5560.                                 return -1;

  5561.                             }

  5562.                         }

  5563.                     }

  5564.                 }else{

  5565.                     uint8_t * const nnz= &h->non_zero_count_cache[ scan8[4*i8x8] ];

  5566.                     nnz[0] = nnz[1] = nnz[8] = nnz[9] = 0;

  5567.                 }

  5568.             }

  5569.         }

  5570. 

  5571.         if(cbp&0x30){

  5572.             for(chroma_idx=0; chroma_idx<2; chroma_idx++)

  5573.                 if( decode_residual(h, gb, h->mb + 256 + 16*4*chroma_idx, CHROMA_DC_BLOCK_INDEX, chroma_dc_scan, NULL, 4) < 0){

  5574.                     return -1;

  5575.                 }

  5576.         }

  5577. 

  5578.         if(cbp&0x20){

  5579.             for(chroma_idx=0; chroma_idx<2; chroma_idx++){

  5580.                 for(i4x4=0; i4x4<4; i4x4++){

  5581.                     const int index= 16 + 4*chroma_idx + i4x4;

  5582.                     if( decode_residual(h, gb, h->mb + 16*index, index, scan + 1, h->dequant4_coeff[chroma_idx+1+(IS_INTRA( mb_type ) ? 0:3)][chroma_qp], 15) < 0){

  5583.                         return -1;

  5584.                     }

  5585.                 }

  5586.             }

  5587.         }else{

  5588.             uint8_t * const nnz= &h->non_zero_count_cache[0];

  5589.             nnz[ scan8[16]+0 ] = nnz[ scan8[16]+1 ] =nnz[ scan8[16]+8 ] =nnz[ scan8[16]+9 ] =

  5590.             nnz[ scan8[20]+0 ] = nnz[ scan8[20]+1 ] =nnz[ scan8[20]+8 ] =nnz[ scan8[20]+9 ] = 0;

  5591.         }

  5592.     }else{

  5593.         uint8_t * const nnz= &h->non_zero_count_cache[0];

  5594.         fill_rectangle(&nnz[scan8[0]], 4, 4, 8, 0, 1);

  5595.         nnz[ scan8[16]+0 ] = nnz[ scan8[16]+1 ] =nnz[ scan8[16]+8 ] =nnz[ scan8[16]+9 ] =

  5596.         nnz[ scan8[20]+0 ] = nnz[ scan8[20]+1 ] =nnz[ scan8[20]+8 ] =nnz[ scan8[20]+9 ] = 0;

  5597.     }

  5598.     s->current_picture.qscale_table[mb_xy]= s->qscale;

  5599.     write_back_non_zero_count(h);

  5600. 

  5601.     if(MB_MBAFF){

  5602.         h->ref_count[0] >>= 1;

  5603.         h->ref_count[1] >>= 1;

  5604.     }

  5605. 

  5606.     return 0;

  5607. }

  5608. 

  5609. static int decode_cabac_field_decoding_flag(H264Context *h) {

  5610.     MpegEncContext * const s = &h->s;

  5611.     const int mb_x = s->mb_x;

  5612.     const int mb_y = s->mb_y & ~1;

  5613.     const int mba_xy = mb_x - 1 +  mb_y   *s->mb_stride;

  5614.     const int mbb_xy = mb_x     + (mb_y-2)*s->mb_stride;

  5615. 

  5616.     unsigned int ctx = 0;

  5617. 

  5618.     if( h->slice_table[mba_xy] == h->slice_num && IS_INTERLACED( s->current_picture.mb_type[mba_xy] ) ) {

  5619.         ctx += 1;

  5620.     }

  5621.     if( h->slice_table[mbb_xy] == h->slice_num && IS_INTERLACED( s->current_picture.mb_type[mbb_xy] ) ) {

  5622.         ctx += 1;

  5623.     }

  5624. 

  5625.     return get_cabac( &h->cabac, &h->cabac_state[70 + ctx] );

  5626. }

  5627. 

  5628. static int decode_cabac_intra_mb_type(H264Context *h, int ctx_base, int intra_slice) {

  5629.     uint8_t *state= &h->cabac_state[ctx_base];

  5630.     int mb_type;

  5631. 

  5632.     if(intra_slice){

  5633.         MpegEncContext * const s = &h->s;

  5634.         const int mba_xy = h->left_mb_xy[0];

  5635.         const int mbb_xy = h->top_mb_xy;

  5636.         int ctx=0;

  5637.         if( h->slice_table[mba_xy] == h->slice_num && !IS_INTRA4x4( s->current_picture.mb_type[mba_xy] ) )

  5638.             ctx++;

  5639.         if( h->slice_table[mbb_xy] == h->slice_num && !IS_INTRA4x4( s->current_picture.mb_type[mbb_xy] ) )

  5640.             ctx++;

  5641.         if( get_cabac( &h->cabac, &state[ctx] ) == 0 )

  5642.             return 0;   /* I4x4 */

  5643.         state += 2;

  5644.     }else{

  5645.         if( get_cabac( &h->cabac, &state[0] ) == 0 )

  5646.             return 0;   /* I4x4 */

  5647.     }

  5648. 

  5649.     if( get_cabac_terminate( &h->cabac ) )

  5650.         return 25;  /* PCM */

  5651. 

  5652.     mb_type = 1; /* I16x16 */

  5653.     mb_type += 12 * get_cabac( &h->cabac, &state[1] ); /* cbp_luma != 0 */

  5654.     if( get_cabac( &h->cabac, &state[2] ) ) /* cbp_chroma */

  5655.         mb_type += 4 + 4 * get_cabac( &h->cabac, &state[2+intra_slice] );

  5656.     mb_type += 2 * get_cabac( &h->cabac, &state[3+intra_slice] );

  5657.     mb_type += 1 * get_cabac( &h->cabac, &state[3+2*intra_slice] );

  5658.     return mb_type;

  5659. }

  5660. 

  5661. static int decode_cabac_mb_type( H264Context *h ) {

  5662.     MpegEncContext * const s = &h->s;

  5663. 

  5664.     if( h->slice_type == I_TYPE ) {

  5665.         return decode_cabac_intra_mb_type(h, 3, 1);

  5666.     } else if( h->slice_type == P_TYPE ) {

  5667.         if( get_cabac( &h->cabac, &h->cabac_state[14] ) == 0 ) {

  5668.             /* P-type */

  5669.             if( get_cabac( &h->cabac, &h->cabac_state[15] ) == 0 ) {

  5670.                 /* P_L0_D16x16, P_8x8 */

  5671.                 return 3 * get_cabac( &h->cabac, &h->cabac_state[16] );

  5672.             } else {

  5673.                 /* P_L0_D8x16, P_L0_D16x8 */

  5674.                 return 2 - get_cabac( &h->cabac, &h->cabac_state[17] );

  5675.             }

  5676.         } else {

  5677.             return decode_cabac_intra_mb_type(h, 17, 0) + 5;

  5678.         }

  5679.     } else if( h->slice_type == B_TYPE ) {

  5680.         const int mba_xy = h->left_mb_xy[0];

  5681.         const int mbb_xy = h->top_mb_xy;

  5682.         int ctx = 0;

  5683.         int bits;

  5684. 

  5685.         if( h->slice_table[mba_xy] == h->slice_num && !IS_DIRECT( s->current_picture.mb_type[mba_xy] ) )

  5686.             ctx++;

  5687.         if( h->slice_table[mbb_xy] == h->slice_num && !IS_DIRECT( s->current_picture.mb_type[mbb_xy] ) )

  5688.             ctx++;

  5689. 

  5690.         if( !get_cabac( &h->cabac, &h->cabac_state[27+ctx] ) )

  5691.             return 0; /* B_Direct_16x16 */

  5692. 

  5693.         if( !get_cabac( &h->cabac, &h->cabac_state[27+3] ) ) {

  5694.             return 1 + get_cabac( &h->cabac, &h->cabac_state[27+5] ); /* B_L[01]_16x16 */

  5695.         }

  5696. 

  5697.         bits = get_cabac( &h->cabac, &h->cabac_state[27+4] ) << 3;

  5698.         bits|= get_cabac( &h->cabac, &h->cabac_state[27+5] ) << 2;

  5699.         bits|= get_cabac( &h->cabac, &h->cabac_state[27+5] ) << 1;

  5700.         bits|= get_cabac( &h->cabac, &h->cabac_state[27+5] );

  5701.         if( bits < 8 )

  5702.             return bits + 3; /* B_Bi_16x16 through B_L1_L0_16x8 */

  5703.         else if( bits == 13 ) {

  5704.             return decode_cabac_intra_mb_type(h, 32, 0) + 23;

  5705.         } else if( bits == 14 )

  5706.             return 11; /* B_L1_L0_8x16 */

  5707.         else if( bits == 15 )

  5708.             return 22; /* B_8x8 */

  5709. 

  5710.         bits= ( bits<<1 ) | get_cabac( &h->cabac, &h->cabac_state[27+5] );

  5711.         return bits - 4; /* B_L0_Bi_* through B_Bi_Bi_* */

  5712.     } else {

  5713.         /* TODO SI/SP frames? */

  5714.         return -1;

  5715.     }

  5716. }

  5717. 

  5718. static int decode_cabac_mb_skip( H264Context *h, int mb_x, int mb_y ) {

  5719.     MpegEncContext * const s = &h->s;

  5720.     int mba_xy, mbb_xy;

  5721.     int ctx = 0;

  5722. 

  5723.     if(FRAME_MBAFF){ //FIXME merge with the stuff in fill_caches?

  5724.         int mb_xy = mb_x + (mb_y&~1)*s->mb_stride;

  5725.         mba_xy = mb_xy - 1;

  5726.         if( (mb_y&1)

  5727.             && h->slice_table[mba_xy] == h->slice_num

  5728.             && MB_FIELD == !!IS_INTERLACED( s->current_picture.mb_type[mba_xy] ) )

  5729.             mba_xy += s->mb_stride;

  5730.         if( MB_FIELD ){

  5731.             mbb_xy = mb_xy - s->mb_stride;

  5732.             if( !(mb_y&1)

  5733.                 && h->slice_table[mbb_xy] == h->slice_num

  5734.                 && IS_INTERLACED( s->current_picture.mb_type[mbb_xy] ) )

  5735.                 mbb_xy -= s->mb_stride;

  5736.         }else

  5737.             mbb_xy = mb_x + (mb_y-1)*s->mb_stride;

  5738.     }else{

  5739.         int mb_xy = mb_x + mb_y*s->mb_stride;

  5740.         mba_xy = mb_xy - 1;

  5741.         mbb_xy = mb_xy - s->mb_stride;

  5742.     }

  5743. 

  5744.     if( h->slice_table[mba_xy] == h->slice_num && !IS_SKIP( s->current_picture.mb_type[mba_xy] ))

  5745.         ctx++;

  5746.     if( h->slice_table[mbb_xy] == h->slice_num && !IS_SKIP( s->current_picture.mb_type[mbb_xy] ))

  5747.         ctx++;

  5748. 

  5749.     if( h->slice_type == B_TYPE )

  5750.         ctx += 13;

  5751.     return get_cabac( &h->cabac, &h->cabac_state[11+ctx] );

  5752. }

  5753. 

  5754. static int decode_cabac_mb_intra4x4_pred_mode( H264Context *h, int pred_mode ) {

  5755.     int mode = 0;

  5756. 

  5757.     if( get_cabac( &h->cabac, &h->cabac_state[68] ) )

  5758.         return pred_mode;

  5759. 

  5760.     mode += 1 * get_cabac( &h->cabac, &h->cabac_state[69] );

  5761.     mode += 2 * get_cabac( &h->cabac, &h->cabac_state[69] );

  5762.     mode += 4 * get_cabac( &h->cabac, &h->cabac_state[69] );

  5763. 

  5764.     if( mode >= pred_mode )

  5765.         return mode + 1;

  5766.     else

  5767.         return mode;

  5768. }

  5769. 

  5770. static int decode_cabac_mb_chroma_pre_mode( H264Context *h) {

  5771.     const int mba_xy = h->left_mb_xy[0];

  5772.     const int mbb_xy = h->top_mb_xy;

  5773. 

  5774.     int ctx = 0;

  5775. 

  5776.     /* No need to test for IS_INTRA4x4 and IS_INTRA16x16, as we set chroma_pred_mode_table to 0 */

  5777.     if( h->slice_table[mba_xy] == h->slice_num && h->chroma_pred_mode_table[mba_xy] != 0 )

  5778.         ctx++;

  5779. 

  5780.     if( h->slice_table[mbb_xy] == h->slice_num && h->chroma_pred_mode_table[mbb_xy] != 0 )

  5781.         ctx++;

  5782. 

  5783.     if( get_cabac( &h->cabac, &h->cabac_state[64+ctx] ) == 0 )

  5784.         return 0;

  5785. 

  5786.     if( get_cabac( &h->cabac, &h->cabac_state[64+3] ) == 0 )

  5787.         return 1;

  5788.     if( get_cabac( &h->cabac, &h->cabac_state[64+3] ) == 0 )

  5789.         return 2;

  5790.     else

  5791.         return 3;

  5792. }

  5793. 

  5794. static const uint8_t block_idx_x[16] = {

  5795.     0, 1, 0, 1, 2, 3, 2, 3, 0, 1, 0, 1, 2, 3, 2, 3

  5796. };

  5797. static const uint8_t block_idx_y[16] = {

  5798.     0, 0, 1, 1, 0, 0, 1, 1, 2, 2, 3, 3, 2, 2, 3, 3

  5799. };

  5800. static const uint8_t block_idx_xy[4][4] = {

  5801.     { 0, 2, 8,  10},

  5802.     { 1, 3, 9,  11},

  5803.     { 4, 6, 12, 14},

  5804.     { 5, 7, 13, 15}

  5805. };

  5806. 

  5807. static int decode_cabac_mb_cbp_luma( H264Context *h) {

  5808.     int cbp = 0;

  5809.     int cbp_b = -1;

  5810.     int i8x8;

  5811. 

  5812.     if( h->slice_table[h->top_mb_xy] == h->slice_num ) {

  5813.         cbp_b = h->top_cbp;

  5814.         tprintf("cbp_b = top_cbp = %x\n", cbp_b);

  5815.     }

  5816. 

  5817.     for( i8x8 = 0; i8x8 < 4; i8x8++ ) {

  5818.         int cbp_a = -1;

  5819.         int x, y;

  5820.         int ctx = 0;

  5821. 

  5822.         x = block_idx_x[4*i8x8];

  5823.         y = block_idx_y[4*i8x8];

  5824. 

  5825.         if( x > 0 )

  5826.             cbp_a = cbp;

  5827.         else if( h->slice_table[h->left_mb_xy[0]] == h->slice_num ) {

  5828.             cbp_a = h->left_cbp;

  5829.             tprintf("cbp_a = left_cbp = %x\n", cbp_a);

  5830.         }

  5831. 

  5832.         if( y > 0 )

  5833.             cbp_b = cbp;

  5834. 

  5835.         /* No need to test for skip as we put 0 for skip block */

  5836.         /* No need to test for IPCM as we put 1 for IPCM block */

  5837.         if( cbp_a >= 0 ) {

  5838.             int i8x8a = block_idx_xy[(x-1)&0x03][y]/4;

  5839.             if( ((cbp_a >> i8x8a)&0x01) == 0 )

  5840.                 ctx++;

  5841.         }

  5842. 

  5843.         if( cbp_b >= 0 ) {

  5844.             int i8x8b = block_idx_xy[x][(y-1)&0x03]/4;

  5845.             if( ((cbp_b >> i8x8b)&0x01) == 0 )

  5846.                 ctx += 2;

  5847.         }

  5848. 

  5849.         if( get_cabac( &h->cabac, &h->cabac_state[73 + ctx] ) ) {

  5850.             cbp |= 1 << i8x8;

  5851.         }

  5852.     }

  5853.     return cbp;

  5854. }

  5855. static int decode_cabac_mb_cbp_chroma( H264Context *h) {

  5856.     int ctx;

  5857.     int cbp_a, cbp_b;

  5858. 

  5859.     cbp_a = (h->left_cbp>>4)&0x03;

  5860.     cbp_b = (h-> top_cbp>>4)&0x03;

  5861. 

  5862.     ctx = 0;

  5863.     if( cbp_a > 0 ) ctx++;

  5864.     if( cbp_b > 0 ) ctx += 2;

  5865.     if( get_cabac( &h->cabac, &h->cabac_state[77 + ctx] ) == 0 )

  5866.         return 0;

  5867. 

  5868.     ctx = 4;

  5869.     if( cbp_a == 2 ) ctx++;

  5870.     if( cbp_b == 2 ) ctx += 2;

  5871.     return 1 + get_cabac( &h->cabac, &h->cabac_state[77 + ctx] );

  5872. }

  5873. static int decode_cabac_mb_dqp( H264Context *h) {

  5874.     MpegEncContext * const s = &h->s;

  5875.     int mbn_xy;

  5876.     int   ctx = 0;

  5877.     int   val = 0;

  5878. 

  5879.     if( s->mb_x > 0 )

  5880.         mbn_xy = s->mb_x + s->mb_y*s->mb_stride - 1;

  5881.     else

  5882.         mbn_xy = s->mb_width - 1 + (s->mb_y-1)*s->mb_stride;

  5883. 

  5884.     if( h->last_qscale_diff != 0 )

  5885.         ctx++;

  5886. 

  5887.     while( get_cabac( &h->cabac, &h->cabac_state[60 + ctx] ) ) {

  5888.         if( ctx < 2 )

  5889.             ctx = 2;

  5890.         else

  5891.             ctx = 3;

  5892.         val++;

  5893.         if(val > 102) //prevent infinite loop

  5894.             return INT_MIN;

  5895.     }

  5896. 

  5897.     if( val&0x01 )

  5898.         return (val + 1)/2;

  5899.     else

  5900.         return -(val + 1)/2;

  5901. }

  5902. static int decode_cabac_p_mb_sub_type( H264Context *h ) {

  5903.     if( get_cabac( &h->cabac, &h->cabac_state[21] ) )

  5904.         return 0;   /* 8x8 */

  5905.     if( !get_cabac( &h->cabac, &h->cabac_state[22] ) )

  5906.         return 1;   /* 8x4 */

  5907.     if( get_cabac( &h->cabac, &h->cabac_state[23] ) )

  5908.         return 2;   /* 4x8 */

  5909.     return 3;       /* 4x4 */

  5910. }

  5911. static int decode_cabac_b_mb_sub_type( H264Context *h ) {

  5912.     int type;

  5913.     if( !get_cabac( &h->cabac, &h->cabac_state[36] ) )

  5914.         return 0;   /* B_Direct_8x8 */

  5915.     if( !get_cabac( &h->cabac, &h->cabac_state[37] ) )

  5916.         return 1 + get_cabac( &h->cabac, &h->cabac_state[39] ); /* B_L0_8x8, B_L1_8x8 */

  5917.     type = 3;

  5918.     if( get_cabac( &h->cabac, &h->cabac_state[38] ) ) {

  5919.         if( get_cabac( &h->cabac, &h->cabac_state[39] ) )

  5920.             return 11 + get_cabac( &h->cabac, &h->cabac_state[39] ); /* B_L1_4x4, B_Bi_4x4 */

  5921.         type += 4;

  5922.     }

  5923.     type += 2*get_cabac( &h->cabac, &h->cabac_state[39] );

  5924.     type +=   get_cabac( &h->cabac, &h->cabac_state[39] );

  5925.     return type;

  5926. }

  5927. 

  5928. static inline int decode_cabac_mb_transform_size( H264Context *h ) {

  5929.     return get_cabac( &h->cabac, &h->cabac_state[399 + h->neighbor_transform_size] );

  5930. }

  5931. 

  5932. static int decode_cabac_mb_ref( H264Context *h, int list, int n ) {

  5933.     int refa = h->ref_cache[list][scan8[n] - 1];

  5934.     int refb = h->ref_cache[list][scan8[n] - 8];

  5935.     int ref  = 0;

  5936.     int ctx  = 0;

  5937. 

  5938.     if( h->slice_type == B_TYPE) {

  5939.         if( refa > 0 && !h->direct_cache[scan8[n] - 1] )

  5940.             ctx++;

  5941.         if( refb > 0 && !h->direct_cache[scan8[n] - 8] )

  5942.             ctx += 2;

  5943.     } else {

  5944.         if( refa > 0 )

  5945.             ctx++;

  5946.         if( refb > 0 )

  5947.             ctx += 2;

  5948.     }

  5949. 

  5950.     while( get_cabac( &h->cabac, &h->cabac_state[54+ctx] ) ) {

  5951.         ref++;

  5952.         if( ctx < 4 )

  5953.             ctx = 4;

  5954.         else

  5955.             ctx = 5;

  5956.     }

  5957.     return ref;

  5958. }

  5959. 

  5960. static int decode_cabac_mb_mvd( H264Context *h, int list, int n, int l ) {

  5961.     int amvd = abs( h->mvd_cache[list][scan8[n] - 1][l] ) +

  5962.                abs( h->mvd_cache[list][scan8[n] - 8][l] );

  5963.     int ctxbase = (l == 0) ? 40 : 47;

  5964.     int ctx, mvd;

  5965. 

  5966.     if( amvd < 3 )

  5967.         ctx = 0;

  5968.     else if( amvd > 32 )

  5969.         ctx = 2;

  5970.     else

  5971.         ctx = 1;

  5972. 

  5973.     if(!get_cabac(&h->cabac, &h->cabac_state[ctxbase+ctx]))

  5974.         return 0;

  5975. 

  5976.     mvd= 1;

  5977.     ctx= 3;

  5978.     while( mvd < 9 && get_cabac( &h->cabac, &h->cabac_state[ctxbase+ctx] ) ) {

  5979.         mvd++;

  5980.         if( ctx < 6 )

  5981.             ctx++;

  5982.     }

  5983. 

  5984.     if( mvd >= 9 ) {

  5985.         int k = 3;

  5986.         while( get_cabac_bypass( &h->cabac ) ) {

  5987.             mvd += 1 << k;

  5988.             k++;

  5989.         }

  5990.         while( k-- ) {

  5991.             if( get_cabac_bypass( &h->cabac ) )

  5992.                 mvd += 1 << k;

  5993.         }

  5994.     }

  5995.     if( get_cabac_bypass( &h->cabac ) )  return -mvd;

  5996.     else                                 return  mvd;

  5997. }

  5998. 

  5999. static int inline get_cabac_cbf_ctx( H264Context *h, int cat, int idx ) {

  6000.     int nza, nzb;

  6001.     int ctx = 0;

  6002. 

  6003.     if( cat == 0 ) {

  6004.         nza = h->left_cbp&0x100;

  6005.         nzb = h-> top_cbp&0x100;

  6006.     } else if( cat == 1 || cat == 2 ) {

  6007.         nza = h->non_zero_count_cache[scan8[idx] - 1];

  6008.         nzb = h->non_zero_count_cache[scan8[idx] - 8];

  6009.     } else if( cat == 3 ) {

  6010.         nza = (h->left_cbp>>(6+idx))&0x01;

  6011.         nzb = (h-> top_cbp>>(6+idx))&0x01;

  6012.     } else {

  6013.         assert(cat == 4);

  6014.         nza = h->non_zero_count_cache[scan8[16+idx] - 1];

  6015.         nzb = h->non_zero_count_cache[scan8[16+idx] - 8];

  6016.     }

  6017. 

  6018.     if( nza > 0 )

  6019.         ctx++;

  6020. 

  6021.     if( nzb > 0 )

  6022.         ctx += 2;

  6023. 

  6024.     return ctx + 4 * cat;

  6025. }

  6026. 

  6027. static int decode_cabac_residual( H264Context *h, DCTELEM *block, int cat, int n, const uint8_t *scantable, const uint32_t *qmul, int max_coeff) {

  6028.     const int mb_xy  = h->s.mb_x + h->s.mb_y*h->s.mb_stride;

  6029.     static const int significant_coeff_flag_offset[2][6] = {

  6030.       { 105+0, 105+15, 105+29, 105+44, 105+47, 402 },

  6031.       { 277+0, 277+15, 277+29, 277+44, 277+47, 436 }

  6032.     };

  6033.     static const int last_coeff_flag_offset[2][6] = {

  6034.       { 166+0, 166+15, 166+29, 166+44, 166+47, 417 },

  6035.       { 338+0, 338+15, 338+29, 338+44, 338+47, 451 }

  6036.     };

  6037.     static const int coeff_abs_level_m1_offset[6] = {

  6038.         227+0, 227+10, 227+20, 227+30, 227+39, 426

  6039.     };

  6040.     static const int significant_coeff_flag_offset_8x8[2][63] = {

  6041.       { 0, 1, 2, 3, 4, 5, 5, 4, 4, 3, 3, 4, 4, 4, 5, 5,

  6042.         4, 4, 4, 4, 3, 3, 6, 7, 7, 7, 8, 9,10, 9, 8, 7,

  6043.         7, 6,11,12,13,11, 6, 7, 8, 9,14,10, 9, 8, 6,11,

  6044.        12,13,11, 6, 9,14,10, 9,11,12,13,11,14,10,12 },

  6045.       { 0, 1, 1, 2, 2, 3, 3, 4, 5, 6, 7, 7, 7, 8, 4, 5,

  6046.         6, 9,10,10, 8,11,12,11, 9, 9,10,10, 8,11,12,11,

  6047.         9, 9,10,10, 8,11,12,11, 9, 9,10,10, 8,13,13, 9,

  6048.         9,10,10, 8,13,13, 9, 9,10,10,14,14,14,14,14 }

  6049.     };

  6050.     static const int last_coeff_flag_offset_8x8[63] = {

  6051.         0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,

  6052.         2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,

  6053.         3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4,

  6054.         5, 5, 5, 5, 6, 6, 6, 6, 7, 7, 7, 7, 8, 8, 8

  6055.     };

  6056. 

  6057.     int index[64];

  6058. 

  6059.     int i, last;

  6060.     int coeff_count = 0;

  6061. 

  6062.     int abslevel1 = 1;

  6063.     int abslevelgt1 = 0;

  6064. 

  6065.     uint8_t *significant_coeff_ctx_base;

  6066.     uint8_t *last_coeff_ctx_base;

  6067.     uint8_t *abs_level_m1_ctx_base;

  6068. 

  6069.     /* cat: 0-> DC 16x16  n = 0

  6070.      *      1-> AC 16x16  n = luma4x4idx

  6071.      *      2-> Luma4x4   n = luma4x4idx

  6072.      *      3-> DC Chroma n = iCbCr

  6073.      *      4-> AC Chroma n = 4 * iCbCr + chroma4x4idx

  6074.      *      5-> Luma8x8   n = 4 * luma8x8idx

  6075.      */

  6076. 

  6077.     /* read coded block flag */

  6078.     if( cat != 5 ) {

  6079.         if( get_cabac( &h->cabac, &h->cabac_state[85 + get_cabac_cbf_ctx( h, cat, n ) ] ) == 0 ) {

  6080.             if( cat == 1 || cat == 2 )

  6081.                 h->non_zero_count_cache[scan8[n]] = 0;

  6082.             else if( cat == 4 )

  6083.                 h->non_zero_count_cache[scan8[16+n]] = 0;

  6084. 

  6085.             return 0;

  6086.         }

  6087.     }

  6088. 

  6089.     significant_coeff_ctx_base = h->cabac_state

  6090.         + significant_coeff_flag_offset[MB_FIELD][cat];

  6091.     last_coeff_ctx_base = h->cabac_state

  6092.         + last_coeff_flag_offset[MB_FIELD][cat];

  6093.     abs_level_m1_ctx_base = h->cabac_state

  6094.         + coeff_abs_level_m1_offset[cat];

  6095. 

  6096.     if( cat == 5 ) {

  6097. #define DECODE_SIGNIFICANCE( coefs, sig_off, last_off ) \

  6098.         for(last= 0; last < coefs; last++) { \

  6099.             uint8_t *sig_ctx = significant_coeff_ctx_base + sig_off; \

  6100.             if( get_cabac( &h->cabac, sig_ctx )) { \

  6101.                 uint8_t *last_ctx = last_coeff_ctx_base + last_off; \

  6102.                 index[coeff_count++] = last; \

  6103.                 if( get_cabac( &h->cabac, last_ctx ) ) { \

  6104.                     last= max_coeff; \

  6105.                     break; \

  6106.                 } \

  6107.             } \

  6108.         }

  6109.         const int *sig_off = significant_coeff_flag_offset_8x8[MB_FIELD];

  6110.         DECODE_SIGNIFICANCE( 63, sig_off[last], last_coeff_flag_offset_8x8[last] );

  6111.     } else {

  6112.         DECODE_SIGNIFICANCE( max_coeff - 1, last, last );

  6113.     }

  6114.     if( last == max_coeff -1 ) {

  6115.         index[coeff_count++] = last;

  6116.     }

  6117.     assert(coeff_count > 0);

  6118. 

  6119.     if( cat == 0 )

  6120.         h->cbp_table[mb_xy] |= 0x100;

  6121.     else if( cat == 1 || cat == 2 )

  6122.         h->non_zero_count_cache[scan8[n]] = coeff_count;

  6123.     else if( cat == 3 )

  6124.         h->cbp_table[mb_xy] |= 0x40 << n;

  6125.     else if( cat == 4 )

  6126.         h->non_zero_count_cache[scan8[16+n]] = coeff_count;

  6127.     else {

  6128.         assert( cat == 5 );

  6129.         fill_rectangle(&h->non_zero_count_cache[scan8[n]], 2, 2, 8, coeff_count, 1);

  6130.     }

  6131. 

  6132.     for( i = coeff_count - 1; i >= 0; i-- ) {

  6133.         uint8_t *ctx = (abslevelgt1 != 0 ? 0 : FFMIN( 4, abslevel1 )) + abs_level_m1_ctx_base;

  6134.         int j= scantable[index[i]];

  6135. 

  6136.         if( get_cabac( &h->cabac, ctx ) == 0 ) {

  6137.             if( !qmul ) {

  6138.                 if( get_cabac_bypass( &h->cabac ) ) block[j] = -1;

  6139.                 else                                block[j] =  1;

  6140.             }else{

  6141.                 if( get_cabac_bypass( &h->cabac ) ) block[j] = (-qmul[j] + 32) >> 6;

  6142.                 else                                block[j] = ( qmul[j] + 32) >> 6;

  6143.             }

  6144. 

  6145.             abslevel1++;

  6146.         } else {

  6147.             int coeff_abs = 2;

  6148.             ctx = 5 + FFMIN( 4, abslevelgt1 ) + abs_level_m1_ctx_base;

  6149.             while( coeff_abs < 15 && get_cabac( &h->cabac, ctx ) ) {

  6150.                 coeff_abs++;

  6151.             }

  6152. 

  6153.             if( coeff_abs >= 15 ) {

  6154.                 int j = 0;

  6155.                 while( get_cabac_bypass( &h->cabac ) ) {

  6156.                     coeff_abs += 1 << j;

  6157.                     j++;

  6158.                 }

  6159. 

  6160.                 while( j-- ) {

  6161.                     if( get_cabac_bypass( &h->cabac ) )

  6162.                         coeff_abs += 1 << j ;

  6163.                 }

  6164.             }

  6165. 

  6166.             if( !qmul ) {

  6167.                 if( get_cabac_bypass( &h->cabac ) ) block[j] = -coeff_abs;

  6168.                 else                                block[j] =  coeff_abs;

  6169.             }else{

  6170.                 if( get_cabac_bypass( &h->cabac ) ) block[j] = (-coeff_abs * qmul[j] + 32) >> 6;

  6171.                 else                                block[j] = ( coeff_abs * qmul[j] + 32) >> 6;

  6172.             }

  6173. 

  6174.             abslevelgt1++;

  6175.         }

  6176.     }

  6177.     return 0;

  6178. }

  6179. 

  6180. static void inline compute_mb_neighbors(H264Context *h)

  6181. {

  6182.     MpegEncContext * const s = &h->s;

  6183.     const int mb_xy  = s->mb_x + s->mb_y*s->mb_stride;

  6184.     h->top_mb_xy     = mb_xy - s->mb_stride;

  6185.     h->left_mb_xy[0] = mb_xy - 1;

  6186.     if(FRAME_MBAFF){

  6187.         const int pair_xy          = s->mb_x     + (s->mb_y & ~1)*s->mb_stride;

  6188.         const int top_pair_xy      = pair_xy     - s->mb_stride;

  6189.         const int top_mb_frame_flag      = !IS_INTERLACED(s->current_picture.mb_type[top_pair_xy]);

  6190.         const int left_mb_frame_flag = !IS_INTERLACED(s->current_picture.mb_type[pair_xy-1]);

  6191.         const int curr_mb_frame_flag = !MB_FIELD;

  6192.         const int bottom = (s->mb_y & 1);

  6193.         if (bottom

  6194.                 ? !curr_mb_frame_flag // bottom macroblock

  6195.                 : (!curr_mb_frame_flag && !top_mb_frame_flag) // top macroblock

  6196.                 ) {

  6197.             h->top_mb_xy -= s->mb_stride;

  6198.         }

  6199.         if (left_mb_frame_flag != curr_mb_frame_flag) {

  6200.             h->left_mb_xy[0] = pair_xy - 1;

  6201.         }

  6202.     }

  6203.     return;

  6204. }

  6205. 

  6206. /**

  6207.  * decodes a macroblock

  6208.  * @returns 0 if ok, AC_ERROR / DC_ERROR / MV_ERROR if an error is noticed

  6209.  */

  6210. static int decode_mb_cabac(H264Context *h) {

  6211.     MpegEncContext * const s = &h->s;

  6212.     const int mb_xy= s->mb_x + s->mb_y*s->mb_stride;

  6213.     int mb_type, partition_count, cbp = 0;

  6214.     int dct8x8_allowed= h->pps.transform_8x8_mode;

  6215. 

  6216.     s->dsp.clear_blocks(h->mb); //FIXME avoid if already clear (move after skip handlong?)

  6217. 

  6218.     tprintf("pic:%d mb:%d/%d\n", h->frame_num, s->mb_x, s->mb_y);

  6219.     if( h->slice_type != I_TYPE && h->slice_type != SI_TYPE ) {

  6220.         int skip;

  6221.         /* a skipped mb needs the aff flag from the following mb */

  6222.         if( FRAME_MBAFF && s->mb_x==0 && (s->mb_y&1)==0 )

  6223.             predict_field_decoding_flag(h);

  6224.         if( FRAME_MBAFF && (s->mb_y&1)==1 && h->prev_mb_skipped )

  6225.             skip = h->next_mb_skipped;

  6226.         else

  6227.             skip = decode_cabac_mb_skip( h, s->mb_x, s->mb_y );

  6228.         /* read skip flags */

  6229.         if( skip ) {

  6230.             if( FRAME_MBAFF && (s->mb_y&1)==0 ){

  6231.                 s->current_picture.mb_type[mb_xy] = MB_TYPE_SKIP;

  6232.                 h->next_mb_skipped = decode_cabac_mb_skip( h, s->mb_x, s->mb_y+1 );

  6233.                 if(h->next_mb_skipped)

  6234.                     predict_field_decoding_flag(h);

  6235.                 else

  6236.                     h->mb_mbaff = h->mb_field_decoding_flag = decode_cabac_field_decoding_flag(h);

  6237.             }

  6238. 

  6239.             decode_mb_skip(h);

  6240. 

  6241.             h->cbp_table[mb_xy] = 0;

  6242.             h->chroma_pred_mode_table[mb_xy] = 0;

  6243.             h->last_qscale_diff = 0;

  6244. 

  6245.             return 0;

  6246. 

  6247.         }

  6248.     }

  6249.     if(FRAME_MBAFF){

  6250.         if( (s->mb_y&1) == 0 )

  6251.             h->mb_mbaff =

  6252.             h->mb_field_decoding_flag = decode_cabac_field_decoding_flag(h);

  6253.     }else

  6254.         h->mb_field_decoding_flag= (s->picture_structure!=PICT_FRAME);

  6255. 

  6256.     h->prev_mb_skipped = 0;

  6257. 

  6258.     compute_mb_neighbors(h);

  6259.     if( ( mb_type = decode_cabac_mb_type( h ) ) < 0 ) {

  6260.         av_log( h->s.avctx, AV_LOG_ERROR, "decode_cabac_mb_type failed\n" );

  6261.         return -1;

  6262.     }

  6263. 

  6264.     if( h->slice_type == B_TYPE ) {

  6265.         if( mb_type < 23 ){

  6266.             partition_count= b_mb_type_info[mb_type].partition_count;

  6267.             mb_type=         b_mb_type_info[mb_type].type;

  6268.         }else{

  6269.             mb_type -= 23;

  6270.             goto decode_intra_mb;

  6271.         }

  6272.     } else if( h->slice_type == P_TYPE ) {

  6273.         if( mb_type < 5) {

  6274.             partition_count= p_mb_type_info[mb_type].partition_count;

  6275.             mb_type=         p_mb_type_info[mb_type].type;

  6276.         } else {

  6277.             mb_type -= 5;

  6278.             goto decode_intra_mb;

  6279.         }

  6280.     } else {

  6281.        assert(h->slice_type == I_TYPE);

  6282. decode_intra_mb:

  6283.         partition_count = 0;

  6284.         cbp= i_mb_type_info[mb_type].cbp;

  6285.         h->intra16x16_pred_mode= i_mb_type_info[mb_type].pred_mode;

  6286.         mb_type= i_mb_type_info[mb_type].type;

  6287.     }

  6288.     if(MB_FIELD)

  6289.         mb_type |= MB_TYPE_INTERLACED;

  6290. 

  6291.     h->slice_table[ mb_xy ]= h->slice_num;

  6292. 

  6293.     if(IS_INTRA_PCM(mb_type)) {

  6294.         const uint8_t *ptr;

  6295.         unsigned int x, y;

  6296. 

  6297.         // We assume these blocks are very rare so we dont optimize it.

  6298.         // FIXME The two following lines get the bitstream position in the cabac

  6299.         // decode, I think it should be done by a function in cabac.h (or cabac.c).

  6300.         ptr= h->cabac.bytestream;

  6301.         if (h->cabac.low&0x1) ptr-=CABAC_BITS/8;

  6302. 

  6303.         // The pixels are stored in the same order as levels in h->mb array.

  6304.         for(y=0; y<16; y++){

  6305.             const int index= 4*(y&3) + 32*((y>>2)&1) + 128*(y>>3);

  6306.             for(x=0; x<16; x++){

  6307.                 tprintf("LUMA ICPM LEVEL (%3d)\n", *ptr);

  6308.                 h->mb[index + (x&3) + 16*((x>>2)&1) + 64*(x>>3)]= *ptr++;

  6309.             }

  6310.         }

  6311.         for(y=0; y<8; y++){

  6312.             const int index= 256 + 4*(y&3) + 32*(y>>2);

  6313.             for(x=0; x<8; x++){

  6314.                 tprintf("CHROMA U ICPM LEVEL (%3d)\n", *ptr);

  6315.                 h->mb[index + (x&3) + 16*(x>>2)]= *ptr++;

  6316.             }

  6317.         }

  6318.         for(y=0; y<8; y++){

  6319.             const int index= 256 + 64 + 4*(y&3) + 32*(y>>2);

  6320.             for(x=0; x<8; x++){

  6321.                 tprintf("CHROMA V ICPM LEVEL (%3d)\n", *ptr);

  6322.                 h->mb[index + (x&3) + 16*(x>>2)]= *ptr++;

  6323.             }

  6324.         }

  6325. 

  6326.         ff_init_cabac_decoder(&h->cabac, ptr, h->cabac.bytestream_end - ptr);

  6327. 

  6328.         // All blocks are present

  6329.         h->cbp_table[mb_xy] = 0x1ef;

  6330.         h->chroma_pred_mode_table[mb_xy] = 0;

  6331.         // In deblocking, the quantizer is 0

  6332.         s->current_picture.qscale_table[mb_xy]= 0;

  6333.         h->chroma_qp = get_chroma_qp(h->pps.chroma_qp_index_offset, 0);

  6334.         // All coeffs are present

  6335.         memset(h->non_zero_count[mb_xy], 16, 16);

  6336.         s->current_picture.mb_type[mb_xy]= mb_type;

  6337.         return 0;

  6338.     }

  6339. 

  6340.     if(MB_MBAFF){

  6341.         h->ref_count[0] <<= 1;

  6342.         h->ref_count[1] <<= 1;

  6343.     }

  6344. 

  6345.     fill_caches(h, mb_type, 0);

  6346. 

  6347.     if( IS_INTRA( mb_type ) ) {

  6348.         int i;

  6349.         if( IS_INTRA4x4( mb_type ) ) {

  6350.             if( dct8x8_allowed && decode_cabac_mb_transform_size( h ) ) {

  6351.                 mb_type |= MB_TYPE_8x8DCT;

  6352.                 for( i = 0; i < 16; i+=4 ) {

  6353.                     int pred = pred_intra_mode( h, i );

  6354.                     int mode = decode_cabac_mb_intra4x4_pred_mode( h, pred );

  6355.                     fill_rectangle( &h->intra4x4_pred_mode_cache[ scan8[i] ], 2, 2, 8, mode, 1 );

  6356.                 }

  6357.             } else {

  6358.                 for( i = 0; i < 16; i++ ) {

  6359.                     int pred = pred_intra_mode( h, i );

  6360.                     h->intra4x4_pred_mode_cache[ scan8[i] ] = decode_cabac_mb_intra4x4_pred_mode( h, pred );

  6361. 

  6362.                 //av_log( s->avctx, AV_LOG_ERROR, "i4x4 pred=%d mode=%d\n", pred, h->intra4x4_pred_mode_cache[ scan8[i] ] );

  6363.                 }

  6364.             }

  6365.             write_back_intra_pred_mode(h);

  6366.             if( check_intra4x4_pred_mode(h) < 0 ) return -1;

  6367.         } else {

  6368.             h->intra16x16_pred_mode= check_intra_pred_mode( h, h->intra16x16_pred_mode );

  6369.             if( h->intra16x16_pred_mode < 0 ) return -1;

  6370.         }

  6371.         h->chroma_pred_mode_table[mb_xy] =

  6372.             h->chroma_pred_mode          = decode_cabac_mb_chroma_pre_mode( h );

  6373. 

  6374.         h->chroma_pred_mode= check_intra_pred_mode( h, h->chroma_pred_mode );

  6375.         if( h->chroma_pred_mode < 0 ) return -1;

  6376.     } else if( partition_count == 4 ) {

  6377.         int i, j, sub_partition_count[4], list, ref[2][4];

  6378. 

  6379.         if( h->slice_type == B_TYPE ) {

  6380.             for( i = 0; i < 4; i++ ) {

  6381.                 h->sub_mb_type[i] = decode_cabac_b_mb_sub_type( h );

  6382.                 sub_partition_count[i]= b_sub_mb_type_info[ h->sub_mb_type[i] ].partition_count;

  6383.                 h->sub_mb_type[i]=      b_sub_mb_type_info[ h->sub_mb_type[i] ].type;

  6384.             }

  6385.             if( IS_DIRECT(h->sub_mb_type[0] | h->sub_mb_type[1] |

  6386.                           h->sub_mb_type[2] | h->sub_mb_type[3]) ) {

  6387.                 pred_direct_motion(h, &mb_type);

  6388.                 if( h->ref_count[0] > 1 || h->ref_count[1] > 1 ) {

  6389.                     for( i = 0; i < 4; i++ )

  6390.                         if( IS_DIRECT(h->sub_mb_type[i]) )

  6391.                             fill_rectangle( &h->direct_cache[scan8[4*i]], 2, 2, 8, 1, 1 );

  6392.                 }

  6393.             }

  6394.         } else {

  6395.             for( i = 0; i < 4; i++ ) {

  6396.                 h->sub_mb_type[i] = decode_cabac_p_mb_sub_type( h );

  6397.                 sub_partition_count[i]= p_sub_mb_type_info[ h->sub_mb_type[i] ].partition_count;

  6398.                 h->sub_mb_type[i]=      p_sub_mb_type_info[ h->sub_mb_type[i] ].type;

  6399.             }

  6400.         }

  6401. 

  6402.         for( list = 0; list < 2; list++ ) {

  6403.             if( h->ref_count[list] > 0 ) {

  6404.                 for( i = 0; i < 4; i++ ) {

  6405.                     if(IS_DIRECT(h->sub_mb_type[i])) continue;

  6406.                     if(IS_DIR(h->sub_mb_type[i], 0, list)){

  6407.                         if( h->ref_count[list] > 1 )

  6408.                             ref[list][i] = decode_cabac_mb_ref( h, list, 4*i );

  6409.                         else

  6410.                             ref[list][i] = 0;

  6411.                     } else {

  6412.                         ref[list][i] = -1;

  6413.                     }

  6414.                                                        h->ref_cache[list][ scan8[4*i]+1 ]=

  6415.                     h->ref_cache[list][ scan8[4*i]+8 ]=h->ref_cache[list][ scan8[4*i]+9 ]= ref[list][i];

  6416.                 }

  6417.             }

  6418.         }

  6419. 

  6420.         if(dct8x8_allowed)

  6421.             dct8x8_allowed = get_dct8x8_allowed(h);

  6422. 

  6423.         for(list=0; list<2; list++){

  6424.             for(i=0; i<4; i++){

  6425.                 if(IS_DIRECT(h->sub_mb_type[i])){

  6426.                     fill_rectangle(h->mvd_cache[list][scan8[4*i]], 2, 2, 8, 0, 4);

  6427.                     continue;

  6428.                 }

  6429.                 h->ref_cache[list][ scan8[4*i]   ]=h->ref_cache[list][ scan8[4*i]+1 ];

  6430. 

  6431.                 if(IS_DIR(h->sub_mb_type[i], 0, list) && !IS_DIRECT(h->sub_mb_type[i])){

  6432.                     const int sub_mb_type= h->sub_mb_type[i];

  6433.                     const int block_width= (sub_mb_type & (MB_TYPE_16x16|MB_TYPE_16x8)) ? 2 : 1;

  6434.                     for(j=0; j<sub_partition_count[i]; j++){

  6435.                         int mpx, mpy;

  6436.                         int mx, my;

  6437.                         const int index= 4*i + block_width*j;

  6438.                         int16_t (* mv_cache)[2]= &h->mv_cache[list][ scan8[index] ];

  6439.                         int16_t (* mvd_cache)[2]= &h->mvd_cache[list][ scan8[index] ];

  6440.                         pred_motion(h, index, block_width, list, h->ref_cache[list][ scan8[index] ], &mpx, &mpy);

  6441. 

  6442.                         mx = mpx + decode_cabac_mb_mvd( h, list, index, 0 );

  6443.                         my = mpy + decode_cabac_mb_mvd( h, list, index, 1 );

  6444.                         tprintf("final mv:%d %d\n", mx, my);

  6445. 

  6446.                         if(IS_SUB_8X8(sub_mb_type)){

  6447.                             mv_cache[ 0 ][0]= mv_cache[ 1 ][0]=

  6448.                             mv_cache[ 8 ][0]= mv_cache[ 9 ][0]= mx;

  6449.                             mv_cache[ 0 ][1]= mv_cache[ 1 ][1]=

  6450.                             mv_cache[ 8 ][1]= mv_cache[ 9 ][1]= my;

  6451. 

  6452.                             mvd_cache[ 0 ][0]= mvd_cache[ 1 ][0]=

  6453.                             mvd_cache[ 8 ][0]= mvd_cache[ 9 ][0]= mx - mpx;

  6454.                             mvd_cache[ 0 ][1]= mvd_cache[ 1 ][1]=

  6455.                             mvd_cache[ 8 ][1]= mvd_cache[ 9 ][1]= my - mpy;

  6456.                         }else if(IS_SUB_8X4(sub_mb_type)){

  6457.                             mv_cache[ 0 ][0]= mv_cache[ 1 ][0]= mx;

  6458.                             mv_cache[ 0 ][1]= mv_cache[ 1 ][1]= my;

  6459. 

  6460.                             mvd_cache[ 0 ][0]= mvd_cache[ 1 ][0]= mx- mpx;

  6461.                             mvd_cache[ 0 ][1]= mvd_cache[ 1 ][1]= my - mpy;

  6462.                         }else if(IS_SUB_4X8(sub_mb_type)){

  6463.                             mv_cache[ 0 ][0]= mv_cache[ 8 ][0]= mx;

  6464.                             mv_cache[ 0 ][1]= mv_cache[ 8 ][1]= my;

  6465. 

  6466.                             mvd_cache[ 0 ][0]= mvd_cache[ 8 ][0]= mx - mpx;

  6467.                             mvd_cache[ 0 ][1]= mvd_cache[ 8 ][1]= my - mpy;

  6468.                         }else{

  6469.                             assert(IS_SUB_4X4(sub_mb_type));

  6470.                             mv_cache[ 0 ][0]= mx;

  6471.                             mv_cache[ 0 ][1]= my;

  6472. 

  6473.                             mvd_cache[ 0 ][0]= mx - mpx;

  6474.                             mvd_cache[ 0 ][1]= my - mpy;

  6475.                         }

  6476.                     }

  6477.                 }else{

  6478.                     uint32_t *p= (uint32_t *)&h->mv_cache[list][ scan8[4*i] ][0];

  6479.                     uint32_t *pd= (uint32_t *)&h->mvd_cache[list][ scan8[4*i] ][0];

  6480.                     p[0] = p[1] = p[8] = p[9] = 0;

  6481.                     pd[0]= pd[1]= pd[8]= pd[9]= 0;

  6482.                 }

  6483.             }

  6484.         }

  6485.     } else if( IS_DIRECT(mb_type) ) {

  6486.         pred_direct_motion(h, &mb_type);

  6487.         fill_rectangle(h->mvd_cache[0][scan8[0]], 4, 4, 8, 0, 4);

  6488.         fill_rectangle(h->mvd_cache[1][scan8[0]], 4, 4, 8, 0, 4);

  6489.         dct8x8_allowed &= h->sps.direct_8x8_inference_flag;

  6490.     } else {

  6491.         int list, mx, my, i, mpx, mpy;

  6492.         if(IS_16X16(mb_type)){

  6493.             for(list=0; list<2; list++){

  6494.                 if(IS_DIR(mb_type, 0, list)){

  6495.                     if(h->ref_count[list] > 0 ){

  6496.                         const int ref = h->ref_count[list] > 1 ? decode_cabac_mb_ref( h, list, 0 ) : 0;

  6497.                         fill_rectangle(&h->ref_cache[list][ scan8[0] ], 4, 4, 8, ref, 1);

  6498.                     }

  6499.                 }else

  6500.                     fill_rectangle(&h->ref_cache[list][ scan8[0] ], 4, 4, 8, (uint8_t)LIST_NOT_USED, 1);

  6501.             }

  6502.             for(list=0; list<2; list++){

  6503.                 if(IS_DIR(mb_type, 0, list)){

  6504.                     pred_motion(h, 0, 4, list, h->ref_cache[list][ scan8[0] ], &mpx, &mpy);

  6505. 

  6506.                     mx = mpx + decode_cabac_mb_mvd( h, list, 0, 0 );

  6507.                     my = mpy + decode_cabac_mb_mvd( h, list, 0, 1 );

  6508.                     tprintf("final mv:%d %d\n", mx, my);

  6509. 

  6510.                     fill_rectangle(h->mvd_cache[list][ scan8[0] ], 4, 4, 8, pack16to32(mx-mpx,my-mpy), 4);

  6511.                     fill_rectangle(h->mv_cache[list][ scan8[0] ], 4, 4, 8, pack16to32(mx,my), 4);

  6512.                 }else

  6513.                     fill_rectangle(h->mv_cache[list][ scan8[0] ], 4, 4, 8, 0, 4);

  6514.             }

  6515.         }

  6516.         else if(IS_16X8(mb_type)){

  6517.             for(list=0; list<2; list++){

  6518.                 if(h->ref_count[list]>0){

  6519.                     for(i=0; i<2; i++){

  6520.                         if(IS_DIR(mb_type, i, list)){

  6521.                             const int ref= h->ref_count[list] > 1 ? decode_cabac_mb_ref( h, list, 8*i ) : 0;

  6522.                             fill_rectangle(&h->ref_cache[list][ scan8[0] + 16*i ], 4, 2, 8, ref, 1);

  6523.                         }else

  6524.                             fill_rectangle(&h->ref_cache[list][ scan8[0] + 16*i ], 4, 2, 8, (LIST_NOT_USED&0xFF), 1);

  6525.                     }

  6526.                 }

  6527.             }

  6528.             for(list=0; list<2; list++){

  6529.                 for(i=0; i<2; i++){

  6530.                     if(IS_DIR(mb_type, i, list)){

  6531.                         pred_16x8_motion(h, 8*i, list, h->ref_cache[list][scan8[0] + 16*i], &mpx, &mpy);

  6532.                         mx = mpx + decode_cabac_mb_mvd( h, list, 8*i, 0 );

  6533.                         my = mpy + decode_cabac_mb_mvd( h, list, 8*i, 1 );

  6534.                         tprintf("final mv:%d %d\n", mx, my);

  6535. 

  6536.                         fill_rectangle(h->mvd_cache[list][ scan8[0] + 16*i ], 4, 2, 8, pack16to32(mx-mpx,my-mpy), 4);

  6537.                         fill_rectangle(h->mv_cache[list][ scan8[0] + 16*i ], 4, 2, 8, pack16to32(mx,my), 4);

  6538.                     }else{

  6539.                         fill_rectangle(h->mvd_cache[list][ scan8[0] + 16*i ], 4, 2, 8, 0, 4);

  6540.                         fill_rectangle(h-> mv_cache[list][ scan8[0] + 16*i ], 4, 2, 8, 0, 4);

  6541.                     }

  6542.                 }

  6543.             }

  6544.         }else{

  6545.             assert(IS_8X16(mb_type));

  6546.             for(list=0; list<2; list++){

  6547.                 if(h->ref_count[list]>0){

  6548.                     for(i=0; i<2; i++){

  6549.                         if(IS_DIR(mb_type, i, list)){ //FIXME optimize

  6550.                             const int ref= h->ref_count[list] > 1 ? decode_cabac_mb_ref( h, list, 4*i ) : 0;

  6551.                             fill_rectangle(&h->ref_cache[list][ scan8[0] + 2*i ], 2, 4, 8, ref, 1);

  6552.                         }else

  6553.                             fill_rectangle(&h->ref_cache[list][ scan8[0] + 2*i ], 2, 4, 8, (LIST_NOT_USED&0xFF), 1);

  6554.                     }

  6555.                 }

  6556.             }

  6557.             for(list=0; list<2; list++){

  6558.                 for(i=0; i<2; i++){

  6559.                     if(IS_DIR(mb_type, i, list)){

  6560.                         pred_8x16_motion(h, i*4, list, h->ref_cache[list][ scan8[0] + 2*i ], &mpx, &mpy);

  6561.                         mx = mpx + decode_cabac_mb_mvd( h, list, 4*i, 0 );

  6562.                         my = mpy + decode_cabac_mb_mvd( h, list, 4*i, 1 );

  6563. 

  6564.                         tprintf("final mv:%d %d\n", mx, my);

  6565.                         fill_rectangle(h->mvd_cache[list][ scan8[0] + 2*i ], 2, 4, 8, pack16to32(mx-mpx,my-mpy), 4);

  6566.                         fill_rectangle(h->mv_cache[list][ scan8[0] + 2*i ], 2, 4, 8, pack16to32(mx,my), 4);

  6567.                     }else{

  6568.                         fill_rectangle(h->mvd_cache[list][ scan8[0] + 2*i ], 2, 4, 8, 0, 4);

  6569.                         fill_rectangle(h-> mv_cache[list][ scan8[0] + 2*i ], 2, 4, 8, 0, 4);

  6570.                     }

  6571.                 }

  6572.             }

  6573.         }

  6574.     }

  6575. 

  6576.    if( IS_INTER( mb_type ) ) {

  6577.         h->chroma_pred_mode_table[mb_xy] = 0;

  6578.         write_back_motion( h, mb_type );

  6579.    }

  6580. 

  6581.     if( !IS_INTRA16x16( mb_type ) ) {

  6582.         cbp  = decode_cabac_mb_cbp_luma( h );

  6583.         cbp |= decode_cabac_mb_cbp_chroma( h ) << 4;

  6584.     }

  6585. 

  6586.     h->cbp_table[mb_xy] = h->cbp = cbp;

  6587. 

  6588.     if( dct8x8_allowed && (cbp&15) && !IS_INTRA( mb_type ) ) {

  6589.         if( decode_cabac_mb_transform_size( h ) )

  6590.             mb_type |= MB_TYPE_8x8DCT;

  6591.     }

  6592.     s->current_picture.mb_type[mb_xy]= mb_type;

  6593. 

  6594.     if( cbp || IS_INTRA16x16( mb_type ) ) {

  6595.         const uint8_t *scan, *scan8x8, *dc_scan;

  6596.         int dqp;

  6597. 

  6598.         if(IS_INTERLACED(mb_type)){

  6599.             scan8x8= s->qscale ? h->field_scan8x8 : h->field_scan8x8_q0;

  6600.             scan= s->qscale ? h->field_scan : h->field_scan_q0;

  6601.             dc_scan= luma_dc_field_scan;

  6602.         }else{

  6603.             scan8x8= s->qscale ? h->zigzag_scan8x8 : h->zigzag_scan8x8_q0;

  6604.             scan= s->qscale ? h->zigzag_scan : h->zigzag_scan_q0;

  6605.             dc_scan= luma_dc_zigzag_scan;

  6606.         }

  6607. 

  6608.         h->last_qscale_diff = dqp = decode_cabac_mb_dqp( h );

  6609.         if( dqp == INT_MIN ){

  6610.             av_log(h->s.avctx, AV_LOG_ERROR, "cabac decode of qscale diff failed at %d %d\n", s->mb_x, s->mb_y);

  6611.             return -1;

  6612.         }

  6613.         s->qscale += dqp;

  6614.         if(((unsigned)s->qscale) > 51){

  6615.             if(s->qscale<0) s->qscale+= 52;

  6616.             else            s->qscale-= 52;

  6617.         }

  6618.         h->chroma_qp = get_chroma_qp(h->pps.chroma_qp_index_offset, s->qscale);

  6619. 

  6620.         if( IS_INTRA16x16( mb_type ) ) {

  6621.             int i;

  6622.             //av_log( s->avctx, AV_LOG_ERROR, "INTRA16x16 DC\n" );

  6623.             if( decode_cabac_residual( h, h->mb, 0, 0, dc_scan, NULL, 16) < 0)

  6624.                 return -1;

  6625.             if( cbp&15 ) {

  6626.                 for( i = 0; i < 16; i++ ) {

  6627.                     //av_log( s->avctx, AV_LOG_ERROR, "INTRA16x16 AC:%d\n", i );

  6628.                     if( decode_cabac_residual(h, h->mb + 16*i, 1, i, scan + 1, h->dequant4_coeff[0][s->qscale], 15) < 0 )

  6629.                         return -1;

  6630.                 }

  6631.             } else {

  6632.                 fill_rectangle(&h->non_zero_count_cache[scan8[0]], 4, 4, 8, 0, 1);

  6633.             }

  6634.         } else {

  6635.             int i8x8, i4x4;

  6636.             for( i8x8 = 0; i8x8 < 4; i8x8++ ) {

  6637.                 if( cbp & (1<<i8x8) ) {

  6638.                     if( IS_8x8DCT(mb_type) ) {

  6639.                         if( decode_cabac_residual(h, h->mb + 64*i8x8, 5, 4*i8x8,

  6640.                             scan8x8, h->dequant8_coeff[IS_INTRA( mb_type ) ? 0:1][s->qscale], 64) < 0 )

  6641.                             return -1;

  6642.                     } else

  6643.                     for( i4x4 = 0; i4x4 < 4; i4x4++ ) {

  6644.                         const int index = 4*i8x8 + i4x4;

  6645.                         //av_log( s->avctx, AV_LOG_ERROR, "Luma4x4: %d\n", index );

  6646.                         if( decode_cabac_residual(h, h->mb + 16*index, 2, index, scan, h->dequant4_coeff[IS_INTRA( mb_type ) ? 0:3][s->qscale], 16) < 0 )

  6647.                             return -1;

  6648.                     }

  6649.                 } else {

  6650.                     uint8_t * const nnz= &h->non_zero_count_cache[ scan8[4*i8x8] ];

  6651.                     nnz[0] = nnz[1] = nnz[8] = nnz[9] = 0;

  6652.                 }

  6653.             }

  6654.         }

  6655. 

  6656.         if( cbp&0x30 ){

  6657.             int c;

  6658.             for( c = 0; c < 2; c++ ) {

  6659.                 //av_log( s->avctx, AV_LOG_ERROR, "INTRA C%d-DC\n",c );

  6660.                 if( decode_cabac_residual(h, h->mb + 256 + 16*4*c, 3, c, chroma_dc_scan, NULL, 4) < 0)

  6661.                     return -1;

  6662.             }

  6663.         }

  6664. 

  6665.         if( cbp&0x20 ) {

  6666.             int c, i;

  6667.             for( c = 0; c < 2; c++ ) {

  6668.                 for( i = 0; i < 4; i++ ) {

  6669.                     const int index = 16 + 4 * c + i;

  6670.                     //av_log( s->avctx, AV_LOG_ERROR, "INTRA C%d-AC %d\n",c, index - 16 );

  6671.                     if( decode_cabac_residual(h, h->mb + 16*index, 4, index - 16, scan + 1, h->dequant4_coeff[c+1+(IS_INTRA( mb_type ) ? 0:3)][h->chroma_qp], 15) < 0)

  6672.                         return -1;

  6673.                 }

  6674.             }

  6675.         } else {

  6676.             uint8_t * const nnz= &h->non_zero_count_cache[0];

  6677.             nnz[ scan8[16]+0 ] = nnz[ scan8[16]+1 ] =nnz[ scan8[16]+8 ] =nnz[ scan8[16]+9 ] =

  6678.             nnz[ scan8[20]+0 ] = nnz[ scan8[20]+1 ] =nnz[ scan8[20]+8 ] =nnz[ scan8[20]+9 ] = 0;

  6679.         }

  6680.     } else {

  6681.         uint8_t * const nnz= &h->non_zero_count_cache[0];

  6682.         fill_rectangle(&nnz[scan8[0]], 4, 4, 8, 0, 1);

  6683.         nnz[ scan8[16]+0 ] = nnz[ scan8[16]+1 ] =nnz[ scan8[16]+8 ] =nnz[ scan8[16]+9 ] =

  6684.         nnz[ scan8[20]+0 ] = nnz[ scan8[20]+1 ] =nnz[ scan8[20]+8 ] =nnz[ scan8[20]+9 ] = 0;

  6685.         h->last_qscale_diff = 0;

  6686.     }

  6687. 

  6688.     s->current_picture.qscale_table[mb_xy]= s->qscale;

  6689.     write_back_non_zero_count(h);

  6690. 

  6691.     if(MB_MBAFF){

  6692.         h->ref_count[0] >>= 1;

  6693.         h->ref_count[1] >>= 1;

  6694.     }

  6695. 

  6696.     return 0;

  6697. }

  6698. 

  6699. 

  6700. static void filter_mb_edgev( H264Context *h, uint8_t *pix, int stride, int16_t bS[4], int qp ) {

  6701.     int i, d;

  6702.     const int index_a = clip( qp + h->slice_alpha_c0_offset, 0, 51 );

  6703.     const int alpha = alpha_table[index_a];

  6704.     const int beta  = beta_table[clip( qp + h->slice_beta_offset, 0, 51 )];

  6705. 

  6706.     if( bS[0] < 4 ) {

  6707.         int8_t tc[4];

  6708.         for(i=0; i<4; i++)

  6709.             tc[i] = bS[i] ? tc0_table[index_a][bS[i] - 1] : -1;

  6710.         h->s.dsp.h264_h_loop_filter_luma(pix, stride, alpha, beta, tc);

  6711.     } else {

  6712.         /* 16px edge length, because bS=4 is triggered by being at

  6713.          * the edge of an intra MB, so all 4 bS are the same */

  6714.             for( d = 0; d < 16; d++ ) {

  6715.                 const int p0 = pix[-1];

  6716.                 const int p1 = pix[-2];

  6717.                 const int p2 = pix[-3];

  6718. 

  6719.                 const int q0 = pix[0];

  6720.                 const int q1 = pix[1];

  6721.                 const int q2 = pix[2];

  6722. 

  6723.                 if( ABS( p0 - q0 ) < alpha &&

  6724.                     ABS( p1 - p0 ) < beta &&

  6725.                     ABS( q1 - q0 ) < beta ) {

  6726. 

  6727.                     if(ABS( p0 - q0 ) < (( alpha >> 2 ) + 2 )){

  6728.                         if( ABS( p2 - p0 ) < beta)

  6729.                         {

  6730.                             const int p3 = pix[-4];

  6731.                             /* p0', p1', p2' */

  6732.                             pix[-1] = ( p2 + 2*p1 + 2*p0 + 2*q0 + q1 + 4 ) >> 3;

  6733.                             pix[-2] = ( p2 + p1 + p0 + q0 + 2 ) >> 2;

  6734.                             pix[-3] = ( 2*p3 + 3*p2 + p1 + p0 + q0 + 4 ) >> 3;

  6735.                         } else {

  6736.                             /* p0' */

  6737.                             pix[-1] = ( 2*p1 + p0 + q1 + 2 ) >> 2;

  6738.                         }

  6739.                         if( ABS( q2 - q0 ) < beta)

  6740.                         {

  6741.                             const int q3 = pix[3];

  6742.                             /* q0', q1', q2' */

  6743.                             pix[0] = ( p1 + 2*p0 + 2*q0 + 2*q1 + q2 + 4 ) >> 3;

  6744.                             pix[1] = ( p0 + q0 + q1 + q2 + 2 ) >> 2;

  6745.                             pix[2] = ( 2*q3 + 3*q2 + q1 + q0 + p0 + 4 ) >> 3;

  6746.                         } else {

  6747.                             /* q0' */

  6748.                             pix[0] = ( 2*q1 + q0 + p1 + 2 ) >> 2;

  6749.                         }

  6750.                     }else{

  6751.                         /* p0', q0' */

  6752.                         pix[-1] = ( 2*p1 + p0 + q1 + 2 ) >> 2;

  6753.                         pix[ 0] = ( 2*q1 + q0 + p1 + 2 ) >> 2;

  6754.                     }

  6755.                     tprintf("filter_mb_edgev i:%d d:%d\n# bS:4 -> [%02x, %02x, %02x, %02x, %02x, %02x] =>[%02x, %02x, %02x, %02x]\n", i, d, p2, p1, p0, q0, q1, q2, pix[-2], pix[-1], pix[0], pix[1]);

  6756.                 }

  6757.                 pix += stride;

  6758.             }

  6759.     }

  6760. }

  6761. static void filter_mb_edgecv( H264Context *h, uint8_t *pix, int stride, int16_t bS[4], int qp ) {

  6762.     int i;

  6763.     const int index_a = clip( qp + h->slice_alpha_c0_offset, 0, 51 );

  6764.     const int alpha = alpha_table[index_a];

  6765.     const int beta  = beta_table[clip( qp + h->slice_beta_offset, 0, 51 )];

  6766. 

  6767.     if( bS[0] < 4 ) {

  6768.         int8_t tc[4];

  6769.         for(i=0; i<4; i++)

  6770.             tc[i] = bS[i] ? tc0_table[index_a][bS[i] - 1] + 1 : 0;

  6771.         h->s.dsp.h264_h_loop_filter_chroma(pix, stride, alpha, beta, tc);

  6772.     } else {

  6773.         h->s.dsp.h264_h_loop_filter_chroma_intra(pix, stride, alpha, beta);

  6774.     }

  6775. }

  6776. 

  6777. static void filter_mb_mbaff_edgev( H264Context *h, uint8_t *pix, int stride, int16_t bS[8], int qp[2] ) {

  6778.     int i;

  6779.     for( i = 0; i < 16; i++, pix += stride) {

  6780.         int index_a;

  6781.         int alpha;

  6782.         int beta;

  6783. 

  6784.         int qp_index;

  6785.         int bS_index = (i >> 1);

  6786.         if (!MB_FIELD) {

  6787.             bS_index &= ~1;

  6788.             bS_index |= (i & 1);

  6789.         }

  6790. 

  6791.         if( bS[bS_index] == 0 ) {

  6792.             continue;

  6793.         }

  6794. 

  6795.         qp_index = MB_FIELD ? (i >> 3) : (i & 1);

  6796.         index_a = clip( qp[qp_index] + h->slice_alpha_c0_offset, 0, 51 );

  6797.         alpha = alpha_table[index_a];

  6798.         beta  = beta_table[clip( qp[qp_index] + h->slice_beta_offset, 0, 51 )];

  6799. 

  6800.         if( bS[bS_index] < 4 ) {

  6801.             const int tc0 = tc0_table[index_a][bS[bS_index] - 1];

  6802.             const int p0 = pix[-1];

  6803.             const int p1 = pix[-2];

  6804.             const int p2 = pix[-3];

  6805.             const int q0 = pix[0];

  6806.             const int q1 = pix[1];

  6807.             const int q2 = pix[2];

  6808. 

  6809.             if( ABS( p0 - q0 ) < alpha &&

  6810.                 ABS( p1 - p0 ) < beta &&

  6811.                 ABS( q1 - q0 ) < beta ) {

  6812.                 int tc = tc0;

  6813.                 int i_delta;

  6814. 

  6815.                 if( ABS( p2 - p0 ) < beta ) {

  6816.                     pix[-2] = p1 + clip( ( p2 + ( ( p0 + q0 + 1 ) >> 1 ) - ( p1 << 1 ) ) >> 1, -tc0, tc0 );

  6817.                     tc++;

  6818.                 }

  6819.                 if( ABS( q2 - q0 ) < beta ) {

  6820.                     pix[1] = q1 + clip( ( q2 + ( ( p0 + q0 + 1 ) >> 1 ) - ( q1 << 1 ) ) >> 1, -tc0, tc0 );

  6821.                     tc++;

  6822.                 }

  6823. 

  6824.                 i_delta = clip( (((q0 - p0 ) << 2) + (p1 - q1) + 4) >> 3, -tc, tc );

  6825.                 pix[-1] = clip_uint8( p0 + i_delta );    /* p0' */

  6826.                 pix[0]  = clip_uint8( q0 - i_delta );    /* q0' */

  6827.                 tprintf("filter_mb_mbaff_edgev i:%d, qp:%d, indexA:%d, alpha:%d, beta:%d, tc:%d\n# bS:%d -> [%02x, %02x, %02x, %02x, %02x, %02x] =>[%02x, %02x, %02x, %02x]\n", i, qp[qp_index], index_a, alpha, beta, tc, bS[bS_index], pix[-3], p1, p0, q0, q1, pix[2], p1, pix[-1], pix[0], q1);

  6828.             }

  6829.         }else{

  6830.             const int p0 = pix[-1];

  6831.             const int p1 = pix[-2];

  6832.             const int p2 = pix[-3];

  6833. 

  6834.             const int q0 = pix[0];

  6835.             const int q1 = pix[1];

  6836.             const int q2 = pix[2];

  6837. 

  6838.             if( ABS( p0 - q0 ) < alpha &&

  6839.                 ABS( p1 - p0 ) < beta &&

  6840.                 ABS( q1 - q0 ) < beta ) {

  6841. 

  6842.                 if(ABS( p0 - q0 ) < (( alpha >> 2 ) + 2 )){

  6843.                     if( ABS( p2 - p0 ) < beta)

  6844.                     {

  6845.                         const int p3 = pix[-4];

  6846.                         /* p0', p1', p2' */

  6847.                         pix[-1] = ( p2 + 2*p1 + 2*p0 + 2*q0 + q1 + 4 ) >> 3;

  6848.                         pix[-2] = ( p2 + p1 + p0 + q0 + 2 ) >> 2;

  6849.                         pix[-3] = ( 2*p3 + 3*p2 + p1 + p0 + q0 + 4 ) >> 3;

  6850.                     } else {

  6851.                         /* p0' */

  6852.                         pix[-1] = ( 2*p1 + p0 + q1 + 2 ) >> 2;

  6853.                     }

  6854.                     if( ABS( q2 - q0 ) < beta)

  6855.                     {

  6856.                         const int q3 = pix[3];

  6857.                         /* q0', q1', q2' */

  6858.                         pix[0] = ( p1 + 2*p0 + 2*q0 + 2*q1 + q2 + 4 ) >> 3;

  6859.                         pix[1] = ( p0 + q0 + q1 + q2 + 2 ) >> 2;

  6860.                         pix[2] = ( 2*q3 + 3*q2 + q1 + q0 + p0 + 4 ) >> 3;

  6861.                     } else {

  6862.                         /* q0' */

  6863.                         pix[0] = ( 2*q1 + q0 + p1 + 2 ) >> 2;

  6864.                     }

  6865.                 }else{

  6866.                     /* p0', q0' */

  6867.                     pix[-1] = ( 2*p1 + p0 + q1 + 2 ) >> 2;

  6868.                     pix[ 0] = ( 2*q1 + q0 + p1 + 2 ) >> 2;

  6869.                 }

  6870.                 tprintf("filter_mb_mbaff_edgev i:%d, qp:%d, indexA:%d, alpha:%d, beta:%d\n# bS:4 -> [%02x, %02x, %02x, %02x, %02x, %02x] =>[%02x, %02x, %02x, %02x, %02x, %02x]\n", i, qp[qp_index], index_a, alpha, beta, p2, p1, p0, q0, q1, q2, pix[-3], pix[-2], pix[-1], pix[0], pix[1], pix[2]);

  6871.             }

  6872.         }

  6873.     }

  6874. }

  6875. static void filter_mb_mbaff_edgecv( H264Context *h, uint8_t *pix, int stride, int16_t bS[8], int qp[2] ) {

  6876.     int i;

  6877.     for( i = 0; i < 8; i++, pix += stride) {

  6878.         int index_a;

  6879.         int alpha;

  6880.         int beta;

  6881. 

  6882.         int qp_index;

  6883.         int bS_index = i;

  6884. 

  6885.         if( bS[bS_index] == 0 ) {

  6886.             continue;

  6887.         }

  6888. 

  6889.         qp_index = MB_FIELD ? (i >> 2) : (i & 1);

  6890.         index_a = clip( qp[qp_index] + h->slice_alpha_c0_offset, 0, 51 );

  6891.         alpha = alpha_table[index_a];

  6892.         beta  = beta_table[clip( qp[qp_index] + h->slice_beta_offset, 0, 51 )];

  6893. 

  6894.         if( bS[bS_index] < 4 ) {

  6895.             const int tc = tc0_table[index_a][bS[bS_index] - 1] + 1;

  6896.             const int p0 = pix[-1];

  6897.             const int p1 = pix[-2];

  6898.             const int q0 = pix[0];

  6899.             const int q1 = pix[1];

  6900. 

  6901.             if( ABS( p0 - q0 ) < alpha &&

  6902.                 ABS( p1 - p0 ) < beta &&

  6903.                 ABS( q1 - q0 ) < beta ) {

  6904.                 const int i_delta = clip( (((q0 - p0 ) << 2) + (p1 - q1) + 4) >> 3, -tc, tc );

  6905. 

  6906.                 pix[-1] = clip_uint8( p0 + i_delta );    /* p0' */

  6907.                 pix[0]  = clip_uint8( q0 - i_delta );    /* q0' */

  6908.                 tprintf("filter_mb_mbaff_edgecv i:%d, qp:%d, indexA:%d, alpha:%d, beta:%d, tc:%d\n# bS:%d -> [%02x, %02x, %02x, %02x, %02x, %02x] =>[%02x, %02x, %02x, %02x]\n", i, qp[qp_index], index_a, alpha, beta, tc, bS[bS_index], pix[-3], p1, p0, q0, q1, pix[2], p1, pix[-1], pix[0], q1);

  6909.             }

  6910.         }else{

  6911.             const int p0 = pix[-1];

  6912.             const int p1 = pix[-2];

  6913.             const int q0 = pix[0];

  6914.             const int q1 = pix[1];

  6915. 

  6916.             if( ABS( p0 - q0 ) < alpha &&

  6917.                 ABS( p1 - p0 ) < beta &&

  6918.                 ABS( q1 - q0 ) < beta ) {

  6919. 

  6920.                 pix[-1] = ( 2*p1 + p0 + q1 + 2 ) >> 2;   /* p0' */

  6921.                 pix[0]  = ( 2*q1 + q0 + p1 + 2 ) >> 2;   /* q0' */

  6922.                 tprintf("filter_mb_mbaff_edgecv i:%d\n# bS:4 -> [%02x, %02x, %02x, %02x, %02x, %02x] =>[%02x, %02x, %02x, %02x, %02x, %02x]\n", i, pix[-3], p1, p0, q0, q1, pix[2], pix[-3], pix[-2], pix[-1], pix[0], pix[1], pix[2]);

  6923.             }

  6924.         }

  6925.     }

  6926. }

  6927. 

  6928. static void filter_mb_edgeh( H264Context *h, uint8_t *pix, int stride, int16_t bS[4], int qp ) {

  6929.     int i, d;

  6930.     const int index_a = clip( qp + h->slice_alpha_c0_offset, 0, 51 );

  6931.     const int alpha = alpha_table[index_a];

  6932.     const int beta  = beta_table[clip( qp + h->slice_beta_offset, 0, 51 )];

  6933.     const int pix_next  = stride;

  6934. 

  6935.     if( bS[0] < 4 ) {

  6936.         int8_t tc[4];

  6937.         for(i=0; i<4; i++)

  6938.             tc[i] = bS[i] ? tc0_table[index_a][bS[i] - 1] : -1;

  6939.         h->s.dsp.h264_v_loop_filter_luma(pix, stride, alpha, beta, tc);

  6940.     } else {

  6941.         /* 16px edge length, see filter_mb_edgev */

  6942.             for( d = 0; d < 16; d++ ) {

  6943.                 const int p0 = pix[-1*pix_next];

  6944.                 const int p1 = pix[-2*pix_next];

  6945.                 const int p2 = pix[-3*pix_next];

  6946.                 const int q0 = pix[0];

  6947.                 const int q1 = pix[1*pix_next];

  6948.                 const int q2 = pix[2*pix_next];

  6949. 

  6950.                 if( ABS( p0 - q0 ) < alpha &&

  6951.                     ABS( p1 - p0 ) < beta &&

  6952.                     ABS( q1 - q0 ) < beta ) {

  6953. 

  6954.                     const int p3 = pix[-4*pix_next];

  6955.                     const int q3 = pix[ 3*pix_next];

  6956. 

  6957.                     if(ABS( p0 - q0 ) < (( alpha >> 2 ) + 2 )){

  6958.                         if( ABS( p2 - p0 ) < beta) {

  6959.                             /* p0', p1', p2' */

  6960.                             pix[-1*pix_next] = ( p2 + 2*p1 + 2*p0 + 2*q0 + q1 + 4 ) >> 3;

  6961.                             pix[-2*pix_next] = ( p2 + p1 + p0 + q0 + 2 ) >> 2;

  6962.                             pix[-3*pix_next] = ( 2*p3 + 3*p2 + p1 + p0 + q0 + 4 ) >> 3;

  6963.                         } else {

  6964.                             /* p0' */

  6965.                             pix[-1*pix_next] = ( 2*p1 + p0 + q1 + 2 ) >> 2;

  6966.                         }

  6967.                         if( ABS( q2 - q0 ) < beta) {

  6968.                             /* q0', q1', q2' */

  6969.                             pix[0*pix_next] = ( p1 + 2*p0 + 2*q0 + 2*q1 + q2 + 4 ) >> 3;

  6970.                             pix[1*pix_next] = ( p0 + q0 + q1 + q2 + 2 ) >> 2;

  6971.                             pix[2*pix_next] = ( 2*q3 + 3*q2 + q1 + q0 + p0 + 4 ) >> 3;

  6972.                         } else {

  6973.                             /* q0' */

  6974.                             pix[0*pix_next] = ( 2*q1 + q0 + p1 + 2 ) >> 2;

  6975.                         }

  6976.                     }else{

  6977.                         /* p0', q0' */

  6978.                         pix[-1*pix_next] = ( 2*p1 + p0 + q1 + 2 ) >> 2;

  6979.                         pix[ 0*pix_next] = ( 2*q1 + q0 + p1 + 2 ) >> 2;

  6980.                     }

  6981.                     tprintf("filter_mb_edgeh i:%d d:%d, qp:%d, indexA:%d, alpha:%d, beta:%d\n# bS:%d -> [%02x, %02x, %02x, %02x, %02x, %02x] =>[%02x, %02x, %02x, %02x]\n", i, d, qp, index_a, alpha, beta, bS[i], p2, p1, p0, q0, q1, q2, pix[-2*pix_next], pix[-pix_next], pix[0], pix[pix_next]);

  6982.                 }

  6983.                 pix++;

  6984.             }

  6985.     }

  6986. }

  6987. 

  6988. static void filter_mb_edgech( H264Context *h, uint8_t *pix, int stride, int16_t bS[4], int qp ) {

  6989.     int i;

  6990.     const int index_a = clip( qp + h->slice_alpha_c0_offset, 0, 51 );

  6991.     const int alpha = alpha_table[index_a];

  6992.     const int beta  = beta_table[clip( qp + h->slice_beta_offset, 0, 51 )];

  6993. 

  6994.     if( bS[0] < 4 ) {

  6995.         int8_t tc[4];

  6996.         for(i=0; i<4; i++)

  6997.             tc[i] = bS[i] ? tc0_table[index_a][bS[i] - 1] + 1 : 0;

  6998.         h->s.dsp.h264_v_loop_filter_chroma(pix, stride, alpha, beta, tc);

  6999.     } else {

  7000.         h->s.dsp.h264_v_loop_filter_chroma_intra(pix, stride, alpha, beta);

  7001.     }

  7002. }

  7003. 

  7004. static void filter_mb_fast( H264Context *h, int mb_x, int mb_y, uint8_t *img_y, uint8_t *img_cb, uint8_t *img_cr, unsigned int linesize, unsigned int uvlinesize) {

  7005.     MpegEncContext * const s = &h->s;

  7006.     int mb_xy, mb_type;

  7007.     int qp, qp0, qp1, qpc, qpc0, qpc1, qp_thresh;

  7008. 

  7009.     if(mb_x==0 || mb_y==0 || !s->dsp.h264_loop_filter_strength) {

  7010.         filter_mb(h, mb_x, mb_y, img_y, img_cb, img_cr, linesize, uvlinesize);

  7011.         return;

  7012.     }

  7013.     assert(!FRAME_MBAFF);

  7014. 

  7015.     mb_xy = mb_x + mb_y*s->mb_stride;

  7016.     mb_type = s->current_picture.mb_type[mb_xy];

  7017.     qp = s->current_picture.qscale_table[mb_xy];

  7018.     qp0 = s->current_picture.qscale_table[mb_xy-1];

  7019.     qp1 = s->current_picture.qscale_table[h->top_mb_xy];

  7020.     qpc = get_chroma_qp( h->pps.chroma_qp_index_offset, qp );

  7021.     qpc0 = get_chroma_qp( h->pps.chroma_qp_index_offset, qp0 );

  7022.     qpc1 = get_chroma_qp( h->pps.chroma_qp_index_offset, qp1 );

  7023.     qp0 = (qp + qp0 + 1) >> 1;

  7024.     qp1 = (qp + qp1 + 1) >> 1;

  7025.     qpc0 = (qpc + qpc0 + 1) >> 1;

  7026.     qpc1 = (qpc + qpc1 + 1) >> 1;

  7027.     qp_thresh = 15 - h->slice_alpha_c0_offset;

  7028.     if(qp <= qp_thresh && qp0 <= qp_thresh && qp1 <= qp_thresh &&

  7029.        qpc <= qp_thresh && qpc0 <= qp_thresh && qpc1 <= qp_thresh)

  7030.         return;

  7031. 

  7032.     if( IS_INTRA(mb_type) ) {

  7033.         int16_t bS4[4] = {4,4,4,4};

  7034.         int16_t bS3[4] = {3,3,3,3};

  7035.         if( IS_8x8DCT(mb_type) ) {

  7036.             filter_mb_edgev( h, &img_y[4*0], linesize, bS4, qp0 );

  7037.             filter_mb_edgev( h, &img_y[4*2], linesize, bS3, qp );

  7038.             filter_mb_edgeh( h, &img_y[4*0*linesize], linesize, bS4, qp1 );

  7039.             filter_mb_edgeh( h, &img_y[4*2*linesize], linesize, bS3, qp );

  7040.         } else {

  7041.             filter_mb_edgev( h, &img_y[4*0], linesize, bS4, qp0 );

  7042.             filter_mb_edgev( h, &img_y[4*1], linesize, bS3, qp );

  7043.             filter_mb_edgev( h, &img_y[4*2], linesize, bS3, qp );

  7044.             filter_mb_edgev( h, &img_y[4*3], linesize, bS3, qp );

  7045.             filter_mb_edgeh( h, &img_y[4*0*linesize], linesize, bS4, qp1 );

  7046.             filter_mb_edgeh( h, &img_y[4*1*linesize], linesize, bS3, qp );

  7047.             filter_mb_edgeh( h, &img_y[4*2*linesize], linesize, bS3, qp );

  7048.             filter_mb_edgeh( h, &img_y[4*3*linesize], linesize, bS3, qp );

  7049.         }

  7050.         filter_mb_edgecv( h, &img_cb[2*0], uvlinesize, bS4, qpc0 );

  7051.         filter_mb_edgecv( h, &img_cb[2*2], uvlinesize, bS3, qpc );

  7052.         filter_mb_edgecv( h, &img_cr[2*0], uvlinesize, bS4, qpc0 );

  7053.         filter_mb_edgecv( h, &img_cr[2*2], uvlinesize, bS3, qpc );

  7054.         filter_mb_edgech( h, &img_cb[2*0*uvlinesize], uvlinesize, bS4, qpc1 );

  7055.         filter_mb_edgech( h, &img_cb[2*2*uvlinesize], uvlinesize, bS3, qpc );

  7056.         filter_mb_edgech( h, &img_cr[2*0*uvlinesize], uvlinesize, bS4, qpc1 );

  7057.         filter_mb_edgech( h, &img_cr[2*2*uvlinesize], uvlinesize, bS3, qpc );

  7058.         return;

  7059.     } else {

  7060.         DECLARE_ALIGNED_8(int16_t, bS[2][4][4]);

  7061.         uint64_t (*bSv)[4] = (uint64_t(*)[4])bS;

  7062.         int edges;

  7063.         if( IS_8x8DCT(mb_type) && (h->cbp&7) == 7 ) {

  7064.             edges = 4;

  7065.             bSv[0][0] = bSv[0][2] = bSv[1][0] = bSv[1][2] = 0x0002000200020002ULL;

  7066.         } else {

  7067.             int mask_edge1 = (mb_type & (MB_TYPE_16x16 | MB_TYPE_8x16)) ? 3 :

  7068.                              (mb_type & MB_TYPE_16x8) ? 1 : 0;

  7069.             int mask_edge0 = (mb_type & (MB_TYPE_16x16 | MB_TYPE_8x16))

  7070.                              && (s->current_picture.mb_type[mb_xy-1] & (MB_TYPE_16x16 | MB_TYPE_8x16))

  7071.                              ? 3 : 0;

  7072.             int step = IS_8x8DCT(mb_type) ? 2 : 1;

  7073.             edges = (mb_type & MB_TYPE_16x16) && !(h->cbp & 15) ? 1 : 4;

  7074.             s->dsp.h264_loop_filter_strength( bS, h->non_zero_count_cache, h->ref_cache, h->mv_cache,

  7075.                                               (h->slice_type == B_TYPE), edges, step, mask_edge0, mask_edge1 );

  7076.         }

  7077.         if( IS_INTRA(s->current_picture.mb_type[mb_xy-1]) )

  7078.             bSv[0][0] = 0x0004000400040004ULL;

  7079.         if( IS_INTRA(s->current_picture.mb_type[h->top_mb_xy]) )

  7080.             bSv[1][0] = 0x0004000400040004ULL;

  7081. 

  7082. #define FILTER(hv,dir,edge)\

  7083.         if(bSv[dir][edge]) {\

  7084.             filter_mb_edge##hv( h, &img_y[4*edge*(dir?linesize:1)], linesize, bS[dir][edge], edge ? qp : qp##dir );\

  7085.             if(!(edge&1)) {\

  7086.                 filter_mb_edgec##hv( h, &img_cb[2*edge*(dir?uvlinesize:1)], uvlinesize, bS[dir][edge], edge ? qpc : qpc##dir );\

  7087.                 filter_mb_edgec##hv( h, &img_cr[2*edge*(dir?uvlinesize:1)], uvlinesize, bS[dir][edge], edge ? qpc : qpc##dir );\

  7088.             }\

  7089.         }

  7090.         if( edges == 1 ) {

  7091.             FILTER(v,0,0);

  7092.             FILTER(h,1,0);

  7093.         } else if( IS_8x8DCT(mb_type) ) {

  7094.             FILTER(v,0,0);

  7095.             FILTER(v,0,2);

  7096.             FILTER(h,1,0);

  7097.             FILTER(h,1,2);

  7098.         } else {

  7099.             FILTER(v,0,0);

  7100.             FILTER(v,0,1);

  7101.             FILTER(v,0,2);

  7102.             FILTER(v,0,3);

  7103.             FILTER(h,1,0);

  7104.             FILTER(h,1,1);

  7105.             FILTER(h,1,2);

  7106.             FILTER(h,1,3);

  7107.         }

  7108. #undef FILTER

  7109.     }

  7110. }

  7111. 

  7112. static void filter_mb( H264Context *h, int mb_x, int mb_y, uint8_t *img_y, uint8_t *img_cb, uint8_t *img_cr, unsigned int linesize, unsigned int uvlinesize) {

  7113.     MpegEncContext * const s = &h->s;

  7114.     const int mb_xy= mb_x + mb_y*s->mb_stride;

  7115.     const int mb_type = s->current_picture.mb_type[mb_xy];

  7116.     const int mvy_limit = IS_INTERLACED(mb_type) ? 2 : 4;

  7117.     int first_vertical_edge_done = 0;

  7118.     int dir;

  7119.     /* FIXME: A given frame may occupy more than one position in

  7120.      * the reference list. So ref2frm should be populated with

  7121.      * frame numbers, not indices. */

  7122.     static const int ref2frm[34] = {-1,-1,0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,

  7123.                                     16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31};

  7124. 

  7125.     //for sufficiently low qp, filtering wouldn't do anything

  7126.     //this is a conservative estimate: could also check beta_offset and more accurate chroma_qp

  7127.     if(!FRAME_MBAFF){

  7128.         int qp_thresh = 15 - h->slice_alpha_c0_offset - FFMAX(0, h->pps.chroma_qp_index_offset);

  7129.         int qp = s->current_picture.qscale_table[mb_xy];

  7130.         if(qp <= qp_thresh

  7131.            && (mb_x == 0 || ((qp + s->current_picture.qscale_table[mb_xy-1] + 1)>>1) <= qp_thresh)

  7132.            && (mb_y == 0 || ((qp + s->current_picture.qscale_table[h->top_mb_xy] + 1)>>1) <= qp_thresh)){

  7133.             return;

  7134.         }

  7135.     }

  7136. 

  7137.     if (FRAME_MBAFF

  7138.             // left mb is in picture

  7139.             && h->slice_table[mb_xy-1] != 255

  7140.             // and current and left pair do not have the same interlaced type

  7141.             && (IS_INTERLACED(mb_type) != IS_INTERLACED(s->current_picture.mb_type[mb_xy-1]))

  7142.             // and left mb is in the same slice if deblocking_filter == 2

  7143.             && (h->deblocking_filter!=2 || h->slice_table[mb_xy-1] == h->slice_table[mb_xy])) {

  7144.         /* First vertical edge is different in MBAFF frames

  7145.          * There are 8 different bS to compute and 2 different Qp

  7146.          */

  7147.         const int pair_xy = mb_x + (mb_y&~1)*s->mb_stride;

  7148.         const int left_mb_xy[2] = { pair_xy-1, pair_xy-1+s->mb_stride };

  7149.         int16_t bS[8];

  7150.         int qp[2];

  7151.         int chroma_qp[2];

  7152.         int mb_qp, mbn0_qp, mbn1_qp;

  7153.         int i;

  7154.         first_vertical_edge_done = 1;

  7155. 

  7156.         if( IS_INTRA(mb_type) )

  7157.             bS[0] = bS[1] = bS[2] = bS[3] = bS[4] = bS[5] = bS[6] = bS[7] = 4;

  7158.         else {

  7159.             for( i = 0; i < 8; i++ ) {

  7160.                 int mbn_xy = MB_FIELD ? left_mb_xy[i>>2] : left_mb_xy[i&1];

  7161. 

  7162.                 if( IS_INTRA( s->current_picture.mb_type[mbn_xy] ) )

  7163.                     bS[i] = 4;

  7164.                 else if( h->non_zero_count_cache[12+8*(i>>1)] != 0 ||

  7165.                          /* FIXME: with 8x8dct + cavlc, should check cbp instead of nnz */

  7166.                          h->non_zero_count[mbn_xy][MB_FIELD ? i&3 : (i>>2)+(mb_y&1)*2] )

  7167.                     bS[i] = 2;

  7168.                 else

  7169.                     bS[i] = 1;

  7170.             }

  7171.         }

  7172. 

  7173.         mb_qp = s->current_picture.qscale_table[mb_xy];

  7174.         mbn0_qp = s->current_picture.qscale_table[left_mb_xy[0]];

  7175.         mbn1_qp = s->current_picture.qscale_table[left_mb_xy[1]];

  7176.         qp[0] = ( mb_qp + mbn0_qp + 1 ) >> 1;

  7177.         chroma_qp[0] = ( get_chroma_qp( h->pps.chroma_qp_index_offset, mb_qp ) +

  7178.                          get_chroma_qp( h->pps.chroma_qp_index_offset, mbn0_qp ) + 1 ) >> 1;

  7179.         qp[1] = ( mb_qp + mbn1_qp + 1 ) >> 1;

  7180.         chroma_qp[1] = ( get_chroma_qp( h->pps.chroma_qp_index_offset, mb_qp ) +

  7181.                          get_chroma_qp( h->pps.chroma_qp_index_offset, mbn1_qp ) + 1 ) >> 1;

  7182. 

  7183.         /* Filter edge */

  7184.         tprintf("filter mb:%d/%d MBAFF, QPy:%d/%d, QPc:%d/%d ls:%d uvls:%d", mb_x, mb_y, qp[0], qp[1], chroma_qp[0], chroma_qp[1], linesize, uvlinesize);

  7185.         { int i; for (i = 0; i < 8; i++) tprintf(" bS[%d]:%d", i, bS[i]); tprintf("\n"); }

  7186.         filter_mb_mbaff_edgev ( h, &img_y [0], linesize,   bS, qp );

  7187.         filter_mb_mbaff_edgecv( h, &img_cb[0], uvlinesize, bS, chroma_qp );

  7188.         filter_mb_mbaff_edgecv( h, &img_cr[0], uvlinesize, bS, chroma_qp );

  7189.     }

  7190.     /* dir : 0 -> vertical edge, 1 -> horizontal edge */

  7191.     for( dir = 0; dir < 2; dir++ )

  7192.     {

  7193.         int edge;

  7194.         const int mbm_xy = dir == 0 ? mb_xy -1 : h->top_mb_xy;

  7195.         const int mbm_type = s->current_picture.mb_type[mbm_xy];

  7196.         int start = h->slice_table[mbm_xy] == 255 ? 1 : 0;

  7197. 

  7198.         const int edges = (mb_type & (MB_TYPE_16x16|MB_TYPE_SKIP))

  7199.                                   == (MB_TYPE_16x16|MB_TYPE_SKIP) ? 1 : 4;

  7200.         // how often to recheck mv-based bS when iterating between edges

  7201.         const int mask_edge = (mb_type & (MB_TYPE_16x16 | (MB_TYPE_16x8 << dir))) ? 3 :

  7202.                               (mb_type & (MB_TYPE_8x16 >> dir)) ? 1 : 0;

  7203.         // how often to recheck mv-based bS when iterating along each edge

  7204.         const int mask_par0 = mb_type & (MB_TYPE_16x16 | (MB_TYPE_8x16 >> dir));

  7205. 

  7206.         if (first_vertical_edge_done) {

  7207.             start = 1;

  7208.             first_vertical_edge_done = 0;

  7209.         }

  7210. 

  7211.         if (h->deblocking_filter==2 && h->slice_table[mbm_xy] != h->slice_table[mb_xy])

  7212.             start = 1;

  7213. 

  7214.         if (FRAME_MBAFF && (dir == 1) && ((mb_y&1) == 0) && start == 0

  7215.             && !IS_INTERLACED(mb_type)

  7216.             && IS_INTERLACED(mbm_type)

  7217.             ) {

  7218.             // This is a special case in the norm where the filtering must

  7219.             // be done twice (one each of the field) even if we are in a

  7220.             // frame macroblock.

  7221.             //

  7222.             static const int nnz_idx[4] = {4,5,6,3};

  7223.             unsigned int tmp_linesize   = 2 *   linesize;

  7224.             unsigned int tmp_uvlinesize = 2 * uvlinesize;

  7225.             int mbn_xy = mb_xy - 2 * s->mb_stride;

  7226.             int qp, chroma_qp;

  7227.             int i, j;

  7228.             int16_t bS[4];

  7229. 

  7230.             for(j=0; j<2; j++, mbn_xy += s->mb_stride){

  7231.                 if( IS_INTRA(mb_type) ||

  7232.                     IS_INTRA(s->current_picture.mb_type[mbn_xy]) ) {

  7233.                     bS[0] = bS[1] = bS[2] = bS[3] = 3;

  7234.                 } else {

  7235.                     const uint8_t *mbn_nnz = h->non_zero_count[mbn_xy];

  7236.                     for( i = 0; i < 4; i++ ) {

  7237.                         if( h->non_zero_count_cache[scan8[0]+i] != 0 ||

  7238.                             mbn_nnz[nnz_idx[i]] != 0 )

  7239.                             bS[i] = 2;

  7240.                         else

  7241.                             bS[i] = 1;

  7242.                     }

  7243.                 }

  7244.                 // Do not use s->qscale as luma quantizer because it has not the same

  7245.                 // value in IPCM macroblocks.

  7246.                 qp = ( s->current_picture.qscale_table[mb_xy] + s->current_picture.qscale_table[mbn_xy] + 1 ) >> 1;

  7247.                 tprintf("filter mb:%d/%d dir:%d edge:%d, QPy:%d ls:%d uvls:%d", mb_x, mb_y, dir, edge, qp, tmp_linesize, tmp_uvlinesize);

  7248.                 { int i; for (i = 0; i < 4; i++) tprintf(" bS[%d]:%d", i, bS[i]); tprintf("\n"); }

  7249.                 filter_mb_edgeh( h, &img_y[j*linesize], tmp_linesize, bS, qp );

  7250.                 chroma_qp = ( h->chroma_qp +

  7251.                               get_chroma_qp( h->pps.chroma_qp_index_offset, s->current_picture.qscale_table[mbn_xy] ) + 1 ) >> 1;

  7252.                 filter_mb_edgech( h, &img_cb[j*uvlinesize], tmp_uvlinesize, bS, chroma_qp );

  7253.                 filter_mb_edgech( h, &img_cr[j*uvlinesize], tmp_uvlinesize, bS, chroma_qp );

  7254.             }

  7255. 

  7256.             start = 1;

  7257.         }

  7258. 

  7259.         /* Calculate bS */

  7260.         for( edge = start; edge < edges; edge++ ) {

  7261.             /* mbn_xy: neighbor macroblock */

  7262.             const int mbn_xy = edge > 0 ? mb_xy : mbm_xy;

  7263.             const int mbn_type = s->current_picture.mb_type[mbn_xy];

  7264.             int16_t bS[4];

  7265.             int qp;

  7266. 

  7267.             if( (edge&1) && IS_8x8DCT(mb_type) )

  7268.                 continue;

  7269. 

  7270.             if( IS_INTRA(mb_type) ||

  7271.                 IS_INTRA(mbn_type) ) {

  7272.                 int value;

  7273.                 if (edge == 0) {

  7274.                     if (   (!IS_INTERLACED(mb_type) && !IS_INTERLACED(mbm_type))

  7275.                         || ((FRAME_MBAFF || (s->picture_structure != PICT_FRAME)) && (dir == 0))

  7276.                     ) {

  7277.                         value = 4;

  7278.                     } else {

  7279.                         value = 3;

  7280.                     }

  7281.                 } else {

  7282.                     value = 3;

  7283.                 }

  7284.                 bS[0] = bS[1] = bS[2] = bS[3] = value;

  7285.             } else {

  7286.                 int i, l;

  7287.                 int mv_done;

  7288. 

  7289.                 if( edge & mask_edge ) {

  7290.                     bS[0] = bS[1] = bS[2] = bS[3] = 0;

  7291.                     mv_done = 1;

  7292.                 }

  7293.                 else if( FRAME_MBAFF && IS_INTERLACED(mb_type ^ mbn_type)) {

  7294.                     bS[0] = bS[1] = bS[2] = bS[3] = 1;

  7295.                     mv_done = 1;

  7296.                 }

  7297.                 else if( mask_par0 && (edge || (mbn_type & (MB_TYPE_16x16 | (MB_TYPE_8x16 >> dir)))) ) {

  7298.                     int b_idx= 8 + 4 + edge * (dir ? 8:1);

  7299.                     int bn_idx= b_idx - (dir ? 8:1);

  7300.                     int v = 0;

  7301.                     for( l = 0; !v && l < 1 + (h->slice_type == B_TYPE); l++ ) {

  7302.                         v |= ref2frm[h->ref_cache[l][b_idx]+2] != ref2frm[h->ref_cache[l][bn_idx]+2] ||

  7303.                              ABS( h->mv_cache[l][b_idx][0] - h->mv_cache[l][bn_idx][0] ) >= 4 ||

  7304.                              ABS( h->mv_cache[l][b_idx][1] - h->mv_cache[l][bn_idx][1] ) >= mvy_limit;

  7305.                     }

  7306.                     bS[0] = bS[1] = bS[2] = bS[3] = v;

  7307.                     mv_done = 1;

  7308.                 }

  7309.                 else

  7310.                     mv_done = 0;

  7311. 

  7312.                 for( i = 0; i < 4; i++ ) {

  7313.                     int x = dir == 0 ? edge : i;

  7314.                     int y = dir == 0 ? i    : edge;

  7315.                     int b_idx= 8 + 4 + x + 8*y;

  7316.                     int bn_idx= b_idx - (dir ? 8:1);

  7317. 

  7318.                     if( h->non_zero_count_cache[b_idx] != 0 ||

  7319.                         h->non_zero_count_cache[bn_idx] != 0 ) {

  7320.                         bS[i] = 2;

  7321.                     }

  7322.                     else if(!mv_done)

  7323.                     {

  7324.                         bS[i] = 0;

  7325.                         for( l = 0; l < 1 + (h->slice_type == B_TYPE); l++ ) {

  7326.                             if( ref2frm[h->ref_cache[l][b_idx]+2] != ref2frm[h->ref_cache[l][bn_idx]+2] ||

  7327.                                 ABS( h->mv_cache[l][b_idx][0] - h->mv_cache[l][bn_idx][0] ) >= 4 ||

  7328.                                 ABS( h->mv_cache[l][b_idx][1] - h->mv_cache[l][bn_idx][1] ) >= mvy_limit ) {

  7329.                                 bS[i] = 1;

  7330.                                 break;

  7331.                             }

  7332.                         }

  7333.                     }

  7334.                 }

  7335. 

  7336.                 if(bS[0]+bS[1]+bS[2]+bS[3] == 0)

  7337.                     continue;

  7338.             }

  7339. 

  7340.             /* Filter edge */

  7341.             // Do not use s->qscale as luma quantizer because it has not the same

  7342.             // value in IPCM macroblocks.

  7343.             qp = ( s->current_picture.qscale_table[mb_xy] + s->current_picture.qscale_table[mbn_xy] + 1 ) >> 1;

  7344.             //tprintf("filter mb:%d/%d dir:%d edge:%d, QPy:%d, QPc:%d, QPcn:%d\n", mb_x, mb_y, dir, edge, qp, h->chroma_qp, s->current_picture.qscale_table[mbn_xy]);

  7345.             tprintf("filter mb:%d/%d dir:%d edge:%d, QPy:%d ls:%d uvls:%d", mb_x, mb_y, dir, edge, qp, linesize, uvlinesize);

  7346.             { int i; for (i = 0; i < 4; i++) tprintf(" bS[%d]:%d", i, bS[i]); tprintf("\n"); }

  7347.             if( dir == 0 ) {

  7348.                 filter_mb_edgev( h, &img_y[4*edge], linesize, bS, qp );

  7349.                 if( (edge&1) == 0 ) {

  7350.                     int chroma_qp = ( h->chroma_qp +

  7351.                                       get_chroma_qp( h->pps.chroma_qp_index_offset, s->current_picture.qscale_table[mbn_xy] ) + 1 ) >> 1;

  7352.                     filter_mb_edgecv( h, &img_cb[2*edge], uvlinesize, bS, chroma_qp );

  7353.                     filter_mb_edgecv( h, &img_cr[2*edge], uvlinesize, bS, chroma_qp );

  7354.                 }

  7355.             } else {

  7356.                 filter_mb_edgeh( h, &img_y[4*edge*linesize], linesize, bS, qp );

  7357.                 if( (edge&1) == 0 ) {

  7358.                     int chroma_qp = ( h->chroma_qp +

  7359.                                       get_chroma_qp( h->pps.chroma_qp_index_offset, s->current_picture.qscale_table[mbn_xy] ) + 1 ) >> 1;

  7360.                     filter_mb_edgech( h, &img_cb[2*edge*uvlinesize], uvlinesize, bS, chroma_qp );

  7361.                     filter_mb_edgech( h, &img_cr[2*edge*uvlinesize], uvlinesize, bS, chroma_qp );

  7362.                 }

  7363.             }

  7364.         }

  7365.     }

  7366. }

  7367. 

  7368. static int decode_slice(H264Context *h){

  7369.     MpegEncContext * const s = &h->s;

  7370.     const int part_mask= s->partitioned_frame ? (AC_END|AC_ERROR) : 0x7F;

  7371. 

  7372.     s->mb_skip_run= -1;

  7373. 

  7374.     if( h->pps.cabac ) {

  7375.         int i;

  7376. 

  7377.         /* realign */

  7378.         align_get_bits( &s->gb );

  7379. 

  7380.         /* init cabac */

  7381.         ff_init_cabac_states( &h->cabac, ff_h264_lps_range, ff_h264_mps_state, ff_h264_lps_state, 64 );

  7382.         ff_init_cabac_decoder( &h->cabac,

  7383.                                s->gb.buffer + get_bits_count(&s->gb)/8,

  7384.                                ( s->gb.size_in_bits - get_bits_count(&s->gb) + 7)/8);

  7385.         /* calculate pre-state */

  7386.         for( i= 0; i < 460; i++ ) {

  7387.             int pre;

  7388.             if( h->slice_type == I_TYPE )

  7389.                 pre = clip( ((cabac_context_init_I[i][0] * s->qscale) >>4 ) + cabac_context_init_I[i][1], 1, 126 );

  7390.             else

  7391.                 pre = clip( ((cabac_context_init_PB[h->cabac_init_idc][i][0] * s->qscale) >>4 ) + cabac_context_init_PB[h->cabac_init_idc][i][1], 1, 126 );

  7392. 

  7393.             if( pre <= 63 )

  7394.                 h->cabac_state[i] = 2 * ( 63 - pre ) + 0;

  7395.             else

  7396.                 h->cabac_state[i] = 2 * ( pre - 64 ) + 1;

  7397.         }

  7398. 

  7399.         for(;;){

  7400.             int ret = decode_mb_cabac(h);

  7401.             int eos;

  7402. 

  7403.             if(ret>=0) hl_decode_mb(h);

  7404. 

  7405.             if( ret >= 0 && FRAME_MBAFF ) { //FIXME optimal? or let mb_decode decode 16x32 ?

  7406.                 s->mb_y++;

  7407. 

  7408.                 if(ret>=0) ret = decode_mb_cabac(h);

  7409. 

  7410.                 if(ret>=0) hl_decode_mb(h);

  7411.                 s->mb_y--;

  7412.             }

  7413.             eos = get_cabac_terminate( &h->cabac );

  7414. 

  7415.             if( ret < 0 || h->cabac.bytestream > h->cabac.bytestream_end + 1) {

  7416.                 av_log(h->s.avctx, AV_LOG_ERROR, "error while decoding MB %d %d, bytestream (%d)\n", s->mb_x, s->mb_y, h->cabac.bytestream_end - h->cabac.bytestream);

  7417.                 ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, (AC_ERROR|DC_ERROR|MV_ERROR)&part_mask);

  7418.                 return -1;

  7419.             }

  7420. 

  7421.             if( ++s->mb_x >= s->mb_width ) {

  7422.                 s->mb_x = 0;

  7423.                 ff_draw_horiz_band(s, 16*s->mb_y, 16);

  7424.                 ++s->mb_y;

  7425.                 if(FRAME_MBAFF) {

  7426.                     ++s->mb_y;

  7427.                 }

  7428.             }

  7429. 

  7430.             if( eos || s->mb_y >= s->mb_height ) {

  7431.                 tprintf("slice end %d %d\n", get_bits_count(&s->gb), s->gb.size_in_bits);

  7432.                 ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x-1, s->mb_y, (AC_END|DC_END|MV_END)&part_mask);

  7433.                 return 0;

  7434.             }

  7435.         }

  7436. 

  7437.     } else {

  7438.         for(;;){

  7439.             int ret = decode_mb_cavlc(h);

  7440. 

  7441.             if(ret>=0) hl_decode_mb(h);

  7442. 

  7443.             if(ret>=0 && FRAME_MBAFF){ //FIXME optimal? or let mb_decode decode 16x32 ?

  7444.                 s->mb_y++;

  7445.                 ret = decode_mb_cavlc(h);

  7446. 

  7447.                 if(ret>=0) hl_decode_mb(h);

  7448.                 s->mb_y--;

  7449.             }

  7450. 

  7451.             if(ret<0){

  7452.                 av_log(h->s.avctx, AV_LOG_ERROR, "error while decoding MB %d %d\n", s->mb_x, s->mb_y);

  7453.                 ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, (AC_ERROR|DC_ERROR|MV_ERROR)&part_mask);

  7454. 

  7455.                 return -1;

  7456.             }

  7457. 

  7458.             if(++s->mb_x >= s->mb_width){

  7459.                 s->mb_x=0;

  7460.                 ff_draw_horiz_band(s, 16*s->mb_y, 16);

  7461.                 ++s->mb_y;

  7462.                 if(FRAME_MBAFF) {

  7463.                     ++s->mb_y;

  7464.                 }

  7465.                 if(s->mb_y >= s->mb_height){

  7466.                     tprintf("slice end %d %d\n", get_bits_count(&s->gb), s->gb.size_in_bits);

  7467. 

  7468.                     if(get_bits_count(&s->gb) == s->gb.size_in_bits ) {

  7469.                         ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x-1, s->mb_y, (AC_END|DC_END|MV_END)&part_mask);

  7470. 

  7471.                         return 0;

  7472.                     }else{

  7473.                         ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, (AC_END|DC_END|MV_END)&part_mask);

  7474. 

  7475.                         return -1;

  7476.                     }

  7477.                 }

  7478.             }

  7479. 

  7480.             if(get_bits_count(&s->gb) >= s->gb.size_in_bits && s->mb_skip_run<=0){

  7481.                 tprintf("slice end %d %d\n", get_bits_count(&s->gb), s->gb.size_in_bits);

  7482.                 if(get_bits_count(&s->gb) == s->gb.size_in_bits ){

  7483.                     ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x-1, s->mb_y, (AC_END|DC_END|MV_END)&part_mask);

  7484. 

  7485.                     return 0;

  7486.                 }else{

  7487.                     ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, (AC_ERROR|DC_ERROR|MV_ERROR)&part_mask);

  7488. 

  7489.                     return -1;

  7490.                 }

  7491.             }

  7492.         }

  7493.     }

  7494. 

  7495. #if 0

  7496.     for(;s->mb_y < s->mb_height; s->mb_y++){

  7497.         for(;s->mb_x < s->mb_width; s->mb_x++){

  7498.             int ret= decode_mb(h);

  7499. 

  7500.             hl_decode_mb(h);

  7501. 

  7502.             if(ret<0){

  7503.                 av_log(s->avctx, AV_LOG_ERROR, "error while decoding MB %d %d\n", s->mb_x, s->mb_y);

  7504.                 ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, (AC_ERROR|DC_ERROR|MV_ERROR)&part_mask);

  7505. 

  7506.                 return -1;

  7507.             }

  7508. 

  7509.             if(++s->mb_x >= s->mb_width){

  7510.                 s->mb_x=0;

  7511.                 if(++s->mb_y >= s->mb_height){

  7512.                     if(get_bits_count(s->gb) == s->gb.size_in_bits){

  7513.                         ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x-1, s->mb_y, (AC_END|DC_END|MV_END)&part_mask);

  7514. 

  7515.                         return 0;

  7516.                     }else{

  7517.                         ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, (AC_END|DC_END|MV_END)&part_mask);

  7518. 

  7519.                         return -1;

  7520.                     }

  7521.                 }

  7522.             }

  7523. 

  7524.             if(get_bits_count(s->?gb) >= s->gb?.size_in_bits){

  7525.                 if(get_bits_count(s->gb) == s->gb.size_in_bits){

  7526.                     ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x-1, s->mb_y, (AC_END|DC_END|MV_END)&part_mask);

  7527. 

  7528.                     return 0;

  7529.                 }else{

  7530.                     ff_er_add_slice(s, s->resync_mb_x, s->resync_mb_y, s->mb_x, s->mb_y, (AC_ERROR|DC_ERROR|MV_ERROR)&part_mask);

  7531. 

  7532.                     return -1;

  7533.                 }

  7534.             }

  7535.         }

  7536.         s->mb_x=0;

  7537.         ff_draw_horiz_band(s, 16*s->mb_y, 16);

  7538.     }

  7539. #endif

  7540.     return -1; //not reached

  7541. }

  7542. 

  7543. static int decode_unregistered_user_data(H264Context *h, int size){

  7544.     MpegEncContext * const s = &h->s;

  7545.     uint8_t user_data[16+256];

  7546.     int e, build, i;

  7547. 

  7548.     if(size<16)

  7549.         return -1;

  7550. 

  7551.     for(i=0; i<sizeof(user_data)-1 && i<size; i++){

  7552.         user_data[i]= get_bits(&s->gb, 8);

  7553.     }

  7554. 

  7555.     user_data[i]= 0;

  7556.     e= sscanf(user_data+16, "x264 - core %d"/*%s - H.264/MPEG-4 AVC codec - Copyleft 2005 - http://www.videolan.org/x264.html*/, &build);

  7557.     if(e==1 && build>=0)

  7558.         h->x264_build= build;

  7559. 

  7560.     if(s->avctx->debug & FF_DEBUG_BUGS)

  7561.         av_log(s->avctx, AV_LOG_DEBUG, "user data:\"%s\"\n", user_data+16);

  7562. 

  7563.     for(; i<size; i++)

  7564.         skip_bits(&s->gb, 8);

  7565. 

  7566.     return 0;

  7567. }

  7568. 

  7569. static int decode_sei(H264Context *h){

  7570.     MpegEncContext * const s = &h->s;

  7571. 

  7572.     while(get_bits_count(&s->gb) + 16 < s->gb.size_in_bits){

  7573.         int size, type;

  7574. 

  7575.         type=0;

  7576.         do{

  7577.             type+= show_bits(&s->gb, 8);

  7578.         }while(get_bits(&s->gb, 8) == 255);

  7579. 

  7580.         size=0;

  7581.         do{

  7582.             size+= show_bits(&s->gb, 8);

  7583.         }while(get_bits(&s->gb, 8) == 255);

  7584. 

  7585.         switch(type){

  7586.         case 5:

  7587.             if(decode_unregistered_user_data(h, size) < 0)

  7588.                 return -1;

  7589.             break;

  7590.         default:

  7591.             skip_bits(&s->gb, 8*size);

  7592.         }

  7593. 

  7594.         //FIXME check bits here

  7595.         align_get_bits(&s->gb);

  7596.     }

  7597. 

  7598.     return 0;

  7599. }

  7600. 

  7601. static inline void decode_hrd_parameters(H264Context *h, SPS *sps){

  7602.     MpegEncContext * const s = &h->s;

  7603.     int cpb_count, i;

  7604.     cpb_count = get_ue_golomb(&s->gb) + 1;

  7605.     get_bits(&s->gb, 4); /* bit_rate_scale */

  7606.     get_bits(&s->gb, 4); /* cpb_size_scale */

  7607.     for(i=0; i<cpb_count; i++){

  7608.         get_ue_golomb(&s->gb); /* bit_rate_value_minus1 */

  7609.         get_ue_golomb(&s->gb); /* cpb_size_value_minus1 */

  7610.         get_bits1(&s->gb);     /* cbr_flag */

  7611.     }

  7612.     get_bits(&s->gb, 5); /* initial_cpb_removal_delay_length_minus1 */

  7613.     get_bits(&s->gb, 5); /* cpb_removal_delay_length_minus1 */

  7614.     get_bits(&s->gb, 5); /* dpb_output_delay_length_minus1 */

  7615.     get_bits(&s->gb, 5); /* time_offset_length */

  7616. }

  7617. 

  7618. static inline int decode_vui_parameters(H264Context *h, SPS *sps){

  7619.     MpegEncContext * const s = &h->s;

  7620.     int aspect_ratio_info_present_flag, aspect_ratio_idc;

  7621.     int nal_hrd_parameters_present_flag, vcl_hrd_parameters_present_flag;

  7622. 

  7623.     aspect_ratio_info_present_flag= get_bits1(&s->gb);

  7624. 

  7625.     if( aspect_ratio_info_present_flag ) {

  7626.         aspect_ratio_idc= get_bits(&s->gb, 8);

  7627.         if( aspect_ratio_idc == EXTENDED_SAR ) {

  7628.             sps->sar.num= get_bits(&s->gb, 16);

  7629.             sps->sar.den= get_bits(&s->gb, 16);

  7630.         }else if(aspect_ratio_idc < 14){

  7631.             sps->sar=  pixel_aspect[aspect_ratio_idc];

  7632.         }else{

  7633.             av_log(h->s.avctx, AV_LOG_ERROR, "illegal aspect ratio\n");

  7634.             return -1;

  7635.         }

  7636.     }else{

  7637.         sps->sar.num=

  7638.         sps->sar.den= 0;

  7639.     }

  7640. //            s->avctx->aspect_ratio= sar_width*s->width / (float)(s->height*sar_height);

  7641. 

  7642.     if(get_bits1(&s->gb)){      /* overscan_info_present_flag */

  7643.         get_bits1(&s->gb);      /* overscan_appropriate_flag */

  7644.     }

  7645. 

  7646.     if(get_bits1(&s->gb)){      /* video_signal_type_present_flag */

  7647.         get_bits(&s->gb, 3);    /* video_format */

  7648.         get_bits1(&s->gb);      /* video_full_range_flag */

  7649.         if(get_bits1(&s->gb)){  /* colour_description_present_flag */

  7650.             get_bits(&s->gb, 8); /* colour_primaries */

  7651.             get_bits(&s->gb, 8); /* transfer_characteristics */

  7652.             get_bits(&s->gb, 8); /* matrix_coefficients */

  7653.         }

  7654.     }

  7655. 

  7656.     if(get_bits1(&s->gb)){      /* chroma_location_info_present_flag */

  7657.         get_ue_golomb(&s->gb);  /* chroma_sample_location_type_top_field */

  7658.         get_ue_golomb(&s->gb);  /* chroma_sample_location_type_bottom_field */

  7659.     }

  7660. 

  7661.     sps->timing_info_present_flag = get_bits1(&s->gb);

  7662.     if(sps->timing_info_present_flag){

  7663.         sps->num_units_in_tick = get_bits_long(&s->gb, 32);

  7664.         sps->time_scale = get_bits_long(&s->gb, 32);

  7665.         sps->fixed_frame_rate_flag = get_bits1(&s->gb);

  7666.     }

  7667. 

  7668.     nal_hrd_parameters_present_flag = get_bits1(&s->gb);

  7669.     if(nal_hrd_parameters_present_flag)

  7670.         decode_hrd_parameters(h, sps);

  7671.     vcl_hrd_parameters_present_flag = get_bits1(&s->gb);

  7672.     if(vcl_hrd_parameters_present_flag)

  7673.         decode_hrd_parameters(h, sps);

  7674.     if(nal_hrd_parameters_present_flag || vcl_hrd_parameters_present_flag)

  7675.         get_bits1(&s->gb);     /* low_delay_hrd_flag */

  7676.     get_bits1(&s->gb);         /* pic_struct_present_flag */

  7677. 

  7678.     sps->bitstream_restriction_flag = get_bits1(&s->gb);

  7679.     if(sps->bitstream_restriction_flag){

  7680.         get_bits1(&s->gb);     /* motion_vectors_over_pic_boundaries_flag */

  7681.         get_ue_golomb(&s->gb); /* max_bytes_per_pic_denom */

  7682.         get_ue_golomb(&s->gb); /* max_bits_per_mb_denom */

  7683.         get_ue_golomb(&s->gb); /* log2_max_mv_length_horizontal */

  7684.         get_ue_golomb(&s->gb); /* log2_max_mv_length_vertical */

  7685.         sps->num_reorder_frames = get_ue_golomb(&s->gb);

  7686.         get_ue_golomb(&s->gb); /* max_dec_frame_buffering */

  7687.     }

  7688. 

  7689.     return 0;

  7690. }

  7691. 

  7692. static void decode_scaling_list(H264Context *h, uint8_t *factors, int size,

  7693.                                 const uint8_t *jvt_list, const uint8_t *fallback_list){

  7694.     MpegEncContext * const s = &h->s;

  7695.     int i, last = 8, next = 8;

  7696.     const uint8_t *scan = size == 16 ? zigzag_scan : zigzag_scan8x8;

  7697.     if(!get_bits1(&s->gb)) /* matrix not written, we use the predicted one */

  7698.         memcpy(factors, fallback_list, size*sizeof(uint8_t));

  7699.     else

  7700.     for(i=0;i<size;i++){

  7701.         if(next)

  7702.             next = (last + get_se_golomb(&s->gb)) & 0xff;

  7703.         if(!i && !next){ /* matrix not written, we use the preset one */

  7704.             memcpy(factors, jvt_list, size*sizeof(uint8_t));

  7705.             break;

  7706.         }

  7707.         last = factors[scan[i]] = next ? next : last;

  7708.     }

  7709. }

  7710. 

  7711. static void decode_scaling_matrices(H264Context *h, SPS *sps, PPS *pps, int is_sps,

  7712.                                    uint8_t (*scaling_matrix4)[16], uint8_t (*scaling_matrix8)[64]){

  7713.     MpegEncContext * const s = &h->s;

  7714.     int fallback_sps = !is_sps && sps->scaling_matrix_present;

  7715.     const uint8_t *fallback[4] = {

  7716.         fallback_sps ? sps->scaling_matrix4[0] : default_scaling4[0],

  7717.         fallback_sps ? sps->scaling_matrix4[3] : default_scaling4[1],

  7718.         fallback_sps ? sps->scaling_matrix8[0] : default_scaling8[0],

  7719.         fallback_sps ? sps->scaling_matrix8[1] : default_scaling8[1]

  7720.     };

  7721.     if(get_bits1(&s->gb)){

  7722.         sps->scaling_matrix_present |= is_sps;

  7723.         decode_scaling_list(h,scaling_matrix4[0],16,default_scaling4[0],fallback[0]); // Intra, Y

  7724.         decode_scaling_list(h,scaling_matrix4[1],16,default_scaling4[0],scaling_matrix4[0]); // Intra, Cr

  7725.         decode_scaling_list(h,scaling_matrix4[2],16,default_scaling4[0],scaling_matrix4[1]); // Intra, Cb

  7726.         decode_scaling_list(h,scaling_matrix4[3],16,default_scaling4[1],fallback[1]); // Inter, Y

  7727.         decode_scaling_list(h,scaling_matrix4[4],16,default_scaling4[1],scaling_matrix4[3]); // Inter, Cr

  7728.         decode_scaling_list(h,scaling_matrix4[5],16,default_scaling4[1],scaling_matrix4[4]); // Inter, Cb

  7729.         if(is_sps || pps->transform_8x8_mode){

  7730.             decode_scaling_list(h,scaling_matrix8[0],64,default_scaling8[0],fallback[2]);  // Intra, Y

  7731.             decode_scaling_list(h,scaling_matrix8[1],64,default_scaling8[1],fallback[3]);  // Inter, Y

  7732.         }

  7733.     } else if(fallback_sps) {

  7734.         memcpy(scaling_matrix4, sps->scaling_matrix4, 6*16*sizeof(uint8_t));

  7735.         memcpy(scaling_matrix8, sps->scaling_matrix8, 2*64*sizeof(uint8_t));

  7736.     }

  7737. }

  7738. 

  7739. static inline int decode_seq_parameter_set(H264Context *h){

  7740.     MpegEncContext * const s = &h->s;

  7741.     int profile_idc, level_idc;

  7742.     int sps_id, i;

  7743.     SPS *sps;

  7744. 

  7745.     profile_idc= get_bits(&s->gb, 8);

  7746.     get_bits1(&s->gb);   //constraint_set0_flag

  7747.     get_bits1(&s->gb);   //constraint_set1_flag

  7748.     get_bits1(&s->gb);   //constraint_set2_flag

  7749.     get_bits1(&s->gb);   //constraint_set3_flag

  7750.     get_bits(&s->gb, 4); // reserved

  7751.     level_idc= get_bits(&s->gb, 8);

  7752.     sps_id= get_ue_golomb(&s->gb);

  7753. 

  7754.     sps= &h->sps_buffer[ sps_id ];

  7755.     sps->profile_idc= profile_idc;

  7756.     sps->level_idc= level_idc;

  7757. 

  7758.     if(sps->profile_idc >= 100){ //high profile

  7759.         if(get_ue_golomb(&s->gb) == 3) //chroma_format_idc

  7760.             get_bits1(&s->gb);  //residual_color_transform_flag

  7761.         get_ue_golomb(&s->gb);  //bit_depth_luma_minus8

  7762.         get_ue_golomb(&s->gb);  //bit_depth_chroma_minus8

  7763.         sps->transform_bypass = get_bits1(&s->gb);

  7764.         decode_scaling_matrices(h, sps, NULL, 1, sps->scaling_matrix4, sps->scaling_matrix8);

  7765.     }else

  7766.         sps->scaling_matrix_present = 0;

  7767. 

  7768.     sps->log2_max_frame_num= get_ue_golomb(&s->gb) + 4;

  7769.     sps->poc_type= get_ue_golomb(&s->gb);

  7770. 

  7771.     if(sps->poc_type == 0){ //FIXME #define

  7772.         sps->log2_max_poc_lsb= get_ue_golomb(&s->gb) + 4;

  7773.     } else if(sps->poc_type == 1){//FIXME #define

  7774.         sps->delta_pic_order_always_zero_flag= get_bits1(&s->gb);

  7775.         sps->offset_for_non_ref_pic= get_se_golomb(&s->gb);

  7776.         sps->offset_for_top_to_bottom_field= get_se_golomb(&s->gb);

  7777.         sps->poc_cycle_length= get_ue_golomb(&s->gb);

  7778. 

  7779.         for(i=0; i<sps->poc_cycle_length; i++)

  7780.             sps->offset_for_ref_frame[i]= get_se_golomb(&s->gb);

  7781.     }

  7782.     if(sps->poc_type > 2){

  7783.         av_log(h->s.avctx, AV_LOG_ERROR, "illegal POC type %d\n", sps->poc_type);

  7784.         return -1;

  7785.     }

  7786. 

  7787.     sps->ref_frame_count= get_ue_golomb(&s->gb);

  7788.     if(sps->ref_frame_count > MAX_PICTURE_COUNT-2){

  7789.         av_log(h->s.avctx, AV_LOG_ERROR, "too many reference frames\n");

  7790.     }

  7791.     sps->gaps_in_frame_num_allowed_flag= get_bits1(&s->gb);

  7792.     sps->mb_width= get_ue_golomb(&s->gb) + 1;

  7793.     sps->mb_height= get_ue_golomb(&s->gb) + 1;

  7794.     if((unsigned)sps->mb_width >= INT_MAX/16 || (unsigned)sps->mb_height >= INT_MAX/16 ||

  7795.        avcodec_check_dimensions(NULL, 16*sps->mb_width, 16*sps->mb_height))

  7796.         return -1;

  7797. 

  7798.     sps->frame_mbs_only_flag= get_bits1(&s->gb);

  7799.     if(!sps->frame_mbs_only_flag)

  7800.         sps->mb_aff= get_bits1(&s->gb);

  7801.     else

  7802.         sps->mb_aff= 0;

  7803. 

  7804.     sps->direct_8x8_inference_flag= get_bits1(&s->gb);

  7805. 

  7806. #ifndef ALLOW_INTERLACE

  7807.     if(sps->mb_aff)

  7808.         av_log(h->s.avctx, AV_LOG_ERROR, "MBAFF support not included; enable it compilation time\n");

  7809. #endif

  7810.     if(!sps->direct_8x8_inference_flag && sps->mb_aff)

  7811.         av_log(h->s.avctx, AV_LOG_ERROR, "MBAFF + !direct_8x8_inference is not implemented\n");

  7812. 

  7813.     sps->crop= get_bits1(&s->gb);

  7814.     if(sps->crop){

  7815.         sps->crop_left  = get_ue_golomb(&s->gb);

  7816.         sps->crop_right = get_ue_golomb(&s->gb);

  7817.         sps->crop_top   = get_ue_golomb(&s->gb);

  7818.         sps->crop_bottom= get_ue_golomb(&s->gb);

  7819.         if(sps->crop_left || sps->crop_top){

  7820.             av_log(h->s.avctx, AV_LOG_ERROR, "insane cropping not completely supported, this could look slightly wrong ...\n");

  7821.         }

  7822.     }else{

  7823.         sps->crop_left  =

  7824.         sps->crop_right =

  7825.         sps->crop_top   =

  7826.         sps->crop_bottom= 0;

  7827.     }

  7828. 

  7829.     sps->vui_parameters_present_flag= get_bits1(&s->gb);

  7830.     if( sps->vui_parameters_present_flag )

  7831.         decode_vui_parameters(h, sps);

  7832. 

  7833.     if(s->avctx->debug&FF_DEBUG_PICT_INFO){

  7834.         av_log(h->s.avctx, AV_LOG_DEBUG, "sps:%d profile:%d/%d poc:%d ref:%d %dx%d %s %s crop:%d/%d/%d/%d %s\n",

  7835.                sps_id, sps->profile_idc, sps->level_idc,

  7836.                sps->poc_type,

  7837.                sps->ref_frame_count,

  7838.                sps->mb_width, sps->mb_height,

  7839.                sps->frame_mbs_only_flag ? "FRM" : (sps->mb_aff ? "MB-AFF" : "PIC-AFF"),

  7840.                sps->direct_8x8_inference_flag ? "8B8" : "",

  7841.                sps->crop_left, sps->crop_right,

  7842.                sps->crop_top, sps->crop_bottom,

  7843.                sps->vui_parameters_present_flag ? "VUI" : ""

  7844.                );

  7845.     }

  7846.     return 0;

  7847. }

  7848. 

  7849. static inline int decode_picture_parameter_set(H264Context *h, int bit_length){

  7850.     MpegEncContext * const s = &h->s;

  7851.     int pps_id= get_ue_golomb(&s->gb);

  7852.     PPS *pps= &h->pps_buffer[pps_id];

  7853. 

  7854.     pps->sps_id= get_ue_golomb(&s->gb);

  7855.     pps->cabac= get_bits1(&s->gb);

  7856.     pps->pic_order_present= get_bits1(&s->gb);

  7857.     pps->slice_group_count= get_ue_golomb(&s->gb) + 1;

  7858.     if(pps->slice_group_count > 1 ){

  7859.         pps->mb_slice_group_map_type= get_ue_golomb(&s->gb);

  7860.         av_log(h->s.avctx, AV_LOG_ERROR, "FMO not supported\n");

  7861.         switch(pps->mb_slice_group_map_type){

  7862.         case 0:

  7863. #if 0

  7864. |   for( i = 0; i <= num_slice_groups_minus1; i++ ) |   |        |

  7865. |    run_length[ i ]                                |1  |ue(v)   |

  7866. #endif

  7867.             break;

  7868.         case 2:

  7869. #if 0

  7870. |   for( i = 0; i < num_slice_groups_minus1; i++ )  |   |        |

  7871. |{                                                  |   |        |

  7872. |    top_left_mb[ i ]                               |1  |ue(v)   |

  7873. |    bottom_right_mb[ i ]                           |1  |ue(v)   |

  7874. |   }                                               |   |        |

  7875. #endif

  7876.             break;

  7877.         case 3:

  7878.         case 4:

  7879.         case 5:

  7880. #if 0

  7881. |   slice_group_change_direction_flag               |1  |u(1)    |

  7882. |   slice_group_change_rate_minus1                  |1  |ue(v)   |

  7883. #endif

  7884.             break;

  7885.         case 6:

  7886. #if 0

  7887. |   slice_group_id_cnt_minus1                       |1  |ue(v)   |

  7888. |   for( i = 0; i <= slice_group_id_cnt_minus1; i++ |   |        |

  7889. |)                                                  |   |        |

  7890. |    slice_group_id[ i ]                            |1  |u(v)    |

  7891. #endif

  7892.             break;

  7893.         }

  7894.     }

  7895.     pps->ref_count[0]= get_ue_golomb(&s->gb) + 1;

  7896.     pps->ref_count[1]= get_ue_golomb(&s->gb) + 1;

  7897.     if(pps->ref_count[0] > 32 || pps->ref_count[1] > 32){

  7898.         av_log(h->s.avctx, AV_LOG_ERROR, "reference overflow (pps)\n");

  7899.         return -1;

  7900.     }

  7901. 

  7902.     pps->weighted_pred= get_bits1(&s->gb);

  7903.     pps->weighted_bipred_idc= get_bits(&s->gb, 2);

  7904.     pps->init_qp= get_se_golomb(&s->gb) + 26;

  7905.     pps->init_qs= get_se_golomb(&s->gb) + 26;

  7906.     pps->chroma_qp_index_offset= get_se_golomb(&s->gb);

  7907.     pps->deblocking_filter_parameters_present= get_bits1(&s->gb);

  7908.     pps->constrained_intra_pred= get_bits1(&s->gb);

  7909.     pps->redundant_pic_cnt_present = get_bits1(&s->gb);

  7910. 

  7911.     pps->transform_8x8_mode= 0;

  7912.     h->dequant_coeff_pps= -1; //contents of sps/pps can change even if id doesn't, so reinit

  7913.     memset(pps->scaling_matrix4, 16, 6*16*sizeof(uint8_t));

  7914.     memset(pps->scaling_matrix8, 16, 2*64*sizeof(uint8_t));

  7915. 

  7916.     if(get_bits_count(&s->gb) < bit_length){

  7917.         pps->transform_8x8_mode= get_bits1(&s->gb);

  7918.         decode_scaling_matrices(h, &h->sps_buffer[pps->sps_id], pps, 0, pps->scaling_matrix4, pps->scaling_matrix8);

  7919.         get_se_golomb(&s->gb);  //second_chroma_qp_index_offset

  7920.     }

  7921. 

  7922.     if(s->avctx->debug&FF_DEBUG_PICT_INFO){

  7923.         av_log(h->s.avctx, AV_LOG_DEBUG, "pps:%d sps:%d %s slice_groups:%d ref:%d/%d %s qp:%d/%d/%d %s %s %s %s\n",

  7924.                pps_id, pps->sps_id,

  7925.                pps->cabac ? "CABAC" : "CAVLC",

  7926.                pps->slice_group_count,

  7927.                pps->ref_count[0], pps->ref_count[1],

  7928.                pps->weighted_pred ? "weighted" : "",

  7929.                pps->init_qp, pps->init_qs, pps->chroma_qp_index_offset,

  7930.                pps->deblocking_filter_parameters_present ? "LPAR" : "",

  7931.                pps->constrained_intra_pred ? "CONSTR" : "",

  7932.                pps->redundant_pic_cnt_present ? "REDU" : "",

  7933.                pps->transform_8x8_mode ? "8x8DCT" : ""

  7934.                );

  7935.     }

  7936. 

  7937.     return 0;

  7938. }

  7939. 

  7940. /**

  7941.  * finds the end of the current frame in the bitstream.

  7942.  * @return the position of the first byte of the next frame, or -1

  7943.  */

  7944. static int find_frame_end(H264Context *h, const uint8_t *buf, int buf_size){

  7945.     int i;

  7946.     uint32_t state;

  7947.     ParseContext *pc = &(h->s.parse_context);

  7948. //printf("first %02X%02X%02X%02X\n", buf[0], buf[1],buf[2],buf[3]);

  7949. //    mb_addr= pc->mb_addr - 1;

  7950.     state= pc->state;

  7951.     for(i=0; i<=buf_size; i++){

  7952.         if((state&0xFFFFFF1F) == 0x101 || (state&0xFFFFFF1F) == 0x102 || (state&0xFFFFFF1F) == 0x105){

  7953.             tprintf("find_frame_end new startcode = %08x, frame_start_found = %d, pos = %d\n", state, pc->frame_start_found, i);

  7954.             if(pc->frame_start_found){

  7955.                 // If there isn't one more byte in the buffer

  7956.                 // the test on first_mb_in_slice cannot be done yet

  7957.                 // do it at next call.

  7958.                 if (i >= buf_size) break;

  7959.                 if (buf[i] & 0x80) {

  7960.                     // first_mb_in_slice is 0, probably the first nal of a new

  7961.                     // slice

  7962.                     tprintf("find_frame_end frame_end_found, state = %08x, pos = %d\n", state, i);

  7963.                     pc->state=-1;

  7964.                     pc->frame_start_found= 0;

  7965.                     return i-4;

  7966.                 }

  7967.             }

  7968.             pc->frame_start_found = 1;

  7969.         }

  7970.         if((state&0xFFFFFF1F) == 0x107 || (state&0xFFFFFF1F) == 0x108 || (state&0xFFFFFF1F) == 0x109){

  7971.            if(pc->frame_start_found){

  7972.                 pc->state=-1;

  7973.                 pc->frame_start_found= 0;

  7974.                 return i-4;

  7975.            }

  7976.         }

  7977.         if (i<buf_size)

  7978.             state= (state<<8) | buf[i];

  7979.     }

  7980. 

  7981.     pc->state= state;

  7982.     return END_NOT_FOUND;

  7983. }

  7984. 

  7985. #ifdef CONFIG_H264_PARSER

  7986. static int h264_parse(AVCodecParserContext *s,

  7987.                       AVCodecContext *avctx,

  7988.                       uint8_t **poutbuf, int *poutbuf_size,

  7989.                       const uint8_t *buf, int buf_size)

  7990. {

  7991.     H264Context *h = s->priv_data;

  7992.     ParseContext *pc = &h->s.parse_context;

  7993.     int next;

  7994. 

  7995.     next= find_frame_end(h, buf, buf_size);

  7996. 

  7997.     if (ff_combine_frame(pc, next, (uint8_t **)&buf, &buf_size) < 0) {

  7998.         *poutbuf = NULL;

  7999.         *poutbuf_size = 0;

  8000.         return buf_size;

  8001.     }

  8002. 

  8003.     *poutbuf = (uint8_t *)buf;

  8004.     *poutbuf_size = buf_size;

  8005.     return next;

  8006. }

  8007. 

  8008. static int h264_split(AVCodecContext *avctx,

  8009.                       const uint8_t *buf, int buf_size)

  8010. {

  8011.     int i;

  8012.     uint32_t state = -1;

  8013.     int has_sps= 0;

  8014. 

  8015.     for(i=0; i<=buf_size; i++){

  8016.         if((state&0xFFFFFF1F) == 0x107)

  8017.             has_sps=1;

  8018. /*        if((state&0xFFFFFF1F) == 0x101 || (state&0xFFFFFF1F) == 0x102 || (state&0xFFFFFF1F) == 0x105){

  8019.         }*/

  8020.         if((state&0xFFFFFF00) == 0x100 && (state&0xFFFFFF1F) != 0x107 && (state&0xFFFFFF1F) != 0x108 && (state&0xFFFFFF1F) != 0x109){

  8021.             if(has_sps){

  8022.                 while(i>4 && buf[i-5]==0) i--;

  8023.                 return i-4;

  8024.             }

  8025.         }

  8026.         if (i<buf_size)

  8027.             state= (state<<8) | buf[i];

  8028.     }

  8029.     return 0;

  8030. }

  8031. #endif /* CONFIG_H264_PARSER */

  8032. 

  8033. static int decode_nal_units(H264Context *h, uint8_t *buf, int buf_size){

  8034.     MpegEncContext * const s = &h->s;

  8035.     AVCodecContext * const avctx= s->avctx;

  8036.     int buf_index=0;

  8037. #if 0

  8038.     int i;

  8039.     for(i=0; i<50; i++){

  8040.         av_log(NULL, AV_LOG_ERROR,"%02X ", buf[i]);

  8041.     }

  8042. #endif

  8043.     h->slice_num = 0;

  8044.     s->current_picture_ptr= NULL;

  8045.     for(;;){

  8046.         int consumed;

  8047.         int dst_length;

  8048.         int bit_length;

  8049.         uint8_t *ptr;

  8050.         int i, nalsize = 0;

  8051. 

  8052.       if(h->is_avc) {

  8053.         if(buf_index >= buf_size) break;

  8054.         nalsize = 0;

  8055.         for(i = 0; i < h->nal_length_size; i++)

  8056.             nalsize = (nalsize << 8) | buf[buf_index++];

  8057.         if(nalsize <= 1){

  8058.             if(nalsize == 1){

  8059.                 buf_index++;

  8060.                 continue;

  8061.             }else{

  8062.                 av_log(h->s.avctx, AV_LOG_ERROR, "AVC: nal size %d\n", nalsize);

  8063.                 break;

  8064.             }

  8065.         }

  8066.       } else {

  8067.         // start code prefix search

  8068.         for(; buf_index + 3 < buf_size; buf_index++){

  8069.             // this should allways succeed in the first iteration

  8070.             if(buf[buf_index] == 0 && buf[buf_index+1] == 0 && buf[buf_index+2] == 1)

  8071.                 break;

  8072.         }

  8073. 

  8074.         if(buf_index+3 >= buf_size) break;

  8075. 

  8076.         buf_index+=3;

  8077.       }

  8078. 

  8079.         ptr= decode_nal(h, buf + buf_index, &dst_length, &consumed, h->is_avc ? nalsize : buf_size - buf_index);

  8080.         while(ptr[dst_length - 1] == 0 && dst_length > 1)

  8081.             dst_length--;

  8082.         bit_length= 8*dst_length - decode_rbsp_trailing(ptr + dst_length - 1);

  8083. 

  8084.         if(s->avctx->debug&FF_DEBUG_STARTCODE){

  8085.             av_log(h->s.avctx, AV_LOG_DEBUG, "NAL %d at %d/%d length %d\n", h->nal_unit_type, buf_index, buf_size, dst_length);

  8086.         }

  8087. 

  8088.         if (h->is_avc && (nalsize != consumed))

  8089.             av_log(h->s.avctx, AV_LOG_ERROR, "AVC: Consumed only %d bytes instead of %d\n", consumed, nalsize);

  8090. 

  8091.         buf_index += consumed;

  8092. 

  8093.         if(  (s->hurry_up == 1 && h->nal_ref_idc  == 0) //FIXME dont discard SEI id

  8094.            ||(avctx->skip_frame >= AVDISCARD_NONREF && h->nal_ref_idc  == 0))

  8095.             continue;

  8096. 

  8097.         switch(h->nal_unit_type){

  8098.         case NAL_IDR_SLICE:

  8099.             idr(h); //FIXME ensure we don't loose some frames if there is reordering

  8100.         case NAL_SLICE:

  8101.             init_get_bits(&s->gb, ptr, bit_length);

  8102.             h->intra_gb_ptr=

  8103.             h->inter_gb_ptr= &s->gb;

  8104.             s->data_partitioning = 0;

  8105. 

  8106.             if(decode_slice_header(h) < 0){

  8107.                 av_log(h->s.avctx, AV_LOG_ERROR, "decode_slice_header error\n");

  8108.                 break;

  8109.             }

  8110.             s->current_picture_ptr->key_frame= (h->nal_unit_type == NAL_IDR_SLICE);

  8111.             if(h->redundant_pic_count==0 && s->hurry_up < 5

  8112.                && (avctx->skip_frame < AVDISCARD_NONREF || h->nal_ref_idc)

  8113.                && (avctx->skip_frame < AVDISCARD_BIDIR  || h->slice_type!=B_TYPE)

  8114.                && (avctx->skip_frame < AVDISCARD_NONKEY || h->slice_type==I_TYPE)

  8115.                && avctx->skip_frame < AVDISCARD_ALL)

  8116.                 decode_slice(h);

  8117.             break;

  8118.         case NAL_DPA:

  8119.             init_get_bits(&s->gb, ptr, bit_length);

  8120.             h->intra_gb_ptr=

  8121.             h->inter_gb_ptr= NULL;

  8122.             s->data_partitioning = 1;

  8123. 

  8124.             if(decode_slice_header(h) < 0){

  8125.                 av_log(h->s.avctx, AV_LOG_ERROR, "decode_slice_header error\n");

  8126.             }

  8127.             break;

  8128.         case NAL_DPB:

  8129.             init_get_bits(&h->intra_gb, ptr, bit_length);

  8130.             h->intra_gb_ptr= &h->intra_gb;

  8131.             break;

  8132.         case NAL_DPC:

  8133.             init_get_bits(&h->inter_gb, ptr, bit_length);

  8134.             h->inter_gb_ptr= &h->inter_gb;

  8135. 

  8136.             if(h->redundant_pic_count==0 && h->intra_gb_ptr && s->data_partitioning

  8137.                && s->hurry_up < 5

  8138.                && (avctx->skip_frame < AVDISCARD_NONREF || h->nal_ref_idc)

  8139.                && (avctx->skip_frame < AVDISCARD_BIDIR  || h->slice_type!=B_TYPE)

  8140.                && (avctx->skip_frame < AVDISCARD_NONKEY || h->slice_type==I_TYPE)

  8141.                && avctx->skip_frame < AVDISCARD_ALL)

  8142.                 decode_slice(h);

  8143.             break;

  8144.         case NAL_SEI:

  8145.             init_get_bits(&s->gb, ptr, bit_length);

  8146.             decode_sei(h);

  8147.             break;

  8148.         case NAL_SPS:

  8149.             init_get_bits(&s->gb, ptr, bit_length);

  8150.             decode_seq_parameter_set(h);

  8151. 

  8152.             if(s->flags& CODEC_FLAG_LOW_DELAY)

  8153.                 s->low_delay=1;

  8154. 

  8155.             if(avctx->has_b_frames < 2)

  8156.                 avctx->has_b_frames= !s->low_delay;

  8157.             break;

  8158.         case NAL_PPS:

  8159.             init_get_bits(&s->gb, ptr, bit_length);

  8160. 

  8161.             decode_picture_parameter_set(h, bit_length);

  8162. 

  8163.             break;

  8164.         case NAL_AUD:

  8165.         case NAL_END_SEQUENCE:

  8166.         case NAL_END_STREAM:

  8167.         case NAL_FILLER_DATA:

  8168.         case NAL_SPS_EXT:

  8169.         case NAL_AUXILIARY_SLICE:

  8170.             break;

  8171.         default:

  8172.             av_log(avctx, AV_LOG_ERROR, "Unknown NAL code: %d\n", h->nal_unit_type);

  8173.         }

  8174.     }

  8175. 

  8176.     if(!s->current_picture_ptr) return buf_index; //no frame

  8177. 

  8178.     s->current_picture_ptr->qscale_type= FF_QSCALE_TYPE_H264;

  8179.     s->current_picture_ptr->pict_type= s->pict_type;

  8180. 

  8181.     h->prev_frame_num_offset= h->frame_num_offset;

  8182.     h->prev_frame_num= h->frame_num;

  8183.     if(s->current_picture_ptr->reference){

  8184.         h->prev_poc_msb= h->poc_msb;

  8185.         h->prev_poc_lsb= h->poc_lsb;

  8186.     }

  8187.     if(s->current_picture_ptr->reference)

  8188.         execute_ref_pic_marking(h, h->mmco, h->mmco_index);

  8189. 

  8190.     ff_er_frame_end(s);

  8191. 

  8192.     MPV_frame_end(s);

  8193. 

  8194.     return buf_index;

  8195. }

  8196. 

  8197. /**

  8198.  * returns the number of bytes consumed for building the current frame

  8199.  */

  8200. static int get_consumed_bytes(MpegEncContext *s, int pos, int buf_size){

  8201.     if(s->flags&CODEC_FLAG_TRUNCATED){

  8202.         pos -= s->parse_context.last_index;

  8203.         if(pos<0) pos=0; // FIXME remove (unneeded?)

  8204. 

  8205.         return pos;

  8206.     }else{

  8207.         if(pos==0) pos=1; //avoid infinite loops (i doubt thats needed but ...)

  8208.         if(pos+10>buf_size) pos=buf_size; // oops ;)

  8209. 

  8210.         return pos;

  8211.     }

  8212. }

  8213. 

  8214. static int decode_frame(AVCodecContext *avctx,

  8215.                              void *data, int *data_size,

  8216.                              uint8_t *buf, int buf_size)

  8217. {

  8218.     H264Context *h = avctx->priv_data;

  8219.     MpegEncContext *s = &h->s;

  8220.     AVFrame *pict = data;

  8221.     int buf_index;

  8222. 

  8223.     s->flags= avctx->flags;

  8224.     s->flags2= avctx->flags2;

  8225. 

  8226.    /* no supplementary picture */

  8227.     if (buf_size == 0) {

  8228.         return 0;

  8229.     }

  8230. 

  8231.     if(s->flags&CODEC_FLAG_TRUNCATED){

  8232.         int next= find_frame_end(h, buf, buf_size);

  8233. 

  8234.         if( ff_combine_frame(&s->parse_context, next, &buf, &buf_size) < 0 )

  8235.             return buf_size;

  8236. //printf("next:%d buf_size:%d last_index:%d\n", next, buf_size, s->parse_context.last_index);

  8237.     }

  8238. 

  8239.     if(h->is_avc && !h->got_avcC) {

  8240.         int i, cnt, nalsize;

  8241.         unsigned char *p = avctx->extradata;

  8242.         if(avctx->extradata_size < 7) {

  8243.             av_log(avctx, AV_LOG_ERROR, "avcC too short\n");

  8244.             return -1;

  8245.         }

  8246.         if(*p != 1) {

  8247.             av_log(avctx, AV_LOG_ERROR, "Unknown avcC version %d\n", *p);

  8248.             return -1;

  8249.         }

  8250.         /* sps and pps in the avcC always have length coded with 2 bytes,

  8251.            so put a fake nal_length_size = 2 while parsing them */

  8252.         h->nal_length_size = 2;

  8253.         // Decode sps from avcC

  8254.         cnt = *(p+5) & 0x1f; // Number of sps

  8255.         p += 6;

  8256.         for (i = 0; i < cnt; i++) {

  8257.             nalsize = BE_16(p) + 2;

  8258.             if(decode_nal_units(h, p, nalsize) < 0) {

  8259.                 av_log(avctx, AV_LOG_ERROR, "Decoding sps %d from avcC failed\n", i);

  8260.                 return -1;

  8261.             }

  8262.             p += nalsize;

  8263.         }

  8264.         // Decode pps from avcC

  8265.         cnt = *(p++); // Number of pps

  8266.         for (i = 0; i < cnt; i++) {

  8267.             nalsize = BE_16(p) + 2;

  8268.             if(decode_nal_units(h, p, nalsize)  != nalsize) {

  8269.                 av_log(avctx, AV_LOG_ERROR, "Decoding pps %d from avcC failed\n", i);

  8270.                 return -1;

  8271.             }

  8272.             p += nalsize;

  8273.         }

  8274.         // Now store right nal length size, that will be use to parse all other nals

  8275.         h->nal_length_size = ((*(((char*)(avctx->extradata))+4))&0x03)+1;

  8276.         // Do not reparse avcC

  8277.         h->got_avcC = 1;

  8278.     }

  8279. 

  8280.     if(!h->is_avc && s->avctx->extradata_size && s->picture_number==0){

  8281.         if(decode_nal_units(h, s->avctx->extradata, s->avctx->extradata_size) < 0)

  8282.             return -1;

  8283.     }

  8284. 

  8285.     buf_index=decode_nal_units(h, buf, buf_size);

  8286.     if(buf_index < 0)

  8287.         return -1;

  8288. 

  8289.     //FIXME do something with unavailable reference frames

  8290. 

  8291. //    if(ret==FRAME_SKIPPED) return get_consumed_bytes(s, buf_index, buf_size);

  8292.     if(!s->current_picture_ptr){

  8293.         av_log(h->s.avctx, AV_LOG_DEBUG, "error, NO frame\n");

  8294.         return -1;

  8295.     }

  8296. 

  8297.     {

  8298.         Picture *out = s->current_picture_ptr;

  8299. #if 0 //decode order

  8300.         *data_size = sizeof(AVFrame);

  8301. #else

  8302.         /* Sort B-frames into display order */

  8303.         Picture *cur = s->current_picture_ptr;

  8304.         Picture *prev = h->delayed_output_pic;

  8305.         int i, pics, cross_idr, out_of_order, out_idx;

  8306. 

  8307.         if(h->sps.bitstream_restriction_flag

  8308.            && s->avctx->has_b_frames < h->sps.num_reorder_frames){

  8309.             s->avctx->has_b_frames = h->sps.num_reorder_frames;

  8310.             s->low_delay = 0;

  8311.         }

  8312. 

  8313.         pics = 0;

  8314.         while(h->delayed_pic[pics]) pics++;

  8315.         h->delayed_pic[pics++] = cur;

  8316.         if(cur->reference == 0)

  8317.             cur->reference = 1;

  8318. 

  8319.         cross_idr = 0;

  8320.         for(i=0; h->delayed_pic[i]; i++)

  8321.             if(h->delayed_pic[i]->key_frame || h->delayed_pic[i]->poc==0)

  8322.                 cross_idr = 1;

  8323. 

  8324.         out = h->delayed_pic[0];

  8325.         out_idx = 0;

  8326.         for(i=1; h->delayed_pic[i] && !h->delayed_pic[i]->key_frame; i++)

  8327.             if(h->delayed_pic[i]->poc < out->poc){

  8328.                 out = h->delayed_pic[i];

  8329.                 out_idx = i;

  8330.             }

  8331. 

  8332.         out_of_order = !cross_idr && prev && out->poc < prev->poc;

  8333.         if(h->sps.bitstream_restriction_flag && s->avctx->has_b_frames >= h->sps.num_reorder_frames)

  8334.             { }

  8335.         else if(prev && pics <= s->avctx->has_b_frames)

  8336.             out = prev;

  8337.         else if((out_of_order && pics-1 == s->avctx->has_b_frames && pics < 15)

  8338.            || (s->low_delay &&

  8339.             ((!cross_idr && prev && out->poc > prev->poc + 2)

  8340.              || cur->pict_type == B_TYPE)))

  8341.         {

  8342.             s->low_delay = 0;

  8343.             s->avctx->has_b_frames++;

  8344.             out = prev;

  8345.         }

  8346.         else if(out_of_order)

  8347.             out = prev;

  8348. 

  8349.         if(out_of_order || pics > s->avctx->has_b_frames){

  8350.             for(i=out_idx; h->delayed_pic[i]; i++)

  8351.                 h->delayed_pic[i] = h->delayed_pic[i+1];

  8352.         }

  8353. 

  8354.         if(prev == out)

  8355.             *data_size = 0;

  8356.         else

  8357.             *data_size = sizeof(AVFrame);

  8358.         if(prev && prev != out && prev->reference == 1)

  8359.             prev->reference = 0;

  8360.         h->delayed_output_pic = out;

  8361. #endif

  8362. 

  8363.         if(out)

  8364.             *pict= *(AVFrame*)out;

  8365.         else

  8366.             av_log(avctx, AV_LOG_DEBUG, "no picture\n");

  8367.     }

  8368. 

  8369.     assert(pict->data[0] || !*data_size);

  8370.     ff_print_debug_info(s, pict);

  8371. //printf("out %d\n", (int)pict->data[0]);

  8372. #if 0 //?

  8373. 

  8374.     /* Return the Picture timestamp as the frame number */

  8375.     /* we substract 1 because it is added on utils.c    */

  8376.     avctx->frame_number = s->picture_number - 1;

  8377. #endif

  8378.     return get_consumed_bytes(s, buf_index, buf_size);

  8379. }

  8380. #if 0

  8381. static inline void fill_mb_avail(H264Context *h){

  8382.     MpegEncContext * const s = &h->s;

  8383.     const int mb_xy= s->mb_x + s->mb_y*s->mb_stride;

  8384. 

  8385.     if(s->mb_y){

  8386.         h->mb_avail[0]= s->mb_x                 && h->slice_table[mb_xy - s->mb_stride - 1] == h->slice_num;

  8387.         h->mb_avail[1]=                            h->slice_table[mb_xy - s->mb_stride    ] == h->slice_num;

  8388.         h->mb_avail[2]= s->mb_x+1 < s->mb_width && h->slice_table[mb_xy - s->mb_stride + 1] == h->slice_num;

  8389.     }else{

  8390.         h->mb_avail[0]=

  8391.         h->mb_avail[1]=

  8392.         h->mb_avail[2]= 0;

  8393.     }

  8394.     h->mb_avail[3]= s->mb_x && h->slice_table[mb_xy - 1] == h->slice_num;

  8395.     h->mb_avail[4]= 1; //FIXME move out

  8396.     h->mb_avail[5]= 0; //FIXME move out

  8397. }

  8398. #endif

  8399. 

  8400. #if 0 //selftest

  8401. #define COUNT 8000

  8402. #define SIZE (COUNT*40)

  8403. int main(){

  8404.     int i;

  8405.     uint8_t temp[SIZE];

  8406.     PutBitContext pb;

  8407.     GetBitContext gb;

  8408. //    int int_temp[10000];

  8409.     DSPContext dsp;

  8410.     AVCodecContext avctx;

  8411. 

  8412.     dsputil_init(&dsp, &avctx);

  8413. 

  8414.     init_put_bits(&pb, temp, SIZE);

  8415.     printf("testing unsigned exp golomb\n");

  8416.     for(i=0; i<COUNT; i++){

  8417.         START_TIMER

  8418.         set_ue_golomb(&pb, i);

  8419.         STOP_TIMER("set_ue_golomb");

  8420.     }

  8421.     flush_put_bits(&pb);

  8422. 

  8423.     init_get_bits(&gb, temp, 8*SIZE);

  8424.     for(i=0; i<COUNT; i++){

  8425.         int j, s;

  8426. 

  8427.         s= show_bits(&gb, 24);

  8428. 

  8429.         START_TIMER

  8430.         j= get_ue_golomb(&gb);

  8431.         if(j != i){

  8432.             printf("missmatch! at %d (%d should be %d) bits:%6X\n", i, j, i, s);

  8433. //            return -1;

  8434.         }

  8435.         STOP_TIMER("get_ue_golomb");

  8436.     }

  8437. 

  8438. 

  8439.     init_put_bits(&pb, temp, SIZE);

  8440.     printf("testing signed exp golomb\n");

  8441.     for(i=0; i<COUNT; i++){

  8442.         START_TIMER

  8443.         set_se_golomb(&pb, i - COUNT/2);

  8444.         STOP_TIMER("set_se_golomb");

  8445.     }

  8446.     flush_put_bits(&pb);

  8447. 

  8448.     init_get_bits(&gb, temp, 8*SIZE);

  8449.     for(i=0; i<COUNT; i++){

  8450.         int j, s;

  8451. 

  8452.         s= show_bits(&gb, 24);

  8453. 

  8454.         START_TIMER

  8455.         j= get_se_golomb(&gb);

  8456.         if(j != i - COUNT/2){

  8457.             printf("missmatch! at %d (%d should be %d) bits:%6X\n", i, j, i, s);

  8458. //            return -1;

  8459.         }

  8460.         STOP_TIMER("get_se_golomb");

  8461.     }

  8462. 

  8463.     printf("testing 4x4 (I)DCT\n");

  8464. 

  8465.     DCTELEM block[16];

  8466.     uint8_t src[16], ref[16];

  8467.     uint64_t error= 0, max_error=0;

  8468. 

  8469.     for(i=0; i<COUNT; i++){

  8470.         int j;

  8471. //        printf("%d %d %d\n", r1, r2, (r2-r1)*16);

  8472.         for(j=0; j<16; j++){

  8473.             ref[j]= random()%255;

  8474.             src[j]= random()%255;

  8475.         }

  8476. 

  8477.         h264_diff_dct_c(block, src, ref, 4);

  8478. 

  8479.         //normalize

  8480.         for(j=0; j<16; j++){

  8481. //            printf("%d ", block[j]);

  8482.             block[j]= block[j]*4;

  8483.             if(j&1) block[j]= (block[j]*4 + 2)/5;

  8484.             if(j&4) block[j]= (block[j]*4 + 2)/5;

  8485.         }

  8486. //        printf("\n");

  8487. 

  8488.         s->dsp.h264_idct_add(ref, block, 4);

  8489. /*        for(j=0; j<16; j++){

  8490.             printf("%d ", ref[j]);

  8491.         }

  8492.         printf("\n");*/

  8493. 

  8494.         for(j=0; j<16; j++){

  8495.             int diff= ABS(src[j] - ref[j]);

  8496. 

  8497.             error+= diff*diff;

  8498.             max_error= FFMAX(max_error, diff);

  8499.         }

  8500.     }

  8501.     printf("error=%f max_error=%d\n", ((float)error)/COUNT/16, (int)max_error );

  8502. #if 0

  8503.     printf("testing quantizer\n");

  8504.     for(qp=0; qp<52; qp++){

  8505.         for(i=0; i<16; i++)

  8506.             src1_block[i]= src2_block[i]= random()%255;

  8507. 

  8508.     }

  8509. #endif

  8510.     printf("Testing NAL layer\n");

  8511. 

  8512.     uint8_t bitstream[COUNT];

  8513.     uint8_t nal[COUNT*2];

  8514.     H264Context h;

  8515.     memset(&h, 0, sizeof(H264Context));

  8516. 

  8517.     for(i=0; i<COUNT; i++){

  8518.         int zeros= i;

  8519.         int nal_length;

  8520.         int consumed;

  8521.         int out_length;

  8522.         uint8_t *out;

  8523.         int j;

  8524. 

  8525.         for(j=0; j<COUNT; j++){

  8526.             bitstream[j]= (random() % 255) + 1;

  8527.         }

  8528. 

  8529.         for(j=0; j<zeros; j++){

  8530.             int pos= random() % COUNT;

  8531.             while(bitstream[pos] == 0){

  8532.                 pos++;

  8533.                 pos %= COUNT;

  8534.             }

  8535.             bitstream[pos]=0;

  8536.         }

  8537. 

  8538.         START_TIMER

  8539. 

  8540.         nal_length= encode_nal(&h, nal, bitstream, COUNT, COUNT*2);

  8541.         if(nal_length<0){

  8542.             printf("encoding failed\n");

  8543.             return -1;

  8544.         }

  8545. 

  8546.         out= decode_nal(&h, nal, &out_length, &consumed, nal_length);

  8547. 

  8548.         STOP_TIMER("NAL")

  8549. 

  8550.         if(out_length != COUNT){

  8551.             printf("incorrect length %d %d\n", out_length, COUNT);

  8552.             return -1;

  8553.         }

  8554. 

  8555.         if(consumed != nal_length){

  8556.             printf("incorrect consumed length %d %d\n", nal_length, consumed);

  8557.             return -1;

  8558.         }

  8559. 

  8560.         if(memcmp(bitstream, out, COUNT)){

  8561.             printf("missmatch\n");

  8562.             return -1;

  8563.         }

  8564.     }

  8565. 

  8566.     printf("Testing RBSP\n");

  8567. 

  8568. 

  8569.     return 0;

  8570. }

  8571. #endif

  8572. 

  8573. 

  8574. static int decode_end(AVCodecContext *avctx)

  8575. {

  8576.     H264Context *h = avctx->priv_data;

  8577.     MpegEncContext *s = &h->s;

  8578. 

  8579.     av_freep(&h->rbsp_buffer);

  8580.     free_tables(h); //FIXME cleanup init stuff perhaps

  8581.     MPV_common_end(s);

  8582. 

  8583. //    memset(h, 0, sizeof(H264Context));

  8584. 

  8585.     return 0;

  8586. }

  8587. 

  8588. 

  8589. AVCodec h264_decoder = {

  8590.     "h264",

  8591.     CODEC_TYPE_VIDEO,

  8592.     CODEC_ID_H264,

  8593.     sizeof(H264Context),

  8594.     decode_init,

  8595.     NULL,

  8596.     decode_end,

  8597.     decode_frame,

  8598.     /*CODEC_CAP_DRAW_HORIZ_BAND |*/ CODEC_CAP_DR1 | CODEC_CAP_TRUNCATED | CODEC_CAP_DELAY,

  8599.     .flush= flush_dpb,

  8600. };

  8601. 

  8602. #ifdef CONFIG_H264_PARSER

  8603. AVCodecParser h264_parser = {

  8604.     { CODEC_ID_H264 },

  8605.     sizeof(H264Context),

  8606.     NULL,

  8607.     h264_parse,

  8608.     ff_parse_close,

  8609.     h264_split,

  8610. };

  8611. #endif

  8612. 

  8613. #include "svq3.c"