Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 1 | /* |
Michele Di Giorgio | d9eaf61 | 2020-07-08 11:12:57 +0100 | [diff] [blame] | 2 | * Copyright (c) 2016, 2017 Arm Limited. |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 3 | * |
| 4 | * SPDX-License-Identifier: MIT |
| 5 | * |
| 6 | * Permission is hereby granted, free of charge, to any person obtaining a copy |
| 7 | * of this software and associated documentation files (the "Software"), to |
| 8 | * deal in the Software without restriction, including without limitation the |
| 9 | * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or |
| 10 | * sell copies of the Software, and to permit persons to whom the Software is |
| 11 | * furnished to do so, subject to the following conditions: |
| 12 | * |
| 13 | * The above copyright notice and this permission notice shall be included in all |
| 14 | * copies or substantial portions of the Software. |
| 15 | * |
| 16 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
| 17 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
| 18 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
| 19 | * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
| 20 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
| 21 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE |
| 22 | * SOFTWARE. |
| 23 | */ |
| 24 | #include "helpers.h" |
| 25 | |
| 26 | /** This OpenCL kernel computes Scharr3x3. |
| 27 | * |
| 28 | * @attention To enable computation of the X gradient -DGRAD_X must be passed at compile time, while computation of the Y gradient |
| 29 | * is performed when -DGRAD_Y is used. You can use both when computation of both gradients is required. |
| 30 | * |
| 31 | * @param[in] src_ptr Pointer to the source image. Supported data types: U8 |
| 32 | * @param[in] src_stride_x Stride of the source image in X dimension (in bytes) |
| 33 | * @param[in] src_step_x src_stride_x * number of elements along X processed per workitem(in bytes) |
| 34 | * @param[in] src_stride_y Stride of the source image in Y dimension (in bytes) |
| 35 | * @param[in] src_step_y src_stride_y * number of elements along Y processed per workitem(in bytes) |
| 36 | * @param[in] src_offset_first_element_in_bytes The offset of the first element in the source image |
| 37 | * @param[out] dst_gx_ptr Pointer to the destination image Supported data types: S16 |
| 38 | * @param[in] dst_gx_stride_x Stride of the destination image in X dimension (in bytes) |
| 39 | * @param[in] dst_gx_step_x dst_gx_stride_x * number of elements along X processed per workitem(in bytes) |
| 40 | * @param[in] dst_gx_stride_y Stride of the destination image in Y dimension (in bytes) |
| 41 | * @param[in] dst_gx_step_y dst_gx_stride_y * number of elements along Y processed per workitem(in bytes) |
| 42 | * @param[in] dst_gx_offset_first_element_in_bytes The offset of the first element in the destination image |
| 43 | * @param[out] dst_gy_ptr Pointer to the destination image. Supported data types: S16 |
| 44 | * @param[in] dst_gy_stride_x Stride of the destination image in X dimension (in bytes) |
| 45 | * @param[in] dst_gy_step_x dst_gy_stride_x * number of elements along X processed per workitem(in bytes) |
| 46 | * @param[in] dst_gy_stride_y Stride of the destination image in Y dimension (in bytes) |
| 47 | * @param[in] dst_gy_step_y dst_gy_stride_y * number of elements along Y processed per workitem(in bytes) |
| 48 | * @param[in] dst_gy_offset_first_element_in_bytes The offset of the first element in the destination image |
| 49 | */ |
| 50 | __kernel void scharr3x3( |
| 51 | IMAGE_DECLARATION(src) |
| 52 | #ifdef GRAD_X |
| 53 | , |
| 54 | IMAGE_DECLARATION(dst_gx) |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 55 | #endif /* GRAD_X */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 56 | #ifdef GRAD_Y |
| 57 | , |
| 58 | IMAGE_DECLARATION(dst_gy) |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 59 | #endif /* GRAD_Y */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 60 | ) |
| 61 | { |
| 62 | Image src = CONVERT_TO_IMAGE_STRUCT(src); |
| 63 | #ifdef GRAD_X |
| 64 | Image dst_gx = CONVERT_TO_IMAGE_STRUCT(dst_gx); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 65 | #endif /* GRAD_X */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 66 | #ifdef GRAD_Y |
| 67 | Image dst_gy = CONVERT_TO_IMAGE_STRUCT(dst_gy); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 68 | #endif /* GRAD_Y */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 69 | |
| 70 | // Output pixels |
| 71 | #ifdef GRAD_X |
| 72 | short8 gx = (short8)0; |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 73 | #endif /* GRAD_X */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 74 | #ifdef GRAD_Y |
| 75 | short8 gy = (short8)0; |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 76 | #endif /* GRAD_Y */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 77 | |
| 78 | // Row0 |
| 79 | uchar16 temp = vload16(0, offset(&src, -1, -1)); |
| 80 | short8 left = convert_short8(temp.s01234567); |
| 81 | short8 middle = convert_short8(temp.s12345678); |
| 82 | short8 right = convert_short8(temp.s23456789); |
| 83 | #ifdef GRAD_X |
| 84 | gx += left * (short8)(-3); |
| 85 | gx += right * (short8)(+3); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 86 | #endif /* GRAD_X */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 87 | #ifdef GRAD_Y |
| 88 | gy += left * (short8)(-3); |
| 89 | gy += middle * (short8)(-10); |
| 90 | gy += right * (short8)(-3); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 91 | #endif /* GRAD_Y */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 92 | |
| 93 | // Row1 |
| 94 | temp = vload16(0, offset(&src, -1, 0)); |
| 95 | left = convert_short8(temp.s01234567); |
| 96 | right = convert_short8(temp.s23456789); |
| 97 | #ifdef GRAD_X |
| 98 | gx += left * (short8)(-10); |
| 99 | gx += right * (short8)(+10); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 100 | #endif /* GRAD_X */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 101 | |
| 102 | // Row2 |
| 103 | temp = vload16(0, offset(&src, -1, 1)); |
| 104 | left = convert_short8(temp.s01234567); |
| 105 | middle = convert_short8(temp.s12345678); |
| 106 | right = convert_short8(temp.s23456789); |
| 107 | #ifdef GRAD_X |
| 108 | gx += left * (short8)(-3); |
| 109 | gx += right * (short8)(+3); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 110 | #endif /* GRAD_X */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 111 | #ifdef GRAD_Y |
| 112 | gy += left * (short8)(+3); |
| 113 | gy += middle * (short8)(+10); |
| 114 | gy += right * (short8)(+3); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 115 | #endif /* GRAD_Y */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 116 | |
| 117 | // Store results |
| 118 | #ifdef GRAD_X |
| 119 | vstore8(gx, 0, ((__global short *)dst_gx.ptr)); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 120 | #endif /* GRAD_X */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 121 | #ifdef GRAD_Y |
| 122 | vstore8(gy, 0, ((__global short *)dst_gy.ptr)); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 123 | #endif /* GRAD_Y */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 124 | } |