| #include <ATen/native/UnaryOps.h> |
| |
| #include <cmath> |
| #include <limits> |
| #include <type_traits> |
| |
| #include <ATen/CPUGeneratorImpl.h> |
| #include <ATen/Config.h> |
| #include <ATen/Dispatch.h> |
| #include <ATen/Generator.h> |
| #include <ATen/Parallel.h> |
| #include <ATen/Utils.h> |
| #include <ATen/core/DistributionsHelper.h> |
| #include <ATen/cpu/vec/functional.h> |
| #include <ATen/cpu/vec/vec.h> |
| #include <ATen/cpu/vml.h> |
| #include <ATen/native/Distributions.h> |
| #include <ATen/native/TensorFactories.h> |
| #include <ATen/native/TensorIterator.h> |
| #include <ATen/native/cpu/DistributionTemplates.h> |
| #include <ATen/native/cpu/Loops.h> |
| #include <ATen/native/cpu/zmath.h> |
| #include <c10/util/MathConstants.h> |
| |
| #if AT_MKL_ENABLED() |
| #include <mkl.h> |
| #include <cpuinfo.h> |
| #endif |
| |
| namespace at { |
| namespace native { |
| |
| namespace CPU_CAPABILITY { |
| |
| using namespace vec; |
| |
| static void sigmoid_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES_AND1(kBFloat16, iter.common_dtype(), "sigmoid_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return (static_cast<scalar_t>(1) / (static_cast<scalar_t>(1) + std::exp((-a)))); }, |
| [=](Vectorized<scalar_t> a) { |
| a = Vectorized<scalar_t>(static_cast<scalar_t>(0)) - a; |
| a = a.exp(); |
| a = Vectorized<scalar_t>(static_cast<scalar_t>(1)) + a; |
| a = a.reciprocal(); |
| return a; |
| }); |
| }); |
| } |
| |
| #if AT_MKL_ENABLED() |
| |
| template <typename T> |
| void VmlLog(int64_t N, const T* X, T* Y) { |
| constexpr int64_t K = Vectorized<T>::size(); |
| at::parallel_for(0, N, K, [=](int64_t begin, int64_t end) { |
| using VT = vec::vec_scalar_t<T>; |
| vec::map( |
| [](Vectorized<VT> x_vec) { return x_vec.log(); }, |
| Y + begin, |
| X + begin, |
| end - begin); |
| }); |
| } |
| |
| template <> |
| void VmlLog<float>(int64_t N, const float* X, float* Y) { |
| vsLn(N, X, Y); |
| } |
| |
| template <> |
| void VmlLog<double>(int64_t N, const double* X, double* Y) { |
| vdLn(N, X, Y); |
| } |
| |
| template <typename T> |
| void LogitMKLKernel(T eps, TensorIteratorBase* it) { |
| if (!it->can_use_32bit_indexing()) { |
| for (auto& sub_it : it->with_32bit_indexing()) { |
| LogitMKLKernel<T>(eps, &sub_it); |
| } |
| return; |
| } |
| |
| constexpr int64_t K = Vectorized<T>::size(); |
| const int64_t N = it->numel(); |
| const T* X_data = static_cast<T*>(it->data_ptr(1)); |
| T* Y_data = static_cast<T*>(it->data_ptr(0)); |
| if (eps < T(0)) { |
| at::parallel_for(0, N, K, [=](int64_t begin, int64_t end) { |
| for (int64_t i = begin; i < end; ++i) { |
| Y_data[i] = X_data[i] == T(1) ? std::numeric_limits<T>::infinity() |
| : X_data[i] / (T(1) - X_data[i]); |
| } |
| VmlLog<T>(end - begin, Y_data + begin, Y_data + begin); |
| }); |
| } else { |
| const T lo = eps; |
| const T hi = T(1) - eps; |
| at::parallel_for(0, N, K, [=](int64_t begin, int64_t end) { |
| for (int64_t i = begin; i < end; ++i) { |
| const T x = X_data[i] < lo ? lo : (X_data[i] > hi ? hi : X_data[i]); |
| Y_data[i] = |
| x == T(1) ? std::numeric_limits<T>::infinity() : (x / (T(1) - x)); |
| } |
| VmlLog<T>(end - begin, Y_data + begin, Y_data + begin); |
| }); |
| } |
| } |
| |
| #else |
| |
| template <typename T> |
| void LogitMKLKernel(T eps, TensorIteratorBase* it) { |
| TORCH_CHECK(false, "ATen not compiled with MKL"); |
| } |
| |
| #endif // AT_MKL_ENABLED |
| |
| void logit_kernel(TensorIteratorBase& iter, const Scalar& eps_scalar) { |
| AT_DISPATCH_FLOATING_TYPES_AND( |
| kBFloat16, iter.common_dtype(), "logit_cpu", [&]() { |
| const scalar_t eps = eps_scalar.to<scalar_t>(); |
| if (at::hasMKL() && iter.is_contiguous()) { |
| LogitMKLKernel<scalar_t>(eps, &iter); |
| } else if (eps < scalar_t(0)) { |
| const Vectorized<scalar_t> kOneVec(scalar_t(1)); |
| cpu_kernel_vec( |
| iter, |
| [](scalar_t x) { |
| return x == scalar_t(1) |
| ? std::numeric_limits<scalar_t>::infinity() |
| : std::log(x / (scalar_t(1) - x)); |
| }, |
| [kOneVec](Vectorized<scalar_t> x_vec) { |
| return (x_vec / (kOneVec - x_vec)).log(); |
| }); |
| } else { |
| const scalar_t lo = eps; |
| const scalar_t hi = scalar_t(1) - eps; |
| const Vectorized<scalar_t> kOneVec(scalar_t(1)); |
| const Vectorized<scalar_t> lo_vec(lo); |
| const Vectorized<scalar_t> hi_vec(hi); |
| cpu_kernel_vec( |
| iter, |
| [lo, hi](scalar_t x) { |
| x = x < lo ? lo : (x > hi ? hi : x); |
| return x == scalar_t(1) |
| ? std::numeric_limits<scalar_t>::infinity() |
| : std::log(x / (scalar_t(1) - x)); |
| }, |
| [kOneVec, lo_vec, hi_vec](Vectorized<scalar_t> x_vec) { |
| x_vec = vec::clamp(x_vec, lo_vec, hi_vec); |
| return (x_vec / (kOneVec - x_vec)).log(); |
| }); |
| } |
| }); |
| } |
| |
| static void abs_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_ALL_TYPES_AND_COMPLEX_AND2(kBFloat16, kHalf, iter.dtype(), "abs_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return abs_impl(a); }, |
| [=](Vectorized<scalar_t> a) { return a.abs(); }); |
| }); |
| } |
| |
| static void angle_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES_AND2(kBFloat16, kHalf, iter.common_dtype(), "angle_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return angle_impl(a); }, |
| [=](Vectorized<scalar_t> a) { return a.angle(); }); |
| }); |
| } |
| |
| static void real_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_ALL_TYPES_AND_COMPLEX_AND2(kBFloat16, kHalf, iter.dtype(), "real_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return real_impl(a); }, |
| [=](Vectorized<scalar_t> a) { return a.real(); }); |
| }); |
| } |
| |
| static void imag_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_ALL_TYPES_AND_COMPLEX_AND2(kBFloat16, kHalf, iter.dtype(), "imag_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return imag_impl(a); }, |
| [=](Vectorized<scalar_t> a) { return a.imag(); }); |
| }); |
| } |
| |
| // NB: Ignores the negative bit on tensors |
| static void conj_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_ALL_TYPES_AND_COMPLEX_AND3( |
| kBool, kBFloat16, kHalf, iter.common_dtype(), "conj_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return conj_impl(a); }, |
| [=](Vectorized<scalar_t> a) { return a.conj(); }); |
| }); |
| } |
| |
| static void bitwise_not_kernel(TensorIteratorBase& iter) { |
| if (iter.dtype() == ScalarType::Bool) { |
| // Boolean type does not work with ~ (bitwise NOT) in C++. bitwise_not wraps this operation for both Boolean and |
| // integral types. |
| cpu_kernel( |
| iter, |
| [](bool a) { |
| return !a; |
| }); |
| } else { |
| AT_DISPATCH_INTEGRAL_TYPES(iter.dtype(), "bitwise_not_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [](scalar_t a) -> scalar_t { |
| return ~a; |
| }, |
| [](Vectorized<scalar_t> a) -> Vectorized<scalar_t> { |
| return ~a; |
| }); |
| }); |
| } |
| } |
| |
| void frac_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_TYPES_AND2(kBFloat16, kHalf, iter.dtype(), "frac_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return a - std::trunc(a); }, |
| [=](Vectorized<scalar_t> a) { return a.frac(); }); |
| }); |
| } |
| |
| void logical_not_kernel(TensorIteratorBase& iter) { |
| // NOTE: this implementation differs from the CUDA implementation which only does single dispatch |
| // (to avoid expensive compilation) because CPU kernels don't handle dynamic_casting |
| // (see needs_dynamic_casting). |
| AT_DISPATCH_ALL_TYPES_AND_COMPLEX_AND3(kBool, kHalf, kBFloat16, iter.dtype(1), "logical_not_cpu", [&]() { |
| using self_t = scalar_t; |
| AT_DISPATCH_ALL_TYPES_AND_COMPLEX_AND3(kBool, kHalf, kBFloat16, iter.dtype(0), "logical_not_cpu", [&]() { |
| cpu_kernel(iter, [](self_t a) -> scalar_t { return static_cast<scalar_t>(!a); }); |
| }); |
| }); |
| } |
| |
| void reciprocal_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES_AND2(kBFloat16, kHalf, iter.common_dtype(), "reciprocal_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) __ubsan_ignore_float_divide_by_zero__ -> scalar_t { return static_cast<scalar_t>(1.0) / a; }, |
| [=](Vectorized<scalar_t> a) { return a.reciprocal(); }); |
| }); |
| } |
| |
| // NB: Ignores the negative bit on tensors |
| void neg_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_ALL_TYPES_AND_COMPLEX_AND2(kBFloat16, kHalf, iter.dtype(), "neg_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return -a; }, |
| [=](Vectorized<scalar_t> a) { return a.neg(); }); |
| }); |
| } |
| |
| void sign_kernel(TensorIteratorBase& iter){ |
| if(iter.dtype() == ScalarType::Bool){ |
| cpu_kernel(iter, [=](bool x) -> bool { return x; }); |
| } else { |
| AT_DISPATCH_ALL_TYPES_AND2(kBFloat16, ScalarType::Half, iter.dtype(), "sign_cpu", [&]() { |
| auto zero_vec = Vectorized<scalar_t>(static_cast<scalar_t>(0)); |
| auto one_vec = Vectorized<scalar_t>(static_cast<scalar_t>(1)); |
| |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return (0 < a) - (a < 0); }, |
| [=](Vectorized<scalar_t> self_vec){ |
| |
| // Comparison operators returns bitmask. |
| auto left = Vectorized<scalar_t>::blendv(zero_vec, one_vec, zero_vec < self_vec); |
| auto right = Vectorized<scalar_t>::blendv(zero_vec, one_vec, self_vec < zero_vec); |
| |
| return left - right; |
| }); |
| }); |
| } |
| } |
| |
| static void signbit_kernel(TensorIteratorBase& iter){ |
| AT_DISPATCH_ALL_TYPES_AND2(kBFloat16, ScalarType::Half, iter.input_dtype(), "signbit_cpu", [&]() { |
| cpu_kernel(iter, [](scalar_t a) -> bool { return a < 0; }); |
| }); |
| } |
| |
| static void sgn_kernel(TensorIteratorBase& iter){ |
| AT_DISPATCH_COMPLEX_TYPES(iter.dtype(), "sgn_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return sgn_impl(a); }, |
| [=](Vectorized<scalar_t> a) { return a.sgn(); }); |
| }); |
| } |
| |
| static void sinc_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES_AND1(kBFloat16, iter.common_dtype(), "sinc_cpu", [&]() { |
| cpu_kernel( |
| iter, |
| [=](scalar_t a) -> scalar_t { |
| if (a == scalar_t(0)) { |
| return scalar_t(1); |
| } else { |
| scalar_t product = c10::pi<scalar_t> * a; |
| return std::sin(product) / product; |
| } |
| }); |
| }); |
| } |
| |
| static void sinh_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES(iter.dtype(), "sinh_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return std::sinh(a); }, |
| [=](Vectorized<scalar_t> self_vec){return self_vec.sinh();}); |
| }); |
| } |
| |
| static void cosh_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES(iter.dtype(), "cosh_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) -> scalar_t { return std::cosh(a); }, |
| [=](Vectorized<scalar_t> self_vec){return self_vec.cosh();}); |
| }); |
| } |
| |
| static void acosh_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES(iter.dtype(), "acosh_cpu", [&]() { |
| cpu_kernel( |
| iter, |
| [=](scalar_t a) -> scalar_t { return std::acosh(a); }); |
| }); |
| } |
| |
| static void asinh_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES(iter.dtype(), "asinh_cpu", [&]() { |
| cpu_kernel( |
| iter, |
| [=](scalar_t a) -> scalar_t { return std::asinh(a); }); |
| }); |
| } |
| |
| static void atanh_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES(iter.dtype(), "atanh_cpu", [&]() { |
| cpu_kernel( |
| iter, |
| [=](scalar_t a) -> scalar_t { return std::atanh(a); }); |
| }); |
| } |
| |
| static void digamma_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_TYPES(iter.common_dtype(), "digamma", [&]() { |
| cpu_kernel( |
| iter, |
| [=](scalar_t a) -> scalar_t { return calc_digamma(a); }); |
| }); |
| } |
| |
| static void trigamma_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_TYPES(iter.dtype(), "trigamma", [&]() { |
| cpu_kernel( |
| iter, |
| [=](scalar_t a) -> scalar_t { return trigamma(a); }); |
| }); |
| } |
| |
| static void exp2_kernel(TensorIteratorBase& iter) { |
| // Supports only floating types as std::exp2 doesn't have |
| // complex overloads. |
| AT_DISPATCH_FLOATING_TYPES_AND(kHalf, iter.dtype(), "exp2", [&]() { |
| cpu_kernel( |
| iter, |
| [=](scalar_t a) -> scalar_t { return std::exp2(a); }); |
| }); |
| } |
| |
| static void polygamma_kernel(TensorIteratorBase& iter, int64_t n) { |
| if (n == 0) { |
| digamma_kernel(iter); |
| } else if (n == 1) { |
| trigamma_kernel(iter); |
| } else { |
| AT_DISPATCH_FLOATING_TYPES(iter.dtype(), "polygamma", [&]() { |
| cpu_kernel( |
| iter, [=](scalar_t a) -> scalar_t { return calc_polygamma(n, a); }); |
| }); |
| } |
| } |
| |
| static void nan_to_num_kernel( |
| TensorIteratorBase& iter, |
| c10::optional<double> nan, |
| c10::optional<double> pos_inf, |
| c10::optional<double> neg_inf) { |
| AT_DISPATCH_FLOATING_TYPES_AND(kHalf, iter.dtype(), "nan_to_num", [&]() { |
| scalar_t nan_replacement = static_cast<scalar_t>(nan.value_or(0.)); |
| scalar_t pos_inf_replacement = pos_inf.has_value() |
| ? static_cast<scalar_t>(pos_inf.value()) |
| : std::numeric_limits<scalar_t>::max(); |
| scalar_t neg_inf_replacement = neg_inf.has_value() |
| ? static_cast<scalar_t>(neg_inf.value()) |
| : std::numeric_limits<scalar_t>::lowest(); |
| |
| cpu_kernel(iter, [=](scalar_t a) -> scalar_t { |
| return ( |
| at::_isnan(a) |
| ? nan_replacement |
| : (a == std::numeric_limits<scalar_t>::infinity() |
| ? pos_inf_replacement |
| : (a == -std::numeric_limits<scalar_t>::infinity() |
| ? neg_inf_replacement |
| : a))); |
| }); |
| }); |
| } |
| |
| static void kaiser_window_kernel(TensorIteratorBase& iter, int64_t window_length, double beta){ |
| AT_DISPATCH_FLOATING_TYPES_AND(kBFloat16, iter.dtype(), "kaiser_window_cpu", [&](){ |
| const scalar_t alpha = static_cast<scalar_t>((window_length - 1) / 2.0); |
| cpu_kernel(iter, [=](scalar_t a){ |
| return calc_i0(static_cast<scalar_t>(beta) * std::sqrt(1 - std::pow((a - alpha) / alpha, static_cast<scalar_t>(2.0)))) / calc_i0(static_cast<scalar_t>(beta)); |
| }); |
| }); |
| } |
| |
| static void cauchy_kernel(TensorIteratorBase& iter, double median, double sigma, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::cauchy_kernel(iter, median, sigma, generator); |
| } |
| |
| void bernoulli_tensor_kernel(Tensor& self, const Tensor& p_, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::bernoulli_kernel(self, p_, generator); |
| } |
| |
| void bernoulli_scalar_kernel_default(Tensor& self, double p, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::bernoulli_kernel(self, p, generator); |
| } |
| |
| #if !AT_MKL_ENABLED() |
| void bernoulli_scalar_kernel(Tensor& self, double p, c10::optional<Generator> gen) { |
| bernoulli_scalar_kernel_default(self, p, gen); |
| } |
| #else |
| void bernoulli_scalar_kernel(Tensor &self, double p, c10::optional<Generator> gen) { |
| if (cpuinfo_initialize() && cpuinfo_vendor_intel == cpuinfo_get_processor(0)->core->vendor) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| int64_t seed; |
| { |
| // See Note [Acquire lock when using random generators] |
| std::lock_guard<std::mutex> lock(generator->mutex_); |
| seed = generator->random(); |
| } |
| int64_t n = self.numel(); |
| bool contig = self.is_contiguous(); |
| |
| AT_DISPATCH_ALL_TYPES_AND(at::ScalarType::Bool, self.scalar_type(), "bernoulli_scalar_cpu_", [&] { |
| at::Tensor tmp_int_tensor; |
| if (std::is_same<scalar_t, int>::value && contig) { |
| tmp_int_tensor = self; |
| } else { |
| tmp_int_tensor = at::empty(self.sizes(), self.options().dtype(at::kInt)); |
| } |
| |
| scalar_t *self_ptr = self.data_ptr<scalar_t>(); |
| int *sample_int_ptr = tmp_int_tensor.data_ptr<int>(); |
| |
| auto sample = [&](int64_t begin, int64_t end) { |
| int64_t len = end - begin; |
| if (len > 0) { |
| VSLStreamStatePtr stream; |
| vslNewStream(&stream, VSL_BRNG_MCG31, seed); |
| vslSkipAheadStream(stream, begin); |
| viRngBernoulli(VSL_RNG_METHOD_BERNOULLI_ICDF, stream, len, |
| sample_int_ptr + begin, p); |
| vslDeleteStream(&stream); |
| |
| // vectorized copy if using buffer and contiguous, i.e., being non-int |
| // type and contiguous |
| if (!std::is_same<scalar_t, int>::value && contig) { |
| scalar_t *self_seg = self_ptr + begin; |
| int* tmp_seg = sample_int_ptr + begin; |
| at::vec::convert<int, scalar_t>(tmp_seg, self_seg, len); |
| } |
| } |
| }; |
| |
| parallel_for(0, n, /* grain_size= */ 800, sample); |
| |
| // copy_ if using buffer and non contiguous |
| if (!contig) { |
| self.copy_(tmp_int_tensor); |
| } |
| }); |
| } else { |
| // The situation of AMD, move to using the default version |
| bernoulli_scalar_kernel_default(self, p, gen); |
| } |
| } |
| #endif |
| |
| static void exponential_kernel(TensorIteratorBase& iter, double lambda, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::exponential_kernel(iter, lambda, generator); |
| } |
| |
| static void geometric_kernel(TensorIteratorBase& iter, double p, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::geometric_kernel(iter, p, generator); |
| } |
| |
| static void log_normal_kernel(TensorIteratorBase& iter, double mean, double std, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::log_normal_kernel(iter, mean, std, generator); |
| } |
| |
| void uniform_kernel(TensorIteratorBase& iter, double from, double to, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::uniform_kernel(iter, from, to, generator); |
| } |
| |
| void normal_kernel(Tensor& self, double mean, double std, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::normal_kernel(self, mean, std, generator); |
| } |
| |
| static void random_from_to_kernel(TensorIteratorBase& iter, uint64_t range, int64_t base, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::random_from_to_kernel(iter, range, base, generator); |
| } |
| |
| static void random_kernel(TensorIteratorBase& iter, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::random_kernel(iter, generator); |
| } |
| |
| // This is the special kernel to handle single specific case: |
| // from(inclusive) = std::numeric_limits<int64_t>::lowest() |
| // to(exclusive) = None (= std::numeric_limits<int64_t>::max() + 1) |
| static void random_full_64_bits_range_kernel(TensorIteratorBase& iter, c10::optional<Generator> gen) { |
| CPUGeneratorImpl* generator = get_generator_or_default<CPUGeneratorImpl>(gen, detail::getDefaultCPUGenerator()); |
| templates::cpu::random_full_64_bits_range_kernel(iter, generator); |
| } |
| |
| void rsqrt_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES_AND1(kBFloat16, iter.common_dtype(), "rsqrt_cpu", [&] { |
| cpu_kernel_vec( |
| iter, |
| [=](scalar_t a) __ubsan_ignore_float_divide_by_zero__ -> scalar_t { |
| return (static_cast<scalar_t>(1)) / std::sqrt(a); |
| }, |
| [=](Vectorized<scalar_t> a) { return a.rsqrt(); }); |
| }); |
| } |
| |
| static void entr_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_TYPES_AND( |
| kBFloat16, iter.common_dtype(), "entr_cpu", [&] { |
| cpu_kernel(iter, [](scalar_t x) -> scalar_t { |
| if (at::_isnan(x)) { |
| return x; |
| } else if (x > 0) { |
| return -x * std::log(x); |
| } else if (x == 0) { |
| return static_cast<scalar_t>(0); |
| } |
| return static_cast<scalar_t>(-INFINITY); |
| }); |
| }); |
| } |
| |
| static void frexp_kernel(TensorIteratorBase& iter) { |
| AT_DISPATCH_FLOATING_TYPES_AND(kHalf, |
| // The iter.dtype() here is the dtype of mantissa output. |
| // It's a floating point type and must be the same as the input's dtype. |
| iter.dtype(), |
| "frexp_cpu", [&]() { |
| cpu_kernel_multiple_outputs( |
| iter, |
| [](scalar_t a) -> std::tuple<scalar_t, int32_t> { |
| int32_t exponent; |
| scalar_t mantissa = std::frexp(a, &exponent); |
| return std::tuple<scalar_t, int32_t>(mantissa, exponent); |
| } |
| ); |
| }); |
| } |
| |
| static void ndtri_kernel(TensorIteratorBase& iter) { |
| TORCH_INTERNAL_ASSERT(iter.ntensors() == 2); |
| AT_DISPATCH_FLOATING_TYPES(iter.common_dtype(), "ndtri_cpu", [&]() { |
| cpu_kernel(iter, [](scalar_t x) { return calc_ndtri(x); }); |
| }); |
| } |
| |
| static void i0e_kernel(TensorIteratorBase& iter) { |
| TORCH_INTERNAL_ASSERT(iter.ntensors() == 2); |
| AT_DISPATCH_FLOATING_TYPES_AND( |
| kBFloat16, iter.common_dtype(), "i0e_cpu", [&]() { |
| cpu_kernel_vec( |
| iter, |
| [](scalar_t x) { return calc_i0e(x); }, |
| [](Vectorized<scalar_t> x) { return x.i0e(); }); |
| }); |
| } |
| |
| static void i1_kernel(TensorIteratorBase& iter) { |
| TORCH_INTERNAL_ASSERT(iter.ntensors() == 2); |
| AT_DISPATCH_FLOATING_TYPES(iter.common_dtype(), "i1_cpu", [&]() { |
| cpu_kernel(iter, [](scalar_t x) { return calc_i1(x); }); |
| }); |
| } |
| |
| static void i1e_kernel(TensorIteratorBase& iter) { |
| TORCH_INTERNAL_ASSERT(iter.ntensors() == 2); |
| AT_DISPATCH_FLOATING_TYPES(iter.common_dtype(), "i1e_cpu", [&]() { |
| cpu_kernel(iter, [](scalar_t x) { return calc_i1e(x); }); |
| }); |
| } |
| |
| static void erfcx_kernel(TensorIteratorBase& iter){ |
| AT_DISPATCH_FLOATING_TYPES(iter.common_dtype(), "erfcx_cpu", [&]() { |
| cpu_kernel( |
| iter, |
| [](scalar_t a) -> scalar_t { return calc_erfcx(a); }); |
| }); |
| } |
| |
| // TODO: Disable cont. branch to test more risky code |
| |
| #define IMPLEMENT_ITERATOR_LAMBDA(op) \ |
| [&](char** data_, const int64_t* strides, int64_t n) { \ |
| scalar_t* out_data = reinterpret_cast<scalar_t*>(data_[0]); \ |
| scalar_t* in_data = reinterpret_cast<scalar_t*>(data_[1]); \ |
| int64_t out_stride = strides[0] / sizeof(scalar_t); \ |
| int64_t in_stride = strides[1] / sizeof(scalar_t); \ |
| if (out_stride == 1 && in_stride == 1) { \ |
| vml::v##op(out_data, in_data, n); \ |
| } else { \ |
| static constexpr int64_t WIDTH = 131072 / sizeof(scalar_t); \ |
| for (int64_t i = 0; i < n; i += WIDTH) { \ |
| scalar_t buffer[WIDTH]; \ |
| int64_t width = WIDTH; \ |
| width = std::min(width, n - i); \ |
| for (int64_t j = 0; j < width; j++) \ |
| buffer[j] = in_data[in_stride * (i + j)]; \ |
| vml::v##op(buffer, buffer, width); \ |
| for (int64_t j = 0; j < width; j++) \ |
| out_data[out_stride * (i + j)] = buffer[j]; \ |
| } \ |
| } \ |
| } |
| |
| #define IMPLEMENT_FLOAT_KERNEL(op) \ |
| namespace CPU_CAPABILITY { \ |
| void op##_kernel(TensorIteratorBase& iter) { \ |
| TORCH_INTERNAL_ASSERT(iter.ntensors() == 2); \ |
| AT_DISPATCH_FLOATING_TYPES_AND(kBFloat16, iter.dtype(), #op "_vml_cpu", [&]() { \ |
| iter.serial_for_each( \ |
| IMPLEMENT_ITERATOR_LAMBDA(op), \ |
| {0, iter.numel()}); \ |
| }); \ |
| iter.cast_outputs(); \ |
| } \ |
| } \ |
| REGISTER_DISPATCH(op##_stub, &CPU_CAPABILITY::op##_kernel) |
| |
| #define IMPLEMENT_COMPLEX_KERNEL(op) \ |
| namespace CPU_CAPABILITY { \ |
| void op##_kernel(TensorIteratorBase& iter) { \ |
| TORCH_INTERNAL_ASSERT(iter.ntensors() == 2); \ |
| AT_DISPATCH_FLOATING_AND_COMPLEX_TYPES_AND1(kBFloat16, iter.dtype(), #op "_vml_cpu", [&]() { \ |
| iter.serial_for_each( \ |
| IMPLEMENT_ITERATOR_LAMBDA(op), \ |
| {0, iter.numel()}); \ |
| }); \ |
| iter.cast_outputs(); \ |
| } \ |
| } \ |
| REGISTER_DISPATCH(op##_stub, &CPU_CAPABILITY::op##_kernel) |
| |
| } // CPU_CAPABILITY namespace |
| |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(rsqrt_stub, &CPU_CAPABILITY::rsqrt_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(sigmoid_stub, &CPU_CAPABILITY::sigmoid_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(logit_stub, &CPU_CAPABILITY::logit_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(bernoulli_tensor_stub, &CPU_CAPABILITY::bernoulli_tensor_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(bernoulli_scalar_stub, &CPU_CAPABILITY::bernoulli_scalar_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(cauchy_stub, &CPU_CAPABILITY::cauchy_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(exponential_stub, &CPU_CAPABILITY::exponential_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(geometric_stub, &CPU_CAPABILITY::geometric_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(log_normal_stub, &CPU_CAPABILITY::log_normal_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(normal_stub, &CPU_CAPABILITY::normal_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(uniform_stub, &CPU_CAPABILITY::uniform_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(random_from_to_stub, &CPU_CAPABILITY::random_from_to_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(random_full_64_bits_range_stub, &CPU_CAPABILITY::random_full_64_bits_range_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(random_stub, &CPU_CAPABILITY::random_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(abs_stub, &CPU_CAPABILITY::abs_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(angle_stub, &CPU_CAPABILITY::angle_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(real_stub, &CPU_CAPABILITY::real_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(imag_stub, &CPU_CAPABILITY::imag_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(conj_physical_stub, &CPU_CAPABILITY::conj_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(exp2_stub, &CPU_CAPABILITY::exp2_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(bitwise_not_stub, &CPU_CAPABILITY::bitwise_not_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(logical_not_stub, &CPU_CAPABILITY::logical_not_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(frac_stub, &CPU_CAPABILITY::frac_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(reciprocal_stub, &CPU_CAPABILITY::reciprocal_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(nan_to_num_stub, &CPU_CAPABILITY::nan_to_num_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(neg_stub, &CPU_CAPABILITY::neg_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(sign_stub, &CPU_CAPABILITY::sign_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(signbit_stub, &CPU_CAPABILITY::signbit_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(sgn_stub, &CPU_CAPABILITY::sgn_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(sinc_stub, &CPU_CAPABILITY::sinc_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(sinh_stub, &CPU_CAPABILITY::sinh_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(cosh_stub, &CPU_CAPABILITY::cosh_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(acosh_stub, &CPU_CAPABILITY::acosh_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(asinh_stub, &CPU_CAPABILITY::asinh_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(atanh_stub, &CPU_CAPABILITY::atanh_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(digamma_stub, &CPU_CAPABILITY::digamma_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(trigamma_stub, &CPU_CAPABILITY::trigamma_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(polygamma_stub, &CPU_CAPABILITY::polygamma_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(kaiser_window_stub, &CPU_CAPABILITY::kaiser_window_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(special_entr_stub, &CPU_CAPABILITY::entr_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(frexp_stub, &CPU_CAPABILITY::frexp_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(special_i0e_stub, &CPU_CAPABILITY::i0e_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(special_ndtri_stub, &CPU_CAPABILITY::ndtri_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(special_i1_stub, &CPU_CAPABILITY::i1_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(special_i1e_stub, &CPU_CAPABILITY::i1e_kernel); |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables) |
| REGISTER_DISPATCH(special_erfcx_stub, &CPU_CAPABILITY::erfcx_kernel); |
| |
| |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(acos) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(asin) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(atan) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(ceil) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(cos) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(erf) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(erfc) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(erfinv) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(exp) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(expm1) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(floor) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(log) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(log10) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(log1p) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(log2) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(i0) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(round) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(sin) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(sqrt) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(tan) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_COMPLEX_KERNEL(tanh) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(trunc) |
| // NOLINTNEXTLINE(cppcoreguidelines-avoid-non-const-global-variables,modernize-avoid-c-arrays,cppcoreguidelines-avoid-c-arrays) |
| IMPLEMENT_FLOAT_KERNEL(lgamma) |
| |
| } // namespace native |
| } // namespace at |
