1 /*
 2  * Copyright (c) 2024, Oracle and/or its affiliates. All rights reserved.
 3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 4  *
 5  * This code is free software; you can redistribute it and/or modify it
 6  * under the terms of the GNU General Public License version 2 only, as
 7  * published by the Free Software Foundation.  Oracle designates this
 8  * particular file as subject to the "Classpath" exception as provided
 9  * by Oracle in the LICENSE file that accompanied this code.
10  *
11  * This code is distributed in the hope that it will be useful, but WITHOUT
12  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
14  * version 2 for more details (a copy is included in the LICENSE file that
15  * accompanied this code).
16  *
17  * You should have received a copy of the GNU General Public License version
18  * 2 along with this work; if not, write to the Free Software Foundation,
19  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
20  *
21  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
22  * or visit www.oracle.com if you need additional information or have any
23  * questions.
24  */
25 
26 #include "opencl_backend.h"
27 
28 OpenCLBackend::OpenCLBuffer::OpenCLBuffer(Backend *backend, BufferState *bufferState)
29         : Backend::Buffer(backend, bufferState) {
30     cl_int status;
31     auto * openclBackend = dynamic_cast<OpenCLBackend *>(backend);
32     clMem = clCreateBuffer(
33         openclBackend->context,
34         CL_MEM_USE_HOST_PTR | CL_MEM_READ_WRITE,
35         bufferState->length,
36         bufferState->ptr,
37         &status);
38 
39     if (status != CL_SUCCESS) {
40         std::cerr << OpenCLBackend::errorMsg(status) << std::endl;
41         exit(1);
42     }
43     bufferState->vendorPtr =  static_cast<void *>(this);
44 }
45 
46 
47 OpenCLBackend::OpenCLBuffer::~OpenCLBuffer() {
48     clReleaseMemObject(clMem);
49 }
50 
51