/*#############################################################################
# #
# IPFire - An Open Source Firewall Distribution #
-# Copyright (C) 2014 IPFire development team #
+# Copyright (C) 2007-2022 IPFire Team <info@ipfire.org> #
# #
# This program is free software: you can redistribute it and/or modify #
# it under the terms of the GNU General Public License as published by #
#include <sys/utsname.h>
#include <unistd.h>
-#include <linux/fs.h>
-
#include <libsmooth.h>
#include "hw.h"
-const char* other_filesystems[] = {
- "/dev",
- "/proc",
- "/sys",
- NULL
-};
+extern FILE* flog;
static int system_chroot(const char* output, const char* path, const char* cmd) {
char chroot_cmd[STRING_SIZE];
return mysystem(output, chroot_cmd);
}
+static int hw_mkdir(const char *dir) {
+ char tmp[STRING_SIZE];
+ char *p = NULL;
+ size_t len;
+ int r;
+
+ snprintf(tmp, sizeof(tmp),"%s",dir);
+ len = strlen(tmp);
+
+ if (tmp[len - 1] == '/') {
+ tmp[len - 1] = 0;
+ }
+
+ for (p = tmp + 1; *p; p++) {
+ if (*p == '/') {
+ *p = 0;
+
+ // Create target if it does not exist
+ if (access(tmp, X_OK) != 0) {
+ r = mkdir(tmp, S_IRWXU|S_IRWXG|S_IRWXO);
+
+ if (r) {
+ return r;
+ }
+ }
+
+ *p = '/';
+ }
+ }
+
+ // Create target if it does not exist
+ if (access(tmp, X_OK) != 0) {
+ r = mkdir(tmp, S_IRWXU|S_IRWXG|S_IRWXO);
+
+ if (r) {
+ return r;
+ }
+ }
+
+ return 0;
+}
+
struct hw* hw_init() {
struct hw* hw = calloc(1, sizeof(*hw));
assert(hw);
return (strncmp(a, b, strlen(b)) == 0);
}
-static char loop_device[STRING_SIZE];
-
static int setup_loop_device(const char* source, const char* device) {
+ int device_fd = -1;
+
int file_fd = open(source, O_RDWR);
if (file_fd < 0)
goto ERROR;
- int device_fd = -1;
if ((device_fd = open(device, O_RDWR)) < 0)
goto ERROR;
return mount(source, target, fs, flags, NULL);
}
-int hw_umount(const char* target) {
- int r = umount2(target, 0);
+static int hw_bind_mount(const char* source, const char* prefix) {
+ if (!source || !prefix) {
+ errno = EINVAL;
+ return 1;
+ }
+
+ char target[PATH_MAX];
+ int r;
+
+ // Format target
+ r = snprintf(target, sizeof(target) - 1, "%s/%s", prefix, source);
+ if (r < 0)
+ return 1;
+
+ // Ensure target exists
+ mkdir(target, S_IRWXU|S_IRWXG|S_IRWXO);
- if (r && errno == EBUSY) {
- // Give it a moment to settle
- sleep(1);
+ return hw_mount(source, target, NULL, MS_BIND);
+}
- r = umount2(target, MNT_FORCE);
+int hw_umount(const char* source, const char* prefix) {
+ char target[PATH_MAX];
+ int r;
+
+ if (prefix)
+ r = snprintf(target, sizeof(target) - 1, "%s/%s", prefix, source);
+ else
+ r = snprintf(target, sizeof(target) - 1, "%s", source);
+ if (r < 0)
+ return r;
+
+ // Perform umount
+ r = umount2(target, 0);
+ if (r) {
+ switch (errno) {
+ // Try again with force if umount wasn't successful
+ case EBUSY:
+ sleep(1);
+
+ r = umount2(target, MNT_FORCE);
+ break;
+
+ // target wasn't a mountpoint. Ignore.
+ case EINVAL:
+ r = 0;
+ break;
+
+ // target doesn't exist
+ case ENOENT:
+ r = 0;
+ break;
+ }
}
return r;
static int hw_test_source_medium(const char* path) {
int ret = hw_mount(path, SOURCE_MOUNT_PATH, "iso9660", MS_RDONLY);
+ if (ret != 0) {
+ // 2nd try, ntfs for a rufus converted usb key
+ ret = hw_mount(path, SOURCE_MOUNT_PATH, "ntfs3", MS_RDONLY);
+ }
+ if (ret != 0) {
+ // 3rd try, vfat for a rufus converted usb key
+ ret = hw_mount(path, SOURCE_MOUNT_PATH, "vfat", MS_RDONLY);
+ }
+
// If the source could not be mounted we
// cannot proceed.
if (ret != 0)
ret = access(SOURCE_TEST_FILE, R_OK);
// Umount the test device.
- hw_umount(SOURCE_MOUNT_PATH);
+ hw_umount(SOURCE_MOUNT_PATH, NULL);
return ret;
}
struct hw_disk** hw_find_disks(struct hw* hw, const char* sourcedrive) {
struct hw_disk** ret = hw_create_disks();
struct hw_disk** disks = ret;
+ char size_str[32];
+
+ // Determine the disk device of source if it is a partition
+ const char* sourcedisk = NULL;
+ char syssource[PATH_MAX];
+ (void)snprintf(syssource, sizeof(syssource) - 1, "/sys/class/block/%s", sourcedrive + 5);
+ struct udev_device* s_dev = udev_device_new_from_syspath(hw->udev, syssource);
+ const char* s_devtype = udev_device_get_property_value(s_dev, "DEVTYPE");
+ if (s_devtype && (strcmp(s_devtype, "partition") == 0)) {
+ struct udev_device* p_dev = udev_device_get_parent_with_subsystem_devtype(s_dev,"block","disk");
+ if (p_dev) {
+ sourcedisk = udev_device_get_devnode(p_dev);
+ }
+ }
+ if (!sourcedisk) sourcedisk = sourcedrive;
struct udev_enumerate* enumerate = udev_enumerate_new(hw->udev);
continue;
}
- // Skip sourcedrive if we need to
- if (sourcedrive && (strcmp(dev_path, sourcedrive) == 0)) {
+ // Skip sourcedisk if we need to
+ if (sourcedisk && (strcmp(dev_path, sourcedisk) == 0)) {
udev_device_unref(dev);
continue;
}
disk->ref = 1;
- strncpy(disk->path, dev_path, sizeof(disk->path));
+ snprintf(disk->path, sizeof(disk->path), "%s", dev_path);
const char* p = disk->path + 5;
disk->size = size;
vendor = udev_device_get_sysattr_value(dev, "manufacturer");
if (vendor)
- strncpy(disk->vendor, vendor, sizeof(disk->vendor));
+ snprintf(disk->vendor, sizeof(disk->vendor), "%s", vendor);
else
*disk->vendor = '\0';
model = udev_device_get_sysattr_value(dev, "product");
if (model)
- strncpy(disk->model, model, sizeof(disk->model));
+ snprintf(disk->model, sizeof(disk->model), "%s", model);
else
*disk->model = '\0';
// Format description
- char size_str[STRING_SIZE];
snprintf(size_str, sizeof(size_str), "%4.1fGB", (double)disk->size / pow(1024, 3));
if (*disk->vendor && *disk->model) {
free(disks);
}
-unsigned int hw_count_disks(const struct hw_disk** disks) {
+unsigned int hw_count_disks(struct hw_disk** disks) {
unsigned int ret = 0;
while (*disks++)
struct hw_disk** ret = hw_create_disks();
struct hw_disk** selected_disks = ret;
- unsigned int num_disks = hw_count_disks((const struct hw_disk**)disks);
+ unsigned int num_disks = hw_count_disks(disks);
for (unsigned int i = 0; i < num_disks; i++) {
if (!selection || selection[i]) {
return ret;
}
-struct hw_disk** hw_select_first_disk(const struct hw_disk** disks) {
+struct hw_disk** hw_select_first_disk(struct hw_disk** disks) {
struct hw_disk** ret = hw_create_disks();
struct hw_disk** selected_disks = ret;
}
static unsigned long long hw_boot_size(struct hw_destination* dest) {
- return MB2BYTES(128);
+ return MB2BYTES(512);
}
static int hw_device_has_p_suffix(const struct hw_destination* dest) {
dest->size_bootldr = 0;
}
- dest->size_boot = hw_boot_size(dest);
+ // Disable seperate boot partition for BTRFS installations.
+ if(dest->filesystem == HW_FS_BTRFS) {
+ dest->size_boot = 0;
+ } else {
+ dest->size_boot = hw_boot_size(dest);
+ }
// Create an EFI partition when running in EFI mode
if (hw->efi)
snprintf(dest->part_boot_efi, sizeof(dest->part_boot_efi),
"%s%d", path, part_idx++);
- } else
+ } else {
*dest->part_boot_efi = '\0';
+ dest->part_boot_efi_idx = 0;
+ }
if (dest->size_swap > 0)
snprintf(dest->part_swap, sizeof(dest->part_swap), "%s%d", path, part_idx++);
return 0;
}
-struct hw_destination* hw_make_destination(struct hw* hw, int part_type, struct hw_disk** disks, int disable_swap) {
+struct hw_destination* hw_make_destination(struct hw* hw, int part_type, struct hw_disk** disks,
+ int disable_swap, int filesystem) {
struct hw_destination* dest = malloc(sizeof(*dest));
+ // Assign filesystem
+ dest->filesystem = filesystem;
+
if (part_type == HW_PART_TYPE_NORMAL) {
dest->disk1 = *disks;
dest->disk2 = NULL;
if (r)
return NULL;
- // Set default filesystem
- dest->filesystem = HW_FS_DEFAULT;
-
return dest;
}
return r;
}
+static int hw_create_btrfs_subvolume(const char* output, const char* subvolume) {
+ char command [STRING_SIZE];
+ int r;
+
+ // Abort if the command could not be assigned.
+ r = snprintf(command, sizeof(command), "/usr/bin/btrfs subvolume create %s/%s", DESTINATION_MOUNT_PATH, subvolume);
+ if (r < 0)
+ return r;
+
+ // Create the subvolume
+ r = mysystem(output, command);
+ if (r)
+ return r;
+
+ return 0;
+}
+
+static int hw_create_btrfs_layout(const char* path, const char* output) {
+ const struct btrfs_subvolumes* subvolume = NULL;
+ char cmd[STRING_SIZE];
+ char volume[STRING_SIZE];
+ int r;
+
+ r = snprintf(cmd, sizeof(cmd), "/usr/bin/mkfs.btrfs -f %s", path);
+ if (r < 0)
+ return r;
+
+ // Create the main BTRFS file system.
+ r = mysystem(output, cmd);
+ if (r)
+ return r;
+
+ // We need to mount the FS in order to create any subvolumes.
+ r = hw_mount(path, DESTINATION_MOUNT_PATH, "btrfs", 0);
+ if (r)
+ return r;
+
+ // Loop through the list of subvolumes to create.
+ for ( subvolume = btrfs_subvolumes; subvolume->name; subvolume++ ) {
+ r = snprintf(volume, sizeof(volume), "%s", subvolume->name);
+
+ // Abort if snprintf fails.
+ if (r < 0)
+ return r;
+
+ // Call function to create the subvolume
+ r = hw_create_btrfs_subvolume(output, volume);
+ if (r)
+ return r;
+ }
+
+ // Umount the main BTRFS after subvolume creation.
+ r = hw_umount(DESTINATION_MOUNT_PATH, 0);
+ if (r)
+ return r;
+
+ return 0;
+}
+
static int hw_format_filesystem(const char* path, int fs, const char* output) {
char cmd[STRING_SIZE] = "\0";
+ int r;
// Swap
if (fs == HW_FS_SWAP) {
snprintf(cmd, sizeof(cmd), "/sbin/mkswap -v1 %s &>/dev/null", path);
- // ReiserFS
- } else if (fs == HW_FS_REISERFS) {
- snprintf(cmd, sizeof(cmd), "/sbin/mkreiserfs -f %s ", path);
// EXT4
} else if (fs == HW_FS_EXT4) {
} else if (fs == HW_FS_XFS) {
snprintf(cmd, sizeof(cmd), "/sbin/mkfs.xfs -f %s", path);
+ // BTRFS
+ } else if (fs == HW_FS_BTRFS) {
+ r = hw_create_btrfs_layout(path, output);
+
+ return r;
+
// FAT32
} else if (fs == HW_FS_FAT32) {
snprintf(cmd, sizeof(cmd), "/sbin/mkfs.vfat %s", path);
assert(*cmd);
- int r = mysystem(output, cmd);
+ r = mysystem(output, cmd);
return r;
}
return 0;
}
+static int hw_mount_btrfs_subvolumes(const char* source) {
+ const struct btrfs_subvolumes* subvolume = NULL;
+ char path[STRING_SIZE];
+ char options[STRING_SIZE];
+ int r;
+
+ // Loop through the list of known subvolumes.
+ for (subvolume = btrfs_subvolumes; subvolume->name; subvolume++) {
+ // Assign subvolume path.
+ r = snprintf(path, sizeof(path), "%s%s", DESTINATION_MOUNT_PATH, subvolume->mount_path);
+ if (r < 0)
+ return r;
+
+ // Assign subvolume name.
+ r = snprintf(options, sizeof(options), "subvol=%s,%s", subvolume->name, BTRFS_MOUNT_OPTIONS);
+ if (r < 0)
+ return r;
+
+ // Create the directory.
+ r = hw_mkdir(path);
+
+ // Abort if the directory could not be created.
+ if(r != 0 && errno != EEXIST)
+ return r;
+
+ // Print log message
+ fprintf(flog, "Mounting subvolume %s to %s\n", subvolume->name, subvolume->mount_path);
+
+ // Try to mount the subvolume.
+ r = mount(source, path, "btrfs", 0, options);
+ if (r)
+ return r;
+ }
+
+ return 0;
+}
+
int hw_mount_filesystems(struct hw_destination* dest, const char* prefix) {
char target[STRING_SIZE];
+ int r;
assert(*prefix == '/');
const char* filesystem;
switch (dest->filesystem) {
- case HW_FS_REISERFS:
- filesystem = "reiserfs";
- break;
-
case HW_FS_EXT4:
case HW_FS_EXT4_WO_JOURNAL:
filesystem = "ext4";
filesystem = "xfs";
break;
+ case HW_FS_BTRFS:
+ filesystem = "btrfs";
+ break;
+
case HW_FS_FAT32:
filesystem = "vfat";
break;
}
// root
- int r = hw_mount(dest->part_root, prefix, filesystem, 0);
- if (r)
- return r;
+ if (dest->filesystem == HW_FS_BTRFS) {
+ r = hw_mount_btrfs_subvolumes(dest->part_root);
+ if (r)
+ return r;
+ } else {
+ r = hw_mount(dest->part_root, prefix, filesystem, 0);
+ if (r)
+ return r;
+ }
// boot
- if (*dest->part_boot) {
- snprintf(target, sizeof(target), "%s%s", prefix, HW_PATH_BOOT);
- mkdir(target, S_IRWXU|S_IRWXG|S_IRWXO);
+ snprintf(target, sizeof(target), "%s%s", prefix, HW_PATH_BOOT);
+ r = mkdir(target, S_IRWXU|S_IRWXG|S_IRWXO);
+
+ if (r) {
+ hw_umount_filesystems(dest, prefix);
+
+ return r;
+ }
+ if (*dest->part_boot) {
r = hw_mount(dest->part_boot, target, filesystem, 0);
if (r) {
hw_umount_filesystems(dest, prefix);
}
// bind-mount misc filesystems
- char** otherfs = other_filesystems;
- while (*otherfs) {
- snprintf(target, sizeof(target), "%s%s", prefix, *otherfs);
+ r = hw_bind_mount("/dev", prefix);
+ if (r)
+ return r;
- mkdir(target, S_IRWXU|S_IRWXG|S_IRWXO);
- r = hw_mount(*otherfs, target, NULL, MS_BIND);
- if (r) {
- hw_umount_filesystems(dest, prefix);
+ r = hw_bind_mount("/proc", prefix);
+ if (r)
+ return r;
- return r;
- }
+ r = hw_bind_mount("/sys", prefix);
+ if (r)
+ return r;
- otherfs++;
- }
+ r = hw_bind_mount("/sys/firmware/efi/efivars", prefix);
+ if (r && errno != ENOENT)
+ return r;
return 0;
}
+static int hw_umount_btrfs_layout() {
+ const struct btrfs_subvolumes* subvolume = NULL;
+ char path[STRING_SIZE];
+ int counter = 0;
+ int retry = 1;
+ int r;
+
+ do {
+ // Reset the retry marker
+ retry = 0;
+
+ // Loop through the list of subvolumes
+ for (subvolume = btrfs_subvolumes; subvolume->name; subvolume++) {
+ // Abort if the subvolume path could not be assigned.
+ r = snprintf(path, sizeof(path), "%s%s", DESTINATION_MOUNT_PATH, subvolume->mount_path);
+ if (r < 0)
+ return r;
+
+ // Try to umount the subvolume.
+ r = umount2(path, 0);
+
+ // Handle return codes.
+ if (r) {
+ switch(errno) {
+ case EBUSY:
+ // Set marker to retry the umount.
+ retry = 1;
+
+ // Ignore if the subvolume could not be unmounted yet,
+ // because it is still used.
+ continue;
+
+ case EINVAL:
+ // Ignore if the subvolume already has been unmounted
+ continue;
+ case ENOENT:
+ // Ignore if the directory does not longer exist.
+ continue;
+ default:
+ fprintf(flog, "Could not umount %s from %s - Error: %d\n", subvolume->name, path, r);
+ return r;
+ }
+ }
+
+ // Print log message
+ fprintf(flog, "Umounted %s from %s\n", subvolume->name, path);
+ }
+
+ // Abort loop if all mountpoins got umounted
+ if (retry == 0)
+ return 0;
+
+ // Abort after five failed umount attempts
+ if (counter == 5)
+ return -1;
+
+ // Increment counter.
+ counter++;
+ } while (1);
+}
+
int hw_umount_filesystems(struct hw_destination* dest, const char* prefix) {
int r;
- char target[STRING_SIZE];
// Write all buffers to disk before umounting
hw_sync();
// ESP
if (*dest->part_boot_efi) {
- snprintf(target, sizeof(target), "%s%s", prefix, HW_PATH_BOOT_EFI);
- r = hw_umount(target);
+ r = hw_umount(HW_PATH_BOOT_EFI, prefix);
if (r)
return -1;
}
// boot
if (*dest->part_boot) {
- snprintf(target, sizeof(target), "%s%s", prefix, HW_PATH_BOOT);
- r = hw_umount(target);
+ r = hw_umount(HW_PATH_BOOT, prefix);
if (r)
return -1;
}
}
// misc filesystems
- char** otherfs = other_filesystems;
- while (*otherfs) {
- snprintf(target, sizeof(target), "%s%s", prefix, *otherfs++);
- r = hw_umount(target);
- if (r)
- return -1;
- }
+ r = hw_umount("/sys/firmware/efi/efivars", prefix);
+ if (r)
+ return -1;
+
+ r = hw_umount("/sys", prefix);
+ if (r)
+ return -1;
+
+ r = hw_umount("/proc", prefix);
+ if (r)
+ return -1;
+
+ r = hw_umount("/dev", prefix);
+ if (r)
+ return -1;
// root
- r = hw_umount(prefix);
+ if(dest->filesystem == HW_FS_BTRFS) {
+ r = hw_umount_btrfs_layout();
+ } else {
+ r = hw_umount(prefix, NULL);
+ }
+
if (r)
return -1;
#define FSTAB_FMT "UUID=%s %-8s %-4s %-10s %d %d\n"
int hw_write_fstab(struct hw_destination* dest) {
+ const struct btrfs_subvolumes* subvolume = NULL;
FILE* f = fopen(DESTINATION_MOUNT_PATH "/etc/fstab", "w");
if (!f)
return -1;
char* uuid = NULL;
+ char mount_options[STRING_SIZE];
// boot
if (*dest->part_boot) {
uuid = hw_get_uuid(dest->part_boot);
if (uuid) {
- fprintf(f, FSTAB_FMT, uuid, "/boot", "auto", "defaults", 1, 2);
+ fprintf(f, FSTAB_FMT, uuid, "/boot", "auto", "defaults,nodev,noexec,nosuid", 1, 2);
free(uuid);
}
}
// root
uuid = hw_get_uuid(dest->part_root);
if (uuid) {
- fprintf(f, FSTAB_FMT, uuid, "/", "auto", "defaults", 1, 1);
+ if(dest->filesystem == HW_FS_BTRFS) {
+ // Loop through the list of subvolumes
+ for (subvolume = btrfs_subvolumes; subvolume->name; subvolume++) {
+ // Abort if the mount options could not be assigned
+ int r = snprintf(mount_options, sizeof(mount_options), "defaults,%s,subvol=%s", BTRFS_MOUNT_OPTIONS, subvolume->name);
+ if (r < 0) {
+ return r;
+ }
+
+ // Write the entry to the file
+ fprintf(f, FSTAB_FMT, uuid, subvolume->mount_path, "btrfs", mount_options, 1, 1);
+ }
+ } else {
+ fprintf(f, FSTAB_FMT, uuid, "/", "auto", "defaults", 1, 1);
+ }
+
free(uuid);
}
int hw_restore_backup(const char* output, const char* backup_path, const char* destination) {
char command[STRING_SIZE];
- snprintf(command, sizeof(command), "/bin/tar xzpf %s -C %s", backup_path, destination);
+ snprintf(command, sizeof(command), "/bin/tar xzpf %s -C %s "
+ "--exclude-from=%s/var/ipfire/backup/exclude --exclude-from=%s/var/ipfire/backup/exclude.user",
+ backup_path, destination, destination, destination);
int rc = mysystem(output, command);
if (rc)