1 /* smpi_mpi_dt_private.h -- functions of smpi_mpi_dt.c that are exported to other SMPI modules. */
3 /* Copyright (c) 2009-2017. The SimGrid Team. All rights reserved. */
5 /* This program is free software; you can redistribute it and/or modify it
6 * under the terms of the license (GNU LGPL) which comes with this package. */
8 #ifndef SMPI_DT_PRIVATE_H
9 #define SMPI_DT_PRIVATE_H
17 #define DT_FLAG_DESTROYED 0x0001 /**< user destroyed but some other layers still have a reference */
18 #define DT_FLAG_COMMITED 0x0002 /**< ready to be used for a send/recv operation */
19 #define DT_FLAG_CONTIGUOUS 0x0004 /**< contiguous datatype */
20 #define DT_FLAG_OVERLAP 0x0008 /**< datatype is unpropper for a recv operation */
21 #define DT_FLAG_USER_LB 0x0010 /**< has a user defined LB */
22 #define DT_FLAG_USER_UB 0x0020 /**< has a user defined UB */
23 #define DT_FLAG_PREDEFINED 0x0040 /**< cannot be removed: initial and predefined datatypes */
24 #define DT_FLAG_NO_GAPS 0x0080 /**< no gaps around the datatype */
25 #define DT_FLAG_DATA 0x0100 /**< data or control structure */
26 #define DT_FLAG_ONE_SIDED 0x0200 /**< datatype can be used for one sided operations */
27 #define DT_FLAG_UNAVAILABLE 0x0400 /**< datatypes unavailable on the build (OS or compiler dependant) */
28 #define DT_FLAG_VECTOR 0x0800 /**< valid only for loops. The loop contain only one element
29 **< without extent. It correspond to the vector type. */
31 * We should make the difference here between the predefined contiguous and non contiguous
32 * datatypes. The DT_FLAG_BASIC is held by all predefined contiguous datatypes.
34 #define DT_FLAG_BASIC (DT_FLAG_PREDEFINED | DT_FLAG_CONTIGUOUS | DT_FLAG_NO_GAPS | DT_FLAG_DATA | DT_FLAG_COMMITED)
36 extern const MPI_Datatype MPI_PTR;
38 /* Structures that handle complex data type information, used for serialization/unserialization of messages */
39 typedef struct s_smpi_mpi_contiguous{
40 s_smpi_subtype_t base;
41 MPI_Datatype old_type;
45 } s_smpi_mpi_contiguous_t;
47 typedef struct s_smpi_mpi_vector{
48 s_smpi_subtype_t base;
49 MPI_Datatype old_type;
54 } s_smpi_mpi_vector_t;
56 typedef struct s_smpi_mpi_hvector{
57 s_smpi_subtype_t base;
58 MPI_Datatype old_type;
60 MPI_Aint block_stride;
63 } s_smpi_mpi_hvector_t;
65 typedef struct s_smpi_mpi_indexed{
66 s_smpi_subtype_t base;
67 MPI_Datatype old_type;
72 } s_smpi_mpi_indexed_t;
74 typedef struct s_smpi_mpi_hindexed{
75 s_smpi_subtype_t base;
76 MPI_Datatype old_type;
79 MPI_Aint* block_indices;
81 } s_smpi_mpi_hindexed_t;
83 typedef struct s_smpi_mpi_struct{
84 s_smpi_subtype_t base;
85 MPI_Datatype old_type;
88 MPI_Aint* block_indices;
90 MPI_Datatype* old_types;
91 } s_smpi_mpi_struct_t;
94 Functions to handle serialization/unserialization of messages, 3 for each type of MPI_Type
95 One for creating the substructure to handle, one for serialization, one for unserialization
97 XBT_PRIVATE void unserialize_contiguous( void *contiguous_vector, void *noncontiguous_vector, int count,
98 void *type, MPI_Op op);
99 XBT_PRIVATE void serialize_contiguous( void *noncontiguous_vector, void *contiguous_vector, int count,void *type);
100 XBT_PRIVATE void free_contiguous(MPI_Datatype* type);
101 XBT_PRIVATE void use_contiguous(MPI_Datatype* type);
102 XBT_PRIVATE s_smpi_mpi_contiguous_t* smpi_datatype_contiguous_create( MPI_Aint lb, int block_count,
103 MPI_Datatype old_type, int size_oldtype);
105 XBT_PRIVATE void unserialize_vector( void *contiguous_vector, void *noncontiguous_vector, int count,void *type,
107 XBT_PRIVATE void serialize_vector( void *noncontiguous_vector, void *contiguous_vector, int count, void *type);
108 XBT_PRIVATE void free_vector(MPI_Datatype* type);
109 XBT_PRIVATE void use_vector(MPI_Datatype* type);
110 XBT_PRIVATE s_smpi_mpi_vector_t* smpi_datatype_vector_create( int block_stride, int block_length, int block_count,
111 MPI_Datatype old_type, int size_oldtype);
113 XBT_PRIVATE void unserialize_hvector( void *contiguous_vector, void *noncontiguous_vector, int count, void *type,
115 XBT_PRIVATE void serialize_hvector( void *noncontiguous_vector, void *contiguous_vector, int count, void *type);
116 XBT_PRIVATE void free_hvector(MPI_Datatype* type);
117 XBT_PRIVATE void use_hvector(MPI_Datatype* type);
118 XBT_PRIVATE s_smpi_mpi_hvector_t* smpi_datatype_hvector_create( MPI_Aint block_stride, int block_length,
119 int block_count, MPI_Datatype old_type, int size_oldtype);
121 XBT_PRIVATE void unserialize_indexed( void *contiguous_indexed, void *noncontiguous_indexed, int count,
122 void *type, MPI_Op op);
123 XBT_PRIVATE void serialize_indexed( void *noncontiguous_vector, void *contiguous_vector, int count, void *type);
124 XBT_PRIVATE void free_indexed(MPI_Datatype* type);
125 XBT_PRIVATE void use_indexed(MPI_Datatype* type);
126 XBT_PRIVATE s_smpi_mpi_indexed_t* smpi_datatype_indexed_create(int* block_lengths, int* block_indices,
127 int block_count, MPI_Datatype old_type, int size_oldtype);
129 XBT_PRIVATE void unserialize_hindexed( void *contiguous_indexed, void *noncontiguous_indexed, int count,
130 void *type, MPI_Op op);
131 XBT_PRIVATE void serialize_hindexed( void *noncontiguous_vector, void *contiguous_vector, int count, void *type);
132 XBT_PRIVATE void free_hindexed(MPI_Datatype* type);
133 XBT_PRIVATE void use_hindexed(MPI_Datatype* type);
134 XBT_PRIVATE s_smpi_mpi_hindexed_t* smpi_datatype_hindexed_create(int* block_lengths, MPI_Aint* block_indices,
135 int block_count, MPI_Datatype old_type, int size_oldtype);
137 XBT_PRIVATE void unserialize_struct( void *contiguous_indexed, void *noncontiguous_indexed, int count, void *type,
139 XBT_PRIVATE void serialize_struct( void *noncontiguous_vector, void *contiguous_vector, int count, void *type);
140 XBT_PRIVATE void free_struct(MPI_Datatype* type);
141 XBT_PRIVATE void use_struct(MPI_Datatype* type);
142 XBT_PRIVATE s_smpi_mpi_struct_t* smpi_datatype_struct_create(int* block_lengths, MPI_Aint* block_indices,
143 int block_count, MPI_Datatype* old_types);