- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我有一些运行良好的 OpenCL 代码,如下所示:
# ocl_helpers.h
typedef struct {
cl_context context;
cl_command_queue queue;
cl_device_id device;
cl_platform_id platform;
} OpenCLEnvironment;
OpenCLEnvironment * get_ocl_env() {
cl_int status;
cl_uint num_platforms = 0;
cl_platform_id *platforms = NULL;
status = clGetPlatformIDs(0, NULL, &num_platforms);
platforms = (cl_platform_id*)malloc(sizeof(cl_platform_id) * num_platforms);
if(platforms == NULL) {
fprintf(stdout, "Malloc failed for platforms...\n");
exit(1);
}
status = clGetPlatformIDs(num_platforms, platforms, NULL);
cl_uint num_devices = 0;
cl_device_id *devices = NULL;
status = clGetDeviceIDs(platforms[0], CL_DEVICE_TYPE_ALL, 0, NULL, &num_devices);
devices = (cl_device_id*)malloc(sizeof(cl_device_id) * num_devices);
if(devices == NULL) {
fprintf(stdout, "Malloc failed for devices...\n");
exit(1);
}
status = clGetDeviceIDs(platforms[0], CL_DEVICE_TYPE_ALL, num_devices, devices, NULL);
cl_context context = CHECK_WITH_ERR_ARG(clCreateContext, status, NULL, num_devices, devices, NULL, NULL);
cl_command_queue command_queue = CHECK_WITH_ERR_ARG(clCreateCommandQueue, status, context, devices[0], 0);
OpenCLEnvironment *ocl_env = (OpenCLEnvironment *)malloc(sizeof(OpenCLEnvironment));
if(ocl_env == NULL) {
fprintf(stdout, "Malloc failed for OCL env...\n");
exit(1);
}
ocl_env->context = context;
ocl_env->queue = command_queue;
ocl_env->device = devices[0];
ocl_env->platform = platforms[0];
// Free the devices list here - no need to keep it since we copied over device
free(devices);
// Likewise for platforms
free(platforms);
return ocl_env;
}
# matmul.c
// System includes
#include <stdbool.h>
#include <stdio.h>
#include <stdlib.h>
// Single header for OpenCL and associated helpers
#include "ocl_helpers.h"
const char* program_source =
"__kernel \n"
"void vecmad(__global float *A, \n"
" __global float *B, \n"
" __global float *C, \n"
" int M, int N, int K) { \n"
" int idx = get_global_id(0); \n"
" int col = idx % M; \n"
" int row = (idx - col); \n"
" C[row + col] = 0.0f; \n"
" for(int k = 0; k < K; ++k) { \n"
" C[row + col] += A[row + k] * B[k*N + col]; \n"
" } \n"
"} \n";
int main(int argc, char **args) {
// Initialise host-side memory
int N = 16;
int n_elements = N*N;
int data_size = n_elements * sizeof(float);
printf("%d, %d\n", n_elements, data_size);
float *A = get_ptr(n_elements), *B = get_ptr(n_elements), *C = get_ptr(n_elements);
for(int i = 0; i < n_elements; ++i) {
float val = (float)(i % N);
A[i] = val;
B[i] = val;
C[i] = 0.0f;
}
print_sq_matrix(A, N);
print_sq_matrix(B, N);
printf("Host-memory initialised...\n");
cl_int status;
OpenCLEnvironment *env = get_ocl_env();
// Get max sizes // Offending block
size_t store[3] = { 0 }; // Offending block
CHECK_WITH_ERR_RES(clGetDeviceInfo, status, env->device, // Offending block
CL_DEVICE_MAX_WORK_ITEM_SIZES, sizeof(store), store, NULL);// Offending block
cl_mem buf_A = CHECK_WITH_ERR_ARG(clCreateBuffer, status,
env->context, CL_MEM_READ_ONLY,
data_size, NULL);
cl_mem buf_B = CHECK_WITH_ERR_ARG(clCreateBuffer, status,
env->context, CL_MEM_READ_ONLY,
data_size, NULL);
cl_mem buf_C = CHECK_WITH_ERR_ARG(clCreateBuffer, status,
env->context, CL_MEM_WRITE_ONLY,
data_size, NULL);
CHECK_WITH_ERR_RES(clEnqueueWriteBuffer, status, env->queue,
buf_A, CL_FALSE, 0, data_size, A, 0, NULL, NULL);
CHECK_WITH_ERR_RES(clEnqueueWriteBuffer, status, env->queue,
buf_B, CL_FALSE, 0, data_size, B, 0, NULL, NULL);
printf("OpenCL machinery and buffers initialised, buffers written to...\n");
cl_program program = CHECK_WITH_ERR_ARG(clCreateProgramWithSource, status,
env->context, 1,
(const char**)&program_source, NULL);
CHECK_WITH_ERR_RES(clBuildProgram, status, program, 1, &(env->device),
NULL, NULL, NULL);
printf("Program built...\n");
cl_kernel kernel = CHECK_WITH_ERR_ARG(clCreateKernel, status, program,
"vecmad");
set_kernel_args(&kernel, buf_A, buf_B, buf_C, N, N, N);
size_t globalws[1] = {256};
status = clEnqueueNDRangeKernel(env->queue, kernel, 2, NULL, globalws, NULL, 0, NULL, NULL);
if(status != CL_SUCCESS) {
printf("%d\n", status);
exit(1);
}
printf("Kernel queued...\n");
// Wait on the kernel to finish
CHECK_WITH_ERR_RES(clFinish, status, env->queue);
// Read buffer and do some stuff
...
}
这段代码的问题是,如果我注释掉上面所示的整个“有问题的” block ,内核就会挂起,输出如下:
$ ./matmul
...
Host-memory initialised...
OpenCL machinery and buffers initialised, buffers written to...
Program built...
Kernel args set...
Kernel queued...
# hangs here
真正奇怪的部分是,如果我只注释掉对 clGetDeviceInfo 的调用,则会收到 -63 (CL_INVALID_GLOBAL_WORK_SIZE) 错误。我在 get_ocl_env()
中的设备和平台有问题吗?
最佳答案
NumPy 。在对 clEnqueueNDRangeKernel 的调用中,我将 2 列为工作项中的维度数,仅指定了一个维度:
status = clEnqueueNDRangeKernel(env->queue, kernel, 2, // <-- should be 1
NULL, globalws, NULL, 0, NULL, NULL);
看这里: https://www.khronos.org/registry/OpenCL/sdk/1.2/docs/man/xhtml/clEnqueueNDRangeKernel.html
关于内核运行需要调用 clGetDeviceInfo,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/56686701/
我正在尝试用 C 语言编写一个使用 gstreamer 的 GTK+ 应用程序。 GTK+ 需要 gtk_main() 来执行。 gstreamer 需要 g_main_loop_run() 来执行。
我已经使用 apt-get 安装了 opencv。我得到了以下版本的opencv2,它工作正常: rover@rover_pi:/usr/lib/arm-linux-gnueabihf $ pytho
我有一个看起来像这样的 View 层次结构(基于其他答案和 Apple 的使用 UIScrollView 的高级 AutoLayout 指南): ScrollView 所需的2 个步骤是: 为 Scr
我尝试安装 udev。 udev 在 ./configure 期间给我一个错误 --exists: command not found configure: error: pkg-config and
我正在使用 SQLite 3。我有一个表,forums,有 150 行,还有一个表,posts,有大约 440 万行。每个帖子都属于一个论坛。 我想从每个论坛中选择最新帖子的时间戳。如果我使用 SEL
使用 go 和以下包: github.com/julienschmidt/httprouter github.com/shwoodard/jsonapi gopkg.in/mgo.v2/bson
The database仅包含 2 个表: 钱包(100 万行) 事务(1500 万行) CockroachDB 19.2.6 在 3 台 Ubuntu 机器上运行 每个 2vCPU 每个 8GB R
我很难理解为什么在下面的代码中直接调用 std::swap() 会导致编译错误,而使用 std::iter_swap 编译却没有任何错误. 来自 iter_swap() versus swap() -
我有一个非常简单的 SELECT *用 WHERE NOT EXISTS 查询条款。 SELECT * FROM "BMAN_TP3"."TT_SPLDR_55E63A28_59358" SELECT
我试图按部分组织我的 .css 文件,我需要从任何文件访问文件组中的任何类。在 Less 中,我可以毫无问题地创建一个包含所有文件导入的主文件,并且每个文件都导入主文件,但在 Sass 中,我收到一个
Microsoft.AspNet.SignalR.Redis 和 StackExchange.Redis.Extensions.Core 在同一个项目中使用。前者需要StackExchange.Red
这个问题在这里已经有了答案: Updating from Rails 4.0 to 4.1 gives sass-rails railties version conflicts (4 个答案) 关
我们有一些使用 Azure DevOps 发布管道部署到的现场服务器。我们已经使用这些发布管道几个月了,没有出现任何问题。今天,我们在下载该项目的工件时开始出现身份验证错误。 部署组中的节点显示在线,
Tip: instead of creating indexes here, run queries in your code – if you're missing any indexes, you
你能解释一下 Elm 下一个声明中的意思吗? (=>) = (,) 我在 Elm architecture tutorial 的例子中找到了它 最佳答案 这是中缀符号。实际上,这定义了一个函数 (=>
我需要一个 .NET 程序集查看器,它可以显示低级详细信息,例如元数据表内容等。 最佳答案 ildasm 是 IL 反汇编程序,具有低级托管元数据 token 信息。安装 Visual Studio
我有两个列表要在 Excel 中进行比较。这是一个很长的列表,我需要一个 excel 函数或 vba 代码来执行此操作。我已经没有想法了,因此转向你: **Old List** A
Closed. This question does not meet Stack Overflow guidelines。它当前不接受答案。 想要改善这个问题吗?更新问题,以便将其作为on-topi
我正在学习 xml 和 xml 处理。我无法很好地理解命名空间的存在。 我了解到命名空间帮助我们在 xml 中分离相同命名的元素。我们不能通过具有相同名称的属性来区分元素吗?为什么命名空间很重要或需要
我搜索了 Azure 文档、各种社区论坛和 google,但没有找到关于需要在公司防火墙上打开哪些端口以允许 Azure 所有组件(blob、sql、compute、bus、publish)的简洁声明
我是一名优秀的程序员,十分优秀!