1 files changed, 111 insertions, 0 deletions
diff --git a/libbuild2/filesystem.txx b/libbuild2/filesystem.txx
new file mode 100644
index 0000000..6166082
--- /dev/null
+++ b/libbuild2/filesystem.txx
@@ -0,0 +1,111 @@
+// file      : libbuild2/filesystem.txx -*- C++ -*-
+// copyright : Copyright (c) 2014-2019 Code Synthesis Ltd
+// license   : MIT; see accompanying LICENSE file
+
+#include <type_traits> // is_base_of
+
+#include <libbuild2/context.hxx>
+#include <libbuild2/diagnostics.hxx>
+
+namespace build2
+{
+  template <typename T>
+  fs_status<butl::rmfile_status>
+  rmfile (const path& f, const T& t, uint16_t v)
+  {
+    using namespace butl;
+
+    // We don't want to print the command if we couldn't remove the file
+    // because it does not exist (just like we don't print the update command
+    // if the file is up to date). This makes the below code a bit ugly.
+    //
+    auto print = [&f, &t, v] ()
+    {
+      if (verb >= v)
+      {
+        if (verb >= 2)
+          text << "rm " << f;
+        else if (verb)
+          text << "rm " << t;
+      }
+    };
+
+    rmfile_status rs;
+
+    try
+    {
+      rs = dry_run
+        ? file_exists (f) ? rmfile_status::success : rmfile_status::not_exist
+        : try_rmfile (f);
+    }
+    catch (const system_error& e)
+    {
+      print ();
+      fail << "unable to remove file " << f << ": " << e << endf;
+    }
+
+    if (rs == rmfile_status::success)
+      print ();
+
+    return rs;
+  }
+
+  template <typename T>
+  fs_status<butl::rmdir_status>
+  rmdir (const dir_path& d, const T& t, uint16_t v)
+  {
+    using namespace butl;
+
+    // We don't want to print the command if we couldn't remove the directory
+    // because it does not exist (just like we don't print mkdir if it already
+    // exists) or if it is not empty. This makes the below code a bit ugly.
+    //
+    auto print = [&d, &t, v] ()
+    {
+      if (verb >= v)
+      {
+        if (verb >= 2)
+          text << "rmdir " << d;
+        else if (verb)
+          text << (std::is_base_of<dir_path, T>::value ? "rmdir " : "rm ") << t;
+      }
+    };
+
+    bool w (false); // Don't try to remove working directory.
+    rmdir_status rs;
+    try
+    {
+      rs = dry_run
+        ? dir_exists (d) ? rmdir_status::success : rmdir_status::not_exist
+        : !(w = work.sub (d)) ? try_rmdir (d) : rmdir_status::not_empty;
+    }
+    catch (const system_error& e)
+    {
+      print ();
+      fail << "unable to remove directory " << d << ": " << e << endf;
+    }
+
+    switch (rs)
+    {
+    case rmdir_status::success:
+      {
+        print ();
+        break;
+      }
+    case rmdir_status::not_empty:
+      {
+        if (verb >= v && verb >= 2)
+        {
+          text << d << " is "
+               << (w ? "current working directory" : "not empty")
+               << ", not removing";
+        }
+        break;
+      }
+    case rmdir_status::not_exist:
+      break;
+    }
+
+    return rs;
+  }
+}