Allow resolving class names with gettype

Author: Your Name

ext/standard/basic_functions.stub.php

@@ -1315,7 +1315,7 @@ function stream_set_timeout($socket, int $seconds, int $microseconds = 0): bool
 /* type.c */
 
 /** @param mixed $var */
-function gettype($var): string {}
+function gettype($var, bool $resolve_object_names = false): string {}
 
 function settype(&$var, string $type): bool {}
 

ext/standard/basic_functions_arginfo.h

@@ -2008,6 +2008,7 @@ ZEND_END_ARG_INFO()
 
 ZEND_BEGIN_ARG_WITH_RETURN_TYPE_INFO_EX(arginfo_gettype, 0, 1, IS_STRING, 0)
 	ZEND_ARG_INFO(0, var)
+	ZEND_ARG_TYPE_INFO(0, resolve_object_names, _IS_BOOL, 0)
 ZEND_END_ARG_INFO()
 
 ZEND_BEGIN_ARG_WITH_RETURN_TYPE_INFO_EX(arginfo_settype, 0, 2, _IS_BOOL, 0)

ext/standard/tests/general_functions/gettype_classes.phpt

@@ -0,0 +1,21 @@
+--TEST--
+Test gettype() class reading
+--FILE--
+<?php
+
+class Test {
+
+}
+
+/* tests against an object type */
+echo gettype(new Test()) . "\n";
+echo gettype(new Test(), false) . "\n";
+echo gettype(new Test(), true) . "\n";
+
+/* tests against everything else */
+echo gettype(1) . "\n";
+echo gettype(1.1) . "\n";
+echo gettype("foo") . "\n";
+echo gettype(Test::class) . "\n";
+
+--EXPECTF--

ext/standard/type.c

@@ -23,11 +23,20 @@ PHP_FUNCTION(gettype)
 {
 	zval *arg;
 	zend_string *type;
+	zend_bool resolve_object_names = 0;
+	zend_object *obj;
 
-	ZEND_PARSE_PARAMETERS_START(1, 1)
+	ZEND_PARSE_PARAMETERS_START(1, 2)
 		Z_PARAM_ZVAL(arg)
+		Z_PARAM_OPTIONAL
+		Z_PARAM_BOOL(resolve_object_names)
 	ZEND_PARSE_PARAMETERS_END();
 
+	if (resolve_object_names && Z_TYPE_P(arg) == IS_OBJECT) {
+	    obj = Z_OBJ_P(arg);
+        RETURN_INTERNED_STR(obj->ce->name);
+	}
+
 	type = zend_zval_get_type(arg);
 	if (EXPECTED(type)) {
 		RETURN_INTERNED_STR(type);