Lecteur de log HB
'; while ($fichier = readdir($pointeur)) { if($fichier == '.' || $fichier == '..') continue; print '
'.$fichier.'
'; } } else { if (!empty($_GET['file']) && str_replace("..", '' , $_GET['file']) != $_GET['file']) die('Accès au fichier non autorisé !'); $file = dir.$_GET['file']; print '
Fichier :
'.$file.'
'; if(!is_file($file)) die('Fichier introuvable !'); $fichier = @fopen($file,'r+'); $contenu_log = fread($fichier,filesize($file)); fclose($fichier); $exp = "#\[(\d{2}/\d{2}/\d{2} \d{2}:\d{2}:\d{2})\] (\\w{6,13}) : ([^\[]{0,1000}) \[(\d{1,3}.\d{1,3}.\d{1,3}.\d{1,3})\] \[(\w{3,4})\] \[/([^\[]{1,200})\] \[([^\[]{0,200})\] \[([^\[]{0,75})\]#ui"; preg_match_all($exp,htmlentities(trim(str_replace("\n", ' ', $contenu_log))),$m); if (empty($m[0][0])) { print '
'.$contenu_log.'
'; } else { print '
Date
Type
Message
IP + ...
'; foreach($m[0] as $key => $lign) { if (preg_match('#array#', $m[3][$key])) { $exp = "#array \(( '(.{1,10})' => '([^',]{0,1000})',)( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?( '(.{1,10})' => '([^',]{0,1000})',)?#ui"; preg_match_all($exp,$m[3][$key],$mArray); $m[3][$key] = ''; foreach($mArray as $k => $lign) { if ($k == 0 || $k%3 == 1) continue; if ($lign[0] == "") break; if ($k%3 == 2) $m[3][$key] .= '
'.$lign[0].' :
'; else $m[3][$key] .= (strlen($lign[0])>80?'
'.substr($lign[0],0,77).'...
':$lign[0]).'
'; } } if ($m[2][$key] == "ERREUR") print '
'; elseif ($m[2][$key] == "AVERTISSEMENT") print '
'; else print '
'; print '
'.$m[1][$key].'
'.$m[5][$key].'
'.$m[2][$key].'
'.(strlen($m[6][$key])>30?'
'.substr($m[6][$key],0,27).'...
':$m[6][$key]).'
'.$m[3][$key].'
'.$m[4][$key].'
'.$m[8][$key].'
'; } print '
'; } } ?>