Use compile time flags to check if we call constructor and result of ZEND_NEW is used or not.
Get the $arg_num'th argument that was passed to the function */
ZEND_FUNCTION(func_get_arg)
{
- int arg_count;
+ int arg_count, first_extra_arg;
zval *arg;
long requested_offset;
zend_execute_data *ex;
RETURN_FALSE;
}
- if (requested_offset >= ex->func->op_array.num_args && (ex->num_args > ex->func->op_array.num_args)) {
- arg = EX_VAR_NUM_2(ex, ex->func->op_array.last_var + ex->func->op_array.T) + (requested_offset - ex->func->op_array.num_args);
+ first_extra_arg = ex->func->op_array.num_args;
+ if (ex->func->op_array.fn_flags & ZEND_ACC_VARIADIC) {
+ first_extra_arg--;
+ }
+ if (requested_offset >= first_extra_arg && (ex->num_args > first_extra_arg)) {
+ arg = EX_VAR_NUM_2(ex, ex->func->op_array.last_var + ex->func->op_array.T) + (requested_offset - first_extra_arg);
} else {
arg = ZEND_CALL_ARG(ex, requested_offset + 1);
}
ZEND_FUNCTION(func_get_args)
{
zval *p;
- int arg_count;
+ int arg_count, first_extra_arg;
int i;
zend_execute_data *ex = EG(current_execute_data);
if (arg_count) {
Bucket *q;
+ first_extra_arg = ex->func->op_array.num_args;
+ if (ex->func->op_array.fn_flags & ZEND_ACC_VARIADIC) {
+ first_extra_arg--;
+ }
zend_hash_real_init(Z_ARRVAL_P(return_value), 1);
i = 0;
q = Z_ARRVAL_P(return_value)->arData;
p = ZEND_CALL_ARG(ex, 1);
- if (ex->num_args > ex->func->op_array.num_args) {
- while (i < ex->func->op_array.num_args) {
+ if (ex->num_args > first_extra_arg) {
+ while (i < first_extra_arg) {
q->h = i;
q->key = NULL;
if (!Z_ISREF_P(p)) {
int i = 0;
zval *p = ZEND_CALL_ARG(call, 1);
- if (call->func->type == ZEND_USER_FUNCTION && (call->num_args > call->func->op_array.num_args)) {
- while (i < call->func->op_array.num_args) {
- if (Z_REFCOUNTED_P(p)) Z_ADDREF_P(p);
- zend_hash_next_index_insert_new(Z_ARRVAL_P(arg_array), p);
- p++;
- i++;
+ if (call->func->type == ZEND_USER_FUNCTION) {
+ int first_extra_arg = call->func->op_array.num_args;
+
+ if (call->func->op_array.fn_flags & ZEND_ACC_VARIADIC) {
+ first_extra_arg--;
+ }
+ if (call->num_args > first_extra_arg) {
+ while (i < first_extra_arg) {
+ if (Z_REFCOUNTED_P(p)) Z_ADDREF_P(p);
+ zend_hash_next_index_insert_new(Z_ARRVAL_P(arg_array), p);
+ p++;
+ i++;
+ }
+ p = EX_VAR_NUM_2(call, call->func->op_array.last_var + call->func->op_array.T);
}
- p = EX_VAR_NUM_2(call, call->func->op_array.last_var + call->func->op_array.T);
}
while (i < num_args) {
&& opline->result.var == op1->u.op.var) {
if (opline->opcode == ZEND_NEW) {
opline->result_type |= EXT_TYPE_UNUSED;
+ opline = &CG(active_op_array)->opcodes[CG(active_op_array)->last-1];
+ while (opline->opcode != ZEND_DO_FCALL || opline->op1.num != ZEND_CALL_CTOR) {
+ opline--;
+ }
+ opline->op1.num |= ZEND_CALL_CTOR_RESULT_UNUSED;
}
break;
}
}
opline = &CG(active_op_array)->opcodes[Z_LVAL(function_name->u.constant)];
} else {
+ zend_uint call_flags = 0;
+
opline = &CG(active_op_array)->opcodes[fcall->op_number];
opline->extended_value = fcall->arg_num;
+ if (opline->opcode == ZEND_NEW) {
+ call_flags = ZEND_CALL_CTOR;
+ }
+
opline = get_next_op(CG(active_op_array) TSRMLS_CC);
opline->opcode = ZEND_DO_FCALL;
SET_UNUSED(opline->op1);
SET_UNUSED(opline->op2);
+ opline->op1.num = call_flags;
}
opline->result.var = get_temporary_variable(CG(active_op_array));
};
#define ZEND_CALL_CTOR (1 << 0)
-#define ZEND_CALL_CTOR_RESULT_USED (1 << 1)
+#define ZEND_CALL_CTOR_RESULT_UNUSED (1 << 1)
#define ZEND_CALL_DONE (1 << 2)
#define ZEND_CALL_FRAME_SLOT \
#define ZEND_PARSED_NEW (1<<6)
#define ZEND_PARSED_LIST_EXPR (1<<7)
-
/* unset types */
#define ZEND_UNSET_REG 0
EG(opline_ptr) = &EX(opline);
EX(opline) = UNEXPECTED((op_array->fn_flags & ZEND_ACC_INTERACTIVE) != 0) && EG(start_op) ? EG(start_op) : op_array->opcodes;
-//??? EX(func) = (zend_function*)op_array;
EX(scope) = EG(scope);
EX(symbol_table) = EG(active_symbol_table);
if (UNEXPECTED(EX(symbol_table) != NULL)) {
zend_attach_symbol_table(execute_data);
} else {
-
- if (UNEXPECTED(EX(num_args) > op_array->num_args)) {
+ zend_uint first_extra_arg = op_array->num_args;
+
+ if (UNEXPECTED((op_array->fn_flags & ZEND_ACC_VARIADIC) != 0)) {
+ first_extra_arg--;
+ }
+ if (UNEXPECTED(EX(num_args) > first_extra_arg)) {
/* move extra args into separate array after all CV and TMP vars */
zval *extra_args = EX_VAR_NUM(op_array->last_var + op_array->T);
- memmove(extra_args, EX_VAR_NUM(op_array->num_args), sizeof(zval) * (EX(num_args) - op_array->num_args));
+
+ memmove(extra_args, EX_VAR_NUM(first_extra_arg), sizeof(zval) * (EX(num_args) - first_extra_arg));
}
do {
EG(argument_stack) = p;
}
-static zend_always_inline zend_execute_data *zend_vm_stack_push_call_frame(zend_function *func, zend_uint num_args, zend_uint flags, zend_class_entry *called_scope, zend_object *object, zend_execute_data *prev TSRMLS_DC)
+static zend_always_inline zend_execute_data *zend_vm_stack_push_call_frame(zend_function *func, zend_uint num_args, zend_uchar flags, zend_class_entry *called_scope, zend_object *object, zend_execute_data *prev TSRMLS_DC)
{
int used_stack = ZEND_CALL_FRAME_SLOT + num_args;
zend_execute_data *call;
call = (zend_execute_data*)EG(argument_stack)->top;
EG(argument_stack)->top += used_stack;
call->func = func;
- call->num_args = 0; //??? num_args;
+ call->num_args = 0;
call->flags = flags;
call->called_scope = called_scope;
call->object = object;
static zend_always_inline void zend_vm_stack_free_extra_args(zend_execute_data *call TSRMLS_DC)
{
- if (UNEXPECTED(call->num_args > call->func->op_array.num_args)) {
+ zend_uint first_extra_arg = call->func->op_array.num_args - ((call->func->common.fn_flags & ZEND_ACC_VARIADIC) != 0);
+
+ if (UNEXPECTED(call->num_args > first_extra_arg)) {
zval *end = EX_VAR_NUM_2(call, call->func->op_array.last_var + call->func->op_array.T);
- zval *p = end + (call->num_args - call->func->op_array.num_args);
+ zval *p = end + (call->num_args - first_extra_arg);
do {
p--;
i_zval_ptr_dtor_nogc(p ZEND_FILE_LINE_CC TSRMLS_CC);
{
vm_frame_kind frame_kind = EX(frame_kind);
zend_execute_data *prev_nested_call;
- zend_uint call_flags;
EG(current_execute_data) = EX(prev_execute_data);
if (UNEXPECTED((EX(func)->op_array.fn_flags & ZEND_ACC_CLOSURE) != 0) && EX(func)->op_array.prototype) {
zval_ptr_dtor((zval*)EX(func)->op_array.prototype);
}
- call_flags = EX(flags);
prev_nested_call = EX(prev_nested_call);
zend_vm_stack_free_extra_args(execute_data TSRMLS_CC);
zend_vm_stack_free_call_frame(execute_data TSRMLS_CC);
EG(active_symbol_table) = EX(symbol_table);
if (Z_OBJ(EG(This))) {
- if (UNEXPECTED(EG(exception) != NULL) && (call_flags & ZEND_CALL_CTOR)) {
- if (call_flags & ZEND_CALL_CTOR_RESULT_USED) {
+ if (UNEXPECTED(EG(exception) != NULL) && (EX(opline)->op1.num & ZEND_CALL_CTOR)) {
+ if (!(EX(opline)->op1.num & ZEND_CALL_CTOR_RESULT_UNUSED)) {
Z_DELREF(EG(This));
}
if (Z_REFCOUNT(EG(This)) == 1) {
USE_OPLINE
zend_execute_data *call = EX(call);
zend_function *fbc = call->func;
- zend_uint call_flags = call->flags;
SAVE_OPLINE();
- call->flags |= ZEND_CALL_DONE;
+ call->flags = ZEND_CALL_DONE;
if (UNEXPECTED((fbc->common.fn_flags & (ZEND_ACC_ABSTRACT|ZEND_ACC_DEPRECATED)) != 0)) {
if (UNEXPECTED((fbc->common.fn_flags & ZEND_ACC_ABSTRACT) != 0)) {
zend_error_noreturn(E_ERROR, "Cannot call abstract method %s::%s()", fbc->common.scope->name->val, fbc->common.function_name->val);
ZEND_VM_C_LABEL(fcall_end_change_scope):
if (Z_OBJ(EG(This))) {
- if (UNEXPECTED(EG(exception) != NULL) && (call_flags & ZEND_CALL_CTOR)) {
- if (call_flags & ZEND_CALL_CTOR_RESULT_USED) {
+ if (UNEXPECTED(EG(exception) != NULL) && (opline->op1.num & ZEND_CALL_CTOR)) {
+ if (!(opline->op1.num & ZEND_CALL_CTOR_RESULT_UNUSED)) {
Z_DELREF(EG(This));
}
if (Z_REFCOUNT(EG(This)) == 1) {
params = _get_zval_ptr_cv_undef_BP_VAR_W(execute_data, opline->result.var TSRMLS_CC);
if (arg_num <= arg_count) {
- zval *param, tmp;
+ zval *param;
- ZVAL_COPY_VALUE(&tmp, params);
array_init_size(params, arg_count - arg_num + 1);
param = EX_VAR_NUM(EX(func)->op_array.last_var + EX(func)->op_array.T);
if (UNEXPECTED((EX(func)->op_array.fn_flags & ZEND_ACC_HAS_TYPE_HINTS) != 0)) {
- zend_verify_arg_type(EX(func), arg_num, &tmp, opline->extended_value TSRMLS_CC);
- zend_hash_next_index_insert_new(Z_ARRVAL_P(params), &tmp);
- if (param) {
- while (++arg_num <= arg_count) {
- zend_verify_arg_type(EX(func), arg_num, param, opline->extended_value TSRMLS_CC);
- zend_hash_next_index_insert_new(Z_ARRVAL_P(params), param);
- if (Z_REFCOUNTED_P(param)) Z_ADDREF_P(param);
- param++;
- }
- }
+ do {
+ zend_verify_arg_type(EX(func), arg_num, param, opline->extended_value TSRMLS_CC);
+ zend_hash_next_index_insert_new(Z_ARRVAL_P(params), param);
+ if (Z_REFCOUNTED_P(param)) Z_ADDREF_P(param);
+ param++;
+ } while (++arg_num <= arg_count);
} else {
- zend_hash_next_index_insert_new(Z_ARRVAL_P(params), &tmp);
- if (param) {
- while (++arg_num <= arg_count) {
- zend_hash_next_index_insert_new(Z_ARRVAL_P(params), param);
- if (Z_REFCOUNTED_P(param)) Z_ADDREF_P(param);
- param++;
- }
- }
+ do {
+ zend_hash_next_index_insert_new(Z_ARRVAL_P(params), param);
+ if (Z_REFCOUNTED_P(param)) Z_ADDREF_P(param);
+ param++;
+ } while (++arg_num <= arg_count);
}
} else {
array_init(params);
EX(call) = zend_vm_stack_push_call_frame(
constructor, opline->extended_value,
RETURN_VALUE_USED(opline) ?
- (ZEND_CALL_CTOR | ZEND_CALL_CTOR_RESULT_USED) : ZEND_CALL_CTOR,
+ ZEND_CALL_CTOR : (ZEND_CALL_CTOR | ZEND_CALL_CTOR_RESULT_UNUSED),
Z_CE_P(EX_VAR(opline->op1.var)),
Z_OBJ(object_zval),
EX(call) TSRMLS_CC);
if (call->object) {
if (call->flags & ZEND_CALL_CTOR) {
- if (call->flags & ZEND_CALL_CTOR_RESULT_USED) {
+ if (!(call->flags & ZEND_CALL_CTOR_RESULT_UNUSED)) {
GC_REFCOUNT(call->object)--;
}
if (GC_REFCOUNT(call->object) == 1) {
{
vm_frame_kind frame_kind = EX(frame_kind);
zend_execute_data *prev_nested_call;
- zend_uint call_flags;
EG(current_execute_data) = EX(prev_execute_data);
if (UNEXPECTED((EX(func)->op_array.fn_flags & ZEND_ACC_CLOSURE) != 0) && EX(func)->op_array.prototype) {
zval_ptr_dtor((zval*)EX(func)->op_array.prototype);
}
- call_flags = EX(flags);
prev_nested_call = EX(prev_nested_call);
zend_vm_stack_free_extra_args(execute_data TSRMLS_CC);
zend_vm_stack_free_call_frame(execute_data TSRMLS_CC);
EG(active_symbol_table) = EX(symbol_table);
if (Z_OBJ(EG(This))) {
- if (UNEXPECTED(EG(exception) != NULL) && (call_flags & ZEND_CALL_CTOR)) {
- if (call_flags & ZEND_CALL_CTOR_RESULT_USED) {
+ if (UNEXPECTED(EG(exception) != NULL) && (EX(opline)->op1.num & ZEND_CALL_CTOR)) {
+ if (!(EX(opline)->op1.num & ZEND_CALL_CTOR_RESULT_UNUSED)) {
Z_DELREF(EG(This));
}
if (Z_REFCOUNT(EG(This)) == 1) {
USE_OPLINE
zend_execute_data *call = EX(call);
zend_function *fbc = call->func;
- zend_uint call_flags = call->flags;
SAVE_OPLINE();
- call->flags |= ZEND_CALL_DONE;
+ call->flags = ZEND_CALL_DONE;
if (UNEXPECTED((fbc->common.fn_flags & (ZEND_ACC_ABSTRACT|ZEND_ACC_DEPRECATED)) != 0)) {
if (UNEXPECTED((fbc->common.fn_flags & ZEND_ACC_ABSTRACT) != 0)) {
zend_error_noreturn(E_ERROR, "Cannot call abstract method %s::%s()", fbc->common.scope->name->val, fbc->common.function_name->val);
fcall_end_change_scope:
if (Z_OBJ(EG(This))) {
- if (UNEXPECTED(EG(exception) != NULL) && (call_flags & ZEND_CALL_CTOR)) {
- if (call_flags & ZEND_CALL_CTOR_RESULT_USED) {
+ if (UNEXPECTED(EG(exception) != NULL) && (opline->op1.num & ZEND_CALL_CTOR)) {
+ if (!(opline->op1.num & ZEND_CALL_CTOR_RESULT_UNUSED)) {
Z_DELREF(EG(This));
}
if (Z_REFCOUNT(EG(This)) == 1) {
params = _get_zval_ptr_cv_undef_BP_VAR_W(execute_data, opline->result.var TSRMLS_CC);
if (arg_num <= arg_count) {
- zval *param, tmp;
+ zval *param;
- ZVAL_COPY_VALUE(&tmp, params);
array_init_size(params, arg_count - arg_num + 1);
param = EX_VAR_NUM(EX(func)->op_array.last_var + EX(func)->op_array.T);
if (UNEXPECTED((EX(func)->op_array.fn_flags & ZEND_ACC_HAS_TYPE_HINTS) != 0)) {
- zend_verify_arg_type(EX(func), arg_num, &tmp, opline->extended_value TSRMLS_CC);
- zend_hash_next_index_insert_new(Z_ARRVAL_P(params), &tmp);
- if (param) {
- while (++arg_num <= arg_count) {
- zend_verify_arg_type(EX(func), arg_num, param, opline->extended_value TSRMLS_CC);
- zend_hash_next_index_insert_new(Z_ARRVAL_P(params), param);
- if (Z_REFCOUNTED_P(param)) Z_ADDREF_P(param);
- param++;
- }
- }
+ do {
+ zend_verify_arg_type(EX(func), arg_num, param, opline->extended_value TSRMLS_CC);
+ zend_hash_next_index_insert_new(Z_ARRVAL_P(params), param);
+ if (Z_REFCOUNTED_P(param)) Z_ADDREF_P(param);
+ param++;
+ } while (++arg_num <= arg_count);
} else {
- zend_hash_next_index_insert_new(Z_ARRVAL_P(params), &tmp);
- if (param) {
- while (++arg_num <= arg_count) {
- zend_hash_next_index_insert_new(Z_ARRVAL_P(params), param);
- if (Z_REFCOUNTED_P(param)) Z_ADDREF_P(param);
- param++;
- }
- }
+ do {
+ zend_hash_next_index_insert_new(Z_ARRVAL_P(params), param);
+ if (Z_REFCOUNTED_P(param)) Z_ADDREF_P(param);
+ param++;
+ } while (++arg_num <= arg_count);
}
} else {
array_init(params);
EX(call) = zend_vm_stack_push_call_frame(
constructor, opline->extended_value,
RETURN_VALUE_USED(opline) ?
- (ZEND_CALL_CTOR | ZEND_CALL_CTOR_RESULT_USED) : ZEND_CALL_CTOR,
+ ZEND_CALL_CTOR : (ZEND_CALL_CTOR | ZEND_CALL_CTOR_RESULT_UNUSED),
Z_CE_P(EX_VAR(opline->op1.var)),
Z_OBJ(object_zval),
EX(call) TSRMLS_CC);
if (call->object) {
if (call->flags & ZEND_CALL_CTOR) {
- if (call->flags & ZEND_CALL_CTOR_RESULT_USED) {
+ if (!(call->flags & ZEND_CALL_CTOR_RESULT_UNUSED)) {
GC_REFCOUNT(call->object)--;
}
if (GC_REFCOUNT(call->object) == 1) {