Decouple update group handling from domain decomposition module
[alexxy/gromacs.git] / src / gromacs / mdrun / runner.cpp
1 /*
2  * This file is part of the GROMACS molecular simulation package.
3  *
4  * Copyright (c) 1991-2000, University of Groningen, The Netherlands.
5  * Copyright (c) 2001-2004, The GROMACS development team.
6  * Copyright (c) 2011-2019,2020,2021, by the GROMACS development team, led by
7  * Mark Abraham, David van der Spoel, Berk Hess, and Erik Lindahl,
8  * and including many others, as listed in the AUTHORS file in the
9  * top-level source directory and at http://www.gromacs.org.
10  *
11  * GROMACS is free software; you can redistribute it and/or
12  * modify it under the terms of the GNU Lesser General Public License
13  * as published by the Free Software Foundation; either version 2.1
14  * of the License, or (at your option) any later version.
15  *
16  * GROMACS is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
19  * Lesser General Public License for more details.
20  *
21  * You should have received a copy of the GNU Lesser General Public
22  * License along with GROMACS; if not, see
23  * http://www.gnu.org/licenses, or write to the Free Software Foundation,
24  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA.
25  *
26  * If you want to redistribute modifications to GROMACS, please
27  * consider that scientific software is very special. Version
28  * control is crucial - bugs must be traceable. We will be happy to
29  * consider code for inclusion in the official distribution, but
30  * derived work must not be called official GROMACS. Details are found
31  * in the README & COPYING files - if they are missing, get the
32  * official version at http://www.gromacs.org.
33  *
34  * To help us fund GROMACS development, we humbly ask that you cite
35  * the research papers on the package. Check out http://www.gromacs.org.
36  */
37 /*! \internal \file
38  *
39  * \brief Implements the MD runner routine calling all integrators.
40  *
41  * \author David van der Spoel <david.vanderspoel@icm.uu.se>
42  * \ingroup module_mdrun
43  */
44 #include "gmxpre.h"
45
46 #include "runner.h"
47
48 #include "config.h"
49
50 #include <cassert>
51 #include <cinttypes>
52 #include <csignal>
53 #include <cstdlib>
54 #include <cstring>
55
56 #include <algorithm>
57 #include <memory>
58
59 #include "gromacs/commandline/filenm.h"
60 #include "gromacs/domdec/builder.h"
61 #include "gromacs/domdec/domdec.h"
62 #include "gromacs/domdec/domdec_struct.h"
63 #include "gromacs/domdec/gpuhaloexchange.h"
64 #include "gromacs/domdec/localatomsetmanager.h"
65 #include "gromacs/domdec/partition.h"
66 #include "gromacs/ewald/ewald_utils.h"
67 #include "gromacs/ewald/pme.h"
68 #include "gromacs/ewald/pme_gpu_program.h"
69 #include "gromacs/ewald/pme_only.h"
70 #include "gromacs/ewald/pme_pp_comm_gpu.h"
71 #include "gromacs/fileio/checkpoint.h"
72 #include "gromacs/fileio/gmxfio.h"
73 #include "gromacs/fileio/oenv.h"
74 #include "gromacs/fileio/tpxio.h"
75 #include "gromacs/gmxlib/network.h"
76 #include "gromacs/gmxlib/nrnb.h"
77 #include "gromacs/gpu_utils/device_stream_manager.h"
78 #include "gromacs/hardware/cpuinfo.h"
79 #include "gromacs/hardware/detecthardware.h"
80 #include "gromacs/hardware/device_management.h"
81 #include "gromacs/hardware/hardwaretopology.h"
82 #include "gromacs/hardware/printhardware.h"
83 #include "gromacs/imd/imd.h"
84 #include "gromacs/listed_forces/disre.h"
85 #include "gromacs/listed_forces/gpubonded.h"
86 #include "gromacs/listed_forces/listed_forces.h"
87 #include "gromacs/listed_forces/orires.h"
88 #include "gromacs/math/functions.h"
89 #include "gromacs/math/utilities.h"
90 #include "gromacs/math/vec.h"
91 #include "gromacs/mdlib/boxdeformation.h"
92 #include "gromacs/mdlib/broadcaststructs.h"
93 #include "gromacs/mdlib/calc_verletbuf.h"
94 #include "gromacs/mdlib/dispersioncorrection.h"
95 #include "gromacs/mdlib/enerdata_utils.h"
96 #include "gromacs/mdlib/force.h"
97 #include "gromacs/mdlib/forcerec.h"
98 #include "gromacs/mdlib/gmx_omp_nthreads.h"
99 #include "gromacs/mdlib/gpuforcereduction.h"
100 #include "gromacs/mdlib/makeconstraints.h"
101 #include "gromacs/mdlib/md_support.h"
102 #include "gromacs/mdlib/mdatoms.h"
103 #include "gromacs/mdlib/sighandler.h"
104 #include "gromacs/mdlib/stophandler.h"
105 #include "gromacs/mdlib/tgroup.h"
106 #include "gromacs/mdlib/updategroups.h"
107 #include "gromacs/mdlib/vsite.h"
108 #include "gromacs/mdrun/mdmodules.h"
109 #include "gromacs/mdrun/simulationcontext.h"
110 #include "gromacs/mdrun/simulationinput.h"
111 #include "gromacs/mdrun/simulationinputhandle.h"
112 #include "gromacs/mdrunutility/handlerestart.h"
113 #include "gromacs/mdrunutility/logging.h"
114 #include "gromacs/mdrunutility/multisim.h"
115 #include "gromacs/mdrunutility/printtime.h"
116 #include "gromacs/mdrunutility/threadaffinity.h"
117 #include "gromacs/mdtypes/checkpointdata.h"
118 #include "gromacs/mdtypes/commrec.h"
119 #include "gromacs/mdtypes/enerdata.h"
120 #include "gromacs/mdtypes/fcdata.h"
121 #include "gromacs/mdtypes/forcerec.h"
122 #include "gromacs/mdtypes/group.h"
123 #include "gromacs/mdtypes/inputrec.h"
124 #include "gromacs/mdtypes/interaction_const.h"
125 #include "gromacs/mdtypes/md_enums.h"
126 #include "gromacs/mdtypes/mdatom.h"
127 #include "gromacs/mdtypes/mdrunoptions.h"
128 #include "gromacs/mdtypes/observableshistory.h"
129 #include "gromacs/mdtypes/simulation_workload.h"
130 #include "gromacs/mdtypes/state.h"
131 #include "gromacs/mdtypes/state_propagator_data_gpu.h"
132 #include "gromacs/modularsimulator/modularsimulator.h"
133 #include "gromacs/nbnxm/gpu_data_mgmt.h"
134 #include "gromacs/nbnxm/nbnxm.h"
135 #include "gromacs/nbnxm/pairlist_tuning.h"
136 #include "gromacs/pbcutil/pbc.h"
137 #include "gromacs/pulling/output.h"
138 #include "gromacs/pulling/pull.h"
139 #include "gromacs/pulling/pull_rotation.h"
140 #include "gromacs/restraint/manager.h"
141 #include "gromacs/restraint/restraintmdmodule.h"
142 #include "gromacs/restraint/restraintpotential.h"
143 #include "gromacs/swap/swapcoords.h"
144 #include "gromacs/taskassignment/decidegpuusage.h"
145 #include "gromacs/taskassignment/decidesimulationworkload.h"
146 #include "gromacs/taskassignment/resourcedivision.h"
147 #include "gromacs/taskassignment/taskassignment.h"
148 #include "gromacs/taskassignment/usergpuids.h"
149 #include "gromacs/timing/gpu_timing.h"
150 #include "gromacs/timing/wallcycle.h"
151 #include "gromacs/timing/wallcyclereporting.h"
152 #include "gromacs/topology/mtop_util.h"
153 #include "gromacs/trajectory/trajectoryframe.h"
154 #include "gromacs/utility/basenetwork.h"
155 #include "gromacs/utility/cstringutil.h"
156 #include "gromacs/utility/exceptions.h"
157 #include "gromacs/utility/fatalerror.h"
158 #include "gromacs/utility/filestream.h"
159 #include "gromacs/utility/gmxassert.h"
160 #include "gromacs/utility/gmxmpi.h"
161 #include "gromacs/utility/keyvaluetree.h"
162 #include "gromacs/utility/logger.h"
163 #include "gromacs/utility/loggerbuilder.h"
164 #include "gromacs/utility/mdmodulesnotifiers.h"
165 #include "gromacs/utility/physicalnodecommunicator.h"
166 #include "gromacs/utility/pleasecite.h"
167 #include "gromacs/utility/programcontext.h"
168 #include "gromacs/utility/smalloc.h"
169 #include "gromacs/utility/stringutil.h"
170 #include "gromacs/utility/mpiinfo.h"
171
172 #include "isimulator.h"
173 #include "membedholder.h"
174 #include "replicaexchange.h"
175 #include "simulatorbuilder.h"
176
177 namespace gmx
178 {
179
180
181 /*! \brief Manage any development feature flag variables encountered
182  *
183  * The use of dev features indicated by environment variables is
184  * logged in order to ensure that runs with such features enabled can
185  * be identified from their log and standard output. Any cross
186  * dependencies are also checked, and if unsatisfied, a fatal error
187  * issued.
188  *
189  * Note that some development features overrides are applied already here:
190  * the GPU communication flags are set to false in non-tMPI and non-CUDA builds.
191  *
192  * \param[in]  mdlog                Logger object.
193  * \param[in]  useGpuForNonbonded   True if the nonbonded task is offloaded in this run.
194  * \param[in]  pmeRunMode           The PME run mode for this run
195  * \returns                         The object populated with development feature flags.
196  */
197 static DevelopmentFeatureFlags manageDevelopmentFeatures(const gmx::MDLogger& mdlog,
198                                                          const bool           useGpuForNonbonded,
199                                                          const PmeRunMode     pmeRunMode)
200 {
201     DevelopmentFeatureFlags devFlags;
202
203     // Some builds of GCC 5 give false positive warnings that these
204     // getenv results are ignored when clearly they are used.
205 #pragma GCC diagnostic push
206 #pragma GCC diagnostic ignored "-Wunused-result"
207
208     devFlags.enableGpuBufferOps =
209             GMX_GPU_CUDA && useGpuForNonbonded && (getenv("GMX_USE_GPU_BUFFER_OPS") != nullptr);
210     devFlags.enableGpuHaloExchange = GMX_GPU_CUDA && getenv("GMX_GPU_DD_COMMS") != nullptr;
211     devFlags.forceGpuUpdateDefault = (getenv("GMX_FORCE_UPDATE_DEFAULT_GPU") != nullptr) || GMX_FAHCORE;
212     devFlags.enableGpuPmePPComm = GMX_GPU_CUDA && getenv("GMX_GPU_PME_PP_COMMS") != nullptr;
213
214 #pragma GCC diagnostic pop
215
216     // Direct GPU comm path is being used with CUDA_AWARE_MPI
217     // make sure underlying MPI implementation is CUDA-aware
218     if (!GMX_THREAD_MPI && (devFlags.enableGpuPmePPComm || devFlags.enableGpuHaloExchange))
219     {
220         const bool haveDetectedCudaAwareMpi =
221                 (checkMpiCudaAwareSupport() == CudaAwareMpiStatus::Supported);
222         const bool forceCudaAwareMpi = (getenv("GMX_FORCE_CUDA_AWARE_MPI") != nullptr);
223
224         if (!haveDetectedCudaAwareMpi && forceCudaAwareMpi)
225         {
226             // CUDA-aware support not detected in MPI library but, user has forced it's use
227             GMX_LOG(mdlog.warning)
228                     .asParagraph()
229                     .appendTextFormatted(
230                             "This run has forced use of 'CUDA-aware MPI'. "
231                             "But, GROMACS cannot determine if underlying MPI "
232                             "is CUDA-aware. GROMACS recommends use of latest openMPI version "
233                             "for CUDA-aware support. "
234                             "If you observe failures at runtime, try unsetting "
235                             "GMX_FORCE_CUDA_AWARE_MPI environment variable.");
236         }
237
238         if (haveDetectedCudaAwareMpi || forceCudaAwareMpi)
239         {
240             devFlags.usingCudaAwareMpi = true;
241             GMX_LOG(mdlog.warning)
242                     .asParagraph()
243                     .appendTextFormatted(
244                             "Using CUDA-aware MPI for 'GPU halo exchange' or 'GPU PME-PP "
245                             "communications' feature.");
246         }
247         else
248         {
249             if (devFlags.enableGpuHaloExchange)
250             {
251                 GMX_LOG(mdlog.warning)
252                         .asParagraph()
253                         .appendTextFormatted(
254                                 "GMX_GPU_DD_COMMS environment variable detected, but the 'GPU "
255                                 "halo exchange' feature will not be enabled as GROMACS couldn't "
256                                 "detect CUDA_aware support in underlying MPI implementation.");
257                 devFlags.enableGpuHaloExchange = false;
258             }
259             if (devFlags.enableGpuPmePPComm)
260             {
261                 GMX_LOG(mdlog.warning)
262                         .asParagraph()
263                         .appendText(
264                                 "GMX_GPU_PME_PP_COMMS environment variable detected, but the "
265                                 "'GPU PME-PP communications' feature will not be enabled as "
266                                 "GROMACS couldn't "
267                                 "detect CUDA_aware support in underlying MPI implementation.");
268                 devFlags.enableGpuPmePPComm = false;
269             }
270
271             GMX_LOG(mdlog.warning)
272                     .asParagraph()
273                     .appendTextFormatted(
274                             "GROMACS recommends use of latest OpenMPI version for CUDA-aware "
275                             "support. "
276                             "If you are certain about CUDA-aware support in your MPI library, "
277                             "you can force it's use by setting environment variable "
278                             " GMX_FORCE_CUDA_AWARE_MPI.");
279         }
280     }
281
282     if (devFlags.enableGpuBufferOps)
283     {
284         GMX_LOG(mdlog.warning)
285                 .asParagraph()
286                 .appendTextFormatted(
287                         "This run uses the 'GPU buffer ops' feature, enabled by the "
288                         "GMX_USE_GPU_BUFFER_OPS environment variable.");
289     }
290
291     if (devFlags.forceGpuUpdateDefault)
292     {
293         GMX_LOG(mdlog.warning)
294                 .asParagraph()
295                 .appendTextFormatted(
296                         "This run will default to '-update gpu' as requested by the "
297                         "GMX_FORCE_UPDATE_DEFAULT_GPU environment variable. GPU update with domain "
298                         "decomposition lacks substantial testing and should be used with caution.");
299     }
300
301     if (devFlags.enableGpuHaloExchange)
302     {
303         if (useGpuForNonbonded)
304         {
305             if (!devFlags.enableGpuBufferOps)
306             {
307                 GMX_LOG(mdlog.warning)
308                         .asParagraph()
309                         .appendTextFormatted(
310                                 "Enabling GPU buffer operations required by GMX_GPU_DD_COMMS "
311                                 "(equivalent with GMX_USE_GPU_BUFFER_OPS=1).");
312                 devFlags.enableGpuBufferOps = true;
313             }
314             GMX_LOG(mdlog.warning)
315                     .asParagraph()
316                     .appendTextFormatted(
317                             "This run has requested the 'GPU halo exchange' feature, enabled by "
318                             "the "
319                             "GMX_GPU_DD_COMMS environment variable.");
320         }
321         else
322         {
323             GMX_LOG(mdlog.warning)
324                     .asParagraph()
325                     .appendTextFormatted(
326                             "GMX_GPU_DD_COMMS environment variable detected, but the 'GPU "
327                             "halo exchange' feature will not be enabled as nonbonded interactions "
328                             "are not offloaded.");
329             devFlags.enableGpuHaloExchange = false;
330         }
331     }
332
333     if (devFlags.enableGpuPmePPComm)
334     {
335         if (pmeRunMode == PmeRunMode::GPU)
336         {
337             if (!devFlags.enableGpuBufferOps)
338             {
339                 GMX_LOG(mdlog.warning)
340                         .asParagraph()
341                         .appendTextFormatted(
342                                 "Enabling GPU buffer operations required by GMX_GPU_PME_PP_COMMS "
343                                 "(equivalent with GMX_USE_GPU_BUFFER_OPS=1).");
344                 devFlags.enableGpuBufferOps = true;
345             }
346             GMX_LOG(mdlog.warning)
347                     .asParagraph()
348                     .appendTextFormatted(
349                             "This run uses the 'GPU PME-PP communications' feature, enabled "
350                             "by the GMX_GPU_PME_PP_COMMS environment variable.");
351         }
352         else
353         {
354             std::string clarification;
355             if (pmeRunMode == PmeRunMode::Mixed)
356             {
357                 clarification =
358                         "PME FFT and gather are not offloaded to the GPU (PME is running in mixed "
359                         "mode).";
360             }
361             else
362             {
363                 clarification = "PME is not offloaded to the GPU.";
364             }
365             GMX_LOG(mdlog.warning)
366                     .asParagraph()
367                     .appendText(
368                             "GMX_GPU_PME_PP_COMMS environment variable detected, but the "
369                             "'GPU PME-PP communications' feature was not enabled as "
370                             + clarification);
371             devFlags.enableGpuPmePPComm = false;
372         }
373     }
374
375     return devFlags;
376 }
377
378 /*! \brief Barrier for safe simultaneous thread access to mdrunner data
379  *
380  * Used to ensure that the master thread does not modify mdrunner during copy
381  * on the spawned threads. */
382 static void threadMpiMdrunnerAccessBarrier()
383 {
384 #if GMX_THREAD_MPI
385     MPI_Barrier(MPI_COMM_WORLD);
386 #endif
387 }
388
389 Mdrunner Mdrunner::cloneOnSpawnedThread() const
390 {
391     auto newRunner = Mdrunner(std::make_unique<MDModules>());
392
393     // All runners in the same process share a restraint manager resource because it is
394     // part of the interface to the client code, which is associated only with the
395     // original thread. Handles to the same resources can be obtained by copy.
396     {
397         newRunner.restraintManager_ = std::make_unique<RestraintManager>(*restraintManager_);
398     }
399
400     // Copy members of master runner.
401     // \todo Replace with builder when Simulation context and/or runner phases are better defined.
402     // Ref https://gitlab.com/gromacs/gromacs/-/issues/2587 and https://gitlab.com/gromacs/gromacs/-/issues/2375
403     newRunner.hw_opt    = hw_opt;
404     newRunner.filenames = filenames;
405
406     newRunner.hwinfo_         = hwinfo_;
407     newRunner.oenv            = oenv;
408     newRunner.mdrunOptions    = mdrunOptions;
409     newRunner.domdecOptions   = domdecOptions;
410     newRunner.nbpu_opt        = nbpu_opt;
411     newRunner.pme_opt         = pme_opt;
412     newRunner.pme_fft_opt     = pme_fft_opt;
413     newRunner.bonded_opt      = bonded_opt;
414     newRunner.update_opt      = update_opt;
415     newRunner.nstlist_cmdline = nstlist_cmdline;
416     newRunner.replExParams    = replExParams;
417     newRunner.pforce          = pforce;
418     // Give the spawned thread the newly created valid communicator
419     // for the simulation.
420     newRunner.libraryWorldCommunicator = MPI_COMM_WORLD;
421     newRunner.simulationCommunicator   = MPI_COMM_WORLD;
422     newRunner.ms                       = ms;
423     newRunner.startingBehavior         = startingBehavior;
424     newRunner.stopHandlerBuilder_      = std::make_unique<StopHandlerBuilder>(*stopHandlerBuilder_);
425     newRunner.inputHolder_             = inputHolder_;
426
427     threadMpiMdrunnerAccessBarrier();
428
429     return newRunner;
430 }
431
432 /*! \brief The callback used for running on spawned threads.
433  *
434  * Obtains the pointer to the master mdrunner object from the one
435  * argument permitted to the thread-launch API call, copies it to make
436  * a new runner for this thread, reinitializes necessary data, and
437  * proceeds to the simulation. */
438 static void mdrunner_start_fn(const void* arg)
439 {
440     try
441     {
442         const auto* masterMdrunner = reinterpret_cast<const gmx::Mdrunner*>(arg);
443         /* copy the arg list to make sure that it's thread-local. This
444            doesn't copy pointed-to items, of course; fnm, cr and fplog
445            are reset in the call below, all others should be const. */
446         gmx::Mdrunner mdrunner = masterMdrunner->cloneOnSpawnedThread();
447         mdrunner.mdrunner();
448     }
449     GMX_CATCH_ALL_AND_EXIT_WITH_FATAL_ERROR
450 }
451
452
453 void Mdrunner::spawnThreads(int numThreadsToLaunch)
454 {
455 #if GMX_THREAD_MPI
456     /* now spawn new threads that start mdrunner_start_fn(), while
457        the main thread returns. Thread affinity is handled later. */
458     if (tMPI_Init_fn(TRUE, numThreadsToLaunch, TMPI_AFFINITY_NONE, mdrunner_start_fn, static_cast<const void*>(this))
459         != TMPI_SUCCESS)
460     {
461         GMX_THROW(gmx::InternalError("Failed to spawn thread-MPI threads"));
462     }
463
464     // Give the master thread the newly created valid communicator for
465     // the simulation.
466     libraryWorldCommunicator = MPI_COMM_WORLD;
467     simulationCommunicator   = MPI_COMM_WORLD;
468     threadMpiMdrunnerAccessBarrier();
469 #else
470     GMX_UNUSED_VALUE(numThreadsToLaunch);
471     GMX_UNUSED_VALUE(mdrunner_start_fn);
472 #endif
473 }
474
475 } // namespace gmx
476
477 /*! \brief Initialize variables for Verlet scheme simulation */
478 static void prepare_verlet_scheme(FILE*               fplog,
479                                   t_commrec*          cr,
480                                   t_inputrec*         ir,
481                                   int                 nstlist_cmdline,
482                                   const gmx_mtop_t&   mtop,
483                                   const matrix        box,
484                                   bool                makeGpuPairList,
485                                   const gmx::CpuInfo& cpuinfo)
486 {
487     // We checked the cut-offs in grompp, but double-check here.
488     // We have PME+LJcutoff kernels for rcoulomb>rvdw.
489     if (EEL_PME_EWALD(ir->coulombtype) && ir->vdwtype == VanDerWaalsType::Cut)
490     {
491         GMX_RELEASE_ASSERT(ir->rcoulomb >= ir->rvdw,
492                            "With Verlet lists and PME we should have rcoulomb>=rvdw");
493     }
494     else
495     {
496         GMX_RELEASE_ASSERT(ir->rcoulomb == ir->rvdw,
497                            "With Verlet lists and no PME rcoulomb and rvdw should be identical");
498     }
499     /* For NVE simulations, we will retain the initial list buffer */
500     if (EI_DYNAMICS(ir->eI) && ir->verletbuf_tol > 0
501         && !(EI_MD(ir->eI) && ir->etc == TemperatureCoupling::No))
502     {
503         /* Update the Verlet buffer size for the current run setup */
504
505         /* Here we assume SIMD-enabled kernels are being used. But as currently
506          * calc_verlet_buffer_size gives the same results for 4x8 and 4x4
507          * and 4x2 gives a larger buffer than 4x4, this is ok.
508          */
509         ListSetupType listType =
510                 (makeGpuPairList ? ListSetupType::Gpu : ListSetupType::CpuSimdWhenSupported);
511         VerletbufListSetup listSetup = verletbufGetSafeListSetup(listType);
512
513         const real rlist_new =
514                 calcVerletBufferSize(mtop, det(box), *ir, ir->nstlist, ir->nstlist - 1, -1, listSetup);
515
516         if (rlist_new != ir->rlist)
517         {
518             if (fplog != nullptr)
519             {
520                 fprintf(fplog,
521                         "\nChanging rlist from %g to %g for non-bonded %dx%d atom kernels\n\n",
522                         ir->rlist,
523                         rlist_new,
524                         listSetup.cluster_size_i,
525                         listSetup.cluster_size_j);
526             }
527             ir->rlist = rlist_new;
528         }
529     }
530
531     if (nstlist_cmdline > 0 && (!EI_DYNAMICS(ir->eI) || ir->verletbuf_tol <= 0))
532     {
533         gmx_fatal(FARGS,
534                   "Can not set nstlist without %s",
535                   !EI_DYNAMICS(ir->eI) ? "dynamics" : "verlet-buffer-tolerance");
536     }
537
538     if (EI_DYNAMICS(ir->eI))
539     {
540         /* Set or try nstlist values */
541         increaseNstlist(fplog, cr, ir, nstlist_cmdline, &mtop, box, makeGpuPairList, cpuinfo);
542     }
543 }
544
545 /*! \brief Override the nslist value in inputrec
546  *
547  * with value passed on the command line (if any)
548  */
549 static void override_nsteps_cmdline(const gmx::MDLogger& mdlog, int64_t nsteps_cmdline, t_inputrec* ir)
550 {
551     assert(ir);
552
553     /* override with anything else than the default -2 */
554     if (nsteps_cmdline > -2)
555     {
556         char sbuf_steps[STEPSTRSIZE];
557         char sbuf_msg[STRLEN];
558
559         ir->nsteps = nsteps_cmdline;
560         if (EI_DYNAMICS(ir->eI) && nsteps_cmdline != -1)
561         {
562             sprintf(sbuf_msg,
563                     "Overriding nsteps with value passed on the command line: %s steps, %.3g ps",
564                     gmx_step_str(nsteps_cmdline, sbuf_steps),
565                     fabs(nsteps_cmdline * ir->delta_t));
566         }
567         else
568         {
569             sprintf(sbuf_msg,
570                     "Overriding nsteps with value passed on the command line: %s steps",
571                     gmx_step_str(nsteps_cmdline, sbuf_steps));
572         }
573
574         GMX_LOG(mdlog.warning).asParagraph().appendText(sbuf_msg);
575     }
576     else if (nsteps_cmdline < -2)
577     {
578         gmx_fatal(FARGS, "Invalid nsteps value passed on the command line: %" PRId64, nsteps_cmdline);
579     }
580     /* Do nothing if nsteps_cmdline == -2 */
581 }
582
583 namespace gmx
584 {
585
586 /*! \brief Return whether GPU acceleration of nonbondeds is supported with the given settings.
587  *
588  * If not, and if a warning may be issued, logs a warning about
589  * falling back to CPU code. With thread-MPI, only the first
590  * call to this function should have \c issueWarning true. */
591 static bool gpuAccelerationOfNonbondedIsUseful(const MDLogger& mdlog, const t_inputrec& ir, bool issueWarning)
592 {
593     bool        gpuIsUseful = true;
594     std::string warning;
595
596     if (ir.opts.ngener - ir.nwall > 1)
597     {
598         /* The GPU code does not support more than one energy group.
599          * If the user requested GPUs explicitly, a fatal error is given later.
600          */
601         gpuIsUseful = false;
602         warning =
603                 "Multiple energy groups is not implemented for GPUs, falling back to the CPU. "
604                 "For better performance, run on the GPU without energy groups and then do "
605                 "gmx mdrun -rerun option on the trajectory with an energy group .tpr file.";
606     }
607
608     if (EI_TPI(ir.eI))
609     {
610         gpuIsUseful = false;
611         warning     = "TPI is not implemented for GPUs.";
612     }
613
614     if (!gpuIsUseful && issueWarning)
615     {
616         GMX_LOG(mdlog.warning).asParagraph().appendText(warning);
617     }
618
619     return gpuIsUseful;
620 }
621
622 //! Initializes the logger for mdrun.
623 static gmx::LoggerOwner buildLogger(FILE* fplog, const bool isSimulationMasterRank)
624 {
625     gmx::LoggerBuilder builder;
626     if (fplog != nullptr)
627     {
628         builder.addTargetFile(gmx::MDLogger::LogLevel::Info, fplog);
629     }
630     if (isSimulationMasterRank)
631     {
632         builder.addTargetStream(gmx::MDLogger::LogLevel::Warning, &gmx::TextOutputFile::standardError());
633     }
634     return builder.build();
635 }
636
637 //! Make a TaskTarget from an mdrun argument string.
638 static TaskTarget findTaskTarget(const char* optionString)
639 {
640     TaskTarget returnValue = TaskTarget::Auto;
641
642     if (strncmp(optionString, "auto", 3) == 0)
643     {
644         returnValue = TaskTarget::Auto;
645     }
646     else if (strncmp(optionString, "cpu", 3) == 0)
647     {
648         returnValue = TaskTarget::Cpu;
649     }
650     else if (strncmp(optionString, "gpu", 3) == 0)
651     {
652         returnValue = TaskTarget::Gpu;
653     }
654     else
655     {
656         GMX_ASSERT(false, "Option string should have been checked for sanity already");
657     }
658
659     return returnValue;
660 }
661
662 //! Finish run, aggregate data to print performance info.
663 static void finish_run(FILE*                     fplog,
664                        const gmx::MDLogger&      mdlog,
665                        const t_commrec*          cr,
666                        const t_inputrec&         inputrec,
667                        t_nrnb                    nrnb[],
668                        gmx_wallcycle*            wcycle,
669                        gmx_walltime_accounting_t walltime_accounting,
670                        nonbonded_verlet_t*       nbv,
671                        const gmx_pme_t*          pme,
672                        gmx_bool                  bWriteStat)
673 {
674     double delta_t = 0;
675     double nbfs = 0, mflop = 0;
676     double elapsed_time, elapsed_time_over_all_ranks, elapsed_time_over_all_threads,
677             elapsed_time_over_all_threads_over_all_ranks;
678     /* Control whether it is valid to print a report. Only the
679        simulation master may print, but it should not do so if the run
680        terminated e.g. before a scheduled reset step. This is
681        complicated by the fact that PME ranks are unaware of the
682        reason why they were sent a pmerecvqxFINISH. To avoid
683        communication deadlocks, we always do the communication for the
684        report, even if we've decided not to write the report, because
685        how long it takes to finish the run is not important when we've
686        decided not to report on the simulation performance.
687
688        Further, we only report performance for dynamical integrators,
689        because those are the only ones for which we plan to
690        consider doing any optimizations. */
691     bool printReport = EI_DYNAMICS(inputrec.eI) && SIMMASTER(cr);
692
693     if (printReport && !walltime_accounting_get_valid_finish(walltime_accounting))
694     {
695         GMX_LOG(mdlog.warning)
696                 .asParagraph()
697                 .appendText("Simulation ended prematurely, no performance report will be written.");
698         printReport = false;
699     }
700
701     t_nrnb*                 nrnb_tot;
702     std::unique_ptr<t_nrnb> nrnbTotalStorage;
703     if (cr->nnodes > 1)
704     {
705         nrnbTotalStorage = std::make_unique<t_nrnb>();
706         nrnb_tot         = nrnbTotalStorage.get();
707 #if GMX_MPI
708         MPI_Allreduce(nrnb->n.data(), nrnb_tot->n.data(), eNRNB, MPI_DOUBLE, MPI_SUM, cr->mpi_comm_mysim);
709 #endif
710     }
711     else
712     {
713         nrnb_tot = nrnb;
714     }
715
716     elapsed_time = walltime_accounting_get_time_since_reset(walltime_accounting);
717     elapsed_time_over_all_threads =
718             walltime_accounting_get_time_since_reset_over_all_threads(walltime_accounting);
719     if (cr->nnodes > 1)
720     {
721 #if GMX_MPI
722         /* reduce elapsed_time over all MPI ranks in the current simulation */
723         MPI_Allreduce(&elapsed_time, &elapsed_time_over_all_ranks, 1, MPI_DOUBLE, MPI_SUM, cr->mpi_comm_mysim);
724         elapsed_time_over_all_ranks /= cr->nnodes;
725         /* Reduce elapsed_time_over_all_threads over all MPI ranks in the
726          * current simulation. */
727         MPI_Allreduce(&elapsed_time_over_all_threads,
728                       &elapsed_time_over_all_threads_over_all_ranks,
729                       1,
730                       MPI_DOUBLE,
731                       MPI_SUM,
732                       cr->mpi_comm_mysim);
733 #endif
734     }
735     else
736     {
737         elapsed_time_over_all_ranks                  = elapsed_time;
738         elapsed_time_over_all_threads_over_all_ranks = elapsed_time_over_all_threads;
739     }
740
741     if (printReport)
742     {
743         print_flop(fplog, nrnb_tot, &nbfs, &mflop);
744     }
745
746     if (thisRankHasDuty(cr, DUTY_PP) && DOMAINDECOMP(cr))
747     {
748         print_dd_statistics(cr, inputrec, fplog);
749     }
750
751     /* TODO Move the responsibility for any scaling by thread counts
752      * to the code that handled the thread region, so that there's a
753      * mechanism to keep cycle counting working during the transition
754      * to task parallelism. */
755     int nthreads_pp  = gmx_omp_nthreads_get(ModuleMultiThread::Nonbonded);
756     int nthreads_pme = gmx_omp_nthreads_get(ModuleMultiThread::Pme);
757     wallcycle_scale_by_num_threads(
758             wcycle, thisRankHasDuty(cr, DUTY_PME) && !thisRankHasDuty(cr, DUTY_PP), nthreads_pp, nthreads_pme);
759     auto cycle_sum(wallcycle_sum(cr, wcycle));
760
761     if (printReport)
762     {
763         auto* nbnxn_gpu_timings =
764                 (nbv != nullptr && nbv->useGpu()) ? Nbnxm::gpu_get_timings(nbv->gpu_nbv) : nullptr;
765         gmx_wallclock_gpu_pme_t pme_gpu_timings = {};
766
767         if (pme_gpu_task_enabled(pme))
768         {
769             pme_gpu_get_timings(pme, &pme_gpu_timings);
770         }
771         wallcycle_print(fplog,
772                         mdlog,
773                         cr->nnodes,
774                         cr->npmenodes,
775                         nthreads_pp,
776                         nthreads_pme,
777                         elapsed_time_over_all_ranks,
778                         wcycle,
779                         cycle_sum,
780                         nbnxn_gpu_timings,
781                         &pme_gpu_timings);
782
783         if (EI_DYNAMICS(inputrec.eI))
784         {
785             delta_t = inputrec.delta_t;
786         }
787
788         if (fplog)
789         {
790             print_perf(fplog,
791                        elapsed_time_over_all_threads_over_all_ranks,
792                        elapsed_time_over_all_ranks,
793                        walltime_accounting_get_nsteps_done_since_reset(walltime_accounting),
794                        delta_t,
795                        nbfs,
796                        mflop);
797         }
798         if (bWriteStat)
799         {
800             print_perf(stderr,
801                        elapsed_time_over_all_threads_over_all_ranks,
802                        elapsed_time_over_all_ranks,
803                        walltime_accounting_get_nsteps_done_since_reset(walltime_accounting),
804                        delta_t,
805                        nbfs,
806                        mflop);
807         }
808     }
809 }
810
811 int Mdrunner::mdrunner()
812 {
813     matrix                      box;
814     std::unique_ptr<t_forcerec> fr;
815     real                        ewaldcoeff_q     = 0;
816     real                        ewaldcoeff_lj    = 0;
817     int                         nChargePerturbed = -1, nTypePerturbed = 0;
818     gmx_walltime_accounting_t   walltime_accounting = nullptr;
819     MembedHolder                membedHolder(filenames.size(), filenames.data());
820
821     /* CAUTION: threads may be started later on in this function, so
822        cr doesn't reflect the final parallel state right now */
823     gmx_mtop_t mtop;
824
825     /* TODO: inputrec should tell us whether we use an algorithm, not a file option */
826     const bool doEssentialDynamics = opt2bSet("-ei", filenames.size(), filenames.data());
827     const bool doRerun             = mdrunOptions.rerun;
828
829     // Handle task-assignment related user options.
830     EmulateGpuNonbonded emulateGpuNonbonded =
831             (getenv("GMX_EMULATE_GPU") != nullptr ? EmulateGpuNonbonded::Yes : EmulateGpuNonbonded::No);
832
833     std::vector<int> userGpuTaskAssignment;
834     try
835     {
836         userGpuTaskAssignment = parseUserTaskAssignmentString(hw_opt.userGpuTaskAssignment);
837     }
838     GMX_CATCH_ALL_AND_EXIT_WITH_FATAL_ERROR
839     auto nonbondedTarget = findTaskTarget(nbpu_opt);
840     auto pmeTarget       = findTaskTarget(pme_opt);
841     auto pmeFftTarget    = findTaskTarget(pme_fft_opt);
842     auto bondedTarget    = findTaskTarget(bonded_opt);
843     auto updateTarget    = findTaskTarget(update_opt);
844
845     FILE* fplog = nullptr;
846     // If we are appending, we don't write log output because we need
847     // to check that the old log file matches what the checkpoint file
848     // expects. Otherwise, we should start to write log output now if
849     // there is a file ready for it.
850     if (logFileHandle != nullptr && startingBehavior != StartingBehavior::RestartWithAppending)
851     {
852         fplog = gmx_fio_getfp(logFileHandle);
853     }
854     const bool isSimulationMasterRank = findIsSimulationMasterRank(ms, simulationCommunicator);
855     gmx::LoggerOwner logOwner(buildLogger(fplog, isSimulationMasterRank));
856     gmx::MDLogger    mdlog(logOwner.logger());
857
858     gmx_print_detected_hardware(fplog, isSimulationMasterRank && isMasterSim(ms), mdlog, hwinfo_);
859
860     std::vector<int> availableDevices =
861             makeListOfAvailableDevices(hwinfo_->deviceInfoList, hw_opt.devicesSelectedByUser);
862     const int numAvailableDevices = gmx::ssize(availableDevices);
863
864     // Print citation requests after all software/hardware printing
865     pleaseCiteGromacs(fplog);
866
867     // Note: legacy program logic relies on checking whether these pointers are assigned.
868     // Objects may or may not be allocated later.
869     std::unique_ptr<t_inputrec> inputrec;
870     std::unique_ptr<t_state>    globalState;
871
872     auto partialDeserializedTpr = std::make_unique<PartialDeserializedTprFile>();
873
874     if (isSimulationMasterRank)
875     {
876         // Allocate objects to be initialized by later function calls.
877         /* Only the master rank has the global state */
878         globalState = std::make_unique<t_state>();
879         inputrec    = std::make_unique<t_inputrec>();
880
881         /* Read (nearly) all data required for the simulation
882          * and keep the partly serialized tpr contents to send to other ranks later
883          */
884         applyGlobalSimulationState(
885                 *inputHolder_.get(), partialDeserializedTpr.get(), globalState.get(), inputrec.get(), &mtop);
886     }
887
888     /* Check and update the hardware options for internal consistency */
889     checkAndUpdateHardwareOptions(
890             mdlog, &hw_opt, isSimulationMasterRank, domdecOptions.numPmeRanks, inputrec.get());
891
892     if (GMX_THREAD_MPI && isSimulationMasterRank)
893     {
894         bool useGpuForNonbonded = false;
895         bool useGpuForPme       = false;
896         try
897         {
898             GMX_RELEASE_ASSERT(inputrec != nullptr, "Keep the compiler happy");
899
900             // If the user specified the number of ranks, then we must
901             // respect that, but in default mode, we need to allow for
902             // the number of GPUs to choose the number of ranks.
903             auto canUseGpuForNonbonded = buildSupportsNonbondedOnGpu(nullptr);
904             useGpuForNonbonded         = decideWhetherToUseGpusForNonbondedWithThreadMpi(
905                     nonbondedTarget,
906                     numAvailableDevices > 0,
907                     userGpuTaskAssignment,
908                     emulateGpuNonbonded,
909                     canUseGpuForNonbonded,
910                     gpuAccelerationOfNonbondedIsUseful(mdlog, *inputrec, GMX_THREAD_MPI),
911                     hw_opt.nthreads_tmpi);
912             useGpuForPme = decideWhetherToUseGpusForPmeWithThreadMpi(useGpuForNonbonded,
913                                                                      pmeTarget,
914                                                                      numAvailableDevices,
915                                                                      userGpuTaskAssignment,
916                                                                      *hwinfo_,
917                                                                      *inputrec,
918                                                                      hw_opt.nthreads_tmpi,
919                                                                      domdecOptions.numPmeRanks);
920         }
921         GMX_CATCH_ALL_AND_EXIT_WITH_FATAL_ERROR
922
923         /* Determine how many thread-MPI ranks to start.
924          *
925          * TODO Over-writing the user-supplied value here does
926          * prevent any possible subsequent checks from working
927          * correctly. */
928         hw_opt.nthreads_tmpi = get_nthreads_mpi(hwinfo_,
929                                                 &hw_opt,
930                                                 numAvailableDevices,
931                                                 useGpuForNonbonded,
932                                                 useGpuForPme,
933                                                 inputrec.get(),
934                                                 mtop,
935                                                 mdlog,
936                                                 membedHolder.doMembed());
937
938         // Now start the threads for thread MPI.
939         spawnThreads(hw_opt.nthreads_tmpi);
940         // The spawned threads enter mdrunner() and execution of
941         // master and spawned threads joins at the end of this block.
942     }
943
944     GMX_RELEASE_ASSERT(ms || simulationCommunicator != MPI_COMM_NULL,
945                        "Must have valid communicator unless running a multi-simulation");
946     CommrecHandle crHandle = init_commrec(simulationCommunicator);
947     t_commrec*    cr       = crHandle.get();
948     GMX_RELEASE_ASSERT(cr != nullptr, "Must have valid commrec");
949
950     PhysicalNodeCommunicator physicalNodeComm(libraryWorldCommunicator, gmx_physicalnode_id_hash());
951
952     // If we detected the topology on this system, double-check that it makes sense
953     if (hwinfo_->hardwareTopology->isThisSystem())
954     {
955         hardwareTopologyDoubleCheckDetection(mdlog, *hwinfo_->hardwareTopology);
956     }
957
958     if (PAR(cr))
959     {
960         /* now broadcast everything to the non-master nodes/threads: */
961         if (!isSimulationMasterRank)
962         {
963             // Until now, only the master rank has a non-null pointer.
964             // On non-master ranks, allocate the object that will receive data in the following call.
965             inputrec = std::make_unique<t_inputrec>();
966         }
967         init_parallel(cr->mpiDefaultCommunicator,
968                       MASTER(cr),
969                       inputrec.get(),
970                       &mtop,
971                       partialDeserializedTpr.get());
972     }
973     GMX_RELEASE_ASSERT(inputrec != nullptr, "All ranks should have a valid inputrec now");
974     partialDeserializedTpr.reset(nullptr);
975
976     GMX_RELEASE_ASSERT(
977             !inputrec->useConstantAcceleration,
978             "Linear acceleration has been removed in GROMACS 2022, and was broken for many years "
979             "before that. Use GROMACS 4.5 or earlier if you need this feature.");
980
981     // Now the number of ranks is known to all ranks, and each knows
982     // the inputrec read by the master rank. The ranks can now all run
983     // the task-deciding functions and will agree on the result
984     // without needing to communicate.
985     const bool useDomainDecomposition =
986             (PAR(cr) && !(EI_TPI(inputrec->eI) || inputrec->eI == IntegrationAlgorithm::NM));
987
988     // Note that these variables describe only their own node.
989     //
990     // Note that when bonded interactions run on a GPU they always run
991     // alongside a nonbonded task, so do not influence task assignment
992     // even though they affect the force calculation workload.
993     bool useGpuForNonbonded = false;
994     bool useGpuForPme       = false;
995     bool useGpuForBonded    = false;
996     bool useGpuForUpdate    = false;
997     bool gpusWereDetected   = hwinfo_->ngpu_compatible_tot > 0;
998     try
999     {
1000         // It's possible that there are different numbers of GPUs on
1001         // different nodes, which is the user's responsibility to
1002         // handle. If unsuitable, we will notice that during task
1003         // assignment.
1004         auto canUseGpuForNonbonded = buildSupportsNonbondedOnGpu(nullptr);
1005         useGpuForNonbonded         = decideWhetherToUseGpusForNonbonded(
1006                 nonbondedTarget,
1007                 userGpuTaskAssignment,
1008                 emulateGpuNonbonded,
1009                 canUseGpuForNonbonded,
1010                 gpuAccelerationOfNonbondedIsUseful(mdlog, *inputrec, !GMX_THREAD_MPI),
1011                 gpusWereDetected);
1012         useGpuForPme    = decideWhetherToUseGpusForPme(useGpuForNonbonded,
1013                                                     pmeTarget,
1014                                                     userGpuTaskAssignment,
1015                                                     *hwinfo_,
1016                                                     *inputrec,
1017                                                     cr->sizeOfDefaultCommunicator,
1018                                                     domdecOptions.numPmeRanks,
1019                                                     gpusWereDetected);
1020         useGpuForBonded = decideWhetherToUseGpusForBonded(
1021                 useGpuForNonbonded, useGpuForPme, bondedTarget, *inputrec, mtop, domdecOptions.numPmeRanks, gpusWereDetected);
1022     }
1023     GMX_CATCH_ALL_AND_EXIT_WITH_FATAL_ERROR
1024
1025     const PmeRunMode pmeRunMode = determinePmeRunMode(useGpuForPme, pmeFftTarget, *inputrec);
1026
1027     // Initialize development feature flags that enabled by environment variable
1028     // and report those features that are enabled.
1029     const DevelopmentFeatureFlags devFlags =
1030             manageDevelopmentFeatures(mdlog, useGpuForNonbonded, pmeRunMode);
1031
1032     const bool useModularSimulator = checkUseModularSimulator(false,
1033                                                               inputrec.get(),
1034                                                               doRerun,
1035                                                               mtop,
1036                                                               ms,
1037                                                               replExParams,
1038                                                               nullptr,
1039                                                               doEssentialDynamics,
1040                                                               membedHolder.doMembed());
1041
1042     // Build restraints.
1043     // TODO: hide restraint implementation details from Mdrunner.
1044     // There is nothing unique about restraints at this point as far as the
1045     // Mdrunner is concerned. The Mdrunner should just be getting a sequence of
1046     // factory functions from the SimulationContext on which to call mdModules_->add().
1047     // TODO: capture all restraints into a single RestraintModule, passed to the runner builder.
1048     for (auto&& restraint : restraintManager_->getRestraints())
1049     {
1050         auto module = RestraintMDModule::create(restraint, restraint->sites());
1051         mdModules_->add(std::move(module));
1052     }
1053
1054     // TODO: Error handling
1055     mdModules_->assignOptionsToModules(*inputrec->params, nullptr);
1056     // now that the MDModules know their options, they know which callbacks to sign up to
1057     mdModules_->subscribeToSimulationSetupNotifications();
1058     const auto& setupNotifier = mdModules_->notifiers().simulationSetupNotifier_;
1059
1060     if (inputrec->internalParameters != nullptr)
1061     {
1062         setupNotifier.notify(*inputrec->internalParameters);
1063     }
1064
1065     if (fplog != nullptr)
1066     {
1067         pr_inputrec(fplog, 0, "Input Parameters", inputrec.get(), FALSE);
1068         fprintf(fplog, "\n");
1069     }
1070
1071     if (SIMMASTER(cr))
1072     {
1073         /* In rerun, set velocities to zero if present */
1074         if (doRerun && ((globalState->flags & enumValueToBitMask(StateEntry::V)) != 0))
1075         {
1076             // rerun does not use velocities
1077             GMX_LOG(mdlog.info)
1078                     .asParagraph()
1079                     .appendText(
1080                             "Rerun trajectory contains velocities. Rerun does only evaluate "
1081                             "potential energy and forces. The velocities will be ignored.");
1082             for (int i = 0; i < globalState->natoms; i++)
1083             {
1084                 clear_rvec(globalState->v[i]);
1085             }
1086             globalState->flags &= ~enumValueToBitMask(StateEntry::V);
1087         }
1088
1089         /* now make sure the state is initialized and propagated */
1090         set_state_entries(globalState.get(), inputrec.get(), useModularSimulator);
1091     }
1092
1093     /* NM and TPI parallelize over force/energy calculations, not atoms,
1094      * so we need to initialize and broadcast the global state.
1095      */
1096     if (inputrec->eI == IntegrationAlgorithm::NM || inputrec->eI == IntegrationAlgorithm::TPI)
1097     {
1098         if (!MASTER(cr))
1099         {
1100             globalState = std::make_unique<t_state>();
1101         }
1102         broadcastStateWithoutDynamics(
1103                 cr->mpiDefaultCommunicator, DOMAINDECOMP(cr), PAR(cr), globalState.get());
1104     }
1105
1106     /* A parallel command line option consistency check that we can
1107        only do after any threads have started. */
1108     if (!PAR(cr)
1109         && (domdecOptions.numCells[XX] > 1 || domdecOptions.numCells[YY] > 1
1110             || domdecOptions.numCells[ZZ] > 1 || domdecOptions.numPmeRanks > 0))
1111     {
1112         gmx_fatal(FARGS,
1113                   "The -dd or -npme option request a parallel simulation, "
1114 #if !GMX_MPI
1115                   "but %s was compiled without threads or MPI enabled",
1116                   output_env_get_program_display_name(oenv));
1117 #elif GMX_THREAD_MPI
1118                   "but the number of MPI-threads (option -ntmpi) is not set or is 1");
1119 #else
1120                   "but %s was not started through mpirun/mpiexec or only one rank was requested "
1121                   "through mpirun/mpiexec",
1122                   output_env_get_program_display_name(oenv));
1123 #endif
1124     }
1125
1126     if (doRerun && (EI_ENERGY_MINIMIZATION(inputrec->eI) || IntegrationAlgorithm::NM == inputrec->eI))
1127     {
1128         gmx_fatal(FARGS,
1129                   "The .mdp file specified an energy mininization or normal mode algorithm, and "
1130                   "these are not compatible with mdrun -rerun");
1131     }
1132
1133     /* Object for collecting reasons for not using PME-only ranks */
1134     SeparatePmeRanksPermitted separatePmeRanksPermitted;
1135
1136     /* Permit MDModules to notify whether they want to use PME-only ranks */
1137     setupNotifier.notify(&separatePmeRanksPermitted);
1138
1139     /* If simulation is not using PME then disable PME-only ranks */
1140     if (!(EEL_PME(inputrec->coulombtype) || EVDW_PME(inputrec->vdwtype)))
1141     {
1142         separatePmeRanksPermitted.disablePmeRanks(
1143                 "PME-only ranks are requested, but the system does not use PME "
1144                 "for electrostatics or LJ");
1145     }
1146
1147     /* With NB GPUs we don't automatically use PME-only CPU ranks. PME ranks can
1148      * improve performance with many threads per GPU, since our OpenMP
1149      * scaling is bad, but it's difficult to automate the setup.
1150      */
1151     if (useGpuForNonbonded && domdecOptions.numPmeRanks < 0)
1152     {
1153         separatePmeRanksPermitted.disablePmeRanks(
1154                 "PME-only CPU ranks are not automatically used when "
1155                 "non-bonded interactions are computed on GPUs");
1156     }
1157
1158     /* If GPU is used for PME then only 1 PME rank is permitted */
1159     if (useGpuForPme && (domdecOptions.numPmeRanks < 0 || domdecOptions.numPmeRanks > 1))
1160     {
1161         separatePmeRanksPermitted.disablePmeRanks(
1162                 "PME GPU decomposition is not supported. Only one separate PME-only GPU rank "
1163                 "can be used.");
1164     }
1165
1166     /* Disable PME-only ranks if some parts of the code requested so and it's up to GROMACS to decide */
1167     if (!separatePmeRanksPermitted.permitSeparatePmeRanks() && domdecOptions.numPmeRanks < 0)
1168     {
1169         domdecOptions.numPmeRanks = 0;
1170         GMX_LOG(mdlog.info)
1171                 .asParagraph()
1172                 .appendText("Simulation will not use PME-only ranks because: "
1173                             + separatePmeRanksPermitted.reasonsWhyDisabled());
1174     }
1175
1176     /* If some parts of the code could not use PME-only ranks and
1177      * user explicitly used mdrun -npme option then throw an error */
1178     if (!separatePmeRanksPermitted.permitSeparatePmeRanks() && domdecOptions.numPmeRanks > 0)
1179     {
1180         gmx_fatal_collective(FARGS,
1181                              cr->mpiDefaultCommunicator,
1182                              MASTER(cr),
1183                              "Requested -npme %d option is not viable because: %s",
1184                              domdecOptions.numPmeRanks,
1185                              separatePmeRanksPermitted.reasonsWhyDisabled().c_str());
1186     }
1187
1188     /* NMR restraints must be initialized before load_checkpoint,
1189      * since with time averaging the history is added to t_state.
1190      * For proper consistency check we therefore need to extend
1191      * t_state here.
1192      * So the PME-only nodes (if present) will also initialize
1193      * the distance restraints.
1194      */
1195
1196     /* This needs to be called before read_checkpoint to extend the state */
1197     t_disresdata* disresdata;
1198     snew(disresdata, 1);
1199     init_disres(fplog,
1200                 mtop,
1201                 inputrec.get(),
1202                 DisResRunMode::MDRun,
1203                 MASTER(cr) ? DDRole::Master : DDRole::Agent,
1204                 PAR(cr) ? NumRanks::Multiple : NumRanks::Single,
1205                 cr->mpi_comm_mysim,
1206                 ms,
1207                 disresdata,
1208                 globalState.get(),
1209                 replExParams.exchangeInterval > 0);
1210
1211     std::unique_ptr<t_oriresdata> oriresData;
1212     if (gmx_mtop_ftype_count(mtop, F_ORIRES) > 0)
1213     {
1214         oriresData = std::make_unique<t_oriresdata>(fplog, mtop, *inputrec, cr, ms, globalState.get());
1215     }
1216
1217     auto deform = prepareBoxDeformation(globalState != nullptr ? globalState->box : box,
1218                                         MASTER(cr) ? DDRole::Master : DDRole::Agent,
1219                                         PAR(cr) ? NumRanks::Multiple : NumRanks::Single,
1220                                         cr->mpi_comm_mygroup,
1221                                         *inputrec);
1222
1223 #if GMX_FAHCORE
1224     /* We have to remember the generation's first step before reading checkpoint.
1225        This way, we can report to the F@H core both the generation's first step
1226        and the restored first step, thus making it able to distinguish between
1227        an interruption/resume and start of the n-th generation simulation.
1228        Having this information, the F@H core can correctly calculate and report
1229        the progress.
1230      */
1231     int gen_first_step = 0;
1232     if (MASTER(cr))
1233     {
1234         gen_first_step = inputrec->init_step;
1235     }
1236 #endif
1237
1238     ObservablesHistory observablesHistory = {};
1239
1240     auto modularSimulatorCheckpointData = std::make_unique<ReadCheckpointDataHolder>();
1241     if (startingBehavior != StartingBehavior::NewSimulation)
1242     {
1243         /* Check if checkpoint file exists before doing continuation.
1244          * This way we can use identical input options for the first and subsequent runs...
1245          */
1246         if (mdrunOptions.numStepsCommandline > -2)
1247         {
1248             /* Temporarily set the number of steps to unlimited to avoid
1249              * triggering the nsteps check in load_checkpoint().
1250              * This hack will go away soon when the -nsteps option is removed.
1251              */
1252             inputrec->nsteps = -1;
1253         }
1254
1255         // Finish applying initial simulation state information from external sources on all ranks.
1256         // Reconcile checkpoint file data with Mdrunner state established up to this point.
1257         applyLocalState(*inputHolder_.get(),
1258                         logFileHandle,
1259                         cr,
1260                         domdecOptions.numCells,
1261                         inputrec.get(),
1262                         globalState.get(),
1263                         &observablesHistory,
1264                         mdrunOptions.reproducible,
1265                         mdModules_->notifiers(),
1266                         modularSimulatorCheckpointData.get(),
1267                         useModularSimulator);
1268         // TODO: (#3652) Synchronize filesystem state, SimulationInput contents, and program
1269         //  invariants
1270         //  on all code paths.
1271         // Write checkpoint or provide hook to update SimulationInput.
1272         // If there was a checkpoint file, SimulationInput contains more information
1273         // than if there wasn't. At this point, we have synchronized the in-memory
1274         // state with the filesystem state only for restarted simulations. We should
1275         // be calling applyLocalState unconditionally and expect that the completeness
1276         // of SimulationInput is not dependent on its creation method.
1277
1278         if (startingBehavior == StartingBehavior::RestartWithAppending && logFileHandle)
1279         {
1280             // Now we can start normal logging to the truncated log file.
1281             fplog = gmx_fio_getfp(logFileHandle);
1282             prepareLogAppending(fplog);
1283             logOwner = buildLogger(fplog, MASTER(cr));
1284             mdlog    = logOwner.logger();
1285         }
1286     }
1287
1288 #if GMX_FAHCORE
1289     if (MASTER(cr))
1290     {
1291         fcRegisterSteps(inputrec->nsteps + inputrec->init_step, gen_first_step);
1292     }
1293 #endif
1294
1295     if (mdrunOptions.numStepsCommandline > -2)
1296     {
1297         GMX_LOG(mdlog.info)
1298                 .asParagraph()
1299                 .appendText(
1300                         "The -nsteps functionality is deprecated, and may be removed in a future "
1301                         "version. "
1302                         "Consider using gmx convert-tpr -nsteps or changing the appropriate .mdp "
1303                         "file field.");
1304     }
1305     /* override nsteps with value set on the commandline */
1306     override_nsteps_cmdline(mdlog, mdrunOptions.numStepsCommandline, inputrec.get());
1307
1308     if (isSimulationMasterRank)
1309     {
1310         copy_mat(globalState->box, box);
1311     }
1312
1313     if (PAR(cr))
1314     {
1315         gmx_bcast(sizeof(box), box, cr->mpiDefaultCommunicator);
1316     }
1317
1318     if (inputrec->cutoff_scheme != CutoffScheme::Verlet)
1319     {
1320         gmx_fatal(FARGS,
1321                   "This group-scheme .tpr file can no longer be run by mdrun. Please update to the "
1322                   "Verlet scheme, or use an earlier version of GROMACS if necessary.");
1323     }
1324     /* Update rlist and nstlist. */
1325     /* Note: prepare_verlet_scheme is calling increaseNstlist(...), which (while attempting to
1326      * increase rlist) tries to check if the newly chosen value fits with the DD scheme. As this is
1327      * run before any DD scheme is set up, this check is never executed. See #3334 for more details.
1328      */
1329     prepare_verlet_scheme(fplog,
1330                           cr,
1331                           inputrec.get(),
1332                           nstlist_cmdline,
1333                           mtop,
1334                           box,
1335                           useGpuForNonbonded || (emulateGpuNonbonded == EmulateGpuNonbonded::Yes),
1336                           *hwinfo_->cpuInfo);
1337
1338     // We need to decide on update groups early, as this affects
1339     // inter-domain communication distances.
1340     auto       updateGroupingsPerMoleculeType = makeUpdateGroupingsPerMoleculeType(mtop);
1341     const real maxUpdateGroupRadius           = computeMaxUpdateGroupRadius(
1342             mtop, updateGroupingsPerMoleculeType, maxReferenceTemperature(*inputrec));
1343     const real   cutoffMargin = std::sqrt(max_cutoff2(inputrec->pbcType, box)) - inputrec->rlist;
1344     UpdateGroups updateGroups = makeUpdateGroups(mdlog,
1345                                                  std::move(updateGroupingsPerMoleculeType),
1346                                                  maxUpdateGroupRadius,
1347                                                  useDomainDecomposition,
1348                                                  systemHasConstraintsOrVsites(mtop),
1349                                                  cutoffMargin);
1350
1351     // This builder is necessary while we have multi-part construction
1352     // of DD. Before DD is constructed, we use the existence of
1353     // the builder object to indicate that further construction of DD
1354     // is needed.
1355     std::unique_ptr<DomainDecompositionBuilder> ddBuilder;
1356     if (useDomainDecomposition)
1357     {
1358         ddBuilder = std::make_unique<DomainDecompositionBuilder>(
1359                 mdlog,
1360                 cr,
1361                 domdecOptions,
1362                 mdrunOptions,
1363                 mtop,
1364                 *inputrec,
1365                 box,
1366                 updateGroups.updateGroupingPerMoleculeType(),
1367                 updateGroups.useUpdateGroups(),
1368                 updateGroups.maxUpdateGroupRadius(),
1369                 positionsFromStatePointer(globalState.get()));
1370     }
1371     else
1372     {
1373         /* PME, if used, is done on all nodes with 1D decomposition */
1374         cr->nnodes     = cr->sizeOfDefaultCommunicator;
1375         cr->sim_nodeid = cr->rankInDefaultCommunicator;
1376         cr->nodeid     = cr->rankInDefaultCommunicator;
1377         cr->npmenodes  = 0;
1378         cr->duty       = (DUTY_PP | DUTY_PME);
1379
1380         if (inputrec->pbcType == PbcType::Screw)
1381         {
1382             gmx_fatal(FARGS, "pbc=screw is only implemented with domain decomposition");
1383         }
1384     }
1385
1386     // Produce the task assignment for this rank - done after DD is constructed
1387     GpuTaskAssignments gpuTaskAssignments = GpuTaskAssignmentsBuilder::build(
1388             availableDevices,
1389             userGpuTaskAssignment,
1390             *hwinfo_,
1391             simulationCommunicator,
1392             physicalNodeComm,
1393             nonbondedTarget,
1394             pmeTarget,
1395             bondedTarget,
1396             updateTarget,
1397             useGpuForNonbonded,
1398             useGpuForPme,
1399             thisRankHasDuty(cr, DUTY_PP),
1400             // TODO cr->duty & DUTY_PME should imply that a PME
1401             // algorithm is active, but currently does not.
1402             EEL_PME(inputrec->coulombtype) && thisRankHasDuty(cr, DUTY_PME));
1403
1404     // Get the device handles for the modules, nullptr when no task is assigned.
1405     int                deviceId   = -1;
1406     DeviceInformation* deviceInfo = gpuTaskAssignments.initDevice(&deviceId);
1407
1408     // timing enabling - TODO put this in gpu_utils (even though generally this is just option handling?)
1409     bool useTiming = true;
1410
1411     if (GMX_GPU_CUDA)
1412     {
1413         /* WARNING: CUDA timings are incorrect with multiple streams.
1414          *          This is the main reason why they are disabled by default.
1415          */
1416         // TODO: Consider turning on by default when we can detect nr of streams.
1417         useTiming = (getenv("GMX_ENABLE_GPU_TIMING") != nullptr);
1418     }
1419     else if (GMX_GPU_OPENCL)
1420     {
1421         useTiming = (getenv("GMX_DISABLE_GPU_TIMING") == nullptr);
1422     }
1423
1424     // TODO Currently this is always built, yet DD partition code
1425     // checks if it is built before using it. Probably it should
1426     // become an MDModule that is made only when another module
1427     // requires it (e.g. pull, CompEl, density fitting), so that we
1428     // don't update the local atom sets unilaterally every step.
1429     LocalAtomSetManager atomSets;
1430     if (ddBuilder)
1431     {
1432         // TODO Pass the GPU streams to ddBuilder to use in buffer
1433         // transfers (e.g. halo exchange)
1434         cr->dd = ddBuilder->build(&atomSets);
1435         // The builder's job is done, so destruct it
1436         ddBuilder.reset(nullptr);
1437         // Note that local state still does not exist yet.
1438     }
1439
1440     // The GPU update is decided here because we need to know whether the constraints or
1441     // SETTLEs can span accross the domain borders (i.e. whether or not update groups are
1442     // defined). This is only known after DD is initialized, hence decision on using GPU
1443     // update is done so late.
1444     try
1445     {
1446         const bool haveFrozenAtoms = inputrecFrozenAtoms(inputrec.get());
1447
1448         useGpuForUpdate = decideWhetherToUseGpuForUpdate(useDomainDecomposition,
1449                                                          updateGroups.useUpdateGroups(),
1450                                                          pmeRunMode,
1451                                                          domdecOptions.numPmeRanks > 0,
1452                                                          useGpuForNonbonded,
1453                                                          updateTarget,
1454                                                          gpusWereDetected,
1455                                                          *inputrec,
1456                                                          mtop,
1457                                                          doEssentialDynamics,
1458                                                          gmx_mtop_ftype_count(mtop, F_ORIRES) > 0,
1459                                                          replExParams.exchangeInterval > 0,
1460                                                          haveFrozenAtoms,
1461                                                          doRerun,
1462                                                          devFlags,
1463                                                          mdlog);
1464     }
1465     GMX_CATCH_ALL_AND_EXIT_WITH_FATAL_ERROR
1466
1467     const bool printHostName = (cr->nnodes > 1);
1468     gpuTaskAssignments.reportGpuUsage(mdlog, printHostName, useGpuForBonded, pmeRunMode, useGpuForUpdate);
1469
1470     const bool disableNonbondedCalculation = (getenv("GMX_NO_NONBONDED") != nullptr);
1471     if (disableNonbondedCalculation)
1472     {
1473         /* turn off non-bonded calculations */
1474         GMX_LOG(mdlog.warning)
1475                 .asParagraph()
1476                 .appendText(
1477                         "Found environment variable GMX_NO_NONBONDED.\n"
1478                         "Disabling nonbonded calculations.");
1479     }
1480
1481     MdrunScheduleWorkload runScheduleWork;
1482
1483     bool useGpuDirectHalo = decideWhetherToUseGpuForHalo(devFlags,
1484                                                          havePPDomainDecomposition(cr),
1485                                                          useGpuForNonbonded,
1486                                                          useModularSimulator,
1487                                                          doRerun,
1488                                                          EI_ENERGY_MINIMIZATION(inputrec->eI));
1489
1490     // Also populates the simulation constant workload description.
1491     runScheduleWork.simulationWork = createSimulationWorkload(*inputrec,
1492                                                               disableNonbondedCalculation,
1493                                                               devFlags,
1494                                                               useGpuForNonbonded,
1495                                                               pmeRunMode,
1496                                                               useGpuForBonded,
1497                                                               useGpuForUpdate,
1498                                                               useGpuDirectHalo);
1499
1500     std::unique_ptr<DeviceStreamManager> deviceStreamManager = nullptr;
1501
1502     if (deviceInfo != nullptr)
1503     {
1504         if (DOMAINDECOMP(cr) && thisRankHasDuty(cr, DUTY_PP))
1505         {
1506             dd_setup_dlb_resource_sharing(cr, deviceId);
1507         }
1508         deviceStreamManager = std::make_unique<DeviceStreamManager>(
1509                 *deviceInfo, havePPDomainDecomposition(cr), runScheduleWork.simulationWork, useTiming);
1510     }
1511
1512     // If the user chose a task assignment, give them some hints
1513     // where appropriate.
1514     if (!userGpuTaskAssignment.empty())
1515     {
1516         gpuTaskAssignments.logPerformanceHints(mdlog, numAvailableDevices);
1517     }
1518
1519     if (PAR(cr))
1520     {
1521         /* After possible communicator splitting in make_dd_communicators.
1522          * we can set up the intra/inter node communication.
1523          */
1524         gmx_setup_nodecomm(fplog, cr);
1525     }
1526
1527 #if GMX_MPI
1528     if (isMultiSim(ms))
1529     {
1530         GMX_LOG(mdlog.warning)
1531                 .asParagraph()
1532                 .appendTextFormatted(
1533                         "This is simulation %d out of %d running as a composite GROMACS\n"
1534                         "multi-simulation job. Setup for this simulation:\n",
1535                         ms->simulationIndex_,
1536                         ms->numSimulations_);
1537     }
1538     GMX_LOG(mdlog.warning)
1539             .appendTextFormatted("Using %d MPI %s\n",
1540                                  cr->nnodes,
1541 #    if GMX_THREAD_MPI
1542                                  cr->nnodes == 1 ? "thread" : "threads"
1543 #    else
1544                                  cr->nnodes == 1 ? "process" : "processes"
1545 #    endif
1546             );
1547     fflush(stderr);
1548 #endif
1549
1550     // If mdrun -pin auto honors any affinity setting that already
1551     // exists. If so, it is nice to provide feedback about whether
1552     // that existing affinity setting was from OpenMP or something
1553     // else, so we run this code both before and after we initialize
1554     // the OpenMP support.
1555     gmx_check_thread_affinity_set(mdlog, &hw_opt, hwinfo_->nthreads_hw_avail, FALSE);
1556     /* Check and update the number of OpenMP threads requested */
1557     checkAndUpdateRequestedNumOpenmpThreads(
1558             &hw_opt, *hwinfo_, cr, ms, physicalNodeComm.size_, pmeRunMode, mtop, *inputrec);
1559
1560     gmx_omp_nthreads_init(mdlog,
1561                           cr,
1562                           hwinfo_->nthreads_hw_avail,
1563                           physicalNodeComm.size_,
1564                           hw_opt.nthreads_omp,
1565                           hw_opt.nthreads_omp_pme,
1566                           !thisRankHasDuty(cr, DUTY_PP));
1567
1568     const bool bEnableFPE = gmxShouldEnableFPExceptions();
1569     // FIXME - reconcile with gmx_feenableexcept() call from CommandLineModuleManager::run()
1570     if (bEnableFPE)
1571     {
1572         gmx_feenableexcept();
1573     }
1574
1575     /* Now that we know the setup is consistent, check for efficiency */
1576     check_resource_division_efficiency(
1577             hwinfo_, gpuTaskAssignments.thisRankHasAnyGpuTask(), mdrunOptions.ntompOptionIsSet, cr, mdlog);
1578
1579     /* getting number of PP/PME threads on this MPI / tMPI rank.
1580        PME: env variable should be read only on one node to make sure it is
1581        identical everywhere;
1582      */
1583     const int numThreadsOnThisRank = thisRankHasDuty(cr, DUTY_PP)
1584                                              ? gmx_omp_nthreads_get(ModuleMultiThread::Nonbonded)
1585                                              : gmx_omp_nthreads_get(ModuleMultiThread::Pme);
1586     checkHardwareOversubscription(
1587             numThreadsOnThisRank, cr->nodeid, *hwinfo_->hardwareTopology, physicalNodeComm, mdlog);
1588
1589     // Enable Peer access between GPUs where available
1590     // Only for DD, only master PP rank needs to perform setup, and only if thread MPI plus
1591     // any of the GPU communication features are active.
1592     if (DOMAINDECOMP(cr) && MASTER(cr) && thisRankHasDuty(cr, DUTY_PP) && GMX_THREAD_MPI
1593         && (runScheduleWork.simulationWork.useGpuHaloExchange
1594             || runScheduleWork.simulationWork.useGpuPmePpCommunication))
1595     {
1596         setupGpuDevicePeerAccess(gpuTaskAssignments.deviceIdsAssigned(), mdlog);
1597     }
1598
1599     if (hw_opt.threadAffinity != ThreadAffinity::Off)
1600     {
1601         /* Before setting affinity, check whether the affinity has changed
1602          * - which indicates that probably the OpenMP library has changed it
1603          * since we first checked).
1604          */
1605         gmx_check_thread_affinity_set(mdlog, &hw_opt, hwinfo_->nthreads_hw_avail, TRUE);
1606
1607         int numThreadsOnThisNode, intraNodeThreadOffset;
1608         analyzeThreadsOnThisNode(
1609                 physicalNodeComm, numThreadsOnThisRank, &numThreadsOnThisNode, &intraNodeThreadOffset);
1610
1611         /* Set the CPU affinity */
1612         gmx_set_thread_affinity(mdlog,
1613                                 cr,
1614                                 &hw_opt,
1615                                 *hwinfo_->hardwareTopology,
1616                                 numThreadsOnThisRank,
1617                                 numThreadsOnThisNode,
1618                                 intraNodeThreadOffset,
1619                                 nullptr);
1620     }
1621
1622     if (mdrunOptions.timingOptions.resetStep > -1)
1623     {
1624         GMX_LOG(mdlog.info)
1625                 .asParagraph()
1626                 .appendText(
1627                         "The -resetstep functionality is deprecated, and may be removed in a "
1628                         "future version.");
1629     }
1630     std::unique_ptr<gmx_wallcycle> wcycle =
1631             wallcycle_init(fplog, mdrunOptions.timingOptions.resetStep, cr);
1632
1633     if (PAR(cr))
1634     {
1635         /* Master synchronizes its value of reset_counters with all nodes
1636          * including PME only nodes */
1637         int64_t reset_counters = wcycle_get_reset_counters(wcycle.get());
1638         gmx_bcast(sizeof(reset_counters), &reset_counters, cr->mpi_comm_mysim);
1639         wcycle_set_reset_counters(wcycle.get(), reset_counters);
1640     }
1641
1642     // Membrane embedding must be initialized before we call init_forcerec()
1643     membedHolder.initializeMembed(fplog,
1644                                   filenames.size(),
1645                                   filenames.data(),
1646                                   &mtop,
1647                                   inputrec.get(),
1648                                   globalState.get(),
1649                                   cr,
1650                                   &mdrunOptions.checkpointOptions.period);
1651
1652     const bool               thisRankHasPmeGpuTask = gpuTaskAssignments.thisRankHasPmeGpuTask();
1653     std::unique_ptr<MDAtoms> mdAtoms;
1654     std::unique_ptr<VirtualSitesHandler> vsite;
1655     std::unique_ptr<GpuBonded>           gpuBonded;
1656
1657     t_nrnb nrnb;
1658     if (thisRankHasDuty(cr, DUTY_PP))
1659     {
1660         setupNotifier.notify(*cr);
1661         setupNotifier.notify(&atomSets);
1662         setupNotifier.notify(mtop);
1663         setupNotifier.notify(inputrec->pbcType);
1664         setupNotifier.notify(SimulationTimeStep{ inputrec->delta_t });
1665         /* Initiate forcerecord */
1666         fr                 = std::make_unique<t_forcerec>();
1667         fr->forceProviders = mdModules_->initForceProviders();
1668         init_forcerec(fplog,
1669                       mdlog,
1670                       fr.get(),
1671                       *inputrec,
1672                       mtop,
1673                       cr,
1674                       box,
1675                       opt2fn("-table", filenames.size(), filenames.data()),
1676                       opt2fn("-tablep", filenames.size(), filenames.data()),
1677                       opt2fns("-tableb", filenames.size(), filenames.data()),
1678                       pforce);
1679         // Dirty hack, for fixing disres and orires should be made mdmodules
1680         fr->fcdata->disres = disresdata;
1681         fr->fcdata->orires.swap(oriresData);
1682
1683         // Save a handle to device stream manager to use elsewhere in the code
1684         // TODO: Forcerec is not a correct place to store it.
1685         fr->deviceStreamManager = deviceStreamManager.get();
1686
1687         if (runScheduleWork.simulationWork.useGpuPmePpCommunication && !thisRankHasDuty(cr, DUTY_PME))
1688         {
1689             GMX_RELEASE_ASSERT(
1690                     deviceStreamManager != nullptr,
1691                     "GPU device stream manager should be valid in order to use PME-PP direct "
1692                     "communications.");
1693             GMX_RELEASE_ASSERT(
1694                     deviceStreamManager->streamIsValid(DeviceStreamType::PmePpTransfer),
1695                     "GPU PP-PME stream should be valid in order to use GPU PME-PP direct "
1696                     "communications.");
1697             fr->pmePpCommGpu = std::make_unique<gmx::PmePpCommGpu>(
1698                     cr->mpi_comm_mysim,
1699                     cr->dd->pme_nodeid,
1700                     deviceStreamManager->context(),
1701                     deviceStreamManager->stream(DeviceStreamType::PmePpTransfer));
1702         }
1703
1704         fr->nbv = Nbnxm::init_nb_verlet(mdlog,
1705                                         *inputrec,
1706                                         *fr,
1707                                         cr,
1708                                         *hwinfo_,
1709                                         runScheduleWork.simulationWork.useGpuNonbonded,
1710                                         deviceStreamManager.get(),
1711                                         mtop,
1712                                         box,
1713                                         wcycle.get());
1714         // TODO: Move the logic below to a GPU bonded builder
1715         if (runScheduleWork.simulationWork.useGpuBonded)
1716         {
1717             GMX_RELEASE_ASSERT(deviceStreamManager != nullptr,
1718                                "GPU device stream manager should be valid in order to use GPU "
1719                                "version of bonded forces.");
1720             gpuBonded = std::make_unique<GpuBonded>(
1721                     mtop.ffparams,
1722                     fr->ic->epsfac * fr->fudgeQQ,
1723                     deviceStreamManager->context(),
1724                     deviceStreamManager->bondedStream(havePPDomainDecomposition(cr)),
1725                     wcycle.get());
1726             fr->gpuBonded = gpuBonded.get();
1727         }
1728
1729         /* Initialize the mdAtoms structure.
1730          * mdAtoms is not filled with atom data,
1731          * as this can not be done now with domain decomposition.
1732          */
1733         mdAtoms = makeMDAtoms(fplog, mtop, *inputrec, thisRankHasPmeGpuTask);
1734         if (globalState && thisRankHasPmeGpuTask)
1735         {
1736             // The pinning of coordinates in the global state object works, because we only use
1737             // PME on GPU without DD or on a separate PME rank, and because the local state pointer
1738             // points to the global state object without DD.
1739             // FIXME: MD and EM separately set up the local state - this should happen in the same
1740             // function, which should also perform the pinning.
1741             changePinningPolicy(&globalState->x, pme_get_pinning_policy());
1742         }
1743
1744         /* Initialize the virtual site communication */
1745         vsite = makeVirtualSitesHandler(
1746                 mtop, cr, fr->pbcType, updateGroups.updateGroupingPerMoleculeType());
1747
1748         calc_shifts(box, fr->shift_vec);
1749
1750         /* With periodic molecules the charge groups should be whole at start up
1751          * and the virtual sites should not be far from their proper positions.
1752          */
1753         if (!inputrec->bContinuation && MASTER(cr)
1754             && !(inputrec->pbcType != PbcType::No && inputrec->bPeriodicMols))
1755         {
1756             /* Make molecules whole at start of run */
1757             if (fr->pbcType != PbcType::No)
1758             {
1759                 do_pbc_first_mtop(fplog, inputrec->pbcType, box, &mtop, globalState->x.rvec_array());
1760             }
1761             if (vsite)
1762             {
1763                 /* Correct initial vsite positions are required
1764                  * for the initial distribution in the domain decomposition
1765                  * and for the initial shell prediction.
1766                  */
1767                 constructVirtualSitesGlobal(mtop, globalState->x);
1768             }
1769         }
1770         // Make the DD reverse topology, now that any vsites that are present are available
1771         if (DOMAINDECOMP(cr))
1772         {
1773             dd_make_reverse_top(fplog, cr->dd, mtop, vsite.get(), *inputrec, domdecOptions.ddBondedChecking);
1774         }
1775
1776         if (EEL_PME(fr->ic->eeltype) || EVDW_PME(fr->ic->vdwtype))
1777         {
1778             ewaldcoeff_q  = fr->ic->ewaldcoeff_q;
1779             ewaldcoeff_lj = fr->ic->ewaldcoeff_lj;
1780         }
1781     }
1782     else
1783     {
1784         /* This is a PME only node */
1785
1786         GMX_ASSERT(globalState == nullptr,
1787                    "We don't need the state on a PME only rank and expect it to be unitialized");
1788
1789         ewaldcoeff_q  = calc_ewaldcoeff_q(inputrec->rcoulomb, inputrec->ewald_rtol);
1790         ewaldcoeff_lj = calc_ewaldcoeff_lj(inputrec->rvdw, inputrec->ewald_rtol_lj);
1791     }
1792
1793     gmx_pme_t* sepPmeData = nullptr;
1794     // This reference hides the fact that PME data is owned by runner on PME-only ranks and by forcerec on other ranks
1795     GMX_ASSERT(thisRankHasDuty(cr, DUTY_PP) == (fr != nullptr),
1796                "Double-checking that only PME-only ranks have no forcerec");
1797     gmx_pme_t*& pmedata = fr ? fr->pmedata : sepPmeData;
1798
1799     // TODO should live in ewald module once its testing is improved
1800     //
1801     // Later, this program could contain kernels that might be later
1802     // re-used as auto-tuning progresses, or subsequent simulations
1803     // are invoked.
1804     PmeGpuProgramStorage pmeGpuProgram;
1805     if (thisRankHasPmeGpuTask)
1806     {
1807         GMX_RELEASE_ASSERT(
1808                 (deviceStreamManager != nullptr),
1809                 "GPU device stream manager should be initialized in order to use GPU for PME.");
1810         GMX_RELEASE_ASSERT((deviceInfo != nullptr),
1811                            "GPU device should be initialized in order to use GPU for PME.");
1812         pmeGpuProgram = buildPmeGpuProgram(deviceStreamManager->context());
1813     }
1814
1815     /* Initiate PME if necessary,
1816      * either on all nodes or on dedicated PME nodes only. */
1817     if (EEL_PME(inputrec->coulombtype) || EVDW_PME(inputrec->vdwtype))
1818     {
1819         if (mdAtoms && mdAtoms->mdatoms())
1820         {
1821             nChargePerturbed = mdAtoms->mdatoms()->nChargePerturbed;
1822             if (EVDW_PME(inputrec->vdwtype))
1823             {
1824                 nTypePerturbed = mdAtoms->mdatoms()->nTypePerturbed;
1825             }
1826         }
1827         if (cr->npmenodes > 0)
1828         {
1829             /* The PME only nodes need to know nChargePerturbed(FEP on Q) and nTypePerturbed(FEP on LJ)*/
1830             gmx_bcast(sizeof(nChargePerturbed), &nChargePerturbed, cr->mpi_comm_mysim);
1831             gmx_bcast(sizeof(nTypePerturbed), &nTypePerturbed, cr->mpi_comm_mysim);
1832         }
1833
1834         if (thisRankHasDuty(cr, DUTY_PME))
1835         {
1836             try
1837             {
1838                 // TODO: This should be in the builder.
1839                 GMX_RELEASE_ASSERT(!runScheduleWork.simulationWork.useGpuPme
1840                                            || (deviceStreamManager != nullptr),
1841                                    "Device stream manager should be valid in order to use GPU "
1842                                    "version of PME.");
1843                 GMX_RELEASE_ASSERT(
1844                         !runScheduleWork.simulationWork.useGpuPme
1845                                 || deviceStreamManager->streamIsValid(DeviceStreamType::Pme),
1846                         "GPU PME stream should be valid in order to use GPU version of PME.");
1847
1848                 const DeviceContext* deviceContext = runScheduleWork.simulationWork.useGpuPme
1849                                                              ? &deviceStreamManager->context()
1850                                                              : nullptr;
1851                 const DeviceStream*  pmeStream =
1852                         runScheduleWork.simulationWork.useGpuPme
1853                                  ? &deviceStreamManager->stream(DeviceStreamType::Pme)
1854                                  : nullptr;
1855
1856                 pmedata = gmx_pme_init(cr,
1857                                        getNumPmeDomains(cr->dd),
1858                                        inputrec.get(),
1859                                        nChargePerturbed != 0,
1860                                        nTypePerturbed != 0,
1861                                        mdrunOptions.reproducible,
1862                                        ewaldcoeff_q,
1863                                        ewaldcoeff_lj,
1864                                        gmx_omp_nthreads_get(ModuleMultiThread::Pme),
1865                                        pmeRunMode,
1866                                        nullptr,
1867                                        deviceContext,
1868                                        pmeStream,
1869                                        pmeGpuProgram.get(),
1870                                        mdlog);
1871             }
1872             GMX_CATCH_ALL_AND_EXIT_WITH_FATAL_ERROR
1873         }
1874     }
1875
1876
1877     if (EI_DYNAMICS(inputrec->eI))
1878     {
1879         /* Turn on signal handling on all nodes */
1880         /*
1881          * (A user signal from the PME nodes (if any)
1882          * is communicated to the PP nodes.
1883          */
1884         signal_handler_install();
1885     }
1886
1887     pull_t* pull_work = nullptr;
1888     if (thisRankHasDuty(cr, DUTY_PP))
1889     {
1890         /* Assumes uniform use of the number of OpenMP threads */
1891         walltime_accounting = walltime_accounting_init(gmx_omp_nthreads_get(ModuleMultiThread::Default));
1892
1893         if (inputrec->bPull)
1894         {
1895             /* Initialize pull code */
1896             pull_work = init_pull(fplog,
1897                                   inputrec->pull.get(),
1898                                   inputrec.get(),
1899                                   mtop,
1900                                   cr,
1901                                   &atomSets,
1902                                   inputrec->fepvals->init_lambda);
1903             if (inputrec->pull->bXOutAverage || inputrec->pull->bFOutAverage)
1904             {
1905                 initPullHistory(pull_work, &observablesHistory);
1906             }
1907             if (EI_DYNAMICS(inputrec->eI) && MASTER(cr))
1908             {
1909                 init_pull_output_files(pull_work, filenames.size(), filenames.data(), oenv, startingBehavior);
1910             }
1911         }
1912
1913         std::unique_ptr<EnforcedRotation> enforcedRotation;
1914         if (inputrec->bRot)
1915         {
1916             /* Initialize enforced rotation code */
1917             enforcedRotation = init_rot(fplog,
1918                                         inputrec.get(),
1919                                         filenames.size(),
1920                                         filenames.data(),
1921                                         cr,
1922                                         &atomSets,
1923                                         globalState.get(),
1924                                         mtop,
1925                                         oenv,
1926                                         mdrunOptions,
1927                                         startingBehavior);
1928         }
1929
1930         t_swap* swap = nullptr;
1931         if (inputrec->eSwapCoords != SwapType::No)
1932         {
1933             /* Initialize ion swapping code */
1934             swap = init_swapcoords(fplog,
1935                                    inputrec.get(),
1936                                    opt2fn_master("-swap", filenames.size(), filenames.data(), cr),
1937                                    mtop,
1938                                    globalState.get(),
1939                                    &observablesHistory,
1940                                    cr,
1941                                    &atomSets,
1942                                    oenv,
1943                                    mdrunOptions,
1944                                    startingBehavior);
1945         }
1946
1947         /* Let makeConstraints know whether we have essential dynamics constraints. */
1948         auto constr = makeConstraints(mtop,
1949                                       *inputrec,
1950                                       pull_work,
1951                                       doEssentialDynamics,
1952                                       fplog,
1953                                       cr,
1954                                       updateGroups.useUpdateGroups(),
1955                                       ms,
1956                                       &nrnb,
1957                                       wcycle.get(),
1958                                       fr->bMolPBC);
1959
1960         /* Energy terms and groups */
1961         gmx_enerdata_t enerd(mtop.groups.groups[SimulationAtomGroupType::EnergyOutput].size(),
1962                              inputrec->fepvals->n_lambda);
1963
1964         // cos acceleration is only supported by md, but older tpr
1965         // files might still combine it with other integrators
1966         GMX_RELEASE_ASSERT(inputrec->cos_accel == 0.0 || inputrec->eI == IntegrationAlgorithm::MD,
1967                            "cos_acceleration is only supported by integrator=md");
1968
1969         /* Kinetic energy data */
1970         gmx_ekindata_t ekind(inputrec->opts.ngtc,
1971                              inputrec->cos_accel,
1972                              gmx_omp_nthreads_get(ModuleMultiThread::Update));
1973
1974         /* Set up interactive MD (IMD) */
1975         auto imdSession = makeImdSession(inputrec.get(),
1976                                          cr,
1977                                          wcycle.get(),
1978                                          &enerd,
1979                                          ms,
1980                                          mtop,
1981                                          mdlog,
1982                                          MASTER(cr) ? globalState->x : gmx::ArrayRef<gmx::RVec>(),
1983                                          filenames.size(),
1984                                          filenames.data(),
1985                                          oenv,
1986                                          mdrunOptions.imdOptions,
1987                                          startingBehavior);
1988
1989         if (DOMAINDECOMP(cr))
1990         {
1991             GMX_RELEASE_ASSERT(fr, "fr was NULL while cr->duty was DUTY_PP");
1992             /* This call is not included in init_domain_decomposition
1993              * because fr->cginfo_mb is set later.
1994              */
1995             makeBondedLinks(cr->dd, mtop, fr->cginfo_mb);
1996         }
1997
1998         if (runScheduleWork.simulationWork.useGpuBufferOps)
1999         {
2000             fr->gpuForceReduction[gmx::AtomLocality::Local] = std::make_unique<gmx::GpuForceReduction>(
2001                     deviceStreamManager->context(),
2002                     deviceStreamManager->stream(gmx::DeviceStreamType::NonBondedLocal),
2003                     wcycle.get());
2004             fr->gpuForceReduction[gmx::AtomLocality::NonLocal] = std::make_unique<gmx::GpuForceReduction>(
2005                     deviceStreamManager->context(),
2006                     deviceStreamManager->stream(gmx::DeviceStreamType::NonBondedNonLocal),
2007                     wcycle.get());
2008         }
2009
2010         std::unique_ptr<gmx::StatePropagatorDataGpu> stateGpu;
2011         if (gpusWereDetected
2012             && ((runScheduleWork.simulationWork.useGpuPme && thisRankHasDuty(cr, DUTY_PME))
2013                 || runScheduleWork.simulationWork.useGpuBufferOps))
2014         {
2015             GpuApiCallBehavior transferKind =
2016                     (inputrec->eI == IntegrationAlgorithm::MD && !doRerun && !useModularSimulator)
2017                             ? GpuApiCallBehavior::Async
2018                             : GpuApiCallBehavior::Sync;
2019             GMX_RELEASE_ASSERT(deviceStreamManager != nullptr,
2020                                "GPU device stream manager should be initialized to use GPU.");
2021             stateGpu = std::make_unique<gmx::StatePropagatorDataGpu>(
2022                     *deviceStreamManager, transferKind, pme_gpu_get_block_size(fr->pmedata), wcycle.get());
2023             fr->stateGpu = stateGpu.get();
2024         }
2025
2026         GMX_ASSERT(stopHandlerBuilder_, "Runner must provide StopHandlerBuilder to simulator.");
2027         SimulatorBuilder simulatorBuilder;
2028
2029         simulatorBuilder.add(SimulatorStateData(globalState.get(), &observablesHistory, &enerd, &ekind));
2030         simulatorBuilder.add(std::move(membedHolder));
2031         simulatorBuilder.add(std::move(stopHandlerBuilder_));
2032         simulatorBuilder.add(SimulatorConfig(mdrunOptions, startingBehavior, &runScheduleWork));
2033
2034
2035         simulatorBuilder.add(SimulatorEnv(fplog, cr, ms, mdlog, oenv));
2036         simulatorBuilder.add(Profiling(&nrnb, walltime_accounting, wcycle.get()));
2037         simulatorBuilder.add(ConstraintsParam(
2038                 constr.get(), enforcedRotation ? enforcedRotation->getLegacyEnfrot() : nullptr, vsite.get()));
2039         // TODO: Separate `fr` to a separate add, and make the `build` handle the coupling sensibly.
2040         simulatorBuilder.add(LegacyInput(
2041                 static_cast<int>(filenames.size()), filenames.data(), inputrec.get(), fr.get()));
2042         simulatorBuilder.add(ReplicaExchangeParameters(replExParams));
2043         simulatorBuilder.add(InteractiveMD(imdSession.get()));
2044         simulatorBuilder.add(SimulatorModules(mdModules_->outputProvider(), mdModules_->notifiers()));
2045         simulatorBuilder.add(CenterOfMassPulling(pull_work));
2046         // Todo move to an MDModule
2047         simulatorBuilder.add(IonSwapping(swap));
2048         simulatorBuilder.add(TopologyData(mtop, mdAtoms.get()));
2049         simulatorBuilder.add(BoxDeformationHandle(deform.get()));
2050         simulatorBuilder.add(std::move(modularSimulatorCheckpointData));
2051
2052         // build and run simulator object based on user-input
2053         auto simulator = simulatorBuilder.build(useModularSimulator);
2054         simulator->run();
2055
2056         if (fr->pmePpCommGpu)
2057         {
2058             // destroy object since it is no longer required. (This needs to be done while the GPU context still exists.)
2059             fr->pmePpCommGpu.reset();
2060         }
2061
2062         if (inputrec->bPull)
2063         {
2064             finish_pull(pull_work);
2065         }
2066         finish_swapcoords(swap);
2067     }
2068     else
2069     {
2070         GMX_RELEASE_ASSERT(pmedata, "pmedata was NULL while cr->duty was not DUTY_PP");
2071         /* do PME only */
2072         walltime_accounting = walltime_accounting_init(gmx_omp_nthreads_get(ModuleMultiThread::Pme));
2073         gmx_pmeonly(pmedata,
2074                     cr,
2075                     &nrnb,
2076                     wcycle.get(),
2077                     walltime_accounting,
2078                     inputrec.get(),
2079                     pmeRunMode,
2080                     runScheduleWork.simulationWork.useGpuPmePpCommunication,
2081                     deviceStreamManager.get());
2082     }
2083
2084     wallcycle_stop(wcycle.get(), WallCycleCounter::Run);
2085
2086     /* Finish up, write some stuff
2087      * if rerunMD, don't write last frame again
2088      */
2089     finish_run(fplog,
2090                mdlog,
2091                cr,
2092                *inputrec,
2093                &nrnb,
2094                wcycle.get(),
2095                walltime_accounting,
2096                fr ? fr->nbv.get() : nullptr,
2097                pmedata,
2098                EI_DYNAMICS(inputrec->eI) && !isMultiSim(ms));
2099
2100
2101     deviceStreamManager.reset(nullptr);
2102     // Free PME data
2103     if (pmedata)
2104     {
2105         gmx_pme_destroy(pmedata);
2106         pmedata = nullptr;
2107     }
2108
2109     // FIXME: this is only here to manually unpin mdAtoms->chargeA_ and state->x,
2110     // before we destroy the GPU context(s)
2111     // Pinned buffers are associated with contexts in CUDA.
2112     // As soon as we destroy GPU contexts after mdrunner() exits, these lines should go.
2113     mdAtoms.reset(nullptr);
2114     globalState.reset(nullptr);
2115     mdModules_.reset(nullptr); // destruct force providers here as they might also use the GPU
2116     gpuBonded.reset(nullptr);
2117     fr.reset(nullptr); // destruct forcerec before gpu
2118     // TODO convert to C++ so we can get rid of these frees
2119     sfree(disresdata);
2120
2121     if (!hwinfo_->deviceInfoList.empty())
2122     {
2123         /* stop the GPU profiler (only CUDA) */
2124         stopGpuProfiler();
2125     }
2126
2127     /* With tMPI we need to wait for all ranks to finish deallocation before
2128      * destroying the CUDA context as some tMPI ranks may be sharing
2129      * GPU and context.
2130      *
2131      * This is not a concern in OpenCL where we use one context per rank.
2132      *
2133      * Note: it is safe to not call the barrier on the ranks which do not use GPU,
2134      * but it is easier and more futureproof to call it on the whole node.
2135      *
2136      * Note that this function needs to be called even if GPUs are not used
2137      * in this run because the PME ranks have no knowledge of whether GPUs
2138      * are used or not, but all ranks need to enter the barrier below.
2139      * \todo Remove this physical node barrier after making sure
2140      * that it's not needed anymore (with a shared GPU run).
2141      */
2142     if (GMX_THREAD_MPI)
2143     {
2144         physicalNodeComm.barrier();
2145     }
2146
2147     if (!devFlags.usingCudaAwareMpi)
2148     {
2149         // Don't reset GPU in case of CUDA-AWARE MPI
2150         // UCX creates CUDA buffers which are cleaned-up as part of MPI_Finalize()
2151         // resetting the device before MPI_Finalize() results in crashes inside UCX
2152         releaseDevice(deviceInfo);
2153     }
2154
2155     /* Does what it says */
2156     print_date_and_time(fplog, cr->nodeid, "Finished mdrun", gmx_gettime());
2157     walltime_accounting_destroy(walltime_accounting);
2158
2159     // Ensure log file content is written
2160     if (logFileHandle)
2161     {
2162         gmx_fio_flush(logFileHandle);
2163     }
2164
2165     /* Reset FPEs (important for unit tests) by disabling them. Assumes no
2166      * exceptions were enabled before function was called. */
2167     if (bEnableFPE)
2168     {
2169         gmx_fedisableexcept();
2170     }
2171
2172     auto rc = static_cast<int>(gmx_get_stop_condition());
2173
2174 #if GMX_THREAD_MPI
2175     /* we need to join all threads. The sub-threads join when they
2176        exit this function, but the master thread needs to be told to
2177        wait for that. */
2178     if (MASTER(cr))
2179     {
2180         tMPI_Finalize();
2181     }
2182 #endif
2183     return rc;
2184 } // namespace gmx
2185
2186 Mdrunner::~Mdrunner()
2187 {
2188     // Clean up of the Manager.
2189     // This will end up getting called on every thread-MPI rank, which is unnecessary,
2190     // but okay as long as threads synchronize some time before adding or accessing
2191     // a new set of restraints.
2192     if (restraintManager_)
2193     {
2194         restraintManager_->clear();
2195         GMX_ASSERT(restraintManager_->countRestraints() == 0,
2196                    "restraints added during runner life time should be cleared at runner "
2197                    "destruction.");
2198     }
2199 };
2200
2201 void Mdrunner::addPotential(std::shared_ptr<gmx::IRestraintPotential> puller, const std::string& name)
2202 {
2203     GMX_ASSERT(restraintManager_, "Mdrunner must have a restraint manager.");
2204     // Not sure if this should be logged through the md logger or something else,
2205     // but it is helpful to have some sort of INFO level message sent somewhere.
2206     //    std::cout << "Registering restraint named " << name << std::endl;
2207
2208     // When multiple restraints are used, it may be wasteful to register them separately.
2209     // Maybe instead register an entire Restraint Manager as a force provider.
2210     restraintManager_->addToSpec(std::move(puller), name);
2211 }
2212
2213 Mdrunner::Mdrunner(std::unique_ptr<MDModules> mdModules) : mdModules_(std::move(mdModules)) {}
2214
2215 Mdrunner::Mdrunner(Mdrunner&&) noexcept = default;
2216
2217 //NOLINTNEXTLINE(performance-noexcept-move-constructor) working around GCC bug 58265 in CentOS 7
2218 Mdrunner& Mdrunner::operator=(Mdrunner&& /*handle*/) noexcept(BUGFREE_NOEXCEPT_STRING) = default;
2219
2220 class Mdrunner::BuilderImplementation
2221 {
2222 public:
2223     BuilderImplementation() = delete;
2224     BuilderImplementation(std::unique_ptr<MDModules> mdModules, compat::not_null<SimulationContext*> context);
2225     ~BuilderImplementation();
2226
2227     BuilderImplementation& setExtraMdrunOptions(const MdrunOptions& options,
2228                                                 real                forceWarningThreshold,
2229                                                 StartingBehavior    startingBehavior);
2230
2231     void addHardwareDetectionResult(const gmx_hw_info_t* hwinfo);
2232
2233     void addDomdec(const DomdecOptions& options);
2234
2235     void addInput(SimulationInputHandle inputHolder);
2236
2237     void addVerletList(int nstlist);
2238
2239     void addReplicaExchange(const ReplicaExchangeParameters& params);
2240
2241     void addNonBonded(const char* nbpu_opt);
2242
2243     void addPME(const char* pme_opt_, const char* pme_fft_opt_);
2244
2245     void addBondedTaskAssignment(const char* bonded_opt);
2246
2247     void addUpdateTaskAssignment(const char* update_opt);
2248
2249     void addHardwareOptions(const gmx_hw_opt_t& hardwareOptions);
2250
2251     void addFilenames(ArrayRef<const t_filenm> filenames);
2252
2253     void addOutputEnvironment(gmx_output_env_t* outputEnvironment);
2254
2255     void addLogFile(t_fileio* logFileHandle);
2256
2257     void addStopHandlerBuilder(std::unique_ptr<StopHandlerBuilder> builder);
2258
2259     Mdrunner build();
2260
2261 private:
2262     // Default parameters copied from runner.h
2263     // \todo Clarify source(s) of default parameters.
2264
2265     const char* nbpu_opt_    = nullptr;
2266     const char* pme_opt_     = nullptr;
2267     const char* pme_fft_opt_ = nullptr;
2268     const char* bonded_opt_  = nullptr;
2269     const char* update_opt_  = nullptr;
2270
2271     MdrunOptions mdrunOptions_;
2272
2273     DomdecOptions domdecOptions_;
2274
2275     ReplicaExchangeParameters replicaExchangeParameters_;
2276
2277     //! Command-line override for the duration of a neighbor list with the Verlet scheme.
2278     int nstlist_ = 0;
2279
2280     //! World communicator, used for hardware detection and task assignment
2281     MPI_Comm libraryWorldCommunicator_ = MPI_COMM_NULL;
2282
2283     //! Multisim communicator handle.
2284     gmx_multisim_t* multiSimulation_;
2285
2286     //! mdrun communicator
2287     MPI_Comm simulationCommunicator_ = MPI_COMM_NULL;
2288
2289     //! Print a warning if any force is larger than this (in kJ/mol nm).
2290     real forceWarningThreshold_ = -1;
2291
2292     //! Whether the simulation will start afresh, or restart with/without appending.
2293     StartingBehavior startingBehavior_ = StartingBehavior::NewSimulation;
2294
2295     //! The modules that comprise the functionality of mdrun.
2296     std::unique_ptr<MDModules> mdModules_;
2297
2298     //! Detected hardware.
2299     const gmx_hw_info_t* hwinfo_ = nullptr;
2300
2301     //! \brief Parallelism information.
2302     gmx_hw_opt_t hardwareOptions_;
2303
2304     //! filename options for simulation.
2305     ArrayRef<const t_filenm> filenames_;
2306
2307     /*! \brief Handle to output environment.
2308      *
2309      * \todo gmx_output_env_t needs lifetime management.
2310      */
2311     gmx_output_env_t* outputEnvironment_ = nullptr;
2312
2313     /*! \brief Non-owning handle to MD log file.
2314      *
2315      * \todo Context should own output facilities for client.
2316      * \todo Improve log file handle management.
2317      * \internal
2318      * Code managing the FILE* relies on the ability to set it to
2319      * nullptr to check whether the filehandle is valid.
2320      */
2321     t_fileio* logFileHandle_ = nullptr;
2322
2323     /*!
2324      * \brief Builder for simulation stop signal handler.
2325      */
2326     std::unique_ptr<StopHandlerBuilder> stopHandlerBuilder_ = nullptr;
2327
2328     /*!
2329      * \brief Sources for initial simulation state.
2330      *
2331      * See issue #3652 for near-term refinements to the SimulationInput interface.
2332      *
2333      * See issue #3379 for broader discussion on API aspects of simulation inputs and outputs.
2334      */
2335     SimulationInputHandle inputHolder_;
2336 };
2337
2338 Mdrunner::BuilderImplementation::BuilderImplementation(std::unique_ptr<MDModules> mdModules,
2339                                                        compat::not_null<SimulationContext*> context) :
2340     mdModules_(std::move(mdModules))
2341 {
2342     libraryWorldCommunicator_ = context->libraryWorldCommunicator_;
2343     simulationCommunicator_   = context->simulationCommunicator_;
2344     multiSimulation_          = context->multiSimulation_.get();
2345 }
2346
2347 Mdrunner::BuilderImplementation::~BuilderImplementation() = default;
2348
2349 Mdrunner::BuilderImplementation&
2350 Mdrunner::BuilderImplementation::setExtraMdrunOptions(const MdrunOptions&    options,
2351                                                       const real             forceWarningThreshold,
2352                                                       const StartingBehavior startingBehavior)
2353 {
2354     mdrunOptions_          = options;
2355     forceWarningThreshold_ = forceWarningThreshold;
2356     startingBehavior_      = startingBehavior;
2357     return *this;
2358 }
2359
2360 void Mdrunner::BuilderImplementation::addDomdec(const DomdecOptions& options)
2361 {
2362     domdecOptions_ = options;
2363 }
2364
2365 void Mdrunner::BuilderImplementation::addVerletList(int nstlist)
2366 {
2367     nstlist_ = nstlist;
2368 }
2369
2370 void Mdrunner::BuilderImplementation::addReplicaExchange(const ReplicaExchangeParameters& params)
2371 {
2372     replicaExchangeParameters_ = params;
2373 }
2374
2375 Mdrunner Mdrunner::BuilderImplementation::build()
2376 {
2377     auto newRunner = Mdrunner(std::move(mdModules_));
2378
2379     newRunner.mdrunOptions     = mdrunOptions_;
2380     newRunner.pforce           = forceWarningThreshold_;
2381     newRunner.startingBehavior = startingBehavior_;
2382     newRunner.domdecOptions    = domdecOptions_;
2383
2384     // \todo determine an invariant to check or confirm that all gmx_hw_opt_t objects are valid
2385     newRunner.hw_opt = hardwareOptions_;
2386
2387     // No invariant to check. This parameter exists to optionally override other behavior.
2388     newRunner.nstlist_cmdline = nstlist_;
2389
2390     newRunner.replExParams = replicaExchangeParameters_;
2391
2392     newRunner.filenames = filenames_;
2393
2394     newRunner.libraryWorldCommunicator = libraryWorldCommunicator_;
2395
2396     newRunner.simulationCommunicator = simulationCommunicator_;
2397
2398     // nullptr is a valid value for the multisim handle
2399     newRunner.ms = multiSimulation_;
2400
2401     if (hwinfo_)
2402     {
2403         newRunner.hwinfo_ = hwinfo_;
2404     }
2405     else
2406     {
2407         GMX_THROW(gmx::APIError(
2408                 "MdrunnerBuilder::addHardwareDetectionResult() is required before build()"));
2409     }
2410
2411     if (inputHolder_)
2412     {
2413         newRunner.inputHolder_ = std::move(inputHolder_);
2414     }
2415     else
2416     {
2417         GMX_THROW(gmx::APIError("MdrunnerBuilder::addInput() is required before build()."));
2418     }
2419
2420     // \todo Clarify ownership and lifetime management for gmx_output_env_t
2421     // \todo Update sanity checking when output environment has clearly specified invariants.
2422     // Initialization and default values for oenv are not well specified in the current version.
2423     if (outputEnvironment_)
2424     {
2425         newRunner.oenv = outputEnvironment_;
2426     }
2427     else
2428     {
2429         GMX_THROW(gmx::APIError(
2430                 "MdrunnerBuilder::addOutputEnvironment() is required before build()"));
2431     }
2432
2433     newRunner.logFileHandle = logFileHandle_;
2434
2435     if (nbpu_opt_)
2436     {
2437         newRunner.nbpu_opt = nbpu_opt_;
2438     }
2439     else
2440     {
2441         GMX_THROW(gmx::APIError("MdrunnerBuilder::addNonBonded() is required before build()"));
2442     }
2443
2444     if (pme_opt_ && pme_fft_opt_)
2445     {
2446         newRunner.pme_opt     = pme_opt_;
2447         newRunner.pme_fft_opt = pme_fft_opt_;
2448     }
2449     else
2450     {
2451         GMX_THROW(gmx::APIError("MdrunnerBuilder::addElectrostatics() is required before build()"));
2452     }
2453
2454     if (bonded_opt_)
2455     {
2456         newRunner.bonded_opt = bonded_opt_;
2457     }
2458     else
2459     {
2460         GMX_THROW(gmx::APIError(
2461                 "MdrunnerBuilder::addBondedTaskAssignment() is required before build()"));
2462     }
2463
2464     if (update_opt_)
2465     {
2466         newRunner.update_opt = update_opt_;
2467     }
2468     else
2469     {
2470         GMX_THROW(gmx::APIError(
2471                 "MdrunnerBuilder::addUpdateTaskAssignment() is required before build()  "));
2472     }
2473
2474
2475     newRunner.restraintManager_ = std::make_unique<gmx::RestraintManager>();
2476
2477     if (stopHandlerBuilder_)
2478     {
2479         newRunner.stopHandlerBuilder_ = std::move(stopHandlerBuilder_);
2480     }
2481     else
2482     {
2483         newRunner.stopHandlerBuilder_ = std::make_unique<StopHandlerBuilder>();
2484     }
2485
2486     return newRunner;
2487 }
2488
2489 void Mdrunner::BuilderImplementation::addHardwareDetectionResult(const gmx_hw_info_t* hwinfo)
2490 {
2491     hwinfo_ = hwinfo;
2492 }
2493
2494 void Mdrunner::BuilderImplementation::addNonBonded(const char* nbpu_opt)
2495 {
2496     nbpu_opt_ = nbpu_opt;
2497 }
2498
2499 void Mdrunner::BuilderImplementation::addPME(const char* pme_opt, const char* pme_fft_opt)
2500 {
2501     pme_opt_     = pme_opt;
2502     pme_fft_opt_ = pme_fft_opt;
2503 }
2504
2505 void Mdrunner::BuilderImplementation::addBondedTaskAssignment(const char* bonded_opt)
2506 {
2507     bonded_opt_ = bonded_opt;
2508 }
2509
2510 void Mdrunner::BuilderImplementation::addUpdateTaskAssignment(const char* update_opt)
2511 {
2512     update_opt_ = update_opt;
2513 }
2514
2515 void Mdrunner::BuilderImplementation::addHardwareOptions(const gmx_hw_opt_t& hardwareOptions)
2516 {
2517     hardwareOptions_ = hardwareOptions;
2518 }
2519
2520 void Mdrunner::BuilderImplementation::addFilenames(ArrayRef<const t_filenm> filenames)
2521 {
2522     filenames_ = filenames;
2523 }
2524
2525 void Mdrunner::BuilderImplementation::addOutputEnvironment(gmx_output_env_t* outputEnvironment)
2526 {
2527     outputEnvironment_ = outputEnvironment;
2528 }
2529
2530 void Mdrunner::BuilderImplementation::addLogFile(t_fileio* logFileHandle)
2531 {
2532     logFileHandle_ = logFileHandle;
2533 }
2534
2535 void Mdrunner::BuilderImplementation::addStopHandlerBuilder(std::unique_ptr<StopHandlerBuilder> builder)
2536 {
2537     stopHandlerBuilder_ = std::move(builder);
2538 }
2539
2540 void Mdrunner::BuilderImplementation::addInput(SimulationInputHandle inputHolder)
2541 {
2542     inputHolder_ = std::move(inputHolder);
2543 }
2544
2545 MdrunnerBuilder::MdrunnerBuilder(std::unique_ptr<MDModules>           mdModules,
2546                                  compat::not_null<SimulationContext*> context) :
2547     impl_{ std::make_unique<Mdrunner::BuilderImplementation>(std::move(mdModules), context) }
2548 {
2549 }
2550
2551 MdrunnerBuilder::~MdrunnerBuilder() = default;
2552
2553 MdrunnerBuilder& MdrunnerBuilder::addHardwareDetectionResult(const gmx_hw_info_t* hwinfo)
2554 {
2555     impl_->addHardwareDetectionResult(hwinfo);
2556     return *this;
2557 }
2558
2559 MdrunnerBuilder& MdrunnerBuilder::addSimulationMethod(const MdrunOptions&    options,
2560                                                       real                   forceWarningThreshold,
2561                                                       const StartingBehavior startingBehavior)
2562 {
2563     impl_->setExtraMdrunOptions(options, forceWarningThreshold, startingBehavior);
2564     return *this;
2565 }
2566
2567 MdrunnerBuilder& MdrunnerBuilder::addDomainDecomposition(const DomdecOptions& options)
2568 {
2569     impl_->addDomdec(options);
2570     return *this;
2571 }
2572
2573 MdrunnerBuilder& MdrunnerBuilder::addNeighborList(int nstlist)
2574 {
2575     impl_->addVerletList(nstlist);
2576     return *this;
2577 }
2578
2579 MdrunnerBuilder& MdrunnerBuilder::addReplicaExchange(const ReplicaExchangeParameters& params)
2580 {
2581     impl_->addReplicaExchange(params);
2582     return *this;
2583 }
2584
2585 MdrunnerBuilder& MdrunnerBuilder::addNonBonded(const char* nbpu_opt)
2586 {
2587     impl_->addNonBonded(nbpu_opt);
2588     return *this;
2589 }
2590
2591 MdrunnerBuilder& MdrunnerBuilder::addElectrostatics(const char* pme_opt, const char* pme_fft_opt)
2592 {
2593     // The builder method may become more general in the future, but in this version,
2594     // parameters for PME electrostatics are both required and the only parameters
2595     // available.
2596     if (pme_opt && pme_fft_opt)
2597     {
2598         impl_->addPME(pme_opt, pme_fft_opt);
2599     }
2600     else
2601     {
2602         GMX_THROW(
2603                 gmx::InvalidInputError("addElectrostatics() arguments must be non-null pointers."));
2604     }
2605     return *this;
2606 }
2607
2608 MdrunnerBuilder& MdrunnerBuilder::addBondedTaskAssignment(const char* bonded_opt)
2609 {
2610     impl_->addBondedTaskAssignment(bonded_opt);
2611     return *this;
2612 }
2613
2614 MdrunnerBuilder& MdrunnerBuilder::addUpdateTaskAssignment(const char* update_opt)
2615 {
2616     impl_->addUpdateTaskAssignment(update_opt);
2617     return *this;
2618 }
2619
2620 Mdrunner MdrunnerBuilder::build()
2621 {
2622     return impl_->build();
2623 }
2624
2625 MdrunnerBuilder& MdrunnerBuilder::addHardwareOptions(const gmx_hw_opt_t& hardwareOptions)
2626 {
2627     impl_->addHardwareOptions(hardwareOptions);
2628     return *this;
2629 }
2630
2631 MdrunnerBuilder& MdrunnerBuilder::addFilenames(ArrayRef<const t_filenm> filenames)
2632 {
2633     impl_->addFilenames(filenames);
2634     return *this;
2635 }
2636
2637 MdrunnerBuilder& MdrunnerBuilder::addOutputEnvironment(gmx_output_env_t* outputEnvironment)
2638 {
2639     impl_->addOutputEnvironment(outputEnvironment);
2640     return *this;
2641 }
2642
2643 MdrunnerBuilder& MdrunnerBuilder::addLogFile(t_fileio* logFileHandle)
2644 {
2645     impl_->addLogFile(logFileHandle);
2646     return *this;
2647 }
2648
2649 MdrunnerBuilder& MdrunnerBuilder::addStopHandlerBuilder(std::unique_ptr<StopHandlerBuilder> builder)
2650 {
2651     impl_->addStopHandlerBuilder(std::move(builder));
2652     return *this;
2653 }
2654
2655 MdrunnerBuilder& MdrunnerBuilder::addInput(SimulationInputHandle input)
2656 {
2657     impl_->addInput(std::move(input));
2658     return *this;
2659 }
2660
2661 MdrunnerBuilder::MdrunnerBuilder(MdrunnerBuilder&&) noexcept = default;
2662
2663 MdrunnerBuilder& MdrunnerBuilder::operator=(MdrunnerBuilder&&) noexcept = default;
2664
2665 } // namespace gmx