1 // Copyright (c) 2017-2022, 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 //------------------------------------------------------------------------------ 18 static int CeedDestroy_Opt(Ceed ceed) { 19 Ceed_Opt *data; 20 CeedCallBackend(CeedGetData(ceed, &data)); 21 CeedCallBackend(CeedFree(&data)); 22 23 return CEED_ERROR_SUCCESS; 24 } 25 26 //------------------------------------------------------------------------------ 27 // Backend Init 28 //------------------------------------------------------------------------------ 29 static int CeedInit_Opt_Serial(const char *resource, Ceed ceed) { 30 CeedCheck(!strcmp(resource, "/cpu/self") || !strcmp(resource, "/cpu/self/opt/serial"), ceed, CEED_ERROR_BACKEND, 31 "Opt backend cannot use resource: %s", resource); 32 CeedCallBackend(CeedSetDeterministic(ceed, true)); 33 34 // Create reference Ceed that implementation will be dispatched through unless overridden 35 36 Ceed ceed_ref; 37 CeedCallBackend(CeedInit("/cpu/self/ref/serial", &ceed_ref)); 38 CeedCallBackend(CeedSetDelegate(ceed, ceed_ref)); 39 40 // Set fallback Ceed resource for advanced operator functionality 41 const char fallbackresource[] = "/cpu/self/ref/serial"; 42 CeedCallBackend(CeedSetOperatorFallbackResource(ceed, fallbackresource)); 43 44 CeedCallBackend(CeedSetBackendFunction(ceed, "Ceed", ceed, "Destroy", CeedDestroy_Opt)); 45 CeedCallBackend(CeedSetBackendFunction(ceed, "Ceed", ceed, "TensorContractCreate", CeedTensorContractCreate_Opt)); 46 CeedCallBackend(CeedSetBackendFunction(ceed, "Ceed", ceed, "OperatorCreate", CeedOperatorCreate_Opt)); 47 48 // Set block size 49 Ceed_Opt *data; 50 CeedCallBackend(CeedCalloc(1, &data)); 51 data->blk_size = 1; 52 CeedCallBackend(CeedSetData(ceed, data)); 53 54 return CEED_ERROR_SUCCESS; 55 } 56 57 //------------------------------------------------------------------------------ 58 // Backend Register 59 //------------------------------------------------------------------------------ 60 CEED_INTERN int CeedRegister_Opt_Serial(void) { return CeedRegister("/cpu/self/opt/serial", CeedInit_Opt_Serial, 45); } 61 62 //------------------------------------------------------------------------------ 63