Allow runAsMainSingleModule to be called more than once
[alexxy/gromacs.git] / src / gromacs / commandline / cmdlineinit.cpp
1 /*
2  * This file is part of the GROMACS molecular simulation package.
3  *
4  * Copyright (c) 2013,2014, by the GROMACS development team, led by
5  * Mark Abraham, David van der Spoel, Berk Hess, and Erik Lindahl,
6  * and including many others, as listed in the AUTHORS file in the
7  * top-level source directory and at http://www.gromacs.org.
8  *
9  * GROMACS is free software; you can redistribute it and/or
10  * modify it under the terms of the GNU Lesser General Public License
11  * as published by the Free Software Foundation; either version 2.1
12  * of the License, or (at your option) any later version.
13  *
14  * GROMACS is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * Lesser General Public License for more details.
18  *
19  * You should have received a copy of the GNU Lesser General Public
20  * License along with GROMACS; if not, see
21  * http://www.gnu.org/licenses, or write to the Free Software Foundation,
22  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA.
23  *
24  * If you want to redistribute modifications to GROMACS, please
25  * consider that scientific software is very special. Version
26  * control is crucial - bugs must be traceable. We will be happy to
27  * consider code for inclusion in the official distribution, but
28  * derived work must not be called official GROMACS. Details are found
29  * in the README & COPYING files - if they are missing, get the
30  * official version at http://www.gromacs.org.
31  *
32  * To help us fund GROMACS development, we humbly ask that you cite
33  * the research papers on the package. Check out http://www.gromacs.org.
34  */
35 /*! \internal \file
36  * \brief
37  * Implements functions from cmdlineinit.h.
38  *
39  * \author Teemu Murtola <teemu.murtola@gmail.com>
40  * \ingroup module_commandline
41  */
42 #include "gmxpre.h"
43
44 #include "cmdlineinit.h"
45
46 #include "config.h"
47
48 #include <cstring>
49
50 #include <boost/scoped_ptr.hpp>
51
52 #include "gromacs/commandline/cmdlinemodulemanager.h"
53 #include "gromacs/commandline/cmdlineprogramcontext.h"
54 #include "gromacs/legacyheaders/network.h"
55 #include "gromacs/legacyheaders/types/commrec.h"
56 #include "gromacs/utility/exceptions.h"
57 #include "gromacs/utility/gmxassert.h"
58 #include "gromacs/utility/init.h"
59 #include "gromacs/utility/programcontext.h"
60 #include "gromacs/utility/smalloc.h"
61
62 namespace gmx
63 {
64
65 namespace
66 {
67
68 //! \addtogroup module_commandline
69 //! \{
70
71 //! Global context instance initialized in initForCommandLine().
72 boost::scoped_ptr<CommandLineProgramContext> g_commandLineContext;
73
74 #ifdef GMX_LIB_MPI
75 void broadcastArguments(const t_commrec *cr, int *argc, char ***argv)
76 {
77     gmx_bcast(sizeof(*argc), argc, cr);
78
79     if (!MASTER(cr))
80     {
81         snew(*argv, *argc+1);
82     }
83     for (int i = 0; i < *argc; i++)
84     {
85         int len;
86         if (MASTER(cr))
87         {
88             len = std::strlen((*argv)[i])+1;
89         }
90         gmx_bcast(sizeof(len), &len, cr);
91         if (!MASTER(cr))
92         {
93             snew((*argv)[i], len);
94         }
95         gmx_bcast(len, (*argv)[i], cr);
96     }
97 }
98 #endif
99
100 //! \}
101
102 }   // namespace
103
104 CommandLineProgramContext &initForCommandLine(int *argc, char ***argv)
105 {
106     gmx::init(argc, argv);
107     GMX_RELEASE_ASSERT(!g_commandLineContext,
108                        "initForCommandLine() calls cannot be nested");
109 #ifdef GMX_LIB_MPI
110     // TODO: Rewrite this to not use t_commrec once there is clarity on
111     // the approach for MPI in C++ code.
112     // TODO: Consider whether the argument broadcast would better be done
113     // in CommandLineModuleManager.
114     t_commrec cr;
115     std::memset(&cr, 0, sizeof(cr));
116
117     gmx_fill_commrec_from_mpi(&cr);
118     if (PAR(&cr))
119     {
120         broadcastArguments(&cr, argc, argv);
121     }
122 #endif
123     try
124     {
125         g_commandLineContext.reset(new CommandLineProgramContext(*argc, *argv));
126         setProgramContext(g_commandLineContext.get());
127     }
128     catch (const std::exception &ex)
129     {
130         printFatalErrorMessage(stderr, ex);
131         std::exit(processExceptionAtExit(ex));
132     }
133     return *g_commandLineContext;
134 }
135
136 void finalizeForCommandLine()
137 {
138     gmx::finalize();
139     setProgramContext(NULL);
140     g_commandLineContext.reset();
141 }
142
143 int processExceptionAtExitForCommandLine(const std::exception &ex)
144 {
145     int rc = processExceptionAtExit(ex); //Currently this aborts for GMX_LIB_MPI
146     finalizeForCommandLine();            //thus this MPI_Finalize doesn't matter
147     return rc;
148 }
149
150 int runCommandLineModule(int argc, char *argv[],
151                          CommandLineModuleInterface *module)
152 {
153     return gmx::CommandLineModuleManager::runAsMainSingleModule(argc, argv, module);
154 }
155
156 } // namespace gmx
157
158 int gmx_run_cmain(int argc, char *argv[], int (*mainFunction)(int, char *[]))
159 {
160     return gmx::CommandLineModuleManager::runAsMainCMain(argc, argv, mainFunction);
161 }