filesystem-functions.pl: Add btrfs_create_snapshot() function

This function can be used to very easily create a snapshot.

Signed-off-by: Stefan Schantl <stefan.schantl@ipfire.org>

diff --git a/config/cfgroot/filesystem-functions.pl b/config/cfgroot/filesystem-functions.pl
index f7a39ad6cb8c13eed424c39c145ce56950a36155..b6bc9ca69d2784d9784700fa0943a6c2311d674f 100644 (file)
--- a/config/cfgroot/filesystem-functions.pl
+++ b/config/cfgroot/filesystem-functions.pl
@@ -615,6 +615,22 @@ sub btrfs_get_subvolumes ($) {
        return %subvolumes;
 }
 
+#
+## Easy to use function to create a new snapshot with a given name.
+#
+sub btrfs_create_snapshot ($) {
+       my ($name) = @_;
+
+       # Call btrfsctrl to create the new snapshot and pass the name.
+       my $ret = &General::system("$btrfsctrl", "snapshot-create", "$name");
+
+       # Return the return code if there was one.
+       return $ret if($ret);
+
+       # Return nothing on success.
+       return;
+}
+
 #
 ## Private function to filter the output of btrfs_subvolume_list command.
 ##