From 132ca0305e567b13a0bdf65455e7f04d3d8c33a8 Mon Sep 17 00:00:00 2001
From: Mystery Man <unknown@mandriva.org>
Date: Sat, 20 Aug 2005 21:09:11 +0000
Subject: This commit was manufactured by cvs2svn to create tag
 'V10_3_0_47mdk'.

---
 move/tools/busy-files | 25 -------------------------
 1 file changed, 25 deletions(-)
 delete mode 100755 move/tools/busy-files

(limited to 'move/tools/busy-files')

diff --git a/move/tools/busy-files b/move/tools/busy-files
deleted file mode 100755
index 7426e785a..000000000
--- a/move/tools/busy-files
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/usr/bin/perl
-
-use MDK::Common;
-
-my @pids = grep { $_ ne $$ && /^(\d+)$/ } all('/proc');
-
-my @l = map {
-    grep {
-	$_ && !m!^(/proc/|/dev/|pipe:|socket:)!;
-    } map { readlink($_) } "/proc/$_/exe", glob_("/proc/$_/fd/*");
-} @pids;
-
-push @l, grep { $_ } map { (split)[5] } map { cat_("/proc/$_/maps") } @pids;
-
-if ($ARGV[0] eq '--totem') {
-    @l = grep { m!/(image(_boot)?|cdrom)/! } @l;
-    $ARGV[0] = '--server';
-}
-foreach (uniq @l) {
-    if ($ARGV[0] eq '--server') {
-	s!/image(_always|_boot|_totem)?/!/tmp/live_tree/!;
-	s!/cdrom/live_tree!/tmp/live_tree!;
-    }
-    print "$_\n";
-}
-- 
cgit v1.2.1