2004-01-30 00:42:40 +03:00
|
|
|
/*
|
2007-03-17 02:11:45 +03:00
|
|
|
* Copyright (c) 2004-2007 The Trustees of Indiana University and Indiana
|
2005-11-05 22:57:48 +03:00
|
|
|
* University Research and Technology
|
|
|
|
* Corporation. All rights reserved.
|
|
|
|
* Copyright (c) 2004-2005 The University of Tennessee and The University
|
|
|
|
* of Tennessee Research Foundation. All rights
|
|
|
|
* reserved.
|
2015-06-24 06:59:57 +03:00
|
|
|
* Copyright (c) 2004-2008 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.
|
2010-05-28 01:37:11 +04:00
|
|
|
* Copyright (c) 2006-2010 Cisco Systems, Inc. All rights reserved.
|
2004-11-22 04:38:40 +03:00
|
|
|
* $COPYRIGHT$
|
2015-06-24 06:59:57 +03:00
|
|
|
*
|
2004-11-22 04:38:40 +03:00
|
|
|
* Additional copyrights may follow
|
2015-06-24 06:59:57 +03:00
|
|
|
*
|
2004-10-15 23:31:47 +04:00
|
|
|
* $HEADER$
|
2004-01-30 00:42:40 +03:00
|
|
|
*/
|
2004-06-07 19:33:53 +04:00
|
|
|
#include "ompi_config.h"
|
2004-01-30 00:42:40 +03:00
|
|
|
#include <stdio.h>
|
|
|
|
|
2006-02-12 04:33:29 +03:00
|
|
|
#include "ompi/mpi/c/bindings.h"
|
2009-04-29 05:32:14 +04:00
|
|
|
#include "ompi/runtime/params.h"
|
|
|
|
#include "ompi/communicator/communicator.h"
|
|
|
|
#include "ompi/errhandler/errhandler.h"
|
2005-09-12 13:17:44 +04:00
|
|
|
#include "ompi/request/request.h"
|
2006-11-02 06:34:53 +03:00
|
|
|
#include "ompi/request/grequest.h"
|
2008-02-12 21:01:17 +03:00
|
|
|
#include "ompi/memchecker.h"
|
2004-01-30 00:42:40 +03:00
|
|
|
|
2009-05-07 00:11:28 +04:00
|
|
|
#if OPAL_HAVE_WEAK_SYMBOLS && OMPI_PROFILING_DEFINES
|
2004-01-30 00:42:40 +03:00
|
|
|
#pragma weak MPI_Request_get_status = PMPI_Request_get_status
|
|
|
|
#endif
|
|
|
|
|
2004-06-07 19:33:53 +04:00
|
|
|
#if OMPI_PROFILING_DEFINES
|
2006-02-12 04:33:29 +03:00
|
|
|
#include "ompi/mpi/c/profile/defines.h"
|
2004-04-20 22:50:43 +04:00
|
|
|
#endif
|
|
|
|
|
2004-07-30 06:58:53 +04:00
|
|
|
static const char FUNC_NAME[] = "MPI_Request_get_status";
|
|
|
|
|
2005-02-24 02:50:52 +03:00
|
|
|
/* Non blocking test for the request status. Upon completion, the request will
|
|
|
|
* not be freed (unlike the test function). A subsequent call to test, wait
|
|
|
|
* or free should be executed on the request.
|
|
|
|
*/
|
2004-01-30 00:42:40 +03:00
|
|
|
int MPI_Request_get_status(MPI_Request request, int *flag,
|
2015-06-24 06:59:57 +03:00
|
|
|
MPI_Status *status)
|
2004-07-30 06:58:53 +04:00
|
|
|
{
|
George did the work and deserves all the credit for it. Ralph did the merge, and deserves whatever blame results from errors in it :-)
WHAT: Open our low-level communication infrastructure by moving all necessary components (btl/rcache/allocator/mpool) down in OPAL
All the components required for inter-process communications are currently deeply integrated in the OMPI layer. Several groups/institutions have express interest in having a more generic communication infrastructure, without all the OMPI layer dependencies. This communication layer should be made available at a different software level, available to all layers in the Open MPI software stack. As an example, our ORTE layer could replace the current OOB and instead use the BTL directly, gaining access to more reactive network interfaces than TCP. Similarly, external software libraries could take advantage of our highly optimized AM (active message) communication layer for their own purpose. UTK with support from Sandia, developped a version of Open MPI where the entire communication infrastucture has been moved down to OPAL (btl/rcache/allocator/mpool). Most of the moved components have been updated to match the new schema, with few exceptions (mainly BTLs where I have no way of compiling/testing them). Thus, the completion of this RFC is tied to being able to completing this move for all BTLs. For this we need help from the rest of the Open MPI community, especially those supporting some of the BTLs. A non-exhaustive list of BTLs that qualify here is: mx, portals4, scif, udapl, ugni, usnic.
This commit was SVN r32317.
2014-07-26 04:47:28 +04:00
|
|
|
#if OPAL_ENABLE_PROGRESS_THREADS == 0
|
2014-06-26 00:43:28 +04:00
|
|
|
int do_it_once = 0;
|
|
|
|
#endif
|
|
|
|
|
2008-02-12 11:46:27 +03:00
|
|
|
MEMCHECKER(
|
|
|
|
memchecker_request(&request);
|
|
|
|
);
|
2008-02-20 01:15:52 +03:00
|
|
|
|
|
|
|
OPAL_CR_NOOP_PROGRESS();
|
2007-03-17 02:11:45 +03:00
|
|
|
|
2005-02-24 02:50:52 +03:00
|
|
|
if( MPI_PARAM_CHECK ) {
|
|
|
|
OMPI_ERR_INIT_FINALIZE(FUNC_NAME);
|
2009-03-28 04:24:41 +03:00
|
|
|
if( (NULL == flag) ) {
|
2005-02-24 02:50:52 +03:00
|
|
|
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_ARG, FUNC_NAME);
|
2009-02-20 22:57:46 +03:00
|
|
|
} else if (NULL == request) {
|
2007-03-21 14:10:42 +03:00
|
|
|
return OMPI_ERRHANDLER_INVOKE(MPI_COMM_WORLD, MPI_ERR_REQUEST,
|
|
|
|
FUNC_NAME);
|
2005-02-24 02:50:52 +03:00
|
|
|
}
|
|
|
|
}
|
2004-07-30 06:58:53 +04:00
|
|
|
|
George did the work and deserves all the credit for it. Ralph did the merge, and deserves whatever blame results from errors in it :-)
WHAT: Open our low-level communication infrastructure by moving all necessary components (btl/rcache/allocator/mpool) down in OPAL
All the components required for inter-process communications are currently deeply integrated in the OMPI layer. Several groups/institutions have express interest in having a more generic communication infrastructure, without all the OMPI layer dependencies. This communication layer should be made available at a different software level, available to all layers in the Open MPI software stack. As an example, our ORTE layer could replace the current OOB and instead use the BTL directly, gaining access to more reactive network interfaces than TCP. Similarly, external software libraries could take advantage of our highly optimized AM (active message) communication layer for their own purpose. UTK with support from Sandia, developped a version of Open MPI where the entire communication infrastucture has been moved down to OPAL (btl/rcache/allocator/mpool). Most of the moved components have been updated to match the new schema, with few exceptions (mainly BTLs where I have no way of compiling/testing them). Thus, the completion of this RFC is tied to being able to completing this move for all BTLs. For this we need help from the rest of the Open MPI community, especially those supporting some of the BTLs. A non-exhaustive list of BTLs that qualify here is: mx, portals4, scif, udapl, ugni, usnic.
This commit was SVN r32317.
2014-07-26 04:47:28 +04:00
|
|
|
#if OPAL_ENABLE_PROGRESS_THREADS == 0
|
2014-06-26 00:43:28 +04:00
|
|
|
recheck_request_status:
|
|
|
|
#endif
|
2005-07-04 01:38:51 +04:00
|
|
|
opal_atomic_mb();
|
2005-02-24 02:50:52 +03:00
|
|
|
if( (request == MPI_REQUEST_NULL) || (request->req_state == OMPI_REQUEST_INACTIVE) ) {
|
|
|
|
*flag = true;
|
|
|
|
if( MPI_STATUS_IGNORE != status ) {
|
|
|
|
*status = ompi_status_empty;
|
|
|
|
}
|
|
|
|
return MPI_SUCCESS;
|
|
|
|
}
|
2015-06-24 06:59:57 +03:00
|
|
|
if( request->req_complete ) {
|
|
|
|
*flag = true;
|
2006-11-02 06:34:53 +03:00
|
|
|
/* If this is a generalized request, we *always* have to call
|
|
|
|
the query function to get the status (MPI-2:8.2), even if
|
|
|
|
the user passed STATUS_IGNORE. */
|
|
|
|
if (OMPI_REQUEST_GEN == request->req_type) {
|
|
|
|
ompi_grequest_invoke_query(request, &request->req_status);
|
|
|
|
}
|
2005-02-24 02:50:52 +03:00
|
|
|
if (MPI_STATUS_IGNORE != status) {
|
|
|
|
*status = request->req_status;
|
|
|
|
}
|
|
|
|
return MPI_SUCCESS;
|
|
|
|
}
|
George did the work and deserves all the credit for it. Ralph did the merge, and deserves whatever blame results from errors in it :-)
WHAT: Open our low-level communication infrastructure by moving all necessary components (btl/rcache/allocator/mpool) down in OPAL
All the components required for inter-process communications are currently deeply integrated in the OMPI layer. Several groups/institutions have express interest in having a more generic communication infrastructure, without all the OMPI layer dependencies. This communication layer should be made available at a different software level, available to all layers in the Open MPI software stack. As an example, our ORTE layer could replace the current OOB and instead use the BTL directly, gaining access to more reactive network interfaces than TCP. Similarly, external software libraries could take advantage of our highly optimized AM (active message) communication layer for their own purpose. UTK with support from Sandia, developped a version of Open MPI where the entire communication infrastucture has been moved down to OPAL (btl/rcache/allocator/mpool). Most of the moved components have been updated to match the new schema, with few exceptions (mainly BTLs where I have no way of compiling/testing them). Thus, the completion of this RFC is tied to being able to completing this move for all BTLs. For this we need help from the rest of the Open MPI community, especially those supporting some of the BTLs. A non-exhaustive list of BTLs that qualify here is: mx, portals4, scif, udapl, ugni, usnic.
This commit was SVN r32317.
2014-07-26 04:47:28 +04:00
|
|
|
#if OPAL_ENABLE_PROGRESS_THREADS == 0
|
2014-06-26 00:43:28 +04:00
|
|
|
if( 0 == do_it_once ) {
|
|
|
|
/* If we run the opal_progress then check the status of the
|
|
|
|
request before leaving. We will call the opal_progress only
|
|
|
|
once per call. */
|
|
|
|
opal_progress();
|
|
|
|
do_it_once++;
|
|
|
|
goto recheck_request_status;
|
|
|
|
}
|
|
|
|
#endif
|
2010-05-28 01:37:11 +04:00
|
|
|
*flag = false;
|
2005-02-24 02:50:52 +03:00
|
|
|
return MPI_SUCCESS;
|
2004-01-30 00:42:40 +03:00
|
|
|
}
|