StarPU Handbook
starpufft.h
Go to the documentation of this file.
1 /* StarPU --- Runtime system for heterogeneous multicore architectures.
2  *
3  * Copyright (C) 2012 Inria
4  * Copyright (C) 2010,2012,2014-2015 CNRS
5  * Copyright (C) 2009,2011,2014 Université de Bordeaux
6  *
7  * StarPU is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU Lesser General Public License as published by
9  * the Free Software Foundation; either version 2.1 of the License, or (at
10  * your option) any later version.
11  *
12  * StarPU is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
15  *
16  * See the GNU Lesser General Public License in COPYING.LGPL for more details.
17  */
18 
19 #include <stdio.h>
20 #include <complex.h>
21 #include <starpu.h>
22 #ifdef STARPU_USE_CUDA
23 #include <cufft.h>
24 #define STARPU_CUFFT_REPORT_ERROR(status) \
25  STARPUFFT(report_error)(__starpu_func__, __FILE__, __LINE__, status)
26 #endif /* !STARPU_USE_CUDA */
27 
28 #define STARPUFFT_FORWARD -1
29 #define STARPUFFT_INVERSE 1
30 
31 #define __STARPUFFT(name) starpufft_##name
32 #define __STARPUFFTF(name) starpufftf_##name
33 #define __STARPUFFTL(name) starpufftl_##name
34 
35 #define __STARPUFFT_INTERFACE(starpufft,real) \
36 typedef real _Complex starpufft(complex); \
37 \
38 typedef struct starpufft(plan) *starpufft(plan); \
39 \
40 starpufft(plan) starpufft(plan_dft_1d)(int n, int sign, unsigned flags); \
41 starpufft(plan) starpufft(plan_dft_2d)(int n, int m, int sign, unsigned flags); \
42 starpufft(plan) starpufft(plan_dft_r2c_1d)(int n, unsigned flags); \
43 starpufft(plan) starpufft(plan_dft_c2r_1d)(int n, unsigned flags); \
44 \
45 void *starpufft(malloc)(size_t n); \
46 void starpufft(free)(void *p); \
47 \
48 int starpufft(execute)(starpufft(plan) p, void *in, void *out); \
49 struct starpu_task *starpufft(start)(starpufft(plan) p, void *in, void *out); \
50 \
51 int starpufft(execute_handle)(starpufft(plan) p, starpu_data_handle_t in, starpu_data_handle_t out); \
52 struct starpu_task *starpufft(start_handle)(starpufft(plan) p, starpu_data_handle_t in, starpu_data_handle_t out); \
53 \
54 void starpufft(cleanup)(starpufft(plan) p); \
55 void starpufft(destroy_plan)(starpufft(plan) p); \
56 \
57 void starpufft(startstats)(void); \
58 void starpufft(stopstats)(void); \
59 void starpufft(showstats)(FILE *out);
60 
61 __STARPUFFT_INTERFACE(__STARPUFFT, double)
62 __STARPUFFT_INTERFACE(__STARPUFFTF, float)
63 __STARPUFFT_INTERFACE(__STARPUFFTL, long double)
64 
65 /* Internal use */
66 extern int starpufft_last_plan_number;