text: /*
   * Copyright (c) 2018 Cisco and/or its affiliates.
   * Licensed under the Apache License, Version 2.0 (the "License");
   * you may not use this file except in compliance with the License.
   * You may obtain a copy of the License at:
   *
   *     http://www.apache.org/licenses/LICENSE-2.0
   *
   * Unless required by applicable law or agreed to in writing, software
   * distributed under the License is distributed on an "AS IS" BASIS,
   * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
   * See the License for the specific language governing permissions and
   * limitations under the License.
   */
  
  #ifndef included_vector_avx2_h
  #define included_vector_avx2_h
  
  #include <vppinfra/clib.h>
  #include <x86intrin.h>
  
  /* *INDENT-OFF* */
  #define foreach_avx2_vec256i \
    _(i,8,32,epi8) _(i,16,16,epi16) _(i,32,8,epi32)  _(i,64,4,epi64x)
  #define foreach_avx2_vec256u \
    _(u,8,32,epi8) _(u,16,16,epi16) _(u,32,8,epi32)  _(u,64,4,epi64x)
  #define foreach_avx2_vec256f \
    _(f,32,8,ps) _(f,64,4,pd)
  
  /* splat, load_unaligned, store_unaligned, is_all_zero, is_equal,
     is_all_equal */
  #define _(t, s, c, i) \
  static_always_inline t##s##x##c						\
  t##s##x##c##_splat (t##s x)						\
  { return (t##s##x##c) _mm256_set1_##i (x); }				\
  \
  static_always_inline t##s##x##c						\
  t##s##x##c##_load_unaligned (void *p)					\
  { return (t##s##x##c) _mm256_loadu_si256 (p); }				\
  \
  static_always_inline void						\
  t##s##x##c##_store_unaligned (t##s##x##c v, void *p)			\
  { _mm256_storeu_si256 ((__m256i *) p, (__m256i) v); }			\
  \
  static_always_inline int						\
  t##s##x##c##_is_all_zero (t##s##x##c x)					\
  { return _mm256_testz_si256 ((__m256i) x, (__m256i) x); }		\
  \
  static_always_inline int						\
  t##s##x##c##_is_equal (t##s##x##c a, t##s##x##c b)			\
  { return t##s##x##c##_is_all_zero (a ^ b); }				\
  \
  static_always_inline int						\
  t##s##x##c##_is_all_equal (t##s##x##c v, t##s x)			\
  { return t##s##x##c##_is_equal (v, t##s##x##c##_splat (x)); };		\
  
  foreach_avx2_vec256i foreach_avx2_vec256u
  #undef _
  /* *INDENT-ON* */
  
  always_inline u32x8
  u32x8_permute (u32x8 v, u32x8 idx)
  {
    return (u32x8) _mm256_permutevar8x32_epi32 ((__m256i) v, (__m256i) idx);
  }
  
  /* _extract_lo, _extract_hi */
  /* *INDENT-OFF* */
  #define _(t1,t2) \
  always_inline t1							\
  t2##_extract_lo (t2 v)							\
  { return (t1) _mm256_extracti128_si256 ((__m256i) v, 0); }		\
  \
  always_inline t1							\
  t2##_extract_hi (t2 v)							\
  { return (t1) _mm256_extracti128_si256 ((__m256i) v, 1); }		\
  \
  always_inline t2							\
  t2##_insert_lo (t2 v1, t1 v2)						\
  { return (t2) _mm256_inserti128_si256 ((__m256i) v1, (__m128i) v2, 0); }\
  \
  always_inline t2							\
  t2##_insert_hi (t2 v1, t1 v2)						\
  { return (t2) _mm256_inserti128_si256 ((__m256i) v1, (__m128i) v2, 1); }\
  
  _(u8x16, u8x32)
  _(u16x8, u16x16)
  _(u32x4, u32x8)
  _(u64x2, u64x4)
  #undef _
  /* *INDENT-ON* */
  
  
  
  
  static_always_inline u32
  u8x32_msb_mask (u8x32 v)
  {
    return _mm256_movemask_epi8 ((__m256i) v);
  }
  
  /* _extend_to_ */
  /* *INDENT-OFF* */
  #define _(f,t,i) \
  static_always_inline t							\
  f##_extend_to_##t (f x)							\
  { return (t) _mm256_cvt##i ((__m128i) x); }
  
  _(u16x8, u32x8, epu16_epi32)
  _(u16x8, u64x4, epu16_epi64)
  _(u32x4, u64x4, epu32_epi64)
  _(u8x16, u16x16, epu8_epi64)
  _(u8x16, u32x8, epu8_epi32)
  _(u8x16, u64x4, epu8_epi64)
  _(i16x8, i32x8, epi16_epi32)
  _(i16x8, i64x4, epi16_epi64)
  _(i32x4, i64x4, epi32_epi64)
  _(i8x16, i16x16, epi8_epi64)
  _(i8x16, i32x8, epi8_epi32)
  _(i8x16, i64x4, epi8_epi64)
  #undef _
  /* *INDENT-ON* */
  
  static_always_inline u16x16
  u16x16_byte_swap (u16x16 v)
  {
    u8x32 swap = {
      1, 0, 3, 2, 5, 4, 7, 6, 9, 8, 11, 10, 13, 12, 15, 14,
      1, 0, 3, 2, 5, 4, 7, 6, 9, 8, 11, 10, 13, 12, 15, 14
    };
    return (u16x16) _mm256_shuffle_epi8 ((__m256i) v, (__m256i) swap);
  }
  
  static_always_inline u32x8
  u32x8_hadd (u32x8 v1, u32x8 v2)
  {
    return (u32x8) _mm256_hadd_epi32 ((__m256i) v1, (__m256i) v2);
  }
  
  static_always_inline u16x16
  u16x16_mask_last (u16x16 v, u8 n_last)
  {
    const u16x16 masks[17] = {
      {0},
      {-1},
      {-1, -1},
      {-1, -1, -1},
      {-1, -1, -1, -1},
      {-1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1},
      {-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1},
    };
  
    ASSERT (n_last < 17);
  
    return v & masks[16 - n_last];
  }
  
  #endif /* included_vector_avx2_h */
  
  /*
   * fd.io coding-style-patch-verification: ON
   *
   * Local Variables:
   * eval: (c-set-style "gnu")
   * End:
   */
  