1*c217d954SCole Faust /*
2*c217d954SCole Faust * Copyright (c) 2019-2021 Arm Limited.
3*c217d954SCole Faust *
4*c217d954SCole Faust * SPDX-License-Identifier: MIT
5*c217d954SCole Faust *
6*c217d954SCole Faust * Permission is hereby granted, free of charge, to any person obtaining a copy
7*c217d954SCole Faust * of this software and associated documentation files (the "Software"), to
8*c217d954SCole Faust * deal in the Software without restriction, including without limitation the
9*c217d954SCole Faust * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
10*c217d954SCole Faust * sell copies of the Software, and to permit persons to whom the Software is
11*c217d954SCole Faust * furnished to do so, subject to the following conditions:
12*c217d954SCole Faust *
13*c217d954SCole Faust * The above copyright notice and this permission notice shall be included in all
14*c217d954SCole Faust * copies or substantial portions of the Software.
15*c217d954SCole Faust *
16*c217d954SCole Faust * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17*c217d954SCole Faust * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18*c217d954SCole Faust * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19*c217d954SCole Faust * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20*c217d954SCole Faust * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21*c217d954SCole Faust * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
22*c217d954SCole Faust * SOFTWARE.
23*c217d954SCole Faust */
24*c217d954SCole Faust #include "src/gpu/cl/kernels/ClCropKernel.h"
25*c217d954SCole Faust
26*c217d954SCole Faust #include "arm_compute/core/CL/CLHelpers.h"
27*c217d954SCole Faust #include "arm_compute/core/CL/CLKernelLibrary.h"
28*c217d954SCole Faust #include "arm_compute/core/CL/ICLTensor.h"
29*c217d954SCole Faust #include "arm_compute/core/TensorInfo.h"
30*c217d954SCole Faust #include "arm_compute/core/Utils.h"
31*c217d954SCole Faust #include "src/core/CPP/Validate.h"
32*c217d954SCole Faust #include "src/core/helpers/WindowHelpers.h"
33*c217d954SCole Faust #include "support/Cast.h"
34*c217d954SCole Faust #include "support/StringSupport.h"
35*c217d954SCole Faust
36*c217d954SCole Faust #include <map>
37*c217d954SCole Faust
38*c217d954SCole Faust namespace arm_compute
39*c217d954SCole Faust {
40*c217d954SCole Faust namespace opencl
41*c217d954SCole Faust {
42*c217d954SCole Faust namespace kernels
43*c217d954SCole Faust {
ClCropKernel()44*c217d954SCole Faust ClCropKernel::ClCropKernel()
45*c217d954SCole Faust {
46*c217d954SCole Faust _type = CLKernelType::ELEMENTWISE;
47*c217d954SCole Faust }
48*c217d954SCole Faust
configure(const CLCompileContext & compile_context,const ITensorInfo * src,ITensorInfo * dst,Coordinates2D start,Coordinates2D end,uint32_t batch_index,float extrapolation_value,Window * dst_window)49*c217d954SCole Faust void ClCropKernel::configure(const CLCompileContext &compile_context, const ITensorInfo *src, ITensorInfo *dst, Coordinates2D start, Coordinates2D end, uint32_t batch_index,
50*c217d954SCole Faust float extrapolation_value, Window *dst_window)
51*c217d954SCole Faust {
52*c217d954SCole Faust ARM_COMPUTE_ERROR_ON_NULLPTR(src, dst);
53*c217d954SCole Faust ARM_COMPUTE_ERROR_THROW_ON(validate(src, dst, start, end, batch_index, extrapolation_value, dst_window));
54*c217d954SCole Faust
55*c217d954SCole Faust _start = start;
56*c217d954SCole Faust _batch_index = batch_index;
57*c217d954SCole Faust _extrapolation_value = extrapolation_value;
58*c217d954SCole Faust
59*c217d954SCole Faust const uint32_t vec_size_x = 4;
60*c217d954SCole Faust // Create and update the window (if needed)
61*c217d954SCole Faust Window win = calculate_max_window(*dst);
62*c217d954SCole Faust
63*c217d954SCole Faust if(dst_window != nullptr)
64*c217d954SCole Faust {
65*c217d954SCole Faust ARM_COMPUTE_ERROR_ON_INVALID_SUBWINDOW(win, *dst_window);
66*c217d954SCole Faust win = *dst_window;
67*c217d954SCole Faust }
68*c217d954SCole Faust
69*c217d954SCole Faust const uint32_t dst_width_x = win.num_iterations(0);
70*c217d954SCole Faust const bool multi_access_x = dst_width_x >= vec_size_x;
71*c217d954SCole Faust const bool remainder_x = dst_width_x % vec_size_x > 0;
72*c217d954SCole Faust
73*c217d954SCole Faust if(multi_access_x)
74*c217d954SCole Faust {
75*c217d954SCole Faust win.set(Window::DimX,
76*c217d954SCole Faust Window::Dimension(win.x().start(), ceil_to_multiple(win.x().end(), vec_size_x), vec_size_x));
77*c217d954SCole Faust }
78*c217d954SCole Faust ICLKernel::configure_internal(win);
79*c217d954SCole Faust
80*c217d954SCole Faust // Create kernel
81*c217d954SCole Faust CLBuildOptions build_opts;
82*c217d954SCole Faust build_opts.add_option("-DDATA_TYPE=" + get_cl_type_from_data_type(src->data_type()));
83*c217d954SCole Faust build_opts.add_option_if(multi_access_x, "-DVEC_SIZE=" + support::cpp11::to_string(vec_size_x));
84*c217d954SCole Faust build_opts.add_option_if(multi_access_x && remainder_x, "-DLAST_ACCESSED_X=" + support::cpp11::to_string(std::max<int>(dst_width_x - vec_size_x, 0)));
85*c217d954SCole Faust build_opts.add_option_if(start.x > end.x, "-DWIDTH_FLIPPED=");
86*c217d954SCole Faust build_opts.add_option_if(start.y > end.y, "-DHEIGHT_FLIPPED=");
87*c217d954SCole Faust _kernel = create_kernel(compile_context, "crop_tensor", build_opts.options());
88*c217d954SCole Faust }
89*c217d954SCole Faust
validate(const ITensorInfo * src,const ITensorInfo * dst,Coordinates2D start,Coordinates2D end,uint32_t batch_index,float extrapolation_value,Window * dst_window)90*c217d954SCole Faust Status ClCropKernel::validate(const ITensorInfo *src, const ITensorInfo *dst, Coordinates2D start, Coordinates2D end, uint32_t batch_index, float extrapolation_value, Window *dst_window)
91*c217d954SCole Faust {
92*c217d954SCole Faust ARM_COMPUTE_UNUSED(extrapolation_value, dst_window);
93*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON_CPU_F16_UNSUPPORTED(src);
94*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON(src->data_type() == DataType::UNKNOWN);
95*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON_DATA_LAYOUT_NOT_IN(src, DataLayout::NHWC);
96*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON(src->tensor_shape().num_dimensions() > 4);
97*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON(start.x < 0 || start.y < 0 || end.x < 0 || end.y < 0);
98*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON(start.x >= static_cast<int32_t>(src->dimension(1)) || start.y >= static_cast<int32_t>(src->dimension(2))
99*c217d954SCole Faust || end.x >= static_cast<int32_t>(src->dimension(1)) || end.y >= static_cast<int32_t>(src->dimension(2)));
100*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON(batch_index >= src->dimension(3));
101*c217d954SCole Faust if(dst_window != nullptr)
102*c217d954SCole Faust {
103*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON(dst_window->x().step() != 1);
104*c217d954SCole Faust }
105*c217d954SCole Faust if(dst->total_size() > 0)
106*c217d954SCole Faust {
107*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON_DATA_TYPE_NOT_IN(dst, DataType::F32);
108*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON_MISMATCHING_DATA_LAYOUT(src, dst);
109*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON(dst->num_dimensions() > 3);
110*c217d954SCole Faust }
111*c217d954SCole Faust return Status{};
112*c217d954SCole Faust }
113*c217d954SCole Faust
run_op(ITensorPack & tensors,const Window & window,cl::CommandQueue & queue)114*c217d954SCole Faust void ClCropKernel::run_op(ITensorPack &tensors, const Window &window, cl::CommandQueue &queue)
115*c217d954SCole Faust {
116*c217d954SCole Faust ARM_COMPUTE_ERROR_ON_UNCONFIGURED_KERNEL(this);
117*c217d954SCole Faust ARM_COMPUTE_ERROR_ON_INVALID_SUBWINDOW(ICLKernel::window(), window);
118*c217d954SCole Faust
119*c217d954SCole Faust const auto src = utils::cast::polymorphic_downcast<const ICLTensor *>(tensors.get_const_tensor(TensorType::ACL_SRC));
120*c217d954SCole Faust auto dst = utils::cast::polymorphic_downcast<ICLTensor *>(tensors.get_tensor(TensorType::ACL_DST));
121*c217d954SCole Faust
122*c217d954SCole Faust Window in_slice = Window();
123*c217d954SCole Faust in_slice.use_tensor_dimensions(src->info()->tensor_shape());
124*c217d954SCole Faust in_slice.set(Window::DimX, Window::Dimension(in_slice.x().start(), ceil_to_multiple(in_slice.x().end(), window.x().step()), window.x().step()));
125*c217d954SCole Faust in_slice.set(3, Window::Dimension(_batch_index, _batch_index + 1, 1));
126*c217d954SCole Faust
127*c217d954SCole Faust unsigned int idx = 0;
128*c217d954SCole Faust add_3D_tensor_argument(idx, src, in_slice);
129*c217d954SCole Faust add_3D_tensor_argument(idx, dst, window);
130*c217d954SCole Faust add_argument(idx, _start.x);
131*c217d954SCole Faust add_argument(idx, _start.y);
132*c217d954SCole Faust enqueue(queue, *this, window, lws_hint());
133*c217d954SCole Faust }
134*c217d954SCole Faust } // namespace kernels
135*c217d954SCole Faust } // namespace opencl
136*c217d954SCole Faust } // namespace arm_compute
137