re PR c++/81016 (ICE: segfault with template struct specialisation)
[official-gcc.git] / libgomp / oacc-host.c
bloba9203ade5608809aeb210fb13db4ed3024a9e8b3
1 /* OpenACC Runtime Library: acc_device_host.
3 Copyright (C) 2013-2017 Free Software Foundation, Inc.
5 Contributed by Mentor Embedded.
7 This file is part of the GNU Offloading and Multi Processing Library
8 (libgomp).
10 Libgomp is free software; you can redistribute it and/or modify it
11 under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 3, or (at your option)
13 any later version.
15 Libgomp is distributed in the hope that it will be useful, but WITHOUT ANY
16 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
17 FOR A PARTICULAR PURPOSE. See the GNU General Public License for
18 more details.
20 Under Section 7 of GPL version 3, you are granted additional
21 permissions described in the GCC Runtime Library Exception, version
22 3.1, as published by the Free Software Foundation.
24 You should have received a copy of the GNU General Public License and
25 a copy of the GCC Runtime Library Exception along with this program;
26 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
27 <http://www.gnu.org/licenses/>. */
29 #include "libgomp.h"
30 #include "oacc-int.h"
31 #include "gomp-constants.h"
33 #include <stdbool.h>
34 #include <stddef.h>
35 #include <stdint.h>
37 static struct gomp_device_descr host_dispatch;
39 static const char *
40 host_get_name (void)
42 return host_dispatch.name;
45 static unsigned int
46 host_get_caps (void)
48 return host_dispatch.capabilities;
51 static int
52 host_get_type (void)
54 return host_dispatch.type;
57 static int
58 host_get_num_devices (void)
60 return 1;
63 static bool
64 host_init_device (int n __attribute__ ((unused)))
66 return true;
69 static bool
70 host_fini_device (int n __attribute__ ((unused)))
72 return true;
75 static unsigned
76 host_version (void)
78 return GOMP_VERSION;
81 static int
82 host_load_image (int n __attribute__ ((unused)),
83 unsigned v __attribute__ ((unused)),
84 const void *t __attribute__ ((unused)),
85 struct addr_pair **r __attribute__ ((unused)))
87 return 0;
90 static bool
91 host_unload_image (int n __attribute__ ((unused)),
92 unsigned v __attribute__ ((unused)),
93 const void *t __attribute__ ((unused)))
95 return true;
98 static void *
99 host_alloc (int n __attribute__ ((unused)), size_t s)
101 return gomp_malloc (s);
104 static bool
105 host_free (int n __attribute__ ((unused)), void *p)
107 free (p);
108 return true;
111 static bool
112 host_dev2host (int n __attribute__ ((unused)),
113 void *h __attribute__ ((unused)),
114 const void *d __attribute__ ((unused)),
115 size_t s __attribute__ ((unused)))
117 return true;
120 static bool
121 host_host2dev (int n __attribute__ ((unused)),
122 void *d __attribute__ ((unused)),
123 const void *h __attribute__ ((unused)),
124 size_t s __attribute__ ((unused)))
126 return true;
129 static void
130 host_run (int n __attribute__ ((unused)), void *fn_ptr, void *vars,
131 void **args __attribute__((unused)))
133 void (*fn)(void *) = (void (*)(void *)) fn_ptr;
135 fn (vars);
138 static void
139 host_openacc_exec (void (*fn) (void *),
140 size_t mapnum __attribute__ ((unused)),
141 void **hostaddrs,
142 void **devaddrs __attribute__ ((unused)),
143 int async __attribute__ ((unused)),
144 unsigned *dims __attribute ((unused)),
145 void *targ_mem_desc __attribute__ ((unused)))
147 fn (hostaddrs);
150 static void
151 host_openacc_register_async_cleanup (void *targ_mem_desc __attribute__ ((unused)),
152 int async __attribute__ ((unused)))
156 static int
157 host_openacc_async_test (int async __attribute__ ((unused)))
159 return 1;
162 static int
163 host_openacc_async_test_all (void)
165 return 1;
168 static void
169 host_openacc_async_wait (int async __attribute__ ((unused)))
173 static void
174 host_openacc_async_wait_async (int async1 __attribute__ ((unused)),
175 int async2 __attribute__ ((unused)))
179 static void
180 host_openacc_async_wait_all (void)
184 static void
185 host_openacc_async_wait_all_async (int async __attribute__ ((unused)))
189 static void
190 host_openacc_async_set_async (int async __attribute__ ((unused)))
194 static void *
195 host_openacc_create_thread_data (int ord __attribute__ ((unused)))
197 return NULL;
200 static void
201 host_openacc_destroy_thread_data (void *tls_data __attribute__ ((unused)))
205 static struct gomp_device_descr host_dispatch =
207 .name = "host",
208 .capabilities = (GOMP_OFFLOAD_CAP_SHARED_MEM
209 | GOMP_OFFLOAD_CAP_NATIVE_EXEC
210 | GOMP_OFFLOAD_CAP_OPENACC_200),
211 .target_id = 0,
212 .type = OFFLOAD_TARGET_TYPE_HOST,
214 .get_name_func = host_get_name,
215 .get_caps_func = host_get_caps,
216 .get_type_func = host_get_type,
217 .get_num_devices_func = host_get_num_devices,
218 .init_device_func = host_init_device,
219 .fini_device_func = host_fini_device,
220 .version_func = host_version,
221 .load_image_func = host_load_image,
222 .unload_image_func = host_unload_image,
223 .alloc_func = host_alloc,
224 .free_func = host_free,
225 .dev2host_func = host_dev2host,
226 .host2dev_func = host_host2dev,
227 .run_func = host_run,
229 .mem_map = { NULL },
230 /* .lock initilized in goacc_host_init. */
231 .state = GOMP_DEVICE_UNINITIALIZED,
233 .openacc = {
234 .data_environ = NULL,
236 .exec_func = host_openacc_exec,
238 .register_async_cleanup_func = host_openacc_register_async_cleanup,
240 .async_test_func = host_openacc_async_test,
241 .async_test_all_func = host_openacc_async_test_all,
242 .async_wait_func = host_openacc_async_wait,
243 .async_wait_async_func = host_openacc_async_wait_async,
244 .async_wait_all_func = host_openacc_async_wait_all,
245 .async_wait_all_async_func = host_openacc_async_wait_all_async,
246 .async_set_async_func = host_openacc_async_set_async,
248 .create_thread_data_func = host_openacc_create_thread_data,
249 .destroy_thread_data_func = host_openacc_destroy_thread_data,
251 .cuda = {
252 .get_current_device_func = NULL,
253 .get_current_context_func = NULL,
254 .get_stream_func = NULL,
255 .set_stream_func = NULL,
260 /* Initialize and register this device type. */
261 void
262 goacc_host_init (void)
264 gomp_mutex_init (&host_dispatch.lock);
265 goacc_register (&host_dispatch);