From aea98e9ff61f04e7e57fc77cecaada4456d48324 Mon Sep 17 00:00:00 2001
From: tv <tv@99302b65-d5f7-0310-b3dd-f8cd6f4e3d94>
Date: Fri, 9 May 2008 14:28:37 +0000
Subject: (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
---
 draksnapshot-applet | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

(limited to 'draksnapshot-applet')

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');
 }
 
-- 
cgit v1.2.1