2003-11-22 19:36:58 +03:00
|
|
|
/*
|
2005-11-05 22:57:48 +03:00
|
|
|
* Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
|
|
|
|
|
* University Research and Technology
|
|
|
|
|
* Corporation. All rights reserved.
|
2006-04-07 08:57:53 +04:00
|
|
|
* Copyright (c) 2004-2006 The University of Tennessee and The University
|
2005-11-05 22:57:48 +03:00
|
|
|
* of Tennessee Research Foundation. All rights
|
|
|
|
|
* reserved.
|
2007-06-19 09:03:11 +04:00
|
|
|
* Copyright (c) 2004-2007 High Performance Computing Center Stuttgart,
|
2004-11-28 23:09:25 +03:00
|
|
|
* University of Stuttgart. All rights reserved.
|
2005-03-24 15:43:37 +03:00
|
|
|
* Copyright (c) 2004-2005 The Regents of the University of California.
|
|
|
|
|
* All rights reserved.
|
Two major things in this commit:
* New "op" MPI layer framework
* Addition of the MPI_REDUCE_LOCAL proposed function (for MPI-2.2)
= Op framework =
Add new "op" framework in the ompi layer. This framework replaces the
hard-coded MPI_Op back-end functions for (MPI_Op, MPI_Datatype) tuples
for pre-defined MPI_Ops, allowing components and modules to provide
the back-end functions. The intent is that components can be written
to take advantage of hardware acceleration (GPU, FPGA, specialized CPU
instructions, etc.). Similar to other frameworks, components are
intended to be able to discover at run-time if they can be used, and
if so, elect themselves to be selected (or disqualify themselves from
selection if they cannot run). If specialized hardware is not
available, there is a default set of functions that will automatically
be used.
This framework is ''not'' used for user-defined MPI_Ops.
The new op framework is similar to the existing coll framework, in
that the final set of function pointers that are used on any given
intrinsic MPI_Op can be a mixed bag of function pointers, potentially
coming from multiple different op modules. This allows for hardware
that only supports some of the operations, not all of them (e.g., a
GPU that only supports single-precision operations).
All the hard-coded back-end MPI_Op functions for (MPI_Op,
MPI_Datatype) tuples still exist, but unlike coll, they're in the
framework base (vs. being in a separate "basic" component) and are
automatically used if no component is found at runtime that provides a
module with the necessary function pointers.
There is an "example" op component that will hopefully be useful to
those writing meaningful op components. It is currently
.ompi_ignore'd so that it doesn't impinge on other developers (it's
somewhat chatty in terms of opal_output() so that you can tell when
its functions have been invoked). See the README file in the example
op component directory. Developers of new op components are
encouraged to look at the following wiki pages:
https://svn.open-mpi.org/trac/ompi/wiki/devel/Autogen
https://svn.open-mpi.org/trac/ompi/wiki/devel/CreateComponent
https://svn.open-mpi.org/trac/ompi/wiki/devel/CreateFramework
= MPI_REDUCE_LOCAL =
Part of the MPI-2.2 proposal listed here:
https://svn.mpi-forum.org/trac/mpi-forum-web/ticket/24
is to add a new function named MPI_REDUCE_LOCAL. It is very easy to
implement, so I added it (also because it makes testing the op
framework pretty easy -- you can do it in serial rather than via
parallel reductions). There's even a man page!
This commit was SVN r20280.
2009-01-15 02:44:31 +03:00
|
|
|
* Copyright (c) 2007-2009 Cisco Systems, Inc. All rights reserved.
|
2009-02-24 20:17:33 +03:00
|
|
|
* Copyright (c) 2008-2009 Sun Microsystems, Inc. All rights reserved.
|
2004-11-22 04:38:40 +03:00
|
|
|
* $COPYRIGHT$
|
|
|
|
|
*
|
|
|
|
|
* Additional copyrights may follow
|
|
|
|
|
*
|
2004-01-07 10:53:25 +03:00
|
|
|
* $HEADER$
|
2003-11-22 19:36:58 +03:00
|
|
|
*/
|
|
|
|
|
|
2004-06-07 19:33:53 +04:00
|
|
|
#ifndef OMPI_MPI_H
|
|
|
|
|
#define OMPI_MPI_H
|
2003-11-22 19:36:58 +03:00
|
|
|
|
2006-02-14 07:44:00 +03:00
|
|
|
/* The comment below (and the ending partner) are for building fat
|
|
|
|
|
distributions on platforms that support it. Please do not remove */
|
|
|
|
|
|
|
|
|
|
/* @OMPI_BEGIN_CONFIGURE_SECTION@ */
|
|
|
|
|
|
2005-08-25 04:41:26 +04:00
|
|
|
#ifndef OMPI_CONFIG_H
|
|
|
|
|
|
|
|
|
|
/* Only include these if OMPI_CONFIG_H isn't defined (meaning if
|
|
|
|
|
ompi_config.h hasn't already been included). Otherwise, we'll
|
|
|
|
|
duplicate all those symbols. OMPI coding standards say that
|
|
|
|
|
ompi_config.h must be included before all other files, so this
|
|
|
|
|
should be good enough */
|
|
|
|
|
|
2008-02-26 04:45:32 +03:00
|
|
|
/* Define to 1 if you have the ANSI C header files. */
|
2009-05-07 00:11:28 +04:00
|
|
|
#undef OPAL_STDC_HEADERS
|
2008-02-26 04:45:32 +03:00
|
|
|
|
|
|
|
|
/* Define to 1 if you have the <sys/time.h> header file. */
|
2009-05-07 00:11:28 +04:00
|
|
|
#undef OPAL_HAVE_SYS_TIME_H
|
2008-02-26 04:45:32 +03:00
|
|
|
|
2008-09-10 16:58:30 +04:00
|
|
|
/* Define to 1 if you have the <sys/synch.h> header file. */
|
2009-05-07 00:11:28 +04:00
|
|
|
#undef OPAL_HAVE_SYS_SYNCH_H
|
2008-09-10 16:58:30 +04:00
|
|
|
|
2008-02-26 04:45:32 +03:00
|
|
|
/* Define to 1 if the system has the type `long long'. */
|
2009-05-07 00:11:28 +04:00
|
|
|
#undef OPAL_HAVE_LONG_LONG
|
2008-02-26 04:45:32 +03:00
|
|
|
|
|
|
|
|
/* The size of a `bool', as computed by sizeof. */
|
2009-05-07 00:11:28 +04:00
|
|
|
#undef OPAL_SIZEOF_BOOL
|
2008-02-26 04:45:32 +03:00
|
|
|
|
|
|
|
|
/* The size of a `int', as computed by sizeof. */
|
2009-05-07 00:11:28 +04:00
|
|
|
#undef OPAL_SIZEOF_INT
|
2008-02-26 04:45:32 +03:00
|
|
|
|
2008-02-16 21:05:07 +03:00
|
|
|
/* Whether we have FORTRAN LOGICAL*1 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_LOGICAL1
|
|
|
|
|
|
|
|
|
|
/* Whether we have FORTRAN LOGICAL*2 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_LOGICAL2
|
|
|
|
|
|
|
|
|
|
/* Whether we have FORTRAN LOGICAL*4 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_LOGICAL4
|
|
|
|
|
|
|
|
|
|
/* Whether we have FORTRAN LOGICAL*8 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_LOGICAL8
|
|
|
|
|
|
2005-08-25 04:41:26 +04:00
|
|
|
/* Whether we have FORTRAN INTEGER*1 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_INTEGER1
|
|
|
|
|
|
|
|
|
|
/* Whether we have FORTRAN INTEGER*16 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_INTEGER16
|
|
|
|
|
|
|
|
|
|
/* Whether we have FORTRAN INTEGER*2 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_INTEGER2
|
|
|
|
|
|
|
|
|
|
/* Whether we have FORTRAN INTEGER*4 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_INTEGER4
|
|
|
|
|
|
|
|
|
|
/* Whether we have FORTRAN INTEGER*8 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_INTEGER8
|
|
|
|
|
|
|
|
|
|
/* Whether we have FORTRAN REAL*16 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_REAL16
|
|
|
|
|
|
2007-06-19 09:03:11 +04:00
|
|
|
/* Whether we have FORTRAN REAL*2 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_REAL2
|
|
|
|
|
|
2005-08-25 04:41:26 +04:00
|
|
|
/* Whether we have FORTRAN REAL*4 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_REAL4
|
|
|
|
|
|
|
|
|
|
/* Whether we have FORTRAN REAL*8 or not */
|
|
|
|
|
#undef OMPI_HAVE_FORTRAN_REAL8
|
|
|
|
|
|
2005-11-30 06:16:24 +03:00
|
|
|
/* Type of MPI_Offset -- has to be defined here and typedef'ed later because mpi.h does not get AC SUBST's */
|
|
|
|
|
#undef OMPI_MPI_OFFSET_TYPE
|
2005-08-25 04:41:26 +04:00
|
|
|
|
2006-10-20 07:24:59 +04:00
|
|
|
/* type to use for ptrdiff_t, if it does not exist, set to ptrdiff_t if it does exist */
|
2009-05-07 00:11:28 +04:00
|
|
|
#undef OPAL_PTRDIFF_TYPE
|
2006-10-20 07:24:59 +04:00
|
|
|
|
2005-08-25 04:41:26 +04:00
|
|
|
/* Whether we want MPI cxx support or not */
|
|
|
|
|
#undef OMPI_WANT_CXX_BINDINGS
|
|
|
|
|
|
2006-10-16 03:50:24 +04:00
|
|
|
/* do we want to try to work around C++ bindings SEEK_* issue? */
|
|
|
|
|
#undef OMPI_WANT_MPI_CXX_SEEK
|
|
|
|
|
|
2006-08-20 02:55:59 +04:00
|
|
|
/* Whether a const_cast on a 2-d array will work with the C++ compiler */
|
|
|
|
|
#undef OMPI_CXX_SUPPORTS_2D_CONST_CAST
|
|
|
|
|
|
2005-08-25 04:41:26 +04:00
|
|
|
/* Whether we want the MPI f77 bindings or not */
|
|
|
|
|
#undef OMPI_WANT_F77_BINDINGS
|
|
|
|
|
|
|
|
|
|
/* Whether we want the MPI f90 bindings or not */
|
|
|
|
|
#undef OMPI_WANT_F90_BINDINGS
|
|
|
|
|
|
|
|
|
|
/* Whether or not we have compiled with C++ exceptions support */
|
|
|
|
|
#undef OMPI_HAVE_CXX_EXCEPTION_SUPPORT
|
|
|
|
|
|
|
|
|
|
/* MPI datatype corresponding to MPI_Offset */
|
|
|
|
|
#undef OMPI_OFFSET_DATATYPE
|
|
|
|
|
|
2007-02-07 06:19:44 +03:00
|
|
|
/* Major, minor, and release version of Open MPI */
|
|
|
|
|
#undef OMPI_MAJOR_VERSION
|
|
|
|
|
#undef OMPI_MINOR_VERSION
|
|
|
|
|
#undef OMPI_RELEASE_VERSION
|
|
|
|
|
|
2005-08-25 18:07:28 +04:00
|
|
|
/* A type that allows us to have sentinel type values that are still
|
|
|
|
|
valid */
|
|
|
|
|
#undef ompi_fortran_bogus_type_t
|
|
|
|
|
|
2005-08-25 04:41:26 +04:00
|
|
|
/* C type corresponding to FORTRAN INTEGER */
|
|
|
|
|
#undef ompi_fortran_integer_t
|
|
|
|
|
|
2007-05-04 13:03:37 +04:00
|
|
|
/* Whether C compiler supports -fvisibility */
|
2009-05-07 00:11:28 +04:00
|
|
|
#undef OPAL_C_HAVE_VISIBILITY
|
2007-05-04 13:03:37 +04:00
|
|
|
|
2007-08-19 01:35:51 +04:00
|
|
|
/* Whether OMPI should provide MPI File interface */
|
|
|
|
|
#undef OMPI_PROVIDE_MPI_FILE_INTERFACE
|
|
|
|
|
|
2005-08-25 04:41:26 +04:00
|
|
|
#ifndef OMPI_DECLSPEC
|
2007-05-04 13:03:37 +04:00
|
|
|
# if defined(WIN32) || defined(_WIN32)
|
2007-09-12 19:32:54 +04:00
|
|
|
# if defined(OMPI_IMPORTS)
|
|
|
|
|
# define OMPI_DECLSPEC __declspec(dllimport)
|
|
|
|
|
# else
|
|
|
|
|
# define OMPI_DECLSPEC
|
|
|
|
|
# endif /* defined(OMPI_IMPORTS) */
|
2007-05-04 13:03:37 +04:00
|
|
|
# else
|
2009-05-07 00:11:28 +04:00
|
|
|
# if OPAL_C_HAVE_VISIBILITY == 1
|
2007-05-04 13:03:37 +04:00
|
|
|
# define OMPI_DECLSPEC __attribute__((visibility("default")))
|
|
|
|
|
# else
|
|
|
|
|
# define OMPI_DECLSPEC
|
|
|
|
|
# endif
|
|
|
|
|
# endif
|
2005-08-25 04:41:26 +04:00
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#ifndef MPI_Fint
|
|
|
|
|
/* MPI_Fint is the same as ompi_fortran_INTEGER_t */
|
|
|
|
|
#define MPI_Fint ompi_fortran_integer_t
|
|
|
|
|
#endif
|
|
|
|
|
|
2006-10-20 07:24:59 +04:00
|
|
|
#endif /* #ifndef OMPI_CONFIG_H */
|
2005-08-25 04:41:26 +04:00
|
|
|
|
2006-02-14 07:44:00 +03:00
|
|
|
/* @OMPI_END_CONFIGURE_SECTION@ */
|
|
|
|
|
|
2006-10-20 07:24:59 +04:00
|
|
|
/* include for ptrdiff_t */
|
2009-05-07 00:11:28 +04:00
|
|
|
#ifdef OPAL_STDC_HEADERS
|
2006-10-20 07:24:59 +04:00
|
|
|
#include <stddef.h>
|
|
|
|
|
#endif
|
|
|
|
|
|
clean up the OMPI_BUILDING #define. Rather than being defined to 1 if
we are part of the source tree and not defined otherwise, we are going
with an always defined if ompi_config.h is included policy. If
ompi_config.h is included before mpi.h or before OMPI_BUILDING is set,
it will set OMPI_BUILDING to 1 and enable all the internal code that
is in ompi_config_bottom.h. Otherwise, it will only include the
system configuration data (enough for defining the C and C++ interfaces
to MPI, but not perturbing the user environment).
This should fix the problems with bool and the like that the Eclipse
folks were seeing. It also cleans up some build system hacks that
we had along the way.
Also, don't use int64_t as the default size of MPI_Offset, because it
requires us including stdint.h in mpi.h, which is something we really
shouldn't be doing.
And finally, fix a ROMIO Makefile that didn't set -DOMPI_BUILDING=1,
as ROMIO includes mpi.h, but not ompi_config.h
This commit was SVN r5430.
2005-04-19 07:51:20 +04:00
|
|
|
#ifndef OMPI_BUILDING
|
|
|
|
|
#define OMPI_BUILDING 0
|
|
|
|
|
#endif
|
|
|
|
|
|
2004-01-08 16:36:59 +03:00
|
|
|
|
2004-01-10 11:17:22 +03:00
|
|
|
/*
|
|
|
|
|
* Just in case you need it. :-)
|
|
|
|
|
*/
|
2005-04-27 14:23:32 +04:00
|
|
|
#define OPEN_MPI 1
|
2004-01-07 10:53:25 +03:00
|
|
|
|
2004-01-10 11:17:22 +03:00
|
|
|
/*
|
|
|
|
|
* MPI version
|
|
|
|
|
*/
|
|
|
|
|
#define MPI_VERSION 2
|
2008-08-31 23:31:10 +04:00
|
|
|
#define MPI_SUBVERSION 1
|
2004-01-10 11:17:22 +03:00
|
|
|
|
2004-09-14 14:55:10 +04:00
|
|
|
/*
|
|
|
|
|
* To accomodate programs written for MPI implementations that use a
|
|
|
|
|
* straight ROMIO import
|
|
|
|
|
*/
|
2007-08-19 01:35:51 +04:00
|
|
|
#if !OMPI_BUILDING && OMPI_PROVIDE_MPI_FILE_INTERFACE
|
2004-09-14 14:55:10 +04:00
|
|
|
#define MPIO_Request MPI_Request
|
|
|
|
|
#define MPIO_Test MPI_Test
|
|
|
|
|
#define MPIO_Wait MPI_Wait
|
|
|
|
|
#endif
|
|
|
|
|
|
2009-05-05 20:41:26 +04:00
|
|
|
/*
|
|
|
|
|
* When initializing global pointers to Open MPI internally-defined
|
|
|
|
|
* structs, some compilers warn about type-punning to incomplete
|
|
|
|
|
* types. Therefore, when full struct definitions are unavailable
|
|
|
|
|
* (when not building Open MPI), cast to an opaque (void *) pointer to
|
|
|
|
|
* disable any strict-aliasing optimizations. Don't cast to (void *)
|
|
|
|
|
* when building Open MPI so that we actually get the benefit of type
|
|
|
|
|
* checking (because we *do* have the full type definitions available
|
|
|
|
|
* when building OMPI).
|
|
|
|
|
*/
|
|
|
|
|
#if !OMPI_BUILDING
|
|
|
|
|
#define OMPI_PREDEFINED_GLOBAL(type, global) ((type) ((void *) &(global)))
|
|
|
|
|
#else
|
|
|
|
|
#define OMPI_PREDEFINED_GLOBAL(type, global) ((type) &(global))
|
|
|
|
|
#endif
|
|
|
|
|
|
2004-10-21 02:31:03 +04:00
|
|
|
#if defined(c_plusplus) || defined(__cplusplus)
|
|
|
|
|
extern "C" {
|
|
|
|
|
#endif
|
2004-01-10 11:17:22 +03:00
|
|
|
/*
|
|
|
|
|
* Typedefs
|
|
|
|
|
*/
|
2006-10-20 07:24:59 +04:00
|
|
|
|
2009-05-07 00:11:28 +04:00
|
|
|
typedef OPAL_PTRDIFF_TYPE MPI_Aint;
|
2005-11-30 06:16:24 +03:00
|
|
|
typedef OMPI_MPI_OFFSET_TYPE MPI_Offset;
|
2004-06-07 19:33:53 +04:00
|
|
|
typedef struct ompi_communicator_t *MPI_Comm;
|
|
|
|
|
typedef struct ompi_datatype_t *MPI_Datatype;
|
|
|
|
|
typedef struct ompi_errhandler_t *MPI_Errhandler;
|
2007-08-19 01:35:51 +04:00
|
|
|
#if OMPI_PROVIDE_MPI_FILE_INTERFACE
|
2004-06-07 19:33:53 +04:00
|
|
|
typedef struct ompi_file_t *MPI_File;
|
2007-08-19 01:35:51 +04:00
|
|
|
#endif
|
2004-06-07 19:33:53 +04:00
|
|
|
typedef struct ompi_group_t *MPI_Group;
|
|
|
|
|
typedef struct ompi_info_t *MPI_Info;
|
|
|
|
|
typedef struct ompi_op_t *MPI_Op;
|
|
|
|
|
typedef struct ompi_request_t *MPI_Request;
|
|
|
|
|
typedef struct ompi_status_public_t MPI_Status;
|
|
|
|
|
typedef struct ompi_win_t *MPI_Win;
|
2004-01-10 11:17:22 +03:00
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* MPI_Status
|
|
|
|
|
*/
|
2004-06-07 19:33:53 +04:00
|
|
|
struct ompi_status_public_t {
|
2004-01-10 11:17:22 +03:00
|
|
|
int MPI_SOURCE;
|
|
|
|
|
int MPI_TAG;
|
|
|
|
|
int MPI_ERROR;
|
2004-03-16 18:12:11 +03:00
|
|
|
int _count;
|
2005-02-24 03:12:26 +03:00
|
|
|
int _cancelled;
|
2004-01-10 21:09:15 +03:00
|
|
|
};
|
2004-06-07 19:33:53 +04:00
|
|
|
typedef struct ompi_status_public_t ompi_status_public_t;
|
2004-01-10 11:17:22 +03:00
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* User typedefs
|
|
|
|
|
*/
|
2004-10-22 21:47:53 +04:00
|
|
|
typedef int (MPI_Copy_function)(MPI_Comm, int, void *,
|
|
|
|
|
void *, void *, int *);
|
|
|
|
|
typedef int (MPI_Delete_function)(MPI_Comm, int, void *, void *);
|
|
|
|
|
typedef int (MPI_Datarep_extent_function)(MPI_Datatype, MPI_Aint *, void *);
|
|
|
|
|
typedef int (MPI_Datarep_conversion_function)(void *, MPI_Datatype,
|
|
|
|
|
int, void *, MPI_Offset, void *);
|
|
|
|
|
typedef void (MPI_Comm_errhandler_fn)(MPI_Comm *, int *, ...);
|
2007-08-19 01:35:51 +04:00
|
|
|
#if OMPI_PROVIDE_MPI_FILE_INTERFACE
|
|
|
|
|
/* This is a little hackish, but errhandler.h needs space for a
|
|
|
|
|
MPI_File_errhandler_fn. While it could just be removed, this
|
|
|
|
|
allows us to maintain a stable ABI within OMPI, at least for
|
|
|
|
|
apps that don't use MPI I/O. */
|
|
|
|
|
typedef void (ompi_file_errhandler_fn)(MPI_File *, int *, ...);
|
|
|
|
|
typedef ompi_file_errhandler_fn MPI_File_errhandler_fn;
|
|
|
|
|
#else
|
|
|
|
|
struct ompi_file_t;
|
|
|
|
|
typedef void (ompi_file_errhandler_fn)(struct ompi_file_t**, int *, ...);
|
|
|
|
|
#endif
|
2004-10-22 21:47:53 +04:00
|
|
|
typedef void (MPI_Win_errhandler_fn)(MPI_Win *, int *, ...);
|
|
|
|
|
typedef void (MPI_Handler_function)(MPI_Comm *, int *, ...);
|
|
|
|
|
typedef void (MPI_User_function)(void *, void *, int *, MPI_Datatype *);
|
|
|
|
|
typedef int (MPI_Comm_copy_attr_function)(MPI_Comm, int, void *,
|
2004-01-10 11:17:22 +03:00
|
|
|
void *, void *, int *);
|
2004-10-22 21:47:53 +04:00
|
|
|
typedef int (MPI_Comm_delete_attr_function)(MPI_Comm, int, void *, void *);
|
|
|
|
|
typedef int (MPI_Type_copy_attr_function)(MPI_Datatype, int, void *,
|
2004-01-10 11:17:22 +03:00
|
|
|
void *, void *, int *);
|
2004-10-22 21:47:53 +04:00
|
|
|
typedef int (MPI_Type_delete_attr_function)(MPI_Datatype, int,
|
2004-01-10 11:17:22 +03:00
|
|
|
void *, void *);
|
2004-10-22 21:47:53 +04:00
|
|
|
typedef int (MPI_Win_copy_attr_function)(MPI_Win, int, void *,
|
2004-01-10 11:17:22 +03:00
|
|
|
void *, void *, int *);
|
2004-10-22 21:47:53 +04:00
|
|
|
typedef int (MPI_Win_delete_attr_function)(MPI_Win, int, void *, void *);
|
|
|
|
|
typedef int (MPI_Grequest_query_function)(void *, MPI_Status *);
|
|
|
|
|
typedef int (MPI_Grequest_free_function)(void *);
|
|
|
|
|
typedef int (MPI_Grequest_cancel_function)(void *, int);
|
2003-11-22 19:36:58 +03:00
|
|
|
|
2004-01-10 11:17:22 +03:00
|
|
|
/*
|
|
|
|
|
* Miscellaneous constants
|
|
|
|
|
*/
|
2004-09-14 14:55:10 +04:00
|
|
|
#define MPI_ANY_SOURCE -1 /* match any source rank */
|
|
|
|
|
#define MPI_PROC_NULL -2 /* rank of null process */
|
|
|
|
|
#define MPI_ROOT -4
|
|
|
|
|
#define MPI_ANY_TAG -1 /* match any message tag */
|
|
|
|
|
#define MPI_MAX_PROCESSOR_NAME 256 /* max proc. name length */
|
|
|
|
|
#define MPI_MAX_ERROR_STRING 256 /* max error message length */
|
|
|
|
|
#define MPI_MAX_OBJECT_NAME 64 /* max object name length */
|
|
|
|
|
#define MPI_UNDEFINED -32766 /* undefined stuff */
|
|
|
|
|
#define MPI_CART 1 /* cartesian topology */
|
|
|
|
|
#define MPI_GRAPH 2 /* graph topology */
|
|
|
|
|
#define MPI_KEYVAL_INVALID -1 /* invalid key value */
|
2004-01-10 11:17:22 +03:00
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* More constants
|
|
|
|
|
*/
|
2004-09-14 14:55:10 +04:00
|
|
|
#define MPI_BOTTOM ((void *) 0) /* base reference address */
|
2005-09-10 00:44:04 +04:00
|
|
|
#define MPI_IN_PLACE ((void *) 1) /* in place buffer */
|
2004-10-20 00:53:15 +04:00
|
|
|
#define MPI_BSEND_OVERHEAD 128 /* size of bsend header + ptr */
|
2004-09-14 14:55:10 +04:00
|
|
|
#define MPI_MAX_INFO_KEY 36 /* max info key length */
|
|
|
|
|
#define MPI_MAX_INFO_VAL 256 /* max info value length */
|
|
|
|
|
#define MPI_ARGV_NULL ((char **) 0) /* NULL argument vector */
|
|
|
|
|
#define MPI_ARGVS_NULL ((char ***) 0) /* NULL argument vectors */
|
2006-12-31 05:51:13 +03:00
|
|
|
#define MPI_ERRCODES_IGNORE ((int *) 0) /* don't return error codes */
|
2008-09-25 20:47:17 +04:00
|
|
|
#define MPI_MAX_PORT_NAME 1024 /* max port name length */
|
2004-09-14 14:55:10 +04:00
|
|
|
#define MPI_MAX_NAME_LEN MPI_MAX_PORT_NAME /* max port name length */
|
|
|
|
|
#define MPI_ORDER_C 0 /* C row major order */
|
|
|
|
|
#define MPI_ORDER_FORTRAN 1 /* Fortran column major order */
|
|
|
|
|
#define MPI_DISTRIBUTE_BLOCK 0 /* block distribution */
|
|
|
|
|
#define MPI_DISTRIBUTE_CYCLIC 1 /* cyclic distribution */
|
|
|
|
|
#define MPI_DISTRIBUTE_NONE 2 /* not distributed */
|
|
|
|
|
#define MPI_DISTRIBUTE_DFLT_DARG (-1) /* default distribution arg */
|
2004-01-10 11:17:22 +03:00
|
|
|
|
2007-08-19 01:35:51 +04:00
|
|
|
#if OMPI_PROVIDE_MPI_FILE_INTERFACE
|
2004-09-14 14:55:10 +04:00
|
|
|
/*
|
|
|
|
|
* Since these values are arbitrary to Open MPI, we might as well make
|
|
|
|
|
* them the same as ROMIO for ease of mapping. These values taken
|
|
|
|
|
* from ROMIO's mpio.h file.
|
|
|
|
|
*/
|
|
|
|
|
#define MPI_MODE_CREATE 1 /* ADIO_CREATE */
|
|
|
|
|
#define MPI_MODE_RDONLY 2 /* ADIO_RDONLY */
|
|
|
|
|
#define MPI_MODE_WRONLY 4 /* ADIO_WRONLY */
|
|
|
|
|
#define MPI_MODE_RDWR 8 /* ADIO_RDWR */
|
|
|
|
|
#define MPI_MODE_DELETE_ON_CLOSE 16 /* ADIO_DELETE_ON_CLOSE */
|
|
|
|
|
#define MPI_MODE_UNIQUE_OPEN 32 /* ADIO_UNIQUE_OPEN */
|
|
|
|
|
#define MPI_MODE_EXCL 64 /* ADIO_EXCL */
|
|
|
|
|
#define MPI_MODE_APPEND 128 /* ADIO_APPEND */
|
|
|
|
|
#define MPI_MODE_SEQUENTIAL 256 /* ADIO_SEQUENTIAL */
|
|
|
|
|
|
|
|
|
|
#define MPI_DISPLACEMENT_CURRENT -54278278
|
|
|
|
|
|
|
|
|
|
#define MPI_SEEK_SET 600
|
|
|
|
|
#define MPI_SEEK_CUR 602
|
|
|
|
|
#define MPI_SEEK_END 604
|
|
|
|
|
|
|
|
|
|
#define MPI_MAX_DATAREP_STRING 128
|
2007-08-19 01:35:51 +04:00
|
|
|
#endif /* #if OMPI_PROVIDE_MPI_FILE_INTERFACE */
|
|
|
|
|
|
2006-01-28 18:38:37 +03:00
|
|
|
/*
|
|
|
|
|
* MPI-2 One-Sided Communications asserts
|
|
|
|
|
*/
|
|
|
|
|
#define MPI_MODE_NOCHECK 1
|
|
|
|
|
#define MPI_MODE_NOPRECEDE 2
|
|
|
|
|
#define MPI_MODE_NOPUT 4
|
|
|
|
|
#define MPI_MODE_NOSTORE 8
|
|
|
|
|
#define MPI_MODE_NOSUCCEED 16
|
|
|
|
|
|
|
|
|
|
#define MPI_LOCK_EXCLUSIVE 1
|
|
|
|
|
#define MPI_LOCK_SHARED 2
|
|
|
|
|
|
2004-09-14 14:55:10 +04:00
|
|
|
|
2004-01-10 11:17:22 +03:00
|
|
|
/*
|
|
|
|
|
* Predefined attribute keyvals
|
2004-09-16 04:00:09 +04:00
|
|
|
*
|
|
|
|
|
* DO NOT CHANGE THE ORDER WITHOUT ALSO CHANGING THE ORDER IN
|
2005-09-27 21:47:21 +04:00
|
|
|
* src/attribute/attribute_predefined.c and mpif.h.in.
|
2004-01-10 11:17:22 +03:00
|
|
|
*/
|
|
|
|
|
enum {
|
2004-09-16 04:00:09 +04:00
|
|
|
/* MPI-1 */
|
|
|
|
|
MPI_TAG_UB,
|
|
|
|
|
MPI_HOST,
|
|
|
|
|
MPI_IO,
|
|
|
|
|
MPI_WTIME_IS_GLOBAL,
|
|
|
|
|
|
|
|
|
|
/* MPI-2 */
|
|
|
|
|
MPI_APPNUM,
|
|
|
|
|
MPI_LASTUSEDCODE,
|
|
|
|
|
MPI_UNIVERSE_SIZE,
|
|
|
|
|
MPI_WIN_BASE,
|
|
|
|
|
MPI_WIN_SIZE,
|
|
|
|
|
MPI_WIN_DISP_UNIT,
|
|
|
|
|
|
|
|
|
|
/* Even though these four are IMPI attributes, they need to be there
|
|
|
|
|
for all MPI jobs */
|
|
|
|
|
IMPI_CLIENT_SIZE,
|
|
|
|
|
IMPI_CLIENT_COLOR,
|
|
|
|
|
IMPI_HOST_SIZE,
|
|
|
|
|
IMPI_HOST_COLOR
|
2004-01-10 11:17:22 +03:00
|
|
|
};
|
|
|
|
|
|
|
|
|
|
/*
|
2004-06-18 02:38:45 +04:00
|
|
|
* Error classes and codes
|
2005-09-27 21:47:21 +04:00
|
|
|
* Do not change the values of these without also modifying mpif.h.in.
|
2004-01-10 11:17:22 +03:00
|
|
|
*/
|
2004-06-18 02:38:45 +04:00
|
|
|
#define MPI_SUCCESS 0
|
|
|
|
|
#define MPI_ERR_BUFFER 1
|
|
|
|
|
#define MPI_ERR_COUNT 2
|
|
|
|
|
#define MPI_ERR_TYPE 3
|
|
|
|
|
#define MPI_ERR_TAG 4
|
|
|
|
|
#define MPI_ERR_COMM 5
|
|
|
|
|
#define MPI_ERR_RANK 6
|
|
|
|
|
#define MPI_ERR_REQUEST 7
|
|
|
|
|
#define MPI_ERR_ROOT 8
|
|
|
|
|
#define MPI_ERR_GROUP 9
|
|
|
|
|
#define MPI_ERR_OP 10
|
|
|
|
|
#define MPI_ERR_TOPOLOGY 11
|
|
|
|
|
#define MPI_ERR_DIMS 12
|
|
|
|
|
#define MPI_ERR_ARG 13
|
|
|
|
|
#define MPI_ERR_UNKNOWN 14
|
|
|
|
|
#define MPI_ERR_TRUNCATE 15
|
|
|
|
|
#define MPI_ERR_OTHER 16
|
|
|
|
|
#define MPI_ERR_INTERN 17
|
|
|
|
|
#define MPI_ERR_IN_STATUS 18
|
|
|
|
|
#define MPI_ERR_PENDING 19
|
|
|
|
|
#define MPI_ERR_ACCESS 20
|
|
|
|
|
#define MPI_ERR_AMODE 21
|
|
|
|
|
#define MPI_ERR_ASSERT 22
|
|
|
|
|
#define MPI_ERR_BAD_FILE 23
|
|
|
|
|
#define MPI_ERR_BASE 24
|
|
|
|
|
#define MPI_ERR_CONVERSION 25
|
|
|
|
|
#define MPI_ERR_DISP 26
|
|
|
|
|
#define MPI_ERR_DUP_DATAREP 27
|
|
|
|
|
#define MPI_ERR_FILE_EXISTS 28
|
|
|
|
|
#define MPI_ERR_FILE_IN_USE 29
|
|
|
|
|
#define MPI_ERR_FILE 30
|
|
|
|
|
#define MPI_ERR_INFO_KEY 31
|
|
|
|
|
#define MPI_ERR_INFO_NOKEY 32
|
|
|
|
|
#define MPI_ERR_INFO_VALUE 33
|
|
|
|
|
#define MPI_ERR_INFO 34
|
|
|
|
|
#define MPI_ERR_IO 35
|
|
|
|
|
#define MPI_ERR_KEYVAL 36
|
2004-06-25 01:09:55 +04:00
|
|
|
#define MPI_ERR_LOCKTYPE 37
|
2004-06-18 02:38:45 +04:00
|
|
|
#define MPI_ERR_NAME 38
|
|
|
|
|
#define MPI_ERR_NO_MEM 39
|
|
|
|
|
#define MPI_ERR_NOT_SAME 40
|
|
|
|
|
#define MPI_ERR_NO_SPACE 41
|
|
|
|
|
#define MPI_ERR_NO_SUCH_FILE 42
|
|
|
|
|
#define MPI_ERR_PORT 43
|
|
|
|
|
#define MPI_ERR_QUOTA 44
|
|
|
|
|
#define MPI_ERR_READ_ONLY 45
|
|
|
|
|
#define MPI_ERR_RMA_CONFLICT 46
|
|
|
|
|
#define MPI_ERR_RMA_SYNC 47
|
|
|
|
|
#define MPI_ERR_SERVICE 48
|
|
|
|
|
#define MPI_ERR_SIZE 49
|
|
|
|
|
#define MPI_ERR_SPAWN 50
|
|
|
|
|
#define MPI_ERR_UNSUPPORTED_DATAREP 51
|
|
|
|
|
#define MPI_ERR_UNSUPPORTED_OPERATION 52
|
|
|
|
|
#define MPI_ERR_WIN 53
|
2004-09-22 20:59:10 +04:00
|
|
|
#define MPI_ERR_LASTCODE 54
|
2004-06-18 02:38:45 +04:00
|
|
|
|
|
|
|
|
#define MPI_ERR_SYSRESOURCE -2
|
2003-11-22 19:36:58 +03:00
|
|
|
|
2004-01-10 11:17:22 +03:00
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Comparison results. Don't change the order of these, the group
|
|
|
|
|
* comparison functions rely on it.
|
2005-09-27 21:47:21 +04:00
|
|
|
* Do not change the order of these without also modifying mpif.h.in.
|
2004-01-10 11:17:22 +03:00
|
|
|
*/
|
|
|
|
|
enum {
|
|
|
|
|
MPI_IDENT,
|
|
|
|
|
MPI_CONGRUENT,
|
|
|
|
|
MPI_SIMILAR,
|
|
|
|
|
MPI_UNEQUAL
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* MPI_Init_thread constants
|
2005-09-27 21:47:21 +04:00
|
|
|
* Do not change the order of these without also modifying mpif.h.in.
|
2004-01-10 11:17:22 +03:00
|
|
|
*/
|
|
|
|
|
enum {
|
|
|
|
|
MPI_THREAD_SINGLE,
|
|
|
|
|
MPI_THREAD_FUNNELED,
|
|
|
|
|
MPI_THREAD_SERIALIZED,
|
|
|
|
|
MPI_THREAD_MULTIPLE
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Datatype combiners.
|
2005-09-27 21:47:21 +04:00
|
|
|
* Do not change the order of these without also modifying mpif.h.in.
|
2004-01-10 11:17:22 +03:00
|
|
|
*/
|
2005-04-19 18:33:02 +04:00
|
|
|
enum {
|
2004-01-10 11:17:22 +03:00
|
|
|
MPI_COMBINER_NAMED,
|
|
|
|
|
MPI_COMBINER_DUP,
|
|
|
|
|
MPI_COMBINER_CONTIGUOUS,
|
|
|
|
|
MPI_COMBINER_VECTOR,
|
|
|
|
|
MPI_COMBINER_HVECTOR_INTEGER,
|
|
|
|
|
MPI_COMBINER_HVECTOR,
|
|
|
|
|
MPI_COMBINER_INDEXED,
|
|
|
|
|
MPI_COMBINER_HINDEXED_INTEGER,
|
|
|
|
|
MPI_COMBINER_HINDEXED,
|
2004-06-25 01:09:55 +04:00
|
|
|
MPI_COMBINER_INDEXED_BLOCK,
|
2004-01-10 11:17:22 +03:00
|
|
|
MPI_COMBINER_STRUCT_INTEGER,
|
|
|
|
|
MPI_COMBINER_STRUCT,
|
|
|
|
|
MPI_COMBINER_SUBARRAY,
|
|
|
|
|
MPI_COMBINER_DARRAY,
|
|
|
|
|
MPI_COMBINER_F90_REAL,
|
|
|
|
|
MPI_COMBINER_F90_COMPLEX,
|
|
|
|
|
MPI_COMBINER_F90_INTEGER,
|
|
|
|
|
MPI_COMBINER_RESIZED
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* NULL handles
|
|
|
|
|
*/
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_GROUP_NULL OMPI_PREDEFINED_GLOBAL(MPI_Group, ompi_mpi_group_null)
|
|
|
|
|
#define MPI_COMM_NULL OMPI_PREDEFINED_GLOBAL(MPI_Comm, ompi_mpi_comm_null)
|
|
|
|
|
#define MPI_REQUEST_NULL OMPI_PREDEFINED_GLOBAL(MPI_Request, ompi_request_null)
|
|
|
|
|
#define MPI_OP_NULL OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_null)
|
|
|
|
|
#define MPI_ERRHANDLER_NULL OMPI_PREDEFINED_GLOBAL(MPI_Errhandler, ompi_mpi_errhandler_null)
|
|
|
|
|
#define MPI_INFO_NULL OMPI_PREDEFINED_GLOBAL(MPI_Info, ompi_mpi_info_null)
|
|
|
|
|
#define MPI_WIN_NULL OMPI_PREDEFINED_GLOBAL(MPI_Win, ompi_mpi_win_null)
|
2007-08-19 01:35:51 +04:00
|
|
|
#if OMPI_PROVIDE_MPI_FILE_INTERFACE
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_FILE_NULL OMPI_PREDEFINED_GLOBAL(MPI_File, ompi_mpi_file_null)
|
2007-08-19 01:35:51 +04:00
|
|
|
#endif
|
2004-01-10 11:17:22 +03:00
|
|
|
|
|
|
|
|
#define MPI_STATUS_IGNORE ((MPI_Status *) 0)
|
|
|
|
|
#define MPI_STATUSES_IGNORE ((MPI_Status *) 0)
|
|
|
|
|
|
2004-07-18 00:10:03 +04:00
|
|
|
/* MPI-2 specifies that the name "MPI_TYPE_NULL_DELETE_FN" (and all
|
|
|
|
|
related friends) must be accessible in C, C++, and Fortran. This is
|
|
|
|
|
unworkable if the back-end Fortran compiler uses all caps for its
|
|
|
|
|
linker symbol convention -- it results in two functions with
|
|
|
|
|
different signatures that have the same name (i.e., both C and
|
|
|
|
|
Fortran use the symbol MPI_TYPE_NULL_DELETE_FN). So we have to
|
|
|
|
|
#define the C names to be something else, so that they names are
|
|
|
|
|
*accessed* through MPI_TYPE_NULL_DELETE_FN, but their actual symbol
|
|
|
|
|
name is different.
|
|
|
|
|
|
|
|
|
|
However, this file is included when the fortran wrapper functions
|
|
|
|
|
are compiled in Open MPI, so we do *not* want these #defines in
|
|
|
|
|
this case (i.e., we need the Fortran wrapper function to be
|
|
|
|
|
compiled as MPI_TYPE_NULL_DELETE_FN). So add some #if kinds of
|
|
|
|
|
protection for this case. */
|
|
|
|
|
|
|
|
|
|
#if !defined(OMPI_COMPILING_F77_WRAPPERS)
|
|
|
|
|
#define MPI_NULL_DELETE_FN OMPI_C_MPI_NULL_DELETE_FN
|
|
|
|
|
#define MPI_NULL_COPY_FN OMPI_C_MPI_NULL_COPY_FN
|
|
|
|
|
#define MPI_DUP_FN OMPI_C_MPI_DUP_FN
|
|
|
|
|
|
|
|
|
|
#define MPI_TYPE_NULL_DELETE_FN OMPI_C_MPI_TYPE_NULL_DELETE_FN
|
|
|
|
|
#define MPI_TYPE_NULL_COPY_FN OMPI_C_MPI_TYPE_NULL_COPY_FN
|
|
|
|
|
#define MPI_TYPE_DUP_FN OMPI_C_MPI_TYPE_DUP_FN
|
|
|
|
|
|
|
|
|
|
#define MPI_COMM_NULL_DELETE_FN OMPI_C_MPI_COMM_NULL_DELETE_FN
|
|
|
|
|
#define MPI_COMM_NULL_COPY_FN OMPI_C_MPI_COMM_NULL_COPY_FN
|
|
|
|
|
#define MPI_COMM_DUP_FN OMPI_C_MPI_COMM_DUP_FN
|
|
|
|
|
|
|
|
|
|
#define MPI_WIN_NULL_DELETE_FN OMPI_C_MPI_WIN_NULL_DELETE_FN
|
|
|
|
|
#define MPI_WIN_NULL_COPY_FN OMPI_C_MPI_WIN_NULL_COPY_FN
|
|
|
|
|
#define MPI_WIN_DUP_FN OMPI_C_MPI_WIN_DUP_FN
|
2007-12-07 16:09:07 +03:00
|
|
|
|
|
|
|
|
/* MPI_CONVERSION_FN_NULL is a sentinel value, but it has to be large
|
|
|
|
|
enough to be the same size as a valid function pointer. It
|
|
|
|
|
therefore shares many characteristics between Fortran constants and
|
|
|
|
|
Fortran sentinel functions. For example, it shares the problem of
|
|
|
|
|
having Fortran compilers have all-caps versions of the symbols that
|
|
|
|
|
must be able to be present, and therefore has to be in this
|
|
|
|
|
conditional block in mpi.h. */
|
|
|
|
|
#define MPI_CONVERSION_FN_NULL ((MPI_Datarep_conversion_function*) 0)
|
2004-07-18 00:10:03 +04:00
|
|
|
#endif
|
|
|
|
|
|
2005-03-26 06:51:55 +03:00
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_TYPE_NULL_DELETE_FN( MPI_Datatype datatype,
|
|
|
|
|
int type_keyval,
|
|
|
|
|
void* attribute_val_out,
|
|
|
|
|
void* extra_state );
|
|
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_TYPE_NULL_COPY_FN( MPI_Datatype datatype,
|
|
|
|
|
int type_keyval,
|
2004-10-22 21:47:53 +04:00
|
|
|
void* extra_state,
|
|
|
|
|
void* attribute_val_in,
|
2005-03-26 06:51:55 +03:00
|
|
|
void* attribute_val_out,
|
|
|
|
|
int* flag );
|
|
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_TYPE_DUP_FN( MPI_Datatype datatype,
|
|
|
|
|
int type_keyval,
|
|
|
|
|
void* extra_state,
|
|
|
|
|
void* attribute_val_in,
|
|
|
|
|
void* attribute_val_out,
|
|
|
|
|
int* flag );
|
|
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_COMM_NULL_DELETE_FN( MPI_Comm comm,
|
|
|
|
|
int comm_keyval,
|
|
|
|
|
void* attribute_val_out,
|
|
|
|
|
void* extra_state );
|
|
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_COMM_NULL_COPY_FN( MPI_Comm comm,
|
|
|
|
|
int comm_keyval,
|
|
|
|
|
void* extra_state,
|
|
|
|
|
void* attribute_val_in,
|
|
|
|
|
void* attribute_val_out,
|
|
|
|
|
int* flag );
|
|
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_COMM_DUP_FN( MPI_Comm comm, int comm_keyval,
|
|
|
|
|
void* extra_state,
|
|
|
|
|
void* attribute_val_in,
|
|
|
|
|
void* attribute_val_out,
|
2004-10-22 21:47:53 +04:00
|
|
|
int* flag );
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_NULL_DELETE_FN( MPI_Comm comm, int comm_keyval,
|
2005-03-26 06:51:55 +03:00
|
|
|
void* attribute_val_out,
|
|
|
|
|
void* extra_state );
|
|
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_NULL_COPY_FN( MPI_Comm comm, int comm_keyval,
|
|
|
|
|
void* extra_state,
|
|
|
|
|
void* attribute_val_in,
|
|
|
|
|
void* attribute_val_out,
|
2004-10-22 21:47:53 +04:00
|
|
|
int* flag );
|
2005-03-26 06:51:55 +03:00
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_DUP_FN( MPI_Comm comm, int comm_keyval,
|
|
|
|
|
void* extra_state,
|
|
|
|
|
void* attribute_val_in,
|
|
|
|
|
void* attribute_val_out,
|
2004-10-22 21:47:53 +04:00
|
|
|
int* flag );
|
2005-03-26 06:51:55 +03:00
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_WIN_NULL_DELETE_FN( MPI_Win window,
|
|
|
|
|
int win_keyval,
|
|
|
|
|
void* attribute_val_out,
|
|
|
|
|
void* extra_state );
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_WIN_NULL_COPY_FN( MPI_Win window, int win_keyval,
|
2005-03-26 06:51:55 +03:00
|
|
|
void* extra_state,
|
|
|
|
|
void* attribute_val_in,
|
|
|
|
|
void* attribute_val_out,
|
|
|
|
|
int* flag );
|
|
|
|
|
OMPI_DECLSPEC int OMPI_C_MPI_WIN_DUP_FN( MPI_Win window, int win_keyval,
|
|
|
|
|
void* extra_state,
|
|
|
|
|
void* attribute_val_in,
|
|
|
|
|
void* attribute_val_out,
|
2004-10-22 21:47:53 +04:00
|
|
|
int* flag );
|
2004-01-10 11:17:22 +03:00
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* External variables
|
2009-02-24 20:17:33 +03:00
|
|
|
*
|
|
|
|
|
* The below externs use the ompi_predefined_xxx_t structures to maintain
|
|
|
|
|
* back compatibility between MPI library versions.
|
|
|
|
|
* See ompi/communicator/communicator.h comments with struct ompi_communicator_t
|
|
|
|
|
* for full explanation why we chose to use the ompi_predefined_xxx_t structure.
|
2004-01-10 11:17:22 +03:00
|
|
|
*/
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_communicator_t ompi_mpi_comm_world;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_communicator_t ompi_mpi_comm_self;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_communicator_t ompi_mpi_comm_null;
|
|
|
|
|
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_group_t ompi_mpi_group_empty;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_group_t ompi_mpi_group_null;
|
|
|
|
|
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_request_t ompi_request_null;
|
|
|
|
|
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_null;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_max, ompi_mpi_op_min;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_sum;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_prod;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_land;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_band;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_lor, ompi_mpi_op_bor;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_lxor;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_bxor;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_maxloc;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_minloc;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_op_t ompi_mpi_op_replace;
|
|
|
|
|
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_char, ompi_mpi_byte;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_int, ompi_mpi_logic;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_short, ompi_mpi_long;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_float, ompi_mpi_double;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_long_double;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_cplex, ompi_mpi_packed;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_signed_char;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_unsigned_char;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_unsigned_short;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_unsigned, ompi_mpi_datatype_null;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_unsigned_long, ompi_mpi_ldblcplex;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_ub, ompi_mpi_lb;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_float_int, ompi_mpi_double_int;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_long_int, ompi_mpi_2int;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_short_int, ompi_mpi_dblcplex;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_integer, ompi_mpi_real;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_dblprec, ompi_mpi_character;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_2real, ompi_mpi_2dblprec;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_2integer, ompi_mpi_longdbl_int;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_wchar, ompi_mpi_long_long_int;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_unsigned_long_long;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_cxx_cplex, ompi_mpi_cxx_dblcplex;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_cxx_ldblcplex;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_cxx_bool;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_2cplex, ompi_mpi_2dblcplex;
|
2005-04-28 15:42:42 +04:00
|
|
|
/* other MPI2 datatypes */
|
2008-02-16 01:54:20 +03:00
|
|
|
#if OMPI_HAVE_FORTRAN_LOGICAL1
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_logical1;
|
2008-02-16 01:54:20 +03:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_LOGICAL2
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_logical2;
|
2008-02-16 01:54:20 +03:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_LOGICAL4
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_logical4;
|
2008-02-16 01:54:20 +03:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_LOGICAL8
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_logical8;
|
2008-02-16 01:54:20 +03:00
|
|
|
#endif
|
2005-04-28 15:42:42 +04:00
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER1
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_integer1;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER2
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_integer2;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER4
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_integer4;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER8
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_integer8;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER16
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_integer16;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
2007-06-19 09:03:11 +04:00
|
|
|
#if OMPI_HAVE_FORTRAN_REAL2
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_real2;
|
2007-06-19 09:03:11 +04:00
|
|
|
#endif
|
2005-04-28 15:42:42 +04:00
|
|
|
#if OMPI_HAVE_FORTRAN_REAL4
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_real4;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_REAL8
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_real8;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_REAL16
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_real16;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_REAL4
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_complex8;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_REAL8
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_complex16;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_REAL16
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_datatype_t ompi_mpi_complex32;
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
2004-01-29 22:33:19 +03:00
|
|
|
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_errhandler_t ompi_mpi_errhandler_null;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_errhandler_t ompi_mpi_errors_are_fatal;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_errhandler_t ompi_mpi_errors_return;
|
2004-01-10 11:17:22 +03:00
|
|
|
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_win_t ompi_mpi_win_null;
|
|
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_file_t ompi_mpi_file_null;
|
2004-08-14 05:56:05 +04:00
|
|
|
|
2009-02-24 20:17:33 +03:00
|
|
|
OMPI_DECLSPEC extern struct ompi_predefined_info_t ompi_mpi_info_null;
|
2004-08-12 20:56:24 +04:00
|
|
|
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC extern MPI_Fint *MPI_F_STATUS_IGNORE;
|
|
|
|
|
OMPI_DECLSPEC extern MPI_Fint *MPI_F_STATUSES_IGNORE;
|
2004-01-10 11:17:22 +03:00
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* MPI predefined handles
|
|
|
|
|
*/
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_COMM_WORLD OMPI_PREDEFINED_GLOBAL( MPI_Comm, ompi_mpi_comm_world)
|
|
|
|
|
#define MPI_COMM_SELF OMPI_PREDEFINED_GLOBAL(MPI_Comm, ompi_mpi_comm_self)
|
|
|
|
|
|
|
|
|
|
#define MPI_GROUP_EMPTY OMPI_PREDEFINED_GLOBAL(MPI_Group, ompi_mpi_group_empty)
|
|
|
|
|
|
|
|
|
|
#define MPI_MAX OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_max)
|
|
|
|
|
#define MPI_MIN OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_min)
|
|
|
|
|
#define MPI_SUM OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_sum)
|
|
|
|
|
#define MPI_PROD OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_prod)
|
|
|
|
|
#define MPI_LAND OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_land)
|
|
|
|
|
#define MPI_BAND OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_band)
|
|
|
|
|
#define MPI_LOR OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_lor)
|
|
|
|
|
#define MPI_BOR OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_bor)
|
|
|
|
|
#define MPI_LXOR OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_lxor)
|
|
|
|
|
#define MPI_BXOR OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_bxor)
|
|
|
|
|
#define MPI_MAXLOC OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_maxloc)
|
|
|
|
|
#define MPI_MINLOC OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_minloc)
|
|
|
|
|
#define MPI_REPLACE OMPI_PREDEFINED_GLOBAL(MPI_Op, ompi_mpi_op_replace)
|
2004-01-29 22:33:19 +03:00
|
|
|
|
2005-06-23 14:38:18 +04:00
|
|
|
/* C datatypes */
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_DATATYPE_NULL OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_datatype_null)
|
|
|
|
|
#define MPI_BYTE OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_byte)
|
|
|
|
|
#define MPI_PACKED OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_packed)
|
|
|
|
|
#define MPI_CHAR OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_char)
|
|
|
|
|
#define MPI_SHORT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_short)
|
|
|
|
|
#define MPI_INT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_int)
|
|
|
|
|
#define MPI_LONG OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_long)
|
|
|
|
|
#define MPI_FLOAT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_float)
|
|
|
|
|
#define MPI_DOUBLE OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_double)
|
|
|
|
|
#define MPI_LONG_DOUBLE OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_long_double)
|
|
|
|
|
#define MPI_UNSIGNED_CHAR OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_unsigned_char)
|
|
|
|
|
#define MPI_SIGNED_CHAR OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_signed_char)
|
|
|
|
|
#define MPI_UNSIGNED_SHORT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_unsigned_short)
|
|
|
|
|
#define MPI_UNSIGNED_LONG OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_unsigned_long)
|
|
|
|
|
#define MPI_UNSIGNED OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_unsigned)
|
|
|
|
|
#define MPI_FLOAT_INT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_float_int)
|
|
|
|
|
#define MPI_DOUBLE_INT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_double_int)
|
|
|
|
|
#define MPI_LONG_DOUBLE_INT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_longdbl_int)
|
|
|
|
|
#define MPI_LONG_INT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_long_int)
|
|
|
|
|
#define MPI_SHORT_INT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_short_int)
|
|
|
|
|
#define MPI_2INT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_2int)
|
|
|
|
|
#define MPI_UB OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_ub)
|
|
|
|
|
#define MPI_LB OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_lb)
|
|
|
|
|
#define MPI_WCHAR OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_wchar)
|
2009-05-07 00:11:28 +04:00
|
|
|
#if OPAL_HAVE_LONG_LONG
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_LONG_LONG_INT OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_long_long_int)
|
|
|
|
|
#define MPI_LONG_LONG OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_long_long_int)
|
|
|
|
|
#define MPI_UNSIGNED_LONG_LONG OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_unsigned_long_long)
|
2009-05-07 00:11:28 +04:00
|
|
|
#endif /* OPAL_HAVE_LONG_LONG */
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_2COMPLEX OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_2cplex)
|
|
|
|
|
#define MPI_2DOUBLE_COMPLEX OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_2dblcplex)
|
2004-04-21 02:18:26 +04:00
|
|
|
|
2004-09-19 14:16:00 +04:00
|
|
|
/* Fortran datatype bindings */
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_CHARACTER OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_character)
|
|
|
|
|
#define MPI_LOGICAL OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_logic)
|
2008-02-16 01:54:20 +03:00
|
|
|
#if OMPI_HAVE_FORTRAN_LOGICAL1
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_LOGICAL1 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_logical1)
|
2008-02-16 01:54:20 +03:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_LOGICAL2
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_LOGICAL2 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_logical2)
|
2008-02-16 01:54:20 +03:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_LOGICAL4
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_LOGICAL4 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_logical4)
|
2008-02-16 01:54:20 +03:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_LOGICAL8
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_LOGICAL8 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_logical8)
|
2008-02-16 01:54:20 +03:00
|
|
|
#endif
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_INTEGER OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_integer)
|
2005-04-28 15:42:42 +04:00
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER1
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_INTEGER1 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_integer1)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER2
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_INTEGER2 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_integer2)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER4
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_INTEGER4 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_integer4)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER8
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_INTEGER8 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_integer8)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_INTEGER16
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_INTEGER16 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_integer16)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_REAL OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_real)
|
2005-04-28 15:42:42 +04:00
|
|
|
#if OMPI_HAVE_FORTRAN_REAL4
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_REAL4 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_real4)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_REAL8
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_REAL8 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_real8)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_REAL16
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_REAL16 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_real16)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_DOUBLE_PRECISION OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_dblprec)
|
|
|
|
|
#define MPI_COMPLEX OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_cplex)
|
2005-04-28 15:42:42 +04:00
|
|
|
#if OMPI_HAVE_FORTRAN_REAL4
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_COMPLEX8 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_complex8)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_REAL8
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_COMPLEX16 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_complex16)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
|
|
|
|
#if OMPI_HAVE_FORTRAN_REAL16
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_COMPLEX32 OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_complex32)
|
2005-04-28 15:42:42 +04:00
|
|
|
#endif
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_DOUBLE_COMPLEX OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_dblcplex)
|
|
|
|
|
#define MPI_2REAL OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_2real)
|
|
|
|
|
#define MPI_2DOUBLE_PRECISION OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_2dblprec)
|
|
|
|
|
#define MPI_2INTEGER OMPI_PREDEFINED_GLOBAL(MPI_Datatype, ompi_mpi_2integer)
|
2004-09-19 14:16:00 +04:00
|
|
|
|
2009-05-05 20:41:26 +04:00
|
|
|
#define MPI_ERRORS_ARE_FATAL OMPI_PREDEFINED_GLOBAL(MPI_Errhandler, ompi_mpi_errors_are_fatal)
|
|
|
|
|
#define MPI_ERRORS_RETURN OMPI_PREDEFINED_GLOBAL(MPI_Errhandler, ompi_mpi_errors_return)
|
2004-01-10 11:17:22 +03:00
|
|
|
|
2005-02-23 11:16:09 +03:00
|
|
|
/* Typeclass definition for MPI_Type_match_size */
|
|
|
|
|
#define MPI_TYPECLASS_INTEGER 1
|
|
|
|
|
#define MPI_TYPECLASS_REAL 2
|
|
|
|
|
#define MPI_TYPECLASS_COMPLEX 3
|
2004-01-10 11:17:22 +03:00
|
|
|
|
2003-11-22 19:36:58 +03:00
|
|
|
|
2004-12-12 18:29:29 +03:00
|
|
|
/*
|
|
|
|
|
* MPI API
|
|
|
|
|
*/
|
2003-11-22 19:36:58 +03:00
|
|
|
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Abort(MPI_Comm comm, int errorcode);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Accumulate(void *origin_addr, int origin_count, MPI_Datatype origin_datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int target_rank, MPI_Aint target_disp, int target_count,
|
|
|
|
|
MPI_Datatype target_datatype, MPI_Op op, MPI_Win win);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Add_error_class(int *errorclass);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Add_error_code(int errorclass, int *errorcode);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Add_error_string(int errorcode, char *string);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Address(void *location, MPI_Aint *address);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Allgather(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int recvcount,
|
|
|
|
|
MPI_Datatype recvtype, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Allgatherv(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int *recvcounts,
|
|
|
|
|
int *displs, MPI_Datatype recvtype, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Alloc_mem(MPI_Aint size, MPI_Info info,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *baseptr);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Allreduce(void *sendbuf, void *recvbuf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Alltoall(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int recvcount,
|
|
|
|
|
MPI_Datatype recvtype, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Alltoallv(void *sendbuf, int *sendcounts, int *sdispls,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype sendtype, void *recvbuf, int *recvcounts,
|
|
|
|
|
int *rdispls, MPI_Datatype recvtype, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Alltoallw(void *sendbuf, int *sendcounts, int *sdispls, MPI_Datatype *sendtypes,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int *recvcounts, int *rdispls, MPI_Datatype *recvtypes,
|
|
|
|
|
MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Attr_delete(MPI_Comm comm, int keyval);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Attr_get(MPI_Comm comm, int keyval, void *attribute_val, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Attr_put(MPI_Comm comm, int keyval, void *attribute_val);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Barrier(MPI_Comm comm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Bcast(void *buffer, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Bsend(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Bsend_init(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Buffer_attach(void *buffer, int size);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Buffer_detach(void *buffer, int *size);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Cancel(MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Cart_coords(MPI_Comm comm, int rank, int maxdims, int *coords);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Cart_create(MPI_Comm old_comm, int ndims, int *dims,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *periods, int reorder, MPI_Comm *comm_cart);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Cart_get(MPI_Comm comm, int maxdims, int *dims,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *periods, int *coords);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Cart_map(MPI_Comm comm, int ndims, int *dims,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *periods, int *newrank);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Cart_rank(MPI_Comm comm, int *coords, int *rank);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Cart_shift(MPI_Comm comm, int direction, int disp,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *rank_source, int *rank_dest);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Cart_sub(MPI_Comm comm, int *remain_dims, MPI_Comm *new_comm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Cartdim_get(MPI_Comm comm, int *ndims);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Close_port(char *port_name);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_accept(char *port_name, MPI_Info info, int root,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm comm, MPI_Comm *newcomm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint MPI_Comm_c2f(MPI_Comm comm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_call_errhandler(MPI_Comm comm, int errorcode);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_compare(MPI_Comm comm1, MPI_Comm comm2, int *result);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_connect(char *port_name, MPI_Info info, int root,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm comm, MPI_Comm *newcomm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Comm_create_errhandler(MPI_Comm_errhandler_fn *function,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Errhandler *errhandler);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Comm_create_keyval(MPI_Comm_copy_attr_function *comm_copy_attr_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm_delete_attr_function *comm_delete_attr_fn,
|
|
|
|
|
int *comm_keyval, void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Comm_create(MPI_Comm comm, MPI_Group group, MPI_Comm *newcomm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_delete_attr(MPI_Comm comm, int comm_keyval);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_disconnect(MPI_Comm *comm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_dup(MPI_Comm comm, MPI_Comm *newcomm);
|
|
|
|
|
OMPI_DECLSPEC MPI_Comm MPI_Comm_f2c(MPI_Fint comm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_free_keyval(int *comm_keyval);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_free(MPI_Comm *comm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_get_attr(MPI_Comm comm, int comm_keyval,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *attribute_val, int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Comm_get_errhandler(MPI_Comm comm, MPI_Errhandler *erhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_get_name(MPI_Comm comm, char *comm_name, int *resultlen);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_get_parent(MPI_Comm *parent);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_group(MPI_Comm comm, MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_join(int fd, MPI_Comm *intercomm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_rank(MPI_Comm comm, int *rank);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_remote_group(MPI_Comm comm, MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_remote_size(MPI_Comm comm, int *size);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_set_attr(MPI_Comm comm, int comm_keyval, void *attribute_val);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_set_errhandler(MPI_Comm comm, MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_set_name(MPI_Comm comm, char *comm_name);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_size(MPI_Comm comm, int *size);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_spawn(char *command, char **argv, int maxprocs, MPI_Info info,
|
2004-10-22 21:47:53 +04:00
|
|
|
int root, MPI_Comm comm, MPI_Comm *intercomm,
|
|
|
|
|
int *array_of_errcodes);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Comm_spawn_multiple(int count, char **array_of_commands, char ***array_of_argv,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *array_of_maxprocs, MPI_Info *array_of_info,
|
|
|
|
|
int root, MPI_Comm comm, MPI_Comm *intercomm,
|
|
|
|
|
int *array_of_errcodes);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Comm_split(MPI_Comm comm, int color, int key, MPI_Comm *newcomm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Comm_test_inter(MPI_Comm comm, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Dims_create(int nnodes, int ndims, int *dims);
|
|
|
|
|
OMPI_DECLSPEC MPI_Fint MPI_Errhandler_c2f(MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Errhandler_create(MPI_Handler_function *function,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Errhandler *errhandler);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Errhandler MPI_Errhandler_f2c(MPI_Fint errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Errhandler_free(MPI_Errhandler *errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Errhandler_get(MPI_Comm comm, MPI_Errhandler *errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Errhandler_set(MPI_Comm comm, MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Error_class(int errorcode, int *errorclass);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Error_string(int errorcode, char *string, int *resultlen);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Exscan(void *sendbuf, void *recvbuf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm);
|
2007-08-19 01:35:51 +04:00
|
|
|
#if OMPI_PROVIDE_MPI_FILE_INTERFACE
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint MPI_File_c2f(MPI_File file);
|
|
|
|
|
OMPI_DECLSPEC MPI_File MPI_File_f2c(MPI_Fint file);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_call_errhandler(MPI_File fh, int errorcode);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_create_errhandler(MPI_File_errhandler_fn *function,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Errhandler *errhandler);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_set_errhandler( MPI_File file, MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_errhandler( MPI_File file, MPI_Errhandler *errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_open(MPI_Comm comm, char *filename, int amode,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Info info, MPI_File *fh);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_close(MPI_File *fh);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_delete(char *filename, MPI_Info info);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_set_size(MPI_File fh, MPI_Offset size);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_preallocate(MPI_File fh, MPI_Offset size);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_size(MPI_File fh, MPI_Offset *size);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_group(MPI_File fh, MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_amode(MPI_File fh, int *amode);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_set_info(MPI_File fh, MPI_Info info);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_info(MPI_File fh, MPI_Info *info_used);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_set_view(MPI_File fh, MPI_Offset disp, MPI_Datatype etype,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype filetype, char *datarep, MPI_Info info);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_get_view(MPI_File fh, MPI_Offset *disp,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype *etype,
|
|
|
|
|
MPI_Datatype *filetype, char *datarep);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_read_at(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_read_at_all(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_write_at(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_write_at_all(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_iread_at(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_iwrite_at(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_read(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_read_all(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_write(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_write_all(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_iread(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_iwrite(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_seek(MPI_File fh, MPI_Offset offset, int whence);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_position(MPI_File fh, MPI_Offset *offset);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_byte_offset(MPI_File fh, MPI_Offset offset,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Offset *disp);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_read_shared(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_write_shared(MPI_File fh, void *buf, int count,
|
2009-02-24 20:17:33 +03:00
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_iread_shared(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_iwrite_shared(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_read_ordered(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_write_ordered(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_seek_shared(MPI_File fh, MPI_Offset offset, int whence);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_position_shared(MPI_File fh, MPI_Offset *offset);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_read_at_all_begin(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_read_at_all_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_write_at_all_begin(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_write_at_all_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_read_all_begin(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_read_all_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_write_all_begin(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_write_all_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_read_ordered_begin(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_read_ordered_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_write_ordered_begin(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_write_ordered_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_type_extent(MPI_File fh, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint *extent);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_File_set_atomicity(MPI_File fh, int flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_get_atomicity(MPI_File fh, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_File_sync(MPI_File fh);
|
2007-08-19 01:35:51 +04:00
|
|
|
#endif /* #if OMPI_PROVIDE_MPI_FILE_INTERFACE */
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Finalize(void);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Finalized(int *flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Free_mem(void *base);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Gather(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int recvcount, MPI_Datatype recvtype,
|
|
|
|
|
int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Gatherv(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int *recvcounts, int *displs,
|
|
|
|
|
MPI_Datatype recvtype, int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Get_address(void *location, MPI_Aint *address);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Get_count(MPI_Status *status, MPI_Datatype datatype, int *count);
|
2004-10-22 21:47:53 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Get_elements(MPI_Status *status, MPI_Datatype datatype, int *count);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Get(void *origin_addr, int origin_count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype origin_datatype, int target_rank,
|
|
|
|
|
MPI_Aint target_disp, int target_count,
|
|
|
|
|
MPI_Datatype target_datatype, MPI_Win win);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Get_processor_name(char *name, int *resultlen);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Get_version(int *version, int *subversion);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Graph_create(MPI_Comm comm_old, int nnodes, int *index,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *edges, int reorder, MPI_Comm *comm_graph);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Graph_get(MPI_Comm comm, int maxindex, int maxedges,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *index, int *edges);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Graph_map(MPI_Comm comm, int nnodes, int *index, int *edges,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *newrank);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Graph_neighbors_count(MPI_Comm comm, int rank, int *nneighbors);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Graph_neighbors(MPI_Comm comm, int rank, int maxneighbors,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *neighbors);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Graphdims_get(MPI_Comm comm, int *nnodes, int *nedges);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Grequest_complete(MPI_Request request);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Grequest_start(MPI_Grequest_query_function *query_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Grequest_free_function *free_fn,
|
|
|
|
|
MPI_Grequest_cancel_function *cancel_fn,
|
|
|
|
|
void *extra_state, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint MPI_Group_c2f(MPI_Group group);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Group_compare(MPI_Group group1, MPI_Group group2, int *result);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Group_difference(MPI_Group group1, MPI_Group group2,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Group_excl(MPI_Group group, int n, int *ranks,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Group MPI_Group_f2c(MPI_Fint group);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Group_free(MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Group_incl(MPI_Group group, int n, int *ranks,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Group_intersection(MPI_Group group1, MPI_Group group2,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Group_range_excl(MPI_Group group, int n, int ranges[][3],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Group_range_incl(MPI_Group group, int n, int ranges[][3],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Group_rank(MPI_Group group, int *rank);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Group_size(MPI_Group group, int *size);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Group_translate_ranks(MPI_Group group1, int n, int *ranks1,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group group2, int *ranks2);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Group_union(MPI_Group group1, MPI_Group group2,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Ibsend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint MPI_Info_c2f(MPI_Info info);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Info_create(MPI_Info *info);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Info_delete(MPI_Info info, char *key);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Info_dup(MPI_Info info, MPI_Info *newinfo);
|
|
|
|
|
OMPI_DECLSPEC MPI_Info MPI_Info_f2c(MPI_Fint info);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Info_free(MPI_Info *info);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Info_get(MPI_Info info, char *key, int valuelen,
|
2004-10-22 21:47:53 +04:00
|
|
|
char *value, int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Info_get_nkeys(MPI_Info info, int *nkeys);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Info_get_nthkey(MPI_Info info, int n, char *key);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Info_get_valuelen(MPI_Info info, char *key, int *valuelen,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Info_set(MPI_Info info, char *key, char *value);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Init(int *argc, char ***argv);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Initialized(int *flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Init_thread(int *argc, char ***argv, int required,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *provided);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Intercomm_create(MPI_Comm local_comm, int local_leader,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm bridge_comm, int remote_leader,
|
|
|
|
|
int tag, MPI_Comm *newintercomm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Intercomm_merge(MPI_Comm intercomm, int high,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm *newintercomm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Iprobe(int source, int tag, MPI_Comm comm, int *flag,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Irecv(void *buf, int count, MPI_Datatype datatype, int source,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Irsend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Isend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Issend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Is_thread_main(int *flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Keyval_create(MPI_Copy_function *copy_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Delete_function *delete_fn,
|
|
|
|
|
int *keyval, void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Keyval_free(int *keyval);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Lookup_name(char *service_name, MPI_Info info, char *port_name);
|
|
|
|
|
OMPI_DECLSPEC MPI_Fint MPI_Op_c2f(MPI_Op op);
|
2004-10-22 21:47:53 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Op_create(MPI_User_function *function, int commute, MPI_Op *op);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Open_port(MPI_Info info, char *port_name);
|
|
|
|
|
OMPI_DECLSPEC MPI_Op MPI_Op_f2c(MPI_Fint op);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Op_free(MPI_Op *op);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Pack_external(char *datarep, void *inbuf, int incount,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, void *outbuf,
|
|
|
|
|
MPI_Aint outsize, MPI_Aint *position);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Pack_external_size(char *datarep, int incount,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Aint *size);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Pack(void *inbuf, int incount, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *outbuf, int outsize, int *position, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Pack_size(int incount, MPI_Datatype datatype, MPI_Comm comm,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *size);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Pcontrol(const int level, ...);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Probe(int source, int tag, MPI_Comm comm, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Publish_name(char *service_name, MPI_Info info,
|
2004-10-22 21:47:53 +04:00
|
|
|
char *port_name);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Put(void *origin_addr, int origin_count, MPI_Datatype origin_datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int target_rank, MPI_Aint target_disp, int target_count,
|
|
|
|
|
MPI_Datatype target_datatype, MPI_Win win);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Query_thread(int *provided);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Recv_init(void *buf, int count, MPI_Datatype datatype, int source,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Recv(void *buf, int count, MPI_Datatype datatype, int source,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Reduce(void *sendbuf, void *recvbuf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, int root, MPI_Comm comm);
|
Two major things in this commit:
* New "op" MPI layer framework
* Addition of the MPI_REDUCE_LOCAL proposed function (for MPI-2.2)
= Op framework =
Add new "op" framework in the ompi layer. This framework replaces the
hard-coded MPI_Op back-end functions for (MPI_Op, MPI_Datatype) tuples
for pre-defined MPI_Ops, allowing components and modules to provide
the back-end functions. The intent is that components can be written
to take advantage of hardware acceleration (GPU, FPGA, specialized CPU
instructions, etc.). Similar to other frameworks, components are
intended to be able to discover at run-time if they can be used, and
if so, elect themselves to be selected (or disqualify themselves from
selection if they cannot run). If specialized hardware is not
available, there is a default set of functions that will automatically
be used.
This framework is ''not'' used for user-defined MPI_Ops.
The new op framework is similar to the existing coll framework, in
that the final set of function pointers that are used on any given
intrinsic MPI_Op can be a mixed bag of function pointers, potentially
coming from multiple different op modules. This allows for hardware
that only supports some of the operations, not all of them (e.g., a
GPU that only supports single-precision operations).
All the hard-coded back-end MPI_Op functions for (MPI_Op,
MPI_Datatype) tuples still exist, but unlike coll, they're in the
framework base (vs. being in a separate "basic" component) and are
automatically used if no component is found at runtime that provides a
module with the necessary function pointers.
There is an "example" op component that will hopefully be useful to
those writing meaningful op components. It is currently
.ompi_ignore'd so that it doesn't impinge on other developers (it's
somewhat chatty in terms of opal_output() so that you can tell when
its functions have been invoked). See the README file in the example
op component directory. Developers of new op components are
encouraged to look at the following wiki pages:
https://svn.open-mpi.org/trac/ompi/wiki/devel/Autogen
https://svn.open-mpi.org/trac/ompi/wiki/devel/CreateComponent
https://svn.open-mpi.org/trac/ompi/wiki/devel/CreateFramework
= MPI_REDUCE_LOCAL =
Part of the MPI-2.2 proposal listed here:
https://svn.mpi-forum.org/trac/mpi-forum-web/ticket/24
is to add a new function named MPI_REDUCE_LOCAL. It is very easy to
implement, so I added it (also because it makes testing the op
framework pretty easy -- you can do it in serial rather than via
parallel reductions). There's even a man page!
This commit was SVN r20280.
2009-01-15 02:44:31 +03:00
|
|
|
OMPI_DECLSPEC int MPI_Reduce_local(void *inbuf, void *inoutbuf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Op op);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Reduce_scatter(void *sendbuf, void *recvbuf, int *recvcounts,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Register_datarep(char *datarep,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datarep_conversion_function *read_conversion_fn,
|
|
|
|
|
MPI_Datarep_conversion_function *write_conversion_fn,
|
|
|
|
|
MPI_Datarep_extent_function *dtype_file_extent_fn,
|
|
|
|
|
void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint MPI_Request_c2f(MPI_Request request);
|
|
|
|
|
OMPI_DECLSPEC MPI_Request MPI_Request_f2c(MPI_Fint request);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Request_free(MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Request_get_status(MPI_Request request, int *flag,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Rsend(void *ibuf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Rsend_init(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm,
|
|
|
|
|
MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Scan(void *sendbuf, void *recvbuf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Scatter(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int recvcount, MPI_Datatype recvtype,
|
|
|
|
|
int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Scatterv(void *sendbuf, int *sendcounts, int *displs,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype sendtype, void *recvbuf, int recvcount,
|
|
|
|
|
MPI_Datatype recvtype, int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Send_init(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm,
|
|
|
|
|
MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Send(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Sendrecv(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int sendtag, void *recvbuf, int recvcount,
|
|
|
|
|
MPI_Datatype recvtype, int source, int recvtag,
|
|
|
|
|
MPI_Comm comm, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Sendrecv_replace(void * buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int sendtag, int source, int recvtag,
|
|
|
|
|
MPI_Comm comm, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Ssend_init(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm,
|
|
|
|
|
MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Ssend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Start(MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Startall(int count, MPI_Request *array_of_requests);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Status_c2f(MPI_Status *c_status, MPI_Fint *f_status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Status_f2c(MPI_Fint *f_status, MPI_Status *c_status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Status_set_cancelled(MPI_Status *status, int flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Status_set_elements(MPI_Status *status, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Testall(int count, MPI_Request array_of_requests[], int *flag,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Status array_of_statuses[]);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Testany(int count, MPI_Request array_of_requests[], int *index,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *flag, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Test(MPI_Request *request, int *flag, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Test_cancelled(MPI_Status *status, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Testsome(int incount, MPI_Request array_of_requests[],
|
2004-10-22 21:47:53 +04:00
|
|
|
int *outcount, int array_of_indices[],
|
|
|
|
|
MPI_Status array_of_statuses[]);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Topo_test(MPI_Comm comm, int *status);
|
|
|
|
|
OMPI_DECLSPEC MPI_Fint MPI_Type_c2f(MPI_Datatype datatype);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_commit(MPI_Datatype *type);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_contiguous(int count, MPI_Datatype oldtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_create_darray(int size, int rank, int ndims,
|
2004-10-22 21:47:53 +04:00
|
|
|
int gsize_array[], int distrib_array[],
|
|
|
|
|
int darg_array[], int psize_array[],
|
|
|
|
|
int order, MPI_Datatype oldtype,
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_create_f90_complex(int p, int r, MPI_Datatype *newtype);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_create_f90_integer(int r, MPI_Datatype *newtype);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_create_f90_real(int p, int r, MPI_Datatype *newtype);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_create_hindexed(int count, int array_of_blocklengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint array_of_displacements[],
|
|
|
|
|
MPI_Datatype oldtype,
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_create_hvector(int count, int blocklength, MPI_Aint stride,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype oldtype,
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_create_keyval(MPI_Type_copy_attr_function *type_copy_attr_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Type_delete_attr_function *type_delete_attr_fn,
|
|
|
|
|
int *type_keyval, void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_create_indexed_block(int count, int blocklength,
|
2004-10-22 21:47:53 +04:00
|
|
|
int array_of_displacements[],
|
|
|
|
|
MPI_Datatype oldtype,
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_create_struct(int count, int array_of_block_lengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint array_of_displacements[],
|
|
|
|
|
MPI_Datatype array_of_types[],
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_create_subarray(int ndims, int size_array[], int subsize_array[],
|
2004-10-22 21:47:53 +04:00
|
|
|
int start_array[], int order,
|
|
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_create_resized(MPI_Datatype oldtype, MPI_Aint lb,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint extent, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_delete_attr(MPI_Datatype type, int type_keyval);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_dup(MPI_Datatype type, MPI_Datatype *newtype);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_extent(MPI_Datatype type, MPI_Aint *extent);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_free(MPI_Datatype *type);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_free_keyval(int *type_keyval);
|
|
|
|
|
OMPI_DECLSPEC MPI_Datatype MPI_Type_f2c(MPI_Fint datatype);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_get_attr(MPI_Datatype type, int type_keyval,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *attribute_val, int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_get_contents(MPI_Datatype mtype, int max_integers,
|
2004-10-22 21:47:53 +04:00
|
|
|
int max_addresses, int max_datatypes,
|
|
|
|
|
int array_of_integers[],
|
|
|
|
|
MPI_Aint array_of_addresses[],
|
|
|
|
|
MPI_Datatype array_of_datatypes[]);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_get_envelope(MPI_Datatype type, int *num_integers,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *num_addresses, int *num_datatypes,
|
|
|
|
|
int *combiner);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_get_extent(MPI_Datatype type, MPI_Aint *lb,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint *extent);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_get_name(MPI_Datatype type, char *type_name,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *resultlen);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_get_true_extent(MPI_Datatype datatype, MPI_Aint *true_lb,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint *true_extent);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_hindexed(int count, int array_of_blocklengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint array_of_displacements[],
|
|
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_hvector(int count, int blocklength, MPI_Aint stride,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_indexed(int count, int array_of_blocklengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
int array_of_displacements[],
|
|
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_lb(MPI_Datatype type, MPI_Aint *lb);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_match_size(int typeclass, int size, MPI_Datatype *type);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_set_attr(MPI_Datatype type, int type_keyval,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *attr_val);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_set_name(MPI_Datatype type, char *type_name);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_size(MPI_Datatype type, int *size);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_struct(int count, int array_of_blocklengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint array_of_displacements[],
|
|
|
|
|
MPI_Datatype array_of_types[],
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Type_ub(MPI_Datatype mtype, MPI_Aint *ub);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Type_vector(int count, int blocklength, int stride,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Unpack(void *inbuf, int insize, int *position,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *outbuf, int outcount, MPI_Datatype datatype,
|
|
|
|
|
MPI_Comm comm);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Unpublish_name(char *service_name, MPI_Info info, char *port_name);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Unpack_external (char *datarep, void *inbuf, MPI_Aint insize,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint *position, void *outbuf, int outcount,
|
|
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Waitall(int count, MPI_Request *array_of_requests,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Status *array_of_statuses);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Waitany(int count, MPI_Request *array_of_requests,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *index, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Wait(MPI_Request *request, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Waitsome(int incount, MPI_Request *array_of_requests,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *outcount, int *array_of_indices,
|
|
|
|
|
MPI_Status *array_of_statuses);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint MPI_Win_c2f(MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_call_errhandler(MPI_Win win, int errorcode);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_complete(MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_create(void *base, MPI_Aint size, int disp_unit,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Info info, MPI_Comm comm, MPI_Win *win);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Win_create_errhandler(MPI_Win_errhandler_fn *function,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Errhandler *errhandler);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Win_create_keyval(MPI_Win_copy_attr_function *win_copy_attr_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Win_delete_attr_function *win_delete_attr_fn,
|
|
|
|
|
int *win_keyval, void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Win_delete_attr(MPI_Win win, int win_keyval);
|
|
|
|
|
OMPI_DECLSPEC MPI_Win MPI_Win_f2c(MPI_Fint win);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_fence(int assert, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_free(MPI_Win *win);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_free_keyval(int *win_keyval);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_get_attr(MPI_Win win, int win_keyval,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *attribute_val, int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int MPI_Win_get_errhandler(MPI_Win win, MPI_Errhandler *errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_get_group(MPI_Win win, MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_get_name(MPI_Win win, char *win_name, int *resultlen);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_lock(int lock_type, int rank, int assert, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_post(MPI_Group group, int assert, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_set_attr(MPI_Win win, int win_keyval, void *attribute_val);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_set_errhandler(MPI_Win win, MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_set_name(MPI_Win win, char *win_name);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_start(MPI_Group group, int assert, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_test(MPI_Win win, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_unlock(int rank, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int MPI_Win_wait(MPI_Win win);
|
2005-11-07 20:22:48 +03:00
|
|
|
OMPI_DECLSPEC double MPI_Wtick(void);
|
|
|
|
|
OMPI_DECLSPEC double MPI_Wtime(void);
|
2005-03-26 21:49:16 +03:00
|
|
|
|
2004-01-08 16:36:59 +03:00
|
|
|
|
2004-01-10 11:17:22 +03:00
|
|
|
/*
|
|
|
|
|
* Profiling MPI API
|
|
|
|
|
*/
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Abort(MPI_Comm comm, int errorcode);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Accumulate(void *origin_addr, int origin_count, MPI_Datatype origin_datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int target_rank, MPI_Aint target_disp, int target_count,
|
|
|
|
|
MPI_Datatype target_datatype, MPI_Op op, MPI_Win win);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Add_error_class(int *errorclass);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Add_error_code(int errorclass, int *errorcode);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Add_error_string(int errorcode, char *string);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Address(void *location, MPI_Aint *address);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Allgather(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int recvcount,
|
|
|
|
|
MPI_Datatype recvtype, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Allgatherv(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int *recvcounts,
|
|
|
|
|
int *displs, MPI_Datatype recvtype, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Alloc_mem(MPI_Aint size, MPI_Info info,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *baseptr);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Allreduce(void *sendbuf, void *recvbuf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Alltoall(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int recvcount,
|
|
|
|
|
MPI_Datatype recvtype, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Alltoallv(void *sendbuf, int *sendcounts, int *sdispls,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype sendtype, void *recvbuf, int *recvcounts,
|
|
|
|
|
int *rdispls, MPI_Datatype recvtype, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Alltoallw(void *sendbuf, int *sendcounts, int *sdispls, MPI_Datatype *sendtypes,
|
2004-01-21 03:05:46 +03:00
|
|
|
void *recvbuf, int *recvcounts, int *rdispls, MPI_Datatype *recvtypes,
|
|
|
|
|
MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Attr_delete(MPI_Comm comm, int keyval);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Attr_get(MPI_Comm comm, int keyval, void *attribute_val, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Attr_put(MPI_Comm comm, int keyval, void *attribute_val);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Barrier(MPI_Comm comm);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Bcast(void *buffer, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Bsend(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Bsend_init(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Buffer_attach(void *buffer, int size);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Buffer_detach(void *buffer, int *size);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Cancel(MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Cart_coords(MPI_Comm comm, int rank, int maxdims, int *coords);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Cart_create(MPI_Comm old_comm, int ndims, int *dims,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *periods, int reorder, MPI_Comm *comm_cart);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Cart_get(MPI_Comm comm, int maxdims, int *dims,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *periods, int *coords);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Cart_map(MPI_Comm comm, int ndims, int *dims,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *periods, int *newrank);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Cart_rank(MPI_Comm comm, int *coords, int *rank);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Cart_shift(MPI_Comm comm, int direction, int disp,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *rank_source, int *rank_dest);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Cart_sub(MPI_Comm comm, int *remain_dims, MPI_Comm *new_comm);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Cartdim_get(MPI_Comm comm, int *ndims);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Close_port(char *port_name);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_accept(char *port_name, MPI_Info info, int root,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm comm, MPI_Comm *newcomm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint PMPI_Comm_c2f(MPI_Comm comm);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_call_errhandler(MPI_Comm comm, int errorcode);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_compare(MPI_Comm comm1, MPI_Comm comm2, int *result);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_connect(char *port_name, MPI_Info info, int root,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm comm, MPI_Comm *newcomm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Comm_create_errhandler(MPI_Comm_errhandler_fn *function,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Errhandler *errhandler);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Comm_create_keyval(MPI_Comm_copy_attr_function *comm_copy_attr_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm_delete_attr_function *comm_delete_attr_fn,
|
|
|
|
|
int *comm_keyval, void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Comm_create(MPI_Comm comm, MPI_Group group, MPI_Comm *newcomm);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_delete_attr(MPI_Comm comm, int comm_keyval);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_disconnect(MPI_Comm *comm);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_dup(MPI_Comm comm, MPI_Comm *newcomm);
|
|
|
|
|
OMPI_DECLSPEC MPI_Comm PMPI_Comm_f2c(MPI_Fint comm);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_free_keyval(int *comm_keyval);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_free(MPI_Comm *comm);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_get_attr(MPI_Comm comm, int comm_keyval,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *attribute_val, int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Comm_get_errhandler(MPI_Comm comm, MPI_Errhandler *erhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_get_name(MPI_Comm comm, char *comm_name, int *resultlen);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_get_parent(MPI_Comm *parent);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_group(MPI_Comm comm, MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_join(int fd, MPI_Comm *intercomm);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_rank(MPI_Comm comm, int *rank);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_remote_group(MPI_Comm comm, MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_remote_size(MPI_Comm comm, int *size);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_set_attr(MPI_Comm comm, int comm_keyval, void *attribute_val);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_set_errhandler(MPI_Comm comm, MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_set_name(MPI_Comm comm, char *comm_name);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_size(MPI_Comm comm, int *size);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_spawn(char *command, char **argv, int maxprocs, MPI_Info info,
|
2004-10-22 21:47:53 +04:00
|
|
|
int root, MPI_Comm comm, MPI_Comm *intercomm,
|
|
|
|
|
int *array_of_errcodes);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Comm_spawn_multiple(int count, char **array_of_commands, char ***array_of_argv,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *array_of_maxprocs, MPI_Info *array_of_info,
|
|
|
|
|
int root, MPI_Comm comm, MPI_Comm *intercomm,
|
|
|
|
|
int *array_of_errcodes);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Comm_split(MPI_Comm comm, int color, int key, MPI_Comm *newcomm);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Comm_test_inter(MPI_Comm comm, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Dims_create(int nnodes, int ndims, int *dims);
|
|
|
|
|
OMPI_DECLSPEC MPI_Fint PMPI_Errhandler_c2f(MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Errhandler_create(MPI_Handler_function *function,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Errhandler *errhandler);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Errhandler PMPI_Errhandler_f2c(MPI_Fint errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Errhandler_free(MPI_Errhandler *errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Errhandler_get(MPI_Comm comm, MPI_Errhandler *errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Errhandler_set(MPI_Comm comm, MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Error_class(int errorcode, int *errorclass);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Error_string(int errorcode, char *string, int *resultlen);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Exscan(void *sendbuf, void *recvbuf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm);
|
2007-08-19 01:35:51 +04:00
|
|
|
#if OMPI_PROVIDE_MPI_FILE_INTERFACE
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint PMPI_File_c2f(MPI_File file);
|
|
|
|
|
OMPI_DECLSPEC MPI_File PMPI_File_f2c(MPI_Fint file);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_call_errhandler(MPI_File fh, int errorcode);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_create_errhandler(MPI_File_errhandler_fn *function,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Errhandler *errhandler);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_set_errhandler( MPI_File file, MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_errhandler( MPI_File file, MPI_Errhandler *errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_open(MPI_Comm comm, char *filename, int amode,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Info info, MPI_File *fh);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_close(MPI_File *fh);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_delete(char *filename, MPI_Info info);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_set_size(MPI_File fh, MPI_Offset size);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_preallocate(MPI_File fh, MPI_Offset size);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_size(MPI_File fh, MPI_Offset *size);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_group(MPI_File fh, MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_amode(MPI_File fh, int *amode);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_set_info(MPI_File fh, MPI_Info info);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_info(MPI_File fh, MPI_Info *info_used);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_set_view(MPI_File fh, MPI_Offset disp, MPI_Datatype etype,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype filetype, char *datarep, MPI_Info info);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_get_view(MPI_File fh, MPI_Offset *disp,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype *etype,
|
|
|
|
|
MPI_Datatype *filetype, char *datarep);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_read_at(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_read_at_all(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_write_at(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_write_at_all(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_iread_at(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_iwrite_at(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype, MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_read(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_read_all(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_write(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_write_all(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_iread(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_iwrite(MPI_File fh, void *buf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_seek(MPI_File fh, MPI_Offset offset, int whence);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_position(MPI_File fh, MPI_Offset *offset);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_byte_offset(MPI_File fh, MPI_Offset offset,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Offset *disp);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_read_shared(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_write_shared(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_iread_shared(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_iwrite_shared(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_read_ordered(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_write_ordered(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_seek_shared(MPI_File fh, MPI_Offset offset, int whence);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_position_shared(MPI_File fh, MPI_Offset *offset);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_read_at_all_begin(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_read_at_all_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_write_at_all_begin(MPI_File fh, MPI_Offset offset, void *buf,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count, MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_write_at_all_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_read_all_begin(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_read_all_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_write_all_begin(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_write_all_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_read_ordered_begin(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_read_ordered_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_write_ordered_begin(MPI_File fh, void *buf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_write_ordered_end(MPI_File fh, void *buf, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_type_extent(MPI_File fh, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint *extent);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_File_set_atomicity(MPI_File fh, int flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_get_atomicity(MPI_File fh, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_File_sync(MPI_File fh);
|
2007-08-19 01:35:51 +04:00
|
|
|
#endif /* #if OMPI_PROVIDE_MPI_FILE_INTERFACE */
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Finalize(void);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Finalized(int *flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Free_mem(void *base);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Gather(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int recvcount, MPI_Datatype recvtype,
|
|
|
|
|
int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Gatherv(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int *recvcounts, int *displs,
|
|
|
|
|
MPI_Datatype recvtype, int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Get_address(void *location, MPI_Aint *address);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Get_count(MPI_Status *status, MPI_Datatype datatype, int *count);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Get_elements(MPI_Status *status, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *count);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Get(void *origin_addr, int origin_count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype origin_datatype, int target_rank,
|
|
|
|
|
MPI_Aint target_disp, int target_count,
|
|
|
|
|
MPI_Datatype target_datatype, MPI_Win win);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Get_processor_name(char *name, int *resultlen);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Get_version(int *version, int *subversion);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Graph_create(MPI_Comm comm_old, int nnodes, int *index,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *edges, int reorder, MPI_Comm *comm_graph);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Graph_get(MPI_Comm comm, int maxindex, int maxedges,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *index, int *edges);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Graph_map(MPI_Comm comm, int nnodes, int *index, int *edges,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *newrank);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Graph_neighbors_count(MPI_Comm comm, int rank, int *nneighbors);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Graph_neighbors(MPI_Comm comm, int rank, int maxneighbors,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *neighbors);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Graphdims_get(MPI_Comm comm, int *nnodes, int *nedges);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Grequest_complete(MPI_Request request);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Grequest_start(MPI_Grequest_query_function *query_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Grequest_free_function *free_fn,
|
|
|
|
|
MPI_Grequest_cancel_function *cancel_fn,
|
|
|
|
|
void *extra_state, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint PMPI_Group_c2f(MPI_Group group);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Group_compare(MPI_Group group1, MPI_Group group2, int *result);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Group_difference(MPI_Group group1, MPI_Group group2,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Group_excl(MPI_Group group, int n, int *ranks,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Group PMPI_Group_f2c(MPI_Fint group);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Group_free(MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Group_incl(MPI_Group group, int n, int *ranks,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Group_intersection(MPI_Group group1, MPI_Group group2,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Group_range_excl(MPI_Group group, int n, int ranges[][3],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Group_range_incl(MPI_Group group, int n, int ranges[][3],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Group_rank(MPI_Group group, int *rank);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Group_size(MPI_Group group, int *size);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Group_translate_ranks(MPI_Group group1, int n, int *ranks1,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group group2, int *ranks2);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Group_union(MPI_Group group1, MPI_Group group2,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Group *newgroup);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Ibsend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint PMPI_Info_c2f(MPI_Info info);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Info_create(MPI_Info *info);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Info_delete(MPI_Info info, char *key);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Info_dup(MPI_Info info, MPI_Info *newinfo);
|
|
|
|
|
OMPI_DECLSPEC MPI_Info PMPI_Info_f2c(MPI_Fint info);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Info_free(MPI_Info *info);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Info_get(MPI_Info info, char *key, int valuelen,
|
2004-10-22 21:47:53 +04:00
|
|
|
char *value, int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Info_get_nkeys(MPI_Info info, int *nkeys);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Info_get_nthkey(MPI_Info info, int n, char *key);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Info_get_valuelen(MPI_Info info, char *key, int *valuelen,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Info_set(MPI_Info info, char *key, char *value);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Init(int *argc, char ***argv);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Initialized(int *flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Init_thread(int *argc, char ***argv, int required,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *provided);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Intercomm_create(MPI_Comm local_comm, int local_leader,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm bridge_comm, int remote_leader,
|
|
|
|
|
int tag, MPI_Comm *newintercomm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Intercomm_merge(MPI_Comm intercomm, int high,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Comm *newintercomm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Iprobe(int source, int tag, MPI_Comm comm, int *flag,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Irecv(void *buf, int count, MPI_Datatype datatype, int source,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Irsend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Isend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Issend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Is_thread_main(int *flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Keyval_create(MPI_Copy_function *copy_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Delete_function *delete_fn,
|
|
|
|
|
int *keyval, void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Keyval_free(int *keyval);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Lookup_name(char *service_name, MPI_Info info, char *port_name);
|
|
|
|
|
OMPI_DECLSPEC MPI_Fint PMPI_Op_c2f(MPI_Op op);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Op_create(MPI_User_function *function, int commute,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Op *op);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Open_port(MPI_Info info, char *port_name);
|
|
|
|
|
OMPI_DECLSPEC MPI_Op PMPI_Op_f2c(MPI_Fint op);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Op_free(MPI_Op *op);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Pack_external(char *datarep, void *inbuf, int incount,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, void *outbuf,
|
|
|
|
|
MPI_Aint outsize, MPI_Aint *position);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Pack_external_size(char *datarep, int incount,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Aint *size);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Pack(void *inbuf, int incount, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *outbuf, int outsize, int *position, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Pack_size(int incount, MPI_Datatype datatype, MPI_Comm comm,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *size);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Pcontrol(const int level, ...);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Probe(int source, int tag, MPI_Comm comm, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Publish_name(char *service_name, MPI_Info info,
|
2004-10-22 21:47:53 +04:00
|
|
|
char *port_name);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Put(void *origin_addr, int origin_count, MPI_Datatype origin_datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int target_rank, MPI_Aint target_disp, int target_count,
|
|
|
|
|
MPI_Datatype target_datatype, MPI_Win win);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Query_thread(int *provided);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Recv_init(void *buf, int count, MPI_Datatype datatype, int source,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Recv(void *buf, int count, MPI_Datatype datatype, int source,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Reduce(void *sendbuf, void *recvbuf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, int root, MPI_Comm comm);
|
Two major things in this commit:
* New "op" MPI layer framework
* Addition of the MPI_REDUCE_LOCAL proposed function (for MPI-2.2)
= Op framework =
Add new "op" framework in the ompi layer. This framework replaces the
hard-coded MPI_Op back-end functions for (MPI_Op, MPI_Datatype) tuples
for pre-defined MPI_Ops, allowing components and modules to provide
the back-end functions. The intent is that components can be written
to take advantage of hardware acceleration (GPU, FPGA, specialized CPU
instructions, etc.). Similar to other frameworks, components are
intended to be able to discover at run-time if they can be used, and
if so, elect themselves to be selected (or disqualify themselves from
selection if they cannot run). If specialized hardware is not
available, there is a default set of functions that will automatically
be used.
This framework is ''not'' used for user-defined MPI_Ops.
The new op framework is similar to the existing coll framework, in
that the final set of function pointers that are used on any given
intrinsic MPI_Op can be a mixed bag of function pointers, potentially
coming from multiple different op modules. This allows for hardware
that only supports some of the operations, not all of them (e.g., a
GPU that only supports single-precision operations).
All the hard-coded back-end MPI_Op functions for (MPI_Op,
MPI_Datatype) tuples still exist, but unlike coll, they're in the
framework base (vs. being in a separate "basic" component) and are
automatically used if no component is found at runtime that provides a
module with the necessary function pointers.
There is an "example" op component that will hopefully be useful to
those writing meaningful op components. It is currently
.ompi_ignore'd so that it doesn't impinge on other developers (it's
somewhat chatty in terms of opal_output() so that you can tell when
its functions have been invoked). See the README file in the example
op component directory. Developers of new op components are
encouraged to look at the following wiki pages:
https://svn.open-mpi.org/trac/ompi/wiki/devel/Autogen
https://svn.open-mpi.org/trac/ompi/wiki/devel/CreateComponent
https://svn.open-mpi.org/trac/ompi/wiki/devel/CreateFramework
= MPI_REDUCE_LOCAL =
Part of the MPI-2.2 proposal listed here:
https://svn.mpi-forum.org/trac/mpi-forum-web/ticket/24
is to add a new function named MPI_REDUCE_LOCAL. It is very easy to
implement, so I added it (also because it makes testing the op
framework pretty easy -- you can do it in serial rather than via
parallel reductions). There's even a man page!
This commit was SVN r20280.
2009-01-15 02:44:31 +03:00
|
|
|
OMPI_DECLSPEC int PMPI_Reduce_local(void *inbuf, void *inoutbuf, int count,
|
|
|
|
|
MPI_Datatype datatype, MPI_Op);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Reduce_scatter(void *sendbuf, void *recvbuf, int *recvcounts,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Register_datarep(char *datarep,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datarep_conversion_function *read_conversion_fn,
|
|
|
|
|
MPI_Datarep_conversion_function *write_conversion_fn,
|
|
|
|
|
MPI_Datarep_extent_function *dtype_file_extent_fn,
|
|
|
|
|
void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint PMPI_Request_c2f(MPI_Request request);
|
|
|
|
|
OMPI_DECLSPEC MPI_Request PMPI_Request_f2c(MPI_Fint request);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Request_free(MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Request_get_status(MPI_Request request, int *flag,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Rsend(void *ibuf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Rsend_init(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm,
|
|
|
|
|
MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Scan(void *sendbuf, void *recvbuf, int count,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype datatype, MPI_Op op, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Scatter(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *recvbuf, int recvcount, MPI_Datatype recvtype,
|
|
|
|
|
int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Scatterv(void *sendbuf, int *sendcounts, int *displs,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype sendtype, void *recvbuf, int recvcount,
|
|
|
|
|
MPI_Datatype recvtype, int root, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Send_init(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm,
|
|
|
|
|
MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Send(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Sendrecv(void *sendbuf, int sendcount, MPI_Datatype sendtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int sendtag, void *recvbuf, int recvcount,
|
|
|
|
|
MPI_Datatype recvtype, int source, int recvtag,
|
|
|
|
|
MPI_Comm comm, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Sendrecv_replace(void * buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int sendtag, int source, int recvtag,
|
|
|
|
|
MPI_Comm comm, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Ssend_init(void *buf, int count, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int dest, int tag, MPI_Comm comm,
|
|
|
|
|
MPI_Request *request);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Ssend(void *buf, int count, MPI_Datatype datatype, int dest,
|
2004-10-22 21:47:53 +04:00
|
|
|
int tag, MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Start(MPI_Request *request);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Startall(int count, MPI_Request *array_of_requests);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Status_c2f(MPI_Status *c_status, MPI_Fint *f_status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Status_f2c(MPI_Fint *f_status, MPI_Status *c_status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Status_set_cancelled(MPI_Status *status, int flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Status_set_elements(MPI_Status *status, MPI_Datatype datatype,
|
2004-10-22 21:47:53 +04:00
|
|
|
int count);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Testall(int count, MPI_Request array_of_requests[], int *flag,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Status array_of_statuses[]);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Testany(int count, MPI_Request array_of_requests[], int *index, int *flag, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Test(MPI_Request *request, int *flag, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Test_cancelled(MPI_Status *status, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Testsome(int incount, MPI_Request array_of_requests[],
|
2004-10-22 21:47:53 +04:00
|
|
|
int *outcount, int array_of_indices[],
|
|
|
|
|
MPI_Status array_of_statuses[]);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Topo_test(MPI_Comm comm, int *status);
|
|
|
|
|
OMPI_DECLSPEC MPI_Fint PMPI_Type_c2f(MPI_Datatype datatype);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_commit(MPI_Datatype *type);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_contiguous(int count, MPI_Datatype oldtype,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_darray(int size, int rank, int ndims,
|
2004-10-22 21:47:53 +04:00
|
|
|
int gsize_array[], int distrib_array[],
|
|
|
|
|
int darg_array[], int psize_array[],
|
|
|
|
|
int order, MPI_Datatype oldtype,
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_f90_complex(int p, int r, MPI_Datatype *newtype);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_f90_integer(int r, MPI_Datatype *newtype);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_f90_real(int p, int r, MPI_Datatype *newtype);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_hindexed(int count, int array_of_blocklengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint array_of_displacements[],
|
|
|
|
|
MPI_Datatype oldtype,
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_hvector(int count, int blocklength, MPI_Aint stride,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype oldtype,
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_keyval(MPI_Type_copy_attr_function *type_copy_attr_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Type_delete_attr_function *type_delete_attr_fn,
|
|
|
|
|
int *type_keyval, void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_indexed_block(int count, int blocklength,
|
2004-10-22 21:47:53 +04:00
|
|
|
int array_of_displacements[],
|
|
|
|
|
MPI_Datatype oldtype,
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_struct(int count, int array_of_block_lengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint array_of_displacements[],
|
|
|
|
|
MPI_Datatype array_of_types[],
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_subarray(int ndims, int size_array[], int subsize_array[],
|
2004-10-22 21:47:53 +04:00
|
|
|
int start_array[], int order,
|
|
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_create_resized(MPI_Datatype oldtype, MPI_Aint lb,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint extent, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_delete_attr(MPI_Datatype type, int type_keyval);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_dup(MPI_Datatype type, MPI_Datatype *newtype);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_extent(MPI_Datatype type, MPI_Aint *extent);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_free(MPI_Datatype *type);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_free_keyval(int *type_keyval);
|
|
|
|
|
OMPI_DECLSPEC MPI_Datatype PMPI_Type_f2c(MPI_Fint datatype);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_get_attr(MPI_Datatype type, int type_keyval,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *attribute_val, int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_get_contents(MPI_Datatype mtype, int max_integers,
|
2004-10-22 21:47:53 +04:00
|
|
|
int max_addresses, int max_datatypes,
|
|
|
|
|
int array_of_integers[],
|
|
|
|
|
MPI_Aint array_of_addresses[],
|
|
|
|
|
MPI_Datatype array_of_datatypes[]);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_get_envelope(MPI_Datatype type, int *num_integers,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *num_addresses, int *num_datatypes,
|
|
|
|
|
int *combiner);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_get_extent(MPI_Datatype type, MPI_Aint *lb,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint *extent);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_get_name(MPI_Datatype type, char *type_name,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *resultlen);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_get_true_extent(MPI_Datatype datatype, MPI_Aint *true_lb,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint *true_extent);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_hindexed(int count, int array_of_blocklengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint array_of_displacements[],
|
|
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_hvector(int count, int blocklength, MPI_Aint stride,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_indexed(int count, int array_of_blocklengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
int array_of_displacements[],
|
|
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_lb(MPI_Datatype type, MPI_Aint *lb);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_match_size(int typeclass, int size, MPI_Datatype *type);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_set_attr(MPI_Datatype type, int type_keyval,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *attr_val);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_set_name(MPI_Datatype type, char *type_name);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_size(MPI_Datatype type, int *size);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_struct(int count, int array_of_blocklengths[],
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint array_of_displacements[],
|
|
|
|
|
MPI_Datatype array_of_types[],
|
|
|
|
|
MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Type_ub(MPI_Datatype mtype, MPI_Aint *ub);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Type_vector(int count, int blocklength, int stride,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Datatype oldtype, MPI_Datatype *newtype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Unpack(void *inbuf, int insize, int *position,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *outbuf, int outcount, MPI_Datatype datatype,
|
|
|
|
|
MPI_Comm comm);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Unpublish_name(char *service_name, MPI_Info info,
|
2004-10-22 21:47:53 +04:00
|
|
|
char *port_name);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Unpack_external (char *datarep, void *inbuf, MPI_Aint insize,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Aint *position, void *outbuf, int outcount,
|
|
|
|
|
MPI_Datatype datatype);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Waitall(int count, MPI_Request *array_of_requests,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Status *array_of_statuses);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Waitany(int count, MPI_Request *array_of_requests,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *index, MPI_Status *status);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Wait(MPI_Request *request, MPI_Status *status);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Waitsome(int incount, MPI_Request *array_of_requests,
|
2004-10-22 21:47:53 +04:00
|
|
|
int *outcount, int *array_of_indices,
|
|
|
|
|
MPI_Status *array_of_statuses);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC MPI_Fint PMPI_Win_c2f(MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_call_errhandler(MPI_Win win, int errorcode);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_complete(MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_create(void *base, MPI_Aint size, int disp_unit,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Info info, MPI_Comm comm, MPI_Win *win);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Win_create_errhandler(MPI_Win_errhandler_fn *function,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Errhandler *errhandler);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Win_create_keyval(MPI_Win_copy_attr_function *win_copy_attr_fn,
|
2004-10-22 21:47:53 +04:00
|
|
|
MPI_Win_delete_attr_function *win_delete_attr_fn,
|
|
|
|
|
int *win_keyval, void *extra_state);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Win_delete_attr(MPI_Win win, int win_keyval);
|
|
|
|
|
OMPI_DECLSPEC MPI_Win PMPI_Win_f2c(MPI_Fint win);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_fence(int assert, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_free(MPI_Win *win);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_free_keyval(int *win_keyval);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_get_attr(MPI_Win win, int win_keyval,
|
2004-10-22 21:47:53 +04:00
|
|
|
void *attribute_val, int *flag);
|
2004-10-22 20:06:05 +04:00
|
|
|
OMPI_DECLSPEC int PMPI_Win_get_errhandler(MPI_Win win, MPI_Errhandler *errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_get_group(MPI_Win win, MPI_Group *group);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_get_name(MPI_Win win, char *win_name, int *resultlen);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_lock(int lock_type, int rank, int assert, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_post(MPI_Group group, int assert, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_set_attr(MPI_Win win, int win_keyval, void *attribute_val);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_set_errhandler(MPI_Win win, MPI_Errhandler errhandler);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_set_name(MPI_Win win, char *win_name);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_start(MPI_Group group, int assert, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_test(MPI_Win win, int *flag);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_unlock(int rank, MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC int PMPI_Win_wait(MPI_Win win);
|
|
|
|
|
OMPI_DECLSPEC double PMPI_Wtick(void);
|
|
|
|
|
OMPI_DECLSPEC double PMPI_Wtime(void);
|
2004-01-08 16:36:59 +03:00
|
|
|
|
2004-01-10 11:17:22 +03:00
|
|
|
#if defined(c_plusplus) || defined(__cplusplus)
|
|
|
|
|
}
|
2004-01-08 16:36:59 +03:00
|
|
|
#endif
|
|
|
|
|
|
2004-07-14 18:11:03 +04:00
|
|
|
/*
|
|
|
|
|
* Conditional MPI 2 C++ bindings support. Include if:
|
2006-04-07 08:57:53 +04:00
|
|
|
* - The user does not explicitly request us to skip it (when a C++ compiler
|
|
|
|
|
* is used to compile C code).
|
2004-07-14 18:11:03 +04:00
|
|
|
* - We want C++ bindings support
|
|
|
|
|
* - We are not building OMPI itself
|
|
|
|
|
* - We are using a C++ compiler
|
|
|
|
|
*/
|
2006-04-07 08:57:53 +04:00
|
|
|
#if !defined(OMPI_SKIP_MPICXX) && OMPI_WANT_CXX_BINDINGS && !OMPI_BUILDING
|
2004-07-14 18:11:03 +04:00
|
|
|
#if defined(__cplusplus) || defined(c_plusplus)
|
2007-06-05 17:44:03 +04:00
|
|
|
#include "openmpi/ompi/mpi/cxx/mpicxx.h"
|
2004-07-14 18:11:03 +04:00
|
|
|
#endif
|
|
|
|
|
#endif
|
|
|
|
|
|
2007-08-19 01:35:51 +04:00
|
|
|
#if !OMPI_PROVIDE_MPI_FILE_INTERFACE && !OMPI_BUILDING
|
|
|
|
|
/* ROMIO requires MPI implementations to set this to 1 if they provide
|
|
|
|
|
MPI_OFFSET. We need to provide it because its used throughout the
|
|
|
|
|
DDT engine */
|
|
|
|
|
#define HAVE_MPI_OFFSET 1
|
|
|
|
|
#endif
|
|
|
|
|
|
2004-06-07 19:33:53 +04:00
|
|
|
#endif /* OMPI_MPI_H */
|