blob: 41a601b6f75c939f2e49e6e76fdb78c4e71bfe5b (
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")))
|