Files
2026-07-13 12:40:42 +08:00

285 lines
9.1 KiB
Plaintext

// Copyright (c) 2025 PaddlePaddle Authors. All Rights Reserved.
//
// 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.
#if defined(PADDLE_WITH_CUDA) || defined(PADDLE_WITH_HIP)
#include "paddle/common/flags.h"
#include "paddle/phi/backends/gpu/gpu_context.h"
#include "paddle/phi/core/kernel_registry.h"
#include "paddle/phi/core/visit_type.h"
#include "paddle/phi/kernels/as_strided_kernel.h"
#include "paddle/phi/kernels/contiguous_kernel.h"
#include "paddle/phi/kernels/funcs/elementwise_base.h"
#include "paddle/phi/kernels/funcs/elementwise_functor.h"
#include "paddle/phi/kernels/reduce_nansum_grad_kernel.h"
#include "paddle/phi/kernels/reduce_sum_grad_kernel.h"
#include "paddle/phi/kernels/unsqueeze_kernel.h"
COMMON_DECLARE_bool(use_stride_kernel);
COMMON_DECLARE_bool(use_stride_compute_kernel);
namespace phi {
template <typename Context>
DenseTensor Tensor2Contiguous(const Context& dev_ctx,
const DenseTensor& tensor) {
DenseTensor dense_out;
MetaTensor meta_input(tensor);
MetaTensor meta_out(&dense_out);
UnchangedInferMeta(meta_input, &meta_out);
PD_VISIT_ALL_TYPES(tensor.dtype(), "Tensor2Contiguous", ([&] {
ContiguousKernel<data_t, Context>(
dev_ctx, tensor, &dense_out);
}));
return dense_out;
}
template <typename Context>
DenseTensor CheckMultipleUnsqueeze(const Context& dev_ctx,
const DenseTensor& out_grad,
const IntArray& dims,
const int ndim,
bool keep_dim) {
DenseTensor res = out_grad;
if (dims.size() == 0 || keep_dim || ndim == 0) return res;
std::vector<bool> axes(ndim, false);
for (int i = 0; i < dims.size(); i++) {
int tmp_dim = dims[i] >= 0 ? dims[i] : ndim + dims[i];
axes[tmp_dim] = true;
}
for (int i = 0; i < axes.size(); i++) {
DenseTensor tmp;
if (axes[i]) {
UnsqueezeStridedKernel(dev_ctx, res, IntArray({i}), &tmp);
res = tmp;
}
}
return res;
}
void ExpandStrideKernel(const std::vector<int64_t>& self_dims,
const std::vector<int64_t>& self_strides,
const std::vector<int64_t>& expand_sizes,
std::vector<int64_t>* out_dims,
std::vector<int64_t>* out_strides) {
int64_t ndim = static_cast<int64_t>(expand_sizes.size());
int64_t tensor_dim = static_cast<int64_t>(self_dims.size());
if (tensor_dim == 0) {
*out_dims = expand_sizes;
*out_strides = std::vector<int64_t>(ndim, 0);
return;
}
std::vector<int64_t> expandedSizes(ndim, 0);
std::vector<int64_t> expandedStrides(ndim, 0);
for (int64_t i = ndim - 1; i >= 0; --i) {
int64_t offset = ndim - 1 - i;
int64_t dim = tensor_dim - 1 - offset;
int64_t size = (dim >= 0) ? self_dims[dim] : 1;
int64_t stride = (dim >= 0) ? self_strides[dim]
: expandedSizes[i + 1] * expandedStrides[i + 1];
int64_t targetSize = expand_sizes[i];
if (targetSize == -1) {
targetSize = size;
}
if (size != targetSize) {
size = targetSize;
stride = 0;
}
expandedSizes[i] = size;
expandedStrides[i] = stride;
}
*out_dims = expandedSizes;
*out_strides = expandedStrides;
}
template <typename T, typename Context>
void ReduceSumGradStrideKernel(const Context& dev_ctx,
const DenseTensor& x,
const DenseTensor& out_grad,
const IntArray& dims,
bool keep_dim,
bool reduce_all,
DenseTensor* x_grad) {
if (!FLAGS_use_stride_kernel) {
PADDLE_THROW(common::errors::Fatal(
"FLAGS_use_stride_kernel is closed. Strided kernel "
"be called, something wrong has happened!"));
}
DenseTensor out_grad_;
bool invalid = false;
std::vector<int64_t> out_dims;
std::vector<int64_t> out_strides;
if ((!FLAGS_use_stride_compute_kernel) || !(out_grad.dims().size() > 0) ||
(out_grad.dtype() != x.dtype())) {
invalid = true;
}
if (!invalid) {
DenseTensor out_tmp = CheckMultipleUnsqueeze<Context>(
dev_ctx, out_grad, dims, x.dims().size(), keep_dim);
ExpandStrideKernel(vectorize<int64_t>(out_tmp.dims()),
vectorize<int64_t>(out_tmp.strides()),
vectorize<int64_t>(x.dims()),
&out_dims,
&out_strides);
invalid = std::find(out_strides.begin(), out_strides.end(), 0) !=
out_strides.end();
}
if (!invalid) {
auto meta = out_grad.meta();
meta.dims = DDim(out_dims.data(), static_cast<int>(out_dims.size()));
meta.strides =
DDim(out_strides.data(), static_cast<int>(out_strides.size()));
x_grad->set_meta(meta);
x_grad->ResetHolder(out_grad.Holder());
x_grad->ShareInplaceVersionCounterWith(out_grad);
return;
}
// if x is contiguous is not relevant to sum_grad computation
if (!out_grad.meta().is_contiguous()) {
out_grad_ = Tensor2Contiguous<Context>(dev_ctx, out_grad);
} else {
out_grad_ = out_grad;
}
auto x_grad_meta = x_grad->meta();
x_grad_meta.strides = x_grad_meta.calc_strides(x_grad->dims());
x_grad->set_meta(x_grad_meta);
phi::ReduceSumGradKernel<T>(
dev_ctx, x, out_grad_, dims, keep_dim, reduce_all, x_grad);
}
template <typename T, typename Context>
void NansumGradStrideKernel(const Context& dev_ctx,
const DenseTensor& x,
const DenseTensor& out_grad,
const IntArray& dims,
bool keep_dim,
bool reduce_all,
DenseTensor* x_grad) {
if (!FLAGS_use_stride_kernel) {
PADDLE_THROW(common::errors::Fatal(
"FLAGS_use_stride_kernel is closed. Strided kernel "
"be called, something wrong has happened!"));
}
DenseTensor out_grad_;
bool invalid = false;
std::vector<int64_t> out_dims;
std::vector<int64_t> out_strides;
if ((!FLAGS_use_stride_compute_kernel) || !(out_grad.dims().size() > 0) ||
(out_grad.dtype() != x.dtype())) {
invalid = true;
}
if (!invalid) {
DenseTensor out_tmp = CheckMultipleUnsqueeze<Context>(
dev_ctx, out_grad, dims, x.dims().size(), keep_dim);
ExpandStrideKernel(common::vectorize<int64_t>(out_tmp.dims()),
common::vectorize<int64_t>(out_tmp.strides()),
common::vectorize<int64_t>(x.dims()),
&out_dims,
&out_strides);
invalid = std::find(out_strides.begin(), out_strides.end(), 0) !=
out_strides.end();
}
if (!invalid) {
auto meta = out_grad.meta();
meta.dims = DDim(out_dims.data(), static_cast<int>(out_dims.size()));
meta.strides =
DDim(out_strides.data(), static_cast<int>(out_strides.size()));
x_grad->set_meta(meta);
x_grad->ResetHolder(out_grad.Holder());
x_grad->ShareInplaceVersionCounterWith(out_grad);
return;
}
// if x is contiguous is not relevant to sum_grad computation
if (!out_grad.meta().is_contiguous()) {
out_grad_ = Tensor2Contiguous<Context>(dev_ctx, out_grad);
} else {
out_grad_ = out_grad;
}
auto x_grad_meta = x_grad->meta();
x_grad_meta.strides = x_grad_meta.calc_strides(x_grad->dims());
x_grad->set_meta(x_grad_meta);
phi::NansumGradKernel<T>(
dev_ctx, x, out_grad_, dims, keep_dim, reduce_all, x_grad);
}
} // namespace phi
PD_REGISTER_KERNEL(sum_grad,
GPU,
STRIDED,
phi::ReduceSumGradStrideKernel,
bool,
float,
double,
phi::float16,
phi::bfloat16,
int8_t,
uint8_t,
int16_t,
int,
int64_t,
phi::complex64,
phi::complex128) {
kernel->OutputAt(0).SetDataType(phi::DataType::UNDEFINED);
}
PD_REGISTER_KERNEL(nansum_grad,
GPU,
STRIDED,
phi::NansumGradStrideKernel,
bool,
float,
double,
phi::float16,
phi::bfloat16,
int8_t,
uint8_t,
int16_t,
int,
int64_t,
phi::complex64,
phi::complex128) {
kernel->OutputAt(0).SetDataType(phi::DataType::UNDEFINED);
}
#endif