|
|
|
|
@ -42,48 +42,46 @@ void MPIUtils::InitMPI() {
|
|
|
|
|
MPI_Init(0, 0);
|
|
|
|
|
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
|
|
|
|
|
MPI_Comm_size(MPI_COMM_WORLD, &size);
|
|
|
|
|
MPI_Get_processor_name(host_name, &len)
|
|
|
|
|
MPI_Get_processor_name(host_name, &len);
|
|
|
|
|
}
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
MPIIsend::MPIIsend(int dst, const char* req) {
|
|
|
|
|
done1 = 0;
|
|
|
|
|
done2 = 0;
|
|
|
|
|
length = strlen(req);
|
|
|
|
|
req = req;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
MPIIsend::Send() {
|
|
|
|
|
MPI_Isend(&req, length, MPI_CHAR, dst, mpi_tag, MPI_COMM_WORLD,
|
|
|
|
|
&msg1_);
|
|
|
|
|
MPI_Test(&msg1_, &done1_, MPI_STATUS_IGNORE)
|
|
|
|
|
MPISend::MPISend(const Meta &meta) {
|
|
|
|
|
done1_ = 1;
|
|
|
|
|
done2_ = 0;
|
|
|
|
|
this->meta = meta;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
bool MPIIsend::IsFinished() {
|
|
|
|
|
MPI_Status status;
|
|
|
|
|
if (!done1_) MPI_Test(&msg1_, &done1_, &status);
|
|
|
|
|
return done1;
|
|
|
|
|
MPISend::Send() {
|
|
|
|
|
MPI_Send(&meta.request, meta.count, meta.datatype, meta.dst, meta.tag,
|
|
|
|
|
MPI_COMM_WORLD);
|
|
|
|
|
done2_ = 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
MPIIsend::~MPIIsend(){
|
|
|
|
|
MPI_Wait(&msg1_, MPI_STATUS_IGNORE);
|
|
|
|
|
MPI_Free_mem(req);
|
|
|
|
|
bool MPISend::IsReady() {
|
|
|
|
|
return true;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
MPIIrecv::MPIIrecv(){
|
|
|
|
|
bool MPISend::IsFinished() { return done1_ && done2_; }
|
|
|
|
|
|
|
|
|
|
}
|
|
|
|
|
MPISend::~MPISend() { MPI_Free_mem(meta); }
|
|
|
|
|
|
|
|
|
|
MPIIrecv::Recv(){
|
|
|
|
|
|
|
|
|
|
MPIRecv::MPIRecv(const Meta &meta) {
|
|
|
|
|
this->meta = meta;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
MPIIrecv::IsFinished(){
|
|
|
|
|
MPIRecv::Recv() {}
|
|
|
|
|
|
|
|
|
|
bool MPIRecv::IsReady() {
|
|
|
|
|
return true;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
MPIIrecv::~MPIIrecv(){
|
|
|
|
|
MPIRecv::IsFinished() {}
|
|
|
|
|
|
|
|
|
|
MPIRecv::~MPIRecv() {
|
|
|
|
|
MPI_Free_mem(meta);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
} // namespace detail
|
|
|
|
|
|