4 import generator_utils as gen
6 template = """// @{generatedby}@
7 /* ///////////////////////// The MPI Bugs Initiative ////////////////////////
11 Description: @{shortdesc}@
14 Version of MPI: Conforms to MPI 1.1, does not require MPI 2 implementation
17 P2P!basic: @{p2pfeature}@
18 P2P!nonblocking: @{ip2pfeature}@
19 P2P!persistent: @{persfeature}@
21 COLL!nonblocking: Lacking
22 COLL!persistent: Lacking
32 ////////////////////// End of MBI headers /////////////////// */
39 int main(int argc, char **argv) {
43 int stag = 0, rtag = 0;
46 MPI_Init(&argc, &argv);
47 MPI_Comm_size(MPI_COMM_WORLD, &nprocs);
48 MPI_Comm_rank(MPI_COMM_WORLD, &rank);
49 printf("Hello from rank %d \\n", rank);
51 MPI_Datatype type = MPI_INT;
52 MPI_Comm newcom = MPI_COMM_WORLD;
58 @{operation1}@ /* MBIERROR1 */
61 }else if (rank == 1) {
63 @{operation2}@ /* MBIERROR2 */
70 if(newcom != MPI_COMM_NULL && newcom != MPI_COMM_WORLD)
71 MPI_Comm_free(&newcom);
74 printf("Rank %d finished normally\\n", rank);
80 for p1 in gen.send + gen.isend + gen.psend:
81 for p2 in gen.recv + gen.irecv + gen.precv:
83 patterns = {'p1': p1, 'p2': p2}
84 patterns['origin'] = "MBI"
85 patterns['generatedby'] = f'DO NOT EDIT: this file was generated by {os.path.basename(sys.argv[0])}. DO NOT EDIT.'
86 patterns['p2pfeature'] = 'Yes' if p1 in gen.send or p2 in gen.recv else 'Lacking'
87 patterns['ip2pfeature'] = 'Yes' if p1 in gen.isend or p2 in gen.irecv else 'Lacking'
88 patterns['persfeature'] = 'Yes' if p1 in gen.psend or p2 in gen.precv else 'Lacking'
91 patterns['init1'] = gen.init[p1]("1")
92 patterns['init2'] = gen.init[p2]("2")
93 patterns['start1'] = gen.start[p1]("1")
94 patterns['start2'] = gen.start[p2]("2")
95 patterns['fini1'] = gen.fini[p1]("1")
96 patterns['fini2'] = gen.fini[p2]("2")
97 patterns['operation1'] = gen.operation[p1]("1") #send
98 patterns['operation2'] = gen.operation[p2]("2") #recv
99 patterns['free1'] = gen.free[p1]("1")
100 patterns['free2'] = gen.free[p2]("2")
101 patterns['change_com1'] = ""
102 patterns['change_com2'] = ""
104 replace = patterns.copy()
105 replace['origin'] = "inspired from MPI-Corrbench"
106 replace['shortdesc'] = 'Point to point @{p2}@ has an invalid communicator'
107 replace['longdesc'] = 'MPI_COMM_NULL used in point to point @{p2}@'
108 replace['outcome'] = 'ERROR: InvalidCommunicator'
109 replace['errormsg'] = 'Invalid Communicator. @{p2}@ at @{filename}@:@{line:MBIERROR2}@ uses a null communicator.'
110 replace['change_com2'] = 'newcom = MPI_COMM_NULL;'
111 gen.make_file(template, f'InvalidParam_ComNull_{p2}_{p1}nok.c', replace)
113 replace = patterns.copy()
114 replace['shortdesc'] = 'Point to point @{p2}@ has an invalid communicator'
115 replace['longdesc'] = 'MPI_COMM_NULL used in point to point @{p2}@'
116 replace['outcome'] = 'ERROR: InvalidCommunicator'
117 replace['errormsg'] = 'Invalid Communicator. @{p1}@ at @{filename}@:@{line:MBIERROR1}@ uses a null communicator.'
118 replace['change_com1'] = 'newcom = MPI_COMM_NULL;'
119 replace['change_com2'] = ""
120 gen.make_file(template, f'InvalidParam_ComNull_{p1}_{p2}nok.c', replace)