xref: /plugin/siteexport/syntax/toc.php (revision 1508dbfec88b33df9324f20a4b46aab813beb323)
17d101cc1SGerry Weißbach<?php
27d101cc1SGerry Weißbach/**
37d101cc1SGerry Weißbach * Search with Scopes
47d101cc1SGerry Weißbach *
57d101cc1SGerry Weißbach * @license    GPL 2 (http://www.gnu.org/licenses/gpl.html)
67d101cc1SGerry Weißbach * @author     i-net software <tools@inetsoftware.de>
77d101cc1SGerry Weißbach * @author     Gerry Weissbach <gweissbach@inetsoftware.de>
87d101cc1SGerry Weißbach */
97d101cc1SGerry Weißbach
107d101cc1SGerry Weißbach// must be run within Dokuwiki
117d101cc1SGerry Weißbachif (!defined('DOKU_INC')) die();
127d101cc1SGerry Weißbachif (!defined('DOKU_PLUGIN')) define('DOKU_PLUGIN', DOKU_INC . 'lib/plugins/');
137d101cc1SGerry Weißbach
147d101cc1SGerry Weißbachrequire_once(DOKU_PLUGIN . 'syntax.php');
157d101cc1SGerry Weißbach
167d101cc1SGerry Weißbachclass syntax_plugin_siteexport_toc extends DokuWiki_Syntax_Plugin {
177d101cc1SGerry Weißbach
18d98cce67SGerry Weißbach    private $insideToc = false;
19d98cce67SGerry Weißbach    private $savedToc = array();
20d98cce67SGerry Weißbach    private $options = array();
217d101cc1SGerry Weißbach
22d98cce67SGerry Weißbach    private $mergedPages = array();
23d98cce67SGerry Weißbach    private $includedPages = array();
24300ce4a2SGerry Weißbach    private $merghintIds = array();
25d3a16081SGerry Weißbach    private $mergeHints = array();
267d101cc1SGerry Weißbach
27a8c17ab5Si-net /// software    public function getType() { return 'protected'; }
28a8c17ab5Si-net /// software    public function getPType() { return 'block'; }
29a8c17ab5Si-net /// software    public function getAllowedTypes() { return array('container'); }
30a8c17ab5Si-net /// software    public function getSort() { return 100; }
317d101cc1SGerry Weißbach
327d101cc1SGerry Weißbach    /**
337d101cc1SGerry Weißbach     * Connect pattern to lexer
347d101cc1SGerry Weißbach     */
35a8c17ab5Si-net /// software    public function connectTo($mode) {
367d101cc1SGerry Weißbach        $this->Lexer->addEntryPattern('<toc>(?=.*?</toc>)', $mode, 'plugin_siteexport_toc');
377d101cc1SGerry Weißbach        $this->Lexer->addEntryPattern('<toc .+?>(?=.*?</toc>)', $mode, 'plugin_siteexport_toc');
387d101cc1SGerry Weißbach        $this->Lexer->addSpecialPattern("\[\[.+?\]\]", $mode, 'plugin_siteexport_toc');
397d101cc1SGerry Weißbach    }
407d101cc1SGerry Weißbach
41a8c17ab5Si-net /// software    public function postConnect() {
427d101cc1SGerry Weißbach        $this->Lexer->addExitPattern('</toc.*?>', 'plugin_siteexport_toc');
437d101cc1SGerry Weißbach    }
447d101cc1SGerry Weißbach
45a8c17ab5Si-net /// software    public function handle($match, $state, $pos, Doku_Handler $handler) {
467d101cc1SGerry Weißbach        global $ID, $INFO;
477d101cc1SGerry Weißbach
487d101cc1SGerry Weißbach        switch ($state) {
497d101cc1SGerry Weißbach            case DOKU_LEXER_ENTER:
507d101cc1SGerry Weißbach
517d101cc1SGerry Weißbach                $this->insideToc = true;
52a8c17ab5Si-net /// software                $this->options = explode(' ', substr($match, 5, -1)?:"");
535321bc23SGerry Weißbach                return array('start' => true, 'pos' => $pos, 'options' => $this->options);
547d101cc1SGerry Weißbach
557d101cc1SGerry Weißbach            case DOKU_LEXER_SPECIAL:
567d101cc1SGerry Weißbach
577d101cc1SGerry Weißbach                if ($this->insideToc) {
587d101cc1SGerry Weißbach
597d101cc1SGerry Weißbach                    $link = preg_replace(array('/^\[\[/', '/\]\]$/u'), '', $match);
607d101cc1SGerry Weißbach                    // Split title from URL
617d101cc1SGerry Weißbach                    $link = explode('|', $link, 2);
627d101cc1SGerry Weißbach                    if (!isset($link[1])) {
637d101cc1SGerry Weißbach                        $link[1] = NULL;
647d101cc1SGerry Weißbach                    } else if (preg_match('/^\{\{[^\}]+\}\}$/', $link[1])) {
657d101cc1SGerry Weißbach                        // If the title is an image, convert it to an array containing the image details
667d101cc1SGerry Weißbach                        $link[1] = Doku_Handler_Parse_Media($link[1]);
677d101cc1SGerry Weißbach                    }
687d101cc1SGerry Weißbach                    $link[0] = trim($link[0]);
697d101cc1SGerry Weißbach
707d101cc1SGerry Weißbach                    if (!(preg_match('/^[a-zA-Z0-9\.]+>{1}.*$/u', $link[0]) ||
717d101cc1SGerry Weißbach                    preg_match('/^\\\\\\\\[\w.:?\-;,]+?\\\\/u', $link[0]) ||
727d101cc1SGerry Weißbach                    preg_match('#^([a-z0-9\-\.+]+?)://#i', $link[0]) ||
737d101cc1SGerry Weißbach                    preg_match('<' . PREG_PATTERN_VALID_EMAIL . '>', $link[0]) ||
747d101cc1SGerry Weißbach                    preg_match('!^#.+!', $link[0]))
757d101cc1SGerry Weißbach                    ) {
767d101cc1SGerry Weißbach
777d101cc1SGerry Weißbach                        // Get current depth from call stack
787d101cc1SGerry Weißbach                        $depth = 1;
797d101cc1SGerry Weißbach                        if ($handler->CallWriter instanceof Doku_Handler_List) {
807d101cc1SGerry Weißbach
817d101cc1SGerry Weißbach                            $calls = array_reverse($handler->CallWriter->calls);
827d101cc1SGerry Weißbach                            $call = $calls[0];
837d101cc1SGerry Weißbach                            foreach ($calls as $item) {
847d101cc1SGerry Weißbach                                if (in_array($item[0], array('list_item', 'list_open'))) { $call = $item; break; }
857d101cc1SGerry Weißbach                            }
867d101cc1SGerry Weißbach
871c5b71a7Si-net /// software                            $listType = null;
881c5b71a7Si-net /// software                            $depth = $handler->CallWriter->interpretSyntax($call[1][0], $listType)-1; // Minus one because of plus one inside the interpret function
897d101cc1SGerry Weißbach                        }
907d101cc1SGerry Weißbach
917d101cc1SGerry Weißbach                        if (empty($link[0])) { break; } // No empty elements. This would lead to problems
927d101cc1SGerry Weißbach                        return array($link[0], $link[1], $depth);
937d101cc1SGerry Weißbach                    } else {
947d101cc1SGerry Weißbach                        // use parser! - but with another p
957d101cc1SGerry Weißbach                        $handler->internallink($match, $state, $pos);
967d101cc1SGerry Weißbach                    }
977d101cc1SGerry Weißbach                } else {
987d101cc1SGerry Weißbach                    // use parser!
997d101cc1SGerry Weißbach                    $handler->internallink($match, $state, $pos);
1007d101cc1SGerry Weißbach                }
1017d101cc1SGerry Weißbach
1027d101cc1SGerry Weißbach                return false;
1037d101cc1SGerry Weißbach            case DOKU_LEXER_UNMATCHED:
1047d101cc1SGerry Weißbach
1057d101cc1SGerry Weißbach                $handler->_addCall('cdata', array($match), $pos);
1065321bc23SGerry Weißbach
1077d101cc1SGerry Weißbach                return false;
1087d101cc1SGerry Weißbach            case DOKU_LEXER_EXIT:
1097d101cc1SGerry Weißbach
1107d101cc1SGerry Weißbach                $this->insideToc = false;
1117d101cc1SGerry Weißbach                return 'save__meta';
1127d101cc1SGerry Weißbach        }
1137d101cc1SGerry Weißbach        return false;
1147d101cc1SGerry Weißbach    }
1157d101cc1SGerry Weißbach
116a8c17ab5Si-net /// software    public function render($mode, Doku_Renderer $renderer, $data) {
1177d101cc1SGerry Weißbach        global $ID, $lang, $INFO;
1187d101cc1SGerry Weißbach
1197d101cc1SGerry Weißbach        list($SID, $NAME, $DEPTH) = $data;
1207d101cc1SGerry Weißbach
121ee579aefSGerry Weißbach        resolve_pageid(getNS($ID), $SID, $exists = null);
1224d9989ecSGerry Weißbach//        $SID = cleanID($SID); // hier kein cleanID, da sonst moeglicherweise der anker verloren geht
1237d101cc1SGerry Weißbach
1247d101cc1SGerry Weißbach        //    Render XHTML and ODT
125*1508dbfeSGerry Weißbach        if ($mode != 'metadata' ) {
1267d101cc1SGerry Weißbach
1277d101cc1SGerry Weißbach            // TOC Title
128d04831eaSGerry Weißbach            if (is_array($data) && $data['start'] == true) {
1297d101cc1SGerry Weißbach
1307d101cc1SGerry Weißbach                if (is_Array($data['options'])) {
1317d101cc1SGerry Weißbach                    foreach ($data['options'] as $opt) {
1327d101cc1SGerry Weißbach                        switch ($opt) {
1337d101cc1SGerry Weißbach                            case 'description' : $renderer->meta['sitetoc']['showDescription'] = true; break;
1347d101cc1SGerry Weißbach                            case 'notoc' : $renderer->meta['sitetoc']['noTOC'] = true; break;
1357d101cc1SGerry Weißbach                            case 'merge' : $renderer->meta['sitetoc']['mergeDoc'] = true; break;
1367d101cc1SGerry Weißbach                            case 'nohead' : $renderer->meta['sitetoc']['noTocHeader'] = true; break;
1375321bc23SGerry Weißbach                            case 'mergeheader' : $renderer->meta['sitetoc']['mergeHeader'] = true; break;
13822a479aeSGerry Weißbach                            case 'pagebreak' : $renderer->meta['sitetoc']['pagebreak'] = true; break;
139a310139eSGerry Weißbach                            case 'mergehint' : $renderer->meta['sitetoc']['mergehint'] = true; break;
1407d101cc1SGerry Weißbach                        }
1417d101cc1SGerry Weißbach                    }
1427d101cc1SGerry Weißbach                }
1437d101cc1SGerry Weißbach
1447d101cc1SGerry Weißbach                $renderer->section_open("1 sitetoc");
1457d101cc1SGerry Weißbach                if ($renderer->meta['sitetoc']['noTocHeader'] === false) {
1467d101cc1SGerry Weißbach                    $renderer->header($lang['toc'], 1, $data['pos']);
1477d101cc1SGerry Weißbach                }
1487d101cc1SGerry Weißbach
1497d101cc1SGerry Weißbach                return true;
150d04831eaSGerry Weißbach            } else
1517d101cc1SGerry Weißbach
1527d101cc1SGerry Weißbach            // All Output has been done
1537d101cc1SGerry Weißbach            if (!is_array($data) && $data == 'save__meta') {
1547d101cc1SGerry Weißbach
1557d101cc1SGerry Weißbach                // Close TOC
1567d101cc1SGerry Weißbach                $renderer->section_close();
1577d101cc1SGerry Weißbach
1587d101cc1SGerry Weißbach                if ($renderer->meta['sitetoc']['noTOC'] === true) {
1597d101cc1SGerry Weißbach                    $renderer->doc = preg_replace("/<div.*?sitetoc.*?$/si", "", $renderer->doc);
1607d101cc1SGerry Weißbach                }
1617d101cc1SGerry Weißbach
1627d101cc1SGerry Weißbach                // If this is not set, we may have it as Metadata
163ee579aefSGerry Weißbach                if (empty($this->mergedPages) && $renderer->meta['sitetoc']['mergeDoc']) {
1647d101cc1SGerry Weißbach                    $toc = $renderer->meta['sitetoc']['siteexportTOC'];
165a99d6deeSGerry Weißbach
1667d101cc1SGerry Weißbach                    if (is_array($toc)) {
1677d101cc1SGerry Weißbach                        foreach ($toc as $tocItem) {
168a99d6deeSGerry Weißbach                            $this->mergedPages[] = array($tocItem['id'], $tocItem['depth']);
1697d101cc1SGerry Weißbach                        }
1707d101cc1SGerry Weißbach                    }
171a99d6deeSGerry Weißbach
1727d101cc1SGerry Weißbach                }
1737d101cc1SGerry Weißbach
1747d101cc1SGerry Weißbach                // If there is some data to be merged
1757d101cc1SGerry Weißbach                if (count($this->mergedPages) > 0) {
1767d101cc1SGerry Weißbach
1775321bc23SGerry Weißbach                    $renderer->doc = ''; // Start fresh!
1785321bc23SGerry Weißbach
1799c27c641SGerry Weißbach                    $renderer->section_open("1 mergedsite" . ($renderer->meta['sitetoc']['mergehint'] && count($this->mergedPages) > 1 ? ' mergehint' : ''));
1807d101cc1SGerry Weißbach
1817d101cc1SGerry Weißbach                    // Prepare lookup Array
1827d101cc1SGerry Weißbach                    foreach ($this->mergedPages as $tocItem) {
183ee579aefSGerry Weißbach                        list($this->includedPages[]) = explode('#', $tocItem[0]);
1847d101cc1SGerry Weißbach                    }
1857d101cc1SGerry Weißbach
1865321bc23SGerry Weißbach                    // Load the instructions
1875321bc23SGerry Weißbach                    $instr = array();
188a99d6deeSGerry Weißbach                    foreach ($this->mergedPages as $tocElement) {
189a99d6deeSGerry Weißbach
190a99d6deeSGerry Weißbach                        list($tocItem, $depth) = $tocElement;
1915321bc23SGerry Weißbach                        $file = wikiFN($tocItem);
1926792d0cfSGerry Weißbach
1936792d0cfSGerry Weißbach                        if (@file_exists($file)) {
1946792d0cfSGerry Weißbach                            $instructions = p_cached_instructions($file, false, $tocItem);
1956792d0cfSGerry Weißbach                        } else {
1966792d0cfSGerry Weißbach                            $instructions = p_get_instructions(io_readWikiPage($file, $tocItem));
1976792d0cfSGerry Weißbach                        }
1985321bc23SGerry Weißbach
199a99d6deeSGerry Weißbach                        // Convert Link and header instructions
200ee579aefSGerry Weißbach                        $instructions = $this->_convertInstructions($instructions, $addID = null, $renderer, $depth);
2015321bc23SGerry Weißbach
202f6a2ffb8SGerry Weißbach                        if ($renderer->meta['sitetoc']['mergeHeader'] && count($this->mergedPages) > 1) {
203300ce4a2SGerry Weißbach                            // get a hint for merged pages
204f6a2ffb8SGerry Weißbach                            if ($renderer->meta['sitetoc']['mergehint']) {
205300ce4a2SGerry Weißbach                                // only if the first section is already there
206300ce4a2SGerry Weißbach                                $mergeHint = p_get_metadata($tocItem, 'mergehint', METADATA_RENDER_USING_SIMPLE_CACHE);
207300ce4a2SGerry Weißbach                                if (empty($mergeHint)) { $mergeHint = p_get_metadata($tocItem, 'thema', METADATA_RENDER_USING_SIMPLE_CACHE); }
208300ce4a2SGerry Weißbach                                if (empty($mergeHint)) { $mergeHint = tpl_pagetitle($tocItem, true); }
209f6a2ffb8SGerry Weißbach                                $instructions = $this->_mergeWithHeaders($this->_initialHeaderStructure($instructions), $instructions, 1, $mergeHint);
210300ce4a2SGerry Weißbach                            }
2115321bc23SGerry Weißbach                            // Merge
212f6a2ffb8SGerry Weißbach                            $instr = $this->_mergeWithHeaders($instr, $instructions, 1);
2135b8c78c4SGerry Weißbach
21422a479aeSGerry Weißbach                        } else
21522a479aeSGerry Weißbach                        if ($renderer->meta['sitetoc']['pagebreak']) {
216300ce4a2SGerry Weißbach                            $sitepagebreak = array(array(
217300ce4a2SGerry Weißbach                                'plugin',
218300ce4a2SGerry Weißbach                                array(
219300ce4a2SGerry Weißbach                                    'siteexport_toctools',
220300ce4a2SGerry Weißbach                                    array(
221300ce4a2SGerry Weißbach                                        'pagebreak',
222300ce4a2SGerry Weißbach                                        null,
223300ce4a2SGerry Weißbach                                        null
224300ce4a2SGerry Weißbach                                    )
225300ce4a2SGerry Weißbach                                )
226300ce4a2SGerry Weißbach                            ));
227300ce4a2SGerry Weißbach                            $instr = array_merge($instr, $instructions, $sitepagebreak);
2285321bc23SGerry Weißbach                        } else {
2295321bc23SGerry Weißbach                            // Concat
2305321bc23SGerry Weißbach                            $instr = array_merge($instr, $instructions);
2317d101cc1SGerry Weißbach                        }
2325321bc23SGerry Weißbach                    }
2335321bc23SGerry Weißbach
234d04831eaSGerry Weißbach                    if (!empty($instr)) {
235cfed89d7SGerry Weißbach                        if ( $this->_cleanAllInstructions($instr, true) ) {
236cfed89d7SGerry Weißbach                            // There are no toc elements, remove the mergesite mergehint
237cfed89d7SGerry Weißbach                            $renderer->doc = preg_replace( '/(class=".*?\s)mergedsite/', '\1', $renderer->doc );
238cfed89d7SGerry Weißbach                            $renderer->doc = preg_replace( '/(class=".*?\s)mergehint/', '\1', $renderer->doc );
239cfed89d7SGerry Weißbach                        }
24022a479aeSGerry Weißbach
241300ce4a2SGerry Weißbach                        // print "<pre>"; print_r($instr); print "</pre>";
2425321bc23SGerry Weißbach                        $this->_render_output($renderer, $mode, $instr);
243d04831eaSGerry Weißbach                    }
244d04831eaSGerry Weißbach
2457d101cc1SGerry Weißbach                    $renderer->section_close();
2467d101cc1SGerry Weißbach                }
2477d101cc1SGerry Weißbach                return true;
2487d101cc1SGerry Weißbach            }
2497d101cc1SGerry Weißbach
2507d101cc1SGerry Weißbach            // Save the current ID
2517d101cc1SGerry Weißbach            $LNID = $SID;
2527d101cc1SGerry Weißbach
2537d101cc1SGerry Weißbach            // Add ID to flags['mergeDoc']
2547d101cc1SGerry Weißbach            if ($renderer->meta['sitetoc']['mergeDoc'] === true) { // || (count($renderer->meta['sitetoc']['siteexportTOC']) > 0 && $renderer->meta['sitetoc']['siteexportMergeDoc'] === true) ) {
255a99d6deeSGerry Weißbach                $this->mergedPages[] = array($SID, $DEPTH);
2567d101cc1SGerry Weißbach                resolve_pageid(getNS($ID), $SID, $exists);
2575321bc23SGerry Weißbach            } else {
2585321bc23SGerry Weißbach                // // print normal internal link (XHTML odt)
2597d101cc1SGerry Weißbach                $renderer->internallink($LNID, $NAME, null);
2607d101cc1SGerry Weißbach
2617d101cc1SGerry Weißbach                // Display Description underneath
2627d101cc1SGerry Weißbach                if ($renderer->meta['sitetoc']['showDescription'] === true) {
2637d101cc1SGerry Weißbach                    $renderer->cdata(p_get_metadata($SID, 'description abstract', true));
2647d101cc1SGerry Weißbach                }
2655321bc23SGerry Weißbach            }
2667d101cc1SGerry Weißbach
2677d101cc1SGerry Weißbach            // Render Metadata
2687d101cc1SGerry Weißbach        } else if ($mode == 'metadata') {
2697d101cc1SGerry Weißbach            if (!is_array($data) && $data == 'save__meta') {
2707d101cc1SGerry Weißbach                $renderer->meta['sitetoc']['siteexportTOC'] = $this->savedToc;
2717d101cc1SGerry Weißbach
2727d101cc1SGerry Weißbach                foreach ($this->savedToc as $page) {
2737d101cc1SGerry Weißbach                    $renderer->meta['relation']['references'][$page['id']] = $page['exists'];
2747d101cc1SGerry Weißbach                }
2757d101cc1SGerry Weißbach
2767d101cc1SGerry Weißbach                $this->savedToc = array();
2777d101cc1SGerry Weißbach            } else if (!isset($data['start']) && !isset($data['pos'])) {
2787d101cc1SGerry Weißbach                $this->savedToc[] = $this->__addTocItem($SID, $NAME, $DEPTH, $renderer);
2797d101cc1SGerry Weißbach            }
2807d101cc1SGerry Weißbach        }
2817d101cc1SGerry Weißbach
2827d101cc1SGerry Weißbach        return true;
2837d101cc1SGerry Weißbach    }
2847d101cc1SGerry Weißbach
2857d101cc1SGerry Weißbach    /*
2867d101cc1SGerry Weißbach     * pull apart the ID and create an Entry for the TOC
2877d101cc1SGerry Weißbach     */
28886da2b6bSGerry Weißbach    private function __addTocItem($id, $name, $depth, $renderer) {
2897d101cc1SGerry Weißbach        global $conf;
2907d101cc1SGerry Weißbach        global $ID;
2917d101cc1SGerry Weißbach
2927d101cc1SGerry Weißbach        // Render Title
2937d101cc1SGerry Weißbach        $default = $renderer->_simpleTitle($id);
2947d101cc1SGerry Weißbach        $exists = false; $isImage = false; $linktype = null;
2957d101cc1SGerry Weißbach        resolve_pageid(getNS($ID), $id, $exists);
2967d101cc1SGerry Weißbach        $name = $renderer->_getLinkTitle($name, $default, $isImage, $id, $linktype);
2977d101cc1SGerry Weißbach
2987d101cc1SGerry Weißbach        //keep hash anchor
2997d101cc1SGerry Weißbach        list($id, $hash) = explode('#', $id, 2);
3007d101cc1SGerry Weißbach        if (!empty($hash)) $hash = $renderer->_headerToLink($hash);
3017d101cc1SGerry Weißbach
3027d101cc1SGerry Weißbach        // Build Sitetoc Item
3037d101cc1SGerry Weißbach        $item = array();
3047d101cc1SGerry Weißbach        $item['id'] = $id;
3057d101cc1SGerry Weißbach        $item['name'] = $name;
3067d101cc1SGerry Weißbach        $item['anchor'] = $hash;
3077d101cc1SGerry Weißbach        $item['depth'] = $depth;
3087d101cc1SGerry Weißbach        $item['exists'] = $exists;
3097d101cc1SGerry Weißbach        if (!$conf['skipacl'] && auth_quickaclcheck($item['id']) < AUTH_READ) {
3107d101cc1SGerry Weißbach            return false;
3117d101cc1SGerry Weißbach        }
3127d101cc1SGerry Weißbach
3137d101cc1SGerry Weißbach        return $item;
3147d101cc1SGerry Weißbach    }
3157d101cc1SGerry Weißbach
3167d101cc1SGerry Weißbach    /*
3177d101cc1SGerry Weißbach     * Render the output of one page
3187d101cc1SGerry Weißbach     */
31986da2b6bSGerry Weißbach    private function _render_output($renderer, $mode, $instr) {
3207d101cc1SGerry Weißbach        global $ID;
3217d101cc1SGerry Weißbach
3227d101cc1SGerry Weißbach        // Section IDs
3235321bc23SGerry Weißbach        // $addID = sectionID($addID, $check);    //not possible to use a:b:c for id
3247d101cc1SGerry Weißbach
3257d101cc1SGerry Weißbach        if ($mode == 'xhtml') {
3265321bc23SGerry Weißbach
3277d101cc1SGerry Weißbach            //--------RENDER
3287d101cc1SGerry Weißbach            //renderer information(TOC build / Cache used)
3297d101cc1SGerry Weißbach            $info = array();
3307d101cc1SGerry Weißbach            $content = p_render($mode, $instr, $info);
3317d101cc1SGerry Weißbach
3327d101cc1SGerry Weißbach            //Remove TOC`s, section edit buttons and tags
3337d101cc1SGerry Weißbach            $content = $this->_cleanXHTML($content);
3347d101cc1SGerry Weißbach
3357d101cc1SGerry Weißbach            // embed the included page
3366792d0cfSGerry Weißbach            // $renderer->doc .= '<div class="include">';
3377d101cc1SGerry Weißbach            //add an anchor to find start of a inserted page
3385321bc23SGerry Weißbach            // $renderer->doc .= "<a name='$addID' id='$addID'>";
3397d101cc1SGerry Weißbach            $renderer->doc .= $content;
3406792d0cfSGerry Weißbach            // $renderer->doc .= '</div>';
341*1508dbfeSGerry Weißbach        } else {
3427d101cc1SGerry Weißbach
3437d101cc1SGerry Weißbach            // Loop through the instructions
3447d101cc1SGerry Weißbach            foreach ($instr as $instruction) {
3457d101cc1SGerry Weißbach                // Execute the callback against the Renderer
3467d101cc1SGerry Weißbach                call_user_func_array(array($renderer, $instruction[0]), $instruction[1]);
3477d101cc1SGerry Weißbach            }
3487d101cc1SGerry Weißbach        }
3497d101cc1SGerry Weißbach    }
3507d101cc1SGerry Weißbach
3517d101cc1SGerry Weißbach    /*
3527d101cc1SGerry Weißbach     * Corrects relative internal links and media and
3537d101cc1SGerry Weißbach     * converts headers of included pages to subheaders of the current page
3547d101cc1SGerry Weißbach     */
35586da2b6bSGerry Weißbach    private function _convertInstructions($instr, $id, &$renderer, $depth = 1) {
3567d101cc1SGerry Weißbach        global $ID;
3577d101cc1SGerry Weißbach        global $conf;
3587d101cc1SGerry Weißbach
3597d101cc1SGerry Weißbach        $n = count($instr);
3607d101cc1SGerry Weißbach
3617d101cc1SGerry Weißbach        for ($i = 0; $i < $n; $i++) {
3627d101cc1SGerry Weißbach            //internal links(links inside this wiki) an relative links
3637d101cc1SGerry Weißbach            if ((substr($instr[$i][0], 0, 12) == 'internallink')) {
3647d101cc1SGerry Weißbach                $this->_convert_link($renderer, $instr[$i], $id);
3657d101cc1SGerry Weißbach            }
3667d101cc1SGerry Weißbach            else if ((substr($instr[$i][0], 0, 13) == 'internalmedia')) {
3677d101cc1SGerry Weißbach                $this->_convert_media($renderer, $instr[$i], $id);
3687d101cc1SGerry Weißbach            }
369a99d6deeSGerry Weißbach            else if ((substr($instr[$i][0], 0, 6) == 'header')) {
370a99d6deeSGerry Weißbach                $this->_convert_header($renderer, $instr[$i], $depth-1); // -1 because the depth starts at 1
371a99d6deeSGerry Weißbach            }
372a99d6deeSGerry Weißbach            else if ((substr($instr[$i][0], 0, 12) == 'section_open')) {
373a99d6deeSGerry Weißbach                $this->_convert_section($renderer, $instr[$i], $depth-1); // -1 because the depth starts at 1
374a99d6deeSGerry Weißbach            }
3757d101cc1SGerry Weißbach        }
3767d101cc1SGerry Weißbach
3777d101cc1SGerry Weißbach        //if its the document start, cut off the first element(document information)
3787d101cc1SGerry Weißbach        if ($instr[0][0] == 'document_start')
3797d101cc1SGerry Weißbach        return array_slice($instr, 1, -1);
3807d101cc1SGerry Weißbach        else
3817d101cc1SGerry Weißbach        return $instr;
3827d101cc1SGerry Weißbach    }
3837d101cc1SGerry Weißbach
3847d101cc1SGerry Weißbach    /*
3857d101cc1SGerry Weißbach     * Convert link of given instruction
3867d101cc1SGerry Weißbach     */
38786da2b6bSGerry Weißbach    private function _convert_link(&$renderer, &$instr, $id) {
3887d101cc1SGerry Weißbach        global $ID;
3897d101cc1SGerry Weißbach
3907d101cc1SGerry Weißbach        $exists = false;
3917d101cc1SGerry Weißbach
3927d101cc1SGerry Weißbach        resolve_pageid(getNS($id), $instr[1][0], $exists);
3937d101cc1SGerry Weißbach        list($pageID, $pageReference) = explode("#", $instr[1][0], 2);
3947d101cc1SGerry Weißbach
3957d101cc1SGerry Weißbach        if (in_array($pageID, $this->includedPages)) {
3967d101cc1SGerry Weißbach            // Crate new internal Links
3977d101cc1SGerry Weißbach            $check = null;
3987d101cc1SGerry Weißbach
3997d101cc1SGerry Weißbach            // Either get existing reference or create from first heading. If still not there take the alternate ID
4007d101cc1SGerry Weißbach            $pageNameLink = empty($pageReference) ? sectionID($pageID, $check) : $pageReference;
4017d101cc1SGerry Weißbach
4027d101cc1SGerry Weißbach            $instr[1][0] = $ID . "#" . $pageNameLink;
4037d101cc1SGerry Weißbach
4047d101cc1SGerry Weißbach        } else {
4057d101cc1SGerry Weißbach            // Convert external Links to plain Text
4067d101cc1SGerry Weißbach
4077d101cc1SGerry Weißbach            $instr = array(
4087d101cc1SGerry Weißbach                        "cdata",
4097d101cc1SGerry Weißbach            array($instr[1][1]),
4107d101cc1SGerry Weißbach            $instr[2]
4117d101cc1SGerry Weißbach            );
4127d101cc1SGerry Weißbach        }
4137d101cc1SGerry Weißbach    }
4147d101cc1SGerry Weißbach
4157d101cc1SGerry Weißbach    /*
4167d101cc1SGerry Weißbach     * Convert internalmedia of given instruction
4177d101cc1SGerry Weißbach     */
41886da2b6bSGerry Weißbach    private function _convert_media(&$renderer, &$instr, $id) {
4197d101cc1SGerry Weißbach        global $ID;
4207d101cc1SGerry Weißbach
4217d101cc1SGerry Weißbach        // Resolvemedia returns the absolute path to media by reference
4227d101cc1SGerry Weißbach        $exists = false;
4237d101cc1SGerry Weißbach        resolve_mediaid(getNS($id), $instr[1][0], $exists);
4247d101cc1SGerry Weißbach    }
4257d101cc1SGerry Weißbach
4260571ece2SScrutinizer Auto-Fixer    /**
4270571ece2SScrutinizer Auto-Fixer     * @param integer $depth
4280571ece2SScrutinizer Auto-Fixer     */
42986da2b6bSGerry Weißbach    private function _convert_header(&$renderer, &$instr, $depth) {
430a99d6deeSGerry Weißbach        // More Depth!
431a99d6deeSGerry Weißbach        $instr[1][1] += $depth;
432a99d6deeSGerry Weißbach    }
433a99d6deeSGerry Weißbach
4340571ece2SScrutinizer Auto-Fixer    /**
4350571ece2SScrutinizer Auto-Fixer     * @param integer $depth
4360571ece2SScrutinizer Auto-Fixer     */
43786da2b6bSGerry Weißbach    private function _convert_section(&$renderer, &$instr, $depth) {
438a99d6deeSGerry Weißbach        // More Depth!
439a99d6deeSGerry Weißbach        $instr[1][0] += $depth;
440a99d6deeSGerry Weißbach    }
441a99d6deeSGerry Weißbach
44286da2b6bSGerry Weißbach    private function _mergeWithHeaders($existing, $newInstructions, $level = 1, $mergeHint = array()) {
4435321bc23SGerry Weißbach
4445321bc23SGerry Weißbach        $returnInstructions = array();
4455321bc23SGerry Weißbach        $preparedInstructions = array();
4465321bc23SGerry Weißbach        $existingStart = $existingEnd = 0;
4475321bc23SGerry Weißbach        $firstRun = true;
4485321bc23SGerry Weißbach
4495321bc23SGerry Weißbach        while ($this->_findNextHeaderSection($existing, $level, $existingStart, $existingEnd)) {
4505321bc23SGerry Weißbach
4515321bc23SGerry Weißbach            if ($firstRun) {
4525321bc23SGerry Weißbach                $returnInstructions = array_merge($returnInstructions, array_slice($existing, 0, $existingStart));
4535321bc23SGerry Weißbach                $firstRun = false;
4545321bc23SGerry Weißbach            }
4555321bc23SGerry Weißbach
4565321bc23SGerry Weißbach            $currentSlice = array_slice($existing, $existingStart, $existingEnd-$existingStart);
4575321bc23SGerry Weißbach
4585321bc23SGerry Weißbach            // Find matching part with headername
4595321bc23SGerry Weißbach            $newStart = $newEnd = 0;
4605321bc23SGerry Weißbach            if ($this->_findNextHeaderSection($newInstructions, $level, $newStart, $newEnd, $currentSlice[0][1][0])) {
4615321bc23SGerry Weißbach
4625321bc23SGerry Weißbach                $newSlice = array_slice($newInstructions, $newStart, $newEnd-$newStart);
4635321bc23SGerry Weißbach                if ($newSlice[0][0] == 'header')
4645321bc23SGerry Weißbach                    array_shift($newSlice); // Remove Heading
4655321bc23SGerry Weißbach
4665321bc23SGerry Weißbach                // merge found parts on next level.
467300ce4a2SGerry Weißbach                $returnedInstructions = $this->_mergeWithHeaders($currentSlice, $newSlice, $level+1, $mergeHint);
4685321bc23SGerry Weißbach
4695321bc23SGerry Weißbach                // Put them at the end!
4705321bc23SGerry Weißbach                $preparedInstructions = array_merge($preparedInstructions, $returnedInstructions);
4715321bc23SGerry Weißbach
4725321bc23SGerry Weißbach                // Remove from input
4735321bc23SGerry Weißbach                array_splice($newInstructions, $newStart, $newEnd-$newStart);
4745321bc23SGerry Weißbach            } else {
475300ce4a2SGerry Weißbach                // Nothing else found
4765321bc23SGerry Weißbach                $preparedInstructions = array_merge($preparedInstructions, $currentSlice);
4775321bc23SGerry Weißbach            }
4785321bc23SGerry Weißbach
4795321bc23SGerry Weißbach            $existingStart = $existingEnd;
4805321bc23SGerry Weißbach        }
4815321bc23SGerry Weißbach
4825321bc23SGerry Weißbach        // Append the rest
4835321bc23SGerry Weißbach        $returnInstructions = array_merge($returnInstructions, array_slice($existing, $existingStart));
4845321bc23SGerry Weißbach
4855321bc23SGerry Weißbach        // Check for section close inconsistencies and put one at the very end ...
4865321bc23SGerry Weißbach        $section_postpend = array();
4879490aa3bSAlain        if (
4889490aa3bSAlain            (
489ee579aefSGerry Weißbach                ($tmp1 = array_slice($newInstructions, -1))
490ee579aefSGerry Weißbach                && ($tmp1[0][0] == 'section_close')
4919490aa3bSAlain            )
4929490aa3bSAlain            &&
4939490aa3bSAlain            (
494ee579aefSGerry Weißbach                ($tmp2 = array_slice($newInstructions, -2))
495ee579aefSGerry Weißbach                && ($tmp2[0][0] == 'section_close')
4969490aa3bSAlain            )
4979490aa3bSAlain        ) {
4985321bc23SGerry Weißbach            $section_postpend = array_splice($newInstructions, -1);
4995321bc23SGerry Weißbach        }
5009490aa3bSAlain        if (
5019490aa3bSAlain            (
502ee579aefSGerry Weißbach                ($tmp3 = array_slice($returnInstructions, -1))
503ee579aefSGerry Weißbach                && ($tmp3[0][0] == 'section_close')
5049490aa3bSAlain            )
5059490aa3bSAlain            &&
5069490aa3bSAlain            (
507ee579aefSGerry Weißbach                ($tmp4 = array_slice($returnInstructions, -2))
508ee579aefSGerry Weißbach                && ($tmp4[0][0] == 'section_close')
5099490aa3bSAlain            )
5109490aa3bSAlain        ) {
5115321bc23SGerry Weißbach            $section_postpend = array_merge($section_postpend, array_splice($returnInstructions, -1));
5125321bc23SGerry Weißbach        }
5135321bc23SGerry Weißbach
5145321bc23SGerry Weißbach        // What if there are headings left inside the $newInstructions?????
5155321bc23SGerry Weißbach        // Find matching part with headername
5165321bc23SGerry Weißbach        $newStart = $newEnd = 0;
5175321bc23SGerry Weißbach        $section_prepend = array();
5185321bc23SGerry Weißbach        if ($this->_findNextHeaderSection($newInstructions, $level, $newStart, $newEnd)) {
5195321bc23SGerry Weißbach            // If there are header in here, build a prepend and have the rest at the end
5205321bc23SGerry Weißbach            $section_prepend = array_splice($newInstructions, 0, $newStart);
5215321bc23SGerry Weißbach        } else {
5225321bc23SGerry Weißbach            // If not, prepend all of it.
5235321bc23SGerry Weißbach            $section_prepend = $newInstructions;
5245321bc23SGerry Weißbach            $newInstructions = array();
5255321bc23SGerry Weißbach        }
5265321bc23SGerry Weißbach
527300ce4a2SGerry Weißbach        $this->_insertMergeHint($section_prepend, $mergeHint);
528300ce4a2SGerry Weißbach
5295321bc23SGerry Weißbach        $returnInstructions = array_merge($returnInstructions, $section_prepend, $preparedInstructions, $newInstructions, $section_postpend);
5305321bc23SGerry Weißbach
5315321bc23SGerry Weißbach        return $returnInstructions;
5325321bc23SGerry Weißbach    }
5335321bc23SGerry Weißbach
5340571ece2SScrutinizer Auto-Fixer    /**
5350571ece2SScrutinizer Auto-Fixer     * @param integer $level
5360571ece2SScrutinizer Auto-Fixer     */
53786da2b6bSGerry Weißbach    private function _findNextHeaderSection($section, $level, &$start, &$end, $headerName = null) {
5385321bc23SGerry Weißbach
5395321bc23SGerry Weißbach        $inCount = count($section);
5405321bc23SGerry Weißbach        $currentSlice = -1;
5415321bc23SGerry Weißbach
5425321bc23SGerry Weißbach        // Find Level 1 Header that matches.
5435321bc23SGerry Weißbach        for ($i = $start; $i < $inCount; $i++) {
5445321bc23SGerry Weißbach
5455321bc23SGerry Weißbach            $instruction = $section[$i];
5465321bc23SGerry Weißbach            $end = $i; // Or it will be lost and a section close will be missing.
5475321bc23SGerry Weißbach
5485321bc23SGerry Weißbach            // First Level Header
5495321bc23SGerry Weißbach            if ($instruction[0] == 'header' && $instruction[1][1] == $level) {
5505321bc23SGerry Weißbach
5515321bc23SGerry Weißbach                if ($currentSlice > 0) {
5525321bc23SGerry Weißbach                    return true;
5535321bc23SGerry Weißbach                }
5545321bc23SGerry Weißbach
5555321bc23SGerry Weißbach                if ($headerName == null || ($headerName == $instruction[1][0])) {
5565321bc23SGerry Weißbach                    // Begin of new slice ...
5575321bc23SGerry Weißbach                    $start = $currentSlice = $i;
5585321bc23SGerry Weißbach                }
5595321bc23SGerry Weißbach            }
5605321bc23SGerry Weißbach        }
5615321bc23SGerry Weißbach
5625321bc23SGerry Weißbach        // Nothing found
5635321bc23SGerry Weißbach        $end = $i; // Or it will be lost and a section close will be missing.
5645321bc23SGerry Weißbach        return $currentSlice > 0;
5655321bc23SGerry Weißbach    }
5665321bc23SGerry Weißbach
5674f36f720SGerry Weißbach    private function _cleanAllInstructions(&$instr, $advanced=false) {
5684f36f720SGerry Weißbach        $this->_cleanInstructions($instr, '/p_(close|open)/');
56993734debSGerry Weißbach        $this->_cleanInstructions($instr, '/section_(close|open)/');
57093734debSGerry Weißbach        $this->_cleanInstructions($instr, '/listu_(close|open)/');
57193734debSGerry Weißbach        $this->_cleanInstructions($instr, '/listo_(close|open)/');
5724f36f720SGerry Weißbach
5734f36f720SGerry Weißbach        if ( !$advanced ) {
574cfed89d7SGerry Weißbach            return false;
5754f36f720SGerry Weißbach        }
5764f36f720SGerry Weißbach
5774f36f720SGerry Weißbach        $currentMergeHint = null;
578cfed89d7SGerry Weißbach        $listOfMergeHintNames= [];
579d3a16081SGerry Weißbach
5804f36f720SGerry Weißbach        for( $i=0; $i<count($instr); $i++ ) {
5814f36f720SGerry Weißbach
5824f36f720SGerry Weißbach            $hasMoreEntries = count($instr)-1 > $i;
5834f36f720SGerry Weißbach
5844f36f720SGerry Weißbach            if ( $instr[$i][0] == 'header' ) {
585cfed89d7SGerry Weißbach                // reset after header
586cfed89d7SGerry Weißbach                $currentMergeHint = null;
5874f36f720SGerry Weißbach            }
5884f36f720SGerry Weißbach
589cfed89d7SGerry Weißbach            if ( $instr[$i][1][0] == 'siteexport_toctools' && $instr[$i][1][0][0] != 'pagebreak' ) {
5904f36f720SGerry Weißbach                if ( $currentMergeHint != null && $instr[$i][1][1][2] == $currentMergeHint[1][1][2] ) {
591d3a16081SGerry Weißbach
592d3a16081SGerry Weißbach                    if ( $instr[$i][1][1][1] == 'end' ) {
593d3a16081SGerry Weißbach                        // look ahead, if the next hint is also the same ID, if so: remove this ending hint.
594d3a16081SGerry Weißbach                        $shouldSpliceAway = false;
595d3a16081SGerry Weißbach                        for( $ii=$i+1; $ii<count($instr); $ii++ ) {
596d3a16081SGerry Weißbach                            if ( $instr[$ii][0] == 'header' ) {
597d3a16081SGerry Weißbach                                // Jumping over a section now ... we have to leave the last entry
598d3a16081SGerry Weißbach                                break;
599d3a16081SGerry Weißbach                            } else if ( $instr[$ii][1][0] == 'siteexport_toctools' && $instr[$ii][1][0][0] != 'pagebreak' ) {
600d3a16081SGerry Weißbach                                if ( $instr[$ii][1][1][2] == $currentMergeHint[1][1][2] && $instr[$ii][1][1][1] == 'start' ) {
601d3a16081SGerry Weißbach                                    // Found another one, that is identicall - so this will be removed.
602d3a16081SGerry Weißbach                                    // also remove the current ending element
603d3a16081SGerry Weißbach                                    $shouldSpliceAway = true;
604d3a16081SGerry Weißbach                                }
605d3a16081SGerry Weißbach
606d3a16081SGerry Weißbach                                // Okay, this was a toctools whatever ... but maybe not a start of the same type.
607d3a16081SGerry Weißbach                                // we're done.
608d3a16081SGerry Weißbach                                break;
609d3a16081SGerry Weißbach                            }
610d3a16081SGerry Weißbach                        }
611d3a16081SGerry Weißbach
612d3a16081SGerry Weißbach                        if ( !$shouldSpliceAway ) {
613d3a16081SGerry Weißbach                            // print "<pre>NOT Splicing away ". print_r($instr[$i], true) . "</pre>";
614d3a16081SGerry Weißbach                            continue;
615d3a16081SGerry Weißbach                        }
616d3a16081SGerry Weißbach                        // print "<pre>Splicing away ". print_r($instr[$i], true) . "</pre>";
617d3a16081SGerry Weißbach                    }
618d3a16081SGerry Weißbach
619d3a16081SGerry Weißbach                    // print "<p>Removing 'mergehint' in between  </p>";
6204f36f720SGerry Weißbach                    array_splice($instr, $i--, 1);
6214f36f720SGerry Weißbach                } else {
6224f36f720SGerry Weißbach                    // print "<p>Resetting Mergehint '" . $instr[$i][1][1][2] . "' == '" . $currentMergeHint[1][1][2] . "'</p>";
6234f36f720SGerry Weißbach                    $currentMergeHint = $instr[$i];
624cfed89d7SGerry Weißbach                    $listOfMergeHintNames[] = $instr[$i][1][1][2];
6254f36f720SGerry Weißbach                }
6264f36f720SGerry Weißbach            }
6274f36f720SGerry Weißbach        }
628cfed89d7SGerry Weißbach
629d3a16081SGerry Weißbach/*
630d3a16081SGerry Weißbach        print "<pre>" . print_r($instr, 1) . "</pre>";
631d3a16081SGerry Weißbach
632d3a16081SGerry Weißbach//*/
633d3a16081SGerry Weißbach
634cfed89d7SGerry Weißbach        // There is only ONE distinct mergehint -> remove all
635cfed89d7SGerry Weißbach        $listOfMergeHintNames = array_unique($listOfMergeHintNames);
636cfed89d7SGerry Weißbach        if ( count($listOfMergeHintNames) == 1 ) {
637cfed89d7SGerry Weißbach            for( $i=0; $i<count($instr); $i++ ) {
638cfed89d7SGerry Weißbach                if ( $instr[$i][1][0] == 'siteexport_toctools' && $instr[$i][1][0][0] != 'pagebreak' ) {
639cfed89d7SGerry Weißbach                    array_splice($instr, $i--, 1);
640cfed89d7SGerry Weißbach                }
641cfed89d7SGerry Weißbach            }
642cfed89d7SGerry Weißbach        }
643cfed89d7SGerry Weißbach
644cfed89d7SGerry Weißbach        return count($listOfMergeHintNames) == 1;
64593734debSGerry Weißbach    }
64693734debSGerry Weißbach
6470571ece2SScrutinizer Auto-Fixer    /**
6480571ece2SScrutinizer Auto-Fixer     * @param string $tag
6490571ece2SScrutinizer Auto-Fixer     */
65086da2b6bSGerry Weißbach    private function _cleanInstructions(&$instructions, $tag) {
6515321bc23SGerry Weißbach
6525b8c78c4SGerry Weißbach
6535b8c78c4SGerry Weißbach/*
6545b8c78c4SGerry Weißbach        print "<pre>";
6555b8c78c4SGerry Weißbach        print "$tag ->\n";
6565b8c78c4SGerry Weißbach        print_r($instructions);
6575b8c78c4SGerry Weißbach        print "</pre>";
6585b8c78c4SGerry Weißbach//*/
6595321bc23SGerry Weißbach        $inCount = count($instructions);
6605321bc23SGerry Weißbach        for ($i = 0; $i < $inCount; $i++) {
6615321bc23SGerry Weißbach
6625321bc23SGerry Weißbach            // Last instruction
6635321bc23SGerry Weißbach            if ($i == $inCount-1) {
6645321bc23SGerry Weißbach                break;
6655321bc23SGerry Weißbach            }
6665321bc23SGerry Weißbach
6675321bc23SGerry Weißbach            if (preg_match($tag, $instructions[$i][0]) && preg_match($tag, $instructions[$i+1][0]) && $instructions[$i][0] != $instructions[$i+1][0]) {
6685b8c78c4SGerry Weißbach/*
6695b8c78c4SGerry Weißbach        print "<pre>";
6705b8c78c4SGerry Weißbach        print "Removed ->\n";
6715b8c78c4SGerry Weißbach        print_r($instructions[$i-1]);
6725b8c78c4SGerry Weißbach        print "---\n";
6735b8c78c4SGerry Weißbach        print_r($instructions[$i]);
6745b8c78c4SGerry Weißbach        print_r($instructions[$i+1]);
6755b8c78c4SGerry Weißbach        print "---\n";
6765b8c78c4SGerry Weißbach        print_r($instructions[$i+2]);
6775b8c78c4SGerry Weißbach        print "</pre>";
6785b8c78c4SGerry Weißbach//*/
6795321bc23SGerry Weißbach
6805321bc23SGerry Weißbach                // found different tags, but both match the expression and follow each other - so they can be elliminated
6815321bc23SGerry Weißbach                array_splice($instructions, $i, 2);
6825321bc23SGerry Weißbach                $inCount -= 2;
6835321bc23SGerry Weißbach                $i--;
6845321bc23SGerry Weißbach            }
6855321bc23SGerry Weißbach        }
6865b8c78c4SGerry Weißbach/*
6875b8c78c4SGerry Weißbach        print "<pre>";
6885b8c78c4SGerry Weißbach        print "$tag ->\n";
6895b8c78c4SGerry Weißbach        print_r($instructions);
6905b8c78c4SGerry Weißbach        print "</pre>";
6915b8c78c4SGerry Weißbach//*/
6925321bc23SGerry Weißbach    }
6935321bc23SGerry Weißbach
694f6a2ffb8SGerry Weißbach    /**
695f6a2ffb8SGerry Weißbach     * Strip everything except for the headers
696f6a2ffb8SGerry Weißbach     */
69786da2b6bSGerry Weißbach    private function _initialHeaderStructure($instructions) {
698f6a2ffb8SGerry Weißbach        $inCount = count($instructions);
699f6a2ffb8SGerry Weißbach        for ($i = 0; $i < $inCount; $i++) {
700f6a2ffb8SGerry Weißbach
701f6a2ffb8SGerry Weißbach            // Last instruction
702f6a2ffb8SGerry Weißbach            if ($i == $inCount-1) {
703f6a2ffb8SGerry Weißbach                break;
704f6a2ffb8SGerry Weißbach            }
705f6a2ffb8SGerry Weißbach
706f6a2ffb8SGerry Weißbach            if (!in_array($instructions[$i][0], array('header', 'section_open', 'section_close', 'p_open', 'p_close'))) {
707f6a2ffb8SGerry Weißbach                // found non-matching
708f6a2ffb8SGerry Weißbach                array_splice($instructions, $i, 1);
709f6a2ffb8SGerry Weißbach                $inCount--;
710f6a2ffb8SGerry Weißbach                $i--;
711f6a2ffb8SGerry Weißbach            }
712f6a2ffb8SGerry Weißbach        }
713f6a2ffb8SGerry Weißbach        return $instructions;
714f6a2ffb8SGerry Weißbach    }
715f6a2ffb8SGerry Weißbach
71686da2b6bSGerry Weißbach    private function _insertMergeHint(&$instructions, $mergeHint) {
717300ce4a2SGerry Weißbach
718300ce4a2SGerry Weißbach        // Surround new slice with a mergehint
719300ce4a2SGerry Weißbach        if (empty($mergeHint)) { return; }
720300ce4a2SGerry Weißbach
72193734debSGerry Weißbach        // No emtpy insruction sets.
72293734debSGerry Weißbach        $this->_cleanAllInstructions($instructions);
72374627711SGerry Weißbach
72493734debSGerry Weißbach        if (empty($instructions)) { return; }
72593734debSGerry Weißbach
726f7eda97fSGerry Weißbach        $mergeHintPrepend = $this->_toctoolPrepends( $instructions );
727f7eda97fSGerry Weißbach
728f7eda97fSGerry Weißbach        // only section content should be surrounded.
729f7eda97fSGerry Weißbach        if ($instructions[0][0] != 'section_open') { return; }
730f7eda97fSGerry Weißbach
731f7eda97fSGerry Weißbach        // save for later use
732d3a16081SGerry Weißbach        $mergeHintId = sectionid($mergeHint, $this->mergeHints);
733f7eda97fSGerry Weißbach        $this->merghintIds[$mergeHintId] = $mergeHint;
734f7eda97fSGerry Weißbach
735f7eda97fSGerry Weißbach        // Insert section information
736f7eda97fSGerry Weißbach        array_push( $mergeHintPrepend, array(
737300ce4a2SGerry Weißbach            'plugin',
738300ce4a2SGerry Weißbach            array(
739300ce4a2SGerry Weißbach                'siteexport_toctools',
740300ce4a2SGerry Weißbach                array(
741300ce4a2SGerry Weißbach                    'mergehint',
742300ce4a2SGerry Weißbach                    'start',
743300ce4a2SGerry Weißbach                    $mergeHint,
744300ce4a2SGerry Weißbach                    $mergeHintId
745300ce4a2SGerry Weißbach                )
746300ce4a2SGerry Weißbach            )
747300ce4a2SGerry Weißbach        ) );
748300ce4a2SGerry Weißbach
749300ce4a2SGerry Weißbach        $mergeHintPostpend = array(array(
750300ce4a2SGerry Weißbach            'plugin',
751300ce4a2SGerry Weißbach            array(
752300ce4a2SGerry Weißbach                'siteexport_toctools',
753300ce4a2SGerry Weißbach                array(
754300ce4a2SGerry Weißbach                    'mergehint',
755300ce4a2SGerry Weißbach                    'end',
756300ce4a2SGerry Weißbach                    $mergeHint
757300ce4a2SGerry Weißbach                )
758300ce4a2SGerry Weißbach            )
759300ce4a2SGerry Weißbach        ));
760300ce4a2SGerry Weißbach
761d3a16081SGerry Weißbach        $instructions = array_merge($mergeHintPrepend, $instructions, $mergeHintPostpend);
762300ce4a2SGerry Weißbach/*
76374627711SGerry Weißbach        print "<pre>"; print_r($instructions); print "</pre>";
76474627711SGerry Weißbach//*/
765f7eda97fSGerry Weißbach    }
766f7eda97fSGerry Weißbach
767f7eda97fSGerry Weißbach    private function _toctoolPrepends( &$instructions ) {
768f7eda97fSGerry Weißbach
76974627711SGerry Weißbach        $mergeHintPrependPrepend = array();
7705b8c78c4SGerry Weißbach
7715b8c78c4SGerry Weißbach        // 2021-01-14 This did no good - if a merged page had two mergehints, the first was stripped.
7725b8c78c4SGerry Weißbach/*
773f7eda97fSGerry Weißbach        if ( $instructions[0][0] == 'plugin' && $instructions[0][1][0] == 'siteexport_toctools' && $instructions[0][1][1][1] == 'start' ) {
774f7eda97fSGerry Weißbach
775f7eda97fSGerry Weißbach            // This is already section merge hint ... but it will have a section at its end ... hopefully
77674627711SGerry Weißbach            do {
777268cf88bSGerry Weißbach                $_instructions = array_shift( $instructions );
778268cf88bSGerry Weißbach                array_push( $mergeHintPrependPrepend, $_instructions);
779268cf88bSGerry Weißbach            } while( !($_instructions[0] == 'plugin' && $_instructions[1][0] == 'siteexport_toctools' && $_instructions[1][1][1] == 'end' ) ) ;
78074627711SGerry Weißbach            array_splice($mergeHintPrepend, 0, 0, $mergeHintPrependPrepend);
78174627711SGerry Weißbach        }
7825b8c78c4SGerry Weißbach//*/
78374627711SGerry Weißbach/*
78474627711SGerry Weißbach        print "<pre>"; print_r($instructions); print "</pre>";
78574627711SGerry Weißbach//*/
786f7eda97fSGerry Weißbach        return $mergeHintPrependPrepend;
787300ce4a2SGerry Weißbach    }
788300ce4a2SGerry Weißbach
7897d101cc1SGerry Weißbach    /**
7907d101cc1SGerry Weißbach     * Remove TOC, section edit buttons and tags
7917d101cc1SGerry Weißbach     */
792a8c17ab5Si-net /// software    private function _cleanXHTML($xhtml) {
7937d101cc1SGerry Weißbach        $replace = array(
7947d101cc1SGerry Weißbach            '!<div class="toc">.*?(</div>\n</div>)!s' => '', // remove TOCs
7953dfe6d90SGerry Weißbach            '#<!-- SECTION \[(\d*-\d*)\] -->#s'       => '', // remove section edit buttons
7967d101cc1SGerry Weißbach            '!<div id="tags">.*?(</div>)!s'           => ''  // remove category tags
7977d101cc1SGerry Weißbach        );
7987d101cc1SGerry Weißbach        $xhtml = preg_replace(array_keys($replace), array_values($replace), $xhtml);
7997d101cc1SGerry Weißbach        return $xhtml;
8007d101cc1SGerry Weißbach    }
8017d101cc1SGerry Weißbach
8027d101cc1SGerry Weißbach    /**
8037d101cc1SGerry Weißbach     * Allow the plugin to prevent DokuWiki creating a second instance of itself
8047d101cc1SGerry Weißbach     *
8057d101cc1SGerry Weißbach     * @return bool   true if the plugin can not be instantiated more than once
8067d101cc1SGerry Weißbach     */
807a8c17ab5Si-net /// software    public function isSingleton() {
8087d101cc1SGerry Weißbach        return true;
8097d101cc1SGerry Weißbach    }
8107d101cc1SGerry Weißbach}
8117d101cc1SGerry Weißbach// vim:ts=4:sw=4:et:enc=utf-8:
812