Source code
Revision control
Copy as Markdown
Other Tools
/*
* Copyright (c) 2010 The WebM project authors. All Rights Reserved.
*
* Use of this source code is governed by a BSD-style license
* that can be found in the LICENSE file in the root of the source
* tree. An additional intellectual property rights grant can be found
* in the file PATENTS. All contributing project authors may
* be found in the AUTHORS file in the root of the source tree.
*/
#include <immintrin.h>
#include <stdio.h>
#include "./vpx_dsp_rtcd.h"
#include "vpx_dsp/x86/convolve.h"
#include "vpx_dsp/x86/convolve_avx2.h"
#include "vpx_dsp/x86/convolve_sse2.h"
#include "vpx_dsp/x86/convolve_ssse3.h"
#include "vpx_ports/mem.h"
// filters for 16_h8
DECLARE_ALIGNED(32, static const uint8_t,
filt1_global_avx2[32]) = { 0, 1, 1, 2, 2, 3, 3, 4, 4, 5, 5,
6, 6, 7, 7, 8, 0, 1, 1, 2, 2, 3,
3, 4, 4, 5, 5, 6, 6, 7, 7, 8 };
DECLARE_ALIGNED(32, static const uint8_t,
filt2_global_avx2[32]) = { 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7,
8, 8, 9, 9, 10, 2, 3, 3, 4, 4, 5,
5, 6, 6, 7, 7, 8, 8, 9, 9, 10 };
DECLARE_ALIGNED(32, static const uint8_t, filt3_global_avx2[32]) = {
4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 9, 10, 10, 11, 11, 12,
4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 9, 10, 10, 11, 11, 12
};
DECLARE_ALIGNED(32, static const uint8_t, filt4_global_avx2[32]) = {
6, 7, 7, 8, 8, 9, 9, 10, 10, 11, 11, 12, 12, 13, 13, 14,
6, 7, 7, 8, 8, 9, 9, 10, 10, 11, 11, 12, 12, 13, 13, 14
};
DECLARE_ALIGNED(32, static const uint8_t, filt_d4_global_avx2[64]) = {
0, 1, 2, 3, 1, 2, 3, 4, 2, 3, 4, 5, 3, 4, 5, 6, 0, 1, 2, 3, 1, 2,
3, 4, 2, 3, 4, 5, 3, 4, 5, 6, 4, 5, 6, 7, 5, 6, 7, 8, 6, 7, 8, 9,
7, 8, 9, 10, 4, 5, 6, 7, 5, 6, 7, 8, 6, 7, 8, 9, 7, 8, 9, 10,
};
#define CALC_CONVOLVE8_HORZ_ROW \
srcReg = mm256_loadu2_si128(src_ptr - 3, src_ptr - 3 + src_pitch); \
s1[0] = _mm256_shuffle_epi8(srcReg, filt[0]); \
s1[1] = _mm256_shuffle_epi8(srcReg, filt[1]); \
s1[2] = _mm256_shuffle_epi8(srcReg, filt[2]); \
s1[3] = _mm256_shuffle_epi8(srcReg, filt[3]); \
s1[0] = convolve8_16_avx2(s1, f1); \
s1[0] = _mm256_packus_epi16(s1[0], s1[0]); \
src_ptr += src_stride; \
_mm_storel_epi64((__m128i *)&output_ptr[0], _mm256_castsi256_si128(s1[0])); \
output_ptr += output_pitch; \
_mm_storel_epi64((__m128i *)&output_ptr[0], \
_mm256_extractf128_si256(s1[0], 1)); \
output_ptr += output_pitch;
static INLINE void vpx_filter_block1d16_h8_x_avx2(
const uint8_t *src_ptr, ptrdiff_t src_pixels_per_line, uint8_t *output_ptr,
ptrdiff_t output_pitch, uint32_t output_height, const int16_t *filter,
const int avg) {
__m128i outReg1, outReg2;
__m256i outReg32b1, outReg32b2;
unsigned int i;
ptrdiff_t src_stride, dst_stride;
__m256i f[4], filt[4], s[4];
shuffle_filter_avx2(filter, f);
filt[0] = _mm256_load_si256((__m256i const *)filt1_global_avx2);
filt[1] = _mm256_load_si256((__m256i const *)filt2_global_avx2);
filt[2] = _mm256_load_si256((__m256i const *)filt3_global_avx2);
filt[3] = _mm256_load_si256((__m256i const *)filt4_global_avx2);
// multiple the size of the source and destination stride by two
src_stride = src_pixels_per_line << 1;
dst_stride = output_pitch << 1;
for (i = output_height; i > 1; i -= 2) {
__m256i srcReg;
// load the 2 strides of source
srcReg = mm256_loadu2_si128(src_ptr - 3, src_ptr + src_pixels_per_line - 3);
// filter the source buffer
s[0] = _mm256_shuffle_epi8(srcReg, filt[0]);
s[1] = _mm256_shuffle_epi8(srcReg, filt[1]);
s[2] = _mm256_shuffle_epi8(srcReg, filt[2]);
s[3] = _mm256_shuffle_epi8(srcReg, filt[3]);
outReg32b1 = convolve8_16_avx2(s, f);
// reading 2 strides of the next 16 bytes
// (part of it was being read by earlier read)
srcReg = mm256_loadu2_si128(src_ptr + 5, src_ptr + src_pixels_per_line + 5);
// filter the source buffer
s[0] = _mm256_shuffle_epi8(srcReg, filt[0]);
s[1] = _mm256_shuffle_epi8(srcReg, filt[1]);
s[2] = _mm256_shuffle_epi8(srcReg, filt[2]);
s[3] = _mm256_shuffle_epi8(srcReg, filt[3]);
outReg32b2 = convolve8_16_avx2(s, f);
// shrink to 8 bit each 16 bits, the low and high 64-bits of each lane
// contain the first and second convolve result respectively
outReg32b1 = _mm256_packus_epi16(outReg32b1, outReg32b2);
src_ptr += src_stride;
if (avg) {
const __m256i outReg = mm256_loadu2_si128(
(__m128i *)output_ptr, (__m128i *)(output_ptr + output_pitch));
outReg32b1 = _mm256_avg_epu8(outReg32b1, outReg);
}
mm256_store2_si128((__m128i *)output_ptr,
(__m128i *)(output_ptr + output_pitch), &outReg32b1);
output_ptr += dst_stride;
}
// if the number of strides is odd.
// process only 16 bytes
if (i > 0) {
const __m128i srcReg1 = _mm_loadu_si128((const __m128i *)(src_ptr - 3));
const __m128i srcReg2 = _mm_loadu_si128((const __m128i *)(src_ptr + 5));
const __m256i srcReg =
_mm256_inserti128_si256(_mm256_castsi128_si256(srcReg1), srcReg2, 1);
// filter the source buffer
s[0] = _mm256_shuffle_epi8(srcReg, filt[0]);
s[1] = _mm256_shuffle_epi8(srcReg, filt[1]);
s[2] = _mm256_shuffle_epi8(srcReg, filt[2]);
s[3] = _mm256_shuffle_epi8(srcReg, filt[3]);
// The low and high 128-bits of each lane contain the first and second
// convolve result respectively
outReg32b1 = convolve8_16_avx2(s, f);
outReg1 = _mm256_castsi256_si128(outReg32b1);
outReg2 = _mm256_extractf128_si256(outReg32b1, 1);
// shrink to 8 bit each 16 bits
outReg1 = _mm_packus_epi16(outReg1, outReg2);
// average if necessary
if (avg) {
outReg1 = _mm_avg_epu8(outReg1, _mm_load_si128((__m128i *)output_ptr));
}
// save 16 bytes
_mm_store_si128((__m128i *)output_ptr, outReg1);
}
}
static void vpx_filter_block1d16_h8_avx2(
const uint8_t *src_ptr, ptrdiff_t src_stride, uint8_t *output_ptr,
ptrdiff_t dst_stride, uint32_t output_height, const int16_t *filter) {
vpx_filter_block1d16_h8_x_avx2(src_ptr, src_stride, output_ptr, dst_stride,
output_height, filter, 0);
}
static void vpx_filter_block1d16_h8_avg_avx2(
const uint8_t *src_ptr, ptrdiff_t src_stride, uint8_t *output_ptr,
ptrdiff_t dst_stride, uint32_t output_height, const int16_t *filter) {
vpx_filter_block1d16_h8_x_avx2(src_ptr, src_stride, output_ptr, dst_stride,
output_height, filter, 1);
}
static void vpx_filter_block1d8_h8_avx2(
const uint8_t *src_ptr, ptrdiff_t src_pitch, uint8_t *output_ptr,
ptrdiff_t output_pitch, uint32_t output_height, const int16_t *filter) {
__m256i filt[4], f1[4], s1[4], srcReg;
__m128i f[4], s[4];
int y = output_height;
// Multiply the size of the source stride by two
const ptrdiff_t src_stride = src_pitch << 1;
shuffle_filter_avx2(filter, f1);
filt[0] = _mm256_load_si256((__m256i const *)filt1_global_avx2);
filt[1] = _mm256_load_si256((__m256i const *)filt2_global_avx2);
filt[2] = _mm256_load_si256((__m256i const *)filt3_global_avx2);
filt[3] = _mm256_load_si256((__m256i const *)filt4_global_avx2);
// Process next 4 rows
while (y > 3) {
CALC_CONVOLVE8_HORZ_ROW
CALC_CONVOLVE8_HORZ_ROW
y -= 4;
}
// If remaining, then process 2 rows at a time
while (y > 1) {
CALC_CONVOLVE8_HORZ_ROW
y -= 2;
}
// For the remaining height.
if (y > 0) {
const __m128i src_reg_128 = _mm_loadu_si128((const __m128i *)(src_ptr - 3));
f[0] = _mm256_castsi256_si128(f1[0]);
f[1] = _mm256_castsi256_si128(f1[1]);
f[2] = _mm256_castsi256_si128(f1[2]);
f[3] = _mm256_castsi256_si128(f1[3]);
// filter the source buffer
s[0] = _mm_shuffle_epi8(src_reg_128, _mm256_castsi256_si128(filt[0]));
s[1] = _mm_shuffle_epi8(src_reg_128, _mm256_castsi256_si128(filt[1]));
s[2] = _mm_shuffle_epi8(src_reg_128, _mm256_castsi256_si128(filt[2]));
s[3] = _mm_shuffle_epi8(src_reg_128, _mm256_castsi256_si128(filt[3]));
s[0] = convolve8_8_ssse3(s, f);
// Saturate 16bit value to 8bit.
s[0] = _mm_packus_epi16(s[0], s[0]);
// Save only 8 bytes
_mm_storel_epi64((__m128i *)&output_ptr[0], s[0]);
}
}
static INLINE void vpx_filter_block1d16_v8_x_avx2(
const uint8_t *src_ptr, ptrdiff_t src_pitch, uint8_t *output_ptr,
ptrdiff_t out_pitch, uint32_t output_height, const int16_t *filter,
const int avg) {
__m256i srcRegHead1;
unsigned int i;
ptrdiff_t src_stride, dst_stride;
__m256i f[4], s1[4], s2[4];
shuffle_filter_avx2(filter, f);
// multiple the size of the source and destination stride by two
src_stride = src_pitch << 1;
dst_stride = out_pitch << 1;
{
__m128i s[6];
__m256i s32b[6];
// load 16 bytes 7 times in stride of src_pitch
s[0] = _mm_loadu_si128((const __m128i *)(src_ptr + 0 * src_pitch));
s[1] = _mm_loadu_si128((const __m128i *)(src_ptr + 1 * src_pitch));
s[2] = _mm_loadu_si128((const __m128i *)(src_ptr + 2 * src_pitch));
s[3] = _mm_loadu_si128((const __m128i *)(src_ptr + 3 * src_pitch));
s[4] = _mm_loadu_si128((const __m128i *)(src_ptr + 4 * src_pitch));
s[5] = _mm_loadu_si128((const __m128i *)(src_ptr + 5 * src_pitch));
srcRegHead1 = _mm256_castsi128_si256(
_mm_loadu_si128((const __m128i *)(src_ptr + 6 * src_pitch)));
// have each consecutive loads on the same 256 register
s32b[0] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[0]), s[1], 1);
s32b[1] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[1]), s[2], 1);
s32b[2] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[2]), s[3], 1);
s32b[3] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[3]), s[4], 1);
s32b[4] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[4]), s[5], 1);
s32b[5] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[5]),
_mm256_castsi256_si128(srcRegHead1), 1);
// merge every two consecutive registers except the last one
// the first lanes contain values for filtering odd rows (1,3,5...) and
// the second lanes contain values for filtering even rows (2,4,6...)
s1[0] = _mm256_unpacklo_epi8(s32b[0], s32b[1]);
s2[0] = _mm256_unpackhi_epi8(s32b[0], s32b[1]);
s1[1] = _mm256_unpacklo_epi8(s32b[2], s32b[3]);
s2[1] = _mm256_unpackhi_epi8(s32b[2], s32b[3]);
s1[2] = _mm256_unpacklo_epi8(s32b[4], s32b[5]);
s2[2] = _mm256_unpackhi_epi8(s32b[4], s32b[5]);
}
// The output_height is always a multiple of two.
assert(!(output_height & 1));
for (i = output_height; i > 1; i -= 2) {
__m256i srcRegHead2, srcRegHead3;
// load the next 2 loads of 16 bytes and have every two
// consecutive loads in the same 256 bit register
srcRegHead2 = _mm256_castsi128_si256(
_mm_loadu_si128((const __m128i *)(src_ptr + 7 * src_pitch)));
srcRegHead1 = _mm256_inserti128_si256(
srcRegHead1, _mm256_castsi256_si128(srcRegHead2), 1);
srcRegHead3 = _mm256_castsi128_si256(
_mm_loadu_si128((const __m128i *)(src_ptr + 8 * src_pitch)));
srcRegHead2 = _mm256_inserti128_si256(
srcRegHead2, _mm256_castsi256_si128(srcRegHead3), 1);
// merge the two new consecutive registers
// the first lane contain values for filtering odd rows (1,3,5...) and
// the second lane contain values for filtering even rows (2,4,6...)
s1[3] = _mm256_unpacklo_epi8(srcRegHead1, srcRegHead2);
s2[3] = _mm256_unpackhi_epi8(srcRegHead1, srcRegHead2);
s1[0] = convolve8_16_avx2(s1, f);
s2[0] = convolve8_16_avx2(s2, f);
// shrink to 8 bit each 16 bits, the low and high 64-bits of each lane
// contain the first and second convolve result respectively
s1[0] = _mm256_packus_epi16(s1[0], s2[0]);
src_ptr += src_stride;
// average if necessary
if (avg) {
const __m256i outReg = mm256_loadu2_si128(
(__m128i *)output_ptr, (__m128i *)(output_ptr + out_pitch));
s1[0] = _mm256_avg_epu8(s1[0], outReg);
}
mm256_store2_si128((__m128i *)output_ptr,
(__m128i *)(output_ptr + out_pitch), s1);
output_ptr += dst_stride;
// shift down by two rows
s1[0] = s1[1];
s2[0] = s2[1];
s1[1] = s1[2];
s2[1] = s2[2];
s1[2] = s1[3];
s2[2] = s2[3];
srcRegHead1 = srcRegHead3;
}
}
static void vpx_filter_block1d16_v8_avx2(const uint8_t *src_ptr,
ptrdiff_t src_stride, uint8_t *dst_ptr,
ptrdiff_t dst_stride, uint32_t height,
const int16_t *filter) {
vpx_filter_block1d16_v8_x_avx2(src_ptr, src_stride, dst_ptr, dst_stride,
height, filter, 0);
}
static void vpx_filter_block1d16_v8_avg_avx2(
const uint8_t *src_ptr, ptrdiff_t src_stride, uint8_t *dst_ptr,
ptrdiff_t dst_stride, uint32_t height, const int16_t *filter) {
vpx_filter_block1d16_v8_x_avx2(src_ptr, src_stride, dst_ptr, dst_stride,
height, filter, 1);
}
static void vpx_filter_block1d16_h4_avx2(const uint8_t *src_ptr,
ptrdiff_t src_stride, uint8_t *dst_ptr,
ptrdiff_t dst_stride, uint32_t height,
const int16_t *kernel) {
// We will cast the kernel from 16-bit words to 8-bit words, and then extract
// the middle four elements of the kernel into two registers in the form
// ... k[3] k[2] k[3] k[2]
// ... k[5] k[4] k[5] k[4]
// Then we shuffle the source into
// ... s[1] s[0] s[0] s[-1]
// ... s[3] s[2] s[2] s[1]
// Calling multiply and add gives us half of the sum. Calling add gives us
// first half of the output. Repeat again to get the second half of the
// output. Finally we shuffle again to combine the two outputs.
// Since avx2 allows us to use 256-bit buffer, we can do this two rows at a
// time.
__m128i kernel_reg; // Kernel
__m256i kernel_reg_256, kernel_reg_23,
kernel_reg_45; // Segments of the kernel used
const __m256i reg_32 = _mm256_set1_epi16(32); // Used for rounding
const ptrdiff_t unrolled_src_stride = src_stride << 1;
const ptrdiff_t unrolled_dst_stride = dst_stride << 1;
int h;
__m256i src_reg, src_reg_shift_0, src_reg_shift_2;
__m256i dst_first, dst_second;
__m256i tmp_0, tmp_1;
__m256i idx_shift_0 =
_mm256_setr_epi8(0, 1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 0, 1, 1,
2, 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8);
__m256i idx_shift_2 =
_mm256_setr_epi8(2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 9, 10, 2, 3, 3,
4, 4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 9, 10);
// Start one pixel before as we need tap/2 - 1 = 1 sample from the past
src_ptr -= 1;
// Load Kernel
kernel_reg = _mm_loadu_si128((const __m128i *)kernel);
kernel_reg = _mm_srai_epi16(kernel_reg, 1);
kernel_reg = _mm_packs_epi16(kernel_reg, kernel_reg);
kernel_reg_256 = _mm256_broadcastsi128_si256(kernel_reg);
kernel_reg_23 =
_mm256_shuffle_epi8(kernel_reg_256, _mm256_set1_epi16(0x0302u));
kernel_reg_45 =
_mm256_shuffle_epi8(kernel_reg_256, _mm256_set1_epi16(0x0504u));
for (h = height; h >= 2; h -= 2) {
// Load the source
src_reg = mm256_loadu2_si128(src_ptr, src_ptr + src_stride);
src_reg_shift_0 = _mm256_shuffle_epi8(src_reg, idx_shift_0);
src_reg_shift_2 = _mm256_shuffle_epi8(src_reg, idx_shift_2);
// Partial result for first half
tmp_0 = _mm256_maddubs_epi16(src_reg_shift_0, kernel_reg_23);
tmp_1 = _mm256_maddubs_epi16(src_reg_shift_2, kernel_reg_45);
dst_first = _mm256_adds_epi16(tmp_0, tmp_1);
// Do again to get the second half of dst
// Load the source
src_reg = mm256_loadu2_si128(src_ptr + 8, src_ptr + src_stride + 8);
src_reg_shift_0 = _mm256_shuffle_epi8(src_reg, idx_shift_0);
src_reg_shift_2 = _mm256_shuffle_epi8(src_reg, idx_shift_2);
// Partial result for second half
tmp_0 = _mm256_maddubs_epi16(src_reg_shift_0, kernel_reg_23);
tmp_1 = _mm256_maddubs_epi16(src_reg_shift_2, kernel_reg_45);
dst_second = _mm256_adds_epi16(tmp_0, tmp_1);
// Round each result
dst_first = mm256_round_epi16(&dst_first, ®_32, 6);
dst_second = mm256_round_epi16(&dst_second, ®_32, 6);
// Finally combine to get the final dst
dst_first = _mm256_packus_epi16(dst_first, dst_second);
mm256_store2_si128((__m128i *)dst_ptr, (__m128i *)(dst_ptr + dst_stride),
&dst_first);
src_ptr += unrolled_src_stride;
dst_ptr += unrolled_dst_stride;
}
// Repeat for the last row if needed
if (h > 0) {
src_reg = _mm256_loadu_si256((const __m256i *)src_ptr);
// Reorder into 2 1 1 2
src_reg = _mm256_permute4x64_epi64(src_reg, 0x94);
src_reg_shift_0 = _mm256_shuffle_epi8(src_reg, idx_shift_0);
src_reg_shift_2 = _mm256_shuffle_epi8(src_reg, idx_shift_2);
tmp_0 = _mm256_maddubs_epi16(src_reg_shift_0, kernel_reg_23);
tmp_1 = _mm256_maddubs_epi16(src_reg_shift_2, kernel_reg_45);
dst_first = _mm256_adds_epi16(tmp_0, tmp_1);
dst_first = mm256_round_epi16(&dst_first, ®_32, 6);
dst_first = _mm256_packus_epi16(dst_first, dst_first);
dst_first = _mm256_permute4x64_epi64(dst_first, 0x8);
_mm_store_si128((__m128i *)dst_ptr, _mm256_castsi256_si128(dst_first));
}
}
static void vpx_filter_block1d16_v4_avx2(const uint8_t *src_ptr,
ptrdiff_t src_stride, uint8_t *dst_ptr,
ptrdiff_t dst_stride, uint32_t height,
const int16_t *kernel) {
// We will load two rows of pixels as 8-bit words, rearrange them into the
// form
// ... s[1,0] s[0,0] s[0,0] s[-1,0]
// so that we can call multiply and add with the kernel partial output. Then
// we can call add with another row to get the output.
// Register for source s[-1:3, :]
__m256i src_reg_1, src_reg_2, src_reg_3;
// Interleaved rows of the source. lo is first half, hi second
__m256i src_reg_m10, src_reg_01, src_reg_12, src_reg_23;
__m256i src_reg_m1001_lo, src_reg_m1001_hi, src_reg_1223_lo, src_reg_1223_hi;
__m128i kernel_reg; // Kernel
__m256i kernel_reg_256, kernel_reg_23,
kernel_reg_45; // Segments of the kernel used
// Result after multiply and add
__m256i res_reg_m1001_lo, res_reg_1223_lo, res_reg_m1001_hi, res_reg_1223_hi;
__m256i res_reg, res_reg_lo, res_reg_hi;
const __m256i reg_32 = _mm256_set1_epi16(32); // Used for rounding
// We will compute the result two rows at a time
const ptrdiff_t src_stride_unrolled = src_stride << 1;
const ptrdiff_t dst_stride_unrolled = dst_stride << 1;
int h;
// Load Kernel
kernel_reg = _mm_loadu_si128((const __m128i *)kernel);
kernel_reg = _mm_srai_epi16(kernel_reg, 1);
kernel_reg = _mm_packs_epi16(kernel_reg, kernel_reg);
kernel_reg_256 = _mm256_broadcastsi128_si256(kernel_reg);
kernel_reg_23 =
_mm256_shuffle_epi8(kernel_reg_256, _mm256_set1_epi16(0x0302u));
kernel_reg_45 =
_mm256_shuffle_epi8(kernel_reg_256, _mm256_set1_epi16(0x0504u));
// Row -1 to row 0
src_reg_m10 = mm256_loadu2_si128((const __m128i *)src_ptr,
(const __m128i *)(src_ptr + src_stride));
// Row 0 to row 1
src_reg_1 = _mm256_castsi128_si256(
_mm_loadu_si128((const __m128i *)(src_ptr + src_stride * 2)));
src_reg_01 = _mm256_permute2x128_si256(src_reg_m10, src_reg_1, 0x21);
// First three rows
src_reg_m1001_lo = _mm256_unpacklo_epi8(src_reg_m10, src_reg_01);
src_reg_m1001_hi = _mm256_unpackhi_epi8(src_reg_m10, src_reg_01);
for (h = height; h > 1; h -= 2) {
src_reg_2 = _mm256_castsi128_si256(
_mm_loadu_si128((const __m128i *)(src_ptr + src_stride * 3)));
src_reg_12 = _mm256_inserti128_si256(src_reg_1,
_mm256_castsi256_si128(src_reg_2), 1);
src_reg_3 = _mm256_castsi128_si256(
_mm_loadu_si128((const __m128i *)(src_ptr + src_stride * 4)));
src_reg_23 = _mm256_inserti128_si256(src_reg_2,
_mm256_castsi256_si128(src_reg_3), 1);
// Last three rows
src_reg_1223_lo = _mm256_unpacklo_epi8(src_reg_12, src_reg_23);
src_reg_1223_hi = _mm256_unpackhi_epi8(src_reg_12, src_reg_23);
// Output from first half
res_reg_m1001_lo = _mm256_maddubs_epi16(src_reg_m1001_lo, kernel_reg_23);
res_reg_1223_lo = _mm256_maddubs_epi16(src_reg_1223_lo, kernel_reg_45);
res_reg_lo = _mm256_adds_epi16(res_reg_m1001_lo, res_reg_1223_lo);
// Output from second half
res_reg_m1001_hi = _mm256_maddubs_epi16(src_reg_m1001_hi, kernel_reg_23);
res_reg_1223_hi = _mm256_maddubs_epi16(src_reg_1223_hi, kernel_reg_45);
res_reg_hi = _mm256_adds_epi16(res_reg_m1001_hi, res_reg_1223_hi);
// Round the words
res_reg_lo = mm256_round_epi16(&res_reg_lo, ®_32, 6);
res_reg_hi = mm256_round_epi16(&res_reg_hi, ®_32, 6);
// Combine to get the result
res_reg = _mm256_packus_epi16(res_reg_lo, res_reg_hi);
// Save the result
mm256_store2_si128((__m128i *)dst_ptr, (__m128i *)(dst_ptr + dst_stride),
&res_reg);
// Update the source by two rows
src_ptr += src_stride_unrolled;
dst_ptr += dst_stride_unrolled;
src_reg_m1001_lo = src_reg_1223_lo;
src_reg_m1001_hi = src_reg_1223_hi;
src_reg_1 = src_reg_3;
}
}
static void vpx_filter_block1d8_h4_avx2(const uint8_t *src_ptr,
ptrdiff_t src_stride, uint8_t *dst_ptr,
ptrdiff_t dst_stride, uint32_t height,
const int16_t *kernel) {
// We will cast the kernel from 16-bit words to 8-bit words, and then extract
// the middle four elements of the kernel into two registers in the form
// ... k[3] k[2] k[3] k[2]
// ... k[5] k[4] k[5] k[4]
// Then we shuffle the source into
// ... s[1] s[0] s[0] s[-1]
// ... s[3] s[2] s[2] s[1]
// Calling multiply and add gives us half of the sum. Calling add gives us
// first half of the output. Repeat again to get the second half of the
// output. Finally we shuffle again to combine the two outputs.
// Since avx2 allows us to use 256-bit buffer, we can do this two rows at a
// time.
__m128i kernel_reg_128; // Kernel
__m256i kernel_reg, kernel_reg_23,
kernel_reg_45; // Segments of the kernel used
const __m256i reg_32 = _mm256_set1_epi16(32); // Used for rounding
const ptrdiff_t unrolled_src_stride = src_stride << 1;
const ptrdiff_t unrolled_dst_stride = dst_stride << 1;
int h;
__m256i idx_shift_0 =
_mm256_setr_epi8(0, 1, 1, 2, 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 0, 1, 1,
2, 2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8);
__m256i idx_shift_2 =
_mm256_setr_epi8(2, 3, 3, 4, 4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 9, 10, 2, 3, 3,
4, 4, 5, 5, 6, 6, 7, 7, 8, 8, 9, 9, 10);
// Start one pixel before as we need tap/2 - 1 = 1 sample from the past
src_ptr -= 1;
// Load Kernel
kernel_reg_128 = _mm_loadu_si128((const __m128i *)kernel);
kernel_reg_128 = _mm_srai_epi16(kernel_reg_128, 1);
kernel_reg_128 = _mm_packs_epi16(kernel_reg_128, kernel_reg_128);
kernel_reg = _mm256_broadcastsi128_si256(kernel_reg_128);
kernel_reg_23 = _mm256_shuffle_epi8(kernel_reg, _mm256_set1_epi16(0x0302u));
kernel_reg_45 = _mm256_shuffle_epi8(kernel_reg, _mm256_set1_epi16(0x0504u));
for (h = height; h >= 2; h -= 2) {
// Load the source
const __m256i src_reg = mm256_loadu2_si128(src_ptr, src_ptr + src_stride);
__m256i dst_reg;
__m256i tmp_0, tmp_1;
const __m256i src_reg_shift_0 = _mm256_shuffle_epi8(src_reg, idx_shift_0);
const __m256i src_reg_shift_2 = _mm256_shuffle_epi8(src_reg, idx_shift_2);
// Get the output
tmp_0 = _mm256_maddubs_epi16(src_reg_shift_0, kernel_reg_23);
tmp_1 = _mm256_maddubs_epi16(src_reg_shift_2, kernel_reg_45);
dst_reg = _mm256_adds_epi16(tmp_0, tmp_1);
// Round the result
dst_reg = mm256_round_epi16(&dst_reg, ®_32, 6);
// Finally combine to get the final dst
dst_reg = _mm256_packus_epi16(dst_reg, dst_reg);
mm256_storeu2_epi64((__m128i *)dst_ptr, (__m128i *)(dst_ptr + dst_stride),
&dst_reg);
src_ptr += unrolled_src_stride;
dst_ptr += unrolled_dst_stride;
}
// Repeat for the last row if needed
if (h > 0) {
const __m128i src_reg = _mm_loadu_si128((const __m128i *)src_ptr);
__m128i dst_reg;
const __m128i reg_32_128 = _mm_set1_epi16(32); // Used for rounding
__m128i tmp_0, tmp_1;
__m128i src_reg_shift_0 =
_mm_shuffle_epi8(src_reg, _mm256_castsi256_si128(idx_shift_0));
__m128i src_reg_shift_2 =
_mm_shuffle_epi8(src_reg, _mm256_castsi256_si128(idx_shift_2));
tmp_0 = _mm_maddubs_epi16(src_reg_shift_0,
_mm256_castsi256_si128(kernel_reg_23));
tmp_1 = _mm_maddubs_epi16(src_reg_shift_2,
_mm256_castsi256_si128(kernel_reg_45));
dst_reg = _mm_adds_epi16(tmp_0, tmp_1);
dst_reg = mm_round_epi16_sse2(&dst_reg, ®_32_128, 6);
dst_reg = _mm_packus_epi16(dst_reg, _mm_setzero_si128());
_mm_storel_epi64((__m128i *)dst_ptr, dst_reg);
}
}
static void vpx_filter_block1d8_v4_avx2(const uint8_t *src_ptr,
ptrdiff_t src_stride, uint8_t *dst_ptr,
ptrdiff_t dst_stride, uint32_t height,
const int16_t *kernel) {
// We will load two rows of pixels as 8-bit words, rearrange them into the
// form
// ... s[1,0] s[0,0] s[0,0] s[-1,0]
// so that we can call multiply and add with the kernel partial output. Then
// we can call add with another row to get the output.
// Register for source s[-1:3, :]
__m256i src_reg_1, src_reg_2, src_reg_3;
// Interleaved rows of the source. lo is first half, hi second
__m256i src_reg_m10, src_reg_01, src_reg_12, src_reg_23;
__m256i src_reg_m1001, src_reg_1223;
__m128i kernel_reg_128; // Kernel
__m256i kernel_reg, kernel_reg_23,
kernel_reg_45; // Segments of the kernel used
// Result after multiply and add
__m256i res_reg_m1001, res_reg_1223;
__m256i res_reg;
const __m256i reg_32 = _mm256_set1_epi16(32); // Used for rounding
// We will compute the result two rows at a time
const ptrdiff_t src_stride_unrolled = src_stride << 1;
const ptrdiff_t dst_stride_unrolled = dst_stride << 1;
int h;
// Load Kernel
kernel_reg_128 = _mm_loadu_si128((const __m128i *)kernel);
kernel_reg_128 = _mm_srai_epi16(kernel_reg_128, 1);
kernel_reg_128 = _mm_packs_epi16(kernel_reg_128, kernel_reg_128);
kernel_reg = _mm256_broadcastsi128_si256(kernel_reg_128);
kernel_reg_23 = _mm256_shuffle_epi8(kernel_reg, _mm256_set1_epi16(0x0302u));
kernel_reg_45 = _mm256_shuffle_epi8(kernel_reg, _mm256_set1_epi16(0x0504u));
// Row -1 to row 0
src_reg_m10 = mm256_loadu2_epi64((const __m128i *)src_ptr,
(const __m128i *)(src_ptr + src_stride));
// Row 0 to row 1
src_reg_1 = _mm256_castsi128_si256(
_mm_loadu_si128((const __m128i *)(src_ptr + src_stride * 2)));
src_reg_01 = _mm256_permute2x128_si256(src_reg_m10, src_reg_1, 0x21);
// First three rows
src_reg_m1001 = _mm256_unpacklo_epi8(src_reg_m10, src_reg_01);
for (h = height; h > 1; h -= 2) {
src_reg_2 = _mm256_castsi128_si256(
_mm_loadl_epi64((const __m128i *)(src_ptr + src_stride * 3)));
src_reg_12 = _mm256_inserti128_si256(src_reg_1,
_mm256_castsi256_si128(src_reg_2), 1);
src_reg_3 = _mm256_castsi128_si256(
_mm_loadl_epi64((const __m128i *)(src_ptr + src_stride * 4)));
src_reg_23 = _mm256_inserti128_si256(src_reg_2,
_mm256_castsi256_si128(src_reg_3), 1);
// Last three rows
src_reg_1223 = _mm256_unpacklo_epi8(src_reg_12, src_reg_23);
// Output
res_reg_m1001 = _mm256_maddubs_epi16(src_reg_m1001, kernel_reg_23);
res_reg_1223 = _mm256_maddubs_epi16(src_reg_1223, kernel_reg_45);
res_reg = _mm256_adds_epi16(res_reg_m1001, res_reg_1223);
// Round the words
res_reg = mm256_round_epi16(&res_reg, ®_32, 6);
// Combine to get the result
res_reg = _mm256_packus_epi16(res_reg, res_reg);
// Save the result
mm256_storeu2_epi64((__m128i *)dst_ptr, (__m128i *)(dst_ptr + dst_stride),
&res_reg);
// Update the source by two rows
src_ptr += src_stride_unrolled;
dst_ptr += dst_stride_unrolled;
src_reg_m1001 = src_reg_1223;
src_reg_1 = src_reg_3;
}
}
static void vpx_filter_block1d4_h4_avx2(const uint8_t *src_ptr,
ptrdiff_t src_stride, uint8_t *dst_ptr,
ptrdiff_t dst_stride, uint32_t height,
const int16_t *kernel) {
// We will cast the kernel from 16-bit words to 8-bit words, and then extract
// the middle four elements of the kernel into a single register in the form
// k[5:2] k[5:2] k[5:2] k[5:2]
// Then we shuffle the source into
// s[5:2] s[4:1] s[3:0] s[2:-1]
// Calling multiply and add gives us half of the sum next to each other.
// Calling horizontal add then gives us the output.
// Since avx2 has 256-bit register, we can do 2 rows at a time.
__m128i kernel_reg_128; // Kernel
__m256i kernel_reg;
const __m256i reg_32 = _mm256_set1_epi16(32); // Used for rounding
int h;
const ptrdiff_t unrolled_src_stride = src_stride << 1;
const ptrdiff_t unrolled_dst_stride = dst_stride << 1;
__m256i shuf_idx =
_mm256_setr_epi8(0, 1, 2, 3, 1, 2, 3, 4, 2, 3, 4, 5, 3, 4, 5, 6, 0, 1, 2,
3, 1, 2, 3, 4, 2, 3, 4, 5, 3, 4, 5, 6);
// Start one pixel before as we need tap/2 - 1 = 1 sample from the past
src_ptr -= 1;
// Load Kernel
kernel_reg_128 = _mm_loadu_si128((const __m128i *)kernel);
kernel_reg_128 = _mm_srai_epi16(kernel_reg_128, 1);
kernel_reg_128 = _mm_packs_epi16(kernel_reg_128, kernel_reg_128);
kernel_reg = _mm256_broadcastsi128_si256(kernel_reg_128);
kernel_reg = _mm256_shuffle_epi8(kernel_reg, _mm256_set1_epi32(0x05040302u));
for (h = height; h > 1; h -= 2) {
// Load the source
const __m256i src_reg = mm256_loadu2_epi64(
(const __m128i *)src_ptr, (const __m128i *)(src_ptr + src_stride));
const __m256i src_reg_shuf = _mm256_shuffle_epi8(src_reg, shuf_idx);
// Get the result
__m256i dst = _mm256_maddubs_epi16(src_reg_shuf, kernel_reg);
dst = _mm256_hadds_epi16(dst, _mm256_setzero_si256());
// Round result
dst = mm256_round_epi16(&dst, ®_32, 6);
// Pack to 8-bits
dst = _mm256_packus_epi16(dst, _mm256_setzero_si256());
// Save
mm256_storeu2_epi32((__m128i *const)dst_ptr,
(__m128i *const)(dst_ptr + dst_stride), &dst);
src_ptr += unrolled_src_stride;
dst_ptr += unrolled_dst_stride;
}
if (h > 0) {
// Load the source
const __m128i reg_32_128 = _mm_set1_epi16(32); // Used for rounding
__m128i src_reg = _mm_loadl_epi64((const __m128i *)src_ptr);
__m128i src_reg_shuf =
_mm_shuffle_epi8(src_reg, _mm256_castsi256_si128(shuf_idx));
// Get the result
__m128i dst =
_mm_maddubs_epi16(src_reg_shuf, _mm256_castsi256_si128(kernel_reg));
dst = _mm_hadds_epi16(dst, _mm_setzero_si128());
// Round result
dst = mm_round_epi16_sse2(&dst, ®_32_128, 6);
// Pack to 8-bits
dst = _mm_packus_epi16(dst, _mm_setzero_si128());
*((int *)(dst_ptr)) = _mm_cvtsi128_si32(dst);
}
}
static void vpx_filter_block1d4_v4_avx2(const uint8_t *src_ptr,
ptrdiff_t src_stride, uint8_t *dst_ptr,
ptrdiff_t dst_stride, uint32_t height,
const int16_t *kernel) {
// We will load two rows of pixels as 8-bit words, rearrange them into the
// form
// ... s[3,0] s[2,0] s[1,0] s[0,0] s[2,0] s[1,0] s[0,0] s[-1,0]
// so that we can call multiply and add with the kernel to get partial output.
// Calling horizontal add then gives us the completely output
// Register for source s[-1:3, :]
__m256i src_reg_1, src_reg_2, src_reg_3;
// Interleaved rows of the source. lo is first half, hi second
__m256i src_reg_m10, src_reg_01, src_reg_12, src_reg_23;
__m256i src_reg_m1001, src_reg_1223, src_reg_m1012_1023;
__m128i kernel_reg_128; // Kernel
__m256i kernel_reg;
// Result after multiply and add
__m256i res_reg;
const __m256i reg_32 = _mm256_set1_epi16(32); // Used for rounding
// We will compute the result two rows at a time
const ptrdiff_t src_stride_unrolled = src_stride << 1;
const ptrdiff_t dst_stride_unrolled = dst_stride << 1;
int h;
// Load Kernel
kernel_reg_128 = _mm_loadu_si128((const __m128i *)kernel);
kernel_reg_128 = _mm_srai_epi16(kernel_reg_128, 1);
kernel_reg_128 = _mm_packs_epi16(kernel_reg_128, kernel_reg_128);
kernel_reg = _mm256_broadcastsi128_si256(kernel_reg_128);
kernel_reg = _mm256_shuffle_epi8(kernel_reg, _mm256_set1_epi32(0x05040302u));
// Row -1 to row 0
src_reg_m10 = mm256_loadu2_si128((const __m128i *)src_ptr,
(const __m128i *)(src_ptr + src_stride));
// Row 0 to row 1
src_reg_1 = _mm256_castsi128_si256(
_mm_loadu_si128((const __m128i *)(src_ptr + src_stride * 2)));
src_reg_01 = _mm256_permute2x128_si256(src_reg_m10, src_reg_1, 0x21);
// First three rows
src_reg_m1001 = _mm256_unpacklo_epi8(src_reg_m10, src_reg_01);
for (h = height; h > 1; h -= 2) {
src_reg_2 = _mm256_castsi128_si256(
_mm_loadl_epi64((const __m128i *)(src_ptr + src_stride * 3)));
src_reg_12 = _mm256_inserti128_si256(src_reg_1,
_mm256_castsi256_si128(src_reg_2), 1);
src_reg_3 = _mm256_castsi128_si256(
_mm_loadl_epi64((const __m128i *)(src_ptr + src_stride * 4)));
src_reg_23 = _mm256_inserti128_si256(src_reg_2,
_mm256_castsi256_si128(src_reg_3), 1);
// Last three rows
src_reg_1223 = _mm256_unpacklo_epi8(src_reg_12, src_reg_23);
// Combine all the rows
src_reg_m1012_1023 = _mm256_unpacklo_epi16(src_reg_m1001, src_reg_1223);
// Output
res_reg = _mm256_maddubs_epi16(src_reg_m1012_1023, kernel_reg);
res_reg = _mm256_hadds_epi16(res_reg, _mm256_setzero_si256());
// Round the words
res_reg = mm256_round_epi16(&res_reg, ®_32, 6);
// Combine to get the result
res_reg = _mm256_packus_epi16(res_reg, res_reg);
// Save the result
mm256_storeu2_epi32((__m128i *)dst_ptr, (__m128i *)(dst_ptr + dst_stride),
&res_reg);
// Update the source by two rows
src_ptr += src_stride_unrolled;
dst_ptr += dst_stride_unrolled;
src_reg_m1001 = src_reg_1223;
src_reg_1 = src_reg_3;
}
}
static void vpx_filter_block1d8_v8_avx2(
const uint8_t *src_ptr, ptrdiff_t src_pitch, uint8_t *output_ptr,
ptrdiff_t out_pitch, uint32_t output_height, const int16_t *filter) {
__m256i f[4], ss[4];
__m256i r[8];
__m128i s[9];
unsigned int y = output_height;
// Multiply the size of the source stride by two
const ptrdiff_t src_stride = src_pitch << 1;
// The output_height is always a multiple of two.
assert(!(output_height & 1));
shuffle_filter_avx2(filter, f);
s[0] = _mm_loadl_epi64((const __m128i *)(src_ptr + 0 * src_pitch));
s[1] = _mm_loadl_epi64((const __m128i *)(src_ptr + 1 * src_pitch));
s[2] = _mm_loadl_epi64((const __m128i *)(src_ptr + 2 * src_pitch));
s[3] = _mm_loadl_epi64((const __m128i *)(src_ptr + 3 * src_pitch));
s[4] = _mm_loadl_epi64((const __m128i *)(src_ptr + 4 * src_pitch));
s[5] = _mm_loadl_epi64((const __m128i *)(src_ptr + 5 * src_pitch));
s[6] = _mm_loadl_epi64((const __m128i *)(src_ptr + 6 * src_pitch));
// merge the result together
// r[0]: 0 0 0 0 0 0 0 0 r17 r16 r15 r14 r13 r12 r11 r10 | 0 0 0 0 0 0 0 0
// r07 r06 r05 r04 r03 r02 r01 r00
r[0] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[0]), s[1], 1);
// r[1]: 0 0 0 0 0 0 0 0 r27 r26 r25 r24 r23 r22 r21 r20 | 0 0 0 0 0 0 0 0
// r17 r16 r15 r14 r13 r12 r11 r10
r[1] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[1]), s[2], 1);
// r[2]: 0 0 0 0 0 0 0 0 r37 r36 r35 r34 r33 r32 r31 r30 | 0 0 0 0 0 0 0 0
// r27 r26 r25 r24 r23 r22 r21 r20
r[2] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[2]), s[3], 1);
// r[3]: 0 0 0 0 0 0 0 0 r47 r46 r45 r44 r43 r42 r41 r40 | 0 0 0 0 0 0 0 0
// r37 r36 r35 r34 r33 r32 r31 r30
r[3] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[3]), s[4], 1);
// r[4]: 0 0 0 0 0 0 0 0 r57 r56 r55 r54 r53 r52 r51 r50 | 0 0 0 0 0 0 0 0
// r47 r46 r45 r44 r43 r42 r41 r40
r[4] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[4]), s[5], 1);
// r[5]: 0 0 0 0 0 0 0 0 r67 r66 r65 r64 r63 r62 r61 r60 | 0 0 0 0 0 0 0 0
// r57 r56 r55 r54 r53 r52 r51 r50
r[5] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[5]), s[6], 1);
// Merge together
// ss[0]: |r27 r17|.......|r21 r11|r20 r10 || r17 r07|.....|r12 r02|r11
// r01|r10 r00|
ss[0] = _mm256_unpacklo_epi8(r[0], r[1]);
// ss[0]: |r47 r37|.......|r41 r31|r40 r30 || r37 r27|.....|r32 r22|r31
// r21|r30 r20|
ss[1] = _mm256_unpacklo_epi8(r[2], r[3]);
// ss[2]: |r67 r57|.......|r61 r51|r60 r50 || r57 r47|.....|r52 r42|r51
// r41|r50 r40|
ss[2] = _mm256_unpacklo_epi8(r[4], r[5]);
// Process 2 rows at a time
do {
s[7] = _mm_loadl_epi64((const __m128i *)(src_ptr + 7 * src_pitch));
s[8] = _mm_loadl_epi64((const __m128i *)(src_ptr + 8 * src_pitch));
// r[6]: 0 0 0 0 0 0 0 0 r77 r76 r75 r74 r73 r72 r71 r70 | 0 0 0 0 0 0 0
// 0 r67 r66 r65 r64 r63 r62 r61 r60
r[6] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[6]), s[7], 1);
// r[7]: 0 0 0 0 0 0 0 0 r87 r86 r85 r84 r83 r82 r81 r80 | 0 0 0 0 0 0 0
// 0 r77 r76 r75 r74 r73 r72 r71 r70
r[7] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[7]), s[8], 1);
// ss[3] : | r87 r77 | .......| r81 r71 | r80 r70 || r77 r67 | .....| r72
// r62 | r71 r61|r70 r60|
ss[3] = _mm256_unpacklo_epi8(r[6], r[7]);
ss[0] = convolve8_16_avx2(ss, f);
ss[0] = _mm256_packus_epi16(ss[0], ss[0]);
src_ptr += src_stride;
/* shift down two rows */
s[6] = s[8];
_mm_storel_epi64((__m128i *)&output_ptr[0], _mm256_castsi256_si128(ss[0]));
output_ptr += out_pitch;
_mm_storel_epi64((__m128i *)&output_ptr[0],
_mm256_extractf128_si256(ss[0], 1));
output_ptr += out_pitch;
ss[0] = ss[1];
ss[1] = ss[2];
ss[2] = ss[3];
y -= 2;
} while (y > 1);
}
static void vpx_filter_block1d4_h8_avx2(
const uint8_t *src_ptr, ptrdiff_t src_pitch, uint8_t *output_ptr,
ptrdiff_t output_pitch, uint32_t output_height, const int16_t *filter) {
__m128i filtersReg;
__m256i addFilterReg64_256bit;
unsigned int y = output_height;
assert(output_height > 1);
addFilterReg64_256bit = _mm256_set1_epi16(32);
// f7 f6 f5 f4 f3 f2 f1 f0 (16 bit)
filtersReg = _mm_loadu_si128((const __m128i *)filter);
// converting the 16 bit (short) to 8 bit (byte) and have the same data
// in both lanes of 128 bit register.
// f7 f6 f5 f4 f3 f2 f1 f0 || f7 f6 f5 f4 f3 f2 f1 f0 (8 bit each)
filtersReg = _mm_packs_epi16(filtersReg, filtersReg);
{
ptrdiff_t src_stride;
__m256i filt1Reg, filt2Reg, firstFilters, secondFilters;
// have the same data in both lanes of a 256 bit register
// f7 f6 f5 f4 f3 f2 f1 f0 f7 f6 f5 f4 f3 f2 f1 f0 | f7 f6 f5 f4 f3 f2 f1 f0
// f7 f6 f5 f4 f3 f2 f1 f0 (8bit each)
const __m256i filtersReg32 = _mm256_broadcastsi128_si256(filtersReg);
// duplicate only the first 32 bits
// f3 f2 f1 f0|f3 f2 f1 f0|f3 f2 f1 f0|f3 f2 f1 f0 | f3 f2 f1 f0|f3 f2 f1
// f0|f3 f2 f1 f0|f3 f2 f1 f0
firstFilters = _mm256_shuffle_epi32(filtersReg32, 0);
// duplicate only the second 32 bits
// f7 f6 f5 f4|f7 f6 f5 f4|f7 f6 f5 f4|f7 f6 f5 f4 | f7 f6 f5 f4|f7 f6 f5
// f4|f7 f6 f5 f4|f7 f6 f5 f4
secondFilters = _mm256_shuffle_epi32(filtersReg32, 0x55);
// s6 s5 s4 s3 s5 s4 s3 s2 s4 s3 s2 s1 s3 s2 s1 s0 | s6 s5 s4 s3 s5 s4 s3
// s2 s4 s3 s2 s1 s3 s2 s1 s0
filt1Reg = _mm256_load_si256((__m256i const *)filt_d4_global_avx2);
// s10 s9 s8 s7 s9 s8 s7 s6 s8 s7 s6 s5 s7 s6 s5 s4 | s10 s9 s8 s7 s9 s8 s7
// s6 s8 s7 s6 s5 s7 s6 s5 s4
filt2Reg = _mm256_load_si256((__m256i const *)(filt_d4_global_avx2 + 32));
// multiple the size of the source and destination stride by two
src_stride = src_pitch << 1;
do {
__m256i srcRegFilt32b1_1, srcRegFilt32b2, srcReg32b1;
// load the 2 strides of source
// r115 r114 ...... r15 r14 r13 r12 r11 r10 | r015 r014 r013 ...... r07
// r06 r05 r04 r03 r02 r01 r00
srcReg32b1 = mm256_loadu2_si128(src_ptr - 3, src_ptr - 3 + src_pitch);
// filter the source buffer
// r16 r15 r14 r13 r15 r14 r13 r12 r14 r13 r12 r11 r13 r12 r11 r10 | r06
// r05 r04 r03 r05 r04 r03 r02 r04 r03 r02 r01 r03 r02 r01 r00
srcRegFilt32b1_1 = _mm256_shuffle_epi8(srcReg32b1, filt1Reg);
// multiply 4 adjacent elements with the filter and add the result
// ...|f3*r14+f2*r13|f1*r13+f0*r12|f3*r13+f2*r12|f1*r11+f0*r10||...
// |f1*r03+f0*r02|f3*r04+f2*r03|f1*r02+f0*r01|f3*r03+f2*r02|f1*r01+f0*r00
srcRegFilt32b1_1 = _mm256_maddubs_epi16(srcRegFilt32b1_1, firstFilters);
// filter the source buffer
// r110 r19 r18 r17|r19 r18 r17 r16|r18 r17 r16 r15|r17 r16 r15 r14||r010
// r09 r08 r07|r09 r08 r07 r06|r08 r07 r06 r05|r07 r06 r05 r04
srcRegFilt32b2 = _mm256_shuffle_epi8(srcReg32b1, filt2Reg);
// multiply 4 adjacent elements with the filter and add the result
// r010 r09 r08 r07|r9 r08 r07 r06|r08 r07 r06 r05|r07 r06 r05 r04||r010
// r09 r08 r07|r9 r08 r07 r06|r08 r07 r06 r05|r07 r06 r05 r04
srcRegFilt32b2 = _mm256_maddubs_epi16(srcRegFilt32b2, secondFilters);
srcRegFilt32b1_1 =
_mm256_add_epi16(srcRegFilt32b1_1, addFilterReg64_256bit);
srcRegFilt32b1_1 = _mm256_adds_epi16(srcRegFilt32b1_1, srcRegFilt32b2);
srcRegFilt32b1_1 =
_mm256_hadds_epi16(srcRegFilt32b1_1, _mm256_setzero_si256());
// 0 0 0 0 R13 R12 R11 R10 || 0 0 0 0 R03 R02 R01 R00 (16bit)
srcRegFilt32b1_1 = _mm256_srai_epi16(srcRegFilt32b1_1, 7);
// 8zeros 0 0 0 0 R13 R12 R11 R10 || 8zeros 0 0 0 0 R03 R02 R01 R00 (8bit)
srcRegFilt32b1_1 =
_mm256_packus_epi16(srcRegFilt32b1_1, _mm256_setzero_si256());
src_ptr += src_stride;
// save first row 4 values
*((int *)&output_ptr[0]) =
_mm_cvtsi128_si32(_mm256_castsi256_si128(srcRegFilt32b1_1));
output_ptr += output_pitch;
// save second row 4 values
*((int *)&output_ptr[0]) =
_mm_cvtsi128_si32(_mm256_extractf128_si256(srcRegFilt32b1_1, 1));
output_ptr += output_pitch;
y = y - 2;
} while (y > 1);
// For remaining height
if (y > 0) {
__m128i srcReg1, srcRegFilt1_1, addFilterReg64;
__m128i srcRegFilt2;
addFilterReg64 = _mm_set1_epi32((int)0x0400040u);
srcReg1 = _mm_loadu_si128((const __m128i *)(src_ptr - 3));
// filter the source buffer
srcRegFilt1_1 =
_mm_shuffle_epi8(srcReg1, _mm256_castsi256_si128(filt1Reg));
// multiply 4 adjacent elements with the filter and add the result
srcRegFilt1_1 = _mm_maddubs_epi16(srcRegFilt1_1,
_mm256_castsi256_si128(firstFilters));
// filter the source buffer
srcRegFilt2 = _mm_shuffle_epi8(srcReg1, _mm256_castsi256_si128(filt2Reg));
// multiply 4 adjacent elements with the filter and add the result
srcRegFilt2 =
_mm_maddubs_epi16(srcRegFilt2, _mm256_castsi256_si128(secondFilters));
srcRegFilt1_1 = _mm_adds_epi16(srcRegFilt1_1, srcRegFilt2);
srcRegFilt1_1 = _mm_hadds_epi16(srcRegFilt1_1, _mm_setzero_si128());
// shift by 6 bit each 16 bit
srcRegFilt1_1 = _mm_adds_epi16(srcRegFilt1_1, addFilterReg64);
srcRegFilt1_1 = _mm_srai_epi16(srcRegFilt1_1, 7);
// shrink to 8 bit each 16 bits, the first lane contain the first
// convolve result and the second lane contain the second convolve result
srcRegFilt1_1 = _mm_packus_epi16(srcRegFilt1_1, _mm_setzero_si128());
// save 4 bytes
*((int *)(output_ptr)) = _mm_cvtsi128_si32(srcRegFilt1_1);
}
}
}
static void vpx_filter_block1d4_v8_avx2(
const uint8_t *src_ptr, ptrdiff_t src_pitch, uint8_t *output_ptr,
ptrdiff_t out_pitch, uint32_t output_height, const int16_t *filter) {
__m256i f[4], ss[4];
__m256i r[9], rr[2];
__m128i s[11];
unsigned int y = output_height;
// Multiply the size of the source stride by four
const ptrdiff_t src_stride = src_pitch << 2;
const ptrdiff_t out_stride = out_pitch << 2;
// The output_height is always a multiple of two.
assert(!(output_height & 0x01));
shuffle_filter_avx2(filter, f);
s[0] = _mm_loadl_epi64((const __m128i *)(src_ptr + 0 * src_pitch));
s[1] = _mm_loadl_epi64((const __m128i *)(src_ptr + 1 * src_pitch));
s[2] = _mm_loadl_epi64((const __m128i *)(src_ptr + 2 * src_pitch));
s[3] = _mm_loadl_epi64((const __m128i *)(src_ptr + 3 * src_pitch));
s[4] = _mm_loadl_epi64((const __m128i *)(src_ptr + 4 * src_pitch));
s[5] = _mm_loadl_epi64((const __m128i *)(src_ptr + 5 * src_pitch));
s[6] = _mm_loadl_epi64((const __m128i *)(src_ptr + 6 * src_pitch));
r[0] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[0]), s[2], 1);
r[1] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[1]), s[3], 1);
r[2] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[2]), s[4], 1);
r[3] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[3]), s[5], 1);
r[4] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[4]), s[6], 1);
// r37.....r24..r33..r31 r30 r23 r22 r21 r20|r17....r14 r07..r05 r04 r13 r12
// r11 r10 r03 r02 r01 r00
rr[0] = _mm256_unpacklo_epi32(r[0], r[1]);
// r47.....r34..r43..r41 r40 r33 r32 r31 r30|r27....r24 r17..r15 r14 r23 r22
// r21 r20 r13 r12 r11 r10
rr[1] = _mm256_unpacklo_epi32(r[1], r[2]);
// r43 r33....r40 r30|r33 r23....r30 r20||r23 r13....r20 r10|r13 r03....r10
// r00|
ss[0] = _mm256_unpacklo_epi8(rr[0], rr[1]);
// r37.....r24..r33..r31 r30 r23 r22 r21 r20||r17....r14 r07..r05 r04 r13 r12
// r11 r10 r03 r02 r01 r00
rr[0] = _mm256_unpacklo_epi32(r[2], r[3]);
// r47.....r34..r43..r41 r40 r33 r32 r31 r30|r27....r24 r17..r15 r14 r23 r22
// r21 r20 r13 r12 r11 r10
rr[1] = _mm256_unpacklo_epi32(r[3], r[4]);
// r63 r53....r60 r50|r53 r43....r50 r40||r43 r33....r40 r30|r33 r23....r30
// r20|
ss[1] = _mm256_unpacklo_epi8(rr[0], rr[1]);
// Process 4 rows at a time
while (y >= 4) {
s[7] = _mm_loadl_epi64((const __m128i *)(src_ptr + 7 * src_pitch));
s[8] = _mm_loadl_epi64((const __m128i *)(src_ptr + 8 * src_pitch));
s[9] = _mm_loadl_epi64((const __m128i *)(src_ptr + 9 * src_pitch));
s[10] = _mm_loadl_epi64((const __m128i *)(src_ptr + 10 * src_pitch));
r[5] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[5]), s[7], 1);
r[6] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[6]), s[8], 1);
rr[0] = _mm256_unpacklo_epi32(r[4], r[5]);
rr[1] = _mm256_unpacklo_epi32(r[5], r[6]);
ss[2] = _mm256_unpacklo_epi8(rr[0], rr[1]);
r[7] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[7]), s[9], 1);
r[8] = _mm256_inserti128_si256(_mm256_castsi128_si256(s[8]), s[10], 1);
rr[0] = _mm256_unpacklo_epi32(r[6], r[7]);
rr[1] = _mm256_unpacklo_epi32(r[7], r[8]);
ss[3] = _mm256_unpacklo_epi8(rr[0], rr[1]);
ss[0] = convolve8_16_avx2(ss, f);
// r3 r2 r3 r2 r1 r0 r1 r0
ss[0] = _mm256_packus_epi16(ss[0], ss[0]);
src_ptr += src_stride;
mm256_storeu2_epi32((__m128i *const)output_ptr,
(__m128i *const)(output_ptr + (2 * out_pitch)), ss);
ss[0] = _mm256_srli_si256(ss[0], 4);
mm256_storeu2_epi32((__m128i *const)(output_ptr + (1 * out_pitch)),
(__m128i *const)(output_ptr + (3 * out_pitch)), ss);
output_ptr += out_stride;
ss[0] = ss[2];
ss[1] = ss[3];
s[6] = s[10];
s[5] = s[9];
r[4] = r[8];
y -= 4;
}
// Process 2 rows
if (y == 2) {
__m128i ss1[4], f1[4], r1[4];
s[4] = _mm_loadl_epi64((const __m128i *)(src_ptr + 4 * src_pitch));
s[7] = _mm_loadl_epi64((const __m128i *)(src_ptr + 7 * src_pitch));
s[8] = _mm_loadl_epi64((const __m128i *)(src_ptr + 8 * src_pitch));
f1[0] = _mm256_castsi256_si128(f[0]);
f1[1] = _mm256_castsi256_si128(f[1]);
f1[2] = _mm256_castsi256_si128(f[2]);
f1[3] = _mm256_castsi256_si128(f[3]);
r1[0] = _mm_unpacklo_epi32(s[4], s[5]);
r1[1] = _mm_unpacklo_epi32(s[5], s[6]);
// R7-6 xxxx .. . . x| r73 r72 r71 r70 r63 r62 r61 r60
r1[2] = _mm_unpacklo_epi32(s[6], s[7]);
// R8-7 xxxx .. . . x| r83 r82 r81 r80 r73 r72 r71 r70
r1[3] = _mm_unpacklo_epi32(s[7], s[8]);
// r23 r13....r20 r10|r13 r03....r10 r00
ss1[0] = _mm256_castsi256_si128(ss[0]);
// r43 r33....r40 r30|r33 r23....r30 r20
ss1[1] = _mm256_castsi256_si128(ss[1]);
// r63 r53....r60 r50|r53 r43....r50 r40
ss1[2] = _mm_unpacklo_epi8(r1[0], r1[1]);
// r83 r73....r80 r70|r73 r63....r70 r60
ss1[3] = _mm_unpacklo_epi8(r1[2], r1[3]);
ss1[0] = convolve8_8_ssse3(ss1, f1);
// r1 r0 r1 r0
ss1[0] = _mm_packus_epi16(ss1[0], ss1[0]);
// Save first row 4 values
*((int *)&output_ptr[0]) = _mm_cvtsi128_si32(ss1[0]);
output_ptr += out_pitch;
ss1[0] = _mm_srli_si128(ss1[0], 4);
// Save second row 4 values
*((int *)&output_ptr[0]) = _mm_cvtsi128_si32(ss1[0]);
}
}
#if HAVE_AVX2 && HAVE_SSSE3
#if VPX_ARCH_X86_64
filter8_1dfunction vpx_filter_block1d8_v8_intrin_ssse3;
filter8_1dfunction vpx_filter_block1d8_h8_intrin_ssse3;
filter8_1dfunction vpx_filter_block1d4_h8_intrin_ssse3;
#else // VPX_ARCH_X86
filter8_1dfunction vpx_filter_block1d8_v8_ssse3;
filter8_1dfunction vpx_filter_block1d8_h8_ssse3;
filter8_1dfunction vpx_filter_block1d4_h8_ssse3;
#endif // VPX_ARCH_X86_64
filter8_1dfunction vpx_filter_block1d8_v8_avg_ssse3;
filter8_1dfunction vpx_filter_block1d8_h8_avg_ssse3;
filter8_1dfunction vpx_filter_block1d4_v8_avg_ssse3;
filter8_1dfunction vpx_filter_block1d4_h8_avg_ssse3;
#define vpx_filter_block1d8_v8_avg_avx2 vpx_filter_block1d8_v8_avg_ssse3
#define vpx_filter_block1d8_h8_avg_avx2 vpx_filter_block1d8_h8_avg_ssse3
#define vpx_filter_block1d4_v8_avg_avx2 vpx_filter_block1d4_v8_avg_ssse3
#define vpx_filter_block1d4_h8_avg_avx2 vpx_filter_block1d4_h8_avg_ssse3
filter8_1dfunction vpx_filter_block1d16_v2_ssse3;
filter8_1dfunction vpx_filter_block1d16_h2_ssse3;
filter8_1dfunction vpx_filter_block1d8_v2_ssse3;
filter8_1dfunction vpx_filter_block1d8_h2_ssse3;
filter8_1dfunction vpx_filter_block1d4_v2_ssse3;
filter8_1dfunction vpx_filter_block1d4_h2_ssse3;
#define vpx_filter_block1d16_v2_avx2 vpx_filter_block1d16_v2_ssse3
#define vpx_filter_block1d16_h2_avx2 vpx_filter_block1d16_h2_ssse3
#define vpx_filter_block1d8_v2_avx2 vpx_filter_block1d8_v2_ssse3
#define vpx_filter_block1d8_h2_avx2 vpx_filter_block1d8_h2_ssse3
#define vpx_filter_block1d4_v2_avx2 vpx_filter_block1d4_v2_ssse3
#define vpx_filter_block1d4_h2_avx2 vpx_filter_block1d4_h2_ssse3
filter8_1dfunction vpx_filter_block1d16_v2_avg_ssse3;
filter8_1dfunction vpx_filter_block1d16_h2_avg_ssse3;
filter8_1dfunction vpx_filter_block1d8_v2_avg_ssse3;
filter8_1dfunction vpx_filter_block1d8_h2_avg_ssse3;
filter8_1dfunction vpx_filter_block1d4_v2_avg_ssse3;
filter8_1dfunction vpx_filter_block1d4_h2_avg_ssse3;
#define vpx_filter_block1d16_v2_avg_avx2 vpx_filter_block1d16_v2_avg_ssse3
#define vpx_filter_block1d16_h2_avg_avx2 vpx_filter_block1d16_h2_avg_ssse3
#define vpx_filter_block1d8_v2_avg_avx2 vpx_filter_block1d8_v2_avg_ssse3
#define vpx_filter_block1d8_h2_avg_avx2 vpx_filter_block1d8_h2_avg_ssse3
#define vpx_filter_block1d4_v2_avg_avx2 vpx_filter_block1d4_v2_avg_ssse3
#define vpx_filter_block1d4_h2_avg_avx2 vpx_filter_block1d4_h2_avg_ssse3
#define vpx_filter_block1d16_v4_avg_avx2 vpx_filter_block1d16_v8_avg_avx2
#define vpx_filter_block1d16_h4_avg_avx2 vpx_filter_block1d16_h8_avg_avx2
#define vpx_filter_block1d8_v4_avg_avx2 vpx_filter_block1d8_v8_avg_avx2
#define vpx_filter_block1d8_h4_avg_avx2 vpx_filter_block1d8_h8_avg_avx2
#define vpx_filter_block1d4_v4_avg_avx2 vpx_filter_block1d4_v8_avg_avx2
#define vpx_filter_block1d4_h4_avg_avx2 vpx_filter_block1d4_h8_avg_avx2
// void vpx_convolve8_horiz_avx2(const uint8_t *src, ptrdiff_t src_stride,
// uint8_t *dst, ptrdiff_t dst_stride,
// const InterpKernel *filter, int x0_q4,
// int32_t x_step_q4, int y0_q4, int y_step_q4,
// int w, int h);
// void vpx_convolve8_vert_avx2(const uint8_t *src, ptrdiff_t src_stride,
// uint8_t *dst, ptrdiff_t dst_stride,
// const InterpKernel *filter, int x0_q4,
// int32_t x_step_q4, int y0_q4, int y_step_q4,
// int w, int h);
// void vpx_convolve8_avg_horiz_avx2(const uint8_t *src, ptrdiff_t src_stride,
// uint8_t *dst, ptrdiff_t dst_stride,
// const InterpKernel *filter, int x0_q4,
// int32_t x_step_q4, int y0_q4,
// int y_step_q4, int w, int h);
// void vpx_convolve8_avg_vert_avx2(const uint8_t *src, ptrdiff_t src_stride,
// uint8_t *dst, ptrdiff_t dst_stride,
// const InterpKernel *filter, int x0_q4,
// int32_t x_step_q4, int y0_q4,
// int y_step_q4, int w, int h);
FUN_CONV_1D(horiz, x0_q4, x_step_q4, h, src, , avx2, 0)
FUN_CONV_1D(vert, y0_q4, y_step_q4, v, src - src_stride * (num_taps / 2 - 1), ,
avx2, 0)
FUN_CONV_1D(avg_horiz, x0_q4, x_step_q4, h, src, avg_, avx2, 1)
FUN_CONV_1D(avg_vert, y0_q4, y_step_q4, v,
src - src_stride * (num_taps / 2 - 1), avg_, avx2, 1)
// void vpx_convolve8_avx2(const uint8_t *src, ptrdiff_t src_stride,
// uint8_t *dst, ptrdiff_t dst_stride,
// const InterpKernel *filter, int x0_q4,
// int32_t x_step_q4, int y0_q4, int y_step_q4,
// int w, int h);
// void vpx_convolve8_avg_avx2(const uint8_t *src, ptrdiff_t src_stride,
// uint8_t *dst, ptrdiff_t dst_stride,
// const InterpKernel *filter, int x0_q4,
// int32_t x_step_q4, int y0_q4, int y_step_q4,
// int w, int h);
FUN_CONV_2D(, avx2, 0)
FUN_CONV_2D(avg_, avx2, 1)
#endif // HAVE_AX2 && HAVE_SSSE3