generate_automake_test_programs.py 9.56 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",
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",
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"):
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

79 80 81
    # exclude some test combinations

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

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"))):
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

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")):
111 112 113
        continue

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

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

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 = "test{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":
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":
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

Andreas Marek's avatar
Andreas Marek committed
230
for lang, p, d in product(sorted(language_flag.keys()), sorted(prec_flag.keys()), sorted(domain_flag.keys())):
231 232 233 234 235 236 237 238 239 240
    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

Andreas Marek's avatar
Andreas Marek committed
241
    name = "test_autotune{langsuffix}_{d}_{p}".format(langsuffix=language_flag[lang], d=d, p=p)
242

243
    print("if ENABLE_AUTOTUNING")
244
    print("check_SCRIPTS += " + name + "_extended.sh")
245
    print("noinst_PROGRAMS += " + name)
246
    if lang == "Fortran":
Andreas Marek's avatar
Andreas Marek committed
247 248 249 250 251 252 253
        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)")
254
        print(name + "_CFLAGS = $(test_program_cflags) \\")
Andreas Marek's avatar
Andreas Marek committed
255

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

259
    print("  " + " \\\n  ".join([
260 261
        domain_flag[d],
        prec_flag[p]]))
262
    print("endif\n" * endifs)
263
    print("endif")
Pavel Kus's avatar
Pavel Kus committed
264 265 266 267 268 269 270 271 272 273 274 275 276

name = "test_multiple_objs_real_double"
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")

277 278 279 280 281 282 283 284 285 286 287 288
name = "test_multiple_objs_real_double_c_version"
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")