1*c217d954SCole Faust /*
2*c217d954SCole Faust * Copyright (c) 2016-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/cpu/kernels/CpuGemmTranspose1xWKernel.h"
25*c217d954SCole Faust
26*c217d954SCole Faust #include "arm_compute/core/ITensor.h"
27*c217d954SCole Faust #include "arm_compute/core/Validate.h"
28*c217d954SCole Faust #include "arm_compute/core/Window.h"
29*c217d954SCole Faust #include "arm_compute/core/utils/misc/ShapeCalculator.h"
30*c217d954SCole Faust #include "src/core/helpers/AutoConfiguration.h"
31*c217d954SCole Faust #include "src/core/helpers/WindowHelpers.h"
32*c217d954SCole Faust
33*c217d954SCole Faust #include <arm_neon.h>
34*c217d954SCole Faust
35*c217d954SCole Faust namespace arm_compute
36*c217d954SCole Faust {
37*c217d954SCole Faust namespace cpu
38*c217d954SCole Faust {
39*c217d954SCole Faust namespace kernels
40*c217d954SCole Faust {
41*c217d954SCole Faust using namespace arm_compute::misc::shape_calculator;
42*c217d954SCole Faust
configure(const ITensorInfo * src,ITensorInfo * dst)43*c217d954SCole Faust void CpuGemmTranspose1xWKernel::configure(const ITensorInfo *src, ITensorInfo *dst)
44*c217d954SCole Faust {
45*c217d954SCole Faust ARM_COMPUTE_ERROR_ON_NULLPTR(src, dst);
46*c217d954SCole Faust
47*c217d954SCole Faust // Output tensor auto inizialitation if not yet initialized
48*c217d954SCole Faust auto_init_if_empty(*dst, src->clone()->set_tensor_shape(compute_transpose1xW_with_element_size_shape(*src)));
49*c217d954SCole Faust
50*c217d954SCole Faust // Perform validate step
51*c217d954SCole Faust ARM_COMPUTE_ERROR_THROW_ON(CpuGemmTranspose1xWKernel::validate(src, dst));
52*c217d954SCole Faust
53*c217d954SCole Faust const size_t vector_size = 16 / src->element_size();
54*c217d954SCole Faust
55*c217d954SCole Faust // Configure kernel window
56*c217d954SCole Faust Window win = calculate_max_window(*src, Steps(vector_size));
57*c217d954SCole Faust ICPPKernel::configure(win);
58*c217d954SCole Faust }
59*c217d954SCole Faust
validate(const ITensorInfo * src,const ITensorInfo * dst)60*c217d954SCole Faust Status CpuGemmTranspose1xWKernel::validate(const ITensorInfo *src, const ITensorInfo *dst)
61*c217d954SCole Faust {
62*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON_NULLPTR(src);
63*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON(src->data_type() == DataType::UNKNOWN);
64*c217d954SCole Faust //Note: ARM_COMPUTE_RETURN_ERROR_ON_CPU_F16_UNSUPPORTED(src) is not needed here as this kernel doesn't use CPU FP16 instructions.
65*c217d954SCole Faust
66*c217d954SCole Faust if(dst->total_size() != 0)
67*c217d954SCole Faust {
68*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON_MISMATCHING_DIMENSIONS(dst->tensor_shape(), compute_transpose1xW_with_element_size_shape(*src));
69*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON_MISMATCHING_DATA_TYPES(src, dst);
70*c217d954SCole Faust ARM_COMPUTE_RETURN_ERROR_ON_MISMATCHING_QUANTIZATION_INFO(src, dst);
71*c217d954SCole Faust }
72*c217d954SCole Faust
73*c217d954SCole Faust return Status{};
74*c217d954SCole Faust }
75*c217d954SCole Faust
run_op(ITensorPack & tensors,const Window & window,const ThreadInfo & info)76*c217d954SCole Faust void CpuGemmTranspose1xWKernel::run_op(ITensorPack &tensors, const Window &window, const ThreadInfo &info)
77*c217d954SCole Faust {
78*c217d954SCole Faust ARM_COMPUTE_UNUSED(info);
79*c217d954SCole Faust ARM_COMPUTE_ERROR_ON_UNCONFIGURED_KERNEL(this);
80*c217d954SCole Faust ARM_COMPUTE_ERROR_ON_INVALID_SUBWINDOW(IKernel::window(), window);
81*c217d954SCole Faust ARM_COMPUTE_ERROR_ON(tensors.empty());
82*c217d954SCole Faust
83*c217d954SCole Faust /*
84*c217d954SCole Faust * Following an example of how the transposition1xW works when the src data type is F32
85*c217d954SCole Faust *
86*c217d954SCole Faust * |a00 a01 a02 a03|
87*c217d954SCole Faust * |a10 a11 a12 a13|
88*c217d954SCole Faust * |a20 a21 a22 a23| = | a00 a01 a02 a03 || a10 a11 a12 a13 || a20 a21 a22 a23 || a30 a31 a32 a33 |
89*c217d954SCole Faust * |a30 a31 a32 a33|
90*c217d954SCole Faust *
91*c217d954SCole Faust * The dst matrix will have the following shape: [ height * W, ceil(width / W) ], where W = (16 / element size of the tensor)
92*c217d954SCole Faust */
93*c217d954SCole Faust
94*c217d954SCole Faust // Set window for dst tensor. Set to 0 the X and Y dimensions in order to allow multi-threading implementation and future batched matrix multiplications
95*c217d954SCole Faust Window win_out(window);
96*c217d954SCole Faust win_out.set(Window::DimX, Window::Dimension(0, 0, 0));
97*c217d954SCole Faust win_out.set(Window::DimY, Window::Dimension(0, 0, 0));
98*c217d954SCole Faust
99*c217d954SCole Faust const ITensor *src = tensors.get_const_tensor(TensorType::ACL_SRC);
100*c217d954SCole Faust ITensor *dst = tensors.get_tensor(TensorType::ACL_DST);
101*c217d954SCole Faust
102*c217d954SCole Faust Iterator in(src, window);
103*c217d954SCole Faust Iterator out(dst, win_out);
104*c217d954SCole Faust
105*c217d954SCole Faust const size_t in_width = src->info()->dimension(0);
106*c217d954SCole Faust const size_t element_size = src->info()->element_size();
107*c217d954SCole Faust const size_t out_stride = dst->info()->strides_in_bytes()[1];
108*c217d954SCole Faust const size_t vector_size = 16 / element_size;
109*c217d954SCole Faust
110*c217d954SCole Faust execute_window_loop(window, [&](const Coordinates & id)
111*c217d954SCole Faust {
112*c217d954SCole Faust const uint8_t *in_ptr = in.ptr();
113*c217d954SCole Faust uint8_t *const out_ptr = out.ptr() + (id.y() * vector_size) * element_size + (id.x() / vector_size) * out_stride;
114*c217d954SCole Faust
115*c217d954SCole Faust for(size_t k = 0; k < vector_size; ++k)
116*c217d954SCole Faust {
117*c217d954SCole Faust // If the src width is not multiple of W, we fill the reference with 0s
118*c217d954SCole Faust if((id.x() + k) >= in_width)
119*c217d954SCole Faust {
120*c217d954SCole Faust std::memset(out_ptr + k * element_size, 0, element_size);
121*c217d954SCole Faust }
122*c217d954SCole Faust else
123*c217d954SCole Faust {
124*c217d954SCole Faust std::memcpy(out_ptr + k * element_size, in_ptr + k * element_size, element_size);
125*c217d954SCole Faust }
126*c217d954SCole Faust }
127*c217d954SCole Faust },
128*c217d954SCole Faust in, out);
129*c217d954SCole Faust }
130*c217d954SCole Faust
name() const131*c217d954SCole Faust const char *CpuGemmTranspose1xWKernel::name() const
132*c217d954SCole Faust {
133*c217d954SCole Faust return "CpuGemmTranspose1xWKernel";
134*c217d954SCole Faust }
135*c217d954SCole Faust } // namespace kernels
136*c217d954SCole Faust } // namespace cpu
137*c217d954SCole Faust } // namespace arm_compute
138