Implement frameless icall arity completion

Author: iluuu1994

Zend/zend_compile.c

@@ -4563,32 +4563,36 @@ static zend_result zend_compile_frameless_icall(znode *result, zend_ast_list *ar
 	}
 
 	while (frameless_function_info->handler) {
-		if (frameless_function_info->num_args == args->children) {
-			uint32_t offset = find_frameless_function_offset(args->children, frameless_function_info->handler);
+		if (frameless_function_info->num_args >= args->children
+		 && fbc->common.required_num_args <= args->children) {
+			uint32_t num_args = frameless_function_info->num_args;
+			uint32_t offset = find_frameless_function_offset(num_args, frameless_function_info->handler);
 			if (offset == (uint32_t)-1) {
 				continue;
 			}
-			znode arg1, arg2, arg3;
-			if (args->children >= 1) {
-				zend_compile_expr(&arg1, args->child[0]);
-			}
-			if (args->children >= 2) {
-				zend_compile_expr(&arg2, args->child[1]);
-			}
-			if (args->children >= 3) {
-				zend_compile_expr(&arg3, args->child[2]);
+			znode arg_zvs[3];
+			for (uint32_t i = 0; i < num_args; i++) {
+				if (i < args->children) {
+					zend_compile_expr(&arg_zvs[i], args->child[i]);
+				} else {
+					zend_internal_arg_info *arg_info = (zend_internal_arg_info *)&fbc->common.arg_info[i];
+					arg_zvs[i].op_type = IS_CONST;
+					if (zend_get_default_from_internal_arg_info(&arg_zvs[i].u.constant, arg_info) == FAILURE) {
+						ZEND_UNREACHABLE();
+					}
+				}
 			}
-			uint8_t opcode = ZEND_FRAMELESS_ICALL_0 + args->children;
+			uint8_t opcode = ZEND_FRAMELESS_ICALL_0 + num_args;
 			zend_op *opline = zend_emit_op_tmp(result, opcode, NULL, NULL);
 			opline->extended_value = offset;
-			if (args->children >= 1) {
-				SET_NODE(opline->op1, &arg1);
+			if (num_args >= 1) {
+				SET_NODE(opline->op1, &arg_zvs[0]);
 			}
-			if (args->children >= 2) {
-				SET_NODE(opline->op2, &arg2);
+			if (num_args >= 2) {
+				SET_NODE(opline->op2, &arg_zvs[1]);
 			}
-			if (args->children >= 3) {
-				zend_emit_op_data(&arg3);
+			if (num_args >= 3) {
+				zend_emit_op_data(&arg_zvs[2]);
 			}
 			return SUCCESS;
 		}