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

448 lines
17 KiB
C++

// Copyright (c) 2023 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.
#include "paddle/phi/kernels/set_value_grad_kernel.h"
#include "glog/logging.h"
#include "paddle/phi/backends/xpu/enforce_xpu.h"
#include "paddle/phi/backends/xpu/xpu_context.h"
#include "paddle/phi/common/int_array.h"
#include "paddle/phi/core/dense_tensor.h"
#include "paddle/phi/core/kernel_registry.h"
#include "paddle/phi/core/tensor_utils.h"
#include "paddle/phi/kernels/full_kernel.h"
#include "paddle/phi/kernels/funcs/eigen/common.h"
#include "paddle/phi/kernels/funcs/math_function.h"
#include "paddle/phi/kernels/funcs/strided_slice.h"
namespace phi {
inline void GetOffsets(const DDim& big_dim,
const DDim& small_dim,
DDim start_offset,
int cur_dim,
std::vector<DDim>* offsets) {
if (cur_dim == big_dim.size()) {
offsets->push_back(start_offset);
return;
}
if (small_dim[cur_dim] == big_dim[cur_dim]) {
GetOffsets(big_dim, small_dim, start_offset, cur_dim + 1, offsets);
} else {
for (int64_t i = 0; i < big_dim[cur_dim]; i++) {
GetOffsets(big_dim, small_dim, start_offset, cur_dim + 1, offsets);
start_offset[cur_dim] += 1;
}
}
}
template <typename T, typename Context, size_t RANK>
void SetValueGradImpl(const Context& dev_ctx,
const DenseTensor& out_grad,
const IntArray& starts,
const IntArray& ends,
const IntArray& steps,
const std::vector<int64_t>& axes,
const std::vector<int64_t>& decrease_axes,
const std::vector<int64_t>& none_axes,
DenseTensor* x_grad,
DenseTensor* value_grad) {
using XPUType = typename XPUTypeTrait<T>::Type;
PADDLE_ENFORCE_EQ(
out_grad.IsInitialized(),
true,
errors::PermissionDenied(
"The input of `set_value_grad`(out_grad) has not been initialized"));
auto in_dims = out_grad.dims();
auto in_dims_vector = vectorize<int64_t>(in_dims);
std::vector<int> decrease_axis_int32(decrease_axes.begin(),
decrease_axes.end());
std::vector<int> axes_int32(axes.begin(), axes.end());
std::vector<int> infer_flags(axes.size(), 1);
std::vector<int64_t> out_dims_vector(in_dims.size(), -1);
std::vector<int64_t> starts_local = starts.GetData();
std::vector<int64_t> ends_local = ends.GetData();
std::vector<int64_t> steps_local = steps.GetData();
funcs::StridedSliceOutDims(starts_local,
ends_local,
steps_local,
axes_int32,
infer_flags,
in_dims,
decrease_axis_int32,
out_dims_vector.data(),
axes.size(),
false);
DDim out_dims(make_ddim(out_dims_vector));
std::vector<int> reverse_vector(starts_local.size(), 0);
funcs::StridedSliceFunctor(starts_local.data(),
ends_local.data(),
steps_local.data(),
axes_int32.data(),
reverse_vector.data(),
in_dims,
infer_flags,
decrease_axis_int32,
starts_local.size());
std::vector<int64_t> starts_indices(RANK, 0);
std::vector<int64_t> ends_indices(RANK, 0);
std::vector<int64_t> steps_indices(RANK, 0);
std::vector<bool> reverse_axis(RANK, 0);
std::vector<int64_t> flip_axis;
for (size_t axis = 0; axis < RANK; axis++) {
starts_indices[axis] = 0;
ends_indices[axis] = out_dims[axis];
steps_indices[axis] = 1;
reverse_axis[axis] = false;
}
for (size_t axis = 0; axis < axes.size(); axis++) {
size_t axis_index = axes[axis];
starts_indices[axis_index] = starts_local[axis];
ends_indices[axis_index] = ends_local[axis];
steps_indices[axis_index] = steps_local[axis];
reverse_axis[axis_index] = (reverse_vector[axis] == 1) ? true : false;
}
for (size_t axis = 0; axis < RANK; axis++) {
if (reverse_axis[axis]) {
flip_axis.push_back(axis);
}
if (ends_indices[axis] > in_dims[axis]) {
ends_indices[axis] = in_dims[axis];
}
}
bool need_reverse = false;
for (size_t axis = 0; axis < axes.size(); axis++) {
if (reverse_vector[axis] == 1) {
need_reverse = true;
break;
}
}
funcs::SetConstant<Context, T> set_zero;
int r = 0;
if (x_grad) {
// Set gradient of `Input`
x_grad->Resize(out_grad.dims());
dev_ctx.template Alloc<T>(x_grad);
r = xpu::copy(dev_ctx.x_context(),
reinterpret_cast<const XPUType*>(out_grad.data<T>()),
reinterpret_cast<XPUType*>(x_grad->data<T>()),
out_grad.numel());
PADDLE_ENFORCE_XDNN_SUCCESS(r, "copy");
DenseTensor tmp = Full<T>(dev_ctx, out_dims_vector, static_cast<T>(0));
r = xpu::strided_slice_view_update(
dev_ctx.x_context(),
reinterpret_cast<const XPUType*>(tmp.data<T>()),
reinterpret_cast<XPUType*>(x_grad->data<T>()),
out_dims_vector,
vectorize<int64_t>(x_grad->dims()),
starts_indices,
ends_indices,
steps_indices);
PADDLE_ENFORCE_XDNN_SUCCESS(r, "strided_slice_view_update");
}
if (value_grad) {
dev_ctx.template Alloc<T>(value_grad);
set_zero(dev_ctx, value_grad, static_cast<T>(0));
if (value_grad->dims() == out_dims) {
if (need_reverse) {
r = xpu::strided_slice(
dev_ctx.x_context(),
reinterpret_cast<const XPUType*>(out_grad.data<T>()),
reinterpret_cast<XPUType*>(value_grad->data<T>()),
in_dims_vector,
starts_indices,
ends_indices,
steps_indices);
PADDLE_ENFORCE_XDNN_SUCCESS(r, "strided_slice");
r = xpu::flip(dev_ctx.x_context(),
reinterpret_cast<const XPUType*>(value_grad->data<T>()),
reinterpret_cast<XPUType*>(value_grad->data<T>()),
out_dims_vector,
flip_axis);
PADDLE_ENFORCE_XDNN_SUCCESS(r, "flip");
} else {
r = xpu::strided_slice(
dev_ctx.x_context(),
reinterpret_cast<const XPUType*>(out_grad.data<T>()),
reinterpret_cast<XPUType*>(value_grad->data<T>()),
in_dims_vector,
starts_indices,
ends_indices,
steps_indices);
PADDLE_ENFORCE_XDNN_SUCCESS(r, "strided_slice");
}
} else {
int out_dims_size = out_dims.size();
auto value_grad_dims = value_grad->dims();
auto fake_value_grad_dims = out_dims;
// Create an extended shape according to the rules of broadcast.
auto value_grad_dims_size = value_grad_dims.size();
int num_decrease = 0;
int decrease_axis_size = decrease_axes.size();
for (int i = 0; i < out_dims_size; i++) {
if (decrease_axes.end() !=
std::find(decrease_axes.begin(), decrease_axes.end(), i)) {
fake_value_grad_dims[i] = 1;
num_decrease++;
} else if (i < out_dims_size - (value_grad_dims_size +
decrease_axis_size - num_decrease)) {
fake_value_grad_dims[i] = 1;
} else {
auto index_grad =
i - (out_dims_size -
(value_grad_dims_size + decrease_axis_size - num_decrease));
fake_value_grad_dims[i] = value_grad_dims[index_grad];
PADDLE_ENFORCE_EQ(
(out_dims[i] == value_grad_dims[index_grad]) ||
(value_grad_dims[index_grad] == 1),
true,
errors::InvalidArgument("An error occurred while calculating %s: "
"[%s] can not be accumulated into [%s].",
"ValueTensor@GRAD",
out_dims,
value_grad_dims));
}
}
VLOG(3) << "Dimensions of "
<< "ValueTensor@GRAD"
<< "([" << value_grad_dims << "])is broadcasted into ["
<< fake_value_grad_dims << "].";
std::vector<int64_t> slice_end(RANK, 0);
auto offset = out_dims;
for (int i = 0; i < out_dims_size; i++) {
offset[i] = 0;
}
std::vector<DDim> offsets;
GetOffsets(out_dims, fake_value_grad_dims, offset, 0, &offsets);
DenseTensor tmp = Full<T>(dev_ctx, out_dims_vector, static_cast<T>(0));
r = xpu::strided_slice(
dev_ctx.x_context(),
reinterpret_cast<const XPUType*>(out_grad.data<T>()),
reinterpret_cast<XPUType*>(tmp.data<T>()),
in_dims_vector,
starts_indices,
ends_indices,
steps_indices);
PADDLE_ENFORCE_XDNN_SUCCESS(r, "strided_slice");
// accumulate gradient
DenseTensor tmp2 =
Full<T>(dev_ctx,
{fake_value_grad_dims.Get(), fake_value_grad_dims.size()},
static_cast<T>(0));
auto value_grad_dims_vec = vectorize<int64_t>(value_grad_dims);
// for value is a 0-D Tensor
if (value_grad_dims.size() == 0) {
value_grad_dims_vec =
vectorize<int64_t>(make_ddim(std::vector<int64_t>({1})));
}
for (auto offset : offsets) {
for (int i = 0; i < out_dims_size; i++) {
slice_end[i] = offset[i] + fake_value_grad_dims[i];
}
r = xpu::slice(dev_ctx.x_context(),
reinterpret_cast<const XPUType*>(tmp.data<T>()),
reinterpret_cast<XPUType*>(tmp2.data<T>()),
out_dims_vector,
vectorize<int64_t>(offset),
slice_end);
PADDLE_ENFORCE_XDNN_SUCCESS(r, "slice");
r = xpu::broadcast_add(
dev_ctx.x_context(),
reinterpret_cast<const XPUType*>(value_grad->data<T>()),
reinterpret_cast<const XPUType*>(tmp2.data<T>()),
reinterpret_cast<XPUType*>(value_grad->data<T>()),
value_grad_dims_vec,
value_grad_dims_vec);
PADDLE_ENFORCE_XDNN_SUCCESS(r, "broadcast_add");
}
if (need_reverse) {
r = xpu::flip(dev_ctx.x_context(),
reinterpret_cast<const XPUType*>(value_grad->data<T>()),
reinterpret_cast<XPUType*>(value_grad->data<T>()),
value_grad_dims_vec,
flip_axis);
PADDLE_ENFORCE_XDNN_SUCCESS(r, "flip");
}
}
}
}
template <typename T, typename Context>
void SetValueGradKernel(const Context& dev_ctx,
const DenseTensor& out_grad,
const IntArray& starts,
const IntArray& ends,
const IntArray& steps,
const std::vector<int64_t>& axes,
const std::vector<int64_t>& decrease_axes,
const std::vector<int64_t>& none_axes,
DenseTensor* x_grad,
DenseTensor* value_grad) {
if (out_grad.numel() == 0) {
if (x_grad) dev_ctx.template Alloc<T>(x_grad);
if (value_grad) dev_ctx.template Alloc<T>(value_grad);
return;
}
const int rank = out_grad.dims().size();
switch (rank) {
case 1:
SetValueGradImpl<T, Context, 1>(dev_ctx,
out_grad,
starts,
ends,
steps,
axes,
decrease_axes,
none_axes,
x_grad,
value_grad);
break;
case 2:
SetValueGradImpl<T, Context, 2>(dev_ctx,
out_grad,
starts,
ends,
steps,
axes,
decrease_axes,
none_axes,
x_grad,
value_grad);
break;
case 3:
SetValueGradImpl<T, Context, 3>(dev_ctx,
out_grad,
starts,
ends,
steps,
axes,
decrease_axes,
none_axes,
x_grad,
value_grad);
break;
case 4:
SetValueGradImpl<T, Context, 4>(dev_ctx,
out_grad,
starts,
ends,
steps,
axes,
decrease_axes,
none_axes,
x_grad,
value_grad);
break;
case 5:
SetValueGradImpl<T, Context, 5>(dev_ctx,
out_grad,
starts,
ends,
steps,
axes,
decrease_axes,
none_axes,
x_grad,
value_grad);
break;
case 6:
SetValueGradImpl<T, Context, 6>(dev_ctx,
out_grad,
starts,
ends,
steps,
axes,
decrease_axes,
none_axes,
x_grad,
value_grad);
break;
default:
PADDLE_THROW(common::errors::InvalidArgument(
"The rank of set_value_grad's input should be less than 7, but "
"received %d.",
rank));
}
}
template <typename T, typename Context>
void SetValueWithScalarGradKernel(const Context& dev_ctx,
const DenseTensor& out_grad,
const IntArray& starts,
const IntArray& ends,
const IntArray& steps,
const std::vector<int64_t>& axes,
const std::vector<int64_t>& decrease_axes,
const std::vector<int64_t>& none_axes,
DenseTensor* x_grad) {
SetValueGradKernel<T, Context>(dev_ctx,
out_grad,
starts,
ends,
steps,
axes,
decrease_axes,
none_axes,
x_grad,
nullptr);
}
} // namespace phi
PD_REGISTER_KERNEL(set_value_grad,
XPU,
ALL_LAYOUT,
phi::SetValueGradKernel,
float,
phi::float16,
phi::bfloat16,
int,
int64_t) {}
PD_REGISTER_KERNEL(set_value_with_scalar_grad,
XPU,
ALL_LAYOUT,
phi::SetValueWithScalarGradKernel,
float,
phi::float16,
phi::bfloat16,
int,
int64_t) {}