2 // PukiWiki - Yet another WikiWikiWeb clone.
3 // $Id: plugin.php,v 1.20 2011/01/25 15:01:01 henoheno Exp $
5 // 2002-2005 PukiWiki Developers Team
6 // 2001-2002 Originally written by yu-ji
7 // License: GPL v2 or (at your option) any later version
9 // Plugin related functions
11 define('PKWK_PLUGIN_CALL_TIME_LIMIT', 768);
13 // Set global variables for plugins
14 function set_plugin_messages($messages)
16 foreach ($messages as $name=>$val)
17 if (! isset($GLOBALS[$name]))
18 $GLOBALS[$name] = $val;
21 // Check plugin '$name' is here
22 function exist_plugin($name)
25 static $exist = array(), $count = array();
27 $name = strtolower($name);
28 if(isset($exist[$name])) {
29 if (++$count[$name] > PKWK_PLUGIN_CALL_TIME_LIMIT)
30 die('Alert: plugin "' . htmlsc($name) .
31 '" was called over ' . PKWK_PLUGIN_CALL_TIME_LIMIT .
32 ' times. SPAM or someting?<br />' . "\n" .
33 '<a href="' . get_script_uri() . '?cmd=edit&page='.
34 rawurlencode($vars['page']) . '">Try to edit this page</a><br />' . "\n" .
35 '<a href="' . get_script_uri() . '">Return to frontpage</a>');
39 if (preg_match('/^\w{1,64}$/', $name) &&
40 file_exists(PLUGIN_DIR . $name . '.inc.php')) {
43 require_once(PLUGIN_DIR . $name . '.inc.php');
46 $exist[$name] = FALSE;
52 // Check if plugin API 'action' exists
53 function exist_plugin_action($name) {
54 return function_exists('plugin_' . $name . '_action') ? TRUE : exist_plugin($name) ?
55 function_exists('plugin_' . $name . '_action') : FALSE;
58 // Check if plugin API 'convert' exists
59 function exist_plugin_convert($name) {
60 return function_exists('plugin_' . $name . '_convert') ? TRUE : exist_plugin($name) ?
61 function_exists('plugin_' . $name . '_convert') : FALSE;
64 // Check if plugin API 'inline' exists
65 function exist_plugin_inline($name) {
66 return function_exists('plugin_' . $name . '_inline') ? TRUE : exist_plugin($name) ?
67 function_exists('plugin_' . $name . '_inline') : FALSE;
71 function do_plugin_init($name)
73 static $checked = array();
75 if (isset($checked[$name])) return $checked[$name];
77 $func = 'plugin_' . $name . '_init';
78 if (function_exists($func)) {
79 // TRUE or FALSE or NULL (return nothing)
80 $checked[$name] = call_user_func($func);
82 $checked[$name] = NULL; // Not exist
85 return $checked[$name];
88 // Call API 'action' of the plugin
89 function do_plugin_action($name)
91 if (! exist_plugin_action($name)) return array();
93 if(do_plugin_init($name) === FALSE)
94 die_message('Plugin init failed: ' . $name);
96 $retvar = call_user_func('plugin_' . $name . '_action');
98 // Insert a hidden field, supports idenrtifying text enconding
99 if (PKWK_ENCODING_HINT != '')
100 $retvar = preg_replace('/(<form[^>]*>)/', '$1' . "\n" .
101 '<div><input type="hidden" name="encode_hint" value="' .
102 PKWK_ENCODING_HINT . '" /></div>', $retvar);
107 // Call API 'convert' of the plugin
108 function do_plugin_convert($name, $args = '')
112 if(do_plugin_init($name) === FALSE)
113 return '[Plugin init failed: ' . $name . ']';
115 if (! PKWKEXP_DISABLE_MULTILINE_PLUGIN_HACK) {
117 $pos = strpos($args, "\r"); // "\r" is just a delimiter
118 if ($pos !== FALSE) {
119 $body = substr($args, $pos + 1);
120 $args = substr($args, 0, $pos);
125 $aryargs = array(); // #plugin()
127 $aryargs = csv_explode(',', $args); // #plugin(A,B,C,D)
129 if (! PKWKEXP_DISABLE_MULTILINE_PLUGIN_HACK) {
130 if (isset($body)) $aryargs[] = & $body; // #plugin(){{body}}
134 $retvar = call_user_func_array('plugin_' . $name . '_convert', $aryargs);
135 $digest = $_digest; // Revert
137 if ($retvar === FALSE) {
138 return htmlsc('#' . $name .
139 ($args != '' ? '(' . $args . ')' : ''));
140 } else if (PKWK_ENCODING_HINT != '') {
141 // Insert a hidden field, supports idenrtifying text enconding
142 return preg_replace('/(<form[^>]*>)/', '$1 ' . "\n" .
143 '<div><input type="hidden" name="encode_hint" value="' .
144 PKWK_ENCODING_HINT . '" /></div>', $retvar);
150 // Call API 'inline' of the plugin
151 function do_plugin_inline($name, $args, & $body)
155 if(do_plugin_init($name) === FALSE)
156 return '[Plugin init failed: ' . $name . ']';
159 $aryargs = csv_explode(',', $args);
164 // NOTE: A reference of $body is always the last argument
165 $aryargs[] = & $body; // func_num_args() != 0
168 $retvar = call_user_func_array('plugin_' . $name . '_inline', $aryargs);
169 $digest = $_digest; // Revert
171 if($retvar === FALSE) {
173 return htmlsc('&' . $name . ($args ? '(' . $args . ')' : '') . ';');