From 7068f9900d136312318ff430aef588b14e0c87ad Mon Sep 17 00:00:00 2001 From: Anthony Barbier Date: Thu, 26 Oct 2017 15:23:08 +0100 Subject: COMPMID-631: Merge branches/gles_compute branch Last commit: commit b25c5f68042b0c81bf611d59a1bb8535e1c42497 Author: Xinghang Zhou Date: Wed Oct 25 18:48:10 2017 +0800 Synced validation's tolerances of GCSoftmax from cl side Change-Id: Ibe72054205c1c8721845d679a31af7ed0a7c5cf6 Reviewed-on: http://mpd-gerrit.cambridge.arm.com/93283 Reviewed-by: Anthony Barbier Tested-by: Kaizen --- .../GLES_COMPUTE/cs_shaders/convolution_layer.cs | 302 +++++++++++++++++++++ 1 file changed, 302 insertions(+) create mode 100644 src/core/GLES_COMPUTE/cs_shaders/convolution_layer.cs (limited to 'src/core/GLES_COMPUTE/cs_shaders/convolution_layer.cs') diff --git a/src/core/GLES_COMPUTE/cs_shaders/convolution_layer.cs b/src/core/GLES_COMPUTE/cs_shaders/convolution_layer.cs new file mode 100644 index 0000000000..1a0c9f1d30 --- /dev/null +++ b/src/core/GLES_COMPUTE/cs_shaders/convolution_layer.cs @@ -0,0 +1,302 @@ +/* + * 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" + +#ifdef DATA_TYPE_FP16 +BUFFER_DECLARATION(src, 1, uint, readonly); +BUFFER_DECLARATION(dst, 2, uint, restrict); +#else // DATA_TYPE_FP16 +BUFFER_DECLARATION(src, 1, float, readonly); +BUFFER_DECLARATION(dst, 2, float, restrict); +#endif // DATA_TYPE_FP16 + +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 + +precision mediump float; + +#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_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 +} +#endif // IM2COL_REDUCED + +#elif defined(DATA_TYPE_FP32) + +#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 -- cgit v1.2.1