1 /* 2 * Copyright (c) 2013 The WebM project authors. All Rights Reserved. 3 * 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. 9 */ 10 11 #include "vp9/common/vp9_common.h" 12 #include "vp9/common/vp9_entropy.h" 13 14 #include "vp9/encoder/vp9_boolhuff.h" 15 #include "vp9/encoder/vp9_treewriter.h" 16 17 #define vp9_cost_upd ((int)(vp9_cost_one(upd) - vp9_cost_zero(upd)) >> 8) 18 #define vp9_cost_upd256 ((int)(vp9_cost_one(upd) - vp9_cost_zero(upd))) 19 20 static int update_bits[255]; 21 22 static int count_uniform(int v, int n) { 23 int l = get_unsigned_bits(n); 24 int m; 25 if (l == 0) return 0; 26 m = (1 << l) - n; 27 if (v < m) 28 return l - 1; 29 else 30 return l; 31 } 32 33 static int split_index(int i, int n, int modulus) { 34 int max1 = (n - 1 - modulus / 2) / modulus + 1; 35 if (i % modulus == modulus / 2) 36 i = i / modulus; 37 else 38 i = max1 + i - (i + modulus - modulus / 2) / modulus; 39 return i; 40 } 41 42 static int recenter_nonneg(int v, int m) { 43 if (v > (m << 1)) 44 return v; 45 else if (v >= m) 46 return ((v - m) << 1); 47 else 48 return ((m - v) << 1) - 1; 49 } 50 51 static int remap_prob(int v, int m) { 52 int i; 53 static const int map_table[MAX_PROB - 1] = { 54 // generated by: 55 // map_table[j] = split_index(j, MAX_PROB - 1, MODULUS_PARAM); 56 20, 21, 22, 23, 24, 25, 0, 26, 27, 28, 29, 30, 31, 32, 33, 57 34, 35, 36, 37, 1, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 58 48, 49, 2, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 59 3, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 4, 74, 60 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 5, 86, 87, 88, 61 89, 90, 91, 92, 93, 94, 95, 96, 97, 6, 98, 99, 100, 101, 102, 62 103, 104, 105, 106, 107, 108, 109, 7, 110, 111, 112, 113, 114, 115, 116, 63 117, 118, 119, 120, 121, 8, 122, 123, 124, 125, 126, 127, 128, 129, 130, 64 131, 132, 133, 9, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 65 145, 10, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 11, 66 158, 159, 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 12, 170, 171, 67 172, 173, 174, 175, 176, 177, 178, 179, 180, 181, 13, 182, 183, 184, 185, 68 186, 187, 188, 189, 190, 191, 192, 193, 14, 194, 195, 196, 197, 198, 199, 69 200, 201, 202, 203, 204, 205, 15, 206, 207, 208, 209, 210, 211, 212, 213, 70 214, 215, 216, 217, 16, 218, 219, 220, 221, 222, 223, 224, 225, 226, 227, 71 228, 229, 17, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239, 240, 241, 72 18, 242, 243, 244, 245, 246, 247, 248, 249, 250, 251, 252, 253, 19, 73 }; 74 v--; 75 m--; 76 if ((m << 1) <= MAX_PROB) 77 i = recenter_nonneg(v, m) - 1; 78 else 79 i = recenter_nonneg(MAX_PROB - 1 - v, MAX_PROB - 1 - m) - 1; 80 81 i = map_table[i]; 82 return i; 83 } 84 85 static int count_term_subexp(int word, int k, int num_syms) { 86 int count = 0; 87 int i = 0; 88 int mk = 0; 89 while (1) { 90 int b = (i ? k + i - 1 : k); 91 int a = (1 << b); 92 if (num_syms <= mk + 3 * a) { 93 count += count_uniform(word - mk, num_syms - mk); 94 break; 95 } else { 96 int t = (word >= mk + a); 97 count++; 98 if (t) { 99 i = i + 1; 100 mk += a; 101 } else { 102 count += b; 103 break; 104 } 105 } 106 } 107 return count; 108 } 109 110 static int prob_diff_update_cost(vp9_prob newp, vp9_prob oldp) { 111 int delp = remap_prob(newp, oldp); 112 return update_bits[delp] * 256; 113 } 114 115 static void encode_uniform(vp9_writer *w, int v, int n) { 116 int l = get_unsigned_bits(n); 117 int m; 118 if (l == 0) 119 return; 120 m = (1 << l) - n; 121 if (v < m) { 122 vp9_write_literal(w, v, l - 1); 123 } else { 124 vp9_write_literal(w, m + ((v - m) >> 1), l - 1); 125 vp9_write_literal(w, (v - m) & 1, 1); 126 } 127 } 128 129 static void encode_term_subexp(vp9_writer *w, int word, int k, int num_syms) { 130 int i = 0; 131 int mk = 0; 132 while (1) { 133 int b = (i ? k + i - 1 : k); 134 int a = (1 << b); 135 if (num_syms <= mk + 3 * a) { 136 encode_uniform(w, word - mk, num_syms - mk); 137 break; 138 } else { 139 int t = (word >= mk + a); 140 vp9_write_literal(w, t, 1); 141 if (t) { 142 i = i + 1; 143 mk += a; 144 } else { 145 vp9_write_literal(w, word - mk, b); 146 break; 147 } 148 } 149 } 150 } 151 152 void vp9_write_prob_diff_update(vp9_writer *w, vp9_prob newp, vp9_prob oldp) { 153 const int delp = remap_prob(newp, oldp); 154 encode_term_subexp(w, delp, SUBEXP_PARAM, 255); 155 } 156 157 void vp9_compute_update_table() { 158 int i; 159 for (i = 0; i < 254; i++) 160 update_bits[i] = count_term_subexp(i, SUBEXP_PARAM, 255); 161 } 162 163 int vp9_prob_diff_update_savings_search(const unsigned int *ct, 164 vp9_prob oldp, vp9_prob *bestp, 165 vp9_prob upd) { 166 const int old_b = cost_branch256(ct, oldp); 167 int bestsavings = 0; 168 vp9_prob newp, bestnewp = oldp; 169 const int step = *bestp > oldp ? -1 : 1; 170 171 for (newp = *bestp; newp != oldp; newp += step) { 172 const int new_b = cost_branch256(ct, newp); 173 const int update_b = prob_diff_update_cost(newp, oldp) + vp9_cost_upd256; 174 const int savings = old_b - new_b - update_b; 175 if (savings > bestsavings) { 176 bestsavings = savings; 177 bestnewp = newp; 178 } 179 } 180 *bestp = bestnewp; 181 return bestsavings; 182 } 183 184 int vp9_prob_diff_update_savings_search_model(const unsigned int *ct, 185 const vp9_prob *oldp, 186 vp9_prob *bestp, 187 vp9_prob upd, 188 int b, int r) { 189 int i, old_b, new_b, update_b, savings, bestsavings, step; 190 int newp; 191 vp9_prob bestnewp, newplist[ENTROPY_NODES], oldplist[ENTROPY_NODES]; 192 vp9_model_to_full_probs(oldp, oldplist); 193 vpx_memcpy(newplist, oldp, sizeof(vp9_prob) * UNCONSTRAINED_NODES); 194 for (i = UNCONSTRAINED_NODES, old_b = 0; i < ENTROPY_NODES; ++i) 195 old_b += cost_branch256(ct + 2 * i, oldplist[i]); 196 old_b += cost_branch256(ct + 2 * PIVOT_NODE, oldplist[PIVOT_NODE]); 197 198 bestsavings = 0; 199 bestnewp = oldp[PIVOT_NODE]; 200 201 step = (*bestp > oldp[PIVOT_NODE] ? -1 : 1); 202 203 for (newp = *bestp; newp != oldp[PIVOT_NODE]; newp += step) { 204 if (newp < 1 || newp > 255) 205 continue; 206 newplist[PIVOT_NODE] = newp; 207 vp9_model_to_full_probs(newplist, newplist); 208 for (i = UNCONSTRAINED_NODES, new_b = 0; i < ENTROPY_NODES; ++i) 209 new_b += cost_branch256(ct + 2 * i, newplist[i]); 210 new_b += cost_branch256(ct + 2 * PIVOT_NODE, newplist[PIVOT_NODE]); 211 update_b = prob_diff_update_cost(newp, oldp[PIVOT_NODE]) + 212 vp9_cost_upd256; 213 savings = old_b - new_b - update_b; 214 if (savings > bestsavings) { 215 bestsavings = savings; 216 bestnewp = newp; 217 } 218 } 219 *bestp = bestnewp; 220 return bestsavings; 221 } 222 223 void vp9_cond_prob_diff_update(vp9_writer *w, vp9_prob *oldp, 224 const unsigned int ct[2]) { 225 const vp9_prob upd = DIFF_UPDATE_PROB; 226 vp9_prob newp = get_binary_prob(ct[0], ct[1]); 227 const int savings = vp9_prob_diff_update_savings_search(ct, *oldp, &newp, 228 upd); 229 assert(newp >= 1); 230 if (savings > 0) { 231 vp9_write(w, 1, upd); 232 vp9_write_prob_diff_update(w, newp, *oldp); 233 *oldp = newp; 234 } else { 235 vp9_write(w, 0, upd); 236 } 237 } 238