Remove #ifdef GMX_THREAD_MPI for basic thread safety.
[alexxy/gromacs.git] / src / programs / mdrun / mdrun.cpp
1 /*  -*- mode: c; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4; c-file-style: "stroustrup"; -*-
2  *
3  *
4  *                This source code is part of
5  *
6  *                 G   R   O   M   A   C   S
7  *
8  *          GROningen MAchine for Chemical Simulations
9  *
10  *                        VERSION 3.2.0
11  * Written by David van der Spoel, Erik Lindahl, Berk Hess, and others.
12  * Copyright (c) 1991-2000, University of Groningen, The Netherlands.
13  * Copyright (c) 2001-2004, The GROMACS development team,
14  * check out http://www.gromacs.org for more information.
15
16  * This program is free software; you can redistribute it and/or
17  * modify it under the terms of the GNU General Public License
18  * as published by the Free Software Foundation; either version 2
19  * of the License, or (at your option) any later version.
20  *
21  * If you want to redistribute modifications, please consider that
22  * scientific software is very special. Version control is crucial -
23  * bugs must be traceable. We will be happy to consider code for
24  * inclusion in the official distribution, but derived work must not
25  * be called official GROMACS. Details are found in the README & COPYING
26  * files - if they are missing, get the official version at www.gromacs.org.
27  *
28  * To help us fund GROMACS development, we humbly ask that you cite
29  * the papers on the package - you can find them in the top README file.
30  *
31  * For more info, check our website at http://www.gromacs.org
32  *
33  * And Hey:
34  * Gallium Rubidium Oxygen Manganese Argon Carbon Silicon
35  */
36 #include "mdrun_main.h"
37
38 #ifdef HAVE_CONFIG_H
39 #include "config.h"
40 #endif
41
42 #include <stdio.h>
43
44 #include "gromacs/legacyheaders/checkpoint.h"
45 #include "gromacs/legacyheaders/copyrite.h"
46 #include "gromacs/fileio/filenm.h"
47 #include "gromacs/legacyheaders/gmx_fatal.h"
48 #include "gromacs/legacyheaders/macros.h"
49 #include "gromacs/legacyheaders/main.h"
50 #include "gromacs/legacyheaders/mdrun.h"
51 #include "gromacs/legacyheaders/network.h"
52 #include "gromacs/legacyheaders/readinp.h"
53 #include "gromacs/legacyheaders/statutil.h"
54 #include "gromacs/legacyheaders/typedefs.h"
55
56 int gmx_mdrun(int argc, char *argv[])
57 {
58     const char   *desc[] = {
59         "The [TT]mdrun[tt] program is the main computational chemistry engine",
60         "within GROMACS. Obviously, it performs Molecular Dynamics simulations,",
61         "but it can also perform Stochastic Dynamics, Energy Minimization,",
62         "test particle insertion or (re)calculation of energies.",
63         "Normal mode analysis is another option. In this case [TT]mdrun[tt]",
64         "builds a Hessian matrix from single conformation.",
65         "For usual Normal Modes-like calculations, make sure that",
66         "the structure provided is properly energy-minimized.",
67         "The generated matrix can be diagonalized by [TT]g_nmeig[tt].[PAR]",
68         "The [TT]mdrun[tt] program reads the run input file ([TT]-s[tt])",
69         "and distributes the topology over nodes if needed.",
70         "[TT]mdrun[tt] produces at least four output files.",
71         "A single log file ([TT]-g[tt]) is written, unless the option",
72         "[TT]-seppot[tt] is used, in which case each node writes a log file.",
73         "The trajectory file ([TT]-o[tt]), contains coordinates, velocities and",
74         "optionally forces.",
75         "The structure file ([TT]-c[tt]) contains the coordinates and",
76         "velocities of the last step.",
77         "The energy file ([TT]-e[tt]) contains energies, the temperature,",
78         "pressure, etc, a lot of these things are also printed in the log file.",
79         "Optionally coordinates can be written to a compressed trajectory file",
80         "([TT]-x[tt]).[PAR]",
81         "The option [TT]-dhdl[tt] is only used when free energy calculation is",
82         "turned on.[PAR]",
83         "A simulation can be run in parallel using two different parallelization",
84         "schemes: MPI parallelization and/or OpenMP thread parallelization.",
85         "The MPI parallelization uses multiple processes when [TT]mdrun[tt] is",
86         "compiled with a normal MPI library or threads when [TT]mdrun[tt] is",
87         "compiled with the GROMACS built-in thread-MPI library. OpenMP threads",
88         "are supported when mdrun is compiled with OpenMP. Full OpenMP support",
89         "is only available with the Verlet cut-off scheme, with the (older)",
90         "group scheme only PME-only processes can use OpenMP parallelization.",
91         "In all cases [TT]mdrun[tt] will by default try to use all the available",
92         "hardware resources. With a normal MPI library only the options",
93         "[TT]-ntomp[tt] (with the Verlet cut-off scheme) and [TT]-ntomp_pme[tt],",
94         "for PME-only processes, can be used to control the number of threads.",
95         "With thread-MPI there are additional options [TT]-nt[tt], which sets",
96         "the total number of threads, and [TT]-ntmpi[tt], which sets the number",
97         "of thread-MPI threads.",
98         "Note that using combined MPI+OpenMP parallelization is almost always",
99         "slower than single parallelization, except at the scaling limit, where",
100         "especially OpenMP parallelization of PME reduces the communication cost.",
101         "OpenMP-only parallelization is much faster than MPI-only parallelization",
102         "on a single CPU(-die). Since we currently don't have proper hardware",
103         "topology detection, [TT]mdrun[tt] compiled with thread-MPI will only",
104         "automatically use OpenMP-only parallelization when you use up to 4",
105         "threads, up to 12 threads with Intel Nehalem/Westmere, or up to 16",
106         "threads with Intel Sandy Bridge or newer CPUs. Otherwise MPI-only",
107         "parallelization is used (except with GPUs, see below).",
108         "[PAR]",
109         "To quickly test the performance of the new Verlet cut-off scheme",
110         "with old [TT].tpr[tt] files, either on CPUs or CPUs+GPUs, you can use",
111         "the [TT]-testverlet[tt] option. This should not be used for production,",
112         "since it can slightly modify potentials and it will remove charge groups",
113         "making analysis difficult, as the [TT].tpr[tt] file will still contain",
114         "charge groups. For production simulations it is highly recommended",
115         "to specify [TT]cutoff-scheme = Verlet[tt] in the [TT].mdp[tt] file.",
116         "[PAR]",
117         "With GPUs (only supported with the Verlet cut-off scheme), the number",
118         "of GPUs should match the number of MPI processes or MPI threads,",
119         "excluding PME-only processes/threads. With thread-MPI, unless set on the command line, the number",
120         "of MPI threads will automatically be set to the number of GPUs detected.",
121         "To use a subset of the available GPUs, or to manually provide a mapping of",
122         "GPUs to PP ranks, you can use the [TT]-gpu_id[tt] option. The argument of [TT]-gpu_id[tt] is",
123         "a string of digits (without delimiter) representing device id-s of the GPUs to be used.",
124         "For example, \"[TT]02[tt]\" specifies using GPUs 0 and 2 in the first and second PP ranks per compute node",
125         "respectively. To select different sets of GPU-s",
126         "on different nodes of a compute cluster, use the [TT]GMX_GPU_ID[tt] environment",
127         "variable instead. The format for [TT]GMX_GPU_ID[tt] is identical to ",
128         "[TT]-gpu_id[tt], with the difference that an environment variable can have",
129         "different values on different compute nodes. Multiple MPI ranks on each node",
130         "can share GPUs. This is accomplished by specifying the id(s) of the GPU(s)",
131         "multiple times, e.g. \"[TT]0011[tt]\" for four ranks sharing two GPUs in this node.",
132         "This works within a single simulation, or a multi-simulation, with any form of MPI.",
133         "[PAR]",
134         "When using PME with separate PME nodes or with a GPU, the two major",
135         "compute tasks, the non-bonded force calculation and the PME calculation",
136         "run on different compute resources. If this load is not balanced,",
137         "some of the resources will be idle part of time. With the Verlet",
138         "cut-off scheme this load is automatically balanced when the PME load",
139         "is too high (but not when it is too low). This is done by scaling",
140         "the Coulomb cut-off and PME grid spacing by the same amount. In the first",
141         "few hundred steps different settings are tried and the fastest is chosen",
142         "for the rest of the simulation. This does not affect the accuracy of",
143         "the results, but it does affect the decomposition of the Coulomb energy",
144         "into particle and mesh contributions. The auto-tuning can be turned off",
145         "with the option [TT]-notunepme[tt].",
146         "[PAR]",
147         "[TT]mdrun[tt] pins (sets affinity of) threads to specific cores,",
148         "when all (logical) cores on a compute node are used by [TT]mdrun[tt],",
149         "even when no multi-threading is used,",
150         "as this usually results in significantly better performance.",
151         "If the queuing systems or the OpenMP library pinned threads, we honor",
152         "this and don't pin again, even though the layout may be sub-optimal.",
153         "If you want to have [TT]mdrun[tt] override an already set thread affinity",
154         "or pin threads when using less cores, use [TT]-pin on[tt].",
155         "With SMT (simultaneous multithreading), e.g. Intel Hyper-Threading,",
156         "there are multiple logical cores per physical core.",
157         "The option [TT]-pinstride[tt] sets the stride in logical cores for",
158         "pinning consecutive threads. Without SMT, 1 is usually the best choice.",
159         "With Intel Hyper-Threading 2 is best when using half or less of the",
160         "logical cores, 1 otherwise. The default value of 0 do exactly that:",
161         "it minimizes the threads per logical core, to optimize performance.",
162         "If you want to run multiple mdrun jobs on the same physical node,"
163         "you should set [TT]-pinstride[tt] to 1 when using all logical cores.",
164         "When running multiple mdrun (or other) simulations on the same physical",
165         "node, some simulations need to start pinning from a non-zero core",
166         "to avoid overloading cores; with [TT]-pinoffset[tt] you can specify",
167         "the offset in logical cores for pinning.",
168         "[PAR]",
169         "When [TT]mdrun[tt] is started using MPI with more than 1 process",
170         "or with thread-MPI with more than 1 thread, MPI parallelization is used.",
171         "By default domain decomposition is used, unless the [TT]-pd[tt]",
172         "option is set, which selects particle decomposition.",
173         "[PAR]",
174         "With domain decomposition, the spatial decomposition can be set",
175         "with option [TT]-dd[tt]. By default [TT]mdrun[tt] selects a good decomposition.",
176         "The user only needs to change this when the system is very inhomogeneous.",
177         "Dynamic load balancing is set with the option [TT]-dlb[tt],",
178         "which can give a significant performance improvement,",
179         "especially for inhomogeneous systems. The only disadvantage of",
180         "dynamic load balancing is that runs are no longer binary reproducible,",
181         "but in most cases this is not important.",
182         "By default the dynamic load balancing is automatically turned on",
183         "when the measured performance loss due to load imbalance is 5% or more.",
184         "At low parallelization these are the only important options",
185         "for domain decomposition.",
186         "At high parallelization the options in the next two sections",
187         "could be important for increasing the performace.",
188         "[PAR]",
189         "When PME is used with domain decomposition, separate nodes can",
190         "be assigned to do only the PME mesh calculation;",
191         "this is computationally more efficient starting at about 12 nodes.",
192         "The number of PME nodes is set with option [TT]-npme[tt],",
193         "this can not be more than half of the nodes.",
194         "By default [TT]mdrun[tt] makes a guess for the number of PME",
195         "nodes when the number of nodes is larger than 11 or performance wise",
196         "not compatible with the PME grid x dimension.",
197         "But the user should optimize npme. Performance statistics on this issue",
198         "are written at the end of the log file.",
199         "For good load balancing at high parallelization, the PME grid x and y",
200         "dimensions should be divisible by the number of PME nodes",
201         "(the simulation will run correctly also when this is not the case).",
202         "[PAR]",
203         "This section lists all options that affect the domain decomposition.",
204         "[PAR]",
205         "Option [TT]-rdd[tt] can be used to set the required maximum distance",
206         "for inter charge-group bonded interactions.",
207         "Communication for two-body bonded interactions below the non-bonded",
208         "cut-off distance always comes for free with the non-bonded communication.",
209         "Atoms beyond the non-bonded cut-off are only communicated when they have",
210         "missing bonded interactions; this means that the extra cost is minor",
211         "and nearly indepedent of the value of [TT]-rdd[tt].",
212         "With dynamic load balancing option [TT]-rdd[tt] also sets",
213         "the lower limit for the domain decomposition cell sizes.",
214         "By default [TT]-rdd[tt] is determined by [TT]mdrun[tt] based on",
215         "the initial coordinates. The chosen value will be a balance",
216         "between interaction range and communication cost.",
217         "[PAR]",
218         "When inter charge-group bonded interactions are beyond",
219         "the bonded cut-off distance, [TT]mdrun[tt] terminates with an error message.",
220         "For pair interactions and tabulated bonds",
221         "that do not generate exclusions, this check can be turned off",
222         "with the option [TT]-noddcheck[tt].",
223         "[PAR]",
224         "When constraints are present, option [TT]-rcon[tt] influences",
225         "the cell size limit as well.",
226         "Atoms connected by NC constraints, where NC is the LINCS order plus 1,",
227         "should not be beyond the smallest cell size. A error message is",
228         "generated when this happens and the user should change the decomposition",
229         "or decrease the LINCS order and increase the number of LINCS iterations.",
230         "By default [TT]mdrun[tt] estimates the minimum cell size required for P-LINCS",
231         "in a conservative fashion. For high parallelization it can be useful",
232         "to set the distance required for P-LINCS with the option [TT]-rcon[tt].",
233         "[PAR]",
234         "The [TT]-dds[tt] option sets the minimum allowed x, y and/or z scaling",
235         "of the cells with dynamic load balancing. [TT]mdrun[tt] will ensure that",
236         "the cells can scale down by at least this factor. This option is used",
237         "for the automated spatial decomposition (when not using [TT]-dd[tt])",
238         "as well as for determining the number of grid pulses, which in turn",
239         "sets the minimum allowed cell size. Under certain circumstances",
240         "the value of [TT]-dds[tt] might need to be adjusted to account for",
241         "high or low spatial inhomogeneity of the system.",
242         "[PAR]",
243         "The option [TT]-gcom[tt] can be used to only do global communication",
244         "every n steps.",
245         "This can improve performance for highly parallel simulations",
246         "where this global communication step becomes the bottleneck.",
247         "For a global thermostat and/or barostat the temperature",
248         "and/or pressure will also only be updated every [TT]-gcom[tt] steps.",
249         "By default it is set to the minimum of nstcalcenergy and nstlist.[PAR]",
250         "With [TT]-rerun[tt] an input trajectory can be given for which ",
251         "forces and energies will be (re)calculated. Neighbor searching will be",
252         "performed for every frame, unless [TT]nstlist[tt] is zero",
253         "(see the [TT].mdp[tt] file).[PAR]",
254         "ED (essential dynamics) sampling and/or additional flooding potentials",
255         "are switched on by using the [TT]-ei[tt] flag followed by an [TT].edi[tt]",
256         "file. The [TT].edi[tt] file can be produced with the [TT]make_edi[tt] tool",
257         "or by using options in the essdyn menu of the WHAT IF program.",
258         "[TT]mdrun[tt] produces a [TT].xvg[tt] output file that",
259         "contains projections of positions, velocities and forces onto selected",
260         "eigenvectors.[PAR]",
261         "When user-defined potential functions have been selected in the",
262         "[TT].mdp[tt] file the [TT]-table[tt] option is used to pass [TT]mdrun[tt]",
263         "a formatted table with potential functions. The file is read from",
264         "either the current directory or from the [TT]GMXLIB[tt] directory.",
265         "A number of pre-formatted tables are presented in the [TT]GMXLIB[tt] dir,",
266         "for 6-8, 6-9, 6-10, 6-11, 6-12 Lennard-Jones potentials with",
267         "normal Coulomb.",
268         "When pair interactions are present, a separate table for pair interaction",
269         "functions is read using the [TT]-tablep[tt] option.[PAR]",
270         "When tabulated bonded functions are present in the topology,",
271         "interaction functions are read using the [TT]-tableb[tt] option.",
272         "For each different tabulated interaction type the table file name is",
273         "modified in a different way: before the file extension an underscore is",
274         "appended, then a 'b' for bonds, an 'a' for angles or a 'd' for dihedrals",
275         "and finally the table number of the interaction type.[PAR]",
276         "The options [TT]-px[tt] and [TT]-pf[tt] are used for writing pull COM",
277         "coordinates and forces when pulling is selected",
278         "in the [TT].mdp[tt] file.[PAR]",
279         "With [TT]-multi[tt] or [TT]-multidir[tt], multiple systems can be ",
280         "simulated in parallel.",
281         "As many input files/directories are required as the number of systems. ",
282         "The [TT]-multidir[tt] option takes a list of directories (one for each ",
283         "system) and runs in each of them, using the input/output file names, ",
284         "such as specified by e.g. the [TT]-s[tt] option, relative to these ",
285         "directories.",
286         "With [TT]-multi[tt], the system number is appended to the run input ",
287         "and each output filename, for instance [TT]topol.tpr[tt] becomes",
288         "[TT]topol0.tpr[tt], [TT]topol1.tpr[tt] etc.",
289         "The number of nodes per system is the total number of nodes",
290         "divided by the number of systems.",
291         "One use of this option is for NMR refinement: when distance",
292         "or orientation restraints are present these can be ensemble averaged",
293         "over all the systems.[PAR]",
294         "With [TT]-replex[tt] replica exchange is attempted every given number",
295         "of steps. The number of replicas is set with the [TT]-multi[tt] or ",
296         "[TT]-multidir[tt] option, described above.",
297         "All run input files should use a different coupling temperature,",
298         "the order of the files is not important. The random seed is set with",
299         "[TT]-reseed[tt]. The velocities are scaled and neighbor searching",
300         "is performed after every exchange.[PAR]",
301         "Finally some experimental algorithms can be tested when the",
302         "appropriate options have been given. Currently under",
303         "investigation are: polarizability.",
304         "[PAR]",
305         "The option [TT]-membed[tt] does what used to be g_membed, i.e. embed",
306         "a protein into a membrane. The data file should contain the options",
307         "that where passed to g_membed before. The [TT]-mn[tt] and [TT]-mp[tt]",
308         "both apply to this as well.",
309         "[PAR]",
310         "The option [TT]-pforce[tt] is useful when you suspect a simulation",
311         "crashes due to too large forces. With this option coordinates and",
312         "forces of atoms with a force larger than a certain value will",
313         "be printed to stderr.",
314         "[PAR]",
315         "Checkpoints containing the complete state of the system are written",
316         "at regular intervals (option [TT]-cpt[tt]) to the file [TT]-cpo[tt],",
317         "unless option [TT]-cpt[tt] is set to -1.",
318         "The previous checkpoint is backed up to [TT]state_prev.cpt[tt] to",
319         "make sure that a recent state of the system is always available,",
320         "even when the simulation is terminated while writing a checkpoint.",
321         "With [TT]-cpnum[tt] all checkpoint files are kept and appended",
322         "with the step number.",
323         "A simulation can be continued by reading the full state from file",
324         "with option [TT]-cpi[tt]. This option is intelligent in the way that",
325         "if no checkpoint file is found, Gromacs just assumes a normal run and",
326         "starts from the first step of the [TT].tpr[tt] file. By default the output",
327         "will be appending to the existing output files. The checkpoint file",
328         "contains checksums of all output files, such that you will never",
329         "loose data when some output files are modified, corrupt or removed.",
330         "There are three scenarios with [TT]-cpi[tt]:[PAR]",
331         "[TT]*[tt] no files with matching names are present: new output files are written[PAR]",
332         "[TT]*[tt] all files are present with names and checksums matching those stored",
333         "in the checkpoint file: files are appended[PAR]",
334         "[TT]*[tt] otherwise no files are modified and a fatal error is generated[PAR]",
335         "With [TT]-noappend[tt] new output files are opened and the simulation",
336         "part number is added to all output file names.",
337         "Note that in all cases the checkpoint file itself is not renamed",
338         "and will be overwritten, unless its name does not match",
339         "the [TT]-cpo[tt] option.",
340         "[PAR]",
341         "With checkpointing the output is appended to previously written",
342         "output files, unless [TT]-noappend[tt] is used or none of the previous",
343         "output files are present (except for the checkpoint file).",
344         "The integrity of the files to be appended is verified using checksums",
345         "which are stored in the checkpoint file. This ensures that output can",
346         "not be mixed up or corrupted due to file appending. When only some",
347         "of the previous output files are present, a fatal error is generated",
348         "and no old output files are modified and no new output files are opened.",
349         "The result with appending will be the same as from a single run.",
350         "The contents will be binary identical, unless you use a different number",
351         "of nodes or dynamic load balancing or the FFT library uses optimizations",
352         "through timing.",
353         "[PAR]",
354         "With option [TT]-maxh[tt] a simulation is terminated and a checkpoint",
355         "file is written at the first neighbor search step where the run time",
356         "exceeds [TT]-maxh[tt]*0.99 hours.",
357         "[PAR]",
358         "When [TT]mdrun[tt] receives a TERM signal, it will set nsteps to the current",
359         "step plus one. When [TT]mdrun[tt] receives an INT signal (e.g. when ctrl+C is",
360         "pressed), it will stop after the next neighbor search step ",
361         "(with nstlist=0 at the next step).",
362         "In both cases all the usual output will be written to file.",
363         "When running with MPI, a signal to one of the [TT]mdrun[tt] processes",
364         "is sufficient, this signal should not be sent to mpirun or",
365         "the [TT]mdrun[tt] process that is the parent of the others.",
366         "[PAR]",
367         "When [TT]mdrun[tt] is started with MPI, it does not run niced by default."
368     };
369     t_commrec    *cr;
370     t_filenm      fnm[] = {
371         { efTPX, NULL,      NULL,       ffREAD },
372         { efTRN, "-o",      NULL,       ffWRITE },
373         { efXTC, "-x",      NULL,       ffOPTWR },
374         { efCPT, "-cpi",    NULL,       ffOPTRD },
375         { efCPT, "-cpo",    NULL,       ffOPTWR },
376         { efSTO, "-c",      "confout",  ffWRITE },
377         { efEDR, "-e",      "ener",     ffWRITE },
378         { efLOG, "-g",      "md",       ffWRITE },
379         { efXVG, "-dhdl",   "dhdl",     ffOPTWR },
380         { efXVG, "-field",  "field",    ffOPTWR },
381         { efXVG, "-table",  "table",    ffOPTRD },
382         { efXVG, "-tabletf", "tabletf",    ffOPTRD },
383         { efXVG, "-tablep", "tablep",   ffOPTRD },
384         { efXVG, "-tableb", "table",    ffOPTRD },
385         { efTRX, "-rerun",  "rerun",    ffOPTRD },
386         { efXVG, "-tpi",    "tpi",      ffOPTWR },
387         { efXVG, "-tpid",   "tpidist",  ffOPTWR },
388         { efEDI, "-ei",     "sam",      ffOPTRD },
389         { efXVG, "-eo",     "edsam",    ffOPTWR },
390         { efXVG, "-devout", "deviatie", ffOPTWR },
391         { efXVG, "-runav",  "runaver",  ffOPTWR },
392         { efXVG, "-px",     "pullx",    ffOPTWR },
393         { efXVG, "-pf",     "pullf",    ffOPTWR },
394         { efXVG, "-ro",     "rotation", ffOPTWR },
395         { efLOG, "-ra",     "rotangles", ffOPTWR },
396         { efLOG, "-rs",     "rotslabs", ffOPTWR },
397         { efLOG, "-rt",     "rottorque", ffOPTWR },
398         { efMTX, "-mtx",    "nm",       ffOPTWR },
399         { efNDX, "-dn",     "dipole",   ffOPTWR },
400         { efRND, "-multidir", NULL,      ffOPTRDMULT},
401         { efDAT, "-membed", "membed",   ffOPTRD },
402         { efTOP, "-mp",     "membed",   ffOPTRD },
403         { efNDX, "-mn",     "membed",   ffOPTRD }
404     };
405 #define NFILE asize(fnm)
406
407     /* Command line options ! */
408     gmx_bool        bPartDec      = FALSE;
409     gmx_bool        bDDBondCheck  = TRUE;
410     gmx_bool        bDDBondComm   = TRUE;
411     gmx_bool        bTunePME      = TRUE;
412     gmx_bool        bTestVerlet   = FALSE;
413     gmx_bool        bVerbose      = FALSE;
414     gmx_bool        bCompact      = TRUE;
415     gmx_bool        bSepPot       = FALSE;
416     gmx_bool        bRerunVSite   = FALSE;
417     gmx_bool        bConfout      = TRUE;
418     gmx_bool        bReproducible = FALSE;
419
420     int             npme          = -1;
421     int             nmultisim     = 0;
422     int             nstglobalcomm = -1;
423     int             repl_ex_nst   = 0;
424     int             repl_ex_seed  = -1;
425     int             repl_ex_nex   = 0;
426     int             nstepout      = 100;
427     int             resetstep     = -1;
428     gmx_large_int_t nsteps        = -2; /* the value -2 means that the mdp option will be used */
429
430     rvec            realddxyz          = {0, 0, 0};
431     const char     *ddno_opt[ddnoNR+1] =
432     { NULL, "interleave", "pp_pme", "cartesian", NULL };
433     const char     *dddlb_opt[] =
434     { NULL, "auto", "no", "yes", NULL };
435     const char     *thread_aff_opt[threadaffNR+1] =
436     { NULL, "auto", "on", "off", NULL };
437     const char     *nbpu_opt[] =
438     { NULL, "auto", "cpu", "gpu", "gpu_cpu", NULL };
439     real            rdd                   = 0.0, rconstr = 0.0, dlb_scale = 0.8, pforce = -1;
440     char           *ddcsx                 = NULL, *ddcsy = NULL, *ddcsz = NULL;
441     real            cpt_period            = 15.0, max_hours = -1;
442     gmx_bool        bAppendFiles          = TRUE;
443     gmx_bool        bKeepAndNumCPT        = FALSE;
444     gmx_bool        bResetCountersHalfWay = FALSE;
445     output_env_t    oenv                  = NULL;
446     const char     *deviceOptions         = "";
447
448     /* Non transparent initialization of a complex gmx_hw_opt_t struct.
449      * But unfortunately we are not allowed to call a function here,
450      * since declarations follow below.
451      */
452     gmx_hw_opt_t    hw_opt = { 0, 0, 0, 0, threadaffSEL, 0, 0,
453                                { NULL, FALSE, 0, NULL } };
454
455     t_pargs         pa[] = {
456
457         { "-pd",      FALSE, etBOOL, {&bPartDec},
458           "Use particle decompostion" },
459         { "-dd",      FALSE, etRVEC, {&realddxyz},
460           "Domain decomposition grid, 0 is optimize" },
461         { "-ddorder", FALSE, etENUM, {ddno_opt},
462           "DD node order" },
463         { "-npme",    FALSE, etINT, {&npme},
464           "Number of separate nodes to be used for PME, -1 is guess" },
465         { "-nt",      FALSE, etINT, {&hw_opt.nthreads_tot},
466           "Total number of threads to start (0 is guess)" },
467         { "-ntmpi",   FALSE, etINT, {&hw_opt.nthreads_tmpi},
468           "Number of thread-MPI threads to start (0 is guess)" },
469         { "-ntomp",   FALSE, etINT, {&hw_opt.nthreads_omp},
470           "Number of OpenMP threads per MPI process/thread to start (0 is guess)" },
471         { "-ntomp_pme", FALSE, etINT, {&hw_opt.nthreads_omp_pme},
472           "Number of OpenMP threads per MPI process/thread to start (0 is -ntomp)" },
473         { "-pin",     FALSE, etENUM, {thread_aff_opt},
474           "Fix threads (or processes) to specific cores" },
475         { "-pinoffset", FALSE, etINT, {&hw_opt.core_pinning_offset},
476           "The starting logical core number for pinning to cores; used to avoid pinning threads from different mdrun instances to the same core" },
477         { "-pinstride", FALSE, etINT, {&hw_opt.core_pinning_stride},
478           "Pinning distance in logical cores for threads, use 0 to minimize the number of threads per physical core" },
479         { "-gpu_id",  FALSE, etSTR, {&hw_opt.gpu_opt.gpu_id},
480           "List of GPU device id-s to use, specifies the per-node PP rank to GPU mapping" },
481         { "-ddcheck", FALSE, etBOOL, {&bDDBondCheck},
482           "Check for all bonded interactions with DD" },
483         { "-ddbondcomm", FALSE, etBOOL, {&bDDBondComm},
484           "HIDDENUse special bonded atom communication when [TT]-rdd[tt] > cut-off" },
485         { "-rdd",     FALSE, etREAL, {&rdd},
486           "The maximum distance for bonded interactions with DD (nm), 0 is determine from initial coordinates" },
487         { "-rcon",    FALSE, etREAL, {&rconstr},
488           "Maximum distance for P-LINCS (nm), 0 is estimate" },
489         { "-dlb",     FALSE, etENUM, {dddlb_opt},
490           "Dynamic load balancing (with DD)" },
491         { "-dds",     FALSE, etREAL, {&dlb_scale},
492           "Minimum allowed dlb scaling of the DD cell size" },
493         { "-ddcsx",   FALSE, etSTR, {&ddcsx},
494           "HIDDENThe DD cell sizes in x" },
495         { "-ddcsy",   FALSE, etSTR, {&ddcsy},
496           "HIDDENThe DD cell sizes in y" },
497         { "-ddcsz",   FALSE, etSTR, {&ddcsz},
498           "HIDDENThe DD cell sizes in z" },
499         { "-gcom",    FALSE, etINT, {&nstglobalcomm},
500           "Global communication frequency" },
501         { "-nb",      FALSE, etENUM, {&nbpu_opt},
502           "Calculate non-bonded interactions on" },
503         { "-tunepme", FALSE, etBOOL, {&bTunePME},
504           "Optimize PME load between PP/PME nodes or GPU/CPU" },
505         { "-testverlet", FALSE, etBOOL, {&bTestVerlet},
506           "Test the Verlet non-bonded scheme" },
507         { "-v",       FALSE, etBOOL, {&bVerbose},
508           "Be loud and noisy" },
509         { "-compact", FALSE, etBOOL, {&bCompact},
510           "Write a compact log file" },
511         { "-seppot",  FALSE, etBOOL, {&bSepPot},
512           "Write separate V and dVdl terms for each interaction type and node to the log file(s)" },
513         { "-pforce",  FALSE, etREAL, {&pforce},
514           "Print all forces larger than this (kJ/mol nm)" },
515         { "-reprod",  FALSE, etBOOL, {&bReproducible},
516           "Try to avoid optimizations that affect binary reproducibility" },
517         { "-cpt",     FALSE, etREAL, {&cpt_period},
518           "Checkpoint interval (minutes)" },
519         { "-cpnum",   FALSE, etBOOL, {&bKeepAndNumCPT},
520           "Keep and number checkpoint files" },
521         { "-append",  FALSE, etBOOL, {&bAppendFiles},
522           "Append to previous output files when continuing from checkpoint instead of adding the simulation part number to all file names" },
523         { "-nsteps",  FALSE, etGMX_LARGE_INT, {&nsteps},
524           "Run this number of steps, overrides .mdp file option" },
525         { "-maxh",   FALSE, etREAL, {&max_hours},
526           "Terminate after 0.99 times this time (hours)" },
527         { "-multi",   FALSE, etINT, {&nmultisim},
528           "Do multiple simulations in parallel" },
529         { "-replex",  FALSE, etINT, {&repl_ex_nst},
530           "Attempt replica exchange periodically with this period (steps)" },
531         { "-nex",  FALSE, etINT, {&repl_ex_nex},
532           "Number of random exchanges to carry out each exchange interval (N^3 is one suggestion).  -nex zero or not specified gives neighbor replica exchange." },
533         { "-reseed",  FALSE, etINT, {&repl_ex_seed},
534           "Seed for replica exchange, -1 is generate a seed" },
535         { "-rerunvsite", FALSE, etBOOL, {&bRerunVSite},
536           "HIDDENRecalculate virtual site coordinates with [TT]-rerun[tt]" },
537         { "-confout", FALSE, etBOOL, {&bConfout},
538           "HIDDENWrite the last configuration with [TT]-c[tt] and force checkpointing at the last step" },
539         { "-stepout", FALSE, etINT, {&nstepout},
540           "HIDDENFrequency of writing the remaining wall clock time for the run" },
541         { "-resetstep", FALSE, etINT, {&resetstep},
542           "HIDDENReset cycle counters after these many time steps" },
543         { "-resethway", FALSE, etBOOL, {&bResetCountersHalfWay},
544           "HIDDENReset the cycle counters after half the number of steps or halfway [TT]-maxh[tt]" }
545     };
546     unsigned long   Flags, PCA_Flags;
547     ivec            ddxyz;
548     int             dd_node_order;
549     gmx_bool        bAddPart;
550     FILE           *fplog, *fpmulti;
551     int             sim_part, sim_part_fn;
552     const char     *part_suffix = ".part";
553     char            suffix[STRLEN];
554     int             rc;
555     char          **multidir = NULL;
556
557
558     cr = init_commrec();
559
560     PCA_Flags = (PCA_CAN_SET_DEFFNM | (MASTER(cr) ? 0 : PCA_QUIET));
561
562     /* Comment this in to do fexist calls only on master
563      * works not with rerun or tables at the moment
564      * also comment out the version of init_forcerec in md.c
565      * with NULL instead of opt2fn
566      */
567     /*
568        if (!MASTER(cr))
569        {
570        PCA_Flags |= PCA_NOT_READ_NODE;
571        }
572      */
573
574     if (!parse_common_args(&argc, argv, PCA_Flags, NFILE, fnm, asize(pa), pa,
575                            asize(desc), desc, 0, NULL, &oenv))
576     {
577         return 0;
578     }
579
580
581     /* we set these early because they might be used in init_multisystem()
582        Note that there is the potential for npme>nnodes until the number of
583        threads is set later on, if there's thread parallelization. That shouldn't
584        lead to problems. */
585     dd_node_order = nenum(ddno_opt);
586     cr->npmenodes = npme;
587
588     hw_opt.thread_affinity = nenum(thread_aff_opt);
589
590     /* now check the -multi and -multidir option */
591     if (opt2bSet("-multidir", NFILE, fnm))
592     {
593         if (nmultisim > 0)
594         {
595             gmx_fatal(FARGS, "mdrun -multi and -multidir options are mutually exclusive.");
596         }
597         nmultisim = opt2fns(&multidir, "-multidir", NFILE, fnm);
598     }
599
600
601     if (repl_ex_nst != 0 && nmultisim < 2)
602     {
603         gmx_fatal(FARGS, "Need at least two replicas for replica exchange (option -multi)");
604     }
605
606     if (repl_ex_nex < 0)
607     {
608         gmx_fatal(FARGS, "Replica exchange number of exchanges needs to be positive");
609     }
610
611     if (nmultisim > 1)
612     {
613 #ifndef GMX_THREAD_MPI
614         gmx_bool bParFn = (multidir == NULL);
615         init_multisystem(cr, nmultisim, multidir, NFILE, fnm, bParFn);
616 #else
617         gmx_fatal(FARGS, "mdrun -multi is not supported with the thread library. "
618                   "Please compile GROMACS with MPI support");
619 #endif
620     }
621
622     bAddPart = !bAppendFiles;
623
624     /* Check if there is ANY checkpoint file available */
625     sim_part    = 1;
626     sim_part_fn = sim_part;
627     if (opt2bSet("-cpi", NFILE, fnm))
628     {
629         if (bSepPot && bAppendFiles)
630         {
631             gmx_fatal(FARGS, "Output file appending is not supported with -seppot");
632         }
633
634         bAppendFiles =
635             read_checkpoint_simulation_part(opt2fn_master("-cpi", NFILE,
636                                                           fnm, cr),
637                                             &sim_part_fn, NULL, cr,
638                                             bAppendFiles, NFILE, fnm,
639                                             part_suffix, &bAddPart);
640         if (sim_part_fn == 0 && MULTIMASTER(cr))
641         {
642             fprintf(stdout, "No previous checkpoint file present, assuming this is a new run.\n");
643         }
644         else
645         {
646             sim_part = sim_part_fn + 1;
647         }
648
649         if (MULTISIM(cr) && MASTER(cr))
650         {
651             if (MULTIMASTER(cr))
652             {
653                 /* Log file is not yet available, so if there's a
654                  * problem we can only write to stderr. */
655                 fpmulti = stderr;
656             }
657             else
658             {
659                 fpmulti = NULL;
660             }
661             check_multi_int(fpmulti, cr->ms, sim_part, "simulation part", TRUE);
662         }
663     }
664     else
665     {
666         bAppendFiles = FALSE;
667     }
668
669     if (!bAppendFiles)
670     {
671         sim_part_fn = sim_part;
672     }
673
674     if (bAddPart)
675     {
676         /* Rename all output files (except checkpoint files) */
677         /* create new part name first (zero-filled) */
678         sprintf(suffix, "%s%04d", part_suffix, sim_part_fn);
679
680         add_suffix_to_output_names(fnm, NFILE, suffix);
681         if (MULTIMASTER(cr))
682         {
683             fprintf(stdout, "Checkpoint file is from part %d, new output files will be suffixed '%s'.\n", sim_part-1, suffix);
684         }
685     }
686
687     Flags = opt2bSet("-rerun", NFILE, fnm) ? MD_RERUN : 0;
688     Flags = Flags | (bSepPot       ? MD_SEPPOT       : 0);
689     Flags = Flags | (bPartDec      ? MD_PARTDEC      : 0);
690     Flags = Flags | (bDDBondCheck  ? MD_DDBONDCHECK  : 0);
691     Flags = Flags | (bDDBondComm   ? MD_DDBONDCOMM   : 0);
692     Flags = Flags | (bTunePME      ? MD_TUNEPME      : 0);
693     Flags = Flags | (bTestVerlet   ? MD_TESTVERLET   : 0);
694     Flags = Flags | (bConfout      ? MD_CONFOUT      : 0);
695     Flags = Flags | (bRerunVSite   ? MD_RERUN_VSITE  : 0);
696     Flags = Flags | (bReproducible ? MD_REPRODUCIBLE : 0);
697     Flags = Flags | (bAppendFiles  ? MD_APPENDFILES  : 0);
698     Flags = Flags | (opt2parg_bSet("-append", asize(pa), pa) ? MD_APPENDFILESSET : 0);
699     Flags = Flags | (bKeepAndNumCPT ? MD_KEEPANDNUMCPT : 0);
700     Flags = Flags | (sim_part > 1    ? MD_STARTFROMCPT : 0);
701     Flags = Flags | (bResetCountersHalfWay ? MD_RESETCOUNTERSHALFWAY : 0);
702
703
704     /* We postpone opening the log file if we are appending, so we can
705        first truncate the old log file and append to the correct position
706        there instead.  */
707     if ((MASTER(cr) || bSepPot) && !bAppendFiles)
708     {
709         gmx_log_open(ftp2fn(efLOG, NFILE, fnm), cr,
710                      !bSepPot, Flags & MD_APPENDFILES, &fplog);
711         please_cite(fplog, "Hess2008b");
712         please_cite(fplog, "Spoel2005a");
713         please_cite(fplog, "Lindahl2001a");
714         please_cite(fplog, "Berendsen95a");
715     }
716     else if (!MASTER(cr) && bSepPot)
717     {
718         gmx_log_open(ftp2fn(efLOG, NFILE, fnm), cr, !bSepPot, Flags, &fplog);
719     }
720     else
721     {
722         fplog = NULL;
723     }
724
725     ddxyz[XX] = (int)(realddxyz[XX] + 0.5);
726     ddxyz[YY] = (int)(realddxyz[YY] + 0.5);
727     ddxyz[ZZ] = (int)(realddxyz[ZZ] + 0.5);
728
729     rc = mdrunner(&hw_opt, fplog, cr, NFILE, fnm, oenv, bVerbose, bCompact,
730                   nstglobalcomm, ddxyz, dd_node_order, rdd, rconstr,
731                   dddlb_opt[0], dlb_scale, ddcsx, ddcsy, ddcsz,
732                   nbpu_opt[0],
733                   nsteps, nstepout, resetstep,
734                   nmultisim, repl_ex_nst, repl_ex_nex, repl_ex_seed,
735                   pforce, cpt_period, max_hours, deviceOptions, Flags);
736
737     /* Log file has to be closed in mdrunner if we are appending to it
738        (fplog not set here) */
739     if (MASTER(cr) && !bAppendFiles)
740     {
741         gmx_log_close(fplog);
742     }
743
744     return rc;
745 }