2013-02-13 12:26:47 +00:00
|
|
|
/* pass 1
|
|
|
|
* - substitute persistent constants (true, false, null, etc)
|
|
|
|
* - perform compile-time evaluation of constant binary and unary operations
|
|
|
|
* - optimize series of ADD_STRING and/or ADD_CHAR
|
|
|
|
* - convert CAST(IS_BOOL,x) into BOOL(x)
|
2013-11-26 17:37:31 +00:00
|
|
|
* - pre-evaluate constant function calls
|
2013-02-13 12:26:47 +00:00
|
|
|
*/
|
|
|
|
|
2013-11-26 17:37:31 +00:00
|
|
|
#if ZEND_EXTENSION_API_NO > PHP_5_2_X_API_NO
|
2014-04-03 11:26:23 +00:00
|
|
|
# define ZEND_IS_CONSTANT_TYPE(t) ((t) == IS_CONSTANT)
|
2013-11-26 17:37:31 +00:00
|
|
|
#else
|
|
|
|
# define ZEND_IS_CONSTANT_TYPE(t) ((t) == IS_CONSTANT)
|
|
|
|
#endif
|
|
|
|
|
2013-02-13 12:26:47 +00:00
|
|
|
if (ZEND_OPTIMIZER_PASS_1 & OPTIMIZATION_LEVEL) {
|
2013-02-22 06:56:05 +00:00
|
|
|
int i = 0;
|
2013-02-13 12:26:47 +00:00
|
|
|
zend_op *opline = op_array->opcodes;
|
|
|
|
zend_op *end = opline + op_array->last;
|
2013-04-11 11:18:35 +00:00
|
|
|
zend_bool collect_constants = (op_array == &script->main_op_array);
|
2013-02-13 12:26:47 +00:00
|
|
|
|
2013-02-22 06:56:05 +00:00
|
|
|
while (opline < end) {
|
2013-02-13 12:26:47 +00:00
|
|
|
switch (opline->opcode) {
|
|
|
|
case ZEND_ADD:
|
|
|
|
case ZEND_SUB:
|
|
|
|
case ZEND_MUL:
|
|
|
|
case ZEND_DIV:
|
|
|
|
case ZEND_MOD:
|
|
|
|
case ZEND_SL:
|
|
|
|
case ZEND_SR:
|
|
|
|
case ZEND_CONCAT:
|
|
|
|
case ZEND_IS_EQUAL:
|
|
|
|
case ZEND_IS_NOT_EQUAL:
|
|
|
|
case ZEND_IS_SMALLER:
|
|
|
|
case ZEND_IS_SMALLER_OR_EQUAL:
|
|
|
|
case ZEND_IS_IDENTICAL:
|
|
|
|
case ZEND_IS_NOT_IDENTICAL:
|
|
|
|
case ZEND_BW_OR:
|
|
|
|
case ZEND_BW_AND:
|
|
|
|
case ZEND_BW_XOR:
|
|
|
|
case ZEND_BOOL_XOR:
|
2013-02-22 06:56:05 +00:00
|
|
|
if (ZEND_OP1_TYPE(opline) == IS_CONST &&
|
|
|
|
ZEND_OP2_TYPE(opline) == IS_CONST) {
|
|
|
|
/* binary operation with constant operands */
|
2013-02-13 12:26:47 +00:00
|
|
|
int (*binary_op)(zval *result, zval *op1, zval *op2 TSRMLS_DC) = get_binary_op(opline->opcode);
|
|
|
|
zend_uint tv = ZEND_RESULT(opline).var; /* temporary variable */
|
|
|
|
zval result;
|
|
|
|
int er;
|
|
|
|
|
2013-02-22 06:56:05 +00:00
|
|
|
if (opline->opcode == ZEND_DIV &&
|
|
|
|
Z_TYPE(ZEND_OP2_LITERAL(opline)) == IS_LONG &&
|
|
|
|
Z_LVAL(ZEND_OP2_LITERAL(opline)) == 0) {
|
2013-02-13 12:26:47 +00:00
|
|
|
/* div by 0 */
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
er = EG(error_reporting);
|
|
|
|
EG(error_reporting) = 0;
|
|
|
|
/* evaluate constant expression */
|
|
|
|
if (binary_op(&result, &ZEND_OP1_LITERAL(opline), &ZEND_OP2_LITERAL(opline) TSRMLS_CC) != SUCCESS) {
|
|
|
|
EG(error_reporting) = er;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
EG(error_reporting) = er;
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline));
|
|
|
|
literal_dtor(&ZEND_OP2_LITERAL(opline));
|
|
|
|
MAKE_NOP(opline);
|
|
|
|
|
2013-10-10 11:32:30 +00:00
|
|
|
replace_tmp_by_const(op_array, opline + 1, tv, &result TSRMLS_CC);
|
2013-02-13 12:26:47 +00:00
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case ZEND_CAST:
|
2013-02-22 06:56:05 +00:00
|
|
|
if (ZEND_OP1_TYPE(opline) == IS_CONST &&
|
2013-02-13 12:26:47 +00:00
|
|
|
opline->extended_value != IS_ARRAY &&
|
|
|
|
opline->extended_value != IS_OBJECT &&
|
|
|
|
opline->extended_value != IS_RESOURCE) {
|
|
|
|
/* cast of constant operand */
|
2013-10-10 11:32:30 +00:00
|
|
|
zend_uint tv = ZEND_RESULT(opline).var; /* temporary variable */
|
2013-02-13 12:26:47 +00:00
|
|
|
zval res;
|
|
|
|
res = ZEND_OP1_LITERAL(opline);
|
|
|
|
zval_copy_ctor(&res);
|
|
|
|
switch (opline->extended_value) {
|
|
|
|
case IS_NULL:
|
|
|
|
convert_to_null(&res);
|
|
|
|
break;
|
|
|
|
case IS_BOOL:
|
|
|
|
convert_to_boolean(&res);
|
|
|
|
break;
|
|
|
|
case IS_LONG:
|
|
|
|
convert_to_long(&res);
|
|
|
|
break;
|
|
|
|
case IS_DOUBLE:
|
|
|
|
convert_to_double(&res);
|
|
|
|
break;
|
|
|
|
case IS_STRING:
|
|
|
|
convert_to_string(&res);
|
|
|
|
break;
|
|
|
|
}
|
2013-10-10 11:32:30 +00:00
|
|
|
|
2013-02-13 12:26:47 +00:00
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline));
|
2013-10-10 11:32:30 +00:00
|
|
|
MAKE_NOP(opline);
|
|
|
|
|
2014-04-17 07:12:47 +00:00
|
|
|
if (opline->result_type == IS_TMP_VAR) {
|
|
|
|
replace_tmp_by_const(op_array, opline + 1, tv, &res TSRMLS_CC);
|
|
|
|
} else /* if (opline->result_type == IS_VAR) */ {
|
|
|
|
replace_var_by_const(op_array, opline + 1, tv, &res TSRMLS_CC);
|
|
|
|
}
|
2013-02-13 12:26:47 +00:00
|
|
|
} else if (opline->extended_value == IS_BOOL) {
|
|
|
|
/* T = CAST(X, IS_BOOL) => T = BOOL(X) */
|
|
|
|
opline->opcode = ZEND_BOOL;
|
|
|
|
opline->extended_value = 0;
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case ZEND_BW_NOT:
|
|
|
|
case ZEND_BOOL_NOT:
|
2013-02-22 06:56:05 +00:00
|
|
|
if (ZEND_OP1_TYPE(opline) == IS_CONST) {
|
2013-02-13 12:26:47 +00:00
|
|
|
/* unary operation on constant operand */
|
|
|
|
unary_op_type unary_op = get_unary_op(opline->opcode);
|
|
|
|
zval result;
|
|
|
|
zend_uint tv = ZEND_RESULT(opline).var; /* temporary variable */
|
|
|
|
int er;
|
|
|
|
|
|
|
|
er = EG(error_reporting);
|
|
|
|
EG(error_reporting) = 0;
|
2013-03-25 08:21:58 +00:00
|
|
|
#if ZEND_EXTENSION_API_NO < PHP_5_3_X_API_NO
|
|
|
|
if (unary_op(&result, &ZEND_OP1_LITERAL(opline)) != SUCCESS) {
|
|
|
|
#else
|
2013-02-13 12:26:47 +00:00
|
|
|
if (unary_op(&result, &ZEND_OP1_LITERAL(opline) TSRMLS_CC) != SUCCESS) {
|
2013-03-25 08:21:58 +00:00
|
|
|
#endif
|
2013-02-13 12:26:47 +00:00
|
|
|
EG(error_reporting) = er;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
EG(error_reporting) = er;
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline));
|
|
|
|
MAKE_NOP(opline);
|
|
|
|
|
2013-10-10 11:32:30 +00:00
|
|
|
replace_tmp_by_const(op_array, opline + 1, tv, &result TSRMLS_CC);
|
2013-02-13 12:26:47 +00:00
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case ZEND_ADD_STRING:
|
|
|
|
case ZEND_ADD_CHAR:
|
|
|
|
{
|
2013-02-22 06:56:05 +00:00
|
|
|
zend_op *next_op = opline + 1;
|
|
|
|
int requires_conversion = (opline->opcode == ZEND_ADD_CHAR? 1 : 0);
|
2013-02-13 12:26:47 +00:00
|
|
|
size_t final_length = 0;
|
2014-03-28 19:34:49 +00:00
|
|
|
zend_string *str;
|
2013-02-13 12:26:47 +00:00
|
|
|
char *ptr;
|
|
|
|
zend_op *last_op;
|
|
|
|
|
|
|
|
/* There is always a ZEND_RETURN at the end
|
|
|
|
if (next_op>=end) {
|
2013-02-22 06:56:05 +00:00
|
|
|
break;
|
2013-02-13 12:26:47 +00:00
|
|
|
}
|
|
|
|
*/
|
|
|
|
while (next_op->opcode == ZEND_ADD_STRING || next_op->opcode == ZEND_ADD_CHAR) {
|
|
|
|
if (ZEND_RESULT(opline).var != ZEND_RESULT(next_op).var) {
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
if (next_op->opcode == ZEND_ADD_CHAR) {
|
|
|
|
final_length += 1;
|
|
|
|
} else { /* ZEND_ADD_STRING */
|
2014-03-28 19:34:49 +00:00
|
|
|
final_length += Z_STRLEN(ZEND_OP2_LITERAL(next_op));
|
2013-02-13 12:26:47 +00:00
|
|
|
}
|
|
|
|
next_op++;
|
|
|
|
}
|
|
|
|
if (final_length == 0) {
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
last_op = next_op;
|
2014-03-28 19:34:49 +00:00
|
|
|
final_length += (requires_conversion? 1 : Z_STRLEN(ZEND_OP2_LITERAL(opline)));
|
|
|
|
str = STR_ALLOC(final_length, 0);
|
|
|
|
ptr = str->val;
|
2013-02-13 12:26:47 +00:00
|
|
|
ptr[final_length] = '\0';
|
|
|
|
if (requires_conversion) { /* ZEND_ADD_CHAR */
|
2014-03-28 19:34:49 +00:00
|
|
|
char chval = (char)Z_LVAL(ZEND_OP2_LITERAL(opline));
|
2013-02-13 12:26:47 +00:00
|
|
|
|
2014-04-03 11:26:23 +00:00
|
|
|
ZVAL_NEW_STR(&ZEND_OP2_LITERAL(opline), str);
|
2013-02-13 12:26:47 +00:00
|
|
|
ptr[0] = chval;
|
|
|
|
opline->opcode = ZEND_ADD_STRING;
|
|
|
|
ptr++;
|
|
|
|
} else { /* ZEND_ADD_STRING */
|
|
|
|
memcpy(ptr, Z_STRVAL(ZEND_OP2_LITERAL(opline)), Z_STRLEN(ZEND_OP2_LITERAL(opline)));
|
2014-03-28 19:34:49 +00:00
|
|
|
STR_RELEASE(Z_STR(ZEND_OP2_LITERAL(opline)));
|
|
|
|
Z_STR(ZEND_OP2_LITERAL(opline)) = str;
|
2013-02-13 12:26:47 +00:00
|
|
|
ptr += Z_STRLEN(ZEND_OP2_LITERAL(opline));
|
|
|
|
}
|
2014-03-28 19:34:49 +00:00
|
|
|
Z_STRLEN(ZEND_OP2_LITERAL(opline)) = final_length;
|
2013-02-22 06:56:05 +00:00
|
|
|
next_op = opline + 1;
|
2013-02-13 12:26:47 +00:00
|
|
|
while (next_op < last_op) {
|
|
|
|
if (next_op->opcode == ZEND_ADD_STRING) {
|
2014-03-28 19:34:49 +00:00
|
|
|
memcpy(ptr, Z_STRVAL(ZEND_OP2_LITERAL(next_op)), Z_STRLEN(ZEND_OP2_LITERAL(next_op)));
|
|
|
|
ptr += Z_STRLEN(ZEND_OP2_LITERAL(next_op));
|
2013-02-13 12:26:47 +00:00
|
|
|
literal_dtor(&ZEND_OP2_LITERAL(next_op));
|
|
|
|
} else { /* ZEND_ADD_CHAR */
|
2014-03-28 19:34:49 +00:00
|
|
|
*ptr = (char)Z_LVAL(ZEND_OP2_LITERAL(next_op));
|
2013-02-13 12:26:47 +00:00
|
|
|
ptr++;
|
|
|
|
}
|
|
|
|
MAKE_NOP(next_op);
|
|
|
|
next_op++;
|
|
|
|
}
|
|
|
|
if (!((ZEND_OPTIMIZER_PASS_5|ZEND_OPTIMIZER_PASS_10) & OPTIMIZATION_LEVEL)) {
|
2013-03-11 18:49:05 +00:00
|
|
|
/* NOP removal is disabled => insert JMP over NOPs */
|
2013-02-13 12:26:47 +00:00
|
|
|
if (last_op-opline >= 3) { /* If we have more than 2 NOPS then JMP over them */
|
2013-02-22 06:56:05 +00:00
|
|
|
(opline + 1)->opcode = ZEND_JMP;
|
|
|
|
ZEND_OP1(opline + 1).opline_num = last_op - op_array->opcodes; /* that's OK even for ZE2, since opline_num's are resolved in pass 2 later */
|
2013-02-13 12:26:47 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
|
|
|
|
case ZEND_FETCH_CONSTANT:
|
|
|
|
if (ZEND_OP1_TYPE(opline) == IS_UNUSED &&
|
2013-02-22 06:56:05 +00:00
|
|
|
ZEND_OP2_TYPE(opline) == IS_CONST &&
|
|
|
|
Z_TYPE(ZEND_OP2_LITERAL(opline)) == IS_STRING &&
|
2013-02-25 07:29:54 +00:00
|
|
|
Z_STRLEN(ZEND_OP2_LITERAL(opline)) == sizeof("__COMPILER_HALT_OFFSET__") - 1 &&
|
|
|
|
memcmp(Z_STRVAL(ZEND_OP2_LITERAL(opline)), "__COMPILER_HALT_OFFSET__", sizeof("__COMPILER_HALT_OFFSET__") - 1) == 0) {
|
2013-02-22 06:56:05 +00:00
|
|
|
/* substitute __COMPILER_HALT_OFFSET__ constant */
|
2013-02-13 12:26:47 +00:00
|
|
|
zend_bool orig_in_execution = EG(in_execution);
|
|
|
|
zend_op_array *orig_op_array = EG(active_op_array);
|
2014-04-24 20:56:15 +00:00
|
|
|
zval *offset;
|
2013-02-13 12:26:47 +00:00
|
|
|
|
|
|
|
EG(in_execution) = 1;
|
|
|
|
EG(active_op_array) = op_array;
|
2014-04-24 20:56:15 +00:00
|
|
|
if ((offset = zend_get_constant_str("__COMPILER_HALT_OFFSET__", sizeof("__COMPILER_HALT_OFFSET__") - 1 TSRMLS_CC)) != NULL) {
|
2013-11-26 13:47:02 +00:00
|
|
|
zend_uint tv = ZEND_RESULT(opline).var;
|
|
|
|
|
2013-02-13 12:26:47 +00:00
|
|
|
literal_dtor(&ZEND_OP2_LITERAL(opline));
|
2013-11-26 13:47:02 +00:00
|
|
|
MAKE_NOP(opline);
|
2014-04-24 20:56:15 +00:00
|
|
|
replace_tmp_by_const(op_array, opline, tv, offset TSRMLS_CC);
|
2013-02-13 12:26:47 +00:00
|
|
|
}
|
|
|
|
EG(active_op_array) = orig_op_array;
|
|
|
|
EG(in_execution) = orig_in_execution;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (ZEND_OP1_TYPE(opline) == IS_UNUSED &&
|
2013-02-22 06:56:05 +00:00
|
|
|
ZEND_OP2_TYPE(opline) == IS_CONST &&
|
2014-04-02 10:34:44 +00:00
|
|
|
Z_TYPE(ZEND_OP2_LITERAL(opline)) == IS_STRING) {
|
2013-02-22 06:56:05 +00:00
|
|
|
/* substitute persistent constants */
|
2013-11-26 13:47:02 +00:00
|
|
|
zend_uint tv = ZEND_RESULT(opline).var;
|
2013-02-13 12:26:47 +00:00
|
|
|
zval c;
|
|
|
|
|
2014-03-28 19:34:49 +00:00
|
|
|
if (!zend_get_persistent_constant(Z_STR(ZEND_OP2_LITERAL(opline)), &c, 1 TSRMLS_CC)) {
|
2013-04-11 11:18:35 +00:00
|
|
|
if (!*constants || !zend_optimizer_get_collected_constant(*constants, &ZEND_OP2_LITERAL(opline), &c)) {
|
|
|
|
break;
|
|
|
|
}
|
2013-02-13 12:26:47 +00:00
|
|
|
}
|
|
|
|
literal_dtor(&ZEND_OP2_LITERAL(opline));
|
2013-11-26 13:47:02 +00:00
|
|
|
MAKE_NOP(opline);
|
|
|
|
replace_tmp_by_const(op_array, opline, tv, &c TSRMLS_CC);
|
2013-02-13 12:26:47 +00:00
|
|
|
}
|
2013-11-26 17:37:31 +00:00
|
|
|
|
|
|
|
#if ZEND_EXTENSION_API_NO > PHP_5_3_X_API_NO
|
|
|
|
/* class constant */
|
|
|
|
if (ZEND_OP1_TYPE(opline) != IS_UNUSED &&
|
|
|
|
ZEND_OP2_TYPE(opline) == IS_CONST &&
|
2014-04-02 10:34:44 +00:00
|
|
|
Z_TYPE(ZEND_OP2_LITERAL(opline)) == IS_STRING) {
|
2013-11-26 17:37:31 +00:00
|
|
|
|
2014-03-28 19:34:49 +00:00
|
|
|
zend_class_entry *ce = NULL;
|
2013-11-26 17:37:31 +00:00
|
|
|
|
|
|
|
if (ZEND_OP1_TYPE(opline) == IS_CONST &&
|
2014-04-02 10:34:44 +00:00
|
|
|
Z_TYPE(ZEND_OP1_LITERAL(opline)) == IS_STRING) {
|
2013-11-26 17:37:31 +00:00
|
|
|
/* for A::B */
|
|
|
|
if (op_array->scope &&
|
|
|
|
!strncasecmp(Z_STRVAL(ZEND_OP1_LITERAL(opline)),
|
2014-03-28 19:34:49 +00:00
|
|
|
op_array->scope->name->val, Z_STRLEN(ZEND_OP1_LITERAL(opline)) + 1)) {
|
|
|
|
ce = op_array->scope;
|
2013-11-26 17:37:31 +00:00
|
|
|
} else {
|
2014-03-28 19:34:49 +00:00
|
|
|
if ((ce = zend_hash_find_ptr(EG(class_table),
|
2014-04-17 11:40:45 +00:00
|
|
|
Z_STR(op_array->literals[opline->op1.constant + 1]))) == NULL ||
|
2014-03-28 19:34:49 +00:00
|
|
|
(ce->type == ZEND_INTERNAL_CLASS &&
|
|
|
|
ce->info.internal.module->type != MODULE_PERSISTENT) ||
|
|
|
|
(ce->type == ZEND_USER_CLASS &&
|
|
|
|
ZEND_CE_FILENAME(ce) != op_array->filename)) {
|
2013-11-26 17:37:31 +00:00
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else if (op_array->scope &&
|
|
|
|
ZEND_OP1_TYPE(opline) == IS_VAR &&
|
|
|
|
(opline - 1)->opcode == ZEND_FETCH_CLASS &&
|
|
|
|
(ZEND_OP1_TYPE(opline - 1) == IS_UNUSED &&
|
|
|
|
((opline - 1)->extended_value & ~ZEND_FETCH_CLASS_NO_AUTOLOAD) == ZEND_FETCH_CLASS_SELF) &&
|
|
|
|
ZEND_RESULT((opline - 1)).var == ZEND_OP1(opline).var) {
|
|
|
|
/* for self::B */
|
2014-03-28 19:34:49 +00:00
|
|
|
ce = op_array->scope;
|
2013-11-26 17:37:31 +00:00
|
|
|
}
|
|
|
|
|
2014-03-28 19:34:49 +00:00
|
|
|
if (ce) {
|
2013-11-26 17:37:31 +00:00
|
|
|
zend_uint tv = ZEND_RESULT(opline).var;
|
2014-03-28 19:34:49 +00:00
|
|
|
zval *c, t;
|
|
|
|
|
|
|
|
if ((c = zend_hash_find(&ce->constants_table,
|
|
|
|
Z_STR(ZEND_OP2_LITERAL(opline)))) != NULL) {
|
2014-04-14 09:24:43 +00:00
|
|
|
ZVAL_DEREF(c);
|
2014-03-28 19:34:49 +00:00
|
|
|
if (ZEND_IS_CONSTANT_TYPE(Z_TYPE_P(c))) {
|
|
|
|
if (!zend_get_persistent_constant(Z_STR_P(c), &t, 1 TSRMLS_CC) ||
|
2013-11-26 17:37:31 +00:00
|
|
|
ZEND_IS_CONSTANT_TYPE(Z_TYPE(t))) {
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
} else {
|
2014-03-28 19:34:49 +00:00
|
|
|
ZVAL_COPY_VALUE(&t, c);
|
2013-11-26 17:37:31 +00:00
|
|
|
zval_copy_ctor(&t);
|
|
|
|
}
|
|
|
|
|
|
|
|
if (ZEND_OP1_TYPE(opline) == IS_CONST) {
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline));
|
|
|
|
} else {
|
|
|
|
MAKE_NOP((opline - 1));
|
|
|
|
}
|
|
|
|
literal_dtor(&ZEND_OP2_LITERAL(opline));
|
|
|
|
MAKE_NOP(opline);
|
|
|
|
replace_tmp_by_const(op_array, opline, tv, &t TSRMLS_CC);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
#endif
|
2013-02-13 12:26:47 +00:00
|
|
|
break;
|
|
|
|
|
2013-04-11 11:18:35 +00:00
|
|
|
case ZEND_DO_FCALL:
|
2013-12-10 13:04:17 +00:00
|
|
|
/* define("name", scalar); */
|
|
|
|
if (collect_constants &&
|
|
|
|
opline->extended_value == 2 &&
|
|
|
|
ZEND_OP1_TYPE(opline) == IS_CONST &&
|
|
|
|
Z_TYPE(ZEND_OP1_LITERAL(opline)) == IS_STRING &&
|
|
|
|
Z_STRLEN(ZEND_OP1_LITERAL(opline)) == sizeof("define")-1 &&
|
|
|
|
zend_binary_strcasecmp(Z_STRVAL(ZEND_OP1_LITERAL(opline)), Z_STRLEN(ZEND_OP1_LITERAL(opline)), "define", sizeof("define")-1) == 0 &&
|
|
|
|
(opline-1)->opcode == ZEND_SEND_VAL &&
|
|
|
|
ZEND_OP1_TYPE(opline-1) == IS_CONST &&
|
|
|
|
(Z_TYPE(ZEND_OP1_LITERAL(opline-1)) <= IS_BOOL ||
|
|
|
|
Z_TYPE(ZEND_OP1_LITERAL(opline-1)) == IS_STRING) &&
|
|
|
|
(opline-2)->opcode == ZEND_SEND_VAL &&
|
|
|
|
ZEND_OP1_TYPE(opline-2) == IS_CONST &&
|
|
|
|
Z_TYPE(ZEND_OP1_LITERAL(opline-2)) == IS_STRING) {
|
|
|
|
zend_optimizer_collect_constant(constants, &ZEND_OP1_LITERAL(opline-2), &ZEND_OP1_LITERAL(opline-1));
|
|
|
|
break;
|
|
|
|
} else {
|
|
|
|
/* don't colllect constants after any other function call */
|
|
|
|
collect_constants = 0;
|
|
|
|
}
|
|
|
|
|
2013-11-26 17:37:31 +00:00
|
|
|
/* pre-evaluate constant functions:
|
|
|
|
defined(x)
|
|
|
|
constant(x)
|
|
|
|
function_exists(x)
|
|
|
|
is_callable(x)
|
|
|
|
extension_loaded(x)
|
|
|
|
*/
|
|
|
|
if (opline->extended_value == 1 && (opline - 1)->opcode == ZEND_SEND_VAL &&
|
2014-04-02 10:34:44 +00:00
|
|
|
ZEND_OP1_TYPE(opline - 1) == IS_CONST && Z_TYPE(ZEND_OP1_LITERAL(opline - 1)) == IS_STRING &&
|
|
|
|
ZEND_OP1_TYPE(opline) == IS_CONST && Z_TYPE(ZEND_OP1_LITERAL(opline)) == IS_STRING) {
|
2013-11-26 17:37:31 +00:00
|
|
|
if ((Z_STRLEN(ZEND_OP1_LITERAL(opline)) == sizeof("function_exists")-1 &&
|
|
|
|
!memcmp(Z_STRVAL(ZEND_OP1_LITERAL(opline)),
|
|
|
|
"function_exists", sizeof("function_exists")-1)) ||
|
|
|
|
(Z_STRLEN(ZEND_OP1_LITERAL(opline)) == sizeof("is_callable")-1 &&
|
|
|
|
!memcmp(Z_STRVAL(ZEND_OP1_LITERAL(opline)),
|
|
|
|
"is_callable", sizeof("is_callable")))) {
|
|
|
|
zend_internal_function *func;
|
|
|
|
char *lc_name = zend_str_tolower_dup(
|
|
|
|
Z_STRVAL(ZEND_OP1_LITERAL(opline - 1)), Z_STRLEN(ZEND_OP1_LITERAL(opline - 1)));
|
|
|
|
|
2014-03-28 19:34:49 +00:00
|
|
|
if ((func = zend_hash_str_find_ptr(EG(function_table), lc_name, Z_STRLEN(ZEND_OP1_LITERAL(opline - 1)))) != NULL &&
|
2013-11-26 17:37:31 +00:00
|
|
|
func->type == ZEND_INTERNAL_FUNCTION &&
|
|
|
|
func->module->type == MODULE_PERSISTENT) {
|
|
|
|
zval t;
|
|
|
|
ZVAL_BOOL(&t, 1);
|
|
|
|
if (replace_var_by_const(op_array, opline + 1, ZEND_RESULT(opline).var, &t TSRMLS_CC)) {
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline - 1));
|
|
|
|
MAKE_NOP((opline - 1));
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline));
|
|
|
|
MAKE_NOP(opline);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
efree(lc_name);
|
|
|
|
} else if (Z_STRLEN(ZEND_OP1_LITERAL(opline)) == sizeof("extension_loaded")-1 &&
|
|
|
|
!memcmp(Z_STRVAL(ZEND_OP1_LITERAL(opline)),
|
|
|
|
"extension_loaded", sizeof("extension_loaded")-1)) {
|
|
|
|
zval t;
|
|
|
|
char *lc_name = zend_str_tolower_dup(
|
|
|
|
Z_STRVAL(ZEND_OP1_LITERAL(opline - 1)), Z_STRLEN(ZEND_OP1_LITERAL(opline - 1)));
|
2014-03-28 19:34:49 +00:00
|
|
|
zend_module_entry *m = zend_hash_str_find_ptr(&module_registry,
|
|
|
|
lc_name, Z_STRLEN(ZEND_OP1_LITERAL(opline - 1)));
|
2013-11-26 17:37:31 +00:00
|
|
|
|
2013-12-23 12:04:10 +00:00
|
|
|
efree(lc_name);
|
2014-03-28 19:34:49 +00:00
|
|
|
if (!m) {
|
2013-11-26 17:37:31 +00:00
|
|
|
if (!PG(enable_dl)) {
|
|
|
|
break;
|
|
|
|
} else {
|
|
|
|
ZVAL_BOOL(&t, 0);
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
if (m->type == MODULE_PERSISTENT) {
|
|
|
|
ZVAL_BOOL(&t, 1);
|
|
|
|
} else {
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
if (replace_var_by_const(op_array, opline + 1, ZEND_RESULT(opline).var, &t TSRMLS_CC)) {
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline - 1));
|
|
|
|
MAKE_NOP((opline - 1));
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline));
|
|
|
|
MAKE_NOP(opline);
|
|
|
|
}
|
|
|
|
} else if (Z_STRLEN(ZEND_OP1_LITERAL(opline)) == sizeof("defined")-1 &&
|
|
|
|
!memcmp(Z_STRVAL(ZEND_OP1_LITERAL(opline)),
|
|
|
|
"defined", sizeof("defined")-1)) {
|
|
|
|
zval t;
|
|
|
|
|
2014-03-28 19:34:49 +00:00
|
|
|
if (zend_get_persistent_constant(Z_STR(ZEND_OP1_LITERAL(opline - 1)), &t, 0 TSRMLS_CC)) {
|
2013-11-26 17:37:31 +00:00
|
|
|
|
|
|
|
ZVAL_BOOL(&t, 1);
|
|
|
|
if (replace_var_by_const(op_array, opline + 1, ZEND_RESULT(opline).var, &t TSRMLS_CC)) {
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline - 1));
|
|
|
|
MAKE_NOP((opline - 1));
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline));
|
|
|
|
MAKE_NOP(opline);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else if (Z_STRLEN(ZEND_OP1_LITERAL(opline)) == sizeof("constant")-1 &&
|
|
|
|
!memcmp(Z_STRVAL(ZEND_OP1_LITERAL(opline)),
|
|
|
|
"constant", sizeof("constant")-1)) {
|
|
|
|
zval t;
|
|
|
|
|
2014-03-28 19:34:49 +00:00
|
|
|
if (zend_get_persistent_constant(Z_STR(ZEND_OP1_LITERAL(opline - 1)), &t, 1 TSRMLS_CC)) {
|
2013-11-26 17:37:31 +00:00
|
|
|
if (replace_var_by_const(op_array, opline + 1, ZEND_RESULT(opline).var, &t TSRMLS_CC)) {
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline - 1));
|
|
|
|
MAKE_NOP((opline - 1));
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline));
|
|
|
|
MAKE_NOP(opline);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
} else if (Z_STRLEN(ZEND_OP1_LITERAL(opline)) == sizeof("strlen")-1 &&
|
|
|
|
!memcmp(Z_STRVAL(ZEND_OP1_LITERAL(opline)),
|
|
|
|
"strlen", sizeof("strlen")-1)) {
|
|
|
|
zval t;
|
|
|
|
|
|
|
|
ZVAL_LONG(&t, Z_STRLEN(ZEND_OP1_LITERAL(opline - 1)));
|
|
|
|
if (replace_var_by_const(op_array, opline + 1, ZEND_RESULT(opline).var, &t TSRMLS_CC)) {
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline - 1));
|
|
|
|
MAKE_NOP((opline - 1));
|
|
|
|
literal_dtor(&ZEND_OP1_LITERAL(opline));
|
|
|
|
MAKE_NOP(opline);
|
|
|
|
}
|
|
|
|
}
|
2013-12-10 13:04:17 +00:00
|
|
|
}
|
2013-04-11 11:18:35 +00:00
|
|
|
break;
|
|
|
|
#if ZEND_EXTENSION_API_NO > PHP_5_2_X_API_NO
|
|
|
|
case ZEND_DECLARE_CONST:
|
|
|
|
if (collect_constants &&
|
|
|
|
Z_TYPE(ZEND_OP1_LITERAL(opline)) == IS_STRING &&
|
|
|
|
(Z_TYPE(ZEND_OP2_LITERAL(opline)) <= IS_BOOL ||
|
|
|
|
Z_TYPE(ZEND_OP2_LITERAL(opline)) == IS_STRING)) {
|
|
|
|
zend_optimizer_collect_constant(constants, &ZEND_OP1_LITERAL(opline), &ZEND_OP2_LITERAL(opline));
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
#endif
|
|
|
|
|
|
|
|
case ZEND_RETURN:
|
|
|
|
#if ZEND_EXTENSION_API_NO > PHP_5_3_X_API_NO
|
|
|
|
case ZEND_RETURN_BY_REF:
|
|
|
|
#endif
|
|
|
|
#if ZEND_EXTENSION_API_NO > PHP_5_4_X_API_NO
|
|
|
|
case ZEND_GENERATOR_RETURN:
|
|
|
|
#endif
|
|
|
|
case ZEND_EXIT:
|
|
|
|
case ZEND_THROW:
|
|
|
|
case ZEND_CATCH:
|
|
|
|
case ZEND_BRK:
|
|
|
|
case ZEND_CONT:
|
|
|
|
#if ZEND_EXTENSION_API_NO >= PHP_5_3_X_API_NO
|
|
|
|
case ZEND_GOTO:
|
|
|
|
#endif
|
|
|
|
#if ZEND_EXTENSION_API_NO > PHP_5_4_X_API_NO
|
|
|
|
case ZEND_FAST_CALL:
|
|
|
|
case ZEND_FAST_RET:
|
|
|
|
#endif
|
|
|
|
case ZEND_JMP:
|
|
|
|
case ZEND_JMPZNZ:
|
|
|
|
case ZEND_JMPZ:
|
|
|
|
case ZEND_JMPNZ:
|
|
|
|
case ZEND_JMPZ_EX:
|
|
|
|
case ZEND_JMPNZ_EX:
|
|
|
|
case ZEND_FE_RESET:
|
|
|
|
case ZEND_FE_FETCH:
|
|
|
|
case ZEND_NEW:
|
2013-12-10 13:04:17 +00:00
|
|
|
case ZEND_DO_FCALL_BY_NAME:
|
2013-04-11 11:18:35 +00:00
|
|
|
#if ZEND_EXTENSION_API_NO >= PHP_5_3_X_API_NO
|
|
|
|
case ZEND_JMP_SET:
|
|
|
|
#endif
|
|
|
|
#if ZEND_EXTENSION_API_NO > PHP_5_3_X_API_NO
|
|
|
|
case ZEND_JMP_SET_VAR:
|
|
|
|
#endif
|
|
|
|
collect_constants = 0;
|
|
|
|
break;
|
2014-04-01 07:04:12 +00:00
|
|
|
#if ZEND_EXTENSION_API_NO >= PHP_5_5_X_API_NO
|
2013-08-09 13:47:47 +00:00
|
|
|
case ZEND_FETCH_R:
|
|
|
|
case ZEND_FETCH_W:
|
|
|
|
case ZEND_FETCH_RW:
|
|
|
|
case ZEND_FETCH_FUNC_ARG:
|
|
|
|
case ZEND_FETCH_IS:
|
|
|
|
case ZEND_FETCH_UNSET:
|
|
|
|
if (opline != op_array->opcodes &&
|
|
|
|
(opline-1)->opcode == ZEND_BEGIN_SILENCE &&
|
|
|
|
(opline->extended_value & ZEND_FETCH_TYPE_MASK) == ZEND_FETCH_LOCAL &&
|
|
|
|
opline->op1_type == IS_CONST &&
|
|
|
|
opline->op2_type == IS_UNUSED &&
|
|
|
|
Z_TYPE(ZEND_OP1_LITERAL(opline)) == IS_STRING &&
|
|
|
|
(Z_STRLEN(ZEND_OP1_LITERAL(opline)) != sizeof("this")-1 ||
|
2013-12-17 07:09:52 +00:00
|
|
|
memcmp(Z_STRVAL(ZEND_OP1_LITERAL(opline)), "this", sizeof("this") - 1) != 0)) {
|
2013-08-09 13:47:47 +00:00
|
|
|
|
|
|
|
int var = opline->result.var;
|
|
|
|
int level = 0;
|
|
|
|
zend_op *op = opline + 1;
|
2013-08-29 07:56:01 +00:00
|
|
|
zend_op *use = NULL;
|
2013-08-09 13:47:47 +00:00
|
|
|
|
|
|
|
while (op < end) {
|
|
|
|
if (op->opcode == ZEND_BEGIN_SILENCE) {
|
|
|
|
level++;
|
|
|
|
} else if (op->opcode == ZEND_END_SILENCE) {
|
|
|
|
if (level == 0) {
|
|
|
|
break;
|
|
|
|
} else {
|
|
|
|
level--;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (op->op1_type == IS_VAR && op->op1.var == var) {
|
2013-08-29 07:56:01 +00:00
|
|
|
if (use) {
|
|
|
|
/* used more than once */
|
|
|
|
use = NULL;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
use = op;
|
|
|
|
} else if (op->op2_type == IS_VAR && op->op2.var == var) {
|
|
|
|
if (use) {
|
|
|
|
/* used more than once */
|
|
|
|
use = NULL;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
use = op;
|
|
|
|
}
|
|
|
|
op++;
|
|
|
|
}
|
|
|
|
if (use) {
|
|
|
|
if (use->op1_type == IS_VAR && use->op1.var == var) {
|
|
|
|
use->op1_type = IS_CV;
|
|
|
|
use->op1.var = zend_optimizer_lookup_cv(op_array,
|
2014-03-28 19:34:49 +00:00
|
|
|
Z_STR(ZEND_OP1_LITERAL(opline)));
|
2013-08-09 13:47:47 +00:00
|
|
|
MAKE_NOP(opline);
|
2013-08-29 07:56:01 +00:00
|
|
|
} else if (use->op2_type == IS_VAR && use->op2.var == var) {
|
|
|
|
use->op2_type = IS_CV;
|
|
|
|
use->op2.var = zend_optimizer_lookup_cv(op_array,
|
2014-03-28 19:34:49 +00:00
|
|
|
Z_STR(ZEND_OP1_LITERAL(opline)));
|
2013-08-09 13:47:47 +00:00
|
|
|
MAKE_NOP(opline);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
break;
|
|
|
|
#endif
|
2013-02-13 12:26:47 +00:00
|
|
|
}
|
|
|
|
opline++;
|
|
|
|
i++;
|
|
|
|
}
|
|
|
|
}
|