
Add support for MPI_Count type and MPI_COUNT datatype and add the required MPI-3 functions MPI_Get_elements_x, MPI_Status_set_elements_x, MPI_Type_get_extent_x, MPI_Type_get_true_extent_x, and MPI_Type_size_x. This commit adds only the C bindings. Fortran bindins will be added in another commit. For now the MPI_Count type is define to have the same size as MPI_Offset. The type is required to be at least as large as MPI_Offset and MPI_Aint. The type was initially intended to be a ssize_t (if it was the same size as a long long) but there were issues compiling romio with that definition (despite the inclusion of stddef.h). I updated the datatype engine to use size_t instead of uint32_t to support large datatypes. This will require some review to make sure that 1) the changes are beneficial, 2) nothing was broken by the change (I doubt anything was), and 3) there are no performance regressions due to this change. Increase the maximum number of predifined datatypes to support MPI_Count Put common get_elements code to ompi/datatype/ompi_datatype_get_elements.c Update MPI_Get_count to reflect changes in MPI-3 (return MPI_UNDEFINED when the count is too large for an int) This commit was SVN r28932.
105 строки
4.4 KiB
Plaintext
105 строки
4.4 KiB
Plaintext
.\" Copyright 2013 Los Alamos National Security, LLC. All rights reserved.
|
|
.\" Copyright 2010 Cisco Systems, Inc. All rights reserved.
|
|
.\" Copyright 2006-2008 Sun Microsystems, Inc.
|
|
.\" Copyright (c) 1996 Thinking Machines Corporation
|
|
.TH MPI_Get_elements 3 "#OMPI_DATE#" "#PACKAGE_VERSION#" "#PACKAGE_NAME#"
|
|
.SH NAME
|
|
\fBMPI_Get_elements, MPI_Get_elements_x\fP \- Returns the number of basic elements in a data type.
|
|
|
|
.SH SYNTAX
|
|
.ft R
|
|
.SH C Syntax
|
|
.nf
|
|
#include <mpi.h>
|
|
int MPI_Get_elements(MPI_Status *\fIstatus\fP, MPI_Datatype\fI datatype\fP,
|
|
int\fI *count\fP)
|
|
int MPI_Get_elements_x(MPI_Status *\fIstatus\fP, MPI_Datatype\fI datatype\fP,
|
|
MPI_Count\fI *count\fP)
|
|
|
|
.fi
|
|
.SH Fortran Syntax
|
|
.nf
|
|
INCLUDE 'mpif.h'
|
|
MPI_GET_ELEMENTS(\fISTATUS, DATATYPE, COUNT, IERROR\fP)
|
|
INTEGER \fISTATUS(MPI_STATUS_SIZE), DATATYPE, COUNT, IERROR\fP
|
|
MPI_GET_ELEMENTS_X(\fISTATUS, DATATYPE, COUNT, IERROR\fP)
|
|
INTEGER \fISTATUS(MPI_STATUS_SIZE), DATATYPE\fP
|
|
INTEGER(KIND=MPI_COUNT_KIND) \fICOUNT\fP
|
|
INTEGER \fIIERROR\fP
|
|
|
|
.fi
|
|
.SH C++ Syntax
|
|
.nf
|
|
#include <mpi.h>
|
|
int Status::Get_elements(const Datatype& \fIdatatype\fP) const
|
|
|
|
.fi
|
|
.SH INPUT PARAMETERS
|
|
.ft R
|
|
.TP 1i
|
|
status
|
|
Return status of receive operation (status).
|
|
.TP 1i
|
|
datatype
|
|
Datatype used by receive operation (handle).
|
|
|
|
.SH OUTPUT PARAMETERS
|
|
.ft R
|
|
count Number of received basic elements (integer).
|
|
.ft R
|
|
.TP 1i
|
|
IERROR
|
|
Fortran only: Error status (integer).
|
|
|
|
.SH DESCRIPTION
|
|
.ft R
|
|
MPI_Get_elements and MPI_Get_elements_x behave different from MPI_Get_count, which returns the number of "top-level entries" received, i.e., the number of "copies" of type datatype. MPI_Get_count may return any integer value k, where 0 =< k =< count. If MPI_Get_count returns k, then the number of basic elements received (and the value returned by MPI_Get_elements and MPI_Get_elements_x) is n * k, where n is the number of basic elements in the type map of datatype. If the number of basic elements received is not a multiple of n, that is, if the receive operation has not received an integral number of datatype "copies," then MPI_Get_count returns the value MPI_UNDEFINED. For both functions, if the \fIcount\fP parameter cannot express the value to be returned (e.g., if the parameter is too small to hold the output value), it is set to MPI_UNDEFINED.
|
|
.sp
|
|
\fBExample:\fP Usage of MPI_Get_count and MPI_Get_element:
|
|
.sp
|
|
.nf
|
|
\&...
|
|
CALL MPI_TYPE_CONTIGUOUS(2, MPI_REAL, Type2, ierr)
|
|
CALL MPI_TYPE_COMMIT(Type2, ierr)
|
|
\&...
|
|
CALL MPI_COMM_RANK(comm, rank, ierr)
|
|
IF(rank.EQ.0) THEN
|
|
CALL MPI_SEND(a, 2, MPI_REAL, 1, 0, comm, ierr)
|
|
CALL MPI_SEND(a, 3, MPI_REAL, 1, 0, comm, ierr)
|
|
ELSE
|
|
CALL MPI_RECV(a, 2, Type2, 0, 0, comm, stat, ierr)
|
|
CALL MPI_GET_COUNT(stat, Type2, i, ierr) ! returns i=1
|
|
CALL MPI_GET_ELEMENTS(stat, Type2, i, ierr) ! returns i=2
|
|
CALL MPI_RECV(a, 2, Type2, 0, 0, comm, stat, ierr)
|
|
CALL MPI_GET_COUNT(stat, Type2, i, ierr) ! returns i=MPI_UNDEFINED
|
|
CALL MPI_GET_ELEMENTS(stat, Type2, i, ierr) ! returns i=3
|
|
END IF
|
|
.fi
|
|
.sp
|
|
The function MPI_Get_elements can also be used after a probe to find the number of elements in the probed message. Note that the two functions MPI_Get_count and MPI_Get_elements return the same values when they are used with primitive data types.
|
|
|
|
.SH ERRORS
|
|
Almost all MPI routines return an error value; C routines as the value of the function and Fortran routines in the last argument. C++ functions do not return errors. If the default error handler is set to MPI::ERRORS_THROW_EXCEPTIONS, then on error the C++ exception mechanism will be used to throw an MPI::Exception object.
|
|
.sp
|
|
Before the error value is returned, the current MPI error handler is
|
|
called. By default, this error handler aborts the MPI job, except for I/O function errors. The error handler may be changed with MPI_Comm_set_errhandler; the predefined error handler MPI_ERRORS_RETURN may be used to cause error values to be returned. Note that MPI does not guarantee that an MPI program can continue past an error.
|
|
|
|
.SH FORTRAN 77 NOTES
|
|
.ft R
|
|
The MPI standard prescribes portable Fortran syntax for
|
|
the \fICOUNT\fP argument of MPI_Get_elements_x only for
|
|
Fortran 90. FORTRAN 77 users may use the non-portable syntax
|
|
.sp
|
|
.nf
|
|
INTEGER*MPI_COUNT_KIND \fICOUNT\fP
|
|
.fi
|
|
.sp
|
|
where MPI_COUNT_KIND is a constant defined in mpif.h
|
|
and gives the length of the declared integer in bytes.
|
|
|
|
.SH SEE ALSO
|
|
.ft R
|
|
.sp
|
|
MPI_Get_count
|
|
|