274 lines
10 KiB
C
274 lines
10 KiB
C
/*
|
|
* Copyright (c) 2015 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.
|
|
*/
|
|
|
|
#ifndef VPX_DSP_X86_INV_TXFM_SSE2_H_
|
|
#define VPX_DSP_X86_INV_TXFM_SSE2_H_
|
|
|
|
#include <emmintrin.h> // SSE2
|
|
#include "./vpx_config.h"
|
|
#include "vpx/vpx_integer.h"
|
|
#include "vpx_dsp/inv_txfm.h"
|
|
#include "vpx_dsp/x86/txfm_common_sse2.h"
|
|
|
|
// perform 8x8 transpose
|
|
static INLINE void array_transpose_8x8(__m128i *in, __m128i *res) {
|
|
const __m128i tr0_0 = _mm_unpacklo_epi16(in[0], in[1]);
|
|
const __m128i tr0_1 = _mm_unpacklo_epi16(in[2], in[3]);
|
|
const __m128i tr0_2 = _mm_unpackhi_epi16(in[0], in[1]);
|
|
const __m128i tr0_3 = _mm_unpackhi_epi16(in[2], in[3]);
|
|
const __m128i tr0_4 = _mm_unpacklo_epi16(in[4], in[5]);
|
|
const __m128i tr0_5 = _mm_unpacklo_epi16(in[6], in[7]);
|
|
const __m128i tr0_6 = _mm_unpackhi_epi16(in[4], in[5]);
|
|
const __m128i tr0_7 = _mm_unpackhi_epi16(in[6], in[7]);
|
|
|
|
const __m128i tr1_0 = _mm_unpacklo_epi32(tr0_0, tr0_1);
|
|
const __m128i tr1_1 = _mm_unpacklo_epi32(tr0_4, tr0_5);
|
|
const __m128i tr1_2 = _mm_unpackhi_epi32(tr0_0, tr0_1);
|
|
const __m128i tr1_3 = _mm_unpackhi_epi32(tr0_4, tr0_5);
|
|
const __m128i tr1_4 = _mm_unpacklo_epi32(tr0_2, tr0_3);
|
|
const __m128i tr1_5 = _mm_unpacklo_epi32(tr0_6, tr0_7);
|
|
const __m128i tr1_6 = _mm_unpackhi_epi32(tr0_2, tr0_3);
|
|
const __m128i tr1_7 = _mm_unpackhi_epi32(tr0_6, tr0_7);
|
|
|
|
res[0] = _mm_unpacklo_epi64(tr1_0, tr1_1);
|
|
res[1] = _mm_unpackhi_epi64(tr1_0, tr1_1);
|
|
res[2] = _mm_unpacklo_epi64(tr1_2, tr1_3);
|
|
res[3] = _mm_unpackhi_epi64(tr1_2, tr1_3);
|
|
res[4] = _mm_unpacklo_epi64(tr1_4, tr1_5);
|
|
res[5] = _mm_unpackhi_epi64(tr1_4, tr1_5);
|
|
res[6] = _mm_unpacklo_epi64(tr1_6, tr1_7);
|
|
res[7] = _mm_unpackhi_epi64(tr1_6, tr1_7);
|
|
}
|
|
|
|
static INLINE void idct8x8_12_transpose_16bit_4x8(const __m128i *const in,
|
|
__m128i *const out) {
|
|
// Unpack 16 bit elements. Goes from:
|
|
// in[0]: 30 31 32 33 00 01 02 03
|
|
// in[1]: 20 21 22 23 10 11 12 13
|
|
// in[2]: 40 41 42 43 70 71 72 73
|
|
// in[3]: 50 51 52 53 60 61 62 63
|
|
// to:
|
|
// tr0_0: 00 10 01 11 02 12 03 13
|
|
// tr0_1: 20 30 21 31 22 32 23 33
|
|
// tr0_2: 40 50 41 51 42 52 43 53
|
|
// tr0_3: 60 70 61 71 62 72 63 73
|
|
const __m128i tr0_0 = _mm_unpackhi_epi16(in[0], in[1]);
|
|
const __m128i tr0_1 = _mm_unpacklo_epi16(in[1], in[0]);
|
|
const __m128i tr0_2 = _mm_unpacklo_epi16(in[2], in[3]);
|
|
const __m128i tr0_3 = _mm_unpackhi_epi16(in[3], in[2]);
|
|
|
|
// Unpack 32 bit elements resulting in:
|
|
// tr1_0: 00 10 20 30 01 11 21 31
|
|
// tr1_1: 02 12 22 32 03 13 23 33
|
|
// tr1_2: 40 50 60 70 41 51 61 71
|
|
// tr1_3: 42 52 62 72 43 53 63 73
|
|
const __m128i tr1_0 = _mm_unpacklo_epi32(tr0_0, tr0_1);
|
|
const __m128i tr1_1 = _mm_unpacklo_epi32(tr0_2, tr0_3);
|
|
const __m128i tr1_2 = _mm_unpackhi_epi32(tr0_0, tr0_1);
|
|
const __m128i tr1_3 = _mm_unpackhi_epi32(tr0_2, tr0_3);
|
|
|
|
// Unpack 64 bit elements resulting in:
|
|
// out[0]: 00 10 20 30 40 50 60 70
|
|
// out[1]: 01 11 21 31 41 51 61 71
|
|
// out[2]: 02 12 22 32 42 52 62 72
|
|
// out[3]: 03 13 23 33 43 53 63 73
|
|
out[0] = _mm_unpacklo_epi64(tr1_0, tr1_1);
|
|
out[1] = _mm_unpackhi_epi64(tr1_0, tr1_1);
|
|
out[2] = _mm_unpacklo_epi64(tr1_2, tr1_3);
|
|
out[3] = _mm_unpackhi_epi64(tr1_2, tr1_3);
|
|
}
|
|
|
|
static INLINE void array_transpose_4X8(__m128i *in, __m128i *out) {
|
|
const __m128i tr0_0 = _mm_unpacklo_epi16(in[0], in[1]);
|
|
const __m128i tr0_1 = _mm_unpacklo_epi16(in[2], in[3]);
|
|
const __m128i tr0_4 = _mm_unpacklo_epi16(in[4], in[5]);
|
|
const __m128i tr0_5 = _mm_unpacklo_epi16(in[6], in[7]);
|
|
|
|
const __m128i tr1_0 = _mm_unpacklo_epi32(tr0_0, tr0_1);
|
|
const __m128i tr1_2 = _mm_unpackhi_epi32(tr0_0, tr0_1);
|
|
const __m128i tr1_4 = _mm_unpacklo_epi32(tr0_4, tr0_5);
|
|
const __m128i tr1_6 = _mm_unpackhi_epi32(tr0_4, tr0_5);
|
|
|
|
out[0] = _mm_unpacklo_epi64(tr1_0, tr1_4);
|
|
out[1] = _mm_unpackhi_epi64(tr1_0, tr1_4);
|
|
out[2] = _mm_unpacklo_epi64(tr1_2, tr1_6);
|
|
out[3] = _mm_unpackhi_epi64(tr1_2, tr1_6);
|
|
}
|
|
|
|
static INLINE void array_transpose_16x16(__m128i *res0, __m128i *res1) {
|
|
__m128i tbuf[8];
|
|
array_transpose_8x8(res0, res0);
|
|
array_transpose_8x8(res1, tbuf);
|
|
array_transpose_8x8(res0 + 8, res1);
|
|
array_transpose_8x8(res1 + 8, res1 + 8);
|
|
|
|
res0[8] = tbuf[0];
|
|
res0[9] = tbuf[1];
|
|
res0[10] = tbuf[2];
|
|
res0[11] = tbuf[3];
|
|
res0[12] = tbuf[4];
|
|
res0[13] = tbuf[5];
|
|
res0[14] = tbuf[6];
|
|
res0[15] = tbuf[7];
|
|
}
|
|
|
|
static INLINE __m128i dct_const_round_shift_sse2(const __m128i in) {
|
|
const __m128i t = _mm_add_epi32(in, _mm_set1_epi32(DCT_CONST_ROUNDING));
|
|
return _mm_srai_epi32(t, DCT_CONST_BITS);
|
|
}
|
|
|
|
static INLINE __m128i idct_madd_round_shift_sse2(const __m128i in,
|
|
const __m128i cospi) {
|
|
const __m128i t = _mm_madd_epi16(in, cospi);
|
|
return dct_const_round_shift_sse2(t);
|
|
}
|
|
|
|
// Calculate the dot product between in0/1 and x and wrap to short.
|
|
static INLINE __m128i idct_calc_wraplow_sse2(const __m128i in0,
|
|
const __m128i in1,
|
|
const __m128i x) {
|
|
const __m128i t0 = idct_madd_round_shift_sse2(in0, x);
|
|
const __m128i t1 = idct_madd_round_shift_sse2(in1, x);
|
|
return _mm_packs_epi32(t0, t1);
|
|
}
|
|
|
|
// Function to allow 8 bit optimisations to be used when profile 0 is used with
|
|
// highbitdepth enabled
|
|
static INLINE __m128i load_input_data(const tran_low_t *data) {
|
|
#if CONFIG_VP9_HIGHBITDEPTH
|
|
return octa_set_epi16(data[0], data[1], data[2], data[3], data[4], data[5],
|
|
data[6], data[7]);
|
|
#else
|
|
return _mm_load_si128((const __m128i *)data);
|
|
#endif
|
|
}
|
|
|
|
static INLINE void load_buffer_8x16(const tran_low_t *const input,
|
|
__m128i *const in) {
|
|
in[0] = load_input_data(input + 0 * 16);
|
|
in[1] = load_input_data(input + 1 * 16);
|
|
in[2] = load_input_data(input + 2 * 16);
|
|
in[3] = load_input_data(input + 3 * 16);
|
|
in[4] = load_input_data(input + 4 * 16);
|
|
in[5] = load_input_data(input + 5 * 16);
|
|
in[6] = load_input_data(input + 6 * 16);
|
|
in[7] = load_input_data(input + 7 * 16);
|
|
|
|
in[8] = load_input_data(input + 8 * 16);
|
|
in[9] = load_input_data(input + 9 * 16);
|
|
in[10] = load_input_data(input + 10 * 16);
|
|
in[11] = load_input_data(input + 11 * 16);
|
|
in[12] = load_input_data(input + 12 * 16);
|
|
in[13] = load_input_data(input + 13 * 16);
|
|
in[14] = load_input_data(input + 14 * 16);
|
|
in[15] = load_input_data(input + 15 * 16);
|
|
}
|
|
|
|
static INLINE void recon_and_store(uint8_t *const dest, const __m128i in_x) {
|
|
const __m128i zero = _mm_setzero_si128();
|
|
__m128i d0 = _mm_loadl_epi64((__m128i *)(dest));
|
|
d0 = _mm_unpacklo_epi8(d0, zero);
|
|
d0 = _mm_add_epi16(in_x, d0);
|
|
d0 = _mm_packus_epi16(d0, d0);
|
|
_mm_storel_epi64((__m128i *)(dest), d0);
|
|
}
|
|
|
|
static INLINE void write_buffer_8x16(uint8_t *dest, __m128i *in, int stride) {
|
|
const __m128i final_rounding = _mm_set1_epi16(1 << 5);
|
|
// Final rounding and shift
|
|
in[0] = _mm_adds_epi16(in[0], final_rounding);
|
|
in[1] = _mm_adds_epi16(in[1], final_rounding);
|
|
in[2] = _mm_adds_epi16(in[2], final_rounding);
|
|
in[3] = _mm_adds_epi16(in[3], final_rounding);
|
|
in[4] = _mm_adds_epi16(in[4], final_rounding);
|
|
in[5] = _mm_adds_epi16(in[5], final_rounding);
|
|
in[6] = _mm_adds_epi16(in[6], final_rounding);
|
|
in[7] = _mm_adds_epi16(in[7], final_rounding);
|
|
in[8] = _mm_adds_epi16(in[8], final_rounding);
|
|
in[9] = _mm_adds_epi16(in[9], final_rounding);
|
|
in[10] = _mm_adds_epi16(in[10], final_rounding);
|
|
in[11] = _mm_adds_epi16(in[11], final_rounding);
|
|
in[12] = _mm_adds_epi16(in[12], final_rounding);
|
|
in[13] = _mm_adds_epi16(in[13], final_rounding);
|
|
in[14] = _mm_adds_epi16(in[14], final_rounding);
|
|
in[15] = _mm_adds_epi16(in[15], final_rounding);
|
|
|
|
in[0] = _mm_srai_epi16(in[0], 6);
|
|
in[1] = _mm_srai_epi16(in[1], 6);
|
|
in[2] = _mm_srai_epi16(in[2], 6);
|
|
in[3] = _mm_srai_epi16(in[3], 6);
|
|
in[4] = _mm_srai_epi16(in[4], 6);
|
|
in[5] = _mm_srai_epi16(in[5], 6);
|
|
in[6] = _mm_srai_epi16(in[6], 6);
|
|
in[7] = _mm_srai_epi16(in[7], 6);
|
|
in[8] = _mm_srai_epi16(in[8], 6);
|
|
in[9] = _mm_srai_epi16(in[9], 6);
|
|
in[10] = _mm_srai_epi16(in[10], 6);
|
|
in[11] = _mm_srai_epi16(in[11], 6);
|
|
in[12] = _mm_srai_epi16(in[12], 6);
|
|
in[13] = _mm_srai_epi16(in[13], 6);
|
|
in[14] = _mm_srai_epi16(in[14], 6);
|
|
in[15] = _mm_srai_epi16(in[15], 6);
|
|
|
|
recon_and_store(dest + 0 * stride, in[0]);
|
|
recon_and_store(dest + 1 * stride, in[1]);
|
|
recon_and_store(dest + 2 * stride, in[2]);
|
|
recon_and_store(dest + 3 * stride, in[3]);
|
|
recon_and_store(dest + 4 * stride, in[4]);
|
|
recon_and_store(dest + 5 * stride, in[5]);
|
|
recon_and_store(dest + 6 * stride, in[6]);
|
|
recon_and_store(dest + 7 * stride, in[7]);
|
|
recon_and_store(dest + 8 * stride, in[8]);
|
|
recon_and_store(dest + 9 * stride, in[9]);
|
|
recon_and_store(dest + 10 * stride, in[10]);
|
|
recon_and_store(dest + 11 * stride, in[11]);
|
|
recon_and_store(dest + 12 * stride, in[12]);
|
|
recon_and_store(dest + 13 * stride, in[13]);
|
|
recon_and_store(dest + 14 * stride, in[14]);
|
|
recon_and_store(dest + 15 * stride, in[15]);
|
|
}
|
|
|
|
static INLINE void recon_and_store4x4_sse2(const __m128i *const in,
|
|
uint8_t *const dest,
|
|
const int stride) {
|
|
const __m128i zero = _mm_setzero_si128();
|
|
__m128i d[2];
|
|
|
|
// Reconstruction and Store
|
|
d[0] = _mm_cvtsi32_si128(*(const int *)(dest));
|
|
d[1] = _mm_cvtsi32_si128(*(const int *)(dest + stride * 3));
|
|
d[0] = _mm_unpacklo_epi32(d[0],
|
|
_mm_cvtsi32_si128(*(const int *)(dest + stride)));
|
|
d[1] = _mm_unpacklo_epi32(
|
|
_mm_cvtsi32_si128(*(const int *)(dest + stride * 2)), d[1]);
|
|
d[0] = _mm_unpacklo_epi8(d[0], zero);
|
|
d[1] = _mm_unpacklo_epi8(d[1], zero);
|
|
d[0] = _mm_add_epi16(d[0], in[0]);
|
|
d[1] = _mm_add_epi16(d[1], in[1]);
|
|
d[0] = _mm_packus_epi16(d[0], d[1]);
|
|
|
|
*(int *)dest = _mm_cvtsi128_si32(d[0]);
|
|
d[0] = _mm_srli_si128(d[0], 4);
|
|
*(int *)(dest + stride) = _mm_cvtsi128_si32(d[0]);
|
|
d[0] = _mm_srli_si128(d[0], 4);
|
|
*(int *)(dest + stride * 2) = _mm_cvtsi128_si32(d[0]);
|
|
d[0] = _mm_srli_si128(d[0], 4);
|
|
*(int *)(dest + stride * 3) = _mm_cvtsi128_si32(d[0]);
|
|
}
|
|
|
|
void idct4_sse2(__m128i *in);
|
|
void idct8_sse2(__m128i *in);
|
|
void idct16_sse2(__m128i *in0, __m128i *in1);
|
|
void iadst4_sse2(__m128i *in);
|
|
void iadst8_sse2(__m128i *in);
|
|
void iadst16_sse2(__m128i *in0, __m128i *in1);
|
|
|
|
#endif // VPX_DSP_X86_INV_TXFM_SSE2_H_
|