annotate src/test/vectorAddDrv.cc @ 405:8915fce522b3

Fix shutdown TaskManager
author Tatsuki IHA <innparusu@cr.ie.u-ryukyu.ac.jp>
date Tue, 05 Sep 2017 16:46:31 +0900
parents 8bbc0012e1a4
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 /*
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
2 * Copyright 1993-2015 NVIDIA Corporation. All rights reserved.
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
3 *
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 * Please refer to the NVIDIA end user license agreement (EULA) associated
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
5 * with this source code for terms and conditions that govern your use of
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
6 * this software. Any use, reproduction, disclosure, or distribution of
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
7 * this software and related documentation outside the terms of the EULA
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
8 * is strictly prohibited.
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
9 *
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
10 */
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
11
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
12 /* Vector addition: C = A + B.
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
13 *
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
14 * This sample is a very basic sample that implements element by element
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
15 * vector addition. It is the same as the sample illustrating Chapter 3
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
16 * of the programming guide with some additions like error checking.
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
17 *
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
18 */
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
19
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
20 // Includes
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
21 #include <stdio.h>
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
22 #include <string.h>
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
23 #include <iostream>
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
24 #include <cstring>
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
25 #include <math.h>
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
26
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
27 // includes, project
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
28 #include <driver_types.h>
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
29 #include <cuda_runtime.h>
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
30 #include <cuda.h>
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
31 #include "helper_cuda.h"
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
32
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
33 // includes, CUDA
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
34 #include <builtin_types.h>
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
35
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
36 #define PTX_FILE "vectorAdd_kernel.ptx"
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
37
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
38
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
39 using namespace std;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
40
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
41 // Variables
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
42 CUdevice cuDevice;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
43 CUcontext cuContext;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
44 CUmodule cuModule;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
45 CUfunction vecAdd_kernel;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
46 float *h_A;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
47 float *h_B;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
48 float *h_C;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
49 CUdeviceptr d_A;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
50 CUdeviceptr d_B;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
51 CUdeviceptr d_C;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
52 bool noprompt = false;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
53
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
54 // Functions
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
55 void Cleanup(bool);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
56 CUresult CleanupNoFailure();
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
57 void RandomInit(float *, int);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
58 bool findModulePath(const char *, string &, char **, string &);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
59 void ParseArguments(int, char **);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
60
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
61 int *pArgc = NULL;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
62 char **pArgv = NULL;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
63
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
64
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
65 // Host code
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
66 int main(int argc, char **argv)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
67 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
68 pArgc = &argc;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
69 pArgv = argv;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
70
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
71 printf("Vector Addition (Driver API)\n");
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
72 int N = 50000, devID = 0;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
73 size_t size = N * sizeof(float);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
74
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
75 ParseArguments(argc, argv);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
76
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
77 // Initialize
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
78 checkCudaErrors(cuInit(0));
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
79
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
80 // This assumes that the user is attempting to specify a explicit device -device=n
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
81 if (argc > 1)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
82 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
83 bool bFound = false;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
84
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
85 for (int param=0; param < argc; param++)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
86 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
87 int string_start = 0;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
88
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
89 while (argv[param][string_start] == '-')
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
90 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
91 string_start++;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
92 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
93
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
94 char *string_argv = &argv[param][string_start];
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
95
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
96 if (!strncmp(string_argv, "device", 6))
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
97 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
98 int len=(int)strlen(string_argv);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
99
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
100 while (string_argv[len] != '=')
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
101 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
102 len--;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
103 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
104
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
105 devID = atoi(&string_argv[++len]);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
106 bFound = true;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
107 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
108
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
109 if (bFound)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
110 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
111 break;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
112 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
113 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
114 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
115
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
116 // Get number of devices supporting CUDA
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
117 int deviceCount = 0;
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
118 checkCudaErrors(cuDeviceGetCount(&deviceCount));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
119 if (deviceCount == 0)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
120 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
121 printf("There is no device supporting CUDA.\n");
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
122 Cleanup(false);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
123 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
124
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
125 if (devID < 0)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
126 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
127 devID = 0;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
128 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
129
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
130 if (devID > deviceCount-1)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
131 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
132 fprintf(stderr, "(Device=%d) invalid GPU device. %d GPU device(s) detected.\nexiting...\n", devID, deviceCount);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
133 CleanupNoFailure();
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
134 exit(EXIT_SUCCESS);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
135 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
136 else
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
137 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
138 int major, minor;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
139 char deviceName[100];
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
140 checkCudaErrors(cuDeviceComputeCapability(&major, &minor, devID));
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
141 checkCudaErrors(cuDeviceGetName(deviceName, 256, devID));
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
142 printf("> Using Device %d: \"%s\" with Compute %d.%d capability\n", devID, deviceName, major, minor);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
143 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
144
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
145 // pick up device with zero ordinal (default, or devID)
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
146 checkCudaErrors(cuDeviceGet(&cuDevice, devID));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
147 // Create context
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
148 checkCudaErrors(cuCtxCreate(&cuContext, 0, cuDevice));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
149 // first search for the module path before we load the results
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
150 string module_path, ptx_source;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
151
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
152 if (!findModulePath(PTX_FILE, module_path, argv, ptx_source))
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
153 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
154 if (!findModulePath("vectorAdd_kernel.cubin", module_path, argv, ptx_source))
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
155 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
156 printf("> findModulePath could not find <vectorAdd> ptx or cubin\n");
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
157 Cleanup(false);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
158 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
159 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
160 else
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
161 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
162 printf("> initCUDA loading module: <%s>\n", module_path.c_str());
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
163 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
164
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
165 // Create module from binary file (PTX or CUBIN)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
166 if (module_path.rfind("ptx") != string::npos)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
167 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
168 // in this branch we use compilation with parameters
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
169 const unsigned int jitNumOptions = 3;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
170 CUjit_option *jitOptions = new CUjit_option[jitNumOptions];
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
171 void **jitOptVals = new void *[jitNumOptions];
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
172
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
173 // set up size of compilation log buffer
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
174 jitOptions[0] = CU_JIT_INFO_LOG_BUFFER_SIZE_BYTES;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
175 int jitLogBufferSize = 1024;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
176 jitOptVals[0] = (void *)(size_t)jitLogBufferSize;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
177
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
178 // set up pointer to the compilation log buffer
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
179 jitOptions[1] = CU_JIT_INFO_LOG_BUFFER;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
180 char *jitLogBuffer = new char[jitLogBufferSize];
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
181 jitOptVals[1] = jitLogBuffer;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
182
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
183 // set up pointer to set the Maximum # of registers for a particular kernel
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
184 jitOptions[2] = CU_JIT_MAX_REGISTERS;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
185 int jitRegCount = 32;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
186 jitOptVals[2] = (void *)(size_t)jitRegCount;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
187
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
188 checkCudaErrors(cuModuleLoadDataEx(&cuModule, ptx_source.c_str(), jitNumOptions, jitOptions, (void **)jitOptVals));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
189
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
190 printf("> PTX JIT log:\n%s\n", jitLogBuffer);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
191 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
192 else
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
193 {
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
194 checkCudaErrors(cuModuleLoad(&cuModule, module_path.c_str()));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
195 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
196
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
197 // Get function handle from module
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
198 checkCudaErrors(cuModuleGetFunction(&vecAdd_kernel, cuModule, "VecAdd_kernel"));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
199
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
200 // Allocate input vectors h_A and h_B in host memory
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
201 h_A = (float *)malloc(size);
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
202 if (h_A == 0) { Cleanup(false); }
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
203
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
204 h_B = (float *)malloc(size);
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
205 if (h_B == 0) { Cleanup(false); }
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
206
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
207 h_C = (float *)malloc(size);
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
208 if (h_C == 0) { Cleanup(false); }
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
209
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
210 // Initialize input vectors
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
211 RandomInit(h_A, N);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
212 RandomInit(h_B, N);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
213
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
214 // Allocate vectors in device memory
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
215 checkCudaErrors(cuMemAlloc(&d_A, size));
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
216 checkCudaErrors(cuMemAlloc(&d_B, size));
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
217 checkCudaErrors(cuMemAlloc(&d_C, size));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
218
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
219 // Copy vectors from host memory to device memory
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
220 checkCudaErrors(cuMemcpyHtoD(d_A, h_A, size));
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
221 checkCudaErrors(cuMemcpyHtoD(d_B, h_B, size));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
222
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
223 #if 1
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
224
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
225 if (1)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
226 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
227 // This is the new CUDA 4.0 API for Kernel Parameter Passing and Kernel Launch (simpler method)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
228
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
229 // Grid/Block configuration
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
230 int threadsPerBlock = 256;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
231 int blocksPerGrid = (N + threadsPerBlock - 1) / threadsPerBlock;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
232
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
233 void *args[] = { &d_A, &d_B, &d_C, &N };
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
234
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
235 // Launch the CUDA kernel
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
236 checkCudaErrors(cuLaunchKernel(vecAdd_kernel, blocksPerGrid, 1, 1,
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
237 threadsPerBlock, 1, 1,
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
238 0,
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
239 NULL, args, NULL));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
240 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
241 else
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
242 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
243 // This is the new CUDA 4.0 API for Kernel Parameter Passing and Kernel Launch (advanced method)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
244 int offset = 0;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
245 void *argBuffer[16];
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
246 *((CUdeviceptr *)&argBuffer[offset]) = d_A;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
247 offset += sizeof(d_A);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
248 *((CUdeviceptr *)&argBuffer[offset]) = d_B;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
249 offset += sizeof(d_B);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
250 *((CUdeviceptr *)&argBuffer[offset]) = d_C;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
251 offset += sizeof(d_C);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
252 *((int *)&argBuffer[offset]) = N;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
253 offset += sizeof(N);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
254
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
255 // Grid/Block configuration
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
256 int threadsPerBlock = 256;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
257 int blocksPerGrid = (N + threadsPerBlock - 1) / threadsPerBlock;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
258
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
259 // Launch the CUDA kernel
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
260 checkCudaErrors(cuLaunchKernel(vecAdd_kernel, blocksPerGrid, 1, 1,
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
261 threadsPerBlock, 1, 1,
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
262 0,
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
263 NULL, NULL, argBuffer));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
264 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
265
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
266 #else
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
267 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
268 char argBuffer[256];
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
269
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
270 // pass in launch parameters (not actually de-referencing CUdeviceptr). CUdeviceptr is
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
271 // storing the value of the parameters
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
272 *((CUdeviceptr *)&argBuffer[offset]) = d_A;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
273 offset += sizeof(d_A);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
274 *((CUdeviceptr *)&argBuffer[offset]) = d_B;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
275 offset += sizeof(d_B);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
276 *((CUdeviceptr *)&argBuffer[offset]) = d_C;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
277 offset += sizeof(d_C);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
278 *((int *)&argBuffer[offset]) = N;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
279 offset += sizeof(N);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
280
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
281 void *kernel_launch_config[5] =
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
282 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
283 CU_LAUNCH_PARAM_BUFFER_POINTER, argBuffer,
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
284 CU_LAUNCH_PARAM_BUFFER_SIZE, &offset,
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
285 CU_LAUNCH_PARAM_END
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
286 };
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
287
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
288 // Grid/Block configuration
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
289 int threadsPerBlock = 256;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
290 int blocksPerGrid = (N + threadsPerBlock - 1) / threadsPerBlock;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
291
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
292 // Launch the CUDA kernel
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
293 checkCudaErrors(cuLaunchKernel(vecAdd_kernel, blocksPerGrid, 1, 1,
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
294 threadsPerBlock, 1, 1,
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
295 0, 0,
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
296 NULL, (void **)&kernel_launch_config));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
297 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
298 #endif
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
299
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
300 #ifdef _DEBUG
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
301 checkCudaErrors(cuCtxSynchronize());
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
302 #endif
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
303
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
304 // Copy result from device memory to host memory
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
305 // h_C contains the result in host memory
300
8bbc0012e1a4 checkErrors on an example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents: 297
diff changeset
306 checkCudaErrors(cuMemcpyDtoH(h_C, d_C, size));
297
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
307
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
308 // Verify result
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
309 int i;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
310
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
311 for (i = 0; i < N; ++i)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
312 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
313 float sum = h_A[i] + h_B[i];
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
314
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
315 if (fabs(h_C[i] - sum) > 1e-7f)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
316 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
317 break;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
318 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
319 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
320
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
321 printf("%s\n", (i==N) ? "Result = PASS" : "Result = FAIL");
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
322
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
323 exit((i==N) ? EXIT_SUCCESS : EXIT_FAILURE);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
324 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
325
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
326 CUresult CleanupNoFailure()
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
327 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
328 CUresult error;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
329
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
330 // Free device memory
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
331 if (d_A)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
332 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
333 error = cuMemFree(d_A);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
334 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
335
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
336 if (d_B)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
337 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
338 error = cuMemFree(d_B);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
339 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
340
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
341 if (d_C)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
342 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
343 error = cuMemFree(d_C);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
344 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
345
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
346 // Free host memory
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
347 if (h_A)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
348 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
349 free(h_A);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
350 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
351
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
352 if (h_B)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
353 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
354 free(h_B);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
355 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
356
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
357 if (h_C)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
358 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
359 free(h_C);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
360 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
361
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
362 error = cuCtxDestroy(cuContext);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
363
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
364 return error;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
365 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
366
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
367 void Cleanup(bool noError)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
368 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
369 CUresult error;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
370 error = CleanupNoFailure();
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
371
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
372 if (!noError || error != CUDA_SUCCESS)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
373 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
374 printf("Function call failed\nFAILED\n");
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
375 exit(EXIT_FAILURE);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
376 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
377
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
378 if (!noprompt)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
379 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
380 printf("\nPress ENTER to exit...\n");
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
381 fflush(stdout);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
382 fflush(stderr);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
383 getchar();
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
384 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
385 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
386
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
387
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
388 // Allocates an array with random float entries.
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
389 void RandomInit(float *data, int n)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
390 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
391 for (int i = 0; i < n; ++i)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
392 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
393 data[i] = rand() / (float)RAND_MAX;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
394 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
395 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
396
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
397 bool inline
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
398 findModulePath(const char *module_file, string &module_path, char **argv, string &ptx_source)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
399 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
400 char *actual_path = sdkFindFilePath(module_file, argv[0]);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
401
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
402 if (actual_path)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
403 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
404 module_path = actual_path;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
405 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
406 else
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
407 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
408 printf("> findModulePath file not found: <%s> \n", module_file);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
409 return false;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
410 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
411
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
412 if (module_path.empty())
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
413 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
414 printf("> findModulePath could not find file: <%s> \n", module_file);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
415 return false;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
416 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
417 else
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
418 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
419 printf("> findModulePath found file at <%s>\n", module_path.c_str());
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
420
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
421 if (module_path.rfind(".ptx") != string::npos)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
422 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
423 FILE *fp = fopen(module_path.c_str(), "rb");
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
424 fseek(fp, 0, SEEK_END);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
425 int file_size = ftell(fp);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
426 char *buf = new char[file_size+1];
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
427 fseek(fp, 0, SEEK_SET);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
428 fread(buf, sizeof(char), file_size, fp);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
429 fclose(fp);
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
430 buf[file_size] = '\0';
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
431 ptx_source = buf;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
432 delete[] buf;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
433 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
434
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
435 return true;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
436 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
437 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
438
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
439 // Parse program arguments
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
440 void ParseArguments(int argc, char **argv)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
441 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
442 for (int i = 0; i < argc; ++i)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
443 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
444 if (strcmp(argv[i], "--noprompt") == 0 ||
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
445 strcmp(argv[i], "-noprompt") == 0)
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
446 {
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
447 noprompt = true;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
448 break;
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
449 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
450 }
b46398081fe4 add working example
Shinji KONO <kono@ie.u-ryukyu.ac.jp>
parents:
diff changeset
451 }