2012-04-20 16:56:19 +02:00
|
|
|
//
|
|
|
|
|
// 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
|
2013-04-21 13:52:08 -07:00
|
|
|
// 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.
|
2012-04-20 16:56:19 +02:00
|
|
|
//
|
|
|
|
|
|
|
|
|
|
#include "api/util.hpp"
|
2013-04-06 14:35:00 +02:00
|
|
|
#include "core/platform.hpp"
|
2012-04-20 16:56:19 +02:00
|
|
|
|
|
|
|
|
using namespace clover;
|
|
|
|
|
|
2013-09-17 23:13:48 -07:00
|
|
|
namespace {
|
|
|
|
|
platform _clover_platform;
|
|
|
|
|
}
|
2013-04-06 14:35:00 +02:00
|
|
|
|
2013-10-06 13:52:02 -07:00
|
|
|
CLOVER_API cl_int
|
2013-09-16 18:26:04 -07:00
|
|
|
clGetPlatformIDs(cl_uint num_entries, cl_platform_id *rd_platforms,
|
|
|
|
|
cl_uint *rnum_platforms) {
|
|
|
|
|
if ((!num_entries && rd_platforms) ||
|
|
|
|
|
(!rnum_platforms && !rd_platforms))
|
2012-04-20 16:56:19 +02:00
|
|
|
return CL_INVALID_VALUE;
|
|
|
|
|
|
2013-09-16 18:26:04 -07:00
|
|
|
if (rnum_platforms)
|
|
|
|
|
*rnum_platforms = 1;
|
|
|
|
|
if (rd_platforms)
|
|
|
|
|
*rd_platforms = desc(_clover_platform);
|
2012-04-20 16:56:19 +02:00
|
|
|
|
|
|
|
|
return CL_SUCCESS;
|
|
|
|
|
}
|
|
|
|
|
|
2013-10-06 13:52:02 -07:00
|
|
|
cl_int
|
|
|
|
|
clover::GetPlatformInfo(cl_platform_id d_platform, cl_platform_info param,
|
|
|
|
|
size_t size, void *r_buf, size_t *r_size) try {
|
2013-10-06 13:49:49 -07:00
|
|
|
property_buffer buf { r_buf, size, r_size };
|
|
|
|
|
|
2013-09-16 18:26:04 -07:00
|
|
|
obj(d_platform);
|
2012-04-20 16:56:19 +02:00
|
|
|
|
2013-09-16 18:26:04 -07:00
|
|
|
switch (param) {
|
2012-04-20 16:56:19 +02:00
|
|
|
case CL_PLATFORM_PROFILE:
|
2013-10-06 13:49:49 -07:00
|
|
|
buf.as_string() = "FULL_PROFILE";
|
|
|
|
|
break;
|
2012-04-20 16:56:19 +02:00
|
|
|
|
|
|
|
|
case CL_PLATFORM_VERSION:
|
2013-10-06 13:49:49 -07:00
|
|
|
buf.as_string() = "OpenCL 1.1 MESA " PACKAGE_VERSION;
|
|
|
|
|
break;
|
2012-04-20 16:56:19 +02:00
|
|
|
|
|
|
|
|
case CL_PLATFORM_NAME:
|
2014-08-21 14:50:51 -05:00
|
|
|
buf.as_string() = "Clover";
|
2013-10-06 13:49:49 -07:00
|
|
|
break;
|
2012-04-20 16:56:19 +02:00
|
|
|
|
|
|
|
|
case CL_PLATFORM_VENDOR:
|
2013-10-06 13:49:49 -07:00
|
|
|
buf.as_string() = "Mesa";
|
|
|
|
|
break;
|
2012-04-20 16:56:19 +02:00
|
|
|
|
|
|
|
|
case CL_PLATFORM_EXTENSIONS:
|
2013-10-06 13:52:02 -07:00
|
|
|
buf.as_string() = "cl_khr_icd";
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case CL_PLATFORM_ICD_SUFFIX_KHR:
|
|
|
|
|
buf.as_string() = "MESA";
|
2013-10-06 13:49:49 -07:00
|
|
|
break;
|
2012-04-20 16:56:19 +02:00
|
|
|
|
|
|
|
|
default:
|
2013-10-06 13:49:49 -07:00
|
|
|
throw error(CL_INVALID_VALUE);
|
2012-04-20 16:56:19 +02:00
|
|
|
}
|
2013-10-06 13:49:49 -07:00
|
|
|
|
|
|
|
|
return CL_SUCCESS;
|
|
|
|
|
|
|
|
|
|
} catch (error &e) {
|
|
|
|
|
return e.get();
|
2012-04-20 16:56:19 +02:00
|
|
|
}
|
2013-10-06 13:52:02 -07:00
|
|
|
|
|
|
|
|
void *
|
|
|
|
|
clover::GetExtensionFunctionAddress(const char *p_name) {
|
|
|
|
|
std::string name { p_name };
|
|
|
|
|
|
|
|
|
|
if (name == "clIcdGetPlatformIDsKHR")
|
|
|
|
|
return reinterpret_cast<void *>(IcdGetPlatformIDsKHR);
|
|
|
|
|
else
|
|
|
|
|
return NULL;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
cl_int
|
|
|
|
|
clover::IcdGetPlatformIDsKHR(cl_uint num_entries, cl_platform_id *rd_platforms,
|
|
|
|
|
cl_uint *rnum_platforms) {
|
|
|
|
|
return clGetPlatformIDs(num_entries, rd_platforms, rnum_platforms);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
CLOVER_ICD_API cl_int
|
|
|
|
|
clGetPlatformInfo(cl_platform_id d_platform, cl_platform_info param,
|
|
|
|
|
size_t size, void *r_buf, size_t *r_size) {
|
|
|
|
|
return GetPlatformInfo(d_platform, param, size, r_buf, r_size);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
CLOVER_ICD_API void *
|
|
|
|
|
clGetExtensionFunctionAddress(const char *p_name) {
|
|
|
|
|
return GetExtensionFunctionAddress(p_name);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
CLOVER_ICD_API cl_int
|
|
|
|
|
clIcdGetPlatformIDsKHR(cl_uint num_entries, cl_platform_id *rd_platforms,
|
|
|
|
|
cl_uint *rnum_platforms) {
|
|
|
|
|
return IcdGetPlatformIDsKHR(num_entries, rd_platforms, rnum_platforms);
|
|
|
|
|
}
|