<?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$

function wikiplugin_transclude_info()
{
    return [
        'name' => tra('Transclude'),
        'documentation' => tra('PluginTransclude'),
        'description' => tra('Include the content of another page with certain changes'),
        'prefs' => ['wikiplugin_transclude', 'feature_wiki'],
        'extraparams' => true,
        'defaultfilter' => 'text',
        'iconname' => 'copy',
        'introduced' => 6,
        'params' => [
            'page' => [
                'required' => true,
                'name' => tra('Page Name'),
                'description' => tra('Name of the wiki page to use as a template for the values.'),
                'since' => '6.0',
                'default' => '',
                'filter' => 'pagename',
                'profile_reference' => 'wiki_page',
            ],
        ],
    ];
}

class WikiPlugin_Transclude_Replacer
{
    private $params;

    function __construct(array $params)
    {
        $this->params = $params;
    }

    function callback($matches)
    {
        if (isset($this->params[$matches[1]])) {
            return $this->params[$matches[1]];
        }
    }
}

function wikiplugin_transclude($data, $params)
{
    if (! isset($params['page'])) {
        return WikiParser_PluginOutput::argumentError([ 'page' ]);
    }

    $page = $params['page'];
    unset($params['page']);

    global $tikilib;

    if (! Perms::get('wiki page', $page)->view) {
        return WikiParser_PluginOutput::error(tra('Permission Denied'), tra('Attempt to include a page that cannot be viewed.'));
    }

    if ($info = $tikilib->get_page_info($page)) {
        $parts = preg_split('/%%%text%%%/', $info['data']);
        $data = TikiLib::lib('parser')->parse_data($data);
                $pass = $parts[0] . $data . $parts[1];
        return preg_replace_callback(
            '/%%%([A-z0-9]+)%%%/',
            [ new WikiPlugin_Transclude_Replacer($params), 'callback' ],
            $pass
        );
    } else {
        return WikiParser_PluginOutput::error(tr('Page not found'), tr('Page named "%0" does not exist at this time.', $page));
    }
}