midcom_helper_style

Complexity

Total Complexity

29

Size/Duplication

Total Lines	283
Duplicated Lines	0 %

Test Coverage

Coverage

70.3%

Importance

Changes	1
Bugs	0	Features	0

13 Methods

Rating	Name	Duplication	Size	Complexity
A	__construct()	0	3	1
A	show()	0	21	4
A	load()	0	11	2
A	append_styledir()	0	6	2
A	prepend_substyle()	0	11	2
A	show_midcom()	0	22	4
A	append_substyle()	0	15	3
A	prepend_styledir()	0	6	2
A	render()	0	18	4
A	append_component_styledir()	0	5	1
A	enter_context()	0	13	2
A	leave_context()	0	10	1
A	prepend_component_styledir()	0	5	1

<?php
/**
 * @package midcom.helper
 * @author The Midgard Project, http://www.midgard-project.org
 * @copyright The Midgard Project, http://www.midgard-project.org
 * @license http://www.gnu.org/licenses/lgpl.html GNU Lesser General Public License
 */

use midcom\templating\loader;

/**
 * This class is responsible for all style management. It is
 * accessible through the midcom::get()->style object.
 *
 * The method <code>show($style)</code> returns the style element $style for the current
 * component:
 *
 * It checks whether a style path is defined for the current component.
 *
 * - If there is a user defined style path, the element named $style in
 *   this path is returned,
 * - otherwise the element "$style" is taken from the default style of the
 *   current component (/path/to/component/style/$path).
 *
 * (The default fallback is always the default style, e.g. if $style
 * is not in the user defined style path)
 *
 * To enable cross-style referencing and provide the opportunity to access
 * any style element, "show" can be called with a full qualified style
 * path (like "/mystyle/element1", while the current page's style may be set
 * to "/yourstyle").
 *
 * Note: To make sure sub-styles and elements included in styles are handled
 * correctly, use:
 *
 * <code>
 * <?php midcom_show_style ("elementname"); ?>
 * </code>
 *
 * @package midcom.helper
 */
class midcom_helper_style
{
    /**
     * Current topic
     *
     * @var midcom_db_topic
     */
    private $_topic;

    /**
     * Context stack
     *
     * @var midcom_core_context[]
     */
    private $_context = [];

    /**
     * List of styledirs to handle after componentstyle
     *
     * @var array
     */
    private $_styledirs_append = [];

    /**
     * List of styledirs to handle before componentstyle
     *
     * @var array
     */
    private $_styledirs_prepend = [];

    /**
     * @var loader
     */
    private $loader;

    /**
     * Data to pass to the style
     *
     * @var array
     */
    public $data;

    public function __construct()
    {
        $this->loader = new loader;
    }

    /**
     * Looks for a style element matching $path (either in a user defined style
     * or the default style snippetdir) and displays/evaluates it.
     *
     * @param string $path    The style element to show.
     * @return boolean            True on success, false otherwise.
     */
    public function show($path) : bool
    {
        if ($this->_context === []) {
            debug_add("Trying to show '{$path}' but there is no context set", MIDCOM_LOG_INFO);
            return false;
        }

        $style = $this->load($path);

        if ($style === null) {
            if ($path == 'ROOT') {
                // Go to fallback ROOT instead of displaying a blank page
                return $this->show_midcom($path);
            }

            debug_add("The element '{$path}' could not be found.", MIDCOM_LOG_INFO);
            return false;
        }
        $this->render($style, $path);

        return true;
    }

    /**
     * Load style element content
     *
     * @param string $path The element name
     */
    private function load($path) : ?string
    {
        $element = $path;
        // we have full qualified path to element
        if (preg_match("|(.*)/(.*)|", $path, $matches)) {
            $styleid = midcom_db_style::id_from_path($matches[1]);
            $element = $matches[2];
        }
        $scope = $styleid ?? $this->_context[0]->get_custom_key(midcom_db_style::class);

        return $this->loader->get_element($element, $scope);

It seems like $scope can also be of type false; however, parameter $scope of midcom\templating\loader::get_element() does only seem to accept integer|null, maybe add an additional type check?

    }

    /**
     * Renders the style element with current request data
     *
     * @param string $style The style element content
     * @param string $path the element's name
     * @throws midcom_error
     */
    private function render(string $style, string $path)
    {
        if (midcom::get()->config->get('wrap_style_show_with_name')) {
            $style = "\n<!-- Start of style '{$path}' -->\n" . $style;
            $style .= "\n<!-- End of style '{$path}' -->\n";
        }

        // Resolve variables
        $preparsed = midcom_helper_formatter::compile($style);

        if (midcom_core_context::get()->has_custom_key('request_data')) {
            $data =& midcom_core_context::get()->get_custom_key('request_data');

The assignment to $data is dead and can be removed.

        }

        try {
            eval('?>' . $preparsed);

The use of eval() is discouraged.

        } catch (ParseError $e) {

catch (\ParseError $e) is not reachable.

            throw new midcom_error("Failed to parse style element '{$path}': " . $e->getMessage() . ' in line ' . $e->getLine());
        }
    }

    /**
     * Looks for a midcom core style element matching $path and displays/evaluates it.
     * This offers a bit reduced functionality and will only look in the DB root style,
     * the theme directory and midcom's style directory, because it has to work even when
     * midcom is not yet fully initialized
     *
     * @param string $path    The style element to show.
     * @return boolean            True on success, false otherwise.
     */
    public function show_midcom($path) : bool
    {
        try {
            $root_topic = midcom_core_context::get()->get_key(MIDCOM_CONTEXT_ROOTTOPIC);
            if ($root_topic->style) {
                $db_style = midcom_db_style::id_from_path($root_topic->style);
            }
        } catch (midcom_error_forbidden $e) {
            $e->log();
        }

        $loader = clone $this->loader;
        $loader->set_directories(null, [MIDCOM_ROOT . '/midcom/style'], []);

        $_style = $loader->get_element($path, $db_style ?? null);

        if ($_style !== null) {
            $this->render($_style, $path);
            return true;
        }
        debug_add("The element '{$path}' could not be found.", MIDCOM_LOG_INFO);
        return false;
    }

    /**
     * Adds an extra style directory to check for style elements at
     * the end of the styledir queue.
     *
     * @throws midcom_error exception if directory does not exist.
     */
    public function append_styledir(string $dirname)
    {
        if (!file_exists($dirname)) {
            throw new midcom_error("Style directory $dirname does not exist!");
        }
        $this->_styledirs_append[midcom_core_context::get()->id][] = $dirname;
    }

    /**
     * Function prepend styledir
     */
    public function prepend_styledir(string $dirname)
    {
        if (!file_exists($dirname)) {
            throw new midcom_error("Style directory {$dirname} does not exist.");
        }
        $this->_styledirs_prepend[midcom_core_context::get()->id][] = $dirname;
    }

    /**
     * Append the styledir of a component to the queue of styledirs.
     */
    public function append_component_styledir(string $component)
    {
        $loader = midcom::get()->componentloader;
        $path = $loader->path_to_snippetpath($component) . "/style";
        $this->append_styledir($path);
    }

    /**
     * Prepend the styledir of a component
     */
    public function prepend_component_styledir(string $component)
    {
        $loader = midcom::get()->componentloader;
        $path = $loader->path_to_snippetpath($component) . "/style";
        $this->prepend_styledir($path);
    }

    /**
     * Appends a substyle after the currently selected component style.
     *
     * Enables a depth of more than one style during substyle selection.
     */
    public function append_substyle(string $newsub)
    {
        // Make sure try to use only the first argument if we get space separated list, fixes #1788
        if (strpos($newsub, ' ') !== false) {
            $newsub = preg_replace('/^(.+?) .+/', '$1', $newsub);
        }

        $context = midcom_core_context::get();
        $current_style = $context->get_key(MIDCOM_CONTEXT_SUBSTYLE);

        if (!empty($current_style)) {
            $newsub = $current_style . '/' . $newsub;
        }

        $context->set_key(MIDCOM_CONTEXT_SUBSTYLE, $newsub);
    }

    /**
     * Prepends a substyle before the currently selected component style.
     *
     * Enables a depth of more than one style during substyle selection.
     *
     * @param string $newsub The substyle to prepend.
     */
    function prepend_substyle($newsub)
    {
        $context = midcom_core_context::get();
        $current_style = $context->get_key(MIDCOM_CONTEXT_SUBSTYLE);

        if (!empty($current_style)) {
            $newsub .= "/" . $current_style;
        }
        debug_add("Updating Component Context Substyle from $current_style to $newsub");

        $context->set_key(MIDCOM_CONTEXT_SUBSTYLE, $newsub);
    }

    /**
     * Switches the context (see dynamic load).
     *
     * Private variables are adjusted, and the prepend and append styles are merged with the componentstyle.
     * You cannot change the style stack after that (unless you call enter_context again of course).
     *
     * @param midcom_core_context $context The context to enter
     */
    public function enter_context(midcom_core_context $context)
    {
        // set new context and topic
        array_unshift($this->_context, $context); // push into context stack

        if ($this->_topic = $context->get_key(MIDCOM_CONTEXT_CONTENTTOPIC)) {

It seems like $context->get_key(MIDCOM_CONTEXT_CONTENTTOPIC) can also be of type false. However, the property $_topic is declared as type midcom_db_topic. Maybe add an additional type check?

            $this->loader->initialize_from_topic($this->_topic, $context);
        }

        $this->loader->set_directories(
            $this->_topic,
            $this->_styledirs_prepend[$context->id] ?? [],
            $this->_styledirs_append[$context->id] ?? []
        );
    }

    /**
     * Switches the context (see dynamic load). Private variables $_context, $_topic
     * and $loader are adjusted.
     *
     * @todo check documentation
     */
    public function leave_context()
    {
        array_shift($this->_context);
        $previous_context = $this->_context[0] ?? midcom_core_context::get();

        $this->_topic = $previous_context->get_key(MIDCOM_CONTEXT_CONTENTTOPIC);

It seems like $previous_context->get_key(MIDCOM_CONTEXT_CONTENTTOPIC) can also be of type false. However, the property $_topic is declared as type midcom_db_topic. Maybe add an additional type check?

        $this->loader->set_directories(
            $this->_topic,

It seems like $this->_topic can also be of type false; however, parameter $topic of midcom\templating\loader::set_directories() does only seem to accept midcom_db_topic|null, maybe add an additional type check?

            $this->_styledirs_prepend[$previous_context->id] ?? [],
            $this->_styledirs_append[$previous_context->id] ?? []
        );
    }
}