add Linux namespace-entering connections

Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>

1 files changed, 31 insertions, 1 deletions

diff --git a/src/package.lisp b/src/package.lisp
index 6be40e0..a12b008 100644
--- a/src/package.lisp
+++ b/src/package.lisp
@@ -85,7 +85,18 @@
            #:compile-file-pathname*
 
            ;; libc.lisp
+           #:uid_t
+
+           #:+CLONE_NEWCGROUP+
+           #:+CLONE_NEWIPC+
+           #:+CLONE_NEWNET+
            #:+CLONE_NEWNS+
+           #:+CLONE_NEWPID+
+           #:+CLONE_NEWTIME+
+           #:+CLONE_NEWUSER+
+           #:+CLONE_NEWUTS+
+
+           #:+NS_GET_OWNER_UID+
 
            ;; util.lisp
            #:multiple-value-mapcan
@@ -137,6 +148,9 @@
            #:chroot
            #:unshare
 
+           #:mapc-open-input-streams
+           #:mapc-open-output-streams
+
            ;; connection.lisp
            #:establish-connection
            #:continue-connection
@@ -319,6 +333,7 @@
 
            ;; image.lisp
            #:eval-in-grandchild
+           #:eval-in-reinvoked
            #:dump-consfigurator-in-grandchild
            #:wrong-execution-context-for-image-dump
            #:image-dumped
@@ -390,6 +405,11 @@
 
            #:capability-p))
 
+(defpackage :consfigurator.util.linux-namespace
+  (:use #:cl #:consfigurator #:consfigurator.util.posix1e #:cffi)
+  (:export #:setgroups-p
+           #:get-userns-owner))
+
 (defpackage :consfigurator.property.cmd
   (:use #:cl #:consfigurator)
   (:export #:single))
@@ -935,7 +955,8 @@
 (defpackage :consfigurator.connection.fork
   (:use #:cl #:alexandria #:consfigurator #:consfigurator.connection.local)
   (:export #:fork-connection
-           #:post-fork))
+           #:post-fork
+           #:init-hooks-connection))
 
 (defpackage :consfigurator.connection.rehome
   (:use #:cl #:consfigurator #:consfigurator.connection.fork)
@@ -988,6 +1009,15 @@
   (:local-nicknames (#:re   #:cl-ppcre)
 		    (#:user #:consfigurator.property.user)))
 
+(defpackage :consfigurator.connection.linux-namespace
+  (:use #:cl
+        #:anaphora
+        #:alexandria
+        #:consfigurator
+        #:consfigurator.util.linux-namespace
+        #:consfigurator.connection.fork
+        #:consfigurator.connection.shell-wrap))
+
 (defpackage :consfigurator.data.asdf
   (:use #:cl #:alexandria #:consfigurator))