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