Octopus
vectors.h
Go to the documentation of this file.
1/*
2 Copyright (C) 2010 X. Andrade
3
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2, or (at your option)
7 any later version.
8
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
13
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
17 02110-1301, USA.
18
19*/
20
21#include <config.h>
22
23#ifndef VECTORS_H
24#define VECTORS_H
25
26#ifdef __AVX__
27// Check for intel avx
28
29#if defined(__AVX512F__) || defined(__AVX512PF__) || \
30 defined(__AVX512BW__) || defined(__AVX512ER__) || \
31 defined(__AVX512CD__) || defined(__AVX512DQ__) || \
32 defined(__AVX512VL__)
33// Use AVX512
34
35#include <immintrin.h>
36#define VEC_SIZE 8
37#define VEC_TYPE __m512d
38#define VEC_LD(addr) _mm512_load_pd(addr)
39#define VEC_LDU(addr) _mm512_loadu_pd(addr)
40#define VEC_ST(addr, vec) _mm512_stream_pd(addr, vec)
41#define VEC_STU(addr, vec) _mm512_storeu_pd(addr, vec)
42#define VEC_FMA(aa, bb, cc) _mm512_fmadd_pd(aa, bb, cc)
43#define VEC_SCAL(aa) _mm512_set1_pd(aa)
44#define VEC_ZERO _mm512_setzero_pd()
45#include <emmintrin.h>
46#define FENCE _mm_mfence()
47
48/* Use a depth of 16 to avoid register spilling. On skylake CPUs, there are 32
49 * AVX512 registers, so we should only use a maximum of 16 for the points because
50 * we need an additional one for the weights.
51 */
52#define DEPTH 16
53#define VECTORIZATION_LEVEL "AVX512"
54
55#elif defined(__AVX2__)
56// Use AVX2
57
58#include <immintrin.h>
59#if defined(__FMA4__) || defined(__FMA__)
60#include <x86intrin.h>
61#endif
62#define VEC_SIZE 4
63#define VEC_TYPE __m256d
64#define VEC_LD(addr) _mm256_load_pd(addr)
65#define VEC_LDU(addr) _mm256_loadu_pd(addr)
66#define VEC_ST(addr, vec) _mm256_stream_pd(addr, vec)
67#define VEC_STU(addr, vec) _mm256_storeu_pd(addr, vec)
68#ifdef __FMA4__
69#define VEC_FMA(aa, bb, cc) _mm256_macc_pd(aa, bb, cc)
70#elif defined(__FMA__)
71#define VEC_FMA(aa, bb, cc) _mm256_fmadd_pd(aa, bb, cc)
72#else
73#define VEC_FMA(aa, bb, cc) _mm256_add_pd(cc, _mm256_mul_pd(aa, bb))
74#endif
75#define VEC_SCAL(aa) _mm256_set1_pd(aa)
76#define VEC_ZERO _mm256_setzero_pd()
77#include <emmintrin.h>
78#define FENCE _mm_mfence()
79
80#define DEPTH 16
81#define VECTORIZATION_LEVEL "AVX2"
82
83#else
84// Default to AVX
85
86#include <emmintrin.h>
87#if defined(__FMA4__) || defined(__FMA__)
88#include <x86intrin.h>
89#endif
90#define VEC_SIZE 2
91#define VEC_TYPE __m128d
92#define VEC_LD(addr) _mm_load_pd(addr)
93#define VEC_LDU(addr) _mm_loadu_pd(addr)
94#define VEC_ST(addr, vec) _mm_stream_pd(addr, vec)
95#define VEC_STU(addr, vec) _mm_storeu_pd(addr, vec)
96#ifdef __FMA4__
97#define VEC_FMA(aa, bb, cc) _mm_macc_pd(aa, bb, cc)
98#elif defined(__FMA__)
99#define VEC_FMA(aa, bb, cc) _mm_fmadd_pd(aa, bb, cc)
100#else
101#define VEC_FMA(aa, bb, cc) _mm_add_pd(cc, _mm_mul_pd(aa, bb))
102#endif
103#define VEC_SCAL(aa) _mm_set1_pd(aa)
104#define VEC_ZERO _mm_setzero_pd()
105#define FENCE _mm_mfence()
106
107#define DEPTH 16
108#define VECTORIZATION_LEVEL "AVX"
109
110#endif
111
112#else
113// Not explicitly optimized
114
115#define VEC_SIZE 1
116#define VEC_TYPE double
117#define VEC_LD(addr) (addr)[0]
118#define VEC_LDU(addr) VEC_LD(addr)
119#define VEC_ST(addr, vec) (addr)[0] = vec
120#define VEC_STU(addr, vec) VEC_ST(addr, vec)
121#define VEC_FMA(aa, bb, cc) aa *bb + cc
122#define VEC_SCAL(aa) aa
123#define VEC_ZERO 0.0
124
125#define DEPTH 8
126#define VECTORIZATION_LEVEL "default"
127#endif
128
129#define max1(x) (((x) > 0) ? (x) : 1)
130
131#endif