X-Git-Url: http://git.salome-platform.org/gitweb/?a=blobdiff_plain;f=src%2FParaMEDMEMTest%2Ftest_MPI_Access_Cyclic_Send_Recv.cxx;h=67c687f546ad62649344e013e6e20dac2eda6e15;hb=0b187729ac99d3e9e9bb9d2be8cb8600a783be6c;hp=21ee606e84165739abdf899ec1cbfe1a67073760;hpb=3c911ce36f5caa779ea60042e738fa57671a44b1;p=tools%2Fmedcoupling.git diff --git a/src/ParaMEDMEMTest/test_MPI_Access_Cyclic_Send_Recv.cxx b/src/ParaMEDMEMTest/test_MPI_Access_Cyclic_Send_Recv.cxx index 21ee606e8..67c687f54 100644 --- a/src/ParaMEDMEMTest/test_MPI_Access_Cyclic_Send_Recv.cxx +++ b/src/ParaMEDMEMTest/test_MPI_Access_Cyclic_Send_Recv.cxx @@ -41,7 +41,7 @@ using namespace ParaMEDMEM; void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { - cout << "test_MPI_Access_Cyclic_Send_Recv" << endl ; + debugStream << "test_MPI_Access_Cyclic_Send_Recv" << endl ; // MPI_Init(&argc, &argv) ; @@ -51,11 +51,12 @@ void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { MPI_Comm_rank(MPI_COMM_WORLD,&myrank) ; if ( size < 3 ) { - cout << "test_MPI_Access_Send_Recv must be runned with 3 procs" << endl ; - CPPUNIT_FAIL("test_MPI_Access_Send_Recv must be runned with 3 procs") ; + cerr << "test_MPI_Access_Send_Recv must be runned with 3 procs" << endl ; + //CPPUNIT_FAIL("test_MPI_Access_Send_Recv must be runned with 3 procs") ; + return; } - cout << "test_MPI_Access_Cyclic_Send_Recv" << myrank << endl ; + debugStream << "test_MPI_Access_Cyclic_Send_Recv" << myrank << endl ; ParaMEDMEM::CommInterface interface ; @@ -76,7 +77,7 @@ void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { int i = 0 ; if ( myrank == 0 ) { sts = mpi_access.send(&i,1,MPI_INT,alltarget[myrank], RequestId[i]) ; - cout << "test" << myrank << " Send RequestId " << RequestId[i] + debugStream << "test" << myrank << " Send RequestId " << RequestId[i] << " tag " << mpi_access.sendMPITag(alltarget[myrank]) << endl ; } for ( i = 0 ; i < 10 ; i++ ) { @@ -93,7 +94,7 @@ void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { } //int source, tag, error, outcount ; //mpi_access.Status( RequestId[i], source, tag, error, outcount, true) ; - cout << "test" << myrank << " Recv RequestId " << RequestId[i] + debugStream << "test" << myrank << " Recv RequestId " << RequestId[i] << " tag " << mpi_access.recvMPITag(allsource[myrank]) << " outcount " << outcount << endl ; if ( (outcount != 1) | (recvbuf != i) ) { @@ -103,26 +104,26 @@ void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { << outcount << " recvbuf " << recvbuf << " KO" << "===========================================================" << endl ; - cout << strstream.str() << endl ; + debugStream << strstream.str() << endl ; CPPUNIT_FAIL( strstream.str() ) ; } if ( myrank == 0 ) { if ( i != 9 ) { int ii = i + 1 ; sts = mpi_access.send(&ii,1,MPI_INT,alltarget[myrank], RequestId[i]) ; - cout << "test" << myrank << " Send RequestId " << RequestId[i] + debugStream << "test" << myrank << " Send RequestId " << RequestId[i] << " tag " << mpi_access.sendMPITag(alltarget[myrank]) << endl ; } } else { sts = mpi_access.send(&i,1,MPI_INT,alltarget[myrank], RequestId[i]) ; - cout << "test" << myrank << " Send RequestId " << RequestId[i] + debugStream << "test" << myrank << " Send RequestId " << RequestId[i] << " tag " << mpi_access.sendMPITag(alltarget[myrank]) << endl ; } char msgerr[MPI_MAX_ERROR_STRING] ; int lenerr ; mpi_access.errorString(sts, msgerr, &lenerr) ; - cout << "test" << myrank << " lenerr " << lenerr + debugStream << "test" << myrank << " lenerr " << lenerr << " " << msgerr << endl ; if ( sts != MPI_SUCCESS ) { @@ -131,10 +132,10 @@ void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { << "test" << myrank << " KO" << "===========================================================" << endl ; - cout << strstream.str() << endl ; + debugStream << strstream.str() << endl ; CPPUNIT_FAIL( strstream.str() ) ; } - mpi_access.check() ; + if(MPI_ACCESS_VERBOSE) mpi_access.check() ; } int flag ; @@ -142,11 +143,11 @@ void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { if ( !flag ) { ostringstream strstream ; strstream << "test" << myrank << " flag " << flag << " KO" << endl ; - cout << strstream.str() << endl ; + debugStream << strstream.str() << endl ; CPPUNIT_FAIL( strstream.str() ) ; } mpi_access.waitAll(10,RequestId) ; - mpi_access.check() ; + if(MPI_ACCESS_VERBOSE) mpi_access.check() ; int sendrequests[10] ; int sendreqsize = mpi_access.sendRequestIds( alltarget[myrank] , 10 , @@ -156,7 +157,7 @@ void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { strstream << "=========================================================" << endl << "test" << myrank << " sendreqsize " << sendreqsize << " KO" << endl << "=========================================================" << endl ; - cout << strstream.str() << endl ; + debugStream << strstream.str() << endl ; CPPUNIT_FAIL( strstream.str() ) ; } int recvrequests[10] ; @@ -167,7 +168,7 @@ void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { strstream << "=========================================================" << endl << "test" << myrank << " recvreqsize " << recvreqsize << " KO" << endl << "=========================================================" << endl ; - cout << strstream.str() << endl ; + debugStream << strstream.str() << endl ; CPPUNIT_FAIL( strstream.str() ) ; } @@ -177,7 +178,7 @@ void MPIAccessTest::test_MPI_Access_Cyclic_Send_Recv() { // MPI_Finalize(); - cout << "test" << myrank << " OK" << endl ; + debugStream << "test" << myrank << " OK" << endl ; return ; }