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 <stdbool.h> 20 #include <string.h> 21 #include "ceed-xsmm.h" 22 23 //------------------------------------------------------------------------------ 24 // Backend Init 25 //------------------------------------------------------------------------------ 26 static int CeedInit_Xsmm_Blocked(const char *resource, Ceed ceed) { 27 int ierr; 28 if (strcmp(resource, "/cpu/self") && strcmp(resource, "/cpu/self/xsmm") && 29 strcmp(resource, "/cpu/self/xsmm/blocked")) 30 // LCOV_EXCL_START 31 return CeedError(ceed, CEED_ERROR_BACKEND, 32 "blocked libXSMM backend cannot use resource: %s", 33 resource); 34 // LCOV_EXCL_STOP 35 ierr = CeedSetDeterministic(ceed, true); CeedChkBackend(ierr); 36 37 // Create reference CEED that implementation will be dispatched 38 // through unless overridden 39 Ceed ceed_ref; 40 CeedInit("/cpu/self/opt/blocked", &ceed_ref); 41 ierr = CeedSetDelegate(ceed, ceed_ref); CeedChkBackend(ierr); 42 43 if (CEED_SCALAR_TYPE == CEED_SCALAR_FP64) { 44 ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "TensorContractCreate", 45 CeedTensorContractCreate_f64_Xsmm); 46 CeedChkBackend(ierr); 47 } else { 48 ierr = CeedSetBackendFunction(ceed, "Ceed", ceed, "TensorContractCreate", 49 CeedTensorContractCreate_f32_Xsmm); 50 CeedChkBackend(ierr); 51 } 52 53 return CEED_ERROR_SUCCESS; 54 } 55 56 //------------------------------------------------------------------------------ 57 // Backend Register 58 //------------------------------------------------------------------------------ 59 CEED_INTERN int CeedRegister_Xsmm_Blocked(void) { 60 return CeedRegister("/cpu/self/xsmm/blocked", CeedInit_Xsmm_Blocked, 20); 61 } 62 //------------------------------------------------------------------------------ 63