git.sesse.net Git - ffmpeg/blob - libavcodec/msmpeg4enc.c

   1 /*
   2  * MSMPEG4 encoder backend
   3  * Copyright (c) 2001 Fabrice Bellard
   4  * Copyright (c) 2002-2004 Michael Niedermayer <michaelni@gmx.at>
   5  *
   6  * msmpeg4v1 & v2 stuff by Michael Niedermayer <michaelni@gmx.at>
   7  *
   8  * This file is part of FFmpeg.
   9  *
  10  * FFmpeg is free software; you can redistribute it and/or
  11  * modify it under the terms of the GNU Lesser General Public
  12  * License as published by the Free Software Foundation; either
  13  * version 2.1 of the License, or (at your option) any later version.
  14  *
  15  * FFmpeg is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  18  * Lesser General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU Lesser General Public
  21  * License along with FFmpeg; if not, write to the Free Software
  22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  23  */
  24
  25 /**
  26  * @file
  27  * MSMPEG4 encoder backend
  28  */
  29
  30 #include <stdint.h>
  31 #include <string.h>
  32
  33 #include "libavutil/avutil.h"
  34 #include "libavutil/mem.h"
  35 #include "mpegvideo.h"
  36 #include "msmpeg4.h"
  37 #include "h263.h"
  38 #include "mpeg4video.h"
  39 #include "msmpeg4.h"
  40 #include "msmpeg4data.h"
  41 #include "put_bits.h"
  42 #include "rl.h"
  43 #include "vc1data.h"
  44
  45 static uint8_t rl_length[NB_RL_TABLES][MAX_LEVEL+1][MAX_RUN+1][2];
  46
  47 /* build the table which associate a (x,y) motion vector to a vlc */
  48 static void init_mv_table(MVTable *tab)
  49 {
  50     int i, x, y;
  51
  52     tab->table_mv_index = av_malloc(sizeof(uint16_t) * 4096);
  53     /* mark all entries as not used */
  54     for(i=0;i<4096;i++)
  55         tab->table_mv_index[i] = tab->n;
  56
  57     for(i=0;i<tab->n;i++) {
  58         x = tab->table_mvx[i];
  59         y = tab->table_mvy[i];
  60         tab->table_mv_index[(x << 6) | y] = i;
  61     }
  62 }
  63
  64 void ff_msmpeg4_code012(PutBitContext *pb, int n)
  65 {
  66     if (n == 0) {
  67         put_bits(pb, 1, 0);
  68     } else {
  69         put_bits(pb, 1, 1);
  70         put_bits(pb, 1, (n >= 2));
  71     }
  72 }
  73
  74 static int get_size_of_code(MpegEncContext * s, RLTable *rl, int last, int run, int level, int intra){
  75     int size=0;
  76     int code;
  77     int run_diff= intra ? 0 : 1;
  78
  79     code = get_rl_index(rl, last, run, level);
  80     size+= rl->table_vlc[code][1];
  81     if (code == rl->n) {
  82         int level1, run1;
  83
  84         level1 = level - rl->max_level[last][run];
  85         if (level1 < 1)
  86             goto esc2;
  87         code = get_rl_index(rl, last, run, level1);
  88         if (code == rl->n) {
  89             esc2:
  90             size++;
  91             if (level > MAX_LEVEL)
  92                 goto esc3;
  93             run1 = run - rl->max_run[last][level] - run_diff;
  94             if (run1 < 0)
  95                 goto esc3;
  96             code = get_rl_index(rl, last, run1, level);
  97             if (code == rl->n) {
  98             esc3:
  99                 /* third escape */
 100                 size+=1+1+6+8;
 101             } else {
 102                 /* second escape */
 103                 size+= 1+1+ rl->table_vlc[code][1];
 104             }
 105         } else {
 106             /* first escape */
 107             size+= 1+1+ rl->table_vlc[code][1];
 108         }
 109     } else {
 110         size++;
 111     }
 112     return size;
 113 }
 114
 115 av_cold void ff_msmpeg4_encode_init(MpegEncContext *s)
 116 {
 117     static int init_done=0;
 118     int i;
 119
 120     ff_msmpeg4_common_init(s);
 121     if(s->msmpeg4_version>=4){
 122         s->min_qcoeff= -255;
 123         s->max_qcoeff=  255;
 124     }
 125
 126     if (!init_done) {
 127         /* init various encoding tables */
 128         init_done = 1;
 129         init_mv_table(&ff_mv_tables[0]);
 130         init_mv_table(&ff_mv_tables[1]);
 131         for(i=0;i<NB_RL_TABLES;i++)
 132             ff_init_rl(&ff_rl_table[i], ff_static_rl_table_store[i]);
 133
 134         for(i=0; i<NB_RL_TABLES; i++){
 135             int level;
 136             for (level = 1; level <= MAX_LEVEL; level++) {
 137                 int run;
 138                 for(run=0; run<=MAX_RUN; run++){
 139                     int last;
 140                     for(last=0; last<2; last++){
 141                         rl_length[i][level][run][last]= get_size_of_code(s, &ff_rl_table[  i], last, run, level, 0);
 142                     }
 143                 }
 144             }
 145         }
 146     }
 147 }
 148
 149 static void find_best_tables(MpegEncContext * s)
 150 {
 151     int i;
 152     int best        = 0, best_size        = INT_MAX;
 153     int chroma_best = 0, best_chroma_size = INT_MAX;
 154
 155     for(i=0; i<3; i++){
 156         int level;
 157         int chroma_size=0;
 158         int size=0;
 159
 160         if(i>0){// ;)
 161             size++;
 162             chroma_size++;
 163         }
 164         for(level=0; level<=MAX_LEVEL; level++){
 165             int run;
 166             for(run=0; run<=MAX_RUN; run++){
 167                 int last;
 168                 const int last_size= size + chroma_size;
 169                 for(last=0; last<2; last++){
 170                     int inter_count       = s->ac_stats[0][0][level][run][last] + s->ac_stats[0][1][level][run][last];
 171                     int intra_luma_count  = s->ac_stats[1][0][level][run][last];
 172                     int intra_chroma_count= s->ac_stats[1][1][level][run][last];
 173
 174                     if(s->pict_type==AV_PICTURE_TYPE_I){
 175                         size       += intra_luma_count  *rl_length[i  ][level][run][last];
 176                         chroma_size+= intra_chroma_count*rl_length[i+3][level][run][last];
 177                     }else{
 178                         size+=        intra_luma_count  *rl_length[i  ][level][run][last]
 179                                      +intra_chroma_count*rl_length[i+3][level][run][last]
 180                                      +inter_count       *rl_length[i+3][level][run][last];
 181                     }
 182                 }
 183                 if(last_size == size+chroma_size) break;
 184             }
 185         }
 186         if(size<best_size){
 187             best_size= size;
 188             best= i;
 189         }
 190         if(chroma_size<best_chroma_size){
 191             best_chroma_size= chroma_size;
 192             chroma_best= i;
 193         }
 194     }
 195
 196 //    printf("type:%d, best:%d, qp:%d, var:%d, mcvar:%d, size:%d //\n",
 197 //           s->pict_type, best, s->qscale, s->mb_var_sum, s->mc_mb_var_sum, best_size);
 198
 199     if(s->pict_type==AV_PICTURE_TYPE_P) chroma_best= best;
 200
 201     memset(s->ac_stats, 0, sizeof(int)*(MAX_LEVEL+1)*(MAX_RUN+1)*2*2*2);
 202
 203     s->rl_table_index       =        best;
 204     s->rl_chroma_table_index= chroma_best;
 205
 206     if(s->pict_type != s->last_non_b_pict_type){
 207         s->rl_table_index= 2;
 208         if(s->pict_type==AV_PICTURE_TYPE_I)
 209             s->rl_chroma_table_index= 1;
 210         else
 211             s->rl_chroma_table_index= 2;
 212     }
 213
 214 }
 215
 216 /* write MSMPEG4 compatible frame header */
 217 void ff_msmpeg4_encode_picture_header(MpegEncContext * s, int picture_number)
 218 {
 219     find_best_tables(s);
 220
 221     avpriv_align_put_bits(&s->pb);
 222     put_bits(&s->pb, 2, s->pict_type - 1);
 223
 224     put_bits(&s->pb, 5, s->qscale);
 225     if(s->msmpeg4_version<=2){
 226         s->rl_table_index = 2;
 227         s->rl_chroma_table_index = 2;
 228     }
 229
 230     s->dc_table_index = 1;
 231     s->mv_table_index = 1; /* only if P frame */
 232     s->use_skip_mb_code = 1; /* only if P frame */
 233     s->per_mb_rl_table = 0;
 234     if(s->msmpeg4_version==4)
 235         s->inter_intra_pred= (s->width*s->height < 320*240 && s->bit_rate<=II_BITRATE && s->pict_type==AV_PICTURE_TYPE_P);
 236 //printf("%d %d %d %d %d\n", s->pict_type, s->bit_rate, s->inter_intra_pred, s->width, s->height);
 237
 238     if (s->pict_type == AV_PICTURE_TYPE_I) {
 239         s->slice_height= s->mb_height/1;
 240         put_bits(&s->pb, 5, 0x16 + s->mb_height/s->slice_height);
 241
 242         if(s->msmpeg4_version==4){
 243             ff_msmpeg4_encode_ext_header(s);
 244             if(s->bit_rate>MBAC_BITRATE)
 245                 put_bits(&s->pb, 1, s->per_mb_rl_table);
 246         }
 247
 248         if(s->msmpeg4_version>2){
 249             if(!s->per_mb_rl_table){
 250                 ff_msmpeg4_code012(&s->pb, s->rl_chroma_table_index);
 251                 ff_msmpeg4_code012(&s->pb, s->rl_table_index);
 252             }
 253
 254             put_bits(&s->pb, 1, s->dc_table_index);
 255         }
 256     } else {
 257         put_bits(&s->pb, 1, s->use_skip_mb_code);
 258
 259         if(s->msmpeg4_version==4 && s->bit_rate>MBAC_BITRATE)
 260             put_bits(&s->pb, 1, s->per_mb_rl_table);
 261
 262         if(s->msmpeg4_version>2){
 263             if(!s->per_mb_rl_table)
 264                 ff_msmpeg4_code012(&s->pb, s->rl_table_index);
 265
 266             put_bits(&s->pb, 1, s->dc_table_index);
 267
 268             put_bits(&s->pb, 1, s->mv_table_index);
 269         }
 270     }
 271
 272     s->esc3_level_length= 0;
 273     s->esc3_run_length= 0;
 274 }
 275
 276 void ff_msmpeg4_encode_ext_header(MpegEncContext * s)
 277 {
 278         unsigned fps = s->avctx->time_base.den / s->avctx->time_base.num / FFMAX(s->avctx->ticks_per_frame, 1);
 279         put_bits(&s->pb, 5, FFMIN(fps, 31)); //yes 29.97 -> 29
 280
 281         put_bits(&s->pb, 11, FFMIN(s->bit_rate/1024, 2047));
 282
 283         if(s->msmpeg4_version>=3)
 284             put_bits(&s->pb, 1, s->flipflop_rounding);
 285         else
 286             av_assert0(s->flipflop_rounding==0);
 287 }
 288
 289 void ff_msmpeg4_encode_motion(MpegEncContext * s,
 290                                   int mx, int my)
 291 {
 292     int code;
 293     MVTable *mv;
 294
 295     /* modulo encoding */
 296     /* WARNING : you cannot reach all the MVs even with the modulo
 297        encoding. This is a somewhat strange compromise they took !!!  */
 298     if (mx <= -64)
 299         mx += 64;
 300     else if (mx >= 64)
 301         mx -= 64;
 302     if (my <= -64)
 303         my += 64;
 304     else if (my >= 64)
 305         my -= 64;
 306
 307     mx += 32;
 308     my += 32;
 309 #if 0
 310     if ((unsigned)mx >= 64 ||
 311         (unsigned)my >= 64)
 312         av_log(s->avctx, AV_LOG_ERROR, "error mx=%d my=%d\n", mx, my);
 313 #endif
 314     mv = &ff_mv_tables[s->mv_table_index];
 315
 316     code = mv->table_mv_index[(mx << 6) | my];
 317     put_bits(&s->pb,
 318              mv->table_mv_bits[code],
 319              mv->table_mv_code[code]);
 320     if (code == mv->n) {
 321         /* escape : code literally */
 322         put_bits(&s->pb, 6, mx);
 323         put_bits(&s->pb, 6, my);
 324     }
 325 }
 326
 327 void ff_msmpeg4_handle_slices(MpegEncContext *s){
 328     if (s->mb_x == 0) {
 329         if (s->slice_height && (s->mb_y % s->slice_height) == 0) {
 330             if(s->msmpeg4_version < 4){
 331                 ff_mpeg4_clean_buffers(s);
 332             }
 333             s->first_slice_line = 1;
 334         } else {
 335             s->first_slice_line = 0;
 336         }
 337     }
 338 }
 339
 340 static void msmpeg4v2_encode_motion(MpegEncContext * s, int val)
 341 {
 342     int range, bit_size, sign, code, bits;
 343
 344     if (val == 0) {
 345         /* zero vector */
 346         code = 0;
 347         put_bits(&s->pb, ff_mvtab[code][1], ff_mvtab[code][0]);
 348     } else {
 349         bit_size = s->f_code - 1;
 350         range = 1 << bit_size;
 351         if (val <= -64)
 352             val += 64;
 353         else if (val >= 64)
 354             val -= 64;
 355
 356         if (val >= 0) {
 357             sign = 0;
 358         } else {
 359             val = -val;
 360             sign = 1;
 361         }
 362         val--;
 363         code = (val >> bit_size) + 1;
 364         bits = val & (range - 1);
 365
 366         put_bits(&s->pb, ff_mvtab[code][1] + 1, (ff_mvtab[code][0] << 1) | sign);
 367         if (bit_size > 0) {
 368             put_bits(&s->pb, bit_size, bits);
 369         }
 370     }
 371 }
 372
 373 void ff_msmpeg4_encode_mb(MpegEncContext * s,
 374                           DCTELEM block[6][64],
 375                           int motion_x, int motion_y)
 376 {
 377     int cbp, coded_cbp, i;
 378     int pred_x, pred_y;
 379     uint8_t *coded_block;
 380
 381     ff_msmpeg4_handle_slices(s);
 382
 383     if (!s->mb_intra) {
 384         /* compute cbp */
 385         cbp = 0;
 386         for (i = 0; i < 6; i++) {
 387             if (s->block_last_index[i] >= 0)
 388                 cbp |= 1 << (5 - i);
 389         }
 390         if (s->use_skip_mb_code && (cbp | motion_x | motion_y) == 0) {
 391             /* skip macroblock */
 392             put_bits(&s->pb, 1, 1);
 393             s->last_bits++;
 394             s->misc_bits++;
 395             s->skip_count++;
 396
 397             return;
 398         }
 399         if (s->use_skip_mb_code)
 400             put_bits(&s->pb, 1, 0);     /* mb coded */
 401
 402         if(s->msmpeg4_version<=2){
 403             put_bits(&s->pb,
 404                      ff_v2_mb_type[cbp&3][1],
 405                      ff_v2_mb_type[cbp&3][0]);
 406             if((cbp&3) != 3) coded_cbp= cbp ^ 0x3C;
 407             else             coded_cbp= cbp;
 408
 409             put_bits(&s->pb,
 410                      ff_h263_cbpy_tab[coded_cbp>>2][1],
 411                      ff_h263_cbpy_tab[coded_cbp>>2][0]);
 412
 413             s->misc_bits += get_bits_diff(s);
 414
 415             ff_h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
 416             msmpeg4v2_encode_motion(s, motion_x - pred_x);
 417             msmpeg4v2_encode_motion(s, motion_y - pred_y);
 418         }else{
 419             put_bits(&s->pb,
 420                      ff_table_mb_non_intra[cbp + 64][1],
 421                      ff_table_mb_non_intra[cbp + 64][0]);
 422
 423             s->misc_bits += get_bits_diff(s);
 424
 425             /* motion vector */
 426             ff_h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
 427             ff_msmpeg4_encode_motion(s, motion_x - pred_x,
 428                                   motion_y - pred_y);
 429         }
 430
 431         s->mv_bits += get_bits_diff(s);
 432
 433         for (i = 0; i < 6; i++) {
 434             ff_msmpeg4_encode_block(s, block[i], i);
 435         }
 436         s->p_tex_bits += get_bits_diff(s);
 437     } else {
 438         /* compute cbp */
 439         cbp = 0;
 440         coded_cbp = 0;
 441         for (i = 0; i < 6; i++) {
 442             int val, pred;
 443             val = (s->block_last_index[i] >= 1);
 444             cbp |= val << (5 - i);
 445             if (i < 4) {
 446                 /* predict value for close blocks only for luma */
 447                 pred = ff_msmpeg4_coded_block_pred(s, i, &coded_block);
 448                 *coded_block = val;
 449                 val = val ^ pred;
 450             }
 451             coded_cbp |= val << (5 - i);
 452         }
 453
 454         if(s->msmpeg4_version<=2){
 455             if (s->pict_type == AV_PICTURE_TYPE_I) {
 456                 put_bits(&s->pb,
 457                          ff_v2_intra_cbpc[cbp&3][1], ff_v2_intra_cbpc[cbp&3][0]);
 458             } else {
 459                 if (s->use_skip_mb_code)
 460                     put_bits(&s->pb, 1, 0);     /* mb coded */
 461                 put_bits(&s->pb,
 462                          ff_v2_mb_type[(cbp&3) + 4][1],
 463                          ff_v2_mb_type[(cbp&3) + 4][0]);
 464             }
 465             put_bits(&s->pb, 1, 0);             /* no AC prediction yet */
 466             put_bits(&s->pb,
 467                      ff_h263_cbpy_tab[cbp>>2][1],
 468                      ff_h263_cbpy_tab[cbp>>2][0]);
 469         }else{
 470             if (s->pict_type == AV_PICTURE_TYPE_I) {
 471                 put_bits(&s->pb,
 472                          ff_msmp4_mb_i_table[coded_cbp][1], ff_msmp4_mb_i_table[coded_cbp][0]);
 473             } else {
 474                 if (s->use_skip_mb_code)
 475                     put_bits(&s->pb, 1, 0);     /* mb coded */
 476                 put_bits(&s->pb,
 477                          ff_table_mb_non_intra[cbp][1],
 478                          ff_table_mb_non_intra[cbp][0]);
 479             }
 480             put_bits(&s->pb, 1, 0);             /* no AC prediction yet */
 481             if(s->inter_intra_pred){
 482                 s->h263_aic_dir=0;
 483                 put_bits(&s->pb, ff_table_inter_intra[s->h263_aic_dir][1], ff_table_inter_intra[s->h263_aic_dir][0]);
 484             }
 485         }
 486         s->misc_bits += get_bits_diff(s);
 487
 488         for (i = 0; i < 6; i++) {
 489             ff_msmpeg4_encode_block(s, block[i], i);
 490         }
 491         s->i_tex_bits += get_bits_diff(s);
 492         s->i_count++;
 493     }
 494 }
 495
 496 static void msmpeg4_encode_dc(MpegEncContext * s, int level, int n, int *dir_ptr)
 497 {
 498     int sign, code;
 499     int pred, extquant;
 500     int extrabits = 0;
 501
 502     int16_t *dc_val;
 503     pred = ff_msmpeg4_pred_dc(s, n, &dc_val, dir_ptr);
 504
 505     /* update predictor */
 506     if (n < 4) {
 507         *dc_val = level * s->y_dc_scale;
 508     } else {
 509         *dc_val = level * s->c_dc_scale;
 510     }
 511
 512     /* do the prediction */
 513     level -= pred;
 514
 515     if(s->msmpeg4_version<=2){
 516         if (n < 4) {
 517             put_bits(&s->pb,
 518                      ff_v2_dc_lum_table[level + 256][1],
 519                      ff_v2_dc_lum_table[level + 256][0]);
 520         }else{
 521             put_bits(&s->pb,
 522                      ff_v2_dc_chroma_table[level + 256][1],
 523                      ff_v2_dc_chroma_table[level + 256][0]);
 524         }
 525     }else{
 526         sign = 0;
 527         if (level < 0) {
 528             level = -level;
 529             sign = 1;
 530         }
 531         code = level;
 532         if (code > DC_MAX)
 533             code = DC_MAX;
 534         else if( s->msmpeg4_version>=6 ) {
 535             if( s->qscale == 1 ) {
 536                 extquant = (level + 3) & 0x3;
 537                 code  = ((level+3)>>2);
 538             } else if( s->qscale == 2 ) {
 539                 extquant = (level + 1) & 0x1;
 540                 code  = ((level+1)>>1);
 541             }
 542         }
 543
 544         if (s->dc_table_index == 0) {
 545             if (n < 4) {
 546                 put_bits(&s->pb, ff_table0_dc_lum[code][1], ff_table0_dc_lum[code][0]);
 547             } else {
 548                 put_bits(&s->pb, ff_table0_dc_chroma[code][1], ff_table0_dc_chroma[code][0]);
 549             }
 550         } else {
 551             if (n < 4) {
 552                 put_bits(&s->pb, ff_table1_dc_lum[code][1], ff_table1_dc_lum[code][0]);
 553             } else {
 554                 put_bits(&s->pb, ff_table1_dc_chroma[code][1], ff_table1_dc_chroma[code][0]);
 555             }
 556         }
 557
 558         if(s->msmpeg4_version>=6 && s->qscale<=2)
 559             extrabits = 3 - s->qscale;
 560
 561         if (code == DC_MAX)
 562             put_bits(&s->pb, 8 + extrabits, level);
 563         else if(extrabits > 0)//== VC1 && s->qscale<=2
 564             put_bits(&s->pb, extrabits, extquant);
 565
 566         if (level != 0) {
 567             put_bits(&s->pb, 1, sign);
 568         }
 569     }
 570 }
 571
 572 /* Encoding of a block. Very similar to MPEG4 except for a different
 573    escape coding (same as H263) and more vlc tables.
 574  */
 575 void ff_msmpeg4_encode_block(MpegEncContext * s, DCTELEM * block, int n)
 576 {
 577     int level, run, last, i, j, last_index;
 578     int last_non_zero, sign, slevel;
 579     int code, run_diff, dc_pred_dir;
 580     const RLTable *rl;
 581     const uint8_t *scantable;
 582
 583     if (s->mb_intra) {
 584         msmpeg4_encode_dc(s, block[0], n, &dc_pred_dir);
 585         i = 1;
 586         if (n < 4) {
 587             rl = &ff_rl_table[s->rl_table_index];
 588         } else {
 589             rl = &ff_rl_table[3 + s->rl_chroma_table_index];
 590         }
 591         run_diff = s->msmpeg4_version>=4;
 592         scantable= s->intra_scantable.permutated;
 593     } else {
 594         i = 0;
 595         rl = &ff_rl_table[3 + s->rl_table_index];
 596         if(s->msmpeg4_version<=2)
 597             run_diff = 0;
 598         else
 599             run_diff = 1;
 600         scantable= s->inter_scantable.permutated;
 601     }
 602
 603     /* recalculate block_last_index for M$ wmv1 */
 604     if(s->msmpeg4_version>=4 && s->msmpeg4_version<6 && s->block_last_index[n]>0){
 605         for(last_index=63; last_index>=0; last_index--){
 606             if(block[scantable[last_index]]) break;
 607         }
 608         s->block_last_index[n]= last_index;
 609     }else
 610         last_index = s->block_last_index[n];
 611     /* AC coefs */
 612     last_non_zero = i - 1;
 613     for (; i <= last_index; i++) {
 614         j = scantable[i];
 615         level = block[j];
 616         if (level) {
 617             run = i - last_non_zero - 1;
 618             last = (i == last_index);
 619             sign = 0;
 620             slevel = level;
 621             if (level < 0) {
 622                 sign = 1;
 623                 level = -level;
 624             }
 625
 626             if(level<=MAX_LEVEL && run<=MAX_RUN){
 627                 s->ac_stats[s->mb_intra][n>3][level][run][last]++;
 628             }
 629
 630             s->ac_stats[s->mb_intra][n > 3][40][63][0]++; //esc3 like
 631
 632             code = get_rl_index(rl, last, run, level);
 633             put_bits(&s->pb, rl->table_vlc[code][1], rl->table_vlc[code][0]);
 634             if (code == rl->n) {
 635                 int level1, run1;
 636
 637                 level1 = level - rl->max_level[last][run];
 638                 if (level1 < 1)
 639                     goto esc2;
 640                 code = get_rl_index(rl, last, run, level1);
 641                 if (code == rl->n) {
 642                 esc2:
 643                     put_bits(&s->pb, 1, 0);
 644                     if (level > MAX_LEVEL)
 645                         goto esc3;
 646                     run1 = run - rl->max_run[last][level] - run_diff;
 647                     if (run1 < 0)
 648                         goto esc3;
 649                     code = get_rl_index(rl, last, run1+1, level);
 650                     if (s->msmpeg4_version == 4 && code == rl->n)
 651                         goto esc3;
 652                     code = get_rl_index(rl, last, run1, level);
 653                     if (code == rl->n) {
 654                     esc3:
 655                         /* third escape */
 656                         put_bits(&s->pb, 1, 0);
 657                         put_bits(&s->pb, 1, last);
 658                         if(s->msmpeg4_version>=4){
 659                             if(s->esc3_level_length==0){
 660                                 s->esc3_level_length=8;
 661                                 s->esc3_run_length= 6;
 662                                 //ESCLVLSZ + ESCRUNSZ
 663                                 if(s->qscale<8)
 664                                     put_bits(&s->pb, 6 + (s->msmpeg4_version>=6), 3);
 665                                 else
 666                                     put_bits(&s->pb, 8, 3);
 667                             }
 668                             put_bits(&s->pb, s->esc3_run_length, run);
 669                             put_bits(&s->pb, 1, sign);
 670                             put_bits(&s->pb, s->esc3_level_length, level);
 671                         }else{
 672                             put_bits(&s->pb, 6, run);
 673                             put_sbits(&s->pb, 8, slevel);
 674                         }
 675                     } else {
 676                         /* second escape */
 677                         put_bits(&s->pb, 1, 1);
 678                         put_bits(&s->pb, rl->table_vlc[code][1], rl->table_vlc[code][0]);
 679                         put_bits(&s->pb, 1, sign);
 680                     }
 681                 } else {
 682                     /* first escape */
 683                     put_bits(&s->pb, 1, 1);
 684                     put_bits(&s->pb, rl->table_vlc[code][1], rl->table_vlc[code][0]);
 685                     put_bits(&s->pb, 1, sign);
 686                 }
 687             } else {
 688                 put_bits(&s->pb, 1, sign);
 689             }
 690             last_non_zero = i;
 691         }
 692     }
 693 }