X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/61427a88a76a2c2ef25d0d5b8132995c6f550e5c..8dd3206354d72d10fed1f3df1cf834573d9c0d9d:/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 f4eb6a216f..c80ef36dd2 100644 --- a/src/smpi/colls/bcast/bcast-SMP-binary.cpp +++ b/src/smpi/colls/bcast/bcast-SMP-binary.cpp @@ -1,24 +1,21 @@ -/* Copyright (c) 2013-2017. The SimGrid Team. +/* Copyright (c) 2013-2021. 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) +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 +31,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; @@ -124,10 +120,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,15 +210,13 @@ 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;