/* * Copyright 2009 - 2010 JogAmp Community. All rights reserved. * * Redistribution and use in source and binary forms, with or without modification, are * permitted provided that the following conditions are met: * * 1. Redistributions of source code must retain the above copyright notice, this list of * conditions and the following disclaimer. * * 2. Redistributions in binary form must reproduce the above copyright notice, this list * of conditions and the following disclaimer in the documentation and/or other materials * provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY JogAmp Community ``AS IS'' AND ANY EXPRESS OR IMPLIED * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND * FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL JogAmp Community OR * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON * ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. * * The views and conclusions contained in the software and documentation are those of the * authors and should not be interpreted as representing official policies, either expressed * or implied, of JogAmp Community. */ /* * Created on Monday, June 07 2010 at 04:25 */ package com.jogamp.opencl.impl; import com.jogamp.common.nio.NativeSizeBuffer; import com.jogamp.common.os.Platform; import com.jogamp.common.util.LongLongHashMap; import com.jogamp.opencl.CLErrorHandler; import com.jogamp.opencl.CLException; import java.nio.ByteBuffer; import java.nio.IntBuffer; import static com.jogamp.common.nio.Buffers.*; /** * Java bindings to OpenCL, the Open Computing Language. * @author Michael Bien */ public class CLImpl extends CLAbstractImpl { //maps the context id to its error handler's global object pointer private final LongLongHashMap contextCallbackMap; public CLImpl(CLProcAddressTable addressTable) { super(addressTable); this.contextCallbackMap = new LongLongHashMap(); this.contextCallbackMap.setKeyNotFoundValue(0); } public long clCreateContext(NativeSizeBuffer properties, NativeSizeBuffer devices, CLErrorHandler pfn_notify, IntBuffer errcode_ret) { if (properties != null && !properties.isDirect()) { throw new RuntimeException("Argument \"properties\" was not a direct buffer"); } if (errcode_ret != null && !errcode_ret.isDirect()) { throw new RuntimeException("Argument \"errcode_ret\" was not a direct buffer"); } final long address = addressTable._addressof_clCreateContext; if (address == 0) { throw new UnsupportedOperationException("Method not available"); } long[] global = new long[1]; long ctx = this.clCreateContext0( properties != null ? properties.getBuffer() : null, getDirectBufferByteOffset(properties), devices != null ? devices.remaining() : 0, devices != null ? devices.getBuffer() : null, getDirectBufferByteOffset(devices), pfn_notify, global, errcode_ret, getDirectBufferByteOffset(errcode_ret), address); if (pfn_notify != null && global[0] != 0) { synchronized (contextCallbackMap) { contextCallbackMap.put(ctx, global[0]); } } return ctx; } private native long clCreateContext0(Object cl_context_properties, int props_offset, int numDevices, Object devices, int devices_offset, Object pfn_notify, long[] global, Object errcode_ret, int err_offset, long address); public long clCreateContextFromType(NativeSizeBuffer properties, long device_type, CLErrorHandler pfn_notify, IntBuffer errcode_ret) { if (properties != null && !properties.isDirect()) { throw new RuntimeException("Argument \"properties\" was not a direct buffer"); } if (errcode_ret != null && !errcode_ret.isDirect()) { throw new RuntimeException("Argument \"errcode_ret\" was not a direct buffer"); } final long address = addressTable._addressof_clCreateContextFromType; if (address == 0) { throw new UnsupportedOperationException("Method not available"); } long[] global = new long[1]; long ctx = this.clCreateContextFromType0( properties != null ? properties.getBuffer() : null, getDirectBufferByteOffset(properties), device_type, pfn_notify, global, errcode_ret, getDirectBufferByteOffset(errcode_ret), address); if (pfn_notify != null && global[0] != 0) { synchronized (contextCallbackMap) { contextCallbackMap.put(ctx, global[0]); } } return ctx; } private native long clCreateContextFromType0(Object properties, int props_offset, long device_type, Object pfn_notify, long[] global, Object errcode_ret, int err_offset, long address); public int clReleaseContext(long context) { long global = 0; synchronized (contextCallbackMap) { global = contextCallbackMap.remove(context); } final long address = addressTable._addressof_clReleaseContext; if (address == 0) { throw new UnsupportedOperationException("Method not available"); } return clReleaseContextImpl(context, global, address); } /** Interface to C language function:
int32_t {@native clReleaseContext}(cl_context context); */ public native int clReleaseContextImpl(long context, long global, long address); /** Interface to C language function:
int32_t clBuildProgram(cl_program, uint32_t, cl_device_id * , const char * , void * ); */ public int clBuildProgram(long program, int deviceCount, NativeSizeBuffer deviceList, String options, BuildProgramCallback cb) { if (deviceList != null && !deviceList.isDirect()) { throw new RuntimeException("Argument \"properties\" was not a direct buffer"); } final long address = addressTable._addressof_clBuildProgram; if (address == 0) { throw new UnsupportedOperationException("Method not available"); } return clBuildProgram0(program, deviceCount, deviceList != null ? deviceList.getBuffer() : null, getDirectBufferByteOffset(deviceList), options, cb, address); } /** Entry point to C language function: int32_t clBuildProgram(cl_program, uint32_t, cl_device_id * , const char * , void * ); */ private native int clBuildProgram0(long program, int deviceCount, Object deviceList, int deviceListOffset, String options, BuildProgramCallback cb, long address); public int clSetEventCallback(long event, int trigger, CLEventCallback callback) { final long address = addressTable._addressof_clSetEventCallback; if (address == 0) { throw new UnsupportedOperationException("Method not available"); } return clSetEventCallback0(event, trigger, callback, address); } private native int clSetEventCallback0(long event, int type, CLEventCallback cb, long address); public int clSetMemObjectDestructorCallback(long memObjID, CLMemObjectDestructorCallback cb) { final long address = addressTable._addressof_clSetMemObjectDestructorCallback; if (address == 0) { throw new UnsupportedOperationException("Method not available"); } return clSetMemObjectDestructorCallback0(memObjID, cb, address); } private native int clSetMemObjectDestructorCallback0(long memObjID, CLMemObjectDestructorCallback cb, long address); /** Interface to C language function:
void * {@native clEnqueueMapImage}(cl_command_queue command_queue, cl_mem image, uint32_t blocking_map, uint64_t map_flags, const size_t * , const size_t * , size_t * image_row_pitch, size_t * image_slice_pitch, uint32_t num_events_in_wait_list, cl_event * event_wait_list, cl_event * event, int32_t * errcode_ret); @param origin a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param range a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param image_row_pitch a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param image_slice_pitch a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param event_wait_list a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param event a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param errcode_ret a direct {@link java.nio.IntBuffer} */ public ByteBuffer clEnqueueMapImage(long command_queue, long image, int blocking_map, long map_flags, NativeSizeBuffer origin, NativeSizeBuffer range, NativeSizeBuffer image_row_pitch, NativeSizeBuffer image_slice_pitch, int num_events_in_wait_list, NativeSizeBuffer event_wait_list, NativeSizeBuffer event, IntBuffer errcode_ret) { if (origin != null && !origin.isDirect()) { throw new CLException("Argument \"origin\" was not a direct buffer"); } if (range != null && !range.isDirect()) { throw new CLException("Argument \"range\" was not a direct buffer"); } if (image_row_pitch != null && !image_row_pitch.isDirect()) { throw new CLException("Argument \"image_row_pitch\" was not a direct buffer"); } if (image_slice_pitch != null && !image_slice_pitch.isDirect()) { throw new CLException("Argument \"image_slice_pitch\" was not a direct buffer"); } if (event_wait_list != null && !event_wait_list.isDirect()) { throw new CLException("Argument \"event_wait_list\" was not a direct buffer"); } if (event != null && !event.isDirect()) { throw new CLException("Argument \"event\" was not a direct buffer"); } if (errcode_ret != null && !errcode_ret.isDirect()) { throw new CLException("Argument \"errcode_ret\" was not a direct buffer"); } final long mapImageAddress = addressTable._addressof_clEnqueueMapImage; if (mapImageAddress == 0) { throw new UnsupportedOperationException("Method not available"); } final long getImageInfoAddress = addressTable._addressof_clGetImageInfo; if (getImageInfoAddress == 0) { throw new UnsupportedOperationException("Method not available"); } ByteBuffer _res; _res = clEnqueueMapImage0(command_queue, image, blocking_map, map_flags, origin != null ? origin.getBuffer() : null, getDirectBufferByteOffset(origin), range != null ? range.getBuffer() : null, getDirectBufferByteOffset(range), image_row_pitch != null ? image_row_pitch.getBuffer() : null, getDirectBufferByteOffset(image_row_pitch), image_slice_pitch != null ? image_slice_pitch.getBuffer() : null, getDirectBufferByteOffset(image_slice_pitch), num_events_in_wait_list, event_wait_list != null ? event_wait_list.getBuffer() : null, getDirectBufferByteOffset(event_wait_list), event != null ? event.getBuffer() : null, getDirectBufferByteOffset(event), errcode_ret, getDirectBufferByteOffset(errcode_ret)); if (_res == null) { return null; } nativeOrder(_res); return _res; } /** Entry point to C language function: void * {@native clEnqueueMapImage}(cl_command_queue command_queue, cl_mem image, uint32_t blocking_map, uint64_t map_flags, const size_t * , const size_t * , size_t * image_row_pitch, size_t * image_slice_pitch, uint32_t num_events_in_wait_list, cl_event * event_wait_list, cl_event * event, int32_t * errcode_ret); @param origin a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param range a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param image_row_pitch a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param image_slice_pitch a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param event_wait_list a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param event a direct {@link com.jogamp.gluegen.common.nio.NativeSizeBuffer} @param errcode_ret a direct {@link java.nio.IntBuffer} */ private native ByteBuffer clEnqueueMapImage0(long command_queue, long image, int blocking_map, long map_flags, Object origin, int origin_byte_offset, Object range, int range_byte_offset, Object image_row_pitch, int image_row_pitch_byte_offset, Object image_slice_pitch, int image_slice_pitch_byte_offset, int num_events_in_wait_list, Object event_wait_list, int event_wait_list_byte_offset, Object event, int event_byte_offset, Object errcode_ret, int errcode_ret_byte_offset); /** * Returns the extension function address for the given function name. */ public long clGetExtensionFunctionAddress(String name) { ByteBuffer res = super.clGetExtensionFunctionAddressImpl(name); if(res == null) { return 0; }else if (Platform.is32Bit()) { return res.getInt(); } else { return res.getLong(); } } public CLProcAddressTable getAddressTable() { return addressTable; } /* private static void convert32To64(long[] values) { if (values.length % 2 == 1) { values[values.length - 1] = values[values.length / 2] >>> 32; } for (int i = values.length - 1 - values.length % 2; i >= 0; i -= 2) { long temp = values[i / 2]; values[i - 1] = temp >>> 32; values[i] = temp & 0x00000000FFFFFFFFL; } } */ }