| 1 | // Generic simd conversions -*- C++ -*-
|
|---|
| 2 |
|
|---|
| 3 | // Copyright (C) 2020-2021 Free Software Foundation, Inc.
|
|---|
| 4 | //
|
|---|
| 5 | // This file is part of the GNU ISO C++ Library. This library is free
|
|---|
| 6 | // software; you can redistribute it and/or modify it under the
|
|---|
| 7 | // terms of the GNU General Public License as published by the
|
|---|
| 8 | // Free Software Foundation; either version 3, or (at your option)
|
|---|
| 9 | // any later version.
|
|---|
| 10 |
|
|---|
| 11 | // This library is distributed in the hope that it will be useful,
|
|---|
| 12 | // but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|---|
| 13 | // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|---|
| 14 | // GNU General Public License for more details.
|
|---|
| 15 |
|
|---|
| 16 | // Under Section 7 of GPL version 3, you are granted additional
|
|---|
| 17 | // permissions described in the GCC Runtime Library Exception, version
|
|---|
| 18 | // 3.1, as published by the Free Software Foundation.
|
|---|
| 19 |
|
|---|
| 20 | // You should have received a copy of the GNU General Public License and
|
|---|
| 21 | // a copy of the GCC Runtime Library Exception along with this program;
|
|---|
| 22 | // see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
|
|---|
| 23 | // <http://www.gnu.org/licenses/>.
|
|---|
| 24 |
|
|---|
| 25 | #ifndef _GLIBCXX_EXPERIMENTAL_SIMD_CONVERTER_H_
|
|---|
| 26 | #define _GLIBCXX_EXPERIMENTAL_SIMD_CONVERTER_H_
|
|---|
| 27 |
|
|---|
| 28 | #if __cplusplus >= 201703L
|
|---|
| 29 |
|
|---|
| 30 | _GLIBCXX_SIMD_BEGIN_NAMESPACE
|
|---|
| 31 | // _SimdConverter scalar -> scalar {{{
|
|---|
| 32 | template <typename _From, typename _To>
|
|---|
| 33 | struct _SimdConverter<_From, simd_abi::scalar, _To, simd_abi::scalar,
|
|---|
| 34 | enable_if_t<!is_same_v<_From, _To>>>
|
|---|
| 35 | {
|
|---|
| 36 | _GLIBCXX_SIMD_INTRINSIC constexpr _To operator()(_From __a) const noexcept
|
|---|
| 37 | { return static_cast<_To>(__a); }
|
|---|
| 38 | };
|
|---|
| 39 |
|
|---|
| 40 | // }}}
|
|---|
| 41 | // _SimdConverter scalar -> "native" {{{
|
|---|
| 42 | template <typename _From, typename _To, typename _Abi>
|
|---|
| 43 | struct _SimdConverter<_From, simd_abi::scalar, _To, _Abi,
|
|---|
| 44 | enable_if_t<!is_same_v<_Abi, simd_abi::scalar>>>
|
|---|
| 45 | {
|
|---|
| 46 | using _Ret = typename _Abi::template __traits<_To>::_SimdMember;
|
|---|
| 47 |
|
|---|
| 48 | template <typename... _More>
|
|---|
| 49 | _GLIBCXX_SIMD_INTRINSIC constexpr _Ret
|
|---|
| 50 | operator()(_From __a, _More... __more) const noexcept
|
|---|
| 51 | {
|
|---|
| 52 | static_assert(sizeof...(_More) + 1 == _Abi::template _S_size<_To>);
|
|---|
| 53 | static_assert(conjunction_v<is_same<_From, _More>...>);
|
|---|
| 54 | return __make_vector<_To>(__a, __more...);
|
|---|
| 55 | }
|
|---|
| 56 | };
|
|---|
| 57 |
|
|---|
| 58 | // }}}
|
|---|
| 59 | // _SimdConverter "native 1" -> "native 2" {{{
|
|---|
| 60 | template <typename _From, typename _To, typename _AFrom, typename _ATo>
|
|---|
| 61 | struct _SimdConverter<
|
|---|
| 62 | _From, _AFrom, _To, _ATo,
|
|---|
| 63 | enable_if_t<!disjunction_v<
|
|---|
| 64 | __is_fixed_size_abi<_AFrom>, __is_fixed_size_abi<_ATo>,
|
|---|
| 65 | is_same<_AFrom, simd_abi::scalar>, is_same<_ATo, simd_abi::scalar>,
|
|---|
| 66 | conjunction<is_same<_From, _To>, is_same<_AFrom, _ATo>>>>>
|
|---|
| 67 | {
|
|---|
| 68 | using _Arg = typename _AFrom::template __traits<_From>::_SimdMember;
|
|---|
| 69 | using _Ret = typename _ATo::template __traits<_To>::_SimdMember;
|
|---|
| 70 | using _V = __vector_type_t<_To, simd_size_v<_To, _ATo>>;
|
|---|
| 71 |
|
|---|
| 72 | template <typename... _More>
|
|---|
| 73 | _GLIBCXX_SIMD_INTRINSIC constexpr _Ret
|
|---|
| 74 | operator()(_Arg __a, _More... __more) const noexcept
|
|---|
| 75 | { return __vector_convert<_V>(__a, __more...); }
|
|---|
| 76 | };
|
|---|
| 77 |
|
|---|
| 78 | // }}}
|
|---|
| 79 | // _SimdConverter scalar -> fixed_size<1> {{{1
|
|---|
| 80 | template <typename _From, typename _To>
|
|---|
| 81 | struct _SimdConverter<_From, simd_abi::scalar, _To, simd_abi::fixed_size<1>,
|
|---|
| 82 | void>
|
|---|
| 83 | {
|
|---|
| 84 | _GLIBCXX_SIMD_INTRINSIC constexpr _SimdTuple<_To, simd_abi::scalar>
|
|---|
| 85 | operator()(_From __x) const noexcept
|
|---|
| 86 | { return {static_cast<_To>(__x)}; }
|
|---|
| 87 | };
|
|---|
| 88 |
|
|---|
| 89 | // _SimdConverter fixed_size<1> -> scalar {{{1
|
|---|
| 90 | template <typename _From, typename _To>
|
|---|
| 91 | struct _SimdConverter<_From, simd_abi::fixed_size<1>, _To, simd_abi::scalar,
|
|---|
| 92 | void>
|
|---|
| 93 | {
|
|---|
| 94 | _GLIBCXX_SIMD_INTRINSIC constexpr _To
|
|---|
| 95 | operator()(_SimdTuple<_From, simd_abi::scalar> __x) const noexcept
|
|---|
| 96 | { return {static_cast<_To>(__x.first)}; }
|
|---|
| 97 | };
|
|---|
| 98 |
|
|---|
| 99 | // _SimdConverter fixed_size<_Np> -> fixed_size<_Np> {{{1
|
|---|
| 100 | template <typename _From, typename _To, int _Np>
|
|---|
| 101 | struct _SimdConverter<_From, simd_abi::fixed_size<_Np>, _To,
|
|---|
| 102 | simd_abi::fixed_size<_Np>,
|
|---|
| 103 | enable_if_t<!is_same_v<_From, _To>>>
|
|---|
| 104 | {
|
|---|
| 105 | using _Ret = __fixed_size_storage_t<_To, _Np>;
|
|---|
| 106 | using _Arg = __fixed_size_storage_t<_From, _Np>;
|
|---|
| 107 |
|
|---|
| 108 | _GLIBCXX_SIMD_INTRINSIC constexpr _Ret
|
|---|
| 109 | operator()(const _Arg& __x) const noexcept
|
|---|
| 110 | {
|
|---|
| 111 | if constexpr (is_same_v<_From, _To>)
|
|---|
| 112 | return __x;
|
|---|
| 113 |
|
|---|
| 114 | // special case (optimize) int signedness casts
|
|---|
| 115 | else if constexpr (sizeof(_From) == sizeof(_To)
|
|---|
| 116 | && is_integral_v<_From> && is_integral_v<_To>)
|
|---|
| 117 | return __bit_cast<_Ret>(__x);
|
|---|
| 118 |
|
|---|
| 119 | // special case if all ABI tags in _Ret are scalar
|
|---|
| 120 | else if constexpr (__is_scalar_abi<typename _Ret::_FirstAbi>())
|
|---|
| 121 | {
|
|---|
| 122 | return __call_with_subscripts(
|
|---|
| 123 | __x, make_index_sequence<_Np>(),
|
|---|
| 124 | [](auto... __values) constexpr->_Ret {
|
|---|
| 125 | return __make_simd_tuple<_To, decltype((void) __values,
|
|---|
| 126 | simd_abi::scalar())...>(
|
|---|
| 127 | static_cast<_To>(__values)...);
|
|---|
| 128 | });
|
|---|
| 129 | }
|
|---|
| 130 |
|
|---|
| 131 | // from one vector to one vector
|
|---|
| 132 | else if constexpr (_Arg::_S_first_size == _Ret::_S_first_size)
|
|---|
| 133 | {
|
|---|
| 134 | _SimdConverter<_From, typename _Arg::_FirstAbi, _To,
|
|---|
| 135 | typename _Ret::_FirstAbi>
|
|---|
| 136 | __native_cvt;
|
|---|
| 137 | if constexpr (_Arg::_S_tuple_size == 1)
|
|---|
| 138 | return {__native_cvt(__x.first)};
|
|---|
| 139 | else
|
|---|
| 140 | {
|
|---|
| 141 | constexpr size_t _NRemain = _Np - _Arg::_S_first_size;
|
|---|
| 142 | _SimdConverter<_From, simd_abi::fixed_size<_NRemain>, _To,
|
|---|
| 143 | simd_abi::fixed_size<_NRemain>>
|
|---|
| 144 | __remainder_cvt;
|
|---|
| 145 | return {__native_cvt(__x.first), __remainder_cvt(__x.second)};
|
|---|
| 146 | }
|
|---|
| 147 | }
|
|---|
| 148 |
|
|---|
| 149 | // from one vector to multiple vectors
|
|---|
| 150 | else if constexpr (_Arg::_S_first_size > _Ret::_S_first_size)
|
|---|
| 151 | {
|
|---|
| 152 | const auto __multiple_return_chunks
|
|---|
| 153 | = __convert_all<__vector_type_t<_To, _Ret::_S_first_size>>(
|
|---|
| 154 | __x.first);
|
|---|
| 155 | constexpr auto __converted = __multiple_return_chunks.size()
|
|---|
| 156 | * _Ret::_FirstAbi::template _S_size<_To>;
|
|---|
| 157 | constexpr auto __remaining = _Np - __converted;
|
|---|
| 158 | if constexpr (_Arg::_S_tuple_size == 1 && __remaining == 0)
|
|---|
| 159 | return __to_simd_tuple<_To, _Np>(__multiple_return_chunks);
|
|---|
| 160 | else if constexpr (_Arg::_S_tuple_size == 1)
|
|---|
| 161 | { // e.g. <int, 3> -> <double, 2, 1> or <short, 7> -> <double, 4, 2,
|
|---|
| 162 | // 1>
|
|---|
| 163 | using _RetRem
|
|---|
| 164 | = __remove_cvref_t<decltype(__simd_tuple_pop_front<__converted>(
|
|---|
| 165 | _Ret()))>;
|
|---|
| 166 | const auto __return_chunks2
|
|---|
| 167 | = __convert_all<__vector_type_t<_To, _RetRem::_S_first_size>, 0,
|
|---|
| 168 | __converted>(__x.first);
|
|---|
| 169 | constexpr auto __converted2
|
|---|
| 170 | = __converted
|
|---|
| 171 | + __return_chunks2.size() * _RetRem::_S_first_size;
|
|---|
| 172 | if constexpr (__converted2 == _Np)
|
|---|
| 173 | return __to_simd_tuple<_To, _Np>(__multiple_return_chunks,
|
|---|
| 174 | __return_chunks2);
|
|---|
| 175 | else
|
|---|
| 176 | {
|
|---|
| 177 | using _RetRem2 = __remove_cvref_t<
|
|---|
| 178 | decltype(__simd_tuple_pop_front<__return_chunks2.size()
|
|---|
| 179 | * _RetRem::_S_first_size>(
|
|---|
| 180 | _RetRem()))>;
|
|---|
| 181 | const auto __return_chunks3 = __convert_all<
|
|---|
| 182 | __vector_type_t<_To, _RetRem2::_S_first_size>, 0,
|
|---|
| 183 | __converted2>(__x.first);
|
|---|
| 184 | constexpr auto __converted3
|
|---|
| 185 | = __converted2
|
|---|
| 186 | + __return_chunks3.size() * _RetRem2::_S_first_size;
|
|---|
| 187 | if constexpr (__converted3 == _Np)
|
|---|
| 188 | return __to_simd_tuple<_To, _Np>(__multiple_return_chunks,
|
|---|
| 189 | __return_chunks2,
|
|---|
| 190 | __return_chunks3);
|
|---|
| 191 | else
|
|---|
| 192 | {
|
|---|
| 193 | using _RetRem3
|
|---|
| 194 | = __remove_cvref_t<decltype(__simd_tuple_pop_front<
|
|---|
| 195 | __return_chunks3.size()
|
|---|
| 196 | * _RetRem2::_S_first_size>(
|
|---|
| 197 | _RetRem2()))>;
|
|---|
| 198 | const auto __return_chunks4 = __convert_all<
|
|---|
| 199 | __vector_type_t<_To, _RetRem3::_S_first_size>, 0,
|
|---|
| 200 | __converted3>(__x.first);
|
|---|
| 201 | constexpr auto __converted4
|
|---|
| 202 | = __converted3
|
|---|
| 203 | + __return_chunks4.size() * _RetRem3::_S_first_size;
|
|---|
| 204 | if constexpr (__converted4 == _Np)
|
|---|
| 205 | return __to_simd_tuple<_To, _Np>(
|
|---|
| 206 | __multiple_return_chunks, __return_chunks2,
|
|---|
| 207 | __return_chunks3, __return_chunks4);
|
|---|
| 208 | else
|
|---|
| 209 | __assert_unreachable<_To>();
|
|---|
| 210 | }
|
|---|
| 211 | }
|
|---|
| 212 | }
|
|---|
| 213 | else
|
|---|
| 214 | {
|
|---|
| 215 | constexpr size_t _NRemain = _Np - _Arg::_S_first_size;
|
|---|
| 216 | _SimdConverter<_From, simd_abi::fixed_size<_NRemain>, _To,
|
|---|
| 217 | simd_abi::fixed_size<_NRemain>>
|
|---|
| 218 | __remainder_cvt;
|
|---|
| 219 | return __simd_tuple_concat(
|
|---|
| 220 | __to_simd_tuple<_To, _Arg::_S_first_size>(
|
|---|
| 221 | __multiple_return_chunks),
|
|---|
| 222 | __remainder_cvt(__x.second));
|
|---|
| 223 | }
|
|---|
| 224 | }
|
|---|
| 225 |
|
|---|
| 226 | // from multiple vectors to one vector
|
|---|
| 227 | // _Arg::_S_first_size < _Ret::_S_first_size
|
|---|
| 228 | // a) heterogeneous input at the end of the tuple (possible with partial
|
|---|
| 229 | // native registers in _Ret)
|
|---|
| 230 | else if constexpr (_Ret::_S_tuple_size == 1
|
|---|
| 231 | && _Np % _Arg::_S_first_size != 0)
|
|---|
| 232 | {
|
|---|
| 233 | static_assert(_Ret::_FirstAbi::template _S_is_partial<_To>);
|
|---|
| 234 | return _Ret{__generate_from_n_evaluations<
|
|---|
| 235 | _Np, typename _VectorTraits<typename _Ret::_FirstType>::type>(
|
|---|
| 236 | [&](auto __i) { return static_cast<_To>(__x[__i]); })};
|
|---|
| 237 | }
|
|---|
| 238 | else
|
|---|
| 239 | {
|
|---|
| 240 | static_assert(_Arg::_S_tuple_size > 1);
|
|---|
| 241 | constexpr auto __n
|
|---|
| 242 | = __div_roundup(_Ret::_S_first_size, _Arg::_S_first_size);
|
|---|
| 243 | return __call_with_n_evaluations<__n>(
|
|---|
| 244 | [&__x](auto... __uncvted) {
|
|---|
| 245 | // assuming _Arg Abi tags for all __i are _Arg::_FirstAbi
|
|---|
| 246 | _SimdConverter<_From, typename _Arg::_FirstAbi, _To,
|
|---|
| 247 | typename _Ret::_FirstAbi>
|
|---|
| 248 | __native_cvt;
|
|---|
| 249 | if constexpr (_Ret::_S_tuple_size == 1)
|
|---|
| 250 | return _Ret{__native_cvt(__uncvted...)};
|
|---|
| 251 | else
|
|---|
| 252 | return _Ret{
|
|---|
| 253 | __native_cvt(__uncvted...),
|
|---|
| 254 | _SimdConverter<
|
|---|
| 255 | _From, simd_abi::fixed_size<_Np - _Ret::_S_first_size>, _To,
|
|---|
| 256 | simd_abi::fixed_size<_Np - _Ret::_S_first_size>>()(
|
|---|
| 257 | __simd_tuple_pop_front<_Ret::_S_first_size>(__x))};
|
|---|
| 258 | },
|
|---|
| 259 | [&__x](auto __i) { return __get_tuple_at<__i>(__x); });
|
|---|
| 260 | }
|
|---|
| 261 | }
|
|---|
| 262 | };
|
|---|
| 263 |
|
|---|
| 264 | // _SimdConverter "native" -> fixed_size<_Np> {{{1
|
|---|
| 265 | // i.e. 1 register to ? registers
|
|---|
| 266 | template <typename _From, typename _Ap, typename _To, int _Np>
|
|---|
| 267 | struct _SimdConverter<_From, _Ap, _To, simd_abi::fixed_size<_Np>,
|
|---|
| 268 | enable_if_t<!__is_fixed_size_abi_v<_Ap>>>
|
|---|
| 269 | {
|
|---|
| 270 | static_assert(
|
|---|
| 271 | _Np == simd_size_v<_From, _Ap>,
|
|---|
| 272 | "_SimdConverter to fixed_size only works for equal element counts");
|
|---|
| 273 |
|
|---|
| 274 | using _Ret = __fixed_size_storage_t<_To, _Np>;
|
|---|
| 275 |
|
|---|
| 276 | _GLIBCXX_SIMD_INTRINSIC constexpr _Ret
|
|---|
| 277 | operator()(typename _SimdTraits<_From, _Ap>::_SimdMember __x) const noexcept
|
|---|
| 278 | {
|
|---|
| 279 | if constexpr (_Ret::_S_tuple_size == 1)
|
|---|
| 280 | return {__vector_convert<typename _Ret::_FirstType::_BuiltinType>(__x)};
|
|---|
| 281 | else
|
|---|
| 282 | {
|
|---|
| 283 | using _FixedNp = simd_abi::fixed_size<_Np>;
|
|---|
| 284 | _SimdConverter<_From, _FixedNp, _To, _FixedNp> __fixed_cvt;
|
|---|
| 285 | using _FromFixedStorage = __fixed_size_storage_t<_From, _Np>;
|
|---|
| 286 | if constexpr (_FromFixedStorage::_S_tuple_size == 1)
|
|---|
| 287 | return __fixed_cvt(_FromFixedStorage{__x});
|
|---|
| 288 | else if constexpr (_FromFixedStorage::_S_tuple_size == 2)
|
|---|
| 289 | {
|
|---|
| 290 | _FromFixedStorage __tmp;
|
|---|
| 291 | static_assert(sizeof(__tmp) <= sizeof(__x));
|
|---|
| 292 | __builtin_memcpy(&__tmp.first, &__x, sizeof(__tmp.first));
|
|---|
| 293 | __builtin_memcpy(&__tmp.second.first,
|
|---|
| 294 | reinterpret_cast<const char*>(&__x)
|
|---|
| 295 | + sizeof(__tmp.first),
|
|---|
| 296 | sizeof(__tmp.second.first));
|
|---|
| 297 | return __fixed_cvt(__tmp);
|
|---|
| 298 | }
|
|---|
| 299 | else
|
|---|
| 300 | __assert_unreachable<_From>();
|
|---|
| 301 | }
|
|---|
| 302 | }
|
|---|
| 303 | };
|
|---|
| 304 |
|
|---|
| 305 | // _SimdConverter fixed_size<_Np> -> "native" {{{1
|
|---|
| 306 | // i.e. ? register to 1 registers
|
|---|
| 307 | template <typename _From, int _Np, typename _To, typename _Ap>
|
|---|
| 308 | struct _SimdConverter<_From, simd_abi::fixed_size<_Np>, _To, _Ap,
|
|---|
| 309 | enable_if_t<!__is_fixed_size_abi_v<_Ap>>>
|
|---|
| 310 | {
|
|---|
| 311 | static_assert(
|
|---|
| 312 | _Np == simd_size_v<_To, _Ap>,
|
|---|
| 313 | "_SimdConverter to fixed_size only works for equal element counts");
|
|---|
| 314 |
|
|---|
| 315 | using _Arg = __fixed_size_storage_t<_From, _Np>;
|
|---|
| 316 |
|
|---|
| 317 | _GLIBCXX_SIMD_INTRINSIC constexpr
|
|---|
| 318 | typename _SimdTraits<_To, _Ap>::_SimdMember
|
|---|
| 319 | operator()(_Arg __x) const noexcept
|
|---|
| 320 | {
|
|---|
| 321 | if constexpr (_Arg::_S_tuple_size == 1)
|
|---|
| 322 | return __vector_convert<__vector_type_t<_To, _Np>>(__x.first);
|
|---|
| 323 | else if constexpr (_Arg::_S_is_homogeneous)
|
|---|
| 324 | return __call_with_n_evaluations<_Arg::_S_tuple_size>(
|
|---|
| 325 | [](auto... __members) {
|
|---|
| 326 | if constexpr ((is_convertible_v<decltype(__members), _To> && ...))
|
|---|
| 327 | return __vector_type_t<_To, _Np>{static_cast<_To>(__members)...};
|
|---|
| 328 | else
|
|---|
| 329 | return __vector_convert<__vector_type_t<_To, _Np>>(__members...);
|
|---|
| 330 | },
|
|---|
| 331 | [&](auto __i) { return __get_tuple_at<__i>(__x); });
|
|---|
| 332 | else if constexpr (__fixed_size_storage_t<_To, _Np>::_S_tuple_size == 1)
|
|---|
| 333 | {
|
|---|
| 334 | _SimdConverter<_From, simd_abi::fixed_size<_Np>, _To,
|
|---|
| 335 | simd_abi::fixed_size<_Np>>
|
|---|
| 336 | __fixed_cvt;
|
|---|
| 337 | return __fixed_cvt(__x).first;
|
|---|
| 338 | }
|
|---|
| 339 | else
|
|---|
| 340 | {
|
|---|
| 341 | const _SimdWrapper<_From, _Np> __xv
|
|---|
| 342 | = __generate_from_n_evaluations<_Np, __vector_type_t<_From, _Np>>(
|
|---|
| 343 | [&](auto __i) { return __x[__i]; });
|
|---|
| 344 | return __vector_convert<__vector_type_t<_To, _Np>>(__xv);
|
|---|
| 345 | }
|
|---|
| 346 | }
|
|---|
| 347 | };
|
|---|
| 348 |
|
|---|
| 349 | // }}}1
|
|---|
| 350 | _GLIBCXX_SIMD_END_NAMESPACE
|
|---|
| 351 | #endif // __cplusplus >= 201703L
|
|---|
| 352 | #endif // _GLIBCXX_EXPERIMENTAL_SIMD_CONVERTER_H_
|
|---|
| 353 |
|
|---|
| 354 | // vim: foldmethod=marker sw=2 noet ts=8 sts=2 tw=80
|
|---|