1 /* SPDX-License-Identifier: LGPL-2.1+ */
5 #include <linux/loop.h>
11 #include <sys/ioctl.h>
12 #include <sys/mount.h>
13 #include <sys/prctl.h>
15 #include <sys/statfs.h>
16 #include <sys/statvfs.h>
19 #include "sd-bus-protocol.h"
22 #include "alloc-util.h"
23 #include "btrfs-util.h"
28 #include "lockfile-util.h"
30 #include "machine-pool.h"
34 #include "mount-util.h"
35 #include "parse-util.h"
36 #include "path-util.h"
37 #include "process-util.h"
38 #include "signal-util.h"
39 #include "stat-util.h"
40 #include "string-util.h"
42 #define VAR_LIB_MACHINES_SIZE_START (1024UL*1024UL*500UL)
43 #define VAR_LIB_MACHINES_FREE_MIN (1024UL*1024UL*750UL)
45 static int check_btrfs(void) {
48 if (statfs("/var/lib/machines", &sfs
) < 0) {
52 if (statfs("/var/lib", &sfs
) < 0)
56 return F_TYPE_EQUAL(sfs
.f_type
, BTRFS_SUPER_MAGIC
);
59 static int setup_machine_raw(uint64_t size
, sd_bus_error
*error
) {
60 _cleanup_free_
char *tmp
= NULL
;
61 _cleanup_close_
int fd
= -1;
66 /* We want to be able to make use of btrfs-specific file
67 * system features, in particular subvolumes, reflinks and
68 * quota. Hence, if we detect that /var/lib/machines.raw is
69 * not located on btrfs, let's create a loopback file, place a
70 * btrfs file system into it, and mount it to
71 * /var/lib/machines. */
73 fd
= open("/var/lib/machines.raw", O_RDWR
|O_CLOEXEC
|O_NONBLOCK
|O_NOCTTY
);
78 return sd_bus_error_set_errnof(error
, errno
, "Failed to open /var/lib/machines.raw: %m");
80 r
= tempfn_xxxxxx("/var/lib/machines.raw", NULL
, &tmp
);
84 (void) mkdir_p_label("/var/lib", 0755);
85 fd
= open(tmp
, O_RDWR
|O_CREAT
|O_EXCL
|O_NOCTTY
|O_CLOEXEC
, 0600);
87 return sd_bus_error_set_errnof(error
, errno
, "Failed to create /var/lib/machines.raw: %m");
89 if (fstatvfs(fd
, &ss
) < 0) {
90 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to determine free space on /var/lib/machines.raw: %m");
94 if (ss
.f_bsize
* ss
.f_bavail
< VAR_LIB_MACHINES_FREE_MIN
) {
95 r
= sd_bus_error_setf(error
, SD_BUS_ERROR_FAILED
, "Not enough free disk space to set up /var/lib/machines.");
99 if (ftruncate(fd
, size
) < 0) {
100 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to enlarge /var/lib/machines.raw: %m");
104 r
= safe_fork("(mkfs)", FORK_RESET_SIGNALS
|FORK_DEATHSIG
, &pid
);
106 sd_bus_error_set_errnof(error
, r
, "Failed to fork mkfs.btrfs: %m");
115 execlp("mkfs.btrfs", "-Lvar-lib-machines", tmp
, NULL
);
122 r
= wait_for_terminate_and_check("mkfs", pid
, 0);
126 sd_bus_error_set_errnof(error
, r
, "Failed to wait for mkfs.btrfs: %m");
130 r
= sd_bus_error_set_errnof(error
, ENOENT
, "Cannot set up /var/lib/machines, mkfs.btrfs is missing");
133 if (r
!= EXIT_SUCCESS
) {
134 r
= sd_bus_error_setf(error
, SD_BUS_ERROR_FAILED
, "mkfs.btrfs failed with error code %i", r
);
138 r
= rename_noreplace(AT_FDCWD
, tmp
, AT_FDCWD
, "/var/lib/machines.raw");
140 sd_bus_error_set_errnof(error
, r
, "Failed to move /var/lib/machines.raw into place: %m");
150 kill_and_sigcont(pid
, SIGKILL
);
155 int setup_machine_directory(uint64_t size
, sd_bus_error
*error
) {
156 _cleanup_(release_lock_file
) LockFile lock_file
= LOCK_FILE_INIT
;
157 struct loop_info64 info
= {
158 .lo_flags
= LO_FLAGS_AUTOCLEAR
,
160 _cleanup_close_
int fd
= -1, control
= -1, loop
= -1;
161 _cleanup_free_
char* loopdev
= NULL
;
162 char tmpdir
[] = "/tmp/machine-pool.XXXXXX", *mntdir
= NULL
;
163 bool tmpdir_made
= false, mntdir_made
= false, mntdir_mounted
= false;
164 char buf
[FORMAT_BYTES_MAX
];
167 /* btrfs cannot handle file systems < 16M, hence use this as minimum */
168 if (size
== (uint64_t) -1)
169 size
= VAR_LIB_MACHINES_SIZE_START
;
170 else if (size
< 16*1024*1024)
173 /* Make sure we only set the directory up once at a time */
174 r
= make_lock_file("/run/systemd/machines.lock", LOCK_EX
, &lock_file
);
180 return sd_bus_error_set_errnof(error
, r
, "Failed to determine whether /var/lib/machines is located on btrfs: %m");
182 (void) btrfs_subvol_make_label("/var/lib/machines");
184 r
= btrfs_quota_enable("/var/lib/machines", true);
186 log_warning_errno(r
, "Failed to enable quota for /var/lib/machines, ignoring: %m");
188 r
= btrfs_subvol_auto_qgroup("/var/lib/machines", 0, true);
190 log_warning_errno(r
, "Failed to set up default quota hierarchy for /var/lib/machines, ignoring: %m");
195 if (path_is_mount_point("/var/lib/machines", NULL
, AT_SYMLINK_FOLLOW
) > 0) {
196 log_debug("/var/lib/machines is already a mount point, not creating loopback file for it.");
200 r
= dir_is_populated("/var/lib/machines");
201 if (r
< 0 && r
!= -ENOENT
)
204 log_debug("/var/log/machines is already populated, not creating loopback file for it.");
208 r
= mkfs_exists("btrfs");
210 return sd_bus_error_set_errnof(error
, ENOENT
, "Cannot set up /var/lib/machines, mkfs.btrfs is missing");
214 fd
= setup_machine_raw(size
, error
);
218 control
= open("/dev/loop-control", O_RDWR
|O_CLOEXEC
|O_NOCTTY
|O_NONBLOCK
);
220 return sd_bus_error_set_errnof(error
, errno
, "Failed to open /dev/loop-control: %m");
222 nr
= ioctl(control
, LOOP_CTL_GET_FREE
);
224 return sd_bus_error_set_errnof(error
, errno
, "Failed to allocate loop device: %m");
226 if (asprintf(&loopdev
, "/dev/loop%i", nr
) < 0) {
231 loop
= open(loopdev
, O_CLOEXEC
|O_RDWR
|O_NOCTTY
|O_NONBLOCK
);
233 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to open loopback device: %m");
237 if (ioctl(loop
, LOOP_SET_FD
, fd
) < 0) {
238 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to bind loopback device: %m");
242 if (ioctl(loop
, LOOP_SET_STATUS64
, &info
) < 0) {
243 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to enable auto-clear for loopback device: %m");
247 /* We need to make sure the new /var/lib/machines directory
248 * has an access mode of 0700 at the time it is first made
249 * available. mkfs will create it with 0755 however. Hence,
250 * let's mount the directory into an inaccessible directory
251 * below /tmp first, fix the access mode, and move it to the
252 * public place then. */
254 if (!mkdtemp(tmpdir
)) {
255 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to create temporary mount parent directory: %m");
260 mntdir
= strjoina(tmpdir
, "/mnt");
261 if (mkdir(mntdir
, 0700) < 0) {
262 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to create temporary mount directory: %m");
267 if (mount(loopdev
, mntdir
, "btrfs", 0, NULL
) < 0) {
268 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to mount loopback device: %m");
271 mntdir_mounted
= true;
273 r
= btrfs_quota_enable(mntdir
, true);
275 log_warning_errno(r
, "Failed to enable quota, ignoring: %m");
277 r
= btrfs_subvol_auto_qgroup(mntdir
, 0, true);
279 log_warning_errno(r
, "Failed to set up default quota hierarchy, ignoring: %m");
281 if (chmod(mntdir
, 0700) < 0) {
282 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to fix owner: %m");
286 (void) mkdir_p_label("/var/lib/machines", 0700);
288 if (mount(mntdir
, "/var/lib/machines", NULL
, MS_BIND
, NULL
) < 0) {
289 r
= sd_bus_error_set_errnof(error
, errno
, "Failed to mount directory into right place: %m");
295 log_info("Set up /var/lib/machines as btrfs loopback file system of size %s mounted on /var/lib/machines.raw.", format_bytes(buf
, sizeof(buf
), size
));
297 (void) umount2(mntdir
, MNT_DETACH
);
298 (void) rmdir(mntdir
);
299 (void) rmdir(tmpdir
);
305 (void) umount2(mntdir
, MNT_DETACH
);
308 (void) rmdir(mntdir
);
310 (void) rmdir(tmpdir
);
313 (void) ioctl(loop
, LOOP_CLR_FD
);
314 loop
= safe_close(loop
);
317 if (control
>= 0 && nr
>= 0)
318 (void) ioctl(control
, LOOP_CTL_REMOVE
, nr
);
323 static int sync_path(const char *p
) {
324 _cleanup_close_
int fd
= -1;
326 fd
= open(p
, O_RDONLY
|O_CLOEXEC
|O_NOCTTY
);
336 int grow_machine_directory(void) {
337 char buf
[FORMAT_BYTES_MAX
];
339 uint64_t old_size
, new_size
, max_add
;
342 /* Ensure the disk space data is accurate */
343 sync_path("/var/lib/machines");
344 sync_path("/var/lib/machines.raw");
346 if (statvfs("/var/lib/machines.raw", &a
) < 0)
349 if (statvfs("/var/lib/machines", &b
) < 0)
352 /* Don't grow if not enough disk space is available on the host */
353 if (((uint64_t) a
.f_bavail
* (uint64_t) a
.f_bsize
) <= VAR_LIB_MACHINES_FREE_MIN
)
356 /* Don't grow if at least 1/3th of the fs is still free */
357 if (b
.f_bavail
> b
.f_blocks
/ 3)
360 /* Calculate how much we are willing to add at most */
361 max_add
= ((uint64_t) a
.f_bavail
* (uint64_t) a
.f_bsize
) - VAR_LIB_MACHINES_FREE_MIN
;
363 /* Calculate the old size */
364 old_size
= (uint64_t) b
.f_blocks
* (uint64_t) b
.f_bsize
;
366 /* Calculate the new size as three times the size of what is used right now */
367 new_size
= ((uint64_t) b
.f_blocks
- (uint64_t) b
.f_bavail
) * (uint64_t) b
.f_bsize
* 3;
369 /* Always, grow at least to the start size */
370 if (new_size
< VAR_LIB_MACHINES_SIZE_START
)
371 new_size
= VAR_LIB_MACHINES_SIZE_START
;
373 /* If the new size is smaller than the old size, don't grow */
374 if (new_size
< old_size
)
377 /* Ensure we never add more than the maximum */
378 if (new_size
> old_size
+ max_add
)
379 new_size
= old_size
+ max_add
;
381 r
= btrfs_resize_loopback("/var/lib/machines", new_size
, true);
385 /* Also bump the quota, of both the subvolume leaf qgroup, as
386 * well as of any subtree quota group by the same id but a
387 * higher level, if it exists. */
388 (void) btrfs_qgroup_set_limit("/var/lib/machines", 0, new_size
);
389 (void) btrfs_subvol_set_subtree_quota_limit("/var/lib/machines", 0, new_size
);
391 log_info("Grew /var/lib/machines btrfs loopback file system to %s.", format_bytes(buf
, sizeof(buf
), new_size
));