/* putpic.c, 塊和運動向量編碼程序/

#include <stdio.h>#include "global.h"static void putmvs(int MV[2][2][2], int PMV[2][2][2],  int mv_field_sel[2][2], int dmvector[2], int s, int motion_type,  int hor_f_code, int vert_f_code);/* 量化和完整圖像的變長編碼*/void putpict(frame)unsigned char *frame;{  int i, j, k, comp, cc;  int mb_type;  int PMV[2][2][2];  int prev_mquant;  int cbp, MBAinc;  rc_init_pict(frame);   putpicthdr();  prev_mquant = rc_start_mb();   k = 0;  for (j=0; j<mb_height2; j++)  {    /* macroblock row loop */    for (i=0; i<mb_width; i++)    {      /* macroblock loop */      if (i==0)      {        alignbits();          putbits(SLICE_MIN_START+j,32);           /* quantiser_scale_code */        putbits(q_scale_type ? map_non_linear_mquant[prev_mquant]                             : prev_mquant >> 1, 5);          putbits(0,1); /* extra_bit_slice */          for (cc=0; cc<3; cc++)          dc_dct_pred[cc] = 0;        PMV[0][0][0]=PMV[0][0][1]=PMV[1][0][0]=PMV[1][0][1]=0;        PMV[0][1][0]=PMV[0][1][1]=PMV[1][1][0]=PMV[1][1][1]=0;          MBAinc = i + 1;      }      mb_type = mbinfo[k].mb_type;      mbinfo[k].mquant = rc_calc_mquant(k);      /* 量化宏塊*/      if (mb_type & MB_INTRA)      {        for (comp=0; comp<block_count; comp++)          quant_intra(blocks[k*block_count+comp],blocks[k*block_count+comp],                      dc_prec,intra_q,recip_intra_q, mbinfo[k].mquant);        mbinfo[k].cbp = cbp = (1<<block_count) - 1;      }      else      {        cbp = 0;        for (comp=0;comp<block_count;comp++)          cbp = (cbp<<1) | quant_non_intra(blocks[k*block_count+comp],                                           blocks[k*block_count+comp],                                           inter_q, recip_inter_q,mbinfo[k].mquant);        mbinfo[k].cbp = cbp;        if (cbp)          mb_type|= MB_PATTERN;      }      if (cbp && prev_mquant!=mbinfo[k].mquant)        mb_type|= MB_QUANT;      if (i!=0 && i!=mb_width-1 && !cbp)      {        if (pict_type==P_TYPE && !(mb_type&MB_FORWARD))        {          for (cc=0; cc<3; cc++)            dc_dct_pred[cc] = 0;          PMV[0][0][0]=PMV[0][0][1]=PMV[1][0][0]=PMV[1][0][1]=0;          PMV[0][1][0]=PMV[0][1][1]=PMV[1][1][0]=PMV[1][1][1]=0;          mbinfo[k].mb_type = mb_type;          mbinfo[k].skipped = 1;          MBAinc++;          k++;          continue;        }        if (pict_type==B_TYPE && pict_struct==FRAME_PICTURE            && mbinfo[k].motion_type==MC_FRAME            && ((mbinfo[k-1].mb_type^mb_type)&(MB_FORWARD|MB_BACKWARD))==0            && (!(mb_type&MB_FORWARD) ||                (PMV[0][0][0]==mbinfo[k].MV[0][0][0] &&                 PMV[0][0][1]==mbinfo[k].MV[0][0][1]))            && (!(mb_type&MB_BACKWARD) ||                (PMV[0][1][0]==mbinfo[k].MV[0][1][0] &&                 PMV[0][1][1]==mbinfo[k].MV[0][1][1])))        {                    mbinfo[k].mb_type = mb_type;          mbinfo[k].skipped = 1;          MBAinc++;          k++;          continue;        }        if (pict_type==B_TYPE && pict_struct!=FRAME_PICTURE            && mbinfo[k].motion_type==MC_FIELD            && ((mbinfo[k-1].mb_type^mb_type)&(MB_FORWARD|MB_BACKWARD))==0            && (!(mb_type&MB_FORWARD) ||                (PMV[0][0][0]==mbinfo[k].MV[0][0][0] &&                 PMV[0][0][1]==mbinfo[k].MV[0][0][1] &&                 mbinfo[k].mv_field_sel[0][0]==(pict_struct==BOTTOM_FIELD)))            && (!(mb_type&MB_BACKWARD) ||                (PMV[0][1][0]==mbinfo[k].MV[0][1][0] &&                 PMV[0][1][1]==mbinfo[k].MV[0][1][1] &&                 mbinfo[k].mv_field_sel[0][1]==(pict_struct==BOTTOM_FIELD))))        {          mbinfo[k].mb_type = mb_type;          mbinfo[k].skipped = 1;          MBAinc++;          k++;          continue;        }      }      mbinfo[k].skipped = 0;      if (pict_type==P_TYPE && !cbp && !(mb_type&MB_FORWARD))        mb_type|= MB_FORWARD;      putaddrinc(MBAinc);       MBAinc = 1;      putmbtype(pict_type,mb_type); /* macroblock type */      if (mb_type & (MB_FORWARD|MB_BACKWARD) && !frame_pred_dct)        putbits(mbinfo[k].motion_type,2);      if (pict_struct==FRAME_PICTURE && cbp && !frame_pred_dct)        putbits(mbinfo[k].dct_type,1);      if (mb_type & MB_QUANT)      {        putbits(q_scale_type ? map_non_linear_mquant[mbinfo[k].mquant]                             : mbinfo[k].mquant>>1,5);        prev_mquant = mbinfo[k].mquant;      }      if (mb_type & MB_FORWARD)      {        /* forward motion vectors, update predictors */        putmvs(mbinfo[k].MV,PMV,mbinfo[k].mv_field_sel,mbinfo[k].dmvector,0,          mbinfo[k].motion_type,forw_hor_f_code,forw_vert_f_code);      }      if (mb_type & MB_BACKWARD)      {        /* backward motion vectors, update predictors */        putmvs(mbinfo[k].MV,PMV,mbinfo[k].mv_field_sel,mbinfo[k].dmvector,1,          mbinfo[k].motion_type,back_hor_f_code,back_vert_f_code);      }      if (mb_type & MB_PATTERN)      {        putcbp((cbp >> (block_count-6)) & 63);        if (chroma_format!=CHROMA420)          putbits(cbp,block_count-6);      }      for (comp=0; comp<block_count; comp++)      {        /* block loop */        if (cbp & (1<<(block_count-1-comp)))        {          if (mb_type & MB_INTRA)          {            cc = (comp<4) ? 0 : (comp&1)+1;            putintrablk(blocks[k*block_count+comp],cc);          }          else            putnonintrablk(blocks[k*block_count+comp]);        }      }      /* reset predictors */      if (!(mb_type & MB_INTRA))        for (cc=0; cc<3; cc++)          dc_dct_pred[cc] = 0;      if (mb_type & MB_INTRA || (pict_type==P_TYPE && !(mb_type & MB_FORWARD)))      {        PMV[0][0][0]=PMV[0][0][1]=PMV[1][0][0]=PMV[1][0][1]=0;        PMV[0][1][0]=PMV[0][1][1]=PMV[1][1][0]=PMV[1][1][1]=0;      }      mbinfo[k].mb_type = mb_type;      k++;    }  }  rc_update_pict();  vbv_end_of_picture();}/* 輸出運動向量 * * 該程序也對運動向量的預測進行更新 */ static void putmvs(MV,PMV,mv_field_sel,dmvector,s,motion_type,  hor_f_code,vert_f_code)int MV[2][2][2],PMV[2][2][2];int mv_field_sel[2][2];int dmvector[2];int s,motion_type,hor_f_code,vert_f_code;{  if (pict_struct==FRAME_PICTURE)  {    if (motion_type==MC_FRAME)    {      /* frame prediction */      putmv(MV[0][s][0]-PMV[0][s][0],hor_f_code);      putmv(MV[0][s][1]-PMV[0][s][1],vert_f_code);      PMV[0][s][0]=PMV[1][s][0]=MV[0][s][0];      PMV[0][s][1]=PMV[1][s][1]=MV[0][s][1];    }    else if (motion_type==MC_FIELD)    {      /* field prediction */      putbits(mv_field_sel[0][s],1);      putmv(MV[0][s][0]-PMV[0][s][0],hor_f_code);      putmv((MV[0][s][1]>>1)-(PMV[0][s][1]>>1),vert_f_code);      putbits(mv_field_sel[1][s],1);      putmv(MV[1][s][0]-PMV[1][s][0],hor_f_code);      putmv((MV[1][s][1]>>1)-(PMV[1][s][1]>>1),vert_f_code);      PMV[0][s][0]=MV[0][s][0];      PMV[0][s][1]=MV[0][s][1];      PMV[1][s][0]=MV[1][s][0];      PMV[1][s][1]=MV[1][s][1];    }    else    {      /* dual prime prediction */      putmv(MV[0][s][0]-PMV[0][s][0],hor_f_code);      putdmv(dmvector[0]);      putmv((MV[0][s][1]>>1)-(PMV[0][s][1]>>1),vert_f_code);      putdmv(dmvector[1]);      PMV[0][s][0]=PMV[1][s][0]=MV[0][s][0];      PMV[0][s][1]=PMV[1][s][1]=MV[0][s][1];    }  }  else  {    /* field picture */    if (motion_type==MC_FIELD)    {      /* field prediction */      putbits(mv_field_sel[0][s],1);      putmv(MV[0][s][0]-PMV[0][s][0],hor_f_code);      putmv(MV[0][s][1]-PMV[0][s][1],vert_f_code);      PMV[0][s][0]=PMV[1][s][0]=MV[0][s][0];      PMV[0][s][1]=PMV[1][s][1]=MV[0][s][1];    }    else if (motion_type==MC_16X8)    {      /* 16x8 prediction */      putbits(mv_field_sel[0][s],1);      putmv(MV[0][s][0]-PMV[0][s][0],hor_f_code);      putmv(MV[0][s][1]-PMV[0][s][1],vert_f_code);      putbits(mv_field_sel[1][s],1);      putmv(MV[1][s][0]-PMV[1][s][0],hor_f_code);      putmv(MV[1][s][1]-PMV[1][s][1],vert_f_code);      PMV[0][s][0]=MV[0][s][0];      PMV[0][s][1]=MV[0][s][1];      PMV[1][s][0]=MV[1][s][0];      PMV[1][s][1]=MV[1][s][1];    }    else    {      /* dual prime prediction */      putmv(MV[0][s][0]-PMV[0][s][0],hor_f_code);      putdmv(dmvector[0]);      putmv(MV[0][s][1]-PMV[0][s][1],vert_f_code);      putdmv(dmvector[1]);      PMV[0][s][0]=PMV[1][s][0]=MV[0][s][0];      PMV[0][s][1]=PMV[1][s][1]=MV[0][s][1];    }  }}