| /* |
| * Copyright (c) 2017 ARM Limited. |
| * |
| * SPDX-License-Identifier: MIT |
| * |
| * Permission is hereby granted, free of charge, to any person obtaining a copy |
| * of this software and associated documentation files (the "Software"), to |
| * deal in the Software without restriction, including without limitation the |
| * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or |
| * sell copies of the Software, and to permit persons to whom the Software is |
| * furnished to do so, subject to the following conditions: |
| * |
| * The above copyright notice and this permission notice shall be included in all |
| * copies or substantial portions of the Software. |
| * |
| * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
| * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
| * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
| * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
| * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
| * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE |
| * SOFTWARE. |
| */ |
| |
| layout(local_size_x = LOCAL_SIZE_X, local_size_y = LOCAL_SIZE_Y, local_size_z = LOCAL_SIZE_Z) in; |
| #include "helpers.h" |
| |
| layout(std140) uniform shader_params |
| { |
| #ifdef IM2COL_GENERIC |
| TENSOR3D_PARAM_DECLARATION(src); |
| IMAGE_PARAM_DECLARATION(dst); |
| uint filter_depth; |
| uint src_stride_w; |
| uint dst_stride_w; |
| #endif // IM2COL_GENERIC |
| |
| #ifdef IM2COL_REDUCED |
| TENSOR3D_PARAM_DECLARATION(src); |
| VECTOR_PARAM_DECLARATION(dst); |
| uint width; |
| uint height; |
| #endif // IM2COL_REDUCED |
| |
| #ifdef COL2IM |
| IMAGE_PARAM_DECLARATION(src); |
| TENSOR3D_PARAM_DECLARATION(dst); |
| uint width; |
| #endif // COL2IM |
| }; |
| |
| #ifdef DATA_TYPE_FP16 |
| #if defined(IM2COL_REDUCED_8X) |
| BUFFER_DECLARATION(src, 1, uvec4, readonly); |
| BUFFER_DECLARATION(dst, 2, uvec4, restrict); |
| #elif defined(IM2COL_REDUCED_4X) /* IM2COL_REDUCED_8X */ |
| BUFFER_DECLARATION(src, 1, uvec2, readonly); |
| BUFFER_DECLARATION(dst, 2, uvec2, restrict); |
| #else /* IM2COL_REDUCED_8X */ |
| BUFFER_DECLARATION(src, 1, uint, readonly); |
| BUFFER_DECLARATION(dst, 2, uint, restrict); |
| #endif /* IM2COL_REDUCED_8X */ |
| |
| precision mediump float; |
| |
| #ifdef IM2COL_REDUCED |
| #if defined(IM2COL_REDUCED_GENERIC) |
| /** This kernel reshapes the tensor's low three dimensions to single row for GEMM operation |
| * |
| * @note The data type must be passed at compile time using "#define DATA_TYPE_FP16" |
| * @note In case biases will be added in late stage, "#define HAS_BIAS" has to be passed to append the final matrix with 1 in each row. |
| * |
| * @param[in] src_ptr Pointer to the source tensor. Supported data types: F16 |
| * @param[in] src_stride_x Stride of the source tensor in X dimension (in bytes) |
| * @param[in] src_step_x src_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] src_stride_y Stride of the source tensor in Y dimension (in bytes) |
| * @param[in] src_step_y src_stride_y * number of elements along Y processed per workitem(in bytes) |
| * @param[in] src_stride_z Stride of the source tensor in Z dimension (in bytes) |
| * @param[in] src_step_z src_stride_z * number of elements along Y processed per workitem(in bytes) |
| * @param[in] src_offset_first_element_in_bytes The offset of the first element in the source tensor |
| * @param[out] dst_ptr Pointer to the destination tensor. Same as @p src_ptr |
| * @param[in] dst_stride_x Stride of the destination tensor in X dimension (in bytes) |
| * @param[in] dst_step_x dst_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] dst_offset_first_element_in_bytes The offset of the first element in the destination tensor |
| * @param[in] width The width of the input tensor |
| * @param[in] height The height of the input tensor |
| */ |
| void main(void) |
| { |
| uvec3 pos = uvec3(gl_GlobalInvocationID.xyz); |
| uvec3 size = uvec3(gl_WorkGroupSize.xyz); |
| Tensor3D src = CONVERT_TO_TENSOR3D_STRUCT_FP16(src); |
| Tensor3D src_nostep = CONVERT_TO_TENSOR3D_STRUCT_NO_STEP_FP16(src); |
| Vector dst = CONVERT_TO_VECTOR_STRUCT_NO_STEP_FP16(dst); |
| uint image_size = width * height; |
| uint element_count = src_step_x / src_stride_x; |
| uint tmp_out_offset = dst.current_offset + ((pos.x * element_count + pos.y * width + pos.z * image_size) * dst.stride_x); |
| uint width_fp16 = ((width + uint(1)) >> uint(1)); |
| uint tmp; |
| |
| // odd width |
| if(width % uint(2) != uint(0)) |
| { |
| // even row |
| if((pos.y + pos.z * height) % uint(2) == uint(0)) |
| { |
| LOAD1(tmp, src, src.current_offset >> uint(2)); |
| STORE1(dst, tmp_out_offset >> uint(2), tmp); |
| } |
| else |
| { |
| // special op |
| uint tmpleft = uint(0); |
| uint tmpright = uint(0); |
| LOAD1(tmpright, src, src.current_offset >> uint(2)); // right half |
| if(pos.x == uint(0)) |
| { |
| LOAD1(tmpleft, src, tensor3D_offset_fp16(src_nostep, int(width), int(pos.y) - 1, int(pos.z)) >> uint(2)); // left half |
| tmpright = (tmpleft & uint(0xffff)) + (tmpright << uint(16)); |
| } |
| else |
| { |
| LOAD1(tmpleft, src, tensor3D_offset_fp16(src_nostep, (int(pos.x) - 1) * int(element_count), int(pos.y), int(pos.z)) >> uint(2)); // left half |
| tmpright = ((tmpleft >> uint(16)) + (tmpright << uint(16))); |
| } |
| STORE1(dst, tmp_out_offset >> uint(2), tmpright); |
| } |
| } |
| else |
| { |
| LOAD1(tmp, src, src.current_offset >> uint(2)); |
| STORE1(dst, tmp_out_offset >> uint(2), tmp); |
| } |
| |
| #ifdef HAS_BIAS |
| // If it is the last thread in the 3 dimensional workgroup |
| if(pos.x == (size.x - 1) && pos.y == (size.y - 1) && pos.z == (size.z - 1)) |
| { |
| tmp_out_offset += dst.stride_x; |
| |
| // FIXME: need odd/even detection for tmp_out_offset? |
| mediump vec2 bias_vec = vec2(1.0f, 1.0f); |
| uint bias_u = packHalf2x16(bias_vec); |
| STORE1(dst, tmp_out_offset >> uint(2), bias_u); |
| } |
| #endif // HAS_BIAS |
| } |
| #else /* IM2COL_REDUCED_GENERIC */ |
| /** This kernel reshapes the tensor's low three dimensions to single row for GEMM operation |
| * |
| * @note The data type must be passed at compile time using "#define DATA_TYPE_FP16" |
| * @note In case biases will be added in late stage, "#define HAS_BIAS" has to be passed to append the final matrix with 1 in each row. |
| * |
| * @param[in] src_ptr Pointer to the source tensor. Supported data types: F16 |
| * @param[in] src_stride_x Stride of the source tensor in X dimension (in bytes) |
| * @param[in] src_step_x src_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] src_stride_y Stride of the source tensor in Y dimension (in bytes) |
| * @param[in] src_step_y src_stride_y * number of elements along Y processed per workitem(in bytes) |
| * @param[in] src_stride_z Stride of the source tensor in Z dimension (in bytes) |
| * @param[in] src_step_z src_stride_z * number of elements along Y processed per workitem(in bytes) |
| * @param[in] src_offset_first_element_in_bytes The offset of the first element in the source tensor |
| * @param[out] dst_ptr Pointer to the destination tensor. Same as @p src_ptr |
| * @param[in] dst_stride_x Stride of the destination tensor in X dimension (in bytes) |
| * @param[in] dst_step_x dst_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] dst_offset_first_element_in_bytes The offset of the first element in the destination tensor |
| * @param[in] width The width of the input tensor |
| * @param[in] height The height of the input tensor |
| */ |
| void main(void) |
| { |
| uvec3 pos = uvec3(gl_GlobalInvocationID.xyz); |
| Tensor3D src = CONVERT_TO_TENSOR3D_STRUCT_FP16(src); |
| Vector dst = CONVERT_TO_VECTOR_STRUCT_NO_STEP_FP16(dst); |
| #if defined(IM2COL_REDUCED_8X) |
| uint tmp_out_offset = dst.current_offset + ((pos.x * uint(8) + pos.y * width + pos.z * uint(IMAGE_SIZE)) * dst.stride_x); |
| uvec4 tmp; |
| LOAD1(tmp, src, src.current_offset >> uint(4)); |
| STORE1(dst, tmp_out_offset >> uint(4), tmp); |
| #elif defined(IM2COL_REDUCED_4X) /* IM2COL_REDUCED_8X */ |
| uint tmp_out_offset = dst.current_offset + ((pos.x * uint(4) + pos.y * width + pos.z * uint(IMAGE_SIZE)) * dst.stride_x); |
| uvec2 tmp; |
| LOAD1(tmp, src, src.current_offset >> uint(3)); |
| STORE1(dst, tmp_out_offset >> uint(3), tmp); |
| #else /* IM2COL_REDUCED_8X */ |
| uint tmp_out_offset = dst.current_offset + ((pos.x * uint(2) + pos.y * width + pos.z * uint(IMAGE_SIZE)) * dst.stride_x); |
| uint tmp; |
| LOAD1(tmp, src, src.current_offset >> uint(2)); |
| STORE1(dst, tmp_out_offset >> uint(2), tmp); |
| #endif /* IM2COL_REDUCED_8X */ |
| } |
| #endif /* IM2COL_REDUCED_GENERIC */ |
| #endif // IM2COL_REDUCED |
| |
| #elif defined(DATA_TYPE_FP32) |
| BUFFER_DECLARATION(src, 1, float, readonly); |
| BUFFER_DECLARATION(dst, 2, float, restrict); |
| |
| #ifdef IM2COL_GENERIC |
| /** This kernel performs a reshaping of the input tensor to a tensor used to perform convolution using GEMM. |
| * |
| * @note The data type must be passed at compile time using "#define DATA_TYPE_FP32" |
| * @note In case biases will be added to the convolution "#define HAS_BIAS" has to be passed to append the final matrix with 1 in each row. |
| * |
| * @param[in] src_ptr Pointer to the source tensor. Supported data types: F32 |
| * @param[in] src_stride_x Stride of the source tensor in X dimension (in bytes) |
| * @param[in] src_step_x src_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] src_stride_y Stride of the source tensor in Y dimension (in bytes) |
| * @param[in] src_step_y src_stride_y * number of elements along Y processed per workitem(in bytes) |
| * @param[in] src_stride_z Stride of the source tensor in Z dimension (in bytes) |
| * @param[in] src_step_z src_stride_z * number of elements along Z processed per workitem(in bytes) |
| * @param[in] src_offset_first_element_in_bytes The offset of the first element in the source tensor |
| * @param[out] dst_ptr Pointer to the destination tensor. Supported data types: same as @p src_ptr |
| * @param[in] dst_stride_x Stride of the destination tensor in X dimension (in bytes) |
| * @param[in] dst_step_x dst_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] dst_stride_y Stride of the destination tensor in Y dimension (in bytes) |
| * @param[in] dst_step_y dst_stride_y * number of elements along Y processed per workitem(in bytes) |
| * @param[in] dst_offset_first_element_in_bytes The offset of the first element in the destination tensor |
| * @param[in] filter_depth The depth of the used filter |
| * @param[in] src_stride_w Stride of the source tensor in W dimension (in bytes). |
| * @param[in] dst_stride_w Stride of the destination tensor in W dimension (in bytes). |
| */ |
| void main(void) |
| { |
| uint xc = gl_GlobalInvocationID.x; // x coordinate in the convolved tensor |
| uint yc = gl_GlobalInvocationID.y; // y coordinate in the convolved tensor |
| uint ch = gl_GlobalInvocationID.z % filter_depth; // input feature map |
| uint batch = gl_GlobalInvocationID.z / filter_depth; // the batch |
| |
| // Calculate input indeces |
| uint xi = xc * uint(STRIDE_X) - uint(PAD_X); |
| uint yi = yc * uint(STRIDE_Y) - uint(PAD_Y); |
| uint input_offset = (src_offset_first_element_in_bytes + (ch * src_stride_z) + (batch * src_stride_w)) >> uint(2); |
| |
| // Calculate output indeces |
| uint xo = ch * uint(KERNEL_WIDTH) * uint(KERNEL_HEIGHT); |
| uint yo = xc + yc * uint(CONVOLVED_WIDTH); // Index of the convolution |
| uint output_offset = (dst_offset_first_element_in_bytes + (yo * dst_stride_y) + (batch * dst_stride_w) + xo) >> uint(2); |
| |
| // Linearize convolution elements |
| for(uint y = yi, y_e = yi + uint(KERNEL_HEIGHT); y < y_e; ++y) |
| { |
| for(uint x = xi, x_e = xi + uint(KERNEL_WIDTH); x < x_e; ++x) |
| { |
| #if PAD_X == 0 && PAD_Y == 0 |
| output_offset = input_offset + ((x * src_stride_x + y * src_stride_y) >> uint(2)); |
| STORE4(dst, output_offset, LOAD4(src, input_offset)); |
| #else // PAD_X == 0 && PAD_Y == 0 |
| if(x < 0 || x >= SRC_WIDTH || y < 0 || y >= SRC_HEIGHT) |
| { |
| STORE4(dst, output_offset, 0.0f); |
| } |
| else |
| { |
| output_offset = input_offset + (x * src_stride_x + y * src_stride_y) >> uint(2)); |
| STORE4(dst, output_offset, LOAD4(src, input_offset)); |
| } |
| #endif // PAD_X == 0 && PAD_Y == 0 |
| } |
| } |
| |
| #ifdef HAS_BIAS |
| if(ch == (uint(KERNEL_DEPTH) - 1)) |
| { |
| STORE4(dst, output_offset, 1.0f); |
| } |
| #endif // HAS_BIAS |
| } |
| #endif // IM2COL_GENERIC |
| |
| #ifdef IM2COL_REDUCED |
| /** This kernel reshapes the tensor's low three dimensions to single row for GEMM operation |
| * |
| * @note The data type must be passed at compile time using "#define DATA_TYPE_FP32" |
| * @note In case biases will be added in late stage, "#define HAS_BIAS" has to be passed to append the final matrix with 1 in each row. |
| * |
| * @param[in] src_ptr Pointer to the source tensor. Supported data types: F32 |
| * @param[in] src_stride_x Stride of the source tensor in X dimension (in bytes) |
| * @param[in] src_step_x src_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] src_stride_y Stride of the source tensor in Y dimension (in bytes) |
| * @param[in] src_step_y src_stride_y * number of elements along Y processed per workitem(in bytes) |
| * @param[in] src_stride_z Stride of the source tensor in Z dimension (in bytes) |
| * @param[in] src_step_z src_stride_z * number of elements along Y processed per workitem(in bytes) |
| * @param[in] src_offset_first_element_in_bytes The offset of the first element in the source tensor |
| * @param[out] dst_ptr Pointer to the destination tensor. Same as @p src_ptr |
| * @param[in] dst_stride_x Stride of the destination tensor in X dimension (in bytes) |
| * @param[in] dst_step_x dst_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] dst_offset_first_element_in_bytes The offset of the first element in the destination tensor |
| * @param[in] width The width of the input tensor |
| * @param[in] height The height of the input tensor |
| */ |
| void main(void) |
| { |
| uvec3 pos = uvec3(gl_GlobalInvocationID.xyz); |
| uvec3 size = uvec3(gl_WorkGroupSize.xyz); |
| Tensor3D src = CONVERT_TO_TENSOR3D_STRUCT(src); |
| Vector dst = CONVERT_TO_VECTOR_STRUCT_NO_STEP(dst); |
| uint image_size = width * height; |
| uint tmp_out_offset = dst.current_offset + (((pos.x + pos.y * width + pos.z * image_size) * dst.stride_x) >> 2); |
| |
| STORE4(dst, tmp_out_offset, LOAD4(src, src.current_offset)); |
| |
| #ifdef HAS_BIAS |
| // If it is the last thread in the 3 dimensional workgroup |
| if(pos.x == (size.x - 1) && pos.y == (size.y - 1) && pos.z == (size.z - 1)) |
| { |
| tmp_out_offset += (dst.stride_x >> uint(2)); |
| STORE4(dst, tmp_out_offset, 1.f); |
| } |
| #endif // HAS_BIAS |
| } |
| #endif // IM2COL_REDUCED |
| |
| #ifdef COL2IM |
| /** This kernel performs a reshaping of the output of the convolution layer. |
| * |
| * @note The data type must be passed at compile time using "#define DATA_TYPE_FP32" |
| * |
| * @param[in] src_ptr Pointer to the source tensor. Supported data types: F32 |
| * @param[in] src_stride_x Stride of the source tensor in X dimension (in bytes) |
| * @param[in] src_step_x src_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] src_stride_y Stride of the source tensor in Y dimension (in bytes) |
| * @param[in] src_step_y src_stride_y * number of elements along Y processed per workitem(in bytes) |
| * @param[in] src_stride_z Stride of the source tensor in Z dimension (in bytes) |
| * @param[in] src_step_z src_stride_z * number of elements along Z processed per workitem(in bytes) |
| * @param[in] src_offset_first_element_in_bytes The offset of the first element in the source tensor |
| * @param[out] dst_ptr Pointer to the destination tensor. Supported data types: same as @p src_ptr |
| * @param[in] dst_stride_x Stride of the destination tensor in X dimension (in bytes) |
| * @param[in] dst_step_x dst_stride_x * number of elements along X processed per workitem(in bytes) |
| * @param[in] dst_stride_y Stride of the destination tensor in Y dimension (in bytes) |
| * @param[in] dst_step_y dst_stride_y * number of elements along Y processed per workitem(in bytes) |
| * @param[in] dst_stride_z Stride of the destination tensor in Z dimension (in bytes) |
| * @param[in] dst_step_z dst_stride_z * number of elements along Z processed per workitem(in bytes) |
| * @param[in] dst_offset_first_element_in_bytes The offset of the first element in the destination tensor |
| * @param[in] dst_stride_w Stride of the destination tensor in W dimension (in bytes) |
| */ |
| void main(void) |
| { |
| uvec2 pos = uvec2(gl_GlobalInvocationID.xy); |
| Image src = CONVERT_TO_IMAGE_STRUCT(src); |
| Tensor3D dst = CONVERT_TO_TENSOR3D_STRUCT(dst); |
| |
| uint idx = pos.x * dst.stride_z + (pos.y / width) * dst.stride_y + (pos.y % width) * dst.stride_x; |
| uint tmp_out_offset = dst.current_offset + (idx >> 2); |
| |
| STORE4(dst, tmp_out_offset, LOAD4(src, src.current_offset)); |
| } |
| #endif // COL2IM |
| |
| #else // DATA_TYPE_FP16 |
| #error Data type not supported |
| #endif // DATA_TYPE_FP16 |