src/gromacs/utility/file.cpp

   1 /*
   2  * This file is part of the GROMACS molecular simulation package.
   3  *
   4  * Copyright (c) 2012, by the GROMACS development team, led by
   5  * David van der Spoel, Berk Hess, Erik Lindahl, and including many
   6  * others, as listed in the AUTHORS file in the top-level source
   7  * 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 gmx::File.
  38  *
  39  * \author Teemu Murtola <teemu.murtola@gmail.com>
  40  * \ingroup module_utility
  41  */
  42 #include "file.h"
  43
  44 #include <cerrno>
  45 #include <cstdio>
  46 #include <cstring>
  47
  48 #include <algorithm>
  49 #include <string>
  50 #include <vector>
  51
  52 #include "gromacs/legacyheaders/futil.h"
  53
  54 #include "gromacs/utility/exceptions.h"
  55 #include "gromacs/utility/gmxassert.h"
  56 #include "gromacs/utility/stringutil.h"
  57
  58 namespace gmx
  59 {
  60
  61 /*! \internal \brief
  62  * Private implementation class for File.
  63  *
  64  * \ingroup module_utility
  65  */
  66 class File::Impl
  67 {
  68     public:
  69         /*! \brief
  70          * Initialize a file object with the given handle.
  71          *
  72          * \param[in]  fp     File handle to use (may be NULL).
  73          * \param[in]  bClose Whether this object should close its file handle.
  74          */
  75         Impl(FILE *fp, bool bClose);
  76         ~Impl();
  77
  78         //! File handle for this object (may be NULL).
  79         FILE                   *fp_;
  80         /*! \brief
  81          * Whether \p fp_ should be closed by this object.
  82          *
  83          * Can be true if \p fp_ is NULL.
  84          */
  85         bool                    bClose_;
  86 };
  87
  88 File::Impl::Impl(FILE *fp, bool bClose)
  89     : fp_(fp), bClose_(bClose)
  90 {
  91 }
  92
  93 File::Impl::~Impl()
  94 {
  95     if (fp_ != NULL && bClose_)
  96     {
  97         if (fclose(fp_) != 0)
  98         {
  99             // TODO: Log the error somewhere
 100         }
 101     }
 102 }
 103
 104 File::File(const char *filename, const char *mode)
 105     : impl_(new Impl(NULL, true))
 106 {
 107     open(filename, mode);
 108 }
 109
 110 File::File(const std::string &filename, const char *mode)
 111     : impl_(new Impl(NULL, true))
 112 {
 113     open(filename, mode);
 114 }
 115
 116 File::File(FILE *fp, bool bClose)
 117     : impl_(new Impl(fp, bClose))
 118 {
 119 }
 120
 121 File::~File()
 122 {
 123 }
 124
 125 void File::open(const char *filename, const char *mode)
 126 {
 127     GMX_RELEASE_ASSERT(impl_->fp_ == NULL,
 128                        "Attempted to open the same file object twice");
 129     // TODO: Port all necessary functionality from ffopen() here.
 130     impl_->fp_ = fopen(filename, mode);
 131     if (impl_->fp_ == NULL)
 132     {
 133         GMX_THROW_WITH_ERRNO(
 134                 FileIOError(formatString("Could not open file '%s'", filename)),
 135                 "fopen", errno);
 136     }
 137 }
 138
 139 void File::open(const std::string &filename, const char *mode)
 140 {
 141     open(filename.c_str(), mode);
 142 }
 143
 144 void File::close()
 145 {
 146     GMX_RELEASE_ASSERT(impl_->fp_ != NULL,
 147                        "Attempted to close a file object that is not open");
 148     GMX_RELEASE_ASSERT(impl_->bClose_,
 149                        "Attempted to close a file object that should not be");
 150     bool bOk = (fclose(impl_->fp_) == 0);
 151     impl_->fp_ = NULL;
 152     if (!bOk)
 153     {
 154         GMX_THROW_WITH_ERRNO(
 155                 FileIOError("Error while closing file"), "fclose", errno);
 156     }
 157 }
 158
 159 FILE *File::handle()
 160 {
 161     GMX_RELEASE_ASSERT(impl_->fp_ != NULL,
 162                        "Attempted to access a file object that is not open");
 163     return impl_->fp_;
 164 }
 165
 166 void File::readBytes(void *buffer, size_t bytes)
 167 {
 168     errno = 0;
 169     FILE  *fp = handle();
 170     // TODO: Retry based on errno or something else?
 171     size_t bytesRead = std::fread(buffer, 1, bytes, fp);
 172     if (bytesRead != bytes)
 173     {
 174         if (feof(fp))
 175         {
 176             GMX_THROW(FileIOError(
 177                               formatString("Premature end of file\n"
 178                                            "Attempted to read: %d bytes\n"
 179                                            "Successfully read: %d bytes",
 180                                            static_cast<int>(bytes),
 181                                            static_cast<int>(bytesRead))));
 182         }
 183         else
 184         {
 185             GMX_THROW_WITH_ERRNO(FileIOError("Error while reading file"),
 186                                  "fread", errno);
 187         }
 188     }
 189 }
 190
 191 bool File::readLine(std::string *line)
 192 {
 193     line->clear();
 194     const size_t bufsize = 256;
 195     std::string  result;
 196     char         buf[bufsize];
 197     buf[0] = '\0';
 198     FILE        *fp = handle();
 199     while (fgets(buf, bufsize, fp) != NULL)
 200     {
 201         size_t length = std::strlen(buf);
 202         result.append(buf, length);
 203         if (length < bufsize - 1 || buf[length - 1] == '\n')
 204         {
 205             break;
 206         }
 207     }
 208     if (ferror(fp))
 209     {
 210         GMX_THROW_WITH_ERRNO(FileIOError("Error while reading file"),
 211                              "fgets", errno);
 212     }
 213     *line = result;
 214     return !result.empty() || !feof(fp);
 215 }
 216
 217 void File::writeString(const char *str)
 218 {
 219     if (fprintf(handle(), "%s", str) < 0)
 220     {
 221         GMX_THROW_WITH_ERRNO(FileIOError("Writing to file failed"),
 222                              "fprintf", errno);
 223     }
 224 }
 225
 226 void File::writeLine(const char *line)
 227 {
 228     size_t length = std::strlen(line);
 229
 230     writeString(line);
 231     if (length == 0 || line[length-1] != '\n')
 232     {
 233         writeString("\n");
 234     }
 235 }
 236
 237 void File::writeLine()
 238 {
 239     writeString("\n");
 240 }
 241
 242 // static
 243 bool File::exists(const char *filename)
 244 {
 245     return gmx_fexist(filename);
 246 }
 247
 248 // static
 249 bool File::exists(const std::string &filename)
 250 {
 251     return exists(filename.c_str());
 252 }
 253
 254 // static
 255 File &File::standardInput()
 256 {
 257     static File stdinObject(stdin, false);
 258     return stdinObject;
 259 }
 260
 261 // static
 262 File &File::standardOutput()
 263 {
 264     static File stdoutObject(stdout, false);
 265     return stdoutObject;
 266 }
 267
 268 // static
 269 File &File::standardError()
 270 {
 271     static File stderrObject(stderr, false);
 272     return stderrObject;
 273 }
 274
 275 // static
 276 std::string File::readToString(const char *filename)
 277 {
 278     // Binary mode is required on Windows to be able to determine a size
 279     // that can be passed to fread().
 280     File  file(filename, "rb");
 281     FILE *fp = file.handle();
 282
 283     if (std::fseek(fp, 0L, SEEK_END) != 0)
 284     {
 285         GMX_THROW_WITH_ERRNO(FileIOError("Seeking to end of file failed"),
 286                              "fseek", errno);
 287     }
 288     long len = std::ftell(fp);
 289     if (len == -1)
 290     {
 291         GMX_THROW_WITH_ERRNO(FileIOError("Reading file length failed"),
 292                              "ftell", errno);
 293     }
 294     if (std::fseek(fp, 0L, SEEK_SET) != 0)
 295     {
 296         GMX_THROW_WITH_ERRNO(FileIOError("Seeking to start of file failed"),
 297                              "fseek", errno);
 298     }
 299
 300     std::vector<char> data(len);
 301     file.readBytes(&data[0], len);
 302     file.close();
 303
 304     std::string result(&data[0], len);
 305     // The below is necessary on Windows to make newlines stay as '\n' on a
 306     // roundtrip.
 307     result = replaceAll(result, "\r\n", "\n");
 308
 309     return result;
 310 }
 311
 312 // static
 313 std::string File::readToString(const std::string &filename)
 314 {
 315     return readToString(filename.c_str());
 316 }
 317
 318 // static
 319 void File::writeFileFromString(const std::string &filename,
 320                                const std::string &text)
 321 {
 322     File file(filename, "w");
 323     file.writeString(text);
 324 }
 325
 326 } // namespace gmx