Fix compatibility with PHP 8.3 ZEND_CHECK_STACK_LIMIT (swoole#5223)

* Fix compatibility with PHP 8.3 ZEND_CHECK_STACK_LIMIT

* Optimize

config.m4

@@ -1027,7 +1027,8 @@ EOF
         thirdparty/php/sockets/conversions.cc \
         thirdparty/php/sockets/sockaddr_conv.cc \
         thirdparty/php/standard/var_decoder.cc \
-        thirdparty/php/standard/proc_open.cc"
+        thirdparty/php/standard/proc_open.cc \
+        thirdparty/php83/Zend/zend_call_stack.cc"
 
     swoole_source_file="$swoole_source_file \
         thirdparty/swoole_http_parser.c \

ext-src/php_swoole_call_stack.h

@@ -0,0 +1,38 @@
+/*
+  +----------------------------------------------------------------------+
+  | Swoole                                                               |
+  +----------------------------------------------------------------------+
+  | This source file is subject to version 2.0 of the Apache license,    |
+  | that is bundled with this package in the file LICENSE, and is        |
+  | available through the world-wide-web at the following url:           |
+  | http://www.apache.org/licenses/LICENSE-2.0.html                      |
+  | If you did not receive a copy of the Apache2.0 license and are unable|
+  | to obtain it through the world-wide-web, please send a note to       |
+  | [email protected] so we can mail you a copy immediately.            |
+  +----------------------------------------------------------------------+
+  | Author: Yurun  <[email protected]>                                 |
+  +----------------------------------------------------------------------+
+*/
+
+#pragma once
+
+#include "php_swoole.h"
+
+#ifdef ZEND_CHECK_STACK_LIMIT
+    #include "thirdparty/php83/Zend/zend_call_stack.h"
+#endif
+
+#ifdef ZEND_CHECK_STACK_LIMIT
+    #define HOOK_PHP_CALL_STACK(exp) \
+        zend_call_stack __stack; \
+        zend_call_stack_get(&__stack); \
+        auto __stack_base = EG(stack_base); \
+        auto __stack_limit = EG(stack_limit); \
+        EG(stack_base) = __stack.base; \
+        EG(stack_limit) = zend_call_stack_limit(__stack.base, __stack.max_size, EG(reserved_stack_size)); \
+        exp \
+        EG(stack_base) = __stack_base; \
+        EG(stack_limit) = __stack_limit;
+#else
+    #define HOOK_PHP_CALL_STACK(exp) exp
+#endif

ext-src/swoole_server.cc

@@ -17,6 +17,7 @@
 #include "php_swoole_server.h"
 #include "php_swoole_http_server.h"
 #include "php_swoole_process.h"
+#include "php_swoole_call_stack.h"
 #include "swoole_msg_queue.h"
 
 #include "ext/standard/php_var.h"
@@ -1773,7 +1774,10 @@ static int php_swoole_server_dispatch_func(Server *serv, Connection *conn, SendD
         zdata = &args[3];
         ZVAL_STRINGL(zdata, data->data, data->info.len > SW_IPC_BUFFER_SIZE ? SW_IPC_BUFFER_SIZE : data->info.len);
     }
-    if (UNEXPECTED(sw_zend_call_function_ex(nullptr, fci_cache, zdata ? 4 : 3, args, &retval) != SUCCESS)) {
+    HOOK_PHP_CALL_STACK(
+        auto call_result = sw_zend_call_function_ex(nullptr, fci_cache, zdata ? 4 : 3, args, &retval);
+    );
+    if (UNEXPECTED(call_result != SUCCESS)) {
         php_swoole_error(E_WARNING, "%s->onDispatch handler error", SW_Z_OBJCE_NAME_VAL_P(zserv));
     } else if (!ZVAL_IS_NULL(&retval)) {
         worker_id = zval_get_long(&retval);

ext-src/swoole_server_port.cc

@@ -15,6 +15,7 @@
  */
 
 #include "php_swoole_server.h"
+#include "php_swoole_call_stack.h"
 
 BEGIN_EXTERN_C()
 #include "stubs/php_swoole_server_port_arginfo.h"
@@ -198,7 +199,10 @@ static ssize_t php_swoole_server_length_func(const Protocol *protocol, network::
     ssize_t ret = -1;
 
     ZVAL_STRINGL(&zdata, pl->buf, pl->buf_size);
-    if (UNEXPECTED(sw_zend_call_function_ex(nullptr, fci_cache, 1, &zdata, &retval) != SUCCESS)) {
+    HOOK_PHP_CALL_STACK(
+        auto call_result = sw_zend_call_function_ex(nullptr, fci_cache, 1, &zdata, &retval);
+    );
+    if (UNEXPECTED(call_result) != SUCCESS) {
         php_swoole_fatal_error(E_WARNING, "length function handler error");
     } else {
         ret = zval_get_long(&retval);