phpldapadmin/lib/hooks.php

204 lines
6.7 KiB
PHP
Raw Normal View History

2009-06-30 09:29:51 +00:00
<?php
// $Header$
2009-06-30 09:29:51 +00:00
/**
* Functions related to hooks management.
*
* 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 2 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
2009-06-30 10:46:00 +00:00
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
2009-06-30 09:29:51 +00:00
* General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
* USA
*
* @author Benjamin Drieu <benjamin.drieu@fr.alcove.com> and Alc<EFBFBD>?ve
* @package phpLDAPadmin
2009-06-30 09:29:51 +00:00
*/
/**
* Compares two arrays by numerically comparing their 'prority'
2009-06-30 10:46:00 +00:00
* value. Standard `cmp-like' function.
2009-06-30 09:29:51 +00:00
*
* @param a First element to compare.
* @param b Second element to compare.
*
* @return -1 if priority of first element is smaller than second
2009-06-30 10:46:00 +00:00
* element priority. 1 otherwise.
2009-06-30 09:29:51 +00:00
*/
2009-06-30 10:46:00 +00:00
function sort_array_by_priority($a,$b) {
2009-08-19 03:39:37 +00:00
if (DEBUG_ENABLED && (($fargs=func_get_args())||$fargs='NOARGS'))
debug_log('Entered (%%)',257,0,__FILE__,__LINE__,__METHOD__,$fargs);
2009-06-30 10:46:00 +00:00
return (($a['priority'] < $b['priority']) ? -1 : 1 );
2009-06-30 09:29:51 +00:00
}
/**
* Runs procedures attached to a hook.
*
* @param hook_name Name of hook to run.
* @param args Array of optional arguments set by phpldapadmin. It is normally in a form known by call_user_func_array() :
*
2009-06-30 09:29:51 +00:00
* <pre>[ 'server_id' => 0,
2009-06-30 10:46:00 +00:00
* 'dn' => 'uid=epoussa,ou=tech,o=corp,o=fr' ]</pre>
2009-06-30 09:29:51 +00:00
*
* @return true if all procedures returned true, false otherwise.
*/
2009-06-30 10:46:00 +00:00
function run_hook($hook_name,$args) {
2009-08-19 03:39:37 +00:00
if (DEBUG_ENABLED && (($fargs=func_get_args())||$fargs='NOARGS'))
debug_log('Entered (%%)',257,0,__FILE__,__LINE__,__METHOD__,$fargs);
2009-06-30 10:46:00 +00:00
2009-08-19 03:39:37 +00:00
$hooks = isset($_SESSION[APPCONFIG]) ? $_SESSION[APPCONFIG]->hooks : array();
2009-06-30 10:46:00 +00:00
2009-08-19 03:39:37 +00:00
if (! count($hooks) || ! array_key_exists($hook_name,$hooks)) {
if (DEBUG_ENABLED)
2009-08-19 03:39:37 +00:00
debug_log('Returning, HOOK not defined (%s)',257,0,__FILE__,__LINE__,__METHOD__,$hook_name);
2009-06-30 10:46:00 +00:00
return true;
}
$rollbacks = array();
2009-06-30 10:46:00 +00:00
reset($hooks[$hook_name]);
/* Execution of procedures attached is done using a numeric order
* since all procedures have been attached to the hook with a
* numerical weight. */
while (list($key,$hook) = each($hooks[$hook_name])) {
if (DEBUG_ENABLED)
2009-08-19 03:39:37 +00:00
debug_log('Calling HOOK Function (%s)(%s)',257,0,__FILE__,__LINE__,__METHOD__,
$hook['hook_function'],$args);
2009-06-30 10:46:00 +00:00
array_push($rollbacks,$hook['rollback_function']);
$result = call_user_func_array($hook['hook_function'],$args);
if (DEBUG_ENABLED)
2009-08-19 03:39:37 +00:00
debug_log('Called HOOK Function (%s)',257,0,__FILE__,__LINE__,__METHOD__,
$hook['hook_function']);
2009-06-30 10:46:00 +00:00
/* If a procedure fails (identified by a false return), its optional rollback is executed with
2009-06-30 10:46:00 +00:00
* the same arguments. After that, all rollbacks from
* previously executed procedures are executed in the reverse
* order. */
if (! is_null($result) && $result == false) {
if (DEBUG_ENABLED)
2009-08-19 03:39:37 +00:00
debug_log('HOOK Function [%s] return (%s)',257,0,__FILE__,__LINE__,__METHOD__,
$hook['hook_function'],$result);
2009-06-30 10:46:00 +00:00
while ($rollbacks) {
$rollback = array_pop($rollbacks);
if ($rollback != false) {
if (DEBUG_ENABLED)
2009-08-19 03:39:37 +00:00
debug_log('HOOK Function Rollback (%s)',257,0,__FILE__,__LINE__,__METHOD__,
$rollback);
2009-06-30 10:46:00 +00:00
call_user_func_array($rollback,$args);
}
}
return false;
2009-06-30 09:29:51 +00:00
}
2009-06-30 10:46:00 +00:00
}
2009-06-30 09:29:51 +00:00
2009-06-30 10:46:00 +00:00
return true;
2009-06-30 09:29:51 +00:00
}
/**
* Adds a procedure to a hook for later execution.
*
* @param hook_name Name of the hook.
* @param hook_function Name of the php function called upon hook trigger.
* @param priority Numeric priority. Lowest means procedure will be executed before.
* @param rollback_function Name of the php rollback function called upon failure.
2009-06-30 09:29:51 +00:00
*/
function add_hook($hook_name,$hook_function,$priority=0,$rollback_function=null) {
2009-08-19 03:39:37 +00:00
if (DEBUG_ENABLED && (($fargs=func_get_args())||$fargs='NOARGS'))
debug_log('Entered (%%)',257,0,__FILE__,__LINE__,__METHOD__,$fargs);
# First, see if the hook function exists.
if (! function_exists($hook_function)) {
system_message(array(
'title'=>_('Hook function does not exist'),
'body'=>sprintf('Hook name: %s<br/>Hook function: %s',$hook_name,$hook_function),
'type'=>'warn'));
return;
}
2009-06-30 11:52:55 +00:00
if (! array_key_exists($hook_name,$_SESSION[APPCONFIG]->hooks))
$_SESSION[APPCONFIG]->hooks[$hook_name] = array();
2009-06-30 09:29:51 +00:00
remove_hook($hook_name,$hook_function,-1,null);
2009-06-30 09:29:51 +00:00
2009-06-30 11:52:55 +00:00
array_push($_SESSION[APPCONFIG]->hooks[$hook_name],array(
'priority' => $priority,
'hook_function' => $hook_function,
'rollback_function' => $rollback_function));
2009-06-30 09:29:51 +00:00
2009-06-30 11:52:55 +00:00
uasort($_SESSION[APPCONFIG]->hooks[$hook_name],'sort_array_by_priority');
2009-06-30 09:29:51 +00:00
}
/**
* Removes a procedure from a hook, based on a filter.
*
* @param hook_name Name of the hook.
* @param priority Numeric priority. If set, all procedures of that priority will be removed.
* @param hook_function Name of the procedure function. If set, all procedures that call this function will be removed.
* @param rollback_function Name of the php rollback function called upon failure. If set, all
* procedures that call this function as a rollback will be removed.
2009-06-30 09:29:51 +00:00
*/
function remove_hook($hook_name,$hook_function,$priority,$rollback_function) {
2009-08-19 03:39:37 +00:00
if (DEBUG_ENABLED && (($fargs=func_get_args())||$fargs='NOARGS'))
debug_log('Entered (%%)',257,0,__FILE__,__LINE__,__METHOD__,$fargs);
2009-06-30 11:52:55 +00:00
if (array_key_exists($hook_name,$_SESSION[APPCONFIG]->hooks)) {
reset($_SESSION[APPCONFIG]->hooks[$hook_name]);
2009-06-30 09:29:51 +00:00
2009-06-30 11:52:55 +00:00
while (list($key,$hook) = each($_SESSION[APPCONFIG]->hooks[$hook_name])) {
2009-06-30 10:46:00 +00:00
if (($priority >= 0 && $priority == $hook['priority']) ||
($hook_function && $hook_function == $hook['hook_function']) ||
($rollback_function && $rollback_function == $hook['rollback_function'])) {
2009-06-30 09:29:51 +00:00
2009-06-30 11:52:55 +00:00
unset($_SESSION[APPCONFIG]->hooks[$hook_name][$key]);
2009-06-30 10:46:00 +00:00
}
}
}
2009-06-30 09:29:51 +00:00
}
/**
* Removes all procedures from a hook.
*
* @param hook_name Name of hook to clear.
*/
2009-06-30 10:46:00 +00:00
function clear_hooks($hook_name) {
2009-08-19 03:39:37 +00:00
if (DEBUG_ENABLED && (($fargs=func_get_args())||$fargs='NOARGS'))
debug_log('Entered (%%)',257,0,__FILE__,__LINE__,__METHOD__,$fargs);
2009-06-30 11:52:55 +00:00
if (array_key_exists($hook_name,$_SESSION[APPCONFIG]->hooks))
unset($_SESSION[APPCONFIG]->hooks[$hook_name]);
2009-06-30 09:29:51 +00:00
}
$hooks = array();
2009-06-30 10:46:00 +00:00
# Evaluating user-made hooks
if (is_dir(HOOKSDIR.'functions')) {
$hooks['dir'] = dir(HOOKSDIR.'functions');
2009-06-30 10:46:00 +00:00
while ($hooks['file'] = $hooks['dir']->read()) {
$script = sprintf('%s/%s/%s',HOOKSDIR,'functions',$hooks['file']);
2009-06-30 09:29:51 +00:00
if (is_file($script) && preg_match('/php[0-9]?$/',$hooks['file']))
require_once $script;
2009-06-30 10:46:00 +00:00
}
2009-06-30 09:29:51 +00:00
$hooks['dir']->close();
2009-06-30 09:29:51 +00:00
}
?>