<?php
/**
 * Smarty plugin for testing scopes
 *


 */

use Smarty\DataObject;
use Smarty\Template;

/**
 * Smarty {checkvar}
 *
 * @param array $params parameter array
 * @param Template $template template object
 *
 * @return string
 */
function smarty_function_checkvar($params, \Smarty\Template $template)
{
    $output = '';
    $types = ['template', 'data', 'global'];
    if (isset($params['types'])) {
        $types = (array)$params['types'];
    }
    $var = $params['var'];
    $ptr = $template;
    while ($ptr) {
        if (in_array('template', $types) && $ptr instanceof Template) {
            $output .= "#{$ptr->source->name}:\${$var} =";
            $output .= $ptr->hasVariable($var) ? preg_replace('/\s/', '', var_export($ptr->getValue($var), true)) : '>unassigned<';
            $i = 0;
            while (isset($ptr->_var_stack[ $i ])) {
                $output .= "#{$ptr->_var_stack[ $i ]['name']} = ";
                $output .= isset($ptr->_var_stack[ $i ][ 'tpl' ][$var]) ? preg_replace('/\s/', '', var_export($ptr->_var_stack[ $i ][ 'tpl' ][$var]->value, true)) : '>unassigned<';
                $i ++;
            }
            $ptr = $ptr->parent;
        } elseif (in_array('data', $types) && $ptr instanceof DataObject) {
            $output .= "#data:\${$var} =";
            $output .= $ptr->hasVariable($var) ? preg_replace('/\s/', '', var_export($ptr->getValue($var), true)) : '>unassigned<';
            $ptr = $ptr->parent;
        } else {
            $ptr = null;
        }
    }
    if (in_array('global', $types)) {
        $output .= "#global:\${$var} =";
        $output .= $template->smarty->hasVariable($var) ?
            preg_replace('/\s/', '', var_export($template->smarty->getValue($var), true)) : '>unassigned<';
    }
    return $output;
}