1 /* Copyright (c) 2009-2010, 2012-2014. The SimGrid Team.
2 * All rights reserved. */
4 /* This program is free software; you can redistribute it and/or modify it
5 * under the terms of the license (GNU LGPL) which comes with this package. */
7 #ifndef SMPI_DATATYPE_HPP
8 #define SMPI_DATATYPE_HPP
14 #define DT_FLAG_DESTROYED 0x0001 /**< user destroyed but some other layers still have a reference */
15 #define DT_FLAG_COMMITED 0x0002 /**< ready to be used for a send/recv operation */
16 #define DT_FLAG_CONTIGUOUS 0x0004 /**< contiguous datatype */
17 #define DT_FLAG_OVERLAP 0x0008 /**< datatype is unpropper for a recv operation */
18 #define DT_FLAG_USER_LB 0x0010 /**< has a user defined LB */
19 #define DT_FLAG_USER_UB 0x0020 /**< has a user defined UB */
20 #define DT_FLAG_PREDEFINED 0x0040 /**< cannot be removed: initial and predefined datatypes */
21 #define DT_FLAG_NO_GAPS 0x0080 /**< no gaps around the datatype */
22 #define DT_FLAG_DATA 0x0100 /**< data or control structure */
23 #define DT_FLAG_ONE_SIDED 0x0200 /**< datatype can be used for one sided operations */
24 #define DT_FLAG_UNAVAILABLE 0x0400 /**< datatypes unavailable on the build (OS or compiler dependant) */
25 #define DT_FLAG_DERIVED 0x0800 /**< is the datatype derived ? */
27 * We should make the difference here between the predefined contiguous and non contiguous
28 * datatypes. The DT_FLAG_BASIC is held by all predefined contiguous datatypes.
30 #define DT_FLAG_BASIC (DT_FLAG_PREDEFINED | DT_FLAG_CONTIGUOUS | DT_FLAG_NO_GAPS | DT_FLAG_DATA | DT_FLAG_COMMITED)
32 extern const MPI_Datatype MPI_PTR;
34 //The following are datatypes for the MPI functions MPI_MAXLOC and MPI_MINLOC.
88 xbt_dict_t attributes_;
92 Datatype(int size,int lb, int ub, int flags);
93 Datatype(char* name, int size,int lb, int ub, int flags);
94 Datatype(Datatype *datatype);
102 void addflag(int flag);
105 int extent(MPI_Aint * lb, MPI_Aint * extent);
106 MPI_Aint get_extent();
108 void get_name(char* name, int* length);
109 void set_name(char* name);
110 static int copy(void *sendbuf, int sendcount, MPI_Datatype sendtype,
111 void *recvbuf, int recvcount, MPI_Datatype recvtype);
112 virtual void serialize( void* noncontiguous, void *contiguous,
114 virtual void unserialize( void* contiguous, void *noncontiguous,
115 int count, MPI_Op op);
116 int attr_delete(int keyval);
117 int attr_get(int keyval, void* attr_value, int* flag);
118 int attr_put(int keyval, void* attr_value);
119 static int keyval_create(MPI_Type_copy_attr_function* copy_fn, MPI_Type_delete_attr_function* delete_fn, int* keyval, void* extra_state);
120 static int keyval_free(int* keyval);
121 int pack(void* inbuf, int incount, void* outbuf, int outcount, int* position, MPI_Comm comm);
122 int unpack(void* inbuf, int insize, int* position, void* outbuf, int outcount, MPI_Comm comm);
125 static int create_contiguous(int count, MPI_Datatype old_type, MPI_Aint lb, MPI_Datatype* new_type);
126 static int create_vector(int count, int blocklen, int stride, MPI_Datatype old_type, MPI_Datatype* new_type);
127 static int create_hvector(int count, int blocklen, MPI_Aint stride, MPI_Datatype old_type, MPI_Datatype* new_type);
128 static int create_indexed(int count, int* blocklens, int* indices, MPI_Datatype old_type, MPI_Datatype* new_type);
129 static int create_hindexed(int count, int* blocklens, MPI_Aint* indices, MPI_Datatype old_type, MPI_Datatype* new_type);
130 static int create_struct(int count, int* blocklens, MPI_Aint* indices, MPI_Datatype* old_types, MPI_Datatype* new_type);
133 class Type_Contiguous: public Datatype{
136 MPI_Datatype old_type_;
138 Type_Contiguous(int size, int lb, int ub, int flags, int block_count, MPI_Datatype old_type);
141 void serialize( void* noncontiguous, void *contiguous,
143 void unserialize( void* contiguous_vector, void *noncontiguous_vector,
144 int count, MPI_Op op);
147 class Type_Vector: public Datatype{
152 MPI_Datatype old_type_;
154 Type_Vector(int size,int lb, int ub, int flags, int count, int blocklen, int stride, MPI_Datatype old_type);
157 void serialize( void* noncontiguous, void *contiguous,
159 void unserialize( void* contiguous_vector, void *noncontiguous_vector,
160 int count, MPI_Op op);
163 class Type_Hvector: public Datatype{
167 MPI_Aint block_stride_;
168 MPI_Datatype old_type_;
170 Type_Hvector(int size,int lb, int ub, int flags, int block_count, int block_length, MPI_Aint block_stride, MPI_Datatype old_type);
173 void serialize( void* noncontiguous, void *contiguous,
175 void unserialize( void* contiguous_vector, void *noncontiguous_vector,
176 int count, MPI_Op op);
179 class Type_Indexed: public Datatype{
184 MPI_Datatype old_type_;
186 Type_Indexed(int size,int lb, int ub, int flags, int block_count, int* block_lengths, int* block_indices, MPI_Datatype old_type);
189 void serialize( void* noncontiguous, void *contiguous,
191 void unserialize( void* contiguous_vector, void *noncontiguous_vector,
192 int count, MPI_Op op);
195 class Type_Hindexed: public Datatype{
199 MPI_Aint* block_indices_;
200 MPI_Datatype old_type_;
202 Type_Hindexed(int size,int lb, int ub, int flags, int block_count, int* block_lengths, MPI_Aint* block_indices, MPI_Datatype old_type);
205 void serialize( void* noncontiguous, void *contiguous,
207 void unserialize( void* contiguous_vector, void *noncontiguous_vector,
208 int count, MPI_Op op);
211 class Type_Struct: public Datatype{
215 MPI_Aint* block_indices_;
216 MPI_Datatype* old_types_;
218 Type_Struct(int size,int lb, int ub, int flags, int block_count, int* block_lengths, MPI_Aint* block_indices, MPI_Datatype* old_types);
221 void serialize( void* noncontiguous, void *contiguous,
223 void unserialize( void* contiguous_vector, void *noncontiguous_vector,
224 int count, MPI_Op op);