LCOV - code coverage report
Current view: top level - gcc - var-tracking.cc (source / functions) Coverage Total Hit
Test: gcc.info Lines: 92.0 % 4746 4364
Test Date: 2024-09-28 13:20:55 Functions: 94.9 % 178 169
Legend: Lines: hit not hit | Branches: + taken - not taken # not executed Branches: - 0 0

             Branch data     Line data    Source code
       1                 :             : /* Variable tracking routines for the GNU compiler.
       2                 :             :    Copyright (C) 2002-2024 Free Software Foundation, Inc.
       3                 :             : 
       4                 :             :    This file is part of GCC.
       5                 :             : 
       6                 :             :    GCC is free software; you can redistribute it and/or modify it
       7                 :             :    under the terms of the GNU General Public License as published by
       8                 :             :    the Free Software Foundation; either version 3, or (at your option)
       9                 :             :    any later version.
      10                 :             : 
      11                 :             :    GCC is distributed in the hope that it will be useful, but WITHOUT
      12                 :             :    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
      13                 :             :    or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
      14                 :             :    License for more details.
      15                 :             : 
      16                 :             :    You should have received a copy of the GNU General Public License
      17                 :             :    along with GCC; see the file COPYING3.  If not see
      18                 :             :    <http://www.gnu.org/licenses/>.  */
      19                 :             : 
      20                 :             : /* This file contains the variable tracking pass.  It computes where
      21                 :             :    variables are located (which registers or where in memory) at each position
      22                 :             :    in instruction stream and emits notes describing the locations.
      23                 :             :    Debug information (DWARF2 location lists) is finally generated from
      24                 :             :    these notes.
      25                 :             :    With this debug information, it is possible to show variables
      26                 :             :    even when debugging optimized code.
      27                 :             : 
      28                 :             :    How does the variable tracking pass work?
      29                 :             : 
      30                 :             :    First, it scans RTL code for uses, stores and clobbers (register/memory
      31                 :             :    references in instructions), for call insns and for stack adjustments
      32                 :             :    separately for each basic block and saves them to an array of micro
      33                 :             :    operations.
      34                 :             :    The micro operations of one instruction are ordered so that
      35                 :             :    pre-modifying stack adjustment < use < use with no var < call insn <
      36                 :             :      < clobber < set < post-modifying stack adjustment
      37                 :             : 
      38                 :             :    Then, a forward dataflow analysis is performed to find out how locations
      39                 :             :    of variables change through code and to propagate the variable locations
      40                 :             :    along control flow graph.
      41                 :             :    The IN set for basic block BB is computed as a union of OUT sets of BB's
      42                 :             :    predecessors, the OUT set for BB is copied from the IN set for BB and
      43                 :             :    is changed according to micro operations in BB.
      44                 :             : 
      45                 :             :    The IN and OUT sets for basic blocks consist of a current stack adjustment
      46                 :             :    (used for adjusting offset of variables addressed using stack pointer),
      47                 :             :    the table of structures describing the locations of parts of a variable
      48                 :             :    and for each physical register a linked list for each physical register.
      49                 :             :    The linked list is a list of variable parts stored in the register,
      50                 :             :    i.e. it is a list of triplets (reg, decl, offset) where decl is
      51                 :             :    REG_EXPR (reg) and offset is REG_OFFSET (reg).  The linked list is used for
      52                 :             :    effective deleting appropriate variable parts when we set or clobber the
      53                 :             :    register.
      54                 :             : 
      55                 :             :    There may be more than one variable part in a register.  The linked lists
      56                 :             :    should be pretty short so it is a good data structure here.
      57                 :             :    For example in the following code, register allocator may assign same
      58                 :             :    register to variables A and B, and both of them are stored in the same
      59                 :             :    register in CODE:
      60                 :             : 
      61                 :             :      if (cond)
      62                 :             :        set A;
      63                 :             :      else
      64                 :             :        set B;
      65                 :             :      CODE;
      66                 :             :      if (cond)
      67                 :             :        use A;
      68                 :             :      else
      69                 :             :        use B;
      70                 :             : 
      71                 :             :    Finally, the NOTE_INSN_VAR_LOCATION notes describing the variable locations
      72                 :             :    are emitted to appropriate positions in RTL code.  Each such a note describes
      73                 :             :    the location of one variable at the point in instruction stream where the
      74                 :             :    note is.  There is no need to emit a note for each variable before each
      75                 :             :    instruction, we only emit these notes where the location of variable changes
      76                 :             :    (this means that we also emit notes for changes between the OUT set of the
      77                 :             :    previous block and the IN set of the current block).
      78                 :             : 
      79                 :             :    The notes consist of two parts:
      80                 :             :    1. the declaration (from REG_EXPR or MEM_EXPR)
      81                 :             :    2. the location of a variable - it is either a simple register/memory
      82                 :             :       reference (for simple variables, for example int),
      83                 :             :       or a parallel of register/memory references (for a large variables
      84                 :             :       which consist of several parts, for example long long).
      85                 :             : 
      86                 :             : */
      87                 :             : 
      88                 :             : #include "config.h"
      89                 :             : #include "system.h"
      90                 :             : #include "coretypes.h"
      91                 :             : #include "backend.h"
      92                 :             : #include "target.h"
      93                 :             : #include "rtl.h"
      94                 :             : #include "tree.h"
      95                 :             : #include "cfghooks.h"
      96                 :             : #include "alloc-pool.h"
      97                 :             : #include "tree-pass.h"
      98                 :             : #include "memmodel.h"
      99                 :             : #include "tm_p.h"
     100                 :             : #include "insn-config.h"
     101                 :             : #include "regs.h"
     102                 :             : #include "emit-rtl.h"
     103                 :             : #include "recog.h"
     104                 :             : #include "diagnostic.h"
     105                 :             : #include "varasm.h"
     106                 :             : #include "stor-layout.h"
     107                 :             : #include "cfgrtl.h"
     108                 :             : #include "cfganal.h"
     109                 :             : #include "reload.h"
     110                 :             : #include "ira.h"
     111                 :             : #include "lra.h"
     112                 :             : #include "calls.h"
     113                 :             : #include "tree-dfa.h"
     114                 :             : #include "tree-ssa.h"
     115                 :             : #include "cselib.h"
     116                 :             : #include "tree-pretty-print.h"
     117                 :             : #include "rtl-iter.h"
     118                 :             : #include "fibonacci_heap.h"
     119                 :             : #include "print-rtl.h"
     120                 :             : #include "function-abi.h"
     121                 :             : #include "mux-utils.h"
     122                 :             : 
     123                 :             : typedef fibonacci_heap <long, basic_block_def> bb_heap_t;
     124                 :             : 
     125                 :             : /* var-tracking.cc assumes that tree code with the same value as VALUE rtx code
     126                 :             :    has no chance to appear in REG_EXPR/MEM_EXPRs and isn't a decl.
     127                 :             :    Currently the value is the same as IDENTIFIER_NODE, which has such
     128                 :             :    a property.  If this compile time assertion ever fails, make sure that
     129                 :             :    the new tree code that equals (int) VALUE has the same property.  */
     130                 :             : extern char check_value_val[(int) VALUE == (int) IDENTIFIER_NODE ? 1 : -1];
     131                 :             : 
     132                 :             : /* Type of micro operation.  */
     133                 :             : enum micro_operation_type
     134                 :             : {
     135                 :             :   MO_USE,       /* Use location (REG or MEM).  */
     136                 :             :   MO_USE_NO_VAR,/* Use location which is not associated with a variable
     137                 :             :                    or the variable is not trackable.  */
     138                 :             :   MO_VAL_USE,   /* Use location which is associated with a value.  */
     139                 :             :   MO_VAL_LOC,   /* Use location which appears in a debug insn.  */
     140                 :             :   MO_VAL_SET,   /* Set location associated with a value.  */
     141                 :             :   MO_SET,       /* Set location.  */
     142                 :             :   MO_COPY,      /* Copy the same portion of a variable from one
     143                 :             :                    location to another.  */
     144                 :             :   MO_CLOBBER,   /* Clobber location.  */
     145                 :             :   MO_CALL,      /* Call insn.  */
     146                 :             :   MO_ADJUST     /* Adjust stack pointer.  */
     147                 :             : 
     148                 :             : };
     149                 :             : 
     150                 :             : static const char * const ATTRIBUTE_UNUSED
     151                 :             : micro_operation_type_name[] = {
     152                 :             :   "MO_USE",
     153                 :             :   "MO_USE_NO_VAR",
     154                 :             :   "MO_VAL_USE",
     155                 :             :   "MO_VAL_LOC",
     156                 :             :   "MO_VAL_SET",
     157                 :             :   "MO_SET",
     158                 :             :   "MO_COPY",
     159                 :             :   "MO_CLOBBER",
     160                 :             :   "MO_CALL",
     161                 :             :   "MO_ADJUST"
     162                 :             : };
     163                 :             : 
     164                 :             : /* Where shall the note be emitted?  BEFORE or AFTER the instruction.
     165                 :             :    Notes emitted as AFTER_CALL are to take effect during the call,
     166                 :             :    rather than after the call.  */
     167                 :             : enum emit_note_where
     168                 :             : {
     169                 :             :   EMIT_NOTE_BEFORE_INSN,
     170                 :             :   EMIT_NOTE_AFTER_INSN,
     171                 :             :   EMIT_NOTE_AFTER_CALL_INSN
     172                 :             : };
     173                 :             : 
     174                 :             : /* Structure holding information about micro operation.  */
     175                 :             : struct micro_operation
     176                 :             : {
     177                 :             :   /* Type of micro operation.  */
     178                 :             :   enum micro_operation_type type;
     179                 :             : 
     180                 :             :   /* The instruction which the micro operation is in, for MO_USE,
     181                 :             :      MO_USE_NO_VAR, MO_CALL and MO_ADJUST, or the subsequent
     182                 :             :      instruction or note in the original flow (before any var-tracking
     183                 :             :      notes are inserted, to simplify emission of notes), for MO_SET
     184                 :             :      and MO_CLOBBER.  */
     185                 :             :   rtx_insn *insn;
     186                 :             : 
     187                 :             :   union {
     188                 :             :     /* Location.  For MO_SET and MO_COPY, this is the SET that
     189                 :             :        performs the assignment, if known, otherwise it is the target
     190                 :             :        of the assignment.  For MO_VAL_USE and MO_VAL_SET, it is a
     191                 :             :        CONCAT of the VALUE and the LOC associated with it.  For
     192                 :             :        MO_VAL_LOC, it is a CONCAT of the VALUE and the VAR_LOCATION
     193                 :             :        associated with it.  */
     194                 :             :     rtx loc;
     195                 :             : 
     196                 :             :     /* Stack adjustment.  */
     197                 :             :     HOST_WIDE_INT adjust;
     198                 :             :   } u;
     199                 :             : };
     200                 :             : 
     201                 :             : 
     202                 :             : /* A declaration of a variable, or an RTL value being handled like a
     203                 :             :    declaration by pointer_mux.  */
     204                 :             : typedef pointer_mux<tree_node, rtx_def> decl_or_value;
     205                 :             : 
     206                 :             : /* Return true if a decl_or_value DV is a DECL or NULL.  */
     207                 :             : static inline bool
     208                 : 40465493812 : dv_is_decl_p (decl_or_value dv)
     209                 :             : {
     210                 : 33788265318 :   return dv.is_first ();
     211                 :             : }
     212                 :             : 
     213                 :             : /* Return true if a decl_or_value is a VALUE rtl.  */
     214                 :             : static inline bool
     215                 : 33837406535 : dv_is_value_p (decl_or_value dv)
     216                 :             : {
     217                 : 33837406535 :   return dv && !dv_is_decl_p (dv);
     218                 :             : }
     219                 :             : 
     220                 :             : /* Return the decl in the decl_or_value.  */
     221                 :             : static inline tree
     222                 :  6273401934 : dv_as_decl (decl_or_value dv)
     223                 :             : {
     224                 :  6273401934 :   gcc_checking_assert (dv_is_decl_p (dv));
     225                 :  6273401934 :   return dv.known_first ();
     226                 :             : }
     227                 :             : 
     228                 :             : /* Return the value in the decl_or_value.  */
     229                 :             : static inline rtx
     230                 : 13265814558 : dv_as_value (decl_or_value dv)
     231                 :             : {
     232                 : 13265814558 :   gcc_checking_assert (dv_is_value_p (dv));
     233                 : 13265814558 :   return dv.known_second ();
     234                 :             : }
     235                 :             : 
     236                 :             : 
     237                 :             : /* Description of location of a part of a variable.  The content of a physical
     238                 :             :    register is described by a chain of these structures.
     239                 :             :    The chains are pretty short (usually 1 or 2 elements) and thus
     240                 :             :    chain is the best data structure.  */
     241                 :             : struct attrs
     242                 :             : {
     243                 :             :   /* Pointer to next member of the list.  */
     244                 :             :   attrs *next;
     245                 :             : 
     246                 :             :   /* The rtx of register.  */
     247                 :             :   rtx loc;
     248                 :             : 
     249                 :             :   /* The declaration corresponding to LOC.  */
     250                 :             :   decl_or_value dv;
     251                 :             : 
     252                 :             :   /* Offset from start of DECL.  */
     253                 :             :   HOST_WIDE_INT offset;
     254                 :             : };
     255                 :             : 
     256                 :             : /* Structure for chaining the locations.  */
     257                 :             : struct location_chain
     258                 :             : {
     259                 :             :   /* Next element in the chain.  */
     260                 :             :   location_chain *next;
     261                 :             : 
     262                 :             :   /* The location (REG, MEM or VALUE).  */
     263                 :             :   rtx loc;
     264                 :             : 
     265                 :             :   /* The "value" stored in this location.  */
     266                 :             :   rtx set_src;
     267                 :             : 
     268                 :             :   /* Initialized? */
     269                 :             :   enum var_init_status init;
     270                 :             : };
     271                 :             : 
     272                 :             : /* A vector of loc_exp_dep holds the active dependencies of a one-part
     273                 :             :    DV on VALUEs, i.e., the VALUEs expanded so as to form the current
     274                 :             :    location of DV.  Each entry is also part of VALUE' s linked-list of
     275                 :             :    backlinks back to DV.  */
     276                 :             : struct loc_exp_dep
     277                 :             : {
     278                 :             :   /* The dependent DV.  */
     279                 :             :   decl_or_value dv;
     280                 :             :   /* The dependency VALUE or DECL_DEBUG.  */
     281                 :             :   rtx value;
     282                 :             :   /* The next entry in VALUE's backlinks list.  */
     283                 :             :   struct loc_exp_dep *next;
     284                 :             :   /* A pointer to the pointer to this entry (head or prev's next) in
     285                 :             :      the doubly-linked list.  */
     286                 :             :   struct loc_exp_dep **pprev;
     287                 :             : };
     288                 :             : 
     289                 :             : 
     290                 :             : /* This data structure holds information about the depth of a variable
     291                 :             :    expansion.  */
     292                 :             : struct expand_depth
     293                 :             : {
     294                 :             :   /* This measures the complexity of the expanded expression.  It
     295                 :             :      grows by one for each level of expansion that adds more than one
     296                 :             :      operand.  */
     297                 :             :   int complexity;
     298                 :             :   /* This counts the number of ENTRY_VALUE expressions in an
     299                 :             :      expansion.  We want to minimize their use.  */
     300                 :             :   int entryvals;
     301                 :             : };
     302                 :             : 
     303                 :             : /* Type for dependencies actively used when expand FROM into cur_loc.  */
     304                 :             : typedef vec<loc_exp_dep, va_heap, vl_embed> deps_vec;
     305                 :             : 
     306                 :             : /* This data structure is allocated for one-part variables at the time
     307                 :             :    of emitting notes.  */
     308                 :             : struct onepart_aux
     309                 :             : {
     310                 :             :   /* Doubly-linked list of dependent DVs.  These are DVs whose cur_loc
     311                 :             :      computation used the expansion of this variable, and that ought
     312                 :             :      to be notified should this variable change.  If the DV's cur_loc
     313                 :             :      expanded to NULL, all components of the loc list are regarded as
     314                 :             :      active, so that any changes in them give us a chance to get a
     315                 :             :      location.  Otherwise, only components of the loc that expanded to
     316                 :             :      non-NULL are regarded as active dependencies.  */
     317                 :             :   loc_exp_dep *backlinks;
     318                 :             :   /* This holds the LOC that was expanded into cur_loc.  We need only
     319                 :             :      mark a one-part variable as changed if the FROM loc is removed,
     320                 :             :      or if it has no known location and a loc is added, or if it gets
     321                 :             :      a change notification from any of its active dependencies.  */
     322                 :             :   rtx from;
     323                 :             :   /* The depth of the cur_loc expression.  */
     324                 :             :   expand_depth depth;
     325                 :             :   /* Dependencies actively used when expand FROM into cur_loc.  */
     326                 :             :   deps_vec deps;
     327                 :             : };
     328                 :             : 
     329                 :             : /* Structure describing one part of variable.  */
     330                 :             : struct variable_part
     331                 :             : {
     332                 :             :   /* Chain of locations of the part.  */
     333                 :             :   location_chain *loc_chain;
     334                 :             : 
     335                 :             :   /* Location which was last emitted to location list.  */
     336                 :             :   rtx cur_loc;
     337                 :             : 
     338                 :             :   union variable_aux
     339                 :             :   {
     340                 :             :     /* The offset in the variable, if !var->onepart.  */
     341                 :             :     HOST_WIDE_INT offset;
     342                 :             : 
     343                 :             :     /* Pointer to auxiliary data, if var->onepart and emit_notes.  */
     344                 :             :     struct onepart_aux *onepaux;
     345                 :             :   } aux;
     346                 :             : };
     347                 :             : 
     348                 :             : /* Maximum number of location parts.  */
     349                 :             : #define MAX_VAR_PARTS 16
     350                 :             : 
     351                 :             : /* Enumeration type used to discriminate various types of one-part
     352                 :             :    variables.  */
     353                 :             : enum onepart_enum
     354                 :             : {
     355                 :             :   /* Not a one-part variable.  */
     356                 :             :   NOT_ONEPART = 0,
     357                 :             :   /* A one-part DECL that is not a DEBUG_EXPR_DECL.  */
     358                 :             :   ONEPART_VDECL = 1,
     359                 :             :   /* A DEBUG_EXPR_DECL.  */
     360                 :             :   ONEPART_DEXPR = 2,
     361                 :             :   /* A VALUE.  */
     362                 :             :   ONEPART_VALUE = 3
     363                 :             : };
     364                 :             : 
     365                 :             : /* Structure describing where the variable is located.  */
     366                 :             : struct variable
     367                 :             : {
     368                 :             :   /* The declaration of the variable, or an RTL value being handled
     369                 :             :      like a declaration.  */
     370                 :             :   decl_or_value dv;
     371                 :             : 
     372                 :             :   /* Reference count.  */
     373                 :             :   int refcount;
     374                 :             : 
     375                 :             :   /* Number of variable parts.  */
     376                 :             :   char n_var_parts;
     377                 :             : 
     378                 :             :   /* What type of DV this is, according to enum onepart_enum.  */
     379                 :             :   ENUM_BITFIELD (onepart_enum) onepart : CHAR_BIT;
     380                 :             : 
     381                 :             :   /* True if this variable_def struct is currently in the
     382                 :             :      changed_variables hash table.  */
     383                 :             :   bool in_changed_variables;
     384                 :             : 
     385                 :             :   /* The variable parts.  */
     386                 :             :   variable_part var_part[1];
     387                 :             : };
     388                 :             : 
     389                 :             : /* Pointer to the BB's information specific to variable tracking pass.  */
     390                 :             : #define VTI(BB) ((variable_tracking_info *) (BB)->aux)
     391                 :             : 
     392                 :             : /* Return MEM_OFFSET (MEM) as a HOST_WIDE_INT, or 0 if we can't.  */
     393                 :             : 
     394                 :             : static inline HOST_WIDE_INT
     395                 :    20078502 : int_mem_offset (const_rtx mem)
     396                 :             : {
     397                 :    20078502 :   HOST_WIDE_INT offset;
     398                 :    20078505 :   if (MEM_OFFSET_KNOWN_P (mem) && MEM_OFFSET (mem).is_constant (&offset))
     399                 :    17305124 :     return offset;
     400                 :             :   return 0;
     401                 :             : }
     402                 :             : 
     403                 :             : #if CHECKING_P && (GCC_VERSION >= 2007)
     404                 :             : 
     405                 :             : /* Access VAR's Ith part's offset, checking that it's not a one-part
     406                 :             :    variable.  */
     407                 :             : #define VAR_PART_OFFSET(var, i) __extension__                   \
     408                 :             : (*({  variable *const __v = (var);                              \
     409                 :             :       gcc_checking_assert (!__v->onepart);                   \
     410                 :             :       &__v->var_part[(i)].aux.offset; }))
     411                 :             : 
     412                 :             : /* Access VAR's one-part auxiliary data, checking that it is a
     413                 :             :    one-part variable.  */
     414                 :             : #define VAR_LOC_1PAUX(var) __extension__                        \
     415                 :             : (*({  variable *const __v = (var);                              \
     416                 :             :       gcc_checking_assert (__v->onepart);                    \
     417                 :             :       &__v->var_part[0].aux.onepaux; }))
     418                 :             : 
     419                 :             : #else
     420                 :             : #define VAR_PART_OFFSET(var, i) ((var)->var_part[(i)].aux.offset)
     421                 :             : #define VAR_LOC_1PAUX(var) ((var)->var_part[0].aux.onepaux)
     422                 :             : #endif
     423                 :             : 
     424                 :             : /* These are accessor macros for the one-part auxiliary data.  When
     425                 :             :    convenient for users, they're guarded by tests that the data was
     426                 :             :    allocated.  */
     427                 :             : #define VAR_LOC_DEP_LST(var) (VAR_LOC_1PAUX (var)                 \
     428                 :             :                               ? VAR_LOC_1PAUX (var)->backlinks         \
     429                 :             :                               : NULL)
     430                 :             : #define VAR_LOC_DEP_LSTP(var) (VAR_LOC_1PAUX (var)                \
     431                 :             :                                ? &VAR_LOC_1PAUX (var)->backlinks  \
     432                 :             :                                : NULL)
     433                 :             : #define VAR_LOC_FROM(var) (VAR_LOC_1PAUX (var)->from)
     434                 :             : #define VAR_LOC_DEPTH(var) (VAR_LOC_1PAUX (var)->depth)
     435                 :             : #define VAR_LOC_DEP_VEC(var) var_loc_dep_vec (var)
     436                 :             : 
     437                 :             : /* Implements the VAR_LOC_DEP_VEC above as a function to work around
     438                 :             :    a bogus -Wnonnull (PR c/95554). */
     439                 :             : 
     440                 :             : static inline deps_vec*
     441                 :   559444121 : var_loc_dep_vec (variable *var)
     442                 :             : {
     443                 :   559444121 :   return VAR_LOC_1PAUX (var) ? &VAR_LOC_1PAUX (var)->deps : NULL;
     444                 :             : }
     445                 :             : 
     446                 :             : 
     447                 :             : typedef unsigned int dvuid;
     448                 :             : 
     449                 :             : /* Return the uid of DV.  */
     450                 :             : 
     451                 :             : static inline dvuid
     452                 : 17754689064 : dv_uid (decl_or_value dv)
     453                 :             : {
     454                 : 17754689064 :   if (dv_is_value_p (dv))
     455                 : 12092571565 :     return CSELIB_VAL_PTR (dv_as_value (dv))->uid;
     456                 :             :   else
     457                 :  5662117499 :     return DECL_UID (dv_as_decl (dv));
     458                 :             : }
     459                 :             : 
     460                 :             : /* Compute the hash from the uid.  */
     461                 :             : 
     462                 :             : static inline hashval_t
     463                 :             : dv_uid2hash (dvuid uid)
     464                 :             : {
     465                 :             :   return uid;
     466                 :             : }
     467                 :             : 
     468                 :             : /* The hash function for a mask table in a shared_htab chain.  */
     469                 :             : 
     470                 :             : static inline hashval_t
     471                 : 17754689064 : dv_htab_hash (decl_or_value dv)
     472                 :             : {
     473                 : 17754689064 :   return dv_uid2hash (dv_uid (dv));
     474                 :             : }
     475                 :             : 
     476                 :             : static void variable_htab_free (void *);
     477                 :             : 
     478                 :             : /* Variable hashtable helpers.  */
     479                 :             : 
     480                 :             : struct variable_hasher : pointer_hash <variable>
     481                 :             : {
     482                 :             :   typedef decl_or_value compare_type;
     483                 :             :   static inline hashval_t hash (const variable *);
     484                 :             :   static inline bool equal (const variable *, const decl_or_value);
     485                 :             :   static inline void remove (variable *);
     486                 :             : };
     487                 :             : 
     488                 :             : /* The hash function for variable_htab, computes the hash value
     489                 :             :    from the declaration of variable X.  */
     490                 :             : 
     491                 :             : inline hashval_t
     492                 : 14780024403 : variable_hasher::hash (const variable *v)
     493                 :             : {
     494                 : 14780024403 :   return dv_htab_hash (v->dv);
     495                 :             : }
     496                 :             : 
     497                 :             : /* Compare the declaration of variable X with declaration Y.  */
     498                 :             : 
     499                 :             : inline bool
     500                 : 17235279862 : variable_hasher::equal (const variable *v, const decl_or_value y)
     501                 :             : {
     502                 : 17235279862 :   return v->dv == y;
     503                 :             : }
     504                 :             : 
     505                 :             : /* Free the element of VARIABLE_HTAB (its type is struct variable_def).  */
     506                 :             : 
     507                 :             : inline void
     508                 :   957446085 : variable_hasher::remove (variable *var)
     509                 :             : {
     510                 :   957446085 :   variable_htab_free (var);
     511                 :   724906563 : }
     512                 :             : 
     513                 :             : typedef hash_table<variable_hasher> variable_table_type;
     514                 :             : typedef variable_table_type::iterator variable_iterator_type;
     515                 :             : 
     516                 :             : /* Structure for passing some other parameters to function
     517                 :             :    emit_note_insn_var_location.  */
     518                 :             : struct emit_note_data
     519                 :             : {
     520                 :             :   /* The instruction which the note will be emitted before/after.  */
     521                 :             :   rtx_insn *insn;
     522                 :             : 
     523                 :             :   /* Where the note will be emitted (before/after insn)?  */
     524                 :             :   enum emit_note_where where;
     525                 :             : 
     526                 :             :   /* The variables and values active at this point.  */
     527                 :             :   variable_table_type *vars;
     528                 :             : };
     529                 :             : 
     530                 :             : /* Structure holding a refcounted hash table.  If refcount > 1,
     531                 :             :    it must be first unshared before modified.  */
     532                 :             : struct shared_hash
     533                 :             : {
     534                 :             :   /* Reference count.  */
     535                 :             :   int refcount;
     536                 :             : 
     537                 :             :   /* Actual hash table.  */
     538                 :             :   variable_table_type *htab;
     539                 :             : };
     540                 :             : 
     541                 :             : /* Structure holding the IN or OUT set for a basic block.  */
     542                 :             : struct dataflow_set
     543                 :             : {
     544                 :             :   /* Adjustment of stack offset.  */
     545                 :             :   HOST_WIDE_INT stack_adjust;
     546                 :             : 
     547                 :             :   /* Attributes for registers (lists of attrs).  */
     548                 :             :   attrs *regs[FIRST_PSEUDO_REGISTER];
     549                 :             : 
     550                 :             :   /* Variable locations.  */
     551                 :             :   shared_hash *vars;
     552                 :             : 
     553                 :             :   /* Vars that is being traversed.  */
     554                 :             :   shared_hash *traversed_vars;
     555                 :             : };
     556                 :             : 
     557                 :             : /* The structure (one for each basic block) containing the information
     558                 :             :    needed for variable tracking.  */
     559                 :             : struct variable_tracking_info
     560                 :             : {
     561                 :             :   /* The vector of micro operations.  */
     562                 :             :   vec<micro_operation> mos;
     563                 :             : 
     564                 :             :   /* The IN and OUT set for dataflow analysis.  */
     565                 :             :   dataflow_set in;
     566                 :             :   dataflow_set out;
     567                 :             : 
     568                 :             :   /* The permanent-in dataflow set for this block.  This is used to
     569                 :             :      hold values for which we had to compute entry values.  ??? This
     570                 :             :      should probably be dynamically allocated, to avoid using more
     571                 :             :      memory in non-debug builds.  */
     572                 :             :   dataflow_set *permp;
     573                 :             : 
     574                 :             :   /* Has the block been visited in DFS?  */
     575                 :             :   bool visited;
     576                 :             : 
     577                 :             :   /* Has the block been flooded in VTA?  */
     578                 :             :   bool flooded;
     579                 :             : 
     580                 :             : };
     581                 :             : 
     582                 :             : /* Alloc pool for struct attrs_def.  */
     583                 :             : object_allocator<attrs> attrs_pool ("attrs pool");
     584                 :             : 
     585                 :             : /* Alloc pool for struct variable_def with MAX_VAR_PARTS entries.  */
     586                 :             : 
     587                 :             : static pool_allocator var_pool
     588                 :             :   ("variable_def pool", sizeof (variable) +
     589                 :             :    (MAX_VAR_PARTS - 1) * sizeof (((variable *)NULL)->var_part[0]));
     590                 :             : 
     591                 :             : /* Alloc pool for struct variable_def with a single var_part entry.  */
     592                 :             : static pool_allocator valvar_pool
     593                 :             :   ("small variable_def pool", sizeof (variable));
     594                 :             : 
     595                 :             : /* Alloc pool for struct location_chain.  */
     596                 :             : static object_allocator<location_chain> location_chain_pool
     597                 :             :   ("location_chain pool");
     598                 :             : 
     599                 :             : /* Alloc pool for struct shared_hash.  */
     600                 :             : static object_allocator<shared_hash> shared_hash_pool ("shared_hash pool");
     601                 :             : 
     602                 :             : /* Alloc pool for struct loc_exp_dep_s for NOT_ONEPART variables.  */
     603                 :             : object_allocator<loc_exp_dep> loc_exp_dep_pool ("loc_exp_dep pool");
     604                 :             : 
     605                 :             : /* Changed variables, notes will be emitted for them.  */
     606                 :             : static variable_table_type *changed_variables;
     607                 :             : 
     608                 :             : /* Shall notes be emitted?  */
     609                 :             : static bool emit_notes;
     610                 :             : 
     611                 :             : /* Values whose dynamic location lists have gone empty, but whose
     612                 :             :    cselib location lists are still usable.  Use this to hold the
     613                 :             :    current location, the backlinks, etc, during emit_notes.  */
     614                 :             : static variable_table_type *dropped_values;
     615                 :             : 
     616                 :             : /* Empty shared hashtable.  */
     617                 :             : static shared_hash *empty_shared_hash;
     618                 :             : 
     619                 :             : /* Scratch register bitmap used by cselib_expand_value_rtx.  */
     620                 :             : static bitmap scratch_regs = NULL;
     621                 :             : 
     622                 :             : #ifdef HAVE_window_save
     623                 :             : struct GTY(()) parm_reg {
     624                 :             :   rtx outgoing;
     625                 :             :   rtx incoming;
     626                 :             : };
     627                 :             : 
     628                 :             : 
     629                 :             : /* Vector of windowed parameter registers, if any.  */
     630                 :             : static vec<parm_reg, va_gc> *windowed_parm_regs = NULL;
     631                 :             : #endif
     632                 :             : 
     633                 :             : /* Variable used to tell whether cselib_process_insn called our hook.  */
     634                 :             : static bool cselib_hook_called;
     635                 :             : 
     636                 :             : /* Local function prototypes.  */
     637                 :             : static void stack_adjust_offset_pre_post (rtx, HOST_WIDE_INT *,
     638                 :             :                                           HOST_WIDE_INT *);
     639                 :             : static void insn_stack_adjust_offset_pre_post (rtx_insn *, HOST_WIDE_INT *,
     640                 :             :                                                HOST_WIDE_INT *);
     641                 :             : static bool vt_stack_adjustments (void);
     642                 :             : 
     643                 :             : static void init_attrs_list_set (attrs **);
     644                 :             : static void attrs_list_clear (attrs **);
     645                 :             : static attrs *attrs_list_member (attrs *, decl_or_value, HOST_WIDE_INT);
     646                 :             : static void attrs_list_insert (attrs **, decl_or_value, HOST_WIDE_INT, rtx);
     647                 :             : static void attrs_list_copy (attrs **, attrs *);
     648                 :             : static void attrs_list_union (attrs **, attrs *);
     649                 :             : 
     650                 :             : static variable **unshare_variable (dataflow_set *set, variable **slot,
     651                 :             :                                         variable *var, enum var_init_status);
     652                 :             : static void vars_copy (variable_table_type *, variable_table_type *);
     653                 :             : static tree var_debug_decl (tree);
     654                 :             : static void var_reg_set (dataflow_set *, rtx, enum var_init_status, rtx);
     655                 :             : static void var_reg_delete_and_set (dataflow_set *, rtx, bool,
     656                 :             :                                     enum var_init_status, rtx);
     657                 :             : static void var_reg_delete (dataflow_set *, rtx, bool);
     658                 :             : static void var_regno_delete (dataflow_set *, int);
     659                 :             : static void var_mem_set (dataflow_set *, rtx, enum var_init_status, rtx);
     660                 :             : static void var_mem_delete_and_set (dataflow_set *, rtx, bool,
     661                 :             :                                     enum var_init_status, rtx);
     662                 :             : static void var_mem_delete (dataflow_set *, rtx, bool);
     663                 :             : 
     664                 :             : static void dataflow_set_init (dataflow_set *);
     665                 :             : static void dataflow_set_clear (dataflow_set *);
     666                 :             : static void dataflow_set_copy (dataflow_set *, dataflow_set *);
     667                 :             : static int variable_union_info_cmp_pos (const void *, const void *);
     668                 :             : static void dataflow_set_union (dataflow_set *, dataflow_set *);
     669                 :             : static location_chain *find_loc_in_1pdv (rtx, variable *,
     670                 :             :                                          variable_table_type *);
     671                 :             : static bool canon_value_cmp (rtx, rtx);
     672                 :             : static int loc_cmp (rtx, rtx);
     673                 :             : static bool variable_part_different_p (variable_part *, variable_part *);
     674                 :             : static bool onepart_variable_different_p (variable *, variable *);
     675                 :             : static bool variable_different_p (variable *, variable *);
     676                 :             : static bool dataflow_set_different (dataflow_set *, dataflow_set *);
     677                 :             : static void dataflow_set_destroy (dataflow_set *);
     678                 :             : 
     679                 :             : static bool track_expr_p (tree, bool);
     680                 :             : static void add_uses_1 (rtx *, void *);
     681                 :             : static void add_stores (rtx, const_rtx, void *);
     682                 :             : static bool compute_bb_dataflow (basic_block);
     683                 :             : static bool vt_find_locations (void);
     684                 :             : 
     685                 :             : static void dump_attrs_list (attrs *);
     686                 :             : static void dump_var (variable *);
     687                 :             : static void dump_vars (variable_table_type *);
     688                 :             : static void dump_dataflow_set (dataflow_set *);
     689                 :             : static void dump_dataflow_sets (void);
     690                 :             : 
     691                 :             : static void set_dv_changed (decl_or_value, bool);
     692                 :             : static void variable_was_changed (variable *, dataflow_set *);
     693                 :             : static variable **set_slot_part (dataflow_set *, rtx, variable **,
     694                 :             :                                  decl_or_value, HOST_WIDE_INT,
     695                 :             :                                  enum var_init_status, rtx);
     696                 :             : static void set_variable_part (dataflow_set *, rtx,
     697                 :             :                                decl_or_value, HOST_WIDE_INT,
     698                 :             :                                enum var_init_status, rtx, enum insert_option);
     699                 :             : static variable **clobber_slot_part (dataflow_set *, rtx,
     700                 :             :                                      variable **, HOST_WIDE_INT, rtx);
     701                 :             : static void clobber_variable_part (dataflow_set *, rtx,
     702                 :             :                                    decl_or_value, HOST_WIDE_INT, rtx);
     703                 :             : static variable **delete_slot_part (dataflow_set *, rtx, variable **,
     704                 :             :                                     HOST_WIDE_INT);
     705                 :             : static void delete_variable_part (dataflow_set *, rtx,
     706                 :             :                                   decl_or_value, HOST_WIDE_INT);
     707                 :             : static void emit_notes_in_bb (basic_block, dataflow_set *);
     708                 :             : static void vt_emit_notes (void);
     709                 :             : 
     710                 :             : static void vt_add_function_parameters (void);
     711                 :             : static bool vt_initialize (void);
     712                 :             : static void vt_finalize (void);
     713                 :             : 
     714                 :             : /* Callback for stack_adjust_offset_pre_post, called via for_each_inc_dec.  */
     715                 :             : 
     716                 :             : static int
     717                 :     5540847 : stack_adjust_offset_pre_post_cb (rtx, rtx op, rtx dest, rtx src, rtx srcoff,
     718                 :             :                                  void *arg)
     719                 :             : {
     720                 :     5540847 :   if (dest != stack_pointer_rtx)
     721                 :             :     return 0;
     722                 :             : 
     723                 :     5540847 :   switch (GET_CODE (op))
     724                 :             :     {
     725                 :     3939758 :     case PRE_INC:
     726                 :     3939758 :     case PRE_DEC:
     727                 :     3939758 :       ((HOST_WIDE_INT *)arg)[0] -= INTVAL (srcoff);
     728                 :     3939758 :       return 0;
     729                 :     1562648 :     case POST_INC:
     730                 :     1562648 :     case POST_DEC:
     731                 :     1562648 :       ((HOST_WIDE_INT *)arg)[1] -= INTVAL (srcoff);
     732                 :     1562648 :       return 0;
     733                 :       38441 :     case PRE_MODIFY:
     734                 :       38441 :     case POST_MODIFY:
     735                 :             :       /* We handle only adjustments by constant amount.  */
     736                 :       38441 :       gcc_assert (GET_CODE (src) == PLUS
     737                 :             :                   && CONST_INT_P (XEXP (src, 1))
     738                 :             :                   && XEXP (src, 0) == stack_pointer_rtx);
     739                 :       38441 :       ((HOST_WIDE_INT *)arg)[GET_CODE (op) == POST_MODIFY]
     740                 :       38441 :         -= INTVAL (XEXP (src, 1));
     741                 :       38441 :       return 0;
     742                 :           0 :     default:
     743                 :           0 :       gcc_unreachable ();
     744                 :             :     }
     745                 :             : }
     746                 :             : 
     747                 :             : /* Given a SET, calculate the amount of stack adjustment it contains
     748                 :             :    PRE- and POST-modifying stack pointer.
     749                 :             :    This function is similar to stack_adjust_offset.  */
     750                 :             : 
     751                 :             : static void
     752                 :    62297421 : stack_adjust_offset_pre_post (rtx pattern, HOST_WIDE_INT *pre,
     753                 :             :                               HOST_WIDE_INT *post)
     754                 :             : {
     755                 :    62297421 :   rtx src = SET_SRC (pattern);
     756                 :    62297421 :   rtx dest = SET_DEST (pattern);
     757                 :    62297421 :   enum rtx_code code;
     758                 :             : 
     759                 :    62297421 :   if (dest == stack_pointer_rtx)
     760                 :             :     {
     761                 :             :       /* (set (reg sp) (plus (reg sp) (const_int))) */
     762                 :     3209997 :       code = GET_CODE (src);
     763                 :     3209997 :       if (! (code == PLUS || code == MINUS)
     764                 :     3209474 :           || XEXP (src, 0) != stack_pointer_rtx
     765                 :     3209474 :           || !CONST_INT_P (XEXP (src, 1)))
     766                 :     3209997 :         return;
     767                 :             : 
     768                 :     3209354 :       if (code == MINUS)
     769                 :           4 :         *post += INTVAL (XEXP (src, 1));
     770                 :             :       else
     771                 :     3209350 :         *post -= INTVAL (XEXP (src, 1));
     772                 :     3209354 :       return;
     773                 :             :     }
     774                 :    59087424 :   HOST_WIDE_INT res[2] = { 0, 0 };
     775                 :    59087424 :   for_each_inc_dec (pattern, stack_adjust_offset_pre_post_cb, res);
     776                 :    59087424 :   *pre += res[0];
     777                 :    59087424 :   *post += res[1];
     778                 :             : }
     779                 :             : 
     780                 :             : /* Given an INSN, calculate the amount of stack adjustment it contains
     781                 :             :    PRE- and POST-modifying stack pointer.  */
     782                 :             : 
     783                 :             : static void
     784                 :   138603634 : insn_stack_adjust_offset_pre_post (rtx_insn *insn, HOST_WIDE_INT *pre,
     785                 :             :                                    HOST_WIDE_INT *post)
     786                 :             : {
     787                 :   138603634 :   rtx pattern;
     788                 :             : 
     789                 :   138603634 :   *pre = 0;
     790                 :   138603634 :   *post = 0;
     791                 :             : 
     792                 :   138603634 :   pattern = PATTERN (insn);
     793                 :   138603634 :   if (RTX_FRAME_RELATED_P (insn))
     794                 :             :     {
     795                 :     3993779 :       rtx expr = find_reg_note (insn, REG_FRAME_RELATED_EXPR, NULL_RTX);
     796                 :     3993779 :       if (expr)
     797                 :          32 :         pattern = XEXP (expr, 0);
     798                 :             :     }
     799                 :             : 
     800                 :   138603634 :   if (GET_CODE (pattern) == SET)
     801                 :    53586348 :     stack_adjust_offset_pre_post (pattern, pre, post);
     802                 :    85017286 :   else if (GET_CODE (pattern) == PARALLEL
     803                 :    76702472 :            || GET_CODE (pattern) == SEQUENCE)
     804                 :             :     {
     805                 :     8314814 :       int i;
     806                 :             : 
     807                 :             :       /* There may be stack adjustments inside compound insns.  Search
     808                 :             :          for them.  */
     809                 :    26589118 :       for ( i = XVECLEN (pattern, 0) - 1; i >= 0; i--)
     810                 :    18274304 :         if (GET_CODE (XVECEXP (pattern, 0, i)) == SET)
     811                 :     8711073 :           stack_adjust_offset_pre_post (XVECEXP (pattern, 0, i), pre, post);
     812                 :             :     }
     813                 :   138603634 : }
     814                 :             : 
     815                 :             : /* Compute stack adjustments for all blocks by traversing DFS tree.
     816                 :             :    Return true when the adjustments on all incoming edges are consistent.
     817                 :             :    Heavily borrowed from pre_and_rev_post_order_compute.  */
     818                 :             : 
     819                 :             : static bool
     820                 :      456837 : vt_stack_adjustments (void)
     821                 :             : {
     822                 :      456837 :   edge_iterator *stack;
     823                 :      456837 :   int sp;
     824                 :             : 
     825                 :             :   /* Initialize entry block.  */
     826                 :      456837 :   VTI (ENTRY_BLOCK_PTR_FOR_FN (cfun))->visited = true;
     827                 :      456837 :   VTI (ENTRY_BLOCK_PTR_FOR_FN (cfun))->in.stack_adjust
     828                 :      456837 :     = INCOMING_FRAME_SP_OFFSET;
     829                 :      456837 :   VTI (ENTRY_BLOCK_PTR_FOR_FN (cfun))->out.stack_adjust
     830                 :      456837 :     = INCOMING_FRAME_SP_OFFSET;
     831                 :             : 
     832                 :             :   /* Allocate stack for back-tracking up CFG.  */
     833                 :      456837 :   stack = XNEWVEC (edge_iterator, n_basic_blocks_for_fn (cfun) + 1);
     834                 :      456837 :   sp = 0;
     835                 :             : 
     836                 :             :   /* Push the first edge on to the stack.  */
     837                 :      456837 :   stack[sp++] = ei_start (ENTRY_BLOCK_PTR_FOR_FN (cfun)->succs);
     838                 :             : 
     839                 :    15526957 :   while (sp)
     840                 :             :     {
     841                 :    15070182 :       edge_iterator ei;
     842                 :    15070182 :       basic_block src;
     843                 :    15070182 :       basic_block dest;
     844                 :             : 
     845                 :             :       /* Look at the edge on the top of the stack.  */
     846                 :    15070182 :       ei = stack[sp - 1];
     847                 :    15070182 :       src = ei_edge (ei)->src;
     848                 :    15070182 :       dest = ei_edge (ei)->dest;
     849                 :             : 
     850                 :             :       /* Check if the edge destination has been visited yet.  */
     851                 :    15070182 :       if (!VTI (dest)->visited)
     852                 :             :         {
     853                 :     6199627 :           rtx_insn *insn;
     854                 :     6199627 :           HOST_WIDE_INT pre, post, offset;
     855                 :     6199627 :           VTI (dest)->visited = true;
     856                 :     6199627 :           VTI (dest)->in.stack_adjust = offset = VTI (src)->out.stack_adjust;
     857                 :             : 
     858                 :     6199627 :           if (dest != EXIT_BLOCK_PTR_FOR_FN (cfun))
     859                 :    88178495 :             for (insn = BB_HEAD (dest);
     860                 :    88178495 :                  insn != NEXT_INSN (BB_END (dest));
     861                 :    82428220 :                  insn = NEXT_INSN (insn))
     862                 :    82428220 :               if (INSN_P (insn))
     863                 :             :                 {
     864                 :    69305305 :                   insn_stack_adjust_offset_pre_post (insn, &pre, &post);
     865                 :    69305305 :                   offset += pre + post;
     866                 :             :                 }
     867                 :             : 
     868                 :     6199627 :           VTI (dest)->out.stack_adjust = offset;
     869                 :             : 
     870                 :    11697468 :           if (EDGE_COUNT (dest->succs) > 0)
     871                 :             :             /* Since the DEST node has been visited for the first
     872                 :             :                time, check its successors.  */
     873                 :     5497841 :             stack[sp++] = ei_start (dest->succs);
     874                 :             :         }
     875                 :             :       else
     876                 :             :         {
     877                 :             :           /* We can end up with different stack adjustments for the exit block
     878                 :             :              of a shrink-wrapped function if stack_adjust_offset_pre_post
     879                 :             :              doesn't understand the rtx pattern used to restore the stack
     880                 :             :              pointer in the epilogue.  For example, on s390(x), the stack
     881                 :             :              pointer is often restored via a load-multiple instruction
     882                 :             :              and so no stack_adjust offset is recorded for it.  This means
     883                 :             :              that the stack offset at the end of the epilogue block is the
     884                 :             :              same as the offset before the epilogue, whereas other paths
     885                 :             :              to the exit block will have the correct stack_adjust.
     886                 :             : 
     887                 :             :              It is safe to ignore these differences because (a) we never
     888                 :             :              use the stack_adjust for the exit block in this pass and
     889                 :             :              (b) dwarf2cfi checks whether the CFA notes in a shrink-wrapped
     890                 :             :              function are correct.
     891                 :             : 
     892                 :             :              We must check whether the adjustments on other edges are
     893                 :             :              the same though.  */
     894                 :     8870555 :           if (dest != EXIT_BLOCK_PTR_FOR_FN (cfun)
     895                 :     8295135 :               && VTI (dest)->in.stack_adjust != VTI (src)->out.stack_adjust)
     896                 :             :             {
     897                 :          62 :               free (stack);
     898                 :          62 :               return false;
     899                 :             :             }
     900                 :             : 
     901                 :     8870493 :           if (! ei_one_before_end_p (ei))
     902                 :             :             /* Go to the next edge.  */
     903                 :     2916188 :             ei_next (&stack[sp - 1]);
     904                 :             :           else
     905                 :             :             /* Return to previous level if there are no more edges.  */
     906                 :     5954305 :             sp--;
     907                 :             :         }
     908                 :             :     }
     909                 :             : 
     910                 :      456775 :   free (stack);
     911                 :      456775 :   return true;
     912                 :             : }
     913                 :             : 
     914                 :             : /* arg_pointer_rtx resp. frame_pointer_rtx if stack_pointer_rtx or
     915                 :             :    hard_frame_pointer_rtx is being mapped to it and offset for it.  */
     916                 :             : static rtx cfa_base_rtx;
     917                 :             : static HOST_WIDE_INT cfa_base_offset;
     918                 :             : 
     919                 :             : /* Compute a CFA-based value for an ADJUSTMENT made to stack_pointer_rtx
     920                 :             :    or hard_frame_pointer_rtx.  */
     921                 :             : 
     922                 :             : static inline rtx
     923                 :    19181299 : compute_cfa_pointer (poly_int64 adjustment)
     924                 :             : {
     925                 :    19181299 :   return plus_constant (Pmode, cfa_base_rtx, adjustment + cfa_base_offset);
     926                 :             : }
     927                 :             : 
     928                 :             : /* Adjustment for hard_frame_pointer_rtx to cfa base reg,
     929                 :             :    or -1 if the replacement shouldn't be done.  */
     930                 :             : static poly_int64 hard_frame_pointer_adjustment = -1;
     931                 :             : 
     932                 :             : /* Data for adjust_mems callback.  */
     933                 :             : 
     934                 :   232961832 : class adjust_mem_data
     935                 :             : {
     936                 :             : public:
     937                 :             :   bool store;
     938                 :             :   machine_mode mem_mode;
     939                 :             :   HOST_WIDE_INT stack_adjust;
     940                 :             :   auto_vec<rtx> side_effects;
     941                 :             : };
     942                 :             : 
     943                 :             : /* Helper for adjust_mems.  Return true if X is suitable for
     944                 :             :    transformation of wider mode arithmetics to narrower mode.  */
     945                 :             : 
     946                 :             : static bool
     947                 :        6213 : use_narrower_mode_test (rtx x, const_rtx subreg)
     948                 :             : {
     949                 :        6213 :   subrtx_var_iterator::array_type array;
     950                 :       12453 :   FOR_EACH_SUBRTX_VAR (iter, array, x, NONCONST)
     951                 :             :     {
     952                 :       12426 :       rtx x = *iter;
     953                 :       12426 :       if (CONSTANT_P (x))
     954                 :           9 :         iter.skip_subrtxes ();
     955                 :             :       else
     956                 :       12417 :         switch (GET_CODE (x))
     957                 :             :           {
     958                 :          56 :           case REG:
     959                 :          56 :             if (cselib_lookup (x, GET_MODE (SUBREG_REG (subreg)), 0, VOIDmode))
     960                 :        6186 :               return false;
     961                 :          18 :             if (!validate_subreg (GET_MODE (subreg), GET_MODE (x), x,
     962                 :          18 :                                   subreg_lowpart_offset (GET_MODE (subreg),
     963                 :          18 :                                                          GET_MODE (x))))
     964                 :             :               return false;
     965                 :             :             break;
     966                 :             :           case PLUS:
     967                 :             :           case MINUS:
     968                 :             :           case MULT:
     969                 :             :             break;
     970                 :        6213 :           case ASHIFT:
     971                 :        6213 :             if (GET_MODE (XEXP (x, 1)) != VOIDmode)
     972                 :             :               {
     973                 :        5679 :                 enum machine_mode mode = GET_MODE (subreg);
     974                 :        5679 :                 rtx op1 = XEXP (x, 1);
     975                 :        5679 :                 enum machine_mode op1_mode = GET_MODE (op1);
     976                 :        5679 :                 if (GET_MODE_PRECISION (as_a <scalar_int_mode> (mode))
     977                 :        5679 :                     < GET_MODE_PRECISION (as_a <scalar_int_mode> (op1_mode)))
     978                 :             :                   {
     979                 :          24 :                     poly_uint64 byte = subreg_lowpart_offset (mode, op1_mode);
     980                 :          24 :                     if (GET_CODE (op1) == SUBREG || GET_CODE (op1) == CONCAT)
     981                 :             :                       {
     982                 :           0 :                         if (!simplify_subreg (mode, op1, op1_mode, byte))
     983                 :           0 :                           return false;
     984                 :             :                       }
     985                 :          24 :                     else if (!validate_subreg (mode, op1_mode, op1, byte))
     986                 :             :                       return false;
     987                 :             :                   }
     988                 :             :               }
     989                 :        6213 :             iter.substitute (XEXP (x, 0));
     990                 :        6213 :             break;
     991                 :             :           default:
     992                 :             :             return false;
     993                 :             :           }
     994                 :             :     }
     995                 :          27 :   return true;
     996                 :        6213 : }
     997                 :             : 
     998                 :             : /* Transform X into narrower mode MODE from wider mode WMODE.  */
     999                 :             : 
    1000                 :             : static rtx
    1001                 :          54 : use_narrower_mode (rtx x, scalar_int_mode mode, scalar_int_mode wmode)
    1002                 :             : {
    1003                 :          54 :   rtx op0, op1;
    1004                 :          54 :   if (CONSTANT_P (x))
    1005                 :           9 :     return lowpart_subreg (mode, x, wmode);
    1006                 :          45 :   switch (GET_CODE (x))
    1007                 :             :     {
    1008                 :          18 :     case REG:
    1009                 :          18 :       return lowpart_subreg (mode, x, wmode);
    1010                 :           0 :     case PLUS:
    1011                 :           0 :     case MINUS:
    1012                 :           0 :     case MULT:
    1013                 :           0 :       op0 = use_narrower_mode (XEXP (x, 0), mode, wmode);
    1014                 :           0 :       op1 = use_narrower_mode (XEXP (x, 1), mode, wmode);
    1015                 :           0 :       return simplify_gen_binary (GET_CODE (x), mode, op0, op1);
    1016                 :          27 :     case ASHIFT:
    1017                 :          27 :       op0 = use_narrower_mode (XEXP (x, 0), mode, wmode);
    1018                 :          27 :       op1 = XEXP (x, 1);
    1019                 :             :       /* Ensure shift amount is not wider than mode.  */
    1020                 :          27 :       if (GET_MODE (op1) == VOIDmode)
    1021                 :          16 :         op1 = lowpart_subreg (mode, op1, wmode);
    1022                 :          11 :       else if (GET_MODE_PRECISION (mode)
    1023                 :          11 :                < GET_MODE_PRECISION (as_a <scalar_int_mode> (GET_MODE (op1))))
    1024                 :           8 :         op1 = lowpart_subreg (mode, op1, GET_MODE (op1));
    1025                 :          27 :       return simplify_gen_binary (ASHIFT, mode, op0, op1);
    1026                 :           0 :     default:
    1027                 :           0 :       gcc_unreachable ();
    1028                 :             :     }
    1029                 :             : }
    1030                 :             : 
    1031                 :             : /* Helper function for adjusting used MEMs.  */
    1032                 :             : 
    1033                 :             : static rtx
    1034                 :   267777338 : adjust_mems (rtx loc, const_rtx old_rtx, void *data)
    1035                 :             : {
    1036                 :   267777338 :   class adjust_mem_data *amd = (class adjust_mem_data *) data;
    1037                 :   267777338 :   rtx mem, addr = loc, tem;
    1038                 :   267777338 :   machine_mode mem_mode_save;
    1039                 :   267777338 :   bool store_save;
    1040                 :   267777338 :   scalar_int_mode tem_mode, tem_subreg_mode;
    1041                 :   267777338 :   poly_int64 size;
    1042                 :   267777338 :   switch (GET_CODE (loc))
    1043                 :             :     {
    1044                 :    59059449 :     case REG:
    1045                 :             :       /* Don't do any sp or fp replacements outside of MEM addresses
    1046                 :             :          on the LHS.  */
    1047                 :    59059449 :       if (amd->mem_mode == VOIDmode && amd->store)
    1048                 :             :         return loc;
    1049                 :    59032557 :       if (loc == stack_pointer_rtx
    1050                 :    19538922 :           && !frame_pointer_needed
    1051                 :    17525181 :           && cfa_base_rtx)
    1052                 :    17525084 :         return compute_cfa_pointer (amd->stack_adjust);
    1053                 :    41507473 :       else if (loc == hard_frame_pointer_rtx
    1054                 :     1909866 :                && frame_pointer_needed
    1055                 :     1909577 :                && maybe_ne (hard_frame_pointer_adjustment, -1)
    1056                 :    43163688 :                && cfa_base_rtx)
    1057                 :     1656215 :         return compute_cfa_pointer (hard_frame_pointer_adjustment);
    1058                 :    39851258 :       gcc_checking_assert (loc != virtual_incoming_args_rtx);
    1059                 :             :       return loc;
    1060                 :    21802801 :     case MEM:
    1061                 :    21802801 :       mem = loc;
    1062                 :    21802801 :       if (!amd->store)
    1063                 :             :         {
    1064                 :    13044644 :           mem = targetm.delegitimize_address (mem);
    1065                 :    13044644 :           if (mem != loc && !MEM_P (mem))
    1066                 :      116269 :             return simplify_replace_fn_rtx (mem, old_rtx, adjust_mems, data);
    1067                 :             :         }
    1068                 :             : 
    1069                 :    21686532 :       addr = XEXP (mem, 0);
    1070                 :    21686532 :       mem_mode_save = amd->mem_mode;
    1071                 :    21686532 :       amd->mem_mode = GET_MODE (mem);
    1072                 :    21686532 :       store_save = amd->store;
    1073                 :    21686532 :       amd->store = false;
    1074                 :    21686532 :       addr = simplify_replace_fn_rtx (addr, old_rtx, adjust_mems, data);
    1075                 :    21686532 :       amd->store = store_save;
    1076                 :    21686532 :       amd->mem_mode = mem_mode_save;
    1077                 :    21686532 :       if (mem == loc)
    1078                 :    21641410 :         addr = targetm.delegitimize_address (addr);
    1079                 :    21686532 :       if (addr != XEXP (mem, 0))
    1080                 :    11946071 :         mem = replace_equiv_address_nv (mem, addr);
    1081                 :    21686532 :       if (!amd->store)
    1082                 :    12928375 :         mem = avoid_constant_pool_reference (mem);
    1083                 :             :       return mem;
    1084                 :     2410191 :     case PRE_INC:
    1085                 :     2410191 :     case PRE_DEC:
    1086                 :     4820382 :       size = GET_MODE_SIZE (amd->mem_mode);
    1087                 :     4820382 :       addr = plus_constant (GET_MODE (loc), XEXP (loc, 0),
    1088                 :     2410191 :                             GET_CODE (loc) == PRE_INC ? size : -size);
    1089                 :             :       /* FALLTHRU */
    1090                 :     3286400 :     case POST_INC:
    1091                 :     3286400 :     case POST_DEC:
    1092                 :     3286400 :       if (addr == loc)
    1093                 :      876209 :         addr = XEXP (loc, 0);
    1094                 :     3286400 :       gcc_assert (amd->mem_mode != VOIDmode && amd->mem_mode != BLKmode);
    1095                 :     3286400 :       addr = simplify_replace_fn_rtx (addr, old_rtx, adjust_mems, data);
    1096                 :     6572800 :       size = GET_MODE_SIZE (amd->mem_mode);
    1097                 :     3286400 :       tem = plus_constant (GET_MODE (loc), XEXP (loc, 0),
    1098                 :     3286400 :                            (GET_CODE (loc) == PRE_INC
    1099                 :     3286400 :                             || GET_CODE (loc) == POST_INC) ? size : -size);
    1100                 :     3286400 :       store_save = amd->store;
    1101                 :     3286400 :       amd->store = false;
    1102                 :     3286400 :       tem = simplify_replace_fn_rtx (tem, old_rtx, adjust_mems, data);
    1103                 :     3286400 :       amd->store = store_save;
    1104                 :     3286400 :       amd->side_effects.safe_push (gen_rtx_SET (XEXP (loc, 0), tem));
    1105                 :     3286400 :       return addr;
    1106                 :       26517 :     case PRE_MODIFY:
    1107                 :       26517 :       addr = XEXP (loc, 1);
    1108                 :             :       /* FALLTHRU */
    1109                 :       26517 :     case POST_MODIFY:
    1110                 :       26517 :       if (addr == loc)
    1111                 :           0 :         addr = XEXP (loc, 0);
    1112                 :       26517 :       gcc_assert (amd->mem_mode != VOIDmode);
    1113                 :       26517 :       addr = simplify_replace_fn_rtx (addr, old_rtx, adjust_mems, data);
    1114                 :       26517 :       store_save = amd->store;
    1115                 :       26517 :       amd->store = false;
    1116                 :       26517 :       tem = simplify_replace_fn_rtx (XEXP (loc, 1), old_rtx,
    1117                 :             :                                      adjust_mems, data);
    1118                 :       26517 :       amd->store = store_save;
    1119                 :       26517 :       amd->side_effects.safe_push (gen_rtx_SET (XEXP (loc, 0), tem));
    1120                 :       26517 :       return addr;
    1121                 :       76498 :     case SUBREG:
    1122                 :             :       /* First try without delegitimization of whole MEMs and
    1123                 :             :          avoid_constant_pool_reference, which is more likely to succeed.  */
    1124                 :       76498 :       store_save = amd->store;
    1125                 :       76498 :       amd->store = true;
    1126                 :       76498 :       addr = simplify_replace_fn_rtx (SUBREG_REG (loc), old_rtx, adjust_mems,
    1127                 :             :                                       data);
    1128                 :       76498 :       amd->store = store_save;
    1129                 :       76498 :       mem = simplify_replace_fn_rtx (addr, old_rtx, adjust_mems, data);
    1130                 :       76498 :       if (mem == SUBREG_REG (loc))
    1131                 :             :         {
    1132                 :       75860 :           tem = loc;
    1133                 :       75860 :           goto finish_subreg;
    1134                 :             :         }
    1135                 :        1276 :       tem = simplify_gen_subreg (GET_MODE (loc), mem,
    1136                 :         638 :                                  GET_MODE (SUBREG_REG (loc)),
    1137                 :         638 :                                  SUBREG_BYTE (loc));
    1138                 :         638 :       if (tem)
    1139                 :         638 :         goto finish_subreg;
    1140                 :           0 :       tem = simplify_gen_subreg (GET_MODE (loc), addr,
    1141                 :           0 :                                  GET_MODE (SUBREG_REG (loc)),
    1142                 :           0 :                                  SUBREG_BYTE (loc));
    1143                 :           0 :       if (tem == NULL_RTX)
    1144                 :           0 :         tem = gen_rtx_raw_SUBREG (GET_MODE (loc), addr, SUBREG_BYTE (loc));
    1145                 :           0 :     finish_subreg:
    1146                 :       76498 :       if (MAY_HAVE_DEBUG_BIND_INSNS
    1147                 :       76498 :           && GET_CODE (tem) == SUBREG
    1148                 :       76498 :           && (GET_CODE (SUBREG_REG (tem)) == PLUS
    1149                 :       76498 :               || GET_CODE (SUBREG_REG (tem)) == MINUS
    1150                 :             :               || GET_CODE (SUBREG_REG (tem)) == MULT
    1151                 :             :               || GET_CODE (SUBREG_REG (tem)) == ASHIFT)
    1152                 :        6347 :           && is_a <scalar_int_mode> (GET_MODE (tem), &tem_mode)
    1153                 :        6324 :           && is_a <scalar_int_mode> (GET_MODE (SUBREG_REG (tem)),
    1154                 :             :                                      &tem_subreg_mode)
    1155                 :        6232 :           && (GET_MODE_PRECISION (tem_mode)
    1156                 :        6232 :               < GET_MODE_PRECISION (tem_subreg_mode))
    1157                 :        6228 :           && subreg_lowpart_p (tem)
    1158                 :       82711 :           && use_narrower_mode_test (SUBREG_REG (tem), tem))
    1159                 :          27 :         return use_narrower_mode (SUBREG_REG (tem), tem_mode, tem_subreg_mode);
    1160                 :             :       return tem;
    1161                 :       10449 :     case ASM_OPERANDS:
    1162                 :             :       /* Don't do any replacements in second and following
    1163                 :             :          ASM_OPERANDS of inline-asm with multiple sets.
    1164                 :             :          ASM_OPERANDS_INPUT_VEC, ASM_OPERANDS_INPUT_CONSTRAINT_VEC
    1165                 :             :          and ASM_OPERANDS_LABEL_VEC need to be equal between
    1166                 :             :          all the ASM_OPERANDs in the insn and adjust_insn will
    1167                 :             :          fix this up.  */
    1168                 :       10449 :       if (ASM_OPERANDS_OUTPUT_IDX (loc) != 0)
    1169                 :        3094 :         return loc;
    1170                 :             :       break;
    1171                 :             :     default:
    1172                 :             :       break;
    1173                 :             :     }
    1174                 :             :   return NULL_RTX;
    1175                 :             : }
    1176                 :             : 
    1177                 :             : /* Helper function for replacement of uses.  */
    1178                 :             : 
    1179                 :             : static void
    1180                 :    86941259 : adjust_mem_uses (rtx *x, void *data)
    1181                 :             : {
    1182                 :    86941259 :   rtx new_x = simplify_replace_fn_rtx (*x, NULL_RTX, adjust_mems, data);
    1183                 :    86941259 :   if (new_x != *x)
    1184                 :    11104299 :     validate_change (NULL_RTX, x, new_x, true);
    1185                 :    86941259 : }
    1186                 :             : 
    1187                 :             : /* Helper function for replacement of stores.  */
    1188                 :             : 
    1189                 :             : static void
    1190                 :    41009374 : adjust_mem_stores (rtx loc, const_rtx expr, void *data)
    1191                 :             : {
    1192                 :    41009374 :   if (MEM_P (loc))
    1193                 :             :     {
    1194                 :     8748848 :       rtx new_dest = simplify_replace_fn_rtx (SET_DEST (expr), NULL_RTX,
    1195                 :             :                                               adjust_mems, data);
    1196                 :     8748848 :       if (new_dest != SET_DEST (expr))
    1197                 :             :         {
    1198                 :     6234004 :           rtx xexpr = CONST_CAST_RTX (expr);
    1199                 :     6234004 :           validate_change (NULL_RTX, &SET_DEST (xexpr), new_dest, true);
    1200                 :             :         }
    1201                 :             :     }
    1202                 :    41009374 : }
    1203                 :             : 
    1204                 :             : /* Simplify INSN.  Remove all {PRE,POST}_{INC,DEC,MODIFY} rtxes,
    1205                 :             :    replace them with their value in the insn and add the side-effects
    1206                 :             :    as other sets to the insn.  */
    1207                 :             : 
    1208                 :             : static void
    1209                 :    77653944 : adjust_insn (basic_block bb, rtx_insn *insn)
    1210                 :             : {
    1211                 :    77653944 :   rtx set;
    1212                 :             : 
    1213                 :             : #ifdef HAVE_window_save
    1214                 :             :   /* If the target machine has an explicit window save instruction, the
    1215                 :             :      transformation OUTGOING_REGNO -> INCOMING_REGNO is done there.  */
    1216                 :             :   if (RTX_FRAME_RELATED_P (insn)
    1217                 :             :       && find_reg_note (insn, REG_CFA_WINDOW_SAVE, NULL_RTX))
    1218                 :             :     {
    1219                 :             :       unsigned int i, nregs = vec_safe_length (windowed_parm_regs);
    1220                 :             :       rtx rtl = gen_rtx_PARALLEL (VOIDmode, rtvec_alloc (nregs * 2));
    1221                 :             :       parm_reg *p;
    1222                 :             : 
    1223                 :             :       FOR_EACH_VEC_SAFE_ELT (windowed_parm_regs, i, p)
    1224                 :             :         {
    1225                 :             :           XVECEXP (rtl, 0, i * 2)
    1226                 :             :             = gen_rtx_SET (p->incoming, p->outgoing);
    1227                 :             :           /* Do not clobber the attached DECL, but only the REG.  */
    1228                 :             :           XVECEXP (rtl, 0, i * 2 + 1)
    1229                 :             :             = gen_rtx_CLOBBER (GET_MODE (p->outgoing),
    1230                 :             :                                gen_raw_REG (GET_MODE (p->outgoing),
    1231                 :             :                                             REGNO (p->outgoing)));
    1232                 :             :         }
    1233                 :             : 
    1234                 :             :       validate_change (NULL_RTX, &PATTERN (insn), rtl, true);
    1235                 :             :       return;
    1236                 :             :     }
    1237                 :             : #endif
    1238                 :             : 
    1239                 :    77653944 :   adjust_mem_data amd;
    1240                 :    77653944 :   amd.mem_mode = VOIDmode;
    1241                 :    77653944 :   amd.stack_adjust = -VTI (bb)->out.stack_adjust;
    1242                 :             : 
    1243                 :    77653944 :   amd.store = true;
    1244                 :    77653944 :   note_stores (insn, adjust_mem_stores, &amd);
    1245                 :             : 
    1246                 :    77653944 :   amd.store = false;
    1247                 :    77653944 :   if (GET_CODE (PATTERN (insn)) == PARALLEL
    1248                 :     4797199 :       && asm_noperands (PATTERN (insn)) > 0
    1249                 :    77663714 :       && GET_CODE (XVECEXP (PATTERN (insn), 0, 0)) == SET)
    1250                 :             :     {
    1251                 :        7355 :       rtx body, set0;
    1252                 :        7355 :       int i;
    1253                 :             : 
    1254                 :             :       /* inline-asm with multiple sets is tiny bit more complicated,
    1255                 :             :          because the 3 vectors in ASM_OPERANDS need to be shared between
    1256                 :             :          all ASM_OPERANDS in the instruction.  adjust_mems will
    1257                 :             :          not touch ASM_OPERANDS other than the first one, asm_noperands
    1258                 :             :          test above needs to be called before that (otherwise it would fail)
    1259                 :             :          and afterwards this code fixes it up.  */
    1260                 :        7355 :       note_uses (&PATTERN (insn), adjust_mem_uses, &amd);
    1261                 :        7355 :       body = PATTERN (insn);
    1262                 :        7355 :       set0 = XVECEXP (body, 0, 0);
    1263                 :        7355 :       gcc_checking_assert (GET_CODE (set0) == SET
    1264                 :             :                            && GET_CODE (SET_SRC (set0)) == ASM_OPERANDS
    1265                 :             :                            && ASM_OPERANDS_OUTPUT_IDX (SET_SRC (set0)) == 0);
    1266                 :       10449 :       for (i = 1; i < XVECLEN (body, 0); i++)
    1267                 :       10449 :         if (GET_CODE (XVECEXP (body, 0, i)) != SET)
    1268                 :             :           break;
    1269                 :             :         else
    1270                 :             :           {
    1271                 :        3094 :             set = XVECEXP (body, 0, i);
    1272                 :        3094 :             gcc_checking_assert (GET_CODE (SET_SRC (set)) == ASM_OPERANDS
    1273                 :             :                                  && ASM_OPERANDS_OUTPUT_IDX (SET_SRC (set))
    1274                 :             :                                     == i);
    1275                 :        3094 :             if (ASM_OPERANDS_INPUT_VEC (SET_SRC (set))
    1276                 :        3094 :                 != ASM_OPERANDS_INPUT_VEC (SET_SRC (set0))
    1277                 :        2797 :                 || ASM_OPERANDS_INPUT_CONSTRAINT_VEC (SET_SRC (set))
    1278                 :        2797 :                    != ASM_OPERANDS_INPUT_CONSTRAINT_VEC (SET_SRC (set0))
    1279                 :        2797 :                 || ASM_OPERANDS_LABEL_VEC (SET_SRC (set))
    1280                 :        2797 :                    != ASM_OPERANDS_LABEL_VEC (SET_SRC (set0)))
    1281                 :             :               {
    1282                 :         297 :                 rtx newsrc = shallow_copy_rtx (SET_SRC (set));
    1283                 :         297 :                 ASM_OPERANDS_INPUT_VEC (newsrc)
    1284                 :         297 :                   = ASM_OPERANDS_INPUT_VEC (SET_SRC (set0));
    1285                 :         297 :                 ASM_OPERANDS_INPUT_CONSTRAINT_VEC (newsrc)
    1286                 :         297 :                   = ASM_OPERANDS_INPUT_CONSTRAINT_VEC (SET_SRC (set0));
    1287                 :         297 :                 ASM_OPERANDS_LABEL_VEC (newsrc)
    1288                 :         297 :                   = ASM_OPERANDS_LABEL_VEC (SET_SRC (set0));
    1289                 :         297 :                 validate_change (NULL_RTX, &SET_SRC (set), newsrc, true);
    1290                 :             :               }
    1291                 :             :           }
    1292                 :             :     }
    1293                 :             :   else
    1294                 :    77646589 :     note_uses (&PATTERN (insn), adjust_mem_uses, &amd);
    1295                 :             : 
    1296                 :             :   /* For read-only MEMs containing some constant, prefer those
    1297                 :             :      constants.  */
    1298                 :    77653944 :   set = single_set (insn);
    1299                 :    77653944 :   if (set && MEM_P (SET_SRC (set)) && MEM_READONLY_P (SET_SRC (set)))
    1300                 :             :     {
    1301                 :       32498 :       rtx note = find_reg_equal_equiv_note (insn);
    1302                 :             : 
    1303                 :       32498 :       if (note && CONSTANT_P (XEXP (note, 0)))
    1304                 :           0 :         validate_change (NULL_RTX, &SET_SRC (set), XEXP (note, 0), true);
    1305                 :             :     }
    1306                 :             : 
    1307                 :    80966861 :   if (!amd.side_effects.is_empty ())
    1308                 :             :     {
    1309                 :     3312917 :       rtx *pat, new_pat;
    1310                 :     3312917 :       int i, oldn;
    1311                 :             : 
    1312                 :     3312917 :       pat = &PATTERN (insn);
    1313                 :     3312917 :       if (GET_CODE (*pat) == COND_EXEC)
    1314                 :           0 :         pat = &COND_EXEC_CODE (*pat);
    1315                 :     3312917 :       if (GET_CODE (*pat) == PARALLEL)
    1316                 :       16558 :         oldn = XVECLEN (*pat, 0);
    1317                 :             :       else
    1318                 :             :         oldn = 1;
    1319                 :     3312917 :       unsigned int newn = amd.side_effects.length ();
    1320                 :     3312917 :       new_pat = gen_rtx_PARALLEL (VOIDmode, rtvec_alloc (oldn + newn));
    1321                 :     3312917 :       if (GET_CODE (*pat) == PARALLEL)
    1322                 :       49674 :         for (i = 0; i < oldn; i++)
    1323                 :       33116 :           XVECEXP (new_pat, 0, i) = XVECEXP (*pat, 0, i);
    1324                 :             :       else
    1325                 :     3296359 :         XVECEXP (new_pat, 0, 0) = *pat;
    1326                 :             : 
    1327                 :     3312917 :       rtx effect;
    1328                 :     3312917 :       unsigned int j;
    1329                 :     9938751 :       FOR_EACH_VEC_ELT_REVERSE (amd.side_effects, j, effect)
    1330                 :     3312917 :         XVECEXP (new_pat, 0, j + oldn) = effect;
    1331                 :     3312917 :       validate_change (NULL_RTX, pat, new_pat, true);
    1332                 :             :     }
    1333                 :    77653944 : }
    1334                 :             : 
    1335                 :             : /* Return the DEBUG_EXPR of a DEBUG_EXPR_DECL or the VALUE in DV.  */
    1336                 :             : static inline rtx
    1337                 :    10348556 : dv_as_rtx (decl_or_value dv)
    1338                 :             : {
    1339                 :    10348556 :   tree decl;
    1340                 :             : 
    1341                 :    10348556 :   if (dv_is_value_p (dv))
    1342                 :     8202810 :     return dv_as_value (dv);
    1343                 :             : 
    1344                 :     2145746 :   decl = dv_as_decl (dv);
    1345                 :             : 
    1346                 :     2145746 :   gcc_checking_assert (TREE_CODE (decl) == DEBUG_EXPR_DECL);
    1347                 :     2145746 :   return DECL_RTL_KNOWN_SET (decl);
    1348                 :             : }
    1349                 :             : 
    1350                 :             : /* Return nonzero if a decl_or_value must not have more than one
    1351                 :             :    variable part.  The returned value discriminates among various
    1352                 :             :    kinds of one-part DVs ccording to enum onepart_enum.  */
    1353                 :             : static inline onepart_enum
    1354                 :   529612059 : dv_onepart_p (decl_or_value dv)
    1355                 :             : {
    1356                 :   529612059 :   tree decl;
    1357                 :             : 
    1358                 :   529612059 :   if (!MAY_HAVE_DEBUG_BIND_INSNS)
    1359                 :             :     return NOT_ONEPART;
    1360                 :             : 
    1361                 :   529611706 :   if (dv_is_value_p (dv))
    1362                 :             :     return ONEPART_VALUE;
    1363                 :             : 
    1364                 :   173971427 :   decl = dv_as_decl (dv);
    1365                 :             : 
    1366                 :   173971427 :   if (TREE_CODE (decl) == DEBUG_EXPR_DECL)
    1367                 :             :     return ONEPART_DEXPR;
    1368                 :             : 
    1369                 :   149277527 :   if (target_for_debug_bind (decl) != NULL_TREE)
    1370                 :             :     return ONEPART_VDECL;
    1371                 :             : 
    1372                 :             :   return NOT_ONEPART;
    1373                 :             : }
    1374                 :             : 
    1375                 :             : /* Return the variable pool to be used for a dv of type ONEPART.  */
    1376                 :             : static inline pool_allocator &
    1377                 :   497073960 : onepart_pool (onepart_enum onepart)
    1378                 :             : {
    1379                 :   497073960 :   return onepart ? valvar_pool : var_pool;
    1380                 :             : }
    1381                 :             : 
    1382                 :             : /* Allocate a variable_def from the corresponding variable pool.  */
    1383                 :             : static inline variable *
    1384                 :   248536980 : onepart_pool_allocate (onepart_enum onepart)
    1385                 :             : {
    1386                 :   235374314 :   return (variable*) onepart_pool (onepart).allocate ();
    1387                 :             : }
    1388                 :             : 
    1389                 :             : /* Build a decl_or_value out of a decl.  */
    1390                 :             : static inline decl_or_value
    1391                 :   149326553 : dv_from_decl (tree decl)
    1392                 :             : {
    1393                 :   149326553 :   decl_or_value dv = decl;
    1394                 :   149326553 :   gcc_checking_assert (dv_is_decl_p (dv));
    1395                 :   149326553 :   return dv;
    1396                 :             : }
    1397                 :             : 
    1398                 :             : /* Build a decl_or_value out of a value.  */
    1399                 :             : static inline decl_or_value
    1400                 :   992587918 : dv_from_value (rtx value)
    1401                 :             : {
    1402                 :   992587918 :   decl_or_value dv = value;
    1403                 :   992587918 :   gcc_checking_assert (dv_is_value_p (dv));
    1404                 :   992587918 :   return dv;
    1405                 :             : }
    1406                 :             : 
    1407                 :             : /* Return a value or the decl of a debug_expr as a decl_or_value.  */
    1408                 :             : static inline decl_or_value
    1409                 :   362936461 : dv_from_rtx (rtx x)
    1410                 :             : {
    1411                 :   362936461 :   decl_or_value dv;
    1412                 :             : 
    1413                 :   362936461 :   switch (GET_CODE (x))
    1414                 :             :     {
    1415                 :    26124697 :     case DEBUG_EXPR:
    1416                 :    26124697 :       dv = dv_from_decl (DEBUG_EXPR_TREE_DECL (x));
    1417                 :    26124697 :       gcc_checking_assert (DECL_RTL_KNOWN_SET (DEBUG_EXPR_TREE_DECL (x)) == x);
    1418                 :             :       break;
    1419                 :             : 
    1420                 :   336811764 :     case VALUE:
    1421                 :   336811764 :       dv = dv_from_value (x);
    1422                 :   336811764 :       break;
    1423                 :             : 
    1424                 :           0 :     default:
    1425                 :           0 :       gcc_unreachable ();
    1426                 :             :     }
    1427                 :             : 
    1428                 :   362936461 :   return dv;
    1429                 :             : }
    1430                 :             : 
    1431                 :             : extern void debug_dv (decl_or_value dv);
    1432                 :             : 
    1433                 :             : DEBUG_FUNCTION void
    1434                 :           0 : debug_dv (decl_or_value dv)
    1435                 :             : {
    1436                 :           0 :   if (dv_is_value_p (dv))
    1437                 :           0 :     debug_rtx (dv_as_value (dv));
    1438                 :             :   else
    1439                 :           0 :     debug_generic_stmt (dv_as_decl (dv));
    1440                 :           0 : }
    1441                 :             : 
    1442                 :             : static void loc_exp_dep_clear (variable *var);
    1443                 :             : 
    1444                 :             : /* Free the element of VARIABLE_HTAB (its type is struct variable_def).  */
    1445                 :             : 
    1446                 :             : static void
    1447                 :  1085374206 : variable_htab_free (void *elem)
    1448                 :             : {
    1449                 :  1085374206 :   int i;
    1450                 :  1085374206 :   variable *var = (variable *) elem;
    1451                 :  1085374206 :   location_chain *node, *next;
    1452                 :             : 
    1453                 :  1085374206 :   gcc_checking_assert (var->refcount > 0);
    1454                 :             : 
    1455                 :  1085374206 :   var->refcount--;
    1456                 :  1085374206 :   if (var->refcount > 0)
    1457                 :             :     return;
    1458                 :             : 
    1459                 :   362268716 :   for (i = 0; i < var->n_var_parts; i++)
    1460                 :             :     {
    1461                 :   271329125 :       for (node = var->var_part[i].loc_chain; node; node = next)
    1462                 :             :         {
    1463                 :   157597389 :           next = node->next;
    1464                 :   157597389 :           delete node;
    1465                 :             :         }
    1466                 :   113731736 :       var->var_part[i].loc_chain = NULL;
    1467                 :             :     }
    1468                 :   248536980 :   if (var->onepart && VAR_LOC_1PAUX (var))
    1469                 :             :     {
    1470                 :    35611757 :       loc_exp_dep_clear (var);
    1471                 :    35611757 :       if (VAR_LOC_DEP_LST (var))
    1472                 :     2075465 :         VAR_LOC_DEP_LST (var)->pprev = NULL;
    1473                 :    35611757 :       XDELETE (VAR_LOC_1PAUX (var));
    1474                 :             :       /* These may be reused across functions, so reset
    1475                 :             :          e.g. NO_LOC_P.  */
    1476                 :    35611757 :       if (var->onepart == ONEPART_DEXPR)
    1477                 :     2312885 :         set_dv_changed (var->dv, true);
    1478                 :             :     }
    1479                 :   250218298 :   onepart_pool (var->onepart).remove (var);
    1480                 :             : }
    1481                 :             : 
    1482                 :             : /* Initialize the set (array) SET of attrs to empty lists.  */
    1483                 :             : 
    1484                 :             : static void
    1485                 :    28362213 : init_attrs_list_set (attrs **set)
    1486                 :             : {
    1487                 :    28362213 :   int i;
    1488                 :             : 
    1489                 :  2637685809 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    1490                 :  2609323596 :     set[i] = NULL;
    1491                 :           0 : }
    1492                 :             : 
    1493                 :             : /* Make the list *LISTP empty.  */
    1494                 :             : 
    1495                 :             : static void
    1496                 :  8176309560 : attrs_list_clear (attrs **listp)
    1497                 :             : {
    1498                 :  8176309560 :   attrs *list, *next;
    1499                 :             : 
    1500                 :  8372677383 :   for (list = *listp; list; list = next)
    1501                 :             :     {
    1502                 :   196367823 :       next = list->next;
    1503                 :   196367823 :       delete list;
    1504                 :             :     }
    1505                 :  8176309560 :   *listp = NULL;
    1506                 :  8176309560 : }
    1507                 :             : 
    1508                 :             : /* Return true if the pair of DECL and OFFSET is the member of the LIST.  */
    1509                 :             : 
    1510                 :             : static attrs *
    1511                 :      897662 : attrs_list_member (attrs *list, decl_or_value dv, HOST_WIDE_INT offset)
    1512                 :             : {
    1513                 :     1044597 :   for (; list; list = list->next)
    1514                 :      916742 :     if (list->dv == dv && list->offset == offset)
    1515                 :           0 :       return list;
    1516                 :             :   return NULL;
    1517                 :             : }
    1518                 :             : 
    1519                 :             : /* Insert the triplet DECL, OFFSET, LOC to the list *LISTP.  */
    1520                 :             : 
    1521                 :             : static void
    1522                 :    78264159 : attrs_list_insert (attrs **listp, decl_or_value dv,
    1523                 :             :                    HOST_WIDE_INT offset, rtx loc)
    1524                 :             : {
    1525                 :    78264159 :   attrs *list = new attrs;
    1526                 :    78264159 :   list->loc = loc;
    1527                 :    78264159 :   list->dv = dv;
    1528                 :    78264159 :   list->offset = offset;
    1529                 :    78264159 :   list->next = *listp;
    1530                 :    78264159 :   *listp = list;
    1531                 :    78264159 : }
    1532                 :             : 
    1533                 :             : /* Copy all nodes from SRC and create a list *DSTP of the copies.  */
    1534                 :             : 
    1535                 :             : static void
    1536                 :  2941120400 : attrs_list_copy (attrs **dstp, attrs *src)
    1537                 :             : {
    1538                 :  2941120400 :   attrs_list_clear (dstp);
    1539                 :  3110713449 :   for (; src; src = src->next)
    1540                 :             :     {
    1541                 :   169593049 :       attrs *n = new attrs;
    1542                 :   169593049 :       n->loc = src->loc;
    1543                 :   169593049 :       n->dv = src->dv;
    1544                 :   169593049 :       n->offset = src->offset;
    1545                 :   169593049 :       n->next = *dstp;
    1546                 :   169593049 :       *dstp = n;
    1547                 :             :     }
    1548                 :  2941120400 : }
    1549                 :             : 
    1550                 :             : /* Add all nodes from SRC which are not in *DSTP to *DSTP.  */
    1551                 :             : 
    1552                 :             : static void
    1553                 :        9752 : attrs_list_union (attrs **dstp, attrs *src)
    1554                 :             : {
    1555                 :        9953 :   for (; src; src = src->next)
    1556                 :             :     {
    1557                 :         402 :       if (!attrs_list_member (*dstp, src->dv, src->offset))
    1558                 :         174 :         attrs_list_insert (dstp, src->dv, src->offset, src->loc);
    1559                 :             :     }
    1560                 :        9752 : }
    1561                 :             : 
    1562                 :             : /* Combine nodes that are not onepart nodes from SRC and SRC2 into
    1563                 :             :    *DSTP.  */
    1564                 :             : 
    1565                 :             : static void
    1566                 :   357427360 : attrs_list_mpdv_union (attrs **dstp, attrs *src, attrs *src2)
    1567                 :             : {
    1568                 :   357427360 :   gcc_assert (!*dstp);
    1569                 :   382478605 :   for (; src; src = src->next)
    1570                 :             :     {
    1571                 :    25051245 :       if (!dv_onepart_p (src->dv))
    1572                 :     1674728 :         attrs_list_insert (dstp, src->dv, src->offset, src->loc);
    1573                 :             :     }
    1574                 :   385680406 :   for (src = src2; src; src = src->next)
    1575                 :             :     {
    1576                 :    28253046 :       if (!dv_onepart_p (src->dv)
    1577                 :    29150507 :           && !attrs_list_member (*dstp, src->dv, src->offset))
    1578                 :      127681 :         attrs_list_insert (dstp, src->dv, src->offset, src->loc);
    1579                 :             :     }
    1580                 :   357427360 : }
    1581                 :             : 
    1582                 :             : /* Shared hashtable support.  */
    1583                 :             : 
    1584                 :             : /* Return true if VARS is shared.  */
    1585                 :             : 
    1586                 :             : static inline bool
    1587                 :   872043262 : shared_hash_shared (shared_hash *vars)
    1588                 :             : {
    1589                 :   872043262 :   return vars->refcount > 1;
    1590                 :             : }
    1591                 :             : 
    1592                 :             : /* Return the hash table for VARS.  */
    1593                 :             : 
    1594                 :             : static inline variable_table_type *
    1595                 :  1755182816 : shared_hash_htab (shared_hash *vars)
    1596                 :             : {
    1597                 :  2099948227 :   return vars->htab;
    1598                 :             : }
    1599                 :             : 
    1600                 :             : /* Return true if VAR is shared, or maybe because VARS is shared.  */
    1601                 :             : 
    1602                 :             : static inline bool
    1603                 :  1525292095 : shared_var_p (variable *var, shared_hash *vars)
    1604                 :             : {
    1605                 :             :   /* Don't count an entry in the changed_variables table as a duplicate.  */
    1606                 :  1525292095 :   return ((var->refcount > 1 + (int) var->in_changed_variables)
    1607                 :   431099305 :           || shared_hash_shared (vars));
    1608                 :             : }
    1609                 :             : 
    1610                 :             : /* Copy variables into a new hash table.  */
    1611                 :             : 
    1612                 :             : static shared_hash *
    1613                 :    15155222 : shared_hash_unshare (shared_hash *vars)
    1614                 :             : {
    1615                 :    15155222 :   shared_hash *new_vars = new shared_hash;
    1616                 :    15155222 :   gcc_assert (vars->refcount > 1);
    1617                 :    15155222 :   new_vars->refcount = 1;
    1618                 :    15155222 :   new_vars->htab = new variable_table_type (vars->htab->elements () + 3);
    1619                 :    15155222 :   vars_copy (new_vars->htab, vars->htab);
    1620                 :    15155222 :   vars->refcount--;
    1621                 :    15155222 :   return new_vars;
    1622                 :             : }
    1623                 :             : 
    1624                 :             : /* Increment reference counter on VARS and return it.  */
    1625                 :             : 
    1626                 :             : static inline shared_hash *
    1627                 :    88880378 : shared_hash_copy (shared_hash *vars)
    1628                 :             : {
    1629                 :    88880378 :   vars->refcount++;
    1630                 :    88880378 :   return vars;
    1631                 :             : }
    1632                 :             : 
    1633                 :             : /* Decrement reference counter and destroy hash table if not shared
    1634                 :             :    anymore.  */
    1635                 :             : 
    1636                 :             : static void
    1637                 :    92765458 : shared_hash_destroy (shared_hash *vars)
    1638                 :             : {
    1639                 :    92765458 :   gcc_checking_assert (vars->refcount > 0);
    1640                 :    92765458 :   if (--vars->refcount == 0)
    1641                 :             :     {
    1642                 :    19040302 :       delete vars->htab;
    1643                 :    19040302 :       delete vars;
    1644                 :             :     }
    1645                 :    92765458 : }
    1646                 :             : 
    1647                 :             : /* Unshare *PVARS if shared and return slot for DV.  If INS is
    1648                 :             :    INSERT, insert it if not already present.  */
    1649                 :             : 
    1650                 :             : static inline variable **
    1651                 :   124450525 : shared_hash_find_slot_unshare_1 (shared_hash **pvars, decl_or_value dv,
    1652                 :             :                                  hashval_t dvhash, enum insert_option ins)
    1653                 :             : {
    1654                 :   124450525 :   if (shared_hash_shared (*pvars))
    1655                 :    15155222 :     *pvars = shared_hash_unshare (*pvars);
    1656                 :   124450525 :   return shared_hash_htab (*pvars)->find_slot_with_hash (dv, dvhash, ins);
    1657                 :             : }
    1658                 :             : 
    1659                 :             : static inline variable **
    1660                 :    15184906 : shared_hash_find_slot_unshare (shared_hash **pvars, decl_or_value dv,
    1661                 :             :                                enum insert_option ins)
    1662                 :             : {
    1663                 :    15184906 :   return shared_hash_find_slot_unshare_1 (pvars, dv, dv_htab_hash (dv), ins);
    1664                 :             : }
    1665                 :             : 
    1666                 :             : /* Return slot for DV, if it is already present in the hash table.
    1667                 :             :    If it is not present, insert it only VARS is not shared, otherwise
    1668                 :             :    return NULL.  */
    1669                 :             : 
    1670                 :             : static inline variable **
    1671                 :   194856919 : shared_hash_find_slot_1 (shared_hash *vars, decl_or_value dv, hashval_t dvhash)
    1672                 :             : {
    1673                 :   194856919 :   return shared_hash_htab (vars)->find_slot_with_hash (dv, dvhash,
    1674                 :   194856919 :                                                        shared_hash_shared (vars)
    1675                 :   194856919 :                                                        ? NO_INSERT : INSERT);
    1676                 :             : }
    1677                 :             : 
    1678                 :             : static inline variable **
    1679                 :   194856919 : shared_hash_find_slot (shared_hash *vars, decl_or_value dv)
    1680                 :             : {
    1681                 :   194856919 :   return shared_hash_find_slot_1 (vars, dv, dv_htab_hash (dv));
    1682                 :             : }
    1683                 :             : 
    1684                 :             : /* Return slot for DV only if it is already present in the hash table.  */
    1685                 :             : 
    1686                 :             : static inline variable **
    1687                 :   841353061 : shared_hash_find_slot_noinsert_1 (shared_hash *vars, decl_or_value dv,
    1688                 :             :                                   hashval_t dvhash)
    1689                 :             : {
    1690                 :   841353061 :   return shared_hash_htab (vars)->find_slot_with_hash (dv, dvhash, NO_INSERT);
    1691                 :             : }
    1692                 :             : 
    1693                 :             : static inline variable **
    1694                 :   566761169 : shared_hash_find_slot_noinsert (shared_hash *vars, decl_or_value dv)
    1695                 :             : {
    1696                 :   566761169 :   return shared_hash_find_slot_noinsert_1 (vars, dv, dv_htab_hash (dv));
    1697                 :             : }
    1698                 :             : 
    1699                 :             : /* Return variable for DV or NULL if not already present in the hash
    1700                 :             :    table.  */
    1701                 :             : 
    1702                 :             : static inline variable *
    1703                 :   196002039 : shared_hash_find_1 (shared_hash *vars, decl_or_value dv, hashval_t dvhash)
    1704                 :             : {
    1705                 :   392004078 :   return shared_hash_htab (vars)->find_with_hash (dv, dvhash);
    1706                 :             : }
    1707                 :             : 
    1708                 :             : static inline variable *
    1709                 :    49660649 : shared_hash_find (shared_hash *vars, decl_or_value dv)
    1710                 :             : {
    1711                 :    49660649 :   return shared_hash_find_1 (vars, dv, dv_htab_hash (dv));
    1712                 :             : }
    1713                 :             : 
    1714                 :             : /* Return true if TVAL is better than CVAL as a canonival value.  We
    1715                 :             :    choose lowest-numbered VALUEs, using the RTX address as a
    1716                 :             :    tie-breaker.  The idea is to arrange them into a star topology,
    1717                 :             :    such that all of them are at most one step away from the canonical
    1718                 :             :    value, and the canonical value has backlinks to all of them, in
    1719                 :             :    addition to all the actual locations.  We don't enforce this
    1720                 :             :    topology throughout the entire dataflow analysis, though.
    1721                 :             :  */
    1722                 :             : 
    1723                 :             : static inline bool
    1724                 :  2253329208 : canon_value_cmp (rtx tval, rtx cval)
    1725                 :             : {
    1726                 :  2253329208 :   return !cval
    1727                 :   907245684 :     || CSELIB_VAL_PTR (tval)->uid < CSELIB_VAL_PTR (cval)->uid;
    1728                 :             : }
    1729                 :             : 
    1730                 :             : static bool dst_can_be_shared;
    1731                 :             : 
    1732                 :             : /* Return a copy of a variable VAR and insert it to dataflow set SET.  */
    1733                 :             : 
    1734                 :             : static variable **
    1735                 :    51007544 : unshare_variable (dataflow_set *set, variable **slot, variable *var,
    1736                 :             :                   enum var_init_status initialized)
    1737                 :             : {
    1738                 :    51007544 :   variable *new_var;
    1739                 :    51007544 :   int i;
    1740                 :             : 
    1741                 :    51007544 :   new_var = onepart_pool_allocate (var->onepart);
    1742                 :    51007544 :   new_var->dv = var->dv;
    1743                 :    51007544 :   new_var->refcount = 1;
    1744                 :    51007544 :   var->refcount--;
    1745                 :    51007544 :   new_var->n_var_parts = var->n_var_parts;
    1746                 :    51007544 :   new_var->onepart = var->onepart;
    1747                 :    51007544 :   new_var->in_changed_variables = false;
    1748                 :             : 
    1749                 :    51007544 :   if (! flag_var_tracking_uninit)
    1750                 :           0 :     initialized = VAR_INIT_STATUS_INITIALIZED;
    1751                 :             : 
    1752                 :   102399659 :   for (i = 0; i < var->n_var_parts; i++)
    1753                 :             :     {
    1754                 :    51392115 :       location_chain *node;
    1755                 :    51392115 :       location_chain **nextp;
    1756                 :             : 
    1757                 :    51392115 :       if (i == 0 && var->onepart)
    1758                 :             :         {
    1759                 :             :           /* One-part auxiliary data is only used while emitting
    1760                 :             :              notes, so propagate it to the new variable in the active
    1761                 :             :              dataflow set.  If we're not emitting notes, this will be
    1762                 :             :              a no-op.  */
    1763                 :    50205470 :           gcc_checking_assert (!VAR_LOC_1PAUX (var) || emit_notes);
    1764                 :    50205470 :           VAR_LOC_1PAUX (new_var) = VAR_LOC_1PAUX (var);
    1765                 :    50205470 :           VAR_LOC_1PAUX (var) = NULL;
    1766                 :    50205470 :         }
    1767                 :             :       else
    1768                 :     1186645 :         VAR_PART_OFFSET (new_var, i) = VAR_PART_OFFSET (var, i);
    1769                 :    51392115 :       nextp = &new_var->var_part[i].loc_chain;
    1770                 :   125950988 :       for (node = var->var_part[i].loc_chain; node; node = node->next)
    1771                 :             :         {
    1772                 :    74558873 :           location_chain *new_lc;
    1773                 :             : 
    1774                 :    74558873 :           new_lc = new location_chain;
    1775                 :    74558873 :           new_lc->next = NULL;
    1776                 :    74558873 :           if (node->init > initialized)
    1777                 :    52557073 :             new_lc->init = node->init;
    1778                 :             :           else
    1779                 :    22001800 :             new_lc->init = initialized;
    1780                 :    74558873 :           if (node->set_src && !(MEM_P (node->set_src)))
    1781                 :       62845 :             new_lc->set_src = node->set_src;
    1782                 :             :           else
    1783                 :    74496028 :             new_lc->set_src = NULL;
    1784                 :    74558873 :           new_lc->loc = node->loc;
    1785                 :             : 
    1786                 :    74558873 :           *nextp = new_lc;
    1787                 :    74558873 :           nextp = &new_lc->next;
    1788                 :             :         }
    1789                 :             : 
    1790                 :    51392115 :       new_var->var_part[i].cur_loc = var->var_part[i].cur_loc;
    1791                 :             :     }
    1792                 :             : 
    1793                 :    51007544 :   dst_can_be_shared = false;
    1794                 :    51007544 :   if (shared_hash_shared (set->vars))
    1795                 :     4484583 :     slot = shared_hash_find_slot_unshare (&set->vars, var->dv, NO_INSERT);
    1796                 :    46522961 :   else if (set->traversed_vars && set->vars != set->traversed_vars)
    1797                 :      148998 :     slot = shared_hash_find_slot_noinsert (set->vars, var->dv);
    1798                 :    51007544 :   *slot = new_var;
    1799                 :    51007544 :   if (var->in_changed_variables)
    1800                 :             :     {
    1801                 :           0 :       variable **cslot
    1802                 :           0 :         = changed_variables->find_slot_with_hash (var->dv,
    1803                 :             :                                                   dv_htab_hash (var->dv),
    1804                 :             :                                                   NO_INSERT);
    1805                 :           0 :       gcc_assert (*cslot == (void *) var);
    1806                 :           0 :       var->in_changed_variables = false;
    1807                 :           0 :       variable_htab_free (var);
    1808                 :           0 :       *cslot = new_var;
    1809                 :           0 :       new_var->in_changed_variables = true;
    1810                 :             :     }
    1811                 :    51007544 :   return slot;
    1812                 :             : }
    1813                 :             : 
    1814                 :             : /* Copy all variables from hash table SRC to hash table DST.  */
    1815                 :             : 
    1816                 :             : static void
    1817                 :    15155222 : vars_copy (variable_table_type *dst, variable_table_type *src)
    1818                 :             : {
    1819                 :    15155222 :   variable_iterator_type hi;
    1820                 :    15155222 :   variable *var;
    1821                 :             : 
    1822                 :   549194270 :   FOR_EACH_HASH_TABLE_ELEMENT (*src, var, variable, hi)
    1823                 :             :     {
    1824                 :   534039048 :       variable **dstp;
    1825                 :   534039048 :       var->refcount++;
    1826                 :   534039048 :       dstp = dst->find_slot_with_hash (var->dv, dv_htab_hash (var->dv), INSERT);
    1827                 :   534039048 :       *dstp = var;
    1828                 :             :     }
    1829                 :    15155222 : }
    1830                 :             : 
    1831                 :             : /* Map a decl to its main debug decl.  */
    1832                 :             : 
    1833                 :             : static inline tree
    1834                 :    66513788 : var_debug_decl (tree decl)
    1835                 :             : {
    1836                 :    66513788 :   if (decl && VAR_P (decl) && DECL_HAS_DEBUG_EXPR_P (decl))
    1837                 :             :     {
    1838                 :     2125850 :       tree debugdecl = DECL_DEBUG_EXPR (decl);
    1839                 :     2125850 :       if (DECL_P (debugdecl))
    1840                 :    66513788 :         decl = debugdecl;
    1841                 :             :     }
    1842                 :             : 
    1843                 :    66513788 :   return decl;
    1844                 :             : }
    1845                 :             : 
    1846                 :             : /* Set the register LOC to contain DV, OFFSET.  */
    1847                 :             : 
    1848                 :             : static void
    1849                 :    61214611 : var_reg_decl_set (dataflow_set *set, rtx loc, enum var_init_status initialized,
    1850                 :             :                   decl_or_value dv, HOST_WIDE_INT offset, rtx set_src,
    1851                 :             :                   enum insert_option iopt)
    1852                 :             : {
    1853                 :    61214611 :   attrs *node;
    1854                 :    61214611 :   bool decl_p = dv_is_decl_p (dv);
    1855                 :             : 
    1856                 :    61214611 :   if (decl_p)
    1857                 :     1567586 :     dv = dv_from_decl (var_debug_decl (dv_as_decl (dv)));
    1858                 :             : 
    1859                 :    64278578 :   for (node = set->regs[REGNO (loc)]; node; node = node->next)
    1860                 :     4166700 :     if (node->dv == dv && node->offset == offset)
    1861                 :             :       break;
    1862                 :    61214611 :   if (!node)
    1863                 :    60111878 :     attrs_list_insert (&set->regs[REGNO (loc)], dv, offset, loc);
    1864                 :    61214611 :   set_variable_part (set, loc, dv, offset, initialized, set_src, iopt);
    1865                 :    61214611 : }
    1866                 :             : 
    1867                 :             : /* Return true if we should track a location that is OFFSET bytes from
    1868                 :             :    a variable.  Store the constant offset in *OFFSET_OUT if so.  */
    1869                 :             : 
    1870                 :             : static bool
    1871                 :    16932407 : track_offset_p (poly_int64 offset, HOST_WIDE_INT *offset_out)
    1872                 :             : {
    1873                 :    16932407 :   HOST_WIDE_INT const_offset;
    1874                 :    15162375 :   if (!offset.is_constant (&const_offset)
    1875                 :    16932407 :       || !IN_RANGE (const_offset, 0, MAX_VAR_PARTS - 1))
    1876                 :             :     return false;
    1877                 :    16932103 :   *offset_out = const_offset;
    1878                 :     3807128 :   return true;
    1879                 :             : }
    1880                 :             : 
    1881                 :             : /* Return the offset of a register that track_offset_p says we
    1882                 :             :    should track.  */
    1883                 :             : 
    1884                 :             : static HOST_WIDE_INT
    1885                 :     2037096 : get_tracked_reg_offset (rtx loc)
    1886                 :             : {
    1887                 :     2037096 :   HOST_WIDE_INT offset;
    1888                 :     4074192 :   if (!track_offset_p (REG_OFFSET (loc), &offset))
    1889                 :           0 :     gcc_unreachable ();
    1890                 :     2037096 :   return offset;
    1891                 :             : }
    1892                 :             : 
    1893                 :             : /* Set the register to contain REG_EXPR (LOC), REG_OFFSET (LOC).  */
    1894                 :             : 
    1895                 :             : static void
    1896                 :     1567586 : var_reg_set (dataflow_set *set, rtx loc, enum var_init_status initialized,
    1897                 :             :              rtx set_src)
    1898                 :             : {
    1899                 :     1567586 :   tree decl = REG_EXPR (loc);
    1900                 :     1567586 :   HOST_WIDE_INT offset = get_tracked_reg_offset (loc);
    1901                 :             : 
    1902                 :     1567586 :   var_reg_decl_set (set, loc, initialized,
    1903                 :             :                     dv_from_decl (decl), offset, set_src, INSERT);
    1904                 :     1567586 : }
    1905                 :             : 
    1906                 :             : static enum var_init_status
    1907                 :      177221 : get_init_value (dataflow_set *set, rtx loc, decl_or_value dv)
    1908                 :             : {
    1909                 :      177221 :   variable *var;
    1910                 :      177221 :   int i;
    1911                 :      177221 :   enum var_init_status ret_val = VAR_INIT_STATUS_UNKNOWN;
    1912                 :             : 
    1913                 :      177221 :   if (! flag_var_tracking_uninit)
    1914                 :             :     return VAR_INIT_STATUS_INITIALIZED;
    1915                 :             : 
    1916                 :      177221 :   var = shared_hash_find (set->vars, dv);
    1917                 :      177221 :   if (var)
    1918                 :             :     {
    1919                 :      358800 :       for (i = 0; i < var->n_var_parts && ret_val == VAR_INIT_STATUS_UNKNOWN; i++)
    1920                 :             :         {
    1921                 :      203824 :           location_chain *nextp;
    1922                 :      299713 :           for (nextp = var->var_part[i].loc_chain; nextp; nextp = nextp->next)
    1923                 :      221264 :             if (rtx_equal_p (nextp->loc, loc))
    1924                 :             :               {
    1925                 :      125375 :                 ret_val = nextp->init;
    1926                 :      125375 :                 break;
    1927                 :             :               }
    1928                 :             :         }
    1929                 :             :     }
    1930                 :             : 
    1931                 :             :   return ret_val;
    1932                 :             : }
    1933                 :             : 
    1934                 :             : /* Delete current content of register LOC in dataflow set SET and set
    1935                 :             :    the register to contain REG_EXPR (LOC), REG_OFFSET (LOC).  If
    1936                 :             :    MODIFY is true, any other live copies of the same variable part are
    1937                 :             :    also deleted from the dataflow set, otherwise the variable part is
    1938                 :             :    assumed to be copied from another location holding the same
    1939                 :             :    part.  */
    1940                 :             : 
    1941                 :             : static void
    1942                 :      428867 : var_reg_delete_and_set (dataflow_set *set, rtx loc, bool modify,
    1943                 :             :                         enum var_init_status initialized, rtx set_src)
    1944                 :             : {
    1945                 :      428867 :   tree decl = REG_EXPR (loc);
    1946                 :      428867 :   HOST_WIDE_INT offset = get_tracked_reg_offset (loc);
    1947                 :      428867 :   attrs *node, *next;
    1948                 :      428867 :   attrs **nextp;
    1949                 :             : 
    1950                 :      428867 :   decl = var_debug_decl (decl);
    1951                 :             : 
    1952                 :      428867 :   if (initialized == VAR_INIT_STATUS_UNKNOWN)
    1953                 :        7004 :     initialized = get_init_value (set, loc, dv_from_decl (decl));
    1954                 :             : 
    1955                 :      428867 :   nextp = &set->regs[REGNO (loc)];
    1956                 :      655528 :   for (node = *nextp; node; node = next)
    1957                 :             :     {
    1958                 :      226661 :       next = node->next;
    1959                 :      226661 :       if (node->dv != decl || node->offset != offset)
    1960                 :             :         {
    1961                 :      201627 :           delete_variable_part (set, node->loc, node->dv, node->offset);
    1962                 :      201627 :           delete node;
    1963                 :      201627 :           *nextp = next;
    1964                 :             :         }
    1965                 :             :       else
    1966                 :             :         {
    1967                 :       25034 :           node->loc = loc;
    1968                 :       25034 :           nextp = &node->next;
    1969                 :             :         }
    1970                 :             :     }
    1971                 :      428867 :   if (modify)
    1972                 :      300158 :     clobber_variable_part (set, loc, dv_from_decl (decl), offset, set_src);
    1973                 :      428867 :   var_reg_set (set, loc, initialized, set_src);
    1974                 :      428867 : }
    1975                 :             : 
    1976                 :             : /* Delete the association of register LOC in dataflow set SET with any
    1977                 :             :    variables that aren't onepart.  If CLOBBER is true, also delete any
    1978                 :             :    other live copies of the same variable part, and delete the
    1979                 :             :    association with onepart dvs too.  */
    1980                 :             : 
    1981                 :             : static void
    1982                 :    56751081 : var_reg_delete (dataflow_set *set, rtx loc, bool clobber)
    1983                 :             : {
    1984                 :    56751081 :   attrs **nextp = &set->regs[REGNO (loc)];
    1985                 :    56751081 :   attrs *node, *next;
    1986                 :             : 
    1987                 :    56751081 :   HOST_WIDE_INT offset;
    1988                 :    56751081 :   if (clobber && track_offset_p (REG_OFFSET (loc), &offset))
    1989                 :             :     {
    1990                 :    13124975 :       tree decl = REG_EXPR (loc);
    1991                 :             : 
    1992                 :    13124975 :       decl = var_debug_decl (decl);
    1993                 :             : 
    1994                 :    13124975 :       clobber_variable_part (set, NULL, dv_from_decl (decl), offset, NULL);
    1995                 :             :     }
    1996                 :             : 
    1997                 :   104007660 :   for (node = *nextp; node; node = next)
    1998                 :             :     {
    1999                 :    47256579 :       next = node->next;
    2000                 :    47256579 :       if (clobber || !dv_onepart_p (node->dv))
    2001                 :             :         {
    2002                 :     3104917 :           delete_variable_part (set, node->loc, node->dv, node->offset);
    2003                 :     3104917 :           delete node;
    2004                 :     3104917 :           *nextp = next;
    2005                 :             :         }
    2006                 :             :       else
    2007                 :    44151662 :         nextp = &node->next;
    2008                 :             :     }
    2009                 :    56751081 : }
    2010                 :             : 
    2011                 :             : /* Delete content of register with number REGNO in dataflow set SET.  */
    2012                 :             : 
    2013                 :             : static void
    2014                 :   602812982 : var_regno_delete (dataflow_set *set, int regno)
    2015                 :             : {
    2016                 :   602812982 :   attrs **reg = &set->regs[regno];
    2017                 :   602812982 :   attrs *node, *next;
    2018                 :             : 
    2019                 :   650367447 :   for (node = *reg; node; node = next)
    2020                 :             :     {
    2021                 :    47554465 :       next = node->next;
    2022                 :    47554465 :       delete_variable_part (set, node->loc, node->dv, node->offset);
    2023                 :    47554465 :       delete node;
    2024                 :             :     }
    2025                 :   602812982 :   *reg = NULL;
    2026                 :   602812982 : }
    2027                 :             : 
    2028                 :             : /* Return true if I is the negated value of a power of two.  */
    2029                 :             : static bool
    2030                 :      133226 : negative_power_of_two_p (HOST_WIDE_INT i)
    2031                 :             : {
    2032                 :      133226 :   unsigned HOST_WIDE_INT x = -(unsigned HOST_WIDE_INT)i;
    2033                 :      133226 :   return pow2_or_zerop (x);
    2034                 :             : }
    2035                 :             : 
    2036                 :             : /* Strip constant offsets and alignments off of LOC.  Return the base
    2037                 :             :    expression.  */
    2038                 :             : 
    2039                 :             : static rtx
    2040                 :     8824533 : vt_get_canonicalize_base (rtx loc)
    2041                 :             : {
    2042                 :     8824533 :   while ((GET_CODE (loc) == PLUS
    2043                 :     8824533 :           || GET_CODE (loc) == AND)
    2044                 :           0 :          && GET_CODE (XEXP (loc, 1)) == CONST_INT
    2045                 :     8824533 :          && (GET_CODE (loc) != AND
    2046                 :           0 :              || negative_power_of_two_p (INTVAL (XEXP (loc, 1)))))
    2047                 :           0 :     loc = XEXP (loc, 0);
    2048                 :             : 
    2049                 :     8824533 :   return loc;
    2050                 :             : }
    2051                 :             : 
    2052                 :             : /* This caches canonicalized addresses for VALUEs, computed using
    2053                 :             :    information in the global cselib table.  */
    2054                 :             : static hash_map<rtx, rtx> *global_get_addr_cache;
    2055                 :             : 
    2056                 :             : /* This caches canonicalized addresses for VALUEs, computed using
    2057                 :             :    information from the global cache and information pertaining to a
    2058                 :             :    basic block being analyzed.  */
    2059                 :             : static hash_map<rtx, rtx> *local_get_addr_cache;
    2060                 :             : 
    2061                 :             : static rtx vt_canonicalize_addr (dataflow_set *, rtx);
    2062                 :             : 
    2063                 :             : /* Return the canonical address for LOC, that must be a VALUE, using a
    2064                 :             :    cached global equivalence or computing it and storing it in the
    2065                 :             :    global cache.  */
    2066                 :             : 
    2067                 :             : static rtx
    2068                 :    96819548 : get_addr_from_global_cache (rtx const loc)
    2069                 :             : {
    2070                 :    96819548 :   rtx x;
    2071                 :             : 
    2072                 :    96819548 :   gcc_checking_assert (GET_CODE (loc) == VALUE);
    2073                 :             : 
    2074                 :    96819548 :   bool existed;
    2075                 :    96819548 :   rtx *slot = &global_get_addr_cache->get_or_insert (loc, &existed);
    2076                 :    96819548 :   if (existed)
    2077                 :    87637874 :     return *slot;
    2078                 :             : 
    2079                 :     9181674 :   x = canon_rtx (get_addr (loc));
    2080                 :             : 
    2081                 :             :   /* Tentative, avoiding infinite recursion.  */
    2082                 :     9181674 :   *slot = x;
    2083                 :             : 
    2084                 :     9181674 :   if (x != loc)
    2085                 :             :     {
    2086                 :     7618580 :       rtx nx = vt_canonicalize_addr (NULL, x);
    2087                 :     7618580 :       if (nx != x)
    2088                 :             :         {
    2089                 :             :           /* The table may have moved during recursion, recompute
    2090                 :             :              SLOT.  */
    2091                 :     4522839 :           *global_get_addr_cache->get (loc) = x = nx;
    2092                 :             :         }
    2093                 :             :     }
    2094                 :             : 
    2095                 :             :   return x;
    2096                 :             : }
    2097                 :             : 
    2098                 :             : /* Return the canonical address for LOC, that must be a VALUE, using a
    2099                 :             :    cached local equivalence or computing it and storing it in the
    2100                 :             :    local cache.  */
    2101                 :             : 
    2102                 :             : static rtx
    2103                 :   576911508 : get_addr_from_local_cache (dataflow_set *set, rtx const loc)
    2104                 :             : {
    2105                 :   576911508 :   rtx x;
    2106                 :   576911508 :   decl_or_value dv;
    2107                 :   576911508 :   variable *var;
    2108                 :   576911508 :   location_chain *l;
    2109                 :             : 
    2110                 :   576911508 :   gcc_checking_assert (GET_CODE (loc) == VALUE);
    2111                 :             : 
    2112                 :   576911508 :   bool existed;
    2113                 :   576911508 :   rtx *slot = &local_get_addr_cache->get_or_insert (loc, &existed);
    2114                 :   576911508 :   if (existed)
    2115                 :   486494739 :     return *slot;
    2116                 :             : 
    2117                 :    90416769 :   x = get_addr_from_global_cache (loc);
    2118                 :             : 
    2119                 :             :   /* Tentative, avoiding infinite recursion.  */
    2120                 :    90416769 :   *slot = x;
    2121                 :             : 
    2122                 :             :   /* Recurse to cache local expansion of X, or if we need to search
    2123                 :             :      for a VALUE in the expansion.  */
    2124                 :    90416769 :   if (x != loc)
    2125                 :             :     {
    2126                 :    83744652 :       rtx nx = vt_canonicalize_addr (set, x);
    2127                 :    83744652 :       if (nx != x)
    2128                 :             :         {
    2129                 :     6216498 :           slot = local_get_addr_cache->get (loc);
    2130                 :     6216498 :           *slot = x = nx;
    2131                 :             :         }
    2132                 :    83744652 :       return x;
    2133                 :             :     }
    2134                 :             : 
    2135                 :     6672117 :   dv = dv_from_rtx (x);
    2136                 :     6672117 :   var = shared_hash_find (set->vars, dv);
    2137                 :     6672117 :   if (!var)
    2138                 :             :     return x;
    2139                 :             : 
    2140                 :             :   /* Look for an improved equivalent expression.  */
    2141                 :    12147644 :   for (l = var->var_part[0].loc_chain; l; l = l->next)
    2142                 :             :     {
    2143                 :     8824533 :       rtx base = vt_get_canonicalize_base (l->loc);
    2144                 :     8824533 :       if (GET_CODE (base) == VALUE
    2145                 :     8824533 :           && canon_value_cmp (base, loc))
    2146                 :             :         {
    2147                 :     2598447 :           rtx nx = vt_canonicalize_addr (set, l->loc);
    2148                 :     2598447 :           if (x != nx)
    2149                 :             :             {
    2150                 :     2598447 :               slot = local_get_addr_cache->get (loc);
    2151                 :     2598447 :               *slot = x = nx;
    2152                 :             :             }
    2153                 :             :           break;
    2154                 :             :         }
    2155                 :             :     }
    2156                 :             : 
    2157                 :             :   return x;
    2158                 :             : }
    2159                 :             : 
    2160                 :             : /* Canonicalize LOC using equivalences from SET in addition to those
    2161                 :             :    in the cselib static table.  It expects a VALUE-based expression,
    2162                 :             :    and it will only substitute VALUEs with other VALUEs or
    2163                 :             :    function-global equivalences, so that, if two addresses have base
    2164                 :             :    VALUEs that are locally or globally related in ways that
    2165                 :             :    memrefs_conflict_p cares about, they will both canonicalize to
    2166                 :             :    expressions that have the same base VALUE.
    2167                 :             : 
    2168                 :             :    The use of VALUEs as canonical base addresses enables the canonical
    2169                 :             :    RTXs to remain unchanged globally, if they resolve to a constant,
    2170                 :             :    or throughout a basic block otherwise, so that they can be cached
    2171                 :             :    and the cache needs not be invalidated when REGs, MEMs or such
    2172                 :             :    change.  */
    2173                 :             : 
    2174                 :             : static rtx
    2175                 :   658598621 : vt_canonicalize_addr (dataflow_set *set, rtx oloc)
    2176                 :             : {
    2177                 :   658598621 :   poly_int64 ofst = 0, term;
    2178                 :   658598621 :   machine_mode mode = GET_MODE (oloc);
    2179                 :   658598621 :   rtx loc = oloc;
    2180                 :   658598621 :   rtx x;
    2181                 :   658598621 :   bool retry = true;
    2182                 :             : 
    2183                 :   658598621 :   while (retry)
    2184                 :             :     {
    2185                 :   741505156 :       while (GET_CODE (loc) == PLUS
    2186                 :   741505156 :              && poly_int_rtx_p (XEXP (loc, 1), &term))
    2187                 :             :         {
    2188                 :    82906535 :           ofst += term;
    2189                 :    82906535 :           loc = XEXP (loc, 0);
    2190                 :             :         }
    2191                 :             : 
    2192                 :             :       /* Alignment operations can't normally be combined, so just
    2193                 :             :          canonicalize the base and we're done.  We'll normally have
    2194                 :             :          only one stack alignment anyway.  */
    2195                 :   658598621 :       if (GET_CODE (loc) == AND
    2196                 :      133254 :           && GET_CODE (XEXP (loc, 1)) == CONST_INT
    2197                 :   658731847 :           && negative_power_of_two_p (INTVAL (XEXP (loc, 1))))
    2198                 :             :         {
    2199                 :      133223 :           x = vt_canonicalize_addr (set, XEXP (loc, 0));
    2200                 :      133223 :           if (x != XEXP (loc, 0))
    2201                 :       13886 :             loc = gen_rtx_AND (mode, x, XEXP (loc, 1));
    2202                 :             :           retry = false;
    2203                 :             :         }
    2204                 :             : 
    2205                 :   658598621 :       if (GET_CODE (loc) == VALUE)
    2206                 :             :         {
    2207                 :   583314287 :           if (set)
    2208                 :   576911508 :             loc = get_addr_from_local_cache (set, loc);
    2209                 :             :           else
    2210                 :     6402779 :             loc = get_addr_from_global_cache (loc);
    2211                 :             : 
    2212                 :             :           /* Consolidate plus_constants.  */
    2213                 :   591455796 :           while (maybe_ne (ofst, 0)
    2214                 :    24277516 :                  && GET_CODE (loc) == PLUS
    2215                 :  1908630248 :                  && poly_int_rtx_p (XEXP (loc, 1), &term))
    2216                 :             :             {
    2217                 :     8141509 :               ofst += term;
    2218                 :     8141509 :               loc = XEXP (loc, 0);
    2219                 :             :             }
    2220                 :             : 
    2221                 :             :           retry = false;
    2222                 :             :         }
    2223                 :             :       else
    2224                 :             :         {
    2225                 :    75284334 :           x = canon_rtx (loc);
    2226                 :    75284334 :           if (retry)
    2227                 :    75151111 :             retry = (x != loc);
    2228                 :    75151111 :           loc = x;
    2229                 :             :         }
    2230                 :             :     }
    2231                 :             : 
    2232                 :             :   /* Add OFST back in.  */
    2233                 :   658598621 :   if (maybe_ne (ofst, 0))
    2234                 :             :     {
    2235                 :             :       /* Don't build new RTL if we can help it.  */
    2236                 :    82878780 :       if (strip_offset (oloc, &term) == loc && known_eq (term, ofst))
    2237                 :             :         return oloc;
    2238                 :             : 
    2239                 :    10699312 :       loc = plus_constant (mode, loc, ofst);
    2240                 :             :     }
    2241                 :             : 
    2242                 :             :   return loc;
    2243                 :             : }
    2244                 :             : 
    2245                 :             : /* Return true iff there's a true dependence between MLOC and LOC.
    2246                 :             :    MADDR must be a canonicalized version of MLOC's address.  */
    2247                 :             : 
    2248                 :             : static inline bool
    2249                 :  1236933618 : vt_canon_true_dep (dataflow_set *set, rtx mloc, rtx maddr, rtx loc)
    2250                 :             : {
    2251                 :  1236933618 :   if (GET_CODE (loc) != MEM)
    2252                 :             :     return false;
    2253                 :             : 
    2254                 :   546658484 :   rtx addr = vt_canonicalize_addr (set, XEXP (loc, 0));
    2255                 :   546658484 :   if (!canon_true_dependence (mloc, GET_MODE (mloc), maddr, loc, addr))
    2256                 :             :     return false;
    2257                 :             : 
    2258                 :             :   return true;
    2259                 :             : }
    2260                 :             : 
    2261                 :             : /* Hold parameters for the hashtab traversal function
    2262                 :             :    drop_overlapping_mem_locs, see below.  */
    2263                 :             : 
    2264                 :             : struct overlapping_mems
    2265                 :             : {
    2266                 :             :   dataflow_set *set;
    2267                 :             :   rtx loc, addr;
    2268                 :             : };
    2269                 :             : 
    2270                 :             : /* Remove all MEMs that overlap with COMS->LOC from the location list
    2271                 :             :    of a hash table entry for a onepart variable.  COMS->ADDR must be a
    2272                 :             :    canonicalized form of COMS->LOC's address, and COMS->LOC must be
    2273                 :             :    canonicalized itself.  */
    2274                 :             : 
    2275                 :             : int
    2276                 :  1007355634 : drop_overlapping_mem_locs (variable **slot, overlapping_mems *coms)
    2277                 :             : {
    2278                 :  1007355634 :   dataflow_set *set = coms->set;
    2279                 :  1007355634 :   rtx mloc = coms->loc, addr = coms->addr;
    2280                 :  1007355634 :   variable *var = *slot;
    2281                 :             : 
    2282                 :  1007355634 :   if (var->onepart != NOT_ONEPART)
    2283                 :             :     {
    2284                 :  1002734656 :       location_chain *loc, **locp;
    2285                 :  1002734656 :       bool changed = false;
    2286                 :  1002734656 :       rtx cur_loc;
    2287                 :             : 
    2288                 :  1002734656 :       gcc_assert (var->n_var_parts == 1);
    2289                 :             : 
    2290                 :  1002734656 :       if (shared_var_p (var, set->vars))
    2291                 :             :         {
    2292                 :  1705240542 :           for (loc = var->var_part[0].loc_chain; loc; loc = loc->next)
    2293                 :   913607738 :             if (vt_canon_true_dep (set, mloc, addr, loc->loc))
    2294                 :             :               break;
    2295                 :             : 
    2296                 :   795668112 :           if (!loc)
    2297                 :             :             return 1;
    2298                 :             : 
    2299                 :     4035308 :           slot = unshare_variable (set, slot, var, VAR_INIT_STATUS_UNKNOWN);
    2300                 :     4035308 :           var = *slot;
    2301                 :     4035308 :           gcc_assert (var->n_var_parts == 1);
    2302                 :             :         }
    2303                 :             : 
    2304                 :   211101852 :       if (VAR_LOC_1PAUX (var))
    2305                 :    28511111 :         cur_loc = VAR_LOC_FROM (var);
    2306                 :             :       else
    2307                 :   182590741 :         cur_loc = var->var_part[0].cur_loc;
    2308                 :             : 
    2309                 :   211101852 :       for (locp = &var->var_part[0].loc_chain, loc = *locp;
    2310                 :   534427732 :            loc; loc = *locp)
    2311                 :             :         {
    2312                 :   323325880 :           if (!vt_canon_true_dep (set, mloc, addr, loc->loc))
    2313                 :             :             {
    2314                 :   315135430 :               locp = &loc->next;
    2315                 :   315135430 :               continue;
    2316                 :             :             }
    2317                 :             : 
    2318                 :     8190450 :           *locp = loc->next;
    2319                 :             :           /* If we have deleted the location which was last emitted
    2320                 :             :              we have to emit new location so add the variable to set
    2321                 :             :              of changed variables.  */
    2322                 :     8190450 :           if (cur_loc == loc->loc)
    2323                 :             :             {
    2324                 :      422289 :               changed = true;
    2325                 :      422289 :               var->var_part[0].cur_loc = NULL;
    2326                 :      422289 :               if (VAR_LOC_1PAUX (var))
    2327                 :      422289 :                 VAR_LOC_FROM (var) = NULL;
    2328                 :             :             }
    2329                 :     8190450 :           delete loc;
    2330                 :             :         }
    2331                 :             : 
    2332                 :   211101852 :       if (!var->var_part[0].loc_chain)
    2333                 :             :         {
    2334                 :     4148916 :           var->n_var_parts--;
    2335                 :     4148916 :           changed = true;
    2336                 :             :         }
    2337                 :   211101852 :       if (changed)
    2338                 :     4207672 :         variable_was_changed (var, set);
    2339                 :             :     }
    2340                 :             : 
    2341                 :             :   return 1;
    2342                 :             : }
    2343                 :             : 
    2344                 :             : /* Remove from SET all VALUE bindings to MEMs that overlap with LOC.  */
    2345                 :             : 
    2346                 :             : static void
    2347                 :    17845235 : clobber_overlapping_mems (dataflow_set *set, rtx loc)
    2348                 :             : {
    2349                 :    17845235 :   struct overlapping_mems coms;
    2350                 :             : 
    2351                 :    17845235 :   gcc_checking_assert (GET_CODE (loc) == MEM);
    2352                 :             : 
    2353                 :    17845235 :   coms.set = set;
    2354                 :    17845235 :   coms.loc = canon_rtx (loc);
    2355                 :    17845235 :   coms.addr = vt_canonicalize_addr (set, XEXP (loc, 0));
    2356                 :             : 
    2357                 :    17845235 :   set->traversed_vars = set->vars;
    2358                 :    17845235 :   shared_hash_htab (set->vars)
    2359                 :    17845235 :     ->traverse <overlapping_mems*, drop_overlapping_mem_locs> (&coms);
    2360                 :    17845235 :   set->traversed_vars = NULL;
    2361                 :    17845235 : }
    2362                 :             : 
    2363                 :             : /* Set the location of DV, OFFSET as the MEM LOC.  */
    2364                 :             : 
    2365                 :             : static void
    2366                 :    36647895 : var_mem_decl_set (dataflow_set *set, rtx loc, enum var_init_status initialized,
    2367                 :             :                   decl_or_value dv, HOST_WIDE_INT offset, rtx set_src,
    2368                 :             :                   enum insert_option iopt)
    2369                 :             : {
    2370                 :    36647895 :   if (dv_is_decl_p (dv))
    2371                 :       68172 :     dv = dv_from_decl (var_debug_decl (dv_as_decl (dv)));
    2372                 :             : 
    2373                 :    36647895 :   set_variable_part (set, loc, dv, offset, initialized, set_src, iopt);
    2374                 :    36647895 : }
    2375                 :             : 
    2376                 :             : /* Set the location part of variable MEM_EXPR (LOC) in dataflow set
    2377                 :             :    SET to LOC.
    2378                 :             :    Adjust the address first if it is stack pointer based.  */
    2379                 :             : 
    2380                 :             : static void
    2381                 :       68172 : var_mem_set (dataflow_set *set, rtx loc, enum var_init_status initialized,
    2382                 :             :              rtx set_src)
    2383                 :             : {
    2384                 :       68172 :   tree decl = MEM_EXPR (loc);
    2385                 :       68172 :   HOST_WIDE_INT offset = int_mem_offset (loc);
    2386                 :             : 
    2387                 :       68172 :   var_mem_decl_set (set, loc, initialized,
    2388                 :             :                     dv_from_decl (decl), offset, set_src, INSERT);
    2389                 :       68172 : }
    2390                 :             : 
    2391                 :             : /* Delete and set the location part of variable MEM_EXPR (LOC) in
    2392                 :             :    dataflow set SET to LOC.  If MODIFY is true, any other live copies
    2393                 :             :    of the same variable part are also deleted from the dataflow set,
    2394                 :             :    otherwise the variable part is assumed to be copied from another
    2395                 :             :    location holding the same part.
    2396                 :             :    Adjust the address first if it is stack pointer based.  */
    2397                 :             : 
    2398                 :             : static void
    2399                 :        9273 : var_mem_delete_and_set (dataflow_set *set, rtx loc, bool modify,
    2400                 :             :                         enum var_init_status initialized, rtx set_src)
    2401                 :             : {
    2402                 :        9273 :   tree decl = MEM_EXPR (loc);
    2403                 :        9273 :   HOST_WIDE_INT offset = int_mem_offset (loc);
    2404                 :             : 
    2405                 :        9273 :   clobber_overlapping_mems (set, loc);
    2406                 :        9273 :   decl = var_debug_decl (decl);
    2407                 :             : 
    2408                 :        9273 :   if (initialized == VAR_INIT_STATUS_UNKNOWN)
    2409                 :         452 :     initialized = get_init_value (set, loc, dv_from_decl (decl));
    2410                 :             : 
    2411                 :        9273 :   if (modify)
    2412                 :        5179 :     clobber_variable_part (set, NULL, dv_from_decl (decl), offset, set_src);
    2413                 :        9273 :   var_mem_set (set, loc, initialized, set_src);
    2414                 :        9273 : }
    2415                 :             : 
    2416                 :             : /* Delete the location part LOC from dataflow set SET.  If CLOBBER is
    2417                 :             :    true, also delete any other live copies of the same variable part.
    2418                 :             :    Adjust the address first if it is stack pointer based.  */
    2419                 :             : 
    2420                 :             : static void
    2421                 :           0 : var_mem_delete (dataflow_set *set, rtx loc, bool clobber)
    2422                 :             : {
    2423                 :           0 :   tree decl = MEM_EXPR (loc);
    2424                 :           0 :   HOST_WIDE_INT offset = int_mem_offset (loc);
    2425                 :             : 
    2426                 :           0 :   clobber_overlapping_mems (set, loc);
    2427                 :           0 :   decl = var_debug_decl (decl);
    2428                 :           0 :   if (clobber)
    2429                 :           0 :     clobber_variable_part (set, NULL, dv_from_decl (decl), offset, NULL);
    2430                 :           0 :   delete_variable_part (set, loc, dv_from_decl (decl), offset);
    2431                 :           0 : }
    2432                 :             : 
    2433                 :             : /* Return true if LOC should not be expanded for location expressions,
    2434                 :             :    or used in them.  */
    2435                 :             : 
    2436                 :             : static inline bool
    2437                 :   238891201 : unsuitable_loc (rtx loc)
    2438                 :             : {
    2439                 :    13967454 :   switch (GET_CODE (loc))
    2440                 :             :     {
    2441                 :             :     case PC:
    2442                 :             :     case SCRATCH:
    2443                 :             :     case ASM_INPUT:
    2444                 :             :     case ASM_OPERANDS:
    2445                 :             :       return true;
    2446                 :             : 
    2447                 :   218156028 :     default:
    2448                 :   218156028 :       return false;
    2449                 :             :     }
    2450                 :             : }
    2451                 :             : 
    2452                 :             : /* Bind VAL to LOC in SET.  If MODIFIED, detach LOC from any values
    2453                 :             :    bound to it.  */
    2454                 :             : 
    2455                 :             : static inline void
    2456                 :    95626305 : val_bind (dataflow_set *set, rtx val, rtx loc, bool modified)
    2457                 :             : {
    2458                 :    95626305 :   if (REG_P (loc))
    2459                 :             :     {
    2460                 :    59046582 :       if (modified)
    2461                 :    49203382 :         var_regno_delete (set, REGNO (loc));
    2462                 :    59046582 :       var_reg_decl_set (set, loc, VAR_INIT_STATUS_INITIALIZED,
    2463                 :             :                         dv_from_value (val), 0, NULL_RTX, INSERT);
    2464                 :             :     }
    2465                 :    36579723 :   else if (MEM_P (loc))
    2466                 :             :     {
    2467                 :    36579723 :       struct elt_loc_list *l = CSELIB_VAL_PTR (val)->locs;
    2468                 :             : 
    2469                 :    36579723 :       if (modified)
    2470                 :    17835962 :         clobber_overlapping_mems (set, loc);
    2471                 :             : 
    2472                 :    36579723 :       if (l && GET_CODE (l->loc) == VALUE)
    2473                 :      924906 :         l = canonical_cselib_val (CSELIB_VAL_PTR (l->loc))->locs;
    2474                 :             : 
    2475                 :             :       /* If this MEM is a global constant, we don't need it in the
    2476                 :             :          dynamic tables.  ??? We should test this before emitting the
    2477                 :             :          micro-op in the first place.  */
    2478                 :    46142669 :       while (l)
    2479                 :     9562946 :         if (GET_CODE (l->loc) == MEM && XEXP (l->loc, 0) == XEXP (loc, 0))
    2480                 :             :           break;
    2481                 :             :         else
    2482                 :     9562946 :           l = l->next;
    2483                 :             : 
    2484                 :    36579723 :       if (!l)
    2485                 :    36579723 :         var_mem_decl_set (set, loc, VAR_INIT_STATUS_INITIALIZED,
    2486                 :             :                           dv_from_value (val), 0, NULL_RTX, INSERT);
    2487                 :             :     }
    2488                 :             :   else
    2489                 :             :     {
    2490                 :             :       /* Other kinds of equivalences are necessarily static, at least
    2491                 :             :          so long as we do not perform substitutions while merging
    2492                 :             :          expressions.  */
    2493                 :           0 :       gcc_unreachable ();
    2494                 :             :       set_variable_part (set, loc, dv_from_value (val), 0,
    2495                 :             :                          VAR_INIT_STATUS_INITIALIZED, NULL_RTX, INSERT);
    2496                 :             :     }
    2497                 :    95626305 : }
    2498                 :             : 
    2499                 :             : /* Bind a value to a location it was just stored in.  If MODIFIED
    2500                 :             :    holds, assume the location was modified, detaching it from any
    2501                 :             :    values bound to it.  */
    2502                 :             : 
    2503                 :             : static void
    2504                 :    67039344 : val_store (dataflow_set *set, rtx val, rtx loc, rtx_insn *insn,
    2505                 :             :            bool modified)
    2506                 :             : {
    2507                 :    67039344 :   cselib_val *v = CSELIB_VAL_PTR (val);
    2508                 :             : 
    2509                 :    67039344 :   gcc_assert (cselib_preserved_value_p (v));
    2510                 :             : 
    2511                 :    67039344 :   if (dump_file)
    2512                 :             :     {
    2513                 :         440 :       fprintf (dump_file, "%i: ", insn ? INSN_UID (insn) : 0);
    2514                 :         440 :       print_inline_rtx (dump_file, loc, 0);
    2515                 :         440 :       fprintf (dump_file, " evaluates to ");
    2516                 :         440 :       print_inline_rtx (dump_file, val, 0);
    2517                 :         440 :       if (v->locs)
    2518                 :             :         {
    2519                 :             :           struct elt_loc_list *l;
    2520                 :         796 :           for (l = v->locs; l; l = l->next)
    2521                 :             :             {
    2522                 :         450 :               fprintf (dump_file, "\n%i: ", INSN_UID (l->setting_insn));
    2523                 :         450 :               print_inline_rtx (dump_file, l->loc, 0);
    2524                 :             :             }
    2525                 :             :         }
    2526                 :         440 :       fprintf (dump_file, "\n");
    2527                 :             :     }
    2528                 :             : 
    2529                 :    67039344 :   gcc_checking_assert (!unsuitable_loc (loc));
    2530                 :             : 
    2531                 :    67039344 :   val_bind (set, val, loc, modified);
    2532                 :    67039344 : }
    2533                 :             : 
    2534                 :             : /* Clear (canonical address) slots that reference X.  */
    2535                 :             : 
    2536                 :             : bool
    2537                 :           0 : local_get_addr_clear_given_value (rtx const &, rtx *slot, rtx x)
    2538                 :             : {
    2539                 :           0 :   if (vt_get_canonicalize_base (*slot) == x)
    2540                 :           0 :     *slot = NULL;
    2541                 :           0 :   return true;
    2542                 :             : }
    2543                 :             : 
    2544                 :             : /* Reset this node, detaching all its equivalences.  Return the slot
    2545                 :             :    in the variable hash table that holds dv, if there is one.  */
    2546                 :             : 
    2547                 :             : static void
    2548                 :    37555828 : val_reset (dataflow_set *set, decl_or_value dv)
    2549                 :             : {
    2550                 :    37555828 :   variable *var = shared_hash_find (set->vars, dv) ;
    2551                 :    37555828 :   location_chain *node;
    2552                 :    37555828 :   rtx cval;
    2553                 :             : 
    2554                 :    37555828 :   if (!var || !var->n_var_parts)
    2555                 :             :     return;
    2556                 :             : 
    2557                 :           0 :   gcc_assert (var->n_var_parts == 1);
    2558                 :             : 
    2559                 :           0 :   if (var->onepart == ONEPART_VALUE)
    2560                 :             :     {
    2561                 :           0 :       rtx x = dv_as_value (dv);
    2562                 :             : 
    2563                 :             :       /* Relationships in the global cache don't change, so reset the
    2564                 :             :          local cache entry only.  */
    2565                 :           0 :       rtx *slot = local_get_addr_cache->get (x);
    2566                 :           0 :       if (slot)
    2567                 :             :         {
    2568                 :             :           /* If the value resolved back to itself, odds are that other
    2569                 :             :              values may have cached it too.  These entries now refer
    2570                 :             :              to the old X, so detach them too.  Entries that used the
    2571                 :             :              old X but resolved to something else remain ok as long as
    2572                 :             :              that something else isn't also reset.  */
    2573                 :           0 :           if (*slot == x)
    2574                 :           0 :             local_get_addr_cache
    2575                 :           0 :               ->traverse<rtx, local_get_addr_clear_given_value> (x);
    2576                 :           0 :           *slot = NULL;
    2577                 :             :         }
    2578                 :             :     }
    2579                 :             : 
    2580                 :           0 :   cval = NULL;
    2581                 :           0 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    2582                 :           0 :     if (GET_CODE (node->loc) == VALUE
    2583                 :           0 :         && canon_value_cmp (node->loc, cval))
    2584                 :             :       cval = node->loc;
    2585                 :             : 
    2586                 :           0 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    2587                 :           0 :     if (GET_CODE (node->loc) == VALUE && cval != node->loc)
    2588                 :             :       {
    2589                 :             :         /* Redirect the equivalence link to the new canonical
    2590                 :             :            value, or simply remove it if it would point at
    2591                 :             :            itself.  */
    2592                 :           0 :         if (cval)
    2593                 :           0 :           set_variable_part (set, cval, dv_from_value (node->loc),
    2594                 :             :                              0, node->init, node->set_src, NO_INSERT);
    2595                 :           0 :         delete_variable_part (set, dv_as_value (dv),
    2596                 :             :                               dv_from_value (node->loc), 0);
    2597                 :             :       }
    2598                 :             : 
    2599                 :           0 :   if (cval)
    2600                 :             :     {
    2601                 :           0 :       decl_or_value cdv = dv_from_value (cval);
    2602                 :             : 
    2603                 :             :       /* Keep the remaining values connected, accumulating links
    2604                 :             :          in the canonical value.  */
    2605                 :           0 :       for (node = var->var_part[0].loc_chain; node; node = node->next)
    2606                 :             :         {
    2607                 :           0 :           if (node->loc == cval)
    2608                 :           0 :             continue;
    2609                 :           0 :           else if (GET_CODE (node->loc) == REG)
    2610                 :           0 :             var_reg_decl_set (set, node->loc, node->init, cdv, 0,
    2611                 :             :                               node->set_src, NO_INSERT);
    2612                 :           0 :           else if (GET_CODE (node->loc) == MEM)
    2613                 :           0 :             var_mem_decl_set (set, node->loc, node->init, cdv, 0,
    2614                 :             :                               node->set_src, NO_INSERT);
    2615                 :             :           else
    2616                 :           0 :             set_variable_part (set, node->loc, cdv, 0,
    2617                 :             :                                node->init, node->set_src, NO_INSERT);
    2618                 :             :         }
    2619                 :             :     }
    2620                 :             : 
    2621                 :             :   /* We remove this last, to make sure that the canonical value is not
    2622                 :             :      removed to the point of requiring reinsertion.  */
    2623                 :           0 :   if (cval)
    2624                 :           0 :     delete_variable_part (set, dv_as_value (dv), dv_from_value (cval), 0);
    2625                 :             : 
    2626                 :           0 :   clobber_variable_part (set, NULL, dv, 0, NULL);
    2627                 :             : }
    2628                 :             : 
    2629                 :             : /* Find the values in a given location and map the val to another
    2630                 :             :    value, if it is unique, or add the location as one holding the
    2631                 :             :    value.  */
    2632                 :             : 
    2633                 :             : static void
    2634                 :    37299102 : val_resolve (dataflow_set *set, rtx val, rtx loc, rtx_insn *insn)
    2635                 :             : {
    2636                 :    37299102 :   decl_or_value dv = dv_from_value (val);
    2637                 :             : 
    2638                 :    37299102 :   if (dump_file && (dump_flags & TDF_DETAILS))
    2639                 :             :     {
    2640                 :           6 :       if (insn)
    2641                 :           6 :         fprintf (dump_file, "%i: ", INSN_UID (insn));
    2642                 :             :       else
    2643                 :           0 :         fprintf (dump_file, "head: ");
    2644                 :           6 :       print_inline_rtx (dump_file, val, 0);
    2645                 :           6 :       fputs (" is at ", dump_file);
    2646                 :           6 :       print_inline_rtx (dump_file, loc, 0);
    2647                 :           6 :       fputc ('\n', dump_file);
    2648                 :             :     }
    2649                 :             : 
    2650                 :    37299102 :   val_reset (set, dv);
    2651                 :             : 
    2652                 :    37299102 :   gcc_checking_assert (!unsuitable_loc (loc));
    2653                 :             : 
    2654                 :    37299102 :   if (REG_P (loc))
    2655                 :             :     {
    2656                 :    18555341 :       attrs *node, *found = NULL;
    2657                 :             : 
    2658                 :    29987212 :       for (node = set->regs[REGNO (loc)]; node; node = node->next)
    2659                 :    22863742 :         if (dv_is_value_p (node->dv)
    2660                 :    11033862 :             && GET_MODE (dv_as_value (node->dv)) == GET_MODE (loc))
    2661                 :             :           {
    2662                 :     8712141 :             found = node;
    2663                 :             : 
    2664                 :             :             /* Map incoming equivalences.  ??? Wouldn't it be nice if
    2665                 :             :              we just started sharing the location lists?  Maybe a
    2666                 :             :              circular list ending at the value itself or some
    2667                 :             :              such.  */
    2668                 :     8712141 :             set_variable_part (set, dv_as_value (node->dv),
    2669                 :             :                                dv_from_value (val), node->offset,
    2670                 :             :                                VAR_INIT_STATUS_INITIALIZED, NULL_RTX, INSERT);
    2671                 :     8712141 :             set_variable_part (set, val, node->dv, node->offset,
    2672                 :             :                                VAR_INIT_STATUS_INITIALIZED, NULL_RTX, INSERT);
    2673                 :             :           }
    2674                 :             : 
    2675                 :             :       /* If we didn't find any equivalence, we need to remember that
    2676                 :             :          this value is held in the named register.  */
    2677                 :    18555341 :       if (found)
    2678                 :     8712141 :         return;
    2679                 :             :     }
    2680                 :             :   /* ??? Attempt to find and merge equivalent MEMs or other
    2681                 :             :      expressions too.  */
    2682                 :             : 
    2683                 :    28586961 :   val_bind (set, val, loc, false);
    2684                 :             : }
    2685                 :             : 
    2686                 :             : /* Initialize dataflow set SET to be empty.
    2687                 :             :    VARS_SIZE is the initial size of hash table VARS.  */
    2688                 :             : 
    2689                 :             : static void
    2690                 :    28362213 : dataflow_set_init (dataflow_set *set)
    2691                 :             : {
    2692                 :    28362213 :   init_attrs_list_set (set->regs);
    2693                 :    28362213 :   set->vars = shared_hash_copy (empty_shared_hash);
    2694                 :    28362213 :   set->stack_adjust = 0;
    2695                 :    28362213 :   set->traversed_vars = NULL;
    2696                 :    28362213 : }
    2697                 :             : 
    2698                 :             : /* Delete the contents of dataflow set SET.  */
    2699                 :             : 
    2700                 :             : static void
    2701                 :    28542017 : dataflow_set_clear (dataflow_set *set)
    2702                 :             : {
    2703                 :    28542017 :   int i;
    2704                 :             : 
    2705                 :  2654407581 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    2706                 :  2625865564 :     attrs_list_clear (&set->regs[i]);
    2707                 :             : 
    2708                 :    28542017 :   shared_hash_destroy (set->vars);
    2709                 :    28542017 :   set->vars = shared_hash_copy (empty_shared_hash);
    2710                 :    28542017 : }
    2711                 :             : 
    2712                 :             : /* Copy the contents of dataflow set SRC to DST.  */
    2713                 :             : 
    2714                 :             : static void
    2715                 :    31968700 : dataflow_set_copy (dataflow_set *dst, dataflow_set *src)
    2716                 :             : {
    2717                 :    31968700 :   int i;
    2718                 :             : 
    2719                 :  2973089100 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    2720                 :  2941120400 :     attrs_list_copy (&dst->regs[i], src->regs[i]);
    2721                 :             : 
    2722                 :    31968700 :   shared_hash_destroy (dst->vars);
    2723                 :    31968700 :   dst->vars = shared_hash_copy (src->vars);
    2724                 :    31968700 :   dst->stack_adjust = src->stack_adjust;
    2725                 :    31968700 : }
    2726                 :             : 
    2727                 :             : /* Information for merging lists of locations for a given offset of variable.
    2728                 :             :  */
    2729                 :             : struct variable_union_info
    2730                 :             : {
    2731                 :             :   /* Node of the location chain.  */
    2732                 :             :   location_chain *lc;
    2733                 :             : 
    2734                 :             :   /* The sum of positions in the input chains.  */
    2735                 :             :   int pos;
    2736                 :             : 
    2737                 :             :   /* The position in the chain of DST dataflow set.  */
    2738                 :             :   int pos_dst;
    2739                 :             : };
    2740                 :             : 
    2741                 :             : /* Buffer for location list sorting and its allocated size.  */
    2742                 :             : static struct variable_union_info *vui_vec;
    2743                 :             : static int vui_allocated;
    2744                 :             : 
    2745                 :             : /* Compare function for qsort, order the structures by POS element.  */
    2746                 :             : 
    2747                 :             : static int
    2748                 :      233081 : variable_union_info_cmp_pos (const void *n1, const void *n2)
    2749                 :             : {
    2750                 :      233081 :   const struct variable_union_info *const i1 =
    2751                 :             :     (const struct variable_union_info *) n1;
    2752                 :      233081 :   const struct variable_union_info *const i2 =
    2753                 :             :     ( const struct variable_union_info *) n2;
    2754                 :             : 
    2755                 :      233081 :   if (i1->pos != i2->pos)
    2756                 :      228506 :     return i1->pos - i2->pos;
    2757                 :             : 
    2758                 :        4575 :   return (i1->pos_dst - i2->pos_dst);
    2759                 :             : }
    2760                 :             : 
    2761                 :             : /* Compute union of location parts of variable *SLOT and the same variable
    2762                 :             :    from hash table DATA.  Compute "sorted" union of the location chains
    2763                 :             :    for common offsets, i.e. the locations of a variable part are sorted by
    2764                 :             :    a priority where the priority is the sum of the positions in the 2 chains
    2765                 :             :    (if a location is only in one list the position in the second list is
    2766                 :             :    defined to be larger than the length of the chains).
    2767                 :             :    When we are updating the location parts the newest location is in the
    2768                 :             :    beginning of the chain, so when we do the described "sorted" union
    2769                 :             :    we keep the newest locations in the beginning.  */
    2770                 :             : 
    2771                 :             : static int
    2772                 :     1861326 : variable_union (variable *src, dataflow_set *set)
    2773                 :             : {
    2774                 :     1861326 :   variable *dst;
    2775                 :     1861326 :   variable **dstp;
    2776                 :     1861326 :   int i, j, k;
    2777                 :             : 
    2778                 :     1861326 :   dstp = shared_hash_find_slot (set->vars, src->dv);
    2779                 :     1861326 :   if (!dstp || !*dstp)
    2780                 :             :     {
    2781                 :     1042148 :       src->refcount++;
    2782                 :             : 
    2783                 :     1042148 :       dst_can_be_shared = false;
    2784                 :     1042148 :       if (!dstp)
    2785                 :           0 :         dstp = shared_hash_find_slot_unshare (&set->vars, src->dv, INSERT);
    2786                 :             : 
    2787                 :     1042148 :       *dstp = src;
    2788                 :             : 
    2789                 :             :       /* Continue traversing the hash table.  */
    2790                 :     1042148 :       return 1;
    2791                 :             :     }
    2792                 :             :   else
    2793                 :      819178 :     dst = *dstp;
    2794                 :             : 
    2795                 :      819178 :   gcc_assert (src->n_var_parts);
    2796                 :      819178 :   gcc_checking_assert (src->onepart == dst->onepart);
    2797                 :             : 
    2798                 :             :   /* We can combine one-part variables very efficiently, because their
    2799                 :             :      entries are in canonical order.  */
    2800                 :      819178 :   if (src->onepart)
    2801                 :             :     {
    2802                 :           0 :       location_chain **nodep, *dnode, *snode;
    2803                 :             : 
    2804                 :           0 :       gcc_assert (src->n_var_parts == 1
    2805                 :             :                   && dst->n_var_parts == 1);
    2806                 :             : 
    2807                 :           0 :       snode = src->var_part[0].loc_chain;
    2808                 :           0 :       gcc_assert (snode);
    2809                 :             : 
    2810                 :           0 :     restart_onepart_unshared:
    2811                 :           0 :       nodep = &dst->var_part[0].loc_chain;
    2812                 :           0 :       dnode = *nodep;
    2813                 :           0 :       gcc_assert (dnode);
    2814                 :             : 
    2815                 :           0 :       while (snode)
    2816                 :             :         {
    2817                 :           0 :           int r = dnode ? loc_cmp (dnode->loc, snode->loc) : 1;
    2818                 :             : 
    2819                 :           0 :           if (r > 0)
    2820                 :             :             {
    2821                 :           0 :               location_chain *nnode;
    2822                 :             : 
    2823                 :           0 :               if (shared_var_p (dst, set->vars))
    2824                 :             :                 {
    2825                 :           0 :                   dstp = unshare_variable (set, dstp, dst,
    2826                 :             :                                            VAR_INIT_STATUS_INITIALIZED);
    2827                 :           0 :                   dst = *dstp;
    2828                 :           0 :                   goto restart_onepart_unshared;
    2829                 :             :                 }
    2830                 :             : 
    2831                 :           0 :               *nodep = nnode = new location_chain;
    2832                 :           0 :               nnode->loc = snode->loc;
    2833                 :           0 :               nnode->init = snode->init;
    2834                 :           0 :               if (!snode->set_src || MEM_P (snode->set_src))
    2835                 :           0 :                 nnode->set_src = NULL;
    2836                 :             :               else
    2837                 :           0 :                 nnode->set_src = snode->set_src;
    2838                 :           0 :               nnode->next = dnode;
    2839                 :           0 :               dnode = nnode;
    2840                 :             :             }
    2841                 :           0 :           else if (r == 0)
    2842                 :           0 :             gcc_checking_assert (rtx_equal_p (dnode->loc, snode->loc));
    2843                 :             : 
    2844                 :           0 :           if (r >= 0)
    2845                 :           0 :             snode = snode->next;
    2846                 :             : 
    2847                 :           0 :           nodep = &dnode->next;
    2848                 :           0 :           dnode = *nodep;
    2849                 :             :         }
    2850                 :             : 
    2851                 :             :       return 1;
    2852                 :             :     }
    2853                 :             : 
    2854                 :             :   gcc_checking_assert (!src->onepart);
    2855                 :             : 
    2856                 :             :   /* Count the number of location parts, result is K.  */
    2857                 :     1162789 :   for (i = 0, j = 0, k = 0;
    2858                 :     1981967 :        i < src->n_var_parts && j < dst->n_var_parts; k++)
    2859                 :             :     {
    2860                 :     1162789 :       if (VAR_PART_OFFSET (src, i) == VAR_PART_OFFSET (dst, j))
    2861                 :             :         {
    2862                 :     1127185 :           i++;
    2863                 :     1127185 :           j++;
    2864                 :             :         }
    2865                 :       35604 :       else if (VAR_PART_OFFSET (src, i) < VAR_PART_OFFSET (dst, j))
    2866                 :       27263 :         i++;
    2867                 :             :       else
    2868                 :        8341 :         j++;
    2869                 :             :     }
    2870                 :      819178 :   k += src->n_var_parts - i;
    2871                 :      819178 :   k += dst->n_var_parts - j;
    2872                 :             : 
    2873                 :             :   /* We track only variables whose size is <= MAX_VAR_PARTS bytes
    2874                 :             :      thus there are at most MAX_VAR_PARTS different offsets.  */
    2875                 :      819178 :   gcc_checking_assert (dst->onepart ? k == 1 : k <= MAX_VAR_PARTS);
    2876                 :             : 
    2877                 :      819178 :   if (dst->n_var_parts != k && shared_var_p (dst, set->vars))
    2878                 :             :     {
    2879                 :       53138 :       dstp = unshare_variable (set, dstp, dst, VAR_INIT_STATUS_UNKNOWN);
    2880                 :       53138 :       dst = *dstp;
    2881                 :             :     }
    2882                 :             : 
    2883                 :      819178 :   i = src->n_var_parts - 1;
    2884                 :      819178 :   j = dst->n_var_parts - 1;
    2885                 :      819178 :   dst->n_var_parts = k;
    2886                 :             : 
    2887                 :     2014873 :   for (k--; k >= 0; k--)
    2888                 :             :     {
    2889                 :     1195695 :       location_chain *node, *node2;
    2890                 :             : 
    2891                 :     1195695 :       if (i >= 0 && j >= 0
    2892                 :     1195695 :           && VAR_PART_OFFSET (src, i) == VAR_PART_OFFSET (dst, j))
    2893                 :             :         {
    2894                 :             :           /* Compute the "sorted" union of the chains, i.e. the locations which
    2895                 :             :              are in both chains go first, they are sorted by the sum of
    2896                 :             :              positions in the chains.  */
    2897                 :     1127185 :           int dst_l, src_l;
    2898                 :     1127185 :           int ii, jj, n;
    2899                 :     1127185 :           struct variable_union_info *vui;
    2900                 :             : 
    2901                 :             :           /* If DST is shared compare the location chains.
    2902                 :             :              If they are different we will modify the chain in DST with
    2903                 :             :              high probability so make a copy of DST.  */
    2904                 :     1127185 :           if (shared_var_p (dst, set->vars))
    2905                 :             :             {
    2906                 :     1041358 :               for (node = src->var_part[i].loc_chain,
    2907                 :     2201271 :                    node2 = dst->var_part[j].loc_chain; node && node2;
    2908                 :     1159913 :                    node = node->next, node2 = node2->next)
    2909                 :             :                 {
    2910                 :     1689888 :                   if (!((REG_P (node2->loc)
    2911                 :      702895 :                          && REG_P (node->loc)
    2912                 :      701291 :                          && REGNO (node2->loc) == REGNO (node->loc))
    2913                 :      503339 :                         || rtx_equal_p (node2->loc, node->loc)))
    2914                 :             :                     {
    2915                 :       26636 :                       if (node2->init < node->init)
    2916                 :        1623 :                         node2->init = node->init;
    2917                 :             :                       break;
    2918                 :             :                     }
    2919                 :             :                 }
    2920                 :     1041358 :               if (node || node2)
    2921                 :             :                 {
    2922                 :       70479 :                   dstp = unshare_variable (set, dstp, dst,
    2923                 :             :                                            VAR_INIT_STATUS_UNKNOWN);
    2924                 :       70479 :                   dst = (variable *)*dstp;
    2925                 :             :                 }
    2926                 :             :             }
    2927                 :             : 
    2928                 :     1127185 :           src_l = 0;
    2929                 :     2507734 :           for (node = src->var_part[i].loc_chain; node; node = node->next)
    2930                 :     1380549 :             src_l++;
    2931                 :     1127185 :           dst_l = 0;
    2932                 :     2439354 :           for (node = dst->var_part[j].loc_chain; node; node = node->next)
    2933                 :     1312169 :             dst_l++;
    2934                 :             : 
    2935                 :     1127185 :           if (dst_l == 1)
    2936                 :             :             {
    2937                 :             :               /* The most common case, much simpler, no qsort is needed.  */
    2938                 :      962863 :               location_chain *dstnode = dst->var_part[j].loc_chain;
    2939                 :      962863 :               dst->var_part[k].loc_chain = dstnode;
    2940                 :      962863 :               VAR_PART_OFFSET (dst, k) = VAR_PART_OFFSET (dst, j);
    2941                 :      962863 :               node2 = dstnode;
    2942                 :     1996362 :               for (node = src->var_part[i].loc_chain; node; node = node->next)
    2943                 :     1393514 :                 if (!((REG_P (dstnode->loc)
    2944                 :      730201 :                        && REG_P (node->loc)
    2945                 :      728785 :                        && REGNO (dstnode->loc) == REGNO (node->loc))
    2946                 :      360015 :                       || rtx_equal_p (dstnode->loc, node->loc)))
    2947                 :             :                   {
    2948                 :       80420 :                     location_chain *new_node;
    2949                 :             : 
    2950                 :             :                     /* Copy the location from SRC.  */
    2951                 :       80420 :                     new_node = new location_chain;
    2952                 :       80420 :                     new_node->loc = node->loc;
    2953                 :       80420 :                     new_node->init = node->init;
    2954                 :       80420 :                     if (!node->set_src || MEM_P (node->set_src))
    2955                 :       77451 :                       new_node->set_src = NULL;
    2956                 :             :                     else
    2957                 :        2969 :                       new_node->set_src = node->set_src;
    2958                 :       80420 :                     node2->next = new_node;
    2959                 :       80420 :                     node2 = new_node;
    2960                 :             :                   }
    2961                 :      962863 :               node2->next = NULL;
    2962                 :             :             }
    2963                 :             :           else
    2964                 :             :             {
    2965                 :      164322 :               if (src_l + dst_l > vui_allocated)
    2966                 :             :                 {
    2967                 :       11234 :                   vui_allocated = MAX (vui_allocated * 2, src_l + dst_l);
    2968                 :       11234 :                   vui_vec = XRESIZEVEC (struct variable_union_info, vui_vec,
    2969                 :             :                                         vui_allocated);
    2970                 :             :                 }
    2971                 :      164322 :               vui = vui_vec;
    2972                 :             : 
    2973                 :             :               /* Fill in the locations from DST.  */
    2974                 :      513628 :               for (node = dst->var_part[j].loc_chain, jj = 0; node;
    2975                 :      349306 :                    node = node->next, jj++)
    2976                 :             :                 {
    2977                 :      349306 :                   vui[jj].lc = node;
    2978                 :      349306 :                   vui[jj].pos_dst = jj;
    2979                 :             : 
    2980                 :             :                   /* Pos plus value larger than a sum of 2 valid positions.  */
    2981                 :      349306 :                   vui[jj].pos = jj + src_l + dst_l;
    2982                 :             :                 }
    2983                 :             : 
    2984                 :             :               /* Fill in the locations from SRC.  */
    2985                 :      164322 :               n = dst_l;
    2986                 :      511372 :               for (node = src->var_part[i].loc_chain, ii = 0; node;
    2987                 :      347050 :                    node = node->next, ii++)
    2988                 :             :                 {
    2989                 :             :                   /* Find location from NODE.  */
    2990                 :      571889 :                   for (jj = 0; jj < dst_l; jj++)
    2991                 :             :                     {
    2992                 :      556264 :                       if ((REG_P (vui[jj].lc->loc)
    2993                 :      161858 :                            && REG_P (node->loc)
    2994                 :      135749 :                            && REGNO (vui[jj].lc->loc) == REGNO (node->loc))
    2995                 :      621801 :                           || rtx_equal_p (vui[jj].lc->loc, node->loc))
    2996                 :             :                         {
    2997                 :      331425 :                           vui[jj].pos = jj + ii;
    2998                 :      331425 :                           break;
    2999                 :             :                         }
    3000                 :             :                     }
    3001                 :      347050 :                   if (jj >= dst_l)   /* The location has not been found.  */
    3002                 :             :                     {
    3003                 :       15625 :                       location_chain *new_node;
    3004                 :             : 
    3005                 :             :                       /* Copy the location from SRC.  */
    3006                 :       15625 :                       new_node = new location_chain;
    3007                 :       15625 :                       new_node->loc = node->loc;
    3008                 :       15625 :                       new_node->init = node->init;
    3009                 :       15625 :                       if (!node->set_src || MEM_P (node->set_src))
    3010                 :       12168 :                         new_node->set_src = NULL;
    3011                 :             :                       else
    3012                 :        3457 :                         new_node->set_src = node->set_src;
    3013                 :       15625 :                       vui[n].lc = new_node;
    3014                 :       15625 :                       vui[n].pos_dst = src_l + dst_l;
    3015                 :       15625 :                       vui[n].pos = ii + src_l + dst_l;
    3016                 :       15625 :                       n++;
    3017                 :             :                     }
    3018                 :             :                 }
    3019                 :             : 
    3020                 :      164322 :               if (dst_l == 2)
    3021                 :             :                 {
    3022                 :             :                   /* Special case still very common case.  For dst_l == 2
    3023                 :             :                      all entries dst_l ... n-1 are sorted, with for i >= dst_l
    3024                 :             :                      vui[i].pos == i + src_l + dst_l.  */
    3025                 :      144017 :                   if (vui[0].pos > vui[1].pos)
    3026                 :             :                     {
    3027                 :             :                       /* Order should be 1, 0, 2... */
    3028                 :        4419 :                       dst->var_part[k].loc_chain = vui[1].lc;
    3029                 :        4419 :                       vui[1].lc->next = vui[0].lc;
    3030                 :        4419 :                       if (n >= 3)
    3031                 :             :                         {
    3032                 :         382 :                           vui[0].lc->next = vui[2].lc;
    3033                 :         382 :                           vui[n - 1].lc->next = NULL;
    3034                 :             :                         }
    3035                 :             :                       else
    3036                 :        4037 :                         vui[0].lc->next = NULL;
    3037                 :             :                       ii = 3;
    3038                 :             :                     }
    3039                 :             :                   else
    3040                 :             :                     {
    3041                 :      139598 :                       dst->var_part[k].loc_chain = vui[0].lc;
    3042                 :      139598 :                       if (n >= 3 && vui[2].pos < vui[1].pos)
    3043                 :             :                         {
    3044                 :             :                           /* Order should be 0, 2, 1, 3... */
    3045                 :         543 :                           vui[0].lc->next = vui[2].lc;
    3046                 :         543 :                           vui[2].lc->next = vui[1].lc;
    3047                 :         543 :                           if (n >= 4)
    3048                 :             :                             {
    3049                 :          17 :                               vui[1].lc->next = vui[3].lc;
    3050                 :          17 :                               vui[n - 1].lc->next = NULL;
    3051                 :             :                             }
    3052                 :             :                           else
    3053                 :         526 :                             vui[1].lc->next = NULL;
    3054                 :             :                           ii = 4;
    3055                 :             :                         }
    3056                 :             :                       else
    3057                 :             :                         {
    3058                 :             :                           /* Order should be 0, 1, 2... */
    3059                 :      139055 :                           ii = 1;
    3060                 :      139055 :                           vui[n - 1].lc->next = NULL;
    3061                 :             :                         }
    3062                 :             :                     }
    3063                 :      297062 :                   for (; ii < n; ii++)
    3064                 :      153045 :                     vui[ii - 1].lc->next = vui[ii].lc;
    3065                 :             :                 }
    3066                 :             :               else
    3067                 :             :                 {
    3068                 :       20305 :                   qsort (vui, n, sizeof (struct variable_union_info),
    3069                 :             :                          variable_union_info_cmp_pos);
    3070                 :             : 
    3071                 :             :                   /* Reconnect the nodes in sorted order.  */
    3072                 :       82270 :                   for (ii = 1; ii < n; ii++)
    3073                 :       41660 :                     vui[ii - 1].lc->next = vui[ii].lc;
    3074                 :       20305 :                   vui[n - 1].lc->next = NULL;
    3075                 :       20305 :                   dst->var_part[k].loc_chain = vui[0].lc;
    3076                 :             :                 }
    3077                 :             : 
    3078                 :      164322 :               VAR_PART_OFFSET (dst, k) = VAR_PART_OFFSET (dst, j);
    3079                 :             :             }
    3080                 :     1127185 :           i--;
    3081                 :     1127185 :           j--;
    3082                 :             :         }
    3083                 :       68510 :       else if ((i >= 0 && j >= 0
    3084                 :       32906 :                 && VAR_PART_OFFSET (src, i) < VAR_PART_OFFSET (dst, j))
    3085                 :       94385 :                || i < 0)
    3086                 :             :         {
    3087                 :       15372 :           dst->var_part[k] = dst->var_part[j];
    3088                 :       15372 :           j--;
    3089                 :             :         }
    3090                 :       53138 :       else if ((i >= 0 && j >= 0
    3091                 :       25875 :                 && VAR_PART_OFFSET (src, i) > VAR_PART_OFFSET (dst, j))
    3092                 :       53138 :                || j < 0)
    3093                 :             :         {
    3094                 :       53138 :           location_chain **nextp;
    3095                 :             : 
    3096                 :             :           /* Copy the chain from SRC.  */
    3097                 :       53138 :           nextp = &dst->var_part[k].loc_chain;
    3098                 :      112966 :           for (node = src->var_part[i].loc_chain; node; node = node->next)
    3099                 :             :             {
    3100                 :       59828 :               location_chain *new_lc;
    3101                 :             : 
    3102                 :       59828 :               new_lc = new location_chain;
    3103                 :       59828 :               new_lc->next = NULL;
    3104                 :       59828 :               new_lc->init = node->init;
    3105                 :       59828 :               if (!node->set_src || MEM_P (node->set_src))
    3106                 :       58152 :                 new_lc->set_src = NULL;
    3107                 :             :               else
    3108                 :        1676 :                 new_lc->set_src = node->set_src;
    3109                 :       59828 :               new_lc->loc = node->loc;
    3110                 :             : 
    3111                 :       59828 :               *nextp = new_lc;
    3112                 :       59828 :               nextp = &new_lc->next;
    3113                 :             :             }
    3114                 :             : 
    3115                 :       53138 :           VAR_PART_OFFSET (dst, k) = VAR_PART_OFFSET (src, i);
    3116                 :       53138 :           i--;
    3117                 :             :         }
    3118                 :     1195695 :       dst->var_part[k].cur_loc = NULL;
    3119                 :             :     }
    3120                 :             : 
    3121                 :      819178 :   if (flag_var_tracking_uninit)
    3122                 :     1999501 :     for (i = 0; i < src->n_var_parts && i < dst->n_var_parts; i++)
    3123                 :             :       {
    3124                 :     1180323 :         location_chain *node, *node2;
    3125                 :     2620700 :         for (node = src->var_part[i].loc_chain; node; node = node->next)
    3126                 :     3539394 :           for (node2 = dst->var_part[i].loc_chain; node2; node2 = node2->next)
    3127                 :     2099017 :             if (rtx_equal_p (node->loc, node2->loc))
    3128                 :             :               {
    3129                 :     1431103 :                 if (node->init > node2->init)
    3130                 :        5754 :                   node2->init = node->init;
    3131                 :             :               }
    3132                 :             :       }
    3133                 :             : 
    3134                 :             :   /* Continue traversing the hash table.  */
    3135                 :             :   return 1;
    3136                 :             : }
    3137                 :             : 
    3138                 :             : /* Compute union of dataflow sets SRC and DST and store it to DST.  */
    3139                 :             : 
    3140                 :             : static void
    3141                 :         106 : dataflow_set_union (dataflow_set *dst, dataflow_set *src)
    3142                 :             : {
    3143                 :         106 :   int i;
    3144                 :             : 
    3145                 :        9858 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    3146                 :        9752 :     attrs_list_union (&dst->regs[i], src->regs[i]);
    3147                 :             : 
    3148                 :         106 :   if (dst->vars == empty_shared_hash)
    3149                 :             :     {
    3150                 :          88 :       shared_hash_destroy (dst->vars);
    3151                 :          88 :       dst->vars = shared_hash_copy (src->vars);
    3152                 :             :     }
    3153                 :             :   else
    3154                 :             :     {
    3155                 :          18 :       variable_iterator_type hi;
    3156                 :          18 :       variable *var;
    3157                 :             : 
    3158                 :          94 :       FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (src->vars),
    3159                 :             :                                    var, variable, hi)
    3160                 :          29 :         variable_union (var, dst);
    3161                 :             :     }
    3162                 :         106 : }
    3163                 :             : 
    3164                 :             : /* Whether the value is currently being expanded.  */
    3165                 :             : #define VALUE_RECURSED_INTO(x) \
    3166                 :             :   (RTL_FLAG_CHECK2 ("VALUE_RECURSED_INTO", (x), VALUE, DEBUG_EXPR)->used)
    3167                 :             : 
    3168                 :             : /* Whether no expansion was found, saving useless lookups.
    3169                 :             :    It must only be set when VALUE_CHANGED is clear.  */
    3170                 :             : #define NO_LOC_P(x) \
    3171                 :             :   (RTL_FLAG_CHECK2 ("NO_LOC_P", (x), VALUE, DEBUG_EXPR)->return_val)
    3172                 :             : 
    3173                 :             : /* Whether cur_loc in the value needs to be (re)computed.  */
    3174                 :             : #define VALUE_CHANGED(x) \
    3175                 :             :   (RTL_FLAG_CHECK1 ("VALUE_CHANGED", (x), VALUE)->frame_related)
    3176                 :             : /* Whether cur_loc in the decl needs to be (re)computed.  */
    3177                 :             : #define DECL_CHANGED(x) TREE_VISITED (x)
    3178                 :             : 
    3179                 :             : /* Record (if NEWV) that DV needs to have its cur_loc recomputed.  For
    3180                 :             :    user DECLs, this means they're in changed_variables.  Values and
    3181                 :             :    debug exprs may be left with this flag set if no user variable
    3182                 :             :    requires them to be evaluated.  */
    3183                 :             : 
    3184                 :             : static inline void
    3185                 :   269589677 : set_dv_changed (decl_or_value dv, bool newv)
    3186                 :             : {
    3187                 :   269589677 :   switch (dv_onepart_p (dv))
    3188                 :             :     {
    3189                 :   151826132 :     case ONEPART_VALUE:
    3190                 :   151826132 :       if (newv)
    3191                 :   123378933 :         NO_LOC_P (dv_as_value (dv)) = false;
    3192                 :   151826132 :       VALUE_CHANGED (dv_as_value (dv)) = newv;
    3193                 :   151826132 :       break;
    3194                 :             : 
    3195                 :    16866833 :     case ONEPART_DEXPR:
    3196                 :    16866833 :       if (newv)
    3197                 :    12341008 :         NO_LOC_P (DECL_RTL_KNOWN_SET (dv_as_decl (dv))) = false;
    3198                 :             :       /* Fall through.  */
    3199                 :             : 
    3200                 :   117763545 :     default:
    3201                 :   117763545 :       DECL_CHANGED (dv_as_decl (dv)) = newv;
    3202                 :   117763545 :       break;
    3203                 :             :     }
    3204                 :   269589677 : }
    3205                 :             : 
    3206                 :             : /* Return true if DV needs to have its cur_loc recomputed.  */
    3207                 :             : 
    3208                 :             : static inline bool
    3209                 :   122132262 : dv_changed_p (decl_or_value dv)
    3210                 :             : {
    3211                 :   122132262 :   return (dv_is_value_p (dv)
    3212                 :    67884825 :           ? VALUE_CHANGED (dv_as_value (dv))
    3213                 :    54247437 :           : DECL_CHANGED (dv_as_decl (dv)));
    3214                 :             : }
    3215                 :             : 
    3216                 :             : /* Return a location list node whose loc is rtx_equal to LOC, in the
    3217                 :             :    location list of a one-part variable or value VAR, or in that of
    3218                 :             :    any values recursively mentioned in the location lists.  VARS must
    3219                 :             :    be in star-canonical form.  */
    3220                 :             : 
    3221                 :             : static location_chain *
    3222                 :    13104434 : find_loc_in_1pdv (rtx loc, variable *var, variable_table_type *vars)
    3223                 :             : {
    3224                 :    18124433 :   location_chain *node;
    3225                 :    18124433 :   enum rtx_code loc_code;
    3226                 :             : 
    3227                 :    18124433 :   if (!var)
    3228                 :             :     return NULL;
    3229                 :             : 
    3230                 :    17502702 :   gcc_checking_assert (var->onepart);
    3231                 :             : 
    3232                 :    17502702 :   if (!var->n_var_parts)
    3233                 :             :     return NULL;
    3234                 :             : 
    3235                 :    17502702 :   gcc_checking_assert (var->dv != loc);
    3236                 :             : 
    3237                 :    17502702 :   loc_code = GET_CODE (loc);
    3238                 :    32930676 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    3239                 :             :     {
    3240                 :    25530570 :       decl_or_value dv;
    3241                 :    25530570 :       variable *rvar;
    3242                 :             : 
    3243                 :    25530570 :       if (GET_CODE (node->loc) != loc_code)
    3244                 :             :         {
    3245                 :    14239240 :           if (GET_CODE (node->loc) != VALUE)
    3246                 :    26299026 :             continue;
    3247                 :             :         }
    3248                 :    11291330 :       else if (loc == node->loc)
    3249                 :     5082597 :         return node;
    3250                 :     7344403 :       else if (loc_code != VALUE)
    3251                 :             :         {
    3252                 :     2435833 :           if (rtx_equal_p (loc, node->loc))
    3253                 :      567038 :             return node;
    3254                 :     1868795 :           continue;
    3255                 :             :         }
    3256                 :             : 
    3257                 :             :       /* Since we're in star-canonical form, we don't need to visit
    3258                 :             :          non-canonical nodes: one-part variables and non-canonical
    3259                 :             :          values would only point back to the canonical node.  */
    3260                 :     8276758 :       if (dv_is_value_p (var->dv)
    3261                 :     4029072 :           && !canon_value_cmp (node->loc, dv_as_value (var->dv)))
    3262                 :             :         {
    3263                 :             :           /* Skip all subsequent VALUEs.  */
    3264                 :     9269936 :           while (node->next && GET_CODE (node->next->loc) == VALUE)
    3265                 :             :             {
    3266                 :     6581809 :               node = node->next;
    3267                 :     6581809 :               gcc_checking_assert (!canon_value_cmp (node->loc,
    3268                 :             :                                                      dv_as_value (var->dv)));
    3269                 :     6581809 :               if (loc == node->loc)
    3270                 :      568632 :                 return node;
    3271                 :             :             }
    3272                 :     2688127 :           continue;
    3273                 :             :         }
    3274                 :             : 
    3275                 :     5019999 :       gcc_checking_assert (node == var->var_part[0].loc_chain);
    3276                 :     5019999 :       gcc_checking_assert (!node->next);
    3277                 :             : 
    3278                 :     5019999 :       dv = dv_from_value (node->loc);
    3279                 :     5019999 :       rvar = vars->find_with_hash (dv, dv_htab_hash (dv));
    3280                 :     5019999 :       return find_loc_in_1pdv (loc, rvar, vars);
    3281                 :             :     }
    3282                 :             : 
    3283                 :             :   /* ??? Gotta look in cselib_val locations too.  */
    3284                 :             : 
    3285                 :             :   return NULL;
    3286                 :             : }
    3287                 :             : 
    3288                 :             : /* Hash table iteration argument passed to variable_merge.  */
    3289                 :             : struct dfset_merge
    3290                 :             : {
    3291                 :             :   /* The set in which the merge is to be inserted.  */
    3292                 :             :   dataflow_set *dst;
    3293                 :             :   /* The set that we're iterating in.  */
    3294                 :             :   dataflow_set *cur;
    3295                 :             :   /* The set that may contain the other dv we are to merge with.  */
    3296                 :             :   dataflow_set *src;
    3297                 :             :   /* Number of onepart dvs in src.  */
    3298                 :             :   int src_onepart_cnt;
    3299                 :             : };
    3300                 :             : 
    3301                 :             : /* Insert LOC in *DNODE, if it's not there yet.  The list must be in
    3302                 :             :    loc_cmp order, and it is maintained as such.  */
    3303                 :             : 
    3304                 :             : static void
    3305                 :    33252157 : insert_into_intersection (location_chain **nodep, rtx loc,
    3306                 :             :                           enum var_init_status status)
    3307                 :             : {
    3308                 :    33252157 :   location_chain *node;
    3309                 :    33252157 :   int r;
    3310                 :             : 
    3311                 :   206170397 :   for (node = *nodep; node; nodep = &node->next, node = *nodep)
    3312                 :   196219016 :     if ((r = loc_cmp (node->loc, loc)) == 0)
    3313                 :             :       {
    3314                 :    18406297 :         node->init = MIN (node->init, status);
    3315                 :    18406297 :         return;
    3316                 :             :       }
    3317                 :   177812719 :     else if (r > 0)
    3318                 :             :       break;
    3319                 :             : 
    3320                 :    14845860 :   node = new location_chain;
    3321                 :             : 
    3322                 :    14845860 :   node->loc = loc;
    3323                 :    14845860 :   node->set_src = NULL;
    3324                 :    14845860 :   node->init = status;
    3325                 :    14845860 :   node->next = *nodep;
    3326                 :    14845860 :   *nodep = node;
    3327                 :             : }
    3328                 :             : 
    3329                 :             : /* Insert in DEST the intersection of the locations present in both
    3330                 :             :    S1NODE and S2VAR, directly or indirectly.  S1NODE is from a
    3331                 :             :    variable in DSM->cur, whereas S2VAR is from DSM->src.  dvar is in
    3332                 :             :    DSM->dst.  */
    3333                 :             : 
    3334                 :             : static void
    3335                 :    30043041 : intersect_loc_chains (rtx val, location_chain **dest, struct dfset_merge *dsm,
    3336                 :             :                       location_chain *s1node, variable *s2var)
    3337                 :             : {
    3338                 :    30043041 :   dataflow_set *s1set = dsm->cur;
    3339                 :    30043041 :   dataflow_set *s2set = dsm->src;
    3340                 :    30043041 :   location_chain *found;
    3341                 :             : 
    3342                 :    30043041 :   if (s2var)
    3343                 :             :     {
    3344                 :    30043041 :       location_chain *s2node;
    3345                 :             : 
    3346                 :    30043041 :       gcc_checking_assert (s2var->onepart);
    3347                 :             : 
    3348                 :    30043041 :       if (s2var->n_var_parts)
    3349                 :             :         {
    3350                 :    30043041 :           s2node = s2var->var_part[0].loc_chain;
    3351                 :             : 
    3352                 :    58212601 :           for (; s1node && s2node;
    3353                 :    28169560 :                s1node = s1node->next, s2node = s2node->next)
    3354                 :    38604708 :             if (s1node->loc != s2node->loc)
    3355                 :             :               break;
    3356                 :    28169560 :             else if (s1node->loc == val)
    3357                 :           0 :               continue;
    3358                 :             :             else
    3359                 :    28169560 :               insert_into_intersection (dest, s1node->loc,
    3360                 :    28169560 :                                         MIN (s1node->init, s2node->init));
    3361                 :             :         }
    3362                 :             :     }
    3363                 :             : 
    3364                 :    45363652 :   for (; s1node; s1node = s1node->next)
    3365                 :             :     {
    3366                 :    15320611 :       if (s1node->loc == val)
    3367                 :     2216177 :         continue;
    3368                 :             : 
    3369                 :    13104434 :       if ((found = find_loc_in_1pdv (s1node->loc, s2var,
    3370                 :             :                                      shared_hash_htab (s2set->vars))))
    3371                 :             :         {
    3372                 :     5082597 :           insert_into_intersection (dest, s1node->loc,
    3373                 :     5082597 :                                     MIN (s1node->init, found->init));
    3374                 :     5082597 :           continue;
    3375                 :             :         }
    3376                 :             : 
    3377                 :     8021837 :       if (GET_CODE (s1node->loc) == VALUE
    3378                 :     8021837 :           && !VALUE_RECURSED_INTO (s1node->loc))
    3379                 :             :         {
    3380                 :     4587834 :           decl_or_value dv = dv_from_value (s1node->loc);
    3381                 :     4587834 :           variable *svar = shared_hash_find (s1set->vars, dv);
    3382                 :     4587834 :           if (svar)
    3383                 :             :             {
    3384                 :     4106541 :               if (svar->n_var_parts == 1)
    3385                 :             :                 {
    3386                 :     4106541 :                   VALUE_RECURSED_INTO (s1node->loc) = true;
    3387                 :     4106541 :                   intersect_loc_chains (val, dest, dsm,
    3388                 :             :                                         svar->var_part[0].loc_chain,
    3389                 :             :                                         s2var);
    3390                 :     4106541 :                   VALUE_RECURSED_INTO (s1node->loc) = false;
    3391                 :             :                 }
    3392                 :             :             }
    3393                 :             :         }
    3394                 :             : 
    3395                 :             :       /* ??? gotta look in cselib_val locations too.  */
    3396                 :             : 
    3397                 :             :       /* ??? if the location is equivalent to any location in src,
    3398                 :             :          searched recursively
    3399                 :             : 
    3400                 :             :            add to dst the values needed to represent the equivalence
    3401                 :             : 
    3402                 :             :      telling whether locations S is equivalent to another dv's
    3403                 :             :      location list:
    3404                 :             : 
    3405                 :             :        for each location D in the list
    3406                 :             : 
    3407                 :             :          if S and D satisfy rtx_equal_p, then it is present
    3408                 :             : 
    3409                 :             :          else if D is a value, recurse without cycles
    3410                 :             : 
    3411                 :             :          else if S and D have the same CODE and MODE
    3412                 :             : 
    3413                 :             :            for each operand oS and the corresponding oD
    3414                 :             : 
    3415                 :             :              if oS and oD are not equivalent, then S an D are not equivalent
    3416                 :             : 
    3417                 :             :              else if they are RTX vectors
    3418                 :             : 
    3419                 :             :                if any vector oS element is not equivalent to its respective oD,
    3420                 :             :                then S and D are not equivalent
    3421                 :             : 
    3422                 :             :    */
    3423                 :             : 
    3424                 :             : 
    3425                 :             :     }
    3426                 :    30043041 : }
    3427                 :             : 
    3428                 :             : /* Return -1 if X should be before Y in a location list for a 1-part
    3429                 :             :    variable, 1 if Y should be before X, and 0 if they're equivalent
    3430                 :             :    and should not appear in the list.  */
    3431                 :             : 
    3432                 :             : static int
    3433                 :   381741735 : loc_cmp (rtx x, rtx y)
    3434                 :             : {
    3435                 :   397554763 :   int i, j, r;
    3436                 :   397554763 :   RTX_CODE code = GET_CODE (x);
    3437                 :   397554763 :   const char *fmt;
    3438                 :             : 
    3439                 :   397554763 :   if (x == y)
    3440                 :             :     return 0;
    3441                 :             : 
    3442                 :   296482090 :   if (REG_P (x))
    3443                 :             :     {
    3444                 :    42124830 :       if (!REG_P (y))
    3445                 :             :         return -1;
    3446                 :     3396861 :       gcc_assert (GET_MODE (x) == GET_MODE (y));
    3447                 :     3396861 :       if (REGNO (x) == REGNO (y))
    3448                 :             :         return 0;
    3449                 :     3268998 :       else if (REGNO (x) < REGNO (y))
    3450                 :             :         return -1;
    3451                 :             :       else
    3452                 :             :         return 1;
    3453                 :             :     }
    3454                 :             : 
    3455                 :   254357260 :   if (REG_P (y))
    3456                 :             :     return 1;
    3457                 :             : 
    3458                 :   249333637 :   if (MEM_P (x))
    3459                 :             :     {
    3460                 :    26521410 :       if (!MEM_P (y))
    3461                 :             :         return -1;
    3462                 :    15813028 :       gcc_assert (GET_MODE (x) == GET_MODE (y));
    3463                 :    15813028 :       return loc_cmp (XEXP (x, 0), XEXP (y, 0));
    3464                 :             :     }
    3465                 :             : 
    3466                 :   222812227 :   if (MEM_P (y))
    3467                 :             :     return 1;
    3468                 :             : 
    3469                 :   221079763 :   if (GET_CODE (x) == VALUE)
    3470                 :             :     {
    3471                 :   220727183 :       if (GET_CODE (y) != VALUE)
    3472                 :             :         return -1;
    3473                 :             :       /* Don't assert the modes are the same, that is true only
    3474                 :             :          when not recursing.  (subreg:QI (value:SI 1:1) 0)
    3475                 :             :          and (subreg:QI (value:DI 2:2) 0) can be compared,
    3476                 :             :          even when the modes are different.  */
    3477                 :   280538118 :       if (canon_value_cmp (x, y))
    3478                 :             :         return -1;
    3479                 :             :       else
    3480                 :             :         return 1;
    3481                 :             :     }
    3482                 :             : 
    3483                 :      352580 :   if (GET_CODE (y) == VALUE)
    3484                 :             :     return 1;
    3485                 :             : 
    3486                 :             :   /* Entry value is the least preferable kind of expression.  */
    3487                 :       90003 :   if (GET_CODE (x) == ENTRY_VALUE)
    3488                 :             :     {
    3489                 :           0 :       if (GET_CODE (y) != ENTRY_VALUE)
    3490                 :             :         return 1;
    3491                 :           0 :       gcc_assert (GET_MODE (x) == GET_MODE (y));
    3492                 :           0 :       return loc_cmp (ENTRY_VALUE_EXP (x), ENTRY_VALUE_EXP (y));
    3493                 :             :     }
    3494                 :             : 
    3495                 :       90003 :   if (GET_CODE (y) == ENTRY_VALUE)
    3496                 :             :     return -1;
    3497                 :             : 
    3498                 :       90003 :   if (GET_CODE (x) == GET_CODE (y))
    3499                 :             :     /* Compare operands below.  */;
    3500                 :       12901 :   else if (GET_CODE (x) < GET_CODE (y))
    3501                 :             :     return -1;
    3502                 :             :   else
    3503                 :             :     return 1;
    3504                 :             : 
    3505                 :       77102 :   gcc_assert (GET_MODE (x) == GET_MODE (y));
    3506                 :             : 
    3507                 :       77102 :   if (GET_CODE (x) == DEBUG_EXPR)
    3508                 :             :     {
    3509                 :           0 :       if (DEBUG_TEMP_UID (DEBUG_EXPR_TREE_DECL (x))
    3510                 :           0 :           < DEBUG_TEMP_UID (DEBUG_EXPR_TREE_DECL (y)))
    3511                 :             :         return -1;
    3512                 :           0 :       gcc_checking_assert (DEBUG_TEMP_UID (DEBUG_EXPR_TREE_DECL (x))
    3513                 :             :                            > DEBUG_TEMP_UID (DEBUG_EXPR_TREE_DECL (y)));
    3514                 :             :       return 1;
    3515                 :             :     }
    3516                 :             : 
    3517                 :       77102 :   fmt = GET_RTX_FORMAT (code);
    3518                 :       83414 :   for (i = 0; i < GET_RTX_LENGTH (code); i++)
    3519                 :       80317 :     switch (fmt[i])
    3520                 :             :       {
    3521                 :       70055 :       case 'w':
    3522                 :       70055 :         if (XWINT (x, i) == XWINT (y, i))
    3523                 :             :           break;
    3524                 :       69880 :         else if (XWINT (x, i) < XWINT (y, i))
    3525                 :             :           return -1;
    3526                 :             :         else
    3527                 :             :           return 1;
    3528                 :             : 
    3529                 :           0 :       case 'n':
    3530                 :           0 :       case 'i':
    3531                 :           0 :         if (XINT (x, i) == XINT (y, i))
    3532                 :             :           break;
    3533                 :           0 :         else if (XINT (x, i) < XINT (y, i))
    3534                 :             :           return -1;
    3535                 :             :         else
    3536                 :             :           return 1;
    3537                 :             : 
    3538                 :           0 :       case 'p':
    3539                 :        6312 :         r = compare_sizes_for_sort (SUBREG_BYTE (x), SUBREG_BYTE (y));
    3540                 :           0 :         if (r != 0)
    3541                 :           0 :           return r;
    3542                 :             :         break;
    3543                 :             : 
    3544                 :           0 :       case 'V':
    3545                 :           0 :       case 'E':
    3546                 :             :         /* Compare the vector length first.  */
    3547                 :           0 :         if (XVECLEN (x, i) == XVECLEN (y, i))
    3548                 :             :           /* Compare the vectors elements.  */;
    3549                 :           0 :         else if (XVECLEN (x, i) < XVECLEN (y, i))
    3550                 :             :           return -1;
    3551                 :             :         else
    3552                 :             :           return 1;
    3553                 :             : 
    3554                 :           0 :         for (j = 0; j < XVECLEN (x, i); j++)
    3555                 :           0 :           if ((r = loc_cmp (XVECEXP (x, i, j),
    3556                 :           0 :                             XVECEXP (y, i, j))))
    3557                 :           0 :             return r;
    3558                 :             :         break;
    3559                 :             : 
    3560                 :           0 :       case 'e':
    3561                 :           0 :         if ((r = loc_cmp (XEXP (x, i), XEXP (y, i))))
    3562                 :           0 :           return r;
    3563                 :             :         break;
    3564                 :             : 
    3565                 :        7181 :       case 'S':
    3566                 :        7181 :       case 's':
    3567                 :        7181 :         if (XSTR (x, i) == XSTR (y, i))
    3568                 :             :           break;
    3569                 :        4125 :         if (!XSTR (x, i))
    3570                 :             :           return -1;
    3571                 :        4125 :         if (!XSTR (y, i))
    3572                 :             :           return 1;
    3573                 :        4125 :         if ((r = strcmp (XSTR (x, i), XSTR (y, i))) == 0)
    3574                 :             :           break;
    3575                 :        4125 :         else if (r < 0)
    3576                 :             :           return -1;
    3577                 :             :         else
    3578                 :             :           return 1;
    3579                 :             : 
    3580                 :             :       case 'u':
    3581                 :             :         /* These are just backpointers, so they don't matter.  */
    3582                 :             :         break;
    3583                 :             : 
    3584                 :             :       case '0':
    3585                 :             :       case 't':
    3586                 :             :         break;
    3587                 :             : 
    3588                 :             :         /* It is believed that rtx's at this level will never
    3589                 :             :            contain anything but integers and other rtx's,
    3590                 :             :            except for within LABEL_REFs and SYMBOL_REFs.  */
    3591                 :           0 :       default:
    3592                 :           0 :         gcc_unreachable ();
    3593                 :             :       }
    3594                 :        3097 :   if (CONST_WIDE_INT_P (x))
    3595                 :             :     {
    3596                 :             :       /* Compare the vector length first.  */
    3597                 :          16 :       if (CONST_WIDE_INT_NUNITS (x) >= CONST_WIDE_INT_NUNITS (y))
    3598                 :             :         return 1;
    3599                 :             :       else if (CONST_WIDE_INT_NUNITS (x) < CONST_WIDE_INT_NUNITS (y))
    3600                 :             :         return -1;
    3601                 :             : 
    3602                 :             :       /* Compare the vectors elements.  */;
    3603                 :             :       for (j = CONST_WIDE_INT_NUNITS (x) - 1; j >= 0 ; j--)
    3604                 :             :         {
    3605                 :             :           if (CONST_WIDE_INT_ELT (x, j) < CONST_WIDE_INT_ELT (y, j))
    3606                 :             :             return -1;
    3607                 :             :           if (CONST_WIDE_INT_ELT (x, j) > CONST_WIDE_INT_ELT (y, j))
    3608                 :             :             return 1;
    3609                 :             :         }
    3610                 :             :     }
    3611                 :             : 
    3612                 :             :   return 0;
    3613                 :             : }
    3614                 :             : 
    3615                 :             : /* Check the order of entries in one-part variables.   */
    3616                 :             : 
    3617                 :             : int
    3618                 :   436802029 : canonicalize_loc_order_check (variable **slot,
    3619                 :             :                               dataflow_set *data ATTRIBUTE_UNUSED)
    3620                 :             : {
    3621                 :   436802029 :   variable *var = *slot;
    3622                 :   436802029 :   location_chain *node, *next;
    3623                 :             : 
    3624                 :             : #ifdef ENABLE_RTL_CHECKING
    3625                 :             :   int i;
    3626                 :             :   for (i = 0; i < var->n_var_parts; i++)
    3627                 :             :     gcc_assert (var->var_part[0].cur_loc == NULL);
    3628                 :             :   gcc_assert (!var->in_changed_variables);
    3629                 :             : #endif
    3630                 :             : 
    3631                 :   436802029 :   if (!var->onepart)
    3632                 :             :     return 1;
    3633                 :             : 
    3634                 :   434403873 :   gcc_assert (var->n_var_parts == 1);
    3635                 :   434403873 :   node = var->var_part[0].loc_chain;
    3636                 :   434403873 :   gcc_assert (node);
    3637                 :             : 
    3638                 :   512608164 :   while ((next = node->next))
    3639                 :             :     {
    3640                 :    78204291 :       gcc_assert (loc_cmp (node->loc, next->loc) < 0);
    3641                 :             :       node = next;
    3642                 :             :     }
    3643                 :             : 
    3644                 :             :   return 1;
    3645                 :             : }
    3646                 :             : 
    3647                 :             : /* Mark with VALUE_RECURSED_INTO values that have neighbors that are
    3648                 :             :    more likely to be chosen as canonical for an equivalence set.
    3649                 :             :    Ensure less likely values can reach more likely neighbors, making
    3650                 :             :    the connections bidirectional.  */
    3651                 :             : 
    3652                 :             : int
    3653                 :   346625932 : canonicalize_values_mark (variable **slot, dataflow_set *set)
    3654                 :             : {
    3655                 :   346625932 :   variable *var = *slot;
    3656                 :   346625932 :   decl_or_value dv = var->dv;
    3657                 :   346625932 :   rtx val;
    3658                 :   346625932 :   location_chain *node;
    3659                 :             : 
    3660                 :   346625932 :   if (!dv_is_value_p (dv))
    3661                 :             :     return 1;
    3662                 :             : 
    3663                 :   214461194 :   gcc_checking_assert (var->n_var_parts == 1);
    3664                 :             : 
    3665                 :   214461194 :   val = dv_as_value (dv);
    3666                 :             : 
    3667                 :   493720871 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    3668                 :   279259677 :     if (GET_CODE (node->loc) == VALUE)
    3669                 :             :       {
    3670                 :   108370424 :         if (canon_value_cmp (node->loc, val))
    3671                 :    54185212 :           VALUE_RECURSED_INTO (val) = true;
    3672                 :             :         else
    3673                 :             :           {
    3674                 :    54185212 :             decl_or_value odv = dv_from_value (node->loc);
    3675                 :    54185212 :             variable **oslot;
    3676                 :    54185212 :             oslot = shared_hash_find_slot_noinsert (set->vars, odv);
    3677                 :             : 
    3678                 :    54185212 :             set_slot_part (set, val, oslot, odv, 0,
    3679                 :             :                            node->init, NULL_RTX);
    3680                 :             : 
    3681                 :    54185212 :             VALUE_RECURSED_INTO (node->loc) = true;
    3682                 :             :           }
    3683                 :             :       }
    3684                 :             : 
    3685                 :             :   return 1;
    3686                 :             : }
    3687                 :             : 
    3688                 :             : /* Remove redundant entries from equivalence lists in onepart
    3689                 :             :    variables, canonicalizing equivalence sets into star shapes.  */
    3690                 :             : 
    3691                 :             : int
    3692                 :   509882723 : canonicalize_values_star (variable **slot, dataflow_set *set)
    3693                 :             : {
    3694                 :   509882723 :   variable *var = *slot;
    3695                 :   509882723 :   decl_or_value dv = var->dv;
    3696                 :   509882723 :   location_chain *node;
    3697                 :   509882723 :   decl_or_value cdv;
    3698                 :   509882723 :   rtx val, cval;
    3699                 :   509882723 :   variable **cslot;
    3700                 :   509882723 :   bool has_value;
    3701                 :   509882723 :   bool has_marks;
    3702                 :             : 
    3703                 :   509882723 :   if (!var->onepart)
    3704                 :             :     return 1;
    3705                 :             : 
    3706                 :   507484567 :   gcc_checking_assert (var->n_var_parts == 1);
    3707                 :             : 
    3708                 :   507484567 :   if (dv_is_value_p (dv))
    3709                 :             :     {
    3710                 :   340502133 :       cval = dv_as_value (dv);
    3711                 :   340502133 :       if (!VALUE_RECURSED_INTO (cval))
    3712                 :             :         return 1;
    3713                 :   126216092 :       VALUE_RECURSED_INTO (cval) = false;
    3714                 :             :     }
    3715                 :             :   else
    3716                 :             :     cval = NULL_RTX;
    3717                 :             : 
    3718                 :   349582354 :  restart:
    3719                 :   349582354 :   val = cval;
    3720                 :   349582354 :   has_value = false;
    3721                 :   349582354 :   has_marks = false;
    3722                 :             : 
    3723                 :   349582354 :   gcc_assert (var->n_var_parts == 1);
    3724                 :             : 
    3725                 :  1389558817 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    3726                 :  1039976463 :     if (GET_CODE (node->loc) == VALUE)
    3727                 :             :       {
    3728                 :   939115825 :         has_value = true;
    3729                 :   939115825 :         if (VALUE_RECURSED_INTO (node->loc))
    3730                 :   223274927 :           has_marks = true;
    3731                 :  1979092288 :         if (canon_value_cmp (node->loc, cval))
    3732                 :             :           cval = node->loc;
    3733                 :             :       }
    3734                 :             : 
    3735                 :   349582354 :   if (!has_value)
    3736                 :             :     return 1;
    3737                 :             : 
    3738                 :   283748184 :   if (cval == val)
    3739                 :             :     {
    3740                 :    48355270 :       if (!has_marks || dv_is_decl_p (dv))
    3741                 :             :         return 1;
    3742                 :             : 
    3743                 :             :       /* Keep it marked so that we revisit it, either after visiting a
    3744                 :             :          child node, or after visiting a new parent that might be
    3745                 :             :          found out.  */
    3746                 :    18458416 :       VALUE_RECURSED_INTO (val) = true;
    3747                 :             : 
    3748                 :   198066062 :       for (node = var->var_part[0].loc_chain; node; node = node->next)
    3749                 :   198066062 :         if (GET_CODE (node->loc) == VALUE
    3750                 :   198066062 :             && VALUE_RECURSED_INTO (node->loc))
    3751                 :             :           {
    3752                 :             :             cval = node->loc;
    3753                 :    56383828 :           restart_with_cval:
    3754                 :    56383828 :             VALUE_RECURSED_INTO (cval) = false;
    3755                 :    56383828 :             dv = dv_from_value (cval);
    3756                 :    56383828 :             slot = shared_hash_find_slot_noinsert (set->vars, dv);
    3757                 :    56383828 :             if (!slot)
    3758                 :             :               {
    3759                 :           0 :                 gcc_assert (dv_is_decl_p (var->dv));
    3760                 :             :                 /* The canonical value was reset and dropped.
    3761                 :             :                    Remove it.  */
    3762                 :           0 :                 clobber_variable_part (set, NULL, var->dv, 0, NULL);
    3763                 :           0 :                 return 1;
    3764                 :             :               }
    3765                 :    56383828 :             var = *slot;
    3766                 :    56383828 :             gcc_assert (dv_is_value_p (var->dv));
    3767                 :    56383828 :             if (var->n_var_parts == 0)
    3768                 :             :               return 1;
    3769                 :    56383828 :             gcc_assert (var->n_var_parts == 1);
    3770                 :    56383828 :             goto restart;
    3771                 :             :           }
    3772                 :             : 
    3773                 :           0 :       VALUE_RECURSED_INTO (val) = false;
    3774                 :             : 
    3775                 :           0 :       return 1;
    3776                 :             :     }
    3777                 :             : 
    3778                 :             :   /* Push values to the canonical one.  */
    3779                 :   235392914 :   cdv = dv_from_value (cval);
    3780                 :   235392914 :   cslot = shared_hash_find_slot_noinsert (set->vars, cdv);
    3781                 :             : 
    3782                 :   472340065 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    3783                 :   236947151 :     if (node->loc != cval)
    3784                 :             :       {
    3785                 :     1554237 :         cslot = set_slot_part (set, node->loc, cslot, cdv, 0,
    3786                 :             :                                node->init, NULL_RTX);
    3787                 :     1554237 :         if (GET_CODE (node->loc) == VALUE)
    3788                 :             :           {
    3789                 :      119529 :             decl_or_value ndv = dv_from_value (node->loc);
    3790                 :             : 
    3791                 :      119529 :             set_variable_part (set, cval, ndv, 0, node->init, NULL_RTX,
    3792                 :             :                                NO_INSERT);
    3793                 :             : 
    3794                 :      119529 :             if (canon_value_cmp (node->loc, val))
    3795                 :             :               {
    3796                 :             :                 /* If it could have been a local minimum, it's not any more,
    3797                 :             :                    since it's now neighbor to cval, so it may have to push
    3798                 :             :                    to it.  Conversely, if it wouldn't have prevailed over
    3799                 :             :                    val, then whatever mark it has is fine: if it was to
    3800                 :             :                    push, it will now push to a more canonical node, but if
    3801                 :             :                    it wasn't, then it has already pushed any values it might
    3802                 :             :                    have to.  */
    3803                 :       63834 :                 VALUE_RECURSED_INTO (node->loc) = true;
    3804                 :             :                 /* Make sure we visit node->loc by ensuring we cval is
    3805                 :             :                    visited too.  */
    3806                 :       63834 :                 VALUE_RECURSED_INTO (cval) = true;
    3807                 :             :               }
    3808                 :       55695 :             else if (!VALUE_RECURSED_INTO (node->loc))
    3809                 :             :               /* If we have no need to "recurse" into this node, it's
    3810                 :             :                  already "canonicalized", so drop the link to the old
    3811                 :             :                  parent.  */
    3812                 :       24565 :               clobber_variable_part (set, cval, ndv, 0, NULL);
    3813                 :             :           }
    3814                 :     1434708 :         else if (GET_CODE (node->loc) == REG)
    3815                 :             :           {
    3816                 :      812294 :             attrs *list = set->regs[REGNO (node->loc)], **listp;
    3817                 :             : 
    3818                 :             :             /* Change an existing attribute referring to dv so that it
    3819                 :             :                refers to cdv, removing any duplicate this might
    3820                 :             :                introduce, and checking that no previous duplicates
    3821                 :             :                existed, all in a single pass.  */
    3822                 :             : 
    3823                 :      823823 :             while (list)
    3824                 :             :               {
    3825                 :      823823 :                 if (list->offset == 0 && (list->dv == dv || list->dv == cdv))
    3826                 :             :                   break;
    3827                 :             : 
    3828                 :       11529 :                 list = list->next;
    3829                 :             :               }
    3830                 :             : 
    3831                 :           0 :             gcc_assert (list);
    3832                 :      812294 :             if (list->dv == dv)
    3833                 :             :               {
    3834                 :      812294 :                 list->dv = cdv;
    3835                 :      815923 :                 for (listp = &list->next; (list = *listp); listp = &list->next)
    3836                 :             :                   {
    3837                 :        3629 :                     if (list->offset)
    3838                 :         448 :                       continue;
    3839                 :             : 
    3840                 :        3181 :                     if (list->dv == cdv)
    3841                 :             :                       {
    3842                 :           0 :                         *listp = list->next;
    3843                 :           0 :                         delete list;
    3844                 :           0 :                         list = *listp;
    3845                 :           0 :                         break;
    3846                 :             :                       }
    3847                 :             : 
    3848                 :        3181 :                     gcc_assert (list->dv != dv);
    3849                 :             :                   }
    3850                 :             :               }
    3851                 :           0 :             else if (list->dv == cdv)
    3852                 :             :               {
    3853                 :           0 :                 for (listp = &list->next; (list = *listp); listp = &list->next)
    3854                 :             :                   {
    3855                 :           0 :                     if (list->offset)
    3856                 :           0 :                       continue;
    3857                 :             : 
    3858                 :           0 :                     if (list->dv == dv)
    3859                 :             :                       {
    3860                 :           0 :                         *listp = list->next;
    3861                 :           0 :                         delete list;
    3862                 :           0 :                         list = *listp;
    3863                 :           0 :                         break;
    3864                 :             :                       }
    3865                 :             : 
    3866                 :           0 :                     gcc_assert (list->dv != cdv);
    3867                 :             :                   }
    3868                 :             :               }
    3869                 :             :             else
    3870                 :           0 :               gcc_unreachable ();
    3871                 :             : 
    3872                 :      812294 :             if (flag_checking)
    3873                 :      812294 :               while (list)
    3874                 :             :                 {
    3875                 :           0 :                   if (list->offset == 0 && (list->dv == dv || list->dv == cdv))
    3876                 :           0 :                     gcc_unreachable ();
    3877                 :             : 
    3878                 :           0 :                   list = list->next;
    3879                 :             :                 }
    3880                 :             :           }
    3881                 :             :       }
    3882                 :             : 
    3883                 :   235392914 :   if (val)
    3884                 :    91026570 :     set_slot_part (set, val, cslot, cdv, 0,
    3885                 :             :                    VAR_INIT_STATUS_INITIALIZED, NULL_RTX);
    3886                 :             : 
    3887                 :   235392914 :   slot = clobber_slot_part (set, cval, slot, 0, NULL);
    3888                 :             : 
    3889                 :             :   /* Variable may have been unshared.  */
    3890                 :   235392914 :   var = *slot;
    3891                 :   235392914 :   gcc_checking_assert (var->n_var_parts && var->var_part[0].loc_chain->loc == cval
    3892                 :             :                        && var->var_part[0].loc_chain->next == NULL);
    3893                 :             : 
    3894                 :   235392914 :   if (VALUE_RECURSED_INTO (cval))
    3895                 :    37925412 :     goto restart_with_cval;
    3896                 :             : 
    3897                 :             :   return 1;
    3898                 :             : }
    3899                 :             : 
    3900                 :             : /* Bind one-part variables to the canonical value in an equivalence
    3901                 :             :    set.  Not doing this causes dataflow convergence failure in rare
    3902                 :             :    circumstances, see PR42873.  Unfortunately we can't do this
    3903                 :             :    efficiently as part of canonicalize_values_star, since we may not
    3904                 :             :    have determined or even seen the canonical value of a set when we
    3905                 :             :    get to a variable that references another member of the set.  */
    3906                 :             : 
    3907                 :             : int
    3908                 :    90176148 : canonicalize_vars_star (variable **slot, dataflow_set *set)
    3909                 :             : {
    3910                 :    90176148 :   variable *var = *slot;
    3911                 :    90176148 :   decl_or_value dv = var->dv;
    3912                 :    90176148 :   location_chain *node;
    3913                 :    90176148 :   rtx cval;
    3914                 :    90176148 :   decl_or_value cdv;
    3915                 :    90176148 :   variable **cslot;
    3916                 :    90176148 :   variable *cvar;
    3917                 :    90176148 :   location_chain *cnode;
    3918                 :             : 
    3919                 :    90176148 :   if (!var->onepart || var->onepart == ONEPART_VALUE)
    3920                 :             :     return 1;
    3921                 :             : 
    3922                 :    36593564 :   gcc_assert (var->n_var_parts == 1);
    3923                 :             : 
    3924                 :    36593564 :   node = var->var_part[0].loc_chain;
    3925                 :             : 
    3926                 :    36593564 :   if (GET_CODE (node->loc) != VALUE)
    3927                 :             :     return 1;
    3928                 :             : 
    3929                 :    31633511 :   gcc_assert (!node->next);
    3930                 :    31633511 :   cval = node->loc;
    3931                 :             : 
    3932                 :             :   /* Push values to the canonical one.  */
    3933                 :    31633511 :   cdv = dv_from_value (cval);
    3934                 :    31633511 :   cslot = shared_hash_find_slot_noinsert (set->vars, cdv);
    3935                 :    31633511 :   if (!cslot)
    3936                 :             :     return 1;
    3937                 :    11785650 :   cvar = *cslot;
    3938                 :    11785650 :   gcc_assert (cvar->n_var_parts == 1);
    3939                 :             : 
    3940                 :    11785650 :   cnode = cvar->var_part[0].loc_chain;
    3941                 :             : 
    3942                 :             :   /* CVAL is canonical if its value list contains non-VALUEs or VALUEs
    3943                 :             :      that are not “more canonical” than it.  */
    3944                 :    11785650 :   if (GET_CODE (cnode->loc) != VALUE
    3945                 :    11785650 :       || !canon_value_cmp (cnode->loc, cval))
    3946                 :             :     return 1;
    3947                 :             : 
    3948                 :             :   /* CVAL was found to be non-canonical.  Change the variable to point
    3949                 :             :      to the canonical VALUE.  */
    3950                 :      446807 :   gcc_assert (!cnode->next);
    3951                 :      446807 :   cval = cnode->loc;
    3952                 :             : 
    3953                 :      446807 :   slot = set_slot_part (set, cval, slot, dv, 0,
    3954                 :             :                         node->init, node->set_src);
    3955                 :      446807 :   clobber_slot_part (set, cval, slot, 0, node->set_src);
    3956                 :             : 
    3957                 :      446807 :   return 1;
    3958                 :             : }
    3959                 :             : 
    3960                 :             : /* Combine variable or value in *S1SLOT (in DSM->cur) with the
    3961                 :             :    corresponding entry in DSM->src.  Multi-part variables are combined
    3962                 :             :    with variable_union, whereas onepart dvs are combined with
    3963                 :             :    intersection.  */
    3964                 :             : 
    3965                 :             : static int
    3966                 :   147667841 : variable_merge_over_cur (variable *s1var, struct dfset_merge *dsm)
    3967                 :             : {
    3968                 :   147667841 :   dataflow_set *dst = dsm->dst;
    3969                 :   147667841 :   variable **dstslot;
    3970                 :   147667841 :   variable *s2var, *dvar = NULL;
    3971                 :   147667841 :   decl_or_value dv = s1var->dv;
    3972                 :   147667841 :   onepart_enum onepart = s1var->onepart;
    3973                 :   147667841 :   rtx val;
    3974                 :   147667841 :   hashval_t dvhash;
    3975                 :   147667841 :   location_chain *node, **nodep;
    3976                 :             : 
    3977                 :             :   /* If the incoming onepart variable has an empty location list, then
    3978                 :             :      the intersection will be just as empty.  For other variables,
    3979                 :             :      it's always union.  */
    3980                 :   147667841 :   gcc_checking_assert (s1var->n_var_parts
    3981                 :             :                        && s1var->var_part[0].loc_chain);
    3982                 :             : 
    3983                 :   147667841 :   if (!onepart)
    3984                 :     1326451 :     return variable_union (s1var, dst);
    3985                 :             : 
    3986                 :   146341390 :   gcc_checking_assert (s1var->n_var_parts == 1);
    3987                 :             : 
    3988                 :   146341390 :   dvhash = dv_htab_hash (dv);
    3989                 :   146341390 :   if (dv_is_value_p (dv))
    3990                 :    88568310 :     val = dv_as_value (dv);
    3991                 :             :   else
    3992                 :             :     val = NULL;
    3993                 :             : 
    3994                 :   146341390 :   s2var = shared_hash_find_1 (dsm->src->vars, dv, dvhash);
    3995                 :   146341390 :   if (!s2var)
    3996                 :             :     {
    3997                 :    17910784 :       dst_can_be_shared = false;
    3998                 :    17910784 :       return 1;
    3999                 :             :     }
    4000                 :             : 
    4001                 :   128430606 :   dsm->src_onepart_cnt--;
    4002                 :   128430606 :   gcc_assert (s2var->var_part[0].loc_chain
    4003                 :             :               && s2var->onepart == onepart
    4004                 :             :               && s2var->n_var_parts == 1);
    4005                 :             : 
    4006                 :   128430606 :   dstslot = shared_hash_find_slot_noinsert_1 (dst->vars, dv, dvhash);
    4007                 :   128430606 :   if (dstslot)
    4008                 :             :     {
    4009                 :    17328608 :       dvar = *dstslot;
    4010                 :    17328608 :       gcc_assert (dvar->refcount == 1
    4011                 :             :                   && dvar->onepart == onepart
    4012                 :             :                   && dvar->n_var_parts == 1);
    4013                 :    17328608 :       nodep = &dvar->var_part[0].loc_chain;
    4014                 :             :     }
    4015                 :             :   else
    4016                 :             :     {
    4017                 :   111101998 :       nodep = &node;
    4018                 :   111101998 :       node = NULL;
    4019                 :             :     }
    4020                 :             : 
    4021                 :   128430606 :   if (!dstslot && !onepart_variable_different_p (s1var, s2var))
    4022                 :             :     {
    4023                 :   102494106 :       dstslot = shared_hash_find_slot_unshare_1 (&dst->vars, dv,
    4024                 :             :                                                  dvhash, INSERT);
    4025                 :   102494106 :       *dstslot = dvar = s2var;
    4026                 :   102494106 :       dvar->refcount++;
    4027                 :             :     }
    4028                 :             :   else
    4029                 :             :     {
    4030                 :    25936500 :       dst_can_be_shared = false;
    4031                 :             : 
    4032                 :    25936500 :       intersect_loc_chains (val, nodep, dsm,
    4033                 :             :                             s1var->var_part[0].loc_chain, s2var);
    4034                 :             : 
    4035                 :    25936500 :       if (!dstslot)
    4036                 :             :         {
    4037                 :     8607892 :           if (node)
    4038                 :             :             {
    4039                 :     6771513 :               dvar = onepart_pool_allocate (onepart);
    4040                 :     6771513 :               dvar->dv = dv;
    4041                 :     6771513 :               dvar->refcount = 1;
    4042                 :     6771513 :               dvar->n_var_parts = 1;
    4043                 :     6771513 :               dvar->onepart = onepart;
    4044                 :     6771513 :               dvar->in_changed_variables = false;
    4045                 :     6771513 :               dvar->var_part[0].loc_chain = node;
    4046                 :     6771513 :               dvar->var_part[0].cur_loc = NULL;
    4047                 :     6771513 :               if (onepart)
    4048                 :     6771513 :                 VAR_LOC_1PAUX (dvar) = NULL;
    4049                 :             :               else
    4050                 :             :                 VAR_PART_OFFSET (dvar, 0) = 0;
    4051                 :             : 
    4052                 :     6771513 :               dstslot
    4053                 :     6771513 :                 = shared_hash_find_slot_unshare_1 (&dst->vars, dv, dvhash,
    4054                 :             :                                                    INSERT);
    4055                 :     6771513 :               gcc_assert (!*dstslot);
    4056                 :     6771513 :               *dstslot = dvar;
    4057                 :             :             }
    4058                 :             :           else
    4059                 :             :             return 1;
    4060                 :             :         }
    4061                 :             :     }
    4062                 :             : 
    4063                 :   126594227 :   nodep = &dvar->var_part[0].loc_chain;
    4064                 :   141840737 :   while ((node = *nodep))
    4065                 :             :     {
    4066                 :   132498576 :       location_chain **nextp = &node->next;
    4067                 :             : 
    4068                 :   132498576 :       if (GET_CODE (node->loc) == REG)
    4069                 :             :         {
    4070                 :    15246510 :           attrs *list;
    4071                 :             : 
    4072                 :    16044084 :           for (list = dst->regs[REGNO (node->loc)]; list; list = list->next)
    4073                 :      833664 :             if (GET_MODE (node->loc) == GET_MODE (list->loc)
    4074                 :     1282330 :                 && dv_is_value_p (list->dv))
    4075                 :             :               break;
    4076                 :             : 
    4077                 :    15246510 :           if (!list)
    4078                 :    15210420 :             attrs_list_insert (&dst->regs[REGNO (node->loc)],
    4079                 :             :                                dv, 0, node->loc);
    4080                 :             :           /* If this value became canonical for another value that had
    4081                 :             :              this register, we want to leave it alone.  */
    4082                 :       36090 :           else if (dv_as_value (list->dv) != val)
    4083                 :             :             {
    4084                 :       22956 :               dstslot = set_slot_part (dst, dv_as_value (list->dv),
    4085                 :             :                                        dstslot, dv, 0,
    4086                 :             :                                        node->init, NULL_RTX);
    4087                 :       22956 :               dstslot = delete_slot_part (dst, node->loc, dstslot, 0);
    4088                 :             : 
    4089                 :             :               /* Since nextp points into the removed node, we can't
    4090                 :             :                  use it.  The pointer to the next node moved to nodep.
    4091                 :             :                  However, if the variable we're walking is unshared
    4092                 :             :                  during our walk, we'll keep walking the location list
    4093                 :             :                  of the previously-shared variable, in which case the
    4094                 :             :                  node won't have been removed, and we'll want to skip
    4095                 :             :                  it.  That's why we test *nodep here.  */
    4096                 :       22956 :               if (*nodep != node)
    4097                 :       22956 :                 nextp = nodep;
    4098                 :             :             }
    4099                 :             :         }
    4100                 :             :       else
    4101                 :             :         /* Canonicalization puts registers first, so we don't have to
    4102                 :             :            walk it all.  */
    4103                 :             :         break;
    4104                 :             :       nodep = nextp;
    4105                 :             :     }
    4106                 :             : 
    4107                 :   126594227 :   if (dvar != *dstslot)
    4108                 :             :     dvar = *dstslot;
    4109                 :   126594227 :   nodep = &dvar->var_part[0].loc_chain;
    4110                 :             : 
    4111                 :   126594227 :   if (val)
    4112                 :             :     {
    4113                 :             :       /* Mark all referenced nodes for canonicalization, and make sure
    4114                 :             :          we have mutual equivalence links.  */
    4115                 :    73061802 :       VALUE_RECURSED_INTO (val) = true;
    4116                 :   164533525 :       for (node = *nodep; node; node = node->next)
    4117                 :    91471723 :         if (GET_CODE (node->loc) == VALUE)
    4118                 :             :           {
    4119                 :    36787406 :             VALUE_RECURSED_INTO (node->loc) = true;
    4120                 :    36787406 :             set_variable_part (dst, val, dv_from_value (node->loc), 0,
    4121                 :             :                                node->init, NULL, INSERT);
    4122                 :             :           }
    4123                 :             : 
    4124                 :    73061802 :       dstslot = shared_hash_find_slot_noinsert_1 (dst->vars, dv, dvhash);
    4125                 :    73061802 :       gcc_assert (*dstslot == dvar);
    4126                 :    73061802 :       canonicalize_values_star (dstslot, dst);
    4127                 :    73061802 :       gcc_checking_assert (dstslot
    4128                 :             :                            == shared_hash_find_slot_noinsert_1 (dst->vars,
    4129                 :             :                                                                 dv, dvhash));
    4130                 :    73061802 :       dvar = *dstslot;
    4131                 :             :     }
    4132                 :             :   else
    4133                 :             :     {
    4134                 :    53532425 :       bool has_value = false, has_other = false;
    4135                 :             : 
    4136                 :             :       /* If we have one value and anything else, we're going to
    4137                 :             :          canonicalize this, so make sure all values have an entry in
    4138                 :             :          the table and are marked for canonicalization.  */
    4139                 :   107113544 :       for (node = *nodep; node; node = node->next)
    4140                 :             :         {
    4141                 :    53599960 :           if (GET_CODE (node->loc) == VALUE)
    4142                 :             :             {
    4143                 :             :               /* If this was marked during register canonicalization,
    4144                 :             :                  we know we have to canonicalize values.  */
    4145                 :    45168953 :               if (has_value)
    4146                 :             :                 has_other = true;
    4147                 :    45163058 :               has_value = true;
    4148                 :    45163058 :               if (has_other)
    4149                 :             :                 break;
    4150                 :             :             }
    4151                 :             :           else
    4152                 :             :             {
    4153                 :     8431007 :               has_other = true;
    4154                 :     8431007 :               if (has_value)
    4155                 :             :                 break;
    4156                 :             :             }
    4157                 :             :         }
    4158                 :             : 
    4159                 :    53532425 :       if (has_value && has_other)
    4160                 :             :         {
    4161                 :       62305 :           for (node = *nodep; node; node = node->next)
    4162                 :             :             {
    4163                 :       43464 :               if (GET_CODE (node->loc) == VALUE)
    4164                 :             :                 {
    4165                 :       29684 :                   decl_or_value dv = dv_from_value (node->loc);
    4166                 :       29684 :                   variable **slot = NULL;
    4167                 :             : 
    4168                 :       29684 :                   if (shared_hash_shared (dst->vars))
    4169                 :           0 :                     slot = shared_hash_find_slot_noinsert (dst->vars, dv);
    4170                 :           0 :                   if (!slot)
    4171                 :       29684 :                     slot = shared_hash_find_slot_unshare (&dst->vars, dv,
    4172                 :             :                                                           INSERT);
    4173                 :       29684 :                   if (!*slot)
    4174                 :             :                     {
    4175                 :       14268 :                       variable *var = onepart_pool_allocate (ONEPART_VALUE);
    4176                 :       14268 :                       var->dv = dv;
    4177                 :       14268 :                       var->refcount = 1;
    4178                 :       14268 :                       var->n_var_parts = 1;
    4179                 :       14268 :                       var->onepart = ONEPART_VALUE;
    4180                 :       14268 :                       var->in_changed_variables = false;
    4181                 :       14268 :                       var->var_part[0].loc_chain = NULL;
    4182                 :       14268 :                       var->var_part[0].cur_loc = NULL;
    4183                 :       14268 :                       VAR_LOC_1PAUX (var) = NULL;
    4184                 :       14268 :                       *slot = var;
    4185                 :             :                     }
    4186                 :             : 
    4187                 :       29684 :                   VALUE_RECURSED_INTO (node->loc) = true;
    4188                 :             :                 }
    4189                 :             :             }
    4190                 :             : 
    4191                 :       18841 :           dstslot = shared_hash_find_slot_noinsert_1 (dst->vars, dv, dvhash);
    4192                 :       18841 :           gcc_assert (*dstslot == dvar);
    4193                 :       18841 :           canonicalize_values_star (dstslot, dst);
    4194                 :       18841 :           gcc_checking_assert (dstslot
    4195                 :             :                                == shared_hash_find_slot_noinsert_1 (dst->vars,
    4196                 :             :                                                                     dv, dvhash));
    4197                 :       18841 :           dvar = *dstslot;
    4198                 :             :         }
    4199                 :             :     }
    4200                 :             : 
    4201                 :   126594227 :   if (!onepart_variable_different_p (dvar, s2var))
    4202                 :             :     {
    4203                 :   121173934 :       variable_htab_free (dvar);
    4204                 :   121173934 :       *dstslot = dvar = s2var;
    4205                 :   121173934 :       dvar->refcount++;
    4206                 :             :     }
    4207                 :     5420293 :   else if (s2var != s1var && !onepart_variable_different_p (dvar, s1var))
    4208                 :             :     {
    4209                 :     3750424 :       variable_htab_free (dvar);
    4210                 :     3750424 :       *dstslot = dvar = s1var;
    4211                 :     3750424 :       dvar->refcount++;
    4212                 :     3750424 :       dst_can_be_shared = false;
    4213                 :             :     }
    4214                 :             :   else
    4215                 :     1669869 :     dst_can_be_shared = false;
    4216                 :             : 
    4217                 :             :   return 1;
    4218                 :             : }
    4219                 :             : 
    4220                 :             : /* Copy s2slot (in DSM->src) to DSM->dst if the variable is a
    4221                 :             :    multi-part variable.  Unions of multi-part variables and
    4222                 :             :    intersections of one-part ones will be handled in
    4223                 :             :    variable_merge_over_cur().  */
    4224                 :             : 
    4225                 :             : static int
    4226                 :   173496866 : variable_merge_over_src (variable *s2var, struct dfset_merge *dsm)
    4227                 :             : {
    4228                 :   173496866 :   dataflow_set *dst = dsm->dst;
    4229                 :   173496866 :   decl_or_value dv = s2var->dv;
    4230                 :             : 
    4231                 :   173496866 :   if (!s2var->onepart)
    4232                 :             :     {
    4233                 :      885345 :       variable **dstp = shared_hash_find_slot (dst->vars, dv);
    4234                 :      885345 :       *dstp = s2var;
    4235                 :      885345 :       s2var->refcount++;
    4236                 :      885345 :       return 1;
    4237                 :             :     }
    4238                 :             : 
    4239                 :   172611521 :   dsm->src_onepart_cnt++;
    4240                 :   172611521 :   return 1;
    4241                 :             : }
    4242                 :             : 
    4243                 :             : /* Combine dataflow set information from SRC2 into DST, using PDST
    4244                 :             :    to carry over information across passes.  */
    4245                 :             : 
    4246                 :             : static void
    4247                 :     3885080 : dataflow_set_merge (dataflow_set *dst, dataflow_set *src2)
    4248                 :             : {
    4249                 :     3885080 :   dataflow_set cur = *dst;
    4250                 :     3885080 :   dataflow_set *src1 = &cur;
    4251                 :     3885080 :   struct dfset_merge dsm;
    4252                 :     3885080 :   int i;
    4253                 :     3885080 :   size_t src1_elems, src2_elems;
    4254                 :     3885080 :   variable_iterator_type hi;
    4255                 :     3885080 :   variable *var;
    4256                 :             : 
    4257                 :     3885080 :   src1_elems = shared_hash_htab (src1->vars)->elements ();
    4258                 :     3885080 :   src2_elems = shared_hash_htab (src2->vars)->elements ();
    4259                 :     3885080 :   dataflow_set_init (dst);
    4260                 :     3885080 :   dst->stack_adjust = cur.stack_adjust;
    4261                 :     3885080 :   shared_hash_destroy (dst->vars);
    4262                 :     3885080 :   dst->vars = new shared_hash;
    4263                 :     3885080 :   dst->vars->refcount = 1;
    4264                 :     3885080 :   dst->vars->htab = new variable_table_type (MAX (src1_elems, src2_elems));
    4265                 :             : 
    4266                 :   361312440 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    4267                 :   357427360 :     attrs_list_mpdv_union (&dst->regs[i], src1->regs[i], src2->regs[i]);
    4268                 :             : 
    4269                 :     3885080 :   dsm.dst = dst;
    4270                 :     3885080 :   dsm.src = src2;
    4271                 :     3885080 :   dsm.cur = src1;
    4272                 :     3885080 :   dsm.src_onepart_cnt = 0;
    4273                 :             : 
    4274                 :   350878812 :   FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (dsm.src->vars),
    4275                 :             :                                var, variable, hi)
    4276                 :   173496866 :     variable_merge_over_src (var, &dsm);
    4277                 :   299220762 :   FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (dsm.cur->vars),
    4278                 :             :                                var, variable, hi)
    4279                 :   147667841 :     variable_merge_over_cur (var, &dsm);
    4280                 :             : 
    4281                 :     3885080 :   if (dsm.src_onepart_cnt)
    4282                 :     3544898 :     dst_can_be_shared = false;
    4283                 :             : 
    4284                 :     3885080 :   dataflow_set_destroy (src1);
    4285                 :     3885080 : }
    4286                 :             : 
    4287                 :             : /* Mark register equivalences.  */
    4288                 :             : 
    4289                 :             : static void
    4290                 :     8420456 : dataflow_set_equiv_regs (dataflow_set *set)
    4291                 :             : {
    4292                 :     8420456 :   int i;
    4293                 :     8420456 :   attrs *list, **listp;
    4294                 :             : 
    4295                 :   783102408 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    4296                 :             :     {
    4297                 :   774681952 :       rtx canon[NUM_MACHINE_MODES];
    4298                 :             : 
    4299                 :             :       /* If the list is empty or one entry, no need to canonicalize
    4300                 :             :          anything.  */
    4301                 :   774681952 :       if (set->regs[i] == NULL || set->regs[i]->next == NULL)
    4302                 :   772188707 :         continue;
    4303                 :             : 
    4304                 :     2493245 :       memset (canon, 0, sizeof (canon));
    4305                 :             : 
    4306                 :     7633882 :       for (list = set->regs[i]; list; list = list->next)
    4307                 :     5140637 :         if (list->offset == 0 && dv_is_value_p (list->dv))
    4308                 :             :           {
    4309                 :     4037206 :             rtx val = dv_as_value (list->dv);
    4310                 :     4037206 :             rtx *cvalp = &canon[(int)GET_MODE (val)];
    4311                 :     4037206 :             rtx cval = *cvalp;
    4312                 :             : 
    4313                 :     9177843 :             if (canon_value_cmp (val, cval))
    4314                 :     4037206 :               *cvalp = val;
    4315                 :             :           }
    4316                 :             : 
    4317                 :     7633882 :       for (list = set->regs[i]; list; list = list->next)
    4318                 :     5140637 :         if (list->offset == 0 && dv_onepart_p (list->dv))
    4319                 :             :           {
    4320                 :     4037206 :             rtx cval = canon[(int)GET_MODE (list->loc)];
    4321                 :             : 
    4322                 :     4037206 :             if (!cval)
    4323                 :           0 :               continue;
    4324                 :             : 
    4325                 :     4037206 :             if (dv_is_value_p (list->dv))
    4326                 :             :               {
    4327                 :     4037206 :                 rtx val = dv_as_value (list->dv);
    4328                 :             : 
    4329                 :     4037206 :                 if (val == cval)
    4330                 :     4037206 :                   continue;
    4331                 :             : 
    4332                 :           0 :                 VALUE_RECURSED_INTO (val) = true;
    4333                 :           0 :                 set_variable_part (set, val, dv_from_value (cval), 0,
    4334                 :             :                                    VAR_INIT_STATUS_INITIALIZED,
    4335                 :             :                                    NULL, NO_INSERT);
    4336                 :             :               }
    4337                 :             : 
    4338                 :           0 :             VALUE_RECURSED_INTO (cval) = true;
    4339                 :           0 :             set_variable_part (set, cval, list->dv, 0,
    4340                 :             :                                VAR_INIT_STATUS_INITIALIZED, NULL, NO_INSERT);
    4341                 :             :           }
    4342                 :             : 
    4343                 :     7633882 :       for (listp = &set->regs[i]; (list = *listp);
    4344                 :     5140637 :            listp = list ? &list->next : listp)
    4345                 :     5140637 :         if (list->offset == 0 && dv_onepart_p (list->dv))
    4346                 :             :           {
    4347                 :     4037206 :             rtx cval = canon[(int)GET_MODE (list->loc)];
    4348                 :     4037206 :             variable **slot;
    4349                 :             : 
    4350                 :     4037206 :             if (!cval)
    4351                 :           0 :               continue;
    4352                 :             : 
    4353                 :     4037206 :             if (dv_is_value_p (list->dv))
    4354                 :             :               {
    4355                 :     4037206 :                 rtx val = dv_as_value (list->dv);
    4356                 :     4037206 :                 if (!VALUE_RECURSED_INTO (val))
    4357                 :     4037206 :                   continue;
    4358                 :             :               }
    4359                 :             : 
    4360                 :           0 :             slot = shared_hash_find_slot_noinsert (set->vars, list->dv);
    4361                 :           0 :             canonicalize_values_star (slot, set);
    4362                 :           0 :             if (*listp != list)
    4363                 :             :               list = NULL;
    4364                 :             :           }
    4365                 :             :     }
    4366                 :     8420456 : }
    4367                 :             : 
    4368                 :             : /* Remove any redundant values in the location list of VAR, which must
    4369                 :             :    be unshared and 1-part.  */
    4370                 :             : 
    4371                 :             : static void
    4372                 :      588464 : remove_duplicate_values (variable *var)
    4373                 :             : {
    4374                 :      588464 :   location_chain *node, **nodep;
    4375                 :             : 
    4376                 :      588464 :   gcc_assert (var->onepart);
    4377                 :      588464 :   gcc_assert (var->n_var_parts == 1);
    4378                 :      588464 :   gcc_assert (var->refcount == 1);
    4379                 :             : 
    4380                 :     1213107 :   for (nodep = &var->var_part[0].loc_chain; (node = *nodep); )
    4381                 :             :     {
    4382                 :      624643 :       if (GET_CODE (node->loc) == VALUE)
    4383                 :             :         {
    4384                 :      600443 :           if (VALUE_RECURSED_INTO (node->loc))
    4385                 :             :             {
    4386                 :             :               /* Remove duplicate value node.  */
    4387                 :           0 :               *nodep = node->next;
    4388                 :           0 :               delete node;
    4389                 :           0 :               continue;
    4390                 :             :             }
    4391                 :             :           else
    4392                 :      600443 :             VALUE_RECURSED_INTO (node->loc) = true;
    4393                 :             :         }
    4394                 :      624643 :       nodep = &node->next;
    4395                 :             :     }
    4396                 :             : 
    4397                 :     1213107 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    4398                 :      624643 :     if (GET_CODE (node->loc) == VALUE)
    4399                 :             :       {
    4400                 :      600443 :         gcc_assert (VALUE_RECURSED_INTO (node->loc));
    4401                 :      600443 :         VALUE_RECURSED_INTO (node->loc) = false;
    4402                 :             :       }
    4403                 :      588464 : }
    4404                 :             : 
    4405                 :             : 
    4406                 :             : /* Hash table iteration argument passed to variable_post_merge.  */
    4407                 :             : struct dfset_post_merge
    4408                 :             : {
    4409                 :             :   /* The new input set for the current block.  */
    4410                 :             :   dataflow_set *set;
    4411                 :             :   /* Pointer to the permanent input set for the current block, or
    4412                 :             :      NULL.  */
    4413                 :             :   dataflow_set **permp;
    4414                 :             : };
    4415                 :             : 
    4416                 :             : /* Create values for incoming expressions associated with one-part
    4417                 :             :    variables that don't have value numbers for them.  */
    4418                 :             : 
    4419                 :             : int
    4420                 :    89641302 : variable_post_merge_new_vals (variable **slot, dfset_post_merge *dfpm)
    4421                 :             : {
    4422                 :    89641302 :   dataflow_set *set = dfpm->set;
    4423                 :    89641302 :   variable *var = *slot;
    4424                 :    89641302 :   location_chain *node;
    4425                 :             : 
    4426                 :    89641302 :   if (!var->onepart || !var->n_var_parts)
    4427                 :             :     return 1;
    4428                 :             : 
    4429                 :    89037855 :   gcc_assert (var->n_var_parts == 1);
    4430                 :             : 
    4431                 :    89037855 :   if (dv_is_decl_p (var->dv))
    4432                 :             :     {
    4433                 :             :       bool check_dupes = false;
    4434                 :             : 
    4435                 :    36593564 :     restart:
    4436                 :    73225900 :       for (node = var->var_part[0].loc_chain; node; node = node->next)
    4437                 :             :         {
    4438                 :    36632336 :           if (GET_CODE (node->loc) == VALUE)
    4439                 :    31045047 :             gcc_assert (!VALUE_RECURSED_INTO (node->loc));
    4440                 :     5587289 :           else if (GET_CODE (node->loc) == REG)
    4441                 :             :             {
    4442                 :      600443 :               attrs *att, **attp, **curp = NULL;
    4443                 :             : 
    4444                 :      600443 :               if (var->refcount != 1)
    4445                 :             :                 {
    4446                 :           0 :                   slot = unshare_variable (set, slot, var,
    4447                 :             :                                            VAR_INIT_STATUS_INITIALIZED);
    4448                 :           0 :                   var = *slot;
    4449                 :           0 :                   goto restart;
    4450                 :             :                 }
    4451                 :             : 
    4452                 :     1319436 :               for (attp = &set->regs[REGNO (node->loc)]; (att = *attp);
    4453                 :      718993 :                    attp = &att->next)
    4454                 :      718993 :                 if (att->offset == 0
    4455                 :      717934 :                     && GET_MODE (att->loc) == GET_MODE (node->loc))
    4456                 :             :                   {
    4457                 :      717240 :                     if (dv_is_value_p (att->dv))
    4458                 :             :                       {
    4459                 :           0 :                         rtx cval = dv_as_value (att->dv);
    4460                 :           0 :                         node->loc = cval;
    4461                 :           0 :                         check_dupes = true;
    4462                 :           0 :                         break;
    4463                 :             :                       }
    4464                 :      717240 :                     else if (att->dv == var->dv)
    4465                 :      718993 :                       curp = attp;
    4466                 :             :                   }
    4467                 :             : 
    4468                 :      600443 :               if (!curp)
    4469                 :             :                 {
    4470                 :             :                   curp = attp;
    4471                 :           0 :                   while (*curp)
    4472                 :           0 :                     if ((*curp)->offset == 0
    4473                 :           0 :                         && GET_MODE ((*curp)->loc) == GET_MODE (node->loc)
    4474                 :           0 :                         && (*curp)->dv == var->dv)
    4475                 :             :                       break;
    4476                 :             :                     else
    4477                 :           0 :                       curp = &(*curp)->next;
    4478                 :           0 :                   gcc_assert (*curp);
    4479                 :             :                 }
    4480                 :             : 
    4481                 :      600443 :               if (!att)
    4482                 :             :                 {
    4483                 :      600443 :                   decl_or_value cdv;
    4484                 :      600443 :                   rtx cval;
    4485                 :             : 
    4486                 :      600443 :                   if (!*dfpm->permp)
    4487                 :             :                     {
    4488                 :      242038 :                       *dfpm->permp = XNEW (dataflow_set);
    4489                 :      242038 :                       dataflow_set_init (*dfpm->permp);
    4490                 :             :                     }
    4491                 :             : 
    4492                 :      600443 :                   for (att = (*dfpm->permp)->regs[REGNO (node->loc)];
    4493                 :      600629 :                        att; att = att->next)
    4494                 :      256912 :                     if (GET_MODE (att->loc) == GET_MODE (node->loc))
    4495                 :             :                       {
    4496                 :      256726 :                         gcc_assert (att->offset == 0
    4497                 :             :                                     && dv_is_value_p (att->dv));
    4498                 :      256726 :                         val_reset (set, att->dv);
    4499                 :      256726 :                         break;
    4500                 :             :                       }
    4501                 :             : 
    4502                 :      600443 :                   if (att)
    4503                 :             :                     {
    4504                 :      256726 :                       cdv = att->dv;
    4505                 :      256726 :                       cval = dv_as_value (cdv);
    4506                 :             :                     }
    4507                 :             :                   else
    4508                 :             :                     {
    4509                 :             :                       /* Create a unique value to hold this register,
    4510                 :             :                          that ought to be found and reused in
    4511                 :             :                          subsequent rounds.  */
    4512                 :      343717 :                       cselib_val *v;
    4513                 :      343717 :                       gcc_assert (!cselib_lookup (node->loc,
    4514                 :             :                                                   GET_MODE (node->loc), 0,
    4515                 :             :                                                   VOIDmode));
    4516                 :      343717 :                       v = cselib_lookup (node->loc, GET_MODE (node->loc), 1,
    4517                 :             :                                          VOIDmode);
    4518                 :      343717 :                       cselib_preserve_value (v);
    4519                 :      343717 :                       cselib_invalidate_rtx (node->loc);
    4520                 :      343717 :                       cval = v->val_rtx;
    4521                 :      343717 :                       cdv = dv_from_value (cval);
    4522                 :      343717 :                       if (dump_file)
    4523                 :           0 :                         fprintf (dump_file,
    4524                 :             :                                  "Created new value %u:%u for reg %i\n",
    4525                 :           0 :                                  v->uid, v->hash, REGNO (node->loc));
    4526                 :             :                     }
    4527                 :             : 
    4528                 :      600443 :                   var_reg_decl_set (*dfpm->permp, node->loc,
    4529                 :             :                                     VAR_INIT_STATUS_INITIALIZED,
    4530                 :             :                                     cdv, 0, NULL, INSERT);
    4531                 :             : 
    4532                 :      600443 :                   node->loc = cval;
    4533                 :      600443 :                   check_dupes = true;
    4534                 :             :                 }
    4535                 :             : 
    4536                 :             :               /* Remove attribute referring to the decl, which now
    4537                 :             :                  uses the value for the register, already existing or
    4538                 :             :                  to be added when we bring perm in.  */
    4539                 :      600443 :               att = *curp;
    4540                 :      600443 :               *curp = att->next;
    4541                 :      600443 :               delete att;
    4542                 :             :             }
    4543                 :             :         }
    4544                 :             : 
    4545                 :    36593564 :       if (check_dupes)
    4546                 :      588464 :         remove_duplicate_values (var);
    4547                 :             :     }
    4548                 :             : 
    4549                 :             :   return 1;
    4550                 :             : }
    4551                 :             : 
    4552                 :             : /* Reset values in the permanent set that are not associated with the
    4553                 :             :    chosen expression.  */
    4554                 :             : 
    4555                 :             : int
    4556                 :      534846 : variable_post_merge_perm_vals (variable **pslot, dfset_post_merge *dfpm)
    4557                 :             : {
    4558                 :      534846 :   dataflow_set *set = dfpm->set;
    4559                 :      534846 :   variable *pvar = *pslot, *var;
    4560                 :      534846 :   location_chain *pnode;
    4561                 :      534846 :   decl_or_value dv;
    4562                 :      534846 :   attrs *att;
    4563                 :             : 
    4564                 :     1069692 :   gcc_assert (dv_is_value_p (pvar->dv)
    4565                 :             :               && pvar->n_var_parts == 1);
    4566                 :      534846 :   pnode = pvar->var_part[0].loc_chain;
    4567                 :      534846 :   gcc_assert (pnode
    4568                 :             :               && !pnode->next
    4569                 :             :               && REG_P (pnode->loc));
    4570                 :             : 
    4571                 :      534846 :   dv = pvar->dv;
    4572                 :             : 
    4573                 :      534846 :   var = shared_hash_find (set->vars, dv);
    4574                 :      534846 :   if (var)
    4575                 :             :     {
    4576                 :             :       /* Although variable_post_merge_new_vals may have made decls
    4577                 :             :          non-star-canonical, values that pre-existed in canonical form
    4578                 :             :          remain canonical, and newly-created values reference a single
    4579                 :             :          REG, so they are canonical as well.  Since VAR has the
    4580                 :             :          location list for a VALUE, using find_loc_in_1pdv for it is
    4581                 :             :          fine, since VALUEs don't map back to DECLs.  */
    4582                 :           0 :       if (find_loc_in_1pdv (pnode->loc, var, shared_hash_htab (set->vars)))
    4583                 :             :         return 1;
    4584                 :           0 :       val_reset (set, dv);
    4585                 :             :     }
    4586                 :             : 
    4587                 :      539483 :   for (att = set->regs[REGNO (pnode->loc)]; att; att = att->next)
    4588                 :        4637 :     if (att->offset == 0
    4589                 :        3755 :         && GET_MODE (att->loc) == GET_MODE (pnode->loc)
    4590                 :        8392 :         && dv_is_value_p (att->dv))
    4591                 :             :       break;
    4592                 :             : 
    4593                 :             :   /* If there is a value associated with this register already, create
    4594                 :             :      an equivalence.  */
    4595                 :      534846 :   if (att && dv_as_value (att->dv) != dv_as_value (dv))
    4596                 :             :     {
    4597                 :           0 :       rtx cval = dv_as_value (att->dv);
    4598                 :           0 :       set_variable_part (set, cval, dv, 0, pnode->init, NULL, INSERT);
    4599                 :           0 :       set_variable_part (set, dv_as_value (dv), att->dv, 0, pnode->init,
    4600                 :             :                          NULL, INSERT);
    4601                 :             :     }
    4602                 :      534846 :   else if (!att)
    4603                 :             :     {
    4604                 :      534846 :       attrs_list_insert (&set->regs[REGNO (pnode->loc)],
    4605                 :             :                          dv, 0, pnode->loc);
    4606                 :      534846 :       variable_union (pvar, set);
    4607                 :             :     }
    4608                 :             : 
    4609                 :             :   return 1;
    4610                 :             : }
    4611                 :             : 
    4612                 :             : /* Just checking stuff and registering register attributes for
    4613                 :             :    now.  */
    4614                 :             : 
    4615                 :             : static void
    4616                 :     2506665 : dataflow_post_merge_adjust (dataflow_set *set, dataflow_set **permp)
    4617                 :             : {
    4618                 :     2506665 :   struct dfset_post_merge dfpm;
    4619                 :             : 
    4620                 :     2506665 :   dfpm.set = set;
    4621                 :     2506665 :   dfpm.permp = permp;
    4622                 :             : 
    4623                 :     2506665 :   shared_hash_htab (set->vars)
    4624                 :     2506665 :     ->traverse <dfset_post_merge*, variable_post_merge_new_vals> (&dfpm);
    4625                 :     2506665 :   if (*permp)
    4626                 :      378505 :     shared_hash_htab ((*permp)->vars)
    4627                 :      378505 :       ->traverse <dfset_post_merge*, variable_post_merge_perm_vals> (&dfpm);
    4628                 :     2506665 :   shared_hash_htab (set->vars)
    4629                 :     2506665 :     ->traverse <dataflow_set *, canonicalize_values_star> (set);
    4630                 :     2506665 :   shared_hash_htab (set->vars)
    4631                 :     2506665 :     ->traverse <dataflow_set *, canonicalize_vars_star> (set);
    4632                 :     2506665 : }
    4633                 :             : 
    4634                 :             : /* Return a node whose loc is a MEM that refers to EXPR in the
    4635                 :             :    location list of a one-part variable or value VAR, or in that of
    4636                 :             :    any values recursively mentioned in the location lists.  */
    4637                 :             : 
    4638                 :             : static location_chain *
    4639                 :    88787025 : find_mem_expr_in_1pdv (tree expr, rtx val, variable_table_type *vars)
    4640                 :             : {
    4641                 :    88787025 :   location_chain *node;
    4642                 :    88787025 :   decl_or_value dv;
    4643                 :    88787025 :   variable *var;
    4644                 :    88787025 :   location_chain *where = NULL;
    4645                 :             : 
    4646                 :    88787025 :   if (!val)
    4647                 :             :     return NULL;
    4648                 :             : 
    4649                 :    88787025 :   gcc_assert (GET_CODE (val) == VALUE
    4650                 :             :               && !VALUE_RECURSED_INTO (val));
    4651                 :             : 
    4652                 :    88787025 :   dv = dv_from_value (val);
    4653                 :    88787025 :   var = vars->find_with_hash (dv, dv_htab_hash (dv));
    4654                 :             : 
    4655                 :    88787025 :   if (!var)
    4656                 :             :     return NULL;
    4657                 :             : 
    4658                 :    43063262 :   gcc_assert (var->onepart);
    4659                 :             : 
    4660                 :    43063262 :   if (!var->n_var_parts)
    4661                 :             :     return NULL;
    4662                 :             : 
    4663                 :    43063262 :   VALUE_RECURSED_INTO (val) = true;
    4664                 :             : 
    4665                 :   102374393 :   for (node = var->var_part[0].loc_chain; node; node = node->next)
    4666                 :    60250508 :     if (MEM_P (node->loc)
    4667                 :    15571094 :         && MEM_EXPR (node->loc) == expr
    4668                 :    61188666 :         && int_mem_offset (node->loc) == 0)
    4669                 :             :       {
    4670                 :             :         where = node;
    4671                 :             :         break;
    4672                 :             :       }
    4673                 :    59312350 :     else if (GET_CODE (node->loc) == VALUE
    4674                 :    33452957 :              && !VALUE_RECURSED_INTO (node->loc)
    4675                 :    76039436 :              && (where = find_mem_expr_in_1pdv (expr, node->loc, vars)))
    4676                 :             :       break;
    4677                 :             : 
    4678                 :    43063262 :   VALUE_RECURSED_INTO (val) = false;
    4679                 :             : 
    4680                 :    43063262 :   return where;
    4681                 :             : }
    4682                 :             : 
    4683                 :             : /* Return TRUE if the value of MEM may vary across a call.  */
    4684                 :             : 
    4685                 :             : static bool
    4686                 :    96337507 : mem_dies_at_call (rtx mem)
    4687                 :             : {
    4688                 :    96337507 :   tree expr = MEM_EXPR (mem);
    4689                 :    96337507 :   tree decl;
    4690                 :             : 
    4691                 :    96337507 :   if (!expr)
    4692                 :             :     return true;
    4693                 :             : 
    4694                 :    87527162 :   decl = get_base_address (expr);
    4695                 :             : 
    4696                 :    87527162 :   if (!decl)
    4697                 :             :     return true;
    4698                 :             : 
    4699                 :    87527162 :   if (!DECL_P (decl))
    4700                 :             :     return true;
    4701                 :             : 
    4702                 :    80356405 :   return (may_be_aliased (decl)
    4703                 :    80356405 :           || (!TREE_READONLY (decl) && is_global_var (decl)));
    4704                 :             : }
    4705                 :             : 
    4706                 :             : /* Remove all MEMs from the location list of a hash table entry for a
    4707                 :             :    one-part variable, except those whose MEM attributes map back to
    4708                 :             :    the variable itself, directly or within a VALUE.  */
    4709                 :             : 
    4710                 :             : int
    4711                 :   269591800 : dataflow_set_preserve_mem_locs (variable **slot, dataflow_set *set)
    4712                 :             : {
    4713                 :   269591800 :   variable *var = *slot;
    4714                 :             : 
    4715                 :   269591800 :   if (var->onepart == ONEPART_VDECL || var->onepart == ONEPART_DEXPR)
    4716                 :             :     {
    4717                 :   123741137 :       tree decl = dv_as_decl (var->dv);
    4718                 :   123741137 :       location_chain *loc, **locp;
    4719                 :   123741137 :       bool changed = false;
    4720                 :             : 
    4721                 :   123741137 :       if (!var->n_var_parts)
    4722                 :             :         return 1;
    4723                 :             : 
    4724                 :   123741137 :       gcc_assert (var->n_var_parts == 1);
    4725                 :             : 
    4726                 :   123741137 :       if (shared_var_p (var, set->vars))
    4727                 :             :         {
    4728                 :   145707911 :           for (loc = var->var_part[0].loc_chain; loc; loc = loc->next)
    4729                 :             :             {
    4730                 :             :               /* We want to remove dying MEMs that don't refer to DECL.  */
    4731                 :    73091571 :               if (GET_CODE (loc->loc) == MEM
    4732                 :     2287134 :                   && (MEM_EXPR (loc->loc) != decl
    4733                 :     1976440 :                       || int_mem_offset (loc->loc) != 0)
    4734                 :    73402265 :                   && mem_dies_at_call (loc->loc))
    4735                 :             :                 break;
    4736                 :             :               /* We want to move here MEMs that do refer to DECL.  */
    4737                 :    73086341 :               else if (GET_CODE (loc->loc) == VALUE
    4738                 :    73086341 :                        && find_mem_expr_in_1pdv (decl, loc->loc,
    4739                 :             :                                                  shared_hash_htab (set->vars)))
    4740                 :             :                 break;
    4741                 :             :             }
    4742                 :             : 
    4743                 :    73089409 :           if (!loc)
    4744                 :             :             return 1;
    4745                 :             : 
    4746                 :      473069 :           slot = unshare_variable (set, slot, var, VAR_INIT_STATUS_UNKNOWN);
    4747                 :      473069 :           var = *slot;
    4748                 :      473069 :           gcc_assert (var->n_var_parts == 1);
    4749                 :             :         }
    4750                 :             : 
    4751                 :    51124797 :       for (locp = &var->var_part[0].loc_chain, loc = *locp;
    4752                 :   102250047 :            loc; loc = *locp)
    4753                 :             :         {
    4754                 :    51125250 :           rtx old_loc = loc->loc;
    4755                 :    51125250 :           if (GET_CODE (old_loc) == VALUE)
    4756                 :             :             {
    4757                 :     9397070 :               location_chain *mem_node
    4758                 :     9397070 :                 = find_mem_expr_in_1pdv (decl, loc->loc,
    4759                 :             :                                          shared_hash_htab (set->vars));
    4760                 :             : 
    4761                 :             :               /* ??? This picks up only one out of multiple MEMs that
    4762                 :             :                  refer to the same variable.  Do we ever need to be
    4763                 :             :                  concerned about dealing with more than one, or, given
    4764                 :             :                  that they should all map to the same variable
    4765                 :             :                  location, their addresses will have been merged and
    4766                 :             :                  they will be regarded as equivalent?  */
    4767                 :     9397070 :               if (mem_node)
    4768                 :             :                 {
    4769                 :      470319 :                   loc->loc = mem_node->loc;
    4770                 :      470319 :                   loc->set_src = mem_node->set_src;
    4771                 :      940638 :                   loc->init = MIN (loc->init, mem_node->init);
    4772                 :             :                 }
    4773                 :             :             }
    4774                 :             : 
    4775                 :   102245270 :           if (GET_CODE (loc->loc) != MEM
    4776                 :      518248 :               || (MEM_EXPR (loc->loc) == decl
    4777                 :      512408 :                   && int_mem_offset (loc->loc) == 0)
    4778                 :    51131090 :               || !mem_dies_at_call (loc->loc))
    4779                 :             :             {
    4780                 :    51120020 :               if (old_loc != loc->loc && emit_notes)
    4781                 :             :                 {
    4782                 :      232999 :                   if (old_loc == var->var_part[0].cur_loc)
    4783                 :             :                     {
    4784                 :           0 :                       changed = true;
    4785                 :           0 :                       var->var_part[0].cur_loc = NULL;
    4786                 :             :                     }
    4787                 :             :                 }
    4788                 :    51120020 :               locp = &loc->next;
    4789                 :    51120020 :               continue;
    4790                 :             :             }
    4791                 :             : 
    4792                 :        5230 :           if (emit_notes)
    4793                 :             :             {
    4794                 :        2416 :               if (old_loc == var->var_part[0].cur_loc)
    4795                 :             :                 {
    4796                 :           0 :                   changed = true;
    4797                 :           0 :                   var->var_part[0].cur_loc = NULL;
    4798                 :             :                 }
    4799                 :             :             }
    4800                 :        5230 :           *locp = loc->next;
    4801                 :        5230 :           delete loc;
    4802                 :             :         }
    4803                 :             : 
    4804                 :    51124797 :       if (!var->var_part[0].loc_chain)
    4805                 :             :         {
    4806                 :        4787 :           var->n_var_parts--;
    4807                 :        4787 :           changed = true;
    4808                 :             :         }
    4809                 :    51124797 :       if (changed)
    4810                 :        4787 :         variable_was_changed (var, set);
    4811                 :             :     }
    4812                 :             : 
    4813                 :             :   return 1;
    4814                 :             : }
    4815                 :             : 
    4816                 :             : /* Remove all MEMs from the location list of a hash table entry for a
    4817                 :             :    onepart variable.  */
    4818                 :             : 
    4819                 :             : int
    4820                 :   269587013 : dataflow_set_remove_mem_locs (variable **slot, dataflow_set *set)
    4821                 :             : {
    4822                 :   269587013 :   variable *var = *slot;
    4823                 :             : 
    4824                 :   269587013 :   if (var->onepart != NOT_ONEPART)
    4825                 :             :     {
    4826                 :   268373923 :       location_chain *loc, **locp;
    4827                 :   268373923 :       bool changed = false;
    4828                 :   268373923 :       rtx cur_loc;
    4829                 :             : 
    4830                 :   268373923 :       gcc_assert (var->n_var_parts == 1);
    4831                 :             : 
    4832                 :   268373923 :       if (shared_var_p (var, set->vars))
    4833                 :             :         {
    4834                 :   394488412 :           for (loc = var->var_part[0].loc_chain; loc; loc = loc->next)
    4835                 :   211650723 :             if (GET_CODE (loc->loc) == MEM
    4836                 :   211650723 :                 && mem_dies_at_call (loc->loc))
    4837                 :             :               break;
    4838                 :             : 
    4839                 :   188089729 :           if (!loc)
    4840                 :             :             return 1;
    4841                 :             : 
    4842                 :     5252040 :           slot = unshare_variable (set, slot, var, VAR_INIT_STATUS_UNKNOWN);
    4843                 :     5252040 :           var = *slot;
    4844                 :     5252040 :           gcc_assert (var->n_var_parts == 1);
    4845                 :             :         }
    4846                 :             : 
    4847                 :    85536234 :       if (VAR_LOC_1PAUX (var))
    4848                 :    28380576 :         cur_loc = VAR_LOC_FROM (var);
    4849                 :             :       else
    4850                 :    57155658 :         cur_loc = var->var_part[0].cur_loc;
    4851                 :             : 
    4852                 :    85536234 :       for (locp = &var->var_part[0].loc_chain, loc = *locp;
    4853                 :   186467493 :            loc; loc = *locp)
    4854                 :             :         {
    4855                 :   184479786 :           if (GET_CODE (loc->loc) != MEM
    4856                 :   100931259 :               || !mem_dies_at_call (loc->loc))
    4857                 :             :             {
    4858                 :    83548527 :               locp = &loc->next;
    4859                 :    83548527 :               continue;
    4860                 :             :             }
    4861                 :             : 
    4862                 :    17382732 :           *locp = loc->next;
    4863                 :             :           /* If we have deleted the location which was last emitted
    4864                 :             :              we have to emit new location so add the variable to set
    4865                 :             :              of changed variables.  */
    4866                 :    17382732 :           if (cur_loc == loc->loc)
    4867                 :             :             {
    4868                 :      315923 :               changed = true;
    4869                 :      315923 :               var->var_part[0].cur_loc = NULL;
    4870                 :      315923 :               if (VAR_LOC_1PAUX (var))
    4871                 :      315923 :                 VAR_LOC_FROM (var) = NULL;
    4872                 :             :             }
    4873                 :    17382732 :           delete loc;
    4874                 :             :         }
    4875                 :             : 
    4876                 :    85536234 :       if (!var->var_part[0].loc_chain)
    4877                 :             :         {
    4878                 :    11631225 :           var->n_var_parts--;
    4879                 :    11631225 :           changed = true;
    4880                 :             :         }
    4881                 :    85536234 :       if (changed)
    4882                 :    11655413 :         variable_was_changed (var, set);
    4883                 :             :     }
    4884                 :             : 
    4885                 :             :   return 1;
    4886                 :             : }
    4887                 :             : 
    4888                 :             : /* Remove all variable-location information about call-clobbered
    4889                 :             :    registers, as well as associations between MEMs and VALUEs.  */
    4890                 :             : 
    4891                 :             : static void
    4892                 :     6643888 : dataflow_set_clear_at_call (dataflow_set *set, rtx_insn *call_insn)
    4893                 :             : {
    4894                 :     6643888 :   unsigned int r;
    4895                 :     6643888 :   hard_reg_set_iterator hrsi;
    4896                 :             : 
    4897                 :     6643888 :   HARD_REG_SET callee_clobbers
    4898                 :     6643888 :     = insn_callee_abi (call_insn).full_reg_clobbers ();
    4899                 :             : 
    4900                 :   560245534 :   EXECUTE_IF_SET_IN_HARD_REG_SET (callee_clobbers, 0, r, hrsi)
    4901                 :   553601646 :     var_regno_delete (set, r);
    4902                 :             : 
    4903                 :     6643888 :   if (MAY_HAVE_DEBUG_BIND_INSNS)
    4904                 :             :     {
    4905                 :     6643804 :       set->traversed_vars = set->vars;
    4906                 :     6643804 :       shared_hash_htab (set->vars)
    4907                 :     6643804 :         ->traverse <dataflow_set *, dataflow_set_preserve_mem_locs> (set);
    4908                 :     6643804 :       set->traversed_vars = set->vars;
    4909                 :     6643804 :       shared_hash_htab (set->vars)
    4910                 :     6643804 :         ->traverse <dataflow_set *, dataflow_set_remove_mem_locs> (set);
    4911                 :     6643804 :       set->traversed_vars = NULL;
    4912                 :             :     }
    4913                 :     6643888 : }
    4914                 :             : 
    4915                 :             : static bool
    4916                 :      648973 : variable_part_different_p (variable_part *vp1, variable_part *vp2)
    4917                 :             : {
    4918                 :      648973 :   location_chain *lc1, *lc2;
    4919                 :             : 
    4920                 :     1408874 :   for (lc1 = vp1->loc_chain; lc1; lc1 = lc1->next)
    4921                 :             :     {
    4922                 :     1001123 :       for (lc2 = vp2->loc_chain; lc2; lc2 = lc2->next)
    4923                 :             :         {
    4924                 :      962377 :           if (REG_P (lc1->loc) && REG_P (lc2->loc))
    4925                 :             :             {
    4926                 :      731607 :               if (REGNO (lc1->loc) == REGNO (lc2->loc))
    4927                 :             :                 break;
    4928                 :             :             }
    4929                 :      334546 :           if (rtx_equal_p (lc1->loc, lc2->loc))
    4930                 :             :             break;
    4931                 :             :         }
    4932                 :      759901 :       if (!lc2)
    4933                 :             :         return true;
    4934                 :             :     }
    4935                 :             :   return false;
    4936                 :             : }
    4937                 :             : 
    4938                 :             : /* Return true if one-part variables VAR1 and VAR2 are different.
    4939                 :             :    They must be in canonical order.  */
    4940                 :             : 
    4941                 :             : static bool
    4942                 :   276318319 : onepart_variable_different_p (variable *var1, variable *var2)
    4943                 :             : {
    4944                 :   276318319 :   location_chain *lc1, *lc2;
    4945                 :             : 
    4946                 :   276318319 :   if (var1 == var2)
    4947                 :             :     return false;
    4948                 :             : 
    4949                 :    74741748 :   gcc_assert (var1->n_var_parts == 1
    4950                 :             :               && var2->n_var_parts == 1);
    4951                 :             : 
    4952                 :    74741748 :   lc1 = var1->var_part[0].loc_chain;
    4953                 :    74741748 :   lc2 = var2->var_part[0].loc_chain;
    4954                 :             : 
    4955                 :    74741748 :   gcc_assert (lc1 && lc2);
    4956                 :             : 
    4957                 :   157523938 :   while (lc1 && lc2)
    4958                 :             :     {
    4959                 :    98511157 :       if (loc_cmp (lc1->loc, lc2->loc))
    4960                 :             :         return true;
    4961                 :    82782190 :       lc1 = lc1->next;
    4962                 :    82782190 :       lc2 = lc2->next;
    4963                 :             :     }
    4964                 :             : 
    4965                 :    59012781 :   return lc1 != lc2;
    4966                 :             : }
    4967                 :             : 
    4968                 :             : /* Return true if one-part variables VAR1 and VAR2 are different.
    4969                 :             :    They must be in canonical order.  */
    4970                 :             : 
    4971                 :             : static void
    4972                 :           0 : dump_onepart_variable_differences (variable *var1, variable *var2)
    4973                 :             : {
    4974                 :           0 :   location_chain *lc1, *lc2;
    4975                 :             : 
    4976                 :           0 :   gcc_assert (var1 != var2);
    4977                 :           0 :   gcc_assert (dump_file);
    4978                 :           0 :   gcc_assert (var1->dv == var2->dv);
    4979                 :           0 :   gcc_assert (var1->n_var_parts == 1
    4980                 :             :               && var2->n_var_parts == 1);
    4981                 :             : 
    4982                 :           0 :   lc1 = var1->var_part[0].loc_chain;
    4983                 :           0 :   lc2 = var2->var_part[0].loc_chain;
    4984                 :             : 
    4985                 :           0 :   gcc_assert (lc1 && lc2);
    4986                 :             : 
    4987                 :           0 :   while (lc1 && lc2)
    4988                 :             :     {
    4989                 :           0 :       switch (loc_cmp (lc1->loc, lc2->loc))
    4990                 :             :         {
    4991                 :           0 :         case -1:
    4992                 :           0 :           fprintf (dump_file, "removed: ");
    4993                 :           0 :           print_rtl_single (dump_file, lc1->loc);
    4994                 :           0 :           lc1 = lc1->next;
    4995                 :           0 :           continue;
    4996                 :           0 :         case 0:
    4997                 :           0 :           break;
    4998                 :           0 :         case 1:
    4999                 :           0 :           fprintf (dump_file, "added: ");
    5000                 :           0 :           print_rtl_single (dump_file, lc2->loc);
    5001                 :           0 :           lc2 = lc2->next;
    5002                 :           0 :           continue;
    5003                 :           0 :         default:
    5004                 :           0 :           gcc_unreachable ();
    5005                 :             :         }
    5006                 :           0 :       lc1 = lc1->next;
    5007                 :           0 :       lc2 = lc2->next;
    5008                 :             :     }
    5009                 :             : 
    5010                 :           0 :   while (lc1)
    5011                 :             :     {
    5012                 :           0 :       fprintf (dump_file, "removed: ");
    5013                 :           0 :       print_rtl_single (dump_file, lc1->loc);
    5014                 :           0 :       lc1 = lc1->next;
    5015                 :             :     }
    5016                 :             : 
    5017                 :           0 :   while (lc2)
    5018                 :             :     {
    5019                 :           0 :       fprintf (dump_file, "added: ");
    5020                 :           0 :       print_rtl_single (dump_file, lc2->loc);
    5021                 :           0 :       lc2 = lc2->next;
    5022                 :             :     }
    5023                 :           0 : }
    5024                 :             : 
    5025                 :             : /* Return true if variables VAR1 and VAR2 are different.  */
    5026                 :             : 
    5027                 :             : static bool
    5028                 :   225774285 : variable_different_p (variable *var1, variable *var2)
    5029                 :             : {
    5030                 :   225774285 :   int i;
    5031                 :             : 
    5032                 :   225774285 :   if (var1 == var2)
    5033                 :             :     return false;
    5034                 :             : 
    5035                 :    33483015 :   if (var1->onepart != var2->onepart)
    5036                 :             :     return true;
    5037                 :             : 
    5038                 :    33483015 :   if (var1->n_var_parts != var2->n_var_parts)
    5039                 :             :     return true;
    5040                 :             : 
    5041                 :    33439599 :   if (var1->onepart && var1->n_var_parts)
    5042                 :             :     {
    5043                 :    33201801 :       gcc_checking_assert (var1->dv == var2->dv && var1->n_var_parts == 1);
    5044                 :             :       /* One-part values have locations in a canonical order.  */
    5045                 :    33201801 :       return onepart_variable_different_p (var1, var2);
    5046                 :             :     }
    5047                 :             : 
    5048                 :      531043 :   for (i = 0; i < var1->n_var_parts; i++)
    5049                 :             :     {
    5050                 :      334975 :       if (VAR_PART_OFFSET (var1, i) != VAR_PART_OFFSET (var2, i))
    5051                 :             :         return true;
    5052                 :      331991 :       if (variable_part_different_p (&var1->var_part[i], &var2->var_part[i]))
    5053                 :             :         return true;
    5054                 :      316982 :       if (variable_part_different_p (&var2->var_part[i], &var1->var_part[i]))
    5055                 :             :         return true;
    5056                 :             :     }
    5057                 :             :   return false;
    5058                 :             : }
    5059                 :             : 
    5060                 :             : /* Return true if dataflow sets OLD_SET and NEW_SET differ.  */
    5061                 :             : 
    5062                 :             : static bool
    5063                 :     8420543 : dataflow_set_different (dataflow_set *old_set, dataflow_set *new_set)
    5064                 :             : {
    5065                 :     8420543 :   variable_iterator_type hi;
    5066                 :     8420543 :   variable *var1;
    5067                 :     8420543 :   bool diffound = false;
    5068                 :     8420543 :   bool details = (dump_file && (dump_flags & TDF_DETAILS));
    5069                 :             : 
    5070                 :             : #define RETRUE                                  \
    5071                 :             :   do                                            \
    5072                 :             :     {                                           \
    5073                 :             :       if (!details)                             \
    5074                 :             :         return true;                            \
    5075                 :             :       else                                      \
    5076                 :             :         diffound = true;                        \
    5077                 :             :     }                                           \
    5078                 :             :   while (0)
    5079                 :             : 
    5080                 :     8420543 :   if (old_set->vars == new_set->vars)
    5081                 :             :     return false;
    5082                 :             : 
    5083                 :     8415263 :   if (shared_hash_htab (old_set->vars)->elements ()
    5084                 :     8415263 :       != shared_hash_htab (new_set->vars)->elements ())
    5085                 :     7943873 :     RETRUE;
    5086                 :             : 
    5087                 :    31189595 :   FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (old_set->vars),
    5088                 :             :                                var1, variable, hi)
    5089                 :             :     {
    5090                 :    15497303 :       variable_table_type *htab = shared_hash_htab (new_set->vars);
    5091                 :    15497303 :       variable *var2 = htab->find_with_hash (var1->dv, dv_htab_hash (var1->dv));
    5092                 :             : 
    5093                 :    15497303 :       if (!var2)
    5094                 :             :         {
    5095                 :       36628 :           if (dump_file && (dump_flags & TDF_DETAILS))
    5096                 :             :             {
    5097                 :           0 :               fprintf (dump_file, "dataflow difference found: removal of:\n");
    5098                 :           0 :               dump_var (var1);
    5099                 :             :             }
    5100                 :       36628 :           RETRUE;
    5101                 :             :         }
    5102                 :    15460675 :       else if (variable_different_p (var1, var2))
    5103                 :             :         {
    5104                 :      101573 :           if (details)
    5105                 :             :             {
    5106                 :           0 :               fprintf (dump_file, "dataflow difference found: "
    5107                 :             :                        "old and new follow:\n");
    5108                 :           0 :               dump_var (var1);
    5109                 :           0 :               if (dv_onepart_p (var1->dv))
    5110                 :           0 :                 dump_onepart_variable_differences (var1, var2);
    5111                 :           0 :               dump_var (var2);
    5112                 :             :             }
    5113                 :           0 :           RETRUE;
    5114                 :             :         }
    5115                 :             :     }
    5116                 :             : 
    5117                 :             :   /* There's no need to traverse the second hashtab unless we want to
    5118                 :             :      print the details.  If both have the same number of elements and
    5119                 :             :      the second one had all entries found in the first one, then the
    5120                 :             :      second can't have any extra entries.  */
    5121                 :      333190 :   if (!details)
    5122                 :             :     return diffound;
    5123                 :             : 
    5124                 :           7 :   FOR_EACH_HASH_TABLE_ELEMENT (*shared_hash_htab (new_set->vars),
    5125                 :             :                                var1, variable, hi)
    5126                 :             :     {
    5127                 :           3 :       variable_table_type *htab = shared_hash_htab (old_set->vars);
    5128                 :           3 :       variable *var2 = htab->find_with_hash (var1->dv, dv_htab_hash (var1->dv));
    5129                 :           3 :       if (!var2)
    5130                 :             :         {
    5131                 :           3 :           if (details)
    5132                 :             :             {
    5133                 :           3 :               fprintf (dump_file, "dataflow difference found: addition of:\n");
    5134                 :           3 :               dump_var (var1);
    5135                 :             :             }
    5136                 :           3 :           RETRUE;
    5137                 :             :         }
    5138                 :             :     }
    5139                 :             : 
    5140                 :             : #undef RETRUE
    5141                 :             : 
    5142                 :             :   return diffound;
    5143                 :             : }
    5144                 :             : 
    5145                 :             : /* Free the contents of dataflow set SET.  */
    5146                 :             : 
    5147                 :             : static void
    5148                 :    28362213 : dataflow_set_destroy (dataflow_set *set)
    5149                 :             : {
    5150                 :    28362213 :   int i;
    5151                 :             : 
    5152                 :  2637685809 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    5153                 :  2609323596 :     attrs_list_clear (&set->regs[i]);
    5154                 :             : 
    5155                 :    28362213 :   shared_hash_destroy (set->vars);
    5156                 :    28362213 :   set->vars = NULL;
    5157                 :    28362213 : }
    5158                 :             : 
    5159                 :             : /* Return true if T is a tracked parameter with non-degenerate record type.  */
    5160                 :             : 
    5161                 :             : static bool
    5162                 :     3696517 : tracked_record_parameter_p (tree t)
    5163                 :             : {
    5164                 :     3696517 :   if (TREE_CODE (t) != PARM_DECL)
    5165                 :             :     return false;
    5166                 :             : 
    5167                 :      350124 :   if (DECL_MODE (t) == BLKmode)
    5168                 :             :     return false;
    5169                 :             : 
    5170                 :      177011 :   tree type = TREE_TYPE (t);
    5171                 :      177011 :   if (TREE_CODE (type) != RECORD_TYPE)
    5172                 :             :     return false;
    5173                 :             : 
    5174                 :      176863 :   if (TYPE_FIELDS (type) == NULL_TREE
    5175                 :      176863 :       || DECL_CHAIN (TYPE_FIELDS (type)) == NULL_TREE)
    5176                 :        1061 :     return false;
    5177                 :             : 
    5178                 :             :   return true;
    5179                 :             : }
    5180                 :             : 
    5181                 :             : /* Shall EXPR be tracked?  */
    5182                 :             : 
    5183                 :             : static bool
    5184                 :    67994561 : track_expr_p (tree expr, bool need_rtl)
    5185                 :             : {
    5186                 :    67994561 :   rtx decl_rtl;
    5187                 :    67994561 :   tree realdecl;
    5188                 :             : 
    5189                 :    67994561 :   if (TREE_CODE (expr) == DEBUG_EXPR_DECL)
    5190                 :     2593377 :     return DECL_RTL_SET_P (expr);
    5191                 :             : 
    5192                 :             :   /* If EXPR is not a parameter or a variable do not track it.  */
    5193                 :    65401184 :   if (!VAR_P (expr) && TREE_CODE (expr) != PARM_DECL)
    5194                 :             :     return 0;
    5195                 :             : 
    5196                 :             :   /* It also must have a name...  */
    5197                 :    38660263 :   if (!DECL_NAME (expr) && need_rtl)
    5198                 :             :     return 0;
    5199                 :             : 
    5200                 :             :   /* ... and a RTL assigned to it.  */
    5201                 :    37310420 :   decl_rtl = DECL_RTL_IF_SET (expr);
    5202                 :    37310420 :   if (!decl_rtl && need_rtl)
    5203                 :             :     return 0;
    5204                 :             : 
    5205                 :             :   /* If this expression is really a debug alias of some other declaration, we
    5206                 :             :      don't need to track this expression if the ultimate declaration is
    5207                 :             :      ignored.  */
    5208                 :    37152214 :   realdecl = expr;
    5209                 :    37152214 :   if (VAR_P (realdecl) && DECL_HAS_DEBUG_EXPR_P (realdecl))
    5210                 :             :     {
    5211                 :     3191767 :       realdecl = DECL_DEBUG_EXPR (realdecl);
    5212                 :     3191767 :       if (!DECL_P (realdecl))
    5213                 :             :         {
    5214                 :     3191767 :           if (handled_component_p (realdecl)
    5215                 :      249291 :               || (TREE_CODE (realdecl) == MEM_REF
    5216                 :      249291 :                   && TREE_CODE (TREE_OPERAND (realdecl, 0)) == ADDR_EXPR))
    5217                 :             :             {
    5218                 :     3191767 :               HOST_WIDE_INT bitsize, bitpos;
    5219                 :     3191767 :               bool reverse;
    5220                 :     3191767 :               tree innerdecl
    5221                 :     3191767 :                 = get_ref_base_and_extent_hwi (realdecl, &bitpos,
    5222                 :             :                                                &bitsize, &reverse);
    5223                 :     3191767 :               if (!innerdecl
    5224                 :     3191767 :                   || !DECL_P (innerdecl)
    5225                 :     3191767 :                   || DECL_IGNORED_P (innerdecl)
    5226                 :             :                   /* Do not track declarations for parts of tracked record
    5227                 :             :                      parameters since we want to track them as a whole.  */
    5228                 :     3191751 :                   || tracked_record_parameter_p (innerdecl)
    5229                 :     3104260 :                   || TREE_STATIC (innerdecl)
    5230                 :     3104258 :                   || bitsize == 0
    5231                 :     6296025 :                   || bitpos + bitsize > 256)
    5232                 :      196210 :                 return 0;
    5233                 :             :               else
    5234                 :     2995557 :                 realdecl = expr;
    5235                 :             :             }
    5236                 :             :           else
    5237                 :             :             return 0;
    5238                 :             :         }
    5239                 :             :     }
    5240                 :             : 
    5241                 :             :   /* Do not track EXPR if REALDECL it should be ignored for debugging
    5242                 :             :      purposes.  */
    5243                 :    36956004 :   if (DECL_IGNORED_P (realdecl))
    5244                 :             :     return 0;
    5245                 :             : 
    5246                 :             :   /* Do not track global variables until we are able to emit correct location
    5247                 :             :      list for them.  */
    5248                 :    28441065 :   if (TREE_STATIC (realdecl))
    5249                 :             :     return 0;
    5250                 :             : 
    5251                 :             :   /* When the EXPR is a DECL for alias of some variable (see example)
    5252                 :             :      the TREE_STATIC flag is not used.  Disable tracking all DECLs whose
    5253                 :             :      DECL_RTL contains SYMBOL_REF.
    5254                 :             : 
    5255                 :             :      Example:
    5256                 :             :      extern char **_dl_argv_internal __attribute__ ((alias ("_dl_argv")));
    5257                 :             :      char **_dl_argv;
    5258                 :             :   */
    5259                 :     4981115 :   if (decl_rtl && MEM_P (decl_rtl)
    5260                 :    28743542 :       && contains_symbol_ref_p (XEXP (decl_rtl, 0)))
    5261                 :             :     return 0;
    5262                 :             : 
    5263                 :             :   /* If RTX is a memory it should not be very large (because it would be
    5264                 :             :      an array or struct).  */
    5265                 :    28360629 :   if (decl_rtl && MEM_P (decl_rtl))
    5266                 :             :     {
    5267                 :             :       /* Do not track structures and arrays.  */
    5268                 :      346499 :       if ((GET_MODE (decl_rtl) == BLKmode
    5269                 :       51478 :            || AGGREGATE_TYPE_P (TREE_TYPE (realdecl)))
    5270                 :      365703 :           && !tracked_record_parameter_p (realdecl))
    5271                 :             :         return 0;
    5272                 :       43021 :       if (MEM_SIZE_KNOWN_P (decl_rtl)
    5273                 :       43021 :           && maybe_gt (MEM_SIZE (decl_rtl), MAX_VAR_PARTS))
    5274                 :             :         return 0;
    5275                 :             :     }
    5276                 :             : 
    5277                 :    28056638 :   DECL_CHANGED (expr) = 0;
    5278                 :    28056638 :   DECL_CHANGED (realdecl) = 0;
    5279                 :    28056638 :   return 1;
    5280                 :             : }
    5281                 :             : 
    5282                 :             : /* Determine whether a given LOC refers to the same variable part as
    5283                 :             :    EXPR+OFFSET.  */
    5284                 :             : 
    5285                 :             : static bool
    5286                 :      186422 : same_variable_part_p (rtx loc, tree expr, poly_int64 offset)
    5287                 :             : {
    5288                 :      186422 :   tree expr2;
    5289                 :      186422 :   poly_int64 offset2;
    5290                 :             : 
    5291                 :      186422 :   if (! DECL_P (expr))
    5292                 :             :     return false;
    5293                 :             : 
    5294                 :      186422 :   if (REG_P (loc))
    5295                 :             :     {
    5296                 :       90418 :       expr2 = REG_EXPR (loc);
    5297                 :       90418 :       offset2 = REG_OFFSET (loc);
    5298                 :             :     }
    5299                 :       96004 :   else if (MEM_P (loc))
    5300                 :             :     {
    5301                 :       86584 :       expr2 = MEM_EXPR (loc);
    5302                 :       86584 :       offset2 = int_mem_offset (loc);
    5303                 :             :     }
    5304                 :             :   else
    5305                 :             :     return false;
    5306                 :             : 
    5307                 :      177002 :   if (! expr2 || ! DECL_P (expr2))
    5308                 :             :     return false;
    5309                 :             : 
    5310                 :      130358 :   expr = var_debug_decl (expr);
    5311                 :      130358 :   expr2 = var_debug_decl (expr2);
    5312                 :             : 
    5313                 :      130358 :   return (expr == expr2 && known_eq (offset, offset2));
    5314                 :             : }
    5315                 :             : 
    5316                 :             : /* LOC is a REG or MEM that we would like to track if possible.
    5317                 :             :    If EXPR is null, we don't know what expression LOC refers to,
    5318                 :             :    otherwise it refers to EXPR + OFFSET.  STORE_REG_P is true if
    5319                 :             :    LOC is an lvalue register.
    5320                 :             : 
    5321                 :             :    Return true if EXPR is nonnull and if LOC, or some lowpart of it,
    5322                 :             :    is something we can track.  When returning true, store the mode of
    5323                 :             :    the lowpart we can track in *MODE_OUT (if nonnull) and its offset
    5324                 :             :    from EXPR in *OFFSET_OUT (if nonnull).  */
    5325                 :             : 
    5326                 :             : static bool
    5327                 :    38866825 : track_loc_p (rtx loc, tree expr, poly_int64 offset, bool store_reg_p,
    5328                 :             :              machine_mode *mode_out, HOST_WIDE_INT *offset_out)
    5329                 :             : {
    5330                 :    38866825 :   machine_mode mode;
    5331                 :             : 
    5332                 :    38866825 :   if (expr == NULL || !track_expr_p (expr, true))
    5333                 :    37139840 :     return false;
    5334                 :             : 
    5335                 :             :   /* If REG was a paradoxical subreg, its REG_ATTRS will describe the
    5336                 :             :      whole subreg, but only the old inner part is really relevant.  */
    5337                 :     1726985 :   mode = GET_MODE (loc);
    5338                 :     1726985 :   if (REG_P (loc) && !HARD_REGISTER_NUM_P (ORIGINAL_REGNO (loc)))
    5339                 :             :     {
    5340                 :      663806 :       machine_mode pseudo_mode;
    5341                 :             : 
    5342                 :      663806 :       pseudo_mode = PSEUDO_REGNO_MODE (ORIGINAL_REGNO (loc));
    5343                 :      663806 :       if (paradoxical_subreg_p (mode, pseudo_mode))
    5344                 :             :         {
    5345                 :         467 :           offset += byte_lowpart_offset (pseudo_mode, mode);
    5346                 :         467 :           mode = pseudo_mode;
    5347                 :             :         }
    5348                 :             :     }
    5349                 :             : 
    5350                 :             :   /* If LOC is a paradoxical lowpart of EXPR, refer to EXPR itself.
    5351                 :             :      Do the same if we are storing to a register and EXPR occupies
    5352                 :             :      the whole of register LOC; in that case, the whole of EXPR is
    5353                 :             :      being changed.  We exclude complex modes from the second case
    5354                 :             :      because the real and imaginary parts are represented as separate
    5355                 :             :      pseudo registers, even if the whole complex value fits into one
    5356                 :             :      hard register.  */
    5357                 :     1726985 :   if ((paradoxical_subreg_p (mode, DECL_MODE (expr))
    5358                 :     1714428 :        || (store_reg_p
    5359                 :           0 :            && !COMPLEX_MODE_P (DECL_MODE (expr))
    5360                 :           0 :            && hard_regno_nregs (REGNO (loc), DECL_MODE (expr)) == 1))
    5361                 :     3441413 :       && known_eq (offset + byte_lowpart_offset (DECL_MODE (expr), mode), 0))
    5362                 :             :     {
    5363                 :       12557 :       mode = DECL_MODE (expr);
    5364                 :       12557 :       offset = 0;
    5365                 :             :     }
    5366                 :             : 
    5367                 :     1726985 :   HOST_WIDE_INT const_offset;
    5368                 :     3453970 :   if (!track_offset_p (offset, &const_offset))
    5369                 :             :     return false;
    5370                 :             : 
    5371                 :     1726985 :   if (mode_out)
    5372                 :     1726985 :     *mode_out = mode;
    5373                 :     1726985 :   if (offset_out)
    5374                 :      921312 :     *offset_out = const_offset;
    5375                 :             :   return true;
    5376                 :             : }
    5377                 :             : 
    5378                 :             : /* Return the MODE lowpart of LOC, or null if LOC is not something we
    5379                 :             :    want to track.  When returning nonnull, make sure that the attributes
    5380                 :             :    on the returned value are updated.  */
    5381                 :             : 
    5382                 :             : static rtx
    5383                 :     2688907 : var_lowpart (machine_mode mode, rtx loc)
    5384                 :             : {
    5385                 :     2688907 :   unsigned int regno;
    5386                 :             : 
    5387                 :     2688907 :   if (GET_MODE (loc) == mode)
    5388                 :             :     return loc;
    5389                 :             : 
    5390                 :       33112 :   if (!REG_P (loc) && !MEM_P (loc))
    5391                 :             :     return NULL;
    5392                 :             : 
    5393                 :       25582 :   poly_uint64 offset = byte_lowpart_offset (mode, GET_MODE (loc));
    5394                 :             : 
    5395                 :       25582 :   if (MEM_P (loc))
    5396                 :        2131 :     return adjust_address_nv (loc, mode, offset);
    5397                 :             : 
    5398                 :       23451 :   poly_uint64 reg_offset = subreg_lowpart_offset (mode, GET_MODE (loc));
    5399                 :       23451 :   regno = REGNO (loc) + subreg_regno_offset (REGNO (loc), GET_MODE (loc),
    5400                 :             :                                              reg_offset, mode);
    5401                 :       23451 :   return gen_rtx_REG_offset (loc, mode, regno, offset);
    5402                 :             : }
    5403                 :             : 
    5404                 :             : /* Carry information about uses and stores while walking rtx.  */
    5405                 :             : 
    5406                 :             : struct count_use_info
    5407                 :             : {
    5408                 :             :   /* The insn where the RTX is.  */
    5409                 :             :   rtx_insn *insn;
    5410                 :             : 
    5411                 :             :   /* The basic block where insn is.  */
    5412                 :             :   basic_block bb;
    5413                 :             : 
    5414                 :             :   /* The array of n_sets sets in the insn, as determined by cselib.  */
    5415                 :             :   struct cselib_set *sets;
    5416                 :             :   int n_sets;
    5417                 :             : 
    5418                 :             :   /* True if we're counting stores, false otherwise.  */
    5419                 :             :   bool store_p;
    5420                 :             : };
    5421                 :             : 
    5422                 :             : /* Find a VALUE corresponding to X.   */
    5423                 :             : 
    5424                 :             : static inline cselib_val *
    5425                 :   166593784 : find_use_val (rtx x, machine_mode mode, struct count_use_info *cui)
    5426                 :             : {
    5427                 :   166593784 :   int i;
    5428                 :             : 
    5429                 :   166593784 :   if (cui->sets)
    5430                 :             :     {
    5431                 :             :       /* This is called after uses are set up and before stores are
    5432                 :             :          processed by cselib, so it's safe to look up srcs, but not
    5433                 :             :          dsts.  So we look up expressions that appear in srcs or in
    5434                 :             :          dest expressions, but we search the sets array for dests of
    5435                 :             :          stores.  */
    5436                 :   166593551 :       if (cui->store_p)
    5437                 :             :         {
    5438                 :             :           /* Some targets represent memset and memcpy patterns
    5439                 :             :              by (set (mem:BLK ...) (reg:[QHSD]I ...)) or
    5440                 :             :              (set (mem:BLK ...) (const_int ...)) or
    5441                 :             :              (set (mem:BLK ...) (mem:BLK ...)).  Don't return anything
    5442                 :             :              in that case, otherwise we end up with mode mismatches.  */
    5443                 :    74604451 :           if (mode == BLKmode && MEM_P (x))
    5444                 :             :             return NULL;
    5445                 :    85423285 :           for (i = 0; i < cui->n_sets; i++)
    5446                 :    81001477 :             if (cui->sets[i].dest == x)
    5447                 :    69386275 :               return cui->sets[i].src_elt;
    5448                 :             :         }
    5449                 :             :       else
    5450                 :    91989100 :         return cselib_lookup (x, mode, 0, VOIDmode);
    5451                 :             :     }
    5452                 :             : 
    5453                 :             :   return NULL;
    5454                 :             : }
    5455                 :             : 
    5456                 :             : /* Replace all registers and addresses in an expression with VALUE
    5457                 :             :    expressions that map back to them, unless the expression is a
    5458                 :             :    register.  If no mapping is or can be performed, returns NULL.  */
    5459                 :             : 
    5460                 :             : static rtx
    5461                 :    48334468 : replace_expr_with_values (rtx loc)
    5462                 :             : {
    5463                 :    48334468 :   if (REG_P (loc) || GET_CODE (loc) == ENTRY_VALUE)
    5464                 :             :     return NULL;
    5465                 :    16292962 :   else if (MEM_P (loc))
    5466                 :             :     {
    5467                 :    16292962 :       cselib_val *addr = cselib_lookup (XEXP (loc, 0),
    5468                 :    16292962 :                                         get_address_mode (loc), 0,
    5469                 :    16292962 :                                         GET_MODE (loc));
    5470                 :    16292962 :       if (addr)
    5471                 :    16292962 :         return replace_equiv_address_nv (loc, addr->val_rtx);
    5472                 :             :       else
    5473                 :             :         return NULL;
    5474                 :             :     }
    5475                 :             :   else
    5476                 :           0 :     return cselib_subst_to_values (loc, VOIDmode);
    5477                 :             : }
    5478                 :             : 
    5479                 :             : /* Return true if X contains a DEBUG_EXPR.  */
    5480                 :             : 
    5481                 :             : static bool
    5482                 :       34626 : rtx_debug_expr_p (const_rtx x)
    5483                 :             : {
    5484                 :       34626 :   subrtx_iterator::array_type array;
    5485                 :      127542 :   FOR_EACH_SUBRTX (iter, array, x, ALL)
    5486                 :       92916 :     if (GET_CODE (*iter) == DEBUG_EXPR)
    5487                 :           0 :       return true;
    5488                 :       34626 :   return false;
    5489                 :       34626 : }
    5490                 :             : 
    5491                 :             : /* Determine what kind of micro operation to choose for a USE.  Return
    5492                 :             :    MO_CLOBBER if no micro operation is to be generated.  */
    5493                 :             : 
    5494                 :             : static enum micro_operation_type
    5495                 :   334646628 : use_type (rtx loc, struct count_use_info *cui, machine_mode *modep)
    5496                 :             : {
    5497                 :   334646628 :   tree expr;
    5498                 :             : 
    5499                 :   334646628 :   if (cui && cui->sets)
    5500                 :             :     {
    5501                 :   267186990 :       if (GET_CODE (loc) == VAR_LOCATION)
    5502                 :             :         {
    5503                 :    29127736 :           if (track_expr_p (PAT_VAR_LOCATION_DECL (loc), false))
    5504                 :             :             {
    5505                 :    28750672 :               rtx ploc = PAT_VAR_LOCATION_LOC (loc);
    5506                 :    28750672 :               if (! VAR_LOC_UNKNOWN_P (ploc))
    5507                 :             :                 {
    5508                 :    16229565 :                   cselib_val *val = cselib_lookup (ploc, GET_MODE (loc), 1,
    5509                 :             :                                                    VOIDmode);
    5510                 :             : 
    5511                 :             :                   /* ??? flag_float_store and volatile mems are never
    5512                 :             :                      given values, but we could in theory use them for
    5513                 :             :                      locations.  */
    5514                 :    28750672 :                   gcc_assert (val || 1);
    5515                 :             :                 }
    5516                 :    28750672 :               return MO_VAL_LOC;
    5517                 :             :             }
    5518                 :             :           else
    5519                 :             :             return MO_CLOBBER;
    5520                 :             :         }
    5521                 :             : 
    5522                 :   238059254 :       if (REG_P (loc) || MEM_P (loc))
    5523                 :             :         {
    5524                 :   103754198 :           if (modep)
    5525                 :   103754198 :             *modep = GET_MODE (loc);
    5526                 :   103754198 :           if (cui->store_p)
    5527                 :             :             {
    5528                 :    40022651 :               if (REG_P (loc)
    5529                 :    40022651 :                   || (find_use_val (loc, GET_MODE (loc), cui)
    5530                 :     7926824 :                       && cselib_lookup (XEXP (loc, 0),
    5531                 :     8748767 :                                         get_address_mode (loc), 0,
    5532                 :     7926824 :                                         GET_MODE (loc))))
    5533                 :    39200708 :                 return MO_VAL_SET;
    5534                 :             :             }
    5535                 :             :           else
    5536                 :             :             {
    5537                 :    63731547 :               cselib_val *val = find_use_val (loc, GET_MODE (loc), cui);
    5538                 :             : 
    5539                 :    63731547 :               if (val && !cselib_preserved_value_p (val))
    5540                 :             :                 return MO_VAL_USE;
    5541                 :             :             }
    5542                 :             :         }
    5543                 :             :     }
    5544                 :             : 
    5545                 :   252028085 :   if (REG_P (loc))
    5546                 :             :     {
    5547                 :    86150103 :       gcc_assert (REGNO (loc) < FIRST_PSEUDO_REGISTER);
    5548                 :             : 
    5549                 :    86150103 :       if (loc == cfa_base_rtx)
    5550                 :             :         return MO_CLOBBER;
    5551                 :    88063178 :       expr = REG_EXPR (loc);
    5552                 :             : 
    5553                 :    33859453 :       if (!expr)
    5554                 :             :         return MO_USE_NO_VAR;
    5555                 :    33775511 :       else if (target_for_debug_bind (var_debug_decl (expr)))
    5556                 :             :         return MO_CLOBBER;
    5557                 :    21783063 :       else if (track_loc_p (loc, expr, REG_OFFSET (loc),
    5558                 :             :                             false, modep, NULL))
    5559                 :             :         return MO_USE;
    5560                 :             :       else
    5561                 :             :         return MO_USE_NO_VAR;
    5562                 :             :     }
    5563                 :   165877982 :   else if (MEM_P (loc))
    5564                 :             :     {
    5565                 :    22568357 :       expr = MEM_EXPR (loc);
    5566                 :             : 
    5567                 :    22568357 :       if (!expr)
    5568                 :             :         return MO_CLOBBER;
    5569                 :    16976120 :       else if (target_for_debug_bind (var_debug_decl (expr)))
    5570                 :             :         return MO_CLOBBER;
    5571                 :    16144607 :       else if (track_loc_p (loc, expr, int_mem_offset (loc),
    5572                 :             :                             false, modep, NULL)
    5573                 :             :                /* Multi-part variables shouldn't refer to one-part
    5574                 :             :                   variable names such as VALUEs (never happens) or
    5575                 :             :                   DEBUG_EXPRs (only happens in the presence of debug
    5576                 :             :                   insns).  */
    5577                 :    16144607 :                && (!MAY_HAVE_DEBUG_BIND_INSNS
    5578                 :       34626 :                    || !rtx_debug_expr_p (XEXP (loc, 0))))
    5579                 :       34628 :         return MO_USE;
    5580                 :             :       else
    5581                 :    16109979 :         return MO_CLOBBER;
    5582                 :             :     }
    5583                 :             : 
    5584                 :             :   return MO_CLOBBER;
    5585                 :             : }
    5586                 :             : 
    5587                 :             : /* Log to OUT information about micro-operation MOPT involving X in
    5588                 :             :    INSN of BB.  */
    5589                 :             : 
    5590                 :             : static inline void
    5591                 :          18 : log_op_type (rtx x, basic_block bb, rtx_insn *insn,
    5592                 :             :              enum micro_operation_type mopt, FILE *out)
    5593                 :             : {
    5594                 :          18 :   fprintf (out, "bb %i op %i insn %i %s ",
    5595                 :          18 :            bb->index, VTI (bb)->mos.length (),
    5596                 :          18 :            INSN_UID (insn), micro_operation_type_name[mopt]);
    5597                 :          18 :   print_inline_rtx (out, x, 2);
    5598                 :          18 :   fputc ('\n', out);
    5599                 :          18 : }
    5600                 :             : 
    5601                 :             : /* Tell whether the CONCAT used to holds a VALUE and its location
    5602                 :             :    needs value resolution, i.e., an attempt of mapping the location
    5603                 :             :    back to other incoming values.  */
    5604                 :             : #define VAL_NEEDS_RESOLUTION(x) \
    5605                 :             :   (RTL_FLAG_CHECK1 ("VAL_NEEDS_RESOLUTION", (x), CONCAT)->volatil)
    5606                 :             : /* Whether the location in the CONCAT is a tracked expression, that
    5607                 :             :    should also be handled like a MO_USE.  */
    5608                 :             : #define VAL_HOLDS_TRACK_EXPR(x) \
    5609                 :             :   (RTL_FLAG_CHECK1 ("VAL_HOLDS_TRACK_EXPR", (x), CONCAT)->used)
    5610                 :             : /* Whether the location in the CONCAT should be handled like a MO_COPY
    5611                 :             :    as well.  */
    5612                 :             : #define VAL_EXPR_IS_COPIED(x) \
    5613                 :             :   (RTL_FLAG_CHECK1 ("VAL_EXPR_IS_COPIED", (x), CONCAT)->jump)
    5614                 :             : /* Whether the location in the CONCAT should be handled like a
    5615                 :             :    MO_CLOBBER as well.  */
    5616                 :             : #define VAL_EXPR_IS_CLOBBERED(x) \
    5617                 :             :   (RTL_FLAG_CHECK1 ("VAL_EXPR_IS_CLOBBERED", (x), CONCAT)->unchanging)
    5618                 :             : 
    5619                 :             : /* All preserved VALUEs.  */
    5620                 :             : static vec<rtx> preserved_values;
    5621                 :             : 
    5622                 :             : /* Ensure VAL is preserved and remember it in a vector for vt_emit_notes.  */
    5623                 :             : 
    5624                 :             : static void
    5625                 :    38300963 : preserve_value (cselib_val *val)
    5626                 :             : {
    5627                 :    38300963 :   cselib_preserve_value (val);
    5628                 :    38300963 :   preserved_values.safe_push (val->val_rtx);
    5629                 :    38300963 : }
    5630                 :             : 
    5631                 :             : /* Helper function for MO_VAL_LOC handling.  Return non-zero if
    5632                 :             :    any rtxes not suitable for CONST use not replaced by VALUEs
    5633                 :             :    are discovered.  */
    5634                 :             : 
    5635                 :             : static bool
    5636                 :       43953 : non_suitable_const (const_rtx x)
    5637                 :             : {
    5638                 :       43953 :   subrtx_iterator::array_type array;
    5639                 :      219765 :   FOR_EACH_SUBRTX (iter, array, x, ALL)
    5640                 :             :     {
    5641                 :      175812 :       const_rtx x = *iter;
    5642                 :      175812 :       switch (GET_CODE (x))
    5643                 :             :         {
    5644                 :             :         case REG:
    5645                 :             :         case DEBUG_EXPR:
    5646                 :             :         case PC:
    5647                 :             :         case SCRATCH:
    5648                 :             :         case ASM_INPUT:
    5649                 :             :         case ASM_OPERANDS:
    5650                 :           0 :           return true;
    5651                 :           0 :         case MEM:
    5652                 :           0 :           if (!MEM_READONLY_P (x))
    5653                 :             :             return true;
    5654                 :             :           break;
    5655                 :             :         default:
    5656                 :             :           break;
    5657                 :             :         }
    5658                 :             :     }
    5659                 :       43953 :   return false;
    5660                 :       43953 : }
    5661                 :             : 
    5662                 :             : /* Add uses (register and memory references) LOC which will be tracked
    5663                 :             :    to VTI (bb)->mos.  */
    5664                 :             : 
    5665                 :             : static void
    5666                 :   222866250 : add_uses (rtx loc, struct count_use_info *cui)
    5667                 :             : {
    5668                 :   222866250 :   machine_mode mode = VOIDmode;
    5669                 :   222866250 :   enum micro_operation_type type = use_type (loc, cui, &mode);
    5670                 :             : 
    5671                 :   222866250 :   if (type != MO_CLOBBER)
    5672                 :             :     {
    5673                 :    61515534 :       basic_block bb = cui->bb;
    5674                 :    61515534 :       micro_operation mo;
    5675                 :             : 
    5676                 :    61515534 :       mo.type = type;
    5677                 :    61515534 :       mo.u.loc = type == MO_USE ? var_lowpart (mode, loc) : loc;
    5678                 :    61515534 :       mo.insn = cui->insn;
    5679                 :             : 
    5680                 :    61515534 :       if (type == MO_VAL_LOC)
    5681                 :             :         {
    5682                 :    28750672 :           rtx oloc = loc;
    5683                 :    28750672 :           rtx vloc = PAT_VAR_LOCATION_LOC (oloc);
    5684                 :    28750672 :           cselib_val *val;
    5685                 :             : 
    5686                 :    28750672 :           gcc_assert (cui->sets);
    5687                 :             : 
    5688                 :    28750672 :           if (MEM_P (vloc)
    5689                 :     1120088 :               && !REG_P (XEXP (vloc, 0))
    5690                 :     1057466 :               && !MEM_P (XEXP (vloc, 0)))
    5691                 :             :             {
    5692                 :     1052042 :               rtx mloc = vloc;
    5693                 :     1052042 :               machine_mode address_mode = get_address_mode (mloc);
    5694                 :     1052042 :               cselib_val *val
    5695                 :     2104084 :                 = cselib_lookup (XEXP (mloc, 0), address_mode, 0,
    5696                 :     1052042 :                                  GET_MODE (mloc));
    5697                 :             : 
    5698                 :     1052042 :               if (val && !cselib_preserved_value_p (val))
    5699                 :      258486 :                 preserve_value (val);
    5700                 :             :             }
    5701                 :             : 
    5702                 :    28750672 :           if (CONSTANT_P (vloc)
    5703                 :    28750672 :               && (GET_CODE (vloc) != CONST || non_suitable_const (vloc)))
    5704                 :             :             /* For constants don't look up any value.  */;
    5705                 :    12521107 :           else if (!VAR_LOC_UNKNOWN_P (vloc) && !unsuitable_loc (vloc)
    5706                 :    40456015 :                    && (val = find_use_val (vloc, GET_MODE (oloc), cui)))
    5707                 :             :             {
    5708                 :    13967015 :               machine_mode mode2;
    5709                 :    13967015 :               enum micro_operation_type type2;
    5710                 :    13967015 :               rtx nloc = NULL;
    5711                 :    13967015 :               bool resolvable = REG_P (vloc) || MEM_P (vloc);
    5712                 :             : 
    5713                 :    13967015 :               if (resolvable)
    5714                 :     4963187 :                 nloc = replace_expr_with_values (vloc);
    5715                 :             : 
    5716                 :     4963187 :               if (nloc)
    5717                 :             :                 {
    5718                 :     1119654 :                   oloc = shallow_copy_rtx (oloc);
    5719                 :     1119654 :                   PAT_VAR_LOCATION_LOC (oloc) = nloc;
    5720                 :             :                 }
    5721                 :             : 
    5722                 :    13967015 :               oloc = gen_rtx_CONCAT (mode, val->val_rtx, oloc);
    5723                 :             : 
    5724                 :    13967015 :               type2 = use_type (vloc, 0, &mode2);
    5725                 :             : 
    5726                 :    13967015 :               gcc_assert (type2 == MO_USE || type2 == MO_USE_NO_VAR
    5727                 :             :                           || type2 == MO_CLOBBER);
    5728                 :             : 
    5729                 :    13967015 :               if (type2 == MO_CLOBBER
    5730                 :    13967015 :                   && !cselib_preserved_value_p (val))
    5731                 :             :                 {
    5732                 :     4210090 :                   VAL_NEEDS_RESOLUTION (oloc) = resolvable;
    5733                 :     4210090 :                   preserve_value (val);
    5734                 :             :                 }
    5735                 :             :             }
    5736                 :    12521546 :           else if (!VAR_LOC_UNKNOWN_P (vloc))
    5737                 :             :             {
    5738                 :         439 :               oloc = shallow_copy_rtx (oloc);
    5739                 :         439 :               PAT_VAR_LOCATION_LOC (oloc) = gen_rtx_UNKNOWN_VAR_LOC ();
    5740                 :             :             }
    5741                 :             : 
    5742                 :    28750672 :           mo.u.loc = oloc;
    5743                 :             :         }
    5744                 :    32764862 :       else if (type == MO_VAL_USE)
    5745                 :             :         {
    5746                 :    14290099 :           machine_mode mode2 = VOIDmode;
    5747                 :    14290099 :           enum micro_operation_type type2;
    5748                 :    14290099 :           cselib_val *val = find_use_val (loc, GET_MODE (loc), cui);
    5749                 :    14290099 :           rtx vloc, oloc = loc, nloc;
    5750                 :             : 
    5751                 :    14290099 :           gcc_assert (cui->sets);
    5752                 :             : 
    5753                 :    14290099 :           if (MEM_P (oloc)
    5754                 :     7246484 :               && !REG_P (XEXP (oloc, 0))
    5755                 :     6266310 :               && !MEM_P (XEXP (oloc, 0)))
    5756                 :             :             {
    5757                 :     6264773 :               rtx mloc = oloc;
    5758                 :     6264773 :               machine_mode address_mode = get_address_mode (mloc);
    5759                 :     6264773 :               cselib_val *val
    5760                 :    12529546 :                 = cselib_lookup (XEXP (mloc, 0), address_mode, 0,
    5761                 :     6264773 :                                  GET_MODE (mloc));
    5762                 :             : 
    5763                 :     6264773 :               if (val && !cselib_preserved_value_p (val))
    5764                 :     2393691 :                 preserve_value (val);
    5765                 :             :             }
    5766                 :             : 
    5767                 :    14290099 :           type2 = use_type (loc, 0, &mode2);
    5768                 :             : 
    5769                 :    14290099 :           gcc_assert (type2 == MO_USE || type2 == MO_USE_NO_VAR
    5770                 :             :                       || type2 == MO_CLOBBER);
    5771                 :             : 
    5772                 :    14290099 :           if (type2 == MO_USE)
    5773                 :      226042 :             vloc = var_lowpart (mode2, loc);
    5774                 :             :           else
    5775                 :             :             vloc = oloc;
    5776                 :             : 
    5777                 :             :           /* The loc of a MO_VAL_USE may have two forms:
    5778                 :             : 
    5779                 :             :              (concat val src): val is at src, a value-based
    5780                 :             :              representation.
    5781                 :             : 
    5782                 :             :              (concat (concat val use) src): same as above, with use as
    5783                 :             :              the MO_USE tracked value, if it differs from src.
    5784                 :             : 
    5785                 :             :           */
    5786                 :             : 
    5787                 :    14290099 :           gcc_checking_assert (REG_P (loc) || MEM_P (loc));
    5788                 :    14290099 :           nloc = replace_expr_with_values (loc);
    5789                 :    14290099 :           if (!nloc)
    5790                 :     7043615 :             nloc = oloc;
    5791                 :             : 
    5792                 :    14290099 :           if (vloc != nloc)
    5793                 :     7246613 :             oloc = gen_rtx_CONCAT (mode2, val->val_rtx, vloc);
    5794                 :             :           else
    5795                 :     7043486 :             oloc = val->val_rtx;
    5796                 :             : 
    5797                 :    14290099 :           mo.u.loc = gen_rtx_CONCAT (mode, oloc, nloc);
    5798                 :             : 
    5799                 :    14290099 :           if (type2 == MO_USE)
    5800                 :      226042 :             VAL_HOLDS_TRACK_EXPR (mo.u.loc) = 1;
    5801                 :    14290099 :           if (!cselib_preserved_value_p (val))
    5802                 :             :             {
    5803                 :    14290099 :               VAL_NEEDS_RESOLUTION (mo.u.loc) = 1;
    5804                 :    14290099 :               preserve_value (val);
    5805                 :             :             }
    5806                 :             :         }
    5807                 :             :       else
    5808                 :    18474763 :         gcc_assert (type == MO_USE || type == MO_USE_NO_VAR);
    5809                 :             : 
    5810                 :    61515534 :       if (dump_file && (dump_flags & TDF_DETAILS))
    5811                 :           5 :         log_op_type (mo.u.loc, cui->bb, cui->insn, mo.type, dump_file);
    5812                 :    61515534 :       VTI (bb)->mos.safe_push (mo);
    5813                 :             :     }
    5814                 :   222866250 : }
    5815                 :             : 
    5816                 :             : /* Helper function for finding all uses of REG/MEM in X in insn INSN.  */
    5817                 :             : 
    5818                 :             : static void
    5819                 :    80479440 : add_uses_1 (rtx *x, void *cui)
    5820                 :             : {
    5821                 :    80479440 :   subrtx_var_iterator::array_type array;
    5822                 :   303345690 :   FOR_EACH_SUBRTX_VAR (iter, array, *x, NONCONST)
    5823                 :   222866250 :     add_uses (*iter, (struct count_use_info *) cui);
    5824                 :    80479440 : }
    5825                 :             : 
    5826                 :             : /* This is the value used during expansion of locations.  We want it
    5827                 :             :    to be unbounded, so that variables expanded deep in a recursion
    5828                 :             :    nest are fully evaluated, so that their values are cached
    5829                 :             :    correctly.  We avoid recursion cycles through other means, and we
    5830                 :             :    don't unshare RTL, so excess complexity is not a problem.  */
    5831                 :             : #define EXPR_DEPTH (INT_MAX)
    5832                 :             : /* We use this to keep too-complex expressions from being emitted as
    5833                 :             :    location notes, and then to debug information.  Users can trade
    5834                 :             :    compile time for ridiculously complex expressions, although they're
    5835                 :             :    seldom useful, and they may often have to be discarded as not
    5836                 :             :    representable anyway.  */
    5837                 :             : #define EXPR_USE_DEPTH (param_max_vartrack_expr_depth)
    5838                 :             : 
    5839                 :             : /* Attempt to reverse the EXPR operation in the debug info and record
    5840                 :             :    it in the cselib table.  Say for reg1 = reg2 + 6 even when reg2 is
    5841                 :             :    no longer live we can express its value as VAL - 6.  */
    5842                 :             : 
    5843                 :             : static void
    5844                 :    29081182 : reverse_op (rtx val, const_rtx expr, rtx_insn *insn)
    5845                 :             : {
    5846                 :    29081182 :   rtx src, arg, ret;
    5847                 :    29081182 :   cselib_val *v;
    5848                 :    29081182 :   struct elt_loc_list *l;
    5849                 :    29081182 :   enum rtx_code code;
    5850                 :    29081182 :   int count;
    5851                 :             : 
    5852                 :    29081182 :   if (GET_CODE (expr) != SET)
    5853                 :             :     return;
    5854                 :             : 
    5855                 :    29081182 :   if (!REG_P (SET_DEST (expr)) || GET_MODE (val) != GET_MODE (SET_DEST (expr)))
    5856                 :             :     return;
    5857                 :             : 
    5858                 :    21135980 :   src = SET_SRC (expr);
    5859                 :    21135980 :   switch (GET_CODE (src))
    5860                 :             :     {
    5861                 :     3878162 :     case PLUS:
    5862                 :     3878162 :     case MINUS:
    5863                 :     3878162 :     case XOR:
    5864                 :     3878162 :     case NOT:
    5865                 :     3878162 :     case NEG:
    5866                 :     3878162 :       if (!REG_P (XEXP (src, 0)))
    5867                 :             :         return;
    5868                 :             :       break;
    5869                 :      237675 :     case SIGN_EXTEND:
    5870                 :      237675 :     case ZERO_EXTEND:
    5871                 :      237675 :       if (!REG_P (XEXP (src, 0)) && !MEM_P (XEXP (src, 0)))
    5872                 :             :         return;
    5873                 :             :       break;
    5874                 :             :     default:
    5875                 :             :       return;
    5876                 :             :     }
    5877                 :             : 
    5878                 :     3893698 :   if (!SCALAR_INT_MODE_P (GET_MODE (src)) || XEXP (src, 0) == cfa_base_rtx)
    5879                 :             :     return;
    5880                 :             : 
    5881                 :     2671942 :   v = cselib_lookup (XEXP (src, 0), GET_MODE (XEXP (src, 0)), 0, VOIDmode);
    5882                 :     2671942 :   if (!v || !cselib_preserved_value_p (v))
    5883                 :           0 :     return;
    5884                 :             : 
    5885                 :             :   /* Use canonical V to avoid creating multiple redundant expressions
    5886                 :             :      for different VALUES equivalent to V.  */
    5887                 :     2671942 :   v = canonical_cselib_val (v);
    5888                 :             : 
    5889                 :             :   /* Adding a reverse op isn't useful if V already has an always valid
    5890                 :             :      location.  Ignore ENTRY_VALUE, while it is always constant, we should
    5891                 :             :      prefer non-ENTRY_VALUE locations whenever possible.  */
    5892                 :     7613804 :   for (l = v->locs, count = 0; l; l = l->next, count++)
    5893                 :     4974607 :     if (CONSTANT_P (l->loc)
    5894                 :     4974607 :         && (GET_CODE (l->loc) != CONST || !references_value_p (l->loc, 0)))
    5895                 :       31897 :       return;
    5896                 :             :     /* Avoid creating too large locs lists.  */
    5897                 :     4942710 :     else if (count == param_max_vartrack_reverse_op_size)
    5898                 :             :       return;
    5899                 :             : 
    5900                 :     2639197 :   switch (GET_CODE (src))
    5901                 :             :     {
    5902                 :       35537 :     case NOT:
    5903                 :       35537 :     case NEG:
    5904                 :       35537 :       if (GET_MODE (v->val_rtx) != GET_MODE (val))
    5905                 :             :         return;
    5906                 :       35537 :       ret = gen_rtx_fmt_e (GET_CODE (src), GET_MODE (val), val);
    5907                 :       35537 :       break;
    5908                 :      213802 :     case SIGN_EXTEND:
    5909                 :      213802 :     case ZERO_EXTEND:
    5910                 :      213802 :       ret = gen_lowpart_SUBREG (GET_MODE (v->val_rtx), val);
    5911                 :      213802 :       break;
    5912                 :       41627 :     case XOR:
    5913                 :       41627 :       code = XOR;
    5914                 :       41627 :       goto binary;
    5915                 :     2124323 :     case PLUS:
    5916                 :     2124323 :       code = MINUS;
    5917                 :     2124323 :       goto binary;
    5918                 :      223908 :     case MINUS:
    5919                 :      223908 :       code = PLUS;
    5920                 :      223908 :       goto binary;
    5921                 :     2389858 :     binary:
    5922                 :     2389858 :       if (GET_MODE (v->val_rtx) != GET_MODE (val))
    5923                 :             :         return;
    5924                 :     2389858 :       arg = XEXP (src, 1);
    5925                 :     2389858 :       if (!CONST_INT_P (arg) && GET_CODE (arg) != SYMBOL_REF)
    5926                 :             :         {
    5927                 :      657439 :           arg = cselib_expand_value_rtx (arg, scratch_regs, 5);
    5928                 :      657439 :           if (arg == NULL_RTX)
    5929                 :             :             return;
    5930                 :      657439 :           if (!CONST_INT_P (arg) && GET_CODE (arg) != SYMBOL_REF)
    5931                 :             :             return;
    5932                 :             :         }
    5933                 :     1736461 :       ret = simplify_gen_binary (code, GET_MODE (val), val, arg);
    5934                 :     1736461 :       break;
    5935                 :           0 :     default:
    5936                 :           0 :       gcc_unreachable ();
    5937                 :             :     }
    5938                 :             : 
    5939                 :     1985800 :   cselib_add_permanent_equiv (v, ret, insn);
    5940                 :             : }
    5941                 :             : 
    5942                 :             : /* Add stores (register and memory references) LOC which will be tracked
    5943                 :             :    to VTI (bb)->mos.  EXPR is the RTL expression containing the store.
    5944                 :             :    CUIP->insn is instruction which the LOC is part of.  */
    5945                 :             : 
    5946                 :             : static void
    5947                 :    44322291 : add_stores (rtx loc, const_rtx expr, void *cuip)
    5948                 :             : {
    5949                 :    44322291 :   machine_mode mode = VOIDmode, mode2;
    5950                 :    44322291 :   struct count_use_info *cui = (struct count_use_info *)cuip;
    5951                 :    44322291 :   basic_block bb = cui->bb;
    5952                 :    44322291 :   micro_operation mo;
    5953                 :    44322291 :   rtx oloc = loc, nloc, src = NULL;
    5954                 :    44322291 :   enum micro_operation_type type = use_type (loc, cui, &mode);
    5955                 :    44322291 :   bool track_p = false;
    5956                 :    44322291 :   cselib_val *v;
    5957                 :    44322291 :   bool resolve, preserve;
    5958                 :             : 
    5959                 :    44322291 :   if (type == MO_CLOBBER)
    5960                 :     9495594 :     return;
    5961                 :             : 
    5962                 :    39201039 :   mode2 = mode;
    5963                 :             : 
    5964                 :    39201039 :   if (REG_P (loc))
    5965                 :             :     {
    5966                 :    31274215 :       gcc_assert (loc != cfa_base_rtx);
    5967                 :     4407892 :       if ((GET_CODE (expr) == CLOBBER && type != MO_VAL_SET)
    5968                 :    31274149 :           || !(track_p = use_type (loc, NULL, &mode2) == MO_USE)
    5969                 :    31465253 :           || GET_CODE (expr) == CLOBBER)
    5970                 :             :         {
    5971                 :    31083601 :           mo.type = MO_CLOBBER;
    5972                 :    31083601 :           mo.u.loc = loc;
    5973                 :    31083601 :           if (GET_CODE (expr) == SET
    5974                 :    26675709 :               && (SET_DEST (expr) == loc
    5975                 :       29801 :                   || (GET_CODE (SET_DEST (expr)) == STRICT_LOW_PART
    5976                 :       17785 :                       && XEXP (SET_DEST (expr), 0) == loc))
    5977                 :    26663693 :               && !unsuitable_loc (SET_SRC (expr))
    5978                 :    57738810 :               && find_use_val (loc, mode, cui))
    5979                 :             :             {
    5980                 :    25412021 :               gcc_checking_assert (type == MO_VAL_SET);
    5981                 :    25412021 :               mo.u.loc = gen_rtx_SET (loc, SET_SRC (expr));
    5982                 :             :             }
    5983                 :             :         }
    5984                 :             :       else
    5985                 :             :         {
    5986                 :      190614 :           if (GET_CODE (expr) == SET
    5987                 :      190614 :               && SET_DEST (expr) == loc
    5988                 :      189963 :               && GET_CODE (SET_SRC (expr)) != ASM_OPERANDS)
    5989                 :      189961 :             src = var_lowpart (mode2, SET_SRC (expr));
    5990                 :      190614 :           loc = var_lowpart (mode2, loc);
    5991                 :             : 
    5992                 :      190614 :           if (src == NULL)
    5993                 :             :             {
    5994                 :        8175 :               mo.type = MO_SET;
    5995                 :        8175 :               mo.u.loc = loc;
    5996                 :             :             }
    5997                 :             :           else
    5998                 :             :             {
    5999                 :      182439 :               rtx xexpr = gen_rtx_SET (loc, src);
    6000                 :      182439 :               if (same_variable_part_p (src, REG_EXPR (loc), REG_OFFSET (loc)))
    6001                 :             :                 {
    6002                 :             :                   /* If this is an instruction copying (part of) a parameter
    6003                 :             :                      passed by invisible reference to its register location,
    6004                 :             :                      pretend it's a SET so that the initial memory location
    6005                 :             :                      is discarded, as the parameter register can be reused
    6006                 :             :                      for other purposes and we do not track locations based
    6007                 :             :                      on generic registers.  */
    6008                 :       66181 :                   if (MEM_P (src)
    6009                 :       10239 :                       && REG_EXPR (loc)
    6010                 :       10239 :                       && TREE_CODE (REG_EXPR (loc)) == PARM_DECL
    6011                 :       10237 :                       && DECL_MODE (REG_EXPR (loc)) != BLKmode
    6012                 :       10237 :                       && MEM_P (DECL_INCOMING_RTL (REG_EXPR (loc)))
    6013                 :       66181 :                       && XEXP (DECL_INCOMING_RTL (REG_EXPR (loc)), 0)
    6014                 :        9917 :                          != arg_pointer_rtx)
    6015                 :        6517 :                     mo.type = MO_SET;
    6016                 :             :                   else
    6017                 :       59664 :                     mo.type = MO_COPY;
    6018                 :             :                 }
    6019                 :             :               else
    6020                 :      116258 :                 mo.type = MO_SET;
    6021                 :      182439 :               mo.u.loc = xexpr;
    6022                 :             :             }
    6023                 :             :         }
    6024                 :    31274215 :       mo.insn = cui->insn;
    6025                 :             :     }
    6026                 :     7926824 :   else if (MEM_P (loc)
    6027                 :     7926824 :            && ((track_p = use_type (loc, NULL, &mode2) == MO_USE)
    6028                 :     7922833 :                || cui->sets))
    6029                 :             :     {
    6030                 :     7926824 :       if (MEM_P (loc) && type == MO_VAL_SET
    6031                 :     7926824 :           && !REG_P (XEXP (loc, 0))
    6032                 :     7381023 :           && !MEM_P (XEXP (loc, 0)))
    6033                 :             :         {
    6034                 :     7381023 :           rtx mloc = loc;
    6035                 :     7381023 :           machine_mode address_mode = get_address_mode (mloc);
    6036                 :    14762046 :           cselib_val *val = cselib_lookup (XEXP (mloc, 0),
    6037                 :             :                                            address_mode, 0,
    6038                 :     7381023 :                                            GET_MODE (mloc));
    6039                 :             : 
    6040                 :     7381023 :           if (val && !cselib_preserved_value_p (val))
    6041                 :     2825803 :             preserve_value (val);
    6042                 :             :         }
    6043                 :             : 
    6044                 :     7926824 :       if (GET_CODE (expr) == CLOBBER || !track_p)
    6045                 :             :         {
    6046                 :     7922833 :           mo.type = MO_CLOBBER;
    6047                 :    15845666 :           mo.u.loc = track_p ? var_lowpart (mode2, loc) : loc;
    6048                 :             :         }
    6049                 :             :       else
    6050                 :             :         {
    6051                 :        3991 :           if (GET_CODE (expr) == SET
    6052                 :        3991 :               && SET_DEST (expr) == loc
    6053                 :        3991 :               && GET_CODE (SET_SRC (expr)) != ASM_OPERANDS)
    6054                 :        3991 :             src = var_lowpart (mode2, SET_SRC (expr));
    6055                 :        3991 :           loc = var_lowpart (mode2, loc);
    6056                 :             : 
    6057                 :        3991 :           if (src == NULL)
    6058                 :             :             {
    6059                 :           8 :               mo.type = MO_SET;
    6060                 :           8 :               mo.u.loc = loc;
    6061                 :             :             }
    6062                 :             :           else
    6063                 :             :             {
    6064                 :        3983 :               rtx xexpr = gen_rtx_SET (loc, src);
    6065                 :        3983 :               if (same_variable_part_p (SET_SRC (xexpr),
    6066                 :        3983 :                                         MEM_EXPR (loc),
    6067                 :        3983 :                                         int_mem_offset (loc)))
    6068                 :        2043 :                 mo.type = MO_COPY;
    6069                 :             :               else
    6070                 :        1940 :                 mo.type = MO_SET;
    6071                 :        3983 :               mo.u.loc = xexpr;
    6072                 :             :             }
    6073                 :             :         }
    6074                 :     7926824 :       mo.insn = cui->insn;
    6075                 :             :     }
    6076                 :             :   else
    6077                 :           0 :     return;
    6078                 :             : 
    6079                 :    39201039 :   if (type != MO_VAL_SET)
    6080                 :         331 :     goto log_and_return;
    6081                 :             : 
    6082                 :    39200708 :   v = find_use_val (oloc, mode, cui);
    6083                 :             : 
    6084                 :    39200708 :   if (!v)
    6085                 :     5667620 :     goto log_and_return;
    6086                 :             : 
    6087                 :    33533088 :   resolve = preserve = !cselib_preserved_value_p (v);
    6088                 :             : 
    6089                 :             :   /* We cannot track values for multiple-part variables, so we track only
    6090                 :             :      locations for tracked record parameters.  */
    6091                 :    33533088 :   if (track_p
    6092                 :      194532 :       && REG_P (loc)
    6093                 :      190541 :       && REG_EXPR (loc)
    6094                 :    33723629 :       && tracked_record_parameter_p (REG_EXPR (loc)))
    6095                 :             :     {
    6096                 :             :       /* Although we don't use the value here, it could be used later by the
    6097                 :             :          mere virtue of its existence as the operand of the reverse operation
    6098                 :             :          that gave rise to it (typically extension/truncation).  Make sure it
    6099                 :             :          is preserved as required by vt_expand_var_loc_chain.  */
    6100                 :       77564 :       if (preserve)
    6101                 :        1352 :         preserve_value (v);
    6102                 :       77564 :       goto log_and_return;
    6103                 :             :     }
    6104                 :             : 
    6105                 :    33455524 :   if (loc == stack_pointer_rtx
    6106                 :     5240531 :       && (maybe_ne (hard_frame_pointer_adjustment, -1)
    6107                 :     4432919 :           || (!frame_pointer_needed && !ACCUMULATE_OUTGOING_ARGS))
    6108                 :    38637491 :       && preserve)
    6109                 :     1918829 :     cselib_set_value_sp_based (v);
    6110                 :             : 
    6111                 :             :   /* Don't record MO_VAL_SET for VALUEs that can be described using
    6112                 :             :      cfa_base_rtx or cfa_base_rtx + CONST_INT, cselib already knows
    6113                 :             :      all the needed equivalences and they shouldn't change depending
    6114                 :             :      on which register holds that VALUE in some instruction.  */
    6115                 :    33455524 :   if (!frame_pointer_needed
    6116                 :    28848555 :       && cfa_base_rtx
    6117                 :    28845973 :       && cselib_sp_derived_value_p (v)
    6118                 :    39040575 :       && loc == stack_pointer_rtx)
    6119                 :             :     {
    6120                 :     4374342 :       if (preserve)
    6121                 :     1398075 :         preserve_value (v);
    6122                 :     4374342 :       return;
    6123                 :             :     }
    6124                 :             : 
    6125                 :    29081182 :   nloc = replace_expr_with_values (oloc);
    6126                 :    29081182 :   if (nloc)
    6127                 :     7926824 :     oloc = nloc;
    6128                 :             : 
    6129                 :    29081182 :   if (GET_CODE (PATTERN (cui->insn)) == COND_EXEC)
    6130                 :             :     {
    6131                 :           0 :       cselib_val *oval = cselib_lookup (oloc, GET_MODE (oloc), 0, VOIDmode);
    6132                 :             : 
    6133                 :           0 :       if (oval == v)
    6134                 :             :         return;
    6135                 :           0 :       gcc_assert (REG_P (oloc) || MEM_P (oloc));
    6136                 :             : 
    6137                 :           0 :       if (oval && !cselib_preserved_value_p (oval))
    6138                 :             :         {
    6139                 :           0 :           micro_operation moa;
    6140                 :             : 
    6141                 :           0 :           preserve_value (oval);
    6142                 :             : 
    6143                 :           0 :           moa.type = MO_VAL_USE;
    6144                 :           0 :           moa.u.loc = gen_rtx_CONCAT (mode, oval->val_rtx, oloc);
    6145                 :           0 :           VAL_NEEDS_RESOLUTION (moa.u.loc) = 1;
    6146                 :           0 :           moa.insn = cui->insn;
    6147                 :             : 
    6148                 :           0 :           if (dump_file && (dump_flags & TDF_DETAILS))
    6149                 :           0 :             log_op_type (moa.u.loc, cui->bb, cui->insn,
    6150                 :             :                          moa.type, dump_file);
    6151                 :           0 :           VTI (bb)->mos.safe_push (moa);
    6152                 :             :         }
    6153                 :             : 
    6154                 :             :       resolve = false;
    6155                 :             :     }
    6156                 :    29081182 :   else if (resolve && GET_CODE (mo.u.loc) == SET)
    6157                 :             :     {
    6158                 :     9316729 :       if (REG_P (SET_SRC (expr)) || MEM_P (SET_SRC (expr)))
    6159                 :           0 :         nloc = replace_expr_with_values (SET_SRC (expr));
    6160                 :             :       else
    6161                 :             :         nloc = NULL_RTX;
    6162                 :             : 
    6163                 :             :       /* Avoid the mode mismatch between oexpr and expr.  */
    6164                 :     9316729 :       if (!nloc && mode != mode2)
    6165                 :             :         {
    6166                 :           0 :           nloc = SET_SRC (expr);
    6167                 :           0 :           gcc_assert (oloc == SET_DEST (expr));
    6168                 :             :         }
    6169                 :             : 
    6170                 :     9316729 :       if (nloc && nloc != SET_SRC (mo.u.loc))
    6171                 :           0 :         oloc = gen_rtx_SET (oloc, nloc);
    6172                 :             :       else
    6173                 :             :         {
    6174                 :     9316729 :           if (oloc == SET_DEST (mo.u.loc))
    6175                 :             :             /* No point in duplicating.  */
    6176                 :     9316728 :             oloc = mo.u.loc;
    6177                 :     9316729 :           if (!REG_P (SET_SRC (mo.u.loc)))
    6178                 :     9316729 :             resolve = false;
    6179                 :             :         }
    6180                 :             :     }
    6181                 :             :   else if (!resolve)
    6182                 :             :     {
    6183                 :    18899897 :       if (GET_CODE (mo.u.loc) == SET
    6184                 :    11829969 :           && oloc == SET_DEST (mo.u.loc))
    6185                 :             :         /* No point in duplicating.  */
    6186                 :    11825986 :         oloc = mo.u.loc;
    6187                 :             :     }
    6188                 :             :   else
    6189                 :             :     resolve = false;
    6190                 :             : 
    6191                 :    29081182 :   loc = gen_rtx_CONCAT (mode, v->val_rtx, oloc);
    6192                 :             : 
    6193                 :    29081182 :   if (mo.u.loc != oloc)
    6194                 :     7926985 :     loc = gen_rtx_CONCAT (GET_MODE (mo.u.loc), loc, mo.u.loc);
    6195                 :             : 
    6196                 :             :   /* The loc of a MO_VAL_SET may have various forms:
    6197                 :             : 
    6198                 :             :      (concat val dst): dst now holds val
    6199                 :             : 
    6200                 :             :      (concat val (set dst src)): dst now holds val, copied from src
    6201                 :             : 
    6202                 :             :      (concat (concat val dstv) dst): dst now holds val; dstv is dst
    6203                 :             :      after replacing mems and non-top-level regs with values.
    6204                 :             : 
    6205                 :             :      (concat (concat val dstv) (set dst src)): dst now holds val,
    6206                 :             :      copied from src.  dstv is a value-based representation of dst, if
    6207                 :             :      it differs from dst.  If resolution is needed, src is a REG, and
    6208                 :             :      its mode is the same as that of val.
    6209                 :             : 
    6210                 :             :      (concat (concat val (set dstv srcv)) (set dst src)): src
    6211                 :             :      copied to dst, holding val.  dstv and srcv are value-based
    6212                 :             :      representations of dst and src, respectively.
    6213                 :             : 
    6214                 :             :   */
    6215                 :             : 
    6216                 :    29081182 :   if (GET_CODE (PATTERN (cui->insn)) != COND_EXEC)
    6217                 :    29081182 :     reverse_op (v->val_rtx, expr, cui->insn);
    6218                 :             : 
    6219                 :    29081182 :   mo.u.loc = loc;
    6220                 :             : 
    6221                 :    29081182 :   if (track_p)
    6222                 :      116968 :     VAL_HOLDS_TRACK_EXPR (loc) = 1;
    6223                 :    29081182 :   if (preserve)
    6224                 :             :     {
    6225                 :    10181285 :       VAL_NEEDS_RESOLUTION (loc) = resolve;
    6226                 :    10181285 :       preserve_value (v);
    6227                 :             :     }
    6228                 :    29081182 :   if (mo.type == MO_CLOBBER)
    6229                 :    28964214 :     VAL_EXPR_IS_CLOBBERED (loc) = 1;
    6230                 :    29081182 :   if (mo.type == MO_COPY)
    6231                 :       22159 :     VAL_EXPR_IS_COPIED (loc) = 1;
    6232                 :             : 
    6233                 :    29081182 :   mo.type = MO_VAL_SET;
    6234                 :             : 
    6235                 :    34826697 :  log_and_return:
    6236                 :    34826697 :   if (dump_file && (dump_flags & TDF_DETAILS))
    6237                 :           9 :     log_op_type (mo.u.loc, cui->bb, cui->insn, mo.type, dump_file);
    6238                 :    34826697 :   VTI (bb)->mos.safe_push (mo);
    6239                 :             : }
    6240                 :             : 
    6241                 :             : /* Arguments to the call.  */
    6242                 :             : static rtx call_arguments;
    6243                 :             : 
    6244                 :             : /* Compute call_arguments.  */
    6245                 :             : 
    6246                 :             : static void
    6247                 :     3042993 : prepare_call_arguments (basic_block bb, rtx_insn *insn)
    6248                 :             : {
    6249                 :     3042993 :   rtx link, x, call;
    6250                 :     3042993 :   rtx prev, cur, next;
    6251                 :     3042993 :   rtx this_arg = NULL_RTX;
    6252                 :     3042993 :   tree type = NULL_TREE, t, fndecl = NULL_TREE;
    6253                 :     3042993 :   tree obj_type_ref = NULL_TREE;
    6254                 :     3042993 :   CUMULATIVE_ARGS args_so_far_v;
    6255                 :     3042993 :   cumulative_args_t args_so_far;
    6256                 :             : 
    6257                 :     3042993 :   memset (&args_so_far_v, 0, sizeof (args_so_far_v));
    6258                 :     3042993 :   args_so_far = pack_cumulative_args (&args_so_far_v);
    6259                 :     3042993 :   call = get_call_rtx_from (insn);
    6260                 :     3042993 :   if (call)
    6261                 :             :     {
    6262                 :     3042993 :       if (GET_CODE (XEXP (XEXP (call, 0), 0)) == SYMBOL_REF)
    6263                 :             :         {
    6264                 :     2917564 :           rtx symbol = XEXP (XEXP (call, 0), 0);
    6265                 :     2917564 :           if (SYMBOL_REF_DECL (symbol))
    6266                 :             :             fndecl = SYMBOL_REF_DECL (symbol);
    6267                 :             :         }
    6268                 :     2682492 :       if (fndecl == NULL_TREE)
    6269                 :      360501 :         fndecl = MEM_EXPR (XEXP (call, 0));
    6270                 :      360501 :       if (fndecl
    6271                 :     2802722 :           && TREE_CODE (TREE_TYPE (fndecl)) != FUNCTION_TYPE
    6272                 :      888832 :           && TREE_CODE (TREE_TYPE (fndecl)) != METHOD_TYPE)
    6273                 :             :         fndecl = NULL_TREE;
    6274                 :     3042990 :       if (fndecl && TYPE_ARG_TYPES (TREE_TYPE (fndecl)))
    6275                 :     2749181 :         type = TREE_TYPE (fndecl);
    6276                 :     3042993 :       if (fndecl && TREE_CODE (fndecl) != FUNCTION_DECL)
    6277                 :             :         {
    6278                 :      120230 :           if (INDIRECT_REF_P (fndecl)
    6279                 :      120230 :               && TREE_CODE (TREE_OPERAND (fndecl, 0)) == OBJ_TYPE_REF)
    6280                 :           0 :             obj_type_ref = TREE_OPERAND (fndecl, 0);
    6281                 :             :           fndecl = NULL_TREE;
    6282                 :             :         }
    6283                 :     3042993 :       if (type)
    6284                 :             :         {
    6285                 :     7789715 :           for (t = TYPE_ARG_TYPES (type); t && t != void_list_node;
    6286                 :     5040534 :                t = TREE_CHAIN (t))
    6287                 :     5067404 :             if (TREE_CODE (TREE_VALUE (t)) == REFERENCE_TYPE
    6288                 :     5067404 :                 && INTEGRAL_TYPE_P (TREE_TYPE (TREE_VALUE (t))))
    6289                 :             :               break;
    6290                 :     2749181 :           if ((t == NULL || t == void_list_node) && obj_type_ref == NULL_TREE)
    6291                 :             :             type = NULL;
    6292                 :             :           else
    6293                 :             :             {
    6294                 :       26870 :               int nargs ATTRIBUTE_UNUSED = list_length (TYPE_ARG_TYPES (type));
    6295                 :       26870 :               link = CALL_INSN_FUNCTION_USAGE (insn);
    6296                 :             : #ifndef PCC_STATIC_STRUCT_RETURN
    6297                 :       26870 :               if (aggregate_value_p (TREE_TYPE (type), type)
    6298                 :       26870 :                   && targetm.calls.struct_value_rtx (type, 0) == 0)
    6299                 :             :                 {
    6300                 :         448 :                   tree struct_addr = build_pointer_type (TREE_TYPE (type));
    6301                 :         448 :                   function_arg_info arg (struct_addr, /*named=*/true);
    6302                 :         448 :                   rtx reg;
    6303                 :         448 :                   INIT_CUMULATIVE_ARGS (args_so_far_v, type, NULL_RTX, fndecl,
    6304                 :             :                                         nargs + 1);
    6305                 :         448 :                   reg = targetm.calls.function_arg (args_so_far, arg);
    6306                 :         448 :                   targetm.calls.function_arg_advance (args_so_far, arg);
    6307                 :         448 :                   if (reg == NULL_RTX)
    6308                 :             :                     {
    6309                 :         512 :                       for (; link; link = XEXP (link, 1))
    6310                 :         196 :                         if (GET_CODE (XEXP (link, 0)) == USE
    6311                 :         196 :                             && MEM_P (XEXP (XEXP (link, 0), 0)))
    6312                 :             :                           {
    6313                 :           0 :                             link = XEXP (link, 1);
    6314                 :           0 :                             break;
    6315                 :             :                           }
    6316                 :             :                     }
    6317                 :             :                 }
    6318                 :             :               else
    6319                 :             : #endif
    6320                 :       26422 :                 INIT_CUMULATIVE_ARGS (args_so_far_v, type, NULL_RTX, fndecl,
    6321                 :             :                                       nargs);
    6322                 :       26870 :               if (obj_type_ref && TYPE_ARG_TYPES (type) != void_list_node)
    6323                 :             :                 {
    6324                 :           0 :                   t = TYPE_ARG_TYPES (type);
    6325                 :           0 :                   function_arg_info arg (TREE_VALUE (t), /*named=*/true);
    6326                 :           0 :                   this_arg = targetm.calls.function_arg (args_so_far, arg);
    6327                 :           0 :                   if (this_arg && !REG_P (this_arg))
    6328                 :             :                     this_arg = NULL_RTX;
    6329                 :             :                   else if (this_arg == NULL_RTX)
    6330                 :             :                     {
    6331                 :           0 :                       for (; link; link = XEXP (link, 1))
    6332                 :           0 :                         if (GET_CODE (XEXP (link, 0)) == USE
    6333                 :           0 :                             && MEM_P (XEXP (XEXP (link, 0), 0)))
    6334                 :             :                           {
    6335                 :             :                             this_arg = XEXP (XEXP (link, 0), 0);
    6336                 :             :                             break;
    6337                 :             :                           }
    6338                 :             :                     }
    6339                 :             :                 }
    6340                 :             :             }
    6341                 :             :         }
    6342                 :             :     }
    6343                 :     3042993 :   t = type ? TYPE_ARG_TYPES (type) : NULL_TREE;
    6344                 :             : 
    6345                 :     7723124 :   for (link = CALL_INSN_FUNCTION_USAGE (insn); link; link = XEXP (link, 1))
    6346                 :     4680131 :     if (GET_CODE (XEXP (link, 0)) == USE)
    6347                 :             :       {
    6348                 :     4651030 :         rtx item = NULL_RTX;
    6349                 :     4651030 :         x = XEXP (XEXP (link, 0), 0);
    6350                 :     4651030 :         if (GET_MODE (link) == VOIDmode
    6351                 :     3734655 :             || GET_MODE (link) == BLKmode
    6352                 :     3734627 :             || (GET_MODE (link) != GET_MODE (x)
    6353                 :           2 :                 && ((GET_MODE_CLASS (GET_MODE (link)) != MODE_INT
    6354                 :           2 :                      && GET_MODE_CLASS (GET_MODE (link)) != MODE_PARTIAL_INT)
    6355                 :           2 :                     || (GET_MODE_CLASS (GET_MODE (x)) != MODE_INT
    6356                 :           2 :                         && GET_MODE_CLASS (GET_MODE (x)) != MODE_PARTIAL_INT))))
    6357                 :             :           /* Can't do anything for these, if the original type mode
    6358                 :             :              isn't known or can't be converted.  */;
    6359                 :     3734627 :         else if (REG_P (x))
    6360                 :             :           {
    6361                 :     3725855 :             cselib_val *val = cselib_lookup (x, GET_MODE (x), 0, VOIDmode);
    6362                 :     3725855 :             scalar_int_mode mode;
    6363                 :     3725855 :             if (val && cselib_preserved_value_p (val))
    6364                 :     3388222 :               item = val->val_rtx;
    6365                 :      337633 :             else if (is_a <scalar_int_mode> (GET_MODE (x), &mode))
    6366                 :             :               {
    6367                 :      334461 :                 opt_scalar_int_mode mode_iter;
    6368                 :      401545 :                 FOR_EACH_WIDER_MODE (mode_iter, mode)
    6369                 :             :                   {
    6370                 :      401545 :                     mode = mode_iter.require ();
    6371                 :      806400 :                     if (GET_MODE_BITSIZE (mode) > BITS_PER_WORD)
    6372                 :             :                       break;
    6373                 :             : 
    6374                 :      121286 :                     rtx reg = simplify_subreg (mode, x, GET_MODE (x), 0);
    6375                 :      121286 :                     if (reg == NULL_RTX || !REG_P (reg))
    6376                 :           0 :                       continue;
    6377                 :      121286 :                     val = cselib_lookup (reg, mode, 0, VOIDmode);
    6378                 :      121286 :                     if (val && cselib_preserved_value_p (val))
    6379                 :             :                       {
    6380                 :       54202 :                         item = val->val_rtx;
    6381                 :       54202 :                         break;
    6382                 :             :                       }
    6383                 :             :                   }
    6384                 :             :               }
    6385                 :             :           }
    6386                 :        8772 :         else if (MEM_P (x))
    6387                 :             :           {
    6388                 :        8772 :             rtx mem = x;
    6389                 :        8772 :             cselib_val *val;
    6390                 :             : 
    6391                 :        8772 :             if (!frame_pointer_needed)
    6392                 :             :               {
    6393                 :        8350 :                 class adjust_mem_data amd;
    6394                 :        8350 :                 amd.mem_mode = VOIDmode;
    6395                 :        8350 :                 amd.stack_adjust = -VTI (bb)->out.stack_adjust;
    6396                 :        8350 :                 amd.store = true;
    6397                 :        8350 :                 mem = simplify_replace_fn_rtx (mem, NULL_RTX, adjust_mems,
    6398                 :             :                                                &amd);
    6399                 :        8350 :                 gcc_assert (amd.side_effects.is_empty ());
    6400                 :        8350 :               }
    6401                 :        8772 :             val = cselib_lookup (mem, GET_MODE (mem), 0, VOIDmode);
    6402                 :        8772 :             if (val && cselib_preserved_value_p (val))
    6403                 :        3239 :               item = val->val_rtx;
    6404                 :        5533 :             else if (GET_MODE_CLASS (GET_MODE (mem)) != MODE_INT
    6405                 :        5533 :                      && GET_MODE_CLASS (GET_MODE (mem)) != MODE_PARTIAL_INT)
    6406                 :             :               {
    6407                 :             :                 /* For non-integer stack argument see also if they weren't
    6408                 :             :                    initialized by integers.  */
    6409                 :         247 :                 scalar_int_mode imode;
    6410                 :         247 :                 if (int_mode_for_mode (GET_MODE (mem)).exists (&imode)
    6411                 :         247 :                     && imode != GET_MODE (mem))
    6412                 :             :                   {
    6413                 :         212 :                     val = cselib_lookup (adjust_address_nv (mem, imode, 0),
    6414                 :             :                                          imode, 0, VOIDmode);
    6415                 :         212 :                     if (val && cselib_preserved_value_p (val))
    6416                 :           0 :                       item = lowpart_subreg (GET_MODE (x), val->val_rtx,
    6417                 :             :                                              imode);
    6418                 :             :                   }
    6419                 :             :               }
    6420                 :             :           }
    6421                 :     3729341 :         if (item)
    6422                 :             :           {
    6423                 :     3445663 :             rtx x2 = x;
    6424                 :     3445663 :             if (GET_MODE (item) != GET_MODE (link))
    6425                 :       54204 :               item = lowpart_subreg (GET_MODE (link), item, GET_MODE (item));
    6426                 :     3445663 :             if (GET_MODE (x2) != GET_MODE (link))
    6427                 :           2 :               x2 = lowpart_subreg (GET_MODE (link), x2, GET_MODE (x2));
    6428                 :     3445663 :             item = gen_rtx_CONCAT (GET_MODE (link), x2, item);
    6429                 :     3445663 :             call_arguments
    6430                 :     3445663 :               = gen_rtx_EXPR_LIST (VOIDmode, item, call_arguments);
    6431                 :             :           }
    6432                 :     4651030 :         if (t && t != void_list_node)
    6433                 :             :           {
    6434                 :       82473 :             rtx reg;
    6435                 :       82473 :             function_arg_info arg (TREE_VALUE (t), /*named=*/true);
    6436                 :       82473 :             apply_pass_by_reference_rules (&args_so_far_v, arg);
    6437                 :       82473 :             reg = targetm.calls.function_arg (args_so_far, arg);
    6438                 :       82473 :             if (TREE_CODE (arg.type) == REFERENCE_TYPE
    6439                 :       37515 :                 && INTEGRAL_TYPE_P (TREE_TYPE (arg.type))
    6440                 :       28799 :                 && reg
    6441                 :       26652 :                 && REG_P (reg)
    6442                 :       26652 :                 && GET_MODE (reg) == arg.mode
    6443                 :       26652 :                 && (GET_MODE_CLASS (arg.mode) == MODE_INT
    6444                 :       26652 :                     || GET_MODE_CLASS (arg.mode) == MODE_PARTIAL_INT)
    6445                 :       26652 :                 && REG_P (x)
    6446                 :       26652 :                 && REGNO (x) == REGNO (reg)
    6447                 :       26126 :                 && GET_MODE (x) == arg.mode
    6448                 :      108599 :                 && item)
    6449                 :             :               {
    6450                 :       25674 :                 machine_mode indmode
    6451                 :       25674 :                   = TYPE_MODE (TREE_TYPE (arg.type));
    6452                 :       25674 :                 rtx mem = gen_rtx_MEM (indmode, x);
    6453                 :       25674 :                 cselib_val *val = cselib_lookup (mem, indmode, 0, VOIDmode);
    6454                 :       25674 :                 if (val && cselib_preserved_value_p (val))
    6455                 :             :                   {
    6456                 :        7389 :                     item = gen_rtx_CONCAT (indmode, mem, val->val_rtx);
    6457                 :        7389 :                     call_arguments = gen_rtx_EXPR_LIST (VOIDmode, item,
    6458                 :             :                                                         call_arguments);
    6459                 :             :                   }
    6460                 :             :                 else
    6461                 :             :                   {
    6462                 :       18285 :                     struct elt_loc_list *l;
    6463                 :       18285 :                     tree initial;
    6464                 :             : 
    6465                 :             :                     /* Try harder, when passing address of a constant
    6466                 :             :                        pool integer it can be easily read back.  */
    6467                 :       18285 :                     item = XEXP (item, 1);
    6468                 :       18285 :                     if (GET_CODE (item) == SUBREG)
    6469                 :           0 :                       item = SUBREG_REG (item);
    6470                 :       18285 :                     gcc_assert (GET_CODE (item) == VALUE);
    6471                 :       18285 :                     val = CSELIB_VAL_PTR (item);
    6472                 :       54122 :                     for (l = val->locs; l; l = l->next)
    6473                 :       39377 :                       if (GET_CODE (l->loc) == SYMBOL_REF
    6474                 :        3652 :                           && TREE_CONSTANT_POOL_ADDRESS_P (l->loc)
    6475                 :        3540 :                           && SYMBOL_REF_DECL (l->loc)
    6476                 :       42917 :                           && DECL_INITIAL (SYMBOL_REF_DECL (l->loc)))
    6477                 :             :                         {
    6478                 :        3540 :                           initial = DECL_INITIAL (SYMBOL_REF_DECL (l->loc));
    6479                 :        3540 :                           if (tree_fits_shwi_p (initial))
    6480                 :             :                             {
    6481                 :        3539 :                               item = GEN_INT (tree_to_shwi (initial));
    6482                 :        3539 :                               item = gen_rtx_CONCAT (indmode, mem, item);
    6483                 :        3539 :                               call_arguments
    6484                 :        3539 :                                 = gen_rtx_EXPR_LIST (VOIDmode, item,
    6485                 :             :                                                      call_arguments);
    6486                 :             :                             }
    6487                 :             :                           break;
    6488                 :             :                         }
    6489                 :             :                   }
    6490                 :             :               }
    6491                 :       82473 :             targetm.calls.function_arg_advance (args_so_far, arg);
    6492                 :       82473 :             t = TREE_CHAIN (t);
    6493                 :             :           }
    6494                 :             :       }
    6495                 :             : 
    6496                 :             :   /* Add debug arguments.  */
    6497                 :     3042993 :   if (fndecl
    6498                 :     2682489 :       && TREE_CODE (fndecl) == FUNCTION_DECL
    6499                 :     5725482 :       && DECL_HAS_DEBUG_ARGS_P (fndecl))
    6500                 :             :     {
    6501                 :       50929 :       vec<tree, va_gc> **debug_args = decl_debug_args_lookup (fndecl);
    6502                 :       50929 :       if (debug_args)
    6503                 :             :         {
    6504                 :             :           unsigned int ix;
    6505                 :             :           tree param;
    6506                 :      110938 :           for (ix = 0; vec_safe_iterate (*debug_args, ix, &param); ix += 2)
    6507                 :             :             {
    6508                 :       60009 :               rtx item;
    6509                 :       60009 :               tree dtemp = (**debug_args)[ix + 1];
    6510                 :       60009 :               machine_mode mode = DECL_MODE (dtemp);
    6511                 :       60009 :               item = gen_rtx_DEBUG_PARAMETER_REF (mode, param);
    6512                 :       60009 :               item = gen_rtx_CONCAT (mode, item, DECL_RTL_KNOWN_SET (dtemp));
    6513                 :       60009 :               call_arguments = gen_rtx_EXPR_LIST (VOIDmode, item,
    6514                 :             :                                                   call_arguments);
    6515                 :             :             }
    6516                 :             :         }
    6517                 :             :     }
    6518                 :             : 
    6519                 :             :   /* Reverse call_arguments chain.  */
    6520                 :     3042993 :   prev = NULL_RTX;
    6521                 :     6559593 :   for (cur = call_arguments; cur; cur = next)
    6522                 :             :     {
    6523                 :     3516600 :       next = XEXP (cur, 1);
    6524                 :     3516600 :       XEXP (cur, 1) = prev;
    6525                 :     3516600 :       prev = cur;
    6526                 :             :     }
    6527                 :     3042993 :   call_arguments = prev;
    6528                 :             : 
    6529                 :     3042993 :   x = get_call_rtx_from (insn);
    6530                 :     3042993 :   if (x)
    6531                 :             :     {
    6532                 :     3042993 :       x = XEXP (XEXP (x, 0), 0);
    6533                 :     3042993 :       if (GET_CODE (x) == SYMBOL_REF)
    6534                 :             :         /* Don't record anything.  */;
    6535                 :      125429 :       else if (CONSTANT_P (x))
    6536                 :             :         {
    6537                 :         987 :           x = gen_rtx_CONCAT (GET_MODE (x) == VOIDmode ? Pmode : GET_MODE (x),
    6538                 :             :                               pc_rtx, x);
    6539                 :         987 :           call_arguments
    6540                 :         987 :             = gen_rtx_EXPR_LIST (VOIDmode, x, call_arguments);
    6541                 :             :         }
    6542                 :             :       else
    6543                 :             :         {
    6544                 :      124442 :           cselib_val *val = cselib_lookup (x, GET_MODE (x), 0, VOIDmode);
    6545                 :      124442 :           if (val && cselib_preserved_value_p (val))
    6546                 :             :             {
    6547                 :       44235 :               x = gen_rtx_CONCAT (GET_MODE (x), pc_rtx, val->val_rtx);
    6548                 :       44235 :               call_arguments
    6549                 :       44235 :                 = gen_rtx_EXPR_LIST (VOIDmode, x, call_arguments);
    6550                 :             :             }
    6551                 :             :         }
    6552                 :             :     }
    6553                 :     3042993 :   if (this_arg)
    6554                 :             :     {
    6555                 :           0 :       machine_mode mode
    6556                 :           0 :         = TYPE_MODE (TREE_TYPE (OBJ_TYPE_REF_EXPR (obj_type_ref)));
    6557                 :           0 :       rtx clobbered = gen_rtx_MEM (mode, this_arg);
    6558                 :           0 :       HOST_WIDE_INT token
    6559                 :           0 :         = tree_to_shwi (OBJ_TYPE_REF_TOKEN (obj_type_ref));
    6560                 :           0 :       if (token)
    6561                 :           0 :         clobbered = plus_constant (mode, clobbered,
    6562                 :           0 :                                    token * GET_MODE_SIZE (mode));
    6563                 :           0 :       clobbered = gen_rtx_MEM (mode, clobbered);
    6564                 :           0 :       x = gen_rtx_CONCAT (mode, gen_rtx_CLOBBER (VOIDmode, pc_rtx), clobbered);
    6565                 :           0 :       call_arguments
    6566                 :           0 :         = gen_rtx_EXPR_LIST (VOIDmode, x, call_arguments);
    6567                 :             :     }
    6568                 :     3042993 : }
    6569                 :             : 
    6570                 :             : /* Callback for cselib_record_sets_hook, that records as micro
    6571                 :             :    operations uses and stores in an insn after cselib_record_sets has
    6572                 :             :    analyzed the sets in an insn, but before it modifies the stored
    6573                 :             :    values in the internal tables, unless cselib_record_sets doesn't
    6574                 :             :    call it directly (perhaps because we're not doing cselib in the
    6575                 :             :    first place, in which case sets and n_sets will be 0).  */
    6576                 :             : 
    6577                 :             : static void
    6578                 :    67879208 : add_with_sets (rtx_insn *insn, struct cselib_set *sets, int n_sets)
    6579                 :             : {
    6580                 :    67879208 :   basic_block bb = BLOCK_FOR_INSN (insn);
    6581                 :    67879208 :   int n1, n2;
    6582                 :    67879208 :   struct count_use_info cui;
    6583                 :    67879208 :   micro_operation *mos;
    6584                 :             : 
    6585                 :    67879208 :   cselib_hook_called = true;
    6586                 :             : 
    6587                 :    67879208 :   cui.insn = insn;
    6588                 :    67879208 :   cui.bb = bb;
    6589                 :    67879208 :   cui.sets = sets;
    6590                 :    67879208 :   cui.n_sets = n_sets;
    6591                 :             : 
    6592                 :    67879208 :   n1 = VTI (bb)->mos.length ();
    6593                 :    67879208 :   cui.store_p = false;
    6594                 :    67879208 :   note_uses (&PATTERN (insn), add_uses_1, &cui);
    6595                 :    67879208 :   n2 = VTI (bb)->mos.length () - 1;
    6596                 :    67879208 :   mos = VTI (bb)->mos.address ();
    6597                 :             : 
    6598                 :             :   /* Order the MO_USEs to be before MO_USE_NO_VARs and MO_VAL_USE, and
    6599                 :             :      MO_VAL_LOC last.  */
    6600                 :    75291505 :   while (n1 < n2)
    6601                 :             :     {
    6602                 :     7536265 :       while (n1 < n2 && mos[n1].type == MO_USE)
    6603                 :      123968 :         n1++;
    6604                 :    15980097 :       while (n1 < n2 && mos[n2].type != MO_USE)
    6605                 :     8567800 :         n2--;
    6606                 :     7412297 :       if (n1 < n2)
    6607                 :      102209 :         std::swap (mos[n1], mos[n2]);
    6608                 :             :     }
    6609                 :             : 
    6610                 :    67879208 :   n2 = VTI (bb)->mos.length () - 1;
    6611                 :    77442098 :   while (n1 < n2)
    6612                 :             :     {
    6613                 :    18130690 :       while (n1 < n2 && mos[n1].type != MO_VAL_LOC)
    6614                 :     8567800 :         n1++;
    6615                 :     9562890 :       while (n1 < n2 && mos[n2].type == MO_VAL_LOC)
    6616                 :           0 :         n2--;
    6617                 :     9562890 :       if (n1 < n2)
    6618                 :     2360132 :         std::swap (mos[n1], mos[n2]);
    6619                 :             :     }
    6620                 :             : 
    6621                 :    67879208 :   if (CALL_P (insn))
    6622                 :             :     {
    6623                 :     3043034 :       micro_operation mo;
    6624                 :             : 
    6625                 :     3043034 :       mo.type = MO_CALL;
    6626                 :     3043034 :       mo.insn = insn;
    6627                 :     3043034 :       mo.u.loc = call_arguments;
    6628                 :     3043034 :       call_arguments = NULL_RTX;
    6629                 :             : 
    6630                 :     3043034 :       if (dump_file && (dump_flags & TDF_DETAILS))
    6631                 :           2 :         log_op_type (PATTERN (insn), bb, insn, mo.type, dump_file);
    6632                 :     3043034 :       VTI (bb)->mos.safe_push (mo);
    6633                 :             :     }
    6634                 :             : 
    6635                 :    67879208 :   n1 = VTI (bb)->mos.length ();
    6636                 :             :   /* This will record NEXT_INSN (insn), such that we can
    6637                 :             :      insert notes before it without worrying about any
    6638                 :             :      notes that MO_USEs might emit after the insn.  */
    6639                 :    67879208 :   cui.store_p = true;
    6640                 :    67879208 :   note_stores (insn, add_stores, &cui);
    6641                 :    67879208 :   n2 = VTI (bb)->mos.length () - 1;
    6642                 :    67879208 :   mos = VTI (bb)->mos.address ();
    6643                 :             : 
    6644                 :             :   /* Order the MO_VAL_USEs first (note_stores does nothing
    6645                 :             :      on DEBUG_INSNs, so there are no MO_VAL_LOCs from this
    6646                 :             :      insn), then MO_CLOBBERs, then MO_SET/MO_COPY/MO_VAL_SET.  */
    6647                 :    71522372 :   while (n1 < n2)
    6648                 :             :     {
    6649                 :     3643164 :       while (n1 < n2 && mos[n1].type == MO_VAL_USE)
    6650                 :           0 :         n1++;
    6651                 :     7352325 :       while (n1 < n2 && mos[n2].type != MO_VAL_USE)
    6652                 :     3709161 :         n2--;
    6653                 :     3643164 :       if (n1 < n2)
    6654                 :           0 :         std::swap (mos[n1], mos[n2]);
    6655                 :             :     }
    6656                 :             : 
    6657                 :    67879208 :   n2 = VTI (bb)->mos.length () - 1;
    6658                 :    71527368 :   while (n1 < n2)
    6659                 :             :     {
    6660                 :     6601775 :       while (n1 < n2 && mos[n1].type == MO_CLOBBER)
    6661                 :     2953615 :         n1++;
    6662                 :     4403706 :       while (n1 < n2 && mos[n2].type != MO_CLOBBER)
    6663                 :      755546 :         n2--;
    6664                 :     3648160 :       if (n1 < n2)
    6665                 :        4996 :         std::swap (mos[n1], mos[n2]);
    6666                 :             :     }
    6667                 :    67879208 : }
    6668                 :             : 
    6669                 :             : static enum var_init_status
    6670                 :      169765 : find_src_status (dataflow_set *in, rtx src)
    6671                 :             : {
    6672                 :      169765 :   tree decl = NULL_TREE;
    6673                 :      169765 :   enum var_init_status status = VAR_INIT_STATUS_UNINITIALIZED;
    6674                 :             : 
    6675                 :      169765 :   if (! flag_var_tracking_uninit)
    6676                 :           0 :     status = VAR_INIT_STATUS_INITIALIZED;
    6677                 :             : 
    6678                 :      169765 :   if (src && REG_P (src))
    6679                 :      158709 :     decl = var_debug_decl (REG_EXPR (src));
    6680                 :       11056 :   else if (src && MEM_P (src))
    6681                 :       11056 :     decl = var_debug_decl (MEM_EXPR (src));
    6682                 :             : 
    6683                 :      169765 :   if (src && decl)
    6684                 :      169765 :     status = get_init_value (in, src, dv_from_decl (decl));
    6685                 :             : 
    6686                 :      169765 :   return status;
    6687                 :             : }
    6688                 :             : 
    6689                 :             : /* SRC is the source of an assignment.  Use SET to try to find what
    6690                 :             :    was ultimately assigned to SRC.  Return that value if known,
    6691                 :             :    otherwise return SRC itself.  */
    6692                 :             : 
    6693                 :             : static rtx
    6694                 :      132803 : find_src_set_src (dataflow_set *set, rtx src)
    6695                 :             : {
    6696                 :      132803 :   tree decl = NULL_TREE;   /* The variable being copied around.          */
    6697                 :      132803 :   rtx set_src = NULL_RTX;  /* The value for "decl" stored in "src".      */
    6698                 :      132803 :   variable *var;
    6699                 :      132803 :   location_chain *nextp;
    6700                 :      132803 :   int i;
    6701                 :      132803 :   bool found;
    6702                 :             : 
    6703                 :      132803 :   if (src && REG_P (src))
    6704                 :      125323 :     decl = var_debug_decl (REG_EXPR (src));
    6705                 :        7480 :   else if (src && MEM_P (src))
    6706                 :        7480 :     decl = var_debug_decl (MEM_EXPR (src));
    6707                 :             : 
    6708                 :      132803 :   if (src && decl)
    6709                 :             :     {
    6710                 :      132803 :       decl_or_value dv = dv_from_decl (decl);
    6711                 :             : 
    6712                 :      132803 :       var = shared_hash_find (set->vars, dv);
    6713                 :      132803 :       if (var)
    6714                 :             :         {
    6715                 :             :           found = false;
    6716                 :      256638 :           for (i = 0; i < var->n_var_parts && !found; i++)
    6717                 :      302073 :             for (nextp = var->var_part[i].loc_chain; nextp && !found;
    6718                 :      155993 :                  nextp = nextp->next)
    6719                 :      155993 :               if (rtx_equal_p (nextp->loc, src))
    6720                 :             :                 {
    6721                 :       92125 :                   set_src = nextp->set_src;
    6722                 :       92125 :                   found = true;
    6723                 :             :                 }
    6724                 :             : 
    6725                 :             :         }
    6726                 :             :     }
    6727                 :             : 
    6728                 :      132803 :   return set_src;
    6729                 :             : }
    6730                 :             : 
    6731                 :             : /* Compute the changes of variable locations in the basic block BB.  */
    6732                 :             : 
    6733                 :             : static bool
    6734                 :     8420543 : compute_bb_dataflow (basic_block bb)
    6735                 :             : {
    6736                 :     8420543 :   unsigned int i;
    6737                 :     8420543 :   micro_operation *mo;
    6738                 :     8420543 :   bool changed;
    6739                 :     8420543 :   dataflow_set old_out;
    6740                 :     8420543 :   dataflow_set *in = &VTI (bb)->in;
    6741                 :     8420543 :   dataflow_set *out = &VTI (bb)->out;
    6742                 :             : 
    6743                 :     8420543 :   dataflow_set_init (&old_out);
    6744                 :     8420543 :   dataflow_set_copy (&old_out, out);
    6745                 :     8420543 :   dataflow_set_copy (out, in);
    6746                 :             : 
    6747                 :     8420543 :   if (MAY_HAVE_DEBUG_BIND_INSNS)
    6748                 :     8420456 :     local_get_addr_cache = new hash_map<rtx, rtx>;
    6749                 :             : 
    6750                 :   146034816 :   FOR_EACH_VEC_ELT (VTI (bb)->mos, i, mo)
    6751                 :             :     {
    6752                 :   137614273 :       rtx_insn *insn = mo->insn;
    6753                 :             : 
    6754                 :   137614273 :       switch (mo->type)
    6755                 :             :         {
    6756                 :     3600854 :           case MO_CALL:
    6757                 :     3600854 :             dataflow_set_clear_at_call (out, insn);
    6758                 :     3600854 :             break;
    6759                 :             : 
    6760                 :      387464 :           case MO_USE:
    6761                 :      387464 :             {
    6762                 :      387464 :               rtx loc = mo->u.loc;
    6763                 :             : 
    6764                 :      387464 :               if (REG_P (loc))
    6765                 :      383470 :                 var_reg_set (out, loc, VAR_INIT_STATUS_UNINITIALIZED, NULL);
    6766                 :        3994 :               else if (MEM_P (loc))
    6767                 :        3994 :                 var_mem_set (out, loc, VAR_INIT_STATUS_UNINITIALIZED, NULL);
    6768                 :             :             }
    6769                 :             :             break;
    6770                 :             : 
    6771                 :    38290473 :           case MO_VAL_LOC:
    6772                 :    38290473 :             {
    6773                 :    38290473 :               rtx loc = mo->u.loc;
    6774                 :    38290473 :               rtx val, vloc;
    6775                 :    38290473 :               tree var;
    6776                 :             : 
    6777                 :    38290473 :               if (GET_CODE (loc) == CONCAT)
    6778                 :             :                 {
    6779                 :    19304259 :                   val = XEXP (loc, 0);
    6780                 :    19304259 :                   vloc = XEXP (loc, 1);
    6781                 :             :                 }
    6782                 :             :               else
    6783                 :             :                 {
    6784                 :             :                   val = NULL_RTX;
    6785                 :             :                   vloc = loc;
    6786                 :             :                 }
    6787                 :             : 
    6788                 :    38290473 :               var = PAT_VAR_LOCATION_DECL (vloc);
    6789                 :             : 
    6790                 :    38290473 :               clobber_variable_part (out, NULL_RTX,
    6791                 :             :                                      dv_from_decl (var), 0, NULL_RTX);
    6792                 :    38290473 :               if (val)
    6793                 :             :                 {
    6794                 :    19304259 :                   if (VAL_NEEDS_RESOLUTION (loc))
    6795                 :     2199866 :                     val_resolve (out, val, PAT_VAR_LOCATION_LOC (vloc), insn);
    6796                 :    19304259 :                   set_variable_part (out, val, dv_from_decl (var), 0,
    6797                 :             :                                      VAR_INIT_STATUS_INITIALIZED, NULL_RTX,
    6798                 :             :                                      INSERT);
    6799                 :             :                 }
    6800                 :    18986214 :               else if (!VAR_LOC_UNKNOWN_P (PAT_VAR_LOCATION_LOC (vloc)))
    6801                 :     2694162 :                 set_variable_part (out, PAT_VAR_LOCATION_LOC (vloc),
    6802                 :             :                                    dv_from_decl (var), 0,
    6803                 :             :                                    VAR_INIT_STATUS_INITIALIZED, NULL_RTX,
    6804                 :             :                                    INSERT);
    6805                 :             :             }
    6806                 :             :             break;
    6807                 :             : 
    6808                 :    19435204 :           case MO_VAL_USE:
    6809                 :    19435204 :             {
    6810                 :    19435204 :               rtx loc = mo->u.loc;
    6811                 :    19435204 :               rtx val, vloc, uloc;
    6812                 :             : 
    6813                 :    19435204 :               vloc = uloc = XEXP (loc, 1);
    6814                 :    19435204 :               val = XEXP (loc, 0);
    6815                 :             : 
    6816                 :    19435204 :               if (GET_CODE (val) == CONCAT)
    6817                 :             :                 {
    6818                 :     9644449 :                   uloc = XEXP (val, 1);
    6819                 :     9644449 :                   val = XEXP (val, 0);
    6820                 :             :                 }
    6821                 :             : 
    6822                 :    19435204 :               if (VAL_NEEDS_RESOLUTION (loc))
    6823                 :    19435204 :                 val_resolve (out, val, vloc, insn);
    6824                 :             :               else
    6825                 :           0 :                 val_store (out, val, uloc, insn, false);
    6826                 :             : 
    6827                 :    19435204 :               if (VAL_HOLDS_TRACK_EXPR (loc))
    6828                 :             :                 {
    6829                 :      269680 :                   if (GET_CODE (uloc) == REG)
    6830                 :      243728 :                     var_reg_set (out, uloc, VAR_INIT_STATUS_UNINITIALIZED,
    6831                 :             :                                  NULL);
    6832                 :       25952 :                   else if (GET_CODE (uloc) == MEM)
    6833                 :       25952 :                     var_mem_set (out, uloc, VAR_INIT_STATUS_UNINITIALIZED,
    6834                 :             :                                  NULL);
    6835                 :             :                 }
    6836                 :             :             }
    6837                 :             :             break;
    6838                 :             : 
    6839                 :    37958164 :           case MO_VAL_SET:
    6840                 :    37958164 :             {
    6841                 :    37958164 :               rtx loc = mo->u.loc;
    6842                 :    37958164 :               rtx val, vloc, uloc;
    6843                 :    37958164 :               rtx dstv, srcv;
    6844                 :             : 
    6845                 :    37958164 :               vloc = loc;
    6846                 :    37958164 :               uloc = XEXP (vloc, 1);
    6847                 :    37958164 :               val = XEXP (vloc, 0);
    6848                 :    37958164 :               vloc = uloc;
    6849                 :             : 
    6850                 :    37958164 :               if (GET_CODE (uloc) == SET)
    6851                 :             :                 {
    6852                 :    28040867 :                   dstv = SET_DEST (uloc);
    6853                 :    28040867 :                   srcv = SET_SRC (uloc);
    6854                 :             :                 }
    6855                 :             :               else
    6856                 :             :                 {
    6857                 :             :                   dstv = uloc;
    6858                 :             :                   srcv = NULL;
    6859                 :             :                 }
    6860                 :             : 
    6861                 :    37958164 :               if (GET_CODE (val) == CONCAT)
    6862                 :             :                 {
    6863                 :     9909337 :                   dstv = vloc = XEXP (val, 1);
    6864                 :     9909337 :                   val = XEXP (val, 0);
    6865                 :             :                 }
    6866                 :             : 
    6867                 :    37958164 :               if (GET_CODE (vloc) == SET)
    6868                 :             :                 {
    6869                 :    28035592 :                   srcv = SET_SRC (vloc);
    6870                 :             : 
    6871                 :    28035592 :                   gcc_assert (val != srcv);
    6872                 :    28035592 :                   gcc_assert (vloc == uloc || VAL_NEEDS_RESOLUTION (loc));
    6873                 :             : 
    6874                 :    28035592 :                   dstv = vloc = SET_DEST (vloc);
    6875                 :             : 
    6876                 :    28035592 :                   if (VAL_NEEDS_RESOLUTION (loc))
    6877                 :           0 :                     val_resolve (out, val, srcv, insn);
    6878                 :             :                 }
    6879                 :     9922572 :               else if (VAL_NEEDS_RESOLUTION (loc))
    6880                 :             :                 {
    6881                 :           0 :                   gcc_assert (GET_CODE (uloc) == SET
    6882                 :             :                               && GET_CODE (SET_SRC (uloc)) == REG);
    6883                 :           0 :                   val_resolve (out, val, SET_SRC (uloc), insn);
    6884                 :             :                 }
    6885                 :             : 
    6886                 :    37958164 :               if (VAL_HOLDS_TRACK_EXPR (loc))
    6887                 :             :                 {
    6888                 :      160443 :                   if (VAL_EXPR_IS_CLOBBERED (loc))
    6889                 :             :                     {
    6890                 :           0 :                       if (REG_P (uloc))
    6891                 :           0 :                         var_reg_delete (out, uloc, true);
    6892                 :           0 :                       else if (MEM_P (uloc))
    6893                 :             :                         {
    6894                 :           0 :                           gcc_assert (MEM_P (dstv));
    6895                 :           0 :                           gcc_assert (MEM_ATTRS (dstv) == MEM_ATTRS (uloc));
    6896                 :           0 :                           var_mem_delete (out, dstv, true);
    6897                 :             :                         }
    6898                 :             :                     }
    6899                 :             :                   else
    6900                 :             :                     {
    6901                 :      160443 :                       bool copied_p = VAL_EXPR_IS_COPIED (loc);
    6902                 :      160443 :                       rtx src = NULL, dst = uloc;
    6903                 :      160443 :                       enum var_init_status status = VAR_INIT_STATUS_INITIALIZED;
    6904                 :             : 
    6905                 :      160443 :                       if (GET_CODE (uloc) == SET)
    6906                 :             :                         {
    6907                 :      151254 :                           src = SET_SRC (uloc);
    6908                 :      151254 :                           dst = SET_DEST (uloc);
    6909                 :             :                         }
    6910                 :             : 
    6911                 :      160443 :                       if (copied_p)
    6912                 :             :                         {
    6913                 :       30434 :                           if (flag_var_tracking_uninit)
    6914                 :             :                             {
    6915                 :       30434 :                               status = find_src_status (in, src);
    6916                 :             : 
    6917                 :       30434 :                               if (status == VAR_INIT_STATUS_UNKNOWN)
    6918                 :       25080 :                                 status = find_src_status (out, src);
    6919                 :             :                             }
    6920                 :             : 
    6921                 :       30434 :                           src = find_src_set_src (in, src);
    6922                 :             :                         }
    6923                 :             : 
    6924                 :      160443 :                       if (REG_P (dst))
    6925                 :      155161 :                         var_reg_delete_and_set (out, dst, !copied_p,
    6926                 :             :                                                 status, srcv);
    6927                 :        5282 :                       else if (MEM_P (dst))
    6928                 :             :                         {
    6929                 :        5282 :                           gcc_assert (MEM_P (dstv));
    6930                 :        5282 :                           gcc_assert (MEM_ATTRS (dstv) == MEM_ATTRS (dst));
    6931                 :        5282 :                           var_mem_delete_and_set (out, dstv, !copied_p,
    6932                 :             :                                                   status, srcv);
    6933                 :             :                         }
    6934                 :             :                     }
    6935                 :             :                 }
    6936                 :    37797721 :               else if (REG_P (uloc))
    6937                 :        4252 :                 var_regno_delete (out, REGNO (uloc));
    6938                 :    37793469 :               else if (MEM_P (uloc))
    6939                 :             :                 {
    6940                 :     9903856 :                   gcc_checking_assert (GET_CODE (vloc) == MEM);
    6941                 :     9903856 :                   gcc_checking_assert (dstv == vloc);
    6942                 :             :                   if (dstv != vloc)
    6943                 :             :                     clobber_overlapping_mems (out, vloc);
    6944                 :             :                 }
    6945                 :             : 
    6946                 :    37958164 :               val_store (out, val, dstv, insn, true);
    6947                 :             :             }
    6948                 :    37958164 :             break;
    6949                 :             : 
    6950                 :       42430 :           case MO_SET:
    6951                 :       42430 :             {
    6952                 :       42430 :               rtx loc = mo->u.loc;
    6953                 :       42430 :               rtx set_src = NULL;
    6954                 :             : 
    6955                 :       42430 :               if (GET_CODE (loc) == SET)
    6956                 :             :                 {
    6957                 :       42182 :                   set_src = SET_SRC (loc);
    6958                 :       42182 :                   loc = SET_DEST (loc);
    6959                 :             :                 }
    6960                 :             : 
    6961                 :       42430 :               if (REG_P (loc))
    6962                 :       42430 :                 var_reg_delete_and_set (out, loc, true, VAR_INIT_STATUS_INITIALIZED,
    6963                 :             :                                         set_src);
    6964                 :           0 :               else if (MEM_P (loc))
    6965                 :           0 :                 var_mem_delete_and_set (out, loc, true, VAR_INIT_STATUS_INITIALIZED,
    6966                 :             :                                         set_src);
    6967                 :             :             }
    6968                 :             :             break;
    6969                 :             : 
    6970                 :       40662 :           case MO_COPY:
    6971                 :       40662 :             {
    6972                 :       40662 :               rtx loc = mo->u.loc;
    6973                 :       40662 :               enum var_init_status src_status;
    6974                 :       40662 :               rtx set_src = NULL;
    6975                 :             : 
    6976                 :       40662 :               if (GET_CODE (loc) == SET)
    6977                 :             :                 {
    6978                 :       40662 :                   set_src = SET_SRC (loc);
    6979                 :       40662 :                   loc = SET_DEST (loc);
    6980                 :             :                 }
    6981                 :             : 
    6982                 :       40662 :               if (! flag_var_tracking_uninit)
    6983                 :             :                 src_status = VAR_INIT_STATUS_INITIALIZED;
    6984                 :             :               else
    6985                 :             :                 {
    6986                 :       40662 :                   src_status = find_src_status (in, set_src);
    6987                 :             : 
    6988                 :       40662 :                   if (src_status == VAR_INIT_STATUS_UNKNOWN)
    6989                 :       11882 :                     src_status = find_src_status (out, set_src);
    6990                 :             :                 }
    6991                 :             : 
    6992                 :       40662 :               set_src = find_src_set_src (in, set_src);
    6993                 :             : 
    6994                 :       40662 :               if (REG_P (loc))
    6995                 :       40662 :                 var_reg_delete_and_set (out, loc, false, src_status, set_src);
    6996                 :           0 :               else if (MEM_P (loc))
    6997                 :           0 :                 var_mem_delete_and_set (out, loc, false, src_status, set_src);
    6998                 :             :             }
    6999                 :             :             break;
    7000                 :             : 
    7001                 :    25465473 :           case MO_USE_NO_VAR:
    7002                 :    25465473 :             {
    7003                 :    25465473 :               rtx loc = mo->u.loc;
    7004                 :             : 
    7005                 :    25465473 :               if (REG_P (loc))
    7006                 :    25465473 :                 var_reg_delete (out, loc, false);
    7007                 :           0 :               else if (MEM_P (loc))
    7008                 :           0 :                 var_mem_delete (out, loc, false);
    7009                 :             :             }
    7010                 :             :             break;
    7011                 :             : 
    7012                 :     7457402 :           case MO_CLOBBER:
    7013                 :     7457402 :             {
    7014                 :     7457402 :               rtx loc = mo->u.loc;
    7015                 :             : 
    7016                 :     7457402 :               if (REG_P (loc))
    7017                 :     7457402 :                 var_reg_delete (out, loc, true);
    7018                 :           0 :               else if (MEM_P (loc))
    7019                 :           0 :                 var_mem_delete (out, loc, true);
    7020                 :             :             }
    7021                 :             :             break;
    7022                 :             : 
    7023                 :     4936147 :           case MO_ADJUST:
    7024                 :     4936147 :             out->stack_adjust += mo->u.adjust;
    7025                 :     4936147 :             break;
    7026                 :             :         }
    7027                 :             :     }
    7028                 :             : 
    7029                 :     8420543 :   if (MAY_HAVE_DEBUG_BIND_INSNS)
    7030                 :             :     {
    7031                 :    16840912 :       delete local_get_addr_cache;
    7032                 :     8420456 :       local_get_addr_cache = NULL;
    7033                 :             : 
    7034                 :     8420456 :       dataflow_set_equiv_regs (out);
    7035                 :     8420456 :       shared_hash_htab (out->vars)
    7036                 :     8420456 :         ->traverse <dataflow_set *, canonicalize_values_mark> (out);
    7037                 :     8420456 :       shared_hash_htab (out->vars)
    7038                 :     8420456 :         ->traverse <dataflow_set *, canonicalize_values_star> (out);
    7039                 :     8420456 :       if (flag_checking)
    7040                 :     8420448 :         shared_hash_htab (out->vars)
    7041                 :     8420448 :           ->traverse <dataflow_set *, canonicalize_loc_order_check> (out);
    7042                 :             :     }
    7043                 :     8420543 :   changed = dataflow_set_different (&old_out, out);
    7044                 :     8420543 :   dataflow_set_destroy (&old_out);
    7045                 :     8420543 :   return changed;
    7046                 :             : }
    7047                 :             : 
    7048                 :             : /* Find the locations of variables in the whole function.  */
    7049                 :             : 
    7050                 :             : static bool
    7051                 :      479703 : vt_find_locations (void)
    7052                 :             : {
    7053                 :      479703 :   bb_heap_t *worklist = new bb_heap_t (LONG_MIN);
    7054                 :      479703 :   bb_heap_t *pending = new bb_heap_t (LONG_MIN);
    7055                 :      479703 :   sbitmap in_worklist, in_pending;
    7056                 :      479703 :   basic_block bb;
    7057                 :      479703 :   edge e;
    7058                 :      479703 :   int *bb_order;
    7059                 :      479703 :   int *rc_order;
    7060                 :      479703 :   int i;
    7061                 :      479703 :   int htabsz = 0;
    7062                 :      479703 :   int htabmax = param_max_vartrack_size;
    7063                 :      479703 :   bool success = true;
    7064                 :      479703 :   unsigned int n_blocks_processed = 0;
    7065                 :             : 
    7066                 :      479703 :   timevar_push (TV_VAR_TRACKING_DATAFLOW);
    7067                 :             :   /* Compute reverse completion order of depth first search of the CFG
    7068                 :             :      so that the data-flow runs faster.  */
    7069                 :      479703 :   rc_order = XNEWVEC (int, n_basic_blocks_for_fn (cfun) - NUM_FIXED_BLOCKS);
    7070                 :      479703 :   bb_order = XNEWVEC (int, last_basic_block_for_fn (cfun));
    7071                 :      479703 :   auto_bitmap exit_bbs;
    7072                 :      479703 :   bitmap_set_bit (exit_bbs, EXIT_BLOCK);
    7073                 :      479703 :   auto_vec<std::pair<int, int> > toplevel_scc_extents;
    7074                 :      479703 :   int n = rev_post_order_and_mark_dfs_back_seme
    7075                 :      479703 :     (cfun, single_succ_edge (ENTRY_BLOCK_PTR_FOR_FN (cfun)), exit_bbs, true,
    7076                 :             :      rc_order, &toplevel_scc_extents);
    7077                 :     7666565 :   for (i = 0; i < n; i++)
    7078                 :     6707159 :     bb_order[rc_order[i]] = i;
    7079                 :             : 
    7080                 :      479703 :   in_worklist = sbitmap_alloc (last_basic_block_for_fn (cfun));
    7081                 :      479703 :   in_pending = sbitmap_alloc (last_basic_block_for_fn (cfun));
    7082                 :      479703 :   bitmap_clear (in_worklist);
    7083                 :      479703 :   bitmap_clear (in_pending);
    7084                 :             : 
    7085                 :             :   /* We're performing the dataflow iteration independently over the
    7086                 :             :      toplevel SCCs plus leading non-cyclic entry blocks and separately
    7087                 :             :      over the tail.  That ensures best memory locality and the least
    7088                 :             :      number of visited blocks.  */
    7089                 :      479703 :   unsigned extent = 0;
    7090                 :      479703 :   int curr_start = -1;
    7091                 :      479703 :   int curr_end = -1;
    7092                 :      682540 :   do
    7093                 :             :     {
    7094                 :      682540 :       curr_start = curr_end + 1;
    7095                 :      989301 :       if (toplevel_scc_extents.length () <= extent)
    7096                 :      479057 :         curr_end = n - 1;
    7097                 :             :       else
    7098                 :      203483 :         curr_end = toplevel_scc_extents[extent++].second;
    7099                 :             : 
    7100                 :     7389699 :       for (int i = curr_start; i <= curr_end; ++i)
    7101                 :             :         {
    7102                 :     6707159 :           pending->insert (i, BASIC_BLOCK_FOR_FN (cfun, rc_order[i]));
    7103                 :     6707159 :           bitmap_set_bit (in_pending, rc_order[i]);
    7104                 :             :         }
    7105                 :             : 
    7106                 :     1634678 :       while (success && !pending->empty ())
    7107                 :             :         {
    7108                 :             :           std::swap (worklist, pending);
    7109                 :             :           std::swap (in_worklist, in_pending);
    7110                 :             : 
    7111                 :     9372680 :           while (!worklist->empty ())
    7112                 :             :             {
    7113                 :     8420543 :               bool changed;
    7114                 :     8420543 :               edge_iterator ei;
    7115                 :     8420543 :               int oldinsz, oldoutsz;
    7116                 :             : 
    7117                 :     8420543 :               bb = worklist->extract_min ();
    7118                 :     8420543 :               bitmap_clear_bit (in_worklist, bb->index);
    7119                 :             : 
    7120                 :     8420543 :               if (VTI (bb)->in.vars)
    7121                 :             :                 {
    7122                 :     8420543 :                   htabsz -= (shared_hash_htab (VTI (bb)->in.vars)->size ()
    7123                 :     8420543 :                              + shared_hash_htab (VTI (bb)->out.vars)->size ());
    7124                 :     8420543 :                   oldinsz = shared_hash_htab (VTI (bb)->in.vars)->elements ();
    7125                 :     8420543 :                   oldoutsz = shared_hash_htab (VTI (bb)->out.vars)->elements ();
    7126                 :             :                 }
    7127                 :             :               else
    7128                 :             :                 oldinsz = oldoutsz = 0;
    7129                 :             : 
    7130                 :     8420543 :               if (MAY_HAVE_DEBUG_BIND_INSNS)
    7131                 :             :                 {
    7132                 :     8420456 :                   dataflow_set *in = &VTI (bb)->in, *first_out = NULL;
    7133                 :     8420456 :                   bool first = true, adjust = false;
    7134                 :             : 
    7135                 :             :                   /* Calculate the IN set as the intersection of
    7136                 :             :                      predecessor OUT sets.  */
    7137                 :             : 
    7138                 :     8420456 :                   dataflow_set_clear (in);
    7139                 :     8420456 :                   dst_can_be_shared = true;
    7140                 :             : 
    7141                 :    21024335 :                   FOR_EACH_EDGE (e, ei, bb->preds)
    7142                 :    12603879 :                     if (!VTI (e->src)->flooded)
    7143                 :      298343 :                       gcc_assert (bb_order[bb->index]
    7144                 :             :                                   <= bb_order[e->src->index]);
    7145                 :    12305536 :                     else if (first)
    7146                 :             :                       {
    7147                 :     8420456 :                         dataflow_set_copy (in, &VTI (e->src)->out);
    7148                 :     8420456 :                         first_out = &VTI (e->src)->out;
    7149                 :     8420456 :                         first = false;
    7150                 :             :                       }
    7151                 :             :                     else
    7152                 :             :                       {
    7153                 :     3885080 :                         dataflow_set_merge (in, &VTI (e->src)->out);
    7154                 :     3885080 :                         adjust = true;
    7155                 :             :                       }
    7156                 :             : 
    7157                 :     8420456 :                   if (adjust)
    7158                 :             :                     {
    7159                 :     2506665 :                       dataflow_post_merge_adjust (in, &VTI (bb)->permp);
    7160                 :             : 
    7161                 :     2506665 :                       if (flag_checking)
    7162                 :             :                         /* Merge and merge_adjust should keep entries in
    7163                 :             :                            canonical order.  */
    7164                 :     2506663 :                         shared_hash_htab (in->vars)
    7165                 :             :                           ->traverse <dataflow_set *,
    7166                 :     2506663 :                                       canonicalize_loc_order_check> (in);
    7167                 :             : 
    7168                 :     2506665 :                       if (dst_can_be_shared)
    7169                 :             :                         {
    7170                 :        7360 :                           shared_hash_destroy (in->vars);
    7171                 :        7360 :                           in->vars = shared_hash_copy (first_out->vars);
    7172                 :             :                         }
    7173                 :             :                     }
    7174                 :             : 
    7175                 :     8420456 :                   VTI (bb)->flooded = true;
    7176                 :             :                 }
    7177                 :             :               else
    7178                 :             :                 {
    7179                 :             :                   /* Calculate the IN set as union of predecessor OUT sets.  */
    7180                 :          87 :                   dataflow_set_clear (&VTI (bb)->in);
    7181                 :         193 :                   FOR_EACH_EDGE (e, ei, bb->preds)
    7182                 :         106 :                     dataflow_set_union (&VTI (bb)->in, &VTI (e->src)->out);
    7183                 :             :                 }
    7184                 :             : 
    7185                 :     8420543 :               changed = compute_bb_dataflow (bb);
    7186                 :     8420543 :               n_blocks_processed++;
    7187                 :     8420543 :               htabsz += (shared_hash_htab (VTI (bb)->in.vars)->size ()
    7188                 :     8420543 :                          + shared_hash_htab (VTI (bb)->out.vars)->size ());
    7189                 :             : 
    7190                 :     8420543 :               if (htabmax && htabsz > htabmax)
    7191                 :             :                 {
    7192                 :           1 :                   if (MAY_HAVE_DEBUG_BIND_INSNS)
    7193                 :           1 :                     inform (DECL_SOURCE_LOCATION (cfun->decl),
    7194                 :             :                             "variable tracking size limit exceeded with "
    7195                 :             :                             "%<-fvar-tracking-assignments%>, retrying without");
    7196                 :             :                   else
    7197                 :           0 :                     inform (DECL_SOURCE_LOCATION (cfun->decl),
    7198                 :             :                             "variable tracking size limit exceeded");
    7199                 :           1 :                   success = false;
    7200                 :           1 :                   break;
    7201                 :             :                 }
    7202                 :             : 
    7203                 :     8420542 :               if (changed)
    7204                 :             :                 {
    7205                 :    20456666 :                   FOR_EACH_EDGE (e, ei, bb->succs)
    7206                 :             :                     {
    7207                 :    12374593 :                       if (e->dest == EXIT_BLOCK_PTR_FOR_FN (cfun))
    7208                 :      584625 :                         continue;
    7209                 :             : 
    7210                 :             :                       /* Iterate to an earlier block in RPO in the next
    7211                 :             :                          round, iterate to the same block immediately.  */
    7212                 :    11789968 :                       if (bb_order[e->dest->index] < bb_order[bb->index])
    7213                 :             :                         {
    7214                 :      418920 :                           gcc_assert (bb_order[e->dest->index] >= curr_start);
    7215                 :      418920 :                           if (!bitmap_bit_p (in_pending, e->dest->index))
    7216                 :             :                             {
    7217                 :             :                               /* Send E->DEST to next round.  */
    7218                 :      368874 :                               bitmap_set_bit (in_pending, e->dest->index);
    7219                 :      368874 :                               pending->insert (bb_order[e->dest->index],
    7220                 :             :                                                e->dest);
    7221                 :             :                             }
    7222                 :             :                         }
    7223                 :    11371048 :                       else if (bb_order[e->dest->index] <= curr_end
    7224                 :    11371048 :                                && !bitmap_bit_p (in_worklist, e->dest->index))
    7225                 :             :                         {
    7226                 :             :                           /* Add E->DEST to current round or delay
    7227                 :             :                              processing if it is in the next SCC.  */
    7228                 :     1344510 :                           bitmap_set_bit (in_worklist, e->dest->index);
    7229                 :     1344510 :                           worklist->insert (bb_order[e->dest->index],
    7230                 :             :                                             e->dest);
    7231                 :             :                         }
    7232                 :             :                     }
    7233                 :             :                 }
    7234                 :             : 
    7235                 :     8420542 :               if (dump_file)
    7236                 :          73 :                 fprintf (dump_file,
    7237                 :             :                          "BB %i: in %i (was %i), out %i (was %i), rem %i + %i, "
    7238                 :             :                          "tsz %i\n", bb->index,
    7239                 :          73 :                          (int)shared_hash_htab (VTI (bb)->in.vars)->size (),
    7240                 :             :                          oldinsz,
    7241                 :          73 :                          (int)shared_hash_htab (VTI (bb)->out.vars)->size (),
    7242                 :             :                          oldoutsz,
    7243                 :          73 :                          (int)worklist->nodes (), (int)pending->nodes (),
    7244                 :             :                          htabsz);
    7245                 :             : 
    7246                 :     8420542 :               if (dump_file && (dump_flags & TDF_DETAILS))
    7247                 :             :                 {
    7248                 :           1 :                   fprintf (dump_file, "BB %i IN:\n", bb->index);
    7249                 :           1 :                   dump_dataflow_set (&VTI (bb)->in);
    7250                 :           1 :                   fprintf (dump_file, "BB %i OUT:\n", bb->index);
    7251                 :           1 :                   dump_dataflow_set (&VTI (bb)->out);
    7252                 :             :                 }
    7253                 :             :             }
    7254                 :             :         }
    7255                 :             :     }
    7256                 :      682540 :   while (curr_end != n - 1);
    7257                 :             : 
    7258                 :      479703 :   statistics_counter_event (cfun, "compute_bb_dataflow times",
    7259                 :             :                             n_blocks_processed);
    7260                 :             : 
    7261                 :      479703 :   if (success && MAY_HAVE_DEBUG_BIND_INSNS)
    7262                 :     7186736 :     FOR_EACH_BB_FN (bb, cfun)
    7263                 :     6707075 :       gcc_assert (VTI (bb)->flooded);
    7264                 :             : 
    7265                 :      479703 :   free (rc_order);
    7266                 :      479703 :   free (bb_order);
    7267                 :      479703 :   delete worklist;
    7268                 :      479703 :   delete pending;
    7269                 :      479703 :   sbitmap_free (in_worklist);
    7270                 :      479703 :   sbitmap_free (in_pending);
    7271                 :             : 
    7272                 :      479703 :   timevar_pop (TV_VAR_TRACKING_DATAFLOW);
    7273                 :      479703 :   return success;
    7274                 :      479703 : }
    7275                 :             : 
    7276                 :             : /* Print the content of the LIST to dump file.  */
    7277                 :             : 
    7278                 :             : static void
    7279                 :           4 : dump_attrs_list (attrs *list)
    7280                 :             : {
    7281                 :           8 :   for (; list; list = list->next)
    7282                 :             :     {
    7283                 :           4 :       if (dv_is_decl_p (list->dv))
    7284                 :           0 :         print_mem_expr (dump_file, dv_as_decl (list->dv));
    7285                 :             :       else
    7286                 :           4 :         print_rtl_single (dump_file, dv_as_value (list->dv));
    7287                 :           4 :       fprintf (dump_file, "+" HOST_WIDE_INT_PRINT_DEC, list->offset);
    7288                 :             :     }
    7289                 :           4 :   fprintf (dump_file, "\n");
    7290                 :           4 : }
    7291                 :             : 
    7292                 :             : /* Print the information about variable *SLOT to dump file.  */
    7293                 :             : 
    7294                 :             : int
    7295                 :           6 : dump_var_tracking_slot (variable **slot, void *data ATTRIBUTE_UNUSED)
    7296                 :             : {
    7297                 :           6 :   variable *var = *slot;
    7298                 :             : 
    7299                 :           6 :   dump_var (var);
    7300                 :             : 
    7301                 :             :   /* Continue traversing the hash table.  */
    7302                 :           6 :   return 1;
    7303                 :             : }
    7304                 :             : 
    7305                 :             : /* Print the information about variable VAR to dump file.  */
    7306                 :             : 
    7307                 :             : static void
    7308                 :           9 : dump_var (variable *var)
    7309                 :             : {
    7310                 :           9 :   int i;
    7311                 :           9 :   location_chain *node;
    7312                 :             : 
    7313                 :           9 :   if (dv_is_decl_p (var->dv))
    7314                 :             :     {
    7315                 :           3 :       const_tree decl = dv_as_decl (var->dv);
    7316                 :             : 
    7317                 :           3 :       if (DECL_NAME (decl))
    7318                 :             :         {
    7319                 :           6 :           fprintf (dump_file, "  name: %s",
    7320                 :           3 :                    IDENTIFIER_POINTER (DECL_NAME (decl)));
    7321                 :           3 :           if (dump_flags & TDF_UID)
    7322                 :           0 :             fprintf (dump_file, "D.%u", DECL_UID (decl));
    7323                 :             :         }
    7324                 :           0 :       else if (TREE_CODE (decl) == DEBUG_EXPR_DECL)
    7325                 :           0 :         fprintf (dump_file, "  name: D#%u", DEBUG_TEMP_UID (decl));
    7326                 :             :       else
    7327                 :           0 :         fprintf (dump_file, "  name: D.%u", DECL_UID (decl));
    7328                 :           3 :       fprintf (dump_file, "\n");
    7329                 :             :     }
    7330                 :             :   else
    7331                 :             :     {
    7332                 :           6 :       fputc (' ', dump_file);
    7333                 :           6 :       print_rtl_single (dump_file, dv_as_value (var->dv));
    7334                 :             :     }
    7335                 :             : 
    7336                 :          18 :   for (i = 0; i < var->n_var_parts; i++)
    7337                 :             :     {
    7338                 :           9 :       fprintf (dump_file, "    offset " HOST_WIDE_INT_PRINT_DEC "\n",
    7339                 :           9 :                var->onepart ? 0 : VAR_PART_OFFSET (var, i));
    7340                 :          21 :       for (node = var->var_part[i].loc_chain; node; node = node->next)
    7341                 :             :         {
    7342                 :          12 :           fprintf (dump_file, "      ");
    7343                 :          12 :           if (node->init == VAR_INIT_STATUS_UNINITIALIZED)
    7344                 :           0 :             fprintf (dump_file, "[uninit]");
    7345                 :          12 :           print_rtl_single (dump_file, node->loc);
    7346                 :             :         }
    7347                 :             :     }
    7348                 :           9 : }
    7349                 :             : 
    7350                 :             : /* Print the information about variables from hash table VARS to dump file.  */
    7351                 :             : 
    7352                 :             : static void
    7353                 :           4 : dump_vars (variable_table_type *vars)
    7354                 :             : {
    7355                 :           4 :   if (!vars->is_empty ())
    7356                 :             :     {
    7357                 :           2 :       fprintf (dump_file, "Variables:\n");
    7358                 :           2 :       vars->traverse <void *, dump_var_tracking_slot> (NULL);
    7359                 :             :     }
    7360                 :           4 : }
    7361                 :             : 
    7362                 :             : /* Print the dataflow set SET to dump file.  */
    7363                 :             : 
    7364                 :             : static void
    7365                 :           4 : dump_dataflow_set (dataflow_set *set)
    7366                 :             : {
    7367                 :           4 :   int i;
    7368                 :             : 
    7369                 :           4 :   fprintf (dump_file, "Stack adjustment: " HOST_WIDE_INT_PRINT_DEC "\n",
    7370                 :             :            set->stack_adjust);
    7371                 :         376 :   for (i = 0; i < FIRST_PSEUDO_REGISTER; i++)
    7372                 :             :     {
    7373                 :         368 :       if (set->regs[i])
    7374                 :             :         {
    7375                 :           4 :           fprintf (dump_file, "Reg %d:", i);
    7376                 :           4 :           dump_attrs_list (set->regs[i]);
    7377                 :             :         }
    7378                 :             :     }
    7379                 :           4 :   dump_vars (shared_hash_htab (set->vars));
    7380                 :           4 :   fprintf (dump_file, "\n");
    7381                 :           4 : }
    7382                 :             : 
    7383                 :             : /* Print the IN and OUT sets for each basic block to dump file.  */
    7384                 :             : 
    7385                 :             : static void
    7386                 :           1 : dump_dataflow_sets (void)
    7387                 :             : {
    7388                 :           1 :   basic_block bb;
    7389                 :             : 
    7390                 :           2 :   FOR_EACH_BB_FN (bb, cfun)
    7391                 :             :     {
    7392                 :           1 :       fprintf (dump_file, "\nBasic block %d:\n", bb->index);
    7393                 :           1 :       fprintf (dump_file, "IN:\n");
    7394                 :           1 :       dump_dataflow_set (&VTI (bb)->in);
    7395                 :           1 :       fprintf (dump_file, "OUT:\n");
    7396                 :           1 :       dump_dataflow_set (&VTI (bb)->out);
    7397                 :             :     }
    7398                 :           1 : }
    7399                 :             : 
    7400                 :             : /* Return the variable for DV in dropped_values, inserting one if
    7401                 :             :    requested with INSERT.  */
    7402                 :             : 
    7403                 :             : static inline variable *
    7404                 :   166389261 : variable_from_dropped (decl_or_value dv, enum insert_option insert)
    7405                 :             : {
    7406                 :   166389261 :   variable **slot;
    7407                 :   166389261 :   variable *empty_var;
    7408                 :   166389261 :   onepart_enum onepart;
    7409                 :             : 
    7410                 :   166389261 :   slot = dropped_values->find_slot_with_hash (dv, dv_htab_hash (dv), insert);
    7411                 :             : 
    7412                 :   166389261 :   if (!slot)
    7413                 :             :     return NULL;
    7414                 :             : 
    7415                 :    70870919 :   if (*slot)
    7416                 :             :     return *slot;
    7417                 :             : 
    7418                 :     6376885 :   gcc_checking_assert (insert == INSERT);
    7419                 :             : 
    7420                 :     6376885 :   onepart = dv_onepart_p (dv);
    7421                 :             : 
    7422                 :     6376885 :   gcc_checking_assert (onepart == ONEPART_VALUE || onepart == ONEPART_DEXPR);
    7423                 :             : 
    7424                 :     6376885 :   empty_var = onepart_pool_allocate (onepart);
    7425                 :     6376885 :   empty_var->dv = dv;
    7426                 :     6376885 :   empty_var->refcount = 1;
    7427                 :     6376885 :   empty_var->n_var_parts = 0;
    7428                 :     6376885 :   empty_var->onepart = onepart;
    7429                 :     6376885 :   empty_var->in_changed_variables = false;
    7430                 :     6376885 :   empty_var->var_part[0].loc_chain = NULL;
    7431                 :     6376885 :   empty_var->var_part[0].cur_loc = NULL;
    7432                 :     6376885 :   VAR_LOC_1PAUX (empty_var) = NULL;
    7433                 :     6376885 :   set_dv_changed (dv, true);
    7434                 :             : 
    7435                 :     6376885 :   *slot = empty_var;
    7436                 :             : 
    7437                 :     6376885 :   return empty_var;
    7438                 :             : }
    7439                 :             : 
    7440                 :             : /* Recover the one-part aux from dropped_values.  */
    7441                 :             : 
    7442                 :             : static struct onepart_aux *
    7443                 :    99323045 : recover_dropped_1paux (variable *var)
    7444                 :             : {
    7445                 :    99323045 :   variable *dvar;
    7446                 :             : 
    7447                 :    99323045 :   gcc_checking_assert (var->onepart);
    7448                 :             : 
    7449                 :    99323045 :   if (VAR_LOC_1PAUX (var))
    7450                 :             :     return VAR_LOC_1PAUX (var);
    7451                 :             : 
    7452                 :    99323045 :   if (var->onepart == ONEPART_VDECL)
    7453                 :             :     return NULL;
    7454                 :             : 
    7455                 :    81823472 :   dvar = variable_from_dropped (var->dv, NO_INSERT);
    7456                 :             : 
    7457                 :    81823472 :   if (!dvar)
    7458                 :             :     return NULL;
    7459                 :             : 
    7460                 :    10931158 :   VAR_LOC_1PAUX (var) = VAR_LOC_1PAUX (dvar);
    7461                 :    10931158 :   VAR_LOC_1PAUX (dvar) = NULL;
    7462                 :             : 
    7463                 :    10931158 :   return VAR_LOC_1PAUX (var);
    7464                 :             : }
    7465                 :             : 
    7466                 :             : /* Add variable VAR to the hash table of changed variables and
    7467                 :             :    if it has no locations delete it from SET's hash table.  */
    7468                 :             : 
    7469                 :             : static void
    7470                 :   318868636 : variable_was_changed (variable *var, dataflow_set *set)
    7471                 :             : {
    7472                 :   318868636 :   hashval_t hash = dv_htab_hash (var->dv);
    7473                 :             : 
    7474                 :   318868636 :   if (emit_notes)
    7475                 :             :     {
    7476                 :   169072918 :       variable **slot;
    7477                 :             : 
    7478                 :             :       /* Remember this decl or VALUE has been added to changed_variables.  */
    7479                 :   169072918 :       set_dv_changed (var->dv, true);
    7480                 :             : 
    7481                 :   169072918 :       slot = changed_variables->find_slot_with_hash (var->dv, hash, INSERT);
    7482                 :             : 
    7483                 :   169072918 :       if (*slot)
    7484                 :             :         {
    7485                 :     3003763 :           variable *old_var = *slot;
    7486                 :     3003763 :           gcc_assert (old_var->in_changed_variables);
    7487                 :     3003763 :           old_var->in_changed_variables = false;
    7488                 :     3003763 :           if (var != old_var && var->onepart)
    7489                 :             :             {
    7490                 :             :               /* Restore the auxiliary info from an empty variable
    7491                 :             :                  previously created for changed_variables, so it is
    7492                 :             :                  not lost.  */
    7493                 :     2563846 :               gcc_checking_assert (!VAR_LOC_1PAUX (var));
    7494                 :     2563846 :               VAR_LOC_1PAUX (var) = VAR_LOC_1PAUX (old_var);
    7495                 :     2563846 :               VAR_LOC_1PAUX (old_var) = NULL;
    7496                 :             :             }
    7497                 :     3003763 :           variable_htab_free (*slot);
    7498                 :             :         }
    7499                 :             : 
    7500                 :   169072918 :       if (set && var->n_var_parts == 0)
    7501                 :             :         {
    7502                 :    30865638 :           onepart_enum onepart = var->onepart;
    7503                 :    30865638 :           variable *empty_var = NULL;
    7504                 :    30865638 :           variable **dslot = NULL;
    7505                 :             : 
    7506                 :    30865638 :           if (onepart == ONEPART_VALUE || onepart == ONEPART_DEXPR)
    7507                 :             :             {
    7508                 :    18971885 :               dslot = dropped_values->find_slot_with_hash (var->dv,
    7509                 :             :                                                            dv_htab_hash (var->dv),
    7510                 :             :                                                            INSERT);
    7511                 :    18971885 :               empty_var = *dslot;
    7512                 :             : 
    7513                 :    18971885 :               if (empty_var)
    7514                 :             :                 {
    7515                 :     5475844 :                   gcc_checking_assert (!empty_var->in_changed_variables);
    7516                 :     5475844 :                   if (!VAR_LOC_1PAUX (var))
    7517                 :             :                     {
    7518                 :     3266414 :                       VAR_LOC_1PAUX (var) = VAR_LOC_1PAUX (empty_var);
    7519                 :     3266414 :                       VAR_LOC_1PAUX (empty_var) = NULL;
    7520                 :             :                     }
    7521                 :             :                   else
    7522                 :     2209430 :                     gcc_checking_assert (!VAR_LOC_1PAUX (empty_var));
    7523                 :             :                 }
    7524                 :             :             }
    7525                 :             : 
    7526                 :     3266414 :           if (!empty_var)
    7527                 :             :             {
    7528                 :    25389794 :               empty_var = onepart_pool_allocate (onepart);
    7529                 :    25389794 :               empty_var->dv = var->dv;
    7530                 :    25389794 :               empty_var->refcount = 1;
    7531                 :    25389794 :               empty_var->n_var_parts = 0;
    7532                 :    25389794 :               empty_var->onepart = onepart;
    7533                 :    25389794 :               if (dslot)
    7534                 :             :                 {
    7535                 :    13496041 :                   empty_var->refcount++;
    7536                 :    13496041 :                   *dslot = empty_var;
    7537                 :             :                 }
    7538                 :             :             }
    7539                 :             :           else
    7540                 :     5475844 :             empty_var->refcount++;
    7541                 :    30865638 :           empty_var->in_changed_variables = true;
    7542                 :    30865638 :           *slot = empty_var;
    7543                 :    30865638 :           if (onepart)
    7544                 :             :             {
    7545                 :    30550511 :               empty_var->var_part[0].loc_chain = NULL;
    7546                 :    30550511 :               empty_var->var_part[0].cur_loc = NULL;
    7547                 :    30550511 :               VAR_LOC_1PAUX (empty_var) = VAR_LOC_1PAUX (var);
    7548                 :    30550511 :               VAR_LOC_1PAUX (var) = NULL;
    7549                 :             :             }
    7550                 :    30865638 :           goto drop_var;
    7551                 :             :         }
    7552                 :             :       else
    7553                 :             :         {
    7554                 :   138207280 :           if (var->onepart && !VAR_LOC_1PAUX (var))
    7555                 :    99323045 :             recover_dropped_1paux (var);
    7556                 :   138207280 :           var->refcount++;
    7557                 :   138207280 :           var->in_changed_variables = true;
    7558                 :   138207280 :           *slot = var;
    7559                 :             :         }
    7560                 :             :     }
    7561                 :             :   else
    7562                 :             :     {
    7563                 :   149795718 :       gcc_assert (set);
    7564                 :   149795718 :       if (var->n_var_parts == 0)
    7565                 :             :         {
    7566                 :    70599285 :           variable **slot;
    7567                 :             : 
    7568                 :    39733647 :         drop_var:
    7569                 :    70599285 :           slot = shared_hash_find_slot_noinsert (set->vars, var->dv);
    7570                 :    70599285 :           if (slot)
    7571                 :             :             {
    7572                 :    70599285 :               if (shared_hash_shared (set->vars))
    7573                 :           0 :                 slot = shared_hash_find_slot_unshare (&set->vars, var->dv,