generate_automake_test_programs.py 9.95 KB
Newer Older
1
2
3
4
#!/usr/bin/env python
from __future__ import print_function
from itertools import product

5
language_flag = {
6
    "Fortran": "",
7
    "C": "_c_version",
Andreas Marek's avatar
Andreas Marek committed
8
9
}

10
domain_flag = {
11
12
    "real":    "-DTEST_REAL",
    "complex": "-DTEST_COMPLEX",
13
14
}
prec_flag = {
15
16
    "double": "-DTEST_DOUBLE",
    "single": "-DTEST_SINGLE",
17
18
}
solver_flag = {
19
20
21
22
    "1stage":         "-DTEST_SOLVER_1STAGE",
    "2stage":         "-DTEST_SOLVER_2STAGE",
    "scalapack_all":  "-DTEST_SCALAPACK_ALL",
    "scalapack_part": "-DTEST_SCALAPACK_PART",
23
24
}
gpu_flag = {
25
26
    0: "-DTEST_GPU=0",
    1: "-DTEST_GPU=1",
27
}
28

Pavel Kus's avatar
Pavel Kus committed
29
matrix_flag = {
30
31
32
33
    "random":   "-DTEST_MATRIX_RANDOM",
    "analytic": "-DTEST_MATRIX_ANALYTIC",
    "toeplitz": "-DTEST_MATRIX_TOEPLITZ",
    "frank":    "-DTEST_MATRIX_FRANK",
Andreas Marek's avatar
Andreas Marek committed
34
35
36
}

qr_flag = {
37
38
    0: "-DTEST_QR_DECOMPOSITION=0",
    1: "-DTEST_QR_DECOMPOSITION=1",
Pavel Kus's avatar
Pavel Kus committed
39
}
40

41
test_type_flag = {
42
43
44
45
46
    "eigenvectors":       "-DTEST_EIGENVECTORS",
    "eigenvalues":        "-DTEST_EIGENVALUES",
    "solve_tridiagonal":  "-DTEST_SOLVE_TRIDIAGONAL",
    "cholesky":           "-DTEST_CHOLESKY",
    "hermitian_multiply": "-DTEST_HERMITIAN_MULTIPLY",
47
    "generalized":        "-DTEST_GENERALIZED_EIGENPROBLEM",
48
    "generalized_decomp": "-DTEST_GENERALIZED_DECOMP_EIGENPROBLEM",
49
50
}

51
layout_flag = {
52
53
    "all_layouts": "-DTEST_ALL_LAYOUTS",
    "square": ""
54
55
}

56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
split_comm_flag = {
    "myself": "-DSPLIT_COMM_MYSELF",
    "by_elpa": ""
}

for lang, m, g, q, t, p, d, s, lay, spl in product(sorted(language_flag.keys()),
                                                   sorted(matrix_flag.keys()),
                                                   sorted(gpu_flag.keys()),
                                                   sorted(qr_flag.keys()),
                                                   sorted(test_type_flag.keys()),
                                                   sorted(prec_flag.keys()),
                                                   sorted(domain_flag.keys()),
                                                   sorted(solver_flag.keys()),
                                                   sorted(layout_flag.keys()),
                                                   sorted(split_comm_flag.keys())):
71

Andreas Marek's avatar
Andreas Marek committed
72
    if lang == "C" and (m == "analytic" or m == "toeplitz" or m == "frank" or lay == "all_layouts"):
Andreas Marek's avatar
Andreas Marek committed
73
74
        continue

75
76
77
78
    # not implemented in the test.c file yet
    if lang == "C" and (t == "cholesky" or t == "hermitian_multiply" or q == 1):
        continue

Andreas Marek's avatar
Andreas Marek committed
79
80
81
    # exclude some test combinations

    # analytic tests only for "eigenvectors" and not on GPU
Pavel Kus's avatar
Pavel Kus committed
82
    if(m == "analytic" and (g == 1 or t != "eigenvectors")):
Pavel Kus's avatar
Pavel Kus committed
83
84
        continue

Andreas Marek's avatar
Andreas Marek committed
85
    # Frank tests only for "eigenvectors" and eigenvalues and real double precision case
86
    if(m == "frank" and ((t != "eigenvectors" or t != "eigenvalues") and (d != "real" or p != "double"))):
Andreas Marek's avatar
Andreas Marek committed
87
88
        continue

89
    if(s in ["scalapack_all", "scalapack_part"] and (g == 1 or t != "eigenvectors" or m != "analytic")):
Pavel Kus's avatar
Pavel Kus committed
90
91
        continue

92
    # do not test single-precision scalapack
93
    if(s in ["scalapack_all", "scalapack_part"] and (p == "single")):
94
95
        continue

Andreas Marek's avatar
Andreas Marek committed
96
    # solve tridiagonal only for real toeplitz matrix in 1stage
97
    if (t == "solve_tridiagonal" and (s != "1stage" or d != "real" or m != "toeplitz")):
98
99
        continue

100
101
102
103
    # solve generalized only for random matrix in 1stage
    if (t == "generalized" and (m != "random" or s == "2stage")):
        continue

104
105
106
107
108
    # solve generalized already decomposed only for random matrix in 1stage
    # maybe this test should be further restricted, maybe not so important...
    if (t == "generalized_decomp" and (m != "random" or s == "2stage")):
        continue

109
110
    # cholesky tests only 1stage and teoplitz or random matrix
    if (t == "cholesky" and ((not (m == "toeplitz" or m == "random")) or s == "2stage")):
Andreas Marek's avatar
Andreas Marek committed
111
112
113
        continue

    if (t == "eigenvalues" and (m == "random")):
114
115
        continue

116
117
118
    if (t == "hermitian_multiply" and (s == "2stage")):
        continue

Andreas Marek's avatar
Andreas Marek committed
119
120
121
122
123
    if (t == "hermitian_multiply" and (m == "toeplitz")):
        continue

    # qr only for 2stage real
    if (q == 1 and (s != "2stage" or d != "real" or t != "eigenvectors" or g == 1 or m != "random")):
124
125
        continue

126
    if(spl == "myself" and (d != "real" or p != "double" or q != 0 or m != "random" or (t != "eigenvectors" and t != "cholesky")  or lang != "Fortran" or lay != "square")):
127
128
        continue

129
130
131
    for kernel in ["all_kernels", "default_kernel"] if s == "2stage" else ["nokernel"]:
        endifs = 0
        extra_flags = []
132

133
134
135
        if(spl == "myself" and kernel == "all_kernels"):
            continue

136
137
138
139
        if(spl == "myself"):
            print("if WITH_MPI")
            endifs += 1

140
        if (t == "eigenvalues" and kernel == "all_kernels"):
141
            continue
142

Andreas Marek's avatar
Andreas Marek committed
143
144
145
        if (lang == "C" and kernel == "all_kernels"):
            continue

146
147
148
149
        if (lang == "C"):
            print("if ENABLE_C_TESTS")
            endifs += 1

150
151
152
        if (g == 1):
            print("if WITH_GPU_VERSION")
            endifs += 1
153

154
        if (lay == "all_layouts"):
155
156
157
            print("if WITH_MPI")
            endifs += 1

158
        if (s in ["scalapack_all", "scalapack_part"]):
159
160
161
            print("if WITH_SCALAPACK_TESTS")
            endifs += 1

162
163
164
165
        if kernel == "default_kernel":
            extra_flags.append("-DTEST_KERNEL=ELPA_2STAGE_{0}_DEFAULT".format(d.upper()))
        elif kernel == "all_kernels":
            extra_flags.append("-DTEST_ALL_KERNELS")
166

167
168
        if layout_flag[lay]:
            extra_flags.append(layout_flag[lay])
169

170
171
172
        if split_comm_flag[spl]:
            extra_flags.append(split_comm_flag[spl])

173
174
175
176
177
178
179
180
181
        if (p == "single"):
            if (d == "real"):
                print("if WANT_SINGLE_PRECISION_REAL")
            elif (d == "complex"):
                print("if WANT_SINGLE_PRECISION_COMPLEX")
            else:
                raise Exception("Oh no!")
            endifs += 1

182
        name = "validate{langsuffix}_{d}_{p}_{t}_{s}{kernelsuffix}_{gpusuffix}{qrsuffix}{m}{layoutsuffix}{spl}".format(
183
184
185
186
187
188
            langsuffix=language_flag[lang],
            d=d, p=p, t=t, s=s,
            kernelsuffix="" if kernel == "nokernel" else "_" + kernel,
            gpusuffix="gpu_" if g else "",
            qrsuffix="qr_" if q else "",
            m=m,
189
190
            layoutsuffix="_all_layouts" if lay == "all_layouts" else "",
            spl="_split_comm_myself" if spl == "myself" else "")
191
192
193
194
195
196
197

        print("if BUILD_KCOMPUTER")
        print("bin_PROGRAMS += " + name)
        print("else")
        print("noinst_PROGRAMS += " + name)
        print("endif")

198
        if lay == "square" or t == "generalized":
199
200
201
202
203
            print("check_SCRIPTS += " + name + "_default.sh")
        elif lay == "all_layouts":
            print("check_SCRIPTS += " + name + "_extended.sh")
        else:
            raise Exception("Unknown layout {0}".format(lay))
204
205

        if lang == "Fortran":
Andreas Marek's avatar
Andreas Marek committed
206
207
208
            print(name + "_SOURCES = test/Fortran/test.F90")
            print(name + "_LDADD = $(test_program_ldadd)")
            print(name + "_FCFLAGS = $(test_program_fcflags) \\")
209
210

        elif lang == "C":
Andreas Marek's avatar
Andreas Marek committed
211
212
            print(name + "_SOURCES = test/C/test.c")
            print(name + "_LDADD = $(test_program_ldadd) $(FCLIBS)")
213
            print(name + "_CFLAGS = $(test_program_cflags) \\")
214

215
216
217
        else:
            raise Exception("Unknown language")

218
219
220
221
222
223
224
225
226
227
228
        print("  -DTEST_CASE=\\\"{0}\\\" \\".format(name))
        print("  " + " \\\n  ".join([
            domain_flag[d],
            prec_flag[p],
            test_type_flag[t],
            solver_flag[s],
            gpu_flag[g],
            qr_flag[q],
            matrix_flag[m]] + extra_flags))

        print("endif\n" * endifs)
229

230

Andreas Marek's avatar
Andreas Marek committed
231
for lang, p, d in product(sorted(language_flag.keys()), sorted(prec_flag.keys()), sorted(domain_flag.keys())):
232
233
234
235
236
237
238
239
240
241
    endifs = 0
    if (p == "single"):
        if (d == "real"):
            print("if WANT_SINGLE_PRECISION_REAL")
        elif (d == "complex"):
            print("if WANT_SINGLE_PRECISION_COMPLEX")
        else:
            raise Exception("Oh no!")
        endifs += 1

242
    name = "validate_autotune{langsuffix}_{d}_{p}".format(langsuffix=language_flag[lang], d=d, p=p)
243

Andreas Marek's avatar
Andreas Marek committed
244
    print("if ENABLE_AUTOTUNING")
245
    print("check_SCRIPTS += " + name + "_extended.sh")
246
    print("noinst_PROGRAMS += " + name)
247
    if lang == "Fortran":
Andreas Marek's avatar
Andreas Marek committed
248
249
250
251
252
253
254
        print(name + "_SOURCES = test/Fortran/test_autotune.F90")
        print(name + "_LDADD = $(test_program_ldadd)")
        print(name + "_FCFLAGS = $(test_program_fcflags) \\")

    elif lang == "C":
        print(name + "_SOURCES = test/C/test_autotune.c")
        print(name + "_LDADD = $(test_program_ldadd) $(FCLIBS)")
255
        print(name + "_CFLAGS = $(test_program_cflags) \\")
Andreas Marek's avatar
Andreas Marek committed
256

257
258
259
    else:
        raise Exception("Unknown language")

260
    print("  " + " \\\n  ".join([
261
262
        domain_flag[d],
        prec_flag[p]]))
263
    print("endif\n" * endifs)
Andreas Marek's avatar
Andreas Marek committed
264
    print("endif")
Pavel Kus's avatar
Pavel Kus committed
265

266
name = "validate_multiple_objs_real_double"
Pavel Kus's avatar
Pavel Kus committed
267
268
269
270
271
272
273
274
275
276
277
print("if ENABLE_AUTOTUNING")
print("check_SCRIPTS += " + name + "_extended.sh")
print("noinst_PROGRAMS += " + name)
print(name + "_SOURCES = test/Fortran/test_multiple_objs.F90")
print(name + "_LDADD = $(test_program_ldadd)")
print(name + "_FCFLAGS = $(test_program_fcflags) \\")
print("  " + " \\\n  ".join([
        domain_flag['real'],
        prec_flag['double']]))
print("endif")

278
name = "validate_multiple_objs_real_double_c_version"
279
280
281
282
283
284
285
286
287
288
289
print("if ENABLE_AUTOTUNING")
print("check_SCRIPTS += " + name + "_extended.sh")
print("noinst_PROGRAMS += " + name)
print(name + "_SOURCES = test/C/test_multiple_objs.c")
print(name + "_LDADD = $(test_program_ldadd) $(FCLIBS)")
print(name + "_CFLAGS = $(test_program_cflags) \\")
print("  " + " \\\n  ".join([
        domain_flag['real'],
        prec_flag['double']]))
print("endif")

290
name = "validate_split_comm_real_double"
291
292
293
294
295
296
297
298
print("check_SCRIPTS += " + name + "_extended.sh")
print("noinst_PROGRAMS += " + name)
print(name + "_SOURCES = test/Fortran/test_split_comm.F90")
print(name + "_LDADD = $(test_program_ldadd)")
print(name + "_FCFLAGS = $(test_program_fcflags) \\")
print("  " + " \\\n  ".join([
        domain_flag['real'],
        prec_flag['double']]))