lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fix: check if directory exists

Browse Source
This commit is contained in:
Regis Houssin 2010-04-02 11:56:23 +00:00
parent 9793a8f13a
commit 2e595643f5
1 changed files with 69 additions and 58 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

127
htdocs/interfaces.class.php
View File

@ -63,76 +63,87 @@ class Interfaces
dol_syslog('interface::run_triggers was called with wrong parameters object='.is_object($object).' user='.is_object($user).' langs='.is_object($langs).' conf='.is_object($conf), LOG_WARNING); dol_syslog('interface::run_triggers was called with wrong parameters object='.is_object($object).' user='.is_object($user).' langs='.is_object($langs).' conf='.is_object($conf), LOG_WARNING);
} }
$handle=opendir($this->dir); // Load all directory
$modules = array(); $this->getModulesTriggers();
$nbfile = $nbtotal = $nbok = $nbko = 0;
foreach($this->dir as $dir)
while (($file = readdir($handle))!==false)
{ {
if (is_readable($this->dir."/".$file) && preg_match('/^interface_([^_]+)_(.+)\.class\.php$/i',$file,$reg)) // Check if directory exists
if (!is_dir($dir)) continue;
$handle=opendir($dir);
$modules = array();
$nbfile = $nbtotal = $nbok = $nbko = 0;
while (($file = readdir($handle))!==false)
{ {
$nbfile++; if (is_readable($dir."/".$file) && preg_match('/^interface_([^_]+)_(.+)\.class\.php$/i',$file,$reg))
$modName = "Interface".ucfirst($reg[2]);
//print "file=$file"; print "modName=$modName"; exit;
if (in_array($modName,$modules))
{ {
$langs->load("errors"); $nbfile++;
dol_syslog("Interface::run_triggers ".$langs->trans("ErrorDuplicateTrigger",$modName,"/htdocs/includes/triggers/"),LOG_ERR);
continue; $modName = "Interface".ucfirst($reg[2]);
} //print "file=$file"; print "modName=$modName"; exit;
if (in_array($modName,$modules))
// Check if trigger file is disabled by name
if (preg_match('/NORUN$/i',$file))
{
continue;
}
// Check if trigger file is for a particular module
$qualified=true;
if (strtolower($reg[1]) != 'all')
{
$module=preg_replace('/^mod/i','',$reg[1]);
$constparam='MAIN_MODULE_'.strtoupper($module);
if (empty($conf->global->$constparam)) $qualified=false;
}
if (! $qualified)
{
dol_syslog("Interfaces::run_triggers Triggers for file '".$file."' need module to be enabled",LOG_INFO);
continue;
}
dol_syslog("Interfaces::run_triggers Launch triggers for file '".$file."'",LOG_INFO);
include_once($this->dir."/".$file);
$objMod = new $modName($this->db);
$i=0;
if ($objMod)
{
$modules[$i] = $modName;
//dol_syslog("Interfaces::run_triggers Launch triggers for file '".$file."'",LOG_INFO);
$result=$objMod->run_trigger($action,$object,$user,$langs,$conf);
if ($result > 0)
{ {
// Action OK $langs->load("errors");
$nbtotal++; dol_syslog("Interface::run_triggers ".$langs->trans("ErrorDuplicateTrigger",$modName,"/htdocs/includes/triggers/"),LOG_ERR);
$nbok++; continue;
} }
if ($result == 0)
// Check if trigger file is disabled by name
if (preg_match('/NORUN$/i',$file))
{ {
// Aucune action faite continue;
$nbtotal++;
} }
if ($result < 0) // Check if trigger file is for a particular module
$qualified=true;
if (strtolower($reg[1]) != 'all')
{ {
// Action KO $module=preg_replace('/^mod/i','',$reg[1]);
$nbtotal++; $constparam='MAIN_MODULE_'.strtoupper($module);
$nbko++; if (empty($conf->global->$constparam)) $qualified=false;
$this->errors[]=$objMod->error; }
if (! $qualified)
{
dol_syslog("Interfaces::run_triggers Triggers for file '".$file."' need module to be enabled",LOG_INFO);
continue;
}
dol_syslog("Interfaces::run_triggers Launch triggers for file '".$file."'",LOG_INFO);
include_once($dir."/".$file);
$objMod = new $modName($this->db);
$i=0;
if ($objMod)
{
$modules[$i] = $modName;
//dol_syslog("Interfaces::run_triggers Launch triggers for file '".$file."'",LOG_INFO);
$result=$objMod->run_trigger($action,$object,$user,$langs,$conf);
if ($result > 0)
{
// Action OK
$nbtotal++;
$nbok++;
}
if ($result == 0)
{
// Aucune action faite
$nbtotal++;
}
if ($result < 0)
{
// Action KO
$nbtotal++;
$nbko++;
$this->errors[]=$objMod->error;
}
$i++;
} }
$i++;
} }
} }
closedir($handle);
} }
if ($nbko) if ($nbko)
{ {
dol_syslog("Interfaces::run_triggers Files found: ".$nbfile.", Files launched: ".$nbtotal.", Done: ".$nbok.", Failed: ".$nbko, LOG_ERR); dol_syslog("Interfaces::run_triggers Files found: ".$nbfile.", Files launched: ".$nbtotal.", Done: ".$nbok.", Failed: ".$nbko, LOG_ERR);