Windows üzerinde bilgisayar bilgilerini yakalar bir araç için php ile bir günlük işlevi yapmak için çalışıyorum. Bir txt dosyası her 15 saniyede içeriden bilgi ile imal edilecektir. i kullanıcı erişim diğer sayfaları ve değil kesilebilir ederken arka planda çalıştırmak yapmak istiyorum.
İşte şimdi kullanıyorum kod
<?php
$tracker = $_GET['counter'];
if (isset($tracker) && $tracker == 1)
{
$_SESSION['tracker'] = 1;
$query = "SELECT hostname FROM computers ORDER BY hostname ASC";
$computer_search = mysql_query($query);
confirm_query($computer_search);
while ($computers = mysql_fetch_array($computer_search)){
$COMP = $computers['hostname'];
$time = time();
shell_exec('perl logger.pl ' . $COMP . ' >> logs/' . $COMP . '-' . $time . '.txt');
}
redirect_to('index.php?tracker=1');
}
elseif (isset($tracker) && $tracker == 0)
{
$_SESSION['tracker'] = 0;
redirect_to('index.php?tracker=0');
}
?>
İlk başta ben kullanmaya çalıştı
$query = "SELECT hostname FROM computers ORDER BY hostname ASC";
$computer_search = mysql_query($query);
confirm_query($computer_search);
while ($computers = mysql_fetch_array($computer_search)){
$COMP = $computers['hostname'];
$time = time();
// 1 is the counter entered into the perl script
shell_exec('nohup perl logger.pl ' . $COMP . ' 1 > /dev/null 2> /dev/null >> logs/' . $COMP . '-' . $time . '.txt');
}
Ancak kodu yalnızca bir bilgisayar bilgilerini yakalar ve bir sonraki bilgisayarın bilgi çekmeden önce döngüde takılıyor. Öte yandan, ilk kod yalnızca bir kez tüm bilgisayarların verilerini yakalar ama.
Logger.pl için burada ben yaptım.
!/usr/bin/perl -w
use BER;
use SNMP_util;
use SNMP_Session;
$MIB1 = ".1.3.6.1.2.1.25.3.3.1.2"; #Cpu Processors
$MIB2 = ".1.3.6.1.2.1.1.3"; #System Uptime
$MIBIPAdd = ".1.3.6.1.2.1.4.20.1.1";
$HOST = shift;
# taken out for 1st code
#$tracker = shift;
#while ($tracker == 1)
{
print "Computer Name: $HOST\n";
$count = 0;
# ($MIB1) && ($HOST) || die "Usage: $0 MIB_OID HOSTNAME";
(@values) = &snmpwalk("$HOST","$MIB1");
foreach $value (@values)
{
$count++;
if ($value) {
$goodvalue = &strip_comment($value);
print "CPU Usage of Processor $count: $goodvalue%\n"; }
if ($value > 90){
print "Warning: CPU Usage over 90%! \n"
}
else { warn "No response from host :$HOST:\n"; }
}
(@valuesIP) = &snmpwalk("$HOST","$MIBIPAdd");
$ipaddress = &strip_comment($valuesIP[1]);
print "IP Address: $ipaddress \n";
($value) = &snmpwalk("public\@$HOST","$MIB2");
if ($value) {
$goodvalue = &strip_comment($value);
print "System Up Time: $goodvalue\n"; }
else { print "No response from host: $HOST\n"; }
print "\n";
sleep(15);
}
sub strip_comment
{
$theline = shift;
$where = index($theline, ":");
if($where eq -1){
return $theline;
}
$selectedpart = substr($theline, $where);
$goodpart = substr($selectedpart, 1);
return $goodpart;
}