Coverage Report

Created: 2026-04-01 06:49

next uncovered line (L), next uncovered region (R), next uncovered branch (B)
/src/php-src/Zend/Optimizer/block_pass.c
Line
Count
Source
1
/*
2
   +----------------------------------------------------------------------+
3
   | Zend OPcache                                                         |
4
   +----------------------------------------------------------------------+
5
   | Copyright (c) The PHP Group                                          |
6
   +----------------------------------------------------------------------+
7
   | This source file is subject to version 3.01 of the PHP license,      |
8
   | that is bundled with this package in the file LICENSE, and is        |
9
   | available through the world-wide-web at the following url:           |
10
   | https://www.php.net/license/3_01.txt                                 |
11
   | If you did not receive a copy of the PHP license and are unable to   |
12
   | obtain it through the world-wide-web, please send a note to          |
13
   | license@php.net so we can mail you a copy immediately.               |
14
   +----------------------------------------------------------------------+
15
   | Authors: Andi Gutmans <andi@php.net>                                 |
16
   |          Zeev Suraski <zeev@php.net>                                 |
17
   |          Stanislav Malyshev <stas@zend.com>                          |
18
   |          Dmitry Stogov <dmitry@php.net>                              |
19
   +----------------------------------------------------------------------+
20
*/
21
22
#include "Optimizer/zend_optimizer.h"
23
#include "Optimizer/zend_optimizer_internal.h"
24
#include "zend_API.h"
25
#include "zend_constants.h"
26
#include "zend_execute.h"
27
#include "zend_vm.h"
28
#include "zend_bitset.h"
29
#include "zend_cfg.h"
30
#include "zend_dump.h"
31
32
/* Checks if a constant (like "true") may be replaced by its value */
33
bool zend_optimizer_get_persistent_constant(zend_string *name, zval *result, bool copy)
34
22.8k
{
35
22.8k
  const zend_constant *c = zend_hash_find_ptr(EG(zend_constants), name);
36
22.8k
  if (c) {
37
26
    if ((ZEND_CONSTANT_FLAGS(c) & CONST_PERSISTENT)
38
26
     && !(ZEND_CONSTANT_FLAGS(c) & CONST_DEPRECATED)
39
0
     && (!(ZEND_CONSTANT_FLAGS(c) & CONST_NO_FILE_CACHE)
40
0
      || !(CG(compiler_options) & ZEND_COMPILE_WITH_FILE_CACHE))) {
41
0
      ZVAL_COPY_VALUE(result, &c->value);
42
0
      if (copy) {
43
0
        Z_TRY_ADDREF_P(result);
44
0
      }
45
0
      return true;
46
26
    } else {
47
26
      return false;
48
26
    }
49
26
  }
50
51
  /* Special constants null/true/false can always be substituted. */
52
22.8k
  c = zend_get_special_const(ZSTR_VAL(name), ZSTR_LEN(name));
53
22.8k
  if (c) {
54
0
    ZVAL_COPY_VALUE(result, &c->value);
55
0
    return true;
56
0
  }
57
22.8k
  return false;
58
22.8k
}
59
60
/* Data dependencies macros */
61
62
1.80M
#define VAR_SOURCE(op) Tsource[VAR_NUM(op.var)]
63
1.42M
#define SET_VAR_SOURCE(opline) Tsource[VAR_NUM(opline->result.var)] = opline
64
65
static void strip_leading_nops(const zend_op_array *op_array, zend_basic_block *b)
66
9.24k
{
67
9.24k
  const zend_op *opcodes = op_array->opcodes;
68
69
11.3k
  do {
70
11.3k
    b->start++;
71
11.3k
    b->len--;
72
11.3k
  } while (b->len > 0 && opcodes[b->start].opcode == ZEND_NOP);
73
9.24k
}
74
75
static void strip_nops(const zend_op_array *op_array, zend_basic_block *b)
76
507k
{
77
507k
  uint32_t i, j;
78
79
507k
  if (b->len == 0) {
80
1.01k
    return;
81
1.01k
  }
82
83
506k
  if (op_array->opcodes[b->start].opcode == ZEND_NOP) {
84
3.60k
    strip_leading_nops(op_array, b);
85
3.60k
  }
86
87
506k
  if (b->len == 0) {
88
266
    return;
89
266
  }
90
91
  /* strip the inside NOPs */
92
506k
  i = j = b->start + 1;
93
3.05M
  while (i < b->start + b->len) {
94
2.55M
    if (op_array->opcodes[i].opcode != ZEND_NOP) {
95
2.52M
      if (i != j) {
96
57.6k
        op_array->opcodes[j] = op_array->opcodes[i];
97
57.6k
      }
98
2.52M
      j++;
99
2.52M
    }
100
2.55M
    i++;
101
2.55M
  }
102
506k
  b->len = j - b->start;
103
531k
  while (j < i) {
104
25.4k
    MAKE_NOP(op_array->opcodes + j);
105
25.4k
    j++;
106
25.4k
  }
107
506k
}
108
109
82
static uint32_t get_const_switch_target(const zend_cfg *cfg, const zend_op_array *op_array, const zend_basic_block *block, zend_op *opline, const zval *val) {
110
82
  HashTable *jumptable = Z_ARRVAL(ZEND_OP2_LITERAL(opline));
111
82
  zval *zv;
112
82
  if ((opline->opcode == ZEND_SWITCH_LONG && Z_TYPE_P(val) != IS_LONG)
113
82
      || (opline->opcode == ZEND_SWITCH_STRING && Z_TYPE_P(val) != IS_STRING)) {
114
    /* fallback to next block */
115
0
    return block->successors[block->successors_count - 1];
116
0
  }
117
82
  if (opline->opcode == ZEND_MATCH && Z_TYPE_P(val) != IS_LONG && Z_TYPE_P(val) != IS_STRING) {
118
    /* always jump to the default arm */
119
20
    return block->successors[block->successors_count - 1];
120
20
  }
121
62
  if (Z_TYPE_P(val) == IS_LONG) {
122
36
    zv = zend_hash_index_find(jumptable, Z_LVAL_P(val));
123
36
  } else {
124
26
    ZEND_ASSERT(Z_TYPE_P(val) == IS_STRING);
125
26
    zv = zend_hash_find(jumptable, Z_STR_P(val));
126
26
  }
127
62
  if (!zv) {
128
    /* default */
129
34
    return block->successors[block->successors_count - (opline->opcode == ZEND_MATCH ? 1 : 2)];
130
34
  }
131
28
  return cfg->map[ZEND_OFFSET_TO_OPLINE_NUM(op_array, opline, Z_LVAL_P(zv))];
132
62
}
133
134
static void zend_optimize_block(zend_basic_block *block, zend_op_array *op_array, zend_bitset used_ext, zend_cfg *cfg, zend_op **Tsource, uint32_t *opt_count)
135
507k
{
136
507k
  zend_op *opline, *src;
137
507k
  zend_op *end, *last_op = NULL;
138
139
507k
  if (block->len == 0) {
140
245
    return;
141
245
  }
142
143
507k
  if (op_array->opcodes[block->start].opcode == ZEND_NOP) {
144
    /* remove leading NOPs */
145
5.64k
    strip_leading_nops(op_array, block);
146
5.64k
  }
147
148
507k
  opline = op_array->opcodes + block->start;
149
507k
  end = opline + block->len;
150
3.56M
  while (opline < end) {
151
    /* Constant Propagation: strip X = QM_ASSIGN(const) */
152
3.06M
    if (opline->op1_type == IS_TMP_VAR &&
153
850k
        opline->opcode != ZEND_FREE) {
154
818k
      src = VAR_SOURCE(opline->op1);
155
818k
      if (src &&
156
723k
          src->opcode == ZEND_QM_ASSIGN &&
157
2.63k
          src->op1_type == IS_CONST
158
818k
      ) {
159
1.73k
        znode_op op1 = opline->op1;
160
1.73k
        if (opline->opcode == ZEND_VERIFY_RETURN_TYPE) {
161
2
          COPY_NODE(opline->result, opline->op1);
162
2
          COPY_NODE(opline->op1, src->op1);
163
2
          VAR_SOURCE(op1) = NULL;
164
2
          MAKE_NOP(src);
165
2
          ++(*opt_count);
166
1.73k
        } else {
167
1.73k
          zval c;
168
1.73k
          ZVAL_COPY(&c, &ZEND_OP1_LITERAL(src));
169
1.73k
          if (opline->opcode != ZEND_CASE
170
1.73k
           && opline->opcode != ZEND_CASE_STRICT
171
1.71k
           && opline->opcode != ZEND_FETCH_LIST_R
172
1.68k
           && opline->opcode != ZEND_SWITCH_LONG
173
1.68k
           && opline->opcode != ZEND_SWITCH_STRING
174
1.68k
           && opline->opcode != ZEND_MATCH
175
1.68k
           && opline->opcode != ZEND_MATCH_ERROR
176
1.67k
           && zend_optimizer_update_op1_const(op_array, opline, &c)) {
177
1.61k
            VAR_SOURCE(op1) = NULL;
178
1.61k
            if (opline->opcode != ZEND_JMP_NULL
179
1.60k
             && !zend_bitset_in(used_ext, VAR_NUM(src->result.var))
180
             /* FETCH_W with ZEND_FETCH_GLOBAL_LOCK does not free op1, which will be used again. */
181
1.13k
             && !(opline->opcode == ZEND_FETCH_W && (opline->extended_value & ZEND_FETCH_GLOBAL_LOCK))) {
182
1.12k
              literal_dtor(&ZEND_OP1_LITERAL(src));
183
1.12k
              MAKE_NOP(src);
184
1.12k
            }
185
1.61k
            ++(*opt_count);
186
1.61k
          } else {
187
116
            zval_ptr_dtor_nogc(&c);
188
116
          }
189
1.73k
        }
190
1.73k
      }
191
818k
    }
192
193
    /* Constant Propagation: strip X = QM_ASSIGN(const) */
194
3.06M
    if (opline->op2_type == IS_TMP_VAR) {
195
497k
      src = VAR_SOURCE(opline->op2);
196
497k
      if (src &&
197
461k
          src->opcode == ZEND_QM_ASSIGN &&
198
584
          src->op1_type == IS_CONST) {
199
200
152
        znode_op op2 = opline->op2;
201
152
        zval c;
202
203
152
        ZVAL_COPY(&c, &ZEND_OP1_LITERAL(src));
204
152
        if (zend_optimizer_update_op2_const(op_array, opline, &c)) {
205
142
          VAR_SOURCE(op2) = NULL;
206
142
          if (!zend_bitset_in(used_ext, VAR_NUM(src->result.var))) {
207
142
            literal_dtor(&ZEND_OP1_LITERAL(src));
208
142
            MAKE_NOP(src);
209
142
          }
210
142
          ++(*opt_count);
211
142
        } else {
212
10
          zval_ptr_dtor_nogc(&c);
213
10
        }
214
152
      }
215
497k
    }
216
217
3.06M
    switch (opline->opcode) {
218
159k
      case ZEND_ECHO:
219
159k
        if (opline->op1_type & (IS_TMP_VAR|IS_VAR)) {
220
36.7k
          src = VAR_SOURCE(opline->op1);
221
36.7k
          if (src &&
222
33.8k
              src->opcode == ZEND_CAST &&
223
130
              src->extended_value == IS_STRING) {
224
            /* T = CAST(X, String), ECHO(T) => NOP, ECHO(X) */
225
82
            VAR_SOURCE(opline->op1) = NULL;
226
82
            COPY_NODE(opline->op1, src->op1);
227
82
            MAKE_NOP(src);
228
82
            ++(*opt_count);
229
82
          }
230
122k
        } else if (opline->op1_type == IS_CONST &&
231
120k
                   Z_TYPE(ZEND_OP1_LITERAL(opline)) != IS_DOUBLE) {
232
120k
          if (last_op == opline - 1) {
233
            /* compress consecutive ECHO's.
234
             * Float to string conversion may be affected by current
235
             * locale setting.
236
             */
237
4.95k
            size_t l, old_len;
238
239
4.95k
            if (Z_TYPE(ZEND_OP1_LITERAL(opline)) != IS_STRING) {
240
47
              convert_to_string(&ZEND_OP1_LITERAL(opline));
241
47
            }
242
4.95k
            if (Z_TYPE(ZEND_OP1_LITERAL(last_op)) != IS_STRING) {
243
22
              convert_to_string(&ZEND_OP1_LITERAL(last_op));
244
22
            }
245
4.95k
            old_len = Z_STRLEN(ZEND_OP1_LITERAL(last_op));
246
4.95k
            l = old_len + Z_STRLEN(ZEND_OP1_LITERAL(opline));
247
4.95k
            if (!Z_REFCOUNTED(ZEND_OP1_LITERAL(last_op))) {
248
1.69k
              zend_string *tmp = zend_string_alloc(l, 0);
249
1.69k
              memcpy(ZSTR_VAL(tmp), Z_STRVAL(ZEND_OP1_LITERAL(last_op)), old_len);
250
1.69k
              Z_STR(ZEND_OP1_LITERAL(last_op)) = tmp;
251
3.26k
            } else {
252
3.26k
              Z_STR(ZEND_OP1_LITERAL(last_op)) = zend_string_extend(Z_STR(ZEND_OP1_LITERAL(last_op)), l, 0);
253
3.26k
            }
254
4.95k
            Z_TYPE_INFO(ZEND_OP1_LITERAL(last_op)) = IS_STRING_EX;
255
4.95k
            memcpy(Z_STRVAL(ZEND_OP1_LITERAL(last_op)) + old_len, Z_STRVAL(ZEND_OP1_LITERAL(opline)), Z_STRLEN(ZEND_OP1_LITERAL(opline)));
256
4.95k
            Z_STRVAL(ZEND_OP1_LITERAL(last_op))[l] = '\0';
257
4.95k
            zval_ptr_dtor_nogc(&ZEND_OP1_LITERAL(opline));
258
4.95k
            ZVAL_STR(&ZEND_OP1_LITERAL(opline), zend_new_interned_string(Z_STR(ZEND_OP1_LITERAL(last_op))));
259
4.95k
            ZVAL_NULL(&ZEND_OP1_LITERAL(last_op));
260
4.95k
            MAKE_NOP(last_op);
261
4.95k
            ++(*opt_count);
262
4.95k
          }
263
120k
          last_op = opline;
264
120k
        }
265
159k
        break;
266
267
554
      case ZEND_MATCH_ERROR:
268
554
        if (opline->op1_type & (IS_TMP_VAR|IS_VAR)) {
269
150
          src = VAR_SOURCE(opline->op1);
270
150
          VAR_SOURCE(opline->op1) = NULL;
271
150
        }
272
554
        break;
273
274
32.5k
      case ZEND_FREE:
275
        /* Note: Only remove the source if the source is local to this block.
276
         * If it's not local, then the other blocks successors must also eventually either FREE or consume the temporary,
277
         * hence removing the temporary is not safe in the general case, especially when other consumers are not FREE.
278
         * A FREE may not be removed without also removing the source's result, because otherwise that would cause a memory leak. */
279
32.5k
        if (opline->extended_value == ZEND_FREE_VOID_CAST) {
280
          /* Keep the ZEND_FREE opcode alive. */
281
32.5k
        } else if (opline->op1_type == IS_TMP_VAR) {
282
32.2k
          src = VAR_SOURCE(opline->op1);
283
32.2k
          if (src) {
284
27.3k
            switch (src->opcode) {
285
21
              case ZEND_BOOL:
286
246
              case ZEND_BOOL_NOT:
287
                /* T = BOOL(X), FREE(T) => T = BOOL(X) */
288
                /* The remaining BOOL is removed by a separate optimization */
289
                /* The source is a bool, no source removals take place, so this may be done non-locally. */
290
246
                VAR_SOURCE(opline->op1) = NULL;
291
246
                MAKE_NOP(opline);
292
246
                ++(*opt_count);
293
246
                break;
294
204
              case ZEND_QM_ASSIGN:
295
204
                if (src < op_array->opcodes + block->start) {
296
12
                  break;
297
12
                }
298
192
                src->result_type = IS_UNUSED;
299
192
                VAR_SOURCE(opline->op1) = NULL;
300
192
                MAKE_NOP(opline);
301
192
                ++(*opt_count);
302
192
                if (src->op1_type & (IS_VAR|IS_TMP_VAR)) {
303
82
                  src->opcode = ZEND_FREE;
304
110
                } else if (src->op1_type == IS_CONST) {
305
108
                  MAKE_NOP(src);
306
108
                } else if (src->op1_type == IS_CV) {
307
2
                  src->opcode = ZEND_CHECK_VAR;
308
2
                  SET_UNUSED(src->result);
309
2
                }
310
192
                break;
311
26.9k
              default:
312
26.9k
                if (!zend_op_may_elide_result(src->opcode)) {
313
24.0k
                  break;
314
24.0k
                }
315
2.92k
                if (src < op_array->opcodes + block->start) {
316
8
                  break;
317
8
                }
318
2.91k
                src->result_type = IS_UNUSED;
319
2.91k
                VAR_SOURCE(opline->op1) = NULL;
320
2.91k
                MAKE_NOP(opline);
321
2.91k
                ++(*opt_count);
322
2.91k
                break;
323
27.3k
            }
324
27.3k
          }
325
32.2k
        } else if (opline->op1_type == IS_VAR) {
326
294
          src = VAR_SOURCE(opline->op1);
327
          /* V = OP, FREE(V) => OP. NOP */
328
294
          if (src >= op_array->opcodes + block->start &&
329
8
              src->opcode != ZEND_FETCH_R &&
330
6
              src->opcode != ZEND_FETCH_STATIC_PROP_R &&
331
6
              src->opcode != ZEND_FETCH_DIM_R &&
332
6
              src->opcode != ZEND_FETCH_OBJ_R &&
333
2
              src->opcode != ZEND_NEW &&
334
2
              src->opcode != ZEND_FETCH_THIS) {
335
2
            src->result_type = IS_UNUSED;
336
2
            MAKE_NOP(opline);
337
2
            ++(*opt_count);
338
2
            if (src->opcode == ZEND_QM_ASSIGN) {
339
0
              if (src->op1_type & (IS_VAR|IS_TMP_VAR)) {
340
0
                src->opcode = ZEND_FREE;
341
0
              } else {
342
0
                MAKE_NOP(src);
343
0
              }
344
0
            }
345
2
          }
346
294
        }
347
32.5k
        break;
348
349
#if 0
350
    /* pre-evaluate functions:
351
       constant(x)
352
       function_exists(x)
353
       extension_loaded(x)
354
       BAD: interacts badly with Accelerator
355
    */
356
    if((opline->op1_type & IS_VAR) &&
357
       VAR_SOURCE(opline->op1) && VAR_SOURCE(opline->op1)->opcode == ZEND_DO_CF_FCALL &&
358
       VAR_SOURCE(opline->op1)->extended_value == 1) {
359
      zend_op *fcall = VAR_SOURCE(opline->op1);
360
      zend_op *sv = fcall-1;
361
      if(sv >= block->start_opline && sv->opcode == ZEND_SEND_VAL &&
362
         sv->op1_type == IS_CONST && Z_TYPE(OPLINE_OP1_LITERAL(sv)) == IS_STRING &&
363
         Z_LVAL(OPLINE_OP2_LITERAL(sv)) == 1
364
         ) {
365
        zval *arg = &OPLINE_OP1_LITERAL(sv);
366
        char *fname = FUNCTION_CACHE->funcs[Z_LVAL(ZEND_OP1_LITERAL(fcall))].function_name;
367
        size_t flen = FUNCTION_CACHE->funcs[Z_LVAL(ZEND_OP1_LITERAL(fcall))].name_len;
368
        if((flen == sizeof("function_exists")-1 && zend_binary_strcasecmp(fname, flen, "function_exists", sizeof("function_exists")-1) == 0) ||
369
              (flen == sizeof("is_callable")-1 && zend_binary_strcasecmp(fname, flen, "is_callable", sizeof("is_callable")-1) == 0)
370
              ) {
371
          zend_function *function;
372
          if((function = zend_hash_find_ptr(EG(function_table), Z_STR_P(arg))) != NULL) {
373
            literal_dtor(arg);
374
            MAKE_NOP(sv);
375
            MAKE_NOP(fcall);
376
            LITERAL_BOOL(opline->op1, 1);
377
            opline->op1_type = IS_CONST;
378
          }
379
        } else if(flen == sizeof("constant")-1 && zend_binary_strcasecmp(fname, flen, "constant", sizeof("constant")-1) == 0) {
380
          zval c;
381
          if (zend_optimizer_get_persistent_constant(Z_STR_P(arg), &c, true ELS_CC)) {
382
            literal_dtor(arg);
383
            MAKE_NOP(sv);
384
            MAKE_NOP(fcall);
385
            ZEND_OP1_LITERAL(opline) = zend_optimizer_add_literal(op_array, &c);
386
            /* no copy ctor - get already copied it */
387
            opline->op1_type = IS_CONST;
388
          }
389
        } else if(flen == sizeof("extension_loaded")-1 && zend_binary_strcasecmp(fname, flen, "extension_loaded", sizeof("extension_loaded")-1) == 0) {
390
          if(zend_hash_exists(&module_registry, Z_STR_P(arg))) {
391
            literal_dtor(arg);
392
            MAKE_NOP(sv);
393
            MAKE_NOP(fcall);
394
            LITERAL_BOOL(opline->op1, 1);
395
            opline->op1_type = IS_CONST;
396
          }
397
        }
398
      }
399
    }
400
#endif
401
402
32.5k
      case ZEND_FETCH_LIST_R:
403
1.85k
      case ZEND_FETCH_LIST_W:
404
1.85k
        if (opline->op1_type & (IS_TMP_VAR|IS_VAR)) {
405
          /* LIST variable will be deleted later by FREE */
406
1.57k
          Tsource[VAR_NUM(opline->op1.var)] = NULL;
407
1.57k
        }
408
1.85k
        break;
409
410
14
      case ZEND_SWITCH_LONG:
411
91
      case ZEND_SWITCH_STRING:
412
433
      case ZEND_MATCH:
413
433
        if (opline->op1_type & (IS_TMP_VAR|IS_VAR)) {
414
          /* SWITCH variable will be deleted later by FREE, so we can't optimize it */
415
99
          Tsource[VAR_NUM(opline->op1.var)] = NULL;
416
99
          break;
417
99
        }
418
334
        if (opline->op1_type == IS_CONST) {
419
82
          uint32_t target = get_const_switch_target(cfg, op_array, block, opline, &ZEND_OP1_LITERAL(opline));
420
82
          literal_dtor(&ZEND_OP1_LITERAL(opline));
421
82
          literal_dtor(&ZEND_OP2_LITERAL(opline));
422
82
          opline->opcode = ZEND_JMP;
423
82
          opline->op1_type = IS_UNUSED;
424
82
          opline->op2_type = IS_UNUSED;
425
82
          block->successors_count = 1;
426
82
          block->successors[0] = target;
427
82
        }
428
334
        break;
429
430
0
      case ZEND_EXT_STMT:
431
0
        if (opline->op1_type & (IS_TMP_VAR|IS_VAR)) {
432
          /* Variable will be deleted later by FREE, so we can't optimize it */
433
0
          Tsource[VAR_NUM(opline->op1.var)] = NULL;
434
0
          break;
435
0
        }
436
0
        break;
437
438
222
      case ZEND_CASE:
439
526
      case ZEND_CASE_STRICT:
440
3.61k
      case ZEND_COPY_TMP:
441
3.61k
        if (opline->op1_type & (IS_TMP_VAR|IS_VAR)) {
442
          /* Variable will be deleted later by FREE, so we can't optimize it */
443
3.61k
          Tsource[VAR_NUM(opline->op1.var)] = NULL;
444
3.61k
          break;
445
3.61k
        }
446
0
        if (opline->op1_type == IS_CONST &&
447
0
            opline->op2_type == IS_CONST) {
448
0
          goto optimize_constant_binary_op;
449
0
        }
450
            /*
451
             * CASE(TRUE, X)       => BOOL(X)
452
             * CASE(FALSE, X)      => BOOL_NOT(X)
453
             */
454
0
        if (opline->op1_type == IS_CONST &&
455
0
          (Z_TYPE(ZEND_OP1_LITERAL(opline)) == IS_FALSE ||
456
0
           Z_TYPE(ZEND_OP1_LITERAL(opline)) == IS_TRUE)) {
457
          /* Optimization of comparison with "null" is not safe,
458
           * because ("0" == null) is not equal to !("0")
459
           */
460
0
          opline->opcode =
461
0
            ((opline->opcode != ZEND_IS_NOT_EQUAL) == ((Z_TYPE(ZEND_OP1_LITERAL(opline))) == IS_TRUE)) ?
462
0
            ZEND_BOOL : ZEND_BOOL_NOT;
463
0
          COPY_NODE(opline->op1, opline->op2);
464
0
          SET_UNUSED(opline->op2);
465
0
          ++(*opt_count);
466
0
          goto optimize_bool;
467
0
        } else if (opline->op2_type == IS_CONST &&
468
0
                   (Z_TYPE(ZEND_OP2_LITERAL(opline)) == IS_FALSE ||
469
0
                    Z_TYPE(ZEND_OP2_LITERAL(opline)) == IS_TRUE)) {
470
          /* Optimization of comparison with "null" is not safe,
471
           * because ("0" == null) is not equal to !("0")
472
           */
473
0
          opline->opcode =
474
0
            ((opline->opcode != ZEND_IS_NOT_EQUAL) == ((Z_TYPE(ZEND_OP2_LITERAL(opline))) == IS_TRUE)) ?
475
0
            ZEND_BOOL : ZEND_BOOL_NOT;
476
0
          SET_UNUSED(opline->op2);
477
0
          ++(*opt_count);
478
0
          goto optimize_bool;
479
0
        }
480
0
        break;
481
482
23.9k
      case ZEND_IS_EQUAL:
483
27.2k
      case ZEND_IS_NOT_EQUAL:
484
27.2k
        if (opline->op1_type == IS_CONST &&
485
0
          opline->op2_type == IS_CONST) {
486
0
          goto optimize_constant_binary_op;
487
0
        }
488
        /* IS_EQ(TRUE, X)      => BOOL(X)
489
         * IS_EQ(FALSE, X)     => BOOL_NOT(X)
490
         * IS_NOT_EQ(TRUE, X)  => BOOL_NOT(X)
491
         * IS_NOT_EQ(FALSE, X) => BOOL(X)
492
         * Those optimizations are not safe if the other operand ends up being NAN
493
         * as BOOL/BOOL_NOT will warn, while IS_EQUAL/IS_NOT_EQUAL do not.
494
         */
495
27.2k
        break;
496
27.2k
      case ZEND_IS_IDENTICAL:
497
2.52k
        if (opline->op1_type == IS_CONST &&
498
0
          opline->op2_type == IS_CONST) {
499
0
          goto optimize_constant_binary_op;
500
0
        }
501
502
2.52k
        if (opline->op1_type == IS_CONST &&
503
0
          (Z_TYPE(ZEND_OP1_LITERAL(opline)) <= IS_TRUE && Z_TYPE(ZEND_OP1_LITERAL(opline)) >= IS_NULL)) {
504
          /* IS_IDENTICAL(TRUE, T)  => TYPE_CHECK(T, TRUE)
505
           * IS_IDENTICAL(FALSE, T) => TYPE_CHECK(T, FALSE)
506
           * IS_IDENTICAL(NULL, T)  => TYPE_CHECK(T, NULL)
507
           */
508
0
          opline->opcode = ZEND_TYPE_CHECK;
509
0
          opline->extended_value = (1 << Z_TYPE(ZEND_OP1_LITERAL(opline)));
510
0
          COPY_NODE(opline->op1, opline->op2);
511
0
          SET_UNUSED(opline->op2);
512
0
          ++(*opt_count);
513
0
          goto optimize_type_check;
514
2.52k
        } else if (opline->op2_type == IS_CONST &&
515
1.72k
          (Z_TYPE(ZEND_OP2_LITERAL(opline)) <= IS_TRUE && Z_TYPE(ZEND_OP2_LITERAL(opline)) >= IS_NULL)) {
516
          /* IS_IDENTICAL(T, TRUE)  => TYPE_CHECK(T, TRUE)
517
           * IS_IDENTICAL(T, FALSE) => TYPE_CHECK(T, FALSE)
518
           * IS_IDENTICAL(T, NULL)  => TYPE_CHECK(T, NULL)
519
           */
520
130
          opline->opcode = ZEND_TYPE_CHECK;
521
130
          opline->extended_value = (1 << Z_TYPE(ZEND_OP2_LITERAL(opline)));
522
130
          SET_UNUSED(opline->op2);
523
130
          ++(*opt_count);
524
130
          goto optimize_type_check;
525
130
        }
526
2.39k
        break;
527
2.39k
      case ZEND_TYPE_CHECK:
528
1.42k
optimize_type_check:
529
1.42k
        if (opline->extended_value == (1 << IS_TRUE) || opline->extended_value == (1 << IS_FALSE)) {
530
199
          if (opline->op1_type == IS_TMP_VAR &&
531
167
            !zend_bitset_in(used_ext, VAR_NUM(opline->op1.var))) {
532
167
            src = VAR_SOURCE(opline->op1);
533
534
167
            if (src) {
535
167
              switch (src->opcode) {
536
0
                case ZEND_BOOL:
537
0
                case ZEND_BOOL_NOT:
538
                  /* T = BOOL(X)     + TYPE_CHECK(T, TRUE)  -> BOOL(X), NOP
539
                   * T = BOOL(X)     + TYPE_CHECK(T, FALSE) -> BOOL_NOT(X), NOP
540
                   * T = BOOL_NOT(X) + TYPE_CHECK(T, TRUE)  -> BOOL_NOT(X), NOP
541
                   * T = BOOL_NOT(X) + TYPE_CHECK(T, FALSE) -> BOOL(X), NOP
542
                   */
543
0
                  src->opcode =
544
0
                    ((src->opcode == ZEND_BOOL) == (opline->extended_value == (1 << IS_TRUE))) ?
545
0
                    ZEND_BOOL : ZEND_BOOL_NOT;
546
0
                  COPY_NODE(src->result, opline->result);
547
0
                  SET_VAR_SOURCE(src);
548
0
                  MAKE_NOP(opline);
549
0
                  ++(*opt_count);
550
0
                  break;
551
167
              }
552
167
            }
553
167
          }
554
199
        }
555
1.42k
        break;
556
  
557
4.83k
      case ZEND_BOOL:
558
12.6k
      case ZEND_BOOL_NOT:
559
15.9k
      optimize_bool:
560
15.9k
        if (opline->op1_type == IS_CONST) {
561
1.47k
          goto optimize_const_unary_op;
562
1.47k
        }
563
14.5k
        if (opline->op1_type == IS_TMP_VAR &&
564
12.5k
            !zend_bitset_in(used_ext, VAR_NUM(opline->op1.var))) {
565
12.0k
          src = VAR_SOURCE(opline->op1);
566
12.0k
          if (src) {
567
12.0k
            switch (src->opcode) {
568
1.85k
              case ZEND_BOOL_NOT:
569
                /* T = BOOL_NOT(X) + BOOL(T) -> NOP, BOOL_NOT(X) */
570
1.85k
                VAR_SOURCE(opline->op1) = NULL;
571
1.85k
                COPY_NODE(opline->op1, src->op1);
572
1.85k
                opline->opcode = (opline->opcode == ZEND_BOOL) ? ZEND_BOOL_NOT : ZEND_BOOL;
573
1.85k
                MAKE_NOP(src);
574
1.85k
                ++(*opt_count);
575
1.85k
                goto optimize_bool;
576
1.52k
              case ZEND_BOOL:
577
                /* T = BOOL(X) + BOOL(T) -> NOP, BOOL(X) */
578
1.52k
                VAR_SOURCE(opline->op1) = NULL;
579
1.52k
                COPY_NODE(opline->op1, src->op1);
580
1.52k
                MAKE_NOP(src);
581
1.52k
                ++(*opt_count);
582
1.52k
                goto optimize_bool;
583
212
              case ZEND_IS_EQUAL:
584
212
                if (opline->opcode == ZEND_BOOL_NOT) {
585
0
                  src->opcode = ZEND_IS_NOT_EQUAL;
586
0
                }
587
212
                COPY_NODE(src->result, opline->result);
588
212
                SET_VAR_SOURCE(src);
589
212
                MAKE_NOP(opline);
590
212
                ++(*opt_count);
591
212
                break;
592
175
              case ZEND_IS_NOT_EQUAL:
593
175
                if (opline->opcode == ZEND_BOOL_NOT) {
594
0
                  src->opcode = ZEND_IS_EQUAL;
595
0
                }
596
175
                COPY_NODE(src->result, opline->result);
597
175
                SET_VAR_SOURCE(src);
598
175
                MAKE_NOP(opline);
599
175
                ++(*opt_count);
600
175
                break;
601
170
              case ZEND_IS_IDENTICAL:
602
170
                if (opline->opcode == ZEND_BOOL_NOT) {
603
0
                  src->opcode = ZEND_IS_NOT_IDENTICAL;
604
0
                }
605
170
                COPY_NODE(src->result, opline->result);
606
170
                SET_VAR_SOURCE(src);
607
170
                MAKE_NOP(opline);
608
170
                ++(*opt_count);
609
170
                break;
610
93
              case ZEND_IS_NOT_IDENTICAL:
611
93
                if (opline->opcode == ZEND_BOOL_NOT) {
612
0
                  src->opcode = ZEND_IS_IDENTICAL;
613
0
                }
614
93
                COPY_NODE(src->result, opline->result);
615
93
                SET_VAR_SOURCE(src);
616
93
                MAKE_NOP(opline);
617
93
                ++(*opt_count);
618
93
                break;
619
125
              case ZEND_IS_SMALLER:
620
125
                if (opline->opcode == ZEND_BOOL_NOT) {
621
2
                  uint8_t tmp_type;
622
2
                  uint32_t tmp;
623
624
2
                  src->opcode = ZEND_IS_SMALLER_OR_EQUAL;
625
2
                  tmp_type = src->op1_type;
626
2
                  src->op1_type = src->op2_type;
627
2
                  src->op2_type = tmp_type;
628
2
                  tmp = src->op1.num;
629
2
                  src->op1.num = src->op2.num;
630
2
                  src->op2.num = tmp;
631
2
                }
632
125
                COPY_NODE(src->result, opline->result);
633
125
                SET_VAR_SOURCE(src);
634
125
                MAKE_NOP(opline);
635
125
                ++(*opt_count);
636
125
                break;
637
356
              case ZEND_IS_SMALLER_OR_EQUAL:
638
356
                if (opline->opcode == ZEND_BOOL_NOT) {
639
2
                  uint8_t tmp_type;
640
2
                  uint32_t tmp;
641
642
2
                  src->opcode = ZEND_IS_SMALLER;
643
2
                  tmp_type = src->op1_type;
644
2
                  src->op1_type = src->op2_type;
645
2
                  src->op2_type = tmp_type;
646
2
                  tmp = src->op1.num;
647
2
                  src->op1.num = src->op2.num;
648
2
                  src->op2.num = tmp;
649
2
                }
650
356
                COPY_NODE(src->result, opline->result);
651
356
                SET_VAR_SOURCE(src);
652
356
                MAKE_NOP(opline);
653
356
                ++(*opt_count);
654
356
                break;
655
10
              case ZEND_ISSET_ISEMPTY_CV:
656
20
              case ZEND_ISSET_ISEMPTY_VAR:
657
307
              case ZEND_ISSET_ISEMPTY_DIM_OBJ:
658
361
              case ZEND_ISSET_ISEMPTY_PROP_OBJ:
659
379
              case ZEND_ISSET_ISEMPTY_STATIC_PROP:
660
424
              case ZEND_INSTANCEOF:
661
573
              case ZEND_TYPE_CHECK:
662
585
              case ZEND_DEFINED:
663
585
              case ZEND_IN_ARRAY:
664
627
              case ZEND_ARRAY_KEY_EXISTS:
665
627
                if (opline->opcode == ZEND_BOOL_NOT) {
666
449
                  break;
667
449
                }
668
178
                COPY_NODE(src->result, opline->result);
669
178
                SET_VAR_SOURCE(src);
670
178
                MAKE_NOP(opline);
671
178
                ++(*opt_count);
672
178
                break;
673
12.0k
            }
674
12.0k
          }
675
12.0k
        }
676
11.1k
        break;
677
678
29.9k
      case ZEND_JMPZ:
679
42.2k
      case ZEND_JMPNZ:
680
43.7k
          while (1) {
681
43.7k
          if (opline->op1_type == IS_CONST) {
682
519
            ++(*opt_count);
683
519
            block->successors_count = 1;
684
519
            if (zend_is_true(&ZEND_OP1_LITERAL(opline)) ==
685
519
                (opline->opcode == ZEND_JMPZ)) {
686
687
214
              MAKE_NOP(opline);
688
214
              block->successors[0] = block->successors[1];
689
214
              block->len--;
690
214
              cfg->blocks[block->successors[0]].flags |= ZEND_BB_FOLLOW;
691
214
              break;
692
305
            } else {
693
305
              zend_basic_block *next = cfg->blocks + block->successors[1];
694
695
305
              next->flags &= ~ZEND_BB_FOLLOW;
696
305
              if (!(next->flags & (ZEND_BB_TARGET|ZEND_BB_PROTECTED))) {
697
257
                next->flags &= ~ZEND_BB_REACHABLE;
698
257
              }
699
305
              opline->opcode = ZEND_JMP;
700
305
              COPY_NODE(opline->op1, opline->op2);
701
305
              break;
702
305
            }
703
43.2k
          } else if (opline->op1_type == IS_TMP_VAR &&
704
41.2k
                     !zend_bitset_in(used_ext, VAR_NUM(opline->op1.var))) {
705
40.7k
            src = VAR_SOURCE(opline->op1);
706
40.7k
            if (src) {
707
40.7k
              if (src->opcode == ZEND_BOOL_NOT) {
708
912
                VAR_SOURCE(opline->op1) = NULL;
709
912
                COPY_NODE(opline->op1, src->op1);
710
                /* T = BOOL_NOT(X) + JMPZ(T) -> NOP, JMPNZ(X) */
711
912
                opline->opcode = INV_COND(opline->opcode);
712
912
                MAKE_NOP(src);
713
912
                ++(*opt_count);
714
912
                continue;
715
39.8k
              } else if (src->opcode == ZEND_BOOL ||
716
39.2k
                         src->opcode == ZEND_QM_ASSIGN) {
717
609
                VAR_SOURCE(opline->op1) = NULL;
718
609
                COPY_NODE(opline->op1, src->op1);
719
609
                MAKE_NOP(src);
720
609
                ++(*opt_count);
721
609
                continue;
722
609
              }
723
40.7k
            }
724
40.7k
          }
725
41.6k
          break;
726
43.7k
        }
727
42.2k
        break;
728
729
1.63k
      case ZEND_JMPZ_EX:
730
3.29k
      case ZEND_JMPNZ_EX:
731
3.63k
        while (1) {
732
3.63k
          if (opline->op1_type == IS_CONST) {
733
679
            bool is_jmpz_ex = opline->opcode == ZEND_JMPZ_EX;
734
679
            if (zend_is_true(&ZEND_OP1_LITERAL(opline)) == is_jmpz_ex) {
735
736
191
              ++(*opt_count);
737
191
              opline->opcode = ZEND_QM_ASSIGN;
738
191
              zval_ptr_dtor_nogc(&ZEND_OP1_LITERAL(opline));
739
191
              ZVAL_BOOL(&ZEND_OP1_LITERAL(opline), is_jmpz_ex);
740
191
              opline->op2.num = 0;
741
191
              block->successors_count = 1;
742
191
              block->successors[0] = block->successors[1];
743
191
              cfg->blocks[block->successors[0]].flags |= ZEND_BB_FOLLOW;
744
191
              break;
745
191
            }
746
2.95k
          } else if (opline->op1_type == IS_TMP_VAR &&
747
2.89k
                     (!zend_bitset_in(used_ext, VAR_NUM(opline->op1.var)) ||
748
2.55k
                      opline->result.var == opline->op1.var)) {
749
2.55k
            src = VAR_SOURCE(opline->op1);
750
2.55k
            if (src) {
751
2.16k
              if (src->opcode == ZEND_BOOL ||
752
1.83k
                  src->opcode == ZEND_QM_ASSIGN) {
753
339
                VAR_SOURCE(opline->op1) = NULL;
754
339
                COPY_NODE(opline->op1, src->op1);
755
339
                MAKE_NOP(src);
756
339
                ++(*opt_count);
757
339
                continue;
758
339
              }
759
2.16k
            }
760
2.55k
          }
761
3.10k
          break;
762
3.63k
        }
763
3.29k
        break;
764
765
62.6k
      case ZEND_CONCAT:
766
93.8k
      case ZEND_FAST_CONCAT:
767
93.8k
        if (opline->op1_type == IS_CONST &&
768
25.2k
            opline->op2_type == IS_CONST) {
769
12
          goto optimize_constant_binary_op;
770
12
        }
771
772
93.8k
        if (opline->op2_type == IS_CONST &&
773
40.6k
            opline->op1_type == IS_TMP_VAR) {
774
775
31.6k
          src = VAR_SOURCE(opline->op1);
776
31.6k
            if (src &&
777
31.4k
              (src->opcode == ZEND_CONCAT ||
778
27.4k
               src->opcode == ZEND_FAST_CONCAT) &&
779
25.4k
              src->op2_type == IS_CONST) {
780
            /* compress consecutive CONCATs */
781
1.08k
            size_t l, old_len;
782
783
1.08k
            if (Z_TYPE(ZEND_OP2_LITERAL(opline)) != IS_STRING) {
784
0
              convert_to_string(&ZEND_OP2_LITERAL(opline));
785
0
            }
786
1.08k
            if (Z_TYPE(ZEND_OP2_LITERAL(src)) != IS_STRING) {
787
0
              convert_to_string(&ZEND_OP2_LITERAL(src));
788
0
            }
789
790
1.08k
            VAR_SOURCE(opline->op1) = NULL;
791
1.08k
            COPY_NODE(opline->op1, src->op1);
792
1.08k
            old_len = Z_STRLEN(ZEND_OP2_LITERAL(src));
793
1.08k
            l = old_len + Z_STRLEN(ZEND_OP2_LITERAL(opline));
794
1.08k
            if (!Z_REFCOUNTED(ZEND_OP2_LITERAL(src))) {
795
400
              zend_string *tmp = zend_string_alloc(l, 0);
796
400
              memcpy(ZSTR_VAL(tmp), Z_STRVAL(ZEND_OP2_LITERAL(src)), old_len);
797
400
              Z_STR(ZEND_OP2_LITERAL(src)) = tmp;
798
683
            } else {
799
683
              Z_STR(ZEND_OP2_LITERAL(src)) = zend_string_extend(Z_STR(ZEND_OP2_LITERAL(src)), l, 0);
800
683
            }
801
1.08k
            Z_TYPE_INFO(ZEND_OP2_LITERAL(src)) = IS_STRING_EX;
802
1.08k
            memcpy(Z_STRVAL(ZEND_OP2_LITERAL(src)) + old_len, Z_STRVAL(ZEND_OP2_LITERAL(opline)), Z_STRLEN(ZEND_OP2_LITERAL(opline)));
803
1.08k
            Z_STRVAL(ZEND_OP2_LITERAL(src))[l] = '\0';
804
1.08k
            zval_ptr_dtor_str(&ZEND_OP2_LITERAL(opline));
805
1.08k
            ZVAL_STR(&ZEND_OP2_LITERAL(opline), zend_new_interned_string(Z_STR(ZEND_OP2_LITERAL(src))));
806
1.08k
            ZVAL_NULL(&ZEND_OP2_LITERAL(src));
807
1.08k
            MAKE_NOP(src);
808
1.08k
            ++(*opt_count);
809
1.08k
          }
810
31.6k
        }
811
812
93.8k
        if (opline->op1_type & (IS_TMP_VAR|IS_VAR)) {
813
37.9k
          src = VAR_SOURCE(opline->op1);
814
37.9k
          if (src &&
815
37.6k
              src->opcode == ZEND_CAST &&
816
120
              src->extended_value == IS_STRING &&
817
12
              src->op1_type != IS_CONST) {
818
            /* convert T1 = CAST(STRING, X), T2 = CONCAT(T1, Y) to T2 = CONCAT(X,Y) */
819
8
            VAR_SOURCE(opline->op1) = NULL;
820
8
            COPY_NODE(opline->op1, src->op1);
821
8
            MAKE_NOP(src);
822
8
            ++(*opt_count);
823
8
          }
824
37.9k
              }
825
93.8k
        if (opline->op2_type & (IS_TMP_VAR|IS_VAR)) {
826
50.2k
          src = VAR_SOURCE(opline->op2);
827
50.2k
          if (src &&
828
50.1k
              src->opcode == ZEND_CAST &&
829
170
              src->extended_value == IS_STRING &&
830
74
              src->op1_type != IS_CONST) {
831
            /* convert T1 = CAST(STRING, X), T2 = CONCAT(Y, T1) to T2 = CONCAT(Y,X) */
832
52
            VAR_SOURCE(opline->op2) = NULL;
833
52
            COPY_NODE(opline->op2, src->op1);
834
52
            MAKE_NOP(src);
835
52
            ++(*opt_count);
836
52
          }
837
50.2k
        }
838
93.8k
        if (opline->op1_type == IS_CONST &&
839
25.2k
            Z_TYPE(ZEND_OP1_LITERAL(opline)) == IS_STRING &&
840
25.2k
            Z_STRLEN(ZEND_OP1_LITERAL(opline)) == 0) {
841
          /* convert CONCAT('', X) => CAST(STRING, X) */
842
12
          literal_dtor(&ZEND_OP1_LITERAL(opline));
843
12
          opline->opcode = ZEND_CAST;
844
12
          opline->extended_value = IS_STRING;
845
12
          COPY_NODE(opline->op1, opline->op2);
846
12
          opline->op2_type = IS_UNUSED;
847
12
          opline->op2.var = 0;
848
12
          ++(*opt_count);
849
93.7k
        } else if (opline->op2_type == IS_CONST &&
850
40.6k
                 Z_TYPE(ZEND_OP2_LITERAL(opline)) == IS_STRING &&
851
40.6k
                 Z_STRLEN(ZEND_OP2_LITERAL(opline)) == 0) {
852
          /* convert CONCAT(X, '') => CAST(STRING, X) */
853
68
          literal_dtor(&ZEND_OP2_LITERAL(opline));
854
68
          opline->opcode = ZEND_CAST;
855
68
          opline->extended_value = IS_STRING;
856
68
          opline->op2_type = IS_UNUSED;
857
68
          opline->op2.var = 0;
858
68
          ++(*opt_count);
859
93.7k
        } else if (opline->opcode == ZEND_CONCAT &&
860
62.6k
                   (opline->op1_type == IS_CONST ||
861
49.0k
                    (opline->op1_type == IS_TMP_VAR &&
862
27.0k
                     VAR_SOURCE(opline->op1) &&
863
26.7k
                     (VAR_SOURCE(opline->op1)->opcode == ZEND_FAST_CONCAT ||
864
14.7k
                      VAR_SOURCE(opline->op1)->opcode == ZEND_ROPE_END ||
865
14.4k
                      VAR_SOURCE(opline->op1)->opcode == ZEND_FETCH_CONSTANT ||
866
13.1k
                      VAR_SOURCE(opline->op1)->opcode == ZEND_FETCH_CLASS_CONSTANT))) &&
867
27.1k
                   (opline->op2_type == IS_CONST ||
868
15.8k
                    (opline->op2_type == IS_TMP_VAR &&
869
15.4k
                     VAR_SOURCE(opline->op2) &&
870
15.4k
                     (VAR_SOURCE(opline->op2)->opcode == ZEND_FAST_CONCAT ||
871
15.1k
                      VAR_SOURCE(opline->op2)->opcode == ZEND_ROPE_END ||
872
4.54k
                      VAR_SOURCE(opline->op2)->opcode == ZEND_FETCH_CONSTANT ||
873
23.6k
                      VAR_SOURCE(opline->op2)->opcode == ZEND_FETCH_CLASS_CONSTANT)))) {
874
23.6k
          opline->opcode = ZEND_FAST_CONCAT;
875
23.6k
          ++(*opt_count);
876
23.6k
        }
877
93.8k
        break;
878
879
9.11k
      case ZEND_ADD:
880
16.3k
      case ZEND_SUB:
881
25.2k
      case ZEND_MUL:
882
30.0k
      case ZEND_DIV:
883
33.6k
      case ZEND_MOD:
884
36.0k
      case ZEND_SL:
885
37.3k
      case ZEND_SR:
886
47.4k
      case ZEND_IS_SMALLER:
887
51.1k
      case ZEND_IS_SMALLER_OR_EQUAL:
888
51.9k
      case ZEND_IS_NOT_IDENTICAL:
889
53.7k
      case ZEND_BOOL_XOR:
890
55.4k
      case ZEND_BW_OR:
891
68.7k
      case ZEND_BW_AND:
892
79.8k
      case ZEND_BW_XOR:
893
79.8k
        if (opline->op1_type == IS_CONST &&
894
14.5k
            opline->op2_type == IS_CONST) {
895
          /* evaluate constant expressions */
896
10.1k
          zval result;
897
898
10.1k
optimize_constant_binary_op:
899
10.1k
          if (zend_optimizer_eval_binary_op(&result, opline->opcode, &ZEND_OP1_LITERAL(opline), &ZEND_OP2_LITERAL(opline)) == SUCCESS) {
900
46
            literal_dtor(&ZEND_OP1_LITERAL(opline));
901
46
            literal_dtor(&ZEND_OP2_LITERAL(opline));
902
46
            opline->opcode = ZEND_QM_ASSIGN;
903
46
            SET_UNUSED(opline->op2);
904
46
            zend_optimizer_update_op1_const(op_array, opline, &result);
905
46
            ++(*opt_count);
906
46
          }
907
10.1k
        }
908
79.8k
        break;
909
910
79.8k
      case ZEND_BW_NOT:
911
20.1k
        if (opline->op1_type == IS_CONST) {
912
          /* evaluate constant unary ops */
913
104
          zval result;
914
915
1.58k
optimize_const_unary_op:
916
1.58k
          if (zend_optimizer_eval_unary_op(&result, opline->opcode, &ZEND_OP1_LITERAL(opline)) == SUCCESS) {
917
1.45k
            literal_dtor(&ZEND_OP1_LITERAL(opline));
918
1.45k
            opline->opcode = ZEND_QM_ASSIGN;
919
1.45k
            zend_optimizer_update_op1_const(op_array, opline, &result);
920
1.45k
            ++(*opt_count);
921
1.45k
          }
922
1.58k
        }
923
21.6k
        break;
924
925
21.6k
      case ZEND_CAST:
926
3.23k
        if (opline->op1_type == IS_CONST) {
927
          /* cast of constant operand */
928
369
          zval result;
929
930
369
          if (zend_optimizer_eval_cast(&result, opline->extended_value, &ZEND_OP1_LITERAL(opline)) == SUCCESS) {
931
4
            literal_dtor(&ZEND_OP1_LITERAL(opline));
932
4
            opline->opcode = ZEND_QM_ASSIGN;
933
4
            opline->extended_value = 0;
934
4
            zend_optimizer_update_op1_const(op_array, opline, &result);
935
4
            ++(*opt_count);
936
4
          }
937
369
        }
938
3.23k
        break;
939
940
2.75k
      case ZEND_STRLEN:
941
2.75k
        if (opline->op1_type == IS_CONST) {
942
34
          zval result;
943
944
34
          if (zend_optimizer_eval_strlen(&result, &ZEND_OP1_LITERAL(opline)) == SUCCESS) {
945
0
            literal_dtor(&ZEND_OP1_LITERAL(opline));
946
0
            opline->opcode = ZEND_QM_ASSIGN;
947
0
            zend_optimizer_update_op1_const(op_array, opline, &result);
948
0
            ++(*opt_count);
949
0
          }
950
34
        }
951
2.75k
        break;
952
953
114k
      case ZEND_RETURN:
954
114k
        if (opline->op1_type == IS_TMP_VAR) {
955
6.65k
          src = VAR_SOURCE(opline->op1);
956
6.65k
          if (src && src->opcode == ZEND_QM_ASSIGN) {
957
26
            zend_op *op = src + 1;
958
26
            bool optimize = true;
959
960
26
            while (op < opline) {
961
26
              if ((op->op1_type == opline->op1_type
962
8
                && op->op1.var == opline->op1.var)
963
18
               || (op->op2_type == opline->op1_type
964
26
                && op->op2.var == opline->op1.var)) {
965
26
                optimize = false;
966
26
                break;
967
26
              }
968
0
              op++;
969
0
            }
970
971
26
            if (optimize) {
972
              /* T = QM_ASSIGN(X), RETURN(T) to NOP, RETURN(X) */
973
0
              VAR_SOURCE(opline->op1) = NULL;
974
0
              COPY_NODE(opline->op1, src->op1);
975
0
              MAKE_NOP(src);
976
0
              ++(*opt_count);
977
0
            }
978
26
          }
979
6.65k
        }
980
114k
        break;
981
982
16.7k
      case ZEND_QM_ASSIGN:
983
16.7k
        if (opline->op1_type == opline->result_type &&
984
4.75k
            opline->op1.var == opline->result.var) {
985
          /* strip T = QM_ASSIGN(T) */
986
0
          MAKE_NOP(opline);
987
0
          ++(*opt_count);
988
16.7k
        } else if (opline->op1_type == IS_TMP_VAR &&
989
4.75k
                   opline->result_type == IS_TMP_VAR &&
990
4.75k
                   !zend_bitset_in(used_ext, VAR_NUM(opline->op1.var))) {
991
          /* T1 = ..., T2 = QM_ASSIGN(T1) to T2 = ..., NOP */
992
2.95k
          src = VAR_SOURCE(opline->op1);
993
2.95k
          if (src &&
994
2.95k
            src->opcode != ZEND_COPY_TMP &&
995
            /* See gh20628_borked_live_range_calc.phpt. */
996
2.95k
            src->opcode != ZEND_NEW &&
997
2.91k
            src->opcode != ZEND_ADD_ARRAY_ELEMENT &&
998
2.91k
            src->opcode != ZEND_ADD_ARRAY_UNPACK &&
999
2.91k
            (src->opcode != ZEND_DECLARE_LAMBDA_FUNCTION ||
1000
2.91k
             src == opline -1)) {
1001
2.91k
            src->result.var = opline->result.var;
1002
2.91k
            VAR_SOURCE(opline->op1) = NULL;
1003
2.91k
            VAR_SOURCE(opline->result) = src;
1004
2.91k
            MAKE_NOP(opline);
1005
2.91k
            ++(*opt_count);
1006
2.91k
          }
1007
2.95k
        }
1008
16.7k
        break;
1009
3.06M
    }
1010
1011
    /* get variable source */
1012
3.06M
    if (opline->result_type & (IS_VAR|IS_TMP_VAR)) {
1013
1.42M
      SET_VAR_SOURCE(opline);
1014
1.42M
    }
1015
3.06M
    opline++;
1016
3.06M
  }
1017
507k
}
1018
1019
/* Rebuild plain (optimized) op_array from CFG */
1020
static void assemble_code_blocks(const zend_cfg *cfg, zend_op_array *op_array, zend_optimizer_ctx *ctx)
1021
89.0k
{
1022
89.0k
  zend_basic_block *blocks = cfg->blocks;
1023
89.0k
  const zend_basic_block *end = blocks + cfg->blocks_count;
1024
89.0k
  zend_basic_block *b;
1025
89.0k
  zend_op *new_opcodes;
1026
89.0k
  zend_op *opline;
1027
89.0k
  uint32_t len = 0;
1028
1029
471k
  for (b = blocks; b < end; b++) {
1030
382k
    if (b->len == 0) {
1031
28.0k
      continue;
1032
28.0k
    }
1033
354k
    if (b->flags & (ZEND_BB_REACHABLE|ZEND_BB_UNREACHABLE_FREE)) {
1034
337k
      opline = op_array->opcodes + b->start + b->len - 1;
1035
337k
      if (opline->opcode == ZEND_JMP) {
1036
52.0k
        const zend_basic_block *next = b + 1;
1037
1038
64.1k
        while (next < end && !(next->flags & ZEND_BB_REACHABLE)) {
1039
12.1k
          next++;
1040
12.1k
        }
1041
52.0k
        if (next < end && next == blocks + b->successors[0]) {
1042
          /* JMP to the next block - strip it */
1043
16
          MAKE_NOP(opline);
1044
16
          b->len--;
1045
16
        }
1046
285k
      } else if (b->len == 1 && opline->opcode == ZEND_NOP) {
1047
        /* skip empty block */
1048
0
        b->len--;
1049
0
      }
1050
337k
      len += b->len;
1051
337k
    } else {
1052
      /* this block will not be used, delete all constants there */
1053
17.0k
      const zend_op *op = op_array->opcodes + b->start;
1054
17.0k
      const zend_op *last_op = op + b->len;
1055
39.9k
      for (; op < last_op; op++) {
1056
22.8k
        if (op->op1_type == IS_CONST) {
1057
14.6k
          literal_dtor(&ZEND_OP1_LITERAL(op));
1058
14.6k
        }
1059
22.8k
        if (op->op2_type == IS_CONST) {
1060
1.17k
          literal_dtor(&ZEND_OP2_LITERAL(op));
1061
1.17k
        }
1062
22.8k
      }
1063
17.0k
    }
1064
354k
  }
1065
1066
89.0k
  new_opcodes = emalloc(len * sizeof(zend_op));
1067
89.0k
  opline = new_opcodes;
1068
1069
  /* Copy code of reachable blocks into a single buffer */
1070
471k
  for (b = blocks; b < end; b++) {
1071
382k
    if (b->flags & (ZEND_BB_REACHABLE|ZEND_BB_UNREACHABLE_FREE)) {
1072
337k
      memcpy(opline, op_array->opcodes + b->start, b->len * sizeof(zend_op));
1073
337k
      b->start = opline - new_opcodes;
1074
337k
      opline += b->len;
1075
337k
    }
1076
382k
  }
1077
1078
  /* adjust jump targets */
1079
89.0k
  efree(op_array->opcodes);
1080
89.0k
  op_array->opcodes = new_opcodes;
1081
89.0k
  op_array->last = len;
1082
1083
471k
  for (b = blocks; b < end; b++) {
1084
382k
    if (!(b->flags & ZEND_BB_REACHABLE) || b->len == 0) {
1085
45.1k
      continue;
1086
45.1k
    }
1087
337k
    opline = op_array->opcodes + b->start + b->len - 1;
1088
337k
    switch (opline->opcode) {
1089
721
      case ZEND_FAST_CALL:
1090
52.7k
      case ZEND_JMP:
1091
52.7k
        ZEND_SET_OP_JMP_ADDR(opline, opline->op1, new_opcodes + blocks[b->successors[0]].start);
1092
52.7k
        break;
1093
17.5k
      case ZEND_JMPZ:
1094
27.8k
      case ZEND_JMPNZ:
1095
28.7k
      case ZEND_JMPZ_EX:
1096
29.6k
      case ZEND_JMPNZ_EX:
1097
43.0k
      case ZEND_FE_RESET_R:
1098
43.8k
      case ZEND_FE_RESET_RW:
1099
45.3k
      case ZEND_JMP_SET:
1100
49.0k
      case ZEND_COALESCE:
1101
50.2k
      case ZEND_ASSERT_CHECK:
1102
83.2k
      case ZEND_JMP_NULL:
1103
83.4k
      case ZEND_BIND_INIT_STATIC_OR_JMP:
1104
83.4k
      case ZEND_JMP_FRAMELESS:
1105
83.4k
        ZEND_SET_OP_JMP_ADDR(opline, opline->op2, new_opcodes + blocks[b->successors[0]].start);
1106
83.4k
        break;
1107
5.83k
      case ZEND_CATCH:
1108
5.83k
        if (!(opline->extended_value & ZEND_LAST_CATCH)) {
1109
4.39k
          ZEND_SET_OP_JMP_ADDR(opline, opline->op2, new_opcodes + blocks[b->successors[0]].start);
1110
4.39k
        }
1111
5.83k
        break;
1112
13.3k
      case ZEND_FE_FETCH_R:
1113
14.1k
      case ZEND_FE_FETCH_RW:
1114
14.1k
        opline->extended_value = ZEND_OPLINE_TO_OFFSET(opline, new_opcodes + blocks[b->successors[0]].start);
1115
14.1k
        break;
1116
14
      case ZEND_SWITCH_LONG:
1117
80
      case ZEND_SWITCH_STRING:
1118
252
      case ZEND_MATCH:
1119
252
      {
1120
252
        const HashTable *jumptable = Z_ARRVAL(ZEND_OP2_LITERAL(opline));
1121
252
        zval *zv;
1122
252
        uint32_t s = 0;
1123
252
        ZEND_ASSERT(b->successors_count == (opline->opcode == ZEND_MATCH ? 1 : 2) + zend_hash_num_elements(jumptable));
1124
1125
2.34k
        ZEND_HASH_FOREACH_VAL(jumptable, zv) {
1126
2.34k
          Z_LVAL_P(zv) = ZEND_OPLINE_TO_OFFSET(opline, new_opcodes + blocks[b->successors[s++]].start);
1127
2.34k
        } ZEND_HASH_FOREACH_END();
1128
252
        opline->extended_value = ZEND_OPLINE_TO_OFFSET(opline, new_opcodes + blocks[b->successors[s++]].start);
1129
252
        break;
1130
252
      }
1131
337k
    }
1132
337k
  }
1133
1134
  /* adjust exception jump targets & remove unused try_catch_array entries */
1135
89.0k
  if (op_array->last_try_catch) {
1136
19.7k
    uint32_t i, j;
1137
19.7k
    uint32_t *map;
1138
19.7k
    ALLOCA_FLAG(use_heap);
1139
1140
19.7k
    map = (uint32_t *)do_alloca(sizeof(uint32_t) * op_array->last_try_catch, use_heap);
1141
45.6k
    for (i = 0, j = 0; i< op_array->last_try_catch; i++) {
1142
25.9k
      if (blocks[cfg->map[op_array->try_catch_array[i].try_op]].flags & ZEND_BB_REACHABLE) {
1143
25.9k
        map[i] = j;
1144
25.9k
        op_array->try_catch_array[j].try_op = blocks[cfg->map[op_array->try_catch_array[i].try_op]].start;
1145
25.9k
        if (op_array->try_catch_array[i].catch_op) {
1146
25.2k
          op_array->try_catch_array[j].catch_op = blocks[cfg->map[op_array->try_catch_array[i].catch_op]].start;
1147
25.2k
        } else {
1148
628
          op_array->try_catch_array[j].catch_op =  0;
1149
628
        }
1150
25.9k
        if (op_array->try_catch_array[i].finally_op) {
1151
771
          op_array->try_catch_array[j].finally_op = blocks[cfg->map[op_array->try_catch_array[i].finally_op]].start;
1152
25.1k
        } else {
1153
25.1k
          op_array->try_catch_array[j].finally_op =  0;
1154
25.1k
        }
1155
25.9k
        if (!op_array->try_catch_array[i].finally_end) {
1156
25.1k
          op_array->try_catch_array[j].finally_end = 0;
1157
25.1k
        } else {
1158
771
          op_array->try_catch_array[j].finally_end = blocks[cfg->map[op_array->try_catch_array[i].finally_end]].start;
1159
771
        }
1160
25.9k
        j++;
1161
25.9k
      }
1162
25.9k
    }
1163
19.7k
    if (i != j) {
1164
8
      op_array->last_try_catch = j;
1165
8
      if (j == 0) {
1166
4
        efree(op_array->try_catch_array);
1167
4
        op_array->try_catch_array = NULL;
1168
4
      }
1169
1170
8
      if (op_array->fn_flags & ZEND_ACC_HAS_FINALLY_BLOCK) {
1171
0
        zend_op *finally_opline = new_opcodes;
1172
0
        const zend_op *last_finally_op = finally_opline + len;
1173
0
        while (finally_opline < last_finally_op) {
1174
0
          if (finally_opline->opcode == ZEND_FAST_RET &&
1175
0
              finally_opline->op2.num != (uint32_t)-1 &&
1176
0
              finally_opline->op2.num < j) {
1177
0
            finally_opline->op2.num = map[finally_opline->op2.num];
1178
0
          }
1179
0
          finally_opline++;
1180
0
        }
1181
0
      }
1182
8
    }
1183
19.7k
    free_alloca(map, use_heap);
1184
19.7k
  }
1185
1186
  /* rebuild map (just for printing) */
1187
89.0k
  memset(cfg->map, -1, sizeof(int) * op_array->last);
1188
471k
  for (uint32_t n = 0; n < cfg->blocks_count; n++) {
1189
382k
    if (cfg->blocks[n].flags & (ZEND_BB_REACHABLE|ZEND_BB_UNREACHABLE_FREE)) {
1190
337k
      cfg->map[cfg->blocks[n].start] = n;
1191
337k
    }
1192
382k
  }
1193
89.0k
}
1194
1195
static zend_always_inline zend_basic_block *get_target_block(const zend_cfg *cfg, const zend_basic_block *block, int n, uint32_t *opt_count)
1196
176k
{
1197
176k
  int b;
1198
176k
  zend_basic_block *target_block = cfg->blocks + block->successors[n];
1199
1200
176k
  if (target_block->len == 0 && !(target_block->flags & ZEND_BB_PROTECTED)) {
1201
252
    do {
1202
252
      b = target_block->successors[0];
1203
252
      target_block = cfg->blocks + b;
1204
252
    } while (target_block->len == 0 && !(target_block->flags & ZEND_BB_PROTECTED));
1205
164
    block->successors[n] = b;
1206
164
    ++(*opt_count);
1207
164
  }
1208
176k
  return target_block;
1209
176k
}
1210
1211
static zend_always_inline zend_basic_block *get_follow_block(const zend_cfg *cfg, const zend_basic_block *block, int n, uint32_t *opt_count)
1212
44.7k
{
1213
44.7k
  int b;
1214
44.7k
  zend_basic_block *target_block = cfg->blocks + block->successors[n];
1215
1216
44.7k
  if (target_block->len == 0 && !(target_block->flags & ZEND_BB_PROTECTED)) {
1217
795
    do {
1218
795
      b = target_block->successors[0];
1219
795
      target_block = cfg->blocks + b;
1220
795
    } while (target_block->len == 0 && !(target_block->flags & ZEND_BB_PROTECTED));
1221
749
    block->successors[n] = b;
1222
749
    ++(*opt_count);
1223
749
  }
1224
44.7k
  return target_block;
1225
44.7k
}
1226
1227
static zend_always_inline zend_basic_block *get_next_block(const zend_cfg *cfg, zend_basic_block *block)
1228
91.8k
{
1229
91.8k
  zend_basic_block *next_block = block + 1;
1230
91.8k
  const zend_basic_block *end = cfg->blocks + cfg->blocks_count;
1231
1232
107k
  while (1) {
1233
107k
    if (next_block == end) {
1234
869
      return NULL;
1235
106k
    } else if (next_block->flags & ZEND_BB_REACHABLE) {
1236
91.0k
      break;
1237
91.0k
    }
1238
15.5k
    next_block++;
1239
15.5k
  }
1240
91.0k
  while (next_block->len == 0 && !(next_block->flags & (ZEND_BB_TARGET|ZEND_BB_PROTECTED))) {
1241
67
    next_block = cfg->blocks + next_block->successors[0];
1242
67
  }
1243
91.0k
  return next_block;
1244
91.8k
}
1245
1246
1247
/* we use "jmp_hitlist" to avoid infinity loops during jmp optimization */
1248
static zend_always_inline bool in_hitlist(int target, const int *jmp_hitlist, int jmp_hitlist_count)
1249
624
{
1250
624
  int i;
1251
1252
624
  for (i = 0; i < jmp_hitlist_count; i++) {
1253
237
    if (jmp_hitlist[i] == target) {
1254
237
      return 1;
1255
237
    }
1256
237
  }
1257
387
  return 0;
1258
624
}
1259
1260
#define CHECK_LOOP(target) \
1261
624
  if (EXPECTED(!in_hitlist(target, jmp_hitlist, jmp_hitlist_count))) { \
1262
387
    jmp_hitlist[jmp_hitlist_count++] = target;  \
1263
387
  } else { \
1264
237
    break; \
1265
237
  }
1266
1267
static void zend_jmp_optimization(zend_basic_block *block, zend_op_array *op_array, const zend_cfg *cfg, int *jmp_hitlist, uint32_t *opt_count)
1268
507k
{
1269
  /* last_op is the last opcode of the current block */
1270
507k
  zend_basic_block *target_block, *follow_block, *next_block;
1271
507k
  zend_op *last_op, *target;
1272
507k
  int next, jmp_hitlist_count;
1273
1274
507k
  if (block->len == 0) {
1275
1.27k
    return;
1276
1.27k
  }
1277
1278
506k
  last_op = op_array->opcodes + block->start + block->len - 1;
1279
506k
  switch (last_op->opcode) {
1280
91.0k
    case ZEND_JMP:
1281
91.0k
      jmp_hitlist_count = 0;
1282
1283
91.0k
      target_block = get_target_block(cfg, block, 0, opt_count);
1284
91.0k
      while (target_block->len == 1) {
1285
47.5k
        target = op_array->opcodes + target_block->start;
1286
47.5k
        if (target->opcode == ZEND_JMP) {
1287
          /* JMP L, L: JMP L1 -> JMP L1 */
1288
56
          next = target_block->successors[0];
1289
47.5k
        } else {
1290
47.5k
          break;
1291
47.5k
        }
1292
56
        CHECK_LOOP(next);
1293
32
        block->successors[0] = next;
1294
32
        ++(*opt_count);
1295
32
        target_block = get_target_block(cfg, block, 0, opt_count);
1296
32
      }
1297
1298
91.0k
      next_block = get_next_block(cfg, block);
1299
91.0k
      if (target_block == next_block) {
1300
        /* JMP(next) -> NOP */
1301
875
        MAKE_NOP(last_op);
1302
875
        ++(*opt_count);
1303
875
        block->len--;
1304
90.1k
      } else if (target_block->len == 1) {
1305
47.3k
        target = op_array->opcodes + target_block->start;
1306
47.3k
        if ((target->opcode == ZEND_RETURN ||
1307
47.1k
                    target->opcode == ZEND_RETURN_BY_REF ||
1308
47.1k
                    target->opcode == ZEND_GENERATOR_RETURN) &&
1309
303
                   !(op_array->fn_flags & ZEND_ACC_HAS_FINALLY_BLOCK)) {
1310
          /* JMP L, L: RETURN to immediate RETURN */
1311
28
          *last_op = *target;
1312
28
          if (last_op->op1_type == IS_CONST) {
1313
28
            zval zv;
1314
28
            ZVAL_COPY(&zv, &ZEND_OP1_LITERAL(last_op));
1315
28
            last_op->op1.constant = zend_optimizer_add_literal(op_array, &zv);
1316
28
          }
1317
28
          block->successors_count = 0;
1318
28
          ++(*opt_count);
1319
28
        }
1320
47.3k
      }
1321
91.0k
      break;
1322
1323
2.00k
    case ZEND_JMP_SET:
1324
7.02k
    case ZEND_COALESCE:
1325
40.7k
    case ZEND_JMP_NULL:
1326
40.7k
      jmp_hitlist_count = 0;
1327
1328
40.7k
      target_block = get_target_block(cfg, block, 0, opt_count);
1329
40.7k
      while (target_block->len == 1) {
1330
3.89k
        target = op_array->opcodes + target_block->start;
1331
1332
3.89k
        if (target->opcode == ZEND_JMP) {
1333
          /* JMP_SET(X, L), L: JMP(L2) -> JMP_SET(X, L2) */
1334
32
          next = target_block->successors[0];
1335
32
          CHECK_LOOP(next);
1336
32
          block->successors[0] = next;
1337
32
          ++(*opt_count);
1338
3.86k
        } else {
1339
3.86k
          break;
1340
3.86k
        }
1341
32
        target_block = get_target_block(cfg, block, 0, opt_count);
1342
32
      }
1343
40.7k
      break;
1344
1345
28.8k
    case ZEND_JMPZ:
1346
41.6k
    case ZEND_JMPNZ:
1347
41.6k
      jmp_hitlist_count = 0;
1348
1349
41.6k
      target_block = get_target_block(cfg, block, 0, opt_count);
1350
42.0k
      while (target_block->len == 1) {
1351
27.6k
        target = op_array->opcodes + target_block->start;
1352
1353
27.6k
        if (target->opcode == ZEND_JMP) {
1354
          /* JMPZ(X, L), L: JMP(L2) -> JMPZ(X, L2) */
1355
84
          next = target_block->successors[0];
1356
27.5k
        } else if (target->opcode == last_op->opcode &&
1357
875
                   SAME_VAR(target->op1, last_op->op1)) {
1358
          /* JMPZ(X, L), L: JMPZ(X, L2) -> JMPZ(X, L2) */
1359
430
          next = target_block->successors[0];
1360
27.0k
        } else if (target->opcode == INV_COND(last_op->opcode) &&
1361
120
                   SAME_VAR(target->op1, last_op->op1)) {
1362
          /* JMPZ(X, L), L: JMPNZ(X, L2) -> JMPZ(X, L+1) */
1363
18
          next = target_block->successors[1];
1364
27.0k
        } else {
1365
27.0k
          break;
1366
27.0k
        }
1367
532
        CHECK_LOOP(next);
1368
319
        block->successors[0] = next;
1369
319
        ++(*opt_count);
1370
319
        target_block = get_target_block(cfg, block, 0, opt_count);
1371
319
      }
1372
1373
41.6k
      follow_block = get_follow_block(cfg, block, 1, opt_count);
1374
41.6k
      if (target_block == follow_block) {
1375
        /* L: JMP[N]Z(X, L+1) -> NOP or FREE(X) */
1376
553
        zend_optimizer_convert_to_free_op1(op_array, last_op);
1377
553
        if (last_op->opcode == ZEND_NOP) {
1378
0
          block->len--;
1379
0
        }
1380
553
        block->successors_count = 1;
1381
553
        ++(*opt_count);
1382
41.1k
      } else if (follow_block->len == 1) {
1383
8.45k
        target = op_array->opcodes + follow_block->start;
1384
8.45k
        if (target->opcode == ZEND_JMP) {
1385
1.01k
            if (block->successors[0] == follow_block->successors[0]) {
1386
            /* JMPZ(X,L1), JMP(L1) -> NOP, JMP(L1) */
1387
163
            zend_optimizer_convert_to_free_op1(op_array, last_op);
1388
163
            if (last_op->opcode == ZEND_NOP) {
1389
0
              block->len--;
1390
0
            }
1391
163
            block->successors[0] = follow_block - cfg->blocks;
1392
163
            block->successors_count = 1;
1393
163
            ++(*opt_count);
1394
163
            break;
1395
856
          } else if (!(follow_block->flags & (ZEND_BB_TARGET | ZEND_BB_PROTECTED))) {
1396
856
            next_block = get_next_block(cfg, follow_block);
1397
1398
856
            if (target_block == next_block) {
1399
              /* JMPZ(X,L1) JMP(L2) L1: -> JMPNZ(X,L2) NOP*/
1400
1401
332
              last_op->opcode = INV_COND(last_op->opcode);
1402
1403
332
              block->successors[0] = follow_block->successors[0];
1404
332
              block->successors[1] = next_block - cfg->blocks;
1405
1406
332
              follow_block->flags &= ~ZEND_BB_REACHABLE;
1407
332
              MAKE_NOP(target);
1408
332
              follow_block->len = 0;
1409
1410
332
              next_block->flags |= ZEND_BB_FOLLOW;
1411
1412
332
              break;
1413
332
            }
1414
856
          }
1415
1.01k
        }
1416
8.45k
      }
1417
41.1k
      break;
1418
1419
41.1k
    case ZEND_JMPNZ_EX:
1420
3.10k
    case ZEND_JMPZ_EX:
1421
3.10k
      jmp_hitlist_count = 0;
1422
1423
3.10k
      target_block = get_target_block(cfg, block, 0, opt_count);
1424
3.10k
      while (target_block->len == 1) {
1425
1.22k
        target = op_array->opcodes + target_block->start;
1426
1427
1.22k
        if (target->opcode == ZEND_JMP) {
1428
          /* T = JMPZ_EX(X, L), L: JMP(L2) -> T = JMPZ(X, L2) */
1429
0
          next = target_block->successors[0];
1430
1.22k
        } else if (target->opcode == last_op->opcode-3 &&
1431
2
                   (SAME_VAR(target->op1, last_op->result) ||
1432
2
                    SAME_VAR(target->op1, last_op->op1))) {
1433
          /* T = JMPZ_EX(X, L1), L1: JMPZ({X|T}, L2) -> T = JMPZ_EX(X, L2) */
1434
2
          next = target_block->successors[0];
1435
1.22k
        } else if (target->opcode == last_op->opcode &&
1436
0
                   target->result.var == last_op->result.var &&
1437
0
                   (SAME_VAR(target->op1, last_op->result) ||
1438
0
                    SAME_VAR(target->op1, last_op->op1))) {
1439
          /* T = JMPZ_EX(X, L1), L1: T = JMPZ_EX({X|T}, L2) -> T = JMPZ_EX(X, L2) */
1440
0
          next = target_block->successors[0];
1441
1.22k
        } else if (target->opcode == INV_EX_COND(last_op->opcode) &&
1442
2
                   (SAME_VAR(target->op1, last_op->result) ||
1443
2
                    SAME_VAR(target->op1, last_op->op1))) {
1444
          /* T = JMPZ_EX(X, L1), L1: JMPNZ({X|T1}, L2) -> T = JMPZ_EX(X, L1+1) */
1445
2
          next = target_block->successors[1];
1446
1.22k
        } else if (target->opcode == INV_EX_COND_EX(last_op->opcode) &&
1447
28
                   target->result.var == last_op->result.var &&
1448
20
                   (SAME_VAR(target->op1, last_op->result) ||
1449
20
                    SAME_VAR(target->op1, last_op->op1))) {
1450
          /* T = JMPZ_EX(X, L1), L1: T = JMPNZ_EX({X|T}, L2) -> T = JMPZ_EX(X, L1+1) */
1451
0
          next = target_block->successors[1];
1452
1.22k
        } else if (target->opcode == ZEND_BOOL &&
1453
0
                   (SAME_VAR(target->op1, last_op->result) ||
1454
0
                    SAME_VAR(target->op1, last_op->op1))) {
1455
          /* convert Y = JMPZ_EX(X,L1), L1: Z = BOOL(Y) to
1456
             Z = JMPZ_EX(X,L1+1) */
1457
1458
          /* NOTE: This optimization pattern is not safe, but works, */
1459
          /*       because result of JMPZ_EX instruction             */
1460
          /*       is not used on the following path and             */
1461
          /*       should be used once on the branch path.           */
1462
          /*                                                         */
1463
          /*       The pattern works well only if jumps processed in */
1464
          /*       direct order, otherwise it breaks JMPZ_EX         */
1465
          /*       sequences too early.                              */
1466
0
          last_op->result.var = target->result.var;
1467
0
          next = target_block->successors[0];
1468
1.22k
        } else {
1469
1.22k
          break;
1470
1.22k
        }
1471
4
        CHECK_LOOP(next);
1472
4
        block->successors[0] = next;
1473
4
        ++(*opt_count);
1474
4
        target_block = get_target_block(cfg, block, 0, opt_count);
1475
4
      }
1476
1477
3.10k
      follow_block = get_follow_block(cfg, block, 1, opt_count);
1478
3.10k
      if (target_block == follow_block) {
1479
        /* L: T = JMP[N]Z_EX(X, L+1) -> T = BOOL(X) */
1480
0
        last_op->opcode = ZEND_BOOL;
1481
0
        last_op->op2.num = 0;
1482
0
        block->successors_count = 1;
1483
0
        ++(*opt_count);
1484
0
        break;
1485
0
      }
1486
3.10k
      break;
1487
506k
  }
1488
506k
}
1489
1490
/* Global data dependencies */
1491
1492
/* Find a set of variables which are used outside of the block where they are
1493
 * defined. We won't apply some optimization patterns for such variables. */
1494
static void zend_t_usage(const zend_cfg *cfg, const zend_op_array *op_array, zend_bitset used_ext, zend_optimizer_ctx *ctx)
1495
109k
{
1496
109k
  uint32_t n;
1497
109k
  zend_basic_block *block, *next_block;
1498
109k
  uint32_t var_num;
1499
109k
  uint32_t bitset_len;
1500
109k
  zend_bitset usage;
1501
109k
  zend_bitset defined_here;
1502
109k
  void *checkpoint;
1503
109k
  zend_op *opline, *end;
1504
1505
1506
109k
  if (op_array->T == 0) {
1507
    /* shortcut - if no Ts, nothing to do */
1508
13.2k
    return;
1509
13.2k
  }
1510
1511
95.8k
  checkpoint = zend_arena_checkpoint(ctx->arena);
1512
95.8k
  bitset_len = zend_bitset_len(op_array->last_var + op_array->T);
1513
95.8k
  defined_here = zend_arena_alloc(&ctx->arena, bitset_len * ZEND_BITSET_ELM_SIZE);
1514
1515
95.8k
  zend_bitset_clear(defined_here, bitset_len);
1516
540k
  for (n = 1; n < cfg->blocks_count; n++) {
1517
444k
    block = cfg->blocks + n;
1518
1519
444k
    if (!(block->flags & ZEND_BB_REACHABLE)) {
1520
45.7k
      continue;
1521
45.7k
    }
1522
1523
398k
    opline = op_array->opcodes + block->start;
1524
398k
    end = opline + block->len;
1525
398k
    if (!(block->flags & ZEND_BB_FOLLOW) ||
1526
295k
        (block->flags & ZEND_BB_TARGET)) {
1527
      /* Skip continuation of "extended" BB */
1528
211k
      zend_bitset_clear(defined_here, bitset_len);
1529
211k
    }
1530
1531
2.19M
    while (opline<end) {
1532
1.80M
      if (opline->op1_type & (IS_VAR|IS_TMP_VAR)) {
1533
523k
        var_num = VAR_NUM(opline->op1.var);
1534
523k
        if (!zend_bitset_in(defined_here, var_num)) {
1535
244k
          zend_bitset_incl(used_ext, var_num);
1536
244k
        }
1537
523k
      }
1538
1.80M
      if (opline->op2_type == IS_VAR) {
1539
794
        var_num = VAR_NUM(opline->op2.var);
1540
794
        if (opline->opcode == ZEND_FE_FETCH_R ||
1541
794
            opline->opcode == ZEND_FE_FETCH_RW) {
1542
          /* these opcode use the op2 as result */
1543
12
          zend_bitset_incl(defined_here, var_num);
1544
782
        } else if (!zend_bitset_in(defined_here, var_num)) {
1545
2
          zend_bitset_incl(used_ext, var_num);
1546
2
        }
1547
1.79M
      } else if (opline->op2_type == IS_TMP_VAR) {
1548
344k
        var_num = VAR_NUM(opline->op2.var);
1549
344k
        if (!zend_bitset_in(defined_here, var_num)) {
1550
35.7k
          zend_bitset_incl(used_ext, var_num);
1551
35.7k
        }
1552
344k
      }
1553
1554
1.80M
      if (opline->result_type == IS_VAR) {
1555
9.61k
        var_num = VAR_NUM(opline->result.var);
1556
9.61k
        zend_bitset_incl(defined_here, var_num);
1557
1.79M
      } else if (opline->result_type == IS_TMP_VAR) {
1558
861k
        var_num = VAR_NUM(opline->result.var);
1559
861k
        switch (opline->opcode) {
1560
5.78k
          case ZEND_ADD_ARRAY_ELEMENT:
1561
5.83k
          case ZEND_ADD_ARRAY_UNPACK:
1562
232k
          case ZEND_ROPE_ADD:
1563
            /* these opcodes use the result as argument */
1564
232k
            if (!zend_bitset_in(defined_here, var_num)) {
1565
180k
              zend_bitset_incl(used_ext, var_num);
1566
180k
            }
1567
232k
            break;
1568
628k
          default :
1569
628k
            zend_bitset_incl(defined_here, var_num);
1570
861k
        }
1571
861k
      }
1572
1.80M
      opline++;
1573
1.80M
    }
1574
398k
  }
1575
1576
95.8k
  if (ctx->debug_level & ZEND_DUMP_BLOCK_PASS_VARS) {
1577
0
    bool printed = false;
1578
0
    uint32_t i;
1579
1580
0
    for (i = op_array->last_var; i< op_array->T; i++) {
1581
0
      if (zend_bitset_in(used_ext, i)) {
1582
0
        if (!printed) {
1583
0
          fprintf(stderr, "NON-LOCAL-VARS: %d", i);
1584
0
          printed = true;
1585
0
        } else {
1586
0
          fprintf(stderr, ", %d", i);
1587
0
        }
1588
0
      }
1589
0
    }
1590
0
    if (printed) {
1591
0
      fprintf(stderr, "\n");
1592
0
    }
1593
0
  }
1594
1595
95.8k
  usage = defined_here;
1596
95.8k
  next_block = NULL;
1597
636k
  for (n = cfg->blocks_count; n > 0;) {
1598
540k
    block = cfg->blocks + (--n);
1599
1600
540k
    if (!(block->flags & ZEND_BB_REACHABLE) || block->len == 0) {
1601
45.9k
      continue;
1602
45.9k
    }
1603
1604
494k
    end = op_array->opcodes + block->start;
1605
494k
    opline = end + block->len - 1;
1606
494k
    if (!next_block ||
1607
398k
        !(next_block->flags & ZEND_BB_FOLLOW) ||
1608
307k
        (next_block->flags & ZEND_BB_TARGET)) {
1609
      /* Skip continuation of "extended" BB */
1610
307k
      zend_bitset_copy(usage, used_ext, bitset_len);
1611
307k
    } else if (block->successors_count > 1) {
1612
122k
      zend_bitset_union(usage, used_ext, bitset_len);
1613
122k
    }
1614
494k
    next_block = block;
1615
1616
3.53M
    while (opline >= end) {
1617
      /* usage checks */
1618
3.03M
      if (opline->result_type & (IS_VAR|IS_TMP_VAR)) {
1619
1.43M
        if (!zend_bitset_in(usage, VAR_NUM(opline->result.var))) {
1620
7.99k
          switch (opline->opcode) {
1621
0
            case ZEND_ASSIGN_OP:
1622
0
            case ZEND_ASSIGN_DIM_OP:
1623
0
            case ZEND_ASSIGN_OBJ_OP:
1624
0
            case ZEND_ASSIGN_STATIC_PROP_OP:
1625
0
            case ZEND_PRE_INC:
1626
0
            case ZEND_PRE_DEC:
1627
0
            case ZEND_ASSIGN:
1628
0
            case ZEND_ASSIGN_REF:
1629
0
            case ZEND_DO_FCALL:
1630
0
            case ZEND_DO_ICALL:
1631
0
            case ZEND_DO_UCALL:
1632
0
            case ZEND_DO_FCALL_BY_NAME:
1633
0
              opline->result_type = IS_UNUSED;
1634
0
              break;
1635
0
            case ZEND_POST_INC:
1636
0
            case ZEND_POST_DEC:
1637
0
            case ZEND_POST_INC_OBJ:
1638
0
            case ZEND_POST_DEC_OBJ:
1639
0
            case ZEND_POST_INC_STATIC_PROP:
1640
0
            case ZEND_POST_DEC_STATIC_PROP:
1641
0
              opline->opcode -= 2;
1642
0
              opline->result_type = IS_UNUSED;
1643
0
              break;
1644
471
            case ZEND_QM_ASSIGN:
1645
1.36k
            case ZEND_BOOL:
1646
4.56k
            case ZEND_BOOL_NOT:
1647
4.56k
              zend_optimizer_convert_to_free_op1(op_array, opline);
1648
4.56k
              break;
1649
1.61k
            case ZEND_JMPZ_EX:
1650
3.32k
            case ZEND_JMPNZ_EX:
1651
3.32k
              opline->opcode -= 3;
1652
3.32k
              SET_UNUSED(opline->result);
1653
3.32k
              break;
1654
0
            case ZEND_ADD_ARRAY_ELEMENT:
1655
0
            case ZEND_ADD_ARRAY_UNPACK:
1656
0
            case ZEND_ROPE_ADD:
1657
0
              zend_bitset_incl(usage, VAR_NUM(opline->result.var));
1658
0
              break;
1659
7.99k
          }
1660
1.42M
        } else {
1661
1.42M
          switch (opline->opcode) {
1662
46.3k
            case ZEND_ADD_ARRAY_ELEMENT:
1663
46.5k
            case ZEND_ADD_ARRAY_UNPACK:
1664
348k
            case ZEND_ROPE_ADD:
1665
348k
              break;
1666
1.07M
            default:
1667
1.07M
              zend_bitset_excl(usage, VAR_NUM(opline->result.var));
1668
1.07M
              break;
1669
1.42M
          }
1670
1.42M
        }
1671
1.43M
      }
1672
1673
3.03M
      if (opline->op2_type == IS_VAR) {
1674
2.16k
        switch (opline->opcode) {
1675
0
          case ZEND_FE_FETCH_R:
1676
12
          case ZEND_FE_FETCH_RW:
1677
12
            zend_bitset_excl(usage, VAR_NUM(opline->op2.var));
1678
12
            break;
1679
2.15k
          default:
1680
2.15k
            zend_bitset_incl(usage, VAR_NUM(opline->op2.var));
1681
2.15k
            break;
1682
2.16k
        }
1683
3.03M
      } else if (opline->op2_type == IS_TMP_VAR) {
1684
497k
        zend_bitset_incl(usage, VAR_NUM(opline->op2.var));
1685
497k
      }
1686
1687
3.03M
      if (opline->op1_type & (IS_VAR|IS_TMP_VAR)) {
1688
873k
        zend_bitset_incl(usage, VAR_NUM(opline->op1.var));
1689
873k
      }
1690
1691
3.03M
      opline--;
1692
3.03M
    }
1693
494k
  }
1694
1695
95.8k
  zend_arena_release(&ctx->arena, checkpoint);
1696
95.8k
}
1697
1698
static void zend_merge_blocks(const zend_op_array *op_array, const zend_cfg *cfg, uint32_t *opt_count)
1699
109k
{
1700
109k
  zend_basic_block *b, *bb;
1701
109k
  zend_basic_block *prev = NULL;
1702
1703
665k
  for (uint32_t i = 0; i < cfg->blocks_count; i++) {
1704
556k
    b = cfg->blocks + i;
1705
556k
    if (b->flags & ZEND_BB_REACHABLE) {
1706
505k
      if ((b->flags & ZEND_BB_FOLLOW) &&
1707
294k
          !(b->flags & (ZEND_BB_TARGET | ZEND_BB_PROTECTED)) &&
1708
145k
          prev && prev->successors_count == 1 && prev->successors[0] == i)
1709
25.3k
      {
1710
25.3k
        zend_op *last_op = op_array->opcodes + prev->start + prev->len - 1;
1711
25.3k
        if (prev->len != 0 && last_op->opcode == ZEND_JMP) {
1712
0
          MAKE_NOP(last_op);
1713
0
        }
1714
1715
28.1k
        for (bb = prev + 1; bb != b; bb++) {
1716
2.83k
          zend_op *op = op_array->opcodes + bb->start;
1717
2.83k
          const zend_op *end = op + bb->len;
1718
5.36k
          while (op < end) {
1719
2.52k
            if (op->op1_type == IS_CONST) {
1720
918
              literal_dtor(&ZEND_OP1_LITERAL(op));
1721
918
            }
1722
2.52k
            if (op->op2_type == IS_CONST) {
1723
530
              literal_dtor(&ZEND_OP2_LITERAL(op));
1724
530
            }
1725
2.52k
            MAKE_NOP(op);
1726
2.52k
            op++;
1727
2.52k
          }
1728
          /* make block empty */
1729
2.83k
          bb->len = 0;
1730
2.83k
        }
1731
1732
        /* re-link */
1733
25.3k
        prev->flags |= (b->flags & ZEND_BB_EXIT);
1734
25.3k
        prev->len = b->start + b->len - prev->start;
1735
25.3k
        prev->successors_count = b->successors_count;
1736
25.3k
        if (b->successors != b->successors_storage) {
1737
86
          prev->successors = b->successors;
1738
86
          b->successors = b->successors_storage;
1739
25.2k
        } else {
1740
25.2k
          memcpy(prev->successors, b->successors, b->successors_count * sizeof(int));
1741
25.2k
        }
1742
1743
        /* unlink & make block empty and unreachable */
1744
25.3k
        b->flags = 0;
1745
25.3k
        b->len = 0;
1746
25.3k
        b->successors_count = 0;
1747
25.3k
        ++(*opt_count);
1748
480k
      } else {
1749
480k
        prev = b;
1750
480k
      }
1751
505k
    }
1752
556k
  }
1753
109k
}
1754
1755
109k
#define PASSES 3
1756
1757
void zend_optimize_cfg(zend_op_array *op_array, zend_optimizer_ctx *ctx)
1758
89.0k
{
1759
89.0k
  zend_cfg cfg;
1760
89.0k
  zend_basic_block *blocks, *end, *b;
1761
89.0k
  int pass;
1762
89.0k
  uint32_t bitset_len;
1763
89.0k
  zend_bitset usage;
1764
89.0k
  void *checkpoint;
1765
89.0k
  zend_op **Tsource;
1766
89.0k
  uint32_t opt_count;
1767
89.0k
  int *jmp_hitlist;
1768
1769
    /* Build CFG */
1770
89.0k
  checkpoint = zend_arena_checkpoint(ctx->arena);
1771
89.0k
  zend_build_cfg(&ctx->arena, op_array, 0, &cfg);
1772
1773
89.0k
  if (cfg.blocks_count * (op_array->last_var + op_array->T) > 64 * 1024 * 1024) {
1774
0
    zend_arena_release(&ctx->arena, checkpoint);
1775
0
    return;
1776
0
  }
1777
1778
89.0k
  if (ctx->debug_level & ZEND_DUMP_BEFORE_BLOCK_PASS) {
1779
0
    zend_dump_op_array(op_array, ZEND_DUMP_CFG, "before block pass", &cfg);
1780
0
  }
1781
1782
89.0k
  bitset_len = zend_bitset_len(op_array->last_var + op_array->T);
1783
89.0k
  Tsource = zend_arena_calloc(&ctx->arena, op_array->last_var + op_array->T, sizeof(zend_op *));
1784
89.0k
  usage = zend_arena_alloc(&ctx->arena, bitset_len * ZEND_BITSET_ELM_SIZE);
1785
89.0k
  jmp_hitlist = zend_arena_alloc(&ctx->arena, cfg.blocks_count * sizeof(int));
1786
1787
89.0k
  blocks = cfg.blocks;
1788
89.0k
  end = blocks + cfg.blocks_count;
1789
109k
  for (pass = 0; pass < PASSES; pass++) {
1790
109k
    opt_count = 0;
1791
1792
    /* Compute data dependencies */
1793
109k
    zend_bitset_clear(usage, bitset_len);
1794
109k
    zend_t_usage(&cfg, op_array, usage, ctx);
1795
1796
    /* optimize each basic block separately */
1797
665k
    for (b = blocks; b < end; b++) {
1798
556k
      if (!(b->flags & ZEND_BB_REACHABLE)) {
1799
48.8k
        continue;
1800
48.8k
      }
1801
      /* we track data dependencies only inside a single basic block */
1802
507k
      if (!(b->flags & ZEND_BB_FOLLOW) ||
1803
320k
          (b->flags & ZEND_BB_TARGET)) {
1804
        /* Skip continuation of "extended" BB */
1805
320k
        memset(Tsource, 0, (op_array->last_var + op_array->T) * sizeof(zend_op *));
1806
320k
      }
1807
507k
      zend_optimize_block(b, op_array, usage, &cfg, Tsource, &opt_count);
1808
507k
    }
1809
1810
    /* Eliminate NOPs */
1811
665k
    for (b = blocks; b < end; b++) {
1812
556k
      if (b->flags & ZEND_BB_UNREACHABLE_FREE) {
1813
        /* In unreachable_free blocks only preserve loop var frees. */
1814
80
        for (uint32_t i = b->start; i < b->start + b->len; i++) {
1815
52
          zend_op *opline = &op_array->opcodes[i];
1816
52
          if (!zend_optimizer_is_loop_var_free(opline)) {
1817
24
            MAKE_NOP(opline);
1818
24
          }
1819
52
        }
1820
28
      }
1821
556k
      if (b->flags & (ZEND_BB_REACHABLE|ZEND_BB_UNREACHABLE_FREE)) {
1822
507k
        strip_nops(op_array, b);
1823
507k
      }
1824
556k
    }
1825
1826
109k
    opt_count = 0;
1827
1828
    /* Jump optimization for each block */
1829
665k
    for (b = blocks; b < end; b++) {
1830
556k
      if (b->flags & ZEND_BB_REACHABLE) {
1831
507k
        zend_jmp_optimization(b, op_array, &cfg, jmp_hitlist, &opt_count);
1832
507k
      }
1833
556k
    }
1834
1835
    /* Eliminate unreachable basic blocks */
1836
109k
    zend_cfg_remark_reachable_blocks(op_array, &cfg);
1837
1838
    /* Merge Blocks */
1839
109k
    zend_merge_blocks(op_array, &cfg, &opt_count);
1840
1841
109k
    if (opt_count == 0) {
1842
88.9k
      break;
1843
88.9k
    }
1844
109k
  }
1845
1846
89.0k
  assemble_code_blocks(&cfg, op_array, ctx);
1847
1848
89.0k
  if (ctx->debug_level & ZEND_DUMP_AFTER_BLOCK_PASS) {
1849
0
    zend_dump_op_array(op_array, ZEND_DUMP_CFG | ZEND_DUMP_HIDE_UNREACHABLE, "after block pass", &cfg);
1850
0
  }
1851
1852
  /* Destroy CFG */
1853
89.0k
  zend_arena_release(&ctx->arena, checkpoint);
1854
89.0k
}