2 * Copyright (c) 2010 The WebM project authors. All Rights Reserved.
4 * Use of this source code is governed by a BSD-style license
5 * that can be found in the LICENSE file in the root of the source
6 * tree. An additional intellectual property rights grant can be found
7 * in the file PATENTS. All contributing project authors may
8 * be found in the AUTHORS file in the root of the source tree.
11 #include "vp8/common/common.h"
13 #include "vp8/common/entropymode.h"
14 #include "vp8/common/systemdependent.h"
15 #include "vpx_ports/system_state.h"
19 static void encode_mvcomponent(vp8_writer *const w, const int v,
20 const struct mv_context *mvc) {
21 const vp8_prob *p = mvc->prob;
22 const int x = v < 0 ? -v : v;
24 if (x < mvnum_short) { /* Small */
25 vp8_write(w, 0, p[mvpis_short]);
26 vp8_treed_write(w, vp8_small_mvtree, p + MVPshort, x, 3);
28 if (!x) return; /* no sign bit */
32 vp8_write(w, 1, p[mvpis_short]);
35 vp8_write(w, (x >> i) & 1, p[MVPbits + i]);
39 i = mvlong_width - 1; /* Skip bit 3, which is sometimes implicit */
42 vp8_write(w, (x >> i) & 1, p[MVPbits + i]);
46 if (x & 0xFFF0) vp8_write(w, (x >> 3) & 1, p[MVPbits + 3]);
49 vp8_write(w, v < 0, p[MVPsign]);
52 static int max_mv_r = 0;
53 static int max_mv_c = 0;
55 void vp8_encode_motion_vector(vp8_writer *w, const MV *mv,
56 const MV_CONTEXT *mvc) {
59 if (abs(mv->row >> 1) > max_mv_r)
61 FILE *f = fopen("maxmv.stt", "a");
62 max_mv_r = abs(mv->row >> 1);
63 fprintf(f, "New Mv Row Max %6d\n", (mv->row >> 1));
65 if ((abs(mv->row) / 2) != max_mv_r)
66 fprintf(f, "MV Row conversion error %6d\n", abs(mv->row) / 2);
71 if (abs(mv->col >> 1) > max_mv_c)
73 FILE *f = fopen("maxmv.stt", "a");
74 fprintf(f, "New Mv Col Max %6d\n", (mv->col >> 1));
75 max_mv_c = abs(mv->col >> 1);
81 encode_mvcomponent(w, mv->row >> 1, &mvc[0]);
82 encode_mvcomponent(w, mv->col >> 1, &mvc[1]);
85 static unsigned int cost_mvcomponent(const int v,
86 const struct mv_context *mvc) {
87 const vp8_prob *p = mvc->prob;
91 if (x < mvnum_short) {
92 cost = vp8_cost_zero(p[mvpis_short]) +
93 vp8_treed_cost(vp8_small_mvtree, p + MVPshort, x, 3);
98 cost = vp8_cost_one(p[mvpis_short]);
101 cost += vp8_cost_bit(p[MVPbits + i], (x >> i) & 1);
105 i = mvlong_width - 1; /* Skip bit 3, which is sometimes implicit */
108 cost += vp8_cost_bit(p[MVPbits + i], (x >> i) & 1);
112 if (x & 0xFFF0) cost += vp8_cost_bit(p[MVPbits + 3], (x >> 3) & 1);
115 return cost; /* + vp8_cost_bit( p [MVPsign], v < 0); */
118 void vp8_build_component_cost_table(int *mvcost[2], const MV_CONTEXT *mvc,
121 unsigned int cost0 = 0;
122 unsigned int cost1 = 0;
124 vpx_clear_system_state();
129 mvcost[0][0] = cost_mvcomponent(0, &mvc[0]);
132 cost0 = cost_mvcomponent(i, &mvc[0]);
134 mvcost[0][i] = cost0 + vp8_cost_zero(mvc[0].prob[MVPsign]);
135 mvcost[0][-i] = cost0 + vp8_cost_one(mvc[0].prob[MVPsign]);
136 } while (++i <= mv_max);
142 mvcost[1][0] = cost_mvcomponent(0, &mvc[1]);
145 cost1 = cost_mvcomponent(i, &mvc[1]);
147 mvcost[1][i] = cost1 + vp8_cost_zero(mvc[1].prob[MVPsign]);
148 mvcost[1][-i] = cost1 + vp8_cost_one(mvc[1].prob[MVPsign]);
149 } while (++i <= mv_max);
153 /* Motion vector probability table update depends on benefit.
154 * Small correction allows for the fact that an update to an MV probability
155 * may have benefit in subsequent frames as well as the current one.
157 #define MV_PROB_UPDATE_CORRECTION -1
159 static void calc_prob(vp8_prob *p, const unsigned int ct[2]) {
160 const unsigned int tot = ct[0] + ct[1];
163 const vp8_prob x = ((ct[0] * 255) / tot) & -2;
168 static void update(vp8_writer *const w, const unsigned int ct[2],
169 vp8_prob *const cur_p, const vp8_prob new_p,
170 const vp8_prob update_p, int *updated) {
171 const int cur_b = vp8_cost_branch(ct, *cur_p);
172 const int new_b = vp8_cost_branch(ct, new_p);
174 7 + MV_PROB_UPDATE_CORRECTION +
175 ((vp8_cost_one(update_p) - vp8_cost_zero(update_p) + 128) >> 8);
177 if (cur_b - new_b > cost) {
179 vp8_write(w, 1, update_p);
180 vp8_write_literal(w, new_p >> 1, 7);
184 vp8_write(w, 0, update_p);
187 static void write_component_probs(vp8_writer *const w,
188 struct mv_context *cur_mvc,
189 const struct mv_context *default_mvc_,
190 const struct mv_context *update_mvc,
191 const unsigned int events[MVvals],
192 unsigned int rc, int *updated) {
193 vp8_prob *Pcur = cur_mvc->prob;
194 const vp8_prob *default_mvc = default_mvc_->prob;
195 const vp8_prob *Pupdate = update_mvc->prob;
196 unsigned int is_short_ct[2], sign_ct[2];
198 unsigned int bit_ct[mvlong_width][2];
200 unsigned int short_ct[mvnum_short];
201 unsigned int short_bct[mvnum_short - 1][2];
203 vp8_prob Pnew[MVPcount];
206 vp8_copy_array(Pnew, default_mvc, MVPcount);
208 vp8_zero(is_short_ct) vp8_zero(sign_ct) vp8_zero(bit_ct) vp8_zero(short_ct)
213 const int c = events[mv_max];
215 is_short_ct[0] += c; /* Short vector */
216 short_ct[0] += c; /* Magnitude distribution */
219 /* j: 1 ~ mv_max (1023) */
224 const int c1 = events[mv_max + j]; /* positive */
225 const int c2 = events[mv_max - j]; /* negative */
226 const int c = c1 + c2;
232 if (a < mvnum_short) {
233 is_short_ct[0] += c; /* Short vector */
234 short_ct[a] += c; /* Magnitude distribution */
236 int k = mvlong_width - 1;
237 is_short_ct[1] += c; /* Long vector */
239 /* bit 3 not always encoded. */
241 bit_ct[k][(a >> k) & 1] += c;
245 } while (++j <= mv_max);
248 calc_prob(Pnew + mvpis_short, is_short_ct);
250 calc_prob(Pnew + MVPsign, sign_ct);
253 vp8_prob p[mvnum_short - 1]; /* actually only need branch ct */
256 vp8_tree_probs_from_distribution(8, vp8_small_mvencodings, vp8_small_mvtree,
257 p, short_bct, short_ct, 256, 1);
260 calc_prob(Pnew + MVPshort + j, short_bct[j]);
262 } while (++j < mvnum_short - 1);
269 calc_prob(Pnew + MVPbits + j, bit_ct[j]);
271 } while (++j < mvlong_width);
274 update(w, is_short_ct, Pcur + mvpis_short, Pnew[mvpis_short], *Pupdate++,
277 update(w, sign_ct, Pcur + MVPsign, Pnew[MVPsign], *Pupdate++, updated);
280 const vp8_prob *const new_p = Pnew + MVPshort;
281 vp8_prob *const cur_p = Pcur + MVPshort;
286 update(w, short_bct[j], cur_p + j, new_p[j], *Pupdate++, updated);
288 } while (++j < mvnum_short - 1);
292 const vp8_prob *const new_p = Pnew + MVPbits;
293 vp8_prob *const cur_p = Pcur + MVPbits;
298 update(w, bit_ct[j], cur_p + j, new_p[j], *Pupdate++, updated);
300 } while (++j < mvlong_width);
304 void vp8_write_mvprobs(VP8_COMP *cpi) {
305 vp8_writer *const w = cpi->bc;
306 MV_CONTEXT *mvc = cpi->common.fc.mvc;
307 int flags[2] = { 0, 0 };
308 write_component_probs(w, &mvc[0], &vp8_default_mv_context[0],
309 &vp8_mv_update_probs[0], cpi->mb.MVcount[0], 0,
311 write_component_probs(w, &mvc[1], &vp8_default_mv_context[1],
312 &vp8_mv_update_probs[1], cpi->mb.MVcount[1], 1,
315 if (flags[0] || flags[1]) {
316 vp8_build_component_cost_table(
317 cpi->mb.mvcost, (const MV_CONTEXT *)cpi->common.fc.mvc, flags);