Added the truncateFileName(filename, length) function

Author: gplanchat

src/StringExpressionLanguageProvider.php

@@ -16,6 +16,7 @@ public function getFunctions(): array
             new FileName('fileName'),
             new DateTime('dateTime'),
             new FormatDate('formatDate'),
+            new TruncateFileName('truncateFileName'),
         ];
     }
 }

src/TruncateFileName.php

@@ -0,0 +1,45 @@
+<?php
+
+declare(strict_types=1);
+
+namespace Kiboko\Component\StringExpressionLanguage;
+
+use Symfony\Component\ExpressionLanguage\ExpressionFunction;
+
+final class TruncateFileName extends ExpressionFunction
+{
+    public function __construct($name)
+    {
+        parent::__construct(
+            $name,
+            \Closure::fromCallable([$this, 'compile'])->bindTo($this),
+            \Closure::fromCallable([$this, 'evaluate'])->bindTo($this)
+        );
+    }
+
+    private function compile(string $filename, string $length)
+    {
+        return <<<PHP
+            (
+                !\\is_string({$filename}) ?
+                null :
+                (
+                    \\strlen(\$basename = \\pathinfo({$filename}, \\PATHINFO_BASENAME)) > $length ?
+                        \$basename . '.' . \\pathinfo({$filename}, \\PATHINFO_EXTENSION) :
+                        {$filename}
+                )
+            )
+            PHP;
+    }
+
+    private function evaluate(array $context, string $filename, int $length)
+    {
+        return !\is_string($filename) ?
+            null :
+            (
+                \strlen($basename = \pathinfo($filename, \PATHINFO_BASENAME)) > $length ?
+                    $basename . '.' . \pathinfo($filename, \PATHINFO_EXTENSION) :
+                    $filename
+            );
+    }
+}