2 * This file is part of the GROMACS molecular simulation package.
4 * Copyright (c) 2014,2015,2016,2017, 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.
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.
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.
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.
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.
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.
37 * Implements gmx::DataFileFinder.
39 * \author Teemu Murtola <teemu.murtola@gmail.com>
40 * \ingroup module_utility
44 #include "datafilefinder.h"
51 #include "buildinfo.h"
52 #include "gromacs/utility/directoryenumerator.h"
53 #include "gromacs/utility/exceptions.h"
54 #include "gromacs/utility/filestream.h"
55 #include "gromacs/utility/path.h"
56 #include "gromacs/utility/programcontext.h"
57 #include "gromacs/utility/stringutil.h"
62 /********************************************************************
63 * DataFileFinder::Impl
66 class DataFileFinder::Impl
69 static std::string
getDefaultPath();
71 Impl() : envName_(nullptr), bEnvIsSet_(false) {}
75 std::vector
<std::string
> searchPath_
;
78 std::string
DataFileFinder::Impl::getDefaultPath()
80 const InstallationPrefixInfo installPrefix
81 = getProgramContext().installationPrefix();
82 if (!isNullOrEmpty(installPrefix
.path
))
84 const char *const dataPath
85 = installPrefix
.bSourceLayout
? "share" : DATA_INSTALL_DIR
;
86 return Path::join(installPrefix
.path
, dataPath
, "top");
91 /********************************************************************
95 DataFileFinder::DataFileFinder()
100 DataFileFinder::~DataFileFinder()
104 void DataFileFinder::setSearchPathFromEnv(const char *envVarName
)
108 impl_
.reset(new Impl());
110 impl_
->envName_
= envVarName
;
111 const char *const lib
= getenv(envVarName
);
112 if (!isNullOrEmpty(lib
))
114 impl_
->bEnvIsSet_
= true;
115 Path::splitPathEnvironment(lib
, &impl_
->searchPath_
);
119 FILE *DataFileFinder::openFile(const DataFileOptions
&options
) const
121 // TODO: There is a small race here, since there is some time between
122 // the exists() calls and actually opening the file. It would be better
123 // to leave the file open after a successful exists() if the desire is to
124 // actually open the file.
125 std::string filename
= findFile(options
);
126 if (filename
.empty())
133 fprintf(debug
, "Opening library file %s\n", fn
);
136 return TextInputFile::openRawHandle(filename
);
139 std::string
DataFileFinder::findFile(const DataFileOptions
&options
) const
141 if (options
.bCurrentDir_
&& Path::exists(options
.filename_
))
143 return options
.filename_
;
145 if (impl_
!= nullptr)
147 std::vector
<std::string
>::const_iterator i
;
148 for (i
= impl_
->searchPath_
.begin(); i
!= impl_
->searchPath_
.end(); ++i
)
150 // TODO: Deal with an empty search path entry more reasonably.
151 std::string testPath
= Path::join(*i
, options
.filename_
);
152 // TODO: Consider skipping directories.
153 if (Path::exists(testPath
))
159 const std::string
&defaultPath
= Impl::getDefaultPath();
160 if (!defaultPath
.empty())
162 std::string testPath
= Path::join(defaultPath
, options
.filename_
);
163 if (Path::exists(testPath
))
170 const char *const envName
= (impl_
!= nullptr ? impl_
->envName_
: nullptr);
171 const bool bEnvIsSet
= (impl_
!= nullptr ? impl_
->bEnvIsSet_
: false);
173 formatString("Library file '%s' not found", options
.filename_
));
174 if (options
.bCurrentDir_
)
176 message
.append(" in current dir nor");
180 message
.append(formatString(" in your %s path nor", envName
));
182 message
.append(" in the default directories.\nThe following paths were searched:");
183 if (options
.bCurrentDir_
)
185 message
.append("\n ");
186 message
.append(Path::getWorkingDirectory());
187 message
.append(" (current dir)");
189 if (impl_
!= nullptr)
191 std::vector
<std::string
>::const_iterator i
;
192 for (i
= impl_
->searchPath_
.begin(); i
!= impl_
->searchPath_
.end(); ++i
)
194 message
.append("\n ");
198 if (!defaultPath
.empty())
200 message
.append("\n ");
201 message
.append(defaultPath
);
202 message
.append(" (default)");
204 if (!bEnvIsSet
&& envName
!= nullptr)
207 formatString("\nYou can set additional directories to search "
208 "with the %s path variable.", envName
));
210 GMX_THROW(FileIOError(message
));
212 return std::string();
215 std::vector
<DataFileInfo
>
216 DataFileFinder::enumerateFiles(const DataFileOptions
&options
) const
218 // TODO: Consider if not being able to list one of the directories should
219 // really be a fatal error. Or alternatively, check somewhere else that
220 // paths in GMXLIB are valid.
221 std::vector
<DataFileInfo
> result
;
222 std::vector
<std::string
>::const_iterator i
;
223 if (options
.bCurrentDir_
)
225 std::vector
<std::string
> files
226 = DirectoryEnumerator::enumerateFilesWithExtension(
227 ".", options
.filename_
, false);
228 for (i
= files
.begin(); i
!= files
.end(); ++i
)
230 result
.emplace_back(".", *i
, false);
233 if (impl_
!= nullptr)
235 std::vector
<std::string
>::const_iterator j
;
236 for (j
= impl_
->searchPath_
.begin(); j
!= impl_
->searchPath_
.end(); ++j
)
238 std::vector
<std::string
> files
239 = DirectoryEnumerator::enumerateFilesWithExtension(
240 j
->c_str(), options
.filename_
, false);
241 for (i
= files
.begin(); i
!= files
.end(); ++i
)
243 result
.emplace_back(*j
, *i
, false);
247 const std::string
&defaultPath
= Impl::getDefaultPath();
248 if (!defaultPath
.empty())
250 std::vector
<std::string
> files
251 = DirectoryEnumerator::enumerateFilesWithExtension(
252 defaultPath
.c_str(), options
.filename_
, false);
253 for (i
= files
.begin(); i
!= files
.end(); ++i
)
255 result
.emplace_back(defaultPath
, *i
, true);
258 if (result
.empty() && options
.bThrow_
)
260 // TODO: Print the search path as is done in findFile().
262 formatString("Could not find any files ending on '%s' in the "
263 "current directory or the GROMACS library search path",
265 GMX_THROW(FileIOError(message
));