-/* Copyright (c) 2013-2017. The SimGrid Team.
+/* Copyright (c) 2013-2023. The SimGrid Team.
* All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
#include "../colls_private.hpp"
-namespace simgrid{
-namespace smpi{
-
+namespace simgrid::smpi {
// now only work with power of two processes
int
-Coll_allgather_rhv::allgather(void *sbuf, int send_count,
- MPI_Datatype send_type, void *rbuf,
- int recv_count, MPI_Datatype recv_type,
- MPI_Comm comm)
+allgather__rhv(const void *sbuf, int send_count,
+ MPI_Datatype send_type, void *rbuf,
+ int recv_count, MPI_Datatype recv_type,
+ MPI_Comm comm)
{
MPI_Status status;
MPI_Aint s_extent, r_extent;
unsigned int num_procs = comm->size();
if((num_procs&(num_procs-1)))
- THROWF(arg_error,0, "allgather rhv algorithm can't be used with non power of two number of processes ! ");
+ throw std::invalid_argument("allgather rhv algorithm can't be used with non power of two number of processes!");
unsigned int rank = comm->rank();
recv_chunk = r_extent * recv_count;
if (send_chunk != recv_chunk) {
- XBT_WARN("MPI_allgather_rhv use default MPI_allgather.");
- Coll_allgather_default::allgather(sbuf, send_count, send_type, rbuf, recv_count,
- recv_type, comm);
+ XBT_INFO("MPI_allgather_rhv: send_chunk != recv_chunk, use default MPI_allgather.");
+ allgather__default(sbuf, send_count, send_type, rbuf, recv_count,
+ recv_type, comm);
return MPI_SUCCESS;
}
size /= 2;
}
- // printf("node %d base_offset %d\n",rank,base_offset);
-
//perform a remote copy
dst = base_offset;
mask >>= 1;
i = 1;
- int phase = 0;
curr_count = recv_count;
while (mask >= 1) {
// destination pair for both send and recv
send_offset = send_base_offset * recv_chunk;
recv_offset = recv_base_offset * recv_chunk;
- // printf("node %d send to %d in phase %d s_offset = %d r_offset = %d count = %d\n",rank,dst,phase, send_base_offset, recv_base_offset, curr_count);
-
Request::sendrecv((char*)rbuf + send_offset, curr_count, recv_type, dst, tag, (char*)rbuf + recv_offset, curr_count,
recv_type, dst, tag, comm, &status);
curr_count *= 2;
i *= 2;
mask >>= 1;
- phase++;
}
return MPI_SUCCESS;
}
-
-}
-}
+} // namespace simgrid::smpi