| // Copyright 2020 Google LLC |
| // |
| // This source code is licensed under the BSD-style license found in the |
| // LICENSE file in the root directory of this source tree. |
| |
| $assert SSE in [2, 3, 4] |
| $assert not XOP or AVX |
| $assert not AVX or SSE == 4 |
| $assert VARIANT in ["LD64", "LD128", "EXTENDED"] |
| $assert MR <= 4 |
| #include <assert.h> |
| |
| $if XOP: |
| #if defined(__GNUC__) || defined(__clang__) |
| #include <x86intrin.h> |
| #else |
| #include <immintrin.h> |
| #include <ammintrin.h> |
| #endif |
| $else: |
| $SSE_HEADER = {2: "emmintrin.h", 3: "tmmintrin.h", 4: "smmintrin.h"}[SSE] |
| #include <${SSE_HEADER}> |
| |
| #include <xnnpack/gemm.h> |
| #include <xnnpack/math.h> |
| |
| |
| $LOAD_SUFFIX = {"LD128": "_ld128", "LD64": "_ld64", "EXTENDED": ""}[VARIANT] |
| $GEMM_SUFFIX = "_xw" if VARIANT == "EXTENDED" else "" |
| $PARAMS_STRUCT = "gemmlowp_sse4" if SSE >= 4 else "gemmlowp_sse2" |
| $ISA = "xop" if XOP else "avx" if AVX else {2: "sse2", 3: "ssse3", 4: "sse41"}[SSE] |
| void xnn_qs8_gemm${GEMM_SUFFIX}_minmax_gemmlowp_ukernel_${MR}x4c8__${ISA}${LOAD_SUFFIX}( |
| size_t mr, |
| size_t nc, |
| size_t kc, |
| const int8_t* restrict a, |
| size_t a_stride, |
| const void* restrict w, |
| int8_t* restrict c, |
| size_t cm_stride, |
| size_t cn_stride, |
| const union xnn_qs8_conv_minmax_params params[restrict XNN_MIN_ELEMENTS(1)]) XNN_DISABLE_TSAN XNN_DISABLE_MSAN |
| { |
| assert(mr != 0); |
| assert(mr <= ${MR}); |
| assert(nc != 0); |
| assert(kc != 0); |
| assert(kc % sizeof(int8_t) == 0); |
| assert(a != NULL); |
| assert(w != NULL); |
| assert(c != NULL); |
| |
| kc = round_up_po2(kc, 8); |
| const int8_t* a0 = a; |
| int8_t* c0 = c; |
| $for M in range(1, MR): |
| const int8_t* a${M} = (const int8_t*) ((uintptr_t) a${M-1} + a_stride); |
| int8_t* c${M} = (int8_t*) ((uintptr_t) c${M-1} + cm_stride); |
| $if M % 2 == 0: |
| if XNN_UNPREDICTABLE(mr <= ${M}) { |
| a${M} = a${M-1}; |
| c${M} = c${M-1}; |
| } |
| $elif M + 1 == MR: |
| if XNN_UNPREDICTABLE(mr != ${M+1}) { |
| a${M} = a${M-1}; |
| c${M} = c${M-1}; |
| } |
| $else: |
| if XNN_UNPREDICTABLE(mr < ${M+1}) { |
| a${M} = a${M-1}; |
| c${M} = c${M-1}; |
| } |
| |
| do { |
| $for N in range(4): |
| __m128i vacc0x${N} = _mm_cvtsi32_si128((int) ((const int32_t*) w)[${N}]); |
| $for M in range(1, MR): |
| $for N in range(4): |
| __m128i vacc${M}x${N} = vacc0x${N}; |
| w = (const void*) ((uintptr_t) w + 4 * sizeof(int32_t)); |
| |
| size_t k = 0; |
| while (k < kc) { |
| $for M in range(MR): |
| const __m128i va${M} = _mm_loadl_epi64((const __m128i*) a${M}); |
| $if SSE == 4: |
| const __m128i vxa${M} = _mm_cvtepi8_epi16(va${M}); |
| $else: |
| const __m128i vxa${M} = _mm_unpacklo_epi8(va${M}, _mm_cmpgt_epi8(_mm_setzero_si128(), va${M})); |
| a${M} += 8; |
| |
| $if VARIANT == "LD128": |
| $for N in range(0, 4, 2): |
| $if N == 0: |
| const __m128i vb${N}${N+1} = _mm_load_si128((const __m128i*) w); |
| $else: |
| const __m128i vb${N}${N+1} = _mm_load_si128((const __m128i*) ((uintptr_t) w + ${N * 8} * sizeof(int8_t))); |
| const __m128i vsb${N}${N+1} = _mm_cmpgt_epi8(_mm_setzero_si128(), vb${N}${N+1}); |
| const __m128i vxb${N} = _mm_unpacklo_epi8(vb${N}${N+1}, vsb${N}${N+1}); |
| const __m128i vxb${N+1} = _mm_unpackhi_epi8(vb${N}${N+1}, vsb${N}${N+1}); |
| |
| $for M in range(MR): |
| $if XOP: |
| vacc${M}x${N} = _mm_maddd_epi16(vxa${M}, vxb${N}, vacc${M}x${N}); |
| vacc${M}x${N+1} = _mm_maddd_epi16(vxa${M}, vxb${N+1}, vacc${M}x${N+1}); |
| $else: |
| vacc${M}x${N} = _mm_add_epi32(vacc${M}x${N}, _mm_madd_epi16(vxa${M}, vxb${N})); |
| vacc${M}x${N+1} = _mm_add_epi32(vacc${M}x${N+1}, _mm_madd_epi16(vxa${M}, vxb${N+1})); |
| $else: |
| $for N in range(4): |
| $if VARIANT == "LD64": |
| $if N == 0: |
| const __m128i vb${N} = _mm_loadl_epi64((const __m128i*) w); |
| $else: |
| const __m128i vb${N} = _mm_loadl_epi64((const __m128i*) ((uintptr_t) w + ${N * 8} * sizeof(int8_t))); |
| $if SSE == 4: |
| const __m128i vxb${N} = _mm_cvtepi8_epi16(vb${N}); |
| $else: |
| const __m128i vxb${N} = _mm_unpacklo_epi8(vb${N}, _mm_cmpgt_epi8(_mm_setzero_si128(), vb${N})); |
| $elif VARIANT == "EXTENDED": |
| $if N == 0: |
| const __m128i vxb${N} = _mm_load_si128((const __m128i*) w); |
| $else: |
| const __m128i vxb${N} = _mm_load_si128((const __m128i*) ((uintptr_t) w + ${N * 8} * sizeof(int16_t))); |
| |
| $for M in range(MR): |
| $if XOP: |
| vacc${M}x${N} = _mm_maddd_epi16(vxa${M}, vxb${N}, vacc${M}x${N}); |
| $else: |
| vacc${M}x${N} = _mm_add_epi32(vacc${M}x${N}, _mm_madd_epi16(vxa${M}, vxb${N})); |
| |
| $if VARIANT == "EXTENDED": |
| w = (const void*) ((uintptr_t) w + 32 * sizeof(int16_t)); |
| $else: |
| w = (const void*) ((uintptr_t) w + 32 * sizeof(int8_t)); |
| k += 8 * sizeof(int8_t); |
| } |
| |
| $if SSE >= 3: |
| $for M in range(MR): |
| const __m128i vacc${M}x01 = _mm_hadd_epi32(vacc${M}x0, vacc${M}x1); |
| const __m128i vacc${M}x23 = _mm_hadd_epi32(vacc${M}x2, vacc${M}x3); |
| |
| $for M in range(MR): |
| __m128i vacc${M}x0123 = _mm_hadd_epi32(vacc${M}x01, vacc${M}x23); |
| $else: |
| $for M in range(MR): |
| const __m128i vacc${M}x02 = _mm_add_epi32(_mm_unpacklo_epi32(vacc${M}x0, vacc${M}x2), _mm_unpackhi_epi32(vacc${M}x0, vacc${M}x2)); |
| const __m128i vacc${M}x13 = _mm_add_epi32(_mm_unpacklo_epi32(vacc${M}x1, vacc${M}x3), _mm_unpackhi_epi32(vacc${M}x1, vacc${M}x3)); |
| |
| $for M in range(MR): |
| __m128i vacc${M}x0123 = _mm_add_epi32(_mm_unpacklo_epi32(vacc${M}x02, vacc${M}x13), _mm_unpackhi_epi32(vacc${M}x02, vacc${M}x13)); |
| |
| const __m128i vmultiplier = _mm_load_si128((const __m128i*) params->${PARAMS_STRUCT}.multiplier); |
| const __m128i vrounding = _mm_load_si128((const __m128i*) params->${PARAMS_STRUCT}.rounding); |
| |
| $if SSE == 4: |
| $for M in range(MR): |
| const __m128i vacc${M}x1133 = _mm_shuffle_epi32(vacc${M}x0123, _MM_SHUFFLE(3, 3, 1, 1)); |
| |
| $for M in range(MR): |
| const __m128i vprod${M}x02 = _mm_add_epi64(_mm_mul_epi32(vacc${M}x0123, vmultiplier), vrounding); |
| |
| $for M in range(MR): |
| const __m128i vprod${M}x13 = _mm_add_epi64(_mm_mul_epi32(vacc${M}x1133, vmultiplier), vrounding); |
| |
| $for M in range(MR): |
| const __m128i vq31prod${M}x02 = _mm_srli_epi64(vprod${M}x02, 31); |
| const __m128i vq31prod${M}x13 = _mm_add_epi64(vprod${M}x13, vprod${M}x13); |
| |
| $for M in range(MR): |
| const __m128i vq31prod${M}x0123 = _mm_blend_epi16(vq31prod${M}x02, vq31prod${M}x13, 0xCC); |
| $else: |
| $for M in range(MR): |
| const __m128i vnmask${M}x0123 = _mm_cmpgt_epi32(_mm_setzero_si128(), vacc${M}x0123); |
| |
| $for M in range(MR): |
| $if SSE >= 3: |
| const __m128i vabsacc${M}x0123 = _mm_abs_epi32(vacc${M}x0123); |
| $else: |
| const __m128i vabsacc${M}x0123 = _mm_sub_epi32(_mm_xor_si128(vacc${M}x0123, vnmask${M}x0123), vnmask${M}x0123); |
| |
| $for M in range(MR): |
| const __m128i vabsacc${M}x1133 = _mm_shuffle_epi32(vabsacc${M}x0123, _MM_SHUFFLE(3, 3, 1, 1)); |
| |
| $for M in range(MR): |
| const __m128i vabsprod${M}x02 = _mm_mul_epu32(vabsacc${M}x0123, vmultiplier); |
| |
| $for M in range(MR): |
| const __m128i vnmask${M}x02 = _mm_shuffle_epi32(vnmask${M}x0123, _MM_SHUFFLE(2, 2, 0, 0)); |
| |
| $for M in range(MR): |
| const __m128i vprod${M}x02 = _mm_sub_epi64(_mm_xor_si128(vabsprod${M}x02, vnmask${M}x02), vnmask${M}x02); |
| |
| $for M in range(MR): |
| const __m128i vq31prod${M}x02 = _mm_srli_epi64(_mm_add_epi64(vprod${M}x02, vrounding), 31); |
| |
| $for M in range(MR): |
| const __m128i vabsprod${M}x13 = _mm_mul_epu32(vabsacc${M}x1133, vmultiplier); |
| |
| $for M in range(MR): |
| const __m128i vnmask${M}x13 = _mm_shuffle_epi32(vnmask${M}x0123, _MM_SHUFFLE(3, 3, 1, 1)); |
| |
| $for M in range(MR): |
| const __m128i vprod${M}x13 = _mm_sub_epi64(_mm_xor_si128(vabsprod${M}x13, vnmask${M}x13), vnmask${M}x13); |
| |
| $for M in range(MR): |
| const __m128i vq31prod${M}x13 = _mm_srli_epi64(_mm_add_epi64(vprod${M}x13, vrounding), 31); |
| |
| $for M in range(MR): |
| const __m128i vq31prod${M}x0213 = _mm_castps_si128(_mm_shuffle_ps( |
| _mm_castsi128_ps(vq31prod${M}x02), _mm_castsi128_ps(vq31prod${M}x13), _MM_SHUFFLE(2, 0, 2, 0))); |
| |
| $for M in range(MR): |
| const __m128i vq31prod${M}x0123 = _mm_shuffle_epi32(vq31prod${M}x0213, _MM_SHUFFLE(3, 1, 2, 0)); |
| |
| const __m128i vremainder_mask = _mm_load_si128((const __m128i*) params->${PARAMS_STRUCT}.remainder_mask); |
| $for M in range(MR): |
| const __m128i vrem${M}x0123 = |
| _mm_add_epi32(_mm_and_si128(vq31prod${M}x0123, vremainder_mask), _mm_cmpgt_epi32(_mm_setzero_si128(), vq31prod${M}x0123)); |
| |
| const __m128i vremainder_threshold = _mm_load_si128((const __m128i*) params->${PARAMS_STRUCT}.remainder_threshold); |
| $if M > 1: |
| const __m128i vshift = _mm_loadl_epi64((const __m128i*) params->${PARAMS_STRUCT}.shift); |
| $else: |
| const __m128i vshift = _mm_load_si128((const __m128i*) params->${PARAMS_STRUCT}.shift); |
| $for M in range(MR): |
| vacc${M}x0123 = |
| _mm_sub_epi32(_mm_sra_epi32(vq31prod${M}x0123, vshift), _mm_cmpgt_epi32(vrem${M}x0123, vremainder_threshold)); |
| |
| const __m128i voutput_zero_point = _mm_load_si128((const __m128i*) params->${PARAMS_STRUCT}.output_zero_point); |
| $for M in range(0, MR, 2): |
| __m128i vacc${M}${min(M+1, MR-1)}x0123 = _mm_adds_epi16(_mm_packs_epi32(vacc${M}x0123, vacc${min(M+1, MR-1)}x0123), voutput_zero_point); |
| |
| $if SSE < 4: |
| const __m128i voutput_min = _mm_load_si128((const __m128i*) params->gemmlowp_sse2.output_min); |
| const __m128i voutput_max = _mm_load_si128((const __m128i*) params->gemmlowp_sse2.output_max); |
| $for M in range(0, MR, 2): |
| vacc${M}${min(M+1, MR-1)}x0123 = _mm_min_epi16(_mm_max_epi16(vacc${M}${min(M+1, MR-1)}x0123, voutput_min), voutput_max); |
| |
| $if MR > 2: |
| __m128i vout = _mm_packs_epi16(vacc0${min(1, MR-1)}x0123, vacc${min(2, MR-1)}${min(3, MR-1)}x0123); |
| $else: |
| __m128i vout = _mm_packs_epi16(vacc0${min(1, MR-1)}x0123, vacc0${min(1, MR-1)}x0123); |
| |
| $if SSE == 4: |
| vout = _mm_max_epi8(vout, _mm_load_si128((const __m128i*) params->gemmlowp_sse4.output_min)); |
| vout = _mm_min_epi8(vout, _mm_load_si128((const __m128i*) params->gemmlowp_sse4.output_max)); |
| |
| if (nc >= 4) { |
| *((uint32_t*) c0) = (uint32_t) _mm_cvtsi128_si32(vout); |
| $for M in range(1, MR): |
| $if SSE == 4: |
| *((uint32_t*) c${M}) = (uint32_t) _mm_extract_epi32(vout, ${M}); |
| $else: |
| vout = _mm_srli_si128(vout, 4); |
| *((uint32_t*) c${M}) = (uint32_t) _mm_cvtsi128_si32(vout); |
| |
| $for M in range(MR): |
| c${M} = (int8_t*) ((uintptr_t) c${M} + cn_stride); |
| |
| $for M in range(MR): |
| a${M} = (const int8_t*) ((uintptr_t) a${M} - kc); |
| |
| nc -= 4; |
| } else { |
| if (nc & 2) { |
| $for M in range(MR): |
| *((uint16_t*) c${M}) = (uint16_t) _mm_extract_epi16(vout, ${M * 2}); |
| c${M} += 2; |
| vout = _mm_srli_epi32(vout, 16); |
| } |
| if (nc & 1) { |
| $if SSE == 4: |
| $for M in range(MR): |
| *((int8_t*) c${M}) = (int8_t) _mm_extract_epi8(vout, ${M * 4}); |
| $else: |
| *((int8_t*) c0) = (int8_t) _mm_cvtsi128_si32(vout); |
| $for M in range(1, MR): |
| *((int8_t*) c${M}) = (int8_t) _mm_extract_epi16(vout, ${M * 2}); |
| } |
| |
| nc = 0; |
| } |
| } while (nc != 0); |
| } |