(firstCheck) exclude root fs from found USB discs

git-svn-id: http://svn.mandriva.com/svn/soft/draksnapshot/trunk@242420 99302b65-d5f7-0310-b3dd-f8cd6f4e3d94

1 files changed, 18 insertions, 0 deletions

diff --git a/draksnapshot-applet b/draksnapshot-applet
index 6e6265b..a44a1ba 100755
--- a/draksnapshot-applet
+++ b/draksnapshot-applet
@@ -170,6 +170,24 @@ sub configure() {
 
 sub firstCheck() {
     my @discs = grep { $_->{usb_bus} && detect_devices::may_be_a_hd($_) } detect_devices::getSCSI();
+
+    # find root fs:
+    my $root;
+    foreach (cat_("/etc/mtab"), cat_("/proc/mounts")) {
+        my ($dev, $mntpoint) = split;
+        if ($mntpoint eq '/') {
+            $root = $dev;
+            last;
+        }
+    }
+
+    # we just want the basename of the root disc:
+    $root =~ s!.*/!!;
+    $root =~ s!\d*$!!;
+
+    # exclude root fs from found USB discs:
+    @discs = grep { $_ ne $root } map { $_->{device} } @discs;
+
     go2State(@discs ? 'disk_found' : 'okay');
 }