Francisco Jerez
131 lines
3.8 KiB
C++
131 lines
3.8 KiB
C++
//
|
|
// Copyright 2012 Francisco Jerez
|
|
//
|
|
// 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 "api/util.hpp"
|
|
#include "core/context.hpp"
|
|
|
|
using namespace clover;
|
|
|
|
PUBLIC cl_context
|
|
clCreateContext(const cl_context_properties *d_props, cl_uint num_devs,
|
|
const cl_device_id *d_devs,
|
|
void (CL_CALLBACK *pfn_notify)(const char *, const void *,
|
|
size_t, void *),
|
|
void *user_data, cl_int *r_errcode) try {
|
|
auto props = property_map(d_props);
|
|
auto devs = objs(d_devs, num_devs);
|
|
|
|
if (!pfn_notify && user_data)
|
|
throw error(CL_INVALID_VALUE);
|
|
|
|
for (auto prop : props) {
|
|
if (prop.first != CL_CONTEXT_PLATFORM)
|
|
throw error(CL_INVALID_PROPERTY);
|
|
}
|
|
|
|
ret_error(r_errcode, CL_SUCCESS);
|
|
return desc(new context(property_vector(props), devs));
|
|
|
|
} catch (error &e) {
|
|
ret_error(r_errcode, e);
|
|
return NULL;
|
|
}
|
|
|
|
PUBLIC cl_context
|
|
clCreateContextFromType(const cl_context_properties *d_props,
|
|
cl_device_type type,
|
|
void (CL_CALLBACK *pfn_notify)(
|
|
const char *, const void *, size_t, void *),
|
|
void *user_data, cl_int *r_errcode) try {
|
|
cl_platform_id d_platform;
|
|
cl_uint num_platforms;
|
|
cl_device_id d_dev;
|
|
cl_int ret;
|
|
|
|
ret = clGetPlatformIDs(1, &d_platform, &num_platforms);
|
|
if (ret || !num_platforms)
|
|
throw error(CL_INVALID_PLATFORM);
|
|
|
|
ret = clGetDeviceIDs(d_platform, type, 1, &d_dev, 0);
|
|
if (ret)
|
|
throw error(CL_DEVICE_NOT_FOUND);
|
|
|
|
return clCreateContext(d_props, 1, &d_dev, pfn_notify, user_data, r_errcode);
|
|
|
|
} catch (error &e) {
|
|
ret_error(r_errcode, e);
|
|
return NULL;
|
|
}
|
|
|
|
PUBLIC cl_int
|
|
clRetainContext(cl_context d_ctx) try {
|
|
obj(d_ctx).retain();
|
|
return CL_SUCCESS;
|
|
|
|
} catch (error &e) {
|
|
return e.get();
|
|
}
|
|
|
|
PUBLIC cl_int
|
|
clReleaseContext(cl_context d_ctx) try {
|
|
if (obj(d_ctx).release())
|
|
delete pobj(d_ctx);
|
|
|
|
return CL_SUCCESS;
|
|
|
|
} catch (error &e) {
|
|
return e.get();
|
|
}
|
|
|
|
PUBLIC cl_int
|
|
clGetContextInfo(cl_context d_ctx, cl_context_info param,
|
|
size_t size, void *r_buf, size_t *r_size) try {
|
|
property_buffer buf { r_buf, size, r_size };
|
|
auto &ctx = obj(d_ctx);
|
|
|
|
switch (param) {
|
|
case CL_CONTEXT_REFERENCE_COUNT:
|
|
buf.as_scalar<cl_uint>() = ctx.ref_count();
|
|
break;
|
|
|
|
case CL_CONTEXT_NUM_DEVICES:
|
|
buf.as_scalar<cl_uint>() = ctx.devs.size();
|
|
break;
|
|
|
|
case CL_CONTEXT_DEVICES:
|
|
buf.as_vector<cl_device_id>() = descs(map(derefs(), ctx.devs));
|
|
break;
|
|
|
|
case CL_CONTEXT_PROPERTIES:
|
|
buf.as_vector<cl_context_properties>() = ctx.props();
|
|
break;
|
|
|
|
default:
|
|
throw error(CL_INVALID_VALUE);
|
|
}
|
|
|
|
return CL_SUCCESS;
|
|
|
|
} catch (error &e) {
|
|
return e.get();
|
|
}
|