summaryrefslogtreecommitdiffstats
path: root/trunk/files/halt.local.cdrom
diff options
context:
space:
mode:
Diffstat (limited to 'trunk/files/halt.local.cdrom')
-rwxr-xr-xtrunk/files/halt.local.cdrom25
1 files changed, 0 insertions, 25 deletions
diff --git a/trunk/files/halt.local.cdrom b/trunk/files/halt.local.cdrom
deleted file mode 100755
index 1e9fc67..0000000
--- a/trunk/files/halt.local.cdrom
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/usr/bin/perl
-
-use lib qw(/usr/lib/libDrakX);
-use MDK::Common;
-use detect_devices;
-use c;
-
-my ($device) = cat_("/proc/mounts") =~ m!(/dev/\S+)\s+/live/media\s+iso9660!;
-$device or exit;
-
-system("chvt 1");
-
-# try to put halt/reboot in cache, if not called directly from them
-# mount is also needed by end of /etc/init.d/halt
-system("$_ --help &>/dev/null") foreach qw(halt mount reboot);
-
-my $f = detect_devices::tryOpen($device);
-# see openCdromTray() from install::any
-ioctl($f, c::CDROM_LOCKDOOR(), 0); # unlock door
-ioctl($f, c::CDROMEJECT(), 0);
-
-print "\n\nPlease press <Enter> (or <CTRL><J>) once the medium is removed.\n";
-system("read < /dev/console");
-
-ioctl($f, c::CDROMCLOSETRAY(), 0);