Gecko [ www.ctm-euromeuble.fr ]

Name	Size	Permission	Date
.libs	[ DIR ]	drwxr-xr-x	2024-03-12 14:21
block_pass.c	62.85 KB	-rw-rw-r--	2022-10-31 11:36
block_pass.lo	343 B	-rw-r--r--	2024-03-12 14:20
block_pass.o	190.32 KB	-rw-r--r--	2024-03-12 14:20
compact_literals.c	26.82 KB	-rw-rw-r--	2022-10-31 11:36
compact_literals.lo	361 B	-rw-r--r--	2024-03-12 14:20
compact_literals.o	119.45 KB	-rw-r--r--	2024-03-12 14:20
compact_vars.c	4.32 KB	-rw-rw-r--	2022-10-31 11:36
compact_vars.lo	349 B	-rw-r--r--	2024-03-12 14:21
compact_vars.o	64.34 KB	-rw-r--r--	2024-03-12 14:21
dce.c	20.51 KB	-rw-rw-r--	2022-10-31 11:36
dce.lo	322 B	-rw-r--r--	2024-03-12 14:21
dce.o	146.59 KB	-rw-r--r--	2024-03-12 14:21
dfa_pass.c	41.96 KB	-rw-rw-r--	2022-10-31 11:36
dfa_pass.lo	337 B	-rw-r--r--	2024-03-12 14:20
dfa_pass.o	160.44 KB	-rw-r--r--	2024-03-12 14:20
escape_analysis.c	14.67 KB	-rw-rw-r--	2022-10-31 11:36
escape_analysis.lo	358 B	-rw-r--r--	2024-03-12 14:21
escape_analysis.o	127.1 KB	-rw-r--r--	2024-03-12 14:21
nop_removal.c	3.75 KB	-rw-rw-r--	2022-10-31 11:36
nop_removal.lo	346 B	-rw-r--r--	2024-03-12 14:20
nop_removal.o	71.97 KB	-rw-r--r--	2024-03-12 14:20
optimize_func_calls.c	10.06 KB	-rw-rw-r--	2022-10-31 11:36
optimize_func_calls.lo	370 B	-rw-r--r--	2024-03-12 14:20
optimize_func_calls.o	92.51 KB	-rw-r--r--	2024-03-12 14:20
optimize_temp_vars_5.c	6.25 KB	-rw-rw-r--	2022-10-31 11:36
optimize_temp_vars_5.lo	373 B	-rw-r--r--	2024-03-12 14:20
optimize_temp_vars_5.o	84.93 KB	-rw-r--r--	2024-03-12 14:20
pass1_5.c	20.27 KB	-rw-rw-r--	2022-10-31 11:36
pass1_5.lo	334 B	-rw-r--r--	2024-03-12 14:20
pass1_5.o	111.31 KB	-rw-r--r--	2024-03-12 14:20
pass2.c	8.03 KB	-rw-rw-r--	2022-10-31 11:36
pass2.lo	328 B	-rw-r--r--	2024-03-12 14:20
pass2.o	78.8 KB	-rw-r--r--	2024-03-12 14:20
pass3.c	13.99 KB	-rw-rw-r--	2022-10-31 11:36
pass3.lo	328 B	-rw-r--r--	2024-03-12 14:20
pass3.o	77.67 KB	-rw-r--r--	2024-03-12 14:20
sccp.c	71.32 KB	-rw-rw-r--	2022-10-31 11:36
sccp.lo	325 B	-rw-r--r--	2024-03-12 14:21
sccp.o	537.66 KB	-rw-r--r--	2024-03-12 14:21
scdf.c	9.43 KB	-rw-rw-r--	2022-10-31 11:36
scdf.h	3.46 KB	-rw-rw-r--	2022-10-31 11:36
scdf.lo	325 B	-rw-r--r--	2024-03-12 14:21
scdf.o	87.01 KB	-rw-r--r--	2024-03-12 14:21
ssa_integrity.c	12.62 KB	-rw-rw-r--	2022-10-31 11:36
zend_call_graph.c	9.27 KB	-rw-rw-r--	2022-10-31 11:36
zend_call_graph.h	3.17 KB	-rw-rw-r--	2022-10-31 11:36
zend_call_graph.lo	358 B	-rw-r--r--	2024-03-12 14:21
zend_call_graph.o	107.78 KB	-rw-r--r--	2024-03-12 14:21
zend_cfg.c	25.16 KB	-rw-rw-r--	2022-10-31 11:36
zend_cfg.h	5.57 KB	-rw-rw-r--	2022-10-31 11:36
zend_cfg.lo	337 B	-rw-r--r--	2024-03-12 14:20
zend_cfg.o	131.81 KB	-rw-r--r--	2024-03-12 14:20
zend_dfg.c	8.25 KB	-rw-rw-r--	2022-10-31 11:36
zend_dfg.h	1.85 KB	-rw-rw-r--	2022-10-31 11:36
zend_dfg.lo	337 B	-rw-r--r--	2024-03-12 14:20
zend_dfg.o	90.51 KB	-rw-r--r--	2024-03-12 14:20
zend_dump.c	35.72 KB	-rw-rw-r--	2022-10-31 11:36
zend_dump.h	2.27 KB	-rw-rw-r--	2022-10-31 11:36
zend_dump.lo	340 B	-rw-r--r--	2024-03-12 14:21
zend_dump.o	182.13 KB	-rw-r--r--	2024-03-12 14:21
zend_func_info.c	113.3 KB	-rw-rw-r--	2022-10-31 11:36
zend_func_info.h	2.59 KB	-rw-rw-r--	2022-10-31 11:36
zend_func_info.lo	355 B	-rw-r--r--	2024-03-12 14:21
zend_func_info.o	202.44 KB	-rw-r--r--	2024-03-12 14:21
zend_inference.c	142.98 KB	-rw-rw-r--	2022-10-31 11:36
zend_inference.h	11.71 KB	-rw-rw-r--	2022-10-31 11:36
zend_inference.lo	355 B	-rw-r--r--	2024-03-12 14:20
zend_inference.o	994.6 KB	-rw-r--r--	2024-03-12 14:20
zend_optimizer.c	49.12 KB	-rw-rw-r--	2022-10-31 11:36
zend_optimizer.h	4.58 KB	-rw-rw-r--	2022-10-31 11:36
zend_optimizer.lo	355 B	-rw-r--r--	2024-03-12 14:20
zend_optimizer.o	227.7 KB	-rw-r--r--	2024-03-12 14:20
zend_optimizer_internal.h	6.36 KB	-rw-rw-r--	2022-10-31 11:36
zend_ssa.c	51.56 KB	-rw-rw-r--	2022-10-31 11:36
zend_ssa.h	11.23 KB	-rw-rw-r--	2022-10-31 11:36
zend_ssa.lo	337 B	-rw-r--r--	2024-03-12 14:20
zend_ssa.o	196.41 KB	-rw-r--r--	2024-03-12 14:20
zend_worklist.h	3.82 KB	-rw-rw-r--	2022-10-31 11:36

Rename

/*
   +----------------------------------------------------------------------+
   | Zend OPcache                                                         |
   +----------------------------------------------------------------------+
   | Copyright (c) The PHP Group                                          |
   +----------------------------------------------------------------------+
   | This source file is subject to version 3.01 of the PHP 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.php.net/license/3_01.txt                                  |
   | If you did not receive a copy of the PHP license and are unable to   |
   | obtain it through the world-wide-web, please send a note to          |
   | license@php.net so we can mail you a copy immediately.               |
   +----------------------------------------------------------------------+
   | Authors: Dmitry Stogov <dmitry@php.net>                              |
   |          Xinchen Hui <laruence@php.net>                              |
   +----------------------------------------------------------------------+
*/

/* pass 4
 * - optimize INIT_FCALL_BY_NAME to DO_FCALL
 */

#include "php.h"
#include "Optimizer/zend_optimizer.h"
#include "Optimizer/zend_optimizer_internal.h"
#include "zend_API.h"
#include "zend_constants.h"
#include "zend_execute.h"
#include "zend_vm.h"

#define ZEND_OP1_IS_CONST_STRING(opline) \
	(opline->op1_type == IS_CONST && \
	Z_TYPE(op_array->literals[(opline)->op1.constant]) == IS_STRING)
#define ZEND_OP2_IS_CONST_STRING(opline) \
	(opline->op2_type == IS_CONST && \
	Z_TYPE(op_array->literals[(opline)->op2.constant]) == IS_STRING)

typedef struct _optimizer_call_info {
	zend_function *func;
	zend_op       *opline;
	zend_bool      try_inline;
	uint32_t       func_arg_num;
} optimizer_call_info;

static void zend_delete_call_instructions(zend_op *opline)
{
	int call = 0;

while (1) {
		switch (opline->opcode) {
			case ZEND_INIT_FCALL_BY_NAME:
			case ZEND_INIT_NS_FCALL_BY_NAME:
			case ZEND_INIT_STATIC_METHOD_CALL:
			case ZEND_INIT_METHOD_CALL:
			case ZEND_INIT_FCALL:
				if (call == 0) {
					MAKE_NOP(opline);
					return;
				}
				/* break missing intentionally */
			case ZEND_NEW:
			case ZEND_INIT_DYNAMIC_CALL:
			case ZEND_INIT_USER_CALL:
				call--;
				break;
			case ZEND_DO_FCALL:
			case ZEND_DO_ICALL:
			case ZEND_DO_UCALL:
			case ZEND_DO_FCALL_BY_NAME:
				call++;
				break;
			case ZEND_SEND_VAL:
			case ZEND_SEND_VAR:
				if (call == 0) {
					if (opline->op1_type == IS_CONST) {
						MAKE_NOP(opline);
					} else if (opline->op1_type == IS_CV) {
						opline->opcode = ZEND_CHECK_VAR;
						opline->extended_value = 0;
						opline->result.var = 0;
					} else {
						opline->opcode = ZEND_FREE;
						opline->extended_value = 0;
						opline->result.var = 0;
					}
				}
				break;
		}
		opline--;
	}
}

static void zend_try_inline_call(zend_op_array *op_array, zend_op *fcall, zend_op *opline, zend_function *func)
{
	if (func->type == ZEND_USER_FUNCTION
	 && !(func->op_array.fn_flags & (ZEND_ACC_ABSTRACT|ZEND_ACC_HAS_TYPE_HINTS))
		/* TODO: function copied from trait may be inconsistent ??? */
	 && !(func->op_array.fn_flags & (ZEND_ACC_TRAIT_CLONE))
	 && fcall->extended_value >= func->op_array.required_num_args
	 && func->op_array.opcodes[func->op_array.num_args].opcode == ZEND_RETURN) {

zend_op *ret_opline = func->op_array.opcodes + func->op_array.num_args;

if (ret_opline->op1_type == IS_CONST) {
			uint32_t i, num_args = func->op_array.num_args;
			num_args += (func->op_array.fn_flags & ZEND_ACC_VARIADIC) != 0;

if (fcall->opcode == ZEND_INIT_STATIC_METHOD_CALL
					&& !(func->op_array.fn_flags & ZEND_ACC_STATIC)) {
				/* Don't inline static call to instance method. */
				return;
			}

if (fcall->opcode == ZEND_INIT_METHOD_CALL && fcall->op1_type == IS_UNUSED) {
				/* TODO: we can't inlne methods, because $this may be used
				 *       not in object context ???
				 */
				return;
			}

for (i = 0; i < num_args; i++) {
				/* Don't inline functions with by-reference arguments. This would require
				 * correct handling of INDIRECT arguments. */
				if (func->op_array.arg_info[i].pass_by_reference) {
					return;
				}
			}

if (fcall->extended_value < func->op_array.num_args) {
				/* don't inline functions with named constants in default arguments */
				i = fcall->extended_value;

do {
					if (Z_TYPE_P(RT_CONSTANT(&func->op_array.opcodes[i], func->op_array.opcodes[i].op2)) == IS_CONSTANT_AST) {
						return;
					}
					i++;
				} while (i < func->op_array.num_args);
			}

if (RETURN_VALUE_USED(opline)) {
				zval zv;

ZVAL_COPY(&zv, RT_CONSTANT(ret_opline, ret_opline->op1));
				opline->opcode = ZEND_QM_ASSIGN;
				opline->op1_type = IS_CONST;
				opline->op1.constant = zend_optimizer_add_literal(op_array, &zv);
				SET_UNUSED(opline->op2);
			} else {
				MAKE_NOP(opline);
			}

zend_delete_call_instructions(opline-1);
		}
	}
}

void zend_optimize_func_calls(zend_op_array *op_array, zend_optimizer_ctx *ctx)
{
	zend_op *opline = op_array->opcodes;
	zend_op *end = opline + op_array->last;
	int call = 0;
	void *checkpoint;
	optimizer_call_info *call_stack;

if (op_array->last < 2) {
		return;
	}

checkpoint = zend_arena_checkpoint(ctx->arena);
	call_stack = zend_arena_calloc(&ctx->arena, op_array->last / 2, sizeof(optimizer_call_info));
	while (opline < end) {
		switch (opline->opcode) {
			case ZEND_INIT_FCALL_BY_NAME:
			case ZEND_INIT_NS_FCALL_BY_NAME:
			case ZEND_INIT_STATIC_METHOD_CALL:
			case ZEND_INIT_METHOD_CALL:
			case ZEND_INIT_FCALL:
			case ZEND_NEW:
				call_stack[call].func = zend_optimizer_get_called_func(
					ctx->script, op_array, opline, 0);
				call_stack[call].try_inline = opline->opcode != ZEND_NEW;
				/* break missing intentionally */
			case ZEND_INIT_DYNAMIC_CALL:
			case ZEND_INIT_USER_CALL:
				call_stack[call].opline = opline;
				call_stack[call].func_arg_num = (uint32_t)-1;
				call++;
				break;
			case ZEND_DO_FCALL:
			case ZEND_DO_ICALL:
			case ZEND_DO_UCALL:
			case ZEND_DO_FCALL_BY_NAME:
				call--;
				if (call_stack[call].func && call_stack[call].opline) {
					zend_op *fcall = call_stack[call].opline;

if (fcall->opcode == ZEND_INIT_FCALL) {
						/* nothing to do */
					} else if (fcall->opcode == ZEND_INIT_FCALL_BY_NAME) {
						fcall->opcode = ZEND_INIT_FCALL;
						fcall->op1.num = zend_vm_calc_used_stack(fcall->extended_value, call_stack[call].func);
						literal_dtor(&ZEND_OP2_LITERAL(fcall));
						fcall->op2.constant = fcall->op2.constant + 1;
						opline->opcode = zend_get_call_op(fcall, call_stack[call].func);
					} else if (fcall->opcode == ZEND_INIT_NS_FCALL_BY_NAME) {
						fcall->opcode = ZEND_INIT_FCALL;
						fcall->op1.num = zend_vm_calc_used_stack(fcall->extended_value, call_stack[call].func);
						literal_dtor(&op_array->literals[fcall->op2.constant]);
						literal_dtor(&op_array->literals[fcall->op2.constant + 2]);
						fcall->op2.constant = fcall->op2.constant + 1;
						opline->opcode = zend_get_call_op(fcall, call_stack[call].func);
					} else if (fcall->opcode == ZEND_INIT_STATIC_METHOD_CALL
							|| fcall->opcode == ZEND_INIT_METHOD_CALL
							|| fcall->opcode == ZEND_NEW) {
						/* We don't have specialized opcodes for this, do nothing */
					} else {
						ZEND_ASSERT(0);
					}

if ((ZEND_OPTIMIZER_PASS_16 & ctx->optimization_level)
					 && call_stack[call].try_inline) {
						zend_try_inline_call(op_array, fcall, opline, call_stack[call].func);
					}
				}
				call_stack[call].func = NULL;
				call_stack[call].opline = NULL;
				call_stack[call].try_inline = 0;
				call_stack[call].func_arg_num = (uint32_t)-1;
				break;
			case ZEND_FETCH_FUNC_ARG:
			case ZEND_FETCH_STATIC_PROP_FUNC_ARG:
			case ZEND_FETCH_OBJ_FUNC_ARG:
			case ZEND_FETCH_DIM_FUNC_ARG:
				if (call_stack[call - 1].func) {
					ZEND_ASSERT(call_stack[call - 1].func_arg_num != (uint32_t)-1);
					if (ARG_SHOULD_BE_SENT_BY_REF(call_stack[call - 1].func, call_stack[call - 1].func_arg_num)) {
						if (opline->opcode != ZEND_FETCH_STATIC_PROP_FUNC_ARG) {
							opline->opcode -= 9;
						} else {
							opline->opcode = ZEND_FETCH_STATIC_PROP_W;
						}
					} else {
						if (opline->opcode == ZEND_FETCH_DIM_FUNC_ARG
								&& opline->op2_type == IS_UNUSED) {
							/* FETCH_DIM_FUNC_ARG supports UNUSED op2, while FETCH_DIM_R does not.
							 * Performing the replacement would create an invalid opcode. */
							call_stack[call - 1].try_inline = 0;
							break;
						}

if (opline->opcode != ZEND_FETCH_STATIC_PROP_FUNC_ARG) {
							opline->opcode -= 12;
						} else {
							opline->opcode = ZEND_FETCH_STATIC_PROP_R;
						}
					}
				}
				break;
			case ZEND_SEND_VAL_EX:
				if (call_stack[call - 1].func) {
					if (ARG_MUST_BE_SENT_BY_REF(call_stack[call - 1].func, opline->op2.num)) {
						/* We won't convert it into_DO_FCALL to emit error at run-time */
						call_stack[call - 1].opline = NULL;
					} else {
						opline->opcode = ZEND_SEND_VAL;
					}
				}
				break;
			case ZEND_CHECK_FUNC_ARG:
				if (call_stack[call - 1].func) {
					call_stack[call - 1].func_arg_num = opline->op2.num;
					MAKE_NOP(opline);
				}
				break;
			case ZEND_SEND_VAR_EX:
			case ZEND_SEND_FUNC_ARG:
				if (call_stack[call - 1].func) {
					call_stack[call - 1].func_arg_num = (uint32_t)-1;
					if (ARG_SHOULD_BE_SENT_BY_REF(call_stack[call - 1].func, opline->op2.num)) {
						opline->opcode = ZEND_SEND_REF;
					} else {
						opline->opcode = ZEND_SEND_VAR;
					}
				}
				break;
			case ZEND_SEND_VAR_NO_REF_EX:
				if (call_stack[call - 1].func) {
					if (ARG_MUST_BE_SENT_BY_REF(call_stack[call - 1].func, opline->op2.num)) {
						opline->opcode = ZEND_SEND_VAR_NO_REF;
					} else if (ARG_MAY_BE_SENT_BY_REF(call_stack[call - 1].func, opline->op2.num)) {
						opline->opcode = ZEND_SEND_VAL;
					} else {
						opline->opcode = ZEND_SEND_VAR;
					}
				}
				break;
			case ZEND_SEND_UNPACK:
			case ZEND_SEND_USER:
			case ZEND_SEND_ARRAY:
				call_stack[call - 1].try_inline = 0;
				break;
			default:
				break;
		}
		opline++;
	}

zend_arena_release(&ctx->arena, checkpoint);
}