base: Prevent undefined behavior in not interleaved `AddrRange`s.
[gem5.git] / src / base / output.cc
index afcac03a5f2506cfd69734dc41cef5265c960e11..5703a379caf9fdcfafffedc36ab4c94c253eeeeb 100644 (file)
@@ -1,4 +1,18 @@
 /*
+ * Copyright (c) 2015 ARM Limited
+ * Copyright (c) 2020 Barkhausen Institut
+ * All rights reserved
+ *
+ * The license below extends only to copyright in the software and shall
+ * not be construed as granting a license to any other intellectual
+ * property including but not limited to intellectual property relating
+ * to a hardware implementation of the functionality of the software
+ * licensed hereunder.  You may use the software subject to the license
+ * terms below provided that you ensure that this notice is replicated
+ * unmodified and in its entirety in all distributions of the software,
+ * modified or unmodified, in source code or in binary form.
+ *
+ * Copyright (c) 2013 Andreas Sandberg
  * Copyright (c) 2005 The Regents of The University of Michigan
  * All rights reserved.
  *
  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- *
- * Authors: Nathan Binkert
  */
 
-#include <errno.h>
-#include <limits.h>
-#include <stdlib.h>
+#include "base/output.hh"
+
+#include <dirent.h>
 #include <sys/stat.h>
 #include <sys/types.h>
+#include <unistd.h>
+#include <zfstream.h>
 
+#include <cassert>
+#include <cerrno>
+#include <climits>
+#include <cstdlib>
 #include <fstream>
 
-#include "base/misc.hh"
-#include "base/output.hh"
+#include "base/logging.hh"
 
 using namespace std;
 
 OutputDirectory simout;
 
+
+OutputStream::OutputStream(const std::string &name, std::ostream *stream)
+    : _name(name), _stream(stream)
+{
+}
+
+OutputStream::~OutputStream()
+{
+}
+
+void
+OutputStream::relocate(const OutputDirectory &dir)
+{
+}
+
+template<class StreamType>
+OutputFile<StreamType>::OutputFile(const OutputDirectory &dir,
+                                   const std::string &name,
+                                   std::ios_base::openmode mode,
+                                   bool recreateable)
+  : OutputStream(name, new stream_type_t()),
+    _mode(mode), _recreateable(recreateable),
+    _fstream(static_cast<stream_type_t *>(_stream))
+{
+    std::string resolved_path = dir.resolve(_name);
+
+    _fstream->open(resolved_path.c_str(), _mode);
+
+    panic_if(!_fstream->is_open(), "Failed to open \"%s\"\n", resolved_path);
+}
+
+template<class StreamType>
+OutputFile<StreamType>::~OutputFile()
+{
+    if (_fstream->is_open())
+        _fstream->close();
+}
+
+template<class StreamType>
+void
+OutputFile<StreamType>::relocate(const OutputDirectory &dir)
+{
+    if (_recreateable) {
+        _fstream->close();
+        _fstream->open(dir.resolve(_name).c_str(), _mode);
+    }
+}
+
+OutputStream OutputDirectory::stdout("stdout", &cout);
+OutputStream OutputDirectory::stderr("stderr", &cerr);
+
 /**
- *
+ * @file This file manages creating / deleting output files for the simulator.
  */
 OutputDirectory::OutputDirectory()
 {}
 
+OutputDirectory::OutputDirectory(const std::string &name)
+{
+    setDirectory(name);
+}
+
 OutputDirectory::~OutputDirectory()
-{}
+{
+    for (auto& f: files) {
+        if (f.second)
+            delete f.second;
+    }
+}
+
+OutputStream *
+OutputDirectory::checkForStdio(const string &name)
+{
+    if (name == "cerr" || name == "stderr")
+        return &stderr;
+
+    if (name == "cout" || name == "stdout")
+        return &stdout;
+
+    return NULL;
+}
+
+void
+OutputDirectory::close(OutputStream *file)
+{
+    if (file == &stdout || file == &stderr) {
+        file->stream()->flush();
+        return;
+    }
+
+    auto i = files.find(file->name());
+    if (i == files.end())
+        fatal("Attempted to close an unregistred file stream");
+
+    files.erase(i);
+
+    delete file;
+}
 
 void
 OutputDirectory::setDirectory(const string &d)
 {
-    if (!dir.empty())
-        panic("Output directory already set!\n");
+    const string old_dir(dir);
 
     dir = d;
 
-    if (dir != ".") {
-        if (mkdir(dir.c_str(), 0777) < 0 && errno != EEXIST)
-            panic("couldn't make output dir %s: %s\n",
-                  dir, strerror(errno));
+    // guarantee that directory ends with a path separator
+    if (dir[dir.size() - 1] != PATH_SEPARATOR)
+        dir += PATH_SEPARATOR;
+
+    // Try to create the directory. If it already exists, that's ok;
+    // otherwise, fail if we couldn't create it.
+    if ((mkdir(dir.c_str(), 0755) != 0) && (errno != EEXIST))
+        fatal("Failed to create new output subdirectory '%s'\n", dir);
+
+    // Check if we need to recreate anything
+    if (!old_dir.empty()) {
+        // Recreate output files
+        for (file_map_t::iterator i = files.begin(); i != files.end(); ++i) {
+            i->second->relocate(*this);
+        }
+
+        // Relocate sub-directories
+        for (dir_map_t::iterator i = dirs.begin(); i != dirs.end(); ++i) {
+            i->second->setDirectory(dir + PATH_SEPARATOR + i->first);
+        }
     }
 
-    // guarantee that directory ends with a '/'
-    if (dir[dir.size() - 1] != '/')
-        dir += "/";
 }
 
 const string &
-OutputDirectory::directory()
+OutputDirectory::directory() const
 {
     if (dir.empty())
         panic("Output directory not set!");
@@ -81,51 +200,149 @@ OutputDirectory::directory()
 }
 
 string
-OutputDirectory::resolve(const string &name)
+OutputDirectory::resolve(const string &name) const
 {
-    return (name[0] != '/') ? dir + name : name;
+    return !isAbsolute(name) ? dir + name : name;
 }
 
-ostream *
-OutputDirectory::create(const string &name)
+OutputStream *
+OutputDirectory::create(const string &name, bool binary, bool no_gz)
 {
-    if (name == "cerr" || name == "stderr")
-        return &cerr;
+    OutputStream *file = checkForStdio(name);
+    if (file)
+        return file;
 
-    if (name == "cout" || name == "stdout")
-        return &cout;
+    const ios_base::openmode mode(
+        ios::trunc | (binary ? ios::binary : (ios::openmode)0));
+    const bool recreateable(!isAbsolute(name));
 
-    ofstream *file = new ofstream(resolve(name).c_str(), ios::trunc);
-    if (!file->is_open())
-        panic("Cannot open file %s", name);
-
-    return file;
+    return open(name, mode, recreateable, no_gz);
 }
 
-ostream *
-OutputDirectory::find(const string &name)
+OutputStream *
+OutputDirectory::open(const std::string &name,
+                      ios_base::openmode mode,
+                      bool recreateable,
+                      bool no_gz)
 {
-    if (name == "cerr" || name == "stderr")
-        return &cerr;
+    OutputStream *os;
 
-    if (name == "cout" || name == "stdout")
-        return &cout;
+    if (!no_gz && name.find(".gz", name.length() - 3) < name.length()) {
+        // Although we are creating an output stream, we still need to pass the
+        // correct mode for gzofstream as this used directly to set the file
+        // mode.
+        mode |= std::ios::out;
+        os = new OutputFile<gzofstream>(*this, name, mode, recreateable);
+    } else {
+        os = new OutputFile<ofstream>(*this, name, mode, recreateable);
+    }
+
+    files[name] = os;
 
-    string filename = resolve(name);
-    map_t::iterator i = files.find(filename);
+    return os;
+}
+
+OutputStream *
+OutputDirectory::find(const string &name) const
+{
+    OutputStream *file = checkForStdio(name);
+    if (file)
+        return file;
+
+    auto i = files.find(name);
     if (i != files.end())
         return (*i).second;
 
-    ofstream *file = new ofstream(filename.c_str(), ios::trunc);
-    if (!file->is_open())
-        panic("Cannot open file %s", filename);
+    return NULL;
+}
+
 
-    files[filename] = file;
-    return file;
+OutputStream *
+OutputDirectory::findOrCreate(const std::string &name, bool binary)
+{
+    OutputStream *os(find(name));
+    if (os)
+        return os;
+    else
+        return create(name, binary);
 }
 
 bool
-OutputDirectory::isFile(const std::ostream *os)
+OutputDirectory::isFile(const string &name) const
+{
+    // definitely a file if in our data structure
+    if (find(name) != NULL) return true;
+
+    struct stat st_buf;
+    int st = stat(name.c_str(), &st_buf);
+    return (st == 0) && S_ISREG(st_buf.st_mode);
+}
+
+OutputDirectory *
+OutputDirectory::createSubdirectory(const string &name)
+{
+    const string new_dir = resolve(name);
+    if (new_dir.find(directory()) == string::npos)
+        fatal("Attempting to create subdirectory not in m5 output dir\n");
+
+    OutputDirectory *dir(new OutputDirectory(new_dir));
+    dirs[name] = dir;
+
+    return dir;
+}
+
+void
+OutputDirectory::remove(const string &name, bool recursive)
 {
-    return os && os != &cerr && os != &cout;
+    const string fname = resolve(name);
+
+    if (fname.find(directory()) == string::npos)
+        fatal("Attempting to remove file/dir not in output dir\n");
+
+    if (isFile(fname)) {
+        // close and release file if we have it open
+        auto i = files.find(fname);
+        if (i != files.end()) {
+            delete i->second;
+            files.erase(i);
+        }
+
+        if (::remove(fname.c_str()) != 0)
+            fatal("Could not erase file '%s'\n", fname);
+    } else {
+        // assume 'name' is a directory
+        if (recursive) {
+            DIR *subdir = opendir(fname.c_str());
+
+            // silently ignore removal request for non-existent directory
+            if ((!subdir) && (errno == ENOENT))
+                return;
+
+            // fail on other errors
+            if (!subdir) {
+                perror("opendir");
+                fatal("Error opening directory for recursive removal '%s'\n",
+                      fname);
+            }
+
+            struct dirent *de = readdir(subdir);
+            while (de != NULL) {
+                // ignore files starting with a '.'; user must delete those
+                //   manually if they really want to
+                if (de->d_name[0] != '.')
+                    remove(name + PATH_SEPARATOR + de->d_name, recursive);
+
+                de = readdir(subdir);
+            }
+
+            closedir(subdir);
+        }
+
+        // try to force recognition that we deleted the files in the directory
+        sync();
+
+        if (::remove(fname.c_str()) != 0) {
+            perror("Warning!  'remove' failed.  Could not erase directory.");
+        }
+    }
 }