1 /*
2 * Copyright (c) 2010 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 "./vpx_dsp_rtcd.h"
12 #include "./vpx_scale_rtcd.h"
13 #include "vp8/common/onyxc_int.h"
14 #include "onyx_int.h"
15 #include "vp8/encoder/picklpf.h"
16 #include "vp8/encoder/quantize.h"
17 #include "vpx_mem/vpx_mem.h"
18 #include "vpx_scale/vpx_scale.h"
19 #include "vp8/common/alloccommon.h"
20 #include "vp8/common/loopfilter.h"
21 #if VPX_ARCH_ARM
22 #include "vpx_ports/arm.h"
23 #endif
24
25 extern int vp8_calc_ss_err(YV12_BUFFER_CONFIG *source,
26 YV12_BUFFER_CONFIG *dest);
27
yv12_copy_partial_frame(YV12_BUFFER_CONFIG * src_ybc,YV12_BUFFER_CONFIG * dst_ybc)28 static void yv12_copy_partial_frame(YV12_BUFFER_CONFIG *src_ybc,
29 YV12_BUFFER_CONFIG *dst_ybc) {
30 unsigned char *src_y, *dst_y;
31 int yheight;
32 int ystride;
33 int yoffset;
34 int linestocopy;
35
36 yheight = src_ybc->y_height;
37 ystride = src_ybc->y_stride;
38
39 /* number of MB rows to use in partial filtering */
40 linestocopy = (yheight >> 4) / PARTIAL_FRAME_FRACTION;
41 linestocopy = linestocopy ? linestocopy << 4 : 16; /* 16 lines per MB */
42
43 /* Copy extra 4 so that full filter context is available if filtering done
44 * on the copied partial frame and not original. Partial filter does mb
45 * filtering for top row also, which can modify3 pixels above.
46 */
47 linestocopy += 4;
48 /* partial image starts at ~middle of frame (macroblock border)*/
49 yoffset = ystride * (((yheight >> 5) * 16) - 4);
50 src_y = src_ybc->y_buffer + yoffset;
51 dst_y = dst_ybc->y_buffer + yoffset;
52
53 memcpy(dst_y, src_y, ystride * linestocopy);
54 }
55
calc_partial_ssl_err(YV12_BUFFER_CONFIG * source,YV12_BUFFER_CONFIG * dest)56 static int calc_partial_ssl_err(YV12_BUFFER_CONFIG *source,
57 YV12_BUFFER_CONFIG *dest) {
58 int i, j;
59 int Total = 0;
60 int srcoffset, dstoffset;
61 unsigned char *src = source->y_buffer;
62 unsigned char *dst = dest->y_buffer;
63
64 int linestocopy;
65
66 /* number of MB rows to use in partial filtering */
67 linestocopy = (source->y_height >> 4) / PARTIAL_FRAME_FRACTION;
68 linestocopy = linestocopy ? linestocopy << 4 : 16; /* 16 lines per MB */
69
70 /* partial image starts at ~middle of frame (macroblock border)*/
71 srcoffset = source->y_stride * ((dest->y_height >> 5) * 16);
72 dstoffset = dest->y_stride * ((dest->y_height >> 5) * 16);
73
74 src += srcoffset;
75 dst += dstoffset;
76
77 /* Loop through the Y plane raw and reconstruction data summing
78 * (square differences)
79 */
80 for (i = 0; i < linestocopy; i += 16) {
81 for (j = 0; j < source->y_width; j += 16) {
82 unsigned int sse;
83 Total += vpx_mse16x16(src + j, source->y_stride, dst + j, dest->y_stride,
84 &sse);
85 }
86
87 src += 16 * source->y_stride;
88 dst += 16 * dest->y_stride;
89 }
90
91 return Total;
92 }
93
94 /* Enforce a minimum filter level based upon baseline Q */
get_min_filter_level(VP8_COMP * cpi,int base_qindex)95 static int get_min_filter_level(VP8_COMP *cpi, int base_qindex) {
96 int min_filter_level;
97
98 if (cpi->source_alt_ref_active && cpi->common.refresh_golden_frame &&
99 !cpi->common.refresh_alt_ref_frame) {
100 min_filter_level = 0;
101 } else {
102 if (base_qindex <= 6) {
103 min_filter_level = 0;
104 } else if (base_qindex <= 16) {
105 min_filter_level = 1;
106 } else {
107 min_filter_level = (base_qindex / 8);
108 }
109 }
110
111 return min_filter_level;
112 }
113
114 /* Enforce a maximum filter level based upon baseline Q */
get_max_filter_level(VP8_COMP * cpi,int base_qindex)115 static int get_max_filter_level(VP8_COMP *cpi, int base_qindex) {
116 /* PGW August 2006: Highest filter values almost always a bad idea */
117
118 /* jbb chg: 20100118 - not so any more with this overquant stuff allow
119 * high values with lots of intra coming in.
120 */
121 int max_filter_level = MAX_LOOP_FILTER;
122 (void)base_qindex;
123
124 if (cpi->twopass.section_intra_rating > 8) {
125 max_filter_level = MAX_LOOP_FILTER * 3 / 4;
126 }
127
128 return max_filter_level;
129 }
130
vp8cx_pick_filter_level_fast(YV12_BUFFER_CONFIG * sd,VP8_COMP * cpi)131 void vp8cx_pick_filter_level_fast(YV12_BUFFER_CONFIG *sd, VP8_COMP *cpi) {
132 VP8_COMMON *cm = &cpi->common;
133
134 int best_err = 0;
135 int filt_err = 0;
136 int min_filter_level = get_min_filter_level(cpi, cm->base_qindex);
137 int max_filter_level = get_max_filter_level(cpi, cm->base_qindex);
138 int filt_val;
139 int best_filt_val;
140 YV12_BUFFER_CONFIG *saved_frame = cm->frame_to_show;
141
142 /* Replace unfiltered frame buffer with a new one */
143 cm->frame_to_show = &cpi->pick_lf_lvl_frame;
144
145 if (cm->frame_type == KEY_FRAME) {
146 cm->sharpness_level = 0;
147 } else {
148 cm->sharpness_level = cpi->oxcf.Sharpness;
149 }
150
151 if (cm->sharpness_level != cm->last_sharpness_level) {
152 vp8_loop_filter_update_sharpness(&cm->lf_info, cm->sharpness_level);
153 cm->last_sharpness_level = cm->sharpness_level;
154 }
155
156 /* Start the search at the previous frame filter level unless it is
157 * now out of range.
158 */
159 if (cm->filter_level < min_filter_level) {
160 cm->filter_level = min_filter_level;
161 } else if (cm->filter_level > max_filter_level) {
162 cm->filter_level = max_filter_level;
163 }
164
165 filt_val = cm->filter_level;
166 best_filt_val = filt_val;
167
168 /* Get the err using the previous frame's filter value. */
169
170 /* Copy the unfiltered / processed recon buffer to the new buffer */
171 yv12_copy_partial_frame(saved_frame, cm->frame_to_show);
172 vp8_loop_filter_partial_frame(cm, &cpi->mb.e_mbd, filt_val);
173
174 best_err = calc_partial_ssl_err(sd, cm->frame_to_show);
175
176 filt_val -= 1 + (filt_val > 10);
177
178 /* Search lower filter levels */
179 while (filt_val >= min_filter_level) {
180 /* Apply the loop filter */
181 yv12_copy_partial_frame(saved_frame, cm->frame_to_show);
182 vp8_loop_filter_partial_frame(cm, &cpi->mb.e_mbd, filt_val);
183
184 /* Get the err for filtered frame */
185 filt_err = calc_partial_ssl_err(sd, cm->frame_to_show);
186
187 /* Update the best case record or exit loop. */
188 if (filt_err < best_err) {
189 best_err = filt_err;
190 best_filt_val = filt_val;
191 } else {
192 break;
193 }
194
195 /* Adjust filter level */
196 filt_val -= 1 + (filt_val > 10);
197 }
198
199 /* Search up (note that we have already done filt_val = cm->filter_level) */
200 filt_val = cm->filter_level + 1 + (filt_val > 10);
201
202 if (best_filt_val == cm->filter_level) {
203 /* Resist raising filter level for very small gains */
204 best_err -= (best_err >> 10);
205
206 while (filt_val < max_filter_level) {
207 /* Apply the loop filter */
208 yv12_copy_partial_frame(saved_frame, cm->frame_to_show);
209
210 vp8_loop_filter_partial_frame(cm, &cpi->mb.e_mbd, filt_val);
211
212 /* Get the err for filtered frame */
213 filt_err = calc_partial_ssl_err(sd, cm->frame_to_show);
214
215 /* Update the best case record or exit loop. */
216 if (filt_err < best_err) {
217 /* Do not raise filter level if improvement is < 1 part
218 * in 4096
219 */
220 best_err = filt_err - (filt_err >> 10);
221
222 best_filt_val = filt_val;
223 } else {
224 break;
225 }
226
227 /* Adjust filter level */
228 filt_val += 1 + (filt_val > 10);
229 }
230 }
231
232 cm->filter_level = best_filt_val;
233
234 if (cm->filter_level < min_filter_level) cm->filter_level = min_filter_level;
235
236 if (cm->filter_level > max_filter_level) cm->filter_level = max_filter_level;
237
238 /* restore unfiltered frame pointer */
239 cm->frame_to_show = saved_frame;
240 }
241
242 /* Stub function for now Alt LF not used */
vp8cx_set_alt_lf_level(VP8_COMP * cpi,int filt_val)243 void vp8cx_set_alt_lf_level(VP8_COMP *cpi, int filt_val) {
244 MACROBLOCKD *mbd = &cpi->mb.e_mbd;
245 (void)filt_val;
246
247 mbd->segment_feature_data[MB_LVL_ALT_LF][0] =
248 cpi->segment_feature_data[MB_LVL_ALT_LF][0];
249 mbd->segment_feature_data[MB_LVL_ALT_LF][1] =
250 cpi->segment_feature_data[MB_LVL_ALT_LF][1];
251 mbd->segment_feature_data[MB_LVL_ALT_LF][2] =
252 cpi->segment_feature_data[MB_LVL_ALT_LF][2];
253 mbd->segment_feature_data[MB_LVL_ALT_LF][3] =
254 cpi->segment_feature_data[MB_LVL_ALT_LF][3];
255 }
256
vp8cx_pick_filter_level(YV12_BUFFER_CONFIG * sd,VP8_COMP * cpi)257 void vp8cx_pick_filter_level(YV12_BUFFER_CONFIG *sd, VP8_COMP *cpi) {
258 VP8_COMMON *cm = &cpi->common;
259
260 int best_err = 0;
261 int filt_err = 0;
262 int min_filter_level = get_min_filter_level(cpi, cm->base_qindex);
263 int max_filter_level = get_max_filter_level(cpi, cm->base_qindex);
264
265 int filter_step;
266 int filt_high = 0;
267 int filt_mid;
268 int filt_low = 0;
269 int filt_best;
270 int filt_direction = 0;
271
272 /* Bias against raising loop filter and in favor of lowering it */
273 int Bias = 0;
274
275 int ss_err[MAX_LOOP_FILTER + 1];
276
277 YV12_BUFFER_CONFIG *saved_frame = cm->frame_to_show;
278
279 memset(ss_err, 0, sizeof(ss_err));
280
281 /* Replace unfiltered frame buffer with a new one */
282 cm->frame_to_show = &cpi->pick_lf_lvl_frame;
283
284 if (cm->frame_type == KEY_FRAME) {
285 cm->sharpness_level = 0;
286 } else {
287 cm->sharpness_level = cpi->oxcf.Sharpness;
288 }
289
290 /* Start the search at the previous frame filter level unless it is
291 * now out of range.
292 */
293 filt_mid = cm->filter_level;
294
295 if (filt_mid < min_filter_level) {
296 filt_mid = min_filter_level;
297 } else if (filt_mid > max_filter_level) {
298 filt_mid = max_filter_level;
299 }
300
301 /* Define the initial step size */
302 filter_step = (filt_mid < 16) ? 4 : filt_mid / 4;
303
304 /* Get baseline error score */
305
306 /* Copy the unfiltered / processed recon buffer to the new buffer */
307 vpx_yv12_copy_y(saved_frame, cm->frame_to_show);
308
309 vp8cx_set_alt_lf_level(cpi, filt_mid);
310 vp8_loop_filter_frame_yonly(cm, &cpi->mb.e_mbd, filt_mid);
311
312 best_err = vp8_calc_ss_err(sd, cm->frame_to_show);
313
314 ss_err[filt_mid] = best_err;
315
316 filt_best = filt_mid;
317
318 while (filter_step > 0) {
319 Bias = (best_err >> (15 - (filt_mid / 8))) * filter_step;
320
321 if (cpi->twopass.section_intra_rating < 20) {
322 Bias = Bias * cpi->twopass.section_intra_rating / 20;
323 }
324
325 filt_high = ((filt_mid + filter_step) > max_filter_level)
326 ? max_filter_level
327 : (filt_mid + filter_step);
328 filt_low = ((filt_mid - filter_step) < min_filter_level)
329 ? min_filter_level
330 : (filt_mid - filter_step);
331
332 if ((filt_direction <= 0) && (filt_low != filt_mid)) {
333 if (ss_err[filt_low] == 0) {
334 /* Get Low filter error score */
335 vpx_yv12_copy_y(saved_frame, cm->frame_to_show);
336 vp8cx_set_alt_lf_level(cpi, filt_low);
337 vp8_loop_filter_frame_yonly(cm, &cpi->mb.e_mbd, filt_low);
338
339 filt_err = vp8_calc_ss_err(sd, cm->frame_to_show);
340 ss_err[filt_low] = filt_err;
341 } else {
342 filt_err = ss_err[filt_low];
343 }
344
345 /* If value is close to the best so far then bias towards a
346 * lower loop filter value.
347 */
348 if ((filt_err - Bias) < best_err) {
349 /* Was it actually better than the previous best? */
350 if (filt_err < best_err) best_err = filt_err;
351
352 filt_best = filt_low;
353 }
354 }
355
356 /* Now look at filt_high */
357 if ((filt_direction >= 0) && (filt_high != filt_mid)) {
358 if (ss_err[filt_high] == 0) {
359 vpx_yv12_copy_y(saved_frame, cm->frame_to_show);
360 vp8cx_set_alt_lf_level(cpi, filt_high);
361 vp8_loop_filter_frame_yonly(cm, &cpi->mb.e_mbd, filt_high);
362
363 filt_err = vp8_calc_ss_err(sd, cm->frame_to_show);
364 ss_err[filt_high] = filt_err;
365 } else {
366 filt_err = ss_err[filt_high];
367 }
368
369 /* Was it better than the previous best? */
370 if (filt_err < (best_err - Bias)) {
371 best_err = filt_err;
372 filt_best = filt_high;
373 }
374 }
375
376 /* Half the step distance if the best filter value was the same
377 * as last time
378 */
379 if (filt_best == filt_mid) {
380 filter_step = filter_step / 2;
381 filt_direction = 0;
382 } else {
383 filt_direction = (filt_best < filt_mid) ? -1 : 1;
384 filt_mid = filt_best;
385 }
386 }
387
388 cm->filter_level = filt_best;
389
390 /* restore unfiltered frame pointer */
391 cm->frame_to_show = saved_frame;
392 }
393