libxmp/libxmpf in Omni Compiler
1.3.4
|
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "xmp_internal.h"
#include "mpi.h"
#include "config.h"
|
int | _XMPC_running = 1 |
|
int | _XMPF_running = 0 |
|
void(* | _xmp_pack_array )(void *buffer, void *src, int array_type, size_t array_type_size, int array_dim, int *l, int *u, int *s, unsigned long long *d) = _XMPC_pack_array |
|
void(* | _xmp_unpack_array )(void *dst, void *buffer, int array_type, size_t array_type_size, int array_dim, int *l, int *u, int *s, unsigned long long *d) = _XMPC_unpack_array |
|
◆ _XMP_desc_of()
char* _XMP_desc_of |
( |
void * |
p | ) |
|
◆ _XMP_finalize()
void _XMP_finalize |
( |
bool |
isFinalize | ) |
|
75 if (_XMP_runtime_working) {
78 #if defined(_XMP_GASNET) || defined(_XMP_FJRDMA) || defined(_XMP_TCA) || defined(_XMP_MPI3_ONESIDED) || defined(_XMP_UTOFU)
◆ _XMP_get_datatype_size()
size_t _XMP_get_datatype_size |
( |
int |
datatype | ) |
|
117 size = SIZEOF_UNSIGNED_CHAR;
break;
121 size = SIZEOF_UNSIGNED_SHORT;
break;
125 size = SIZEOF_UNSIGNED_INT;
break;
129 size = SIZEOF_UNSIGNED_LONG;
break;
133 size = SIZEOF_UNSIGNED_LONG_LONG;
break;
136 #ifdef __STD_IEC_559_COMPLEX__
137 case _XMP_N_TYPE_FLOAT_IMAGINARY:
139 size = SIZEOF_FLOAT;
break;
142 #ifdef __STD_IEC_559_COMPLEX__
143 case _XMP_N_TYPE_DOUBLE_IMAGINARY:
145 size = SIZEOF_DOUBLE;
break;
148 #ifdef __STD_IEC_559_COMPLEX__
149 case _XMP_N_TYPE_LONG_DOUBLE_IMAGINARY:
151 size = SIZEOF_LONG_DOUBLE;
break;
154 size = SIZEOF_FLOAT * 2;
break;
157 size = SIZEOF_DOUBLE * 2;
break;
160 size = SIZEOF_LONG_DOUBLE * 2;
break;
◆ _XMP_init()
void _XMP_init |
( |
int |
argc, |
|
|
char ** |
argv, |
|
|
MPI_Comm |
comm |
|
) |
| |
32 if (!_XMP_runtime_working) {
34 MPI_Initialized(&flag);
37 MPI_Init(&argc, &argv);
54 #if defined(_XMP_GASNET) || defined(_XMP_FJRDMA) || defined(_XMP_TCA) || defined(_XMP_MPI3_ONESIDED) || defined(_XMP_UTOFU)
67 if (!_XMP_runtime_working) {
◆ xmp_finalize_all()
void xmp_finalize_all |
( |
| ) |
|
◆ xmp_get_ruuning()
27 return _XMP_runtime_working;
◆ xmp_init_all()
void xmp_init_all |
( |
int |
argc, |
|
|
char ** |
argv |
|
) |
| |
◆ xmpc_traverse_finalize()
void xmpc_traverse_finalize |
( |
| ) |
|
◆ xmpc_traverse_init()
void xmpc_traverse_init |
( |
| ) |
|
◆ _xmp_pack_array
void(* _xmp_pack_array) (void *buffer, void *src, int array_type, size_t array_type_size, int array_dim, int *l, int *u, int *s, unsigned long long *d) = _XMPC_pack_array |
◆ _xmp_unpack_array
void(* _xmp_unpack_array) (void *dst, void *buffer, int array_type, size_t array_type_size, int array_dim, int *l, int *u, int *s, unsigned long long *d) = _XMPC_unpack_array |
◆ _XMPC_running
◆ _XMPF_running
#define _XMP_N_TYPE_BOOL
Definition: xmp_constant.h:80
#define _XMP_N_TYPE_INT
Definition: xmp_constant.h:85
void _XMP_init_tca(void)
Definition: xmp_tca_runtime.c:4
void xmpc_traverse_init()
#define _XMP_N_TYPE_DOUBLE
Definition: xmp_constant.h:92
int _XMP_world_size
Definition: xmp_world.c:8
#define _XMP_N_TYPE_DOUBLE_COMPLEX
Definition: xmp_constant.h:102
void _XMP_finalize_world(void)
#define _XMP_N_TYPE_LONG_DOUBLE
Definition: xmp_constant.h:93
void _XMP_finalize(bool isFinalize)
Definition: xmp_runtime.c:73
void _XMP_initialize_async_comm_tab()
Definition: xmp_async.c:50
#define _XMP_N_TYPE_NONBASIC
Definition: xmp_constant.h:104
void _XACC_init(void)
Definition: xacc_runtime.c:3
int _XMP_world_rank
Definition: xmp_world.c:9
#define _XMP_N_TYPE_UNSIGNED_LONGLONG
Definition: xmp_constant.h:90
int _XMPF_running
Definition: xmp_runtime.c:16
#define _XMP_N_TYPE_LONG
Definition: xmp_constant.h:87
#define _XMP_N_TYPE_SHORT
Definition: xmp_constant.h:83
#define _XMP_N_TYPE_FLOAT_COMPLEX
Definition: xmp_constant.h:101
#define _XMP_N_TYPE_FLOAT
Definition: xmp_constant.h:91
#define _XMP_N_TYPE_UNSIGNED_INT
Definition: xmp_constant.h:86
#define _XMP_N_INT_FALSE
Definition: xmp_constant.h:5
void _XMP_init_world(int *argc, char ***argv)
Definition: xmp_world.c:12
#define _XMP_N_TYPE_UNSIGNED_LONG
Definition: xmp_constant.h:88
#define _XMP_N_TYPE_UNSIGNED_SHORT
Definition: xmp_constant.h:84
#define _XMP_N_TYPE_CHAR
Definition: xmp_constant.h:81
#define _XMP_N_TYPE_UNSIGNED_CHAR
Definition: xmp_constant.h:82
void _XMP_initialize_onesided_functions()
Definition: xmp_onesided.c:71
void xmp_reduce_initialize()
Definition: xmp_reduce.c:553
#define _XMP_N_TYPE_LONG_DOUBLE_COMPLEX
Definition: xmp_constant.h:103
void _XMP_check_reflect_type(void)
Definition: xmp_pack_vector.c:300
void _XMP_finalize_onesided_functions()
Definition: xmp_onesided.c:142
#define _XMP_N_TYPE_LONGLONG
Definition: xmp_constant.h:89
void _XMP_init(int argc, char **argv, MPI_Comm comm)
Definition: xmp_runtime.c:30
void xmpc_traverse_finalize()
#define _XMP_N_INT_TRUE
Definition: xmp_constant.h:4