file-systems: Subsystem cgroups now depend on /sys/fs/cgroup.

* gnu/system/file-systems.scm (%control-groups): Define 'parent' variable.
  Initialize the 'dependencies' field for all the subsystems.
This commit is contained in:
Ludovic Courtès 2015-07-17 19:25:09 +02:00
parent e51710d1ef
commit b78cad85d3

View File

@ -237,11 +237,12 @@ (define %immutable-store
(flags '(read-only bind-mount))))
(define %control-groups
(cons (file-system
(let ((parent (file-system
(device "cgroup")
(mount-point "/sys/fs/cgroup")
(type "tmpfs")
(check? #f))
(check? #f))))
(cons parent
(map (lambda (subsystem)
(file-system
(device "cgroup")
@ -249,9 +250,13 @@ (define %control-groups
(type "cgroup")
(check? #f)
(options subsystem)
(create-mount-point? #t)))
(create-mount-point? #t)
;; This must be mounted after, and unmounted before the
;; parent directory.
(dependencies (list parent))))
'("cpuset" "cpu" "cpuacct" "memory" "devices" "freezer"
"blkio" "perf_event" "hugetlb"))))
"blkio" "perf_event" "hugetlb")))))
(define %base-file-systems
;; List of basic file systems to be mounted. Note that /proc and /sys are