Changeset 2589 for XIOS3/trunk/src/transport
- Timestamp:
- 10/06/23 11:32:05 (9 months ago)
- Location:
- XIOS3/trunk/src/transport
- Files:
-
- 10 edited
Legend:
- Unmodified
- Added
- Removed
-
XIOS3/trunk/src/transport/legacy_context_client.cpp
r2547 r2589 31 31 { 32 32 pureOneSided=CXios::getin<bool>("pure_one_sided",false); // pure one sided communication (for test) 33 MPI_Intercomm_merge(interComm_,false, &interCommMerged_) ;34 MPI_Comm_split(intraComm_,clientRank,clientRank, &commSelf_) ; // for windows33 xios::MPI_Intercomm_merge(interComm_,false, &interCommMerged_) ; 34 xios::MPI_Comm_split(intraComm_,clientRank,clientRank, &commSelf_) ; // for windows 35 35 eventScheduler_ = parent->getEventScheduler() ; 36 36 timeLine = 1; … … 219 219 MPI_Comm interComm ; 220 220 int tag = 0 ; 221 MPI_Intercomm_create(commSelf_, 0, interCommMerged_, clientSize+rank, tag, &interComm) ;222 MPI_Intercomm_merge(interComm, false, &winComm_[rank]) ;223 MPI_Comm_free(&interComm) ;221 xios::MPI_Intercomm_create(commSelf_, 0, interCommMerged_, clientSize+rank, tag, &interComm) ; 222 xios::MPI_Intercomm_merge(interComm, false, &winComm_[rank]) ; 223 xios::MPI_Comm_free(&interComm) ; 224 224 225 225 buffer->attachWindows(winComm_[rank]) ; … … 242 242 MPI_Comm interComm ; 243 243 int tag = 0 ; 244 MPI_Intercomm_create(commSelf_, 0, interCommMerged_, clientSize+rank, tag, &interComm) ;245 MPI_Intercomm_merge(interComm, false, &winComm_[rank]) ;246 MPI_Comm_free(&interComm) ;244 xios::MPI_Intercomm_create(commSelf_, 0, interCommMerged_, clientSize+rank, tag, &interComm) ; 245 xios::MPI_Intercomm_merge(interComm, false, &winComm_[rank]) ; 246 xios::MPI_Comm_free(&interComm) ; 247 247 248 248 buffer->attachWindows(winComm_[rank]) ; -
XIOS3/trunk/src/transport/legacy_context_server.cpp
r2558 r2589 36 36 { 37 37 38 MPI_Comm_dup(intraComm, &processEventBarrier_) ;38 xios::MPI_Comm_dup(intraComm, &processEventBarrier_) ; 39 39 40 40 … … 43 43 finished=false; 44 44 45 MPI_Intercomm_merge(interComm_,true,&interCommMerged_) ;46 MPI_Comm_split(intraComm_, intraCommRank, intraCommRank, &commSelf_) ; // for windows45 xios::MPI_Intercomm_merge(interComm_,true,&interCommMerged_) ; 46 xios::MPI_Comm_split(intraComm_, intraCommRank, intraCommRank, &commSelf_) ; // for windows 47 47 48 48 itLastTimeLine=lastTimeLine.begin() ; … … 122 122 MPI_Comm interComm ; 123 123 int tag = 0 ; 124 MPI_Intercomm_create(commSelf_, 0, interCommMerged_, rank, tag , &interComm) ;125 MPI_Intercomm_merge(interComm, true, &winComm_[rank]) ;126 MPI_Comm_free(&interComm) ;124 xios::MPI_Intercomm_create(commSelf_, 0, interCommMerged_, rank, tag , &interComm) ; 125 xios::MPI_Intercomm_merge(interComm, true, &winComm_[rank]) ; 126 xios::MPI_Comm_free(&interComm) ; 127 127 windows_[rank].resize(2) ; 128 128 //MPI_Win_create_dynamic(MPI_INFO_NULL, winComm_[rank], &windows_[rank][0]); -
XIOS3/trunk/src/transport/one_sided_client_buffer.cpp
r2587 r2589 22 22 CTimer::get("create Windows").resume() ; 23 23 MPI_Comm interComm ; 24 MPI_Intercomm_create(commSelf, 0, interCommMerged, intraServerRank, 0, &interComm) ;25 MPI_Intercomm_merge(interComm, false, &winComm_) ;24 xios::MPI_Intercomm_create(commSelf, 0, interCommMerged, intraServerRank, 0, &interComm) ; 25 xios::MPI_Intercomm_merge(interComm, false, &winComm_) ; 26 26 int rank ; 27 27 MPI_Comm_rank(winComm_,&rank) ; 28 28 info(logProtocol)<<"Windows rank="<<rank<<endl ; 29 29 CXios::getMpiGarbageCollector().registerCommunicator(winComm_) ; 30 MPI_Comm_free(&interComm) ;30 xios::MPI_Comm_free(&interComm) ; 31 31 32 32 maxWindows_=MAX_WINDOWS ; -
XIOS3/trunk/src/transport/one_sided_context_client.cpp
r2585 r2589 31 31 pureOneSided=CXios::getin<bool>("pure_one_sided",false); // pure one sided communication (for test) 32 32 33 MPI_Intercomm_merge(interComm_,false, &interCommMerged_) ;34 35 MPI_Comm_split(intraComm_,clientRank,clientRank, &commSelf_) ; // for windows33 xios::MPI_Intercomm_merge(interComm_,false, &interCommMerged_) ; 34 35 xios::MPI_Comm_split(intraComm_,clientRank,clientRank, &commSelf_) ; // for windows 36 36 eventScheduler_ = parent->getEventScheduler() ; 37 37 timeLine = 1; -
XIOS3/trunk/src/transport/one_sided_context_server.cpp
r2566 r2589 36 36 { 37 37 38 MPI_Comm_dup(intraComm, &processEventBarrier_) ;38 xios::MPI_Comm_dup(intraComm, &processEventBarrier_) ; 39 39 40 40 currentTimeLine=1; … … 42 42 finished=false; 43 43 44 MPI_Intercomm_merge(interComm_,true,&interCommMerged_) ;45 MPI_Comm_split(intraComm_, intraCommRank, intraCommRank, &commSelf_) ; // for windows44 xios::MPI_Intercomm_merge(interComm_,true,&interCommMerged_) ; 45 xios::MPI_Comm_split(intraComm_, intraCommRank, intraCommRank, &commSelf_) ; // for windows 46 46 47 47 itLastTimeLine=lastTimeLine.begin() ; … … 237 237 // MPI_Win_free(&windows_[rank][0]); 238 238 // MPI_Win_free(&windows_[rank][1]); 239 // MPI_Comm_free(&winComm_[rank]) ;239 // xios::MPI_Comm_free(&winComm_[rank]) ; 240 240 // } 241 241 } -
XIOS3/trunk/src/transport/one_sided_server_buffer.cpp
r2565 r2589 25 25 CTimer::get("create Windows").resume() ; 26 26 MPI_Comm interComm ; 27 MPI_Intercomm_create(commSelf, 0, interCommMerged, clientRank_, 0 , &interComm) ;28 MPI_Intercomm_merge(interComm, true, &winComm_) ;27 xios::MPI_Intercomm_create(commSelf, 0, interCommMerged, clientRank_, 0 , &interComm) ; 28 xios::MPI_Intercomm_merge(interComm, true, &winComm_) ; 29 29 CXios::getMpiGarbageCollector().registerCommunicator(winComm_) ; 30 MPI_Comm_free(&interComm) ;30 xios::MPI_Comm_free(&interComm) ; 31 31 32 32 maxWindows_=MAX_WINDOWS ; -
XIOS3/trunk/src/transport/p2p_client_buffer.cpp
r2587 r2589 24 24 CTimer::get("create Windows").resume() ; 25 25 //MPI_Comm interComm ; 26 // MPI_Intercomm_create(commSelf, 0, interCommMerged, intraServerRank, 0, &interComm) ;27 // MPI_Intercomm_merge(interComm, false, &winComm_) ;26 //xios::MPI_Intercomm_create(commSelf, 0, interCommMerged, intraServerRank, 0, &interComm) ; 27 //xios::MPI_Intercomm_merge(interComm, false, &winComm_) ; 28 28 //int rank ; 29 29 //MPI_Comm_rank(winComm_,&rank) ; 30 30 //info(logProtocol)<<"Windows rank="<<rank<<endl ; 31 31 //CXios::getMpiGarbageCollector().registerCommunicator(winComm_) ; 32 // MPI_Comm_free(&interComm) ;32 //xios::MPI_Comm_free(&interComm) ; 33 33 34 34 maxWindows_=MAX_WINDOWS ; -
XIOS3/trunk/src/transport/p2p_context_client.cpp
r2585 r2589 31 31 pureOneSided=CXios::getin<bool>("pure_one_sided",false); // pure one sided communication (for test) 32 32 33 MPI_Intercomm_merge(interComm_,false, &interCommMerged_) ;33 xios::MPI_Intercomm_merge(interComm_,false, &interCommMerged_) ; 34 34 CXios::getMpiGarbageCollector().registerCommunicator(interCommMerged_) ; 35 35 36 MPI_Comm_split(intraComm_,clientRank,clientRank, &commSelf_) ; // for windows36 xios::MPI_Comm_split(intraComm_,clientRank,clientRank, &commSelf_) ; // for windows 37 37 CXios::getMpiGarbageCollector().registerCommunicator(commSelf_) ; 38 38 eventScheduler_ = parent->getEventScheduler() ; -
XIOS3/trunk/src/transport/p2p_context_server.cpp
r2580 r2589 36 36 { 37 37 38 MPI_Comm_dup(intraComm, &processEventBarrier_) ;38 xios::MPI_Comm_dup(intraComm, &processEventBarrier_) ; 39 39 CXios::getMpiGarbageCollector().registerCommunicator(processEventBarrier_) ; 40 40 … … 43 43 finished=false; 44 44 45 MPI_Intercomm_merge(interComm_,true,&interCommMerged_) ;45 xios::MPI_Intercomm_merge(interComm_,true,&interCommMerged_) ; 46 46 CXios::getMpiGarbageCollector().registerCommunicator(interCommMerged_) ; 47 MPI_Comm_split(intraComm_, intraCommRank, intraCommRank, &commSelf_) ; // for windows47 xios::MPI_Comm_split(intraComm_, intraCommRank, intraCommRank, &commSelf_) ; // for windows 48 48 CXios::getMpiGarbageCollector().registerCommunicator(commSelf_) ; 49 49 … … 244 244 // MPI_Win_free(&windows_[rank][0]); 245 245 // MPI_Win_free(&windows_[rank][1]); 246 // MPI_Comm_free(&winComm_[rank]) ;246 // xios::MPI_Comm_free(&winComm_[rank]) ; 247 247 // } 248 248 } -
XIOS3/trunk/src/transport/p2p_server_buffer.cpp
r2564 r2589 25 25 CTimer::get("create Windows").resume() ; 26 26 //MPI_Comm interComm ; 27 // MPI_Intercomm_create(commSelf, 0, interCommMerged, clientRank_, 0 , &interComm) ;28 // MPI_Intercomm_merge(interComm, true, &winComm_) ;27 //xios::MPI_Intercomm_create(commSelf, 0, interCommMerged, clientRank_, 0 , &interComm) ; 28 //xios::MPI_Intercomm_merge(interComm, true, &winComm_) ; 29 29 //CXios::getMpiGarbageCollector().registerCommunicator(winComm_) ; 30 // MPI_Comm_free(&interComm) ;30 //xios::MPI_Comm_free(&interComm) ; 31 31 32 32 //maxWindows_=MAX_WINDOWS ;
Note: See TracChangeset
for help on using the changeset viewer.