You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
94 lines
2.5 KiB
94 lines
2.5 KiB
<?php
|
|
|
|
// (c) Copyright by authors of the Tiki Wiki CMS Groupware Project
|
|
//
|
|
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
|
|
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
|
|
// $Id$
|
|
|
|
/**
|
|
* \brief List of Smarty vars
|
|
* \author zaufi <zaufi@sendmail.ru>
|
|
*/
|
|
|
|
require_once('lib/debug/debugger-ext.php');
|
|
|
|
/**
|
|
* \brief Debugger command to list smatry vars
|
|
*/
|
|
class DbgSList extends DebuggerCommand
|
|
{
|
|
/// \b Must have function to announce command name in debugger console
|
|
public function name()
|
|
{
|
|
return 'slist';
|
|
}
|
|
|
|
/// \b Must have function to provide help to debugger console
|
|
public function description()
|
|
{
|
|
return 'Display list of Smarty variables. Better to specify partial name or very long list of vars will returns.';
|
|
}
|
|
|
|
/// \b Must have function to provide help to debugger console
|
|
public function syntax()
|
|
{
|
|
return 'slist [partial-name]';
|
|
}
|
|
|
|
/// \b Must have function to show example of usage of given command
|
|
public function example()
|
|
{
|
|
return 'slist' . "\n" . 'slist auth' . "\n" . 'slist ^wiki' . "\n" . 'slist .+admin.*';
|
|
}
|
|
|
|
/// Execute command with given set of arguments.
|
|
public function execute($params)
|
|
{
|
|
$this->set_result_type(HTML_RESULT);
|
|
|
|
// Is regex to match against var name given?
|
|
$p = explode(' ', trim($params));
|
|
$mask = count($p) > 0 ? str_replace('$', '', trim($p[0])) : '';
|
|
// Get list of vars
|
|
$smarty = TikiLib::lib('smarty');
|
|
$tpl_vars = $smarty->getTemplateVars();
|
|
// convert to vector of names and sort
|
|
$vars = [];
|
|
$len = strlen($mask);
|
|
|
|
foreach ($tpl_vars as $key => $val) {
|
|
if (! $len || $len && preg_match('/' . $mask . '/', $key)) {
|
|
$vars[] = $key;
|
|
}
|
|
}
|
|
|
|
sort($vars);
|
|
//
|
|
$result = '<table border=0>';
|
|
$row = '<tr>';
|
|
$idx = 0;
|
|
|
|
foreach ($vars as $var) {
|
|
if (($idx % 3) == 0) {
|
|
$result .= $row . '</tr>';
|
|
|
|
$row = '<tr><td>$' . $var . '</td>';
|
|
$idx = 1;
|
|
} else {
|
|
$row .= '<td>$' . $var . '</td>';
|
|
|
|
$idx++;
|
|
}
|
|
}
|
|
|
|
$result .= '</table>';
|
|
return $result;
|
|
}
|
|
}
|
|
|
|
/// Class factory to create instances of defined commands
|
|
function dbg_command_factory_slist()
|
|
{
|
|
return new DbgSList();
|
|
}
|