ConfigurationStatus.php

Go to the documentation of this file.

<?php
namespace TYPO3\CMS\Reports\Report\Status;

use TYPO3\CMS\Core\Utility\GeneralUtility;

class ConfigurationStatus implements \TYPO3\CMS\Reports\StatusProviderInterface {

    protected $deprecationLogFileSizeWarningThreshold = 10485760;

    protected $deprecationLogFileSizeErrorThreshold = 104857600;

    protected $backPath = '../';

    public function getStatus() {
        $this->executeAdminCommand();
        $statuses = array(
            'emptyReferenceIndex' => $this->getReferenceIndexStatus(),
            'deprecationLog' => $this->getDeprecationLogStatus()
        );
        if ($this->isMemcachedUsed()) {
            $statuses['memcachedConnection'] = $this->getMemcachedConnectionStatus();
        }
        if (TYPO3_OS !== 'WIN') {
            $statuses['createdFilesWorldWritable'] = $this->getCreatedFilesWorldWritableStatus();
            $statuses['createdDirectoriesWorldWritable'] = $this->getCreatedDirectoriesWorldWritableStatus();
        }
        return $statuses;
    }

    protected function getReferenceIndexStatus() {
        $value = $GLOBALS['LANG']->getLL('status_ok');
        $message = '';
        $severity = \TYPO3\CMS\Reports\Status::OK;
        $count = $GLOBALS['TYPO3_DB']->exec_SELECTcountRows('*', 'sys_refindex');
        $registry = GeneralUtility::makeInstance('TYPO3\\CMS\\Core\\Registry');
        $lastRefIndexUpdate = $registry->get('core', 'sys_refindex_lastUpdate');
        if (!$count && $lastRefIndexUpdate) {
            $value = $GLOBALS['LANG']->getLL('status_empty');
            $severity = \TYPO3\CMS\Reports\Status::WARNING;
            $url =  \TYPO3\CMS\Backend\Utility\BackendUtility::getModuleUrl('system_dbint') . '&id=0&SET[function]=refindex';
            $message = sprintf($GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.xlf:warning.backend_reference_index'), '<a href="' . htmlspecialchars($url) . '">', '</a>', \TYPO3\CMS\Backend\Utility\BackendUtility::dateTime($lastRefIndexUpdate));
        }
        return GeneralUtility::makeInstance('TYPO3\\CMS\\Reports\\Status', $GLOBALS['LANG']->getLL('status_referenceIndex'), $value, $message, $severity);
    }

    protected function isMemcachedUsed() {
        $memcachedUsed = FALSE;
        $memcachedServers = $this->getConfiguredMemcachedServers();
        if (count($memcachedServers)) {
            $memcachedUsed = TRUE;
        }
        return $memcachedUsed;
    }

    protected function getConfiguredMemcachedServers() {
        $memcachedServers = array();
        if (is_array($GLOBALS['TYPO3_CONF_VARS']['SYS']['caching']['cacheConfigurations'])) {
            foreach ($GLOBALS['TYPO3_CONF_VARS']['SYS']['caching']['cacheConfigurations'] as $table => $conf) {
                if (is_array($conf)) {
                    foreach ($conf as $key => $value) {
                        if (!is_array($value) && $value === 'TYPO3\\CMS\\Core\\Cache\\Backend\\MemcachedBackend') {
                            $memcachedServers = $GLOBALS['TYPO3_CONF_VARS']['SYS']['caching']['cacheConfigurations'][$table]['options']['servers'];
                            break;
                        }
                    }
                }
            }
        }
        return $memcachedServers;
    }

    protected function getMemcachedConnectionStatus() {
        $value = $GLOBALS['LANG']->getLL('status_ok');
        $message = '';
        $severity = \TYPO3\CMS\Reports\Status::OK;
        $failedConnections = array();
        $defaultMemcachedPort = ini_get('memcache.default_port');
        $memcachedServers = $this->getConfiguredMemcachedServers();
        if (function_exists('memcache_connect') && is_array($memcachedServers)) {
            foreach ($memcachedServers as $testServer) {
                $configuredServer = $testServer;
                if (substr($testServer, 0, 7) == 'unix://') {
                    $host = $testServer;
                    $port = 0;
                } else {
                    if (substr($testServer, 0, 6) === 'tcp://') {
                        $testServer = substr($testServer, 6);
                    }
                    if (strstr($testServer, ':') !== FALSE) {
                        list($host, $port) = explode(':', $testServer, 2);
                    } else {
                        $host = $testServer;
                        $port = $defaultMemcachedPort;
                    }
                }
                $memcachedConnection = @memcache_connect($host, $port);
                if ($memcachedConnection != NULL) {
                    memcache_close($memcachedConnection);
                } else {
                    $failedConnections[] = $configuredServer;
                }
            }
        }
        if (count($failedConnections)) {
            $value = $GLOBALS['LANG']->getLL('status_connectionFailed');
            $severity = \TYPO3\CMS\Reports\Status::WARNING;
            $message = $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_core.xlf:warning.memcache_not_usable') . '<br /><br />' . '<ul><li>' . implode('</li><li>', $failedConnections) . '</li></ul>';
        }
        return GeneralUtility::makeInstance('TYPO3\\CMS\\Reports\\Status', $GLOBALS['LANG']->getLL('status_memcachedConfiguration'), $value, $message, $severity);
    }

    protected function getDeprecationLogStatus() {
        $title = $GLOBALS['LANG']->getLL('status_configuration_DeprecationLog');
        $value = $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_common.xlf:disabled');
        $message = '';
        $severity = \TYPO3\CMS\Reports\Status::OK;
        if ($GLOBALS['TYPO3_CONF_VARS']['SYS']['enableDeprecationLog']) {
            $value = $GLOBALS['LANG']->sL('LLL:EXT:lang/locallang_common.xlf:enabled');
            $message = '<p>' . $GLOBALS['LANG']->getLL('status_configuration_DeprecationLogEnabled') . '</p>';
            $severity = \TYPO3\CMS\Reports\Status::NOTICE;
            $logFile = GeneralUtility::getDeprecationLogFileName();
            $logFileSize = 0;
            if (@file_exists($logFile)) {
                $logFileSize = filesize($logFile);
                $message .= '<p>' . sprintf($GLOBALS['LANG']->getLL('status_configuration_DeprecationLogFile'), $this->getDeprecationLogFileLink()) . '</p>';
                $removeDeprecationLogFileUrl = GeneralUtility::getIndpEnv('TYPO3_REQUEST_URL') . '&amp;adminCmd=removeDeprecationLogFile';
                $message .= '<p>' . sprintf($GLOBALS['LANG']->getLL('status_configuration_DeprecationLogSize'), GeneralUtility::formatSize($logFileSize)) . ' <a href="' . $removeDeprecationLogFileUrl . '">' . $GLOBALS['LANG']->getLL('status_configuration_DeprecationLogDeleteLink') . '</a></p>';
            }
            if ($logFileSize > $this->deprecationLogFileSizeWarningThreshold) {
                $severity = \TYPO3\CMS\Reports\Status::WARNING;
            }
            if ($logFileSize > $this->deprecationLogFileSizeErrorThreshold) {
                $severity = \TYPO3\CMS\Reports\Status::ERROR;
            }
        }
        return GeneralUtility::makeInstance('TYPO3\\CMS\\Reports\\Status', $title, $value, $message, $severity);
    }

    protected function getCreatedFilesWorldWritableStatus() {
        $value = $GLOBALS['LANG']->getLL('status_ok');
        $message = '';
        $severity = \TYPO3\CMS\Reports\Status::OK;
        if ((int)$GLOBALS['TYPO3_CONF_VARS']['BE']['fileCreateMask'] % 10 & 2) {
            $value = $GLOBALS['TYPO3_CONF_VARS']['BE']['fileCreateMask'];
            $severity = \TYPO3\CMS\Reports\Status::WARNING;
            $message = $GLOBALS['LANG']->getLL('status_CreatedFilePermissions.writable');
        }
        return GeneralUtility::makeInstance('TYPO3\\CMS\\Reports\\Status', $GLOBALS['LANG']->getLL('status_CreatedFilePermissions'), $value, $message, $severity);
    }

    protected function getCreatedDirectoriesWorldWritableStatus() {
        $value = $GLOBALS['LANG']->getLL('status_ok');
        $message = '';
        $severity = \TYPO3\CMS\Reports\Status::OK;
        if ((int)$GLOBALS['TYPO3_CONF_VARS']['BE']['folderCreateMask'] % 10 & 2) {
            $value = $GLOBALS['TYPO3_CONF_VARS']['BE']['folderCreateMask'];
            $severity = \TYPO3\CMS\Reports\Status::WARNING;
            $message = $GLOBALS['LANG']->getLL('status_CreatedDirectoryPermissions.writable');
        }
        return GeneralUtility::makeInstance('TYPO3\\CMS\\Reports\\Status', $GLOBALS['LANG']->getLL('status_CreatedDirectoryPermissions'), $value, $message, $severity);
    }

    protected function getDeprecationLogFileLink() {
        $logFile = GeneralUtility::getDeprecationLogFileName();
        $relativePath = GeneralUtility::resolveBackPath($this->backPath . \TYPO3\CMS\Core\Utility\PathUtility::stripPathSitePrefix($logFile));
        $link = '<a href="' . $relativePath . '">' . $logFile . '</a>';
        return $link;
    }

    protected function executeAdminCommand() {
        $command = GeneralUtility::_GET('adminCmd');
        switch ($command) {
            case 'removeDeprecationLogFile':
                self::removeDeprecationLogFile();
                break;
            default:
                // intentionally left blank
        }
    }

    static protected function removeDeprecationLogFile() {
        if (@unlink(GeneralUtility::getDeprecationLogFileName())) {
            $message = $GLOBALS['LANG']->getLL('status_configuration_DeprecationLogDeletedSuccessful');
            $severity = \TYPO3\CMS\Core\Messaging\FlashMessage::OK;
        } else {
            $message = $GLOBALS['LANG']->getLL('status_configuration_DeprecationLogDeletionFailed');
            $severity = \TYPO3\CMS\Core\Messaging\FlashMessage::ERROR;
        }
        $flashMessage = GeneralUtility::makeInstance('TYPO3\\CMS\\Core\\Messaging\\FlashMessage', $message, '', $severity, TRUE);
        $flashMessageService = GeneralUtility::makeInstance('TYPO3\\CMS\\Core\\Messaging\\FlashMessageService');
        $defaultFlashMessageQueue = $flashMessageService->getMessageQueueByIdentifier();
        $defaultFlashMessageQueue->enqueue($flashMessage);
    }

}