From 3c3b18efe6b9fc6f51d16c9569ca1e150adeaf76 Mon Sep 17 00:00:00 2001
From: Karen Arutyunov <karen@codesynthesis.com>
Date: Thu, 14 Feb 2019 15:20:36 +0300
Subject: Fix directory symlinks support on Windows

---
 tests/link/driver.cxx | 34 ++++++++++++++++++++++++++++++++--
 1 file changed, 32 insertions(+), 2 deletions(-)

(limited to 'tests/link')

diff --git a/tests/link/driver.cxx b/tests/link/driver.cxx
index 7aebeae..76cdbfc 100644
--- a/tests/link/driver.cxx
+++ b/tests/link/driver.cxx
@@ -177,9 +177,39 @@ main ()
   // Create the directory symlink using an absolute path.
   //
   dir_path ld (td / dir_path ("dslink"));
-  assert (link_dir (dp, ld, false, true));
+  assert (link_dir (dp, ld, false /* hard */, true /* check_content */));
 
-  try_rmsymlink (ld);
+  {
+    pair<bool, entry_stat> pe (path_entry (ld / "f"));
+    assert (pe.first && pe.second.type == entry_type::regular);
+  }
+
+  {
+    pair<bool, entry_stat> pe (path_entry (ld));
+    assert (pe.first && pe.second.type == entry_type::symlink);
+  }
+
+  {
+    pair<bool, entry_stat> pe (path_entry (ld, true /* follow_symlinks */));
+    assert (pe.first && pe.second.type == entry_type::directory);
+  }
+
+  for (const dir_entry& de: dir_iterator (td, false /* ignore_dangling */))
+  {
+    assert (de.path () != path ("dslink") ||
+            (de.type () == entry_type::directory &&
+             de.ltype () == entry_type::symlink));
+  }
+
+  // Remove the directory symlink and make sure the target's content still
+  // exists.
+  //
+  assert (try_rmsymlink (ld) == rmfile_status::success);
+
+  {
+    pair<bool, entry_stat> pe (path_entry (dp / "f"));
+    assert (pe.first && pe.second.type == entry_type::regular);
+  }
 
 #ifndef _WIN32
   // Create the directory symlink using an unexistent directory path.
-- 
cgit v1.1