Files
sterivein/core/lib/Thelia/Log/Tlog.php
2012-12-21 15:03:26 +01:00

377 lines
9.7 KiB
PHP

<?php
namespace Thelia\Log;
use Thelia\Model\Config;
class Tlog
{
// Nom des variables de configuration
const VAR_NIVEAU = "tlog_niveau";
const VAR_DESTINATIONS = "tlog_destinations";
const VAR_PREFIXE = "tlog_prefixe";
const VAR_FILES = "tlog_files";
const VAR_IP = "tlog_ip";
const VAR_SHOW_REDIRECT = "tlog_show_redirect";
// Les differents niveaux de trace
const TRACE = 1;
const DEBUG = 2;
const WARNING = 3;
const INFO = 4;
const ERROR = 5;
const FATAL = 6;
const MUET = PHP_INT_MAX;
// Valeurs par defaut
const DEFAUT_NIVEAU = self::MUET;
const DEFAUT_DESTINATIONS = "Thelia\Log\Destination\TlogDestinationHtml";
const DEFAUT_PREFIXE = "#NUM: #NIVEAU [#FICHIER:#FONCTION()] {#LIGNE} #DATE #HEURE: ";
const DEFAUT_FILES = "*";
const DEFAUT_IP = "";
const DEFAUT_SHOW_REDIRECT = 0;
private static $instance = false;
protected $destinations = array();
protected $mode_back_office = false;
protected $niveau = self::MUET;
protected $prefixe = "";
protected $files = array();
protected $all_files = false;
protected $show_redirect = false;
private $linecount = 0;
protected static $ecrire_effectue = false;
// Les repertoires où rechercher les classes destination
public $dir_destinations = array();
public static function instance() {
if (self::$instance == false) {
self::$instance = new Tlog();
// On doit placer les initialisations à ce niveau pour pouvoir
// utiliser la classe Tlog dans les classes de base (Cnx, BaseObj, etc.)
// Les placer dans le constructeur provoquerait une boucle
self::$instance->init();
}
return self::$instance;
}
protected function init() {
$niveau = Config::read(self::VAR_NIVEAU, self::DEFAUT_NIVEAU);
$this->set_niveau($niveau);
$this->dir_destinations = array(
__DIR__.'/tlog/destinations'
//, __DIR__.'/../client/tlog/destinations'
);
$this->set_prefixe(Config::read(self::VAR_PREFIXE, self::DEFAUT_PREFIXE));
$this->set_files(Config::read(self::VAR_FILES, self::DEFAUT_FILES));
$this->set_ip(Config::read(self::VAR_IP, self::DEFAUT_IP));
$this->set_destinations(Config::read(self::VAR_DESTINATIONS, self::DEFAUT_DESTINATIONS));
$this->set_show_redirect(Config::read(self::VAR_SHOW_REDIRECT, self::DEFAUT_SHOW_REDIRECT));
// Au cas ou il y aurait un exit() quelque part dans le code.
register_shutdown_function(array($this, 'ecrire_si_exit'));
}
// Configuration
// -------------
public function set_destinations($destinations) {
if (! empty($destinations)) {
$this->destinations = array();
$classes_destinations = explode(';', $destinations);
$this->charger_classes_destinations($this->destinations, $classes_destinations);
}
}
public function set_niveau($niveau) {
$this->niveau = $niveau;
}
public function set_prefixe($prefixe) {
$this->prefixe = $prefixe;
}
public function set_files($files) {
$this->files = explode(";", $files);
$this->all_files = in_array('*', $this->files);
}
public function set_ip($ips) {
if (! empty($ips) && ! in_array($_SERVER['REMOTE_ADDR'], explode(";", $ips))) $this->niveau = self::MUET;
}
public function set_show_redirect($bool) {
$this->show_redirect = $bool;
}
// Configuration d'une destination
public function set_config($destination, $param, $valeur) {
if (isset($this->destinations[$destination])) {
$this->destinations[$destination]->set_config($param, $valeur);
}
}
// Configuration d'une destination
public function get_config($destination, $param) {
if (isset($this->destinations[$destination])) {
return $this->destinations[$destination]->get_config($param);
}
return false;
}
// Methodes d'accès aux traces
// ---------------------------
public static function trace() {
if (Tlog::instance()->niveau > self::TRACE)
return;
$args = func_get_args();
Tlog::instance()->out("TRACE", $args);
}
public static function debug() {
if (Tlog::instance()->niveau > self::DEBUG)
return;
$args = func_get_args();
Tlog::instance()->out("DEBUG", $args);
}
public static function info() {
if (Tlog::instance()->niveau > self::INFO)
return;
$args = func_get_args();
Tlog::instance()->out("INFO", $args);
}
public static function warning() {
if (Tlog::instance()->niveau > self::WARNING)
return;
$args = func_get_args();
Tlog::instance()->out("WARNING", $args);
}
public static function error() {
if (Tlog::instance()->niveau > self::ERROR)
return;
$args = func_get_args();
Tlog::instance()->out("ERREUR", $args);
}
public static function fatal() {
if (Tlog::instance()->niveau > self::FATAL)
return;
$args = func_get_args();
Tlog::instance()->out("FATAL", $args);
}
// Mode back office
public static function mode_back_office($booleen) {
foreach(Tlog::instance()->destinations as $dest) {
$dest->mode_back_office($booleen);
}
}
// Ecriture finale
public static function ecrire(&$res) {
self::$ecrire_effectue = true;
// Muet ? On ne fait rien
if (Tlog::instance()->niveau == self::MUET) return;
foreach(Tlog::instance()->destinations as $dest) {
$dest->ecrire($res);
}
}
public static function ecrire_si_exit() {
// Si les infos de debug n'ont pas été ecrites, le faire maintenant
if (self::$ecrire_effectue === false) {
$res = "";
self::ecrire($res);
echo $res;
}
}
public function afficher_redirections($url) {
if ($this->niveau != self::MUET && $this->show_redirect) {
echo "
<html>
<head><title>Redirection...</title></head>
<body>
<a href=\"$url\">Redirection vers $url</a>
</body>
</html>
";
return true;
}
else {
return false;
}
}
// Permet de déterminer si la trace est active, en prenant en compte
// le niveau et le filtrage par fichier
public function active($niveau) {
if ($this->niveau <= $niveau) {
$origine = $this->trouver_origine();
$file = basename($origine['file']);
if ($this->is_file_active($file)) {
return true;
}
}
return false;
}
public function is_file_active($file) {
return ($this->all_files || in_array($file, $this->files)) && ! in_array("!$file", $this->files);
}
/* -- Methodes privees ---------------------------------------- */
// Adapté de LoggerLoginEvent dans log4php
private function trouver_origine() {
$origine = array();
if(function_exists('debug_backtrace')) {
$trace = debug_backtrace();
$prevHop = null;
// make a downsearch to identify the caller
$hop = array_pop($trace);
while($hop !== null) {
if(isset($hop['class'])) {
// we are sometimes in functions = no class available: avoid php warning here
$className = strtolower($hop['class']);
if (! empty($className) and ($className == 'tlog' or strtolower(get_parent_class($className)) == 'tlog')) {
$origine['line'] = $hop['line'];
$origine['file'] = $hop['file'];
break;
}
}
$prevHop = $hop;
$hop = array_pop($trace);
}
$origine['class'] = isset($prevHop['class']) ? $prevHop['class'] : 'main';
if(isset($prevHop['function']) and
$prevHop['function'] !== 'include' and
$prevHop['function'] !== 'include_once' and
$prevHop['function'] !== 'require' and
$prevHop['function'] !== 'require_once') {
$origine['function'] = $prevHop['function'];
} else {
$origine['function'] = 'main';
}
}
return $origine;
}
private function out($level, $tabargs) {
$text = '';
foreach ($tabargs as $arg) {
$text .= is_scalar($arg) ? $arg : print_r($arg, true);
}
$origine = $this->trouver_origine();
$file = basename($origine['file']);
if ($this->is_file_active($file)) {
$function = $origine['function'];
$line = $origine['line'];
$prefixe = str_replace(
array("#NUM", "#NIVEAU", "#FICHIER", "#FONCTION", "#LIGNE", "#DATE", "#HEURE"),
array(1+$this->linecount, $level, $file, $function, $line, date("Y-m-d"), date("G:i:s")),
$this->prefixe
);
$trace = $prefixe . $text;
foreach($this->destinations as $dest) {
$dest->ajouter($trace);
}
$this->linecount++;
}
}
protected function charger_classes_destinations(&$destinations, $actives = false) {
foreach($this->dir_destinations as $dir) {
$classes = array();
if ($dh = @opendir($dir)) {
while ($file = readdir($dh)) {
if ($file == '.' || $file == '..') continue;
$matches = array();
if (preg_match("/([^\.]+)\.class\.php/", $file, $matches)) {
$classname = $matches[1];
if ( ($actives === false || in_array($classname, $actives)) && ! isset($destinations[$classname])) {
include_once("$dir/$file");
$destinations[$classname] = new $classname();
}
}
}
@closedir($dh);
}
}
}
}