[TASK] Allow dbFieldLength option for select

Classes/FieldType/SelectFieldType.php

@@ -57,6 +57,7 @@ final class SelectFieldType extends AbstractFieldType
     // Only for renderType="selectTree"
     private array $treeConfig = [];
     private string $relationship = '';
+    private int $dbFieldLength = 0;
 
     public function createFromArray(array $settings): SelectFieldType
     {
@@ -99,6 +100,7 @@ public function createFromArray(array $settings): SelectFieldType
         ) {
             $self->relationship = 'manyToOne';
         }
+        $self->dbFieldLength = (int)($settings['dbFieldLength'] ?? $self->dbFieldLength);
         $self->setCustomProperties($settings);
 
         return $self;
@@ -187,6 +189,9 @@ public function getTca(): array
         if ($this->relationship !== '') {
             $config['relationship'] = $this->relationship;
         }
+        if ($this->dbFieldLength !== 0) {
+            $config['dbFieldLength'] = $this->dbFieldLength;
+        }
         $config = $this->mergeCustomProperties($config);
         $tca['config'] = array_replace($tca['config'] ?? [], $config);
         return $tca;

Classes/Generator/TcaGenerator.php

@@ -410,6 +410,7 @@ protected static function getNonOverridableOptions(): array
                 'option' => 'format',
             ],
             'l10n_mode',
+            'dbFieldLength',
         ];
     }
 

Documentation/YamlReference/FieldTypes/Select/Index.rst

@@ -147,6 +147,15 @@ Settings
    :yaml:`renderType` is set to :yaml:`selectSingle`, a relationship
    :yaml:`manyToOne` is automatically inferred.
 
+.. confval:: dbFieldLength
+   :name: select-dbFieldLength
+   :required: false
+   :type: int
+   :default: 255
+
+   This option can be used to set an alternative size for the database
+   :sql:`varchar` column. The default size is `255`.
+
 .. confval:: allowedCustomProperties
    :name: select-allowedCustomProperties
    :required: false

Tests/Unit/FieldTypes/SelectFieldTypeTest.php

@@ -82,6 +82,7 @@ public static function getTcaReturnsExpectedTcaDataProvider(): iterable
                 'itemsProcConfig' => [
                     'foo' => 'bar',
                 ],
+                'dbFieldLength' => 10,
             ],
             'expectedTca' => [
                 'label' => 'foo',
@@ -136,6 +137,7 @@ public static function getTcaReturnsExpectedTcaDataProvider(): iterable
                     'treeConfig' => [
                         'foo' => 'bar',
                     ],
+                    'dbFieldLength' => 10,
                     'itemsProcConfig' => [
                         'foo' => 'bar',
                     ],
@@ -180,6 +182,7 @@ public static function getTcaReturnsExpectedTcaDataProvider(): iterable
                 'sortItems' => [],
                 'appearance' => [],
                 'treeConfig' => [],
+                'dbFieldLength' => 0,
             ],
             'expectedTca' => [
                 'config' => [