Disable ACL in Cygwin to avoid permission missmatch errors

ocaml · Jan 22, 2024 · 7674096 · 7674096
1 parent 73c671f
commit 7674096
Showing 1 changed file with 8 additions and 0 deletions.
diff --git a/src/state/opamSysInteract.ml b/src/state/opamSysInteract.ml
@@ -276,6 +276,12 @@ module Cygwin = struct
     in
     OpamDownload.download_as ~overwrite ?checksum url_setupexe dst
 
+  let set_fstab_noacl root =
+    let bash = root / "bin" // "bash.exe" in
+    OpamSystem.make_command
+      (OpamFilename.to_string bash)
+      ["-c"; "/bin/sed -i -e 's/binary,/noacl,&/' /etc/fstab"]
+
   let install ~packages =
     let open OpamProcess.Job.Op in
     let cygwin_root = internal_cygroot () in
@@ -317,6 +323,8 @@ module Cygwin = struct
          (OpamFilename.to_string local_cygwin_setupexe)
          args @@> fun r ->
        OpamSystem.raise_on_process_error r;
+       set_fstab_noacl cygwin_root @@> fun r ->
+       OpamSystem.raise_on_process_error r;
        Done ());
     cygcheck