blob: 5edb800137f07aba0489c01bf2be7cd3097fa6e8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
(in-package :consfigurator)
(include "unistd.h")
(ctype uid_t "uid_t")
(ctype gid_t "gid_t")
#+linux
(progn
(define "_GNU_SOURCE")
(include "linux/sched.h")
(include "linux/capability.h")
(include "linux/nsfs.h"))
#+linux
(progn
(constant (CLONE_NEWCGROUP "CLONE_NEWCGROUP"))
(constant (CLONE_NEWIPC "CLONE_NEWIPC"))
(constant (CLONE_NEWNET "CLONE_NEWNET"))
(constant (CLONE_NEWNS "CLONE_NEWNS"))
(constant (CLONE_NEWPID "CLONE_NEWPID"))
(constant (CLONE_NEWTIME "CLONE_NEWTIME"))
(constant (CLONE_NEWUSER "CLONE_NEWUSER"))
(constant (CLONE_NEWUTS "CLONE_NEWUTS"))
(constant (NS_GET_OWNER_UID "NS_GET_OWNER_UID")))
|