xref: /libCEED/backends/cuda-shared/ceed-cuda-shared.c (revision 0d0321e0e600f17fbb9528732fcb5c1d5c63fc0f)
1 // Copyright (c) 2017-2018, Lawrence Livermore National Security, LLC.
2 // Produced at the Lawrence Livermore National Laboratory. LLNL-CODE-734707.
3 // All Rights reserved. See files LICENSE and NOTICE for details.
4 //
5 // This file is part of CEED, a collection of benchmarks, miniapps, software
6 // libraries and APIs for efficient high-order finite element and spectral
7 // element discretizations for exascale applications. For more information and
8 // source code availability see http://github.com/ceed.
9 //
10 // The CEED research is supported by the Exascale Computing Project 17-SC-20-SC,
11 // a collaborative effort of two U.S. Department of Energy organizations (Office
12 // of Science and the National Nuclear Security Administration) responsible for
13 // the planning and preparation of a capable exascale ecosystem, including
14 // software, applications, hardware, advanced system engineering and early
15 // testbed platforms, in support of the nation's exascale computing imperative.
16 
17 #include <ceed/ceed.h>
18 #include <ceed/backend.h>
19 #include <string.h>
20 #include "ceed-cuda-shared.h"
21 
22 //------------------------------------------------------------------------------
23 // Backend init
24 //------------------------------------------------------------------------------
25 static int CeedInit_Cuda_shared(const char *resource, Ceed ceed) {
26   int ierr;
27 
28   if (strcmp(resource, "/gpu/cuda/shared"))
29     // LCOV_EXCL_START
30     return CeedError(ceed, CEED_ERROR_BACKEND,
31                      "Cuda backend cannot use resource: %s", resource);
32   // LCOV_EXCL_STOP
33   ierr = CeedSetDeterministic(ceed, true); CeedChk(ierr);
34 
35   Ceed_Cuda *data;
36   ierr = CeedCalloc(1, &data); CeedChk(ierr);
37   ierr = CeedSetData(ceed, data); CeedChk(ierr);
38   ierr = CeedCudaInit(ceed, resource); CeedChk(ierr);
39 
40   Ceed ceedref;
41   CeedInit("/gpu/cuda/ref", &ceedref);
42   ierr = CeedSetDelegate(ceed, ceedref); CeedChk(ierr);
43 
44   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "BasisCreateTensorH1",
45                                 CeedBasisCreateTensorH1_Cuda_shared);
46   CeedChk(ierr);
47   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "Destroy",
48                                 CeedDestroy_Cuda); CeedChk(ierr);
49   CeedChk(ierr);
50   return 0;
51 }
52 
53 //------------------------------------------------------------------------------
54 // Register backend
55 //------------------------------------------------------------------------------
56 CEED_INTERN int CeedRegister_Cuda_Shared(void) {
57   return CeedRegister("/gpu/cuda/shared", CeedInit_Cuda_shared, 25);
58 }
59 //------------------------------------------------------------------------------
60