BrowseLinks.php

Go to the documentation of this file.

<?php
namespace TYPO3\CMS\Rtehtmlarea;

use TYPO3\CMS\Backend\Utility\BackendUtility;
use TYPO3\CMS\Core\Utility\GeneralUtility;

class BrowseLinks extends \TYPO3\CMS\Recordlist\Browser\ElementBrowser {

    public $editorNo;
    public $contentTypo3Language;

    public $contentTypo3Charset = 'utf-8';
    protected $contentLanguageService;

    public $additionalAttributes = array();

    public $buttonConfig = array();

    public $RTEProperties = array();

    public $anchorTypes = array('page', 'url', 'file', 'mail', 'spec');

    public $classesAnchorDefault = array();

    public $classesAnchorDefaultTitle = array();

    public $classesAnchorClassTitle = array();

    public $classesAnchorDefaultTarget = array();

    public $classesAnchorJSOptions = array();

    protected $defaultLinkTarget;

    public $allowedItems;

    public function init() {
        $this->initVariables();
        // Create content language service
        $this->contentLanguageService = GeneralUtility::makeInstance('TYPO3\\CMS\\Lang\\LanguageService');
        $this->contentLanguageService->init($this->contentTypo3Language);
        $this->initConfiguration();

        $this->initDocumentTemplate();

        // Initializing hooking browsers
        $this->initHookObjects('ext/rtehtmlarea/mod3/class.tx_rtehtmlarea_browse_links.php');
        $this->initCurrentUrl();
        // Determine nature of current url:
        $this->act = GeneralUtility::_GP('act');
        if (!$this->act) {
            $this->act = $this->curUrlInfo['act'];
        }
        // Setting initial values for link attributes
        $this->initLinkAttributes();

        // Adding RTE JS code
        // also unset the default jumpToUrl() function before
        unset($this->doc->JScodeArray['jumpToUrl']);
        $this->doc->JScodeArray['rtehtmlarea'] = $this->getJSCode();
    }

    public function initVariables() {
        parent::initVariables();

        // Process bparams
        $pArr = explode('|', $this->bparams);
        $pRteArr = explode(':', $pArr[1]);
        $this->editorNo = $pRteArr[0];
        $this->contentTypo3Language = $pRteArr[1];
        $this->RTEtsConfigParams = $pArr[2];
        if (!$this->editorNo) {
            $this->editorNo = GeneralUtility::_GP('editorNo');
            $this->contentTypo3Language = GeneralUtility::_GP('contentTypo3Language');
            $this->RTEtsConfigParams = GeneralUtility::_GP('RTEtsConfigParams');
        }
        $pArr[1] = implode(':', array($this->editorNo, $this->contentTypo3Language, $this->contentTypo3Charset));
        $pArr[2] = $this->RTEtsConfigParams;
        $this->bparams = implode('|', $pArr);
    }

    public function initConfiguration() {
        $this->thisConfig = $this->getRTEConfig();
        $this->buttonConfig = $this->getButtonConfig('link');
    }

    protected function initDocumentTemplate() {
        parent::initDocumentTemplate();
        $this->doc->getContextMenuCode();
        // Apply the same styles as those of the base script
        $this->doc->bodyTagId = 'typo3-browse-links-php';
        $this->doc->getPageRenderer()->addCssFile($this->doc->backPath . \TYPO3\CMS\Core\Utility\ExtensionManagementUtility::extRelPath('t3skin') . 'rtehtmlarea/htmlarea.css');
        // Add attributes to body tag. Note: getBodyTagAdditions will invoke the hooks
        $this->doc->bodyTagAdditions = $this->getBodyTagAdditions();
    }

    protected function initCurrentUrl() {
        // CurrentUrl - the current link url must be passed around if it exists
        $this->curUrlArray = GeneralUtility::_GP('curUrl');
        if ($this->curUrlArray['all']) {
            $this->curUrlArray = GeneralUtility::get_tag_attributes($this->curUrlArray['all']);
            $this->curUrlArray['href'] = htmlspecialchars_decode($this->curUrlArray['href']);
        }
        // Note: parseCurUrl will invoke the hooks
        $this->curUrlInfo = $this->parseCurUrl($this->curUrlArray['href'], $this->siteURL);
        if (isset($this->curUrlArray['data-htmlarea-external']) && $this->curUrlInfo['act'] != 'mail') {
            $this->curUrlInfo['act'] = 'url';
            $this->curUrlInfo['info'] = $this->curUrlArray['href'];
        }
    }

    protected function getRTEConfig() {
        $RTEtsConfigParts = explode(':', $this->RTEtsConfigParams);
        $RTEsetup = $GLOBALS['BE_USER']->getTSConfig('RTE', BackendUtility::getPagesTSconfig($RTEtsConfigParts[5]));
        $this->RTEProperties = $RTEsetup['properties'];
        return BackendUtility::RTEsetup($this->RTEProperties, $RTEtsConfigParts[0], $RTEtsConfigParts[2], $RTEtsConfigParts[4]);
    }

    protected function getButtonConfig($buttonName) {
        return is_array($this->thisConfig['buttons.']) && is_array($this->thisConfig['buttons.'][$buttonName . '.'])
            ? $this->thisConfig['buttons.'][$buttonName . '.']
            : array();
    }

    protected function initLinkAttributes() {
        // Initializing the title value
        $this->setTitle = $this->curUrlArray['title'];
        // Processing the classes configuration
        $classSelected = array();
        if ($this->buttonConfig['properties.']['class.']['allowedClasses']) {
            $this->setClass = $this->curUrlArray['class'];
            $classesAnchorArray = GeneralUtility::trimExplode(',', $this->buttonConfig['properties.']['class.']['allowedClasses'], TRUE);
            $classesAnchorConfigArray = array();
            // Collecting allowed classes and configured default values
            $classesAnchor = array();
            $classesAnchor['all'] = array();
            $titleReadOnly = $this->buttonConfig['properties.']['title.']['readOnly'] || $this->buttonConfig[$this->act . '.']['properties.']['title.']['readOnly'];
            if (is_array($this->RTEProperties['classesAnchor.'])) {
                foreach ($this->RTEProperties['classesAnchor.'] as $label => $conf) {
                    if (in_array($conf['class'], $classesAnchorArray)) {
                        $classesAnchor['all'][] = $conf['class'];
                        if (in_array($conf['type'], $this->anchorTypes)) {
                            $classesAnchor[$conf['type']][] = $conf['class'];
                            if ($this->buttonConfig[$conf['type'] . '.']['properties.']['class.']['default'] == $conf['class']) {
                                $this->classesAnchorDefault[$conf['type']] = $conf['class'];
                                if ($conf['titleText']) {
                                    $this->classesAnchorDefaultTitle[$conf['type']] = $this->getLLContent(trim($conf['titleText']));
                                }
                                if ($conf['target']) {
                                    $this->classesAnchorDefaultTarget[$conf['type']] = trim($conf['target']);
                                }
                            }
                        }
                        if ($titleReadOnly && $conf['titleText']) {
                            $this->classesAnchorClassTitle[$conf['class']] = ($this->classesAnchorDefaultTitle[$conf['type']] = $this->getLLContent(trim($conf['titleText'])));
                        }
                    }
                }
            }
            // Constructing the class selector options
            foreach ($this->anchorTypes as $anchorType) {
                foreach ($classesAnchorArray as $class) {
                    if (!in_array($class, $classesAnchor['all']) || in_array($class, $classesAnchor['all']) && is_array($classesAnchor[$anchorType]) && in_array($class, $classesAnchor[$anchorType])) {
                        $selected = '';
                        if ($this->setClass == $class || !$this->setClass && $this->classesAnchorDefault[$anchorType] == $class) {
                            $selected = 'selected="selected"';
                            $classSelected[$anchorType] = TRUE;
                        }
                        $classLabel = is_array($this->RTEProperties['classes.']) && is_array($this->RTEProperties['classes.'][$class . '.']) && $this->RTEProperties['classes.'][$class . '.']['name'] ? $this->getPageConfigLabel($this->RTEProperties['classes.'][$class . '.']['name'], 0) : $class;
                        $classStyle = is_array($this->RTEProperties['classes.']) && is_array($this->RTEProperties['classes.'][$class . '.']) && $this->RTEProperties['classes.'][$class . '.']['value'] ? $this->RTEProperties['classes.'][$class . '.']['value'] : '';
                        $this->classesAnchorJSOptions[$anchorType] .= '<option ' . $selected . ' value="' . htmlspecialchars($class) . '"' . ($classStyle ? ' style="' . htmlspecialchars($classStyle) . '"' : '') . '>' . htmlspecialchars($classLabel) . '</option>';
                    }
                }
                if ($this->classesAnchorJSOptions[$anchorType] && !($this->buttonConfig['properties.']['class.']['required'] || $this->buttonConfig[$this->act . '.']['properties.']['class.']['required'])) {
                    $selected = '';
                    if (!$this->setClass && !$this->classesAnchorDefault[$anchorType]) {
                        $selected = 'selected="selected"';
                    }
                    $this->classesAnchorJSOptions[$anchorType] = '<option ' . $selected . ' value=""></option>' . $this->classesAnchorJSOptions[$anchorType];
                }
            }
        }
        // Initializing the target value
        // Unset the target if it is set to a value different than default and if no class is selected and the target field is not displayed
        // In other words, do not forward the target if we changed tab and the target field is not displayed
        $this->defaultLinkTarget = isset($this->buttonConfig['properties.']['target.']['default']) ? $this->buttonConfig['properties.']['target.']['default'] : '';
        $this->setTarget = '';
        if (isset($this->curUrlArray['target']) && !($this->curUrlArray['target'] != $this->defaultLinkTarget && !$classSelected[$this->act] && is_array($this->buttonConfig['targetSelector.']) && $this->buttonConfig['targetSelector.']['disabled'] && is_array($this->buttonConfig['popupSelector.']) && $this->buttonConfig['popupSelector.']['disabled'])) {
            $this->setTarget = $this->curUrlArray['target'];
        }
        if ($this->defaultLinkTarget && !isset($this->curUrlArray['target'])) {
            $this->setTarget = $this->defaultLinkTarget;
        }
        // Initializing additional attributes
        if ($GLOBALS['TYPO3_CONF_VARS']['EXTCONF']['rtehtmlarea']['plugins']['TYPO3Link']['additionalAttributes']) {
            $addAttributes = GeneralUtility::trimExplode(',', $GLOBALS['TYPO3_CONF_VARS']['EXTCONF']['rtehtmlarea']['plugins']['TYPO3Link']['additionalAttributes'], TRUE);
            foreach ($addAttributes as $attribute) {
                $this->additionalAttributes[$attribute] = isset($this->curUrlArray[$attribute]) ? $this->curUrlArray[$attribute] : '';
            }
        }
    }

    public function getBodyTagAdditions() {
        $bodyTagAdditions = array();
        // call hook for extra additions
        foreach ($this->hookObjects as $hookObject) {
            if (method_exists($hookObject, 'addBodyTagAdditions')) {
                $bodyTagAdditions = $hookObject->addBodyTagAdditions($bodyTagAdditions);
            }
        }
        return GeneralUtility::implodeAttributes($bodyTagAdditions, TRUE);
    }

    public function getJSCode() {
        // BEGIN accumulation of header JavaScript:
        $JScode = '';
        $JScode .= '
            var plugin = window.parent.RTEarea[' . GeneralUtility::quoteJSvalue($this->editorNo) . '].editor.getPlugin("TYPO3Link");
            var HTMLArea = window.parent.HTMLArea;
            var add_href=' . GeneralUtility::quoteJSvalue($this->curUrlArray['href'] ? '&curUrl[href]=' . rawurlencode($this->curUrlArray['href']) : '') . ';
            var add_target=' . GeneralUtility::quoteJSvalue($this->setTarget ? '&curUrl[target]=' . rawurlencode($this->setTarget) : '') . ';
            var add_class=' . GeneralUtility::quoteJSvalue($this->setClass ? '&curUrl[class]=' . rawurlencode($this->setClass) : '') . ';
            var add_title=' . GeneralUtility::quoteJSvalue($this->setTitle ? '&curUrl[title]=' . rawurlencode($this->setTitle) : '') . ';
            var add_params=' . GeneralUtility::quoteJSvalue($this->bparams ? '&bparams=' . rawurlencode($this->bparams) : '') . ';
            var additionalValues = ' . (count($this->additionalAttributes) ? json_encode($this->additionalAttributes, JSON_HEX_TAG | JSON_HEX_AMP | JSON_HEX_APOS | JSON_HEX_QUOT) : '{}') . ';';
        // Attributes setting functions
        $JScode .= '
            var cur_href=' . GeneralUtility::quoteJSvalue($this->curUrlArray['href'] ? ($this->curUrlInfo['query'] ? substr($this->curUrlArray['href'], 0, -strlen($this->curUrlInfo['query'])) : $this->curUrlArray['href']) : '') . ';
            var cur_target=' . GeneralUtility::quoteJSvalue($this->setTarget ?: '') . ';
            var cur_class=' . GeneralUtility::quoteJSvalue($this->setClass ?: '') . ';
            var cur_title=' . GeneralUtility::quoteJSvalue($this->setTitle ?: '') . ';

            function browse_links_setTarget(value) {
                cur_target=value;
                add_target="&curUrl[target]="+encodeURIComponent(value);
            }
            function browse_links_setClass(value) {
                cur_class=value;
                add_class="&curUrl[class]="+encodeURIComponent(value);
            }
            function browse_links_setTitle(value) {
                cur_title=value;
                add_title="&curUrl[title]="+encodeURIComponent(value);
            }
            function browse_links_setHref(value) {
                cur_href=value;
                add_href="&curUrl[href]="+value;
            }
            function browse_links_setAdditionalValue(name, value) {
                additionalValues[name] = value;
            }
        ';
        // Link setting functions
        $JScode .= '
            function link_typo3Page(id,anchor) {
                var parameters = (document.ltargetform.query_parameters && document.ltargetform.query_parameters.value) ? (document.ltargetform.query_parameters.value.charAt(0) == "&" ? "" : "&") + document.ltargetform.query_parameters.value : "";
                var theLink = ' . GeneralUtility::quoteJSvalue($this->siteURL . '?id=') . ' + id + parameters + (anchor ? anchor : "");
                if (document.ltargetform.anchor_title) browse_links_setTitle(document.ltargetform.anchor_title.value);
                if (document.ltargetform.anchor_class) browse_links_setClass(document.ltargetform.anchor_class.value);
                if (document.ltargetform.ltarget) browse_links_setTarget(document.ltargetform.ltarget.value);
                if (document.ltargetform.lrel) browse_links_setAdditionalValue("rel", document.ltargetform.lrel.value);
                browse_links_setAdditionalValue("data-htmlarea-external", "");
                plugin.createLink(theLink,cur_target,cur_class,cur_title,additionalValues);
                return false;
            }
            function link_folder(folder) {
                if (folder && folder.substr(0, 5) == "file:") {
                    var theLink = ' . GeneralUtility::quoteJSvalue($this->siteURL . '?file:') . ' + encodeURIComponent(folder.substr(5));
                } else {
                    var theLink = ' . GeneralUtility::quoteJSvalue($this->siteURL . '?') . ' + folder;
                }
                if (document.ltargetform.anchor_title) browse_links_setTitle(document.ltargetform.anchor_title.value);
                if (document.ltargetform.anchor_class) browse_links_setClass(document.ltargetform.anchor_class.value);
                if (document.ltargetform.ltarget) browse_links_setTarget(document.ltargetform.ltarget.value);
                if (document.ltargetform.lrel) browse_links_setAdditionalValue("rel", document.ltargetform.lrel.value);
                browse_links_setAdditionalValue("data-htmlarea-external", "");
                plugin.createLink(theLink,cur_target,cur_class,cur_title,additionalValues);
                return false;
            }
            function link_spec(theLink) {
                if (document.ltargetform.anchor_title) browse_links_setTitle(document.ltargetform.anchor_title.value);
                if (document.ltargetform.anchor_class) browse_links_setClass(document.ltargetform.anchor_class.value);
                if (document.ltargetform.ltarget) browse_links_setTarget(document.ltargetform.ltarget.value);
                browse_links_setAdditionalValue("data-htmlarea-external", "");
                plugin.createLink(theLink,cur_target,cur_class,cur_title,additionalValues);
                return false;
            }
            function link_current() {
                var parameters = (document.ltargetform.query_parameters && document.ltargetform.query_parameters.value) ? (document.ltargetform.query_parameters.value.charAt(0) == "&" ? "" : "&") + document.ltargetform.query_parameters.value : "";
                if (document.ltargetform.anchor_title) browse_links_setTitle(document.ltargetform.anchor_title.value);
                if (document.ltargetform.anchor_class) browse_links_setClass(document.ltargetform.anchor_class.value);
                if (document.ltargetform.ltarget) browse_links_setTarget(document.ltargetform.ltarget.value);
                if (document.ltargetform.lrel) browse_links_setAdditionalValue("rel", document.ltargetform.lrel.value);
                if (cur_href!="http://" && cur_href!="mailto:") {
                    plugin.createLink(cur_href + parameters,cur_target,cur_class,cur_title,additionalValues);
                }
                return false;
            }
        ';
        // General "jumpToUrl" and launchView functions:
        $JScode .= '
            function jumpToUrl(URL,anchor) {
                if (URL.charAt(0) === \'?\') {
                    URL = ' . GeneralUtility::quoteJSvalue($this->getThisScript()) . ' + URL.substring(1);
                }
                var add_editorNo = URL.indexOf("editorNo=")==-1 ? "&editorNo=" + ' . GeneralUtility::quoteJSvalue(rawurlencode($this->editorNo)) . ' : "";
                var add_contentTypo3Language = URL.indexOf("contentTypo3Language=")==-1 ? "&contentTypo3Language=" + ' . GeneralUtility::quoteJSvalue(rawurlencode($this->contentTypo3Language)) . ' : "";
                var add_act = URL.indexOf("act=")==-1 ? "&act=" + ' . GeneralUtility::quoteJSvalue(rawurlencode($this->act)) . ' : "";
                var add_mode = URL.indexOf("mode=")==-1 ? "&mode=" + ' . GeneralUtility::quoteJSvalue(rawurlencode($this->mode)) . ' : "";
                var add_additionalValues = "";
                if (plugin.pageTSConfiguration && plugin.pageTSConfiguration.additionalAttributes) {
                    var additionalAttributes = plugin.pageTSConfiguration.additionalAttributes.split(",");
                    for (var i = additionalAttributes.length; --i >= 0;) {
                        if (additionalValues[additionalAttributes[i]] != "") {
                            add_additionalValues += "&curUrl[" + additionalAttributes[i] + "]=" + encodeURIComponent(additionalValues[additionalAttributes[i]]);
                        }
                    }
                }
                var theLocation = URL+add_act+add_editorNo+add_contentTypo3Language+add_mode+add_href+add_target+add_class+add_title+add_additionalValues+add_params+(anchor?anchor:"");
                window.location.href = theLocation;
                return false;
            }
            function launchView(url) {
                var thePreviewWindow="";
                thePreviewWindow = window.open("' . $GLOBALS['BACK_PATH'] . 'show_item.php?table="+url,"ShowItem","height=300,width=410,status=0,menubar=0,resizable=0,location=0,directories=0,scrollbars=1,toolbar=0");
                if (thePreviewWindow && thePreviewWindow.focus) {
                    thePreviewWindow.focus();
                }
            }
        ';
        // Hook to overwrite or extend javascript functions
        if (isset($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['ext/rtehtmlarea/mod3/class.tx_rtehtmlarea_browse_links.php']['extendJScode']) && is_array($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['ext/rtehtmlarea/mod3/class.tx_rtehtmlarea_browse_links.php']['extendJScode'])) {
            $conf = array();
            $_params = array(
                'conf' => &$conf
            );
            foreach ($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['ext/rtehtmlarea/mod3/class.tx_rtehtmlarea_browse_links.php']['extendJScode'] as $objRef) {
                $processor =& GeneralUtility::getUserObj($objRef);
                $JScode .= $processor->extendJScode($_params, $this);
            }
        }
        return $JScode;
    }

    /******************************************************************
     *
     * Main functions
     *
     ******************************************************************/
    public function main_rte($wiz = 0) {
        // Starting content:
        $content = $this->doc->startPage($GLOBALS['LANG']->getLL('Insert/Modify Link', TRUE));
        // Default allowed values
        $this->allowedItems = explode(',', 'page,file,folder,url,mail,spec');
        // Calling hook for extra options
        foreach ($this->hookObjects as $hookObject) {
            $this->allowedItems = $hookObject->addAllowedItems($this->allowedItems);
        }
        // Removing items as per configuration
        if (is_array($this->buttonConfig['options.']) && $this->buttonConfig['options.']['removeItems']) {
            $this->allowedItems = array_diff($this->allowedItems, GeneralUtility::trimExplode(',', $this->buttonConfig['options.']['removeItems'], TRUE));
        }
        reset($this->allowedItems);
        if (!in_array($this->act, $this->allowedItems)) {
            $this->act = current($this->allowedItems);
        }
        // Making menu in top:
        $menuDef = array();
        if (!$wiz && $this->curUrlArray['href']) {
            $menuDef['removeLink']['isActive'] = $this->act == 'removeLink';
            $menuDef['removeLink']['label'] = $GLOBALS['LANG']->getLL('removeLink', TRUE);
            $menuDef['removeLink']['url'] = '#';
            $menuDef['removeLink']['addParams'] = 'onclick="plugin.unLink();return false;"';
        }
        if (in_array('page', $this->allowedItems)) {
            $menuDef['page']['isActive'] = $this->act == 'page';
            $menuDef['page']['label'] = $GLOBALS['LANG']->getLL('page', TRUE);
            $menuDef['page']['url'] = '#';
            $menuDef['page']['addParams'] = 'onclick="jumpToUrl(' . GeneralUtility::quoteJSvalue('?act=page&mode=' . $this->mode . '&bparams=' . $this->bparams) . ');return false;"';
        }
        if (in_array('file', $this->allowedItems)) {
            $menuDef['file']['isActive'] = $this->act == 'file';
            $menuDef['file']['label'] = $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_browse_links.xlf:file', TRUE);
            $menuDef['file']['url'] = '#';
            $menuDef['file']['addParams'] = 'onclick="jumpToUrl(' . GeneralUtility::quoteJSvalue('?act=file&mode=' . $this->mode . '&bparams=' . $this->bparams) . ');return false;"';
        }
        if (in_array('folder', $this->allowedItems)) {
            $menuDef['folder']['isActive'] = $this->act == 'folder';
            $menuDef['folder']['label'] = $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_browse_links.xlf:folder', TRUE);
            $menuDef['folder']['url'] = '#';
            $menuDef['folder']['addParams'] = 'onclick="jumpToUrl(' . GeneralUtility::quoteJSvalue('?act=folder&mode=' . $this->mode . '&bparams=' . $this->bparams) . ');return false;"';
        }
        if (in_array('url', $this->allowedItems)) {
            $menuDef['url']['isActive'] = $this->act == 'url';
            $menuDef['url']['label'] = $GLOBALS['LANG']->getLL('extUrl', TRUE);
            $menuDef['url']['url'] = '#';
            $menuDef['url']['addParams'] = 'onclick="jumpToUrl(' . GeneralUtility::quoteJSvalue('?act=url&mode=' . $this->mode . '&bparams=' . $this->bparams) . ');return false;"';
        }
        if (in_array('mail', $this->allowedItems)) {
            $menuDef['mail']['isActive'] = $this->act == 'mail';
            $menuDef['mail']['label'] = $GLOBALS['LANG']->getLL('email', TRUE);
            $menuDef['mail']['url'] = '#';
            $menuDef['mail']['addParams'] = 'onclick="jumpToUrl(' . GeneralUtility::quoteJSvalue('?act=mail&mode=' . $this->mode . '&bparams=' . $this->bparams) . ');return false;"';
        }
        if (is_array($this->thisConfig['userLinks.']) && in_array('spec', $this->allowedItems)) {
            $menuDef['spec']['isActive'] = $this->act == 'spec';
            $menuDef['spec']['label'] = $GLOBALS['LANG']->getLL('special', TRUE);
            $menuDef['spec']['url'] = '#';
            $menuDef['spec']['addParams'] = 'onclick="jumpToUrl(' . GeneralUtility::quoteJSvalue('?act=spec&mode=' . $this->mode . '&bparams=' . $this->bparams) . ');return false;"';
        }
        // call hook for extra options
        foreach ($this->hookObjects as $hookObject) {
            $menuDef = $hookObject->modifyMenuDefinition($menuDef);
        }
        $content .= $this->doc->getTabMenuRaw($menuDef);
        // Adding the menu and header to the top of page:
        $content .= $this->printCurrentUrl($this->curUrlInfo['info']) . '<br />';
        // Depending on the current action we will create the actual module content for selecting a link:
        switch ($this->act) {
            case 'mail':
                $extUrl = '
                <!--
                    Enter mail address:
                -->
                                <tr>
                                    <td><label>' . $GLOBALS['LANG']->getLL('emailAddress', TRUE) . ':</label></td>
                                    <td><input type="text" name="lemail"' . $this->doc->formWidth(20) . ' value="' . htmlspecialchars(($this->curUrlInfo['act'] == 'mail' ? $this->curUrlInfo['info'] : '')) . '" /> ' . '<input type="submit" value="' . $GLOBALS['LANG']->getLL('setLink', TRUE) . '" onclick="browse_links_setTarget(\'\');browse_links_setHref(\'mailto:\'+document.ltargetform.lemail.value);browse_links_setAdditionalValue(\'data-htmlarea-external\', \'\');return link_current();" /></td>
                                </tr>';
                //$content .= $extUrl;
                $content .= $this->addAttributesForm($extUrl);
                break;
            case 'url':
                $extUrl = '
                <!--
                    Enter External URL:
                -->
                                <tr>
                                    <td><label>URL:</label></td>
                                    <td colspan="3"><input type="text" name="lurl"' . $this->doc->formWidth(20) . ' value="' . htmlspecialchars(($this->curUrlInfo['act'] == 'url' ? $this->curUrlInfo['info'] : 'http://')) . '" /> ' . '<input type="submit" value="' . $GLOBALS['LANG']->getLL('setLink', TRUE) . '" onclick="if (/^[A-Za-z0-9_+]{1,8}:/.test(document.ltargetform.lurl.value)) { browse_links_setHref(document.ltargetform.lurl.value); } else { browse_links_setHref(\'http://\'+document.ltargetform.lurl.value); }; browse_links_setAdditionalValue(\'data-htmlarea-external\', \'1\'); return link_current();" /></td>
                                </tr>';
                $content .= $this->addAttributesForm($extUrl);
                break;
            case 'file':
            case 'folder':
                $content .= $this->addAttributesForm();
                // Create folder tree:
                $this->doc->JScode .= $this->doc->wrapScriptTags('
                        Tree.ajaxID = "SC_alt_file_navframe::expandCollapse";
                    ');
                $foldertree = GeneralUtility::makeInstance('TYPO3\\CMS\\Rtehtmlarea\\FolderTree');
                $foldertree->thisScript = $this->thisScript;
                $tree = $foldertree->getBrowsableTree();
                if (!$this->curUrlInfo['value'] || $this->curUrlInfo['act'] != $this->act) {
                    $cmpPath = '';
                } else {
                    $cmpPath = $this->curUrlInfo['value'];
                    if (!isset($this->expandFolder)) {
                        $this->expandFolder = $cmpPath;
                    }
                }
                // Get the selected folder
                $selectedFolder = FALSE;
                if ($this->expandFolder) {
                    try {
                        $fileOrFolderObject = \TYPO3\CMS\Core\Resource\ResourceFactory::getInstance()->retrieveFileOrFolderObject($this->expandFolder);
                    } catch (\Exception $e) {
                        // No path is selected
                    }
                    if ($fileOrFolderObject instanceof \TYPO3\CMS\Core\Resource\Folder) {
                        // It's a folder
                        $selectedFolder = $fileOrFolderObject;
                    } elseif ($fileOrFolderObject instanceof \TYPO3\CMS\Core\Resource\FileInterface) {
                        // It's a file
                        try {
                            $selectedFolder = $fileOrFolderObject->getParentFolder();
                        } catch (\Exception $e) {
                            // Accessing the parent folder failed for some reason. e.g. permissions
                        }
                    }
                }
                // If no folder is selected, get the user's default upload folder
                if (!$selectedFolder) {
                    try {
                        $selectedFolder = $GLOBALS['BE_USER']->getDefaultUploadFolder();
                    } catch (\Exception $e) {
                        // The configured default user folder does not exist
                    }
                }
                // Build the file upload and folder creation forms
                $uploadForm = '';
                $createFolder = '';
                if ($selectedFolder) {
                    $uploadForm = ($this->act === 'file') ? $this->uploadForm($selectedFolder) : '';
                    $createFolder = $this->createFolder($selectedFolder);
                }
                // Insert the upload form on top, if so configured
                if ($GLOBALS['BE_USER']->getTSConfigVal('options.uploadFieldsInTopOfEB')) {
                    $content .= $uploadForm;
                }
                // Render the filelist if there is a folder selected
                if ($selectedFolder) {
                    $files = $this->expandFolder($selectedFolder, $this->P['params']['allowedExtensions']);
                }
                $content .= '

                <!--
                    Wrapper table for folder tree / file/folder list:
                -->
                        <table border="0" cellpadding="0" cellspacing="0" id="typo3-linkFiles">
                            <tr>
                                <td class="c-wCell" valign="top">' . $this->barheader(($GLOBALS['LANG']->getLL('folderTree') . ':')) . $tree . '</td>
                                <td class="c-wCell" valign="top">' . $files . '</td>
                            </tr>
                        </table>
                        ';
                // Adding create folder + upload form if applicable
                if (!$GLOBALS['BE_USER']->getTSConfigVal('options.uploadFieldsInTopOfEB')) {
                    $content .= $uploadForm;
                }
                $content .= '<br />';
                $content .= $createFolder;
                $content .= '<br />';
                break;
            case 'spec':
                if (is_array($this->thisConfig['userLinks.'])) {
                    $subcats = array();
                    $v = $this->thisConfig['userLinks.'];
                    foreach ($v as $k2 => $dummyValue) {
                        $k2i = (int)$k2;
                        if (substr($k2, -1) == '.' && is_array($v[$k2i . '.'])) {
                            // Title:
                            $title = trim($v[$k2i]);
                            if (!$title) {
                                $title = $v[$k2i . '.']['url'];
                            } else {
                                $title = $GLOBALS['LANG']->sL($title);
                            }
                            // Description:
                            $description = $v[$k2i . '.']['description'] ? $GLOBALS['LANG']->sL($v[($k2i . '.')]['description'], TRUE) . '<br />' : '';
                            // URL + onclick event:
                            $onClickEvent = '';
                            if (isset($v[$k2i . '.']['target'])) {
                                $onClickEvent .= 'browse_links_setTarget(' . GeneralUtility::quoteJSvalue($v[($k2i . '.')]['target']) . ');';
                            }
                            $v[$k2i . '.']['url'] = str_replace('###_URL###', $this->siteURL, $v[$k2i . '.']['url']);
                            if (substr($v[$k2i . '.']['url'], 0, 7) == 'http://' || substr($v[$k2i . '.']['url'], 0, 7) == 'mailto:') {
                                $onClickEvent .= 'cur_href=' . GeneralUtility::quoteJSvalue($v[($k2i . '.')]['url']) . ';link_current();';
                            } else {
                                $onClickEvent .= 'link_spec(' . GeneralUtility::quoteJSvalue($this->siteURL . $v[($k2i . '.')]['url']) . ');';
                            }
                            // Link:
                            $A = array('<a href="#" onclick="' . htmlspecialchars($onClickEvent) . 'return false;">', '</a>');
                            // Adding link to menu of user defined links:
                            $subcats[$k2i] = '
                                    <tr>
                                        <td class="bgColor4">' . $A[0] . '<strong>' . htmlspecialchars($title) . ($this->curUrlInfo['info'] == $v[$k2i . '.']['url'] ? '<img' . \TYPO3\CMS\Backend\Utility\IconUtility::skinImg($GLOBALS['BACK_PATH'], 'gfx/blinkarrow_right.gif', 'width="5" height="9"') . ' class="c-blinkArrowR" alt="" />' : '') . '</strong><br />' . $description . $A[1] . '</td>
                                    </tr>';
                        }
                    }
                    // Sort by keys:
                    ksort($subcats);
                    // Add menu to content:
                    $content .= '
                <!--
                    Special userdefined menu:
                -->
                            <table border="0" cellpadding="1" cellspacing="1" id="typo3-linkSpecial">
                                <tr>
                                    <td class="bgColor5 c-wCell" valign="top"><strong>' . $GLOBALS['LANG']->getLL('special', TRUE) . '</strong></td>
                                </tr>
                                ' . implode('', $subcats) . '
                            </table>
                            ';
                }
                break;
            case 'page':
                $content .= $this->addAttributesForm();
                $pagetree = GeneralUtility::makeInstance('TYPO3\\CMS\\Rtehtmlarea\\PageTree');
                $pagetree->ext_showNavTitle = $GLOBALS['BE_USER']->getTSConfigVal('options.pageTree.showNavTitle');
                $pagetree->ext_showPageId = $GLOBALS['BE_USER']->getTSConfigVal('options.pageTree.showPageIdWithTitle');
                $pagetree->addField('nav_title');
                $tree = $pagetree->getBrowsableTree();
                $cElements = $this->expandPage();
                $dbmount = $this->getTemporaryTreeMountCancelNotice();
                $content .= '
                <!--
                    Wrapper table for page tree / record list:
                -->
                        <table border="0" cellpadding="0" cellspacing="0" id="typo3-linkPages">
                            <tr>
                                <td class="c-wCell" valign="top">' . $this->barheader(($GLOBALS['LANG']->getLL('pageTree') . ':')) . $dbmount . $tree . '</td>
                                <td class="c-wCell" valign="top">' . $cElements . '</td>
                            </tr>
                        </table>
                        ';
                break;
            default:
                // call hook
                foreach ($this->hookObjects as $hookObject) {
                    $content .= $hookObject->getTab($this->act);
                }
        }
        // End page, return content:
        $content .= $this->doc->endPage();
        $content = $this->doc->insertStylesAndJS($content);
        return $content;
    }

    public function addAttributesForm($rows = '') {
        $ltargetForm = '';
        $additionalAttributeFields = '';
        // Add page id, target, class selector box, title and parameters fields:
        $lpageId = $this->addPageIdSelector();
        $queryParameters = $this->addQueryParametersSelector();
        $ltarget = $this->addTargetSelector();
        $lclass = $this->addClassSelector();
        $ltitle = $this->addTitleSelector();
        $rel = $this->addRelField();
        // additional fields for links
        if (isset($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['ext/rtehtmlarea/mod3/class.tx_rtehtmlarea_browse_links.php']['addAttributeFields']) && is_array($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['ext/rtehtmlarea/mod3/class.tx_rtehtmlarea_browse_links.php']['addAttributeFields'])) {
            $conf = array();
            $_params = array(
                'conf' => &$conf
            );
            foreach ($GLOBALS['TYPO3_CONF_VARS']['SC_OPTIONS']['ext/rtehtmlarea/mod3/class.tx_rtehtmlarea_browse_links.php']['addAttributeFields'] as $objRef) {
                $processor =& GeneralUtility::getUserObj($objRef);
                $additionalAttributeFields .= $processor->getAttributefields($_params, $this);
            }
        }
        if ($rows || $lpageId || $queryParameters || $lclass || $ltitle || $ltarget || $rel) {
            $ltargetForm = $this->wrapInForm($rows . $lpageId . $queryParameters . $lclass . $ltitle . $ltarget . $rel . $additionalAttributeFields);
        }
        return $ltargetForm;
    }

    public function wrapInForm($string) {
        $form = '
            <!--
                Selecting target for link:
            -->
                <form action="" name="ltargetform" id="ltargetform">
                    <table id="typo3-linkTarget" class="htmlarea-window-table">' . $string;
        if ($this->act == $this->curUrlInfo['act'] && $this->act != 'mail' && $this->curUrlArray['href']) {
            $form .= '
                        <tr>
                            <td>
                            </td>
                            <td colspan="3">
                                <input type="submit" value="' . $GLOBALS['LANG']->getLL('update', TRUE) . '" onclick="' . ($this->act == 'url' ? 'browse_links_setAdditionalValue(\'data-htmlarea-external\', \'1\'); ' : '') . 'return link_current();" />
                            </td>
                        </tr>';
        }
        $form .= '
                    </table>
                </form>';
        return $form;
    }

    public function addPageIdSelector() {
        return $this->act == 'page' && $this->buttonConfig && is_array($this->buttonConfig['pageIdSelector.']) && $this->buttonConfig['pageIdSelector.']['enabled'] ? '
                        <tr>
                            <td><label>' . $GLOBALS['LANG']->getLL('page_id', TRUE) . ':</label></td>
                            <td colspan="3">
                                <input type="text" size="6" name="luid" />&nbsp;<input type="submit" value="' . $GLOBALS['LANG']->getLL('setLink', TRUE) . '" onclick="return link_typo3Page(document.ltargetform.luid.value);" />
                            </td>
                        </tr>' : '';
    }

    public function addRelField() {
        return ($this->act == 'page' || $this->act == 'url' || $this->act == 'file') && $this->buttonConfig && is_array($this->buttonConfig['relAttribute.']) && $this->buttonConfig['relAttribute.']['enabled'] ? '
                        <tr>
                            <td><label>' . $GLOBALS['LANG']->getLL('linkRelationship', TRUE) . ':</label></td>
                            <td colspan="3">
                                <input type="text" name="lrel" value="' . htmlspecialchars($this->additionalAttributes['rel']) . '"  ' . $this->doc->formWidth(30) . ' />
                            </td>
                        </tr>' : '';
    }

    public function addQueryParametersSelector() {
        return $this->act == 'page' && $this->buttonConfig && is_array($this->buttonConfig['queryParametersSelector.']) && $this->buttonConfig['queryParametersSelector.']['enabled'] ? '
                        <tr>
                            <td><label>' . $GLOBALS['LANG']->getLL('query_parameters', TRUE) . ':</label></td>
                            <td colspan="3">
                                <input type="text" name="query_parameters" value="' . ($this->curUrlInfo['query'] ? htmlspecialchars($this->curUrlInfo['query']) : '') . '" ' . $this->doc->formWidth(30) . ' />
                            </td>
                        </tr>' : '';
    }

    public function addTargetSelector() {
        $targetSelectorConfig = array();
        $popupSelectorConfig = array();
        if (is_array($this->buttonConfig['targetSelector.'])) {
            $targetSelectorConfig = $this->buttonConfig['targetSelector.'];
        }
        if (is_array($this->buttonConfig['popupSelector.'])) {
            $popupSelectorConfig = $this->buttonConfig['popupSelector.'];
        }
        $ltarget = '';
        if ($this->act != 'mail') {
            $ltarget .= '
                    <tr id="ltargetrow"' . ($targetSelectorConfig['disabled'] && $popupSelectorConfig['disabled'] ? ' style="display: none;"' : '') . '>
                        <td><label>' . $GLOBALS['LANG']->getLL('target', TRUE) . ':</label></td>
                        <td><input type="text" name="ltarget" onchange="browse_links_setTarget(this.value);" value="' . htmlspecialchars(($this->setTarget ? $this->setTarget : ($this->setClass || !$this->classesAnchorDefault[$this->act] ? '' : $this->classesAnchorDefaultTarget[$this->act]))) . '"' . $this->doc->formWidth(10) . ' /></td>';
            $ltarget .= '
                        <td colspan="2">';
            if (!$targetSelectorConfig['disabled']) {
                $ltarget .= '
                            <select name="ltarget_type" onchange="browse_links_setTarget(this.options[this.selectedIndex].value);document.ltargetform.ltarget.value=this.options[this.selectedIndex].value;this.selectedIndex=0;">
                                <option></option>
                                <option value="_top">' . $GLOBALS['LANG']->getLL('top', TRUE) . '</option>
                                <option value="_blank">' . $GLOBALS['LANG']->getLL('newWindow', TRUE) . '</option>
                            </select>';
            }
            $ltarget .= '
                        </td>
                    </tr>';
            if (!$popupSelectorConfig['disabled']) {
                $selectJS = 'if (document.ltargetform.popup_width.options[document.ltargetform.popup_width.selectedIndex].value>0 && document.ltargetform.popup_height.options[document.ltargetform.popup_height.selectedIndex].value>0) {
                    document.ltargetform.ltarget.value = document.ltargetform.popup_width.options[document.ltargetform.popup_width.selectedIndex].value+\'x\'+document.ltargetform.popup_height.options[document.ltargetform.popup_height.selectedIndex].value;
                    browse_links_setTarget(document.ltargetform.ltarget.value);
                    document.ltargetform.popup_width.selectedIndex=0;
                    document.ltargetform.popup_height.selectedIndex=0;
                }';
                $ltarget .= '
                        <tr>
                            <td><label>' . $GLOBALS['LANG']->getLL('target_popUpWindow', TRUE) . ':</label></td>
                            <td colspan="3">
                                <select name="popup_width" onchange="' . htmlspecialchars($selectJS) . '">
                                    <option value="0">' . $GLOBALS['LANG']->getLL('target_popUpWindow_width', TRUE) . '</option>
                                    <option value="300">300</option>
                                    <option value="400">400</option>
                                    <option value="500">500</option>
                                    <option value="600">600</option>
                                    <option value="700">700</option>
                                    <option value="800">800</option>
                                </select>
                                x
                                <select name="popup_height" onchange="' . htmlspecialchars($selectJS) . '">
                                    <option value="0">' . $GLOBALS['LANG']->getLL('target_popUpWindow_height', TRUE) . '</option>
                                    <option value="200">200</option>
                                    <option value="300">300</option>
                                    <option value="400">400</option>
                                    <option value="500">500</option>
                                    <option value="600">600</option>
                                </select>
                            </td>
                        </tr>';
            }
        }
        return $ltarget;
    }

    public function addClassSelector() {
        $selectClass = '';
        if ($this->classesAnchorJSOptions[$this->act]) {
            $selectClass = '
                        <tr>
                            <td><label>' . $GLOBALS['LANG']->getLL('anchor_class', TRUE) . ':</label></td>
                            <td colspan="3">
                                <select name="anchor_class" onchange="' . htmlspecialchars($this->getClassOnChangeJS()) . '">
                                    ' . $this->classesAnchorJSOptions[$this->act] . '
                                </select>
                            </td>
                        </tr>';
        }
        return $selectClass;
    }

    public function getClassOnChangeJS() {
        return '
                    if (document.ltargetform.anchor_class) {
                        document.ltargetform.anchor_class.value = document.ltargetform.anchor_class.options[document.ltargetform.anchor_class.selectedIndex].value;
                        if (document.ltargetform.anchor_class.value && HTMLArea.classesAnchorSetup) {
                            for (var i = HTMLArea.classesAnchorSetup.length; --i >= 0;) {
                                var anchorClass = HTMLArea.classesAnchorSetup[i];
                                if (anchorClass[\'name\'] == document.ltargetform.anchor_class.value) {
                                    if (anchorClass[\'titleText\'] && document.ltargetform.anchor_title) {
                                        document.ltargetform.anchor_title.value = anchorClass[\'titleText\'];
                                        document.getElementById(\'rtehtmlarea-browse-links-title-readonly\').innerHTML = anchorClass[\'titleText\'];
                                        browse_links_setTitle(anchorClass[\'titleText\']);
                                    }
                                    if (anchorClass[\'target\']) {
                                        if (document.ltargetform.ltarget) {
                                            document.ltargetform.ltarget.value = anchorClass[\'target\'];
                                        }
                                        browse_links_setTarget(anchorClass[\'target\']);
                                    } else if (document.ltargetform.ltarget && document.getElementById(\'ltargetrow\').style.display == \'none\') {
                                            // Reset target to default if field is not displayed and class has no configured target
                                        document.ltargetform.ltarget.value = ' . ($this->defaultLinkTarget ? GeneralUtility::quoteJSvalue($this->defaultLinkTarget) : '""') . ';
                                        browse_links_setTarget(document.ltargetform.ltarget.value);
                                    }
                                    break;
                                }
                            }
                        }
                        browse_links_setClass(document.ltargetform.anchor_class.value);
                    }
                                ';
    }

    public function addTitleSelector() {
        $title = $this->setTitle ?: ($this->setClass || !$this->classesAnchorDefault[$this->act] ? '' : $this->classesAnchorDefaultTitle[$this->act]);
        $readOnly = $this->buttonConfig['properties.']['title.']['readOnly'] || $this->buttonConfig[$this->act . '.']['properties.']['title.']['readOnly'];
        if ($readOnly) {
            $title = $this->setClass ? $this->classesAnchorClassTitle[$this->setClass] : $this->classesAnchorDefaultTitle[$this->act];
        }
        return '
                        <tr>
                            <td><label for="rtehtmlarea-browse-links-anchor_title" id="rtehtmlarea-browse-links-title-label">' . $GLOBALS['LANG']->getLL('anchor_title', TRUE) . ':</label></td>
                            <td colspan="3">
                                <span id="rtehtmlarea-browse-links-title-input" style="display: ' . ($readOnly ? 'none' : 'inline') . ';">
                                    <input type="text" id="rtehtmlarea-browse-links-anchor_title" name="anchor_title" value="' . htmlspecialchars($title) . '" ' . $this->doc->formWidth(30) . ' />
                                </span>
                                <span id="rtehtmlarea-browse-links-title-readonly" style="display: ' . ($readOnly ? 'inline' : 'none') . ';">' . htmlspecialchars($title) . '</span>
                            </td>
                        </tr>';
    }

    public function getLLContent($string) {
        return $this->contentLanguageService->sL($string);
    }

    public function getPageConfigLabel($string, $JScharCode = 1) {
        if (substr($string, 0, 4) !== 'LLL:') {
            $label = $string;
        } else {
            $label = $GLOBALS['LANG']->sL(trim($string));
        }
        $label = str_replace('"', '\\"', str_replace('\\\'', '\'', $label));
        $label = $JScharCode ? GeneralUtility::quoteJSvalue($label) : $label;
        return $label;
    }

}