Fix GH-10885: Leaking stream_socket_server context

Author: iluuu1994

Zend/zend_execute_API.c

@@ -270,9 +270,18 @@ ZEND_API void zend_shutdown_executor_values(bool fast_shutdown)
 	zval *zv;
 
 	EG(flags) |= EG_FLAGS_IN_RESOURCE_SHUTDOWN;
+#if ZEND_DEBUG
+		char *tmp = getenv("AUTO_CLOSE_RESOURCE_LIST");
+		if (tmp && !ZEND_ATOL(tmp)) {
+			goto skip_auto_closing_resource_list;
+		}
+#endif
 	zend_try {
 		zend_close_rsrc_list(&EG(regular_list));
 	} zend_end_try();
+#if ZEND_DEBUG
+skip_auto_closing_resource_list:
+#endif
 
 	/* No PHP callback functions should be called after this point. */
 	EG(active) = 0;

Zend/zend_list.c

@@ -230,6 +230,16 @@ void zend_close_rsrc_list(HashTable *ht)
 
 void zend_destroy_rsrc_list(HashTable *ht)
 {
+#if ZEND_DEBUG
+	char *tmp = getenv("AUTO_CLOSE_RESOURCE_LIST");
+	if (tmp && !ZEND_ATOL(tmp)) {
+		if (!(HT_FLAGS(ht) & HASH_FLAG_UNINITIALIZED)) {
+			pefree(HT_GET_DATA_ADDR(ht), GC_FLAGS(ht) & IS_ARRAY_PERSISTENT);
+		}
+		return;
+	}
+#endif
+
 	zend_hash_graceful_reverse_destroy(ht);
 }
 

ext/standard/streamsfuncs.c

@@ -241,14 +241,20 @@ PHP_FUNCTION(stream_socket_server)
 		} else if (errstr) {
 			zend_string_release_ex(errstr, 0);
 		}
-		RETURN_FALSE;
+		RETVAL_FALSE;
+		goto exit;
 	}
 
 	if (errstr) {
 		zend_string_release_ex(errstr, 0);
 	}
 
 	php_stream_to_zval(stream, return_value);
+
+exit:
+	if (zcontext) {
+		zval_ptr_dtor(zcontext);
+	}
 }
 /* }}} */
 

ext/standard/tests/gh10885.phpt

@@ -0,0 +1,19 @@
+--TEST--
+GH-10885: stream_socket_server context leaks
+--ENV--
+AUTO_CLOSE_RESOURCE_LIST=0
+--FILE--
+<?php
+$context = stream_context_create();
+$server = @\stream_socket_server(
+    'tcp://127.0.0.1:0',
+    $errno,
+    $errstr,
+    \STREAM_SERVER_BIND | \STREAM_SERVER_LISTEN,
+    $context,
+);
+fclose($server);
+?>
+===DONE===
+--EXPECT--
+===DONE===