lower and upper (resolves tpetry#12)

Co-authored-by: tpetry <[email protected]>

Author: gdebrauwer

README.md

@@ -256,10 +256,12 @@ BlogArticle::select([
 #### String
 ```php
 use Tpetry\QueryExpressions\Function\String\{
-    Concat, Uuid4
+    Concat, Lower, Upper, Uuid4
 };
 
 new Concat(array $expressions);
+new Lower(string|Expression $expression);
+new Upper(string|Expression $expression);
 new Uuid4();
 
 Schema::table('users', function (Blueprint $table): void {

src/Function/String/Lower.php

@@ -0,0 +1,31 @@
+<?php
+
+declare(strict_types=1);
+
+namespace Tpetry\QueryExpressions\Function\String;
+
+use Illuminate\Contracts\Database\Query\Expression;
+use Illuminate\Database\Grammar;
+use Tpetry\QueryExpressions\Concerns\IdentifiesDriver;
+use Tpetry\QueryExpressions\Concerns\StringizeExpression;
+
+class Lower implements Expression
+{
+    use IdentifiesDriver;
+    use StringizeExpression;
+
+    public function __construct(
+        private readonly string|Expression $expression,
+    ) {
+    }
+
+    public function getValue(Grammar $grammar): string
+    {
+        $expression = $this->stringize($grammar, $this->expression);
+
+        return match ($this->identify($grammar)) {
+            'mysql', 'sqlite' => "(lower({$expression}))",
+            'pgsql', 'sqlsrv' => "lower({$expression})",
+        };
+    }
+}

src/Function/String/Upper.php

@@ -0,0 +1,31 @@
+<?php
+
+declare(strict_types=1);
+
+namespace Tpetry\QueryExpressions\Function\String;
+
+use Illuminate\Contracts\Database\Query\Expression;
+use Illuminate\Database\Grammar;
+use Tpetry\QueryExpressions\Concerns\IdentifiesDriver;
+use Tpetry\QueryExpressions\Concerns\StringizeExpression;
+
+class Upper implements Expression
+{
+    use IdentifiesDriver;
+    use StringizeExpression;
+
+    public function __construct(
+        private readonly string|Expression $expression,
+    ) {
+    }
+
+    public function getValue(Grammar $grammar): string
+    {
+        $expression = $this->stringize($grammar, $this->expression);
+
+        return match ($this->identify($grammar)) {
+            'mysql', 'sqlite' => "(upper({$expression}))",
+            'pgsql', 'sqlsrv' => "upper({$expression})",
+        };
+    }
+}

tests/Function/String/LowerTest.php

@@ -0,0 +1,22 @@
+<?php
+
+declare(strict_types=1);
+
+use Illuminate\Database\Query\Expression;
+use Tpetry\QueryExpressions\Function\String\Lower;
+
+it('can lowercase a column')
+    ->expect(new Lower('val'))
+    ->toBeExecutable(['val varchar(255)'])
+    ->toBeMysql('(lower(`val`))')
+    ->toBePgsql('lower("val")')
+    ->toBeSqlite('(lower("val"))')
+    ->toBeSqlsrv('lower([val])');
+
+it('can lowercase an expression')
+    ->expect(new Lower(new Expression("'foo'")))
+    ->toBeExecutable()
+    ->toBeMysql("(lower('foo'))")
+    ->toBePgsql("lower('foo')")
+    ->toBeSqlite("(lower('foo'))")
+    ->toBeSqlsrv("lower('foo')");

tests/Function/String/UpperTest.php

@@ -0,0 +1,22 @@
+<?php
+
+declare(strict_types=1);
+
+use Illuminate\Database\Query\Expression;
+use Tpetry\QueryExpressions\Function\String\Upper;
+
+it('can uppercase a column')
+    ->expect(new Upper('val'))
+    ->toBeExecutable(['val varchar(255)'])
+    ->toBeMysql('(upper(`val`))')
+    ->toBePgsql('upper("val")')
+    ->toBeSqlite('(upper("val"))')
+    ->toBeSqlsrv('upper([val])');
+
+it('can uppercase an expression')
+    ->expect(new Upper(new Expression("'foo'")))
+    ->toBeExecutable()
+    ->toBeMysql("(upper('foo'))")
+    ->toBePgsql("upper('foo')")
+    ->toBeSqlite("(upper('foo'))")
+    ->toBeSqlsrv("upper('foo')");