shithub: libvpx

ref: e4e08556db4f964bc44f3c4fdb3af8898dcb8522
dir: /vpx_dsp/x86/highbd_idct8x8_add_sse4.c/

View raw version
/*
 *  Copyright (c) 2017 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 <smmintrin.h>

#include "./vpx_dsp_rtcd.h"
#include "vpx_dsp/x86/highbd_inv_txfm_sse2.h"
#include "vpx_dsp/x86/highbd_inv_txfm_sse4.h"
#include "vpx_dsp/x86/inv_txfm_sse2.h"
#include "vpx_dsp/x86/inv_txfm_ssse3.h"
#include "vpx_dsp/x86/transpose_sse2.h"

static void highbd_idct8x8_half1d(__m128i *const io) {
  const __m128i cp_4q_4q =
      _mm_setr_epi32(cospi_4_64 << 2, 0, cospi_4_64 << 2, 0);
  const __m128i cp_8q_8q =
      _mm_setr_epi32(cospi_8_64 << 2, 0, cospi_8_64 << 2, 0);
  const __m128i cp_12q_12q =
      _mm_setr_epi32(cospi_12_64 << 2, 0, cospi_12_64 << 2, 0);
  const __m128i cp_16q_16q =
      _mm_setr_epi32(cospi_16_64 << 2, 0, cospi_16_64 << 2, 0);
  const __m128i cp_20q_20q =
      _mm_setr_epi32(cospi_20_64 << 2, 0, cospi_20_64 << 2, 0);
  const __m128i cp_24q_24q =
      _mm_setr_epi32(cospi_24_64 << 2, 0, cospi_24_64 << 2, 0);
  const __m128i cp_28q_28q =
      _mm_setr_epi32(cospi_28_64 << 2, 0, cospi_28_64 << 2, 0);
  __m128i temp1[4], temp2[4], step1[8], step2[8];

  transpose_32bit_4x4x2(io, io);

  // stage 1
  step1[0] = io[0];
  step1[2] = io[4];
  step1[1] = io[2];
  step1[3] = io[6];
  multiplication_and_add_2_ssse4_1(&io[1], &io[7], &cp_28q_28q, &cp_4q_4q,
                                   &step1[4], &step1[7]);
  multiplication_and_add_2_ssse4_1(&io[5], &io[3], &cp_12q_12q, &cp_20q_20q,
                                   &step1[5], &step1[6]);

  // stage 2
  temp2[0] = _mm_add_epi32(step1[0], step1[2]);
  extend_64bit(temp2[0], temp1);
  step2[0] = multiplication_round_shift(temp1, cp_16q_16q);
  temp2[0] = _mm_sub_epi32(step1[0], step1[2]);
  extend_64bit(temp2[0], temp1);
  step2[1] = multiplication_round_shift(temp1, cp_16q_16q);
  multiplication_and_add_2_ssse4_1(&step1[1], &step1[3], &cp_24q_24q, &cp_8q_8q,
                                   &step2[2], &step2[3]);
  step2[4] = _mm_add_epi32(step1[4], step1[5]);
  step2[5] = _mm_sub_epi32(step1[4], step1[5]);
  step2[6] = _mm_sub_epi32(step1[7], step1[6]);
  step2[7] = _mm_add_epi32(step1[7], step1[6]);

  // stage 3
  step1[0] = _mm_add_epi32(step2[0], step2[3]);
  step1[1] = _mm_add_epi32(step2[1], step2[2]);
  step1[2] = _mm_sub_epi32(step2[1], step2[2]);
  step1[3] = _mm_sub_epi32(step2[0], step2[3]);
  step1[4] = step2[4];
  temp2[0] = _mm_sub_epi32(step2[6], step2[5]);
  extend_64bit(temp2[0], temp1);
  step1[5] = multiplication_round_shift(temp1, cp_16q_16q);
  temp2[0] = _mm_add_epi32(step2[6], step2[5]);
  extend_64bit(temp2[0], temp1);
  step1[6] = multiplication_round_shift(temp1, cp_16q_16q);
  step1[7] = step2[7];

  // stage 4
  io[0] = _mm_add_epi32(step1[0], step1[7]);
  io[1] = _mm_add_epi32(step1[1], step1[6]);
  io[2] = _mm_add_epi32(step1[2], step1[5]);
  io[3] = _mm_add_epi32(step1[3], step1[4]);
  io[4] = _mm_sub_epi32(step1[3], step1[4]);
  io[5] = _mm_sub_epi32(step1[2], step1[5]);
  io[6] = _mm_sub_epi32(step1[1], step1[6]);
  io[7] = _mm_sub_epi32(step1[0], step1[7]);
}

static void highbd_idct8x8_12_half1d(__m128i *const io) {
  const __m128i cp_28q_28q =
      _mm_setr_epi32(cospi_28_64 << 2, 0, cospi_28_64 << 2, 0);
  const __m128i cp_4q_4q =
      _mm_setr_epi32(cospi_4_64 << 2, 0, cospi_4_64 << 2, 0);
  const __m128i cp_n20q_n20q =
      _mm_setr_epi32(-cospi_20_64 * 4, 0, -cospi_20_64 * 4, 0);
  const __m128i cp_12q_12q =
      _mm_setr_epi32(cospi_12_64 << 2, 0, cospi_12_64 << 2, 0);
  const __m128i cp_16q_16q =
      _mm_setr_epi32(cospi_16_64 << 2, 0, cospi_16_64 << 2, 0);
  const __m128i cp_8q_8q =
      _mm_setr_epi32(cospi_8_64 << 2, 0, cospi_8_64 << 2, 0);
  const __m128i cp_24q_24q =
      _mm_setr_epi32(cospi_24_64 << 2, 0, cospi_24_64 << 2, 0);
  __m128i temp1[4], temp2[4], step1[8], step2[8];

  transpose_32bit_4x4(io, io);

  // stage 1
  step1[0] = io[0];
  step1[1] = io[2];
  extend_64bit(io[1], temp1);
  step1[4] = multiplication_round_shift(temp1, cp_28q_28q);
  step1[7] = multiplication_round_shift(temp1, cp_4q_4q);
  extend_64bit(io[3], temp1);
  step1[5] = multiplication_round_shift(temp1, cp_n20q_n20q);
  step1[6] = multiplication_round_shift(temp1, cp_12q_12q);

  // stage 2
  extend_64bit(step1[0], temp1);
  step2[0] = multiplication_round_shift(temp1, cp_16q_16q);
  extend_64bit(step1[1], temp1);
  step2[2] = multiplication_round_shift(temp1, cp_24q_24q);
  step2[3] = multiplication_round_shift(temp1, cp_8q_8q);
  step2[4] = _mm_add_epi32(step1[4], step1[5]);
  step2[5] = _mm_sub_epi32(step1[4], step1[5]);
  step2[6] = _mm_sub_epi32(step1[7], step1[6]);
  step2[7] = _mm_add_epi32(step1[7], step1[6]);

  // stage 3
  step1[0] = _mm_add_epi32(step2[0], step2[3]);
  step1[1] = _mm_add_epi32(step2[0], step2[2]);
  step1[2] = _mm_sub_epi32(step2[0], step2[2]);
  step1[3] = _mm_sub_epi32(step2[0], step2[3]);
  step1[4] = step2[4];
  temp2[0] = _mm_sub_epi32(step2[6], step2[5]);
  extend_64bit(temp2[0], temp1);
  step1[5] = multiplication_round_shift(temp1, cp_16q_16q);
  temp2[0] = _mm_add_epi32(step2[6], step2[5]);
  extend_64bit(temp2[0], temp1);
  step1[6] = multiplication_round_shift(temp1, cp_16q_16q);
  step1[7] = step2[7];

  // stage 4
  io[0] = _mm_add_epi32(step1[0], step1[7]);
  io[1] = _mm_add_epi32(step1[1], step1[6]);
  io[2] = _mm_add_epi32(step1[2], step1[5]);
  io[3] = _mm_add_epi32(step1[3], step1[4]);
  io[4] = _mm_sub_epi32(step1[3], step1[4]);
  io[5] = _mm_sub_epi32(step1[2], step1[5]);
  io[6] = _mm_sub_epi32(step1[1], step1[6]);
  io[7] = _mm_sub_epi32(step1[0], step1[7]);
}

void vpx_highbd_idct8x8_64_add_sse4_1(const tran_low_t *input, uint16_t *dest,
                                      int stride, int bd) {
  __m128i io[16];

  io[0] = _mm_load_si128((const __m128i *)(input + 0 * 8 + 0));
  io[4] = _mm_load_si128((const __m128i *)(input + 0 * 8 + 4));
  io[1] = _mm_load_si128((const __m128i *)(input + 1 * 8 + 0));
  io[5] = _mm_load_si128((const __m128i *)(input + 1 * 8 + 4));
  io[2] = _mm_load_si128((const __m128i *)(input + 2 * 8 + 0));
  io[6] = _mm_load_si128((const __m128i *)(input + 2 * 8 + 4));
  io[3] = _mm_load_si128((const __m128i *)(input + 3 * 8 + 0));
  io[7] = _mm_load_si128((const __m128i *)(input + 3 * 8 + 4));

  if (bd == 8) {
    __m128i io_short[8];

    io_short[0] = _mm_packs_epi32(io[0], io[4]);
    io_short[1] = _mm_packs_epi32(io[1], io[5]);
    io_short[2] = _mm_packs_epi32(io[2], io[6]);
    io_short[3] = _mm_packs_epi32(io[3], io[7]);
    io[8] = _mm_load_si128((const __m128i *)(input + 4 * 8 + 0));
    io[12] = _mm_load_si128((const __m128i *)(input + 4 * 8 + 4));
    io[9] = _mm_load_si128((const __m128i *)(input + 5 * 8 + 0));
    io[13] = _mm_load_si128((const __m128i *)(input + 5 * 8 + 4));
    io[10] = _mm_load_si128((const __m128i *)(input + 6 * 8 + 0));
    io[14] = _mm_load_si128((const __m128i *)(input + 6 * 8 + 4));
    io[11] = _mm_load_si128((const __m128i *)(input + 7 * 8 + 0));
    io[15] = _mm_load_si128((const __m128i *)(input + 7 * 8 + 4));
    io_short[4] = _mm_packs_epi32(io[8], io[12]);
    io_short[5] = _mm_packs_epi32(io[9], io[13]);
    io_short[6] = _mm_packs_epi32(io[10], io[14]);
    io_short[7] = _mm_packs_epi32(io[11], io[15]);

    idct8_sse2(io_short);
    idct8_sse2(io_short);
    round_shift_8x8(io_short, io);
  } else {
    __m128i temp[4];

    highbd_idct8x8_half1d(io);

    io[8] = _mm_load_si128((const __m128i *)(input + 4 * 8 + 0));
    io[12] = _mm_load_si128((const __m128i *)(input + 4 * 8 + 4));
    io[9] = _mm_load_si128((const __m128i *)(input + 5 * 8 + 0));
    io[13] = _mm_load_si128((const __m128i *)(input + 5 * 8 + 4));
    io[10] = _mm_load_si128((const __m128i *)(input + 6 * 8 + 0));
    io[14] = _mm_load_si128((const __m128i *)(input + 6 * 8 + 4));
    io[11] = _mm_load_si128((const __m128i *)(input + 7 * 8 + 0));
    io[15] = _mm_load_si128((const __m128i *)(input + 7 * 8 + 4));
    highbd_idct8x8_half1d(&io[8]);

    temp[0] = io[4];
    temp[1] = io[5];
    temp[2] = io[6];
    temp[3] = io[7];
    io[4] = io[8];
    io[5] = io[9];
    io[6] = io[10];
    io[7] = io[11];
    highbd_idct8x8_half1d(io);
    io[8] = temp[0];
    io[9] = temp[1];
    io[10] = temp[2];
    io[11] = temp[3];
    highbd_idct8x8_half1d(&io[8]);

    io[0] = wraplow_16bit_shift5(io[0], io[8], _mm_set1_epi32(16));
    io[1] = wraplow_16bit_shift5(io[1], io[9], _mm_set1_epi32(16));
    io[2] = wraplow_16bit_shift5(io[2], io[10], _mm_set1_epi32(16));
    io[3] = wraplow_16bit_shift5(io[3], io[11], _mm_set1_epi32(16));
    io[4] = wraplow_16bit_shift5(io[4], io[12], _mm_set1_epi32(16));
    io[5] = wraplow_16bit_shift5(io[5], io[13], _mm_set1_epi32(16));
    io[6] = wraplow_16bit_shift5(io[6], io[14], _mm_set1_epi32(16));
    io[7] = wraplow_16bit_shift5(io[7], io[15], _mm_set1_epi32(16));
  }

  recon_and_store_8(io, dest, stride, bd);
}

void vpx_highbd_idct8x8_12_add_sse4_1(const tran_low_t *input, uint16_t *dest,
                                      int stride, int bd) {
  const __m128i zero = _mm_setzero_si128();
  __m128i io[16];

  io[0] = _mm_load_si128((const __m128i *)(input + 0 * 8 + 0));
  io[1] = _mm_load_si128((const __m128i *)(input + 1 * 8 + 0));
  io[2] = _mm_load_si128((const __m128i *)(input + 2 * 8 + 0));
  io[3] = _mm_load_si128((const __m128i *)(input + 3 * 8 + 0));

  if (bd == 8) {
    __m128i io_short[8];

    io_short[0] = _mm_packs_epi32(io[0], zero);
    io_short[1] = _mm_packs_epi32(io[1], zero);
    io_short[2] = _mm_packs_epi32(io[2], zero);
    io_short[3] = _mm_packs_epi32(io[3], zero);

    idct8x8_12_add_kernel_ssse3(io_short);
    round_shift_8x8(io_short, io);
  } else {
    __m128i temp[4];

    highbd_idct8x8_12_half1d(io);

    temp[0] = io[4];
    temp[1] = io[5];
    temp[2] = io[6];
    temp[3] = io[7];
    highbd_idct8x8_12_half1d(io);

    io[8] = temp[0];
    io[9] = temp[1];
    io[10] = temp[2];
    io[11] = temp[3];
    highbd_idct8x8_12_half1d(&io[8]);

    io[0] = wraplow_16bit_shift5(io[0], io[8], _mm_set1_epi32(16));
    io[1] = wraplow_16bit_shift5(io[1], io[9], _mm_set1_epi32(16));
    io[2] = wraplow_16bit_shift5(io[2], io[10], _mm_set1_epi32(16));
    io[3] = wraplow_16bit_shift5(io[3], io[11], _mm_set1_epi32(16));
    io[4] = wraplow_16bit_shift5(io[4], io[12], _mm_set1_epi32(16));
    io[5] = wraplow_16bit_shift5(io[5], io[13], _mm_set1_epi32(16));
    io[6] = wraplow_16bit_shift5(io[6], io[14], _mm_set1_epi32(16));
    io[7] = wraplow_16bit_shift5(io[7], io[15], _mm_set1_epi32(16));
  }

  recon_and_store_8(io, dest, stride, bd);
}