X-Git-Url: http://bilbo.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/4e03f78d2ffac18f4e8ffa7016a3cec61bbad03a..4bbc8305ba7bcc626cefb446b65ccd10ac2a2dc5:/teshsuite/smpi/MBI/P2PComGenerator.py diff --git a/teshsuite/smpi/MBI/P2PComGenerator.py b/teshsuite/smpi/MBI/P2PComGenerator.py index 933d3d60ee..6382267aa9 100755 --- a/teshsuite/smpi/MBI/P2PComGenerator.py +++ b/teshsuite/smpi/MBI/P2PComGenerator.py @@ -1,7 +1,7 @@ #! /usr/bin/python3 import os import sys -from generator_utils import * +import generator_utils as gen template = """// @{generatedby}@ /* ///////////////////////// The MPI Bugs Initiative //////////////////////// @@ -11,17 +11,17 @@ template = """// @{generatedby}@ Description: @{shortdesc}@ @{longdesc}@ - Version of MPI: Conforms to MPI 1.1, does not require MPI 2 implementation + Version of MPI: Conforms to MPI 1.1, does not require MPI 2 implementation BEGIN_MPI_FEATURES - P2P!basic: @{p2pfeature}@ - P2P!nonblocking: @{ip2pfeature}@ - P2P!persistent: @{persfeature}@ - COLL!basic: Lacking - COLL!nonblocking: Lacking - COLL!persistent: Lacking - COLL!tools: Yes - RMA: Lacking + P2P!basic: @{p2pfeature}@ + P2P!nonblocking: @{ip2pfeature}@ + P2P!persistent: @{persfeature}@ + COLL!basic: Lacking + COLL!nonblocking: Lacking + COLL!persistent: Lacking + COLL!tools: Yes + RMA: Lacking END_MPI_FEATURES BEGIN_MBI_TESTS @@ -39,7 +39,7 @@ END_MBI_TESTS int main(int argc, char **argv) { int nprocs = -1; int rank = -1; - int src=0, dest=1; + int src=0, dest=1; int stag = 0, rtag = 0; int buff_size = 1; @@ -51,28 +51,28 @@ int main(int argc, char **argv) { if (nprocs < 2) printf("MBI ERROR: This test needs at least 2 processes to produce a bug!\\n"); - MPI_Datatype type = MPI_INT; - MPI_Comm newcom; + MPI_Datatype type = MPI_INT; + MPI_Comm newcom; MPI_Comm_split(MPI_COMM_WORLD, 0, nprocs - rank, &newcom); @{change_com}@ @{change_srcdest}@ @{init1}@ @{init2}@ - if (rank == 0) { - @{operation1}@ /* MBIERROR1 */ - @{start1}@ - @{fini1}@ - }else if (rank == 1) { - @{operation2}@ /* MBIERROR2 */ - @{start2}@ - @{fini2}@ - } + if (rank == 0) { + @{operation1}@ /* MBIERROR1 */ + @{start1}@ + @{fini1}@ + }else if (rank == 1) { + @{operation2}@ /* MBIERROR2 */ + @{start2}@ + @{fini2}@ + } @{free1}@ @{free2}@ - if(newcom != MPI_COMM_NULL && newcom != MPI_COMM_WORLD) - MPI_Comm_free(&newcom); + if(newcom != MPI_COMM_NULL && newcom != MPI_COMM_WORLD) + MPI_Comm_free(&newcom); MPI_Finalize(); printf("Rank %d finished normally\\n", rank); @@ -81,73 +81,74 @@ int main(int argc, char **argv) { """ -for p1 in send + isend + psend: - for p2 in recv + irecv + precv: +for p1 in gen.send + gen.isend + gen.psend: + for p2 in gen.recv + gen.irecv + gen.precv: patterns = {} patterns = {'p1': p1, 'p2': p2} - patterns['origin'] = "MBI" - patterns['generatedby'] = f'DO NOT EDIT: this file was generated by {os.path.basename(sys.argv[0])}. DO NOT EDIT.' - patterns['p2pfeature'] = 'Yes' if p1 in send or p2 in recv else 'Lacking' - patterns['ip2pfeature'] = 'Yes' if p1 in isend or p2 in irecv else 'Lacking' - patterns['persfeature'] = 'Yes' if p1 in psend or p2 in precv else 'Lacking' - patterns['p1'] = p1 - patterns['p2'] = p2 - patterns['init1'] = init[p1]("1") - patterns['init2'] = init[p2]("2") - patterns['start1'] = start[p1]("1") - patterns['start2'] = start[p2]("2") - patterns['fini1'] = fini[p1]("1") - patterns['fini2'] = fini[p2]("2") - patterns['operation1'] = operation[p1]("1") #send - patterns['operation2'] = operation[p2]("2") #recv - patterns['free1'] = free[p1]("1") - patterns['free2'] = free[p2]("2") - patterns['change_srcdest'] = "" - - # Generate the incorrect matching - replace = patterns - replace['shortdesc'] = 'Point to point @{p1}@ and @{p2}@ have a communicator mismatch' - replace['longdesc'] = 'Process 1 uses newcom as the communicator while process 0 uses MPI_COMM_WORLD.' - replace['outcome'] = 'ERROR: CommunicatorMatching' - replace['errormsg'] = 'P2P Communicator mismatch. @{p1}@ at @{filename}@:@{line:MBIERROR1}@ and @{p2}@ at @{filename}@:@{line:MBIERROR2}@ have newcom or MPI_COMM_WORLD as a communicator.' + patterns['origin'] = "MBI" + patterns['generatedby'] = f'DO NOT EDIT: this file was generated by {os.path.basename(sys.argv[0])}. DO NOT EDIT.' + patterns['p2pfeature'] = 'Yes' if p1 in gen.send or p2 in gen.recv else 'Lacking' + patterns['ip2pfeature'] = 'Yes' if p1 in gen.isend or p2 in gen.irecv else 'Lacking' + patterns['persfeature'] = 'Yes' if p1 in gen.psend or p2 in gen.precv else 'Lacking' + patterns['p1'] = p1 + patterns['p2'] = p2 + patterns['init1'] = gen.init[p1]("1") + patterns['init2'] = gen.init[p2]("2") + patterns['start1'] = gen.start[p1]("1") + patterns['start2'] = gen.start[p2]("2") + patterns['fini1'] = gen.fini[p1]("1") + patterns['fini2'] = gen.fini[p2]("2") + patterns['operation1'] = gen.operation[p1]("1") #send + patterns['operation2'] = gen.operation[p2]("2") #recv + patterns['free1'] = gen.free[p1]("1") + patterns['free2'] = gen.free[p2]("2") + patterns['change_srcdest'] = "" + patterns['change_com'] = "" + + # Generate the incorrect matching + replace = patterns.copy() + replace['shortdesc'] = 'Point to point @{p1}@ and @{p2}@ have a communicator mismatch' + replace['longdesc'] = 'Process 1 uses newcom as the communicator while process 0 uses MPI_COMM_WORLD.' + replace['outcome'] = 'ERROR: CommunicatorMatching' + replace['errormsg'] = 'P2P Communicator mismatch. @{p1}@ at @{filename}@:@{line:MBIERROR1}@ and @{p2}@ at @{filename}@:@{line:MBIERROR2}@ have newcom or MPI_COMM_WORLD as a communicator.' replace['change_com'] = 'if (rank==0)\n newcom = MPI_COMM_WORLD; /* MBIERROR */' - make_file(template, f'ParamMatching_Com_{p1}_{p2}_nok.c', replace) - - # Generate the code with an invalid communicator - replace = patterns - replace['shortdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator' - replace['longdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator.' - replace['outcome'] = 'ERROR: InvalidCommunicator' - replace['errormsg'] = 'Invalid Communicator. @{p1}@ at @{filename}@:@{line:MBIERROR1}@ and @{p2}@ at @{filename}@:@{line:MBIERROR2}@ use a communicator that is freed line @{line:MBIERROR}@.' + gen.make_file(template, f'ParamMatching_Com_{p1}_{p2}_nok.c', replace) + + # Generate the code with an invalid communicator + replace = patterns.copy() + replace['shortdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator' + replace['longdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator.' + replace['outcome'] = 'ERROR: InvalidCommunicator' + replace['errormsg'] = 'Invalid Communicator. @{p1}@ at @{filename}@:@{line:MBIERROR1}@ and @{p2}@ at @{filename}@:@{line:MBIERROR2}@ use a communicator that is freed line @{line:MBIERROR}@.' replace['change_com'] = 'MPI_Comm_free(&newcom); /* MBIERROR */' - make_file(template, f'InvalidParam_Com_{p1}_{p2}_nok.c', replace) - - # Generate the code with an invalid communicator ==> TO CHECK - #replace = patterns - #replace['shortdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator' - # replace['longdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator.' - # replace['outcome'] = 'ERROR: InvalidCommunicator' - # replace['errormsg'] = 'Invalid Communicator. @{p1}@ at @{filename}@:@{line:MBIERROR1}@ and @{p2}@ at @{filename}@:@{line:MBIERROR2}@ use different communicators' + gen.make_file(template, f'InvalidParam_Com_{p1}_{p2}_nok.c', replace) + + # Generate the code with an invalid communicator ==> TO CHECK + #replace = patterns.copy() + #replace['shortdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator' + # replace['longdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator.' + # replace['outcome'] = 'ERROR: InvalidCommunicator' + # replace['errormsg'] = 'Invalid Communicator. @{p1}@ at @{filename}@:@{line:MBIERROR1}@ and @{p2}@ at @{filename}@:@{line:MBIERROR2}@ use different communicators' # replace['origin'] = "MPI-Corrbench" # replace['change_com'] = "" - # make_file(template, f'InvalidParam_Com_{p1}_{p2}_nok.c', replace) + # gen.make_file(template, f'InvalidParam_Com_{p1}_{p2}_nok.c', replace) - # Generate the code with an invalid dest - replace = patterns + # Generate the code with an invalid dest + replace = patterns.copy() replace['origin'] = "MBI" - replace['shortdesc'] = 'Point to point @{p1}@ has an invalid argument' - replace['longdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator.' - replace['outcome'] = 'ERROR: InvalidSrcDest' - replace['errormsg'] = 'InvalidSrcDest. @{p1}@ at @{filename}@:@{line:MBIERROR1}@ performs a send with a dest not in communicator (dest is changed line @{line:MBIERROR}@).' + replace['shortdesc'] = 'Point to point @{p1}@ has an invalid argument' + replace['longdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator.' + replace['outcome'] = 'ERROR: InvalidSrcDest' + replace['errormsg'] = 'InvalidSrcDest. @{p1}@ at @{filename}@:@{line:MBIERROR1}@ performs a send with a dest not in communicator (dest is changed line @{line:MBIERROR}@).' replace['change_com'] = "" replace['change_srcdest'] = 'dest=4; /* MBIERROR */' - make_file(template, f'InvalidParam_Dest_{p1}_{p2}_nok.c', replace) + gen.make_file(template, f'InvalidParam_Dest_{p1}_{p2}_nok.c', replace) - # Generate the code with an invalid src - replace = patterns + # Generate the code with an invalid src + replace = patterns.copy() replace['shortdesc'] = 'Point to point @{p2}@ has an invalid argument' - replace['longdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator.' - replace['outcome'] = 'ERROR: InvalidSrcDest' - replace['errormsg'] = 'InvalidSrcDest. @{p2}@ at @{filename}@:@{line:MBIERROR2}@ performs a recv with a negative integer as source (src is changed line @{line:MBIERROR}@).' + replace['longdesc'] = 'Point to point @{p1}@ and @{p2}@ have an invalid communicator.' + replace['outcome'] = 'ERROR: InvalidSrcDest' + replace['errormsg'] = 'InvalidSrcDest. @{p2}@ at @{filename}@:@{line:MBIERROR2}@ performs a recv with a negative integer as source (src is changed line @{line:MBIERROR}@).' replace['change_srcdest'] = 'src=-1; /* MBIERROR */' - make_file(template, f'InvalidParam_Src_{p1}_{p2}_nok.c', replace) + gen.make_file(template, f'InvalidParam_Src_{p1}_{p2}_nok.c', replace)