4 import generator_utils as gen
6 template = """// @{generatedby}@
7 /* ///////////////////////// The MPI Bugs Initiative ////////////////////////
11 Description: @{shortdesc}@
14 Version of MPI: Conforms to MPI 2, requires MPI 3 implementation (for lock_all/unlock_all epochs)
18 P2P!nonblocking: Lacking
19 P2P!persistent: Lacking
21 COLL!nonblocking: Lacking
22 COLL!persistent: Lacking
32 ////////////////////// End of MBI headers /////////////////// */
40 int main(int argc, char **argv) {
44 int winbuf[100] = {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);
52 printf("MBI ERROR: This test needs at least 2 processes to produce a bug!\\n");
54 MPI_Datatype type = MPI_INT;
55 int target = 1 - rank;
57 MPI_Win_create(&winbuf, 100 * sizeof(int), sizeof(int), MPI_INFO_NULL, MPI_COMM_WORLD, &win);
65 @{operation1}@ /* MBIERROR1 */
68 @{operation2}@ /* MBIERROR2 */
83 for p2 in gen.put + gen.rstore + gen.rload + gen.get :
85 patterns = {'e': e, 'p1': p1, 'p2': p2}
86 patterns['generatedby'] = f'DO NOT EDIT: this file was generated by {os.path.basename(sys.argv[0])}. DO NOT EDIT.'
87 patterns['rmafeature'] = 'Yes'
91 patterns['epoch'] = gen.epoch[e]("1")
92 patterns['finEpoch'] = gen.finEpoch[e]("1")
93 patterns['init1'] = gen.init[p1]("1")
94 patterns['operation1'] = gen.operation[p1]("1")
95 patterns['init2'] = gen.init[p2]("2")
96 patterns['operation2'] = gen.operation[p2]("2")
98 # Generate a data race (Get + Get/load/store/Put)
99 replace = patterns.copy()
100 replace['shortdesc'] = 'Global Concurrency error.'
101 replace['longdesc'] = 'Global Concurrency error. @{p2}@ conflicts with @{p1}@'
102 replace['outcome'] = 'ERROR: GlobalConcurrency'
103 replace['errormsg'] = 'Global Concurrency error. @{p2}@ at @{filename}@:@{line:MBIERROR2}@ conflicts with @{p1}@ line @{line:MBIERROR1}@'
105 # Replace Put and Get first argument
107 replace['operation2'] = 'MPI_Put(&winbuf[5], N, MPI_INT, target, 0, N, type, win);'
108 replace['outcome'] = 'OK'
109 replace['errormsg'] = 'OK'
111 replace['operation2'] = 'MPI_Get(&winbuf[5], N, MPI_INT, target, 0, N, type, win);'
112 elif p2 in gen.rload:
113 replace['outcome'] = 'OK'
114 replace['errormsg'] = 'OK'
116 ok = 'ok' if replace['outcome'] == 'OK' else 'nok'
117 gen.make_file(template, f'GlobalConcurrency_rl_{e}_{p1}_{p2}_{ok}.c', replace)
122 for p2 in gen.rstore + gen.rload + gen.put + gen.get:
124 patterns = {'e': e, 'p1': p1, 'p2': p2}
125 patterns['generatedby'] = f'DO NOT EDIT: this file was generated by {os.path.basename(sys.argv[0])}. DO NOT EDIT.'
126 patterns['rmafeature'] = 'Yes'
130 patterns['epoch'] = gen.epoch[e]("1")
131 patterns['finEpoch'] = gen.finEpoch[e]("1")
132 patterns['init1'] = gen.init[p1]("1")
133 patterns['operation1'] = gen.operation[p1]("1")
134 patterns['init2'] = gen.init[p2]("2")
135 patterns['operation2'] = gen.operation[p2]("2")
137 # Generate a data race (Put + store)
138 replace = patterns.copy()
139 replace['shortdesc'] = 'Global Concurrency error.'
140 replace['longdesc'] = 'Global Concurrency error. @{p2}@ conflicts with @{p1}@'
141 replace['outcome'] = 'ERROR: GlobalConcurrency'
142 replace['errormsg'] = 'Global Concurrency error. @{p2}@ at @{filename}@:@{line:MBIERROR2}@ conflicts with @{p1}@ line @{line:MBIERROR1}@'
144 # Replace Put/Get first argument
146 replace['operation2'] = 'MPI_Put(&winbuf[5], N, MPI_INT, target, 0, N, type, win);'
148 replace['operation2'] = 'MPI_Get(&winbuf[5], N, MPI_INT, target, 0, N, type, win);'
150 gen.make_file(template, f'GlobalConcurrency_rl_{e}_{p1}_{p2}_nok.c', replace)