00001
00024 #include <stdlib.h>
00025 #include <string.h>
00026
00027 #include "avcodec.h"
00028 #include "dsputil.h"
00029 #include "bitstream.h"
00030 #include "mpegvideo.h"
00031
00032 #include "vp56.h"
00033 #include "vp56data.h"
00034 #include "vp5data.h"
00035
00036
00037 static int vp5_parse_header(vp56_context_t *s, const uint8_t *buf, int buf_size,
00038 int *golden_frame)
00039 {
00040 vp56_range_coder_t *c = &s->c;
00041 int rows, cols;
00042
00043 vp56_init_range_decoder(&s->c, buf, buf_size);
00044 s->framep[VP56_FRAME_CURRENT]->key_frame = !vp56_rac_get(c);
00045 vp56_rac_get(c);
00046 vp56_init_dequant(s, vp56_rac_gets(c, 6));
00047 if (s->framep[VP56_FRAME_CURRENT]->key_frame)
00048 {
00049 vp56_rac_gets(c, 8);
00050 if(vp56_rac_gets(c, 5) > 5)
00051 return 0;
00052 vp56_rac_gets(c, 2);
00053 if (vp56_rac_get(c)) {
00054 av_log(s->avctx, AV_LOG_ERROR, "interlacing not supported\n");
00055 return 0;
00056 }
00057 rows = vp56_rac_gets(c, 8);
00058 cols = vp56_rac_gets(c, 8);
00059 vp56_rac_gets(c, 8);
00060 vp56_rac_gets(c, 8);
00061 vp56_rac_gets(c, 2);
00062 if (16*cols != s->avctx->coded_width ||
00063 16*rows != s->avctx->coded_height) {
00064 avcodec_set_dimensions(s->avctx, 16*cols, 16*rows);
00065 return 2;
00066 }
00067 }
00068 return 1;
00069 }
00070
00071
00072 static int vp5_adjust(int v, int t)
00073 {
00074 int s2, s1 = v >> 31;
00075 v ^= s1;
00076 v -= s1;
00077 v *= v < 2*t;
00078 v -= t;
00079 s2 = v >> 31;
00080 v ^= s2;
00081 v -= s2;
00082 v = t - v;
00083 v += s1;
00084 v ^= s1;
00085 return v;
00086 }
00087
00088 static void vp5_parse_vector_adjustment(vp56_context_t *s, vp56_mv_t *vect)
00089 {
00090 vp56_range_coder_t *c = &s->c;
00091 vp56_model_t *model = s->modelp;
00092 int comp, di;
00093
00094 for (comp=0; comp<2; comp++) {
00095 int delta = 0;
00096 if (vp56_rac_get_prob(c, model->vector_dct[comp])) {
00097 int sign = vp56_rac_get_prob(c, model->vector_sig[comp]);
00098 di = vp56_rac_get_prob(c, model->vector_pdi[comp][0]);
00099 di |= vp56_rac_get_prob(c, model->vector_pdi[comp][1]) << 1;
00100 delta = vp56_rac_get_tree(c, vp56_pva_tree,
00101 model->vector_pdv[comp]);
00102 delta = di | (delta << 2);
00103 delta = (delta ^ -sign) + sign;
00104 }
00105 if (!comp)
00106 vect->x = delta;
00107 else
00108 vect->y = delta;
00109 }
00110 }
00111
00112 static void vp5_parse_vector_models(vp56_context_t *s)
00113 {
00114 vp56_range_coder_t *c = &s->c;
00115 vp56_model_t *model = s->modelp;
00116 int comp, node;
00117
00118 for (comp=0; comp<2; comp++) {
00119 if (vp56_rac_get_prob(c, vp5_vmc_pct[comp][0]))
00120 model->vector_dct[comp] = vp56_rac_gets_nn(c, 7);
00121 if (vp56_rac_get_prob(c, vp5_vmc_pct[comp][1]))
00122 model->vector_sig[comp] = vp56_rac_gets_nn(c, 7);
00123 if (vp56_rac_get_prob(c, vp5_vmc_pct[comp][2]))
00124 model->vector_pdi[comp][0] = vp56_rac_gets_nn(c, 7);
00125 if (vp56_rac_get_prob(c, vp5_vmc_pct[comp][3]))
00126 model->vector_pdi[comp][1] = vp56_rac_gets_nn(c, 7);
00127 }
00128
00129 for (comp=0; comp<2; comp++)
00130 for (node=0; node<7; node++)
00131 if (vp56_rac_get_prob(c, vp5_vmc_pct[comp][4 + node]))
00132 model->vector_pdv[comp][node] = vp56_rac_gets_nn(c, 7);
00133 }
00134
00135 static void vp5_parse_coeff_models(vp56_context_t *s)
00136 {
00137 vp56_range_coder_t *c = &s->c;
00138 vp56_model_t *model = s->modelp;
00139 uint8_t def_prob[11];
00140 int node, cg, ctx;
00141 int ct;
00142 int pt;
00143
00144 memset(def_prob, 0x80, sizeof(def_prob));
00145
00146 for (pt=0; pt<2; pt++)
00147 for (node=0; node<11; node++)
00148 if (vp56_rac_get_prob(c, vp5_dccv_pct[pt][node])) {
00149 def_prob[node] = vp56_rac_gets_nn(c, 7);
00150 model->coeff_dccv[pt][node] = def_prob[node];
00151 } else if (s->framep[VP56_FRAME_CURRENT]->key_frame) {
00152 model->coeff_dccv[pt][node] = def_prob[node];
00153 }
00154
00155 for (ct=0; ct<3; ct++)
00156 for (pt=0; pt<2; pt++)
00157 for (cg=0; cg<6; cg++)
00158 for (node=0; node<11; node++)
00159 if (vp56_rac_get_prob(c, vp5_ract_pct[ct][pt][cg][node])) {
00160 def_prob[node] = vp56_rac_gets_nn(c, 7);
00161 model->coeff_ract[pt][ct][cg][node] = def_prob[node];
00162 } else if (s->framep[VP56_FRAME_CURRENT]->key_frame) {
00163 model->coeff_ract[pt][ct][cg][node] = def_prob[node];
00164 }
00165
00166
00167 for (pt=0; pt<2; pt++)
00168 for (ctx=0; ctx<36; ctx++)
00169 for (node=0; node<5; node++)
00170 model->coeff_dcct[pt][ctx][node] = av_clip(((model->coeff_dccv[pt][node] * vp5_dccv_lc[node][ctx][0] + 128) >> 8) + vp5_dccv_lc[node][ctx][1], 1, 254);
00171
00172
00173 for (ct=0; ct<3; ct++)
00174 for (pt=0; pt<2; pt++)
00175 for (cg=0; cg<3; cg++)
00176 for (ctx=0; ctx<6; ctx++)
00177 for (node=0; node<5; node++)
00178 model->coeff_acct[pt][ct][cg][ctx][node] = av_clip(((model->coeff_ract[pt][ct][cg][node] * vp5_ract_lc[ct][cg][node][ctx][0] + 128) >> 8) + vp5_ract_lc[ct][cg][node][ctx][1], 1, 254);
00179 }
00180
00181 static void vp5_parse_coeff(vp56_context_t *s)
00182 {
00183 vp56_range_coder_t *c = &s->c;
00184 vp56_model_t *model = s->modelp;
00185 uint8_t *permute = s->scantable.permutated;
00186 uint8_t *model1, *model2;
00187 int coeff, sign, coeff_idx;
00188 int b, i, cg, idx, ctx, ctx_last;
00189 int pt = 0;
00190
00191 for (b=0; b<6; b++) {
00192 int ct = 1;
00193
00194 if (b > 3) pt = 1;
00195
00196 ctx = 6*s->coeff_ctx[vp56_b6to4[b]][0]
00197 + s->above_blocks[s->above_block_idx[b]].not_null_dc;
00198 model1 = model->coeff_dccv[pt];
00199 model2 = model->coeff_dcct[pt][ctx];
00200
00201 for (coeff_idx=0; coeff_idx<64; ) {
00202 if (vp56_rac_get_prob(c, model2[0])) {
00203 if (vp56_rac_get_prob(c, model2[2])) {
00204 if (vp56_rac_get_prob(c, model2[3])) {
00205 s->coeff_ctx[vp56_b6to4[b]][coeff_idx] = 4;
00206 idx = vp56_rac_get_tree(c, vp56_pc_tree, model1);
00207 sign = vp56_rac_get(c);
00208 coeff = vp56_coeff_bias[idx+5];
00209 for (i=vp56_coeff_bit_length[idx]; i>=0; i--)
00210 coeff += vp56_rac_get_prob(c, vp56_coeff_parse_table[idx][i]) << i;
00211 } else {
00212 if (vp56_rac_get_prob(c, model2[4])) {
00213 coeff = 3 + vp56_rac_get_prob(c, model1[5]);
00214 s->coeff_ctx[vp56_b6to4[b]][coeff_idx] = 3;
00215 } else {
00216 coeff = 2;
00217 s->coeff_ctx[vp56_b6to4[b]][coeff_idx] = 2;
00218 }
00219 sign = vp56_rac_get(c);
00220 }
00221 ct = 2;
00222 } else {
00223 ct = 1;
00224 s->coeff_ctx[vp56_b6to4[b]][coeff_idx] = 1;
00225 sign = vp56_rac_get(c);
00226 coeff = 1;
00227 }
00228 coeff = (coeff ^ -sign) + sign;
00229 if (coeff_idx)
00230 coeff *= s->dequant_ac;
00231 s->block_coeff[b][permute[coeff_idx]] = coeff;
00232 } else {
00233 if (ct && !vp56_rac_get_prob(c, model2[1]))
00234 break;
00235 ct = 0;
00236 s->coeff_ctx[vp56_b6to4[b]][coeff_idx] = 0;
00237 }
00238
00239 cg = vp5_coeff_groups[++coeff_idx];
00240 ctx = s->coeff_ctx[vp56_b6to4[b]][coeff_idx];
00241 model1 = model->coeff_ract[pt][ct][cg];
00242 model2 = cg > 2 ? model1 : model->coeff_acct[pt][ct][cg][ctx];
00243 }
00244
00245 ctx_last = FFMIN(s->coeff_ctx_last[vp56_b6to4[b]], 24);
00246 s->coeff_ctx_last[vp56_b6to4[b]] = coeff_idx;
00247 if (coeff_idx < ctx_last)
00248 for (i=coeff_idx; i<=ctx_last; i++)
00249 s->coeff_ctx[vp56_b6to4[b]][i] = 5;
00250 s->above_blocks[s->above_block_idx[b]].not_null_dc = s->coeff_ctx[vp56_b6to4[b]][0];
00251 }
00252 }
00253
00254 static void vp5_default_models_init(vp56_context_t *s)
00255 {
00256 vp56_model_t *model = s->modelp;
00257 int i;
00258
00259 for (i=0; i<2; i++) {
00260 model->vector_sig[i] = 0x80;
00261 model->vector_dct[i] = 0x80;
00262 model->vector_pdi[i][0] = 0x55;
00263 model->vector_pdi[i][1] = 0x80;
00264 }
00265 memcpy(model->mb_types_stats, vp56_def_mb_types_stats, sizeof(model->mb_types_stats));
00266 memset(model->vector_pdv, 0x80, sizeof(model->vector_pdv));
00267 }
00268
00269 static int vp5_decode_init(AVCodecContext *avctx)
00270 {
00271 vp56_context_t *s = avctx->priv_data;
00272
00273 vp56_init(avctx, 1, 0);
00274 s->vp56_coord_div = vp5_coord_div;
00275 s->parse_vector_adjustment = vp5_parse_vector_adjustment;
00276 s->adjust = vp5_adjust;
00277 s->parse_coeff = vp5_parse_coeff;
00278 s->default_models_init = vp5_default_models_init;
00279 s->parse_vector_models = vp5_parse_vector_models;
00280 s->parse_coeff_models = vp5_parse_coeff_models;
00281 s->parse_header = vp5_parse_header;
00282
00283 return 0;
00284 }
00285
00286 AVCodec vp5_decoder = {
00287 "vp5",
00288 CODEC_TYPE_VIDEO,
00289 CODEC_ID_VP5,
00290 sizeof(vp56_context_t),
00291 vp5_decode_init,
00292 NULL,
00293 vp56_free,
00294 vp56_decode_frame,
00295 CODEC_CAP_DR1,
00296 };