1 files changed, 22 insertions, 0 deletions
diff --git a/guile-3.0.7-chroot.patch b/guile-3.0.7-chroot.patch
new file mode 100644
index 0000000..110bf1e
--- /dev/null
+++ b/guile-3.0.7-chroot.patch
@@ -0,0 +1,22 @@
+commit ab9588774461715d0664b8662790b36e8389307d
+Author: Tomas Korbar <tkorbar@redhat.com>
+Date:   Thu Jul 22 10:26:24 2021 +0200
+
+    Make chroot call more secure
+
+diff --git a/libguile/posix.c b/libguile/posix.c
+index 31c4ab1..1054440 100644
+--- a/libguile/posix.c
++++ b/libguile/posix.c
+@@ -2033,7 +2033,10 @@ SCM_DEFINE (scm_chroot, "chroot", 1, 0, 0,
+ #define FUNC_NAME s_scm_chroot
+ {
+   int rv;
+-
++  WITH_STRING (path, c_path,
++	       rv = chdir (c_path));
++  if (rv == -1)
++    SCM_SYSERROR;
+   WITH_STRING (path, c_path,
+ 	       rv = chroot (c_path));
+   if (rv == -1)