X-Git-Url: http://bilbo.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/19b3962253112b19308537bc2400de141c119d99..8be89720f55b4ceeb2877531ae1602cc7ed947d6:/src/smpi/colls/bcast/bcast-SMP-binary.cpp diff --git a/src/smpi/colls/bcast/bcast-SMP-binary.cpp b/src/smpi/colls/bcast/bcast-SMP-binary.cpp index 791e21fd32..933a6075c1 100644 --- a/src/smpi/colls/bcast/bcast-SMP-binary.cpp +++ b/src/smpi/colls/bcast/bcast-SMP-binary.cpp @@ -1,24 +1,20 @@ -/* 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 * under the terms of the license (GNU LGPL) which comes with this package. */ -#include "../colls_private.h" - +#include "../colls_private.hpp" int bcast_SMP_binary_segment_byte = 8192; -namespace simgrid{ -namespace smpi{ -int Coll_bcast_SMP_binary::bcast(void *buf, int count, - MPI_Datatype datatype, int root, - MPI_Comm comm) +namespace simgrid::smpi { +int bcast__SMP_binary(void *buf, int count, + MPI_Datatype datatype, int root, + MPI_Comm comm) { int tag = COLL_TAG_BCAST; MPI_Status status; MPI_Request request; - MPI_Request *request_array; - MPI_Status *status_array; int rank, size; int i; MPI_Aint extent; @@ -34,8 +30,7 @@ int Coll_bcast_SMP_binary::bcast(void *buf, int count, host_num_core = comm->get_intra_comm()->size(); }else{ //implementation buggy in this case - return Coll_bcast_mpich::bcast( buf , count, datatype, - root, comm); + return bcast__mpich(buf , count, datatype, root, comm); } int segment = bcast_SMP_binary_segment_byte / extent; @@ -62,7 +57,7 @@ int Coll_bcast_SMP_binary::bcast(void *buf, int count, else if (rank == 0) Request::recv(buf, count, datatype, root, tag, comm, &status); } - // when a message is smaller than a block size => no pipeline + // when a message is smaller than a block size => no pipeline if (count <= segment) { // case ROOT-of-each-SMP if (rank % host_num_core == 0) { @@ -124,10 +119,8 @@ int Coll_bcast_SMP_binary::bcast(void *buf, int count, // pipeline bcast else { - request_array = - (MPI_Request *) xbt_malloc((size + pipe_length) * sizeof(MPI_Request)); - status_array = - (MPI_Status *) xbt_malloc((size + pipe_length) * sizeof(MPI_Status)); + auto* request_array = new MPI_Request[size + pipe_length]; + auto* status_array = new MPI_Status[size + pipe_length]; // case ROOT-of-each-SMP if (rank % host_num_core == 0) { @@ -216,19 +209,16 @@ int Coll_bcast_SMP_binary::bcast(void *buf, int count, } } - free(request_array); - free(status_array); + delete[] request_array; + delete[] status_array; } - // when count is not divisible by block size, use default BCAST for the remainder if ((remainder != 0) && (count > segment)) { - XBT_WARN("MPI_bcast_SMP_binary use default MPI_bcast."); - Colls::bcast((char *) buf + (pipe_length * increment), remainder, datatype, - root, comm); + XBT_INFO("MPI_bcast_SMP_binary: count is not divisible by block size, use default MPI_bcast for remainer."); + colls::bcast((char*)buf + (pipe_length * increment), remainder, datatype, root, comm); } return 1; } -} -} +} // namespace simgrid::smpi