hookmanager.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2010-2016 Laurent Destailleur  <eldy@users.sourceforge.net>
 * Copyright (C) 2010-2014 Regis Houssin        <regis.houssin@inodbox.com>
 * Copyright (C) 2010-2011 Juanjo Menent        <jmenent@2byte.es>
 *
 * 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/>.
 */
 
class HookManager
{
  public $db;
 
  public $error = '';
 
  public $errors = array();
 
  // Context hookmanager was created for ('thirdpartycard', 'thirdpartydao', ...)
  public $contextarray = array();
 
  // Array with instantiated classes
  public $hooks = array();
 
  // Array result
  public $resArray = array();
  // Printable result
  public $resPrint = '';
  // Nb of qualified hook ran
  public $resNbOfHooks = 0;
 
  public function __construct($db)
  {
    $this->db = $db;
  }
 
 
  public function initHooks($arraycontext)
  {
    global $conf;
 
    // Test if there is hooks to manage
    if (!is_array($conf->modules_parts['hooks']) || empty($conf->modules_parts['hooks'])) {
      return;
    }
 
    // For backward compatibility
    if (!is_array($arraycontext)) {
      $arraycontext = array($arraycontext);
    }
 
    $this->contextarray = array_unique(array_merge($arraycontext, $this->contextarray)); // All contexts are concatenated
 
    $arraytolog = array();
    foreach ($conf->modules_parts['hooks'] as $module => $hooks) {  // Loop on each module that brings hooks
      if (empty($conf->$module->enabled)) {
        continue;
      }
 
      //dol_syslog(get_class($this).'::initHooks module='.$module.' arraycontext='.join(',',$arraycontext));
      foreach ($arraycontext as $context) {
        if (is_array($hooks)) {
          $arrayhooks = $hooks; // New system
        } else {
          $arrayhooks = explode(':', $hooks); // Old system (for backward compatibility)
        }
 
        if (in_array($context, $arrayhooks) || in_array('all', $arrayhooks)) {    // We instantiate action class only if initialized hook is handled by module
          // Include actions class overwriting hooks
          if (empty($this->hooks[$context][$module]) || !is_object($this->hooks[$context][$module])) {  // If set to an object value, class was already loaded so we do nothing.
            $path = '/'.$module.'/class/';
            $actionfile = 'actions_'.$module.'.class.php';
 
            $arraytolog[] = 'context='.$context.'-path='.$path.$actionfile;
            $resaction = dol_include_once($path.$actionfile);
            if ($resaction) {
              $controlclassname = 'Actions'.ucfirst($module);
              $actionInstance = new $controlclassname($this->db);
              $priority = empty($actionInstance->priority) ? 50 : $actionInstance->priority;
              $this->hooks[$context][$priority.':'.$module] = $actionInstance;
            }
          }
        }
      }
    }
    // Log the init of hook but only for hooks thare are declared to be managed
    if (count($arraytolog) > 0) {
      dol_syslog(get_class($this)."::initHooks Loading hooks: ".join(', ', $arraytolog), LOG_DEBUG);
    }
 
    foreach ($arraycontext as $context) {
      if (!empty($this->hooks[$context])) {
        ksort($this->hooks[$context], SORT_NATURAL);
      }
    }
 
    return 1;
  }
 
  public function executeHooks($method, $parameters = array(), &$object = '', &$action = '')
  {
    if (!is_array($this->hooks) || empty($this->hooks)) {
      return 0; // No hook available, do nothing.
    }
 
    $parameters['context'] = join(':', $this->contextarray);
    //dol_syslog(get_class($this).'::executeHooks method='.$method." action=".$action." context=".$parameters['context']);
 
    // Define type of hook ('output' or 'addreplace').
    $hooktype = 'addreplace';
    // TODO Remove hooks with type 'output' (exemple createFrom). All hooks must be converted into 'addreplace' hooks.
    if (in_array($method, array(
      'createFrom',
      'dashboardAccountancy',
      'dashboardActivities',
      'dashboardCommercials',
      'dashboardContracts',
      'dashboardDonation',
      'dashboardEmailings',
      'dashboardExpenseReport',
      'dashboardHRM',
      'dashboardInterventions',
      'dashboardMRP',
      'dashboardMembers',
      'dashboardOpensurvey',
      'dashboardOrders',
      'dashboardOrdersSuppliers',
      'dashboardProductServices',
      'dashboardProjects',
      'dashboardPropals',
      'dashboardSpecialBills',
      'dashboardSupplierProposal',
      'dashboardThirdparties',
      'dashboardTickets',
      'dashboardUsersGroups',
      'dashboardWarehouse',
      'dashboardWarehouseReceptions',
      'dashboardWarehouseSendings',
      'insertExtraHeader',
      'insertExtraFooter',
      'printLeftBlock',
      'formAddObjectLine',
      'formBuilddocOption',
      'showSocinfoOnPrint'
    ))) {
      $hooktype = 'output';
    }
 
    // Init return properties
    $this->resPrint = '';
    $this->resArray = array();
    $this->resNbOfHooks = 0;
 
    // Here, the value for $method and $hooktype are given.
    // Loop on each hook to qualify modules that have declared context
    $modulealreadyexecuted = array();
    $resaction = 0;
    $error = 0;
    foreach ($this->hooks as $context => $modules) {    // $this->hooks is an array with context as key and value is an array of modules that handle this context
      if (!empty($modules)) {
        // Loop on each active hooks of module for this context
        foreach ($modules as $module => $actionclassinstance) {
          $module = preg_replace('/^\d+:/', '', $module);
          //print "Before hook ".get_class($actionclassinstance)." method=".$method." module=".$module." hooktype=".$hooktype." results=".count($actionclassinstance->results)." resprints=".count($actionclassinstance->resprints)." resaction=".$resaction."<br>\n";
 
          // test to avoid running twice a hook, when a module implements several active contexts
          if (in_array($module, $modulealreadyexecuted)) {
            continue;
          }
 
          // jump to next module/class if method does not exist
          if (!method_exists($actionclassinstance, $method)) {
            continue;
          }
 
          $this->resNbOfHooks++;
 
          $modulealreadyexecuted[$module] = $module;
 
          // Clean class (an error may have been set from a previous call of another method for same module/hook)
          $actionclassinstance->error = 0;
          $actionclassinstance->errors = array();
 
          if (getDolGlobalInt('MAIN_DEBUG_SHOW_EACH_QUALIFIED_HOOK_CALL') >= 2) {
            // This his too much verbose, enabled in develop only
            dol_syslog(get_class($this)."::executeHooks Qualified hook found (hooktype=".$hooktype."). We call method ".get_class($actionclassinstance).'->'.$method.", context=".$context.", module=".$module.", action=".$action.((is_object($object) && property_exists($object, 'id')) ? ', object id='.$object->id : '').((is_object($object) && property_exists($object, 'element')) ? ', object element='.$object->element : ''), LOG_DEBUG);
          }
 
          // Add current context to avoid method execution in bad context, you can add this test in your method : eg if($currentcontext != 'formfile') return;
          // Note: The hook can use the $currentcontext in its code to avoid to be ran twice or be ran for one given context only
          $parameters['currentcontext'] = $context;
          // Hooks that must return int (hooks with type 'addreplace')
          if ($hooktype == 'addreplace') {
            $resactiontmp = $actionclassinstance->$method($parameters, $object, $action, $this); // $object and $action can be changed by method ($object->id during creation for example or $action to go back to other action for example)
            $resaction += $resactiontmp;
 
            if ($resactiontmp < 0 || !empty($actionclassinstance->error) || (!empty($actionclassinstance->errors) && count($actionclassinstance->errors) > 0)) {
              $error++;
              $this->error = $actionclassinstance->error;
              $this->errors = array_merge($this->errors, (array) $actionclassinstance->errors);
              dol_syslog("Error on hook module=".$module.", method ".$method.", class ".get_class($actionclassinstance).", hooktype=".$hooktype.(empty($this->error) ? '' : " ".$this->error).(empty($this->errors) ? '' : " ".join(",", $this->errors)), LOG_ERR);
            }
 
            if (isset($actionclassinstance->results) && is_array($actionclassinstance->results)) {
              if ($resactiontmp > 0) {
                $this->resArray = $actionclassinstance->results;
              } else {
                $this->resArray = array_merge($this->resArray, $actionclassinstance->results);
              }
            }
            if (!empty($actionclassinstance->resprints)) {
              if ($resactiontmp > 0) {
                $this->resPrint = $actionclassinstance->resprints;
              } else {
                $this->resPrint .= $actionclassinstance->resprints;
              }
            }
          } else {
            // Generic hooks that return a string or array (printLeftBlock, formAddObjectLine, formBuilddocOptions, ...)
 
            // TODO. this test should be done into the method of hook by returning nothing
            if (is_array($parameters) && !empty($parameters['special_code']) && $parameters['special_code'] > 3 && $parameters['special_code'] != $actionclassinstance->module_number) {
              continue;
            }
 
            //dol_syslog("Call method ".$method." of class ".get_class($actionclassinstance).", module=".$module.", hooktype=".$hooktype, LOG_DEBUG);
            $resactiontmp = $actionclassinstance->$method($parameters, $object, $action, $this); // $object and $action can be changed by method ($object->id during creation for example or $action to go back to other action for example)
            $resaction += $resactiontmp;
 
            if (!empty($actionclassinstance->results) && is_array($actionclassinstance->results)) {
              $this->resArray = array_merge($this->resArray, $actionclassinstance->results);
            }
            if (!empty($actionclassinstance->resprints)) {
              $this->resPrint .= $actionclassinstance->resprints;
            }
            if (is_numeric($resactiontmp) && $resactiontmp < 0) {
              $error++;
              $this->error = $actionclassinstance->error;
              $this->errors = array_merge($this->errors, (array) $actionclassinstance->errors);
              dol_syslog("Error on hook module=".$module.", method ".$method.", class ".get_class($actionclassinstance).", hooktype=".$hooktype.(empty($this->error) ? '' : " ".$this->error).(empty($this->errors) ? '' : " ".join(",", $this->errors)), LOG_ERR);
            }
 
            // TODO dead code to remove (do not disable this, but fix your hook instead): result must not be a string but an int. you must use $actionclassinstance->resprints to return a string
            if (!is_array($resactiontmp) && !is_numeric($resactiontmp)) {
              dol_syslog('Error: Bug into hook '.$method.' of module class '.get_class($actionclassinstance).'. Method must not return a string but an int (0=OK, 1=Replace, -1=KO) and set string into ->resprints', LOG_ERR);
              if (empty($actionclassinstance->resprints)) {
                $this->resPrint .= $resactiontmp;
              }
            }
          }
 
          //print "After hook context=".$context." ".get_class($actionclassinstance)." method=".$method." hooktype=".$hooktype." results=".count($actionclassinstance->results)." resprints=".count($actionclassinstance->resprints)." resaction=".$resaction."<br>\n";
 
          unset($actionclassinstance->results);
          unset($actionclassinstance->resprints);
        }
      }
    }
 
    return ($error ? -1 : $resaction);
  }
}