add partition "loop" type to be able to mount partitions in initrd

1 files changed, 11 insertions, 0 deletions

diff --git a/draklive b/draklive
index ae192b8..b8c205f 100755
--- a/draklive
+++ b/draklive
@@ -266,6 +266,17 @@ my %loop = (
         },
     },
     plain => {},
+    partition => {
+	files => [ '/sbin/fsck', '/sbin/blkid' ],
+	mount => sub {
+	    my ($live, $dir) = @_;
+            my $fsck = "/bin/fsck";
+	    (
+	     qq(sh -c 'dev=`blkid -l -t $dir->{path} -o device`; [ -z "\$dev" ] || $fsck -a \$dev || $fsck -y \$dev'),
+	     "mount -t $dir->{fs} $dir->{path} $live->{prefix}{live}{mnt}$dir->{mountpoint}",
+	    );
+	},
+    },
     tmpfs => {
         mount => sub {
             my ($live, $dir) = @_;