xref: /libCEED/rust/libceed-sys/c-src/backends/ref/ceed-ref.c (revision 777ff853944a0dbc06f7f09486fdf4674828e728)
10c784865Scamierjs // Copyright (c) 2017-2018, Lawrence Livermore National Security, LLC.
20c784865Scamierjs // Produced at the Lawrence Livermore National Laboratory. LLNL-CODE-734707.
30c784865Scamierjs // All Rights reserved. See files LICENSE and NOTICE for details.
4ae3cba82Scamierjs //
5ae3cba82Scamierjs // This file is part of CEED, a collection of benchmarks, miniapps, software
6ae3cba82Scamierjs // libraries and APIs for efficient high-order finite element and spectral
7ae3cba82Scamierjs // element discretizations for exascale applications. For more information and
8ae3cba82Scamierjs // source code availability see http://github.com/ceed.
9ae3cba82Scamierjs //
10ae3cba82Scamierjs // The CEED research is supported by the Exascale Computing Project 17-SC-20-SC,
11ae3cba82Scamierjs // a collaborative effort of two U.S. Department of Energy organizations (Office
12ae3cba82Scamierjs // of Science and the National Nuclear Security Administration) responsible for
13ae3cba82Scamierjs // the planning and preparation of a capable exascale ecosystem, including
14ae3cba82Scamierjs // software, applications, hardware, advanced system engineering and early
15ae3cba82Scamierjs // testbed platforms, in support of the nation's exascale computing imperative.
16ae3cba82Scamierjs 
1721617c04Sjeremylt #include "ceed-ref.h"
18ae3cba82Scamierjs 
19f10650afSjeremylt //------------------------------------------------------------------------------
20f10650afSjeremylt // Backend Init
21f10650afSjeremylt //------------------------------------------------------------------------------
22ae3cba82Scamierjs static int CeedInit_Ref(const char *resource, Ceed ceed) {
23fe2413ffSjeremylt   int ierr;
246f7d248dSjeremylt   if (strcmp(resource, "/cpu/self") && strcmp(resource, "/cpu/self/ref")
25856142e1Sjeremylt       && strcmp(resource, "/cpu/self/ref/serial"))
26c042f62fSJeremy L Thompson     // LCOV_EXCL_START
27ae3cba82Scamierjs     return CeedError(ceed, 1, "Ref backend cannot use resource: %s", resource);
28c042f62fSJeremy L Thompson   // LCOV_EXCL_STOP
299525855cSJeremy L Thompson   ierr = CeedSetDeterministic(ceed, true); CeedChk(ierr);
306f7d248dSjeremylt 
31f8902d9eSjeremylt   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "VectorCreate",
32fe2413ffSjeremylt                                 CeedVectorCreate_Ref); CeedChk(ierr);
33fe2413ffSjeremylt   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "BasisCreateTensorH1",
34fe2413ffSjeremylt                                 CeedBasisCreateTensorH1_Ref); CeedChk(ierr);
35fe2413ffSjeremylt   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "BasisCreateH1",
36fe2413ffSjeremylt                                 CeedBasisCreateH1_Ref); CeedChk(ierr);
372f86a920SJeremy L Thompson   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "TensorContractCreate",
382f86a920SJeremy L Thompson                                 CeedTensorContractCreate_Ref); CeedChk(ierr);
39fe2413ffSjeremylt   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "ElemRestrictionCreate",
40fe2413ffSjeremylt                                 CeedElemRestrictionCreate_Ref); CeedChk(ierr);
411dfeef1dSjeremylt   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed,
421dfeef1dSjeremylt                                 "ElemRestrictionCreateBlocked",
43fe2413ffSjeremylt                                 CeedElemRestrictionCreate_Ref); CeedChk(ierr);
44fe2413ffSjeremylt   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "QFunctionCreate",
45fe2413ffSjeremylt                                 CeedQFunctionCreate_Ref); CeedChk(ierr);
46*777ff853SJeremy L Thompson   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "QFunctionContextCreate",
47*777ff853SJeremy L Thompson                                 CeedQFunctionContextCreate_Ref); CeedChk(ierr);
48fe2413ffSjeremylt   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "OperatorCreate",
49fe2413ffSjeremylt                                 CeedOperatorCreate_Ref); CeedChk(ierr);
50c04a41a7SJeremy L Thompson   ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "CompositeOperatorCreate",
51c04a41a7SJeremy L Thompson                                 CeedCompositeOperatorCreate_Ref); CeedChk(ierr);
52ae3cba82Scamierjs   return 0;
53ae3cba82Scamierjs }
54ae3cba82Scamierjs 
55f10650afSjeremylt //------------------------------------------------------------------------------
56f10650afSjeremylt // Backend Register
57f10650afSjeremylt //------------------------------------------------------------------------------
58ae3cba82Scamierjs __attribute__((constructor))
59ae3cba82Scamierjs static void Register(void) {
609ddbf157Sjeremylt //! [Register]
61706bc5e6Sjeremylt   CeedRegister("/cpu/self/ref/serial", CeedInit_Ref, 50);
629ddbf157Sjeremylt //! [Register]
63ae3cba82Scamierjs }
64f10650afSjeremylt //------------------------------------------------------------------------------
65