Patches to make this file actually compile under windows.

Patches submitted by Jeff Cohen. Thanks Jeff!


git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@16362 91177308-0d34-0410-b5e6-96231b3b80d8
diff --git a/lib/System/Win32/Path.cpp b/lib/System/Win32/Path.cpp
index 1a0eda4..9d02a3e 100644
--- a/lib/System/Win32/Path.cpp
+++ b/lib/System/Win32/Path.cpp
@@ -1,10 +1,12 @@
-//===- Win32/Path.cpp - Win32 Path Implementation ---------------*- C++ -*-===//
-// 
+//===- llvm/System/Linux/Path.cpp - Linux Path Implementation ---*- C++ -*-===//
+//
 //                     The LLVM Compiler Infrastructure
 //
-// This file was developed by Reid Spencer and is distributed under the 
+// This file was developed by Reid Spencer and is distributed under the
 // University of Illinois Open Source License. See LICENSE.TXT for details.
-// 
+//
+// Modified by Henrik Bach to comply with at least MinGW.
+//
 //===----------------------------------------------------------------------===//
 //
 // This file provides the Win32 specific implementation of the Path class.
@@ -12,22 +14,343 @@
 //===----------------------------------------------------------------------===//
 
 //===----------------------------------------------------------------------===//
-//=== WARNING: Implementation here must contain only Win32 specific code 
-//===          and must not be generic UNIX code (see ../Unix/Path.cpp)
+//=== WARNING: Implementation here must contain only generic Win32 code that
+//===          is guaranteed to work on *all* Win32 variants.
 //===----------------------------------------------------------------------===//
 
-// Include the generic Unix implementation
-#include "../Unix/Path.cpp"
+#include <llvm/Config/config.h>
+#include <limits.h>
+#include <stdarg.h>
+#include <assert.h>
+#include <fcntl.h>
+#include <sys/stat.h>
+#include <llvm/System/Path.h>
+
+#include <windef.h>
+#include <winbase.h>
+
+#define MAXPATHLEN PATH_MAX
 
 namespace llvm {
-using namespace sys;
+namespace sys {
 
-
-std::string
-Path::GetDLLSuffix() {
-  return "dll";
+bool
+Path::is_valid() const {
+  if (path.empty())
+    return false;
+/*hb:  char pathname[MAXPATHLEN];
+  if (0 == realpath(path.c_str(), pathname))
+    if (errno != EACCES && errno != EIO && errno != ENOENT && errno != 
+ENOTDIR)
+      return false;*/
+  return true;
 }
 
+Path
+Path::GetTemporaryDirectory() {
+  char pathname[MAXPATHLEN];
+  if (0 == GetTempPath(MAXPATHLEN,pathname))
+    ThrowError(std::string(pathname) + ": Can't create temporary directory");
+  Path result;
+  result.set_directory(pathname);
+  assert(result.is_valid() && "GetTempPath didn't create a valid pathname!");
+  return result;
+}
+
+Path::Path(std::string unverified_path)
+  : path(unverified_path)
+{
+  if (unverified_path.empty())
+    return;
+  if (this->is_valid())
+    return;
+  // oops, not valid.
+  path.clear();
+  ThrowError(unverified_path + ": path is not valid");
+}
+
+Path
+Path::GetRootDirectory() {
+  Path result;
+  result.set_directory("/");
+  return result;
+}
+
+Path
+Path::GetSystemLibraryPath1() {
+  return Path("/lib/");
+}
+
+Path
+Path::GetSystemLibraryPath2() {
+  return Path("/usr/lib/");
+}
+
+Path
+Path::GetLLVMDefaultConfigDir() {
+  return Path("/etc/llvm/");
+}
+
+Path
+Path::GetLLVMConfigDir() {
+  Path result;
+  if (result.set_directory(LLVM_ETCDIR))
+    return result;
+  return GetLLVMDefaultConfigDir();
+}
+
+Path
+Path::GetUserHomeDirectory() {
+  const char* home = getenv("HOME");
+  if (home) {
+    Path result;
+    if (result.set_directory(home))
+      return result;
+  }
+  return GetRootDirectory();
+}
+
+bool
+Path::exists() const {
+  return 0 == access(path.c_str(), F_OK );
+}
+
+bool
+Path::readable() const {
+  return 0 == access(path.c_str(), F_OK | R_OK );
+}
+
+bool
+Path::writable() const {
+  return 0 == access(path.c_str(), F_OK | W_OK );
+}
+
+bool
+Path::executable() const {
+  return 0 == access(path.c_str(), R_OK | X_OK );
+}
+
+std::string
+Path::getLast() const {
+  // Find the last slash
+  size_t pos = path.rfind('/');
+
+  // Handle the corner cases
+  if (pos == std::string::npos)
+    return path;
+
+  // If the last character is a slash
+  if (pos == path.length()-1) {
+    // Find the second to last slash
+    size_t pos2 = path.rfind('/', pos-1);
+    if (pos2 == std::string::npos)
+      return path.substr(0,pos);
+    else
+      return path.substr(pos2+1,pos-pos2-1);
+  }
+  // Return everything after the last slash
+  return path.substr(pos+1);
+}
+
+bool
+Path::set_directory(const std::string& a_path) {
+  if (a_path.size() == 0)
+    return false;
+  Path save(*this);
+  path = a_path;
+  size_t last = a_path.size() -1;
+  if (last != 0 && a_path[last] != '/')
+    path += '/';
+  if (!is_valid()) {
+    path = save.path;
+    return false;
+  }
+  return true;
+}
+
+bool
+Path::set_file(const std::string& a_path) {
+  if (a_path.size() == 0)
+    return false;
+  Path save(*this);
+  path = a_path;
+  size_t last = a_path.size() - 1;
+  while (last > 0 && a_path[last] == '/')
+    last--;
+  path.erase(last+1);
+  if (!is_valid()) {
+    path = save.path;
+    return false;
+  }
+  return true;
+}
+
+bool
+Path::append_directory(const std::string& dir) {
+  if (is_file())
+    return false;
+  Path save(*this);
+  path += dir;
+  path += "/";
+  if (!is_valid()) {
+    path = save.path;
+    return false;
+  }
+  return true;
+}
+
+bool
+Path::elide_directory() {
+  if (is_file())
+    return false;
+  size_t slashpos = path.rfind('/',path.size());
+  if (slashpos == 0 || slashpos == std::string::npos)
+    return false;
+  if (slashpos == path.size() - 1)
+    slashpos = path.rfind('/',slashpos-1);
+  if (slashpos == std::string::npos)
+    return false;
+  path.erase(slashpos);
+  return true;
+}
+
+bool
+Path::append_file(const std::string& file) {
+  if (!is_directory())
+    return false;
+  Path save(*this);
+  path += file;
+  if (!is_valid()) {
+    path = save.path;
+    return false;
+  }
+  return true;
+}
+
+bool
+Path::elide_file() {
+  if (is_directory())
+    return false;
+  size_t slashpos = path.rfind('/',path.size());
+  if (slashpos == std::string::npos)
+    return false;
+  path.erase(slashpos+1);
+  return true;
+}
+
+bool
+Path::append_suffix(const std::string& suffix) {
+  if (is_directory())
+    return false;
+  Path save(*this);
+  path.append(".");
+  path.append(suffix);
+  if (!is_valid()) {
+    path = save.path;
+    return false;
+  }
+  return true;
+}
+
+bool
+Path::elide_suffix() {
+  if (is_directory()) return false;
+  size_t dotpos = path.rfind('.',path.size());
+  size_t slashpos = path.rfind('/',path.size());
+  if (slashpos != std::string::npos && dotpos != std::string::npos &&
+      dotpos > slashpos) {
+    path.erase(dotpos, path.size()-dotpos);
+    return true;
+  }
+  return false;
+}
+
+
+bool
+Path::create_directory( bool create_parents) {
+  // Make sure we're dealing with a directory
+  if (!is_directory()) return false;
+
+  // Get a writeable copy of the path name
+  char pathname[MAXPATHLEN];
+  path.copy(pathname,MAXPATHLEN);
+
+  // Null-terminate the last component
+  int lastchar = path.length() - 1 ;
+  if (pathname[lastchar] == '/')
+    pathname[lastchar] = 0;
+
+  // If we're supposed to create intermediate directories
+  if ( create_parents ) {
+    // Find the end of the initial name component
+    char * next = strchr(pathname,'/');
+    if ( pathname[0] == '/')
+      next = strchr(&pathname[1],'/');
+
+    // Loop through the directory components until we're done
+    while ( next != 0 ) {
+      *next = 0;
+      if (0 != access(pathname, F_OK | R_OK | W_OK))
+        if (0 != mkdir(pathname))
+          ThrowError(std::string(pathname) + ": Can't create directory");
+      char* save = next;
+      next = strchr(pathname,'/');
+      *save = '/';
+    }
+  } else if (0 != mkdir(pathname)) {
+    ThrowError(std::string(pathname) + ": Can't create directory");
+  }
+  return true;
+}
+
+bool
+Path::create_file() {
+  // Make sure we're dealing with a file
+  if (!is_file()) return false;
+
+  // Create the file
+  if (0 != creat(path.c_str(), S_IRUSR | S_IWUSR))
+    ThrowError(std::string(path.c_str()) + ": Can't create file");
+
+  return true;
+}
+
+bool
+Path::destroy_directory(bool remove_contents) {
+  // Make sure we're dealing with a directory
+  if (!is_directory()) return false;
+
+  // If it doesn't exist, we're done.
+  if (!exists()) return true;
+
+  if (remove_contents) {
+    // Recursively descend the directory to remove its content
+    std::string cmd("/bin/rm -rf ");
+    cmd += path;
+    system(cmd.c_str());
+  } else {
+    // Otherwise, try to just remove the one directory
+    char pathname[MAXPATHLEN];
+    path.copy(pathname,MAXPATHLEN);
+    int lastchar = path.length() - 1 ;
+    if (pathname[lastchar] == '/')
+      pathname[lastchar] = 0;
+    if ( 0 != rmdir(pathname))
+      ThrowError(std::string(pathname) + ": Can't destroy directory");
+  }
+  return true;
+}
+
+bool
+Path::destroy_file() {
+  if (!is_file()) return false;
+  if (0 != unlink(path.c_str()))
+    ThrowError(std::string(path.c_str()) + ": Can't destroy file");
+  return true;
+}
+
+}
 }
 
 // vim: sw=2 smartindent smarttab tw=80 autoindent expandtab
+