1*c217d954SCole Faust /*
2*c217d954SCole Faust * Copyright (c) 2018-2021 Arm Limited.
3*c217d954SCole Faust *
4*c217d954SCole Faust * SPDX-License-Identifier: MIT
5*c217d954SCole Faust *
6*c217d954SCole Faust * Permission is hereby granted, free of charge, to any person obtaining a copy
7*c217d954SCole Faust * of this software and associated documentation files (the "Software"), to
8*c217d954SCole Faust * deal in the Software without restriction, including without limitation the
9*c217d954SCole Faust * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
10*c217d954SCole Faust * sell copies of the Software, and to permit persons to whom the Software is
11*c217d954SCole Faust * furnished to do so, subject to the following conditions:
12*c217d954SCole Faust *
13*c217d954SCole Faust * The above copyright notice and this permission notice shall be included in all
14*c217d954SCole Faust * copies or substantial portions of the Software.
15*c217d954SCole Faust *
16*c217d954SCole Faust * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17*c217d954SCole Faust * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18*c217d954SCole Faust * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19*c217d954SCole Faust * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20*c217d954SCole Faust * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21*c217d954SCole Faust * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
22*c217d954SCole Faust * SOFTWARE.
23*c217d954SCole Faust */
24*c217d954SCole Faust #include "arm_compute/runtime/CL/CLMemoryRegion.h"
25*c217d954SCole Faust
26*c217d954SCole Faust #include "arm_compute/core/Error.h"
27*c217d954SCole Faust #include "arm_compute/runtime/CL/CLScheduler.h"
28*c217d954SCole Faust
29*c217d954SCole Faust namespace arm_compute
30*c217d954SCole Faust {
ICLMemoryRegion(size_t size)31*c217d954SCole Faust ICLMemoryRegion::ICLMemoryRegion(size_t size)
32*c217d954SCole Faust : IMemoryRegion(size),
33*c217d954SCole Faust _queue(CLScheduler::get().queue()),
34*c217d954SCole Faust _ctx(CLScheduler::get().context()),
35*c217d954SCole Faust _mapping(nullptr),
36*c217d954SCole Faust _mem()
37*c217d954SCole Faust {
38*c217d954SCole Faust }
39*c217d954SCole Faust
cl_data() const40*c217d954SCole Faust const cl::Buffer &ICLMemoryRegion::cl_data() const
41*c217d954SCole Faust {
42*c217d954SCole Faust return _mem;
43*c217d954SCole Faust }
44*c217d954SCole Faust
buffer()45*c217d954SCole Faust void *ICLMemoryRegion::buffer()
46*c217d954SCole Faust {
47*c217d954SCole Faust return _mapping;
48*c217d954SCole Faust }
49*c217d954SCole Faust
buffer() const50*c217d954SCole Faust const void *ICLMemoryRegion::buffer() const
51*c217d954SCole Faust {
52*c217d954SCole Faust return _mapping;
53*c217d954SCole Faust }
54*c217d954SCole Faust
extract_subregion(size_t offset,size_t size)55*c217d954SCole Faust std::unique_ptr<IMemoryRegion> ICLMemoryRegion::extract_subregion(size_t offset, size_t size)
56*c217d954SCole Faust {
57*c217d954SCole Faust ARM_COMPUTE_UNUSED(offset, size);
58*c217d954SCole Faust return nullptr;
59*c217d954SCole Faust }
60*c217d954SCole Faust
CLBufferMemoryRegion(cl_mem_flags flags,size_t size)61*c217d954SCole Faust CLBufferMemoryRegion::CLBufferMemoryRegion(cl_mem_flags flags, size_t size)
62*c217d954SCole Faust : ICLMemoryRegion(size)
63*c217d954SCole Faust {
64*c217d954SCole Faust if(_size != 0)
65*c217d954SCole Faust {
66*c217d954SCole Faust _mem = cl::Buffer(CLScheduler::get().context(), flags, _size);
67*c217d954SCole Faust }
68*c217d954SCole Faust }
69*c217d954SCole Faust
CLBufferMemoryRegion(const cl::Buffer & buffer)70*c217d954SCole Faust CLBufferMemoryRegion::CLBufferMemoryRegion(const cl::Buffer &buffer)
71*c217d954SCole Faust : ICLMemoryRegion(buffer.getInfo<CL_MEM_SIZE>())
72*c217d954SCole Faust {
73*c217d954SCole Faust _mem = buffer;
74*c217d954SCole Faust }
75*c217d954SCole Faust
ptr()76*c217d954SCole Faust void *CLBufferMemoryRegion::ptr()
77*c217d954SCole Faust {
78*c217d954SCole Faust return nullptr;
79*c217d954SCole Faust }
80*c217d954SCole Faust
map(cl::CommandQueue & q,bool blocking)81*c217d954SCole Faust void *CLBufferMemoryRegion::map(cl::CommandQueue &q, bool blocking)
82*c217d954SCole Faust {
83*c217d954SCole Faust ARM_COMPUTE_ERROR_ON(_mem.get() == nullptr);
84*c217d954SCole Faust _mapping = q.enqueueMapBuffer(_mem, blocking ? CL_TRUE : CL_FALSE, CL_MAP_READ | CL_MAP_WRITE, 0, _size);
85*c217d954SCole Faust return _mapping;
86*c217d954SCole Faust }
87*c217d954SCole Faust
unmap(cl::CommandQueue & q)88*c217d954SCole Faust void CLBufferMemoryRegion::unmap(cl::CommandQueue &q)
89*c217d954SCole Faust {
90*c217d954SCole Faust ARM_COMPUTE_ERROR_ON(_mem.get() == nullptr);
91*c217d954SCole Faust q.enqueueUnmapMemObject(_mem, _mapping);
92*c217d954SCole Faust _mapping = nullptr;
93*c217d954SCole Faust }
94*c217d954SCole Faust
ICLSVMMemoryRegion(cl_mem_flags flags,size_t size,size_t alignment)95*c217d954SCole Faust ICLSVMMemoryRegion::ICLSVMMemoryRegion(cl_mem_flags flags, size_t size, size_t alignment)
96*c217d954SCole Faust : ICLMemoryRegion(size), _ptr(nullptr)
97*c217d954SCole Faust {
98*c217d954SCole Faust if(size != 0)
99*c217d954SCole Faust {
100*c217d954SCole Faust _ptr = clSVMAlloc(CLScheduler::get().context().get(), flags, size, alignment);
101*c217d954SCole Faust if(_ptr != nullptr)
102*c217d954SCole Faust {
103*c217d954SCole Faust _mem = cl::Buffer(CLScheduler::get().context(), CL_MEM_READ_WRITE | CL_MEM_USE_HOST_PTR, _size, _ptr);
104*c217d954SCole Faust }
105*c217d954SCole Faust }
106*c217d954SCole Faust }
107*c217d954SCole Faust
~ICLSVMMemoryRegion()108*c217d954SCole Faust ICLSVMMemoryRegion::~ICLSVMMemoryRegion()
109*c217d954SCole Faust {
110*c217d954SCole Faust if(_ptr != nullptr)
111*c217d954SCole Faust {
112*c217d954SCole Faust try
113*c217d954SCole Faust {
114*c217d954SCole Faust clFinish(_queue.get());
115*c217d954SCole Faust _mem = cl::Buffer();
116*c217d954SCole Faust clSVMFree(_ctx.get(), _ptr);
117*c217d954SCole Faust }
118*c217d954SCole Faust catch(...)
119*c217d954SCole Faust {
120*c217d954SCole Faust }
121*c217d954SCole Faust }
122*c217d954SCole Faust }
123*c217d954SCole Faust
ptr()124*c217d954SCole Faust void *ICLSVMMemoryRegion::ptr()
125*c217d954SCole Faust {
126*c217d954SCole Faust return _ptr;
127*c217d954SCole Faust }
128*c217d954SCole Faust
CLCoarseSVMMemoryRegion(cl_mem_flags flags,size_t size,size_t alignment)129*c217d954SCole Faust CLCoarseSVMMemoryRegion::CLCoarseSVMMemoryRegion(cl_mem_flags flags, size_t size, size_t alignment)
130*c217d954SCole Faust : ICLSVMMemoryRegion(flags, size, alignment)
131*c217d954SCole Faust {
132*c217d954SCole Faust }
133*c217d954SCole Faust
map(cl::CommandQueue & q,bool blocking)134*c217d954SCole Faust void *CLCoarseSVMMemoryRegion::map(cl::CommandQueue &q, bool blocking)
135*c217d954SCole Faust {
136*c217d954SCole Faust ARM_COMPUTE_ERROR_ON(_ptr == nullptr);
137*c217d954SCole Faust clEnqueueSVMMap(q.get(), blocking ? CL_TRUE : CL_FALSE, CL_MAP_READ | CL_MAP_WRITE, _ptr, _size, 0, nullptr, nullptr);
138*c217d954SCole Faust _mapping = _ptr;
139*c217d954SCole Faust return _mapping;
140*c217d954SCole Faust }
141*c217d954SCole Faust
unmap(cl::CommandQueue & q)142*c217d954SCole Faust void CLCoarseSVMMemoryRegion::unmap(cl::CommandQueue &q)
143*c217d954SCole Faust {
144*c217d954SCole Faust ARM_COMPUTE_ERROR_ON(_ptr == nullptr);
145*c217d954SCole Faust clEnqueueSVMUnmap(q.get(), _ptr, 0, nullptr, nullptr);
146*c217d954SCole Faust _mapping = nullptr;
147*c217d954SCole Faust }
148*c217d954SCole Faust
CLFineSVMMemoryRegion(cl_mem_flags flags,size_t size,size_t alignment)149*c217d954SCole Faust CLFineSVMMemoryRegion::CLFineSVMMemoryRegion(cl_mem_flags flags, size_t size, size_t alignment)
150*c217d954SCole Faust : ICLSVMMemoryRegion(flags, size, alignment)
151*c217d954SCole Faust {
152*c217d954SCole Faust }
153*c217d954SCole Faust
map(cl::CommandQueue & q,bool blocking)154*c217d954SCole Faust void *CLFineSVMMemoryRegion::map(cl::CommandQueue &q, bool blocking)
155*c217d954SCole Faust {
156*c217d954SCole Faust if(blocking)
157*c217d954SCole Faust {
158*c217d954SCole Faust clFinish(q.get());
159*c217d954SCole Faust }
160*c217d954SCole Faust _mapping = _ptr;
161*c217d954SCole Faust return _mapping;
162*c217d954SCole Faust }
163*c217d954SCole Faust
unmap(cl::CommandQueue & q)164*c217d954SCole Faust void CLFineSVMMemoryRegion::unmap(cl::CommandQueue &q)
165*c217d954SCole Faust {
166*c217d954SCole Faust ARM_COMPUTE_UNUSED(q);
167*c217d954SCole Faust _mapping = nullptr;
168*c217d954SCole Faust }
169*c217d954SCole Faust } // namespace arm_compute
170