| /* |
| * Copyright (c) 2016, Alliance for Open Media. All rights reserved |
| * |
| * This source code is subject to the terms of the BSD 2 Clause License and |
| * the Alliance for Open Media Patent License 1.0. If the BSD 2 Clause License |
| * was not distributed with this source code in the LICENSE file, you can |
| * obtain it at www.aomedia.org/license/software. If the Alliance for Open |
| * Media Patent License 1.0 was not distributed with this source code in the |
| * PATENTS file, you can obtain it at www.aomedia.org/license/patent. |
| */ |
| |
| #include <smmintrin.h> |
| |
| #include "./av1_rtcd.h" |
| #include "av1/common/warped_motion.h" |
| |
| void av1_highbd_warp_affine_sse4_1(const int32_t *mat, const uint16_t *ref, |
| int width, int height, int stride, |
| uint16_t *pred, int p_col, int p_row, |
| int p_width, int p_height, int p_stride, |
| int subsampling_x, int subsampling_y, int bd, |
| ConvolveParams *conv_params, int16_t alpha, |
| int16_t beta, int16_t gamma, int16_t delta) { |
| int comp_avg = conv_params->do_average; |
| #if HORSHEAR_REDUCE_PREC_BITS >= 5 |
| __m128i tmp[15]; |
| #else |
| #error "HORSHEAR_REDUCE_PREC_BITS < 5 not currently supported by SSSE3 filter" |
| #endif |
| int i, j, k; |
| const int use_conv_params = conv_params->round == CONVOLVE_OPT_NO_ROUND; |
| const int reduce_bits_horiz = |
| use_conv_params ? conv_params->round_0 : HORSHEAR_REDUCE_PREC_BITS; |
| const int offset_bits_horiz = |
| use_conv_params ? bd + FILTER_BITS - 1 : bd + WARPEDPIXEL_FILTER_BITS - 1; |
| if (use_conv_params) { |
| conv_params->do_post_rounding = 1; |
| } |
| assert(FILTER_BITS == WARPEDPIXEL_FILTER_BITS); |
| #if CONFIG_JNT_COMP |
| const int w0 = conv_params->fwd_offset; |
| const int w1 = conv_params->bck_offset; |
| const __m128i wt0 = _mm_set1_epi32(w0); |
| const __m128i wt1 = _mm_set1_epi32(w1); |
| const int jnt_round_const = 1 << (DIST_PRECISION_BITS - 2); |
| const __m128i jnt_r = _mm_set1_epi32(jnt_round_const); |
| #endif // CONFIG_JNT_COMP |
| |
| /* Note: For this code to work, the left/right frame borders need to be |
| extended by at least 13 pixels each. By the time we get here, other |
| code will have set up this border, but we allow an explicit check |
| for debugging purposes. |
| */ |
| /*for (i = 0; i < height; ++i) { |
| for (j = 0; j < 13; ++j) { |
| assert(ref[i * stride - 13 + j] == ref[i * stride]); |
| assert(ref[i * stride + width + j] == ref[i * stride + (width - 1)]); |
| } |
| }*/ |
| |
| for (i = 0; i < p_height; i += 8) { |
| for (j = 0; j < p_width; j += 8) { |
| const int32_t src_x = (p_col + j + 4) << subsampling_x; |
| const int32_t src_y = (p_row + i + 4) << subsampling_y; |
| const int32_t dst_x = mat[2] * src_x + mat[3] * src_y + mat[0]; |
| const int32_t dst_y = mat[4] * src_x + mat[5] * src_y + mat[1]; |
| const int32_t x4 = dst_x >> subsampling_x; |
| const int32_t y4 = dst_y >> subsampling_y; |
| |
| int32_t ix4 = x4 >> WARPEDMODEL_PREC_BITS; |
| int32_t sx4 = x4 & ((1 << WARPEDMODEL_PREC_BITS) - 1); |
| int32_t iy4 = y4 >> WARPEDMODEL_PREC_BITS; |
| int32_t sy4 = y4 & ((1 << WARPEDMODEL_PREC_BITS) - 1); |
| |
| // Add in all the constant terms, including rounding and offset |
| sx4 += alpha * (-4) + beta * (-4) + (1 << (WARPEDDIFF_PREC_BITS - 1)) + |
| (WARPEDPIXEL_PREC_SHIFTS << WARPEDDIFF_PREC_BITS); |
| sy4 += gamma * (-4) + delta * (-4) + (1 << (WARPEDDIFF_PREC_BITS - 1)) + |
| (WARPEDPIXEL_PREC_SHIFTS << WARPEDDIFF_PREC_BITS); |
| |
| sx4 &= ~((1 << WARP_PARAM_REDUCE_BITS) - 1); |
| sy4 &= ~((1 << WARP_PARAM_REDUCE_BITS) - 1); |
| |
| // Horizontal filter |
| // If the block is aligned such that, after clamping, every sample |
| // would be taken from the leftmost/rightmost column, then we can |
| // skip the expensive horizontal filter. |
| if (ix4 <= -7) { |
| for (k = -7; k < AOMMIN(8, p_height - i); ++k) { |
| int iy = iy4 + k; |
| if (iy < 0) |
| iy = 0; |
| else if (iy > height - 1) |
| iy = height - 1; |
| tmp[k + 7] = _mm_set1_epi16( |
| (1 << (bd + WARPEDPIXEL_FILTER_BITS - HORSHEAR_REDUCE_PREC_BITS - |
| 1)) + |
| ref[iy * stride] * |
| (1 << (WARPEDPIXEL_FILTER_BITS - HORSHEAR_REDUCE_PREC_BITS))); |
| } |
| } else if (ix4 >= width + 6) { |
| for (k = -7; k < AOMMIN(8, p_height - i); ++k) { |
| int iy = iy4 + k; |
| if (iy < 0) |
| iy = 0; |
| else if (iy > height - 1) |
| iy = height - 1; |
| tmp[k + 7] = _mm_set1_epi16( |
| (1 << (bd + WARPEDPIXEL_FILTER_BITS - HORSHEAR_REDUCE_PREC_BITS - |
| 1)) + |
| ref[iy * stride + (width - 1)] * |
| (1 << (WARPEDPIXEL_FILTER_BITS - HORSHEAR_REDUCE_PREC_BITS))); |
| } |
| } else { |
| for (k = -7; k < AOMMIN(8, p_height - i); ++k) { |
| int iy = iy4 + k; |
| if (iy < 0) |
| iy = 0; |
| else if (iy > height - 1) |
| iy = height - 1; |
| int sx = sx4 + beta * (k + 4); |
| |
| // Load source pixels |
| const __m128i src = |
| _mm_loadu_si128((__m128i *)(ref + iy * stride + ix4 - 7)); |
| const __m128i src2 = |
| _mm_loadu_si128((__m128i *)(ref + iy * stride + ix4 + 1)); |
| |
| // Filter even-index pixels |
| const __m128i tmp_0 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sx + 0 * alpha) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_2 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sx + 2 * alpha) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_4 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sx + 4 * alpha) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_6 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sx + 6 * alpha) >> WARPEDDIFF_PREC_BITS))); |
| |
| // coeffs 0 1 0 1 2 3 2 3 for pixels 0, 2 |
| const __m128i tmp_8 = _mm_unpacklo_epi32(tmp_0, tmp_2); |
| // coeffs 0 1 0 1 2 3 2 3 for pixels 4, 6 |
| const __m128i tmp_10 = _mm_unpacklo_epi32(tmp_4, tmp_6); |
| // coeffs 4 5 4 5 6 7 6 7 for pixels 0, 2 |
| const __m128i tmp_12 = _mm_unpackhi_epi32(tmp_0, tmp_2); |
| // coeffs 4 5 4 5 6 7 6 7 for pixels 4, 6 |
| const __m128i tmp_14 = _mm_unpackhi_epi32(tmp_4, tmp_6); |
| |
| // coeffs 0 1 0 1 0 1 0 1 for pixels 0, 2, 4, 6 |
| const __m128i coeff_0 = _mm_unpacklo_epi64(tmp_8, tmp_10); |
| // coeffs 2 3 2 3 2 3 2 3 for pixels 0, 2, 4, 6 |
| const __m128i coeff_2 = _mm_unpackhi_epi64(tmp_8, tmp_10); |
| // coeffs 4 5 4 5 4 5 4 5 for pixels 0, 2, 4, 6 |
| const __m128i coeff_4 = _mm_unpacklo_epi64(tmp_12, tmp_14); |
| // coeffs 6 7 6 7 6 7 6 7 for pixels 0, 2, 4, 6 |
| const __m128i coeff_6 = _mm_unpackhi_epi64(tmp_12, tmp_14); |
| |
| const __m128i round_const = _mm_set1_epi32( |
| (1 << offset_bits_horiz) + ((1 << reduce_bits_horiz) >> 1)); |
| |
| // Calculate filtered results |
| const __m128i res_0 = _mm_madd_epi16(src, coeff_0); |
| const __m128i res_2 = |
| _mm_madd_epi16(_mm_alignr_epi8(src2, src, 4), coeff_2); |
| const __m128i res_4 = |
| _mm_madd_epi16(_mm_alignr_epi8(src2, src, 8), coeff_4); |
| const __m128i res_6 = |
| _mm_madd_epi16(_mm_alignr_epi8(src2, src, 12), coeff_6); |
| |
| __m128i res_even = _mm_add_epi32(_mm_add_epi32(res_0, res_4), |
| _mm_add_epi32(res_2, res_6)); |
| res_even = _mm_sra_epi32(_mm_add_epi32(res_even, round_const), |
| _mm_cvtsi32_si128(reduce_bits_horiz)); |
| |
| // Filter odd-index pixels |
| const __m128i tmp_1 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sx + 1 * alpha) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_3 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sx + 3 * alpha) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_5 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sx + 5 * alpha) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_7 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sx + 7 * alpha) >> WARPEDDIFF_PREC_BITS))); |
| |
| const __m128i tmp_9 = _mm_unpacklo_epi32(tmp_1, tmp_3); |
| const __m128i tmp_11 = _mm_unpacklo_epi32(tmp_5, tmp_7); |
| const __m128i tmp_13 = _mm_unpackhi_epi32(tmp_1, tmp_3); |
| const __m128i tmp_15 = _mm_unpackhi_epi32(tmp_5, tmp_7); |
| |
| const __m128i coeff_1 = _mm_unpacklo_epi64(tmp_9, tmp_11); |
| const __m128i coeff_3 = _mm_unpackhi_epi64(tmp_9, tmp_11); |
| const __m128i coeff_5 = _mm_unpacklo_epi64(tmp_13, tmp_15); |
| const __m128i coeff_7 = _mm_unpackhi_epi64(tmp_13, tmp_15); |
| |
| const __m128i res_1 = |
| _mm_madd_epi16(_mm_alignr_epi8(src2, src, 2), coeff_1); |
| const __m128i res_3 = |
| _mm_madd_epi16(_mm_alignr_epi8(src2, src, 6), coeff_3); |
| const __m128i res_5 = |
| _mm_madd_epi16(_mm_alignr_epi8(src2, src, 10), coeff_5); |
| const __m128i res_7 = |
| _mm_madd_epi16(_mm_alignr_epi8(src2, src, 14), coeff_7); |
| |
| __m128i res_odd = _mm_add_epi32(_mm_add_epi32(res_1, res_5), |
| _mm_add_epi32(res_3, res_7)); |
| res_odd = _mm_sra_epi32(_mm_add_epi32(res_odd, round_const), |
| _mm_cvtsi32_si128(reduce_bits_horiz)); |
| |
| // Combine results into one register. |
| // We store the columns in the order 0, 2, 4, 6, 1, 3, 5, 7 |
| // as this order helps with the vertical filter. |
| tmp[k + 7] = _mm_packs_epi32(res_even, res_odd); |
| } |
| } |
| |
| // Vertical filter |
| for (k = -4; k < AOMMIN(4, p_height - i - 4); ++k) { |
| int sy = sy4 + delta * (k + 4); |
| |
| // Load from tmp and rearrange pairs of consecutive rows into the |
| // column order 0 0 2 2 4 4 6 6; 1 1 3 3 5 5 7 7 |
| const __m128i *src = tmp + (k + 4); |
| const __m128i src_0 = _mm_unpacklo_epi16(src[0], src[1]); |
| const __m128i src_2 = _mm_unpacklo_epi16(src[2], src[3]); |
| const __m128i src_4 = _mm_unpacklo_epi16(src[4], src[5]); |
| const __m128i src_6 = _mm_unpacklo_epi16(src[6], src[7]); |
| |
| // Filter even-index pixels |
| const __m128i tmp_0 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sy + 0 * gamma) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_2 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sy + 2 * gamma) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_4 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sy + 4 * gamma) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_6 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sy + 6 * gamma) >> WARPEDDIFF_PREC_BITS))); |
| |
| const __m128i tmp_8 = _mm_unpacklo_epi32(tmp_0, tmp_2); |
| const __m128i tmp_10 = _mm_unpacklo_epi32(tmp_4, tmp_6); |
| const __m128i tmp_12 = _mm_unpackhi_epi32(tmp_0, tmp_2); |
| const __m128i tmp_14 = _mm_unpackhi_epi32(tmp_4, tmp_6); |
| |
| const __m128i coeff_0 = _mm_unpacklo_epi64(tmp_8, tmp_10); |
| const __m128i coeff_2 = _mm_unpackhi_epi64(tmp_8, tmp_10); |
| const __m128i coeff_4 = _mm_unpacklo_epi64(tmp_12, tmp_14); |
| const __m128i coeff_6 = _mm_unpackhi_epi64(tmp_12, tmp_14); |
| |
| const __m128i res_0 = _mm_madd_epi16(src_0, coeff_0); |
| const __m128i res_2 = _mm_madd_epi16(src_2, coeff_2); |
| const __m128i res_4 = _mm_madd_epi16(src_4, coeff_4); |
| const __m128i res_6 = _mm_madd_epi16(src_6, coeff_6); |
| |
| const __m128i res_even = _mm_add_epi32(_mm_add_epi32(res_0, res_2), |
| _mm_add_epi32(res_4, res_6)); |
| |
| // Filter odd-index pixels |
| const __m128i src_1 = _mm_unpackhi_epi16(src[0], src[1]); |
| const __m128i src_3 = _mm_unpackhi_epi16(src[2], src[3]); |
| const __m128i src_5 = _mm_unpackhi_epi16(src[4], src[5]); |
| const __m128i src_7 = _mm_unpackhi_epi16(src[6], src[7]); |
| |
| const __m128i tmp_1 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sy + 1 * gamma) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_3 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sy + 3 * gamma) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_5 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sy + 5 * gamma) >> WARPEDDIFF_PREC_BITS))); |
| const __m128i tmp_7 = _mm_loadu_si128( |
| (__m128i *)(warped_filter + |
| ((sy + 7 * gamma) >> WARPEDDIFF_PREC_BITS))); |
| |
| const __m128i tmp_9 = _mm_unpacklo_epi32(tmp_1, tmp_3); |
| const __m128i tmp_11 = _mm_unpacklo_epi32(tmp_5, tmp_7); |
| const __m128i tmp_13 = _mm_unpackhi_epi32(tmp_1, tmp_3); |
| const __m128i tmp_15 = _mm_unpackhi_epi32(tmp_5, tmp_7); |
| |
| const __m128i coeff_1 = _mm_unpacklo_epi64(tmp_9, tmp_11); |
| const __m128i coeff_3 = _mm_unpackhi_epi64(tmp_9, tmp_11); |
| const __m128i coeff_5 = _mm_unpacklo_epi64(tmp_13, tmp_15); |
| const __m128i coeff_7 = _mm_unpackhi_epi64(tmp_13, tmp_15); |
| |
| const __m128i res_1 = _mm_madd_epi16(src_1, coeff_1); |
| const __m128i res_3 = _mm_madd_epi16(src_3, coeff_3); |
| const __m128i res_5 = _mm_madd_epi16(src_5, coeff_5); |
| const __m128i res_7 = _mm_madd_epi16(src_7, coeff_7); |
| |
| const __m128i res_odd = _mm_add_epi32(_mm_add_epi32(res_1, res_3), |
| _mm_add_epi32(res_5, res_7)); |
| |
| // Rearrange pixels back into the order 0 ... 7 |
| __m128i res_lo = _mm_unpacklo_epi32(res_even, res_odd); |
| __m128i res_hi = _mm_unpackhi_epi32(res_even, res_odd); |
| |
| if (use_conv_params) { |
| __m128i *const p = |
| (__m128i *)&conv_params |
| ->dst[(i + k + 4) * conv_params->dst_stride + j]; |
| const __m128i round_const = _mm_set1_epi32( |
| -(1 << (bd + 2 * FILTER_BITS - conv_params->round_0 - 1)) + |
| ((1 << (conv_params->round_1)) >> 1)); |
| res_lo = _mm_add_epi32(res_lo, round_const); |
| res_lo = |
| _mm_srl_epi32(res_lo, _mm_cvtsi32_si128(conv_params->round_1)); |
| #if CONFIG_JNT_COMP |
| if (conv_params->use_jnt_comp_avg) { |
| if (comp_avg) { |
| const __m128i sum = _mm_add_epi32(_mm_loadu_si128(p), |
| _mm_mullo_epi32(res_lo, wt1)); |
| const __m128i sum_round = _mm_add_epi32(sum, jnt_r); |
| res_lo = _mm_srai_epi32(sum_round, DIST_PRECISION_BITS - 1); |
| } else { |
| res_lo = _mm_mullo_epi32(res_lo, wt0); |
| } |
| } else { |
| if (comp_avg) res_lo = _mm_add_epi32(_mm_loadu_si128(p), res_lo); |
| } |
| |
| _mm_storeu_si128(p, res_lo); |
| #else |
| if (comp_avg) res_lo = _mm_add_epi32(_mm_loadu_si128(p), res_lo); |
| _mm_storeu_si128(p, res_lo); |
| #endif |
| |
| if (p_width > 4) { |
| res_hi = _mm_add_epi32(res_hi, round_const); |
| res_hi = |
| _mm_srl_epi32(res_hi, _mm_cvtsi32_si128(conv_params->round_1)); |
| |
| #if CONFIG_JNT_COMP |
| if (conv_params->use_jnt_comp_avg) { |
| if (comp_avg) { |
| const __m128i sum = _mm_add_epi32(_mm_loadu_si128(p + 1), |
| _mm_mullo_epi32(res_hi, wt1)); |
| const __m128i sum_round = _mm_add_epi32(sum, jnt_r); |
| res_hi = _mm_srai_epi32(sum_round, DIST_PRECISION_BITS - 1); |
| } else { |
| res_hi = _mm_mullo_epi32(res_hi, wt0); |
| } |
| } else { |
| if (comp_avg) |
| res_hi = _mm_add_epi32(_mm_loadu_si128(p + 1), res_hi); |
| } |
| |
| _mm_storeu_si128(p + 1, res_hi); |
| #else |
| if (comp_avg) |
| res_hi = _mm_add_epi32(_mm_loadu_si128(p + 1), res_hi); |
| _mm_storeu_si128(p + 1, res_hi); |
| #endif |
| } |
| } else { |
| // Round and pack into 8 bits |
| const __m128i round_const = |
| _mm_set1_epi32(-(1 << (bd + VERSHEAR_REDUCE_PREC_BITS - 1)) + |
| ((1 << VERSHEAR_REDUCE_PREC_BITS) >> 1)); |
| |
| const __m128i res_lo_round = _mm_srai_epi32( |
| _mm_add_epi32(res_lo, round_const), VERSHEAR_REDUCE_PREC_BITS); |
| const __m128i res_hi_round = _mm_srai_epi32( |
| _mm_add_epi32(res_hi, round_const), VERSHEAR_REDUCE_PREC_BITS); |
| |
| __m128i res_16bit = _mm_packs_epi32(res_lo_round, res_hi_round); |
| // Clamp res_16bit to the range [0, 2^bd - 1] |
| const __m128i max_val = _mm_set1_epi16((1 << bd) - 1); |
| const __m128i zero = _mm_setzero_si128(); |
| res_16bit = _mm_max_epi16(_mm_min_epi16(res_16bit, max_val), zero); |
| |
| // Store, blending with 'pred' if needed |
| __m128i *const p = (__m128i *)&pred[(i + k + 4) * p_stride + j]; |
| |
| // Note: If we're outputting a 4x4 block, we need to be very careful |
| // to only output 4 pixels at this point, to avoid encode/decode |
| // mismatches when encoding with multiple threads. |
| if (p_width == 4) { |
| if (comp_avg) |
| res_16bit = _mm_avg_epu16(res_16bit, _mm_loadl_epi64(p)); |
| _mm_storel_epi64(p, res_16bit); |
| } else { |
| if (comp_avg) |
| res_16bit = _mm_avg_epu16(res_16bit, _mm_loadu_si128(p)); |
| _mm_storeu_si128(p, res_16bit); |
| } |
| } |
| } |
| } |
| } |
| } |
