ports/openmpi
ports/openmpi
1
1
Форкнуть 0
Код Релизы Активность
d6334fa558
openmpi/src/mca/coll/basic/src/coll_basic_allgatherv.c

65 строки
1.7 KiB
C
Исходник Обычный вид История

First cut of the basic collective module. Much work still needs to be done -- still need: - safe collective tags on user communuicators (negative tags) - PML entry points for all MPI point-to-point calls - datatype buffer and copy functions As such, there's lots of warnings in this code right now (although it does compile). It will not run properly at all. This commit was SVN r268.
2004-01-12 00:26:55 +03:00
/*
* $HEADER$
*/
First pass of lam -> ompi conversion This commit was SVN r1191.
2004-06-07 19:33:53 +04:00
#include "ompi_config.h"
- coll_basic_config.h no longer exists; just use coll_basic.h - #define's for MCA module version numbers changed names This commit was SVN r806.
2004-02-15 00:26:30 +03:00
#include "coll_basic.h"
First cut of the basic collective module. Much work still needs to be done -- still need: - safe collective tags on user communuicators (negative tags) - PML entry points for all MPI point-to-point calls - datatype buffer and copy functions As such, there's lots of warnings in this code right now (although it does compile). It will not run properly at all. This commit was SVN r268.
2004-01-12 00:26:55 +03:00
#include "mpi.h"
Lots of changes in this commit, mostly having to do with the first real commit of the collectives. MPI_SCAN and MPI_EXSCAN are still not implemented, but lots of other things are in the critical path and holding up other people, so it's ok to commit without them: - better checks for sizes in configure, and add defaults for fortran sizes if we don't have a fortran compiler - fix some logic that was accidentally broken for size checks for the file type offset_t - add some C equivalent types for fortran's complex and double complex (for use in internal reduction/op functions) - additionals and slight reorganization of ompi_mpi_init() ompi_mpi_finalize() - fully implement all top-level MPI collective calls, including all param checking for both intra- and inter-communicators (woof) - change the communicator_t type for stuff that we need in coll, and update all references throughout the code base to match - all kinds of updates to the coll framework base - next cut of the basic coll module -- has all intracommunicator collectives implemented except scan and exscan (see note above). All intercommunicator functions return ERR_NOT_IMPLEMENTED. - MPI_Op is a fixed implementation -- not component-ized yet. So there are generic C loops for all implementations. This commit was SVN r1491.
2004-06-29 04:02:25 +04:00
#include "include/constants.h"
Updating header file names after the great directory reorganization. This commit was SVN r877.
2004-03-17 21:45:16 +03:00
#include "communicator/communicator.h"
#include "mca/coll/coll.h"
#include "mca/coll/base/coll_tags.h"
First cut of the basic collective module. Much work still needs to be done -- still need: - safe collective tags on user communuicators (negative tags) - PML entry points for all MPI point-to-point calls - datatype buffer and copy functions As such, there's lots of warnings in this code right now (although it does compile). It will not run properly at all. This commit was SVN r268.
2004-01-12 00:26:55 +03:00
#include "coll_basic.h"
/*
Lots of changes in this commit, mostly having to do with the first real commit of the collectives. MPI_SCAN and MPI_EXSCAN are still not implemented, but lots of other things are in the critical path and holding up other people, so it's ok to commit without them: - better checks for sizes in configure, and add defaults for fortran sizes if we don't have a fortran compiler - fix some logic that was accidentally broken for size checks for the file type offset_t - add some C equivalent types for fortran's complex and double complex (for use in internal reduction/op functions) - additionals and slight reorganization of ompi_mpi_init() ompi_mpi_finalize() - fully implement all top-level MPI collective calls, including all param checking for both intra- and inter-communicators (woof) - change the communicator_t type for stuff that we need in coll, and update all references throughout the code base to match - all kinds of updates to the coll framework base - next cut of the basic coll module -- has all intracommunicator collectives implemented except scan and exscan (see note above). All intercommunicator functions return ERR_NOT_IMPLEMENTED. - MPI_Op is a fixed implementation -- not component-ized yet. So there are generic C loops for all implementations. This commit was SVN r1491.
2004-06-29 04:02:25 +04:00
* allgatherv_intra
First cut of the basic collective module. Much work still needs to be done -- still need: - safe collective tags on user communuicators (negative tags) - PML entry points for all MPI point-to-point calls - datatype buffer and copy functions As such, there's lots of warnings in this code right now (although it does compile). It will not run properly at all. This commit was SVN r268.
2004-01-12 00:26:55 +03:00
*
* Function: - allgather using other MPI collectives
* Accepts: - same as MPI_Allgatherv()
* Returns: - MPI_SUCCESS or error code
*/
Lots of changes in this commit, mostly having to do with the first real commit of the collectives. MPI_SCAN and MPI_EXSCAN are still not implemented, but lots of other things are in the critical path and holding up other people, so it's ok to commit without them: - better checks for sizes in configure, and add defaults for fortran sizes if we don't have a fortran compiler - fix some logic that was accidentally broken for size checks for the file type offset_t - add some C equivalent types for fortran's complex and double complex (for use in internal reduction/op functions) - additionals and slight reorganization of ompi_mpi_init() ompi_mpi_finalize() - fully implement all top-level MPI collective calls, including all param checking for both intra- and inter-communicators (woof) - change the communicator_t type for stuff that we need in coll, and update all references throughout the code base to match - all kinds of updates to the coll framework base - next cut of the basic coll module -- has all intracommunicator collectives implemented except scan and exscan (see note above). All intercommunicator functions return ERR_NOT_IMPLEMENTED. - MPI_Op is a fixed implementation -- not component-ized yet. So there are generic C loops for all implementations. This commit was SVN r1491.
2004-06-29 04:02:25 +04:00
int mca_coll_basic_allgatherv_intra(void *sbuf, int scount,
struct ompi_datatype_t *sdtype,
void * rbuf, int *rcounts, int *disps,
struct ompi_datatype_t *rdtype,
struct ompi_communicator_t *comm)
First cut of the basic collective module. Much work still needs to be done -- still need: - safe collective tags on user communuicators (negative tags) - PML entry points for all MPI point-to-point calls - datatype buffer and copy functions As such, there's lots of warnings in this code right now (although it does compile). It will not run properly at all. This commit was SVN r268.
2004-01-12 00:26:55 +03:00
{
int i, size;
int err;
/* Collect all values at each process, one at a time. */
Lots of changes in this commit, mostly having to do with the first real commit of the collectives. MPI_SCAN and MPI_EXSCAN are still not implemented, but lots of other things are in the critical path and holding up other people, so it's ok to commit without them: - better checks for sizes in configure, and add defaults for fortran sizes if we don't have a fortran compiler - fix some logic that was accidentally broken for size checks for the file type offset_t - add some C equivalent types for fortran's complex and double complex (for use in internal reduction/op functions) - additionals and slight reorganization of ompi_mpi_init() ompi_mpi_finalize() - fully implement all top-level MPI collective calls, including all param checking for both intra- and inter-communicators (woof) - change the communicator_t type for stuff that we need in coll, and update all references throughout the code base to match - all kinds of updates to the coll framework base - next cut of the basic coll module -- has all intracommunicator collectives implemented except scan and exscan (see note above). All intercommunicator functions return ERR_NOT_IMPLEMENTED. - MPI_Op is a fixed implementation -- not component-ized yet. So there are generic C loops for all implementations. This commit was SVN r1491.
2004-06-29 04:02:25 +04:00
size = ompi_comm_size(comm);
First cut of the basic collective module. Much work still needs to be done -- still need: - safe collective tags on user communuicators (negative tags) - PML entry points for all MPI point-to-point calls - datatype buffer and copy functions As such, there's lots of warnings in this code right now (although it does compile). It will not run properly at all. This commit was SVN r268.
2004-01-12 00:26:55 +03:00
for (i = 0; i < size; ++i) {
Lots of changes in this commit, mostly having to do with the first real commit of the collectives. MPI_SCAN and MPI_EXSCAN are still not implemented, but lots of other things are in the critical path and holding up other people, so it's ok to commit without them: - better checks for sizes in configure, and add defaults for fortran sizes if we don't have a fortran compiler - fix some logic that was accidentally broken for size checks for the file type offset_t - add some C equivalent types for fortran's complex and double complex (for use in internal reduction/op functions) - additionals and slight reorganization of ompi_mpi_init() ompi_mpi_finalize() - fully implement all top-level MPI collective calls, including all param checking for both intra- and inter-communicators (woof) - change the communicator_t type for stuff that we need in coll, and update all references throughout the code base to match - all kinds of updates to the coll framework base - next cut of the basic coll module -- has all intracommunicator collectives implemented except scan and exscan (see note above). All intercommunicator functions return ERR_NOT_IMPLEMENTED. - MPI_Op is a fixed implementation -- not component-ized yet. So there are generic C loops for all implementations. This commit was SVN r1491.
2004-06-29 04:02:25 +04:00
err = comm->c_coll.coll_gatherv(sbuf, scount, sdtype, rbuf,
rcounts, disps, rdtype, i, comm);
if (MPI_SUCCESS != err) {
printf("allgatherv barfed: errcode %d\n", err);
First cut of the basic collective module. Much work still needs to be done -- still need: - safe collective tags on user communuicators (negative tags) - PML entry points for all MPI point-to-point calls - datatype buffer and copy functions As such, there's lots of warnings in this code right now (although it does compile). It will not run properly at all. This commit was SVN r268.
2004-01-12 00:26:55 +03:00
return err;
Lots of changes in this commit, mostly having to do with the first real commit of the collectives. MPI_SCAN and MPI_EXSCAN are still not implemented, but lots of other things are in the critical path and holding up other people, so it's ok to commit without them: - better checks for sizes in configure, and add defaults for fortran sizes if we don't have a fortran compiler - fix some logic that was accidentally broken for size checks for the file type offset_t - add some C equivalent types for fortran's complex and double complex (for use in internal reduction/op functions) - additionals and slight reorganization of ompi_mpi_init() ompi_mpi_finalize() - fully implement all top-level MPI collective calls, including all param checking for both intra- and inter-communicators (woof) - change the communicator_t type for stuff that we need in coll, and update all references throughout the code base to match - all kinds of updates to the coll framework base - next cut of the basic coll module -- has all intracommunicator collectives implemented except scan and exscan (see note above). All intercommunicator functions return ERR_NOT_IMPLEMENTED. - MPI_Op is a fixed implementation -- not component-ized yet. So there are generic C loops for all implementations. This commit was SVN r1491.
2004-06-29 04:02:25 +04:00
}
First cut of the basic collective module. Much work still needs to be done -- still need: - safe collective tags on user communuicators (negative tags) - PML entry points for all MPI point-to-point calls - datatype buffer and copy functions As such, there's lots of warnings in this code right now (although it does compile). It will not run properly at all. This commit was SVN r268.
2004-01-12 00:26:55 +03:00
}
return MPI_SUCCESS;
Lots of changes in this commit, mostly having to do with the first real commit of the collectives. MPI_SCAN and MPI_EXSCAN are still not implemented, but lots of other things are in the critical path and holding up other people, so it's ok to commit without them: - better checks for sizes in configure, and add defaults for fortran sizes if we don't have a fortran compiler - fix some logic that was accidentally broken for size checks for the file type offset_t - add some C equivalent types for fortran's complex and double complex (for use in internal reduction/op functions) - additionals and slight reorganization of ompi_mpi_init() ompi_mpi_finalize() - fully implement all top-level MPI collective calls, including all param checking for both intra- and inter-communicators (woof) - change the communicator_t type for stuff that we need in coll, and update all references throughout the code base to match - all kinds of updates to the coll framework base - next cut of the basic coll module -- has all intracommunicator collectives implemented except scan and exscan (see note above). All intercommunicator functions return ERR_NOT_IMPLEMENTED. - MPI_Op is a fixed implementation -- not component-ized yet. So there are generic C loops for all implementations. This commit was SVN r1491.
2004-06-29 04:02:25 +04:00
}
/*
* allgatherv_inter
*
* Function: - allgather using other MPI collectives
* Accepts: - same as MPI_Allgatherv()
* Returns: - MPI_SUCCESS or error code
*/
int mca_coll_basic_allgatherv_inter(void *sbuf, int scount,
struct ompi_datatype_t *sdtype,
void * rbuf, int *rcounts, int *disps,
struct ompi_datatype_t *rdtype,
struct ompi_communicator_t *comm)
{
/* Need to implement this */
return OMPI_ERR_NOT_IMPLEMENTED;
First cut of the basic collective module. Much work still needs to be done -- still need: - safe collective tags on user communuicators (negative tags) - PML entry points for all MPI point-to-point calls - datatype buffer and copy functions As such, there's lots of warnings in this code right now (although it does compile). It will not run properly at all. This commit was SVN r268.
2004-01-12 00:26:55 +03:00
}
Копировать постоянную ссылку