[98679] trunk/base/src/port1.0/portsandbox.tcl

[jmr at macports.org]

Revision: 98679
          http://trac.macports.org//changeset/98679
Author:   jmr at macports.org
Date:     2012-10-12 16:15:53 -0700 (Fri, 12 Oct 2012)
Log Message:
-----------
add /var/folders to sandbox

Modified Paths:
--------------
    trunk/base/src/port1.0/portsandbox.tcl

Modified: trunk/base/src/port1.0/portsandbox.tcl
===================================================================
--- trunk/base/src/port1.0/portsandbox.tcl	2012-10-12 22:33:56 UTC (rev 98678)
+++ trunk/base/src/port1.0/portsandbox.tcl	2012-10-12 23:15:53 UTC (rev 98679)
@@ -69,14 +69,15 @@
     lappend allow_dirs $workpath $altprefix
 
     set portsandbox_profile "(version 1) (allow default) (deny file-write*) \
-(allow file-write-data (literal \"/dev/null\")) (allow file-write* (regex #\"^(/private)?(/var)?/tmp/\"))"
+(allow file-write-data (literal \"/dev/null\")) (allow file-write* (regex #\"^(/private)?(/var)?/tmp/\" \
+#\"^(/private)?/var/folders/\"))"
+
     foreach dir $allow_dirs {
-        append portsandbox_profile " (allow file-write* "
+        append portsandbox_profile " (allow file-write* ("
         if {${os.major} > 9} {
-            append portsandbox_profile "(subpath \"${dir}\")"
+            append portsandbox_profile "subpath \"${dir}\"))"
         } else {
-            append portsandbox_profile "(regex #\"^${dir}/\")"
+            append portsandbox_profile "regex #\"^${dir}/\"))"
         }
-        append portsandbox_profile ")"
     }
 }
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20121012/6bbb4079/attachment.html>