Gecko [ www.foryou-vip.com ]

Name	Size	Permission	Date
CMailFile.class.php	58.87 KB	-rw-r--r--	2020-10-12 13:33
CSMSFile.class.php	8.42 KB	-rw-r--r--	2020-10-12 13:33
antivir.class.php	5.27 KB	-rw-r--r--	2020-10-12 13:33
canvas.class.php	7.14 KB	-rw-r--r--	2020-10-12 13:33
ccountry.class.php	9.04 KB	-rw-r--r--	2020-10-12 13:33
comment.class.php	9.26 KB	-rw-r--r--	2020-10-12 13:33
commondocgenerator.class.php	65.38 KB	-rw-r--r--	2020-10-12 13:33
commoninvoice.class.php	28.52 KB	-rw-r--r--	2020-10-12 13:33
commonobject.class.php	292.11 KB	-rw-r--r--	2020-10-12 13:33
commonobjectline.class.php	2.84 KB	-rw-r--r--	2020-10-12 13:33
commonorder.class.php	2.64 KB	-rw-r--r--	2020-10-12 13:33
commonstickergenerator.class.php	10.69 KB	-rw-r--r--	2020-10-12 13:33
conf.class.php	36.9 KB	-rw-r--r--	2020-10-12 13:33
coreobject.class.php	11.67 KB	-rw-r--r--	2020-10-12 13:33
cstate.class.php	7.43 KB	-rw-r--r--	2020-10-12 13:33
ctypent.class.php	7.82 KB	-rw-r--r--	2020-10-12 13:33
ctyperesource.class.php	10.84 KB	-rw-r--r--	2020-10-12 13:33
cunits.class.php	13.52 KB	-rw-r--r--	2020-10-12 13:33
discount.class.php	28.9 KB	-rw-r--r--	2020-10-12 13:33
doleditor.class.php	16.77 KB	-rw-r--r--	2020-10-12 13:33
dolexception.class.php	1.02 KB	-rw-r--r--	2020-10-12 13:33
dolgeoip.class.php	6.21 KB	-rw-r--r--	2020-10-12 13:33
dolgraph.class.php	41.43 KB	-rw-r--r--	2020-10-12 13:33
dolreceiptprinter.class.php	38.3 KB	-rw-r--r--	2020-10-12 13:33
emailsenderprofile.class.php	15.08 KB	-rw-r--r--	2020-10-12 13:33
evalmath.class.php	17.03 KB	-rw-r--r--	2020-10-12 13:33
events.class.php	7.99 KB	-rw-r--r--	2020-10-12 13:33
extrafields.class.php	87.62 KB	-rw-r--r--	2020-10-12 13:33
extralanguages.class.php	5.65 KB	-rw-r--r--	2020-10-12 13:33
fileupload.class.php	17.66 KB	-rw-r--r--	2020-10-12 13:33
fiscalyear.class.php	11.05 KB	-rw-r--r--	2020-10-12 13:33
genericobject.class.php	1.19 KB	-rw-r--r--	2020-10-12 13:33
google.class.php	2.4 KB	-rw-r--r--	2020-10-12 13:33
hookmanager.class.php	14.57 KB	-rw-r--r--	2020-10-12 13:33
html.form.class.php	340.25 KB	-rw-r--r--	2020-10-12 13:33
html.formaccounting.class.php	17.42 KB	-rw-r--r--	2020-10-12 13:33
html.formactions.class.php	17.53 KB	-rw-r--r--	2020-10-12 13:33
html.formadmin.class.php	14.52 KB	-rw-r--r--	2020-10-12 13:33
html.formbank.class.php	2.15 KB	-rw-r--r--	2020-10-12 13:33
html.formbarcode.class.php	8.23 KB	-rw-r--r--	2020-10-12 13:33
html.formcategory.class.php	1.95 KB	-rw-r--r--	2020-10-12 13:33
html.formcompany.class.php	36.25 KB	-rw-r--r--	2020-10-12 13:33
html.formcontract.class.php	6.32 KB	-rw-r--r--	2020-10-12 13:33
html.formcron.class.php	3.3 KB	-rw-r--r--	2020-10-12 13:33
html.formfile.class.php	80.61 KB	-rw-r--r--	2020-10-12 13:33
html.formintervention.class.php	4.13 KB	-rw-r--r--	2020-10-12 13:33
html.formmail.class.php	59.87 KB	-rw-r--r--	2020-10-12 13:33
html.formmailing.class.php	1.93 KB	-rw-r--r--	2020-10-12 13:33
html.formmargin.class.php	12.18 KB	-rw-r--r--	2020-10-12 13:33
html.formorder.class.php	3.21 KB	-rw-r--r--	2020-10-12 13:33
html.formother.class.php	61.83 KB	-rw-r--r--	2020-10-12 13:33
html.formprojet.class.php	25.19 KB	-rw-r--r--	2020-10-12 13:33
html.formpropal.class.php	4.85 KB	-rw-r--r--	2020-10-12 13:33
html.formsms.class.php	13.49 KB	-rw-r--r--	2020-10-12 13:33
html.formsocialcontrib.class.php	4.22 KB	-rw-r--r--	2020-10-12 13:33
html.formticket.class.php	41.06 KB	-rw-r--r--	2020-10-12 13:33
html.formwebsite.class.php	9.74 KB	-rw-r--r--	2020-10-12 13:33
index.html	0 B	-rw-r--r--	2020-10-12 13:33
infobox.class.php	12.4 KB	-rw-r--r--	2020-10-12 13:33
interfaces.class.php	15.9 KB	-rw-r--r--	2020-10-12 13:33
ldap.class.php	42.04 KB	-rw-r--r--	2020-10-12 13:33
lessc.class.php	96.78 KB	-rw-r--r--	2020-10-12 13:33
link.class.php	11.63 KB	-rw-r--r--	2020-10-12 13:33
menu.class.php	4.69 KB	-rw-r--r--	2020-10-12 13:33
menubase.class.php	28.75 KB	-rw-r--r--	2020-10-12 13:33
notify.class.php	31.97 KB	-rw-r--r--	2020-10-12 13:33
openid.class.php	16.25 KB	-rw-r--r--	2020-10-12 13:33
rssparser.class.php	21.93 KB	-rw-r--r--	2020-10-12 13:33
smtps.class.php	68.54 KB	-rw-r--r--	2020-10-12 13:33
stats.class.php	19.11 KB	-rw-r--r--	2020-10-12 13:33
translate.class.php	42.22 KB	-rw-r--r--	2020-10-12 13:33
utils.class.php	36.99 KB	-rw-r--r--	2020-10-12 13:33
vcard.class.php	10.56 KB	-rw-r--r--	2020-10-12 13:33
workboardresponse.class.php	1.75 KB	-rw-r--r--	2020-10-12 13:33

Rename

<?php
/* Copyright (C) 2005-2009 Laurent Destailleur <eldy@users.sourceforge.net>
 * Copyright (C) 2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 2010 Regis Houssin <regis.houssin@inodbox.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program. If not, see <https://www.gnu.org/licenses/>.
 */

/**
 *   \file		    htdocs/core/class/interfaces.class.php
 *   \ingroup		core
 *   \brief			Fichier de la classe de gestion des triggers
 */

require_once DOL_DOCUMENT_ROOT.'/core/triggers/dolibarrtriggers.class.php';

/**
 *   Class to manage triggers
 */
class Interfaces
{
    /**
     * @var DoliDB Database handler.
     */
    public $db;

public $dir; // Directory with all core and external triggers files

/**
     * @var string[] Error codes (or messages)
     */
    public $errors = array();

/**
     *	Constructor
     *
     *  @param		DoliDB		$db      Database handler
     */
    public function __construct($db)
    {
        $this->db = $db;
    }

// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
    /**
     *   Function called when a Dolibarr business event occurs
     *   This function call all qualified triggers.
     *
     *   @param		string		$action     Trigger event code
     *   @param     object		$object     Objet concerned. Some context information may also be provided into array property object->context.
     *   @param     User		$user       Objet user
     *   @param     Translate	$langs      Objet lang
     *   @param     Conf		$conf       Objet conf
     *   @return    int         			Nb of triggers ran if no error, -Nb of triggers with errors otherwise.
     */
    public function run_triggers($action, $object, $user, $langs, $conf)
    {
        // phpcs:enable
        // Check parameters
        if (!is_object($object) || !is_object($conf))	// Error
        {
            $this->error = 'function run_triggers called with wrong parameters action='.$action.' object='.is_object($object).' user='.is_object($user).' langs='.is_object($langs).' conf='.is_object($conf);
            dol_syslog(get_class($this).'::run_triggers '.$this->error, LOG_ERR);
            $this->errors[] = $this->error;
            return -1;
        }
        if (!is_object($langs))	// Warning
        {
            dol_syslog(get_class($this).'::run_triggers was called with wrong parameters action='.$action.' object='.is_object($object).' user='.is_object($user).' langs='.is_object($langs).' conf='.is_object($conf), LOG_WARNING);
        }
        if (!is_object($user))	    // Warning
        {
            dol_syslog(get_class($this).'::run_triggers was called with wrong parameters action='.$action.' object='.is_object($object).' user='.is_object($user).' langs='.is_object($langs).' conf='.is_object($conf), LOG_WARNING);
            global $db;
            $user = new User($db);
        }
        //dol_syslog(get_class($this)."::run_triggers action=".$action." Launch run_triggers", LOG_DEBUG);

$nbfile = $nbtotal = $nbok = $nbko = 0;

$files = array();
        $modules = array();
        $orders = array();
        $i = 0;

$dirtriggers = array_merge(array('/core/triggers'), $conf->modules_parts['triggers']);
        foreach ($dirtriggers as $reldir)
        {
            $dir = dol_buildpath($reldir, 0);
            $newdir = dol_osencode($dir);
            //print "xx".$dir;exit;

// Check if directory exists (we do not use dol_is_dir to avoir loading files.lib.php at each call)
            if (!is_dir($newdir)) continue;

$handle = opendir($newdir);
            if (is_resource($handle))
            {
            	$fullpathfiles = array();
                while (($file = readdir($handle)) !== false)
                {
                	$reg = array();
                    if (is_readable($newdir."/".$file) && preg_match('/^interface_([0-9]+)_([^_]+)_(.+)\.class\.php$/i', $file, $reg))
                    {
                        $part1 = $reg[1];
                        $part2 = $reg[2];
                        $part3 = $reg[3];

$nbfile++;

// 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[2]) != 'all')
                        {
                            $module = preg_replace('/^mod/i', '', $reg[2]);
                            $constparam = 'MAIN_MODULE_'.strtoupper($module);
                            if (empty($conf->global->$constparam)) $qualified = false;
                        }

if (!$qualified)
                        {
                            //dol_syslog(get_class($this)."::run_triggers action=".$action." Triggers for file '".$file."' need module to be enabled", LOG_DEBUG);
                            continue;
                        }

$modName = "Interface".ucfirst($reg[3]);
                        //print "file=$file - modName=$modName\n";
                        if (in_array($modName, $modules))    // $modules = list of modName already loaded
                        {
                            $langs->load("errors");
                            dol_syslog(get_class($this)."::run_triggers action=".$action." ".$langs->trans("ErrorDuplicateTrigger", $newdir."/".$file, $fullpathfiles[$modName]), LOG_WARNING);
                            continue;
                        }

try {
                            //print 'Todo for '.$modName." : ".$newdir.'/'.$file."\n";
                            include_once $newdir.'/'.$file;
                            //print 'Done for '.$modName."\n";
                        }
                        catch (Exception $e)
                        {
                            dol_syslog('ko for '.$modName." ".$e->getMessage()."\n", LOG_ERR);
                        }

$modules[$i] = $modName;
                        $files[$i] = $file;
                        $fullpathfiles[$modName] = $newdir.'/'.$file;
                        $orders[$i] = $part1.'_'.$part2.'_'.$part3; // Set sort criteria value

$i++;
                    }
                }

closedir($handle);
            }
        }

asort($orders);

// Loop on each trigger
        foreach ($orders as $key => $value)
        {
            $modName = $modules[$key];
            if (empty($modName)) continue;

$objMod = new $modName($this->db);
            if ($objMod)
            {
                $result = 0;

if (method_exists($objMod, 'runTrigger'))	// New method to implement
                {
                    //dol_syslog(get_class($this)."::run_triggers action=".$action." Launch runTrigger for file '".$files[$key]."'", LOG_DEBUG);
                    $result = $objMod->runTrigger($action, $object, $user, $langs, $conf);
                }
                elseif (method_exists($objMod, 'run_trigger'))	// Deprecated method
                {
                    dol_syslog(get_class($this)."::run_triggers action=".$action." Launch old method run_trigger (rename your trigger into runTrigger) for file '".$files[$key]."'", LOG_WARNING);
                    $result = $objMod->run_trigger($action, $object, $user, $langs, $conf);
                }
                else
                {
                    dol_syslog(get_class($this)."::run_triggers action=".$action." A trigger was declared for class ".get_class($objMod)." but method runTrigger was not found", LOG_ERR);
                }

if ($result > 0)
 {
 // Action OK
 $nbtotal++;
 $nbok++;
 }
 if ($result == 0)
 {
 // Aucune action faite
 $nbtotal++;
 }
 if ($result < 0)
 {
 // Action KO
 //dol_syslog("Error in trigger ".$action." - Nb of error string returned = ".count($objMod->errors), LOG_ERR);
 $nbtotal++;
 $nbko++;
 if (!empty($objMod->errors)) $this->errors = array_merge($this->errors, $objMod->errors);
 elseif (!empty($objMod->error)) $this->errors[] = $objMod->error;
 //dol_syslog("Error in trigger ".$action." - Nb of error string returned = ".count($this->errors), LOG_ERR);
 }
 }
 else
 {
 dol_syslog(get_class($this)."::run_triggers action=".$action." Failed to instantiate trigger for file '".$files[$key]."'", LOG_ERR);
 }
 }

if ($nbko)
        {
            dol_syslog(get_class($this)."::run_triggers action=".$action." Files found: ".$nbfile.", Files launched: ".$nbtotal.", Done: ".$nbok.", Failed: ".$nbko." - Nb of error string returned in this->errors = ".count($this->errors), LOG_ERR);
            return -$nbko;
        }
        else
        {
            //dol_syslog(get_class($this)."::run_triggers Files found: ".$nbfile.", Files launched: ".$nbtotal.", Done: ".$nbok.", Failed: ".$nbko, LOG_DEBUG);
            return $nbok;
        }
    }

/**
     *  Return list of triggers. Function used by admin page htdoc/admin/triggers.
     *  List is sorted by trigger filename so by priority to run.
     *
     *  @param	array		$forcedirtriggers		null=All default directories. This parameter is used by modulebuilder module only.
     * 	@return	array								Array list of triggers
     */
    public function getTriggersList($forcedirtriggers = null)
    {
        global $conf, $langs, $db;

$files = array();
        $fullpath = array();
        $relpath = array();
        $iscoreorexternal = array();
        $modules = array();
        $orders = array();
        $i = 0;

$dirtriggers = array_merge(array('/core/triggers/'), $conf->modules_parts['triggers']);
        if (is_array($forcedirtriggers))
        {
            $dirtriggers = $forcedirtriggers;
        }

foreach ($dirtriggers as $reldir)
        {
            $dir = dol_buildpath($reldir, 0);
            $newdir = dol_osencode($dir);

// Check if directory exists (we do not use dol_is_dir to avoid loading files.lib.php at each call)
            if (!is_dir($newdir)) continue;

$handle = opendir($newdir);
            if (is_resource($handle))
            {
                while (($file = readdir($handle)) !== false)
                {
                	$reg = array();
                    if (is_readable($newdir.'/'.$file) && preg_match('/^interface_([0-9]+)_([^_]+)_(.+)\.class\.php/', $file, $reg))
                    {
                        if (preg_match('/\.back$/', $file)) continue;

$part1 = $reg[1];
                        $part2 = $reg[2];
                        $part3 = $reg[3];

$modName = 'Interface'.ucfirst($reg[3]);
 //print "file=$file"; print "modName=$modName"; exit;
 if (in_array($modName, $modules))
 {
 $langs->load("errors");
 print '<div class="error">'.$langs->trans("Error").' : '.$langs->trans("ErrorDuplicateTrigger", $modName, "/htdocs/core/triggers/").'</div>';
 }
 else
 {
 include_once $newdir.'/'.$file;
 }

$files[$i] = $file;
                        $fullpath[$i] = $dir.'/'.$file;
                        $relpath[$i] = preg_replace('/^\//', '', $reldir).'/'.$file;
                        $iscoreorexternal[$i] = ($reldir == '/core/triggers/' ? 'internal' : 'external');
                        $modules[$i] = $modName;
                        $orders[$i] = $part1.'_'.$part2.'_'.$part3; // Set sort criteria value

$i++;
                    }
                }
                closedir($handle);
            }
        }

asort($orders);

$triggers = array();
        $j = 0;

// Loop on each trigger
        foreach ($orders as $key => $value)
        {
            $modName = $modules[$key];
            if (empty($modName)) continue;

if (!class_exists($modName))
 {
 print 'Error: A trigger file was found but its class "'.$modName.'" was not found.'." \n";
 continue;
 }

$text = '';

try {
	            $objMod = new $modName($db);

if (is_subclass_of($objMod, 'DolibarrTriggers'))
	            {
		            // Define disabledbyname and disabledbymodule
		            $disabledbyname = 0;
		            $disabledbymodule = 1;
		            $module = '';

// Check if trigger file is disabled by name
		            if (preg_match('/NORUN$/i', $files[$key])) $disabledbyname = 1;
		            // Check if trigger file is for a particular module
		            if (preg_match('/^interface_([0-9]+)_([^_]+)_(.+)\.class\.php/i', $files[$key], $reg))
		            {
		                $module = preg_replace('/^mod/i', '', $reg[2]);
		                $constparam = 'MAIN_MODULE_'.strtoupper($module);
		                if (strtolower($module) == 'all') $disabledbymodule = 0;
		                elseif (empty($conf->global->$constparam)) $disabledbymodule = 2;
		                $triggers[$j]['module'] = strtolower($module);
		            }

// We set info of modules
		            $triggers[$j]['picto'] = $objMod->picto ?img_object('', $objMod->picto, 'class="valignmiddle pictomodule "') : img_object('', 'generic', 'class="valignmiddle pictomodule "');
		            $triggers[$j]['file'] = $files[$key];
		            $triggers[$j]['fullpath'] = $fullpath[$key];
		            $triggers[$j]['relpath'] = $relpath[$key];
		            $triggers[$j]['iscoreorexternal'] = $iscoreorexternal[$key];
		            $triggers[$j]['version'] = $objMod->getVersion();
		            $triggers[$j]['status'] = img_picto($langs->trans("Active"), 'tick');
		            if ($disabledbyname > 0 || $disabledbymodule > 1) $triggers[$j]['status'] = '';

$text = ''.$langs->trans("Description").': ';
		 $text .= $objMod->getDesc().' ';
		 $text .= ' '.$langs->trans("Status").': ';
		 if ($disabledbyname == 1)
		 {
		 $text .= $langs->trans("TriggerDisabledByName").' ';
		 if ($disabledbymodule == 2) $text .= $langs->trans("TriggerDisabledAsModuleDisabled", $module).' ';
		 }
		 else
		 {
		 if ($disabledbymodule == 0) $text .= $langs->trans("TriggerAlwaysActive").' ';
		 if ($disabledbymodule == 1) $text .= $langs->trans("TriggerActiveAsModuleActive", $module).' ';
		 if ($disabledbymodule == 2) $text .= $langs->trans("TriggerDisabledAsModuleDisabled", $module).' ';
		 }
	 }
	 else {
	 	print 'Error: Trigger '.$modName.' does not extends DolibarrTriggers ';
	 }
 }
 catch(Exception $e) {
 	print $e->getMessage();
 }

$triggers[$j]['info'] = $text;
            $j++;
        }
        return $triggers;
    }
}