Ich kenne keinen Util, aber ich habe mir einen einfachen Code dafür mit Perl gemacht:
#!/usr/bin/perl
use Net::Ping;
use POSIX qw/strftime/;
if (-e '/var/run/net_test.pid') {
print "net_test already running.\n";
exit;
} else {
system "touch /var/run/net_test.pid";
}
my $host = "www.google.com";
my $ping = Net::Ping->new('icmp');
my $result = $ping->ping($host,2);
if ($result != 1) {
$format = strftime('[%d/%m/%Y %H:%M:%S]',localtime)." Internet is not available...";
$run = `echo $format >> /var/log/virtua_net`;
while ($result != 1) {
$result = $ping->ping($host,2);
sleep 60;
}
$format = strftime('[%d/%m/%Y %H:%M:%S]',localtime)." Internet is back...";
$run = `echo $format >> /var/log/virtua_net`;
} else {
$format = strftime('[%d/%m/%Y %H:%M:%S]',localtime)." Internet is ok...";
$run = `echo $format >> /var/log/virtua_net`;
}
$ping->close();
system "rm -rf /var/run/net_test.pid" if (-e "/var/run/net_test.pid");
exit;
Was es tut, ist, dass es versucht, Google jedes Mal zu pingen, wenn es ausgeführt wird, und es dann in eine Datei druckt, wenn es eine Antwort erhalten hat oder nicht, zusammen mit der Zeit, so dass Sie später überprüfen können, von welcher Zeit bis zu welcher Zeit das Internet nicht verfügbar war.
Wenn es Ihnen gefällt, kann ich die kleinen Änderungen vornehmen, die in Windows verwendet werden sollen, und Sie mussten ActivePerl installieren, das ist alles.
Die einzigen erforderlichen Änderungen sind Pfade und Befehle, die unter Windows möglicherweise anders sind.