TcaTypesShowitem.php

Go to the documentation of this file.

<?php
 
/*
 * This file is part of the TYPO3 CMS project.
 *
 * It is free software; you can redistribute it and/or modify it under
 * the terms of the GNU General Public License, either version 2
 * of the License, or any later version.
 *
 * For the full copyright and license information, please read the
 * LICENSE.txt file that was distributed with this source code.
 *
 * The TYPO3 project - inspiring people to share!
 */
 
namespace ‪TYPO3\CMS\Backend\Form\FormDataProvider;
 
use ‪TYPO3\CMS\Backend\Form\FormDataProviderInterface;
use ‪TYPO3\CMS\Core\Utility\GeneralUtility;
use ‪TYPO3\CMS\Core\Utility\MathUtility;
 
class ‪TcaTypesShowitem implements ‪FormDataProviderInterface
{
    protected ‪$processedTca;
 
    public function ‪addData(array $result)
    {
        $this->processedTca = $result['processedTca'];
 
        $recordTypeValue = $result['recordTypeValue'];
 
        // Handle subtype_value_field, subtypes_addlist, subtypes_excludelist
        if (!empty($result['processedTca']['types'][$recordTypeValue]['subtype_value_field'])) {
            $subtypeFieldName = $result['processedTca']['types'][$recordTypeValue]['subtype_value_field'];
            if (array_key_exists($subtypeFieldName, $result['databaseRow'])) {
                $subtypeValue = $result['databaseRow'][$subtypeFieldName];
                $result = $this->‪addFieldsBySubtypeAddList($result, $subtypeFieldName, $subtypeValue, $recordTypeValue);
                $result = $this->‪removeFieldsBySubtypeExcludeList($result, $subtypeValue, $recordTypeValue);
            }
        }
 
        // Handle bitmask_value_field, bitmask_excludelist_bits
        if (!empty($result['processedTca']['types'][$recordTypeValue]['bitmask_value_field'])
            && isset($result['processedTca']['types'][$recordTypeValue]['bitmask_excludelist_bits'])
            && is_array($result['processedTca']['types'][$recordTypeValue]['bitmask_excludelist_bits'])
        ) {
            $bitmaskFieldName = $result['processedTca']['types'][$recordTypeValue]['bitmask_value_field'];
            if (array_key_exists($bitmaskFieldName, $result['databaseRow'])) {
                $bitmaskValue = $result['databaseRow'][$bitmaskFieldName];
                $result = $this->‪removeFieldsByBitmaskExcludeBits($result, $bitmaskValue, $recordTypeValue);
            }
        }
 
        // Handling of these parameters is finished. Unset them to not allow other handlers to fiddle with it.
        // unset does not throw notice, even if not set
        unset($result['processedTca']['types'][$recordTypeValue]['subtype_value_field']);
        unset($result['processedTca']['types'][$recordTypeValue]['subtypes_excludelist']);
        unset($result['processedTca']['types'][$recordTypeValue]['subtypes_addlist']);
        unset($result['processedTca']['types'][$recordTypeValue]['bitmask_value_field']);
        unset($result['processedTca']['types'][$recordTypeValue]['bitmask_excludelist_bits']);
 
        return $result;
    }
 
    protected function ‪addFieldsBySubtypeAddList(array $result, $subtypeFieldName, $subtypeValue, $recordTypeValue)
    {
        if (!empty($this->processedTca['types'][$recordTypeValue]['subtypes_addlist'][$subtypeValue])
            && is_string($this->processedTca['types'][$recordTypeValue]['subtypes_addlist'][$subtypeValue])
        ) {
            $addListString = $this->processedTca['types'][$recordTypeValue]['subtypes_addlist'][$subtypeValue];
            $addListArray = ‪GeneralUtility::trimExplode(',', $addListString, true);
            $showItemFieldString = $result['processedTca']['types'][$recordTypeValue]['showitem'];
            $showItemFieldArray = ‪GeneralUtility::trimExplode(',', $showItemFieldString, true);
            // The "new" fields should be added after the subtype field itself, so find it
            foreach ($showItemFieldArray as $index => $fieldConfigurationString) {
                $found = false;
                $fieldConfigurationArray = ‪GeneralUtility::trimExplode(';', $fieldConfigurationString);
                $fieldName = $fieldConfigurationArray[0];
                if ($fieldName === $subtypeFieldName) {
                    // Found the subtype value field in showitem
                    $found = true;
                } elseif ($fieldName === '--palette--') {
                    // Try to find subtype value field in palette
                    if (isset($fieldConfigurationArray[2])) {
                        $paletteName = $fieldConfigurationArray[2];
                        if (!empty($this->processedTca['palettes'][$paletteName]['showitem'])) {
                            $paletteFields = ‪GeneralUtility::trimExplode(',', $this->processedTca['palettes'][$paletteName]['showitem'], true);
                            foreach ($paletteFields as $paletteFieldConfiguration) {
                                $paletteFieldConfigurationArray = ‪GeneralUtility::trimExplode(';', $paletteFieldConfiguration);
                                if ($paletteFieldConfigurationArray[0] === $subtypeFieldName) {
                                    // Found it in palette
                                    $found = true;
                                    break;
                                }
                            }
                        }
                    }
                }
                if ($found) {
                    // Add fields between subtype field and next element
                    array_splice($showItemFieldArray, $index + 1, 0, $addListArray);
                    break;
                }
            }
            $result['processedTca']['types'][$recordTypeValue]['showitem'] = implode(',', $showItemFieldArray);
        }
        return $result;
    }
 
    protected function ‪removeFieldsBySubtypeExcludeList(array $result, $subtypeValue, $recordTypeValue)
    {
        if (!empty($this->processedTca['types'][$recordTypeValue]['subtypes_excludelist'][$subtypeValue])
            && is_string($this->processedTca['types'][$recordTypeValue]['subtypes_excludelist'][$subtypeValue])
        ) {
            $removeListString = $this->processedTca['types'][$recordTypeValue]['subtypes_excludelist'][$subtypeValue];
            $removeListArray = ‪GeneralUtility::trimExplode(',', $removeListString, true);
            $result = $this->‪removeFields($result, $removeListArray, $recordTypeValue);
            $result = $this->‪removeFieldsFromPalettes($result, $removeListArray);
        }
        return $result;
    }
 
    protected function ‪removeFieldsByBitmaskExcludeBits(array $result, $bitmaskValue, $recordTypeValue)
    {
        $removeListArray = [];
        $bitmaskValue = ‪MathUtility::forceIntegerInRange($bitmaskValue, 0);
        $excludeListBitsArray = $this->processedTca['types'][$recordTypeValue]['bitmask_excludelist_bits'];
        foreach ($excludeListBitsArray as $bitKey => $excludeList) {
            $bitKey = (int)$bitKey;
            $isNegative = (bool)($bitKey < 0);
            $bit = abs($bitKey);
            if (!$isNegative && ($bitmaskValue & 2 ** $bit)
                || $isNegative && !($bitmaskValue & 2 ** $bit)
            ) {
                $removeListArray = array_merge($removeListArray, ‪GeneralUtility::trimExplode(',', $excludeList, true));
            }
        }
        $result = $this->‪removeFields($result, $removeListArray, $recordTypeValue);
        return $this->‪removeFieldsFromPalettes($result, $removeListArray);
    }
 
    protected function ‪removeFields(array $result, array $removeListArray, $recordTypeValue)
    {
        $newFieldList = [];
        $showItemFieldString = $result['processedTca']['types'][$recordTypeValue]['showitem'];
        $showItemFieldArray = ‪GeneralUtility::trimExplode(',', $showItemFieldString, true);
        foreach ($showItemFieldArray as $fieldConfigurationString) {
            $fieldConfigurationArray = ‪GeneralUtility::trimExplode(';', $fieldConfigurationString);
            $fieldName = $fieldConfigurationArray[0];
            if (!in_array($fieldConfigurationArray[0], $removeListArray, true)
                // It does not make sense to exclude --palette-- and --div--
                || $fieldName === '--palette--' || $fieldName === '--div--'
            ) {
                $newFieldList[] = $fieldConfigurationString;
            }
        }
        $result['processedTca']['types'][$recordTypeValue]['showitem'] = implode(',', $newFieldList);
        return $result;
    }
 
    protected function ‪removeFieldsFromPalettes(array $result, $removeListArray)
    {
        if (isset($result['processedTca']['palettes']) && is_array($result['processedTca']['palettes'])) {
            foreach ($result['processedTca']['palettes'] as $paletteName => $paletteArray) {
                if (!isset($paletteArray['showitem']) || !is_string($paletteArray['showitem'])) {
                    throw new \UnexpectedValueException(
                        'showitem field of palette ' . $paletteName . ' in table ' . $result['tableName'] . ' not found or not a string',
                        1439925240
                    );
                }
                $showItemFieldString = $paletteArray['showitem'];
                $showItemFieldArray = ‪GeneralUtility::trimExplode(',', $showItemFieldString, true);
                $newFieldList = [];
                foreach ($showItemFieldArray as $fieldConfigurationString) {
                    $fieldConfigurationArray = ‪GeneralUtility::trimExplode(';', $fieldConfigurationString);
                    $fieldName = $fieldConfigurationArray[0];
                    if (!in_array($fieldConfigurationArray[0], $removeListArray, true)
                        || $fieldName === '--linebreak--'
                    ) {
                        $newFieldList[] = $fieldConfigurationString;
                    }
                }
                $result['processedTca']['palettes'][$paletteName]['showitem'] = implode(',', $newFieldList);
            }
        }
        return $result;
    }
}