1 // Copyright (c) 2017-2026, Lawrence Livermore National Security, LLC and other CEED contributors.
2 // All Rights Reserved. See the top-level LICENSE and NOTICE files for details.
3 //
4 // SPDX-License-Identifier: BSD-2-Clause
5 //
6 // This file is part of CEED: http://github.com/ceed
7
8 #include <ceed.h>
9 #include <ceed/backend.h>
10 #include <stdbool.h>
11 #include <string.h>
12
13 #include "ceed-opt.h"
14
15 //------------------------------------------------------------------------------
16 // Backend Destroy
17 //------------------------------------------------------------------------------
CeedDestroy_Opt(Ceed ceed)18 static int CeedDestroy_Opt(Ceed ceed) {
19 Ceed_Opt *data;
20
21 CeedCallBackend(CeedGetData(ceed, &data));
22 CeedCallBackend(CeedFree(&data));
23 return CEED_ERROR_SUCCESS;
24 }
25
26 //------------------------------------------------------------------------------
27 // Backend Init
28 //------------------------------------------------------------------------------
CeedInit_Opt_Serial(const char * resource,Ceed ceed)29 static int CeedInit_Opt_Serial(const char *resource, Ceed ceed) {
30 Ceed ceed_ref;
31 Ceed_Opt *data;
32
33 CeedCheck(!strcmp(resource, "/cpu/self") || !strcmp(resource, "/cpu/self/opt/serial"), ceed, CEED_ERROR_BACKEND,
34 "Opt backend cannot use resource: %s", resource);
35 CeedCallBackend(CeedSetDeterministic(ceed, true));
36
37 // Create reference Ceed that implementation will be dispatched through unless overridden
38 CeedCallBackend(CeedInit("/cpu/self/ref/serial", &ceed_ref));
39 CeedCallBackend(CeedSetDelegate(ceed, ceed_ref));
40 CeedCallBackend(CeedDestroy(&ceed_ref));
41
42 CeedCallBackend(CeedSetBackendFunction(ceed, "Ceed", ceed, "Destroy", CeedDestroy_Opt));
43 CeedCallBackend(CeedSetBackendFunction(ceed, "Ceed", ceed, "TensorContractCreate", CeedTensorContractCreate_Opt));
44 CeedCallBackend(CeedSetBackendFunction(ceed, "Ceed", ceed, "OperatorCreate", CeedOperatorCreate_Opt));
45
46 // Set block size
47 CeedCallBackend(CeedCalloc(1, &data));
48 data->block_size = 1;
49 CeedCallBackend(CeedSetData(ceed, data));
50 return CEED_ERROR_SUCCESS;
51 }
52
53 //------------------------------------------------------------------------------
54 // Backend Register
55 //------------------------------------------------------------------------------
CeedRegister_Opt_Serial(void)56 CEED_INTERN int CeedRegister_Opt_Serial(void) { return CeedRegister("/cpu/self/opt/serial", CeedInit_Opt_Serial, 45); }
57
58 //------------------------------------------------------------------------------
59