1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
/******************************************************************************
* Copyright (C) 2016 - 2022 Advanced Micro Devices, Inc. All rights reserved.
*
* 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 "rocfft/rocfft.h"
#include <hip/hip_runtime_api.h>
#include <hip/hip_vector_types.h>
#include <iostream>
#include <vector>
int main()
{
const size_t N = 16;
std::vector<double2> cx(N);
for(size_t i = 0; i < N; i++)
{
cx[i].x = i + (i % 3) - (i % 7);
cx[i].y = 0;
}
// rocfft gpu compute
// ========================================
if(rocfft_setup() != rocfft_status_success)
throw std::runtime_error("rocfft_setup failed.");
size_t Nbytes = N * sizeof(double2);
// Create HIP device object.
double2* x;
if(hipMalloc(&x, Nbytes) != hipSuccess)
throw std::runtime_error("hipMalloc failed.");
// Copy data to device
if(hipMemcpy(x, &cx[0], Nbytes, hipMemcpyHostToDevice) != hipSuccess)
throw std::runtime_error("hipMemcpy failed.");
// Create plan
rocfft_plan plan = NULL;
size_t length = N;
if(rocfft_plan_create(&plan,
rocfft_placement_inplace,
rocfft_transform_type_complex_forward,
rocfft_precision_double,
1,
&length,
1,
NULL)
!= rocfft_status_success)
throw std::runtime_error("rocfft_plan_create failed.");
// Check if the plan requires a work buffer
size_t work_buf_size = 0;
if(rocfft_plan_get_work_buffer_size(plan, &work_buf_size) != rocfft_status_success)
throw std::runtime_error("rocfft_plan_get_work_buffer_size failed.");
void* work_buf = nullptr;
rocfft_execution_info info = nullptr;
if(work_buf_size)
{
if(rocfft_execution_info_create(&info) != rocfft_status_success)
throw std::runtime_error("rocfft_execution_info_create failed.");
if(hipMalloc(&work_buf, work_buf_size) != hipSuccess)
throw std::runtime_error("hipMalloc failed.");
if(rocfft_execution_info_set_work_buffer(info, work_buf, work_buf_size)
!= rocfft_status_success)
throw std::runtime_error("rocfft_execution_info_set_work_buffer failed.");
}
// Execute plan
if(rocfft_execute(plan, (void**)&x, NULL, info) != rocfft_status_success)
throw std::runtime_error("rocfft_execute failed.");
if(hipDeviceSynchronize() != hipSuccess)
throw std::runtime_error("hipDeviceSynchronize failed.");
// Clean up work buffer
if(work_buf_size)
{
if(hipFree(work_buf) != hipSuccess)
throw std::runtime_error("hipFree failed.");
if(rocfft_execution_info_destroy(info) != rocfft_status_success)
throw std::runtime_error("rocfft_execution_info_destroy failed.");
info = nullptr;
}
// Destroy plan
if(rocfft_plan_destroy(plan) != rocfft_status_success)
throw std::runtime_error("rocfft_plan_destroy failed.");
plan = nullptr;
// Copy result back to host
std::vector<double2> y(N);
if(hipMemcpy(&y[0], x, Nbytes, hipMemcpyDeviceToHost) != hipSuccess)
throw std::runtime_error("hipMemcpy failed.");
for(size_t i = 0; i < N; i++)
{
std::cout << "element " << i << " input: (" << cx[i].x << "," << cx[i].y << ")"
<< " output: (" << y[i].x << "," << y[i].y << ")" << std::endl;
}
if(hipFree(x) != hipSuccess)
throw std::runtime_error("hipFree failed.");
if(rocfft_cleanup() != rocfft_status_success)
throw std::runtime_error("rocfft_cleanup failed.");
return 0;
}
|
