fix(stdlib): str_shuffle() TypeError for non-string operands (#4551)

ext/standard/str_shuffle.php

@@ -7,7 +7,9 @@
 use PHPCompiler\Frame;
 use PHPCompiler\Func\Internal;
 use PHPCompiler\JIT\Context;
+use PHPCompiler\JIT\JitStringBuiltinArg;
 use PHPCompiler\JIT\Variable as JITVariable;
+use PHPCompiler\VM\BuiltinExecute;
 use PHPCompiler\VM\Variable;
 use PHPLLVM\Value;
 
@@ -21,14 +23,16 @@ public function execute(Frame $frame): void
         if (1 !== \count($frame->calledArgs)) {
             throw new \LogicException('str_shuffle() requires exactly one argument');
         }
-        $v = $frame->calledArgs[0]->resolveIndirect();
-        if (null === $frame->returnVar) {
-            return;
-        }
-        if (Variable::TYPE_STRING !== $v->type) {
-            throw new \LogicException('str_shuffle() only supports strings in this compiler build');
-        }
-        $frame->returnVar->string(VmString::strShuffle($v->toString()));
+        $subject = VmString::coerceStringBuiltinArg(
+            $frame->calledArgs[0],
+            'str_shuffle',
+            0,
+            'string'
+        );
+        BuiltinExecute::writeReturn(
+            $frame,
+            static fn (Variable $ret) => $ret->string(VmString::strShuffle($subject))
+        );
     }
 
     public function call(Context $context, JITVariable ...$args): Value
@@ -37,6 +41,9 @@ public function call(Context $context, JITVariable ...$args): Value
             throw new \LogicException('str_shuffle() requires exactly one argument');
         }
 
-        return JitStrShuffle::shuffle($context, $this->jitString($context, $args[0], 'str_shuffle() argument #1'));
+        return JitStrShuffle::shuffle(
+            $context,
+            JitStringBuiltinArg::lower($context, $args[0], 'str_shuffle', 0, 'string')
+        );
     }
 }

test/compliance/cases/stdlib/str_shuffle_type_error.phpt

@@ -0,0 +1,21 @@
+--TEST--
+stdlib str_shuffle() — TypeError for non-string operand (#4551, ext/standard/string.c)
+--FILE--
+<?php
+try {
+    $unused = str_shuffle([]);
+    echo "uncaught\n";
+} catch (Throwable $e) {
+    echo $e::class, ': ', $e->getMessage(), "\n";
+}
+try {
+    $unused = str_shuffle(new stdClass());
+    echo "uncaught\n";
+} catch (Throwable $e) {
+    echo $e::class, ': ', $e->getMessage(), "\n";
+}
+echo strlen(str_shuffle('abc')), "\n";
+--EXPECT--
+TypeError: str_shuffle(): Argument #1 ($string) must be of type string, array given
+TypeError: str_shuffle(): Argument #1 ($string) must be of type string, stdClass given
+3

test/compliance/cases/stdlib/str_shuffle_type_error_jit.phpt

@@ -0,0 +1,14 @@
+--TEST--
+stdlib str_shuffle() JIT — TypeError for non-string operand (#4551)
+--FILE--
+<?php
+try {
+    $unused = str_shuffle([]);
+    echo "uncaught\n";
+} catch (Throwable $e) {
+    echo $e::class, ': ', $e->getMessage(), "\n";
+}
+echo strlen(str_shuffle('abc')), "\n";
+--EXPECT--
+TypeError: str_shuffle(): Argument #1 ($string) must be of type string, array given
+3

test/fixtures/aot/cases/str_shuffle_type_error.phpt

@@ -0,0 +1,8 @@
+--TEST--
+AOT: str_shuffle() — TypeError for non-string operand (#4551)
+--FILE--
+<?php
+str_shuffle([]);
+--EXPECT--
+--EXPECT_EXIT--
+134