diff options
Diffstat (limited to 'src/c/cl/AclOpenClExt.cpp')
| -rw-r--r-- | src/c/cl/AclOpenClExt.cpp | 186 |
1 files changed, 186 insertions, 0 deletions
diff --git a/src/c/cl/AclOpenClExt.cpp b/src/c/cl/AclOpenClExt.cpp new file mode 100644 index 0000000000..8e42cf5510 --- /dev/null +++ b/src/c/cl/AclOpenClExt.cpp @@ -0,0 +1,186 @@ +/* + * Copyright (c) 2021 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. + */ +#include "arm_compute/AclOpenClExt.h" + +#include "arm_compute/core/CL/ICLTensor.h" + +#include "src/common/ITensorV2.h" +#include "src/common/Types.h" +#include "src/gpu/cl/ClContext.h" +#include "src/gpu/cl/ClQueue.h" +#include "support/Cast.h" + +extern "C" AclStatus AclGetClContext(AclContext external_ctx, cl_context *opencl_context) +{ + using namespace arm_compute; + IContext *ctx = get_internal(external_ctx); + + if (detail::validate_internal_context(ctx) != StatusCode::Success) + { + return AclStatus::AclInvalidArgument; + } + + if (ctx->type() != Target::GpuOcl) + { + return AclStatus::AclInvalidTarget; + } + + if (opencl_context == nullptr) + { + return AclStatus::AclInvalidArgument; + } + + *opencl_context = utils::cast::polymorphic_downcast<arm_compute::gpu::opencl::ClContext *>(ctx)->cl_ctx().get(); + + return AclStatus::AclSuccess; +} + +extern "C" AclStatus AclSetClContext(AclContext external_ctx, cl_context opencl_context) +{ + using namespace arm_compute; + IContext *ctx = get_internal(external_ctx); + + if (detail::validate_internal_context(ctx) != StatusCode::Success) + { + return AclStatus::AclInvalidArgument; + } + + if (ctx->type() != Target::GpuOcl) + { + return AclStatus::AclInvalidTarget; + } + + if (ctx->refcount() != 0) + { + return AclStatus::AclUnsupportedConfig; + } + + auto cl_ctx = utils::cast::polymorphic_downcast<arm_compute::gpu::opencl::ClContext *>(ctx); + if (!cl_ctx->set_cl_ctx(::cl::Context(opencl_context))) + { + return AclStatus::AclRuntimeError; + } + + return AclStatus::AclSuccess; +} + +extern "C" AclStatus AclGetClDevice(AclContext external_ctx, cl_device_id *opencl_device) +{ + using namespace arm_compute; + IContext *ctx = get_internal(external_ctx); + + if (detail::validate_internal_context(ctx) != StatusCode::Success) + { + return AclStatus::AclInvalidArgument; + } + + if (ctx->type() != Target::GpuOcl) + { + return AclStatus::AclInvalidTarget; + } + + if (opencl_device == nullptr) + { + return AclStatus::AclInvalidArgument; + } + + *opencl_device = utils::cast::polymorphic_downcast<arm_compute::gpu::opencl::ClContext *>(ctx)->cl_dev().get(); + + return AclStatus::AclSuccess; +} + +extern "C" AclStatus AclGetClQueue(AclQueue external_queue, cl_command_queue *opencl_queue) +{ + using namespace arm_compute; + IQueue *queue = get_internal(external_queue); + + if (detail::validate_internal_queue(queue) != StatusCode::Success) + { + return AclStatus::AclInvalidArgument; + } + + if (queue->header.ctx->type() != Target::GpuOcl) + { + return AclStatus::AclInvalidTarget; + } + + if (opencl_queue == nullptr) + { + return AclStatus::AclInvalidArgument; + } + + *opencl_queue = utils::cast::polymorphic_downcast<arm_compute::gpu::opencl::ClQueue *>(queue)->cl_queue().get(); + + return AclStatus::AclSuccess; +} + +extern "C" AclStatus AclSetClQueue(AclQueue external_queue, cl_command_queue opencl_queue) +{ + using namespace arm_compute; + IQueue *queue = get_internal(external_queue); + + if (detail::validate_internal_queue(queue) != StatusCode::Success) + { + return AclStatus::AclInvalidArgument; + } + + if (queue->header.ctx->type() != Target::GpuOcl) + { + return AclStatus::AclInvalidTarget; + } + + auto cl_queue = utils::cast::polymorphic_downcast<arm_compute::gpu::opencl::ClQueue *>(queue); + if (!cl_queue->set_cl_queue(::cl::CommandQueue(opencl_queue))) + { + return AclStatus::AclRuntimeError; + } + + return AclStatus::AclSuccess; +} + +extern "C" AclStatus AclGetClMem(AclTensor external_tensor, cl_mem *opencl_mem) +{ + using namespace arm_compute; + ITensorV2 *tensor = get_internal(external_tensor); + + if (detail::validate_internal_tensor(tensor) != StatusCode::Success) + { + return AclStatus::AclInvalidArgument; + } + + if (tensor->header.ctx->type() != Target::GpuOcl) + { + return AclStatus::AclInvalidTarget; + } + + if (opencl_mem == nullptr) + { + return AclStatus::AclInvalidArgument; + } + + auto cl_tensor = utils::cast::polymorphic_downcast<arm_compute::ICLTensor *>(tensor->tensor()); + *opencl_mem = cl_tensor->cl_buffer().get(); + + return AclStatus::AclSuccess; +} |