00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00022
00023
00024
00030 #include "avcodec.h"
00031 #include "dsputil.h"
00032 #include "mpegvideo.h"
00033 #include "msmpeg4.h"
00034
00035
00036
00037
00038
00039
00040
00041
00042
00043
00044 #define DC_VLC_BITS 9
00045 #define CBPY_VLC_BITS 6
00046 #define V1_INTRA_CBPC_VLC_BITS 6
00047 #define V1_INTER_CBPC_VLC_BITS 6
00048 #define V2_INTRA_CBPC_VLC_BITS 3
00049 #define V2_MB_TYPE_VLC_BITS 7
00050 #define MV_VLC_BITS 9
00051 #define V2_MV_VLC_BITS 9
00052 #define TEX_VLC_BITS 9
00053
00054 #define II_BITRATE 128*1024
00055 #define MBAC_BITRATE 50*1024
00056
00057 #define DEFAULT_INTER_INDEX 3
00058
00059 static uint32_t v2_dc_lum_table[512][2];
00060 static uint32_t v2_dc_chroma_table[512][2];
00061
00062 static int msmpeg4_decode_dc(MpegEncContext * s, int n, int *dir_ptr);
00063 static void init_h263_dc_for_msmpeg4(void);
00064 static inline void msmpeg4_memsetw(short *tab, int val, int n);
00065 #ifdef CONFIG_ENCODERS
00066 static void msmpeg4v2_encode_motion(MpegEncContext * s, int val);
00067 static int get_size_of_code(MpegEncContext * s, RLTable *rl, int last, int run, int level, int intra);
00068 #endif //CONFIG_ENCODERS
00069 static int msmpeg4v12_decode_mb(MpegEncContext *s, DCTELEM block[6][64]);
00070 static int msmpeg4v34_decode_mb(MpegEncContext *s, DCTELEM block[6][64]);
00071
00072
00073 extern const uint8_t wmv3_dc_scale_table[32];
00074
00075 #ifdef DEBUG
00076 int intra_count = 0;
00077 int frame_count = 0;
00078 #endif
00079
00080 #include "msmpeg4data.h"
00081
00082 #ifdef CONFIG_ENCODERS //strangely gcc includes this even if it is not references
00083 static uint8_t rl_length[NB_RL_TABLES][MAX_LEVEL+1][MAX_RUN+1][2];
00084 #endif //CONFIG_ENCODERS
00085
00086 static uint8_t static_rl_table_store[NB_RL_TABLES][2][2*MAX_RUN + MAX_LEVEL + 3];
00087
00088 static void common_init(MpegEncContext * s)
00089 {
00090 static int inited=0;
00091
00092 switch(s->msmpeg4_version){
00093 case 1:
00094 case 2:
00095 s->y_dc_scale_table=
00096 s->c_dc_scale_table= ff_mpeg1_dc_scale_table;
00097 break;
00098 case 3:
00099 if(s->workaround_bugs){
00100 s->y_dc_scale_table= old_ff_y_dc_scale_table;
00101 s->c_dc_scale_table= old_ff_c_dc_scale_table;
00102 } else{
00103 s->y_dc_scale_table= ff_mpeg4_y_dc_scale_table;
00104 s->c_dc_scale_table= ff_mpeg4_c_dc_scale_table;
00105 }
00106 break;
00107 case 4:
00108 case 5:
00109 s->y_dc_scale_table= wmv1_y_dc_scale_table;
00110 s->c_dc_scale_table= wmv1_c_dc_scale_table;
00111 break;
00112 #if defined(CONFIG_WMV3_DECODER)||defined(CONFIG_VC1_DECODER)
00113 case 6:
00114 s->y_dc_scale_table= wmv3_dc_scale_table;
00115 s->c_dc_scale_table= wmv3_dc_scale_table;
00116 break;
00117 #endif
00118
00119 }
00120
00121
00122 if(s->msmpeg4_version>=4){
00123 ff_init_scantable(s->dsp.idct_permutation, &s->intra_scantable , wmv1_scantable[1]);
00124 ff_init_scantable(s->dsp.idct_permutation, &s->intra_h_scantable, wmv1_scantable[2]);
00125 ff_init_scantable(s->dsp.idct_permutation, &s->intra_v_scantable, wmv1_scantable[3]);
00126 ff_init_scantable(s->dsp.idct_permutation, &s->inter_scantable , wmv1_scantable[0]);
00127 }
00128
00129
00130 if(!inited){
00131 inited=1;
00132
00133 init_h263_dc_for_msmpeg4();
00134 }
00135 }
00136
00137 #ifdef CONFIG_ENCODERS
00138
00139
00140 static void init_mv_table(MVTable *tab)
00141 {
00142 int i, x, y;
00143
00144 tab->table_mv_index = av_malloc(sizeof(uint16_t) * 4096);
00145
00146 for(i=0;i<4096;i++)
00147 tab->table_mv_index[i] = tab->n;
00148
00149 for(i=0;i<tab->n;i++) {
00150 x = tab->table_mvx[i];
00151 y = tab->table_mvy[i];
00152 tab->table_mv_index[(x << 6) | y] = i;
00153 }
00154 }
00155
00156 void ff_msmpeg4_code012(PutBitContext *pb, int n)
00157 {
00158 if (n == 0) {
00159 put_bits(pb, 1, 0);
00160 } else {
00161 put_bits(pb, 1, 1);
00162 put_bits(pb, 1, (n >= 2));
00163 }
00164 }
00165
00166 void ff_msmpeg4_encode_init(MpegEncContext *s)
00167 {
00168 static int init_done=0;
00169 int i;
00170
00171 common_init(s);
00172 if(s->msmpeg4_version>=4){
00173 s->min_qcoeff= -255;
00174 s->max_qcoeff= 255;
00175 }
00176
00177 if (!init_done) {
00178
00179 init_done = 1;
00180 init_mv_table(&mv_tables[0]);
00181 init_mv_table(&mv_tables[1]);
00182 for(i=0;i<NB_RL_TABLES;i++)
00183 init_rl(&rl_table[i], static_rl_table_store[i]);
00184
00185 for(i=0; i<NB_RL_TABLES; i++){
00186 int level;
00187 for(level=0; level<=MAX_LEVEL; level++){
00188 int run;
00189 for(run=0; run<=MAX_RUN; run++){
00190 int last;
00191 for(last=0; last<2; last++){
00192 rl_length[i][level][run][last]= get_size_of_code(s, &rl_table[ i], last, run, level, 0);
00193 }
00194 }
00195 }
00196 }
00197 }
00198 }
00199
00200 static int get_size_of_code(MpegEncContext * s, RLTable *rl, int last, int run, int level, int intra){
00201 int size=0;
00202 int code;
00203 int run_diff= intra ? 0 : 1;
00204
00205 code = get_rl_index(rl, last, run, level);
00206 size+= rl->table_vlc[code][1];
00207 if (code == rl->n) {
00208 int level1, run1;
00209
00210 level1 = level - rl->max_level[last][run];
00211 if (level1 < 1)
00212 goto esc2;
00213 code = get_rl_index(rl, last, run, level1);
00214 if (code == rl->n) {
00215 esc2:
00216 size++;
00217 if (level > MAX_LEVEL)
00218 goto esc3;
00219 run1 = run - rl->max_run[last][level] - run_diff;
00220 if (run1 < 0)
00221 goto esc3;
00222 code = get_rl_index(rl, last, run1, level);
00223 if (code == rl->n) {
00224 esc3:
00225
00226 size+=1+1+6+8;
00227 } else {
00228
00229 size+= 1+1+ rl->table_vlc[code][1];
00230 }
00231 } else {
00232
00233 size+= 1+1+ rl->table_vlc[code][1];
00234 }
00235 } else {
00236 size++;
00237 }
00238 return size;
00239 }
00240
00241 void ff_find_best_tables(MpegEncContext * s)
00242 {
00243 int i;
00244 int best =-1, best_size =9999999;
00245 int chroma_best=-1, best_chroma_size=9999999;
00246
00247 for(i=0; i<3; i++){
00248 int level;
00249 int chroma_size=0;
00250 int size=0;
00251
00252 if(i>0){
00253 size++;
00254 chroma_size++;
00255 }
00256 for(level=0; level<=MAX_LEVEL; level++){
00257 int run;
00258 for(run=0; run<=MAX_RUN; run++){
00259 int last;
00260 const int last_size= size + chroma_size;
00261 for(last=0; last<2; last++){
00262 int inter_count = s->ac_stats[0][0][level][run][last] + s->ac_stats[0][1][level][run][last];
00263 int intra_luma_count = s->ac_stats[1][0][level][run][last];
00264 int intra_chroma_count= s->ac_stats[1][1][level][run][last];
00265
00266 if(s->pict_type==I_TYPE){
00267 size += intra_luma_count *rl_length[i ][level][run][last];
00268 chroma_size+= intra_chroma_count*rl_length[i+3][level][run][last];
00269 }else{
00270 size+= intra_luma_count *rl_length[i ][level][run][last]
00271 +intra_chroma_count*rl_length[i+3][level][run][last]
00272 +inter_count *rl_length[i+3][level][run][last];
00273 }
00274 }
00275 if(last_size == size+chroma_size) break;
00276 }
00277 }
00278 if(size<best_size){
00279 best_size= size;
00280 best= i;
00281 }
00282 if(chroma_size<best_chroma_size){
00283 best_chroma_size= chroma_size;
00284 chroma_best= i;
00285 }
00286 }
00287
00288
00289
00290
00291 if(s->pict_type==P_TYPE) chroma_best= best;
00292
00293 memset(s->ac_stats, 0, sizeof(int)*(MAX_LEVEL+1)*(MAX_RUN+1)*2*2*2);
00294
00295 s->rl_table_index = best;
00296 s->rl_chroma_table_index= chroma_best;
00297
00298 if(s->pict_type != s->last_non_b_pict_type){
00299 s->rl_table_index= 2;
00300 if(s->pict_type==I_TYPE)
00301 s->rl_chroma_table_index= 1;
00302 else
00303 s->rl_chroma_table_index= 2;
00304 }
00305
00306 }
00307
00308
00309 void msmpeg4_encode_picture_header(MpegEncContext * s, int picture_number)
00310 {
00311 ff_find_best_tables(s);
00312
00313 align_put_bits(&s->pb);
00314 put_bits(&s->pb, 2, s->pict_type - 1);
00315
00316 put_bits(&s->pb, 5, s->qscale);
00317 if(s->msmpeg4_version<=2){
00318 s->rl_table_index = 2;
00319 s->rl_chroma_table_index = 2;
00320 }
00321
00322 s->dc_table_index = 1;
00323 s->mv_table_index = 1;
00324 s->use_skip_mb_code = 1;
00325 s->per_mb_rl_table = 0;
00326 if(s->msmpeg4_version==4)
00327 s->inter_intra_pred= (s->width*s->height < 320*240 && s->bit_rate<=II_BITRATE && s->pict_type==P_TYPE);
00328
00329
00330 if (s->pict_type == I_TYPE) {
00331 s->slice_height= s->mb_height/1;
00332 put_bits(&s->pb, 5, 0x16 + s->mb_height/s->slice_height);
00333
00334 if(s->msmpeg4_version==4){
00335 msmpeg4_encode_ext_header(s);
00336 if(s->bit_rate>MBAC_BITRATE)
00337 put_bits(&s->pb, 1, s->per_mb_rl_table);
00338 }
00339
00340 if(s->msmpeg4_version>2){
00341 if(!s->per_mb_rl_table){
00342 ff_msmpeg4_code012(&s->pb, s->rl_chroma_table_index);
00343 ff_msmpeg4_code012(&s->pb, s->rl_table_index);
00344 }
00345
00346 put_bits(&s->pb, 1, s->dc_table_index);
00347 }
00348 } else {
00349 put_bits(&s->pb, 1, s->use_skip_mb_code);
00350
00351 if(s->msmpeg4_version==4 && s->bit_rate>MBAC_BITRATE)
00352 put_bits(&s->pb, 1, s->per_mb_rl_table);
00353
00354 if(s->msmpeg4_version>2){
00355 if(!s->per_mb_rl_table)
00356 ff_msmpeg4_code012(&s->pb, s->rl_table_index);
00357
00358 put_bits(&s->pb, 1, s->dc_table_index);
00359
00360 put_bits(&s->pb, 1, s->mv_table_index);
00361 }
00362 }
00363
00364 s->esc3_level_length= 0;
00365 s->esc3_run_length= 0;
00366
00367 #ifdef DEBUG
00368 intra_count = 0;
00369 av_log(s->avctx, AV_LOG_DEBUG, "*****frame %d:\n", frame_count++);
00370 #endif
00371 }
00372
00373 void msmpeg4_encode_ext_header(MpegEncContext * s)
00374 {
00375 put_bits(&s->pb, 5, s->avctx->time_base.den / s->avctx->time_base.num);
00376
00377 put_bits(&s->pb, 11, FFMIN(s->bit_rate/1024, 2047));
00378
00379 if(s->msmpeg4_version>=3)
00380 put_bits(&s->pb, 1, s->flipflop_rounding);
00381 else
00382 assert(s->flipflop_rounding==0);
00383 }
00384
00385 #endif //CONFIG_ENCODERS
00386
00387
00388 int ff_msmpeg4_coded_block_pred(MpegEncContext * s, int n, uint8_t **coded_block_ptr)
00389 {
00390 int xy, wrap, pred, a, b, c;
00391
00392 xy = s->block_index[n];
00393 wrap = s->b8_stride;
00394
00395
00396
00397
00398 a = s->coded_block[xy - 1 ];
00399 b = s->coded_block[xy - 1 - wrap];
00400 c = s->coded_block[xy - wrap];
00401
00402 if (b == c) {
00403 pred = a;
00404 } else {
00405 pred = c;
00406 }
00407
00408
00409 *coded_block_ptr = &s->coded_block[xy];
00410
00411 return pred;
00412 }
00413
00414 #ifdef CONFIG_ENCODERS
00415
00416 void ff_msmpeg4_encode_motion(MpegEncContext * s,
00417 int mx, int my)
00418 {
00419 int code;
00420 MVTable *mv;
00421
00422
00423
00424
00425 if (mx <= -64)
00426 mx += 64;
00427 else if (mx >= 64)
00428 mx -= 64;
00429 if (my <= -64)
00430 my += 64;
00431 else if (my >= 64)
00432 my -= 64;
00433
00434 mx += 32;
00435 my += 32;
00436 #if 0
00437 if ((unsigned)mx >= 64 ||
00438 (unsigned)my >= 64)
00439 av_log(s->avctx, AV_LOG_ERROR, "error mx=%d my=%d\n", mx, my);
00440 #endif
00441 mv = &mv_tables[s->mv_table_index];
00442
00443 code = mv->table_mv_index[(mx << 6) | my];
00444 put_bits(&s->pb,
00445 mv->table_mv_bits[code],
00446 mv->table_mv_code[code]);
00447 if (code == mv->n) {
00448
00449 put_bits(&s->pb, 6, mx);
00450 put_bits(&s->pb, 6, my);
00451 }
00452 }
00453
00454 void ff_msmpeg4_handle_slices(MpegEncContext *s){
00455 if (s->mb_x == 0) {
00456 if (s->slice_height && (s->mb_y % s->slice_height) == 0) {
00457 if(s->msmpeg4_version < 4){
00458 ff_mpeg4_clean_buffers(s);
00459 }
00460 s->first_slice_line = 1;
00461 } else {
00462 s->first_slice_line = 0;
00463 }
00464 }
00465 }
00466
00467 void msmpeg4_encode_mb(MpegEncContext * s,
00468 DCTELEM block[6][64],
00469 int motion_x, int motion_y)
00470 {
00471 int cbp, coded_cbp, i;
00472 int pred_x, pred_y;
00473 uint8_t *coded_block;
00474
00475 ff_msmpeg4_handle_slices(s);
00476
00477 if (!s->mb_intra) {
00478
00479 cbp = 0;
00480 for (i = 0; i < 6; i++) {
00481 if (s->block_last_index[i] >= 0)
00482 cbp |= 1 << (5 - i);
00483 }
00484 if (s->use_skip_mb_code && (cbp | motion_x | motion_y) == 0) {
00485
00486 put_bits(&s->pb, 1, 1);
00487 s->last_bits++;
00488 s->misc_bits++;
00489 s->skip_count++;
00490
00491 return;
00492 }
00493 if (s->use_skip_mb_code)
00494 put_bits(&s->pb, 1, 0);
00495
00496 if(s->msmpeg4_version<=2){
00497 put_bits(&s->pb,
00498 v2_mb_type[cbp&3][1],
00499 v2_mb_type[cbp&3][0]);
00500 if((cbp&3) != 3) coded_cbp= cbp ^ 0x3C;
00501 else coded_cbp= cbp;
00502
00503 put_bits(&s->pb,
00504 cbpy_tab[coded_cbp>>2][1],
00505 cbpy_tab[coded_cbp>>2][0]);
00506
00507 s->misc_bits += get_bits_diff(s);
00508
00509 h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
00510 msmpeg4v2_encode_motion(s, motion_x - pred_x);
00511 msmpeg4v2_encode_motion(s, motion_y - pred_y);
00512 }else{
00513 put_bits(&s->pb,
00514 table_mb_non_intra[cbp + 64][1],
00515 table_mb_non_intra[cbp + 64][0]);
00516
00517 s->misc_bits += get_bits_diff(s);
00518
00519
00520 h263_pred_motion(s, 0, 0, &pred_x, &pred_y);
00521 ff_msmpeg4_encode_motion(s, motion_x - pred_x,
00522 motion_y - pred_y);
00523 }
00524
00525 s->mv_bits += get_bits_diff(s);
00526
00527 for (i = 0; i < 6; i++) {
00528 ff_msmpeg4_encode_block(s, block[i], i);
00529 }
00530 s->p_tex_bits += get_bits_diff(s);
00531 } else {
00532
00533 cbp = 0;
00534 coded_cbp = 0;
00535 for (i = 0; i < 6; i++) {
00536 int val, pred;
00537 val = (s->block_last_index[i] >= 1);
00538 cbp |= val << (5 - i);
00539 if (i < 4) {
00540
00541 pred = ff_msmpeg4_coded_block_pred(s, i, &coded_block);
00542 *coded_block = val;
00543 val = val ^ pred;
00544 }
00545 coded_cbp |= val << (5 - i);
00546 }
00547 #if 0
00548 if (coded_cbp)
00549 printf("cbp=%x %x\n", cbp, coded_cbp);
00550 #endif
00551
00552 if(s->msmpeg4_version<=2){
00553 if (s->pict_type == I_TYPE) {
00554 put_bits(&s->pb,
00555 v2_intra_cbpc[cbp&3][1], v2_intra_cbpc[cbp&3][0]);
00556 } else {
00557 if (s->use_skip_mb_code)
00558 put_bits(&s->pb, 1, 0);
00559 put_bits(&s->pb,
00560 v2_mb_type[(cbp&3) + 4][1],
00561 v2_mb_type[(cbp&3) + 4][0]);
00562 }
00563 put_bits(&s->pb, 1, 0);
00564 put_bits(&s->pb,
00565 cbpy_tab[cbp>>2][1],
00566 cbpy_tab[cbp>>2][0]);
00567 }else{
00568 if (s->pict_type == I_TYPE) {
00569 put_bits(&s->pb,
00570 ff_msmp4_mb_i_table[coded_cbp][1], ff_msmp4_mb_i_table[coded_cbp][0]);
00571 } else {
00572 if (s->use_skip_mb_code)
00573 put_bits(&s->pb, 1, 0);
00574 put_bits(&s->pb,
00575 table_mb_non_intra[cbp][1],
00576 table_mb_non_intra[cbp][0]);
00577 }
00578 put_bits(&s->pb, 1, 0);
00579 if(s->inter_intra_pred){
00580 s->h263_aic_dir=0;
00581 put_bits(&s->pb, table_inter_intra[s->h263_aic_dir][1], table_inter_intra[s->h263_aic_dir][0]);
00582 }
00583 }
00584 s->misc_bits += get_bits_diff(s);
00585
00586 for (i = 0; i < 6; i++) {
00587 ff_msmpeg4_encode_block(s, block[i], i);
00588 }
00589 s->i_tex_bits += get_bits_diff(s);
00590 s->i_count++;
00591 }
00592 }
00593
00594 #endif //CONFIG_ENCODERS
00595
00596 static inline int msmpeg4v1_pred_dc(MpegEncContext * s, int n,
00597 int32_t **dc_val_ptr)
00598 {
00599 int i;
00600
00601 if (n < 4) {
00602 i= 0;
00603 } else {
00604 i= n-3;
00605 }
00606
00607 *dc_val_ptr= &s->last_dc[i];
00608 return s->last_dc[i];
00609 }
00610
00611 static int get_dc(uint8_t *src, int stride, int scale)
00612 {
00613 int y;
00614 int sum=0;
00615 for(y=0; y<8; y++){
00616 int x;
00617 for(x=0; x<8; x++){
00618 sum+=src[x + y*stride];
00619 }
00620 }
00621 return FASTDIV((sum + (scale>>1)), scale);
00622 }
00623
00624
00625 static inline int msmpeg4_pred_dc(MpegEncContext * s, int n,
00626 int16_t **dc_val_ptr, int *dir_ptr)
00627 {
00628 int a, b, c, wrap, pred, scale;
00629 int16_t *dc_val;
00630
00631
00632 if (n < 4) {
00633 scale = s->y_dc_scale;
00634 } else {
00635 scale = s->c_dc_scale;
00636 }
00637
00638 wrap = s->block_wrap[n];
00639 dc_val= s->dc_val[0] + s->block_index[n];
00640
00641
00642
00643
00644 a = dc_val[ - 1];
00645 b = dc_val[ - 1 - wrap];
00646 c = dc_val[ - wrap];
00647
00648 if(s->first_slice_line && (n&2)==0 && s->msmpeg4_version<4){
00649 b=c=1024;
00650 }
00651
00652
00653
00654
00655
00656 #if (defined(ARCH_X86)) && !defined PIC
00657 asm volatile(
00658 "movl %3, %%eax \n\t"
00659 "shrl $1, %%eax \n\t"
00660 "addl %%eax, %2 \n\t"
00661 "addl %%eax, %1 \n\t"
00662 "addl %0, %%eax \n\t"
00663 "mull %4 \n\t"
00664 "movl %%edx, %0 \n\t"
00665 "movl %1, %%eax \n\t"
00666 "mull %4 \n\t"
00667 "movl %%edx, %1 \n\t"
00668 "movl %2, %%eax \n\t"
00669 "mull %4 \n\t"
00670 "movl %%edx, %2 \n\t"
00671 : "+b" (a), "+c" (b), "+D" (c)
00672 : "g" (scale), "S" (ff_inverse[scale])
00673 : "%eax", "%edx"
00674 );
00675 #else
00676
00677
00678
00679
00680 if (scale == 8) {
00681 a = (a + (8 >> 1)) / 8;
00682 b = (b + (8 >> 1)) / 8;
00683 c = (c + (8 >> 1)) / 8;
00684 } else {
00685 a = FASTDIV((a + (scale >> 1)), scale);
00686 b = FASTDIV((b + (scale >> 1)), scale);
00687 c = FASTDIV((c + (scale >> 1)), scale);
00688 }
00689 #endif
00690
00691
00692 if(s->msmpeg4_version>3){
00693 if(s->inter_intra_pred){
00694 uint8_t *dest;
00695 int wrap;
00696
00697 if(n==1){
00698 pred=a;
00699 *dir_ptr = 0;
00700 }else if(n==2){
00701 pred=c;
00702 *dir_ptr = 1;
00703 }else if(n==3){
00704 if (abs(a - b) < abs(b - c)) {
00705 pred = c;
00706 *dir_ptr = 1;
00707 } else {
00708 pred = a;
00709 *dir_ptr = 0;
00710 }
00711 }else{
00712 if(n<4){
00713 wrap= s->linesize;
00714 dest= s->current_picture.data[0] + (((n>>1) + 2*s->mb_y) * 8* wrap ) + ((n&1) + 2*s->mb_x) * 8;
00715 }else{
00716 wrap= s->uvlinesize;
00717 dest= s->current_picture.data[n-3] + (s->mb_y * 8 * wrap) + s->mb_x * 8;
00718 }
00719 if(s->mb_x==0) a= (1024 + (scale>>1))/scale;
00720 else a= get_dc(dest-8, wrap, scale*8);
00721 if(s->mb_y==0) c= (1024 + (scale>>1))/scale;
00722 else c= get_dc(dest-8*wrap, wrap, scale*8);
00723
00724 if (s->h263_aic_dir==0) {
00725 pred= a;
00726 *dir_ptr = 0;
00727 }else if (s->h263_aic_dir==1) {
00728 if(n==0){
00729 pred= c;
00730 *dir_ptr = 1;
00731 }else{
00732 pred= a;
00733 *dir_ptr = 0;
00734 }
00735 }else if (s->h263_aic_dir==2) {
00736 if(n==0){
00737 pred= a;
00738 *dir_ptr = 0;
00739 }else{
00740 pred= c;
00741 *dir_ptr = 1;
00742 }
00743 } else {
00744 pred= c;
00745 *dir_ptr = 1;
00746 }
00747 }
00748 }else{
00749 if (abs(a - b) < abs(b - c)) {
00750 pred = c;
00751 *dir_ptr = 1;
00752 } else {
00753 pred = a;
00754 *dir_ptr = 0;
00755 }
00756 }
00757 }else{
00758 if (abs(a - b) <= abs(b - c)) {
00759 pred = c;
00760 *dir_ptr = 1;
00761 } else {
00762 pred = a;
00763 *dir_ptr = 0;
00764 }
00765 }
00766
00767
00768 *dc_val_ptr = &dc_val[0];
00769 return pred;
00770 }
00771
00772 #define DC_MAX 119
00773
00774 static void msmpeg4_encode_dc(MpegEncContext * s, int level, int n, int *dir_ptr)
00775 {
00776 int sign, code;
00777 int pred, extquant;
00778 int extrabits = 0;
00779
00780 if(s->msmpeg4_version==1){
00781 int32_t *dc_val;
00782 pred = msmpeg4v1_pred_dc(s, n, &dc_val);
00783
00784
00785 *dc_val= level;
00786 }else{
00787 int16_t *dc_val;
00788 pred = msmpeg4_pred_dc(s, n, &dc_val, dir_ptr);
00789
00790
00791 if (n < 4) {
00792 *dc_val = level * s->y_dc_scale;
00793 } else {
00794 *dc_val = level * s->c_dc_scale;
00795 }
00796 }
00797
00798
00799 level -= pred;
00800
00801 if(s->msmpeg4_version<=2){
00802 if (n < 4) {
00803 put_bits(&s->pb,
00804 v2_dc_lum_table[level+256][1],
00805 v2_dc_lum_table[level+256][0]);
00806 }else{
00807 put_bits(&s->pb,
00808 v2_dc_chroma_table[level+256][1],
00809 v2_dc_chroma_table[level+256][0]);
00810 }
00811 }else{
00812 sign = 0;
00813 if (level < 0) {
00814 level = -level;
00815 sign = 1;
00816 }
00817 code = level;
00818 if (code > DC_MAX)
00819 code = DC_MAX;
00820 else if( s->msmpeg4_version>=6 ) {
00821 if( s->qscale == 1 ) {
00822 extquant = (level + 3) & 0x3;
00823 code = ((level+3)>>2);
00824 } else if( s->qscale == 2 ) {
00825 extquant = (level + 1) & 0x1;
00826 code = ((level+1)>>1);
00827 }
00828 }
00829
00830 if (s->dc_table_index == 0) {
00831 if (n < 4) {
00832 put_bits(&s->pb, ff_table0_dc_lum[code][1], ff_table0_dc_lum[code][0]);
00833 } else {
00834 put_bits(&s->pb, ff_table0_dc_chroma[code][1], ff_table0_dc_chroma[code][0]);
00835 }
00836 } else {
00837 if (n < 4) {
00838 put_bits(&s->pb, ff_table1_dc_lum[code][1], ff_table1_dc_lum[code][0]);
00839 } else {
00840 put_bits(&s->pb, ff_table1_dc_chroma[code][1], ff_table1_dc_chroma[code][0]);
00841 }
00842 }
00843
00844 if(s->msmpeg4_version>=6 && s->qscale<=2)
00845 extrabits = 3 - s->qscale;
00846
00847 if (code == DC_MAX)
00848 put_bits(&s->pb, 8 + extrabits, level);
00849 else if(extrabits > 0)
00850 put_bits(&s->pb, extrabits, extquant);
00851
00852 if (level != 0) {
00853 put_bits(&s->pb, 1, sign);
00854 }
00855 }
00856 }
00857
00858
00859
00860
00861 void ff_msmpeg4_encode_block(MpegEncContext * s, DCTELEM * block, int n)
00862 {
00863 int level, run, last, i, j, last_index;
00864 int last_non_zero, sign, slevel;
00865 int code, run_diff, dc_pred_dir;
00866 const RLTable *rl;
00867 const uint8_t *scantable;
00868
00869 if (s->mb_intra) {
00870 msmpeg4_encode_dc(s, block[0], n, &dc_pred_dir);
00871 i = 1;
00872 if (n < 4) {
00873 rl = &rl_table[s->rl_table_index];
00874 } else {
00875 rl = &rl_table[3 + s->rl_chroma_table_index];
00876 }
00877 run_diff = s->msmpeg4_version>=4;
00878 scantable= s->intra_scantable.permutated;
00879 } else {
00880 i = 0;
00881 rl = &rl_table[3 + s->rl_table_index];
00882 if(s->msmpeg4_version<=2)
00883 run_diff = 0;
00884 else
00885 run_diff = 1;
00886 scantable= s->inter_scantable.permutated;
00887 }
00888
00889
00890 if(s->msmpeg4_version>=4 && s->msmpeg4_version<6 && s->block_last_index[n]>0){
00891 for(last_index=63; last_index>=0; last_index--){
00892 if(block[scantable[last_index]]) break;
00893 }
00894 s->block_last_index[n]= last_index;
00895 }else
00896 last_index = s->block_last_index[n];
00897
00898 last_non_zero = i - 1;
00899 for (; i <= last_index; i++) {
00900 j = scantable[i];
00901 level = block[j];
00902 if (level) {
00903 run = i - last_non_zero - 1;
00904 last = (i == last_index);
00905 sign = 0;
00906 slevel = level;
00907 if (level < 0) {
00908 sign = 1;
00909 level = -level;
00910 }
00911
00912 if(level<=MAX_LEVEL && run<=MAX_RUN){
00913 s->ac_stats[s->mb_intra][n>3][level][run][last]++;
00914 }
00915 #if 0
00916 else
00917 s->ac_stats[s->mb_intra][n>3][40][63][0]++;
00918 #endif
00919 code = get_rl_index(rl, last, run, level);
00920 put_bits(&s->pb, rl->table_vlc[code][1], rl->table_vlc[code][0]);
00921 if (code == rl->n) {
00922 int level1, run1;
00923
00924 level1 = level - rl->max_level[last][run];
00925 if (level1 < 1)
00926 goto esc2;
00927 code = get_rl_index(rl, last, run, level1);
00928 if (code == rl->n) {
00929 esc2:
00930 put_bits(&s->pb, 1, 0);
00931 if (level > MAX_LEVEL)
00932 goto esc3;
00933 run1 = run - rl->max_run[last][level] - run_diff;
00934 if (run1 < 0)
00935 goto esc3;
00936 code = get_rl_index(rl, last, run1+1, level);
00937 if (s->msmpeg4_version == 4 && code == rl->n)
00938 goto esc3;
00939 code = get_rl_index(rl, last, run1, level);
00940 if (code == rl->n) {
00941 esc3:
00942
00943 put_bits(&s->pb, 1, 0);
00944 put_bits(&s->pb, 1, last);
00945 if(s->msmpeg4_version>=4){
00946 if(s->esc3_level_length==0){
00947 s->esc3_level_length=8;
00948 s->esc3_run_length= 6;
00949
00950 if(s->qscale<8)
00951 put_bits(&s->pb, 6 + (s->msmpeg4_version>=6), 3);
00952 else
00953 put_bits(&s->pb, 8, 3);
00954 }
00955 put_bits(&s->pb, s->esc3_run_length, run);
00956 put_bits(&s->pb, 1, sign);
00957 put_bits(&s->pb, s->esc3_level_length, level);
00958 }else{
00959 put_bits(&s->pb, 6, run);
00960 put_bits(&s->pb, 8, slevel & 0xff);
00961 }
00962 } else {
00963
00964 put_bits(&s->pb, 1, 1);
00965 put_bits(&s->pb, rl->table_vlc[code][1], rl->table_vlc[code][0]);
00966 put_bits(&s->pb, 1, sign);
00967 }
00968 } else {
00969
00970 put_bits(&s->pb, 1, 1);
00971 put_bits(&s->pb, rl->table_vlc[code][1], rl->table_vlc[code][0]);
00972 put_bits(&s->pb, 1, sign);
00973 }
00974 } else {
00975 put_bits(&s->pb, 1, sign);
00976 }
00977 last_non_zero = i;
00978 }
00979 }
00980 }
00981
00982
00983
00984
00985 VLC ff_mb_non_intra_vlc[4];
00986 static VLC v2_dc_lum_vlc;
00987 static VLC v2_dc_chroma_vlc;
00988 static VLC cbpy_vlc;
00989 static VLC v2_intra_cbpc_vlc;
00990 static VLC v2_mb_type_vlc;
00991 static VLC v2_mv_vlc;
00992 static VLC v1_intra_cbpc_vlc;
00993 static VLC v1_inter_cbpc_vlc;
00994 VLC ff_inter_intra_vlc;
00995
00996
00997
00998 static void init_h263_dc_for_msmpeg4(void)
00999 {
01000 int level, uni_code, uni_len;
01001
01002 for(level=-256; level<256; level++){
01003 int size, v, l;
01004
01005 size = 0;
01006 v = abs(level);
01007 while (v) {
01008 v >>= 1;
01009 size++;
01010 }
01011
01012 if (level < 0)
01013 l= (-level) ^ ((1 << size) - 1);
01014 else
01015 l= level;
01016
01017
01018 uni_code= DCtab_lum[size][0];
01019 uni_len = DCtab_lum[size][1];
01020 uni_code ^= (1<<uni_len)-1;
01021
01022 if (size > 0) {
01023 uni_code<<=size; uni_code|=l;
01024 uni_len+=size;
01025 if (size > 8){
01026 uni_code<<=1; uni_code|=1;
01027 uni_len++;
01028 }
01029 }
01030 v2_dc_lum_table[level+256][0]= uni_code;
01031 v2_dc_lum_table[level+256][1]= uni_len;
01032
01033
01034 uni_code= DCtab_chrom[size][0];
01035 uni_len = DCtab_chrom[size][1];
01036 uni_code ^= (1<<uni_len)-1;
01037
01038 if (size > 0) {
01039 uni_code<<=size; uni_code|=l;
01040 uni_len+=size;
01041 if (size > 8){
01042 uni_code<<=1; uni_code|=1;
01043 uni_len++;
01044 }
01045 }
01046 v2_dc_chroma_table[level+256][0]= uni_code;
01047 v2_dc_chroma_table[level+256][1]= uni_len;
01048
01049 }
01050 }
01051
01052
01053 int ff_msmpeg4_decode_init(MpegEncContext *s)
01054 {
01055 static int done = 0;
01056 int i;
01057 MVTable *mv;
01058
01059 common_init(s);
01060
01061 if (!done) {
01062 done = 1;
01063
01064 for(i=0;i<NB_RL_TABLES;i++) {
01065 init_rl(&rl_table[i], static_rl_table_store[i]);
01066 init_vlc_rl(&rl_table[i], 1);
01067 }
01068 for(i=0;i<2;i++) {
01069 mv = &mv_tables[i];
01070 init_vlc(&mv->vlc, MV_VLC_BITS, mv->n + 1,
01071 mv->table_mv_bits, 1, 1,
01072 mv->table_mv_code, 2, 2, 1);
01073 }
01074
01075 init_vlc(&ff_msmp4_dc_luma_vlc[0], DC_VLC_BITS, 120,
01076 &ff_table0_dc_lum[0][1], 8, 4,
01077 &ff_table0_dc_lum[0][0], 8, 4, 1);
01078 init_vlc(&ff_msmp4_dc_chroma_vlc[0], DC_VLC_BITS, 120,
01079 &ff_table0_dc_chroma[0][1], 8, 4,
01080 &ff_table0_dc_chroma[0][0], 8, 4, 1);
01081 init_vlc(&ff_msmp4_dc_luma_vlc[1], DC_VLC_BITS, 120,
01082 &ff_table1_dc_lum[0][1], 8, 4,
01083 &ff_table1_dc_lum[0][0], 8, 4, 1);
01084 init_vlc(&ff_msmp4_dc_chroma_vlc[1], DC_VLC_BITS, 120,
01085 &ff_table1_dc_chroma[0][1], 8, 4,
01086 &ff_table1_dc_chroma[0][0], 8, 4, 1);
01087
01088 init_vlc(&v2_dc_lum_vlc, DC_VLC_BITS, 512,
01089 &v2_dc_lum_table[0][1], 8, 4,
01090 &v2_dc_lum_table[0][0], 8, 4, 1);
01091 init_vlc(&v2_dc_chroma_vlc, DC_VLC_BITS, 512,
01092 &v2_dc_chroma_table[0][1], 8, 4,
01093 &v2_dc_chroma_table[0][0], 8, 4, 1);
01094
01095 init_vlc(&cbpy_vlc, CBPY_VLC_BITS, 16,
01096 &cbpy_tab[0][1], 2, 1,
01097 &cbpy_tab[0][0], 2, 1, 1);
01098 init_vlc(&v2_intra_cbpc_vlc, V2_INTRA_CBPC_VLC_BITS, 4,
01099 &v2_intra_cbpc[0][1], 2, 1,
01100 &v2_intra_cbpc[0][0], 2, 1, 1);
01101 init_vlc(&v2_mb_type_vlc, V2_MB_TYPE_VLC_BITS, 8,
01102 &v2_mb_type[0][1], 2, 1,
01103 &v2_mb_type[0][0], 2, 1, 1);
01104 init_vlc(&v2_mv_vlc, V2_MV_VLC_BITS, 33,
01105 &mvtab[0][1], 2, 1,
01106 &mvtab[0][0], 2, 1, 1);
01107
01108 for(i=0; i<4; i++){
01109 init_vlc(&ff_mb_non_intra_vlc[i], MB_NON_INTRA_VLC_BITS, 128,
01110 &wmv2_inter_table[i][0][1], 8, 4,
01111 &wmv2_inter_table[i][0][0], 8, 4, 1);
01112 }
01113
01114 init_vlc(&ff_msmp4_mb_i_vlc, MB_INTRA_VLC_BITS, 64,
01115 &ff_msmp4_mb_i_table[0][1], 4, 2,
01116 &ff_msmp4_mb_i_table[0][0], 4, 2, 1);
01117
01118 init_vlc(&v1_intra_cbpc_vlc, V1_INTRA_CBPC_VLC_BITS, 8,
01119 intra_MCBPC_bits, 1, 1,
01120 intra_MCBPC_code, 1, 1, 1);
01121 init_vlc(&v1_inter_cbpc_vlc, V1_INTER_CBPC_VLC_BITS, 25,
01122 inter_MCBPC_bits, 1, 1,
01123 inter_MCBPC_code, 1, 1, 1);
01124
01125 init_vlc(&ff_inter_intra_vlc, INTER_INTRA_VLC_BITS, 4,
01126 &table_inter_intra[0][1], 2, 1,
01127 &table_inter_intra[0][0], 2, 1, 1);
01128 }
01129
01130 switch(s->msmpeg4_version){
01131 case 1:
01132 case 2:
01133 s->decode_mb= msmpeg4v12_decode_mb;
01134 break;
01135 case 3:
01136 case 4:
01137 s->decode_mb= msmpeg4v34_decode_mb;
01138 break;
01139 case 5:
01140 if (ENABLE_WMV2_DECODER)
01141 s->decode_mb= ff_wmv2_decode_mb;
01142 case 6:
01143
01144 break;
01145 }
01146
01147 s->slice_height= s->mb_height;
01148
01149 return 0;
01150 }
01151
01152 int msmpeg4_decode_picture_header(MpegEncContext * s)
01153 {
01154 int code;
01155
01156 #if 0
01157 {
01158 int i;
01159 for(i=0; i<s->gb.size_in_bits; i++)
01160 av_log(s->avctx, AV_LOG_DEBUG, "%d", get_bits1(&s->gb));
01161
01162 av_log(s->avctx, AV_LOG_DEBUG, "END\n");
01163 return -1;
01164 }
01165 #endif
01166
01167 if(s->msmpeg4_version==1){
01168 int start_code, num;
01169 start_code = (get_bits(&s->gb, 16)<<16) | get_bits(&s->gb, 16);
01170 if(start_code!=0x00000100){
01171 av_log(s->avctx, AV_LOG_ERROR, "invalid startcode\n");
01172 return -1;
01173 }
01174
01175 num= get_bits(&s->gb, 5);
01176 }
01177
01178 s->pict_type = get_bits(&s->gb, 2) + 1;
01179 if (s->pict_type != I_TYPE &&
01180 s->pict_type != P_TYPE){
01181 av_log(s->avctx, AV_LOG_ERROR, "invalid picture type\n");
01182 return -1;
01183 }
01184 #if 0
01185 {
01186 static int had_i=0;
01187 if(s->pict_type == I_TYPE) had_i=1;
01188 if(!had_i) return -1;
01189 }
01190 #endif
01191 s->chroma_qscale= s->qscale = get_bits(&s->gb, 5);
01192 if(s->qscale==0){
01193 av_log(s->avctx, AV_LOG_ERROR, "invalid qscale\n");
01194 return -1;
01195 }
01196
01197 if (s->pict_type == I_TYPE) {
01198 code = get_bits(&s->gb, 5);
01199 if(s->msmpeg4_version==1){
01200 if(code==0 || code>s->mb_height){
01201 av_log(s->avctx, AV_LOG_ERROR, "invalid slice height %d\n", code);
01202 return -1;
01203 }
01204
01205 s->slice_height = code;
01206 }else{
01207
01208 if (code < 0x17){
01209 av_log(s->avctx, AV_LOG_ERROR, "error, slice code was %X\n", code);
01210 return -1;
01211 }
01212
01213 s->slice_height = s->mb_height / (code - 0x16);
01214 }
01215
01216 switch(s->msmpeg4_version){
01217 case 1:
01218 case 2:
01219 s->rl_chroma_table_index = 2;
01220 s->rl_table_index = 2;
01221
01222 s->dc_table_index = 0;
01223 break;
01224 case 3:
01225 s->rl_chroma_table_index = decode012(&s->gb);
01226 s->rl_table_index = decode012(&s->gb);
01227
01228 s->dc_table_index = get_bits1(&s->gb);
01229 break;
01230 case 4:
01231 msmpeg4_decode_ext_header(s, (2+5+5+17+7)/8);
01232
01233 if(s->bit_rate > MBAC_BITRATE) s->per_mb_rl_table= get_bits1(&s->gb);
01234 else s->per_mb_rl_table= 0;
01235
01236 if(!s->per_mb_rl_table){
01237 s->rl_chroma_table_index = decode012(&s->gb);
01238 s->rl_table_index = decode012(&s->gb);
01239 }
01240
01241 s->dc_table_index = get_bits1(&s->gb);
01242 s->inter_intra_pred= 0;
01243 break;
01244 }
01245 s->no_rounding = 1;
01246 if(s->avctx->debug&FF_DEBUG_PICT_INFO)
01247 av_log(s->avctx, AV_LOG_DEBUG, "qscale:%d rlc:%d rl:%d dc:%d mbrl:%d slice:%d \n",
01248 s->qscale,
01249 s->rl_chroma_table_index,
01250 s->rl_table_index,
01251 s->dc_table_index,
01252 s->per_mb_rl_table,
01253 s->slice_height);
01254 } else {
01255 switch(s->msmpeg4_version){
01256 case 1:
01257 case 2:
01258 if(s->msmpeg4_version==1)
01259 s->use_skip_mb_code = 1;
01260 else
01261 s->use_skip_mb_code = get_bits1(&s->gb);
01262 s->rl_table_index = 2;
01263 s->rl_chroma_table_index = s->rl_table_index;
01264 s->dc_table_index = 0;
01265 s->mv_table_index = 0;
01266 break;
01267 case 3:
01268 s->use_skip_mb_code = get_bits1(&s->gb);
01269 s->rl_table_index = decode012(&s->gb);
01270 s->rl_chroma_table_index = s->rl_table_index;
01271
01272 s->dc_table_index = get_bits1(&s->gb);
01273
01274 s->mv_table_index = get_bits1(&s->gb);
01275 break;
01276 case 4:
01277 s->use_skip_mb_code = get_bits1(&s->gb);
01278
01279 if(s->bit_rate > MBAC_BITRATE) s->per_mb_rl_table= get_bits1(&s->gb);
01280 else s->per_mb_rl_table= 0;
01281
01282 if(!s->per_mb_rl_table){
01283 s->rl_table_index = decode012(&s->gb);
01284 s->rl_chroma_table_index = s->rl_table_index;
01285 }
01286
01287 s->dc_table_index = get_bits1(&s->gb);
01288
01289 s->mv_table_index = get_bits1(&s->gb);
01290 s->inter_intra_pred= (s->width*s->height < 320*240 && s->bit_rate<=II_BITRATE);
01291 break;
01292 }
01293
01294 if(s->avctx->debug&FF_DEBUG_PICT_INFO)
01295 av_log(s->avctx, AV_LOG_DEBUG, "skip:%d rl:%d rlc:%d dc:%d mv:%d mbrl:%d qp:%d \n",
01296 s->use_skip_mb_code,
01297 s->rl_table_index,
01298 s->rl_chroma_table_index,
01299 s->dc_table_index,
01300 s->mv_table_index,
01301 s->per_mb_rl_table,
01302 s->qscale);
01303
01304 if(s->flipflop_rounding){
01305 s->no_rounding ^= 1;
01306 }else{
01307 s->no_rounding = 0;
01308 }
01309 }
01310
01311
01312 s->esc3_level_length= 0;
01313 s->esc3_run_length= 0;
01314
01315 #ifdef DEBUG
01316 av_log(s->avctx, AV_LOG_DEBUG, "*****frame %d:\n", frame_count++);
01317 #endif
01318 return 0;
01319 }
01320
01321 int msmpeg4_decode_ext_header(MpegEncContext * s, int buf_size)
01322 {
01323 int left= buf_size*8 - get_bits_count(&s->gb);
01324 int length= s->msmpeg4_version>=3 ? 17 : 16;
01325
01326 if(left>=length && left<length+8)
01327 {
01328 int fps;
01329
01330 fps= get_bits(&s->gb, 5);
01331 s->bit_rate= get_bits(&s->gb, 11)*1024;
01332 if(s->msmpeg4_version>=3)
01333 s->flipflop_rounding= get_bits1(&s->gb);
01334 else
01335 s->flipflop_rounding= 0;
01336
01337
01338 }
01339 else if(left<length+8)
01340 {
01341 s->flipflop_rounding= 0;
01342 if(s->msmpeg4_version != 2)
01343 av_log(s->avctx, AV_LOG_ERROR, "ext header missing, %d left\n", left);
01344 }
01345 else
01346 {
01347 av_log(s->avctx, AV_LOG_ERROR, "I frame too long, ignoring ext header\n");
01348 }
01349
01350 return 0;
01351 }
01352
01353 static inline void msmpeg4_memsetw(short *tab, int val, int n)
01354 {
01355 int i;
01356 for(i=0;i<n;i++)
01357 tab[i] = val;
01358 }
01359
01360 #ifdef CONFIG_ENCODERS
01361 static void msmpeg4v2_encode_motion(MpegEncContext * s, int val)
01362 {
01363 int range, bit_size, sign, code, bits;
01364
01365 if (val == 0) {
01366
01367 code = 0;
01368 put_bits(&s->pb, mvtab[code][1], mvtab[code][0]);
01369 } else {
01370 bit_size = s->f_code - 1;
01371 range = 1 << bit_size;
01372 if (val <= -64)
01373 val += 64;
01374 else if (val >= 64)
01375 val -= 64;
01376
01377 if (val >= 0) {
01378 sign = 0;
01379 } else {
01380 val = -val;
01381 sign = 1;
01382 }
01383 val--;
01384 code = (val >> bit_size) + 1;
01385 bits = val & (range - 1);
01386
01387 put_bits(&s->pb, mvtab[code][1] + 1, (mvtab[code][0] << 1) | sign);
01388 if (bit_size > 0) {
01389 put_bits(&s->pb, bit_size, bits);
01390 }
01391 }
01392 }
01393 #endif
01394
01395
01396 static int msmpeg4v2_decode_motion(MpegEncContext * s, int pred, int f_code)
01397 {
01398 int code, val, sign, shift;
01399
01400 code = get_vlc2(&s->gb, v2_mv_vlc.table, V2_MV_VLC_BITS, 2);
01401
01402 if (code < 0)
01403 return 0xffff;
01404
01405 if (code == 0)
01406 return pred;
01407 sign = get_bits1(&s->gb);
01408 shift = f_code - 1;
01409 val = code;
01410 if (shift) {
01411 val = (val - 1) << shift;
01412 val |= get_bits(&s->gb, shift);
01413 val++;
01414 }
01415 if (sign)
01416 val = -val;
01417
01418 val += pred;
01419 if (val <= -64)
01420 val += 64;
01421 else if (val >= 64)
01422 val -= 64;
01423
01424 return val;
01425 }
01426
01427 static int msmpeg4v12_decode_mb(MpegEncContext *s, DCTELEM block[6][64])
01428 {
01429 int cbp, code, i;
01430
01431 if (s->pict_type == P_TYPE) {
01432 if (s->use_skip_mb_code) {
01433 if (get_bits1(&s->gb)) {
01434
01435 s->mb_intra = 0;
01436 for(i=0;i<6;i++)
01437 s->block_last_index[i] = -1;
01438 s->mv_dir = MV_DIR_FORWARD;
01439 s->mv_type = MV_TYPE_16X16;
01440 s->mv[0][0][0] = 0;
01441 s->mv[0][0][1] = 0;
01442 s->mb_skipped = 1;
01443 return 0;
01444 }
01445 }
01446
01447 if(s->msmpeg4_version==2)
01448 code = get_vlc2(&s->gb, v2_mb_type_vlc.table, V2_MB_TYPE_VLC_BITS, 1);
01449 else
01450 code = get_vlc2(&s->gb, v1_inter_cbpc_vlc.table, V1_INTER_CBPC_VLC_BITS, 3);
01451 if(code<0 || code>7){
01452 av_log(s->avctx, AV_LOG_ERROR, "cbpc %d invalid at %d %d\n", code, s->mb_x, s->mb_y);
01453 return -1;
01454 }
01455
01456 s->mb_intra = code >>2;
01457
01458 cbp = code & 0x3;
01459 } else {
01460 s->mb_intra = 1;
01461 if(s->msmpeg4_version==2)
01462 cbp= get_vlc2(&s->gb, v2_intra_cbpc_vlc.table, V2_INTRA_CBPC_VLC_BITS, 1);
01463 else
01464 cbp= get_vlc2(&s->gb, v1_intra_cbpc_vlc.table, V1_INTRA_CBPC_VLC_BITS, 1);
01465 if(cbp<0 || cbp>3){
01466 av_log(s->avctx, AV_LOG_ERROR, "cbpc %d invalid at %d %d\n", cbp, s->mb_x, s->mb_y);
01467 return -1;
01468 }
01469 }
01470
01471 if (!s->mb_intra) {
01472 int mx, my, cbpy;
01473
01474 cbpy= get_vlc2(&s->gb, cbpy_vlc.table, CBPY_VLC_BITS, 1);
01475 if(cbpy<0){
01476 av_log(s->avctx, AV_LOG_ERROR, "cbpy %d invalid at %d %d\n", cbp, s->mb_x, s->mb_y);
01477 return -1;
01478 }
01479
01480 cbp|= cbpy<<2;
01481 if(s->msmpeg4_version==1 || (cbp&3) != 3) cbp^= 0x3C;
01482
01483 h263_pred_motion(s, 0, 0, &mx, &my);
01484 mx= msmpeg4v2_decode_motion(s, mx, 1);
01485 my= msmpeg4v2_decode_motion(s, my, 1);
01486
01487 s->mv_dir = MV_DIR_FORWARD;
01488 s->mv_type = MV_TYPE_16X16;
01489 s->mv[0][0][0] = mx;
01490 s->mv[0][0][1] = my;
01491 } else {
01492 if(s->msmpeg4_version==2){
01493 s->ac_pred = get_bits1(&s->gb);
01494 cbp|= get_vlc2(&s->gb, cbpy_vlc.table, CBPY_VLC_BITS, 1)<<2;
01495 } else{
01496 s->ac_pred = 0;
01497 cbp|= get_vlc2(&s->gb, cbpy_vlc.table, CBPY_VLC_BITS, 1)<<2;
01498 if(s->pict_type==P_TYPE) cbp^=0x3C;
01499 }
01500 }
01501
01502 s->dsp.clear_blocks(s->block[0]);
01503 for (i = 0; i < 6; i++) {
01504 if (ff_msmpeg4_decode_block(s, block[i], i, (cbp >> (5 - i)) & 1, NULL) < 0)
01505 {
01506 av_log(s->avctx, AV_LOG_ERROR, "\nerror while decoding block: %d x %d (%d)\n", s->mb_x, s->mb_y, i);
01507 return -1;
01508 }
01509 }
01510 return 0;
01511 }
01512
01513 static int msmpeg4v34_decode_mb(MpegEncContext *s, DCTELEM block[6][64])
01514 {
01515 int cbp, code, i;
01516 uint8_t *coded_val;
01517 uint32_t * const mb_type_ptr= &s->current_picture.mb_type[ s->mb_x + s->mb_y*s->mb_stride ];
01518
01519 if (s->pict_type == P_TYPE) {
01520 if (s->use_skip_mb_code) {
01521 if (get_bits1(&s->gb)) {
01522
01523 s->mb_intra = 0;
01524 for(i=0;i<6;i++)
01525 s->block_last_index[i] = -1;
01526 s->mv_dir = MV_DIR_FORWARD;
01527 s->mv_type = MV_TYPE_16X16;
01528 s->mv[0][0][0] = 0;
01529 s->mv[0][0][1] = 0;
01530 s->mb_skipped = 1;
01531 *mb_type_ptr = MB_TYPE_SKIP | MB_TYPE_L0 | MB_TYPE_16x16;
01532
01533 return 0;
01534 }
01535 }
01536
01537 code = get_vlc2(&s->gb, ff_mb_non_intra_vlc[DEFAULT_INTER_INDEX].table, MB_NON_INTRA_VLC_BITS, 3);
01538 if (code < 0)
01539 return -1;
01540
01541 s->mb_intra = (~code & 0x40) >> 6;
01542
01543 cbp = code & 0x3f;
01544 } else {
01545 s->mb_intra = 1;
01546 code = get_vlc2(&s->gb, ff_msmp4_mb_i_vlc.table, MB_INTRA_VLC_BITS, 2);
01547 if (code < 0)
01548 return -1;
01549
01550 cbp = 0;
01551 for(i=0;i<6;i++) {
01552 int val = ((code >> (5 - i)) & 1);
01553 if (i < 4) {
01554 int pred = ff_msmpeg4_coded_block_pred(s, i, &coded_val);
01555 val = val ^ pred;
01556 *coded_val = val;
01557 }
01558 cbp |= val << (5 - i);
01559 }
01560 }
01561
01562 if (!s->mb_intra) {
01563 int mx, my;
01564
01565 if(s->per_mb_rl_table && cbp){
01566 s->rl_table_index = decode012(&s->gb);
01567 s->rl_chroma_table_index = s->rl_table_index;
01568 }
01569 h263_pred_motion(s, 0, 0, &mx, &my);
01570 if (ff_msmpeg4_decode_motion(s, &mx, &my) < 0)
01571 return -1;
01572 s->mv_dir = MV_DIR_FORWARD;
01573 s->mv_type = MV_TYPE_16X16;
01574 s->mv[0][0][0] = mx;
01575 s->mv[0][0][1] = my;
01576 *mb_type_ptr = MB_TYPE_L0 | MB_TYPE_16x16;
01577 } else {
01578
01579 s->ac_pred = get_bits1(&s->gb);
01580 *mb_type_ptr = MB_TYPE_INTRA;
01581 if(s->inter_intra_pred){
01582 s->h263_aic_dir= get_vlc2(&s->gb, ff_inter_intra_vlc.table, INTER_INTRA_VLC_BITS, 1);
01583
01584 }
01585 if(s->per_mb_rl_table && cbp){
01586 s->rl_table_index = decode012(&s->gb);
01587 s->rl_chroma_table_index = s->rl_table_index;
01588 }
01589 }
01590
01591 s->dsp.clear_blocks(s->block[0]);
01592 for (i = 0; i < 6; i++) {
01593 if (ff_msmpeg4_decode_block(s, block[i], i, (cbp >> (5 - i)) & 1, NULL) < 0)
01594 {
01595 av_log(s->avctx, AV_LOG_ERROR, "\nerror while decoding block: %d x %d (%d)\n", s->mb_x, s->mb_y, i);
01596 return -1;
01597 }
01598 }
01599
01600 return 0;
01601 }
01602
01603 int ff_msmpeg4_decode_block(MpegEncContext * s, DCTELEM * block,
01604 int n, int coded, const uint8_t *scan_table)
01605 {
01606 int level, i, last, run, run_diff;
01607 int dc_pred_dir;
01608 RLTable *rl;
01609 RL_VLC_ELEM *rl_vlc;
01610 int qmul, qadd;
01611
01612 if (s->mb_intra) {
01613 qmul=1;
01614 qadd=0;
01615
01616
01617 level = msmpeg4_decode_dc(s, n, &dc_pred_dir);
01618
01619 if (level < 0){
01620 av_log(s->avctx, AV_LOG_ERROR, "dc overflow- block: %d qscale: %d//\n", n, s->qscale);
01621 if(s->inter_intra_pred) level=0;
01622 else return -1;
01623 }
01624 if (n < 4) {
01625 rl = &rl_table[s->rl_table_index];
01626 if(level > 256*s->y_dc_scale){
01627 av_log(s->avctx, AV_LOG_ERROR, "dc overflow+ L qscale: %d//\n", s->qscale);
01628 if(!s->inter_intra_pred) return -1;
01629 }
01630 } else {
01631 rl = &rl_table[3 + s->rl_chroma_table_index];
01632 if(level > 256*s->c_dc_scale){
01633 av_log(s->avctx, AV_LOG_ERROR, "dc overflow+ C qscale: %d//\n", s->qscale);
01634 if(!s->inter_intra_pred) return -1;
01635 }
01636 }
01637 block[0] = level;
01638
01639 run_diff = s->msmpeg4_version >= 4;
01640 i = 0;
01641 if (!coded) {
01642 goto not_coded;
01643 }
01644 if (s->ac_pred) {
01645 if (dc_pred_dir == 0)
01646 scan_table = s->intra_v_scantable.permutated;
01647 else
01648 scan_table = s->intra_h_scantable.permutated;
01649 } else {
01650 scan_table = s->intra_scantable.permutated;
01651 }
01652 rl_vlc= rl->rl_vlc[0];
01653 } else {
01654 qmul = s->qscale << 1;
01655 qadd = (s->qscale - 1) | 1;
01656 i = -1;
01657 rl = &rl_table[3 + s->rl_table_index];
01658
01659 if(s->msmpeg4_version==2)
01660 run_diff = 0;
01661 else
01662 run_diff = 1;
01663
01664 if (!coded) {
01665 s->block_last_index[n] = i;
01666 return 0;
01667 }
01668 if(!scan_table)
01669 scan_table = s->inter_scantable.permutated;
01670 rl_vlc= rl->rl_vlc[s->qscale];
01671 }
01672 {
01673 OPEN_READER(re, &s->gb);
01674 for(;;) {
01675 UPDATE_CACHE(re, &s->gb);
01676 GET_RL_VLC(level, run, re, &s->gb, rl_vlc, TEX_VLC_BITS, 2, 0);
01677 if (level==0) {
01678 int cache;
01679 cache= GET_CACHE(re, &s->gb);
01680
01681 if (s->msmpeg4_version==1 || (cache&0x80000000)==0) {
01682 if (s->msmpeg4_version==1 || (cache&0x40000000)==0) {
01683
01684 if(s->msmpeg4_version!=1) LAST_SKIP_BITS(re, &s->gb, 2);
01685 UPDATE_CACHE(re, &s->gb);
01686 if(s->msmpeg4_version<=3){
01687 last= SHOW_UBITS(re, &s->gb, 1); SKIP_CACHE(re, &s->gb, 1);
01688 run= SHOW_UBITS(re, &s->gb, 6); SKIP_CACHE(re, &s->gb, 6);
01689 level= SHOW_SBITS(re, &s->gb, 8); LAST_SKIP_CACHE(re, &s->gb, 8);
01690 SKIP_COUNTER(re, &s->gb, 1+6+8);
01691 }else{
01692 int sign;
01693 last= SHOW_UBITS(re, &s->gb, 1); SKIP_BITS(re, &s->gb, 1);
01694 if(!s->esc3_level_length){
01695 int ll;
01696
01697 if(s->qscale<8){
01698 ll= SHOW_UBITS(re, &s->gb, 3); SKIP_BITS(re, &s->gb, 3);
01699 if(ll==0){
01700 if(SHOW_UBITS(re, &s->gb, 1)) av_log(s->avctx, AV_LOG_ERROR, "cool a new vlc code ,contact the ffmpeg developers and upload the file\n");
01701 SKIP_BITS(re, &s->gb, 1);
01702 ll=8;
01703 }
01704 }else{
01705 ll=2;
01706 while(ll<8 && SHOW_UBITS(re, &s->gb, 1)==0){
01707 ll++;
01708 SKIP_BITS(re, &s->gb, 1);
01709 }
01710 if(ll<8) SKIP_BITS(re, &s->gb, 1);
01711 }
01712
01713 s->esc3_level_length= ll;
01714 s->esc3_run_length= SHOW_UBITS(re, &s->gb, 2) + 3; SKIP_BITS(re, &s->gb, 2);
01715
01716 UPDATE_CACHE(re, &s->gb);
01717 }
01718 run= SHOW_UBITS(re, &s->gb, s->esc3_run_length);
01719 SKIP_BITS(re, &s->gb, s->esc3_run_length);
01720
01721 sign= SHOW_UBITS(re, &s->gb, 1);
01722 SKIP_BITS(re, &s->gb, 1);
01723
01724 level= SHOW_UBITS(re, &s->gb, s->esc3_level_length);
01725 SKIP_BITS(re, &s->gb, s->esc3_level_length);
01726 if(sign) level= -level;
01727 }
01728
01729 #if 0 // waste of time / this will detect very few errors
01730 {
01731 const int abs_level= FFABS(level);
01732 const int run1= run - rl->max_run[last][abs_level] - run_diff;
01733 if(abs_level<=MAX_LEVEL && run<=MAX_RUN){
01734 if(abs_level <= rl->max_level[last][run]){
01735 av_log(s->avctx, AV_LOG_ERROR, "illegal 3. esc, vlc encoding possible\n");
01736 return DECODING_AC_LOST;
01737 }
01738 if(abs_level <= rl->max_level[last][run]*2){
01739 av_log(s->avctx, AV_LOG_ERROR, "illegal 3. esc, esc 1 encoding possible\n");
01740 return DECODING_AC_LOST;
01741 }
01742 if(run1>=0 && abs_level <= rl->max_level[last][run1]){
01743 av_log(s->avctx, AV_LOG_ERROR, "illegal 3. esc, esc 2 encoding possible\n");
01744 return DECODING_AC_LOST;
01745 }
01746 }
01747 }
01748 #endif
01749
01750 if (level>0) level= level * qmul + qadd;
01751 else level= level * qmul - qadd;
01752 #if 0 // waste of time too :(
01753 if(level>2048 || level<-2048){
01754 av_log(s->avctx, AV_LOG_ERROR, "|level| overflow in 3. esc\n");
01755 return DECODING_AC_LOST;
01756 }
01757 #endif
01758 i+= run + 1;
01759 if(last) i+=192;
01760 #ifdef ERROR_DETAILS
01761 if(run==66)
01762 av_log(s->avctx, AV_LOG_ERROR, "illegal vlc code in ESC3 level=%d\n", level);
01763 else if((i>62 && i<192) || i>192+63)
01764 av_log(s->avctx, AV_LOG_ERROR, "run overflow in ESC3 i=%d run=%d level=%d\n", i, run, level);
01765 #endif
01766 } else {
01767
01768 #if MIN_CACHE_BITS < 23
01769 LAST_SKIP_BITS(re, &s->gb, 2);
01770 UPDATE_CACHE(re, &s->gb);
01771 #else
01772 SKIP_BITS(re, &s->gb, 2);
01773 #endif
01774 GET_RL_VLC(level, run, re, &s->gb, rl_vlc, TEX_VLC_BITS, 2, 1);
01775 i+= run + rl->max_run[run>>7][level/qmul] + run_diff;
01776 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
01777 LAST_SKIP_BITS(re, &s->gb, 1);
01778 #ifdef ERROR_DETAILS
01779 if(run==66)
01780 av_log(s->avctx, AV_LOG_ERROR, "illegal vlc code in ESC2 level=%d\n", level);
01781 else if((i>62 && i<192) || i>192+63)
01782 av_log(s->avctx, AV_LOG_ERROR, "run overflow in ESC2 i=%d run=%d level=%d\n", i, run, level);
01783 #endif
01784 }
01785 } else {
01786
01787 #if MIN_CACHE_BITS < 22
01788 LAST_SKIP_BITS(re, &s->gb, 1);
01789 UPDATE_CACHE(re, &s->gb);
01790 #else
01791 SKIP_BITS(re, &s->gb, 1);
01792 #endif
01793 GET_RL_VLC(level, run, re, &s->gb, rl_vlc, TEX_VLC_BITS, 2, 1);
01794 i+= run;
01795 level = level + rl->max_level[run>>7][(run-1)&63] * qmul;
01796 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
01797 LAST_SKIP_BITS(re, &s->gb, 1);
01798 #ifdef ERROR_DETAILS
01799 if(run==66)
01800 av_log(s->avctx, AV_LOG_ERROR, "illegal vlc code in ESC1 level=%d\n", level);
01801 else if((i>62 && i<192) || i>192+63)
01802 av_log(s->avctx, AV_LOG_ERROR, "run overflow in ESC1 i=%d run=%d level=%d\n", i, run, level);
01803 #endif
01804 }
01805 } else {
01806 i+= run;
01807 level = (level ^ SHOW_SBITS(re, &s->gb, 1)) - SHOW_SBITS(re, &s->gb, 1);
01808 LAST_SKIP_BITS(re, &s->gb, 1);
01809 #ifdef ERROR_DETAILS
01810 if(run==66)
01811 av_log(s->avctx, AV_LOG_ERROR, "illegal vlc code level=%d\n", level);
01812 else if((i>62 && i<192) || i>192+63)
01813 av_log(s->avctx, AV_LOG_ERROR, "run overflow i=%d run=%d level=%d\n", i, run, level);
01814 #endif
01815 }
01816 if (i > 62){
01817 i-= 192;
01818 if(i&(~63)){
01819 const int left= s->gb.size_in_bits - get_bits_count(&s->gb);
01820 if(((i+192 == 64 && level/qmul==-1) || s->error_resilience<=1) && left>=0){
01821 av_log(s->avctx, AV_LOG_ERROR, "ignoring overflow at %d %d\n", s->mb_x, s->mb_y);
01822 break;
01823 }else{
01824 av_log(s->avctx, AV_LOG_ERROR, "ac-tex damaged at %d %d\n", s->mb_x, s->mb_y);
01825 return -1;
01826 }
01827 }
01828
01829 block[scan_table[i]] = level;
01830 break;
01831 }
01832
01833 block[scan_table[i]] = level;
01834 }
01835 CLOSE_READER(re, &s->gb);
01836 }
01837 not_coded:
01838 if (s->mb_intra) {
01839 mpeg4_pred_ac(s, block, n, dc_pred_dir);
01840 if (s->ac_pred) {
01841 i = 63;
01842 }
01843 }
01844 if(s->msmpeg4_version>=4 && i>0) i=63;
01845 s->block_last_index[n] = i;
01846
01847 return 0;
01848 }
01849
01850 static int msmpeg4_decode_dc(MpegEncContext * s, int n, int *dir_ptr)
01851 {
01852 int level, pred;
01853
01854 if(s->msmpeg4_version<=2){
01855 if (n < 4) {
01856 level = get_vlc2(&s->gb, v2_dc_lum_vlc.table, DC_VLC_BITS, 3);
01857 } else {
01858 level = get_vlc2(&s->gb, v2_dc_chroma_vlc.table, DC_VLC_BITS, 3);
01859 }
01860 if (level < 0)
01861 return -1;
01862 level-=256;
01863 }else{
01864 if (n < 4) {
01865 level = get_vlc2(&s->gb, ff_msmp4_dc_luma_vlc[s->dc_table_index].table, DC_VLC_BITS, 3);
01866 } else {
01867 level = get_vlc2(&s->gb, ff_msmp4_dc_chroma_vlc[s->dc_table_index].table, DC_VLC_BITS, 3);
01868 }
01869 if (level < 0){
01870 av_log(s->avctx, AV_LOG_ERROR, "illegal dc vlc\n");
01871 return -1;
01872 }
01873
01874 if (level == DC_MAX) {
01875 level = get_bits(&s->gb, 8);
01876 if (get_bits1(&s->gb))
01877 level = -level;
01878 } else if (level != 0) {
01879 if (get_bits1(&s->gb))
01880 level = -level;
01881 }
01882 }
01883
01884 if(s->msmpeg4_version==1){
01885 int32_t *dc_val;
01886 pred = msmpeg4v1_pred_dc(s, n, &dc_val);
01887 level += pred;
01888
01889
01890 *dc_val= level;
01891 }else{
01892 int16_t *dc_val;
01893 pred = msmpeg4_pred_dc(s, n, &dc_val, dir_ptr);
01894 level += pred;
01895
01896
01897 if (n < 4) {
01898 *dc_val = level * s->y_dc_scale;
01899 } else {
01900 *dc_val = level * s->c_dc_scale;
01901 }
01902 }
01903
01904 return level;
01905 }
01906
01907 int ff_msmpeg4_decode_motion(MpegEncContext * s,
01908 int *mx_ptr, int *my_ptr)
01909 {
01910 MVTable *mv;
01911 int code, mx, my;
01912
01913 mv = &mv_tables[s->mv_table_index];
01914
01915 code = get_vlc2(&s->gb, mv->vlc.table, MV_VLC_BITS, 2);
01916 if (code < 0){
01917 av_log(s->avctx, AV_LOG_ERROR, "illegal MV code at %d %d\n", s->mb_x, s->mb_y);
01918 return -1;
01919 }
01920 if (code == mv->n) {
01921
01922 mx = get_bits(&s->gb, 6);
01923 my = get_bits(&s->gb, 6);
01924 } else {
01925 mx = mv->table_mvx[code];
01926 my = mv->table_mvy[code];
01927 }
01928
01929 mx += *mx_ptr - 32;
01930 my += *my_ptr - 32;
01931
01932 if (mx <= -64)
01933 mx += 64;
01934 else if (mx >= 64)
01935 mx -= 64;
01936
01937 if (my <= -64)
01938 my += 64;
01939 else if (my >= 64)
01940 my -= 64;
01941 *mx_ptr = mx;
01942 *my_ptr = my;
01943 return 0;
01944 }