Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 1 | /* |
| 2 | * Copyright (c) 2016, 2017 ARM Limited. |
| 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 that computes the first-order derivative. |
| 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 derivative( |
| 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 | #ifdef GRAD_X |
| 71 | short16 l_data = convert_short16(vload16(0, offset(&src, -1, 0))); |
| 72 | short16 r_data = convert_short16(vload16(0, offset(&src, 1, 0))); |
| 73 | vstore16(r_data - l_data, 0, ((__global short *)dst_gx.ptr)); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 74 | #endif /* GRAD_X */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 75 | #ifdef GRAD_Y |
| 76 | short16 t_data = convert_short16(vload16(0, offset(&src, 0, -1))); |
| 77 | short16 b_data = convert_short16(vload16(0, offset(&src, 0, 1))); |
| 78 | vstore16(b_data - t_data, 0, ((__global short *)dst_gy.ptr)); |
Anthony Barbier | ac69aa1 | 2017-07-03 17:39:37 +0100 | [diff] [blame] | 79 | #endif /* GRAD_Y */ |
Anthony Barbier | 6ff3b19 | 2017-09-04 18:44:23 +0100 | [diff] [blame] | 80 | } |