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 package hat.backend.ffi;
26 
27 
28 import hat.ComputeContext;
29 import hat.Config;
30 import hat.KernelContext;
31 import hat.callgraph.KernelCallGraph;
32 
33 public class OpenCLBackend extends C99FFIBackend {
34 
35     public OpenCLBackend(String configSpec) {
36         this(Config.fromSpec(configSpec));
37     }
38 
39     public OpenCLBackend() {
40         this(Config.fromEnvOrProperty());
41     }
42 
43     public OpenCLBackend(Config config) {
44         super("opencl_backend", config);
45     }
46 
47 
48     @Override
49     public void computeContextHandoff(ComputeContext computeContext) {
50         injectBufferTracking(computeContext.computeCallGraph.entrypoint);
51     }
52 
53     @Override
54     public void dispatchKernel(KernelCallGraph kernelCallGraph, KernelContext kernelContext, Object... args) {
55         CompiledKernel compiledKernel = kernelCallGraphCompiledCodeMap.computeIfAbsent(kernelCallGraph, (_) -> {
56             String code = createC99(kernelCallGraph,  args);
57             if (config().showCode()) {
58                 System.out.println(code);
59             }
60             var compilationUnit = backendBridge.compile(code);
61             if (compilationUnit.ok()) {
62                 var kernel = compilationUnit.getKernel( kernelCallGraph.entrypoint.method.getName());
63                 return new CompiledKernel(this, kernelCallGraph, kernel, args);
64             } else {
65                 throw new IllegalStateException("opencl failed to compile ");
66             }
67         });
68         compiledKernel.dispatch(kernelContext, args);
69     }
70 
71     String createC99(KernelCallGraph kernelCallGraph,  Object[] args){
72         return createCode(kernelCallGraph, new OpenCLHATKernelBuilder(), args);
73     }
74 
75 }