00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021
00027 #include "libavutil/imgutils.h"
00028
00029 #include "avcodec.h"
00030 #include "dsputil.h"
00031 #include "mpegvideo.h"
00032 #include "golomb.h"
00033
00034 #include "rv34.h"
00035 #include "rv40vlc2.h"
00036 #include "rv40data.h"
00037
00038 static VLC aic_top_vlc;
00039 static VLC aic_mode1_vlc[AIC_MODE1_NUM], aic_mode2_vlc[AIC_MODE2_NUM];
00040 static VLC ptype_vlc[NUM_PTYPE_VLCS], btype_vlc[NUM_BTYPE_VLCS];
00041
00042 static const int16_t mode2_offs[] = {
00043 0, 614, 1222, 1794, 2410, 3014, 3586, 4202, 4792, 5382, 5966, 6542,
00044 7138, 7716, 8292, 8864, 9444, 10030, 10642, 11212, 11814
00045 };
00046
00050 static av_cold void rv40_init_tables(void)
00051 {
00052 int i;
00053 static VLC_TYPE aic_table[1 << AIC_TOP_BITS][2];
00054 static VLC_TYPE aic_mode1_table[AIC_MODE1_NUM << AIC_MODE1_BITS][2];
00055 static VLC_TYPE aic_mode2_table[11814][2];
00056 static VLC_TYPE ptype_table[NUM_PTYPE_VLCS << PTYPE_VLC_BITS][2];
00057 static VLC_TYPE btype_table[NUM_BTYPE_VLCS << BTYPE_VLC_BITS][2];
00058
00059 aic_top_vlc.table = aic_table;
00060 aic_top_vlc.table_allocated = 1 << AIC_TOP_BITS;
00061 init_vlc(&aic_top_vlc, AIC_TOP_BITS, AIC_TOP_SIZE,
00062 rv40_aic_top_vlc_bits, 1, 1,
00063 rv40_aic_top_vlc_codes, 1, 1, INIT_VLC_USE_NEW_STATIC);
00064 for(i = 0; i < AIC_MODE1_NUM; i++){
00065
00066 if((i % 10) == 9) continue;
00067 aic_mode1_vlc[i].table = &aic_mode1_table[i << AIC_MODE1_BITS];
00068 aic_mode1_vlc[i].table_allocated = 1 << AIC_MODE1_BITS;
00069 init_vlc(&aic_mode1_vlc[i], AIC_MODE1_BITS, AIC_MODE1_SIZE,
00070 aic_mode1_vlc_bits[i], 1, 1,
00071 aic_mode1_vlc_codes[i], 1, 1, INIT_VLC_USE_NEW_STATIC);
00072 }
00073 for(i = 0; i < AIC_MODE2_NUM; i++){
00074 aic_mode2_vlc[i].table = &aic_mode2_table[mode2_offs[i]];
00075 aic_mode2_vlc[i].table_allocated = mode2_offs[i + 1] - mode2_offs[i];
00076 init_vlc(&aic_mode2_vlc[i], AIC_MODE2_BITS, AIC_MODE2_SIZE,
00077 aic_mode2_vlc_bits[i], 1, 1,
00078 aic_mode2_vlc_codes[i], 2, 2, INIT_VLC_USE_NEW_STATIC);
00079 }
00080 for(i = 0; i < NUM_PTYPE_VLCS; i++){
00081 ptype_vlc[i].table = &ptype_table[i << PTYPE_VLC_BITS];
00082 ptype_vlc[i].table_allocated = 1 << PTYPE_VLC_BITS;
00083 init_vlc_sparse(&ptype_vlc[i], PTYPE_VLC_BITS, PTYPE_VLC_SIZE,
00084 ptype_vlc_bits[i], 1, 1,
00085 ptype_vlc_codes[i], 1, 1,
00086 ptype_vlc_syms, 1, 1, INIT_VLC_USE_NEW_STATIC);
00087 }
00088 for(i = 0; i < NUM_BTYPE_VLCS; i++){
00089 btype_vlc[i].table = &btype_table[i << BTYPE_VLC_BITS];
00090 btype_vlc[i].table_allocated = 1 << BTYPE_VLC_BITS;
00091 init_vlc_sparse(&btype_vlc[i], BTYPE_VLC_BITS, BTYPE_VLC_SIZE,
00092 btype_vlc_bits[i], 1, 1,
00093 btype_vlc_codes[i], 1, 1,
00094 btype_vlc_syms, 1, 1, INIT_VLC_USE_NEW_STATIC);
00095 }
00096 }
00097
00104 static int get_dimension(GetBitContext *gb, const int *dim)
00105 {
00106 int t = get_bits(gb, 3);
00107 int val = dim[t];
00108 if(val < 0)
00109 val = dim[get_bits1(gb) - val];
00110 if(!val){
00111 do{
00112 t = get_bits(gb, 8);
00113 val += t << 2;
00114 }while(t == 0xFF);
00115 }
00116 return val;
00117 }
00118
00122 static void rv40_parse_picture_size(GetBitContext *gb, int *w, int *h)
00123 {
00124 *w = get_dimension(gb, rv40_standard_widths);
00125 *h = get_dimension(gb, rv40_standard_heights);
00126 }
00127
00128 static int rv40_parse_slice_header(RV34DecContext *r, GetBitContext *gb, SliceInfo *si)
00129 {
00130 int mb_bits;
00131 int w = r->s.width, h = r->s.height;
00132 int mb_size;
00133
00134 memset(si, 0, sizeof(SliceInfo));
00135 if(get_bits1(gb))
00136 return -1;
00137 si->type = get_bits(gb, 2);
00138 if(si->type == 1) si->type = 0;
00139 si->quant = get_bits(gb, 5);
00140 if(get_bits(gb, 2))
00141 return -1;
00142 si->vlc_set = get_bits(gb, 2);
00143 skip_bits1(gb);
00144 si->pts = get_bits(gb, 13);
00145 if(!si->type || !get_bits1(gb))
00146 rv40_parse_picture_size(gb, &w, &h);
00147 if(av_image_check_size(w, h, 0, r->s.avctx) < 0)
00148 return -1;
00149 si->width = w;
00150 si->height = h;
00151 mb_size = ((w + 15) >> 4) * ((h + 15) >> 4);
00152 mb_bits = ff_rv34_get_start_offset(gb, mb_size);
00153 si->start = get_bits(gb, mb_bits);
00154
00155 return 0;
00156 }
00157
00161 static int rv40_decode_intra_types(RV34DecContext *r, GetBitContext *gb, int8_t *dst)
00162 {
00163 MpegEncContext *s = &r->s;
00164 int i, j, k, v;
00165 int A, B, C;
00166 int pattern;
00167 int8_t *ptr;
00168
00169 for(i = 0; i < 4; i++, dst += r->intra_types_stride){
00170 if(!i && s->first_slice_line){
00171 pattern = get_vlc2(gb, aic_top_vlc.table, AIC_TOP_BITS, 1);
00172 dst[0] = (pattern >> 2) & 2;
00173 dst[1] = (pattern >> 1) & 2;
00174 dst[2] = pattern & 2;
00175 dst[3] = (pattern << 1) & 2;
00176 continue;
00177 }
00178 ptr = dst;
00179 for(j = 0; j < 4; j++){
00180
00181
00182
00183
00184
00185
00186 A = ptr[-r->intra_types_stride + 1];
00187 B = ptr[-r->intra_types_stride];
00188 C = ptr[-1];
00189 pattern = A + (B << 4) + (C << 8);
00190 for(k = 0; k < MODE2_PATTERNS_NUM; k++)
00191 if(pattern == rv40_aic_table_index[k])
00192 break;
00193 if(j < 3 && k < MODE2_PATTERNS_NUM){
00194 v = get_vlc2(gb, aic_mode2_vlc[k].table, AIC_MODE2_BITS, 2);
00195 *ptr++ = v/9;
00196 *ptr++ = v%9;
00197 j++;
00198 }else{
00199 if(B != -1 && C != -1)
00200 v = get_vlc2(gb, aic_mode1_vlc[B + C*10].table, AIC_MODE1_BITS, 1);
00201 else{
00202 v = 0;
00203 switch(C){
00204 case -1:
00205 if(B < 2)
00206 v = get_bits1(gb) ^ 1;
00207 break;
00208 case 0:
00209 case 2:
00210 v = (get_bits1(gb) ^ 1) << 1;
00211 break;
00212 }
00213 }
00214 *ptr++ = v;
00215 }
00216 }
00217 }
00218 return 0;
00219 }
00220
00224 static int rv40_decode_mb_info(RV34DecContext *r)
00225 {
00226 MpegEncContext *s = &r->s;
00227 GetBitContext *gb = &s->gb;
00228 int q, i;
00229 int prev_type = 0;
00230 int mb_pos = s->mb_x + s->mb_y * s->mb_stride;
00231 int blocks[RV34_MB_TYPES] = {0};
00232 int count = 0;
00233
00234 if(!r->s.mb_skip_run) {
00235 r->s.mb_skip_run = svq3_get_ue_golomb(gb) + 1;
00236 if(r->s.mb_skip_run > (unsigned)s->mb_num)
00237 return -1;
00238 }
00239
00240 if(--r->s.mb_skip_run)
00241 return RV34_MB_SKIP;
00242
00243 if(r->avail_cache[6-1])
00244 blocks[r->mb_type[mb_pos - 1]]++;
00245 if(r->avail_cache[6-4]){
00246 blocks[r->mb_type[mb_pos - s->mb_stride]]++;
00247 if(r->avail_cache[6-2])
00248 blocks[r->mb_type[mb_pos - s->mb_stride + 1]]++;
00249 if(r->avail_cache[6-5])
00250 blocks[r->mb_type[mb_pos - s->mb_stride - 1]]++;
00251 }
00252
00253 for(i = 0; i < RV34_MB_TYPES; i++){
00254 if(blocks[i] > count){
00255 count = blocks[i];
00256 prev_type = i;
00257 }
00258 }
00259 if(s->pict_type == AV_PICTURE_TYPE_P){
00260 prev_type = block_num_to_ptype_vlc_num[prev_type];
00261 q = get_vlc2(gb, ptype_vlc[prev_type].table, PTYPE_VLC_BITS, 1);
00262 if(q < PBTYPE_ESCAPE)
00263 return q;
00264 q = get_vlc2(gb, ptype_vlc[prev_type].table, PTYPE_VLC_BITS, 1);
00265 av_log(s->avctx, AV_LOG_ERROR, "Dquant for P-frame\n");
00266 }else{
00267 prev_type = block_num_to_btype_vlc_num[prev_type];
00268 q = get_vlc2(gb, btype_vlc[prev_type].table, BTYPE_VLC_BITS, 1);
00269 if(q < PBTYPE_ESCAPE)
00270 return q;
00271 q = get_vlc2(gb, btype_vlc[prev_type].table, BTYPE_VLC_BITS, 1);
00272 av_log(s->avctx, AV_LOG_ERROR, "Dquant for B-frame\n");
00273 }
00274 return 0;
00275 }
00276
00277 enum RV40BlockPos{
00278 POS_CUR,
00279 POS_TOP,
00280 POS_LEFT,
00281 POS_BOTTOM,
00282 };
00283
00284 #define MASK_CUR 0x0001
00285 #define MASK_RIGHT 0x0008
00286 #define MASK_BOTTOM 0x0010
00287 #define MASK_TOP 0x1000
00288 #define MASK_Y_TOP_ROW 0x000F
00289 #define MASK_Y_LAST_ROW 0xF000
00290 #define MASK_Y_LEFT_COL 0x1111
00291 #define MASK_Y_RIGHT_COL 0x8888
00292 #define MASK_C_TOP_ROW 0x0003
00293 #define MASK_C_LAST_ROW 0x000C
00294 #define MASK_C_LEFT_COL 0x0005
00295 #define MASK_C_RIGHT_COL 0x000A
00296
00297 static const int neighbour_offs_x[4] = { 0, 0, -1, 0 };
00298 static const int neighbour_offs_y[4] = { 0, -1, 0, 1 };
00299
00303 static void rv40_loop_filter(RV34DecContext *r, int row)
00304 {
00305 MpegEncContext *s = &r->s;
00306 int mb_pos, mb_x;
00307 int i, j, k;
00308 uint8_t *Y, *C;
00309 int alpha, beta, betaY, betaC;
00310 int q;
00311 int mbtype[4];
00312
00316 int mb_strong[4];
00317 int clip[4];
00318
00324 int cbp[4];
00329 int uvcbp[4][2];
00335 int mvmasks[4];
00336
00337 mb_pos = row * s->mb_stride;
00338 for(mb_x = 0; mb_x < s->mb_width; mb_x++, mb_pos++){
00339 int mbtype = s->current_picture_ptr->f.mb_type[mb_pos];
00340 if(IS_INTRA(mbtype) || IS_SEPARATE_DC(mbtype))
00341 r->cbp_luma [mb_pos] = r->deblock_coefs[mb_pos] = 0xFFFF;
00342 if(IS_INTRA(mbtype))
00343 r->cbp_chroma[mb_pos] = 0xFF;
00344 }
00345 mb_pos = row * s->mb_stride;
00346 for(mb_x = 0; mb_x < s->mb_width; mb_x++, mb_pos++){
00347 int y_h_deblock, y_v_deblock;
00348 int c_v_deblock[2], c_h_deblock[2];
00349 int clip_left;
00350 int avail[4];
00351 int y_to_deblock, c_to_deblock[2];
00352
00353 q = s->current_picture_ptr->f.qscale_table[mb_pos];
00354 alpha = rv40_alpha_tab[q];
00355 beta = rv40_beta_tab [q];
00356 betaY = betaC = beta * 3;
00357 if(s->width * s->height <= 176*144)
00358 betaY += beta;
00359
00360 avail[0] = 1;
00361 avail[1] = row;
00362 avail[2] = mb_x;
00363 avail[3] = row < s->mb_height - 1;
00364 for(i = 0; i < 4; i++){
00365 if(avail[i]){
00366 int pos = mb_pos + neighbour_offs_x[i] + neighbour_offs_y[i]*s->mb_stride;
00367 mvmasks[i] = r->deblock_coefs[pos];
00368 mbtype [i] = s->current_picture_ptr->f.mb_type[pos];
00369 cbp [i] = r->cbp_luma[pos];
00370 uvcbp[i][0] = r->cbp_chroma[pos] & 0xF;
00371 uvcbp[i][1] = r->cbp_chroma[pos] >> 4;
00372 }else{
00373 mvmasks[i] = 0;
00374 mbtype [i] = mbtype[0];
00375 cbp [i] = 0;
00376 uvcbp[i][0] = uvcbp[i][1] = 0;
00377 }
00378 mb_strong[i] = IS_INTRA(mbtype[i]) || IS_SEPARATE_DC(mbtype[i]);
00379 clip[i] = rv40_filter_clip_tbl[mb_strong[i] + 1][q];
00380 }
00381 y_to_deblock = mvmasks[POS_CUR]
00382 | (mvmasks[POS_BOTTOM] << 16);
00383
00384
00385
00386
00387
00388
00389 y_h_deblock = y_to_deblock
00390 | ((cbp[POS_CUR] << 4) & ~MASK_Y_TOP_ROW)
00391 | ((cbp[POS_TOP] & MASK_Y_LAST_ROW) >> 12);
00392
00393
00394
00395
00396
00397
00398 y_v_deblock = y_to_deblock
00399 | ((cbp[POS_CUR] << 1) & ~MASK_Y_LEFT_COL)
00400 | ((cbp[POS_LEFT] & MASK_Y_RIGHT_COL) >> 3);
00401 if(!mb_x)
00402 y_v_deblock &= ~MASK_Y_LEFT_COL;
00403 if(!row)
00404 y_h_deblock &= ~MASK_Y_TOP_ROW;
00405 if(row == s->mb_height - 1 || (mb_strong[POS_CUR] || mb_strong[POS_BOTTOM]))
00406 y_h_deblock &= ~(MASK_Y_TOP_ROW << 16);
00407
00408
00409
00410 for(i = 0; i < 2; i++){
00411 c_to_deblock[i] = (uvcbp[POS_BOTTOM][i] << 4) | uvcbp[POS_CUR][i];
00412 c_v_deblock[i] = c_to_deblock[i]
00413 | ((uvcbp[POS_CUR] [i] << 1) & ~MASK_C_LEFT_COL)
00414 | ((uvcbp[POS_LEFT][i] & MASK_C_RIGHT_COL) >> 1);
00415 c_h_deblock[i] = c_to_deblock[i]
00416 | ((uvcbp[POS_TOP][i] & MASK_C_LAST_ROW) >> 2)
00417 | (uvcbp[POS_CUR][i] << 2);
00418 if(!mb_x)
00419 c_v_deblock[i] &= ~MASK_C_LEFT_COL;
00420 if(!row)
00421 c_h_deblock[i] &= ~MASK_C_TOP_ROW;
00422 if(row == s->mb_height - 1 || mb_strong[POS_CUR] || mb_strong[POS_BOTTOM])
00423 c_h_deblock[i] &= ~(MASK_C_TOP_ROW << 4);
00424 }
00425
00426 for(j = 0; j < 16; j += 4){
00427 Y = s->current_picture_ptr->f.data[0] + mb_x*16 + (row*16 + j) * s->linesize;
00428 for(i = 0; i < 4; i++, Y += 4){
00429 int ij = i + j;
00430 int clip_cur = y_to_deblock & (MASK_CUR << ij) ? clip[POS_CUR] : 0;
00431 int dither = j ? ij : i*4;
00432
00433
00434
00435 if(y_h_deblock & (MASK_BOTTOM << ij)){
00436 r->rdsp.rv40_h_loop_filter(Y+4*s->linesize, s->linesize, dither,
00437 y_to_deblock & (MASK_BOTTOM << ij) ? clip[POS_CUR] : 0,
00438 clip_cur,
00439 alpha, beta, betaY, 0, 0);
00440 }
00441
00442 if(y_v_deblock & (MASK_CUR << ij) && (i || !(mb_strong[POS_CUR] || mb_strong[POS_LEFT]))){
00443 if(!i)
00444 clip_left = mvmasks[POS_LEFT] & (MASK_RIGHT << j) ? clip[POS_LEFT] : 0;
00445 else
00446 clip_left = y_to_deblock & (MASK_CUR << (ij-1)) ? clip[POS_CUR] : 0;
00447 r->rdsp.rv40_v_loop_filter(Y, s->linesize, dither,
00448 clip_cur,
00449 clip_left,
00450 alpha, beta, betaY, 0, 0);
00451 }
00452
00453 if(!j && y_h_deblock & (MASK_CUR << i) && (mb_strong[POS_CUR] || mb_strong[POS_TOP])){
00454 r->rdsp.rv40_h_loop_filter(Y, s->linesize, dither,
00455 clip_cur,
00456 mvmasks[POS_TOP] & (MASK_TOP << i) ? clip[POS_TOP] : 0,
00457 alpha, beta, betaY, 0, 1);
00458 }
00459
00460 if(y_v_deblock & (MASK_CUR << ij) && !i && (mb_strong[POS_CUR] || mb_strong[POS_LEFT])){
00461 clip_left = mvmasks[POS_LEFT] & (MASK_RIGHT << j) ? clip[POS_LEFT] : 0;
00462 r->rdsp.rv40_v_loop_filter(Y, s->linesize, dither,
00463 clip_cur,
00464 clip_left,
00465 alpha, beta, betaY, 0, 1);
00466 }
00467 }
00468 }
00469 for(k = 0; k < 2; k++){
00470 for(j = 0; j < 2; j++){
00471 C = s->current_picture_ptr->f.data[k + 1] + mb_x*8 + (row*8 + j*4) * s->uvlinesize;
00472 for(i = 0; i < 2; i++, C += 4){
00473 int ij = i + j*2;
00474 int clip_cur = c_to_deblock[k] & (MASK_CUR << ij) ? clip[POS_CUR] : 0;
00475 if(c_h_deblock[k] & (MASK_CUR << (ij+2))){
00476 int clip_bot = c_to_deblock[k] & (MASK_CUR << (ij+2)) ? clip[POS_CUR] : 0;
00477 r->rdsp.rv40_h_loop_filter(C+4*s->uvlinesize, s->uvlinesize, i*8,
00478 clip_bot,
00479 clip_cur,
00480 alpha, beta, betaC, 1, 0);
00481 }
00482 if((c_v_deblock[k] & (MASK_CUR << ij)) && (i || !(mb_strong[POS_CUR] || mb_strong[POS_LEFT]))){
00483 if(!i)
00484 clip_left = uvcbp[POS_LEFT][k] & (MASK_CUR << (2*j+1)) ? clip[POS_LEFT] : 0;
00485 else
00486 clip_left = c_to_deblock[k] & (MASK_CUR << (ij-1)) ? clip[POS_CUR] : 0;
00487 r->rdsp.rv40_v_loop_filter(C, s->uvlinesize, j*8,
00488 clip_cur,
00489 clip_left,
00490 alpha, beta, betaC, 1, 0);
00491 }
00492 if(!j && c_h_deblock[k] & (MASK_CUR << ij) && (mb_strong[POS_CUR] || mb_strong[POS_TOP])){
00493 int clip_top = uvcbp[POS_TOP][k] & (MASK_CUR << (ij+2)) ? clip[POS_TOP] : 0;
00494 r->rdsp.rv40_h_loop_filter(C, s->uvlinesize, i*8,
00495 clip_cur,
00496 clip_top,
00497 alpha, beta, betaC, 1, 1);
00498 }
00499 if(c_v_deblock[k] & (MASK_CUR << ij) && !i && (mb_strong[POS_CUR] || mb_strong[POS_LEFT])){
00500 clip_left = uvcbp[POS_LEFT][k] & (MASK_CUR << (2*j+1)) ? clip[POS_LEFT] : 0;
00501 r->rdsp.rv40_v_loop_filter(C, s->uvlinesize, j*8,
00502 clip_cur,
00503 clip_left,
00504 alpha, beta, betaC, 1, 1);
00505 }
00506 }
00507 }
00508 }
00509 }
00510 }
00511
00515 static av_cold int rv40_decode_init(AVCodecContext *avctx)
00516 {
00517 RV34DecContext *r = avctx->priv_data;
00518
00519 r->rv30 = 0;
00520 ff_rv34_decode_init(avctx);
00521 if(!aic_top_vlc.bits)
00522 rv40_init_tables();
00523 r->parse_slice_header = rv40_parse_slice_header;
00524 r->decode_intra_types = rv40_decode_intra_types;
00525 r->decode_mb_info = rv40_decode_mb_info;
00526 r->loop_filter = rv40_loop_filter;
00527 r->luma_dc_quant_i = rv40_luma_dc_quant[0];
00528 r->luma_dc_quant_p = rv40_luma_dc_quant[1];
00529 return 0;
00530 }
00531
00532 AVCodec ff_rv40_decoder = {
00533 .name = "rv40",
00534 .type = AVMEDIA_TYPE_VIDEO,
00535 .id = CODEC_ID_RV40,
00536 .priv_data_size = sizeof(RV34DecContext),
00537 .init = rv40_decode_init,
00538 .close = ff_rv34_decode_end,
00539 .decode = ff_rv34_decode_frame,
00540 .capabilities = CODEC_CAP_DR1 | CODEC_CAP_DELAY,
00541 .flush = ff_mpeg_flush,
00542 .long_name = NULL_IF_CONFIG_SMALL("RealVideo 4.0"),
00543 .pix_fmts = ff_pixfmt_list_420,
00544 };