diff options
Diffstat (limited to 'src/nompi.h')
| -rw-r--r-- | src/nompi.h | 215 |
1 files changed, 215 insertions, 0 deletions
diff --git a/src/nompi.h b/src/nompi.h new file mode 100644 index 0000000..165d33d --- /dev/null +++ b/src/nompi.h @@ -0,0 +1,215 @@ +#ifndef NOMPI_H +#define NOMPI_H + +/* Provide (dummy) replacements for many MPI routines in case MPI is + not available */ + +#include <cctk.h> + + + +#ifndef CCTK_MPI + + + +#include <stdlib.h> + + + +typedef ptrdiff_t MPI_Aint; + +typedef int MPI_Comm; /* no content */ + +typedef MPI_Aint MPI_Datatype; + +typedef enum { + MPI_LOR, + MPI_MAX, + MPI_MIN, + MPI_PROD, + MPI_SUM, +} MPI_Op; + +typedef int MPI_Request; /* no content */ + +typedef int MPI_Status; /* no contend */ + + + +MPI_Comm const MPI_COMM_NULL = -1; +MPI_Comm const MPI_COMM_WORLD = 0; + +MPI_Datatype const MPI_DATATYPE_NULL = 0; +MPI_Datatype const MPI_CHAR = sizeof(char ); +MPI_Datatype const MPI_SHORT = sizeof(short ); +MPI_Datatype const MPI_INT = sizeof(int ); +MPI_Datatype const MPI_LONG = sizeof(long ); +MPI_Datatype const MPI_LONG_LONG_INT = sizeof(long long int ); +MPI_Datatype const MPI_UNSIGNED_CHAR = sizeof(unsigned char ); +MPI_Datatype const MPI_UNSIGNED_SHORT = sizeof(unsigned short); +MPI_Datatype const MPI_UNSIGNED = sizeof(unsigned ); +MPI_Datatype const MPI_UNSIGNED_LONG = sizeof(unsigned long ); +MPI_Datatype const MPI_FLOAT = sizeof(float ); +MPI_Datatype const MPI_DOUBLE = sizeof(double ); +MPI_Datatype const MPI_LONG_DOUBLE = sizeof(long double ); +MPI_Datatype const MPI_UB = -1; + +MPI_Request const MPI_REQUEST_NULL = -1; + +MPI_Status* const MPI_STATUSES_IGNORE = NULL; + + + +#ifdef __cplusplus +extern "C" { +#endif + +int +MPI_Abort (MPI_Comm const comm, int const errorcode); + +int +MPI_Allgather (void* const sendbuf, int const sendcnt, + MPI_Datatype const sendtype, + void* const recvbuf, int const recvcnt, + MPI_Datatype const recvtype, + MPI_Comm const comm); + +int +MPI_Allgatherv (void* const sendbuf, int const sendcnt, + MPI_Datatype const sendtype, + void* const recvbuf, int* const recvcnts, int* const recvoffs, + MPI_Datatype const recvtype, + MPI_Comm const comm); + +int +MPI_Allreduce (void* const sendbuf, void* const recvbuf, int const cnt, + MPI_Datatype const datatype, MPI_Op const op, + MPI_Comm const comm); + +int +MPI_Alltoall (void* const sendbuf, int const sendcnt, + MPI_Datatype const sendtype, + void* const recvbuf, int const recvcnt, + MPI_Datatype const recvtype, + MPI_Comm const comm); + +int +MPI_Alltoallv (void* const sendbuf, int* const sendcnts, int* const sendoffs, + MPI_Datatype const sendtype, + void* const recvbuf, int* const recvcnts, int* const recvoffs, + MPI_Datatype const recvtype, + MPI_Comm const comm); + +int +MPI_Barrier (MPI_Comm const comm); + +int +MPI_Bcast (void* const buf, int const cnt, + MPI_Datatype const datatype, + int const root, MPI_Comm const comm); + +int +MPI_Comm_rank (MPI_Comm const comm, int* const rank); + +int +MPI_Comm_size (MPI_Comm const comm, int* const size); + +int +MPI_Comm_split (MPI_Comm const comm, int const color, int const key, + MPI_Comm *const newcomm); + +int +MPI_Dims_create (int const nnodes, int const ndims, int* const dims); + +int +MPI_Finalize (void); + +int +MPI_Gather (void* const sendbuf, int const sendcnt, + MPI_Datatype const sendtype, + void* const recvbuf, int const recvcnt, + MPI_Datatype const recvtype, + int const root, MPI_Comm const comm); + +int +MPI_Gatherv (void* const sendbuf, int const sendcnt, + MPI_Datatype const sendtype, + void* const recvbuf, int* const recvcnts, int* const recvoffs, + MPI_Datatype const recvtype, + int const root, MPI_Comm const comm); + +int +MPI_Init (int* const argc, char*** const argv); + +int +MPI_Irecv (void* const buf, int const cnt, MPI_Datatype const datatype, + int const source, int const tag, MPI_Comm const comm, + MPI_Request* const request); + +int +MPI_Isend (void* const buf, int const count, MPI_Datatype const datatype, + int const dest, int const tag, MPI_Comm const comm, + MPI_Request* const request); + +int +MPI_Pcontrol (int const level, ... ); + +int +MPI_Reduce (void* const sendbuf, void* const recvbuf, int const cnt, + MPI_Datatype const datatype, MPI_Op const op, int const root, + MPI_Comm const comm); + +int +MPI_Send (void* const buf, int const count, MPI_Datatype const datatype, + int const dest, int const tag, MPI_Comm const comm); + +int +MPI_Ssend (void* const buf, int const count, MPI_Datatype const datatype, + int const dest, int const tag, MPI_Comm const comm); + +int +MPI_Type_commit (MPI_Datatype* const datatype); + +int +MPI_Type_contiguous (int const cnt, MPI_Datatype const oldtype, + MPI_Datatype* const newtype); + +int +MPI_Type_free (MPI_Datatype* const datatype); + +int +MPI_Type_lb (MPI_Datatype const datatype, MPI_Aint* const displacement); + +int +MPI_Type_size (MPI_Datatype const datatype, int* const size); + +int +MPI_Type_struct (int const cnt, + int* const array_of_blocklengths, + MPI_Aint* const array_of_displacements, + MPI_Datatype* const array_of_types, + MPI_Datatype* const newtype); + +int +MPI_Type_ub (MPI_Datatype const datatype, MPI_Aint* const displacement); + +int +MPI_Type_vector (int const cnt, int const blocklength, int const stride, + MPI_Datatype const oldtype, MPI_Datatype* const newtype); + +int +MPI_Waitall (int const cnt, MPI_Request* const array_of_requests, + MPI_Status* const array_of_statuses); + +double +MPI_Wtime (void); + +#ifdef __cplusplus +} +#endif + + + +#endif /* #ifndef CCTK_MPI */ + +#endif /* #ifndef NOMPI_H */ |